[gforth] / gforth / kernel / paths.fs  

gforth: gforth/kernel/paths.fs

Diff for /gforth/kernel/paths.fs between version 1.35 and 1.36

version 1.35, Thu Dec 30 21:46:14 2010 UTC version 1.36, Fri Dec 31 14:37:13 2010 UTC
Line 65 
Line 65 
 Variable ofile  Variable ofile
 Variable tfile  Variable tfile
   
 : make-path ( addr -- )  >r r@ off s" " r> $! ;  
   
 : os-cold ( -- )  : os-cold ( -- )
     fpath make-path      fpath $init
     ofile make-path      ofile $init
     tfile make-path      tfile $init
     pathstring 2@ fpath only-path      pathstring 2@ fpath only-path
     init-included-files ;      init-included-files ;
   


Generate output suitable for use with a patch program
Legend:
Removed from v.1.35  
changed lines
  Added in v.1.36

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help