d6
/
nxu
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

test conversions

This commit is contained in:
~d6 2024-09-10 10:39:36 -04:00
parent 96e98f82ba
commit b06908c2fd
2 changed files with 12 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
fix32.tal
View File

@ -55,11 +55,9 @@
@x32-is-negative ( x/** -> bool^ ) POP2 #7fff GTH2 JMP2r
@x32-from-u8 ( x^ -> x/** )
#0000 ROT OVR SWP DENOM32 !u32-mul
#00 SWP ( >> )
@x32-from-u16 ( x* -> x/** )
#0000 SWP2 DENOM32 !u32-mul
#0000 SWP2 ( >> )
@x32-from-u32 ( x** -> x/** )
DENOM32 !u32-mul

10
test-fix32.tal
View File

@ -6,6 +6,16 @@
( program )
|0100
#00 x32-from-u8 x32-emit #0a18 DEO
#01 x32-from-u8 x32-emit #0a18 DEO
#0a x32-from-u8 x32-emit #0a18 DEO
#ff x32-from-u8 x32-emit #0a18 DEO
#0100 x32-from-u16 x32-emit #0a18 DEO
#1000 x32-from-u16 x32-emit #0a18 DEO
#7fff x32-from-u16 x32-emit #0a18 DEO
#8000 x32-from-u16 x32-emit #0a18 DEO
#ffff x32-from-u16 x32-emit #0a18 DEO
#0a18 DEO
#0000 #03e8 #0000 #07d0 LIT "+ ;x32-add #0000 #0bb8 test-binop ( 1 + 2 = 3 )
#ffff #fc18 #ffff #fc18 LIT "+ ;x32-add #ffff #f830 test-binop ( -1 + -1 = -2 )
#7fff #ffff #7fff #ffff LIT "+ ;x32-add #7fff #ffff test-binop ( inf + inf = inf )