collapseos/blk/263

VARIABLE XCURRENT
: XCON XCURRENT CURRENT* ! ;
: XCOFF 0x02 RAM+ CURRENT* ! ;
: (xentry) XCON (entry) XCOFF ;
: XCREATE (xentry) 2 C, ;
: XCODE XCON CODE XCOFF ;
: XIMM XCON IMMEDIATE XCOFF ;
: _xapply ( a -- a-off )
    DUP ORG @ > IF ORG @ - BIN( @ + THEN ;
: X' XCON ' XCOFF ;
: X['] XCON ' _xapply LITN XCOFF ;
: XCOMPILE
    XCON ' _xapply LITN
    LIT< , FIND DROP _xapply , XCOFF ;
: X[COMPILE] XCON ' _xapply , XCOFF ;
Move xcomp to blocks 2020-04-22 10:30:14 +10:00			`VARIABLE XCURRENT`
			`: XCON XCURRENT CURRENT* ! ;`
			`: XCOFF 0x02 RAM+ CURRENT* ! ;`
			`: (xentry) XCON (entry) XCOFF ;`
Make word routines into word types Instead of having wordref point to core word routines, I made them into word 4 word types. It liberates space into the stable ABI and should make porting to other arches easier. I'm also thinking of combining word type with the namelen field for precious bytes saving, but not now... 2020-06-18 11:41:01 +10:00			`: XCREATE (xentry) 2 C, ;`
Move xcomp to blocks 2020-04-22 10:30:14 +10:00			`: XCODE XCON CODE XCOFF ;`
			`: XIMM XCON IMMEDIATE XCOFF ;`
xcomp: add XCOMPILE and X[COMPILE] This allows us to move words like ABORT" to xcomp-core, which is I think the last roadblock before being able to unify all drivers into a single xcomp layer. 2020-05-13 11:08:18 +10:00			`: _xapply ( a -- a-off )`
			`DUP ORG @ > IF ORG @ - BIN( @ + THEN ;`
Improve late-stage xcomp 2020-05-14 23:45:42 +10:00			`: X' XCON ' XCOFF ;`
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			`: X['] XCON ' _xapply LITN XCOFF ;`
xcomp: add XCOMPILE and X[COMPILE] This allows us to move words like ABORT" to xcomp-core, which is I think the last roadblock before being able to unify all drivers into a single xcomp layer. 2020-05-13 11:08:18 +10:00			`: XCOMPILE`
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			`XCON ' _xapply LITN`
Rename (find) to FIND I hadn't noticed that this word was almost ANS compliant. 2020-05-16 02:50:14 +10:00			`LIT< , FIND DROP _xapply , XCOFF ;`
xcomp: add XCOMPILE and X[COMPILE] This allows us to move words like ABORT" to xcomp-core, which is I think the last roadblock before being able to unify all drivers into a single xcomp layer. 2020-05-13 11:08:18 +10:00			`: X[COMPILE] XCON ' _xapply , XCOFF ;`