projects
/
libm
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
initial cmath code and minor libm.h update
[libm]
/
src
/
math
/
__exp.c
diff --git
a/src/math/__exp.c
b/src/math/__exp.c
index
822efea
..
83f8ac3
100644
(file)
--- a/
src/math/__exp.c
+++ b/
src/math/__exp.c
@@
-75,8
+75,6
@@
double __ldexp_exp(double x, int expt)
return exp_x * scale;
}
return exp_x * scale;
}
-// FIXME
-#if 0
double complex __ldexp_cexp(double complex z, int expt)
{
double x, y, exp_x, scale1, scale2;
double complex __ldexp_cexp(double complex z, int expt)
{
double x, y, exp_x, scale1, scale2;
@@
-96,7
+94,5
@@
double complex __ldexp_cexp(double complex z, int expt)
half_expt = expt - half_expt;
INSERT_WORDS(scale2, (0x3ff + half_expt) << 20, 0);
half_expt = expt - half_expt;
INSERT_WORDS(scale2, (0x3ff + half_expt) << 20, 0);
- return (cpack(cos(y) * exp_x * scale1 * scale2,
- sin(y) * exp_x * scale1 * scale2));
+ return cpack(cos(y) * exp_x * scale1 * scale2, sin(y) * exp_x * scale1 * scale2);
}
}
-#endif