@nfdi4plants/arctrl 3.1.0 → 3.2.0

package/dist/ts/ts/fable_modules/{YAMLicious.1.0.0-alpha.7 → YAMLicious.1.0.0}/Decode.fs.js

@@ -1,59 +1,31 @@
 import { isString } from './Interop/JsInterop.fs.js';
-import { split, replace, isNullOrWhiteSpace, toText, printf } from '../../../node_modules/@fable-org/fable-library-js/String.js';
-import { StringBuilder_$ctor, StringBuilder__Append_244C7CD6, StringBuilder__Append_Z721C83C5 } from '../../../node_modules/@fable-org/fable-library-js/System.Text.js';
-import { item } from '../../../node_modules/@fable-org/fable-library-js/Array.js';
-import { toString, FSharpRef } from '../../../node_modules/@fable-org/fable-library-js/Types.js';
-import { value, some, map as map$3 } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
-import { tryParse } from '../../../node_modules/@fable-org/fable-library-js/Int32.js';
-import { isEmpty, head, tail, map as map$1, toArray, tryFind, filter, exists, iterate } from '../../../node_modules/@fable-org/fable-library-js/List.js';
-import { tryParse as tryParse$1 } from '../../../node_modules/@fable-org/fable-library-js/Double.js';
-import { tryParse as tryParse$2 } from '../../../node_modules/@fable-org/fable-library-js/Boolean.js';
-import { ofList, ofSeq } from '../../../node_modules/@fable-org/fable-library-js/Map.js';
-import { compare, structuralHash, equals } from '../../../node_modules/@fable-org/fable-library-js/Util.js';
-import { Dictionary } from '../../../node_modules/@fable-org/fable-library-js/MutableMap.js';
-import { minValue, tryParse as tryParse$3 } from '../../../node_modules/@fable-org/fable-library-js/Date.js';
-import { minValue as minValue$1, tryParse as tryParse$4 } from '../../../node_modules/@fable-org/fable-library-js/DateOffset.js';
-import { map as map$2 } from '../../../node_modules/@fable-org/fable-library-js/Seq.js';
-import { addToDict } from '../../../node_modules/@fable-org/fable-library-js/MapUtil.js';
-import { class_type } from '../../../node_modules/@fable-org/fable-library-js/Reflection.js';
+import { BlockScalar_foldLines, Line_normalizeNewlines } from './Syntax.fs.js';
+import { ofArray, isEmpty, head, tail, map as map$1, toArray, tryFind, filter, exists, iterate } from '../../../node_modules/@fable-org/fable-library-ts/List.js';
+import { split, toText, printf } from '../../../node_modules/@fable-org/fable-library-ts/String.js';
+import { value, some } from '../../../node_modules/@fable-org/fable-library-ts/Option.js';
+import { tryParse } from '../../../node_modules/@fable-org/fable-library-ts/Int32.js';
+import { FSharpRef } from '../../../node_modules/@fable-org/fable-library-ts/Types.js';
+import { Exception, compare, structuralHash, equals } from '../../../node_modules/@fable-org/fable-library-ts/Util.js';
+import { tryParse as tryParse$1 } from '../../../node_modules/@fable-org/fable-library-ts/Double.js';
+import { tryParse as tryParse$2 } from '../../../node_modules/@fable-org/fable-library-ts/Boolean.js';
+import { ofList, ofSeq } from '../../../node_modules/@fable-org/fable-library-ts/Map.js';
+import { Dictionary } from '../../../node_modules/@fable-org/fable-library-ts/MutableMap.js';
+import { minValue, tryParse as tryParse$3 } from '../../../node_modules/@fable-org/fable-library-ts/Date.js';
+import { minValue as minValue$1, tryParse as tryParse$4 } from '../../../node_modules/@fable-org/fable-library-ts/DateOffset.js';
+import { map as map$2 } from '../../../node_modules/@fable-org/fable-library-ts/Seq.js';
+import { addToDict } from '../../../node_modules/@fable-org/fable-library-ts/MapUtil.js';
+import { class_type } from '../../../node_modules/@fable-org/fable-library-ts/Reflection.js';
 import { read as read$1 } from './Reader.fs.js';
 
 function Helper_isString(value) {
   return isString(value);
 }
 function Helper_foldPlainScalarLines(value) {
-  const lines = split(replace(value, "\r\n", "\n"), ["\n"], void 0, 0);
-  const isMoreIndented = (line) => {
-    if (line.startsWith(" ")) {
-      return true;
-    } else {
-      return line.startsWith("	");
-    }
-  };
-  const sb = StringBuilder_$ctor();
-  for (let i = 0; i <= lines.length - 1; i++) {
-    const line_1 = item(i, lines);
-    if (isNullOrWhiteSpace(line_1)) {
-      StringBuilder__Append_244C7CD6(sb, "\n");
-    } else {
-      StringBuilder__Append_Z721C83C5(sb, line_1);
-      if (i < lines.length - 1) {
-        const next = item(i + 1, lines);
-        if (isNullOrWhiteSpace(next)) {
-          StringBuilder__Append_244C7CD6(sb, "\n");
-        } else if (isMoreIndented(line_1) ? true : isMoreIndented(next)) {
-          StringBuilder__Append_244C7CD6(sb, "\n");
-        } else {
-          StringBuilder__Append_244C7CD6(sb, " ");
-        }
-      }
-    }
-  }
-  return toString(sb);
+  return BlockScalar_foldLines(ofArray(split(Line_normalizeNewlines(value), ["\n"], void 0, 0)));
 }
 function Helper_scalarValue(content) {
   const matchValue = content.Style;
-  let matchResult;
+  let matchResult = void 0;
   if (matchValue != null) {
     if (value(matchValue).tag === /* Plain */
     0) {
@@ -76,7 +48,7 @@ function Helper_scalarValue(content) {
   }
 }
 function int(value) {
-  let matchResult, v;
+  let matchResult = void 0, v = void 0;
   switch (value.tag) {
     case /* Value */
     1: {
@@ -111,22 +83,21 @@ function int(value) {
       const scalar = Helper_scalarValue(v);
       let matchValue;
       let outArg = 0;
-      matchValue = [tryParse(scalar, 511, false, 32, new FSharpRef(() => outArg, (v_1) => {
+      matchValue = [tryParse(scalar, 511, false, 32, new FSharpRef(() => outArg | 0, (v_1) => {
         outArg = v_1 | 0;
       })), outArg];
       if (matchValue[0]) {
         return matchValue[1] | 0;
       } else {
-        throw new Error(toText(printf("%s: %A"))("Expected an int")(scalar) + "\\nParameter name: value");
+        throw new Exception(toText(printf("%s: %A"))("Expected an int")(scalar) + " (Parameter 'value')");
       }
     }
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected an YAMLElement.Value")(value) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected an YAMLElement.Value")(value) + " (Parameter 'value')");
   }
 }
 function float(value) {
-  const Culture = {};
-  let matchResult, v;
+  let matchResult = void 0, v = void 0;
   switch (value.tag) {
     case /* Value */
     1: {
@@ -167,15 +138,15 @@ function float(value) {
       if (matchValue[0]) {
         return matchValue[1];
       } else {
-        throw new Error(toText(printf("%s: %A"))("Expected an int")(scalar) + "\\nParameter name: value");
+        throw new Exception(toText(printf("%s: %A"))("Expected an int")(scalar) + " (Parameter 'value')");
       }
     }
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected an YAMLElement.Value")(value) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected an YAMLElement.Value")(value) + " (Parameter 'value')");
   }
 }
 function char(value) {
-  let matchResult, v, anyElse;
+  let matchResult = void 0, v = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Value */
     1: {
@@ -216,15 +187,15 @@ function char(value) {
       if (Helper_isString(scalar)) {
         return scalar[0];
       } else {
-        throw new Error(toText(printf("%s: %A"))("Expected a char")(scalar) + "\\nParameter name: value");
+        throw new Exception(toText(printf("%s: %A"))("Expected a char")(scalar) + " (Parameter 'value')");
       }
     }
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a char")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a char")(anyElse) + " (Parameter 'value')");
   }
 }
 function bool(value) {
-  let matchResult, v, anyElse;
+  let matchResult = void 0, v = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Value */
     1: {
@@ -270,11 +241,11 @@ function bool(value) {
       if (matchValue[0]) {
         return matchValue[1];
       } else {
-        throw new Error(toText(printf("%s: %A"))("Expected a bool")(scalar) + "\\nParameter name: value");
+        throw new Exception(toText(printf("%s: %A"))("Expected a bool")(scalar) + " (Parameter 'value')");
       }
     }
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a bool")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a bool")(anyElse) + " (Parameter 'value')");
   }
 }
 function map(keyDecoder, valueDecoder, value) {
@@ -286,13 +257,13 @@ function map(keyDecoder, valueDecoder, value) {
         const v_1 = x.fields[1];
         return [keyDecoder(x.fields[0].Value), valueDecoder(v_1)];
       } else {
-        throw new Error(toText(printf("%s: %A"))("Expected a mapping")(x) + "\\nParameter name: value");
+        throw new Exception(toText(printf("%s: %A"))("Expected a mapping")(x) + " (Parameter 'value')");
       }
     }, value.fields[0]), {
-      Compare: compare
+      Compare: (x_1, y) => compare(x_1, y) | 0
     });
   } else {
-    throw new Error(toText(printf("%s: %A"))("Expected a map")(value) + "\\nParameter name: value");
+    throw new Exception(toText(printf("%s: %A"))("Expected a map")(value) + " (Parameter 'value')");
   }
 }
 function dict(keyDecoder, valueDecoder, value) {
@@ -304,20 +275,20 @@ function dict(keyDecoder, valueDecoder, value) {
         const v_1 = x.fields[1];
         return [keyDecoder(x.fields[0].Value), valueDecoder(v_1)];
       } else {
-        throw new Error(toText(printf("%s: %A"))("Expected a mapping")(x) + "\\nParameter name: value");
+        throw new Exception(toText(printf("%s: %A"))("Expected a mapping")(x) + " (Parameter 'value')");
       }
     }, value.fields[0]), {
-      Compare: compare
+      Compare: (x_1, y) => compare(x_1, y) | 0
     }), {
       Equals: equals,
-      GetHashCode: structuralHash
+      GetHashCode: (x_2) => structuralHash(x_2) | 0
     });
   } else {
-    throw new Error(toText(printf("%s: %A"))("Expected a dictionary")(value) + "\\nParameter name: value");
+    throw new Exception(toText(printf("%s: %A"))("Expected a dictionary")(value) + " (Parameter 'value')");
   }
 }
 function datetime(value) {
-  let matchResult, v, anyElse;
+  let matchResult = void 0, v = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Value */
     1: {
@@ -363,15 +334,15 @@ function datetime(value) {
       if (matchValue[0]) {
         return matchValue[1];
       } else {
-        throw new Error(toText(printf("%s: %A"))("Expected a DateTime")(scalar) + "\\nParameter name: value");
+        throw new Exception(toText(printf("%s: %A"))("Expected a DateTime")(scalar) + " (Parameter 'value')");
       }
     }
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a DateTime")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a DateTime")(anyElse) + " (Parameter 'value')");
   }
 }
 function datetimeOffset(value) {
-  let matchResult, v, anyElse;
+  let matchResult = void 0, v = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Value */
     1: {
@@ -417,15 +388,15 @@ function datetimeOffset(value) {
       if (matchValue[0]) {
         return matchValue[1];
       } else {
-        throw new Error(toText(printf("%s: %A"))("Expected a DateTimeOffset")(scalar) + "\\nParameter name: value");
+        throw new Exception(toText(printf("%s: %A"))("Expected a DateTimeOffset")(scalar) + " (Parameter 'value')");
       }
     }
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a DateTimeOffset")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a DateTimeOffset")(anyElse) + " (Parameter 'value')");
   }
 }
 function option(decoder, value) {
-  let matchResult, v, anyElse;
+  let matchResult = void 0, v = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Value */
     1: {
@@ -468,11 +439,11 @@ function option(decoder, value) {
         return some(decoder(value));
       }
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected an option")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected an option")(anyElse) + " (Parameter 'value')");
   }
 }
 function string(value) {
-  let matchResult, v, anyElse;
+  let matchResult = void 0, v = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Value */
     1: {
@@ -511,11 +482,11 @@ function string(value) {
     case 0:
       return Helper_scalarValue(v);
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a string")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a string")(anyElse) + " (Parameter 'value')");
   }
 }
 function tuple2(decoderA, decoderB, value) {
-  let matchResult, a, b, anyElse;
+  let matchResult = void 0, a = void 0, b = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Object */
     3: {
@@ -586,11 +557,11 @@ function tuple2(decoderA, decoderB, value) {
     case 0:
       return [decoderA(a), decoderB(b)];
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a tuple2")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a tuple2")(anyElse) + " (Parameter 'value')");
   }
 }
 function tuple3(decoderA, decoderB, decoderC, value) {
-  let matchResult, a, b, c, anyElse;
+  let matchResult = void 0, a = void 0, b = void 0, c = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Object */
     3: {
@@ -673,11 +644,11 @@ function tuple3(decoderA, decoderB, decoderC, value) {
     case 0:
       return [decoderA(a), decoderB(b), decoderC(c)];
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a tuple3")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a tuple3")(anyElse) + " (Parameter 'value')");
   }
 }
 function tuple4(decoderA, decoderB, decoderC, decoderD, value) {
-  let matchResult, a, b, c, d, anyElse;
+  let matchResult = void 0, a = void 0, b = void 0, c = void 0, d = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Object */
     3: {
@@ -772,11 +743,11 @@ function tuple4(decoderA, decoderB, decoderC, decoderD, value) {
     case 0:
       return [decoderA(a), decoderB(b), decoderC(c), decoderD(d)];
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a tuple4")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a tuple4")(anyElse) + " (Parameter 'value')");
   }
 }
 function tuple5(decoderA, decoderB, decoderC, decoderD, decoderE, value) {
-  let matchResult, a, b, c, d, e, anyElse;
+  let matchResult = void 0, a = void 0, b = void 0, c = void 0, d = void 0, e = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Object */
     3: {
@@ -883,11 +854,11 @@ function tuple5(decoderA, decoderB, decoderC, decoderD, decoderE, value) {
     case 0:
       return [decoderA(a), decoderB(b), decoderC(c), decoderD(d), decoderE(e)];
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a tuple5")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a tuple5")(anyElse) + " (Parameter 'value')");
   }
 }
 function tuple6(decoderA, decoderB, decoderC, decoderD, decoderE, decoderF, value) {
-  let matchResult, a, b, c, d, e, f, anyElse;
+  let matchResult = void 0, a = void 0, b = void 0, c = void 0, d = void 0, e = void 0, f = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Object */
     3: {
@@ -1006,11 +977,11 @@ function tuple6(decoderA, decoderB, decoderC, decoderD, decoderE, decoderF, valu
     case 0:
       return [decoderA(a), decoderB(b), decoderC(c), decoderD(d), decoderE(e), decoderF(f)];
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a tuple6")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a tuple6")(anyElse) + " (Parameter 'value')");
   }
 }
 function tuple7(decoderA, decoderB, decoderC, decoderD, decoderE, decoderF, decoderG, value) {
-  let matchResult, a, b, c, d, e, f, g, anyElse;
+  let matchResult = void 0, a = void 0, b = void 0, c = void 0, d = void 0, e = void 0, f = void 0, g = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Object */
     3: {
@@ -1141,11 +1112,11 @@ function tuple7(decoderA, decoderB, decoderC, decoderD, decoderE, decoderF, deco
     case 0:
       return [decoderA(a), decoderB(b), decoderC(c), decoderD(d), decoderE(e), decoderF(f), decoderG(g)];
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a tuple7")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a tuple7")(anyElse) + " (Parameter 'value')");
   }
 }
 function tuple8(decoderA, decoderB, decoderC, decoderD, decoderE, decoderF, decoderG, decoderH, value) {
-  let matchResult, a, b, c, d, e, f, g, h, anyElse;
+  let matchResult = void 0, a = void 0, b = void 0, c = void 0, d = void 0, e = void 0, f = void 0, g = void 0, h = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Object */
     3: {
@@ -1288,11 +1259,11 @@ function tuple8(decoderA, decoderB, decoderC, decoderD, decoderE, decoderF, deco
     case 0:
       return [decoderA(a), decoderB(b), decoderC(c), decoderD(d), decoderE(e), decoderF(f), decoderG(g), decoderH(h)];
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a tuple8")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a tuple8")(anyElse) + " (Parameter 'value')");
   }
 }
 function list(decoder, value) {
-  let matchResult, v, anyElse;
+  let matchResult = void 0, v = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Sequence */
     2: {
@@ -1331,11 +1302,11 @@ function list(decoder, value) {
     case 0:
       return map$1(decoder, v);
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a list")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a list")(anyElse) + " (Parameter 'value')");
   }
 }
 function array(decoder, value) {
-  let matchResult, v, anyElse;
+  let matchResult = void 0, v = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Sequence */
     2: {
@@ -1374,11 +1345,11 @@ function array(decoder, value) {
     case 0:
       return toArray(map$1(decoder, v));
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected an array")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected an array")(anyElse) + " (Parameter 'value')");
   }
 }
 function seq(decoder, value) {
-  let matchResult, v, anyElse;
+  let matchResult = void 0, v = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Sequence */
     2: {
@@ -1417,11 +1388,11 @@ function seq(decoder, value) {
     case 0:
       return map$2(decoder, v);
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a seq")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a seq")(anyElse) + " (Parameter 'value')");
   }
 }
 function resizearray(decoder, value) {
-  let matchResult, v, anyElse;
+  let matchResult = void 0, v = void 0, anyElse = void 0;
   switch (value.tag) {
     case /* Sequence */
     2: {
@@ -1462,11 +1433,11 @@ function resizearray(decoder, value) {
       return Array.from(collection);
     }
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a resizearray")(anyElse) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a resizearray")(anyElse) + " (Parameter 'value')");
   }
 }
 function values(decoder, value) {
-  let matchResult, v, anyElse_1;
+  let matchResult = void 0, v = void 0, anyElse_1 = void 0;
   switch (value.tag) {
     case /* Sequence */
     2: {
@@ -1504,7 +1475,7 @@ function values(decoder, value) {
   switch (matchResult) {
     case 0:
       return map$1((_arg) => {
-        let matchResult_1, element, element_1, anyElse;
+        let matchResult_1 = void 0, element = void 0, element_1 = void 0, anyElse = void 0;
         switch (_arg.tag) {
           case /* Value */
           1: {
@@ -1545,71 +1516,66 @@ function values(decoder, value) {
           case 1:
             return decoder(element_1);
           default:
-            throw new Error(toText(printf("%s: %A"))("Expected a values")(anyElse) + "\\nParameter name: value");
+            throw new Exception(toText(printf("%s: %A"))("Expected a values")(anyElse) + " (Parameter 'value')");
         }
       }, v);
     default:
-      throw new Error(toText(printf("%s: %A"))("Expected a values")(anyElse_1) + "\\nParameter name: value");
+      throw new Exception(toText(printf("%s: %A"))("Expected a values")(anyElse_1) + " (Parameter 'value')");
   }
 }
 class Getter {
   constructor(ele) {
-    let _this, _this_1, _this_2, _this_3;
-    this.required = (_this = this, {
+    this.required = (this, {
       Field(fieldName, dec) {
-        let arg_3;
+        let _arg_1 = void 0, arg_3 = void 0;
         if (ele.tag === /* Object */
         3) {
-          const x = map$3((_arg_1) => {
-            if (_arg_1.tag === /* Mapping */
-            0) {
-              return dec(_arg_1.fields[1]);
-            } else {
-              throw new Error(toText(printf("%s: %A"))("Expected a mapping")(ele) + "\\nParameter name: value");
-            }
-          }, tryFind((_arg) => {
+          let x;
+          const option_2 = tryFind((_arg) => {
             if (_arg.tag === /* Mapping */
             0) {
               return _arg.fields[0].Value === fieldName;
             } else {
               return false;
             }
-          }, ele.fields[0]));
+          }, ele.fields[0]);
+          x = option_2 != null ? some((_arg_1 = value(option_2), _arg_1.tag === /* Mapping */
+          0 ? dec(_arg_1.fields[1]) : (() => {
+            throw new Exception(toText(printf("%s: %A"))("Expected a mapping")(ele) + " (Parameter 'value')");
+          })())) : void 0;
           if (x == null) {
-            throw new Error((arg_3 = toText(printf("Field not found: %s"))(fieldName), toText(printf("%s: %A"))(arg_3)(ele)) + "\\nParameter name: value");
+            throw new Exception((arg_3 = toText(printf("Field not found: %s"))(fieldName), toText(printf("%s: %A"))(arg_3)(ele)) + " (Parameter 'value')");
           } else {
             return value(x);
           }
         } else {
-          throw new Error(toText(printf("%s: %A"))("Expected an object")(ele) + "\\nParameter name: value");
+          throw new Exception(toText(printf("%s: %A"))("Expected an object")(ele) + " (Parameter 'value')");
         }
       }
     });
-    this.optional = (_this_1 = this, {
+    this.optional = (this, {
       Field(fieldName_1, dec_1) {
+        let _arg_3 = void 0;
         if (ele.tag === /* Object */
         3) {
-          return map$3((_arg_3) => {
-            if (_arg_3.tag === /* Mapping */
-            0) {
-              return dec_1(_arg_3.fields[1]);
-            } else {
-              throw new Error(toText(printf("%s: %A"))("Expected a mapping")(ele) + "\\nParameter name: value");
-            }
-          }, tryFind((_arg_2) => {
+          const option_4 = tryFind((_arg_2) => {
             if (_arg_2.tag === /* Mapping */
             0) {
               return _arg_2.fields[0].Value === fieldName_1;
             } else {
               return false;
             }
-          }, ele.fields[0]));
+          }, ele.fields[0]);
+          return option_4 != null ? some((_arg_3 = value(option_4), _arg_3.tag === /* Mapping */
+          0 ? dec_1(_arg_3.fields[1]) : (() => {
+            throw new Exception(toText(printf("%s: %A"))("Expected a mapping")(ele) + " (Parameter 'value')");
+          })())) : void 0;
         } else {
-          throw new Error(toText(printf("%s: %A"))("Expected an object")(ele) + "\\nParameter name: value");
+          throw new Exception(toText(printf("%s: %A"))("Expected an object")(ele) + " (Parameter 'value')");
         }
       }
     });
-    this.multipleOptional = (_this_2 = this, {
+    this.multipleOptional = (this, {
       FieldList(fieldNames) {
         if (ele.tag === /* Object */
         3) {
@@ -1618,7 +1584,7 @@ class Getter {
             0) {
               return [_arg_5.fields[0].Value, _arg_5.fields[1]];
             } else {
-              throw new Error(toText(printf("%s: %A"))("Expected a mapping")(ele) + "\\nParameter name: value");
+              throw new Exception(toText(printf("%s: %A"))("Expected a mapping")(ele) + " (Parameter 'value')");
             }
           }, filter((_arg_4) => {
             if (_arg_4.tag === /* Mapping */
@@ -1635,11 +1601,11 @@ class Getter {
           }, overflow);
           return dict_1;
         } else {
-          throw new Error(toText(printf("%s: %A"))("Expected an object")(ele) + "\\nParameter name: value");
+          throw new Exception(toText(printf("%s: %A"))("Expected an object")(ele) + " (Parameter 'value')");
         }
       }
     });
-    this.overflow = (_this_3 = this, {
+    this.overflow = (this, {
       FieldList(fieldNames_1) {
         if (ele.tag === /* Object */
         3) {
@@ -1648,7 +1614,7 @@ class Getter {
             0) {
               return [_arg_7.fields[0].Value, _arg_7.fields[1]];
             } else {
-              throw new Error(toText(printf("%s: %A"))("Expected a mapping")(ele) + "\\nParameter name: value");
+              throw new Exception(toText(printf("%s: %A"))("Expected a mapping")(ele) + " (Parameter 'value')");
             }
           }, filter((_arg_6) => {
             if (_arg_6.tag === /* Mapping */
@@ -1665,7 +1631,7 @@ class Getter {
           }, overflow_1);
           return dict_2;
         } else {
-          throw new Error(toText(printf("%s: %A"))("Expected an object")(ele) + "\\nParameter name: value");
+          throw new Exception(toText(printf("%s: %A"))("Expected an object")(ele) + " (Parameter 'value')");
         }
       }
     });

package/dist/ts/ts/fable_modules/{YAMLicious.1.0.0-alpha.7 → YAMLicious.1.0.0}/Encode.fs.js

@@ -1,10 +1,10 @@
-import { YAMLElement_Value, YAMLContent_create_Z1C3A29C9, YAMLElement_Sequence, YAMLElement_Object, YAMLElement_Comment, YAMLElement_Nil, Config } from './YAMLiciousTypes.fs.js';
-import { int32ToString } from '../../../node_modules/@fable-org/fable-library-js/Util.js';
-import { toString } from '../../../node_modules/@fable-org/fable-library-js/Types.js';
-import { toString as toString$1 } from '../../../node_modules/@fable-org/fable-library-js/Date.js';
-import { ofSeq, map as map$1, ofArray } from '../../../node_modules/@fable-org/fable-library-js/List.js';
-import { map } from '../../../node_modules/@fable-org/fable-library-js/Seq.js';
-import { value } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
+import { YAMLElement_Value, YAMLContent_create_Z1C3A29C9, YAMLElement_Sequence, YAMLElement_Object$, YAMLElement_Comment$, YAMLElement, Config } from './YAMLiciousTypes.fs.js';
+import { int32ToString } from '../../../node_modules/@fable-org/fable-library-ts/Util.js';
+import { toString } from '../../../node_modules/@fable-org/fable-library-ts/Types.js';
+import { toString as toString$1 } from '../../../node_modules/@fable-org/fable-library-ts/Date.js';
+import { ofSeq, map as map$1, ofArray } from '../../../node_modules/@fable-org/fable-library-ts/List.js';
+import { map } from '../../../node_modules/@fable-org/fable-library-ts/Seq.js';
+import { value } from '../../../node_modules/@fable-org/fable-library-ts/Option.js';
 import { write as write$1 } from './Writer.fs.js';
 
 function int(value) {
@@ -41,12 +41,12 @@ function list(encoder, l) {
   return YAMLElement_Sequence(map$1(encoder, l));
 }
 function values(encoder, values_1) {
-  return YAMLElement_Object(ofSeq(map((arg_1) => YAMLElement_Value(YAMLContent_create_Z1C3A29C9(encoder(arg_1))), values_1)));
+  return YAMLElement_Object$(ofSeq(map((arg_1) => YAMLElement_Value(YAMLContent_create_Z1C3A29C9(encoder(arg_1))), values_1)));
 }
 function comment(string_1) {
-  return YAMLElement_Comment(string_1);
+  return YAMLElement_Comment$(string_1);
 }
-const nil = YAMLElement_Nil();
+const nil = YAMLElement.Nil;
 function tryInclude(name, encoder, value$1) {
   return [name, value$1 != null ? encoder(value(value$1)) : nil];
 }