mirror of
https://github.com/hsoft/collapseos.git
synced 2024-09-07 14:58:45 +10:00
DO and LOOP now only compile words from stable ABI, which make them suitable for xcomp. This will greatly simplify driver writing and allow us to mostly avoid the low/high divide in drivers. LEAVE is still xcomp-incompatible though. This make us very very tight for "<0x100" limit for literal words. Hopefully, we won't need more stuff in that area of the binary...
17 lines
367 B
Plaintext
17 lines
367 B
Plaintext
CODE >R ( 0xa8 )
|
|
HL POPqq, chkPS,
|
|
17 BCALL, ( 17 == pushRS )
|
|
;CODE
|
|
CODE 2>R ( 0xb9 )
|
|
DE POPqq, HL POPqq, chkPS,
|
|
17 BCALL, ( 17 == pushRS ) EXDEHL, 17 BCALL,
|
|
;CODE
|
|
CODE R> ( 0xce )
|
|
20 BCALL, ( 20 == popRS )
|
|
HL PUSHqq,
|
|
;CODE
|
|
CODE 2R> ( 0xdc )
|
|
20 BCALL, ( 20 == popRS ) EXDEHL, 20 BCALL,
|
|
HL PUSHqq, DE PUSHqq,
|
|
;CODE ( END OF STABLE ABI )
|