collapseos/blk/328

CODE S=
    DE  POPqq,
    HL  POPqq,
    chkPS,
    BEGIN,
        LDA(DE),
        (HL) CPr,
        JRNZ, BREAK, ( not equal? break early. NZ is set. )
        A ORr,   ( if our char is null, stop )
        HL INCss,
        DE INCss,
    JRNZ, AGAIN,
    PUSHZ,
;CODE
Copy boot.z80 to blkfs 2020-04-23 11:19:12 +10:00			`CODE S=`
			`DE POPqq,`
			`HL POPqq,`
			`chkPS,`
z80a: add BREAK, instruction This allows us to remove a lot of labels usage in boot code. This commit has no effect on forth.bin. 2020-05-17 11:02:50 +10:00			`BEGIN,`
Copy boot.z80 to blkfs 2020-04-23 11:19:12 +10:00			`LDA(DE),`
			`(HL) CPr,`
z80a: add BREAK, instruction This allows us to remove a lot of labels usage in boot code. This commit has no effect on forth.bin. 2020-05-17 11:02:50 +10:00			`JRNZ, BREAK, ( not equal? break early. NZ is set. )`
Copy boot.z80 to blkfs 2020-04-23 11:19:12 +10:00			`A ORr, ( if our char is null, stop )`
			`HL INCss,`
			`DE INCss,`
z80a: add BREAK, instruction This allows us to remove a lot of labels usage in boot code. This commit has no effect on forth.bin. 2020-05-17 11:02:50 +10:00			`JRNZ, AGAIN,`
Copy boot.z80 to blkfs 2020-04-23 11:19:12 +10:00			`PUSHZ,`
			`;CODE`