[gforth] / gforth / savesys.fs  

gforth: gforth/savesys.fs

Diff for /gforth/savesys.fs between version 1.4 and 1.5

version 1.4, Sat Sep 14 08:20:20 2002 UTC version 1.5, Thu Feb 6 16:49:17 2003 UTC
Line 41 
Line 41 
 : dump-fi ( addr u -- )  : dump-fi ( addr u -- )
     w/o bin create-file throw >r      w/o bin create-file throw >r
     update-image-included-files      update-image-included-files
       update-image-order
     here forthstart - forthstart 2 cells + !      here forthstart - forthstart 2 cells + !
     forthstart      forthstart
     begin \ search for start of file ("#! " at a multiple of 8)      begin \ search for start of file ("#! " at a multiple of 8)

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help