@nfdi4plants/arctrl 3.1.1 → 3.2.0

package/dist/ts/ts/fable_modules/{YAMLicious.1.0.0-alpha.11 → YAMLicious.1.0.0}/Reader.fs.js

@@ -1,17 +1,18 @@
+import { parse } from '../../../node_modules/@fable-org/fable-library-ts/Int32.js';
 import { unescapeDoubleQuoted } from './Escapes.fs.js';
-import { PreprocessorElement_Line, ScalarStyle_DoubleQuoted, ScalarStyle_SingleQuoted, YAMLContent_create_Z1C3A29C9, YAMLContent, ScalarStyle_Plain, YAMLElement_Comment, YAMLElement_Nil, YAMLElement_Value, YAMLElement_Mapping, YAMLElement_Object, YAMLElement_Sequence, ScalarStyle_Block, YAMLElement_Alias } from './YAMLiciousTypes.fs.js';
-import { match, create, replace } from '../../../node_modules/@fable-org/fable-library-js/RegExp.js';
-import { parse } from '../../../node_modules/@fable-org/fable-library-js/Int32.js';
-import { map, value, unwrap, bind } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
-import { getItemFromDict } from '../../../node_modules/@fable-org/fable-library-js/MapUtil.js';
-import { isEmpty, head, tail, empty, cons, append, singleton as singleton$1, collect, reverse, length, filter, map as map$1, ofArrayWithTail, exists, ofArray } from '../../../node_modules/@fable-org/fable-library-js/List.js';
+import { PreprocessorElement_Line, ScalarStyle, YAMLContent_create_Z1C3A29C9, YAMLContent, YAMLElement_Comment$, YAMLElement, YAMLElement_Value, YAMLElement_Mapping, YAMLElement_Object$, YAMLElement_Sequence, ScalarStyle_Block, YAMLElement_Alias } from './YAMLiciousTypes.fs.js';
+import { match, create, replace } from '../../../node_modules/@fable-org/fable-library-ts/RegExp.js';
+import { concat, toFail, printf, substring, join, trimStart, split } from '../../../node_modules/@fable-org/fable-library-ts/String.js';
+import { value, unwrap } from '../../../node_modules/@fable-org/fable-library-ts/Option.js';
+import { getItemFromDict } from '../../../node_modules/@fable-org/fable-library-ts/MapUtil.js';
+import { Exception } from '../../../node_modules/@fable-org/fable-library-ts/Util.js';
+import { isEmpty, head, tail, empty, cons, append, singleton as singleton$1, collect, reverse, length, filter, map, ofArrayWithTail, exists, ofArray } from '../../../node_modules/@fable-org/fable-library-ts/List.js';
 import { $007CYamlComment$007C_$007C, $007CSequenceMinusOpener$007C_$007C, $007CKey$007C_$007C, $007CKeyValue$007C_$007C, $007CDocumentEnd$007C_$007C, $007CYamlValue$007C_$007C, $007CAliasNode$007C_$007C, $007CSchemaNamespace$007C_$007C, $007CInlineSequence$007C_$007C, $007CSequenceSquareOpener$007C_$007C, $007CSequenceSquareCloser$007C_$007C, $007CInlineJSON$007C_$007C, $007CJSONKeyOpener$007C_$007C, $007CJSONCloser$007C_$007C, $007CExplicitKey$007C_$007C, $007CExplicitValue$007C_$007C } from './RegexActivePatterns.fs.js';
-import { toList, delay, append as append$1, singleton, empty as empty$1, takeWhile, skipWhile, map as map$2 } from '../../../node_modules/@fable-org/fable-library-js/Seq.js';
-import { toFail, printf, substring, join, trimStart, split } from '../../../node_modules/@fable-org/fable-library-js/String.js';
+import { toList, delay, append as append$1, singleton, empty as empty$1, takeWhile, skipWhile, map as map$1 } from '../../../node_modules/@fable-org/fable-library-ts/Seq.js';
 import { VerbatimTagPattern, AnchorPattern } from './Regex.fs.js';
-import { tryFind } from '../../../node_modules/@fable-org/fable-library-js/Map.js';
+import { tryFind } from '../../../node_modules/@fable-org/fable-library-ts/Map.js';
 import { Placeholder_splitTrailingComment, BlockScalar_parseHeader, BlockScalar_buildContent, Placeholder_tryParseComment, FlowTokens_tokenize, Document_isTopLevelMarker, Document_isStart, Document_tryInlineContentAfterStartMarker, Document_isDirectivePreludeOnly, Document_isEnd, BlockScalar_tryDetectHeaderIndent, Line_countLeadingSpaces, Line_normalizeNewlines } from './Syntax.fs.js';
