Fix expm1l spurious underflows for ldbl-128ibm.

diff --git a/ChangeLog b/ChangeLog
index 9374426..c167d9a 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2012-11-22  Joseph Myers  <joseph@codesourcery.com>
+
+       [BZ #6778]
+       * sysdeps/ieee754/ldbl-128ibm/s_expm1l.c (big): Change to 1e290L.
+
 2012-11-22  Andreas Schwab  <schwab@suse.de>
 
        * sysdeps/i386/fpu/libm-test-ulps: Update.

diff --git a/sysdeps/ieee754/ldbl-128ibm/s_expm1l.c b/sysdeps/ieee754/ldbl-128ibm/s_expm1l.c
index 98ae4e1..8808dcd 100644 (file)
--- a/sysdeps/ieee754/ldbl-128ibm/s_expm1l.c
+++ b/sysdeps/ieee754/ldbl-128ibm/s_expm1l.c
@@ -85,7 +85,7 @@ static const long double
 /* ln (2^16384 * (1 - 2^-113)) */
   maxlog = 1.1356523406294143949491931077970764891253E4L,
 /* ln 2^-114 */
-  minarg = -7.9018778583833765273564461846232128760607E1L, big = 2e307L;
+  minarg = -7.9018778583833765273564461846232128760607E1L, big = 1e290L;
 
 
 long double