collapseos/blk/814

mirror of https://github.com/hsoft/collapseos.git synced 2024-11-24 03:08:06 +11:00
L1 BSET PC 3 - ORG @ 0x34 + ! ( execute -- BX -> wordref )
    AH AH XORrr,
    AL [BX] MOVr[],
    BX INCx, ( PFA )
    AX JMPr,
pcat: implement execute and nativeWord 2020-06-15 05:27:26 +10:00			`L1 BSET PC 3 - ORG @ 0x34 + ! ( execute -- BX -> wordref )`
			`AH AH XORrr,`
			`AL [BX] MOVr[],`
			`BX INCx, ( PFA )`
pcat: read LATEST and jump to it 2020-06-15 04:51:32 +10:00			`AX JMPr,`