collapseos/blk/399

: LIT< 0x2b ( s ) , WORD DUP C@ 1+ MOVE, ; IMMEDIATE
: BEGIN H@ ; IMMEDIATE
: AGAIN 0x3b ( br ) , H@ - _bchk C, ; IMMEDIATE
: UNTIL 0x3f ( ?br ) , H@ - _bchk C, ; IMMEDIATE
: [ INTERPRET ; IMMEDIATE
: ] R> DROP ;
: COMPILE ' LITN ['] , , ; IMMEDIATE
: [COMPILE] ' , ; IMMEDIATE
: ['] ' LITN ; IMMEDIATE
Extract (s) code from stable ABI zone Only its jump addr remains. 2020-07-05 22:54:22 +10:00			`: LIT< 0x2b ( s ) , WORD DUP C@ 1+ MOVE, ; IMMEDIATE`
Move Cross-compiled core from B390 to B350 and renamed it "Core words". Also, reworded the presentation. 2020-05-16 12:44:49 +10:00			`: BEGIN H@ ; IMMEDIATE`
Make br cells 1 byte wide The 1 byte limitation has been effective for a while now, but I hadn't made the move yet, I wanted to see if the limitation would cause me problems. It doesn't. Doing this now slightly facilitates the IY->BC move in z80. Bootstrapping: if you try to recreate the CVM binary from the previous commit with this code, you'll have bootstrapping problems. The first bootstrap will compile a binary with 2-bytes wide cells but branching conditionals that yields 1-byte cells. That's bad. I got around the issue by temporarily inserting a "397 399 LOADR" instruction in cvm/xcomp.fs, right before the xcomp overrides. This way, I force 1-byte cells everywhere on the first compiliation, which then allows me to apply the logic change in cvm/vm.c and have a properly running binary. 2020-07-06 21:27:50 +10:00			`: AGAIN 0x3b ( br ) , H@ - _bchk C, ; IMMEDIATE`
			`: UNTIL 0x3f ( ?br ) , H@ - _bchk C, ; IMMEDIATE`
Move Cross-compiled core from B390 to B350 and renamed it "Core words". Also, reworded the presentation. 2020-05-16 12:44:49 +10:00			`: [ INTERPRET ; IMMEDIATE`
			`: ] R> DROP ;`
Remove LITA It was useful when we still had the relinker, but now it has no use. I was waiting a bit to see if the distinction would be useful again, but it seems like it won't. 2020-06-18 03:50:42 +10:00			`: COMPILE ' LITN ['] , , ; IMMEDIATE`
Move Cross-compiled core from B390 to B350 and renamed it "Core words". Also, reworded the presentation. 2020-05-16 12:44:49 +10:00			`: [COMPILE] ' , ; IMMEDIATE`
Refer to stable wordref by direct offset in "hot zone" immediates Previously, it was impossible to cross-compile Collapse OS from a binary-offsetted Collapse OS because stable ABI wordrefs would have a wrongly offsetted address. This solves the problem by replacing those wordrefs by direct, hardcoded stable ABI offset references. 2020-07-05 21:09:11 +10:00			`: ['] ' LITN ; IMMEDIATE`