mirror of
https://github.com/open-simh/simtools.git
synced 2026-01-26 12:11:47 +00:00
Add some test cases; some are failing so far.
This commit is contained in:
28
tests/test-float.mac
Normal file
28
tests/test-float.mac
Normal file
@@ -0,0 +1,28 @@
|
||||
;;;;;
|
||||
;
|
||||
; Test floating point numbers
|
||||
|
||||
.word ^F 1.0 ; 040200
|
||||
.word ^F-1.0 ; 140200
|
||||
.word -^F 1.0 ; 137600
|
||||
.word -^F-1.0 ; 037600
|
||||
|
||||
.word ^F6.2 ; 040706
|
||||
.word ^C^F6.2 ; 137071
|
||||
.word ^C<^F6.2> ; 137071
|
||||
|
||||
.flt2 6.2 ; 040706 063146
|
||||
.flt4 6.2 ; 040706 063146 063146 063146
|
||||
|
||||
.flt2 1.5 ; 040300 000000
|
||||
.flt4 1.5 ; 040300 000000 000000 000000
|
||||
|
||||
.word ^F 72057594037927935 ; 056200 (rounded!)
|
||||
.flt2 72057594037927935 ; 056200 000000 (rounded!)
|
||||
.flt4 72057594037927935 ; 056177 177777 177777 177777 (exact!)
|
||||
|
||||
.word ^F 72057594037927936 ; 056200
|
||||
.flt2 72057594037927936 ; 056200 000000
|
||||
.flt4 72057594037927936 ; 056200 000000 000000 000000
|
||||
|
||||
.flt4 72057594037927937 ; 056200 000000 000000 000001
|
||||
Reference in New Issue
Block a user