From: Bruno Haible <bruno@clisp.org>
Date: Sun, 13 Apr 2008 19:20:17 +0000 (+0200)
Subject: Avoid negating 0.0L - it yields a wrong result on HP-UX/hppa.
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=26083e055865419be834cbbd853960a567288188;p=pspp

Avoid negating 0.0L - it yields a wrong result on HP-UX/hppa.
---

diff --git a/ChangeLog b/ChangeLog
index 58303a3c0c..b9b9692fc2 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2008-04-13  Bruno Haible  <bruno@clisp.org>
+
+	Make test-signbit pass on HP-UX/hppa.
+	* tests/test-signbit.c (minus_zerol): New variable.
+	(test_signbitl): Use it.
+
 2008-04-13  Bruno Haible  <bruno@clisp.org>
 
 	Make truncl work on OSF/1 4.0.
diff --git a/tests/test-signbit.c b/tests/test-signbit.c
index 1d1a2a84a7..2245e02445 100644
--- a/tests/test-signbit.c
+++ b/tests/test-signbit.c
@@ -39,6 +39,9 @@
 float zerof = 0.0f;
 double zerod = 0.0;
 long double zerol = 0.0L;
+/* We cannot use the expression '-zerol' here, because on HP-UX/hppa it
+   evaluates to 0.0L, not -0.0L.  */
+long double minus_zerol = -0.0L;
 
 static void
 test_signbitf ()
@@ -140,7 +143,7 @@ test_signbitl ()
   ASSERT (signbit (-2.718e-30L));
   /* Zeros.  */
   ASSERT (!signbit (0.0L));
-  if (1.0L / -zerol < 0)
+  if (1.0L / minus_zerol < 0)
     ASSERT (signbit (-0.0L));
   else
     ASSERT (!signbit (-0.0L));