]> Savannah Git Hosting - gnulib.git/commitdiff
exp2l: Work around a NetBSD 10.0/i386 bug.
authorBruno Haible <bruno@clisp.org>
Fri, 5 Apr 2024 14:45:25 +0000 (16:45 +0200)
committerBruno Haible <bruno@clisp.org>
Mon, 8 Apr 2024 10:42:35 +0000 (12:42 +0200)
* m4/exp2l.m4 (gl_FUNC_EXP2L): Test the value of exp2l(LDBL_MAX_EXP-1).

ChangeLog
m4/exp2l.m4

index 6c7debb387819bea3f9ab8146d6433dd9e14e879..56562d8b34dc912131f48638cc6c1587015c6b55 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2024-04-05  Bruno Haible  <bruno@clisp.org>
+
+       exp2l: Work around a NetBSD 10.0/i386 bug.
+       * m4/exp2l.m4 (gl_FUNC_EXP2L): Test the value of exp2l(LDBL_MAX_EXP-1).
+
 2024-04-05  Bruno Haible  <bruno@clisp.org>
 
        roundl: Fix a link error on Linux/powerpc64le.
index de657bcae884ec02d978c35b4c8ea3f7cb5fb257..802f1f6709e085420ad4c39949766fcaa4cfe85e 100644 (file)
@@ -1,4 +1,4 @@
-# exp2l.m4 serial 12
+# exp2l.m4 serial 12.1
 dnl Copyright (C) 2010-2024 Free Software Foundation, Inc.
 dnl This file is free software; the Free Software Foundation
 dnl gives unlimited permission to copy and/or distribute it,
@@ -80,7 +80,7 @@ int main (int argc, char *argv[])
 {
   long double (* volatile my_exp2l) (long double) = argc ? exp2l : dummy;
   int result = 0;
-  /* This test fails on NetBSD 9.0.  */
+  /* This test fails on NetBSD NetBSD 10.0/x86_64.  */
   {
     const long double TWO_LDBL_MANT_DIG = /* 2^LDBL_MANT_DIG */
       (long double) (1U << ((LDBL_MANT_DIG - 1) / 5))
@@ -93,6 +93,13 @@ int main (int argc, char *argv[])
     if (!(err >= -100.0L && err <= 100.0L))
       result |= 1;
   }
+  /* This test fails on NetBSD 10.0/i386.  */
+  {
+    long double x = LDBL_MAX_EXP - 1;
+    long double z = my_exp2l (x);
+    if (z + z == z) /* isinf (z) */
+      result |= 2;
+  }
   return result;
 }
             ]])],