git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Provide _M_2_SQRTPI if missing. 

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

From-SVN: r205731
This commit is contained in:
Rainer Orth 2013-12-06 10:04:05 +00:00 committed by Rainer Orth
parent 95b3eff34e
commit 041508a2ec
2 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
libgfortran/ChangeLog
View File

@ -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> 2013-12-01 Uros Bizjak <ubizjak@gmail.com>
PR libfortran/59313 PR libfortran/59313

3
libgfortran/intrinsics/erfc_scaled.c
View File

@ -61,6 +61,9 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#else #else
# define _THRESH -106.566990228185312813205074546585730L # define _THRESH -106.566990228185312813205074546585730L
# ifndef M_2_SQRTPIl
# define M_2_SQRTPIl 1.128379167095512573896158903121545172L
# endif
# define _M_2_SQRTPI M_2_SQRTPIl # define _M_2_SQRTPI M_2_SQRTPIl
# define _INF __builtin_infl() # define _INF __builtin_infl()
# ifdef HAVE_ERFCL # ifdef HAVE_ERFCL