[07/11,gdb/macros] Workaround gcc PR debug/115066
Checks
Context |
Check |
Description |
linaro-tcwg-bot/tcwg_gdb_build--master-aarch64 |
success
|
Testing passed
|
linaro-tcwg-bot/tcwg_gdb_build--master-arm |
success
|
Testing passed
|
linaro-tcwg-bot/tcwg_gdb_check--master-arm |
success
|
Testing passed
|
linaro-tcwg-bot/tcwg_gdb_check--master-aarch64 |
success
|
Testing passed
|
Commit Message
When running test-case gdb.base/fission-macro.exp with gcc 14, we run into:
...
(gdb) p FIRST^M
No symbol "FIRST" in current context.^M
(gdb) FAIL: gdb.base/fission-macro.exp: dwarf_version=4: dwarf_bits=32: \
strict_dwarf=0: p FIRST
...
This is because gcc 14 is missing the fix for gcc PR debug/115066, which is
basically the dwarf-4 variant of dwarf-5 gcc PR debug/99319, for which we
already have a workaround.
Likewise, work around this problem for v4 dwarf.
Tested on x86_64-linux.
Tested test-case (and gdb.base/fission-macro-i.exp) using a current gcc trunk
build and gcc 7-14.
---
gdb/dwarf2/cu.c | 1 +
gdb/dwarf2/cu.h | 1 +
gdb/dwarf2/macro.c | 6 ++++--
gdb/dwarf2/read.c | 11 +++++++++++
gdb/dwarf2/read.h | 4 ++++
gdb/testsuite/gdb.base/fission-macro-i.exp | 4 ----
gdb/testsuite/gdb.base/fission-macro.exp | 4 ----
7 files changed, 21 insertions(+), 10 deletions(-)
@@ -35,6 +35,7 @@ dwarf2_cu::dwarf2_cu (dwarf2_per_cu_data *per_cu,
producer_is_gxx_lt_4_6 (false),
producer_is_gcc_lt_4_3 (false),
producer_is_gcc_lt_11 (false),
+ producer_is_gcc_lt_15 (false),
producer_is_gcc_11 (false),
producer_is_icc (false),
producer_is_icc_lt_14 (false),
@@ -257,6 +257,7 @@ struct dwarf2_cu
bool producer_is_gxx_lt_4_6 : 1;
bool producer_is_gcc_lt_4_3 : 1;
bool producer_is_gcc_lt_11 : 1;
+ bool producer_is_gcc_lt_15 : 1;
bool producer_is_gcc_11 : 1;
bool producer_is_icc : 1;
bool producer_is_icc_lt_14 : 1;
@@ -481,7 +481,8 @@ dwarf_decode_macro_bytes (dwarf2_per_objfile *per_objfile,
mac_ptr++;
if (section_is_gnu && cu->dwo_unit != nullptr
- && cu->per_cu->version () >= 5 && producer_is_gcc_lt_11 (cu))
+ && ((cu->per_cu->version () <= 4 && producer_is_gcc_lt_15 (cu))
+ || (cu->per_cu->version () >= 5 && producer_is_gcc_lt_11 (cu))))
{
if (macinfo_type == DW_MACRO_define_strp)
macinfo_type = DW_MACRO_define_strx;
@@ -860,7 +861,8 @@ dwarf_decode_macros (dwarf2_per_objfile *per_objfile,
mac_ptr++;
if (section_is_gnu && cu->dwo_unit != nullptr
- && cu->per_cu->version () >= 5 && producer_is_gcc_lt_11 (cu))
+ && ((cu->per_cu->version () <= 4 && producer_is_gcc_lt_15 (cu))
+ || (cu->per_cu->version () >= 5 && producer_is_gcc_lt_11 (cu))))
{
if (macinfo_type == DW_MACRO_define_strp)
macinfo_type = DW_MACRO_define_strx;
@@ -7278,6 +7278,16 @@ producer_is_gcc_lt_11 (struct dwarf2_cu *cu)
return cu->producer_is_gcc_lt_11;
}
+/* See dwarf2/read.h. */
+bool
+producer_is_gcc_lt_15 (struct dwarf2_cu *cu)
+{
+ if (!cu->checked_producer)
+ check_producer (cu);
+
+ return cu->producer_is_gcc_lt_15;
+}
+
/* See dwarf2/read.h. */
bool
producer_is_clang (struct dwarf2_cu *cu)
@@ -11310,6 +11320,7 @@ check_producer (struct dwarf2_cu *cu)
cu->producer_is_gxx_lt_4_6 = major < 4 || (major == 4 && minor < 6);
cu->producer_is_gcc_lt_4_3 = major < 4 || (major == 4 && minor < 3);
cu->producer_is_gcc_lt_11 = major < 11;
+ cu->producer_is_gcc_lt_15 = major < 15;
cu->producer_is_gcc_11 = major == 11;
}
else if (producer_is_icc (cu->producer, &major, &minor))
@@ -822,6 +822,10 @@ extern void dwarf2_get_section_info (struct objfile *,
gcc 11. */
extern bool producer_is_gcc_lt_11 (struct dwarf2_cu *cu);
+/* Return true if the producer of the inferior is gcc, and earlier than
+ gcc 15. */
+extern bool producer_is_gcc_lt_15 (struct dwarf2_cu *cu);
+
/* Return true if the producer of the inferior is clang. */
extern bool producer_is_clang (struct dwarf2_cu *cu);
@@ -66,10 +66,6 @@ proc do_tests { dwarf_version dwarf_bits strict_dwarf } {
}
foreach_with_prefix dwarf_version {4 5} {
- if { $dwarf_version == 4 && [gcc_major_version] < 15 } {
- # Gcc does not contain fix for PR debug/115066.
- continue
- }
foreach_with_prefix dwarf_bits {32 64} {
foreach_with_prefix strict_dwarf {0 1} {
do_tests $dwarf_version $dwarf_bits $strict_dwarf
@@ -67,10 +67,6 @@ proc do_tests { dwarf_version dwarf_bits strict_dwarf } {
}
foreach_with_prefix dwarf_version {4 5} {
- if { $dwarf_version == 4 && [gcc_major_version] < 15 } {
- # Gcc does not contain fix for PR debug/115066.
- continue
- }
foreach_with_prefix dwarf_bits {32 64} {
foreach_with_prefix strict_dwarf {0 1} {
do_tests $dwarf_version $dwarf_bits $strict_dwarf