1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-01 13:20:55 +11:00
collapseos/arch/8086/pcat/xcomp.fs
Virgil Dupras 80d1b59050 Add words |M and |L
Splitting a word into MSB/LSB pairs happens often and is worth, I
think, native words. Also, I'm going to need it in the upcoming
commits.
2020-12-07 20:11:49 -05:00

4 lines
64 B
Forth

612 LOAD ( PC/AT xcomp )
ORG @ |M 2 PC! 2 PC!
H@ |M 2 PC! 2 PC!