diff options
| author | Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE> | 2013-12-06 10:04:05 +0000 |
|---|---|---|
| committer | Rainer Orth <ro@gcc.gnu.org> | 2013-12-06 10:04:05 +0000 |
| commit | 041508a2ec3b8f19e3d46b8925892e9c0cbb4273 (patch) | |
| tree | 02be057d0665161b6c2fa0ed16400027c561bac9 /libgfortran | |
| parent | 95b3eff34ea98fcd67460f208004f5baddc29f0b (diff) | |
| download | gcc-041508a2ec3b8f19e3d46b8925892e9c0cbb4273.tar.gz | |
Provide _M_2_SQRTPI if missing.
* intrinsics/erfc_scaled.c (_M_2_SQRTPI): Define if missing.
From-SVN: r205731
Diffstat (limited to 'libgfortran')
| -rw-r--r-- | libgfortran/ChangeLog | 4 | ||||
| -rw-r--r-- | libgfortran/intrinsics/erfc_scaled.c | 3 |
2 files changed, 7 insertions, 0 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index a428205e562..02524ad3539 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 0498508a5bb..02a2c15ace3 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 |