Skip to content

Commit 656ad40

Browse files
committed
Update OperatorsModule2.fs
1 parent ec15c9d commit 656ad40

File tree

1 file changed

+13
-4
lines changed

1 file changed

+13
-4
lines changed

tests/FSharp.Core.UnitTests/FSharp.Core/OperatorsModule2.fs

Lines changed: 13 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -444,8 +444,11 @@ type OperatorsModule2() =
444444
if Info.isX86Runtime then
445445
Assert.AreEqual(-2147483648n, result)
446446
else
447-
// Cannot express this as a literal, see https://github.com/dotnet/fsharp/issues/9524
448-
Assert.AreEqual("-9223372036854775808", string result)
447+
if not Info.isNetFramework then
448+
Assert.AreEqual(9223372036854775807n, result)
449+
else
450+
// Cannot express this as a literal, see https://github.com/dotnet/fsharp/issues/9524
451+
Assert.AreEqual("-9223372036854775808", string result)
449452

450453
let result = Operators.nativeint System.Double.MinValue
451454
if Info.isX86Runtime then
@@ -1093,7 +1096,10 @@ type OperatorsModule2() =
10931096

10941097
// Overflow
10951098
let result = Operators.uint64 Double.MaxValue
1096-
Assert.AreEqual(0UL, result)
1099+
if not Info.isNetFramework then
1100+
Assert.AreEqual(18446744073709551615UL, result)
1101+
else
1102+
Assert.AreEqual(0UL, result)
10971103

10981104
// Overflow
10991105
let result = Operators.uint64 Double.MinValue
@@ -1144,7 +1150,10 @@ type OperatorsModule2() =
11441150

11451151
// Overflow Double.MaxValue is equal on 32 bits and 64 bits runtimes
11461152
let result = Operators.unativeint Double.MaxValue
1147-
Assert.AreEqual(0un, result)
1153+
if not Info.isNetFramework then
1154+
Assert.AreEqual(18446744073709551615un, result)
1155+
else
1156+
Assert.AreEqual(0un, result)
11481157

11491158
// Overflow (depends on pointer size)
11501159
let result = Operators.unativeint Double.MinValue

0 commit comments

Comments
 (0)