X-Git-Url: http://nsz.repo.hu/git/?p=musl;a=blobdiff_plain;f=src%2Fcomplex%2Fctanl.c;h=ac1c3e0ad86d7611b8a9a74ed68a99abbffdbc21;hp=4b4c99b69b511c0d46c0e379ead735f66e89f40b;hb=cfbaba79a2dd380e580a247b8fd36af60c878e8f;hpb=b69f695acedd4ce2798ef9ea28d834ceccc789bd

diff --git a/src/complex/ctanl.c b/src/complex/ctanl.c
index 4b4c99b6..ac1c3e0a 100644
--- a/src/complex/ctanl.c
+++ b/src/complex/ctanl.c
@@ -8,7 +8,7 @@ long double complex ctanl(long double complex z)
 #else
 long double complex ctanl(long double complex z)
 {
-	z = ctanhl(cpackl(-cimagl(z), creall(z)));
-	return cpackl(cimagl(z), -creall(z));
+	z = ctanhl(CMPLXL(-cimagl(z), creall(z)));
+	return CMPLXL(cimagl(z), -creall(z));
 }
 #endif