@magnusopera/fscript 0.77.0 → 0.78.1

package/dist/FScript.Language/Ast.js

@@ -1,6 +1,6 @@
 
-import { Union, Record } from "../fable_modules/fable-library-js.5.2.0/Types.js";
-import { float64_type, int64_type, union_type, record_type, option_type, list_type, tuple_type, bool_type, string_type } from "../fable_modules/fable-library-js.5.2.0/Reflection.js";
+import { Union, Record } from "../fable_modules/fable-library-js.5.13.0/Types.js";
+import { float64_type, int64_type, union_type, record_type, option_type, list_type, tuple_type, bool_type, string_type } from "../fable_modules/fable-library-js.5.13.0/Reflection.js";
 import { Span_$reflection } from "./Span.js";
 
 export class TypeDef extends Record {

package/dist/FScript.Language/BuiltinFunctions.js

@@ -1,19 +1,19 @@
 
 import { Span, Position } from "./Span.js";
 import { EvalException, EvalError$ } from "./Error.js";
-import { FSharpMap__Remove, iterate as iterate_1, fold as fold_1, add, FSharpMap__Add, FSharpMap__ContainsKey, FSharpMap__TryFind, empty as empty_1, FSharpMap__get_Item, forAll, FSharpMap__get_Keys, FSharpMap__get_Count, tryFind } from "../fable_modules/fable-library-js.5.2.0/Map.js";
+import { FSharpMap__Remove, iterate as iterate_1, fold as fold_1, add, FSharpMap__Add, FSharpMap__ContainsKey, FSharpMap__TryFind, empty as empty_1, FSharpMap__get_Item, forAll, FSharpMap__get_Keys, FSharpMap__get_Count, tryFind } from "../fable_modules/fable-library-js.5.13.0/Map.js";
 import { builtinSchemes } from "./BuiltinSignatures.js";
-import { equals as equals_1, compare, comparePrimitives, Exception } from "../fable_modules/fable-library-js.5.2.0/Util.js";
-import { endsWith, split, join, substring, replace, format, concat } from "../fable_modules/fable-library-js.5.2.0/String.js";
-import { tryParse } from "../fable_modules/fable-library-js.5.2.0/Long.js";
-import { FSharpRef } from "../fable_modules/fable-library-js.5.2.0/Types.js";
-import { tryParse as tryParse_1 } from "../fable_modules/fable-library-js.5.2.0/Double.js";
-import { append, tryHead, tryFindIndex, tryFind as tryFind_1, filter, collect, choose, iterate, ofArray, map, exists, fold, forAll2, length as length_1, empty, reverse, cons, tail as tail_1, head as head_1, isEmpty } from "../fable_modules/fable-library-js.5.2.0/List.js";
+import { equals as equals_1, compare, comparePrimitives, Exception } from "../fable_modules/fable-library-js.5.13.0/Util.js";
+import { endsWith, split, join, substring, indexOf, replace, format, concat } from "../fable_modules/fable-library-js.5.13.0/String.js";
+import { tryParse } from "../fable_modules/fable-library-js.5.13.0/Long.js";
+import { FSharpRef } from "../fable_modules/fable-library-js.5.13.0/Types.js";
+import { tryParse as tryParse_1 } from "../fable_modules/fable-library-js.5.13.0/Double.js";
+import { append, tryHead, tryFindIndex, tryFind as tryFind_1, filter, collect, choose, iterate, ofArray, map, exists, fold, forAll2, length as length_1, empty, reverse, cons, tail as tail_1, head as head_1, isEmpty } from "../fable_modules/fable-library-js.5.13.0/List.js";
 import { ExternalFunction, Value as Value_1, MapKey } from "./Value.js";
-import { compare as compare_1, op_Addition, toInt32_unchecked, fromInt32, toInt64_unchecked, equals } from "../fable_modules/fable-library-js.5.2.0/BigInt.js";
-import { ofSeq } from "../fable_modules/fable-library-js.5.2.0/Set.js";
-import { tryParse as tryParse_2 } from "../fable_modules/fable-library-js.5.2.0/Boolean.js";
-import { some, map as map_1 } from "../fable_modules/fable-library-js.5.2.0/Option.js";
+import { compare as compare_1, op_Addition, toInt32_unchecked, fromInt32, toInt64_unchecked, equals } from "../fable_modules/fable-library-js.5.13.0/BigInt.js";
+import { ofSeq } from "../fable_modules/fable-library-js.5.13.0/Set.js";
+import { tryParse as tryParse_2 } from "../fable_modules/fable-library-js.5.13.0/Boolean.js";
+import { some } from "../fable_modules/fable-library-js.5.13.0/Option.js";
 
 const unknownSpan = new Span(new Position(undefined, 0, 0), new Position(undefined, 0, 0));
 
@@ -196,7 +196,7 @@ function expectList(functionName, args) {
 
 function asStringKey(functionName, value) {
     if (value.tag === 4) {
-        return new MapKey(0, [value.fields[0]]);
+        return new MapKey(/* MKString */ 0, [value.fields[0]]);
     }
     else {
         return fail(`${functionName} expects string key`);
@@ -229,10 +229,10 @@ function asStringList(functionName, values) {
 
 function mapKeyToValue(key) {
     if (key.tag === 1) {
-        return new Value_1(1, [key.fields[0]]);
+        return new Value_1(/* VInt */ 1, [key.fields[0]]);
     }
     else {
-        return new Value_1(4, [key.fields[0]]);
+        return new Value_1(/* VString */ 4, [key.fields[0]]);
     }
 }
 
@@ -505,16 +505,16 @@ function distinctValues(values) {
     }, empty(), values));
 }
 
-const builtinIgnore = new ExternalFunction("ignore", scheme("ignore"), (_arg, _arg_1) => (new Value_1(0, [])), 1);
+const builtinIgnore = new ExternalFunction("ignore", scheme("ignore"), (_arg, _arg_1) => Value_1.VUnit, 1);
 
 const builtinIntTryParse = new ExternalFunction("Int.tryParse", scheme("Int.tryParse"), (_arg, args) => {
     const matchValue = tryParseInt64(expectString("Int.tryParse", args));
-    return (matchValue == null) ? (new Value_1(9, [undefined])) : (new Value_1(9, [new Value_1(1, [matchValue])]));
+    return (matchValue == null) ? (new Value_1(/* VOption */ 9, [undefined])) : (new Value_1(/* VOption */ 9, [new Value_1(/* VInt */ 1, [matchValue])]));
 }, 1);
 
 const builtinFloatTryParse = new ExternalFunction("Float.tryParse", scheme("Float.tryParse"), (_arg, args) => {
     const matchValue = tryParseDouble(expectString("Float.tryParse", args));
-    return (matchValue == null) ? (new Value_1(9, [undefined])) : (new Value_1(9, [new Value_1(2, [matchValue])]));
+    return (matchValue == null) ? (new Value_1(/* VOption */ 9, [undefined])) : (new Value_1(/* VOption */ 9, [new Value_1(/* VFloat */ 2, [matchValue])]));
 }, 1);
 
 const builtinBoolTryParse = new ExternalFunction("Bool.tryParse", scheme("Bool.tryParse"), (_arg, args) => {
@@ -523,10 +523,10 @@ const builtinBoolTryParse = new ExternalFunction("Bool.tryParse", scheme("Bool.t
     matchValue = [tryParse_2(expectString("Bool.tryParse", args), new FSharpRef(() => outArg, (v) => {
         outArg = v;
     })), outArg];
-    return matchValue[0] ? (new Value_1(9, [new Value_1(3, [matchValue[1]])])) : (new Value_1(9, [undefined]));
+    return matchValue[0] ? (new Value_1(/* VOption */ 9, [new Value_1(/* VBool */ 3, [matchValue[1]])])) : (new Value_1(/* VOption */ 9, [undefined]));
 }, 1);
 
-const builtinIntToString = new ExternalFunction("Int.toString", scheme("Int.toString"), (_arg, args) => (new Value_1(4, [String(expectInt("Int.toString", args))])), 1);
+const builtinIntToString = new ExternalFunction("Int.toString", scheme("Int.toString"), (_arg, args) => (new Value_1(/* VString */ 4, [String(expectInt("Int.toString", args))])), 1);
 
 const builtinFloatToString = new ExternalFunction("Float.toString", scheme("Float.toString"), (_arg, args) => {
     let matchResult, value;
@@ -549,13 +549,13 @@ const builtinFloatToString = new ExternalFunction("Float.toString", scheme("Floa
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(4, [format('{0:' + "G17" + '}', value)]);
+            return new Value_1(/* VString */ 4, [format('{0:' + "G17" + '}', value)]);
         default:
             return fail("Float.toString expects (float)");
     }
 }, 1);
 
-const builtinBoolToString = new ExternalFunction("Bool.toString", scheme("Bool.toString"), (_arg, args) => (new Value_1(4, [expectBool("Bool.toString", args) ? "true" : "false"])), 1);
+const builtinBoolToString = new ExternalFunction("Bool.toString", scheme("Bool.toString"), (_arg, args) => (new Value_1(/* VString */ 4, [expectBool("Bool.toString", args) ? "true" : "false"])), 1);
 
 const builtinStringReplace = new ExternalFunction("String.replace", scheme("String.replace"), (_arg, args) => {
     let matchResult, newValue, oldValue, source;
@@ -600,7 +600,7 @@ const builtinStringReplace = new ExternalFunction("String.replace", scheme("Stri
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(4, [replace(source, oldValue, newValue)]);
+            return new Value_1(/* VString */ 4, [replace(source, oldValue, newValue)]);
         default:
             return fail("String.replace expects (string, string, string)");
     }
@@ -638,8 +638,8 @@ const builtinStringIndexOf = new ExternalFunction("String.indexOf", scheme("Stri
     }
     switch (matchResult) {
         case 0: {
-            const index = source.indexOf(value) | 0;
-            return (index >= 0) ? (new Value_1(9, [new Value_1(1, [toInt64_unchecked(fromInt32(index))])])) : (new Value_1(9, [undefined]));
+            const index = indexOf(source, value, 4) | 0;
+            return (index >= 0) ? (new Value_1(/* VOption */ 9, [new Value_1(/* VInt */ 1, [toInt64_unchecked(fromInt32(index))])])) : (new Value_1(/* VOption */ 9, [undefined]));
         }
         default:
             return fail("String.indexOf expects (string, string)");
@@ -648,12 +648,12 @@ const builtinStringIndexOf = new ExternalFunction("String.indexOf", scheme("Stri
 
 const builtinStringToLower = new ExternalFunction("String.toLower", scheme("String.toLower"), (_arg, args) => {
     const source = expectString("String.toLower", args);
-    return new Value_1(4, [source.toLowerCase()]);
+    return new Value_1(/* VString */ 4, [source.toLowerCase()]);
 }, 1);
 
 const builtinStringToUpper = new ExternalFunction("String.toUpper", scheme("String.toUpper"), (_arg, args) => {
     const source = expectString("String.toUpper", args);
-    return new Value_1(4, [source.toUpperCase()]);
+    return new Value_1(/* VString */ 4, [source.toUpperCase()]);
 }, 1);
 
 const builtinStringSubstring = new ExternalFunction("String.substring", scheme("String.substring"), (_arg, args) => {
@@ -701,7 +701,7 @@ const builtinStringSubstring = new ExternalFunction("String.substring", scheme("
         case 0: {
             const startIndex = ~~toInt32_unchecked(start) | 0;
             const sliceLength = ~~toInt32_unchecked(length) | 0;
-            return ((((startIndex < 0) ? true : (sliceLength < 0)) ? true : (startIndex > source.length)) ? true : ((startIndex + sliceLength) > source.length)) ? (new Value_1(9, [undefined])) : (new Value_1(9, [new Value_1(4, [substring(source, startIndex, sliceLength)])]));
+            return ((((startIndex < 0) ? true : (sliceLength < 0)) ? true : (startIndex > source.length)) ? true : ((startIndex + sliceLength) > source.length)) ? (new Value_1(/* VOption */ 9, [undefined])) : (new Value_1(/* VOption */ 9, [new Value_1(/* VString */ 4, [substring(source, startIndex, sliceLength)])]));
         }
         default:
             return fail("String.substring expects (string, int, int)");
@@ -740,7 +740,7 @@ const builtinStringConcat = new ExternalFunction("String.concat", scheme("String
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(4, [join(separator, asStringList("String.concat", values))]);
+            return new Value_1(/* VString */ 4, [join(separator, asStringList("String.concat", values))]);
         default:
             return fail("String.concat expects (string, string list)");
     }
@@ -778,7 +778,7 @@ const builtinStringSplit = new ExternalFunction("String.split", scheme("String.s
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(5, [map((Item) => (new Value_1(4, [Item])), ofArray(split(source, [separator], undefined, 0)))]);
+            return new Value_1(/* VList */ 5, [map((Item) => (new Value_1(/* VString */ 4, [Item])), ofArray(split(source, [separator], undefined, 0)))]);
         default:
             return fail("String.split expects (string, string)");
     }
@@ -816,13 +816,13 @@ const builtinStringEndsWith = new ExternalFunction("String.endsWith", scheme("St
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(3, [endsWith(source, suffix, 4)]);
+            return new Value_1(/* VBool */ 3, [endsWith(source, suffix, 4)]);
         default:
             return fail("String.endsWith expects (string, string)");
     }
 }, 2);
 
-const builtinListEmpty = new ExternalFunction("List.empty", scheme("List.empty"), (_arg, _arg_1) => (new Value_1(5, [empty()])), 0);
+const builtinListEmpty = new ExternalFunction("List.empty", scheme("List.empty"), (_arg, _arg_1) => (new Value_1(/* VList */ 5, [empty()])), 0);
 
 const builtinListMap = new ExternalFunction("List.map", scheme("List.map"), (ctx, args) => {
     let matchResult, mapper, values;
@@ -851,7 +851,7 @@ const builtinListMap = new ExternalFunction("List.map", scheme("List.map"), (ctx
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(5, [map((value) => ctx.Apply(mapper, value), values)]);
+            return new Value_1(/* VList */ 5, [map((value) => ctx.Apply(mapper, value), values)]);
         default:
             return fail("List.map expects (mapper, values)");
     }
@@ -887,7 +887,7 @@ const builtinListIter = new ExternalFunction("List.iter", scheme("List.iter"), (
             iterate((value) => {
                 ctx.Apply(iterator, value);
             }, values);
-            return new Value_1(0, []);
+            return Value_1.VUnit;
         }
         default:
             return fail("List.iter expects (iterator, values)");
@@ -921,7 +921,7 @@ const builtinListChoose = new ExternalFunction("List.choose", scheme("List.choos
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(5, [choose((value) => {
+            return new Value_1(/* VList */ 5, [choose((value) => {
                 const matchValue = ctx.Apply(chooser, value);
                 if (matchValue.tag === 9) {
                     return matchValue.fields[0];
@@ -962,7 +962,7 @@ const builtinListCollect = new ExternalFunction("List.collect", scheme("List.col
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(5, [collect((value) => {
+            return new Value_1(/* VList */ 5, [collect((value) => {
                 const matchValue = ctx.Apply(collector, value);
                 if (matchValue.tag === 5) {
                     return matchValue.fields[0];
@@ -1003,7 +1003,7 @@ const builtinListExists = new ExternalFunction("List.exists", scheme("List.exist
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(3, [exists((value) => {
+            return new Value_1(/* VBool */ 3, [exists((value) => {
                 const matchValue = ctx.Apply(predicate, value);
                 if (matchValue.tag === 3) {
                     return matchValue.fields[0];
@@ -1044,7 +1044,7 @@ const builtinListContains = new ExternalFunction("List.contains", scheme("List.c
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(3, [exists((value) => {
+            return new Value_1(/* VBool */ 3, [exists((value) => {
                 let matchResult_1, x, y, x_1, y_1, x_2, y_2, x_3, y_3;
                 switch (value.tag) {
                     case 0: {
@@ -1123,9 +1123,9 @@ const builtinListContains = new ExternalFunction("List.contains", scheme("List.c
     }
 }, 2);
 
-const builtinListRev = new ExternalFunction("List.rev", scheme("List.rev"), (_arg, args) => (new Value_1(5, [reverse(expectList("List.rev", args))])), 1);
+const builtinListRev = new ExternalFunction("List.rev", scheme("List.rev"), (_arg, args) => (new Value_1(/* VList */ 5, [reverse(expectList("List.rev", args))])), 1);
 
-const builtinListDistinct = new ExternalFunction("List.distinct", scheme("List.distinct"), (_arg, args) => (new Value_1(5, [distinctValues(expectList("List.distinct", args))])), 1);
+const builtinListDistinct = new ExternalFunction("List.distinct", scheme("List.distinct"), (_arg, args) => (new Value_1(/* VList */ 5, [distinctValues(expectList("List.distinct", args))])), 1);
 
 const builtinListFold = new ExternalFunction("List.fold", scheme("List.fold"), (ctx, args) => {
     let matchResult, folder, state, values;
@@ -1193,7 +1193,7 @@ const builtinListFilter = new ExternalFunction("List.filter", scheme("List.filte
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(5, [filter((value) => {
+            return new Value_1(/* VList */ 5, [filter((value) => {
                 const matchValue = ctx.Apply(predicate, value);
                 if (matchValue.tag === 3) {
                     return matchValue.fields[0];
@@ -1207,7 +1207,7 @@ const builtinListFilter = new ExternalFunction("List.filter", scheme("List.filte
     }
 }, 2);
 
-const builtinListLength = new ExternalFunction("List.length", scheme("List.length"), (_arg, args) => (new Value_1(1, [toInt64_unchecked(fromInt32(length_1(expectList("List.length", args))))])), 1);
+const builtinListLength = new ExternalFunction("List.length", scheme("List.length"), (_arg, args) => (new Value_1(/* VInt */ 1, [toInt64_unchecked(fromInt32(length_1(expectList("List.length", args))))])), 1);
 
 const builtinListTryFind = new ExternalFunction("List.tryFind", scheme("List.tryFind"), (ctx, args) => {
     let matchResult, predicate, values;
@@ -1236,7 +1236,7 @@ const builtinListTryFind = new ExternalFunction("List.tryFind", scheme("List.try
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(9, [tryFind_1((value) => {
+            return new Value_1(/* VOption */ 9, [tryFind_1((value) => {
                 const matchValue = ctx.Apply(predicate, value);
                 if (matchValue.tag === 3) {
                     return matchValue.fields[0];
@@ -1251,6 +1251,7 @@ const builtinListTryFind = new ExternalFunction("List.tryFind", scheme("List.try
 }, 2);
 
 const builtinListTryGet = new ExternalFunction("List.tryGet", scheme("List.tryGet"), (ctx, args) => {
+    let option_1;
     let matchResult, predicate, values;
     if (!isEmpty(args)) {
         if (!isEmpty(tail_1(args))) {
@@ -1277,7 +1278,7 @@ const builtinListTryGet = new ExternalFunction("List.tryGet", scheme("List.tryGe
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(9, [map_1((arg) => (new Value_1(1, [toInt64_unchecked(fromInt32(arg))])), tryFindIndex((value) => {
+            return new Value_1(/* VOption */ 9, [(option_1 = tryFindIndex((value) => {
                 const matchValue = ctx.Apply(predicate, value);
                 if (matchValue.tag === 3) {
                     return matchValue.fields[0];
@@ -1285,7 +1286,7 @@ const builtinListTryGet = new ExternalFunction("List.tryGet", scheme("List.tryGe
                 else {
                     return fail("List.tryGet predicate must return bool");
                 }
-            }, values))]);
+            }, values), (option_1 != null) ? (new Value_1(/* VInt */ 1, [toInt64_unchecked(fromInt32(option_1))])) : undefined)]);
         default:
             return fail("List.tryGet expects (predicate, values)");
     }
@@ -1343,18 +1344,18 @@ const builtinListTryItem = new ExternalFunction("List.tryItem", scheme("List.try
                     break;
                 }
             };
-            return (compare_1(index, 0n) < 0) ? (new Value_1(9, [undefined])) : (new Value_1(9, [loop(values, 0n)]));
+            return (compare_1(index, 0n) < 0) ? (new Value_1(/* VOption */ 9, [undefined])) : (new Value_1(/* VOption */ 9, [loop(values, 0n)]));
         }
         default:
             return fail("List.tryItem expects (index, values)");
     }
 }, 2);
 
-const builtinListTryHead = new ExternalFunction("List.tryHead", scheme("List.tryHead"), (_arg, args) => (new Value_1(9, [tryHead(expectList("List.tryHead", args))])), 1);
+const builtinListTryHead = new ExternalFunction("List.tryHead", scheme("List.tryHead"), (_arg, args) => (new Value_1(/* VOption */ 9, [tryHead(expectList("List.tryHead", args))])), 1);
 
 const builtinListTail = new ExternalFunction("List.tail", scheme("List.tail"), (_arg, args) => {
     const matchValue = expectList("List.tail", args);
-    return !isEmpty(matchValue) ? (new Value_1(5, [tail_1(matchValue)])) : fail("List.tail expects a non-empty list");
+    return !isEmpty(matchValue) ? (new Value_1(/* VList */ 5, [tail_1(matchValue)])) : fail("List.tail expects a non-empty list");
 }, 1);
 
 const builtinListAppend = new ExternalFunction("List.append", scheme("List.append"), (_arg, args) => {
@@ -1389,7 +1390,7 @@ const builtinListAppend = new ExternalFunction("List.append", scheme("List.appen
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(5, [append(left, right)]);
+            return new Value_1(/* VList */ 5, [append(left, right)]);
         default:
             return fail("List.append expects (left, right)");
     }
@@ -1477,7 +1478,7 @@ const builtinOptionDefaultWith = new ExternalFunction("Option.defaultWith", sche
         case 0:
             return current;
         case 1:
-            return ctx.Apply(fallback_1, new Value_1(0, []));
+            return ctx.Apply(fallback_1, Value_1.VUnit);
         default:
             return fail("Option.defaultWith expects (fallback, value)");
     }
@@ -1511,9 +1512,9 @@ const builtinOptionIsNone = new ExternalFunction("Option.isNone", scheme("Option
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(3, [true]);
+            return new Value_1(/* VBool */ 3, [true]);
         case 1:
-            return new Value_1(3, [false]);
+            return new Value_1(/* VBool */ 3, [false]);
         default:
             return fail("Option.isNone expects (value)");
     }
@@ -1547,9 +1548,9 @@ const builtinOptionIsSome = new ExternalFunction("Option.isSome", scheme("Option
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(3, [false]);
+            return new Value_1(/* VBool */ 3, [false]);
         case 1:
-            return new Value_1(3, [true]);
+            return new Value_1(/* VBool */ 3, [true]);
         default:
             return fail("Option.isSome expects (value)");
     }
@@ -1590,15 +1591,15 @@ const builtinOptionMap = new ExternalFunction("Option.map", scheme("Option.map")
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(9, [ctx.Apply(mapper, current)]);
+            return new Value_1(/* VOption */ 9, [ctx.Apply(mapper, current)]);
         case 1:
-            return new Value_1(9, [undefined]);
+            return new Value_1(/* VOption */ 9, [undefined]);
         default:
             return fail("Option.map expects (mapper, value)");
     }
 }, 2);
 
-const builtinMapEmpty = new ExternalFunction("Map.empty", scheme("Map.empty"), (_arg, _arg_1) => (new Value_1(8, [empty_1({
+const builtinMapEmpty = new ExternalFunction("Map.empty", scheme("Map.empty"), (_arg, _arg_1) => (new Value_1(/* VMap */ 8, [empty_1({
     Compare: (x, y) => (compare(x, y) | 0),
 })])), 0);
 
@@ -1634,7 +1635,7 @@ const builtinMapTryGet = new ExternalFunction("Map.tryGet", scheme("Map.tryGet")
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(9, [FSharpMap__TryFind(values, new MapKey(0, [key]))]);
+            return new Value_1(/* VOption */ 9, [FSharpMap__TryFind(values, new MapKey(/* MKString */ 0, [key]))]);
         default:
             return fail("Map.tryGet expects (key, values)");
     }
@@ -1672,7 +1673,7 @@ const builtinMapContainsKey = new ExternalFunction("Map.containsKey", scheme("Ma
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(3, [FSharpMap__ContainsKey(values, new MapKey(0, [key]))]);
+            return new Value_1(/* VBool */ 3, [FSharpMap__ContainsKey(values, new MapKey(/* MKString */ 0, [key]))]);
         default:
             return fail("Map.containsKey expects (key, values)");
     }
@@ -1716,7 +1717,7 @@ const builtinMapAdd = new ExternalFunction("Map.add", scheme("Map.add"), (_arg,
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(8, [FSharpMap__Add(values, new MapKey(0, [key]), value)]);
+            return new Value_1(/* VMap */ 8, [FSharpMap__Add(values, new MapKey(/* MKString */ 0, [key]), value)]);
         default:
             return fail("Map.add expects (key, value, values)");
     }
@@ -1743,7 +1744,7 @@ const builtinMapOfList = new ExternalFunction("Map.ofList", scheme("Map.ofList")
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(8, [fold((state, entry) => {
+            return new Value_1(/* VMap */ 8, [fold((state, entry) => {
                 let matchResult_1, key, value;
                 if (entry.tag === 6) {
                     if (!isEmpty(entry.fields[0])) {
@@ -1775,7 +1776,7 @@ const builtinMapOfList = new ExternalFunction("Map.ofList", scheme("Map.ofList")
                 }
                 switch (matchResult_1) {
                     case 0:
-                        return add(new MapKey(0, [key]), value, state);
+                        return add(new MapKey(/* MKString */ 0, [key]), value, state);
                     default:
                         return fail("Map.ofList expects [(string * value)]");
                 }
@@ -1826,7 +1827,7 @@ const builtinMapFold = new ExternalFunction("Map.fold", scheme("Map.fold"), (ctx
     }
 }, 3);
 
-const builtinMapCount = new ExternalFunction("Map.count", scheme("Map.count"), (_arg, args) => (new Value_1(1, [toInt64_unchecked(fromInt32(FSharpMap__get_Count(expectMap("Map.count", args))))])), 1);
+const builtinMapCount = new ExternalFunction("Map.count", scheme("Map.count"), (_arg, args) => (new Value_1(/* VInt */ 1, [toInt64_unchecked(fromInt32(FSharpMap__get_Count(expectMap("Map.count", args))))])), 1);
 
 const builtinMapFilter = new ExternalFunction("Map.filter", scheme("Map.filter"), (ctx, args) => {
     let matchResult, predicate, values;
@@ -1855,7 +1856,7 @@ const builtinMapFilter = new ExternalFunction("Map.filter", scheme("Map.filter")
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(8, [fold_1((acc, key, value) => {
+            return new Value_1(/* VMap */ 8, [fold_1((acc, key, value) => {
                 const matchValue = ctx.Apply(ctx.Apply(predicate, mapKeyToValue(key)), value);
                 if (matchValue.tag === 3) {
                     if (matchValue.fields[0]) {
@@ -1903,7 +1904,7 @@ const builtinMapChoose = new ExternalFunction("Map.choose", scheme("Map.choose")
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(8, [fold_1((acc, key, value) => {
+            return new Value_1(/* VMap */ 8, [fold_1((acc, key, value) => {
                 const matchValue = ctx.Apply(ctx.Apply(chooser, mapKeyToValue(key)), value);
                 if (matchValue.tag === 9) {
                     if (matchValue.fields[0] == null) {
@@ -1952,7 +1953,7 @@ const builtinMapMap = new ExternalFunction("Map.map", scheme("Map.map"), (ctx, a
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(8, [fold_1((acc, key, value) => add(key, ctx.Apply(mapper, value), acc), empty_1({
+            return new Value_1(/* VMap */ 8, [fold_1((acc, key, value) => add(key, ctx.Apply(mapper, value), acc), empty_1({
                 Compare: (x, y) => (compare(x, y) | 0),
             }), values)]);
         default:
@@ -1990,7 +1991,7 @@ const builtinMapIter = new ExternalFunction("Map.iter", scheme("Map.iter"), (ctx
             iterate_1((key, value) => {
                 ctx.Apply(ctx.Apply(iterator, mapKeyToValue(key)), value);
             }, values);
-            return new Value_1(0, []);
+            return Value_1.VUnit;
         }
         default:
             return fail("Map.iter expects (iterator, values)");
@@ -2029,7 +2030,7 @@ const builtinMapRemove = new ExternalFunction("Map.remove", scheme("Map.remove")
     }
     switch (matchResult) {
         case 0:
-            return new Value_1(8, [FSharpMap__Remove(values, new MapKey(0, [key]))]);
+            return new Value_1(/* VMap */ 8, [FSharpMap__Remove(values, new MapKey(/* MKString */ 0, [key]))]);
         default:
             return fail("Map.remove expects (key, values)");
     }

package/dist/FScript.Language/BuiltinSignatures.js

@@ -1,13 +1,13 @@
 
-import { keys, ofList } from "../fable_modules/fable-library-js.5.2.0/Map.js";
-import { ofArray, empty, singleton } from "../fable_modules/fable-library-js.5.2.0/List.js";
+import { keys, ofList } from "../fable_modules/fable-library-js.5.13.0/Map.js";
+import { ofArray, empty, singleton } from "../fable_modules/fable-library-js.5.13.0/List.js";
 import { Scheme, Type } from "./Types.js";
-import { comparePrimitives } from "../fable_modules/fable-library-js.5.2.0/Util.js";
-import { ofSeq } from "../fable_modules/fable-library-js.5.2.0/Set.js";
-import { filter } from "../fable_modules/fable-library-js.5.2.0/Seq.js";
-import { startsWith } from "../fable_modules/fable-library-js.5.2.0/String.js";
+import { comparePrimitives } from "../fable_modules/fable-library-js.5.13.0/Util.js";
+import { ofSeq } from "../fable_modules/fable-library-js.5.13.0/Set.js";
+import { filter } from "../fable_modules/fable-library-js.5.13.0/Seq.js";
+import { startsWith } from "../fable_modules/fable-library-js.5.13.0/String.js";
 
-export const builtinSchemes = ofList(ofArray([["ignore", new Scheme(singleton(0), new Type(11, [new Type(15, [0]), new Type(0, [])]))], ["Int.tryParse", new Scheme(empty(), new Type(11, [new Type(4, []), new Type(10, [new Type(1, [])])]))], ["Float.tryParse", new Scheme(empty(), new Type(11, [new Type(4, []), new Type(10, [new Type(2, [])])]))], ["Bool.tryParse", new Scheme(empty(), new Type(11, [new Type(4, []), new Type(10, [new Type(3, [])])]))], ["Int.toString", new Scheme(empty(), new Type(11, [new Type(1, []), new Type(4, [])]))], ["Float.toString", new Scheme(empty(), new Type(11, [new Type(2, []), new Type(4, [])]))], ["Bool.toString", new Scheme(empty(), new Type(11, [new Type(3, []), new Type(4, [])]))], ["String.replace", new Scheme(empty(), new Type(11, [new Type(4, []), new Type(11, [new Type(4, []), new Type(11, [new Type(4, []), new Type(4, [])])])]))], ["String.indexOf", new Scheme(empty(), new Type(11, [new Type(4, []), new Type(11, [new Type(4, []), new Type(10, [new Type(1, [])])])]))], ["String.toLower", new Scheme(empty(), new Type(11, [new Type(4, []), new Type(4, [])]))], ["String.toUpper", new Scheme(empty(), new Type(11, [new Type(4, []), new Type(4, [])]))], ["String.substring", new Scheme(empty(), new Type(11, [new Type(1, []), new Type(11, [new Type(1, []), new Type(11, [new Type(4, []), new Type(10, [new Type(4, [])])])])]))], ["String.concat", new Scheme(empty(), new Type(11, [new Type(4, []), new Type(11, [new Type(5, [new Type(4, [])]), new Type(4, [])])]))], ["String.split", new Scheme(empty(), new Type(11, [new Type(4, []), new Type(11, [new Type(4, []), new Type(5, [new Type(4, [])])])]))], ["String.endsWith", new Scheme(empty(), new Type(11, [new Type(4, []), new Type(11, [new Type(4, []), new Type(3, [])])]))], ["List.empty", new Scheme(singleton(0), new Type(5, [new Type(15, [0])]))], ["List.map", new Scheme(ofArray([0, 1]), new Type(11, [new Type(11, [new Type(15, [0]), new Type(15, [1])]), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(5, [new Type(15, [1])])])]))], ["List.iter", new Scheme(singleton(0), new Type(11, [new Type(11, [new Type(15, [0]), new Type(0, [])]), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(0, [])])]))], ["List.choose", new Scheme(ofArray([0, 1]), new Type(11, [new Type(11, [new Type(15, [0]), new Type(10, [new Type(15, [1])])]), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(5, [new Type(15, [1])])])]))], ["List.collect", new Scheme(ofArray([0, 1]), new Type(11, [new Type(11, [new Type(15, [0]), new Type(5, [new Type(15, [1])])]), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(5, [new Type(15, [1])])])]))], ["List.exists", new Scheme(singleton(0), new Type(11, [new Type(11, [new Type(15, [0]), new Type(3, [])]), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(3, [])])]))], ["List.contains", new Scheme(singleton(0), new Type(11, [new Type(15, [0]), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(3, [])])]))], ["List.rev", new Scheme(singleton(0), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(5, [new Type(15, [0])])]))], ["List.distinct", new Scheme(singleton(0), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(5, [new Type(15, [0])])]))], ["List.fold", new Scheme(ofArray([0, 1]), new Type(11, [new Type(11, [new Type(15, [1]), new Type(11, [new Type(15, [0]), new Type(15, [1])])]), new Type(11, [new Type(15, [1]), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(15, [1])])])]))], ["List.filter", new Scheme(singleton(0), new Type(11, [new Type(11, [new Type(15, [0]), new Type(3, [])]), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(5, [new Type(15, [0])])])]))], ["List.length", new Scheme(singleton(0), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(1, [])]))], ["List.tryFind", new Scheme(singleton(0), new Type(11, [new Type(11, [new Type(15, [0]), new Type(3, [])]), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(10, [new Type(15, [0])])])]))], ["List.tryGet", new Scheme(singleton(0), new Type(11, [new Type(11, [new Type(15, [0]), new Type(3, [])]), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(10, [new Type(1, [])])])]))], ["List.tryItem", new Scheme(singleton(0), new Type(11, [new Type(1, []), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(10, [new Type(15, [0])])])]))], ["List.tryHead", new Scheme(singleton(0), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(10, [new Type(15, [0])])]))], ["List.tail", new Scheme(singleton(0), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(5, [new Type(15, [0])])]))], ["List.append", new Scheme(singleton(0), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(11, [new Type(5, [new Type(15, [0])]), new Type(5, [new Type(15, [0])])])]))], ["Option.defaultValue", new Scheme(singleton(0), new Type(11, [new Type(15, [0]), new Type(11, [new Type(10, [new Type(15, [0])]), new Type(15, [0])])]))], ["Option.defaultWith", new Scheme(singleton(0), new Type(11, [new Type(11, [new Type(0, []), new Type(15, [0])]), new Type(11, [new Type(10, [new Type(15, [0])]), new Type(15, [0])])]))], ["Option.isNone", new Scheme(singleton(0), new Type(11, [new Type(10, [new Type(15, [0])]), new Type(3, [])]))], ["Option.isSome", new Scheme(singleton(0), new Type(11, [new Type(10, [new Type(15, [0])]), new Type(3, [])]))], ["Option.map", new Scheme(ofArray([0, 1]), new Type(11, [new Type(11, [new Type(15, [0]), new Type(15, [1])]), new Type(11, [new Type(10, [new Type(15, [0])]), new Type(10, [new Type(15, [1])])])]))], ["Map.empty", new Scheme(singleton(0), new Type(9, [new Type(4, []), new Type(15, [0])]))], ["Map.tryGet", new Scheme(singleton(0), new Type(11, [new Type(4, []), new Type(11, [new Type(9, [new Type(4, []), new Type(15, [0])]), new Type(10, [new Type(15, [0])])])]))], ["Map.containsKey", new Scheme(singleton(0), new Type(11, [new Type(4, []), new Type(11, [new Type(9, [new Type(4, []), new Type(15, [0])]), new Type(3, [])])]))], ["Map.add", new Scheme(singleton(0), new Type(11, [new Type(4, []), new Type(11, [new Type(15, [0]), new Type(11, [new Type(9, [new Type(4, []), new Type(15, [0])]), new Type(9, [new Type(4, []), new Type(15, [0])])])])]))], ["Map.ofList", new Scheme(singleton(0), new Type(11, [new Type(5, [new Type(7, [ofArray([new Type(4, []), new Type(15, [0])])])]), new Type(9, [new Type(4, []), new Type(15, [0])])]))], ["Map.fold", new Scheme(ofArray([0, 1]), new Type(11, [new Type(11, [new Type(15, [1]), new Type(11, [new Type(4, []), new Type(11, [new Type(15, [0]), new Type(15, [1])])])]), new Type(11, [new Type(15, [1]), new Type(11, [new Type(9, [new Type(4, []), new Type(15, [0])]), new Type(15, [1])])])]))], ["Map.count", new Scheme(singleton(0), new Type(11, [new Type(9, [new Type(4, []), new Type(15, [0])]), new Type(1, [])]))], ["Map.filter", new Scheme(singleton(0), new Type(11, [new Type(11, [new Type(4, []), new Type(11, [new Type(15, [0]), new Type(3, [])])]), new Type(11, [new Type(9, [new Type(4, []), new Type(15, [0])]), new Type(9, [new Type(4, []), new Type(15, [0])])])]))], ["Map.choose", new Scheme(ofArray([0, 1]), new Type(11, [new Type(11, [new Type(4, []), new Type(11, [new Type(15, [0]), new Type(10, [new Type(15, [1])])])]), new Type(11, [new Type(9, [new Type(4, []), new Type(15, [0])]), new Type(9, [new Type(4, []), new Type(15, [1])])])]))], ["Map.map", new Scheme(ofArray([0, 1]), new Type(11, [new Type(11, [new Type(15, [0]), new Type(15, [1])]), new Type(11, [new Type(9, [new Type(4, []), new Type(15, [0])]), new Type(9, [new Type(4, []), new Type(15, [1])])])]))], ["Map.iter", new Scheme(singleton(0), new Type(11, [new Type(11, [new Type(4, []), new Type(11, [new Type(15, [0]), new Type(0, [])])]), new Type(11, [new Type(9, [new Type(4, []), new Type(15, [0])]), new Type(0, [])])]))], ["Map.remove", new Scheme(singleton(0), new Type(11, [new Type(4, []), new Type(11, [new Type(9, [new Type(4, []), new Type(15, [0])]), new Type(9, [new Type(4, []), new Type(15, [0])])])]))]]), {
+export const builtinSchemes = ofList(ofArray([["ignore", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), Type.TUnit]))], ["Int.tryParse", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TString, new Type(/* TOption */ 10, [Type.TInt])]))], ["Float.tryParse", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TString, new Type(/* TOption */ 10, [Type.TFloat])]))], ["Bool.tryParse", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TString, new Type(/* TOption */ 10, [Type.TBool])]))], ["Int.toString", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TInt, Type.TString]))], ["Float.toString", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TFloat, Type.TString]))], ["Bool.toString", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TBool, Type.TString]))], ["String.replace", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [Type.TString, Type.TString])])]))], ["String.indexOf", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [Type.TString, new Type(/* TOption */ 10, [Type.TInt])])]))], ["String.toLower", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TString, Type.TString]))], ["String.toUpper", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TString, Type.TString]))], ["String.substring", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TInt, new Type(/* TFun */ 11, [Type.TInt, new Type(/* TFun */ 11, [Type.TString, new Type(/* TOption */ 10, [Type.TString])])])]))], ["String.concat", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [new Type(/* TList */ 5, [Type.TString]), Type.TString])]))], ["String.split", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [Type.TString, new Type(/* TList */ 5, [Type.TString])])]))], ["String.endsWith", new Scheme(empty(), new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [Type.TString, Type.TBool])]))], ["List.empty", new Scheme(singleton(0), new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]))], ["List.map", new Scheme(ofArray([0, 1]), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), new Type(/* TVar */ 15, [1])]), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TList */ 5, [new Type(/* TVar */ 15, [1])])])]))], ["List.iter", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), Type.TUnit]), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), Type.TUnit])]))], ["List.choose", new Scheme(ofArray([0, 1]), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), new Type(/* TOption */ 10, [new Type(/* TVar */ 15, [1])])]), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TList */ 5, [new Type(/* TVar */ 15, [1])])])]))], ["List.collect", new Scheme(ofArray([0, 1]), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), new Type(/* TList */ 5, [new Type(/* TVar */ 15, [1])])]), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TList */ 5, [new Type(/* TVar */ 15, [1])])])]))], ["List.exists", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), Type.TBool]), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), Type.TBool])]))], ["List.contains", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), Type.TBool])]))], ["List.rev", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])])]))], ["List.distinct", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])])]))], ["List.fold", new Scheme(ofArray([0, 1]), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [1]), new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), new Type(/* TVar */ 15, [1])])]), new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [1]), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TVar */ 15, [1])])])]))], ["List.filter", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), Type.TBool]), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])])])]))], ["List.length", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), Type.TInt]))], ["List.tryFind", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), Type.TBool]), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TOption */ 10, [new Type(/* TVar */ 15, [0])])])]))], ["List.tryGet", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), Type.TBool]), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TOption */ 10, [Type.TInt])])]))], ["List.tryItem", new Scheme(singleton(0), new Type(/* TFun */ 11, [Type.TInt, new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TOption */ 10, [new Type(/* TVar */ 15, [0])])])]))], ["List.tryHead", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TOption */ 10, [new Type(/* TVar */ 15, [0])])]))], ["List.tail", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])])]))], ["List.append", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])]), new Type(/* TList */ 5, [new Type(/* TVar */ 15, [0])])])]))], ["Option.defaultValue", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), new Type(/* TFun */ 11, [new Type(/* TOption */ 10, [new Type(/* TVar */ 15, [0])]), new Type(/* TVar */ 15, [0])])]))], ["Option.defaultWith", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [Type.TUnit, new Type(/* TVar */ 15, [0])]), new Type(/* TFun */ 11, [new Type(/* TOption */ 10, [new Type(/* TVar */ 15, [0])]), new Type(/* TVar */ 15, [0])])]))], ["Option.isNone", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TOption */ 10, [new Type(/* TVar */ 15, [0])]), Type.TBool]))], ["Option.isSome", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TOption */ 10, [new Type(/* TVar */ 15, [0])]), Type.TBool]))], ["Option.map", new Scheme(ofArray([0, 1]), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), new Type(/* TVar */ 15, [1])]), new Type(/* TFun */ 11, [new Type(/* TOption */ 10, [new Type(/* TVar */ 15, [0])]), new Type(/* TOption */ 10, [new Type(/* TVar */ 15, [1])])])]))], ["Map.empty", new Scheme(singleton(0), new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])]))], ["Map.tryGet", new Scheme(singleton(0), new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])]), new Type(/* TOption */ 10, [new Type(/* TVar */ 15, [0])])])]))], ["Map.containsKey", new Scheme(singleton(0), new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])]), Type.TBool])]))], ["Map.add", new Scheme(singleton(0), new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), new Type(/* TFun */ 11, [new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])]), new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])])])])]))], ["Map.ofList", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TList */ 5, [new Type(/* TTuple */ 7, [ofArray([Type.TString, new Type(/* TVar */ 15, [0])])])]), new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])])]))], ["Map.fold", new Scheme(ofArray([0, 1]), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [1]), new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), new Type(/* TVar */ 15, [1])])])]), new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [1]), new Type(/* TFun */ 11, [new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])]), new Type(/* TVar */ 15, [1])])])]))], ["Map.count", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])]), Type.TInt]))], ["Map.filter", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), Type.TBool])]), new Type(/* TFun */ 11, [new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])]), new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])])])]))], ["Map.choose", new Scheme(ofArray([0, 1]), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), new Type(/* TOption */ 10, [new Type(/* TVar */ 15, [1])])])]), new Type(/* TFun */ 11, [new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])]), new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [1])])])]))], ["Map.map", new Scheme(ofArray([0, 1]), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), new Type(/* TVar */ 15, [1])]), new Type(/* TFun */ 11, [new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])]), new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [1])])])]))], ["Map.iter", new Scheme(singleton(0), new Type(/* TFun */ 11, [new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [new Type(/* TVar */ 15, [0]), Type.TUnit])]), new Type(/* TFun */ 11, [new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])]), Type.TUnit])]))], ["Map.remove", new Scheme(singleton(0), new Type(/* TFun */ 11, [Type.TString, new Type(/* TFun */ 11, [new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])]), new Type(/* TMap */ 9, [Type.TString, new Type(/* TVar */ 15, [0])])])]))]]), {
     Compare: (x, y) => (comparePrimitives(x, y) | 0),
 });
 

