aboutsummaryrefslogtreecommitdiff
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
glibc-8fe89494e6516048759425ec30d8878a6233e00f.tar.gz
glibc-8fe89494e6516048759425ec30d8878a6233e00f.tar.bz2
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;