From 4b5878a8c6ced525ba65623cbbfb59b4532a677e Mon Sep 17 00:00:00 2001
From: Karl Heuer <kwzh@gnu.org>
Date: Sat, 25 Jan 1997 09:50:25 +0000
Subject: [PATCH] [!HAVE_RINT] (rint): Convert macro to an actual function, so
 we can take its address.

---
 src/floatfns.c | 13 +++++++++----
 1 file changed, 9 insertions(+), 4 deletions(-)

diff --git a/src/floatfns.c b/src/floatfns.c
index 1518006c5b2..614506e7c4f 100644
--- a/src/floatfns.c
+++ b/src/floatfns.c
@@ -123,10 +123,6 @@ extern int errno;
 #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 @@ round2 (i1, i2)
   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;