https://gcc.gnu.org/g:c669ab0a866697577fec0c8c2e662640c4be4c94
commit r15-9188-gc669ab0a866697577fec0c8c2e662640c4be4c94
Author: Peter Bergner <berg...@linux.ibm.com>
Date: Thu Apr 3 10:52:29 2025 -0500
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 <berg...@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:
---
gcc/config/rs6000/rs6000-logue.cc | 2 ++
1 file changed, 2 insertions(+)
diff --git a/gcc/config/rs6000/rs6000-logue.cc
b/gcc/config/rs6000/rs6000-logue.cc
index 52f44b114b06..5377ad6cee62 100644
--- 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 ()
