izaya/collapseos
1
0
Fork 0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-10 09:38:06 +11:00
Code Issues Releases Wiki Activity
11f8843a16
collapseos/blk/263

16 lines
429 B
Plaintext
Raw Normal View History

z80: fix tricky memory initialization issue Among random "better safe than sorry" changes, the real fix is in changing "4" for "5" above _find declaration. This off-by-one error had that word, which is the root word in z80, have a 0x01 prev field instead of a 0x00 one. When all memory was initialized to zero, it didn't matter, we ended up hitting 0 prev and considered ourselves properly at the end of dict. When memory wasn't initialized, however, we would end up jumping at all kinds of places, leading to random behavior.
2020-08-16 06:37:58 +10:00
CREATE XCURRENT 0 ,
Move xcomp to blocks
2020-04-22 10:30:14 +10:00
: 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 ;
Reference in New Issue Copy Permalink