--- gforth/look.fs	1997/08/31 19:31:29	1.9
+++ gforth/look.fs	1997/09/13 12:04:56	1.10
@@ -46,7 +46,7 @@ decimal
 [IFUNDEF] look
 has? ec [IF]
 
-has-rom 
+has? rom 
 [IF]
 : look
     dup [ unlock rom-dictionary area lock ]