--- gforth/look.fs 1997/08/31 19:31:29 1.9 +++ gforth/look.fs 1998/12/08 22:02:46 1.11 @@ -1,6 +1,6 @@ \ LOOK.FS xt -> lfa 22may93jaw -\ Copyright (C) 1995 Free Software Foundation, Inc. +\ Copyright (C) 1995,1996,1997 Free Software Foundation, Inc. \ This file is part of Gforth. @@ -46,7 +46,7 @@ decimal [IFUNDEF] look has? ec [IF] -has-rom +has? rom [IF] : look dup [ unlock rom-dictionary area lock ]