extend cmath (some of the functions are dummy)

[libm] / src / cmath / cproj.c

diff --git a/src/cmath/cproj.c b/src/cmath/cproj.c
index cc12e46..1cf9bb9 100644 (file)
--- a/src/cmath/cproj.c
+++ b/src/cmath/cproj.c
@@ -2,9 +2,7 @@
 
 double complex cproj(double complex z)
 {
-       union dcomplex u = {z};
-
-       if (isinf(u.a[0]) || isinf(u.a[1]))
-               return cpack(INFINITY, copysign(0.0, u.a[1]));
+       if (isinf(creal(z)) || isinf(cimag(z)))
+               return cpack(INFINITY, copysign(0.0, creal(z)));
        return z;
 }