collapseos/blk/808

lblnext BSET PC 0x1d - ORG @ 0x1b + ! ( next )
    ( RSP check )
    AX RS_ADDR MOVxI, BP AX CMPxx,
    IFC, ( BP < RS_ADDR )
        DI 0x06 MOVxm, JMPs, L1 FWRs ( execute )
    THEN,
    DI DX MOVxx, ( <-- IP ) DX INCx, DX INCx,
    DI [DI] MOVx[], ( wordref )
    ( continue to execute ) L1 FSET
Extract (s) code from stable ABI zone Only its jump addr remains. 2020-07-05 22:54:22 +10:00			`lblnext BSET PC 0x1d - ORG @ 0x1b + ! ( next )`
			`( RSP check )`
			`AX RS_ADDR MOVxI, BP AX CMPxx,`
			`IFC, ( BP < RS_ADDR )`
			`DI 0x06 MOVxm, JMPs, L1 FWRs ( execute )`
			`THEN,`
			`DI DX MOVxx, ( <-- IP ) DX INCx, DX INCx,`
			`DI [DI] MOVx[], ( wordref )`
			`( continue to execute ) L1 FSET`