cprojl.c raw

   1  #include "complex_impl.h"
   2  
   3  #if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
   4  long double complex cprojl(long double complex z)
   5  {
   6  	return cproj(z);
   7  }
   8  #else
   9  long double complex cprojl(long double complex z)
  10  {
  11  	if (isinf(creall(z)) || isinf(cimagl(z)))
  12  		return CMPLXL(INFINITY, copysignl(0.0, cimagl(z)));
  13  	return z;
  14  }
  15  #endif
  16