github.com/open-simh.simtools
1
0
Fork 0
mirror of https://github.com/open-simh/simtools.git synced 2026-01-26 04:01:44 +00:00
Code Issues Projects Releases Wiki Activity

Add some more test cases.

Browse Source
This commit is contained in:
Olaf Seibert
2021-01-21 20:53:07 +01:00
parent 96942ca6d6
commit a25a509ca5
2 changed files with 66 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

30
tests/test-float.mac
View File

@@ -45,8 +45,8 @@
.flt4 72057594037927934 ; 056177 177777 177777 177776
; 1 << 56 - 1
.word ^F 72057594037927935 ; 056200 (rounded!)
.flt2 72057594037927935 ; 056200 000000 (rounded!)
.word ^F 72057594037927935 ; 056200 (rounded up!)
.flt2 72057594037927935 ; 056200 000000 (rounded up!)
.flt4 72057594037927935 ; 056177 177777 177777 177777
; 1 << 56
@@ -73,3 +73,29 @@
; This one triggers rounding up (round == 1)
.flt4 6.66666 ; 040725 052507 055061 122276
; MACRO-11 truncates these ^F values despite what the manual says.
; On the other hand, it does round up some of the test values above.
; We stick to the manual since the result is more consistent.
; Expression RT-11 this
; MACRO-11 version
; V05.06
.word ^F 0.994140625 ; (2**9-3)/2**9 040176 040177
.flt4 0.994140625
.word ^F 0.998046875 ; (2**9-1)/2**9 040177 040200
.flt4 0.998046875
.word ^F 1.00390625 ; (2**8+1)/2**8 040200 040201
.flt4 1.00390625
.word ^F 1.01171875 ; (2**8+3)/2**8 040201 040202
.flt4 1.01171875
.flt4 1.701411834604692307e+38 ; 077777 177777 177777 177777
.FLT4 170141183460469230551095682998472802304 ; 2**127-2**70
.FLT4 170141183460469230564930741053754966015 ; 2**127-(2**70-2**64+2**62+1)
.FLT4 170141183460469230564930741053754966016 ; 2**127-(2**70-2**64+2**62+2)
.end