[gforth] / gforth / filedump.fs  

gforth: gforth/filedump.fs

Diff for /gforth/filedump.fs between version 1.10 and 1.11

version 1.10, Mon Aug 25 14:17:44 2003 UTC version 1.11, Sun Jan 25 19:35:13 2004 UTC
Line 32 
Line 32 
   r> close-file throw ;    r> close-file throw ;
   
 script? [IF]  script? [IF]
    : alldump argc @ 2 ?DO I arg 2dup type ." :" filedump LOOP ;     : alldump argc @ 1 ?DO I arg 2dup type ." :" filedump LOOP ;
    alldump bye     alldump bye
 [THEN]  [THEN]

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help