@nfdi4plants/arctrl 1.1.0 → 2.0.0-alpha.1

package/fable_modules/fable-library-js.4.16.0/CHANGELOG.md

@@ -0,0 +1,47 @@
+# Changelog
+
+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).
+
+## Unreleased
+
+## 1.4.0 - 2024-03-18
+
+### Added
+
+* [JS/TS] Add `ConditionalWeakTable` (by @chkn)
+
+## 1.3.0 - 2024-03-18
+
+* [JS/TS] `Boolean.tryParse` should not crash on `null` string (@goswinr)
+
+## 1.2.0 - 2024-03-01
+
+### Fixed
+
+* [GH-3772](https://github.com/fable-compiler/Fable/pull/3772) [JS/TS] Re-implement `DateTime.ToString` custom format handling (by @MangelMaxime)
+
+    It now supports all custom format specifiers, and behave as if `CultureInfo.InvariantCulture` was used (Fable does not support Globalization).
+
+## 1.1.0 - 2024-02-20
+
+### Added
+
+#### JavaScript
+
+* [GH-3759](https://github.com/fable-compiler/Fable/issues/3759) Add `StringBuilder.Chars` (by @MangelMaxime)
+* Add `StringBuilder.AppendFormat` (by @ncave)
+* [GH-3748](https://github.com/fable-compiler/Fable/pull/3748) Add `Array.getItem` and `Array.setItem` (by @MangelMaxime)
+
+## 1.0.0 - 2024-02-13
+
+* Release stable version
+
+## 1.0.0-beta-001 - 2024-02-12
+
+### Changed
+
+* Separate `Result` from `Choice`
+* Released as part of Fable 4.12.0

package/fable_modules/{fable-library.4.5.0 → fable-library-js.4.16.0}/Choice.d.ts

@@ -1,23 +1,6 @@
 import { Union } from "./Types.js";
 import { TypeInfo } from "./Reflection.js";
 import { Option } from "./Option.js";
-export type FSharpResult$2_$union<T, TError> = FSharpResult$2<T, TError, 0> | FSharpResult$2<T, TError, 1>;
-export type FSharpResult$2_$cases<T, TError> = {
-    0: ["Ok", [T]];
-    1: ["Error", [TError]];
-};
-export declare function FSharpResult$2_Ok<T, TError>(ResultValue: T): FSharpResult$2<T, TError, 0>;
-export declare function FSharpResult$2_Error<T, TError>(ErrorValue: TError): FSharpResult$2<T, TError, 1>;
-export declare class FSharpResult$2<T, TError, Tag extends keyof FSharpResult$2_$cases<T, TError>> extends Union<Tag, FSharpResult$2_$cases<T, TError>[Tag][0]> {
-    readonly tag: Tag;
-    readonly fields: FSharpResult$2_$cases<T, TError>[Tag][1];
-    constructor(tag: Tag, fields: FSharpResult$2_$cases<T, TError>[Tag][1]);
-    cases(): string[];
-}
-export declare function FSharpResult$2_$reflection(gen0: TypeInfo, gen1: TypeInfo): TypeInfo;
-export declare function Result_Map<a, b, c>(mapping: ((arg0: a) => b), result: FSharpResult$2_$union<a, c>): FSharpResult$2_$union<b, c>;
-export declare function Result_MapError<a, b, c>(mapping: ((arg0: a) => b), result: FSharpResult$2_$union<c, a>): FSharpResult$2_$union<c, b>;
-export declare function Result_Bind<a, b, c>(binder: ((arg0: a) => FSharpResult$2_$union<b, c>), result: FSharpResult$2_$union<a, c>): FSharpResult$2_$union<b, c>;
 export type FSharpChoice$2_$union<T1, T2> = FSharpChoice$2<T1, T2, 0> | FSharpChoice$2<T1, T2, 1>;
 export type FSharpChoice$2_$cases<T1, T2> = {
     0: ["Choice1Of2", [T1]];

package/fable_modules/{fable-library.4.5.0 → fable-library-js.4.16.0}/Choice.js

@@ -1,49 +1,6 @@
 import { Union } from "./Types.js";
 import { union_type } from "./Reflection.js";
 import { some } from "./Option.js";
-export function FSharpResult$2_Ok(ResultValue) {
-    return new FSharpResult$2(0, [ResultValue]);
-}
-export function FSharpResult$2_Error(ErrorValue) {
-    return new FSharpResult$2(1, [ErrorValue]);
-}
-export class FSharpResult$2 extends Union {
-    constructor(tag, fields) {
-        super();
-        this.tag = tag;
-        this.fields = fields;
-    }
-    cases() {
-        return ["Ok", "Error"];
-    }
-}
-export function FSharpResult$2_$reflection(gen0, gen1) {
-    return union_type("FSharp.Core.FSharpResult`2", [gen0, gen1], FSharpResult$2, () => [[["ResultValue", gen0]], [["ErrorValue", gen1]]]);
-}
-export function Result_Map(mapping, result) {
-    if (result.tag === /* Ok */ 0) {
-        return FSharpResult$2_Ok(mapping(result.fields[0]));
-    }
-    else {
-        return FSharpResult$2_Error(result.fields[0]);
-    }
-}
-export function Result_MapError(mapping, result) {
-    if (result.tag === /* Ok */ 0) {
-        return FSharpResult$2_Ok(result.fields[0]);
-    }
-    else {
-        return FSharpResult$2_Error(mapping(result.fields[0]));
-    }
-}
-export function Result_Bind(binder, result) {
-    if (result.tag === /* Ok */ 0) {
-        return binder(result.fields[0]);
-    }
-    else {
-        return FSharpResult$2_Error(result.fields[0]);
-    }
-}
 export function FSharpChoice$2_Choice1Of2(Item) {
     return new FSharpChoice$2(0, [Item]);
 }

package/fable_modules/fable-library-js.4.16.0/ConditionalWeakTable.d.ts

@@ -0,0 +1,9 @@
+export declare class ConditionalWeakTable<TKey extends object, TValue> {
+    private weakMap;
+    delete(key: TKey): boolean;
+    get(key: TKey): TValue | undefined;
+    has(key: TKey): boolean;
+    set(key: TKey, value: TValue): WeakMap<TKey, TValue>;
+    clear(): void;
+}
+export default ConditionalWeakTable;

package/fable_modules/fable-library-js.4.16.0/ConditionalWeakTable.js

@@ -0,0 +1,21 @@
+export class ConditionalWeakTable {
+    constructor() {
+        this.weakMap = new WeakMap();
+    }
+    delete(key) {
+        return this.weakMap.delete(key);
+    }
+    get(key) {
+        return this.weakMap.get(key);
+    }
+    has(key) {
+        return this.weakMap.has(key);
+    }
+    set(key, value) {
+        return this.weakMap.set(key, value);
+    }
+    clear() {
+        this.weakMap = new WeakMap();
+    }
+}
+export default ConditionalWeakTable;

package/fable_modules/{fable-library.4.5.0 → fable-library-js.4.16.0}/Date.js

@@ -9,6 +9,342 @@
  */
 import { toInt64, toFloat64 } from "./BigInt.js";
 import { compareDates, dateOffset, padWithZeros } from "./Util.js";
+const shortDays = [
+    "Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"
+];
+const longDays = [
+    "Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday"
+];
+const shortMonths = [
+    "Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"
+];
+const longMonths = [
+    "January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December"
+];
+function parseRepeatToken(format, pos, patternChar) {
+    let tokenLength = 0;
+    let internalPos = pos;
+    while (internalPos < format.length && format[internalPos] === patternChar) {
+        internalPos++;
+        tokenLength++;
+    }
+    return tokenLength;
+}
+function parseNextChar(format, pos) {
+    if (pos >= format.length - 1) {
+        return -1;
+    }
+    return format.charCodeAt(pos + 1);
+}
+function parseQuotedString(format, pos) {
+    let beginPos = pos;
+    // Get the character used to quote the string
+    const quoteChar = format[pos];
+    let result = "";
+    let foundQuote = false;
+    while (pos < format.length) {
+        pos++;
+        const currentChar = format[pos];
+        if (currentChar === quoteChar) {
+            foundQuote = true;
+            break;
+        }
+        else if (currentChar === "\\") {
+            if (pos < format.length) {
+                pos++;
+                result += format[pos];
+            }
+            else {
+                // This means that '\' is the last character in the string.
+                throw new Error("Invalid string format");
+            }
+        }
+        else {
+            result += currentChar;
+        }
+    }
+    if (!foundQuote) {
+        // We could not find the matching quote
+        throw new Error(`Invalid string format could not find matching quote for ${quoteChar}`);
+    }
+    return [result, pos - beginPos + 1];
+}
+function dateToStringWithCustomFormat(date, format, utc) {
+    let cursorPos = 0;
+    let tokenLength = 0;
+    let result = "";
+    const localizedDate = utc ? DateTime(date.getTime(), 1 /* DateKind.UTC */) : date;
+    while (cursorPos < format.length) {
+        const token = format[cursorPos];
+        switch (token) {
+            case "d":
+                tokenLength = parseRepeatToken(format, cursorPos, "d");
+                cursorPos += tokenLength;
+                switch (tokenLength) {
+                    case 1:
+                        result += localizedDate.getDate();
+                        break;
+                    case 2:
+                        result += padWithZeros(localizedDate.getDate(), 2);
+                        break;
+                    case 3:
+                        result += shortDays[dayOfWeek(localizedDate)];
+                        break;
+                    case 4:
+                        result += longDays[dayOfWeek(localizedDate)];
+                        break;
+                    default:
+                        break;
+                }
+                break;
+            case "f":
+                tokenLength = parseRepeatToken(format, cursorPos, "f");
+                cursorPos += tokenLength;
+                if (tokenLength <= 3) {
+                    const precision = 10 ** (3 - tokenLength);
+                    result += padWithZeros(Math.floor(millisecond(localizedDate) / precision), tokenLength);
+                }
+                else if (tokenLength <= 7) {
+                    // JavaScript Date only support precision to the millisecond
+                    // so we fill the rest of the precision with 0 as if the date didn't have
+                    // milliseconds provided to it.
+                    // This is to have the same behavior as .NET when doing:
+                    // DateTime(1, 2, 3, 4, 5, 6, DateTimeKind.Utc).ToString("fffff") => 00000
+                    result += ("" + millisecond(localizedDate)).padEnd(tokenLength, "0");
+                }
+                break;
+            case "F":
+                tokenLength = parseRepeatToken(format, cursorPos, "F");
+                cursorPos += tokenLength;
+                if (tokenLength <= 3) {
+                    const precision = 10 ** (3 - tokenLength);
+                    const value = Math.floor(millisecond(localizedDate) / precision);
+                    if (value != 0) {
+                        result += padWithZeros(value, tokenLength);
+                    }
+                }
+                else if (tokenLength <= 7) {
+                    // JavaScript Date only support precision to the millisecond
+                    // so we can't go beyond that.
+                    // We also need to pad start with 0 if the value is not 0
+                    const value = millisecond(localizedDate);
+                    if (value != 0) {
+                        result += padWithZeros(value, 3);
+                    }
+                }
+                break;
+            case "g":
+                tokenLength = parseRepeatToken(format, cursorPos, "g");
+                cursorPos += tokenLength;
+                if (tokenLength <= 2) {
+                    result += "A.D.";
+                }
+                break;
+            case "h":
+                tokenLength = parseRepeatToken(format, cursorPos, "h");
+                cursorPos += tokenLength;
+                switch (tokenLength) {
+                    case 1:
+                        result += hour(localizedDate) % 12;
+                        break;
+                    case 2:
+                        result += padWithZeros(hour(localizedDate) % 12, 2);
+                        break;
+                    default:
+                        break;
+                }
+                break;
+            case "H":
+                tokenLength = parseRepeatToken(format, cursorPos, "H");
+                cursorPos += tokenLength;
+                switch (tokenLength) {
+                    case 1:
+                        result += hour(localizedDate);
+                        break;
+                    case 2:
+                        result += padWithZeros(hour(localizedDate), 2);
+                        break;
+                    default:
+                        break;
+                }
+                break;
+            case "K":
+                tokenLength = parseRepeatToken(format, cursorPos, "K");
+                cursorPos += tokenLength;
+                switch (tokenLength) {
+                    case 1:
+                        switch (kind(localizedDate)) {
+                            case 1 /* DateKind.UTC */:
+                                result += "Z";
+                                break;
+                            case 2 /* DateKind.Local */:
+                                result += dateOffsetToString(localizedDate.getTimezoneOffset() * -60000);
+                                break;
+                            case 0 /* DateKind.Unspecified */:
+                                break;
+                        }
+                        break;
+                    default:
+                        break;
+                }
+                break;
+            case "m":
+                tokenLength = parseRepeatToken(format, cursorPos, "m");
+                cursorPos += tokenLength;
+                switch (tokenLength) {
+                    case 1:
+                        result += minute(localizedDate);
+                        break;
+                    case 2:
+                        result += padWithZeros(minute(localizedDate), 2);
+                        break;
+                    default:
+                        break;
+                }
+                break;
+            case "M":
+                tokenLength = parseRepeatToken(format, cursorPos, "M");
+                cursorPos += tokenLength;
+                switch (tokenLength) {
+                    case 1:
+                        result += month(localizedDate);
+                        break;
+                    case 2:
+                        result += padWithZeros(month(localizedDate), 2);
+                        break;
+                    case 3:
+                        result += shortMonths[month(localizedDate) - 1];
+                        break;
+                    case 4:
+                        result += longMonths[month(localizedDate) - 1];
+                        break;
+                    default:
+                        break;
+                }
+                break;
+            case "s":
+                tokenLength = parseRepeatToken(format, cursorPos, "s");
+                cursorPos += tokenLength;
+                switch (tokenLength) {
+                    case 1:
+                        result += second(localizedDate);
+                        break;
+                    case 2:
+                        result += padWithZeros(second(localizedDate), 2);
+                        break;
+                    default:
+                        break;
+                }
+                break;
+            case "t":
+                tokenLength = parseRepeatToken(format, cursorPos, "t");
+                cursorPos += tokenLength;
+                switch (tokenLength) {
+                    case 1:
+                        result += localizedDate.getHours() < 12 ? "A" : "P";
+                        break;
+                    case 2:
+                        result += localizedDate.getHours() < 12 ? "AM" : "PM";
+                        break;
+                    default:
+                        break;
+                }
+                break;
+            case "y":
+                tokenLength = parseRepeatToken(format, cursorPos, "y");
+                cursorPos += tokenLength;
+                switch (tokenLength) {
+                    case 1:
+                        result += localizedDate.getFullYear() % 100;
+                        break;
+                    case 2:
+                        result += padWithZeros(localizedDate.getFullYear() % 100, 2);
+                        break;
+                    case 3:
+                        result += padWithZeros(localizedDate.getFullYear(), 3);
+                        break;
+                    case 4:
+                        result += padWithZeros(localizedDate.getFullYear(), 4);
+                        break;
+                    case 5:
+                        result += padWithZeros(localizedDate.getFullYear(), 5);
+                        break;
+                    default:
+                        break;
+                }
+                break;
+            case "z":
+                tokenLength = parseRepeatToken(format, cursorPos, "z");
+                cursorPos += tokenLength;
+                let utcOffsetText = "";
+                switch (kind(localizedDate)) {
+                    case 1 /* DateKind.UTC */:
+                        utcOffsetText = "+00:00";
+                        break;
+                    case 2 /* DateKind.Local */:
+                        utcOffsetText = dateOffsetToString(localizedDate.getTimezoneOffset() * -60000);
+                        break;
+                    case 0 /* DateKind.Unspecified */:
+                        utcOffsetText = dateOffsetToString(toLocalTime(localizedDate).getTimezoneOffset() * -60000);
+                        break;
+                }
+                const sign = utcOffsetText[0] === "-" ? "-" : "+";
+                const hours = parseInt(utcOffsetText.substring(1, 3), 10);
+                const minutes = parseInt(utcOffsetText.substring(4, 6), 10);
+                switch (tokenLength) {
+                    case 1:
+                        result += `${sign}${hours}`;
+                        break;
+                    case 2:
+                        result += `${sign}${padWithZeros(hours, 2)}`;
+                        break;
+                    default:
+                        result += `${sign}${padWithZeros(hours, 2)}:${padWithZeros(minutes, 2)}`;
+                        break;
+                }
+                break;
+            case ":":
+                result += ":";
+                cursorPos++;
+                break;
+            case "/":
+                result += "/";
+                cursorPos++;
+                break;
+            case "'":
+            case '"':
+                const [quotedString, quotedStringLenght] = parseQuotedString(format, cursorPos);
+                result += quotedString;
+                cursorPos += quotedStringLenght;
+                break;
+            case "%":
+                const nextChar = parseNextChar(format, cursorPos);
+                if (nextChar >= 0 && nextChar !== "%".charCodeAt(0)) {
+                    cursorPos += 2;
+                    result += dateToStringWithCustomFormat(localizedDate, String.fromCharCode(nextChar), utc);
+                }
+                else {
+                    throw new Error("Invalid format string");
+                }
+                break;
+            case "\\":
+                const nextChar2 = parseNextChar(format, cursorPos);
+                if (nextChar2 >= 0) {
+                    cursorPos += 2;
+                    result += String.fromCharCode(nextChar2);
+                }
+                else {
+                    throw new Error("Invalid format string");
+                }
+                break;
+            default:
+                cursorPos++;
+                result += token;
+                break;
+        }
+    }
+    return result;
+}
 export function kind(value) {
     return value.kind || 0;
 }
@@ -54,45 +390,6 @@ function dateToISOStringWithOffset(dateWithOffset, offset) {
     const str = dateWithOffset.toISOString();
     return str.substring(0, str.length - 1) + dateOffsetToString(offset);
 }
-function dateToStringWithCustomFormat(date, format, utc) {
-    return format.replace(/(\w)\1*/g, (match) => {
-        let rep = Number.NaN;
-        switch (match.substring(0, 1)) {
-            case "y":
-                const y = utc ? date.getUTCFullYear() : date.getFullYear();
-                rep = match.length < 4 ? y % 100 : y;
-                break;
-            case "M":
-                rep = (utc ? date.getUTCMonth() : date.getMonth()) + 1;
-                break;
-            case "d":
-                rep = utc ? date.getUTCDate() : date.getDate();
-                break;
-            case "H":
-                rep = utc ? date.getUTCHours() : date.getHours();
-                break;
-            case "h":
-                const h = utc ? date.getUTCHours() : date.getHours();
-                rep = h > 12 ? h % 12 : h;
-                break;
-            case "m":
-                rep = utc ? date.getUTCMinutes() : date.getMinutes();
-                break;
-            case "s":
-                rep = utc ? date.getUTCSeconds() : date.getSeconds();
-                break;
-            case "f":
-                rep = utc ? date.getUTCMilliseconds() : date.getMilliseconds();
-                break;
-        }
-        if (Number.isNaN(rep)) {
-            return match;
-        }
-        else {
-            return padWithZeros(rep, match.length);
-        }
-    });
-}
 function dateToStringWithOffset(date, format) {
     const d = new Date(date.getTime() + (date.offset ?? 0));
     if (typeof format !== "string") {
@@ -200,11 +497,12 @@ export function parseRaw(input) {
             let timeInSeconds = 0;
             if (m[2] != null) {
                 const timeParts = m[2].split(":");
+                const hourPart = parseInt(timeParts[0], 10);
                 timeInSeconds =
-                    parseInt(timeParts[0], 10) * 3600 +
+                    hourPart * 3600 +
                         parseInt(timeParts[1] || "0", 10) * 60 +
                         parseFloat(timeParts[2] || "0");
-                if (m[3] != null && m[3].toUpperCase() === "PM") {
+                if (m[3] != null && m[3].toUpperCase() === "PM" && hourPart < 12) {
                     timeInSeconds += 720;
                 }
             }
@@ -357,7 +655,7 @@ export function dayOfYear(d) {
 }
 export function add(d, ts) {
     const newDate = DateTime(d.getTime() + ts, d.kind);
-    if (d.kind === 2 /* DateKind.Local */) {
+    if (d.kind !== 1 /* DateKind.UTC */) {
         const oldTzOffset = d.getTimezoneOffset();
         const newTzOffset = newDate.getTimezoneOffset();
         return oldTzOffset !== newTzOffset

package/fable_modules/fable-library-js.4.16.0/FSharp.Core.CompilerServices.d.ts

@@ -0,0 +1,12 @@
+import { TypeInfo } from "./Reflection.js";
+import { FSharpList } from "./List.js";
+export declare class ListCollector$1<T> {
+    readonly collector: T[];
+    constructor();
+}
+export declare function ListCollector$1_$reflection(gen0: TypeInfo): TypeInfo;
+export declare function ListCollector$1_$ctor<T>(): ListCollector$1<T>;
+export declare function ListCollector$1__Add_2B595<T>(this$: ListCollector$1<T>, value: T): void;
+export declare function ListCollector$1__AddMany_BB573A<T>(this$: ListCollector$1<T>, values: Iterable<T>): void;
+export declare function ListCollector$1__AddManyAndClose_BB573A<T>(this$: ListCollector$1<T>, values: Iterable<T>): FSharpList<T>;
+export declare function ListCollector$1__Close<T>(this$: ListCollector$1<T>): FSharpList<T>;

package/fable_modules/fable-library-js.4.16.0/FSharp.Core.CompilerServices.js

@@ -0,0 +1,27 @@
+import { class_type } from "./Reflection.js";
+import { addRangeInPlace } from "./Array.js";
+import { toList } from "./Seq.js";
+export class ListCollector$1 {
+    constructor() {
+        this.collector = [];
+    }
+}
+export function ListCollector$1_$reflection(gen0) {
+    return class_type("Microsoft.FSharp.Core.CompilerServices.ListCollector`1", [gen0], ListCollector$1);
+}
+export function ListCollector$1_$ctor() {
+    return new ListCollector$1();
+}
+export function ListCollector$1__Add_2B595(this$, value) {
+    void (this$.collector.push(value));
+}
+export function ListCollector$1__AddMany_BB573A(this$, values) {
+    addRangeInPlace(values, this$.collector);
+}
+export function ListCollector$1__AddManyAndClose_BB573A(this$, values) {
+    addRangeInPlace(values, this$.collector);
+    return toList(this$.collector);
+}
+export function ListCollector$1__Close(this$) {
+    return toList(this$.collector);
+}

package/fable_modules/{fable-library.4.5.0 → fable-library-js.4.16.0}/List.js

@@ -4,7 +4,7 @@ import { disposeSafe, isArrayLike, defaultOf, toIterator, getEnumerator, compare
 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 { transpose as transpose_1, splitInto as splitInto_1, windowed as windowed_1, pairwise as pairwise_1, chunkBySize as chunkBySize_1, map as map_1, permute as permute_1, tryFindIndexBack as tryFindIndexBack_1, tryFindBack as tryFindBack_1, scanBack as scanBack_1, foldBack2 as foldBack2_1, foldBack as foldBack_1, fill } from "./Array.js";
+import { transpose as transpose_1, splitInto as splitInto_1, windowed as windowed_1, pairwise as pairwise_1, chunkBySize as chunkBySize_1, map as map_1, permute as permute_1, tryFindIndexBack as tryFindIndexBack_1, tryFindBack as tryFindBack_1, scanBack as scanBack_1, item as item_1, foldBack2 as foldBack2_1, foldBack as foldBack_1, setItem, fill } from "./Array.js";
 export class FSharpList extends Record {
     constructor(head, tail) {
         super();
@@ -345,7 +345,7 @@ export function toArray(xs) {
         loop: while (true) {
             const i = i_mut, xs_1 = xs_1_mut;
             if (!FSharpList__get_IsEmpty(xs_1)) {
-                res[i] = FSharpList__get_Head(xs_1);
+                setItem(res, i, FSharpList__get_Head(xs_1));
                 i_mut = (i + 1);
                 xs_1_mut = FSharpList__get_Tail(xs_1);
                 continue loop;
@@ -454,7 +454,7 @@ export function toSeq(xs) {
 export function ofArrayWithTail(xs, tail_1) {
     let res = tail_1;
     for (let i = xs.length - 1; i >= 0; i--) {
-        res = FSharpList_Cons_305B8EAC(xs[i], res);
+        res = FSharpList_Cons_305B8EAC(item_1(i, xs), res);
     }
     return res;
 }

package/fable_modules/{fable-library.4.5.0 → fable-library-js.4.16.0}/Map.js

@@ -2,7 +2,7 @@ import { record_type, bool_type, list_type, option_type, class_type } from "./Re
 import { some, value as value_1 } from "./Option.js";
 import { structuralHash, compare, toIterator, equals, disposeSafe, getEnumerator, isArrayLike } from "./Util.js";
 import { singleton, ofArrayWithTail, head, tail, isEmpty as isEmpty_1, fold as fold_1, empty as empty_1, FSharpList, cons } from "./List.js";
-import { map as map_2, fill } from "./Array.js";
+import { map as map_2, item, fill, setItem } from "./Array.js";
 import { Record } from "./Types.js";
 import { tryPick as tryPick_1, pick as pick_1, iterate as iterate_1, compareWith, map as map_1, unfold } from "./Seq.js";
 import { format, join } from "./String.js";
@@ -750,7 +750,7 @@ export function MapTreeModule_toList(m) {
 export function MapTreeModule_copyToArray(m, arr, i) {
     let j = i;
     MapTreeModule_iter((x, y) => {
-        arr[j] = [x, y];
+        setItem(arr, j, [x, y]);
         j = ((j + 1) | 0);
     }, m);
 }
@@ -782,7 +782,7 @@ export function MapTreeModule_mkFromEnumerator(comparer_mut, acc_mut, e_mut) {
 export function MapTreeModule_ofArray(comparer, arr) {
     let res = MapTreeModule_empty();
     for (let idx = 0; idx <= (arr.length - 1); idx++) {
-        const forLoopVar = arr[idx];
+        const forLoopVar = item(idx, arr);
         res = MapTreeModule_add(comparer, forLoopVar[0], forLoopVar[1], res);
     }
     return res;

package/fable_modules/fable-library-js.4.16.0/MapUtil.d.ts

@@ -0,0 +1,12 @@
+import { IMap, IMapOrWeakMap, ISet } from "./Util.js";
+import { FSharpRef } from "./Types.js";
+export declare function keyValueList(fields: Iterable<any>, caseRule?: number): {
+    [k: string]: any;
+};
+export declare function containsValue<K, V>(v: V, map: IMap<K, V>): boolean;
+export declare function tryGetValue<K, V>(map: IMapOrWeakMap<K, V>, key: K, defaultValue: FSharpRef<V>): boolean;
+export declare function addToSet<T>(v: T, set: ISet<T>): boolean;
+export declare function tryAddToDict<K, V>(dict: IMapOrWeakMap<K, V>, k: K, v: V): boolean;
+export declare function addToDict<K, V>(dict: IMapOrWeakMap<K, V>, k: K, v: V): void;
+export declare function getItemFromDict<K, V>(map: IMap<K, V>, key: K): V;
+export declare function getItemFromDictOrCreate<K, V>(map: IMapOrWeakMap<K, V>, key: K, createValue: (key: K) => V): V;