[gforth] / gforth / history.fs  

gforth: gforth/history.fs

Diff for /gforth/history.fs between version 1.28 and 1.29

version 1.28, Mon Sep 17 09:19:22 2001 UTC version 1.29, Sat Sep 14 08:20:19 2002 UTC
Line 72 
Line 72 
         nip nip          nip nip
     THEN ;      THEN ;
   
 s" os-class" environment? [IF] s" unix" compare 0= [ELSE] true [THEN]  s" os-class" environment? [IF] s" unix" str= [ELSE] true [THEN]
 [IF]  [IF]
 : history-file ( -- addr u )  : history-file ( -- addr u )
     s" GFORTHHIST" getenv dup 0= IF      s" GFORTHHIST" getenv dup 0= IF

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help