aboutsummaryrefslogtreecommitdiff
path: root/math/s_cexp.c
diff options
context:
space:
mode:
Diffstat (limited to 'math/s_cexp.c')
-rw-r--r--math/s_cexp.c13
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
{