--- gforth/code.fs	1996/07/16 20:57:06	1.4
+++ gforth/code.fs	1996/08/21 14:58:37	1.5
@@ -42,7 +42,7 @@ vocabulary assembler ( -- ) \ tools-ext
 :noname ( -- colon-sys )
     align here lastxt code-address!
     defstart init-asm ;
-special: ;code
+interpret/compile: ;code
 
 : end-code ( colon-sys -- )	\ gforth	end_code
     ( end a code definition )