[gforth] / gforth / kernel / files.fs  

gforth: gforth/kernel/files.fs

Diff for /gforth/kernel/files.fs between version 1.1 and 1.2

version 1.1, Wed May 21 20:40:14 1997 UTC version 1.2, Sun Aug 31 19:32:30 1997 UTC
Line 67 
Line 67 
   
 \ additional words only needed if there is file support  \ additional words only needed if there is file support
   
   Warnings off
   
 : ( ( compilation 'ccc<close-paren>' -- ; run-time -- ) \ core,file     paren  : ( ( compilation 'ccc<close-paren>' -- ; run-time -- ) \ core,file     paren
     loadfile @ 0= IF  postpone (  EXIT  THEN      loadfile @ 0= IF  postpone (  EXIT  THEN
     BEGIN      BEGIN
Line 84 
Line 86 
         THEN          THEN
     REPEAT ; immediate      REPEAT ; immediate
   
   Warnings on

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help