From 0751254a759314c114e51b47536d2c8feb0fbcea Mon Sep 17 00:00:00 2001 From: "Steven G. Kargl" <kargl@gcc.gnu.org> Date: Tue, 31 Jan 2017 18:50:31 +0000 Subject: [PATCH] re PR fortran/79305 (real128 - undefined reference to cexpl) 2017-01-31 Steven G. Kargl <kargl@gcc.gnu.org> PR fortran/79305 * c99_protos.h: Spell HAVE_EXPL correctly. * intrinsics/c99_functions.c: Ditto. From-SVN: r245068 --- libgfortran/ChangeLog | 6 ++++++ libgfortran/c99_protos.h | 2 +- libgfortran/intrinsics/c99_functions.c | 2 +- 3 files changed, 8 insertions(+), 2 deletions(-) diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index ad4f65b7fb23..a3a8c2249ee7 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,9 @@ +2017-01-31 Steven G. Kargl <kargl@gcc.gnu.org> + + PR fortran/79305 + * c99_protos.h: Spell HAVE_EXPL correctly. + * intrinsics/c99_functions.c: Ditto. + 2017-01-19 Uros Bizjak <ubizjak@gmail.com> PR target/78478 diff --git a/libgfortran/c99_protos.h b/libgfortran/c99_protos.h index 932b08d5c457..7680c6f34b73 100644 --- a/libgfortran/c99_protos.h +++ b/libgfortran/c99_protos.h @@ -332,7 +332,7 @@ extern float complex cexpf (float complex); extern double complex cexp (double complex); #endif -#if !defined(HAVE_CEXPL) && defined(HAVE_COSL) && defined(HAVE_SINL) && defined(EXPL) +#if !defined(HAVE_CEXPL) && defined(HAVE_COSL) && defined(HAVE_SINL) && defined(HAVE_EXPL) #define HAVE_CEXPL 1 extern long double complex cexpl (long double complex); #endif diff --git a/libgfortran/intrinsics/c99_functions.c b/libgfortran/intrinsics/c99_functions.c index b1491524e840..dce0d7a042c4 100644 --- a/libgfortran/intrinsics/c99_functions.c +++ b/libgfortran/intrinsics/c99_functions.c @@ -913,7 +913,7 @@ cexp (double complex z) } #endif -#if !defined(HAVE_CEXPL) && defined(HAVE_COSL) && defined(HAVE_SINL) && defined(EXPL) +#if !defined(HAVE_CEXPL) && defined(HAVE_COSL) && defined(HAVE_SINL) && defined(HAVE_EXPL) #define HAVE_CEXPL 1 long double complex cexpl (long double complex z); -- GitLab