Diff for /gforth/stuff.fs between versions 1.11 and 1.14

version 1.11, 1999/03/23 20:24:20 version 1.14, 2000/05/15 14:04:10
Line 36  AUser CSP Line 36  AUser CSP
   
 \ 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
   
 0 Value $? ( -- n ) \ gforth dollar-question  0 Value $? ( -- n ) \ gforth dollar-question
 \G VALUE: The exit status returned by the most recently executed  \G @code{Value} -- the exit status returned by the most recently executed
 \G @code{system} command.  \G @code{system} command.
   
 : system ( addr u -- ) \ gforth  : system ( c-addr u -- ) \ gforth
 \G Pass the string specified by @var{c-addr, u} to the host operating system  \G Pass the string specified by @var{c-addr u} to the host operating system
 \G for execution in a sub-shell.  \G for execution in a sub-shell.
     (system) throw TO $? ;      (system) throw TO $? ;
   

Removed from v.1.11  
changed lines
  Added in v.1.14


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>