Commit 9353d0a3 by Richard Kenner

(output_epilog): Support LANGUAGE_STRING values for F77,

Ada, and Pascal.

From-SVN: r2873
parent 10c344b4
...@@ -1432,6 +1432,12 @@ output_epilog (file, size) ...@@ -1432,6 +1432,12 @@ output_epilog (file, size)
language_string, so we can't detect it anyways. */ language_string, so we can't detect it anyways. */
if (! strcmp (language_string, "GNU C")) if (! strcmp (language_string, "GNU C"))
i = 0; 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++")) else if (! strcmp (language_string, "GNU C++"))
i = 9; i = 9;
else else
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment