From 7532a0fbfa17356d45be624e4145728d6fd287dd Mon Sep 17 00:00:00 2001 From: Richard Kenner Date: Sat, 2 Aug 1997 14:33:42 -0400 Subject: (output_compile_unit_die): Add support for Pascal. From-SVN: r14627 --- gcc/dwarfout.c | 2 ++ 1 file changed, 2 insertions(+) (limited to 'gcc') diff --git a/gcc/dwarfout.c b/gcc/dwarfout.c index 8f09451..0c73fcd 100644 --- 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 -- cgit v1.1