Rich Felker | b69f695 | 2012-03-13 01:17:53 -0400 | [diff] [blame] | 1 | #include "libm.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))) | ||||
Szabolcs Nagy | cfbaba7 | 2012-11-13 01:31:49 +0100 | [diff] [blame] | 12 | return CMPLXL(INFINITY, copysignl(0.0, creall(z))); |
Rich Felker | b69f695 | 2012-03-13 01:17:53 -0400 | [diff] [blame] | 13 | return z; |
14 | } | ||||
15 | #endif |