diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 9d879fba3b..bb31bcdf3a 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2020-03-31 Tom de Vries + + * gdb.base/c-linkage-name.exp: Fix test-case comment. Set language to + c. Use "maint info symtabs" to check symtab expansion. + 2020-03-30 Tom de Vries * gdb.base/c-linkage-name.exp: Use readnow call to mark a test diff --git a/gdb/testsuite/gdb.base/c-linkage-name.exp b/gdb/testsuite/gdb.base/c-linkage-name.exp index 9a472a79a2..8afd8ce301 100644 --- a/gdb/testsuite/gdb.base/c-linkage-name.exp +++ b/gdb/testsuite/gdb.base/c-linkage-name.exp @@ -14,8 +14,8 @@ # along with this program. If not, see . # This file is part of the gdb testsuite. It is intended to test that -# gdb can correctly print arrays with indexes for each element of the -# array. +# gdb can correctly print an ada symbol with linkage name before and after +# symtab expansion. standard_testfile c-linkage-name.c c-linkage-name-2.c @@ -25,13 +25,19 @@ if { [gdb_compile "${sources}" "${binfile}" executable {debug}] != "" } { return -1 } -clean_restart ${binfile} +clean_restart +gdb_test_no_output "set language c" +gdb_load ${binfile} set readnow [readnow] -# Verify that partial symtab expansion has not taken place for -# c-linkage-name-2.c. +set test "verify no symtab expansion" +if { $readnow } { + unsupported $test +} else { + # Verify that symtab expansion has not taken place. -verify_psymtab_expanded c-linkage-name-2.c no + gdb_test_no_output "maint info symtabs" $test +} set test "print symada__cS before partial symtab expansion" if { $readnow } { @@ -54,7 +60,7 @@ gdb_test "break do_something_other_cu" \ # Verify that partial symtab expansion has taken place for # c-linkage-name-2.c. -verify_psymtab_expanded c-linkage-name-2.c yes +gdb_test "maint info symtabs" "\{ symtab \[^\r\n\]*c-linkage-name-2.c.*" # Flush the symbol cache to prevent the lookup to return the same as before.