diff options
| -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 |