With target board debug-types, we have these FAILs:
...
FAIL: gdb.guile/scm-symtab.exp: test simple_struct in static symbols
FAIL: gdb.python/py-symtab.exp: test simple_struct in static symbols
...
due to PR gcc/90232, as explained in commit
15cd93d05e8 "[gdb/symtab] Handle
struct decl with DW_AT_signature".
Marks these as XFAILs.
Tested on x86_64-linux.
gdb/testsuite/ChangeLog:
2020-04-29 Tom de Vries <tdevries@suse.de>
* lib/gdb.exp (debug_types): New proc.
* gdb.guile/scm-symtab.exp: Add xfail for PR gcc/90232.
* gdb.python/py-symtab.exp: Same.
+2020-04-29 Tom de Vries <tdevries@suse.de>
+
+ * lib/gdb.exp (debug_types): New proc.
+ * gdb.guile/scm-symtab.exp: Add xfail for PR gcc/90232.
+ * gdb.python/py-symtab.exp: Same.
+
2020-04-29 Hannes Domani <ssbssa@yahoo.de>
PR gdb/17320
2020-04-29 Hannes Domani <ssbssa@yahoo.de>
PR gdb/17320
+set debug_types [debug_types]
+
# Setup and get the symbol table.
set line_no [gdb_get_line_number "Block break here."]
gdb_breakpoint $line_no
# Setup and get the symbol table.
set line_no [gdb_get_line_number "Block break here."]
gdb_breakpoint $line_no
"#t" "test int in static symbols"
gdb_test "guile (print (->bool (member \"char\" static-symbols)))" \
"#t" "test char in static symbols"
"#t" "test int in static symbols"
gdb_test "guile (print (->bool (member \"char\" static-symbols)))" \
"#t" "test char in static symbols"
-gdb_test "guile (print (->bool (member \"simple_struct\" static-symbols)))" \
- "#t" "test simple_struct in static symbols"
+gdb_test_multiple \
+ "guile (print (->bool (member \"simple_struct\" static-symbols)))" \
+ "test simple_struct in static symbols" {
+ -re -wrap "#t" {
+ pass $gdb_test_name
+ }
+ -re -wrap "#f" {
+ if { $debug_types } {
+ # Xfail for PR gcc/90232.
+ xfail $gdb_test_name
+ } else {
+ fail $gdb_test_name
+ }
+ }
+ }
# Test is_valid when the objfile is unloaded. This must be the last
# test as it unloads the object file in GDB.
# Test is_valid when the objfile is unloaded. This must be the last
# test as it unloads the object file in GDB.
+set debug_types [debug_types]
+
global hex decimal
# Setup and get the symbol table.
global hex decimal
# Setup and get the symbol table.
gdb_test "python print (\"main\" in global_symbols)" "True" "test main in global symbols"
gdb_test "python print (\"int\" in static_symbols)" "True" "test int in static symbols"
gdb_test "python print (\"char\" in static_symbols)" "True" "test char in static symbols"
gdb_test "python print (\"main\" in global_symbols)" "True" "test main in global symbols"
gdb_test "python print (\"int\" in static_symbols)" "True" "test int in static symbols"
gdb_test "python print (\"char\" in static_symbols)" "True" "test char in static symbols"
-gdb_test "python print (\"simple_struct\" in static_symbols)" "True" "test simple_struct in static symbols"
+gdb_test_multiple "python print (\"simple_struct\" in static_symbols)" \
+ "test simple_struct in static symbols" {
+ -re -wrap "True" {
+ pass $gdb_test_name
+ }
+ -re -wrap "False" {
+ if { $debug_types } {
+ # Xfail for PR gcc/90232.
+ xfail $gdb_test_name
+ } else {
+ fail $gdb_test_name
+ }
+ }
+ }
# Test is_valid when the objfile is unloaded. This must be the last
# test as it unloads the object file in GDB.
# Test is_valid when the objfile is unloaded. This must be the last
# test as it unloads the object file in GDB.
+# Return 1 if executable contains .debug_types section. Otherwise, return 0.
+
+proc debug_types { } {
+ global hex
+
+ set cmd "maint info sections"
+ gdb_test_multiple $cmd "" {
+ -re -wrap "at $hex: .debug_types.*" {
+ return 1
+ }
+ -re -wrap "" {
+ return 0
+ }
+ }
+
+ return 0
+}
+
# Always load compatibility stuff.
load_lib future.exp
# Always load compatibility stuff.
load_lib future.exp