-import { Queue$1_$ctor_BB573A, Queue$1__Dequeue } from '../../../node_modules/@fable-org/fable-library-js/System.Collections.Generic.js';
+import { Queue$1_$ctor_BB573A, Queue$1__Dequeue } from '../../../node_modules/@fable-org/fable-library-ts/System.Collections.Generic.js';
 import { read as read$1 } from './Preprocessing.fs.js';
 
 function restoreScalarPlaceholderValue(entry) {
@@ -31,7 +32,7 @@ function restoreBlockScalarPlaceholderValue(entry) {
   }
 }
 function tryParseExactPlaceholderIndex(v) {
-  const m = match(create(`^${"<s f=(?<index>\\d+)\\/>"}$`), v.trim());
+  const m = match(create(concat("^", "<s f=(?<index>\\d+)\\/>", "$")), v.trim());
   if (m != null) {
     return parse(m.groups && m.groups.index || "", 511, false, 32);
   } else {
@@ -42,11 +43,16 @@ function restoreStringReplace(stringDict, v) {
   return replace(v, "<s f=(?<index>\\d+)\\/>", (m) => restoreScalarPlaceholderValue(getItemFromDict(stringDict, parse(m.groups && m.groups.index || "", 511, false, 32))));
 }
 function restoreCommentReplace(commentDict, commentId) {
-  return map((id) => getItemFromDict(commentDict, id), commentId);
+  const option_1 = commentId;
+  if (option_1 != null) {
+    return getItemFromDict(commentDict, value(option_1));
+  } else {
+    return void 0;
+  }
 }
 function isBlankLineElement(_arg) {
-  let line;
-  let matchResult, line_1;
+  let line = void 0;
+  let matchResult = void 0, line_1 = void 0;
   if (_arg.tag === /* Line */
   2) {
     if (line = _arg.fields[0], line.trim() === "") {
@@ -66,7 +72,7 @@ function isBlankLineElement(_arg) {
   }
 }
 function takeLeadingSequenceItemPrefix(eles) {
-  let matchResult, line_1, rest_1, commentElement, rest_2;
+  let matchResult = void 0, line_1 = void 0, rest_1 = void 0, commentElement = void 0, rest_2 = void 0;
   if (!isEmpty(eles)) {
     if (isBlankLineElement(head(eles))) {
       matchResult = 0;
@@ -98,7 +104,7 @@ function takeLeadingSequenceItemPrefix(eles) {
 function splitLeadingSequenceItemContinuation(eles) {
   const patternInput = takeLeadingSequenceItemPrefix(eles);
   const afterPrefix = patternInput[1];
-  let matchResult, tail$1, yamlAstList;
+  let matchResult = void 0, tail$1 = void 0, yamlAstList = void 0;
   if (patternInput[2]) {
     if (!isEmpty(afterPrefix)) {
       if (head(afterPrefix).tag === /* Intendation */
@@ -126,7 +132,7 @@ function collectSequenceElements(eles_mut) {
   collectSequenceElements:
     while (true) {
       const eles = eles_mut;
-      let matchResult, line_1, rest_1, rest_2, v, yamlAstList;
+      let matchResult = void 0, line_1 = void 0, rest_1 = void 0, rest_2 = void 0, v = void 0, yamlAstList = void 0;
       if (!isEmpty(eles)) {
         if (isBlankLineElement(head(eles))) {
           matchResult = 0;
@@ -188,7 +194,7 @@ function collectSequenceElements(eles_mut) {
     }
 }
 function isSequenceElement(e) {
-  let matchResult;
+  let matchResult = void 0;
   if (e.tag === /* Intendation */
   1) {
     matchResult = 0;
@@ -263,16 +269,16 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
     } else {
       const entry = getItemFromDict(stringDict, value(matchValue));
       return [restoreScalarPlaceholderValue(entry), entry.Kind.tag === /* DoubleQuotedString */
-      1 ? ScalarStyle_DoubleQuoted() : ScalarStyle_SingleQuoted()];
+      1 ? ScalarStyle.DoubleQuoted : ScalarStyle.SingleQuoted];
     }
   };
   const extractProperties = (handles_2, v) => {
-    let shorthand, m_2, handle, suffix, matchValue_2;
     let current = v.trim();
     let tag = void 0;
     let anchor = void 0;
     let changed = true;
     while (changed) {
+      let shorthand = void 0, m_2 = void 0, handle = void 0, suffix = void 0, matchValue_2 = void 0;
       changed = false;
       const mTag = match(create(VerbatimTagPattern), current);
       if (mTag != null) {
@@ -335,20 +341,20 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
     }
   };
   const tryCollapsePlainScalarContent = (hasInlineFirstLine, block_1, parsed) => {
-    let values, renderedBlockLines;
+    let values = void 0, renderedBlockLines = void 0;
     let matchValue_6;
     const element = parsed;
     const loop = (allowMetadata_1_mut, items_mut, acc_mut) => {
-      let content, matchValue_4;
       loop:
         while (true) {
           const allowMetadata_1 = allowMetadata_1_mut, items = items_mut, acc = acc_mut;
-          let matchResult, content_2, rest_1;
+          let content = void 0, hasPlainCompatibleStyle = void 0, matchValue_4 = void 0, hasOnlyContinuationContent = void 0;
+          let matchResult = void 0, content_2 = void 0, rest_1 = void 0;
           if (!isEmpty(items)) {
             if (head(items).tag === /* Value */
             1) {
-              if (content = head(items).fields[0], (matchValue_4 = content.Style, matchValue_4 != null ? value(matchValue_4).tag === /* Plain */
-              0 : true) && (allowMetadata_1 ? true : content.Comment == null && content.Anchor == null && content.Tag == null)) {
+              if (content = head(items).fields[0], hasPlainCompatibleStyle = (matchValue_4 = content.Style, matchValue_4 != null ? value(matchValue_4).tag === /* Plain */
+              0 : true), hasOnlyContinuationContent = content.Comment == null && content.Anchor == null && content.Tag == null, hasPlainCompatibleStyle && (allowMetadata_1 ? true : hasOnlyContinuationContent)) {
                 matchResult = 1;
                 content_2 = head(items).fields[0];
                 rest_1 = tail(items);
@@ -384,7 +390,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
     };
     matchValue_6 = element.tag === /* Object */
     3 ? loop(true, element.fields[0], empty()) : void 0;
-    let matchResult_1, firstSegment, segments_1;
+    let matchResult_1 = void 0, firstSegment = void 0, segments_1 = void 0;
     if (matchValue_6 != null) {
       if (!isEmpty(value(matchValue_6))) {
         matchResult_1 = 0;
@@ -399,25 +405,25 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
     switch (matchResult_1) {
       case 0: {
         const rawBlockLines = flattenBlockScalarContent(block_1);
-        const rawValue = join("\n", (hasInlineFirstLine ? length(segments_1) - 1 : length(segments_1)) === length(filter((line_1) => line_1.trim() !== "", rawBlockLines)) ? (values = Queue$1_$ctor_BB573A(hasInlineFirstLine ? tail(segments_1) : segments_1), renderedBlockLines = map$1((rawLine) => {
+        const rawValue = join("\n", (hasInlineFirstLine ? length(segments_1) - 1 : length(segments_1)) === length(filter((line_1) => line_1.trim() !== "", rawBlockLines)) ? (values = Queue$1_$ctor_BB573A(hasInlineFirstLine ? tail(segments_1) : segments_1), renderedBlockLines = map((rawLine) => {
           if (rawLine.trim() === "") {
             return "";
           } else {
             return Queue$1__Dequeue(values).Value;
           }
-        }, rawBlockLines), hasInlineFirstLine ? cons(firstSegment.Value, renderedBlockLines) : renderedBlockLines) : map$1((segment) => segment.Value, segments_1));
-        return new YAMLContent(rawValue, firstSegment.Comment, firstSegment.Anchor, firstSegment.Tag, rawValue.indexOf("\n") >= 0 ? ScalarStyle_Plain() : firstSegment.Style);
+        }, rawBlockLines), hasInlineFirstLine ? cons(firstSegment.Value, renderedBlockLines) : renderedBlockLines) : map((segment) => segment.Value, segments_1));
+        return new YAMLContent(rawValue, firstSegment.Comment, firstSegment.Anchor, firstSegment.Tag, rawValue.indexOf("\n") >= 0 ? ScalarStyle.Plain : firstSegment.Style);
       }
       default:
         return void 0;
     }
   };
   const takePlainScalarContinuationContents = (elements_1_mut, acc_1_mut) => {
-    let v_1;
     takePlainScalarContinuationContents:
       while (true) {
         const elements_1 = elements_1_mut, acc_1 = acc_1_mut;
-        let matchResult_2;
+        let v_1 = void 0;
+        let matchResult_2 = void 0;
         if (isEmpty(elements_1)) {
           matchResult_2 = 0;
         } else if ($007CKey$007C_$007C(head(elements_1)) != null) {
@@ -437,7 +443,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
           case 0:
             return [reverse(acc_1), elements_1];
           default: {
-            let matchResult_3, rest_3, v_2;
+            let matchResult_3 = void 0, rest_3 = void 0, v_2 = void 0;
             if (!isEmpty(elements_1)) {
               const activePatternResult_5 = $007CYamlValue$007C_$007C(head(elements_1));
               if (activePatternResult_5 != null) {
@@ -461,7 +467,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                 const matchValue_8 = content_3.Comment;
                 const matchValue_9 = content_3.Anchor;
                 const matchValue_10 = content_3.Tag;
-                let matchResult_4;
+                let matchResult_4 = void 0;
                 if (matchValue_7 != null) {
                   if (value(matchValue_7).tag === /* Plain */
                   0) {
@@ -516,7 +522,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
     takeLeadingComments:
       while (true) {
         const elements_2 = elements_2_mut;
-        let matchResult_5, line_3, rest_5, commentElement, rest_6;
+        let matchResult_5 = void 0, line_3 = void 0, rest_5 = void 0, commentElement = void 0, rest_6 = void 0;
         if (!isEmpty(elements_2)) {
           if (isBlankLineElement(head(elements_2))) {
             matchResult_5 = 0;
@@ -547,17 +553,17 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
         break;
       }
   };
-  const commentTokensToYaml = (comments_1) => map$1((_arg_3) => {
+  const commentTokensToYaml = (comments_1) => map((_arg_3) => {
     const activePatternResult_7 = $007CYamlComment$007C_$007C(_arg_3);
     if (activePatternResult_7 != null) {
       const comment_2 = value(activePatternResult_7);
-      return YAMLElement_Comment(getItemFromDict(commentDict, comment_2.Comment));
+      return YAMLElement_Comment$(getItemFromDict(commentDict, comment_2.Comment));
     } else {
       return toFail(printf("Expected leading comment token, got: %A"))(_arg_3);
     }
   }, comments_1);
   const parseFlowNode = (tokens) => {
-    let matchResult_6, rest_7, rest_8;
+    let matchResult_6 = void 0, rest_7 = void 0, rest_8 = void 0;
     if (!isEmpty(tokens)) {
       switch (head(tokens).tag) {
         case /* OpenBrace */
@@ -603,14 +609,21 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
       case 3:
         return parseFlowScalar(tokens)(empty());
       case 4:
-        return [YAMLElement_Nil(), tokens];
+        return [YAMLElement.Nil, tokens];
       default:
         return toFail(printf("Unexpected flow token: %A"))(tokens);
     }
   };
-  const tryCommentElementFromFlowString = (value_5) => map((id) => YAMLElement_Comment(getItemFromDict(commentDict, id)), Placeholder_tryParseComment(value_5));
+  const tryCommentElementFromFlowString = (value_5) => {
+    const option_1 = Placeholder_tryParseComment(value_5);
+    if (option_1 != null) {
+      return YAMLElement_Comment$(getItemFromDict(commentDict, value(option_1)));
+    } else {
+      return void 0;
+    }
+  };
   const parseFlowScalar = (tokens_1) => (acc_2) => {
-    let matchResult_7, rest_10, value_7, rest_11, value_8, rest_12;
+    let matchResult_7 = void 0, rest_10 = void 0, value_7 = void 0, rest_11 = void 0, value_8 = void 0, rest_12 = void 0;
     if (!isEmpty(tokens_1)) {
       switch (head(tokens_1).tag) {
         case /* String */
@@ -649,7 +662,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
         return parseFlowScalar(rest_12)(cons(":", acc_2));
       default: {
         const matchValue_13 = reverse(acc_2);
-        return isEmpty(matchValue_13) ? [YAMLElement_Nil(), tokens_1] : [YAMLElement_Value(createScalarContent(join("", matchValue_13), void 0)), tokens_1];
+        return isEmpty(matchValue_13) ? [YAMLElement.Nil, tokens_1] : [YAMLElement_Value(createScalarContent(join("", matchValue_13), void 0)), tokens_1];
       }
     }
   };
@@ -658,7 +671,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
       loop_1:
         while (true) {
           const remaining = remaining_mut, acc_3 = acc_3_mut;
-          let matchResult_8, rest_14, rest_15, rest_16, value_10, key, rest_17;
+          let matchResult_8 = void 0, rest_14 = void 0, rest_15 = void 0, rest_16 = void 0, value_10 = void 0, key = void 0, rest_17 = void 0;
           if (!isEmpty(remaining)) {
             switch (head(remaining).tag) {
               case /* CloseBrace */
@@ -706,14 +719,14 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
           }
           switch (matchResult_8) {
             case 0:
-              return [YAMLElement_Object(reverse(acc_3)), rest_14];
+              return [YAMLElement_Object$(reverse(acc_3)), rest_14];
             case 1: {
               remaining_mut = rest_15;
               acc_3_mut = acc_3;
               continue loop_1;
             }
             case 2:
-              return [YAMLElement_Object(reverse(acc_3)), remaining];
+              return [YAMLElement_Object$(reverse(acc_3)), remaining];
             case 3: {
               remaining_mut = rest_16;
               acc_3_mut = cons(value(tryCommentElementFromFlowString(value_10)), acc_3);
@@ -726,8 +739,8 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
               remaining_mut = patternInput_4[1];
               acc_3_mut = cons(YAMLElement_Mapping(keyContent, value_11.tag === /* Object */
               3 ? value_11 : value_11.tag === /* Sequence */
-              2 ? YAMLElement_Object(singleton$1(value_11)) : value_11.tag === /* Value */
-              1 ? YAMLElement_Object(singleton$1(value_11)) : value_11), acc_3);
+              2 ? YAMLElement_Object$(singleton$1(value_11)) : value_11.tag === /* Value */
+              1 ? YAMLElement_Object$(singleton$1(value_11)) : value_11), acc_3);
               continue loop_1;
             }
             default:
@@ -743,7 +756,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
       loop_2:
         while (true) {
           const remaining_1 = remaining_1_mut, acc_4 = acc_4_mut;
-          let matchResult_9, rest_19, rest_20, rest_21, value_13;
+          let matchResult_9 = void 0, rest_19 = void 0, rest_20 = void 0, rest_21 = void 0, value_13 = void 0;
           if (!isEmpty(remaining_1)) {
             switch (head(remaining_1).tag) {
               case /* CloseBracket */
@@ -792,7 +805,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
               return [YAMLElement_Sequence(reverse(acc_4)), remaining_1];
             case 3: {
               remaining_1_mut = rest_21;
-              acc_4_mut = cons(YAMLElement_Object(singleton$1(value(tryCommentElementFromFlowString(value_13)))), acc_4);
+              acc_4_mut = cons(YAMLElement_Object$(singleton$1(value(tryCommentElementFromFlowString(value_13)))), acc_4);
               continue loop_2;
             }
             default: {
@@ -800,8 +813,8 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
               const item = patternInput_5[0];
               remaining_1_mut = patternInput_5[1];
               acc_4_mut = cons(item.tag === /* Value */
-              1 ? YAMLElement_Object(singleton$1(item)) : item.tag === /* Sequence */
-              2 ? YAMLElement_Object(singleton$1(item)) : item, acc_4);
+              1 ? YAMLElement_Object$(singleton$1(item)) : item.tag === /* Sequence */
+              2 ? YAMLElement_Object$(singleton$1(item)) : item, acc_4);
               continue loop_2;
             }
           }
@@ -812,8 +825,8 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
   };
   const parseFlowSource = (source) => parseFlowNode(FlowTokens_tokenize(source))[0];
   const prependRootFlow = (comment_4, node_2, acc_5) => append(reverse(toList(delay(() => {
-    let matchValue_19;
-    return append$1((matchValue_19 = comment_4, matchValue_19 == null ? empty$1() : singleton(YAMLElement_Comment(value(matchValue_19)))), delay(() => {
+    let matchValue_19 = void 0;
+    return append$1((matchValue_19 = comment_4, matchValue_19 == null ? empty$1() : singleton(YAMLElement_Comment$(value(matchValue_19)))), delay(() => {
       const matchValue_20 = node_2;
       switch (matchValue_20.tag) {
         case /* Object */
@@ -829,11 +842,11 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
     }));
   }))), acc_5);
   const loopRead = (handles_3_mut, restlist_mut, acc_6_mut) => {
-    let c2_2, c1_2, c1_1, c2_1, s_3, s_4, matchValue_30, content_4, continuations, matchValue_36, single, v_25, block_5, block_2, iList_2, closer_2, yamlAstList_1, v_4;
     loopRead:
       while (true) {
         const handles_3 = handles_3_mut, restlist = restlist_mut, acc_6 = acc_6_mut;
-        let matchResult_10, alias, rest_25;
+        let c2_2 = void 0, c1_2 = void 0, c1_1 = void 0, c2_1 = void 0, s_3 = void 0, s_4 = void 0, matchValue_30 = void 0, content_4 = void 0, continuations = void 0, matchValue_36 = void 0, single = void 0, v_25 = void 0, v_4 = void 0;
+        let matchResult_10 = void 0, alias = void 0, rest_25 = void 0;
         if (!isEmpty(restlist)) {
           const activePatternResult_8 = $007CAliasNode$007C_$007C(head(restlist));
           if (activePatternResult_8 != null) {
@@ -856,9 +869,9 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
             continue loopRead;
           }
           case 1:
-            return YAMLElement_Object(reverse(acc_6));
+            return YAMLElement_Object$(reverse(acc_6));
           default: {
-            let matchResult_11, rest0, v_3, yamlAstList;
+            let matchResult_11 = void 0, rest0 = void 0, v_3 = void 0, yamlAstList = void 0;
             if (!isEmpty(restlist)) {
               const activePatternResult_10 = $007CSchemaNamespace$007C_$007C(head(restlist));
               if (activePatternResult_10 != null) {
@@ -886,11 +899,11 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                 const sequenceElements = collectSequenceElements(toList(takeWhile(isSequenceElement, rest0)));
                 handles_3_mut = handles_3;
                 restlist_mut = toList(skipWhile(isSequenceElement, rest0));
-                acc_6_mut = cons(YAMLElement_Sequence(toList(delay(() => append$1(singleton(loopRead(handles_3, cons(PreprocessorElement_Line(v_3.Key), yamlAstList), empty())), delay(() => map$2((i) => loopRead(handles_3, i, empty()), sequenceElements)))))), acc_6);
+                acc_6_mut = cons(YAMLElement_Sequence(toList(delay(() => append$1(singleton(loopRead(handles_3, cons(PreprocessorElement_Line(v_3.Key), yamlAstList), empty())), delay(() => map$1((i) => loopRead(handles_3, i, empty()), sequenceElements)))))), acc_6);
                 continue loopRead;
               }
               default: {
-                let matchResult_12, rest0_2, v_5, rest0_3, v_6, yamlAstList_2;
+                let matchResult_12 = void 0, rest0_2 = void 0, v_5 = void 0, rest0_3 = void 0, v_6 = void 0, yamlAstList_2 = void 0;
                 if (!isEmpty(restlist)) {
                   const activePatternResult_11 = $007CSchemaNamespace$007C_$007C(head(restlist));
                   if (activePatternResult_11 != null) {
@@ -903,7 +916,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                       if (!isEmpty(tail(restlist))) {
                         if (head(tail(restlist)).tag === /* Intendation */
                         1) {
-                          if (yamlAstList_1 = head(tail(restlist)).fields[0], v_4 = value(activePatternResult_12), v_4.Value != null && isBlockScalarHeaderCandidate(value(v_4.Value))) {
+                          if (head(tail(restlist)).fields[0], v_4 = value(activePatternResult_12), v_4.Value != null && isBlockScalarHeaderCandidate(value(v_4.Value))) {
                             matchResult_12 = 1;
                             rest0_3 = tail(tail(restlist));
                             v_6 = value(activePatternResult_12);
@@ -929,7 +942,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                     const sequenceElements_1 = collectSequenceElements(toList(takeWhile(isSequenceElement, rest0_2)));
                     handles_3_mut = handles_3;
                     restlist_mut = toList(skipWhile(isSequenceElement, rest0_2));
-                    acc_6_mut = cons(YAMLElement_Sequence(toList(delay(() => append$1(singleton(loopRead(handles_3, singleton$1(PreprocessorElement_Line(v_5.Key)), empty())), delay(() => map$2((i_1) => loopRead(handles_3, i_1, empty()), sequenceElements_1)))))), acc_6);
+                    acc_6_mut = cons(YAMLElement_Sequence(toList(delay(() => append$1(singleton(loopRead(handles_3, singleton$1(PreprocessorElement_Line(v_5.Key)), empty())), delay(() => map$1((i_1) => loopRead(handles_3, i_1, empty()), sequenceElements_1)))))), acc_6);
                     continue loopRead;
                   }
                   case 1: {
@@ -941,15 +954,15 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                       const blockScalar = value(matchValue_21);
                       const sequenceElements_2 = collectSequenceElements(toList(takeWhile(isSequenceElement, rest0_3)));
                       const rest_28 = toList(skipWhile(isSequenceElement, rest0_3));
-                      const firstItem = YAMLElement_Object(singleton$1(YAMLElement_Value(YAMLContent_create_Z1C3A29C9(blockScalar.Value, unwrap(blockScalar.Comment), unwrap(blockScalar.Props.Anchor), unwrap(blockScalar.Props.Tag), ScalarStyle_Block(blockScalar.Style, blockScalar.Chomp, blockScalar.Indent)))));
+                      const firstItem = YAMLElement_Object$(singleton$1(YAMLElement_Value(YAMLContent_create_Z1C3A29C9(blockScalar.Value, unwrap(blockScalar.Comment), unwrap(blockScalar.Props.Anchor), unwrap(blockScalar.Props.Tag), ScalarStyle_Block(blockScalar.Style, blockScalar.Chomp, blockScalar.Indent)))));
                       handles_3_mut = handles_3;
                       restlist_mut = rest_28;
-                      acc_6_mut = cons(YAMLElement_Sequence(toList(delay(() => append$1(singleton(firstItem), delay(() => map$2((i_2) => loopRead(handles_3, i_2, empty()), sequenceElements_2)))))), acc_6);
+                      acc_6_mut = cons(YAMLElement_Sequence(toList(delay(() => append$1(singleton(firstItem), delay(() => map$1((i_2) => loopRead(handles_3, i_2, empty()), sequenceElements_2)))))), acc_6);
                       continue loopRead;
                     }
                   }
                   default: {
-                    let matchResult_13, rest0_4, v_7, yamlAstList_3;
+                    let matchResult_13 = void 0, rest0_4 = void 0, v_7 = void 0, yamlAstList_3 = void 0;
                     if (!isEmpty(restlist)) {
                       const activePatternResult_13 = $007CSequenceMinusOpener$007C_$007C(head(restlist));
                       if (activePatternResult_13 != null) {
@@ -975,14 +988,16 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                     switch (matchResult_13) {
                       case 0: {
                         let firstItem_1;
-                        const matchValue_22 = bind((value_14) => {
+                        let matchValue_22;
+                        const option_9 = v_7.Value;
+                        if (option_9 != null) {
                           let matchValue_15;
-                          const patternInput_7 = Placeholder_splitTrailingComment(value_14);
+                          const patternInput_7 = Placeholder_splitTrailingComment(value(option_9));
                           const commentId_1 = patternInput_7[1];
                           const matchValue_14 = patternInput_7[0].trim();
                           matchValue_15 = matchValue_14 === "[" ? ["[", "]", commentId_1] : matchValue_14 === "{" ? ["{", "}", commentId_1] : void 0;
                           if (matchValue_15 == null) {
-                            return void 0;
+                            matchValue_22 = void 0;
                           } else {
                             const opening = value(matchValue_15)[0];
                             const openerCommentId = value(matchValue_15)[2];
@@ -1013,38 +1028,40 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                             };
                             matchValue_16 = loop_3(empty(), reverse(flattenFlowContent(yamlAstList_3)));
                             if (matchValue_16 == null) {
-                              return void 0;
+                              matchValue_22 = void 0;
                             } else {
                               const closerCommentId = value(matchValue_16)[1];
-                              return [parseFlowSource(join("\n", cons(opening, value(matchValue_16)[0]))), openerCommentId, closerCommentId];
+                              matchValue_22 = [parseFlowSource(join("\n", cons(opening, value(matchValue_16)[0]))), openerCommentId, closerCommentId];
                             }
                           }
-                        }, v_7.Value);
+                        } else {
+                          matchValue_22 = void 0;
+                        }
                         if (matchValue_22 == null) {
                           const parsedFirstItem = loopRead(handles_3, v_7.Value != null ? cons(PreprocessorElement_Line(value(v_7.Value)), yamlAstList_3) : yamlAstList_3, empty());
                           const matchValue_23 = tryCollapsePlainScalarContent(v_7.Value != null, yamlAstList_3, parsedFirstItem);
-                          firstItem_1 = matchValue_23 == null ? parsedFirstItem : YAMLElement_Object(singleton$1(YAMLElement_Value(value(matchValue_23))));
+                          firstItem_1 = matchValue_23 == null ? parsedFirstItem : YAMLElement_Object$(singleton$1(YAMLElement_Value(value(matchValue_23))));
                         } else {
                           const closerCommentId_1 = value(matchValue_22)[2];
                           const node_1 = value(matchValue_22)[0];
                           let commentsBefore;
                           const matchValue_17 = restoreCommentReplace(commentDict, value(matchValue_22)[1]);
-                          commentsBefore = matchValue_17 == null ? empty() : singleton$1(YAMLElement_Comment(value(matchValue_17)));
+                          commentsBefore = matchValue_17 == null ? empty() : singleton$1(YAMLElement_Comment$(value(matchValue_17)));
                           let commentsAfter;
                           const matchValue_18 = restoreCommentReplace(commentDict, closerCommentId_1);
-                          commentsAfter = matchValue_18 == null ? empty() : singleton$1(YAMLElement_Comment(value(matchValue_18)));
+                          commentsAfter = matchValue_18 == null ? empty() : singleton$1(YAMLElement_Comment$(value(matchValue_18)));
                           firstItem_1 = node_1.tag === /* Object */
-                          3 ? YAMLElement_Object(append(commentsBefore, append(node_1.fields[0], commentsAfter))) : node_1.tag === /* Nil */
-                          8 ? YAMLElement_Object(append(commentsBefore, commentsAfter)) : YAMLElement_Object(append(commentsBefore, append(singleton$1(node_1), commentsAfter)));
+                          3 ? YAMLElement_Object$(append(commentsBefore, append(node_1.fields[0], commentsAfter))) : node_1.tag === /* Nil */
+                          8 ? YAMLElement_Object$(append(commentsBefore, commentsAfter)) : YAMLElement_Object$(append(commentsBefore, append(singleton$1(node_1), commentsAfter)));
                         }
                         const sequenceElements_3 = collectSequenceElements(toList(takeWhile(isSequenceElement, rest0_4)));
                         handles_3_mut = handles_3;
                         restlist_mut = toList(skipWhile(isSequenceElement, rest0_4));
-                        acc_6_mut = cons(YAMLElement_Sequence(toList(delay(() => append$1(singleton(firstItem_1), delay(() => map$2((i_3) => loopRead(handles_3, i_3, empty()), sequenceElements_3)))))), acc_6);
+                        acc_6_mut = cons(YAMLElement_Sequence(toList(delay(() => append$1(singleton(firstItem_1), delay(() => map$1((i_3) => loopRead(handles_3, i_3, empty()), sequenceElements_3)))))), acc_6);
                         continue loopRead;
                       }
                       default: {
-                        let matchResult_14, rest0_5, v_8, rest_31, v_9, closer, iList, opener, rest_32;
+                        let matchResult_14 = void 0, rest0_5 = void 0, v_8 = void 0, rest_31 = void 0, v_9 = void 0, closer = void 0, iList = void 0, opener = void 0, rest_32 = void 0;
                         if (!isEmpty(restlist)) {
                           const activePatternResult_14 = $007CSequenceMinusOpener$007C_$007C(head(restlist));
                           if (activePatternResult_14 != null) {
@@ -1106,7 +1123,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                             const sequenceElements_4 = collectSequenceElements(toList(takeWhile(isSequenceElement, sequenceSource)));
                             handles_3_mut = handles_3;
                             restlist_mut = toList(skipWhile(isSequenceElement, sequenceSource));
-                            acc_6_mut = cons(YAMLElement_Sequence(toList(delay(() => append$1(singleton(loopRead(handles_3, patternInput_9[0], empty())), delay(() => map$2((i_4) => loopRead(handles_3, i_4, empty()), sequenceElements_4)))))), acc_6);
+                            acc_6_mut = cons(YAMLElement_Sequence(toList(delay(() => append$1(singleton(loopRead(handles_3, patternInput_9[0], empty())), delay(() => map$1((i_4) => loopRead(handles_3, i_4, empty()), sequenceElements_4)))))), acc_6);
                             continue loopRead;
                           }
                           case 1: {
@@ -1121,11 +1138,11 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                             const current_7 = parseFlowSource("[" + join("\n", flattenFlowContent(iList)) + "]");
                             handles_3_mut = handles_3;
                             restlist_mut = rest_32;
-                            acc_6_mut = c1 == null ? c2 == null ? cons(current_7, acc_6) : (c2_2 = value(c2), ofArrayWithTail([YAMLElement_Comment(c2_2), current_7], acc_6)) : c2 == null ? (c1_2 = value(c1), ofArrayWithTail([current_7, YAMLElement_Comment(c1_2)], acc_6)) : (c1_1 = value(c1), c2_1 = value(c2), ofArrayWithTail([YAMLElement_Comment(c2_1), current_7, YAMLElement_Comment(c1_1)], acc_6));
+                            acc_6_mut = c1 == null ? c2 == null ? cons(current_7, acc_6) : (c2_2 = value(c2), ofArrayWithTail([YAMLElement_Comment$(c2_2), current_7], acc_6)) : c2 == null ? (c1_2 = value(c1), ofArrayWithTail([current_7, YAMLElement_Comment$(c1_2)], acc_6)) : (c1_1 = value(c1), c2_1 = value(c2), ofArrayWithTail([YAMLElement_Comment$(c2_1), current_7, YAMLElement_Comment$(c1_1)], acc_6));
                             continue loopRead;
                           }
                           default: {
-                            let matchResult_15, rest_33, v_10, closer_1, iList_1, opener_1, rest_34;
+                            let matchResult_15 = void 0, rest_33 = void 0, v_10 = void 0, closer_1 = void 0, iList_1 = void 0, opener_1 = void 0, rest_34 = void 0;
                             if (!isEmpty(restlist)) {
                               const activePatternResult_18 = $007CInlineJSON$007C_$007C(head(restlist));
                               if (activePatternResult_18 != null) {
@@ -1178,11 +1195,11 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                 const current_9 = YAMLElement_Mapping(createScalarContent(opener_1.Key, keyComment), parseFlowSource("{" + join("\n", flattenFlowContent(iList_1)) + "}"));
                                 handles_3_mut = handles_3;
                                 restlist_mut = rest_34;
-                                acc_6_mut = closerComment == null ? cons(current_9, acc_6) : ofArrayWithTail([YAMLElement_Comment(value(closerComment)), current_9], acc_6);
+                                acc_6_mut = closerComment == null ? cons(current_9, acc_6) : ofArrayWithTail([YAMLElement_Comment$(value(closerComment)), current_9], acc_6);
                                 continue loopRead;
                               }
                               default: {
-                                let matchResult_16, closer_3, iList_3, opener_3, rest_36;
+                                let matchResult_16 = void 0, closer_3 = void 0, iList_3 = void 0, opener_3 = void 0, rest_36 = void 0;
                                 if (!isEmpty(restlist)) {
                                   const activePatternResult_21 = $007CYamlValue$007C_$007C(head(restlist));
                                   if (activePatternResult_21 != null) {
@@ -1192,7 +1209,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                         if (!isEmpty(tail(tail(restlist)))) {
                                           const activePatternResult_22 = $007CJSONCloser$007C_$007C(head(tail(tail(restlist))));
                                           if (activePatternResult_22 != null) {
-                                            if (iList_2 = head(tail(restlist)).fields[0], closer_2 = value(activePatternResult_22), value(activePatternResult_21).Value === "{") {
+                                            if (head(tail(restlist)).fields[0], value(activePatternResult_22), value(activePatternResult_21).Value === "{") {
                                               matchResult_16 = 0;
                                               closer_3 = value(activePatternResult_22);
                                               iList_3 = head(tail(restlist)).fields[0];
@@ -1227,9 +1244,9 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                     handles_3_mut = handles_3;
                                     restlist_mut = rest_36;
                                     acc_6_mut = append(reverse(toList(delay(() => {
-                                      let matchValue_26;
-                                      return append$1((matchValue_26 = c1_3, matchValue_26 == null ? empty$1() : singleton(YAMLElement_Comment(value(matchValue_26)))), delay(() => {
-                                        let matchValue_27;
+                                      let matchValue_26 = void 0;
+                                      return append$1((matchValue_26 = c1_3, matchValue_26 == null ? empty$1() : singleton(YAMLElement_Comment$(value(matchValue_26)))), delay(() => {
+                                        let matchValue_27 = void 0;
                                         return append$1((matchValue_27 = current_10, matchValue_27.tag === /* Object */
                                         3 ? matchValue_27.fields[0] : matchValue_27.tag === /* Nil */
                                         8 ? empty$1() : singleton(matchValue_27)), delay(() => {
@@ -1237,7 +1254,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                           if (matchValue_28 == null) {
                                             return empty$1();
                                           } else {
-                                            return singleton(YAMLElement_Comment(value(matchValue_28)));
+                                            return singleton(YAMLElement_Comment$(value(matchValue_28)));
                                           }
                                         }));
                                       }));
@@ -1245,7 +1262,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                     continue loopRead;
                                   }
                                   default: {
-                                    let matchResult_17, k, rest_37, rest_38, v_15, yamlAstList_4;
+                                    let matchResult_17 = void 0, k = void 0, rest_37 = void 0, rest_38 = void 0, v_15 = void 0, yamlAstList_4 = void 0;
                                     if (!isEmpty(restlist)) {
                                       const activePatternResult_23 = $007CExplicitKey$007C_$007C(head(restlist));
                                       if (activePatternResult_23 != null) {
@@ -1278,11 +1295,11 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                     switch (matchResult_17) {
                                       case 0: {
                                         const parseValue = (vStr) => {
-                                          let matchValue_29;
+                                          let matchValue_29 = void 0;
                                           return loopRead(handles_3, (matchValue_29 = read$1(vStr).AST, matchValue_29.tag === /* Level */
                                           0 ? matchValue_29.fields[0] : empty()), empty());
                                         };
-                                        let matchResult_18, iList_4, keyBody, tail_2, v_11;
+                                        let matchResult_18 = void 0, iList_4 = void 0, keyBody = void 0, tail_2 = void 0, v_11 = void 0;
                                         if (!isEmpty(rest_37)) {
                                           if (head(rest_37).tag === /* Intendation */
                                           1) {
@@ -1326,7 +1343,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                             continue loopRead;
                                           }
                                           default: {
-                                            let matchResult_19, keyBody_1, tail_3, v_12, iList_5, tail_4, v_13;
+                                            let matchResult_19 = void 0, keyBody_1 = void 0, tail_3 = void 0, v_12 = void 0, iList_5 = void 0, tail_4 = void 0, v_13 = void 0;
                                             if (!isEmpty(rest_37)) {
                                               if (head(rest_37).tag === /* Intendation */
                                               1) {
@@ -1392,7 +1409,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                                 continue loopRead;
                                               }
                                               default: {
-                                                let matchResult_20, tail_5, v_14;
+                                                let matchResult_20 = void 0, tail_5 = void 0, v_14 = void 0;
                                                 if (!isEmpty(rest_37)) {
                                                   const activePatternResult_29 = $007CExplicitValue$007C_$007C(head(rest_37));
                                                   if (activePatternResult_29 != null) {
@@ -1415,7 +1432,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                                   default: {
                                                     handles_3_mut = handles_3;
                                                     restlist_mut = rest_37;
-                                                    acc_6_mut = cons(YAMLElement_Mapping(k == null ? YAMLContent_create_Z1C3A29C9("") : createScalarContent(value(k), void 0), YAMLElement_Nil()), acc_6);
+                                                    acc_6_mut = cons(YAMLElement_Mapping(k == null ? YAMLContent_create_Z1C3A29C9("") : createScalarContent(value(k), void 0), YAMLElement.Nil), acc_6);
                                                     continue loopRead;
                                                   }
                                                 }
@@ -1429,11 +1446,11 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                         const parsedValue = loopRead(handles_3, yamlAstList_4, empty());
                                         handles_3_mut = handles_3;
                                         restlist_mut = rest_38;
-                                        acc_6_mut = cons(YAMLElement_Mapping(keyContent_7, (matchValue_30 = tryCollapsePlainScalarContent(false, yamlAstList_4, parsedValue), matchValue_30 == null ? parsedValue : YAMLElement_Object(singleton$1(YAMLElement_Value(value(matchValue_30)))))), acc_6);
+                                        acc_6_mut = cons(YAMLElement_Mapping(keyContent_7, (matchValue_30 = tryCollapsePlainScalarContent(false, yamlAstList_4, parsedValue), matchValue_30 == null ? parsedValue : YAMLElement_Object$(singleton$1(YAMLElement_Value(value(matchValue_30)))))), acc_6);
                                         continue loopRead;
                                       }
                                       default: {
-                                        let matchResult_21, rest0_6, v_17, block_3, rest_42, v_18;
+                                        let matchResult_21 = void 0, rest0_6 = void 0, v_17 = void 0, block_3 = void 0, rest_42 = void 0, v_18 = void 0;
                                         if (!isEmpty(restlist)) {
                                           const activePatternResult_30 = $007CKey$007C_$007C(head(restlist));
                                           if (activePatternResult_30 != null) {
@@ -1446,7 +1463,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                               if (!isEmpty(tail(restlist))) {
                                                 if (head(tail(restlist)).tag === /* Intendation */
                                                 1) {
-                                                  if (block_2 = head(tail(restlist)).fields[0], isBlockScalarHeaderCandidate(value(activePatternResult_31).Value)) {
+                                                  if (head(tail(restlist)).fields[0], isBlockScalarHeaderCandidate(value(activePatternResult_31).Value)) {
                                                     matchResult_21 = 1;
                                                     block_3 = head(tail(restlist)).fields[0];
                                                     rest_42 = tail(tail(restlist));
@@ -1472,7 +1489,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                             const patternInput_10 = takeLeadingComments(rest0_6);
                                             const leadingComments = patternInput_10[0];
                                             const afterComments = patternInput_10[1];
-                                            let matchResult_22, tail_6, w, yamlAstList_5;
+                                            let matchResult_22 = void 0, tail_6 = void 0, w = void 0, yamlAstList_5 = void 0;
                                             if (!isEmpty(afterComments)) {
                                               const activePatternResult_32 = $007CSequenceMinusOpener$007C_$007C(head(afterComments));
                                               if (activePatternResult_32 != null) {
@@ -1501,14 +1518,14 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                                 const objectList_3 = w.Value != null ? cons(PreprocessorElement_Line(value(w.Value)), yamlAstList_5) : yamlAstList_5;
                                                 const sequenceElements_5 = collectSequenceElements(toList(takeWhile(isSequenceElement, tail_6)));
                                                 const rest_40 = toList(skipWhile(isSequenceElement, tail_6));
-                                                const seq = YAMLElement_Sequence(toList(delay(() => append$1(singleton(loopRead(handles_3, objectList_3, empty())), delay(() => map$2((element_1) => loopRead(handles_3, element_1, empty()), sequenceElements_5))))));
+                                                const seq = YAMLElement_Sequence(toList(delay(() => append$1(singleton(loopRead(handles_3, objectList_3, empty())), delay(() => map$1((element_1) => loopRead(handles_3, element_1, empty()), sequenceElements_5))))));
                                                 handles_3_mut = handles_3;
                                                 restlist_mut = rest_40;
-                                                acc_6_mut = cons(YAMLElement_Mapping(keyContent_8, YAMLElement_Object(append(commentTokensToYaml(leadingComments), singleton$1(seq)))), acc_6);
+                                                acc_6_mut = cons(YAMLElement_Mapping(keyContent_8, YAMLElement_Object$(append(commentTokensToYaml(leadingComments), singleton$1(seq)))), acc_6);
                                                 continue loopRead;
                                               }
                                               default: {
-                                                let matchResult_23, tail_7, w_1;
+                                                let matchResult_23 = void 0, tail_7 = void 0, w_1 = void 0;
                                                 if (!isEmpty(afterComments)) {
                                                   const activePatternResult_33 = $007CSequenceMinusOpener$007C_$007C(head(afterComments));
                                                   if (activePatternResult_33 != null) {
@@ -1538,10 +1555,10 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                                     const sequenceSource_1 = patternInput_11[1];
                                                     const sequenceElements_6 = collectSequenceElements(toList(takeWhile(isSequenceElement, sequenceSource_1)));
                                                     const rest_41 = toList(skipWhile(isSequenceElement, sequenceSource_1));
-                                                    const seq_1 = YAMLElement_Sequence(toList(delay(() => append$1(singleton(loopRead(handles_3, patternInput_11[0], empty())), delay(() => map$2((element_2) => loopRead(handles_3, element_2, empty()), sequenceElements_6))))));
+                                                    const seq_1 = YAMLElement_Sequence(toList(delay(() => append$1(singleton(loopRead(handles_3, patternInput_11[0], empty())), delay(() => map$1((element_2) => loopRead(handles_3, element_2, empty()), sequenceElements_6))))));
                                                     handles_3_mut = handles_3;
                                                     restlist_mut = rest_41;
-                                                    acc_6_mut = cons(YAMLElement_Mapping(keyContent_9, YAMLElement_Object(append(commentTokensToYaml(leadingComments), singleton$1(seq_1)))), acc_6);
+                                                    acc_6_mut = cons(YAMLElement_Mapping(keyContent_9, YAMLElement_Object$(append(commentTokensToYaml(leadingComments), singleton$1(seq_1)))), acc_6);
                                                     continue loopRead;
                                                   }
                                                   default: {
@@ -1568,7 +1585,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                             }
                                           }
                                           default: {
-                                            let matchResult_24, block_4, rest_43, v_19;
+                                            let matchResult_24 = void 0, block_4 = void 0, rest_43 = void 0, v_19 = void 0;
                                             if (!isEmpty(restlist)) {
                                               const activePatternResult_34 = $007CKeyValue$007C_$007C(head(restlist));
                                               if (activePatternResult_34 != null) {
@@ -1602,7 +1619,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                                 } else {
                                                   const content_7 = value(matchValue_34);
                                                   const patternInput_12 = takePlainScalarContinuationContents(rest_43, empty());
-                                                  patternInput_13 = [YAMLElement_Object(singleton$1(YAMLElement_Value((content_4 = content_7, continuations = patternInput_12[0], isEmpty(continuations) ? content_4 : new YAMLContent(join("\n", map$1((segment_1) => segment_1.Value, cons(content_4, continuations))), content_4.Comment, content_4.Anchor, content_4.Tag, ScalarStyle_Plain()))))), patternInput_12[1]];
+                                                  patternInput_13 = [YAMLElement_Object$(singleton$1(YAMLElement_Value((content_4 = content_7, continuations = patternInput_12[0], isEmpty(continuations) ? content_4 : new YAMLContent(join("\n", map((segment_1) => segment_1.Value, cons(content_4, continuations))), content_4.Comment, content_4.Anchor, content_4.Tag, ScalarStyle.Plain))))), patternInput_12[1]];
                                                 }
                                                 handles_3_mut = handles_3;
                                                 restlist_mut = patternInput_13[1];
@@ -1610,7 +1627,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                                 continue loopRead;
                                               }
                                               default: {
-                                                let matchResult_25, rest_45, v_21, rest_46, v_22, block_6, rest_47, v_23;
+                                                let matchResult_25 = void 0, rest_45 = void 0, v_21 = void 0, rest_46 = void 0, v_22 = void 0, block_6 = void 0, rest_47 = void 0, v_23 = void 0;
                                                 if (!isEmpty(restlist)) {
                                                   const activePatternResult_35 = $007CKeyValue$007C_$007C(head(restlist));
                                                   if (activePatternResult_35 != null) {
@@ -1629,7 +1646,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                                         if (!isEmpty(tail(restlist))) {
                                                           if (head(tail(restlist)).tag === /* Intendation */
                                                           1) {
-                                                            if (block_5 = head(tail(restlist)).fields[0], isBlockScalarHeaderCandidate(value(activePatternResult_37).Value)) {
+                                                            if (head(tail(restlist)).fields[0], isBlockScalarHeaderCandidate(value(activePatternResult_37).Value)) {
                                                               matchResult_25 = 2;
                                                               block_6 = head(tail(restlist)).fields[0];
                                                               rest_47 = tail(tail(restlist));
@@ -1661,7 +1678,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                                   case 1: {
                                                     handles_3_mut = handles_3;
                                                     restlist_mut = rest_46;
-                                                    acc_6_mut = cons(YAMLElement_Comment(getItemFromDict(commentDict, v_22.Comment)), acc_6);
+                                                    acc_6_mut = cons(YAMLElement_Comment$(getItemFromDict(commentDict, v_22.Comment)), acc_6);
                                                     continue loopRead;
                                                   }
                                                   case 2: {
@@ -1677,7 +1694,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                                     }
                                                   }
                                                   default: {
-                                                    let matchResult_26, block_7, rest_48, v_24;
+                                                    let matchResult_26 = void 0, block_7 = void 0, rest_48 = void 0, v_24 = void 0;
                                                     if (!isEmpty(restlist)) {
                                                       const activePatternResult_38 = $007CYamlValue$007C_$007C(head(restlist));
                                                       if (activePatternResult_38 != null) {
@@ -1710,7 +1727,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                                         continue loopRead;
                                                       }
                                                       default: {
-                                                        let matchResult_27, rest_50, v_26;
+                                                        let matchResult_27 = void 0, rest_50 = void 0, v_26 = void 0;
                                                         if (!isEmpty(restlist)) {
                                                           const activePatternResult_39 = $007CYamlValue$007C_$007C(head(restlist));
                                                           if (activePatternResult_39 != null) {
@@ -1736,7 +1753,7 @@ function tokenize(yamlList, stringDict, commentDict, handles) {
                                                           }
                                                           default:
                                                             if (isEmpty(restlist)) {
-                                                              return YAMLElement_Object(reverse(acc_6));
+                                                              return YAMLElement_Object$(reverse(acc_6));
                                                             } else {
                                                               const activePatternResult_40 = $007CYamlValue$007C_$007C(head(restlist));
                                                               if (activePatternResult_40 != null) {
@@ -1789,7 +1806,7 @@ function read(yaml) {
   0) {
     return tokenize(matchValue.fields[0], ast.StringMap, ast.CommentMap, ast.TagHandles);
   } else {
-    throw new Error("Not a root!");
+    throw new Exception("Not a root!");
   }
 }
 function readDocuments(yaml) {
@@ -1801,10 +1818,10 @@ function readDocuments(yaml) {
     }
   };
   const splitDocuments = (remaining_mut, currentDoc_1_mut, docs_1_mut, blockHeaderIndent_mut) => {
-    let matchValue;
     splitDocuments:
       while (true) {
         const remaining = remaining_mut, currentDoc_1 = currentDoc_1_mut, docs_1 = docs_1_mut, blockHeaderIndent = blockHeaderIndent_mut;
+        let matchValue = void 0;
         if (!isEmpty(remaining)) {
           const rest = tail(remaining);
           const line = head(remaining);
@@ -1861,7 +1878,7 @@ function readDocuments(yaml) {
         break;
       }
   };
-  return map$1((docLines) => read(join("\n", docLines)), filter((doc) => exists((l_1) => l_1.trim() !== "", doc), splitDocuments(ofArray(split(Line_normalizeNewlines(yaml), ["\n"], void 0, 0)), empty(), empty(), void 0)));
+  return map((docLines) => read(join("\n", docLines)), filter((doc) => exists((l_1) => l_1.trim() !== "", doc), splitDocuments(ofArray(split(Line_normalizeNewlines(yaml), ["\n"], void 0, 0)), empty(), empty(), void 0)));
 }
 
 export { collectSequenceElements, isSequenceElement, read, readDocuments };