libc-top-half/musl/src/complex/cprojf.c

   1 #include "libm.h"
   2
   3 float complex cprojf(float complex z)
   4 {
   5         if (isinf(crealf(z)) || isinf(cimagf(z)))
   6                 return CMPLXF(INFINITY, copysignf(0.0, crealf(z)));
   7         return z;
   8 }