@magnusopera/fscript 0.77.0 → 0.78.1

package/dist/fable_modules/fable-library-js.5.13.0/Path.js

@@ -0,0 +1,31 @@
+// This library doesn't depend on @types/node (to stay browser-compatible),
+// so these Node.js built-in imports can't be type-checked; the exported
+// functions below still declare their own types for callers to rely on.
+// @ts-ignore
+import { basename, extname, join } from "node:path";
+// @ts-ignore
+import { tmpdir } from "node:os";
+// @ts-ignore
+import { writeFileSync } from "node:fs";
+// Mirrors the format of .NET's Path.GetRandomFileName(): 8 random hex chars,
+// a dot, then 3 more random hex chars.
+export function getRandomFileName() {
+    const nameBytes = new Uint8Array(4);
+    crypto.getRandomValues(nameBytes);
+    const name = Array.from(nameBytes, (b) => b.toString(16).padStart(2, "0")).join("");
+    const extBytes = new Uint8Array(2);
+    crypto.getRandomValues(extBytes);
+    const ext = Array.from(extBytes, (b) => b.toString(16).padStart(2, "0")).join("").slice(0, 3);
+    return `${name}.${ext}`;
+}
+export function getFileNameWithoutExtension(path) {
+    return basename(path, extname(path));
+}
+export function hasExtension(path) {
+    return extname(path) !== "";
+}
+export function getTempFileName() {
+    const path = join(tmpdir(), getRandomFileName());
+    writeFileSync(path, "");
+    return path;
+}

package/dist/fable_modules/{fable-library-js.5.2.0 → fable-library-js.5.13.0}/Reflection.js

