Diff for /gforth/look.fs between versions 1.6 and 1.7

version 1.6, 1996/08/26 10:07:20 version 1.7, 1997/03/27 13:31:02
Line 42  decimal Line 42  decimal
         dup 0<> ;          dup 0<> ;
   
 : look ( cfa -- lfa flag )  : look ( cfa -- lfa flag )
         dup forthstart <          dup dictionary-end forthstart within
         IF          IF
             PrimStart (look)              PrimStart (look)
         ELSE          ELSE

Removed from v.1.6  
changed lines
  Added in v.1.7


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>