initial cmath code and minor libm.h update
[libm] / src / math / __exp.c
index 822efea..83f8ac3 100644 (file)
@@ -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