summaryrefslogtreecommitdiff
path: root/math/k_casinhl.c
diff options
context:
space:
mode:
authorSamuel Thibault <samuel.thibault@ens-lyon.org>2016-10-09 20:15:32 +0200
committerSamuel Thibault <samuel.thibault@ens-lyon.org>2016-10-09 20:15:32 +0200
commitcbe8b6f603fbea1d64e3570f299a2bf25adfa6fc (patch)
treea62a92aded65b2e0834a4d72701415ed3cca4299 /math/k_casinhl.c
parentd6a8ab3c9097ce211e9aa7780ddd31b4f62d380f (diff)
parent0b113e90a20146a2783f7cb2f3e7de716b892d5f (diff)
Merge branch 't/tls' into refs/top-bases/tschwinge/Roger_Whittaker
Diffstat (limited to 'math/k_casinhl.c')
-rw-r--r--math/k_casinhl.c8
1 files changed, 2 insertions, 6 deletions
diff --git a/math/k_casinhl.c b/math/k_casinhl.c
index 496c0641cd..7c4b9c36bf 100644
--- a/math/k_casinhl.c
+++ b/math/k_casinhl.c
@@ -1,7 +1,7 @@
/* Return arc hyperbole sine for long double value, with the imaginary
part of the result possibly adjusted for use in computing other
functions.
- Copyright (C) 1997-2015 Free Software Foundation, Inc.
+ Copyright (C) 1997-2016 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
@@ -189,11 +189,7 @@ __kernel_casinhl (__complex__ long double x, int adj)
else
__imag__ res = __ieee754_atan2l (ix, s);
}
- if (__real__ res < LDBL_MIN)
- {
- volatile long double force_underflow = __real__ res * __real__ res;
- (void) force_underflow;
- }
+ math_check_force_underflow_nonneg (__real__ res);
}
else
{