izaya
/
collapseos
mirror of https://github.com/hsoft/collapseos.git
1
0
Fork 0
Code Issues Releases Wiki Activity
collapseos/blk/263

16 lines
427 B
Plaintext
Raw Normal View History

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 ;