From: Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
Date: Fri, 6 Dec 2013 10:04:05 +0000 (+0000)
Subject: Provide _M_2_SQRTPI if missing.
X-Git-Tag: releases/gcc-4.9.0~2247
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=041508a2ec3b8f19e3d46b8925892e9c0cbb4273;p=thirdparty%2Fgcc.git

Provide _M_2_SQRTPI if missing.

	* intrinsics/erfc_scaled.c (_M_2_SQRTPI): Define if missing.

From-SVN: r205731
---

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index a428205e5626..02524ad35392 100644
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,7 @@
+2013-12-06  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
+
+	* intrinsics/erfc_scaled.c (_M_2_SQRTPI): Define if missing.
+
 2013-12-01  Uros Bizjak  <ubizjak@gmail.com>
 
 	PR libfortran/59313
diff --git a/libgfortran/intrinsics/erfc_scaled.c b/libgfortran/intrinsics/erfc_scaled.c
index 0498508a5bbc..02a2c15ace3c 100644
--- a/libgfortran/intrinsics/erfc_scaled.c
+++ b/libgfortran/intrinsics/erfc_scaled.c
@@ -61,6 +61,9 @@ see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
 #else
 
 # define _THRESH -106.566990228185312813205074546585730L
+# ifndef M_2_SQRTPIl
+#  define M_2_SQRTPIl 1.128379167095512573896158903121545172L
+# endif
 # define _M_2_SQRTPI M_2_SQRTPIl
 # define _INF __builtin_infl()
 # ifdef HAVE_ERFCL