function, so we can take its address.
#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.
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;