diff options
| author | Jakub Jelinek <jakub@redhat.com> | 2025-03-11 12:06:28 +0100 |
|---|---|---|
| committer | Jakub Jelinek <jakub@gcc.gnu.org> | 2025-03-11 12:06:28 +0100 |
| commit | 86eb3fb520b2a2026f6816ab51b88180b85d6882 (patch) | |
| tree | 7c290b822b0413a9b7f283b1e07e177fd03d08d0 | |
| parent | 68932eeb38f66fbc0c3cf4b77ff7dde8a408f2e4 (diff) | |
| download | gcc-86eb3fb520b2a2026f6816ab51b88180b85d6882.zip gcc-86eb3fb520b2a2026f6816ab51b88180b85d6882.tar.gz gcc-86eb3fb520b2a2026f6816ab51b88180b85d6882.tar.bz2 | |
dwarf2out: Fix up DW_AT_language for COBOL
Seems the LANG_HOOKS_NAME change for COBOL broke debug info,
in particular instead of DW_LANG_Cobol85 it is now DW_LANG_C.
2025-03-11 Jakub Jelinek <jakub@redhat.com>
* dwarf2out.cc (gen_compile_unit_die): Use DW_LANG_Cobol85 if
language_string is "GCC COBOL" rather than "Cobol".
| -rw-r--r-- | gcc/dwarf2out.cc | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/dwarf2out.cc b/gcc/dwarf2out.cc index 42f72c1..e1c3532 100644 --- a/gcc/dwarf2out.cc +++ b/gcc/dwarf2out.cc @@ -25448,7 +25448,7 @@ gen_compile_unit_die (const char *filename) } else if (strcmp (language_string, "GNU F77") == 0) language = DW_LANG_Fortran77; - else if (strcmp (language_string, "Cobol") == 0) + else if (strcmp (language_string, "GCC COBOL") == 0) language = DW_LANG_Cobol85; else if (strcmp (language_string, "GNU Modula-2") == 0) language = DW_LANG_Modula2; |