X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fmath%2Ferf.c;h=2f30a298f997cde0316af8681bb1447f085de54d;hb=0636d5977aa796d78869ee310c6e69220b919eee;hp=c0fc41db3c95740edb493f4617834c805219dcf5;hpb=21f01e1bf951dc3c543bb53de4d001dd4194da84;p=musl

diff --git a/src/math/erf.c b/src/math/erf.c
index c0fc41db..2f30a298 100644
--- a/src/math/erf.c
+++ b/src/math/erf.c
@@ -176,7 +176,7 @@ sb7  = -2.24409524465858183362e+01; /* 0xC03670E2, 0x42712D62 */
 
 static double erfc1(double x)
 {
-	double s,P,Q;
+	double_t s,P,Q;
 
 	s = fabs(x) - 1;
 	P = pa0+s*(pa1+s*(pa2+s*(pa3+s*(pa4+s*(pa5+s*pa6)))));
@@ -186,7 +186,8 @@ static double erfc1(double x)
 
 static double erfc2(uint32_t ix, double x)
 {
-	double s,z,R,S;
+	double_t s,R,S;
+	double z;
 
 	if (ix < 0x3ff40000)  /* |x| < 1.25 */
 		return erfc1(x);