summary refs log tree commit diff
path: root/math/s_cexp.c
diff options
context:
space:
mode:
authorJoseph Myers <joseph@codesourcery.com>2013-08-23 19:45:38 +0000
committerJoseph Myers <joseph@codesourcery.com>2013-08-23 19:45:38 +0000
commit8fe89494e6516048759425ec30d8878a6233e00f (patch)
treeb3f65b97d02bac4f183da5fe51e01cad8b8a3780 /math/s_cexp.c
parent936241e4b2ec90bbb97d1b37bc78726372ec966f (diff)
downloadglibc-8fe89494e6516048759425ec30d8878a6233e00f.tar.gz
glibc-8fe89494e6516048759425ec30d8878a6233e00f.tar.xz
glibc-8fe89494e6516048759425ec30d8878a6233e00f.zip
Fix cexp (NaN + i0) (bug 15532).
Diffstat (limited to 'math/s_cexp.c')
-rw-r--r--math/s_cexp.c14
1 files changed, 10 insertions, 4 deletions
diff --git a/math/s_cexp.c b/math/s_cexp.c
index 655e4e8dee..40e0e518d2 100644
--- a/math/s_cexp.c
+++ b/math/s_cexp.c
@@ -145,12 +145,18 @@ __cexp (__complex__ double x)
     }
   else
     {
-      /* If the real part is NaN the result is NaN + iNaN.  */
+      /* If the real part is NaN the result is NaN + iNaN unless the
+	 imaginary part is zero.  */
       __real__ retval = __nan ("");
-      __imag__ retval = __nan ("");
+      if (icls == FP_ZERO)
+	__imag__ retval = __imag__ x;
+      else
+	{
+	  __imag__ retval = __nan ("");
 
-      if (rcls != FP_NAN || icls != FP_NAN)
-	feraiseexcept (FE_INVALID);
+	  if (rcls != FP_NAN || icls != FP_NAN)
+	    feraiseexcept (FE_INVALID);
+	}
     }
 
   return retval;