X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fcomplex%2Fcatanhl.c;h=a5dd538e44535ccc4961eadb593df3f1461a649b;hb=a3e2f3c2b15053a2f9faccc62947b82f2219599f;hp=0a9374a34d415bcd2a8c3378d301d14e7aba0f79;hpb=b69f695acedd4ce2798ef9ea28d834ceccc789bd;p=musl

diff --git a/src/complex/catanhl.c b/src/complex/catanhl.c
index 0a9374a3..a5dd538e 100644
--- a/src/complex/catanhl.c
+++ b/src/complex/catanhl.c
@@ -8,7 +8,7 @@ long double complex catanhl(long double complex z)
 #else
 long double complex catanhl(long double complex z)
 {
-	z = catanl(cpackl(-cimagl(z), creall(z)));
-	return cpackl(cimagl(z), -creall(z));
+	z = catanl(CMPLXL(-cimagl(z), creall(z)));
+	return CMPLXL(cimagl(z), -creall(z));
 }
 #endif