collapseos/blk/285

CODE (?br) ( 0x67 )
    HL POP,
    HLZ,
    JRZ, L2 BWR ( br + 1. False, branch )
    L1 BSET ( loop will jump here )
    ( True, skip next 2 bytes and don't branch )
    IY INCd, IY INCd,
    JPNEXT, NOP, NOP, NOP,
CODE (loop) ( 0x80 )
    0 IX+ INC(IXY+), IFZ, 1 IX+ INC(IXY+), THEN, ( I++ )
    ( Jump if I <> I' )
    A 0 IX+ LDrIXY, 2 IX- CP(IXY+), JRNZ, L2 BWR ( branch )
    A 1 IX+ LDrIXY, 1 IX- CP(IXY+), JRNZ, L2 BWR ( branch )
    ( don't branch )
    IX DECd, IX DECd, IX DECd, IX DECd, JR, L1 BWR
z80a: make mnemonic names more uniform across assemblers Initially, I used the same letters as those used in the z80 ref docs, but it makes the different assemblers harder to use than they should. Having consistent "argtype" rules across assemblers should help. 2020-06-27 22:01:56 -04:00			`CODE (?br) ( 0x67 )`
			`HL POP,`
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			`HLZ,`
pcat: implement (br) and (br?) 2020-06-16 22:10:32 -04:00			`JRZ, L2 BWR ( br + 1. False, branch )`
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			`L1 BSET ( loop will jump here )`
			`( True, skip next 2 bytes and don't branch )`
z80a: make mnemonic names more uniform across assemblers Initially, I used the same letters as those used in the z80 ref docs, but it makes the different assemblers harder to use than they should. Having consistent "argtype" rules across assemblers should help. 2020-06-27 22:01:56 -04:00			`IY INCd, IY INCd,`
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			`JPNEXT, NOP, NOP, NOP,`
Make word routines into word types Instead of having wordref point to core word routines, I made them into word 4 word types. It liberates space into the stable ABI and should make porting to other arches easier. I'm also thinking of combining word type with the namelen field for precious bytes saving, but not now... 2020-06-17 21:41:01 -04:00			`CODE (loop) ( 0x80 )`
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			`0 IX+ INC(IXY+), IFZ, 1 IX+ INC(IXY+), THEN, ( I++ )`
			`( Jump if I <> I' )`
			`A 0 IX+ LDrIXY, 2 IX- CP(IXY+), JRNZ, L2 BWR ( branch )`
			`A 1 IX+ LDrIXY, 1 IX- CP(IXY+), JRNZ, L2 BWR ( branch )`
			`( don't branch )`
z80a: make mnemonic names more uniform across assemblers Initially, I used the same letters as those used in the z80 ref docs, but it makes the different assemblers harder to use than they should. Having consistent "argtype" rules across assemblers should help. 2020-06-27 22:01:56 -04:00			`IX DECd, IX DECd, IX DECd, IX DECd, JR, L1 BWR`