collapseos/blk/306

( Native words )
CODE EXECUTE
    DE POP,
    chkPS,
    JR, lblexec BWR      ( execute-B301 )
CODE (s) ( string literal )
PC ORG @ 0x2d + ! ( stable ABI JP )
( Like (n) but instead of being followed by a 2 bytes
  number, it's followed by a string. When called, puts the
  string's address on PS )
    IY PUSH, HL POP, ( <-- IP )
    E (HL) LDrr, D 0 LDri,
    DE INCd,
    DE ADDIYd,
    HL PUSH,
;CODE
Extract (s) code from stable ABI zone Only its jump addr remains. 2020-07-05 22:54:22 +10:00			`( Native words )`
z80: optimize chkPS Inline it in next and make chkPS, call a newly reserved label for it directly, removing a layer of indirection. This frees a spot in the stable ABI. 2020-06-14 23:48:10 +10:00			`CODE EXECUTE`
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-28 12:01:56 +10:00			`DE POP,`
z80: optimize chkPS Inline it in next and make chkPS, call a newly reserved label for it directly, removing a layer of indirection. This frees a spot in the stable ABI. 2020-06-14 23:48:10 +10:00			`chkPS,`
z80: use named labels for boot routines The usage of numerotated labels for this was becoming severly confusing. 2020-06-18 21:16:40 +10:00			`JR, lblexec BWR ( execute-B301 )`
Extract (s) code from stable ABI zone Only its jump addr remains. 2020-07-05 22:54:22 +10:00			`CODE (s) ( string literal )`
			`PC ORG @ 0x2d + ! ( stable ABI JP )`
			`( Like (n) but instead of being followed by a 2 bytes`
			`number, it's followed by a string. When called, puts the`
			`string's address on PS )`
			`IY PUSH, HL POP, ( <-- IP )`
			`E (HL) LDrr, D 0 LDri,`
			`DE INCd,`
			`DE ADDIYd,`
			`HL PUSH,`
Copy boot.z80 to blkfs 2020-04-23 11:19:12 +10:00			`;CODE`