rs6000: Add Cobol support to traceback table [PR119308]

The AIX traceback table documentation states the tbtab "lang" field for
Cobol should be set to 7.  Use it.

2025-04-03  Peter Bergner  <bergner@linux.ibm.com>

gcc/
	PR target/119308
	* config/rs6000/rs6000-logue.cc (rs6000_output_function_epilogue):
	Handle GCC COBOL for the tbtab lang field.

diff --git a/gcc/config/rs6000/rs6000-logue.cc b/gcc/config/rs6000/rs6000-logue.cc
index 52f44b114b06c3f3cc9102c5f19958ef93e6a596..5377ad6cee62ff141c4fe5afb957fafab5f2bd76 100644 (file)
--- a/gcc/config/rs6000/rs6000-logue.cc
+++ b/gcc/config/rs6000/rs6000-logue.cc
@@ -5351,6 +5351,8 @@ rs6000_output_function_epilogue (FILE *file)
        i = 1;
       else if (! strcmp (language_string, "GNU Ada"))
        i = 3;
+      else if (! strcmp (language_string, "GCC COBOL"))
+       i = 7;
       else if (! strcmp (language_string, "GNU Modula-2"))
        i = 8;
       else if (lang_GNU_CXX ()