diff options
| author | Richard Kenner <kenner@gcc.gnu.org> | 1997-08-02 14:33:42 -0400 |
|---|---|---|
| committer | Richard Kenner <kenner@gcc.gnu.org> | 1997-08-02 14:33:42 -0400 |
| commit | 7532a0fbfa17356d45be624e4145728d6fd287dd (patch) | |
| tree | df5fcd24054eb33d0330a62a39dad578f2dd1851 /gcc/dwarfout.c | |
| parent | cff9c4079035e316a91d15586d83577270cb75a5 (diff) | |
| download | gcc-7532a0fbfa17356d45be624e4145728d6fd287dd.zip gcc-7532a0fbfa17356d45be624e4145728d6fd287dd.tar.gz gcc-7532a0fbfa17356d45be624e4145728d6fd287dd.tar.bz2 | |
(output_compile_unit_die): Add support for Pascal.
From-SVN: r14627
Diffstat (limited to 'gcc/dwarfout.c')
| -rw-r--r-- | gcc/dwarfout.c | 2 |
1 files changed, 2 insertions, 0 deletions
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 |