about summary refs log tree commit diff
path: root/math/s_cexpf.c
diff options
context:
space:
mode:
Diffstat (limited to 'math/s_cexpf.c')
-rw-r--r--math/s_cexpf.c12
1 files changed, 12 insertions, 0 deletions
diff --git a/math/s_cexpf.c b/math/s_cexpf.c
index 364be8ac31..fa942d34f7 100644
--- a/math/s_cexpf.c
+++ b/math/s_cexpf.c
@@ -74,6 +74,18 @@ __cexpf (__complex__ float x)
 	      __real__ retval = exp_val * cosix;
 	      __imag__ retval = exp_val * sinix;
 	    }
+	  if (fabsf (__real__ retval) < FLT_MIN)
+	    {
+	      volatile float force_underflow
+		= __real__ retval * __real__ retval;
+	      (void) force_underflow;
+	    }
+	  if (fabsf (__imag__ retval) < FLT_MIN)
+	    {
+	      volatile float force_underflow
+		= __imag__ retval * __imag__ retval;
+	      (void) force_underflow;
+	    }
 	}
       else
 	{