@@ -93,7 +93,11 @@ export function option_type(generic) {
     return t;
 }
 export function list_type(generic) {
-    return new TypeInfo("Microsoft.FSharp.Collections.FSharpList`1", [generic]);
+    const t = new TypeInfo("Microsoft.FSharp.Collections.FSharpList`1", [generic], undefined, undefined, undefined, () => [
+        new CaseInfo(t, 0, "Empty"),
+        new CaseInfo(t, 1, "Cons", [["Head", generic], ["Tail", t]])
+    ]);
+    return t;
 }
 export function array_type(generic) {
     return new TypeInfo("[]", [generic]);
@@ -377,8 +381,14 @@ export function getUnionCaseFields(uci) {
 }
 // This is used as replacement of `FSharpValue.GetRecordFields`
 // For `FSharpTypes.GetRecordFields` see `getRecordElements`
-// Object.keys returns keys in the order they were added to the object
-export function getRecordFields(v) {
+// TypeInfo is used when available to enumerate fields by name: anonymous record None fields
+// are omitted from the JS object, so Object.keys alone would miss them.
+// Boxed anonymous record would are still not covered but this is the best we can do for now
+// without adding a __fields__ to every anonymous record being created
+export function getRecordFields(v, t) {
+    if (t.fields != null) {
+        return t.fields().map(([key, _]) => v[key]);
+    }
     return Object.keys(v).map((k) => v[k]);
 }
 export function getRecordField(v, field) {

package/dist/fable_modules/{fable-library-js.5.2.0 → fable-library-js.5.13.0}/RegExp.js

@@ -105,29 +105,38 @@ export function replace(reg, input, replacement, limit, offset = 0) {
         input = tmp;
         limit = undefined;
     }
-    if (typeof replacement === "function") {
-        limit = limit == null ? -1 : limit;
-        return input.substring(0, offset) + input.substring(offset).replace(reg, replacer);
-    }
-    else {
-        replacement =
-            replacement
-                // $0 doesn't work with JS regex, see #1155
-                .replace(/\$0/g, (_s) => "$&")
-                // named groups in replacement are `${name}` in .Net, but `$<name>` in JS (in regex: groups are `(?<name>...)` in both)
-                .replace(/\${([^}]+)}/g, "\$<$1>");
-        if (limit != null) {
-            let m;
-            const sub1 = input.substring(offset);
-            const _matches = matches(reg, sub1);
-            const sub2 = matches.length > limit ? (m = _matches[limit - 1], sub1.substring(0, m.index + m[0].length)) : sub1;
-            return input.substring(0, offset) + sub2.replace(reg, replacement)
-                + input.substring(offset + sub2.length);
-        }
-        else {
-            return input.replace(reg, replacement);
-        }
+    if (typeof replacement === "string") {
+        const rep = replacement;
+        // .NET replacement patterns cannot be rewritten as JS replacement strings unambiguously
+        // (e.g. `$$0` must stay literal "$0", `$0` doesn't work with JS regex (see #1155), and
+        // `${1}` followed by a digit must not become `$1` + digit), so interpret them with an
+        // evaluator instead, honoring the `$$` escape left-to-right
+        replacement = (match) => rep.replace(/\$(?:(\$)|(&)|(`)|(')|(\d+)|\{(\d+)\}|\{([^}]+)\})/g, (s, dollar, and, before, after, num, numBraced, name) => {
+            if (dollar != null) {
+                return "$";
+            }
+            if (and != null) {
+                return match[0];
+            }
+            if (before != null) {
+                return match.input.substring(0, match.index);
+            }
+            if (after != null) {
+                return match.input.substring(match.index + match[0].length);
+            }
+            const n = num ?? numBraced;
+            if (n != null) {
+                const i = parseInt(n, 10);
+                // Same as .NET: an unmatched group is replaced by an empty string,
+                // a nonexistent group number keeps the substitution pattern literally
+                return i < match.length ? (match[i] ?? "") : s;
+            }
+            // Named groups are `${name}` in .NET (in regex: groups are `(?<name>...)` in both)
+            return match.groups != null && name in match.groups ? (match.groups[name] ?? "") : s;
+        });
     }
+    limit = limit == null ? -1 : limit;
+    return input.substring(0, offset) + input.substring(offset).replace(reg, replacer);
 }
 export function split(reg, input, limit, offset = 0) {
     if (typeof reg === "string") {
@@ -136,6 +145,26 @@ export function split(reg, input, limit, offset = 0) {
         input = tmp;
         limit = undefined;
     }
-    input = input.substring(offset);
-    return input.split(reg, limit);
+    // JS String.split(regex, limit) truncates the result and discards the remainder,
+    // whereas .NET keeps it in the last element (`limit` is the max number of elements),
+    // keeps the text before `offset` in the first element and includes the values of
+    // matched capture groups, so iterate the matches manually like .NET Regex.Split does
+    const result = [];
+    let prev = 0;
+    let count = limit == null ? -1 : limit - 1;
+    for (const m of matches(reg, input, offset)) {
+        if (count === 0) {
+            break;
+        }
+        result.push(input.substring(prev, m.index));
+        prev = m.index + m[0].length;
+        for (let i = 1; i < m.length; i++) {
+            if (m[i] !== undefined) {
+                result.push(m[i]);
+            }
+        }
+        count--;
+    }
+    result.push(input.substring(prev));
+    return result;
 }

package/dist/fable_modules/{fable-library-js.5.2.0 → fable-library-js.5.13.0}/Seq.js

@@ -277,7 +277,7 @@ export function Enumerator_unfold(f, state) {
     return Enumerator_FromFunctions$1_$ctor_58C54629(() => {
         if (curr != null) {
             const x = value_1(curr)[0];
-            const st = value_1(curr)[1];
+            value_1(curr)[1];
             return x;
         }
         else {
@@ -286,7 +286,7 @@ export function Enumerator_unfold(f, state) {
     }, () => {
         curr = f(acc);
         if (curr != null) {
-            const x_1 = value_1(curr)[0];
+            value_1(curr)[0];
             const st_1 = value_1(curr)[1];
             acc = st_1;
             return true;
@@ -457,6 +457,93 @@ export function enumerateUsing(resource, source) {
 export function enumerateWhile(guard, xs) {
     return concat(unfold((i) => (guard() ? [xs, i + 1] : undefined), 0));
 }
+export function enumerateTryWith(source, catchFilter, catchHandler) {
+    return mkSeq(() => {
+        let e = undefined;
+        let caught = false;
+        let started = false;
+        let finished = false;
+        let curr = undefined;
+        const tryNext = () => {
+            try {
+                let en_2;
+                if (e == null) {
+                    const en_1 = getEnumerator(source);
+                    e = en_1;
+                    en_2 = en_1;
+                }
+                else {
+                    en_2 = value_1(e);
+                }
+                if (en_2["System.Collections.IEnumerator.MoveNext"]()) {
+                    curr = some(en_2["System.Collections.Generic.IEnumerator`1.get_Current"]());
+                    return true;
+                }
+                else {
+                    finished = true;
+                    return false;
+                }
+            }
+            catch (matchValue) {
+                if (!caught) {
+                    const ex_1 = matchValue;
+                    if (catchFilter(ex_1) !== 0) {
+                        caught = true;
+                        if (e == null) {
+                        }
+                        else {
+                            const en_3 = value_1(e);
+                            try {
+                                disposeSafe(en_3);
+                            }
+                            catch (matchValue_1) {
+                            }
+                            e = undefined;
+                        }
+                        e = getEnumerator(catchHandler(ex_1));
+                        return tryNext();
+                    }
+                    else {
+                        throw matchValue;
+                    }
+                }
+                else {
+                    throw matchValue;
+                }
+            }
+        };
+        return Enumerator_FromFunctions$1_$ctor_58C54629(() => {
+            if (!started) {
+                Enumerator_notStarted();
+            }
+            else if (finished) {
+                Enumerator_alreadyFinished();
+            }
+            if (curr != null) {
+                return value_1(curr);
+            }
+            else {
+                return Enumerator_alreadyFinished();
+            }
+        }, () => {
+            if (!started) {
+                started = true;
+            }
+            if (finished) {
+                return false;
+            }
+            else {
+                return tryNext();
+            }
+        }, () => {
+            if (e == null) {
+            }
+            else {
+                disposeSafe(value_1(e));
+            }
+        });
+    });
+}
 export function filter(f, xs) {
     return choose((x) => {
         if (f(x)) {
@@ -505,14 +592,14 @@ export function exactlyOne(xs) {
         if (e["System.Collections.IEnumerator.MoveNext"]()) {
             const v = e["System.Collections.Generic.IEnumerator`1.get_Current"]();
             if (e["System.Collections.IEnumerator.MoveNext"]()) {
-                throw new Exception((SR_inputSequenceTooLong + "\\nParameter name: ") + "source");
+                throw new Exception(SR_inputSequenceTooLong + " (Parameter \'source\')");
             }
             else {
                 return v;
             }
         }
         else {
-            throw new Exception((SR_inputSequenceEmpty + "\\nParameter name: ") + "source");
+            throw new Exception(SR_inputSequenceEmpty + " (Parameter \'source\')");
         }
     }
     finally {
@@ -692,7 +779,7 @@ export function tryHead(xs) {
 export function head(xs) {
     const matchValue = tryHead(xs);
     if (matchValue == null) {
-        throw new Exception((SR_inputSequenceEmpty + "\\nParameter name: ") + "source");
+        throw new Exception(SR_inputSequenceEmpty + " (Parameter \'source\')");
     }
     else {
         return value_1(matchValue);
@@ -758,7 +845,7 @@ export function tryItem(index, xs) {
 export function item(index, xs) {
     const matchValue = tryItem(index, xs);
     if (matchValue == null) {
-        throw new Exception((SR_notEnoughElements + "\\nParameter name: ") + "index");
+        throw new Exception(SR_notEnoughElements + " (Parameter \'index\')");
     }
     else {
         return value_1(matchValue);
@@ -811,7 +898,7 @@ export function tryLast(xs) {
 export function last(xs) {
     const matchValue = tryLast(xs);
     if (matchValue == null) {
-        throw new Exception((SR_notEnoughElements + "\\nParameter name: ") + "source");
+        throw new Exception(SR_notEnoughElements + " (Parameter \'source\')");
     }
     else {
         return value_1(matchValue);
@@ -1092,7 +1179,7 @@ export function skip(count, source) {
         try {
             for (let _ = 1; _ <= count; _++) {
                 if (!e["System.Collections.IEnumerator.MoveNext"]()) {
-                    throw new Exception((SR_notEnoughElements + "\\nParameter name: ") + "source");
+                    throw new Exception(SR_notEnoughElements + " (Parameter \'source\')");
                 }
             }
             return Enumerator_enumerateThenFinally(() => {
@@ -1125,7 +1212,7 @@ export function take(count, xs) {
                 return some(e["System.Collections.Generic.IEnumerator`1.get_Current"]());
             }
             else {
-                throw new Exception((SR_notEnoughElements + "\\nParameter name: ") + "source");
+                throw new Exception(SR_notEnoughElements + " (Parameter \'source\')");
             }
         }
         else {
@@ -1213,7 +1300,7 @@ export function average(xs, averager) {
         return averager.Add(acc, x);
     }, averager.GetZero(), xs);
     if (count === 0) {
-        throw new Exception((SR_inputSequenceEmpty + "\\nParameter name: ") + "source");
+        throw new Exception(SR_inputSequenceEmpty + " (Parameter \'source\')");
     }
     else {
         return averager.DivideByInt(total, count);
@@ -1226,7 +1313,7 @@ export function averageBy(f, xs, averager) {
         return averager.Add(acc, f(x));
     }, averager.GetZero(), xs);
     if (count === 0) {
-        throw new Exception((SR_inputSequenceEmpty + "\\nParameter name: ") + "source");
+        throw new Exception(SR_inputSequenceEmpty + " (Parameter \'source\')");
     }
     else {
         return averager.DivideByInt(total, count);
@@ -1241,7 +1328,7 @@ export function chunkBySize(chunkSize, xs) {
 export function insertAt(index, y, xs) {
     let isDone = false;
     if (index < 0) {
-        throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+        throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
     }
     return generateIndexed(() => ofSeq(xs), (i, e) => {
         if ((isDone ? true : (i < index)) && e["System.Collections.IEnumerator.MoveNext"]()) {
@@ -1253,7 +1340,7 @@ export function insertAt(index, y, xs) {
         }
         else {
             if (!isDone) {
-                throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+                throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
             }
             return undefined;
         }
@@ -1264,7 +1351,7 @@ export function insertAt(index, y, xs) {
 export function insertManyAt(index, ys, xs) {
     let status = -1;
     if (index < 0) {
-        throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+        throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
     }
     return generateIndexed(() => [ofSeq(xs), ofSeq(ys)], (i, tupledArg) => {
         const e1 = tupledArg[0];
@@ -1291,7 +1378,7 @@ export function insertManyAt(index, ys, xs) {
             }
             else {
                 if (status < 1) {
-                    throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+                    throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
                 }
                 return undefined;
             }
@@ -1307,7 +1394,7 @@ export function insertManyAt(index, ys, xs) {
 export function removeAt(index, xs) {
     let isDone = false;
     if (index < 0) {
-        throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+        throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
     }
     return generateIndexed(() => ofSeq(xs), (i, e) => {
         if ((isDone ? true : (i < index)) && e["System.Collections.IEnumerator.MoveNext"]()) {
@@ -1319,7 +1406,7 @@ export function removeAt(index, xs) {
         }
         else {
             if (!isDone) {
-                throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+                throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
             }
             return undefined;
         }
@@ -1329,7 +1416,7 @@ export function removeAt(index, xs) {
 }
 export function removeManyAt(index, count, xs) {
     if (index < 0) {
-        throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+        throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
     }
     return generateIndexed(() => ofSeq(xs), (i, e) => {
         if (i < index) {
@@ -1337,14 +1424,14 @@ export function removeManyAt(index, count, xs) {
                 return some(e["System.Collections.Generic.IEnumerator`1.get_Current"]());
             }
             else {
-                throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+                throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
             }
         }
         else {
             if (i === index) {
                 for (let _ = 1; _ <= count; _++) {
                     if (!e["System.Collections.IEnumerator.MoveNext"]()) {
-                        throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "count");
+                        throw new Exception(SR_indexOutOfBounds + " (Parameter \'count\')");
                     }
                 }
             }
@@ -1357,7 +1444,7 @@ export function removeManyAt(index, count, xs) {
 export function updateAt(index, y, xs) {
     let isDone = false;
     if (index < 0) {
-        throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+        throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
     }
     return generateIndexed(() => ofSeq(xs), (i, e) => {
         if ((isDone ? true : (i < index)) && e["System.Collections.IEnumerator.MoveNext"]()) {
@@ -1369,7 +1456,7 @@ export function updateAt(index, y, xs) {
         }
         else {
             if (!isDone) {
-                throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+                throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
             }
             return undefined;
         }

package/dist/fable_modules/{fable-library-js.5.2.0 → fable-library-js.5.13.0}/Set.js

@@ -1,10 +1,9 @@
 import { record_type, bool_type, list_type, option_type, class_type } from "./Reflection.js";
 import { some, value as value_2 } from "./Option.js";
 import { structuralHash, toIterator, disposeSafe, getEnumerator, isArrayLike, Exception } from "./Util.js";
-import { Record } from "./Types.js";
+import { toString, Record } from "./Types.js";
 import { fold as fold_2, cons, singleton as singleton_1, empty as empty_1, ofArrayWithTail, tail, head, isEmpty as isEmpty_1, FSharpList } from "./List.js";
 import { fold as fold_1, fill, setItem } from "./Array.js";
-import { join } from "./String.js";
 import { NotSupportedException_$ctor_Z721C83C5 } from "./System.js";
 import { skip, truncate, iterateIndexed, exists as exists_1, forAll as forAll_1, fold as fold_3, reduce, iterate as iterate_1, map as map_1 } from "./Seq.js";
 import { HashSet__get_Comparer, HashSet_$ctor_Z6150332D, HashSet } from "./MutableSet.js";
@@ -1402,7 +1401,21 @@ export class FSharpSet {
     }
     toString() {
         const this$ = this;
-        return ("set [" + join("; ", this$)) + "]";
+        let result = "set [";
+        let first = true;
+        const enumerator = getEnumerator(this$);
+        try {
+            while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
+                let x = undefined, matchValue = undefined, s = undefined;
+                const x_1 = enumerator["System.Collections.Generic.IEnumerator`1.get_Current"]();
+                result = ((first ? result : (result + "; ")) + ((x = x_1, (matchValue = x, (typeof matchValue === "string") ? ((s = matchValue, ("\"" + s) + "\"")) : toString(x)))));
+                first = false;
+            }
+        }
+        finally {
+            disposeSafe(enumerator);
+        }
+        return result + "]";
     }
     get [Symbol.toStringTag]() {
         return "FSharpSet";

package/dist/fable_modules/{fable-library-js.5.2.0 → fable-library-js.5.13.0}/String.js

@@ -80,7 +80,7 @@ export function endsWith(str, pattern, ic) {
         return str.endsWith(pattern);
     }
     if (str.length >= pattern.length) {
-        return cmp(str.slice(-pattern.length), pattern, ic) === 0;
+        return cmp(str.slice(str.length - pattern.length), pattern, ic) === 0;
     }
     return false;
 }
@@ -96,6 +96,30 @@ export function contains(str, pattern, ic) {
     }
     return false;
 }
+export function indexOf(str, searchValue, comparison, startIndex = 0) {
+    if (comparison === StringComparison.Ordinal) { // fast path
+        return str.indexOf(searchValue, startIndex);
+    }
+    const len = searchValue.length;
+    for (let i = Math.max(startIndex, 0); i <= str.length - len; i++) {
+        if (cmp(str.slice(i, i + len), searchValue, comparison) === 0) {
+            return i;
+        }
+    }
+    return -1;
+}
+export function lastIndexOf(str, searchValue, comparison, startIndex = str.length - 1) {
+    if (comparison === StringComparison.Ordinal) { // fast path
+        return str.lastIndexOf(searchValue, startIndex);
+    }
+    const len = searchValue.length;
+    for (let i = Math.min(startIndex, str.length - len); i >= 0; i--) {
+        if (cmp(str.slice(i, i + len), searchValue, comparison) === 0) {
+            return i;
+        }
+    }
+    return -1;
+}
 export function indexOfAny(str, anyOf, ...args) {
     if (str == null || str === "") {
         return -1;
@@ -215,6 +239,9 @@ function formatReplacement(rep, flags, padLength, precision, format) {
     else if (rep instanceof Date) {
         rep = dateToString(rep);
     }
+    else if (format === "A" && typeof rep === "string") {
+        rep = "\"" + rep + "\"";
+    }
     else {
         rep = toString(rep);
     }

package/dist/fable_modules/{fable-library-js.5.2.0 → fable-library-js.5.13.0}/System.js

@@ -1,4 +1,4 @@
-import { Exception } from "./Util.js";
+import { defaultOf, Exception } from "./Util.js";
 import { class_type } from "./Reflection.js";
 import { SR_Arg_ArgumentOutOfRangeException, SR_ArgumentNull_Generic, SR_Arg_ArgumentException, SR_Arg_ParamName_Name, SR_Arg_TimeoutException, SR_Arg_StackOverflowException, SR_Arg_RankException, SR_Arg_OverflowException, SR_Arg_OutOfMemoryException, SR_Arg_NullReferenceException, SR_Arg_NotSupportedException, SR_Arg_NotImplementedException, SR_Arg_NotFiniteNumberException, SR_Arg_InvalidOperationException, SR_Arg_IndexOutOfRangeException, SR_Arg_FormatException, SR_Arg_DivideByZero, SR_Arg_ArithmeticException, SR_Arg_ApplicationException, SR_Arg_SystemException } from "./Global.js";
 import { isNullOrEmpty } from "./String.js";
@@ -227,29 +227,35 @@ export function TimeoutException_$ctor() {
     return TimeoutException_$ctor_Z721C83C5(SR_Arg_TimeoutException);
 }
 export class ArgumentException extends Exception {
-    constructor(message, paramName) {
-        super(isNullOrEmpty(paramName) ? message : (((message + SR_Arg_ParamName_Name) + paramName) + "\')"));
+    constructor(message, paramName, innerException) {
+        super(isNullOrEmpty(paramName) ? message : (((message + SR_Arg_ParamName_Name) + paramName) + "\')"), innerException);
         this.paramName = paramName;
     }
 }
 export function ArgumentException_$reflection() {
     return class_type("System.ArgumentException", undefined, ArgumentException, class_type("System.Exception"));
 }
-export function ArgumentException_$ctor_Z384F8060(message, paramName) {
-    return new ArgumentException(message, paramName);
+export function ArgumentException_$ctor_Z60A2B367(message, paramName, innerException) {
+    return new ArgumentException(message, paramName, innerException);
 }
 export function ArgumentException_$ctor() {
-    return ArgumentException_$ctor_Z384F8060(SR_Arg_ArgumentException, "");
+    return ArgumentException_$ctor_Z60A2B367(SR_Arg_ArgumentException, "", defaultOf());
 }
 export function ArgumentException_$ctor_Z721C83C5(message) {
-    return ArgumentException_$ctor_Z384F8060(message, "");
+    return ArgumentException_$ctor_Z60A2B367(message, "", defaultOf());
+}
+export function ArgumentException_$ctor_Z384F8060(message, paramName) {
+    return ArgumentException_$ctor_Z60A2B367(message, paramName, defaultOf());
+}
+export function ArgumentException_$ctor_68CE3CA2(message, innerException) {
+    return ArgumentException_$ctor_Z60A2B367(message, "", innerException);
 }
 export function ArgumentException__get_ParamName(_) {
     return _.paramName;
 }
 export class ArgumentNullException extends ArgumentException {
     constructor(paramName, message) {
-        super(message, paramName);
+        super(message, paramName, defaultOf());
     }
 }
 export function ArgumentNullException_$reflection() {
@@ -266,7 +272,7 @@ export function ArgumentNullException_$ctor() {
 }
 export class ArgumentOutOfRangeException extends ArgumentException {
     constructor(paramName, message) {
-        super(message, paramName);
+        super(message, paramName, defaultOf());
     }
 }
 export function ArgumentOutOfRangeException_$reflection() {

package/dist/fable_modules/fable-library-js.5.13.0/Task.js

@@ -0,0 +1,27 @@
+import { OperationCanceledException } from "./AsyncBuilder.js";
+export class TaskCompletionSource {
+    constructor() {
+        this.task = new Promise((resolve, reject) => {
+            this._resolve = resolve;
+            this._reject = reject;
+        });
+    }
+    SetResult(value) { this._resolve(value); }
+    SetException(error) { this._reject(error); }
+    SetCancelled() { this._reject(new OperationCanceledException()); }
+    get_Task() { return this.task; }
+}
+export function fromResult(value) {
+    return Promise.resolve(value);
+}
+export function zero() {
+    return Promise.resolve();
+}
+// Task<T> = Promise<T> in JS/TS. GetAwaiter/GetResult return the Promise itself;
+// callers should use Async.AwaitTask to extract the value in an async context.
+export function getAwaiter(t) {
+    return t;
+}
+export function getResult(t) {
+    return t;
+}