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

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);