@@ -824,6 +824,8 @@ yaml_scalar_event_initialize(yaml_event_t *event,
824 yaml_char_t *value_copy = NULL;
824 yaml_char_t *value_copy = NULL;
826 assert(event); /* Non-NULL event object is expected. */
826 assert(event); /* Non-NULL event object is expected. */
827+ /* following line added for Haskell yaml library */
828+ if (!value && !length) value = "";
827 assert(value); /* Non-NULL anchor is expected. */
829 assert(value); /* Non-NULL anchor is expected. */
829 if (anchor) {
831 if (anchor) {