diff options
Diffstat (limited to 'math/s_cexp.c')
-rw-r--r-- | math/s_cexp.c | 13 |
1 files changed, 1 insertions, 12 deletions
diff --git a/math/s_cexp.c b/math/s_cexp.c index 06c5b63c7a..5cb42d1ec0 100644 --- a/math/s_cexp.c +++ b/math/s_cexp.c @@ -74,18 +74,7 @@ __cexp (__complex__ double x) __real__ retval = exp_val * cosix; __imag__ retval = exp_val * sinix; } - if (fabs (__real__ retval) < DBL_MIN) - { - volatile double force_underflow - = __real__ retval * __real__ retval; - (void) force_underflow; - } - if (fabs (__imag__ retval) < DBL_MIN) - { - volatile double force_underflow - = __imag__ retval * __imag__ retval; - (void) force_underflow; - } + math_check_force_underflow_complex (retval); } else { |