1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-07-27 07:10:19 +10:00
collapseos/forth/dummy.fs

12 lines
306 B
Forth
Raw Normal View History

( 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) _
( After each dummy word like this, we poke IO port 2 with our
current HERE value. The staging executable needs it to know
what to dump. )
H@ 256 / 2 PC!
H@ 2 PC!