From 7f62878c1dea1e31a4471bb147c567048019d0eb Mon Sep 17 00:00:00 2001
From: David Edelsohn <edelsohn@gnu.org>
Date: Tue, 8 Apr 2008 21:05:41 +0000
Subject: [PATCH] rs6000.c (rs6000_output_function_epilogue): Update GNU
Fortran language string.
* config/rs6000/rs6000.c (rs6000_output_function_epilogue): Update
GNU Fortran language string.
From-SVN: r134106
---
gcc/ChangeLog | 5 +++++
gcc/config/rs6000/rs6000.c | 2 +-
2 files changed, 6 insertions(+), 1 deletion(-)
diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index afa50f826a6e..f22587446adb 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2008-04-08 David Edelsohn <edelsohn@gnu.org>
+
+ * config/rs6000/rs6000.c (rs6000_output_function_epilogue): Update
+ GNU Fortran language string.
+
2008-04-08 Rafael Espindola <espindola@google.com>
* fold-canst.c (tree_call_nonnegative_warnv_p): New.
diff --git a/gcc/config/rs6000/rs6000.c b/gcc/config/rs6000/rs6000.c
index eda6df0ddf35..3793976363bb 100644
--- a/gcc/config/rs6000/rs6000.c
+++ b/gcc/config/rs6000/rs6000.c
@@ -16838,7 +16838,7 @@ rs6000_output_function_epilogue (FILE *file,
if (! strcmp (language_string, "GNU C"))
i = 0;
else if (! strcmp (language_string, "GNU F77")
- || ! strcmp (language_string, "GNU F95"))
+ || ! strcmp (language_string, "GNU Fortran"))
i = 1;
else if (! strcmp (language_string, "GNU Pascal"))
i = 2;
--
GitLab