Diff for /gforth/wf.fs between versions 1.25 and 1.26

version 1.25, 2004/06/24 20:50:40 version 1.26, 2004/07/18 13:31:06
Line 232  Defer parse-line Line 232  Defer parse-line
   
 : link-warn? ( -- ) \ local links only  : link-warn? ( -- ) \ local links only
     link $@ ': scan nip ?EXIT      link $@ ': scan nip ?EXIT
     link $@ r/o open-file nip IF      link $@ '# $split 2drop r/o open-file nip IF
         s" Dead Link '" stderr write-file throw          s" Dead Link '" stderr write-file throw
         link $@ stderr write-file throw          link $@ stderr write-file throw
         s\" ' !!!\n" stderr write-file throw          s\" ' !!!\n" stderr write-file throw

Removed from v.1.25  
changed lines
  Added in v.1.26


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