From: Eric Blake <ebb9@byu.net>
Date: Tue, 11 Dec 2007 21:00:26 +0000 (-0700)
Subject: Fix bug with -0.0L in previous patch.
X-Git-Tag: v0.1~7929
X-Git-Url: https://gitweb.git.savannah.gnu.org/gitweb/?a=commitdiff_plain;h=6e2c5ce9d2220c2be7d35a0be15e9e6827305476;p=gnulib.git

Fix bug with -0.0L in previous patch.

* lib/isnan.c (rpl_isnanl): Make robust to -0.0L and pad bits.
* tests/test-isnan.c (main): Also test on zeroes.
* tests/test-isnanf.c (main): Likewise.
* tests/test-isnanl.h (main): Likewise.

Signed-off-by: Eric Blake <ebb9@byu.net>
---

diff --git a/ChangeLog b/ChangeLog
index 127f9a5469..a954c4cbde 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,11 @@
 2007-12-11  Eric Blake  <ebb9@byu.net>
 
+	Fix bug with -0.0L in previous patch.
+	* lib/isnan.c (rpl_isnanl): Make robust to -0.0L and pad bits.
+	* tests/test-isnan.c (main): Also test on zeroes.
+	* tests/test-isnanf.c (main): Likewise.
+	* tests/test-isnanl.h (main): Likewise.
+
 	Detect pseudo-denormals on x86 even when cross-compiling.
 	* lib/isnan.c (rpl_isnanl) [!KNOWN_EXPBIT0_LOCATION
 	&& USE_LONG_DOUBLE && x86]: Add one more check to filter out
diff --git a/lib/isnan.c b/lib/isnan.c
index 182a7bd5f5..04bf7f0d9b 100644
--- a/lib/isnan.c
+++ b/lib/isnan.c
@@ -146,8 +146,10 @@ FUNC (DOUBLE x)
       memory_double m1;
       memory_double m2;
 
+      memset (&m1.value, 0, SIZE);
+      memset (&m2.value, 0, SIZE);
       m1.value = x;
-      m2.value = x + 0;
+      m2.value = x + (x ? 0.0L : -0.0L);
       if (memcmp (&m1.value, &m2.value, SIZE) != 0)
         return 1;
 # endif
diff --git a/tests/test-isnan.c b/tests/test-isnan.c
index 717ad7a9c4..3541af4be5 100644
--- a/tests/test-isnan.c
+++ b/tests/test-isnan.c
@@ -57,6 +57,8 @@ main ()
   ASSERT (!isnan (-2.718));
   ASSERT (!isnan (-2.718e30));
   ASSERT (!isnan (-2.718e-30));
+  ASSERT (!isnan (0.0));
+  ASSERT (!isnan (-0.0));
   /* Infinite values.  */
   ASSERT (!isnan (1.0 / 0.0));
   ASSERT (!isnan (-1.0 / 0.0));
diff --git a/tests/test-isnanf.c b/tests/test-isnanf.c
index 898e6edff9..c433089900 100644
--- a/tests/test-isnanf.c
+++ b/tests/test-isnanf.c
@@ -57,6 +57,8 @@ main ()
   ASSERT (!isnanf (-2.718f));
   ASSERT (!isnanf (-2.718e30f));
   ASSERT (!isnanf (-2.718e-30f));
+  ASSERT (!isnanf (0.0f));
+  ASSERT (!isnanf (-0.0f));
   /* Infinite values.  */
   ASSERT (!isnanf (1.0f / 0.0f));
   ASSERT (!isnanf (-1.0f / 0.0f));
diff --git a/tests/test-isnanl.h b/tests/test-isnanl.h
index 588545705a..657948c943 100644
--- a/tests/test-isnanl.h
+++ b/tests/test-isnanl.h
@@ -47,6 +47,8 @@ main ()
   ASSERT (!isnanl (-2.718L));
   ASSERT (!isnanl (-2.718e30L));
   ASSERT (!isnanl (-2.718e-30L));
+  ASSERT (!isnanl (0.0L));
+  ASSERT (!isnanl (-0.0L));
   /* Infinite values.  */
   ASSERT (!isnanl (1.0L / 0.0L));
   ASSERT (!isnanl (-1.0L / 0.0L));