(output_compile_unit_die): Add support for Pascal.

From-SVN: r14627

diff --git a/gcc/dwarfout.c b/gcc/dwarfout.c
index 8f09451268176a7a367741a492d7b4943d40165a..0c73fcd30a8a7d9a39cffb4ced6b2194c432a991 100644 (file)
--- a/gcc/dwarfout.c
+++ b/gcc/dwarfout.c
@@ -3661,6 +3661,8 @@ output_compile_unit_die (arg)
     language_attribute (LANG_ADA83);
   else if (strcmp (language_string, "GNU F77") == 0)
     language_attribute (LANG_FORTRAN77);
+  else if (strcmp (language_string, "GNU Pascal") == 0)
+    language_attribute (LANG_PASCAL83);
   else if (flag_traditional)
     language_attribute (LANG_C);
   else