[gforth] / gforth / extend.fs  

gforth: gforth/extend.fs

Diff for /gforth/extend.fs between version 1.37 and 1.38

version 1.37, Fri Feb 4 14:52:30 2000 UTC version 1.38, Thu Apr 27 08:51:33 2000 UTC
Line 146 
Line 146 
     >in @      >in @
     loadfile @      loadfile @
     if      if
         loadfile @ file-position throw          loadfile @ file-position throw #TIB @ 1+ 0 d- \ !! bug for CRLF and EOF
     else      else
         blk @          blk @
         linestart @          linestart @
Line 168 
Line 168 
     loadfile @ 0<>      loadfile @ 0<>
     if      if
         loadfile @ reposition-file throw          loadfile @ reposition-file throw
           refill 0= -36 and throw \ should never throw
     else      else
         linestart !          linestart !
         blk !          blk !

Generate output suitable for use with a patch program
Legend:
Removed from v.1.37  
changed lines
  Added in v.1.38
CVS Admin

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help