package/dist/FScript.Language/BuiltinTypes.js

@@ -1,13 +1,13 @@
 
 import { Span, Position } from "./Span.js";
 import { TypeDef, TypeRef } from "./Ast.js";
-import { empty, ofArray } from "../fable_modules/fable-library-js.5.2.0/List.js";
+import { empty, ofArray } from "../fable_modules/fable-library-js.5.13.0/List.js";
 
 const unknownSpan = new Span(new Position(undefined, 0, 0), new Position(undefined, 0, 0));
 
-export const environmentType = new TypeDef("Environment", false, ofArray([["ScriptName", new TypeRef(3, [new TypeRef(0, ["string"]), "option"])], ["Arguments", new TypeRef(3, [new TypeRef(0, ["string"]), "list"])]]), empty(), unknownSpan);
+export const environmentType = new TypeDef("Environment", false, ofArray([["ScriptName", new TypeRef(/* TRPostfix */ 3, [new TypeRef(/* TRName */ 0, ["string"]), "option"])], ["Arguments", new TypeRef(/* TRPostfix */ 3, [new TypeRef(/* TRName */ 0, ["string"]), "list"])]]), empty(), unknownSpan);
 
-export const fsKindType = new TypeDef("FsKind", false, empty(), ofArray([["File", new TypeRef(0, ["string"])], ["Directory", new TypeRef(0, ["string"])], ["Missing", undefined]]), unknownSpan);
+export const fsKindType = new TypeDef("FsKind", false, empty(), ofArray([["File", new TypeRef(/* TRName */ 0, ["string"])], ["Directory", new TypeRef(/* TRName */ 0, ["string"])], ["Missing", undefined]]), unknownSpan);
 
 export const typeDefs = ofArray([environmentType, fsKindType]);
 

package/dist/FScript.Language/Error.js

@@ -1,6 +1,6 @@
 
-import { FSharpException, Record } from "../fable_modules/fable-library-js.5.2.0/Types.js";
-import { class_type, record_type, string_type } from "../fable_modules/fable-library-js.5.2.0/Reflection.js";
+import { FSharpException, Record } from "../fable_modules/fable-library-js.5.13.0/Types.js";
+import { class_type, record_type, string_type } from "../fable_modules/fable-library-js.5.13.0/Reflection.js";
 import { Span_$reflection } from "./Span.js";
 
 export class ParseError extends Record {