--- gforth/colorize.fs	1998/12/08 22:02:36	1.4
+++ gforth/colorize.fs	1999/04/16 22:19:51	1.5
@@ -51,7 +51,8 @@ Color: Hig#
 
 : .name (.name) ct @ attr! ;
 
-: words  context @
+\ nac31mar1999 fixed up for 0.4.0 to match std words
+: words  context @ wordlist-id
          BEGIN  @ dup  WHILE  dup (.name)  REPEAT drop
          ct @ attr! ;