[gforth] / gforth / stuff.fs  

gforth: gforth/stuff.fs

Diff for /gforth/stuff.fs between version 1.12 and 1.13

version 1.12, Mon Nov 8 22:01:09 1999 UTC version 1.13, Fri Dec 3 18:24:23 1999 UTC
Line 36 
Line 36 
   
 \ DMIN and DMAX  \ DMIN and DMAX
   
 : dmin ( d1 d2 -- d ) \ double  : dmin ( d1 d2 -- d ) \ double d-min
     2over 2over d> IF  2swap  THEN 2drop ;      2over 2over d> IF  2swap  THEN 2drop ;
   
 : dmax ( d1 d2 -- d ) \ double  
   : dmax ( d1 d2 -- d ) \ double d-max
     2over 2over d< IF  2swap  THEN 2drop ;      2over 2over d< IF  2swap  THEN 2drop ;
   
 \ shell commands  \ shell commands


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

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help