about summary refs log tree commit diff
path: root/math/s_ctanhf.c
diff options
context:
space:
mode:
Diffstat (limited to 'math/s_ctanhf.c')
-rw-r--r--math/s_ctanhf.c11
1 files changed, 1 insertions, 10 deletions
diff --git a/math/s_ctanhf.c b/math/s_ctanhf.c
index a4fd2301cd..000820a6d9 100644
--- a/math/s_ctanhf.c
+++ b/math/s_ctanhf.c
@@ -117,16 +117,7 @@ __ctanhf (__complex__ float x)
 	  __real__ res = sinhrx * coshrx / den;
 	  __imag__ res = sinix * cosix / den;
 	}
-      if (fabsf (__real__ res) < FLT_MIN)
-	{
-	  float force_underflow = __real__ res * __real__ res;
-	  math_force_eval (force_underflow);
-	}
-      if (fabsf (__imag__ res) < FLT_MIN)
-	{
-	  float force_underflow = __imag__ res * __imag__ res;
-	  math_force_eval (force_underflow);
-	}
+      math_check_force_underflow_complex (res);
     }
 
   return res;