diff options
| author | Richard Kenner <kenner@gcc.gnu.org> | 1992-12-14 13:16:00 -0500 |
|---|---|---|
| committer | Richard Kenner <kenner@gcc.gnu.org> | 1992-12-14 13:16:00 -0500 |
| commit | 9353d0a3fbf53e59b789af80b9567f9cd02b91fc (patch) | |
| tree | ebbb3a887589800519fadc848ceb3840cda7eca2 | |
| parent | 10c344b44c487be7a3146115ef8ec8cb72b5747f (diff) | |
| download | gcc-9353d0a3fbf53e59b789af80b9567f9cd02b91fc.zip gcc-9353d0a3fbf53e59b789af80b9567f9cd02b91fc.tar.gz gcc-9353d0a3fbf53e59b789af80b9567f9cd02b91fc.tar.bz2 | |
(output_epilog): Support LANGUAGE_STRING values for F77,
Ada, and Pascal.
From-SVN: r2873
| -rw-r--r-- | gcc/config/rs6000/rs6000.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/gcc/config/rs6000/rs6000.c b/gcc/config/rs6000/rs6000.c index 0864b9e..2bfaa3dd 100644 --- a/gcc/config/rs6000/rs6000.c +++ b/gcc/config/rs6000/rs6000.c @@ -1432,6 +1432,12 @@ output_epilog (file, size) language_string, so we can't detect it anyways. */ if (! strcmp (language_string, "GNU C")) i = 0; + else if (! strcmp (language_string, "GNU F77")) + i = 1; + else if (! strcmp (language_string, "GNU Ada")) + i = 3; + else if (! strcmp (language_string, "GNU PASCAL")) + i = 2; else if (! strcmp (language_string, "GNU C++")) i = 9; else |