diff options
Diffstat (limited to 'sysdeps/ieee754')
| -rw-r--r-- | sysdeps/ieee754/ldbl-128ibm/e_atanhl.c | 2 | ||||
| -rw-r--r-- | sysdeps/ieee754/ldbl-96/e_atanhl.c | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/sysdeps/ieee754/ldbl-128ibm/e_atanhl.c b/sysdeps/ieee754/ldbl-128ibm/e_atanhl.c index 29f2e92..5a98999 100644 --- a/sysdeps/ieee754/ldbl-128ibm/e_atanhl.c +++ b/sysdeps/ieee754/ldbl-128ibm/e_atanhl.c @@ -54,7 +54,7 @@ __ieee754_atanhl(long double x) if (t == one) return x/zero; } - if(ix<0x3e20000000000000LL&&(huge+x)>zero) return x; /* x<2**-29 */ + if(ix<0x3c70000000000000LL&&(huge+x)>zero) return x; /* x<2**-56 */ x = fabsl (x); if(ix<0x3fe0000000000000LL) { /* x < 0.5 */ t = x+x; diff --git a/sysdeps/ieee754/ldbl-96/e_atanhl.c b/sysdeps/ieee754/ldbl-96/e_atanhl.c index 4c29243..305d50e 100644 --- a/sysdeps/ieee754/ldbl-96/e_atanhl.c +++ b/sysdeps/ieee754/ldbl-96/e_atanhl.c @@ -52,9 +52,9 @@ __ieee754_atanhl(long double x) return (x-x)/(x-x); if(ix==0x3fff) return x/zero; - if(ix<0x3fe3) { + if(ix<0x3fdf) { math_force_eval(huge+x); - return x; /* x<2**-28 */ + return x; /* x<2**-32 */ } SET_LDOUBLE_EXP(x,ix); if(ix<0x3ffe) { /* x < 0.5 */ |