Fixes fable-compiler#3500

ncave · Jun 13, 2024 · 67b7ee5 · 67b7ee5
1 parent 7a9db87
commit 67b7ee5
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/src/fable-library-ts/BigInt.ts b/src/fable-library-ts/BigInt.ts
@@ -148,10 +148,11 @@ export function toFloat32(x: bigint): float32 { return Number(x); }
 export function toFloat64(x: bigint): float64 { return Number(x); }
 
 export function toDecimal(x: bigint): decimal {
-    const low = Number(BigInt.asUintN(32, x))
-    const mid = Number(BigInt.asUintN(32, x >> 32n))
-    const high = Number(BigInt.asUintN(32, x >> 64n))
     const isNegative = x < zero;
+    const bits = abs(x);
+    const low = Number(BigInt.asUintN(32, bits));
+    const mid = Number(BigInt.asUintN(32, bits >> 32n));
+    const high = Number(BigInt.asUintN(32, bits >> 64n));
     const scale = 0;
     return fromParts(low, mid, high, isNegative, scale)
 }