[PATCH] dwarf2out: Fix up DW_AT_language for COBOL

[Jakub Jelinek]

Hi!

Seems the LANG_HOOKS_NAME change for COBOL broke debug info,
in particular instead of DW_LANG_Cobol85 it is now DW_LANG_C.

Fixed thusly, ok for trunk?

2025-03-11  Jakub Jelinek  <ja...@redhat.com>

        * dwarf2out.cc (gen_compile_unit_die): Use DW_LANG_Cobol85 if
        language_string is "GCC COBOL" rather than "Cobol".

--- gcc/dwarf2out.cc.jj 2025-03-11 09:18:21.773133258 +0100
+++ gcc/dwarf2out.cc    2025-03-11 11:30:44.429218288 +0100
@@ -25448,7 +25448,7 @@ gen_compile_unit_die (const char *filena
     }
   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;

        Jakub