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

8 lines
174 B
Plaintext
Raw Normal View History

Move all parsing words to Inner core This allows us to get rid of the (parse*) indirection.
2020-05-03 11:21:47 +10:00
: INTERPRET
BEGIN
Make INTERPRET break on ASCII EOT This should allow me to simplify LOAD's exit mechanism on block end.
2020-05-14 11:44:46 +10:00
WORD DUP C@ EOT? IF DROP EXIT THEN
Move all parsing words to Inner core This allows us to get rid of the (parse*) indirection.
2020-05-03 11:21:47 +10:00
(find)
NOT IF (parse) ELSE EXECUTE THEN
C<? NOT IF LIT< (ok) (find) IF EXECUTE THEN THEN
Move core's blk to xcomp core (low and high) TODO: implement X['] so that I can remove those XCURRENT patterns.
2020-05-14 00:14:23 +10:00
AGAIN ;