diff --git a/forth/dummy.fs b/forth/dummy.fs index 651966a..bb4bae0 100644 --- a/forth/dummy.fs +++ b/forth/dummy.fs @@ -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