Fix Gambas3 Selftest GambasSelftests.IntegerOverflowsUnsafe

Never program with too much beer ... forgot to test
IntegerOverflowsUnsafe with JIT enabled
This commit is contained in:
Christof Thalhofer 2023-01-14 01:37:29 +01:00
parent f07bdfecd1
commit a0355e2855
2 changed files with 9 additions and 9 deletions

View file

@ -2385,27 +2385,27 @@ Fast Unsafe Public Sub IntegerOverflowsUnsafe()
Test.Note("Short Unsafe Overflow")
s = HighestShort + 1
Assert.Ok(s)
Assert.Noterror()
Test.Note("Integer Unsafe Overflow")
i = HighestInteger + 1
Assert.Ok(i)
Assert.Noterror()
Test.Note("Long Unsafe Overflow")
l = HighestLong + 1
Assert.Ok(l)
Assert.Noterror()
Test.Note("Short Unsafe Underflow")
s = LowestShort - 1
Assert.Ok(s)
Assert.Noterror()
Test.Note("Integer Unsafe Underflow")
i = LowestInteger - 1
Assert.Ok(i)
Assert.Noterror()
Test.Note("Long Unsafe Underflow")
l = LowestLong - 1
Assert.Ok(l)
Assert.Noterror()
Else
Test.Note("Jit disabled")

View file

@ -1,7 +1,7 @@
[TestSuites]
Count=4
TestWith=1
Default="GambasSelftests.IntegerOverflows"
TestWith=0
Default="GambasSelftests.IntegerOverflows;IntegerOverflowsUnsafe"
[TestSuites/1]
Name="Fast"