aboutsummaryrefslogtreecommitdiff
path: root/math/s_clog.c
diff options
context:
space:
mode:
Diffstat (limited to 'math/s_clog.c')
-rw-r--r--math/s_clog.c9
1 files changed, 3 insertions, 6 deletions
diff --git a/math/s_clog.c b/math/s_clog.c
index 8639868..077f8f2 100644
--- a/math/s_clog.c
+++ b/math/s_clog.c
@@ -68,12 +68,9 @@ __clog (__complex__ double x)
double absy2 = absy * absy;
if (absy2 <= DBL_MIN * 2.0)
{
-#if __FLT_EVAL_METHOD__ == 0
- __real__ result = absy2 / 2.0 - absy2 * absy2 / 4.0;
-#else
- volatile double force_underflow = absy2 * absy2 / 4.0;
- __real__ result = absy2 / 2.0 - force_underflow;
-#endif
+ double force_underflow = absy2 * absy2;
+ __real__ result = absy2 / 2.0;
+ math_force_eval (force_underflow);
}
else
__real__ result = __log1p (absy2) / 2.0;