about summary refs log tree commit diff
path: root/math/s_cexpl.c
diff options
context:
space:
mode:
Diffstat (limited to 'math/s_cexpl.c')
-rw-r--r--math/s_cexpl.c13
1 files changed, 1 insertions, 12 deletions
diff --git a/math/s_cexpl.c b/math/s_cexpl.c
index e2e703f8fd..264a5742bc 100644
--- a/math/s_cexpl.c
+++ b/math/s_cexpl.c
@@ -74,18 +74,7 @@ __cexpl (__complex__ long double x)
 	      __real__ retval = exp_val * cosix;
 	      __imag__ retval = exp_val * sinix;
 	    }
-	  if (fabsl (__real__ retval) < LDBL_MIN)
-	    {
-	      volatile long double force_underflow
-		= __real__ retval * __real__ retval;
-	      (void) force_underflow;
-	    }
-	  if (fabsl (__imag__ retval) < LDBL_MIN)
-	    {
-	      volatile long double force_underflow
-		= __imag__ retval * __imag__ retval;
-	      (void) force_underflow;
-	    }
+	  math_check_force_underflow_complex (retval);
 	}
       else
 	{