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: r245074

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 078910059f9456cf81d91662ea80e7d2999acae8..a0471221cc83c1def71bda4a666b95849d94dccb 100644 (file)
--- 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.
+
 2016-10-31  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 
        Backport from trunk

diff --git a/libgfortran/c99_protos.h b/libgfortran/c99_protos.h
index 45f4e2626667984876dc119634a5989816629e66..bb726162686535c1354072b2ceca999efbd03324 100644 (file)
--- 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 7bfd16ab0d40b53f8192798d434e87ab8250816c..ddaca389e8790f2f9d6e690d756f4d385de77a1f 100644 (file)
--- 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);