@magnusopera/fscript 0.77.1 → 0.79.0

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

@@ -1,5 +1,5 @@
 ---
-last_commit_released: 15eb83ed36657f75073fb0e1b4cac677e24fc9bb
+last_commit_released: 619d7afddbaf25108e819abaaa9d8a6503c457d6
 updaters:
   - package.json:
       file: package.json
@@ -15,6 +15,85 @@ All notable changes to this project will be documented in this file.
 The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.0.0/),
 and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0.html).
 
+## 2.5.1 - 2026-07-24
+
+### 🐞 Bug Fixes
+
+* *(js/ts,python)* Inline Option/ValueOption combinators to avoid closures and allocations (#4836) ([61cac646](https://github.com/fable-compiler/Fable/commit/61cac646e6385d82247082dbb90a98b1646560de))
+
+<strong><small>[View changes on Github](https://github.com/fable-compiler/Fable/compare/6568f35ece227fc30ce84111c8d2e975b09bac00..619d7afddbaf25108e819abaaa9d8a6503c457d6)</small></strong>
+
+## 2.5.0 - 2026-07-15
+
+### 🚀 Features
+
+* *(js/ts)* Add `System.IO.Directory` support (Exists, CreateDirectory) (#4798) ([6568f35e](https://github.com/fable-compiler/Fable/commit/6568f35ece227fc30ce84111c8d2e975b09bac00))
+* *(js/ts/python/beam)* Preserve member calls and pattern matches in quotations (#4780) ([55482e6b](https://github.com/fable-compiler/Fable/commit/55482e6b5e6306fd4dbaba5759024313cb26682a))
+
+<strong><small>[View changes on Github](https://github.com/fable-compiler/Fable/compare/a8d9bf5f0b7cc4560bb107963348e765695c22b6..6568f35ece227fc30ce84111c8d2e975b09bac00)</small></strong>
+
+## 2.4.2 - 2026-07-11
+
+### 🐞 Bug Fixes
+
+* *(js/ts)* Async cancellation propagation and continuation double-resolve (#4746) ([c78a9a8e](https://github.com/fable-compiler/Fable/commit/c78a9a8ed20234feddf3375b61e91098f9261bee))
+* *(js/ts)* Date arithmetic: PM parsing, AddMonths day clamp, AddYears offset (#4744) ([be0558eb](https://github.com/fable-compiler/Fable/commit/be0558ebe07f78f7a93ec0c34592d7c066b59fc7))
+* *(js/ts)* Int64 non-decimal parsing and BitConverter .NET mismatches (#4748) ([2704d9c5](https://github.com/fable-compiler/Fable/commit/2704d9c5daab87eb1791c0ea1b6b8b06b987247c))
+
+<strong><small>[View changes on Github](https://github.com/fable-compiler/Fable/compare/d6ae6bd3790b57b31941a118cdffaeb6a59155c3..a8d9bf5f0b7cc4560bb107963348e765695c22b6)</small></strong>
+
+## 2.4.1 - 2026-07-09
+
+### 🐞 Bug Fixes
+
+* MailboxProcessor dropping falsy messages and unit replies ([8299b2e7](https://github.com/fable-compiler/Fable/commit/8299b2e7f690e9136906653155883a08607aa4a4))
+* *(all)* Add `Seq.enumerateTryWith` for try/with in seq, list, array comprehensions (#4750) ([448c90d7](https://github.com/fable-compiler/Fable/commit/448c90d7ccba80ee3d3c38432a2a1d1407f6dc69))
+* *(js/ts)* Match .NET NaN semantics in JS comparison, min and max ([7e5106f9](https://github.com/fable-compiler/Fable/commit/7e5106f9d93cb55ae4aca4656868fa0c53493991))
+* *(js/ts)* BigInteger byte-array corruption, checked conversions, gcd, log2 (#4743) ([f3cb7f2b](https://github.com/fable-compiler/Fable/commit/f3cb7f2bfc9e46e558763867d6c1ba323bcf281c))
+* *(js/ts)* Observable/Event dropping null/undefined/unit values (#4742) ([75bff73b](https://github.com/fable-compiler/Fable/commit/75bff73be3743fe0af37f99c541b10f6978150f3))
+* *(js/ts)* EndsWith regression for empty pattern with non-ordinal comparison ([7793ed7b](https://github.com/fable-compiler/Fable/commit/7793ed7b0fc1f33bf3da6c0ea31607e172726267))
+* *(js/ts/python)* Quote strings with the %A format specifier (#4749) ([75321f3b](https://github.com/fable-compiler/Fable/commit/75321f3b2cb70ea345a0a45d6343cbb6e0de466f))
+* *(ts/js)* `Regex.Replace` count/substitutions and `Regex.Split` semantics (#4741) ([d6ae6bd3](https://github.com/fable-compiler/Fable/commit/d6ae6bd3790b57b31941a118cdffaeb6a59155c3))
+
+<strong><small>[View changes on Github](https://github.com/fable-compiler/Fable/compare/7f915f1dd66b9a5fbbd56f858b07d39b98519b65..d6ae6bd3790b57b31941a118cdffaeb6a59155c3)</small></strong>
+
+## 2.4.0 - 2026-07-05
+
+### 🚀 Features
+
+* *(js/ts)* Add `System.IO.Path` and `System.IO.File` API support ([ec99fac5](https://github.com/fable-compiler/Fable/commit/ec99fac5fd7a9428ee54f66f878ef4edad0904cb))
+* *(js/ts/python)* Add Environment and Console.Error support ([6e082f95](https://github.com/fable-compiler/Fable/commit/6e082f955140676da3388a43b55378ea4ad20f1c))
+
+### 🐞 Bug Fixes
+
+* *(js/ts)* DateTime.ToString() and %A are now consistent across all DateTimeKind values (#4714) ([de98b0e4](https://github.com/fable-compiler/Fable/commit/de98b0e466c8824b0ba8b941d20efae70d232abb))
+
+<strong><small>[View changes on Github](https://github.com/fable-compiler/Fable/compare/c977d78b39225a51c7bd051a1fe363ed0ccbe201..7f915f1dd66b9a5fbbd56f858b07d39b98519b65)</small></strong>
+
+## 2.3.0 - 2026-06-30
+
+### 🚀 Features
+
+* *(js/ts)* Map task { } to Promise<T> ([97f54d36](https://github.com/fable-compiler/Fable/commit/97f54d3692e5ba881c249b289c20b4fad5ac27e2))
+* *(js/ts/python/beam)* Add support for `Async.AwaitEvent` (#4693) ([71c98179](https://github.com/fable-compiler/Fable/commit/71c981792b6ff99cd417bb2e70a13a9d55ed72cf))
+
+### 🐞 Bug Fixes
+
+* *(js)* Respect StringComparison in String.IndexOf/LastIndexOf (#4681) ([7cb92d52](https://github.com/fable-compiler/Fable/commit/7cb92d522e5dc8dfe51351565504c59a94c2f408))
+* *(js/ts)* Int list is not a union type (#4698) ([ecbecbe7](https://github.com/fable-compiler/Fable/commit/ecbecbe756610fd83a621c005e97eda92bbc332a))
+* *(js/ts)* Pass TypeInfo to getRecordFields to handle None fields in anonymous records (#4704) ([c977d78b](https://github.com/fable-compiler/Fable/commit/c977d78b39225a51c7bd051a1fe363ed0ccbe201))
+* *(ts)* Widen isEnumDefined value parameter to accept any value (#4690) ([0d6498dd](https://github.com/fable-compiler/Fable/commit/0d6498ddf65e0e18918690633da23b04b78479f6))
+
+<strong><small>[View changes on Github](https://github.com/fable-compiler/Fable/compare/c9b3ee2429a4688946c1936e27df730837428070..c977d78b39225a51c7bd051a1fe363ed0ccbe201)</small></strong>
+
+## 2.2.0 - 2026-06-24
+
+### 🚀 Features
+
+* *(all)* Support Exception.InnerException across all targets (#4677) ([c9b3ee24](https://github.com/fable-compiler/Fable/commit/c9b3ee2429a4688946c1936e27df730837428070))
+
+<strong><small>[View changes on Github](https://github.com/fable-compiler/Fable/compare/15eb83ed36657f75073fb0e1b4cac677e24fc9bb..c9b3ee2429a4688946c1936e27df730837428070)</small></strong>
+
 ## 2.1.1 - 2026-06-10
 
 ### 🐞 Bug Fixes

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

@@ -478,7 +478,7 @@ function dateToString_Y(date) {
 function dateToStringWithKind(date, format) {
     const utc = date.kind === DateTimeKind.Utc;
     if (typeof format !== "string") {
-        return utc ? date.toUTCString() : date.toLocaleString();
+        return dateToString_d(date) + " " + dateToString_T(date);
     }
     else if (format.length === 1) {
         switch (format) {
@@ -595,7 +595,10 @@ export function parseRaw(input) {
                         parseInt(timeParts[1] || "0", 10) * 60 +
                         parseFloat(timeParts[2] || "0");
                 if (m[3] != null && m[3].toUpperCase() === "PM" && hourPart < 12) {
-                    timeInSeconds += 720;
+                    timeInSeconds += 12 * 3600;
+                }
+                else if (m[3] != null && m[3].toUpperCase() === "AM" && hourPart === 12) {
+                    timeInSeconds -= 12 * 3600;
                 }
             }
             if (m[4] != null) { // There's an offset, parse as UTC
@@ -784,19 +787,9 @@ export function addYears(d, v) {
     return create(newYear, newMonth, newDay, hour(d), minute(d), second(d), millisecond(d), d.kind);
 }
 export function addMonths(d, v) {
-    let newMonth = month(d) + v;
-    let newMonth_ = 0;
-    let yearOffset = 0;
-    if (newMonth > 12) {
-        newMonth_ = newMonth % 12;
-        yearOffset = Math.floor(newMonth / 12);
-        newMonth = newMonth_;
-    }
-    else if (newMonth < 1) {
-        newMonth_ = 12 + newMonth % 12;
-        yearOffset = Math.floor(newMonth / 12) + (newMonth_ === 12 ? -1 : 0);
-        newMonth = newMonth_;
-    }
+    const totalMonths = month(d) + v;
+    const newMonth = ((totalMonths - 1) % 12 + 12) % 12 + 1;
+    const yearOffset = Math.floor((totalMonths - 1) / 12);
     const newYear = year(d) + yearOffset;
     const _daysInMonth = daysInMonth(newYear, newMonth);
     const newDay = Math.min(_daysInMonth, day(d));

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

@@ -203,27 +203,18 @@ export function addTicks(d, v) {
     return add(d, toFloat64(v / 10000n));
 }
 export function addYears(d, v) {
-    const newMonth = d.getUTCMonth() + 1;
-    const newYear = d.getUTCFullYear() + v;
+    const d2 = new Date(d.getTime() + offset(d));
+    const newMonth = d2.getUTCMonth() + 1;
+    const newYear = d2.getUTCFullYear() + v;
     const _daysInMonth = daysInMonth(newYear, newMonth);
-    const newDay = Math.min(_daysInMonth, d.getUTCDate());
-    return create(newYear, newMonth, newDay, d.getUTCHours(), d.getUTCMinutes(), d.getUTCSeconds(), d.getUTCMilliseconds(), offset(d));
+    const newDay = Math.min(_daysInMonth, d2.getUTCDate());
+    return create(newYear, newMonth, newDay, d2.getUTCHours(), d2.getUTCMinutes(), d2.getUTCSeconds(), d2.getUTCMilliseconds(), offset(d));
 }
 export function addMonths(d, v) {
     const d2 = new Date(d.getTime() + offset(d));
-    let newMonth = d2.getUTCMonth() + 1 + v;
-    let newMonth_ = 0;
-    let yearOffset = 0;
-    if (newMonth > 12) {
-        newMonth_ = newMonth % 12;
-        yearOffset = Math.floor(newMonth / 12);
-        newMonth = newMonth_;
-    }
-    else if (newMonth < 1) {
-        newMonth_ = 12 + newMonth % 12;
-        yearOffset = Math.floor(newMonth / 12) + (newMonth_ === 12 ? -1 : 0);
-        newMonth = newMonth_;
-    }
+    const totalMonths = d2.getUTCMonth() + 1 + v;
+    const newMonth = ((totalMonths - 1) % 12 + 12) % 12 + 1;
+    const yearOffset = Math.floor((totalMonths - 1) / 12);
     const newYear = d2.getUTCFullYear() + yearOffset;
     const _daysInMonth = daysInMonth(newYear, newMonth);
     const newDay = Math.min(_daysInMonth, d2.getUTCDate());

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

@@ -0,0 +1,11 @@
+// This library doesn't depend on @types/node (to stay browser-compatible),
+// so this Node.js built-in import can't be type-checked; the exported
+// functions below still declare their own types for callers to rely on.
+// @ts-ignore
+import { existsSync, mkdirSync, statSync } from "node:fs";
+export function exists(path) {
+    return existsSync(path) && statSync(path).isDirectory();
+}
+export function createDirectory(path) {
+    mkdirSync(path, { recursive: true });
+}

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

@@ -31,15 +31,21 @@ export function isInfinity(x) {
     return x === Number.POSITIVE_INFINITY || x === Number.NEGATIVE_INFINITY;
 }
 export function max(x, y) {
-    return x > y ? x : y;
+    return Math.max(x, y);
 }
 export function min(x, y) {
-    return x < y ? x : y;
+    return Math.min(x, y);
 }
 export function maxMagnitude(x, y) {
+    if (Number.isNaN(x) || Number.isNaN(y)) {
+        return NaN;
+    }
     return Math.abs(x) > Math.abs(y) ? x : y;
 }
 export function minMagnitude(x, y) {
+    if (Number.isNaN(x) || Number.isNaN(y)) {
+        return NaN;
+    }
     return Math.abs(x) < Math.abs(y) ? x : y;
 }
 export function clamp(x, min, max) {

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

@@ -0,0 +1,3 @@
+export function getEnvironmentVariable(name) {
+    return process.env[name];
+}

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

@@ -18,8 +18,17 @@ export class Event$2 {
         return createEvent(h => { this._add(h); }, h => { this._remove(h); });
     }
     Trigger(senderOrValue, valueOrUndefined) {
+        // Disambiguate the overloads by arity, not by value: a two-argument call may
+        // legitimately pass `undefined` as the event value (e.g. unit events).
         let sender = null;
-        const value = valueOrUndefined === undefined ? senderOrValue : (sender = senderOrValue, valueOrUndefined);
+        let value;
+        if (arguments.length <= 1) {
+            value = senderOrValue;
+        }
+        else {
+            sender = senderOrValue;
+            value = valueOrUndefined;
+        }
         this.delegates.forEach(f => { f(sender, value); });
     }
 }

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

@@ -0,0 +1,27 @@
+// This library doesn't depend on @types/node (to stay browser-compatible),
+// so this Node.js built-in import can't be type-checked; the exported
+// functions below still declare their own types for callers to rely on.
+// @ts-ignore
+import { readFileSync, writeFileSync } from "node:fs";
+// byte[] is represented as a plain JS/TS array of numbers, not a typed array
+// (see e.g. BitConverter.ts), so convert the Buffer returned by readFileSync.
+export function readAllBytes(path) {
+    return Array.from(readFileSync(path));
+}
+export function readAllLines(path) {
+    const lines = readFileSync(path, "utf8").split(/\r\n|\r|\n/);
+    if (lines[lines.length - 1] === "") {
+        lines.pop();
+    }
+    return lines;
+}
+export function readAllText(path) {
+    return readFileSync(path, "utf8");
+}
+export function writeAllBytes(path, bytes) {
+    // Convert back from the plain array representation to a typed array Node's fs accepts.
+    writeFileSync(path, Uint8Array.from(bytes));
+}
+export function writeAllLines(path, lines) {
+    writeFileSync(path, lines.join("\n"));
+}

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

@@ -1,7 +1,6 @@
-import { join } from "./String.js";
+import { isArrayLike, Exception, defaultOf, toIterator, compare, structuralHash, equals, disposeSafe, getEnumerator } from "./Util.js";
+import { Record, toString } from "./Types.js";
 import { defaultArg, some, value as value_1 } from "./Option.js";
-import { disposeSafe, isArrayLike, Exception, defaultOf, toIterator, getEnumerator, compare, structuralHash, equals } from "./Util.js";
-import { Record } from "./Types.js";
 import { class_type, record_type, option_type } from "./Reflection.js";
 import { SR_inputSequenceTooLong, SR_inputSequenceEmpty, SR_inputMustBeNonNegative, SR_notEnoughElements, SR_differentLengths, SR_keyNotFoundAlt, SR_indexOutOfBounds, SR_inputWasEmpty } from "./Global.js";
 import { KeyNotFoundException_$ctor_Z721C83C5 } from "./System.Collections.Generic.js";
@@ -15,7 +14,21 @@ export class FSharpList extends Record {
     }
     toString() {
         const xs = this;
-        return ("[" + join("; ", xs)) + "]";
+        let result = "[";
+        let first = true;
+        const enumerator = getEnumerator(xs);
+        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 + "]";
     }
     Equals(other) {
         const xs = this;
@@ -222,7 +235,7 @@ export function FSharpList__get_Head(xs) {
         return xs.head;
     }
     else {
-        throw new Exception((SR_inputWasEmpty + "\\nParameter name: ") + "list");
+        throw new Exception(SR_inputWasEmpty + " (Parameter \'list\')");
     }
 }
 export function FSharpList__get_Tail(xs) {
@@ -231,7 +244,7 @@ export function FSharpList__get_Tail(xs) {
         return value_1(matchValue);
     }
     else {
-        throw new Exception((SR_inputWasEmpty + "\\nParameter name: ") + "list");
+        throw new Exception(SR_inputWasEmpty + " (Parameter \'list\')");
     }
 }
 export function FSharpList__get_Item_Z524259A4(xs, index) {
@@ -240,17 +253,18 @@ export function FSharpList__get_Item_Z524259A4(xs, index) {
             const i = i_mut, xs_1 = xs_1_mut;
             const matchValue = xs_1.tail;
             if (matchValue != null) {
+                const t = value_1(matchValue);
                 if (i === index) {
                     return xs_1.head;
                 }
                 else {
                     i_mut = (i + 1);
-                    xs_1_mut = value_1(matchValue);
+                    xs_1_mut = t;
                     continue loop;
                 }
             }
             else {
-                throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+                throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
             }
             break;
         }
@@ -926,7 +940,7 @@ export function exists2(f_mut, xs_mut, ys_mut) {
                     continue exists2;
                 }
             default:
-                throw new Exception((SR_differentLengths + "\\nParameter name: ") + "list2");
+                throw new Exception(SR_differentLengths + " (Parameter \'list2\')");
         }
         break;
     }
@@ -1021,7 +1035,7 @@ export function skip(count_mut, xs_mut) {
             return xs;
         }
         else if (FSharpList__get_IsEmpty(xs)) {
-            throw new Exception((SR_notEnoughElements + "\\nParameter name: ") + "list");
+            throw new Exception(SR_notEnoughElements + " (Parameter \'list\')");
         }
         else {
             count_mut = (count - 1);
@@ -1050,7 +1064,7 @@ export function skipWhile(predicate_mut, xs_mut) {
 }
 export function take(count, xs) {
     if (count < 0) {
-        throw new Exception((SR_inputMustBeNonNegative + "\\nParameter name: ") + "count");
+        throw new Exception(SR_inputMustBeNonNegative + " (Parameter \'count\')");
     }
     const loop = (i_mut, acc_mut, xs_1_mut) => {
         loop: while (true) {
@@ -1060,7 +1074,7 @@ export function take(count, xs) {
                 return acc;
             }
             else if (FSharpList__get_IsEmpty(xs_1)) {
-                throw new Exception((SR_notEnoughElements + "\\nParameter name: ") + "list");
+                throw new Exception(SR_notEnoughElements + " (Parameter \'list\')");
             }
             else {
                 i_mut = (i - 1);
@@ -1145,22 +1159,22 @@ export function getSlice(startIndex, endIndex, xs) {
 }
 export function splitAt(index, xs) {
     if (index < 0) {
-        throw new Exception((SR_inputMustBeNonNegative + "\\nParameter name: ") + "index");
+        throw new Exception(SR_inputMustBeNonNegative + " (Parameter \'index\')");
     }
     if (index > FSharpList__get_Length(xs)) {
-        throw new Exception((SR_notEnoughElements + "\\nParameter name: ") + "index");
+        throw new Exception(SR_notEnoughElements + " (Parameter \'index\')");
     }
     return [take(index, xs), skip(index, xs)];
 }
 export function exactlyOne(xs) {
     if (FSharpList__get_IsEmpty(xs)) {
-        throw new Exception((SR_inputSequenceEmpty + "\\nParameter name: ") + "list");
+        throw new Exception(SR_inputSequenceEmpty + " (Parameter \'list\')");
     }
     else if (FSharpList__get_IsEmpty(FSharpList__get_Tail(xs))) {
         return FSharpList__get_Head(xs);
     }
     else {
-        throw new Exception((SR_inputSequenceTooLong + "\\nParameter name: ") + "list");
+        throw new Exception(SR_inputSequenceTooLong + " (Parameter \'list\')");
     }
 }
 export function tryExactlyOne(xs) {
@@ -1200,7 +1214,7 @@ export function insertAt(index, y, xs) {
         }
     }, FSharpList_get_Empty(), xs);
     return reverse(isDone ? result : (((i + 1) === index) ? FSharpList_Cons_305B8EAC(y, result) : (() => {
-        throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+        throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
     })()));
 }
 export function insertManyAt(index, ys, xs) {
@@ -1218,7 +1232,7 @@ export function insertManyAt(index, ys, xs) {
         }
     }, FSharpList_get_Empty(), xs);
     return reverse(isDone ? result : (((i + 1) === index) ? append(ys_1, result) : (() => {
-        throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+        throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
     })()));
 }
 export function removeAt(index, xs) {
@@ -1235,7 +1249,7 @@ export function removeAt(index, xs) {
         }
     }, xs);
     if (!isDone) {
-        throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+        throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
     }
     return ys;
 }
@@ -1263,7 +1277,7 @@ export function removeManyAt(index, count, xs) {
     }, xs);
     const status_1 = (((status === 0) && ((i + 1) === (index + count))) ? 1 : status) | 0;
     if (status_1 < 1) {
-        throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + ((status_1 < 0) ? "index" : "count"));
+        throw new Exception(SR_indexOutOfBounds + ((" (Parameter \'" + ((status_1 < 0) ? "index" : "count")) + "\')"));
     }
     return ys;
 }
@@ -1279,7 +1293,7 @@ export function updateAt(index, y, xs) {
         }
     }, xs);
     if (!isDone) {
-        throw new Exception((SR_indexOutOfBounds + "\\nParameter name: ") + "index");
+        throw new Exception(SR_indexOutOfBounds + " (Parameter \'index\')");
     }
     return ys;
 }

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

@@ -0,0 +1,38 @@
+import { getPrefix, isValid } from "./Int32.js";
+import { fromString } from "./BigInt.js";
+import { Exception } from "./Util.js";
+function getRange(unsigned, bitsize) {
+    switch (bitsize) {
+        case 64: return unsigned ?
+            [0n, 18446744073709551615n] :
+            [-9223372036854775808n, 9223372036854775807n];
+        default: throw new Exception("Invalid bit size.");
+    }
+}
+export function parse(str, style, unsigned, bitsize, radix) {
+    const res = isValid(str, style, radix);
+    if (res != null) {
+        let v = fromString(getPrefix(res.radix) + res.digits);
+        if (res.sign === "-") {
+            v = -v;
+        }
+        const [umin, umax] = getRange(true, bitsize);
+        if (!unsigned && res.radix !== 10 && v >= umin && v <= umax) {
+            v = BigInt.asIntN(bitsize, v);
+        }
+        const [min, max] = getRange(unsigned, bitsize);
+        if (v >= min && v <= max) {
+            return v;
+        }
+    }
+    throw new Exception(`The input string ${str} was not in a correct format.`);
+}
+export function tryParse(str, style, unsigned, bitsize, defValue) {
+    try {
+        defValue.contents = parse(str, style, unsigned, bitsize);
+        return true;
+    }
+    catch {
+        return false;
+    }
+}

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

@@ -27,7 +27,9 @@ class MailboxQueue {
             else {
                 delete this.firstAndLast;
             }
-            return value;
+            // Wrap the value so falsy messages (0, false, "", null, undefined/unit)
+            // can be distinguished from an empty queue.
+            return { value };
         }
         return void 0;
     }
@@ -41,11 +43,11 @@ export class MailboxProcessor {
 }
 function __processEvents($this) {
     if ($this.continuation) {
-        const value = $this.messages.tryGet();
-        if (value) {
+        const dequeued = $this.messages.tryGet();
+        if (dequeued !== void 0) {
             const cont = $this.continuation;
             delete $this.continuation;
-            cont(value);
+            cont(dequeued.value);
         }
     }
 }
@@ -67,15 +69,19 @@ export function post($this, message) {
 }
 export function postAndAsyncReply($this, buildMessage) {
     let result;
+    // Use an explicit flag because the reply value itself may be undefined
+    // (e.g. AsyncReplyChannel<unit>), which must still complete the async.
+    let replied = false;
     let continuation;
     function checkCompletion() {
-        if (result !== void 0 && continuation !== void 0) {
+        if (replied && continuation !== void 0) {
             continuation(result);
         }
     }
     const reply = {
         reply: (res) => {
             result = res;
+            replied = true;
             checkCompletion();
         },
     };

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

@@ -702,11 +702,15 @@ export function MapTreeModule_foldSectionOpt(comparer, lo, hi, f, m, x) {
                         return x_3;
                     }
                 }
-                else if ((comparer.Compare(lo, MapTreeLeaf$2__get_Key(m2)) <= 0) && (comparer.Compare(MapTreeLeaf$2__get_Key(m2), hi) <= 0)) {
-                    return f_1(MapTreeLeaf$2__get_Key(m2), MapTreeLeaf$2__get_Value(m2), x_1);
-                }
                 else {
-                    return x_1;
+                    const cLoKey_1 = comparer.Compare(lo, MapTreeLeaf$2__get_Key(m2)) | 0;
+                    const cKeyHi_1 = comparer.Compare(MapTreeLeaf$2__get_Key(m2), hi) | 0;
+                    if ((cLoKey_1 <= 0) && (cKeyHi_1 <= 0)) {
+                        return f_1(MapTreeLeaf$2__get_Key(m2), MapTreeLeaf$2__get_Value(m2), x_1);
+                    }
+                    else {
+                        return x_1;
+                    }
                 }
             }
             else {

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

@@ -272,7 +272,7 @@ export function Dictionary__set_Item_5BDDA1(this$, k, v) {
             setItem(getItemFromDict(this$.hashMap, matchValue[1]), matchValue[2], [k, v]);
         }
         else {
-            const value = void (getItemFromDict(this$.hashMap, matchValue[1]).push([k, v]));
+            void (getItemFromDict(this$.hashMap, matchValue[1]).push([k, v]));
         }
     }
     else {
@@ -286,7 +286,7 @@ export function Dictionary__Add_5BDDA1(this$, k, v) {
             throw ArgumentException_$ctor_Z721C83C5(format("An item with the same key has already been added. Key: {0}", k));
         }
         else {
-            const value = void (getItemFromDict(this$.hashMap, matchValue[1]).push([k, v]));
+            void (getItemFromDict(this$.hashMap, matchValue[1]).push([k, v]));
         }
     }
     else {

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

@@ -178,7 +178,7 @@ export function HashSet__Add_2B595(this$, k) {
             return false;
         }
         else {
-            const value = void (getItemFromDict(this$.hashMap, matchValue[1]).push(k));
+            void (getItemFromDict(this$.hashMap, matchValue[1]).push(k));
             return true;
         }
     }

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

@@ -1,5 +1,5 @@
 import { Choice_tryValueIfChoice1Of2, Choice_tryValueIfChoice2Of2 } from "./Choice.js";
-import { value } from "./Option.js";
+import { some, value } from "./Option.js";
 export class Observer {
     constructor(onNext, onError, onCompleted) {
         this.OnNext = onNext;
@@ -29,7 +29,7 @@ export function choose(chooser, source) {
     } }, observer.OnError), observer.OnError, observer.OnCompleted)));
 }
 export function filter(predicate, source) {
-    return choose((x) => predicate(x) ? x : void 0, source);
+    return choose((x) => predicate(x) ? some(x) : undefined, source);
 }
 export function map(mapping, source) {
     return new Observable((observer) => source.Subscribe(new Observer((t) => {
@@ -84,11 +84,13 @@ export function merge(source1, source2) {
 export function pairwise(source) {
     return new Observable((observer) => {
         let last;
+        let haveLast = false;
         return source.Subscribe(new Observer((next) => {
-            if (last != null) {
+            if (haveLast) {
                 observer.OnNext([last, next]);
             }
             last = next;
+            haveLast = true;
         }, observer.OnError, observer.OnCompleted));
     });
 }

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

@@ -70,30 +70,13 @@ export function toArray(opt) {
 export function defaultArg(opt, defaultValue) {
     return (opt != null) ? value(opt) : defaultValue;
 }
-export function defaultArgWith(opt, defThunk) {
-    return (opt != null) ? value(opt) : defThunk();
-}
 export function orElse(opt, ifNone) {
     return opt == null ? ifNone : opt;
 }
-export function orElseWith(opt, ifNoneThunk) {
-    return opt == null ? ifNoneThunk() : opt;
-}
-export function filter(predicate, opt) {
-    return (opt != null) ? (predicate(value(opt)) ? opt : undefined) : opt;
-}
+// Only used by Replacements.Util.fs's curry/uncurry helpers, not by `Option.map` itself.
 export function map(mapping, opt) {
     return (opt != null) ? some(mapping(value(opt))) : undefined;
 }
-export function map2(mapping, opt1, opt2) {
-    return (opt1 != null && opt2 != null) ? mapping(value(opt1), value(opt2)) : undefined;
-}
-export function map3(mapping, opt1, opt2, opt3) {
-    return (opt1 != null && opt2 != null && opt3 != null) ? mapping(value(opt1), value(opt2), value(opt3)) : undefined;
-}
-export function bind(binder, opt) {
-    return opt != null ? binder(value(opt)) : undefined;
-}
 export function tryOp(op, arg) {
     try {
         return some(op(arg));