--- gforth/kernel/getdoers.fs 2003/08/18 19:29:16 1.9 +++ gforth/kernel/getdoers.fs 2005/12/31 15:46:14 1.11 @@ -1,6 +1,6 @@ \ -\ Copyright (C) 1996, 1998,1999,2003 Free Software Foundation, Inc. +\ Copyright (C) 1996, 1998,1999,2003,2005 Free Software Foundation, Inc. \ This file is part of Gforth. @@ -46,7 +46,7 @@ doer? :douser [IF] doer? :dodefer [IF] : dodefer: ( -- addr ) \ gforth \G The code address of a @code{defer}ed word. - ['] parser >code-address ; + ['] parser1 >code-address ; [THEN] doer? :dofield [IF]