1 files changed, 1 insertions, 1 deletions
diff --git a/math/erf.c b/math/erf.c
index 97b543b..12d7e51 100644
--- a/math/erf.c
+++ b/math/erf.c
@@ -47,7 +47,7 @@ erf (double x)
 	{ /* a < 2^(-28).  */
 	  if (ia < 0x00800000)
 	    { /* a < 2^(-1015).  */
-	      double y =  x + TwoOverSqrtPiMinusOne * x;
+	      double y =  fma (TwoOverSqrtPiMinusOne, x, x);
 	      return check_uflow (y);
 	    }
 	  return x + TwoOverSqrtPiMinusOne * x;