OSDN Git Service

* config/rs6000/rs6000.c (rs6000_output_function_epilogue): Update
authordje <dje@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 8 Apr 2008 21:05:41 +0000 (21:05 +0000)
committerdje <dje@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 8 Apr 2008 21:05:41 +0000 (21:05 +0000)
        GNU Fortran language string.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@134106 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/ChangeLog
gcc/config/rs6000/rs6000.c

index afa50f8..f225874 100644 (file)
@@ -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.
index eda6df0..3793976 100644 (file)
@@ -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;