Mercurial > emacs
diff src/floatfns.c @ 16929:a6b5ec9a51b4
[!HAVE_RINT] (rint): Convert macro to an actual
function, so we can take its address.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Sat, 25 Jan 1997 09:50:25 +0000 |
parents | bdafa1f28a64 |
children | bfa27111d35b |
line wrap: on
line diff
--- a/src/floatfns.c Sat Jan 25 06:47:28 1997 +0000 +++ b/src/floatfns.c Sat Jan 25 09:50:25 1997 +0000 @@ -123,10 +123,6 @@ #define sinh(x) ((exp(x)-exp(-x))*0.5) #endif /* VMS */ -#ifndef HAVE_RINT -#define rint(x) (floor((x)+0.5)) -#endif - static SIGTYPE float_error (); /* Nonzero while executing in floating point. @@ -828,6 +824,15 @@ return q + (abs_r + (q & 1) <= abs_r1 ? 0 : (i2 ^ r) < 0 ? -1 : 1); } +#ifndef HAVE_RINT +static double +rint (d) + double d; +{ + return floor(d + 0.5); +} +#endif + static double double_identity (d) double d;