collapseos/blk/286

CODE 2>R ( 0xa9 )
    DE POPqq, HL POPqq,
    17 BCALL, ( 17 == pushRS ) EXDEHL, 17 BCALL,
;CODE NOP, NOP, NOP,
CODE (n) ( 0xbf, number literal )
  ( PF means nothing and the actual number is placed next to
    the (n) reference in the compiled word list. What we need
    to do to fetch that number is to play with the IP. )
    E 0 IY+ LDrIXY,
    D 1 IY+ LDrIXY,
    IY INCss,
    IY INCss,
    DE PUSHqq,
;CODE
Reduce the scope of the stable ABI Only 2>R in actually needed in the RSP family (for LOOP). Reducing the scope of the stable ABI makes porting to other arches easier. 2020-06-17 07:53:00 -04:00			`CODE 2>R ( 0xa9 )`
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,`
Make literal word routines into regular native words 2020-06-17 14:25:32 -04:00			`;CODE NOP, NOP, NOP,`
			`CODE (n) ( 0xbf, number literal )`
			`( PF means nothing and the actual number is placed next to`
			`the (n) reference in the compiled word list. What we need`
			`to do to fetch that number is to play with the IP. )`
			`E 0 IY+ LDrIXY,`
			`D 1 IY+ LDrIXY,`
			`IY INCss,`
			`IY INCss,`
			`DE PUSHqq,`
Reduce the scope of the stable ABI Only 2>R in actually needed in the RSP family (for LOOP). Reducing the scope of the stable ABI makes porting to other arches easier. 2020-06-17 07:53:00 -04:00			`;CODE`