1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-27 14:38:05 +11:00

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

View File

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