@@ -300,7 +300,38 @@ atanh 0.25
atanh 0x1p-5
atanh 0x1p-10
atanh 0x1.2345p-20
+atanh 0x1p-8
+atanh 0x1p-9
+atanh 0x1p-10
+atanh 0x1p-11
+atanh 0x1p-12
+atanh 0x1p-13
+atanh 0x1p-24
+atanh 0x1p-25
+atanh 0x1p-26
+atanh 0x1p-27
+atanh 0x1p-28
+atanh 0x1p-29
+atanh 0x1p-30
+atanh 0x1p-31
+atanh 0x1p-32
+atanh 0x1p-33
+atanh 0x1p-48
+atanh 0x1p-49
+atanh 0x1p-50
+atanh 0x1p-51
+atanh 0x1p-52
+atanh 0x1p-53
+atanh 0x1p-54
+atanh 0x1p-55
+atanh 0x1p-56
+atanh 0x1p-57
+atanh 0x1p-58
+atanh 0x1p-59
+atanh 0x1p-100
# Bug 16352: underflow exception may be missing.
+atanh 0x1p-500 missing-underflow
+atanh 0x1p-5000 missing-underflow
atanh min missing-underflow
atanh -min missing-underflow
atanh min_subnorm missing-underflow
@@ -150,6 +150,8 @@ ildouble: 2
ldouble: 1
Function: "atanh_towardzero":
+double: 1
+float: 1
idouble: 1
ifloat: 1
ildouble: 4
@@ -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;
@@ -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 */
@@ -170,7 +170,9 @@ ildouble: 1
ldouble: 1
Function: "atanh":
+double: 1
float: 1
+idouble: 1
ifloat: 1
ildouble: 1
ldouble: 1
@@ -184,7 +186,9 @@ ildouble: 2
ldouble: 2
Function: "atanh_towardzero":
+double: 1
float: 1
+idouble: 1
ifloat: 1
ildouble: 2
ldouble: 2