diff --git a/src/js/fable-core/Long.js b/src/js/fable-core/Long.js index 6ba6b7a139..dd4ed33735 100644 --- a/src/js/fable-core/Long.js +++ b/src/js/fable-core/Long.js @@ -198,7 +198,6 @@ export function fromInteger(value, unsigned, kind) { case 2: x = value >> 0; xh = x; break; case 6: x = value >>> 0; } - if (unsigned) xh = 0; return fromBits(x, xh >> 31, unsigned); } diff --git a/tests/Main/ConvertTests.fs b/tests/Main/ConvertTests.fs index 75d466e614..353c8aa553 100644 --- a/tests/Main/ConvertTests.fs +++ b/tests/Main/ConvertTests.fs @@ -255,7 +255,7 @@ let tests = testCase "Special cases conversion to/from Int64 work" <| fun () -> let xn = -1L let xnu = 0xFFFFFFFFFFFFFFFFuL - -1 |> uint64 |> equal 0xFFFFFFFFuL + -1 |> uint64 |> equal xnu 0xFFFFFFFFu |> int64 |> equal 0xFFFFFFFFL xn |> uint64 |> equal xnu xnu |> int64 |> equal -1L