[gforth] / gforth / float.fs  

gforth: gforth/float.fs

Diff for /gforth/float.fs between version 1.43 and 1.44

version 1.43, Sat May 8 17:14:30 2004 UTC version 1.44, Wed Dec 8 11:05:08 2004 UTC
Line 221 
Line 221 
     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
       \ !! should be implemented properly
       FOVER FOVER F/ ftrunc F* F- ;

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help