collapseos/blk/806

ORG @ 0x4c + HERE !
H@ 4 + XCURRENT ! ( make next CODE have 0 prev field )
CODE (br) ( 0x53 ) L2 BSET ( used in br? )
    DI DX MOVxx, DI [DI] MOVx[], DX DI ADDxx,
;CODE NOP, NOP,
CODE (?br) ( 0x67 )
    AX POPx, AX AX ORxx, JZ, L2 @ RPCs, ( False, branch )
    ( True, skip next 2 bytes and don't branch )
    L1 BSET ( loop will jump here ) DX INCx, DX INCx,
;CODE NOP, NOP, NOP, NOP, NOP,
Extract EXIT code from stable ABI zone 2020-07-06 03:41:12 +10:00			`ORG @ 0x4c + HERE !`
			`H@ 4 + XCURRENT ! ( make next CODE have 0 prev field )`
pcat: move drivers and xcomp to blkfs 2020-06-23 04:20:46 +10:00			`CODE (br) ( 0x53 ) L2 BSET ( used in br? )`
			`DI DX MOVxx, DI [DI] MOVx[], DX DI ADDxx,`
			`;CODE NOP, NOP,`
			`CODE (?br) ( 0x67 )`
			`AX POPx, AX AX ORxx, JZ, L2 @ RPCs, ( False, branch )`
			`( True, skip next 2 bytes and don't branch )`
			`L1 BSET ( loop will jump here ) DX INCx, DX INCx,`
			`;CODE NOP, NOP, NOP, NOP, NOP,`