Diff for /gforth/see.fs between versions 1.52 and 1.53

version 1.52, 2003/03/22 10:04:07 version 1.53, 2004/01/13 16:00:55
Line 794  Defer discode ( addr u -- ) \ gforth Line 794  Defer discode ( addr u -- ) \ gforth
         else \ interpret/compile word          else \ interpret/compile word
             r@ xt-see-xt cr              r@ xt-see-xt cr
             swap xt-see-xt cr              swap xt-see-xt cr
             ." interpret/compile " over .name (.immediate)              ." interpret/compile: " over .name drop
         then          then
     then      then
     rdrop drop ;      rdrop drop ;

Removed from v.1.52  
changed lines
  Added in v.1.53


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