diff options
Diffstat (limited to 'sysdeps/ieee754/ldbl-96/s_tanhl.c')
| -rw-r--r-- | sysdeps/ieee754/ldbl-96/s_tanhl.c | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/sysdeps/ieee754/ldbl-96/s_tanhl.c b/sysdeps/ieee754/ldbl-96/s_tanhl.c index 035037c..38edf9f 100644 --- a/sysdeps/ieee754/ldbl-96/s_tanhl.c +++ b/sysdeps/ieee754/ldbl-96/s_tanhl.c @@ -71,11 +71,7 @@ long double __tanhl(long double x) return x; /* x == +- 0 */ if (ix<0x3fc8) /* |x|<2**-55 */ { - if (fabsl (x) < LDBL_MIN) - { - long double force_underflow = x * x; - math_force_eval (force_underflow); - } + math_check_force_underflow (x); return x*(one+tiny); /* tanh(small) = small */ } if (ix>=0x3fff) { /* |x|>=1 */ |