X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=forth.jl.git;a=blobdiff_plain;f=src%2Fforth.jl;h=a1a479970a797af829c01f1bc142bbccb3b63a04;hp=6afe492e4280322ff0c759209a640b3f063dc020;hb=492989e5e479cebefe9213a0c350534528d5f819;hpb=30a093845e2d1097242e948bb577fb71f73bc860

diff --git a/src/forth.jl b/src/forth.jl
index 6afe492..a1a4799 100644
--- a/src/forth.jl
+++ b/src/forth.jl
@@ -1243,7 +1243,9 @@ INCLUDED_CFA = defWord("INCLUDED",
     BRANCH_CFA, -14,                            # Loop
     SOURCE_ID_VAR_CFA, FETCH_CFA,
     CLOSE_FILE_CFA, DROP_CFA,                   # Close file
-    SOURCE_ID_VAR_CFA, STORE_CFA,                   # Restore input source
+    SOURCE_ID_VAR_CFA, STORE_CFA,               # Restore input source
+    LIT_CFA, 0, NUMIB_CFA, STORE_CFA,           # Zero #IB
+    LIT_CFA, 0, TOIN_CFA, STORE_CFA,            # Zero >IN
     EXIT_CFA])
 
 INCLUDE_CFA = defWord("INCLUDE", [LIT_CFA, 32, WORD_CFA,