--- gforth/kernel/getdoers.fs 2000/10/29 20:27:03 1.6 +++ gforth/kernel/getdoers.fs 2003/01/08 10:25:34 1.7 @@ -55,7 +55,7 @@ doer? :dofield [IF] ['] reveal-method >code-address ; [THEN] -has? prims 0= [IF] +true [IF] \ !! don't know what to put here : dodoes: ( -- addr ) \ gforth \G The code address of a @code{field}??? ['] spaces >code-address ;