Diff for /gforth/float.fs between versions 1.43 and 1.45

version 1.43, 2004/05/08 17:14:30 version 1.45, 2004/12/08 11:26:59
Line 221  set-current Line 221  set-current
     ELSE      ELSE
         fnegate f~rel          fnegate f~rel
     THEN ;      THEN ;
   
   \ proposals from Krishna Myeni in <cjsp2d$47l$1@ngspool-d02.news.aol.com>
   \ not sure if they are a good idea
   
   : FTRUNC ( r1 -- r2 )
       \ round towards 0
       \ !! should be implemented properly
       F>D D>F ;
   
   : FMOD ( r1 r2 -- r )
       \ remainder of r1/r2
       FOVER FOVER F/ ftrunc F* F- ;

Removed from v.1.43  
changed lines
  Added in v.1.45


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