--- gforth/ans-report.fs 2003/01/10 16:57:25 1.8 +++ gforth/ans-report.fs 2003/03/09 15:16:45 1.10 @@ -1,6 +1,6 @@ \ report words used from the various wordsets -\ Copyright (C) 1996,1998,1999 Free Software Foundation, Inc. +\ Copyright (C) 1996,1998,1999,2003 Free Software Foundation, Inc. \ This file is part of Gforth. @@ -138,7 +138,7 @@ ans-report-words definitions \ >body ! ; dup @ docol: <> -12 and throw \ for colon defs only >body ['] branch xt>threaded over ! - cell+ >r >body r@ - r> ! ; + cell+ >r >body r> ! ; forth definitions ans-report-words