--- gforth/code.fs	1996/09/23 08:52:47	1.7
+++ gforth/code.fs	1999/12/03 18:24:21	1.9
@@ -1,6 +1,6 @@
 \ ASSEMBLER, CODE etc.
 
-\ Copyright (C) 1995 Free Software Foundation, Inc.
+\ Copyright (C) 1995,1996,1997 Free Software Foundation, Inc.
 
 \ This file is part of Gforth.
 
@@ -24,7 +24,7 @@
 
 vocabulary assembler ( -- ) \ tools-ext
 
-: init-asm ( -- )
+: init-asm ( -- ) \ gforth
     also assembler ;
 
 : code ( "name" -- colon-sys )	\ tools-ext
@@ -53,3 +53,4 @@ interpret/compile: ;code ( compilation.
     ( end a code definition )
     lastxt here over - flush-icache
     previous ?struc reveal ;
+