X-Git-Url: http://nsz.repo.hu/git/?p=musl;a=blobdiff_plain;f=src%2Fcomplex%2Fcsqrtf.c;fp=src%2Fcomplex%2Fcsqrtf.c;h=ab5102f035b9edc7889ffe3ff24d3b18ffcec50b;hp=16487c23575d999d32aa26d0f9f9e99e8f7933fb;hb=cfbaba79a2dd380e580a247b8fd36af60c878e8f;hpb=e2fe959fe2a450f74271d4d3c4b0d9456f889125

diff --git a/src/complex/csqrtf.c b/src/complex/csqrtf.c
index 16487c23..ab5102f0 100644
--- a/src/complex/csqrtf.c
+++ b/src/complex/csqrtf.c
@@ -43,12 +43,12 @@ float complex csqrtf(float complex z)
 
 	/* Handle special cases. */
 	if (z == 0)
-		return cpackf(0, b);
+		return CMPLXF(0, b);
 	if (isinf(b))
-		return cpackf(INFINITY, b);
+		return CMPLXF(INFINITY, b);
 	if (isnan(a)) {
 		t = (b - b) / (b - b);  /* raise invalid if b is not a NaN */
-		return cpackf(a, t);  /* return NaN + NaN i */
+		return CMPLXF(a, t);  /* return NaN + NaN i */
 	}
 	if (isinf(a)) {
 		/*
@@ -58,9 +58,9 @@ float complex csqrtf(float complex z)
 		 * csqrtf(-inf + y i)   = 0   +  inf i
 		 */
 		if (signbit(a))
-			return cpackf(fabsf(b - b), copysignf(a, b));
+			return CMPLXF(fabsf(b - b), copysignf(a, b));
 		else
-			return cpackf(a, copysignf(b - b, b));
+			return CMPLXF(a, copysignf(b - b, b));
 	}
 	/*
 	 * The remaining special case (b is NaN) is handled just fine by
@@ -74,9 +74,9 @@ float complex csqrtf(float complex z)
 	 */
 	if (a >= 0) {
 		t = sqrt((a + hypot(a, b)) * 0.5);
-		return cpackf(t, b / (2.0 * t));
+		return CMPLXF(t, b / (2.0 * t));
 	} else {
 		t = sqrt((-a + hypot(a, b)) * 0.5);
-		return cpackf(fabsf(b) / (2.0 * t), copysignf(t, b));
+		return CMPLXF(fabsf(b) / (2.0 * t), copysignf(t, b));
 	}
 }