forth: don't use "(entry)" in dummy.fs

Because icore.fs defines it in a "not-for-runtime" manner, dummy.fs
executing it had ill effects. We use a workaround instead.
This commit is contained in:
Virgil Dupras 2020-03-27 21:15:16 -04:00
parent 409a9f87e5
commit 41cd8086d4
1 changed files with 4 additions and 2 deletions

View File

@ -1,7 +1,9 @@
( When building a compiled dict, always include this unit at ( When building a compiled dict, always include this unit at
the end of it so that Forth knows how to hook LATEST into the end of it so that Forth knows how to hook LATEST into
it ) it. We don't use the word "(entry)" to avoid messing up
(entry) _ with icore setup. )
CREATE _
H@ 2 - HERE !
( After each dummy word like this, we poke IO port 2 with our ( After each dummy word like this, we poke IO port 2 with our
current HERE value. The staging executable needs it to know current HERE value. The staging executable needs it to know