collapseos/blk/286

CODE >R ( 0xa8 )
    HL POPqq,
    17 BCALL, ( 17 == pushRS )
;CODE NOP, NOP, NOP,
CODE 2>R ( 0xb9 )
    DE POPqq, HL POPqq,
    17 BCALL, ( 17 == pushRS ) EXDEHL, 17 BCALL,
;CODE NOP, NOP, NOP,
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 )
Make DO..LOOP stable 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... 2020-05-12 10:37:24 -04:00			`CODE >R ( 0xa8 )`
Optimize chkPS Use EXX instead of the stack for HL protection and remove all spurious uses of chkPS, I wanted to inline chkPS in next because of its "tight loop" status, but for reasons I don't understand, doing so breaks Collapse OS. Later... 2020-05-22 23:12:03 -04:00			`HL POPqq,`
Make DO..LOOP stable 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... 2020-05-12 10:37:24 -04:00			`17 BCALL, ( 17 == pushRS )`
Optimize chkPS Use EXX instead of the stack for HL protection and remove all spurious uses of chkPS, I wanted to inline chkPS in next because of its "tight loop" status, but for reasons I don't understand, doing so breaks Collapse OS. Later... 2020-05-22 23:12:03 -04:00			`;CODE NOP, NOP, NOP,`
Make DO..LOOP stable 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... 2020-05-12 10:37:24 -04:00			`CODE 2>R ( 0xb9 )`
Optimize chkPS Use EXX instead of the stack for HL protection and remove all spurious uses of chkPS, I wanted to inline chkPS in next because of its "tight loop" status, but for reasons I don't understand, doing so breaks Collapse OS. Later... 2020-05-22 23:12:03 -04:00			`DE POPqq, HL POPqq,`
Make DO..LOOP stable 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... 2020-05-12 10:37:24 -04:00			`17 BCALL, ( 17 == pushRS ) EXDEHL, 17 BCALL,`
Optimize chkPS Use EXX instead of the stack for HL protection and remove all spurious uses of chkPS, I wanted to inline chkPS in next because of its "tight loop" status, but for reasons I don't understand, doing so breaks Collapse OS. Later... 2020-05-22 23:12:03 -04:00			`;CODE NOP, NOP, NOP,`
Make DO..LOOP stable 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... 2020-05-12 10:37:24 -04:00			`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 )`