projects
/
musl
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
make powerpc signal.h namespace-clean for posix/isoc
[musl]
/
src
/
complex
/
cexpf.c
diff --git
a/src/complex/cexpf.c
b/src/complex/cexpf.c
index
0cf13a3
..
1a09964
100644
(file)
--- a/
src/complex/cexpf.c
+++ b/
src/complex/cexpf.c
@@
-44,22
+44,22
@@
float complex cexpf(float complex z)
/* cexp(x + I 0) = exp(x) + I 0 */
if (hy == 0)
/* cexp(x + I 0) = exp(x) + I 0 */
if (hy == 0)
- return
cpackf
(expf(x), y);
+ return
CMPLXF
(expf(x), y);
GET_FLOAT_WORD(hx, x);
/* cexp(0 + I y) = cos(y) + I sin(y) */
if ((hx & 0x7fffffff) == 0)
GET_FLOAT_WORD(hx, x);
/* cexp(0 + I y) = cos(y) + I sin(y) */
if ((hx & 0x7fffffff) == 0)
- return
cpackf
(cosf(y), sinf(y));
+ return
CMPLXF
(cosf(y), sinf(y));
if (hy >= 0x7f800000) {
if ((hx & 0x7fffffff) != 0x7f800000) {
/* cexp(finite|NaN +- I Inf|NaN) = NaN + I NaN */
if (hy >= 0x7f800000) {
if ((hx & 0x7fffffff) != 0x7f800000) {
/* cexp(finite|NaN +- I Inf|NaN) = NaN + I NaN */
- return
cpackf
(y - y, y - y);
+ return
CMPLXF
(y - y, y - y);
} else if (hx & 0x80000000) {
/* cexp(-Inf +- I Inf|NaN) = 0 + I 0 */
} else if (hx & 0x80000000) {
/* cexp(-Inf +- I Inf|NaN) = 0 + I 0 */
- return
cpackf
(0.0, 0.0);
+ return
CMPLXF
(0.0, 0.0);
} else {
/* cexp(+Inf +- I Inf|NaN) = Inf + I NaN */
} else {
/* cexp(+Inf +- I Inf|NaN) = Inf + I NaN */
- return
cpackf
(x, y - y);
+ return
CMPLXF
(x, y - y);
}
}
}
}
@@
-78,6
+78,6
@@
float complex cexpf(float complex z)
* - x = NaN (spurious inexact exception from y)
*/
exp_x = expf(x);
* - x = NaN (spurious inexact exception from y)
*/
exp_x = expf(x);
- return
cpackf
(exp_x * cosf(y), exp_x * sinf(y));
+ return
CMPLXF
(exp_x * cosf(y), exp_x * sinf(y));
}
}
}
}