@fable-org/fable-library-ts 1.9.0 → 1.11.0

package/Async.ts

@@ -159,12 +159,14 @@ export function sleep(millisecondsDueTime: number) {
   });
 }
 
-export function runSynchronously(): never {
-  throw new Error("Asynchronous code cannot be run synchronously in JS");
-}
-
 export function start<T>(computation: Async<T>, cancellationToken?: CancellationToken) {
-  return startWithContinuations(computation, cancellationToken);
+  return startWithContinuations(
+    computation,
+    emptyContinuation,
+    function (err) { throw err },
+    emptyContinuation,
+    cancellationToken
+  );
 }
 
 export function startImmediate<T>(computation: Async<T>, cancellationToken?: CancellationToken) {
@@ -173,19 +175,16 @@ export function startImmediate<T>(computation: Async<T>, cancellationToken?: Can
 
 export function startWithContinuations<T>(
   computation: Async<T>,
-  continuation?: Continuation<T> | CancellationToken,
-  exceptionContinuation?: Continuation<any>,
-  cancellationContinuation?: Continuation<any>,
+  continuation: Continuation<T>,
+  exceptionContinuation: Continuation<any>,
+  cancellationContinuation: Continuation<any>,
   cancelToken?: CancellationToken) {
-  if (typeof continuation !== "function") {
-    cancelToken = continuation as CancellationToken;
-    continuation = undefined;
-  }
+
   const trampoline = new Trampoline();
   computation({
     onSuccess: continuation ? continuation as Continuation<T> : emptyContinuation,
-    onError: exceptionContinuation ? exceptionContinuation : emptyContinuation,
-    onCancel: cancellationContinuation ? cancellationContinuation : emptyContinuation,
+    onError: exceptionContinuation,
+    onCancel: cancellationContinuation,
     cancelToken: cancelToken ? cancelToken : defaultCancellationToken,
     trampoline,
   });

package/CHANGELOG.md

@@ -7,20 +7,13 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 
 ## Unreleased
 
-## 1.9.0 - 2025-01-09
-
-### Added
-
-* [JS/TS] Add new `TimSpan` overload support coming from .NET 9 (by @MangelMaxime)
+## 1.11.0- 2025-04-26
 
 ### Fixed
 
-* [JS/TS] Fix `DateTimeOffset.ToLocalTime` (by @MangelMaxime)
-
-## 1.8.0 - 2024-11-19
-
-* [JS/TS] Fix `h` in `DateTime.ToString` (@MangelMaxime)
-* [JS/TS] Fix `hh` in `DateTime.ToString` (@MangelMaxime)
+* [JS/TS] Propagate non-captured exception when running `Async.Start` or `Async.StartImmediate` (by @MangelMaxime)
+* [JS/TS] Remove `Async.RunSynchronously` (by @MangelMaxime)
+* [JS/TS] Change signature of `startWithContinuations` to always require all its arguments (by @MangelMaxime)
 
 ## 1.7.0 - 2024-11-19
 

package/Choice.ts

@@ -1,6 +1,5 @@
 import { Union } from "./Types.js";
 import { union_type, TypeInfo } from "./Reflection.js";
-import { int32 } from "./Int32.js";
 import { Option, some } from "./Option.js";
 
 export type FSharpChoice$2_$union<T1, T2> = 
@@ -282,8 +281,8 @@ export function Choice_makeChoice2Of2<T2, a>(x: T2): FSharpChoice$2_$union<a, T2
 }
 
 export function Choice_tryValueIfChoice1Of2<T1, T2>(x: FSharpChoice$2_$union<T1, T2>): Option<T1> {
-    if ((x.tag as int32) === /* Choice1Of2 */ 0) {
-        return some(x.fields[0] as any);
+    if (x.tag === /* Choice1Of2 */ 0) {
+        return some(x.fields[0]);
     }
     else {
         return undefined;
@@ -291,8 +290,8 @@ export function Choice_tryValueIfChoice1Of2<T1, T2>(x: FSharpChoice$2_$union<T1,
 }
 
 export function Choice_tryValueIfChoice2Of2<T1, T2>(x: FSharpChoice$2_$union<T1, T2>): Option<T2> {
-    if ((x.tag as int32) === /* Choice2Of2 */ 1) {
-        return some(x.fields[0] as any);
+    if (x.tag === /* Choice2Of2 */ 1) {
+        return some(x.fields[0]);
     }
     else {
         return undefined;

package/Date.ts

@@ -166,12 +166,10 @@ function dateToStringWithCustomFormat(date: Date, format: string, utc: boolean)
         cursorPos += tokenLength;
         switch (tokenLength) {
           case 1:
-            const h1Value = hour(localizedDate) % 12;
-            result += h1Value ? h1Value : 12;
+            result += hour(localizedDate) % 12
             break;
           case 2:
-            const h2Value = hour(localizedDate) % 12;
-            result += padWithZeros(h2Value ? h2Value : 12, 2);
+            result += padWithZeros(hour(localizedDate) % 12, 2);
             break;
           default:
             break;

package/DateOffset.ts

@@ -166,10 +166,6 @@ export function toUniversalTime(date: IDateTimeOffset): Date {
 }
 
 export function toLocalTime(date: IDateTimeOffset): Date {
-  return DateTime(date.getTime() + offset(now()), DateKind.Local);
-}
-
-export function localDateTime(date: IDateTimeOffset) : Date {
   return DateTime(date.getTime(), DateKind.Local);
 }
 

package/Result.ts

@@ -1,7 +1,7 @@
 import { Union } from "./Types.js";
 import { union_type, TypeInfo } from "./Reflection.js";
-import { int32 } from "./Int32.js";
 import { equals } from "./Util.js";
+import { int32 } from "./Int32.js";
 import { FSharpList, empty, singleton } from "./List.js";
 import { Option, some } from "./Option.js";
 
@@ -36,34 +36,34 @@ export function FSharpResult$2_$reflection(gen0: TypeInfo, gen1: TypeInfo): Type
 }
 
 export function Result_Map<a, b, c>(mapping: ((arg0: a) => b), result: FSharpResult$2_$union<a, c>): FSharpResult$2_$union<b, c> {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return FSharpResult$2_Ok<b, c>(mapping(result.fields[0] as any));
+    if (result.tag === /* Ok */ 0) {
+        return FSharpResult$2_Ok<b, c>(mapping(result.fields[0]));
     }
     else {
-        return FSharpResult$2_Error<b, c>(result.fields[0] as any);
+        return FSharpResult$2_Error<b, c>(result.fields[0]);
     }
 }
 
 export function Result_MapError<a, b, c>(mapping: ((arg0: a) => b), result: FSharpResult$2_$union<c, a>): FSharpResult$2_$union<c, b> {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return FSharpResult$2_Ok<c, b>(result.fields[0] as any);
+    if (result.tag === /* Ok */ 0) {
+        return FSharpResult$2_Ok<c, b>(result.fields[0]);
     }
     else {
-        return FSharpResult$2_Error<c, b>(mapping(result.fields[0] as any));
+        return FSharpResult$2_Error<c, b>(mapping(result.fields[0]));
     }
 }
 
 export 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> {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return binder(result.fields[0] as any);
+    if (result.tag === /* Ok */ 0) {
+        return binder(result.fields[0]);
     }
     else {
-        return FSharpResult$2_Error<b, c>(result.fields[0] as any);
+        return FSharpResult$2_Error<b, c>(result.fields[0]);
     }
 }
 
 export function Result_IsOk<a, b>(result: FSharpResult$2_$union<a, b>): boolean {
-    if ((result.tag as int32) === /* Ok */ 0) {
+    if (result.tag === /* Ok */ 0) {
         return true;
     }
     else {
@@ -72,7 +72,7 @@ export function Result_IsOk<a, b>(result: FSharpResult$2_$union<a, b>): boolean
 }
 
 export function Result_IsError<a, b>(result: FSharpResult$2_$union<a, b>): boolean {
-    if ((result.tag as int32) === /* Ok */ 0) {
+    if (result.tag === /* Ok */ 0) {
         return false;
     }
     else {
@@ -81,8 +81,8 @@ export function Result_IsError<a, b>(result: FSharpResult$2_$union<a, b>): boole
 }
 
 export function Result_Contains<a, b>(value: a, result: FSharpResult$2_$union<a, b>): boolean {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return equals(result.fields[0] as any, value);
+    if (result.tag === /* Ok */ 0) {
+        return equals(result.fields[0], value);
     }
     else {
         return false;
@@ -90,7 +90,7 @@ export function Result_Contains<a, b>(value: a, result: FSharpResult$2_$union<a,
 }
 
 export function Result_Count<a, b>(result: FSharpResult$2_$union<a, b>): int32 {
-    if ((result.tag as int32) === /* Ok */ 0) {
+    if (result.tag === /* Ok */ 0) {
         return 1;
     }
     else {
@@ -99,8 +99,8 @@ export function Result_Count<a, b>(result: FSharpResult$2_$union<a, b>): int32 {
 }
 
 export function Result_DefaultValue<a, b>(defaultValue: a, result: FSharpResult$2_$union<a, b>): a {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return result.fields[0] as any;
+    if (result.tag === /* Ok */ 0) {
+        return result.fields[0];
     }
     else {
         return defaultValue;
@@ -108,17 +108,17 @@ export function Result_DefaultValue<a, b>(defaultValue: a, result: FSharpResult$
 }
 
 export function Result_DefaultWith<b, a>(defThunk: ((arg0: b) => a), result: FSharpResult$2_$union<a, b>): a {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return result.fields[0] as any;
+    if (result.tag === /* Ok */ 0) {
+        return result.fields[0];
     }
     else {
-        return defThunk(result.fields[0] as any);
+        return defThunk(result.fields[0]);
     }
 }
 
 export function Result_Exists<a, b>(predicate: ((arg0: a) => boolean), result: FSharpResult$2_$union<a, b>): boolean {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return predicate(result.fields[0] as any);
+    if (result.tag === /* Ok */ 0) {
+        return predicate(result.fields[0]);
     }
     else {
         return false;
@@ -126,8 +126,8 @@ export function Result_Exists<a, b>(predicate: ((arg0: a) => boolean), result: F
 }
 
 export function Result_Fold<a, b, s>(folder: ((arg0: s, arg1: a) => s), state: s, result: FSharpResult$2_$union<a, b>): s {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return folder(state, result.fields[0] as any);
+    if (result.tag === /* Ok */ 0) {
+        return folder(state, result.fields[0]);
     }
     else {
         return state;
@@ -135,8 +135,8 @@ export function Result_Fold<a, b, s>(folder: ((arg0: s, arg1: a) => s), state: s
 }
 
 export function Result_FoldBack<a, b, s>(folder: ((arg0: a, arg1: s) => s), result: FSharpResult$2_$union<a, b>, state: s): s {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return folder(result.fields[0] as any, state);
+    if (result.tag === /* Ok */ 0) {
+        return folder(result.fields[0], state);
     }
     else {
         return state;
@@ -144,8 +144,8 @@ export function Result_FoldBack<a, b, s>(folder: ((arg0: a, arg1: s) => s), resu
 }
 
 export function Result_ForAll<a, b>(predicate: ((arg0: a) => boolean), result: FSharpResult$2_$union<a, b>): boolean {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return predicate(result.fields[0] as any);
+    if (result.tag === /* Ok */ 0) {
+        return predicate(result.fields[0]);
     }
     else {
         return true;
@@ -153,14 +153,14 @@ export function Result_ForAll<a, b>(predicate: ((arg0: a) => boolean), result: F
 }
 
 export function Result_Iterate<a, b>(action: ((arg0: a) => void), result: FSharpResult$2_$union<a, b>): void {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        action(result.fields[0] as any);
+    if (result.tag === /* Ok */ 0) {
+        action(result.fields[0]);
     }
 }
 
 export function Result_ToArray<a, b>(result: FSharpResult$2_$union<a, b>): a[] {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return [result.fields[0] as any];
+    if (result.tag === /* Ok */ 0) {
+        return [result.fields[0]];
     }
     else {
         return [];
@@ -168,8 +168,8 @@ export function Result_ToArray<a, b>(result: FSharpResult$2_$union<a, b>): a[] {
 }
 
 export function Result_ToList<a, b>(result: FSharpResult$2_$union<a, b>): FSharpList<a> {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return singleton(result.fields[0] as any);
+    if (result.tag === /* Ok */ 0) {
+        return singleton(result.fields[0]);
     }
     else {
         return empty<a>();
@@ -177,8 +177,8 @@ export function Result_ToList<a, b>(result: FSharpResult$2_$union<a, b>): FSharp
 }
 
 export function Result_ToOption<a, b>(result: FSharpResult$2_$union<a, b>): Option<a> {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return some(result.fields[0] as any);
+    if (result.tag === /* Ok */ 0) {
+        return some(result.fields[0]);
     }
     else {
         return undefined;
@@ -186,8 +186,8 @@ export function Result_ToOption<a, b>(result: FSharpResult$2_$union<a, b>): Opti
 }
 
 export function Result_ToValueOption<a, b>(result: FSharpResult$2_$union<a, b>): Option<a> {
-    if ((result.tag as int32) === /* Ok */ 0) {
-        return some(result.fields[0] as any);
+    if (result.tag === /* Ok */ 0) {
+        return some(result.fields[0]);
     }
     else {
         return undefined;

package/TimeSpan.ts

@@ -35,24 +35,20 @@ export function fromTicks(ticks: number | bigint) {
   return Number(BigInt(ticks) / 10000n);
 }
 
-export function fromDays(d: number, h: number = 0, m: bigint = 0n, s: bigint = 0n, ms: bigint = 0n) {
-  return create(d, h, Number(m), Number(s), Number(ms));
+export function fromDays(d: number) {
+  return create(d, 0, 0, 0);
 }
 
-export function fromHours(h: number, m: bigint = 0n, s: bigint = 0n, ms: bigint = 0n) {
-  return create(0, h, Number(m), Number(s), Number(ms));
+export function fromHours(h: number) {
+  return create(h, 0, 0);
 }
 
-export function fromMinutes(m: number | bigint, s: bigint = 0n, ms: bigint = 0n) {
-  return create(0, 0, Number(m), Number(s), Number(ms));
+export function fromMinutes(m: number) {
+  return create(0, m, 0);
 }
 
-export function fromSeconds(s: number | bigint, ms: bigint = 0n) {
-  return create(0, 0, 0, Number(s), Number(ms));
-}
-
-export function fromMilliseconds(ms: number | bigint) {
-  return Number(ms);
+export function fromSeconds(s: number) {
+  return create(0, 0, s);
 }
 
 export function days(ts: TimeSpan) {

package/package.json

@@ -3,7 +3,7 @@
   "private": false,
   "type": "module",
   "name": "@fable-org/fable-library-ts",
-  "version": "1.9.0",
+  "version": "1.11.0",
   "description": "Core library used by F# projects compiled with fable.io",
   "author": "Fable Contributors",
   "license": "MIT",