Files
binutils-gdb/gdb/testsuite/gdb.base/gold-gdb-index.exp
Tom de Vries be36c6e337 [gdb/testsuite] Fix gdb.base/gold-gdb-index.exp
When running test-case gdb.base/gold-gdb-index.exp on openSUSE Tumbleweed,
I run into:
...
FAIL: gdb.base/gold-gdb-index.exp: maint info symtabs
...

This is due to a dummy .gdb_index:
...
Contents of the .gdb_index section:

Version 7

CU table:

TU table:

Address table:

Symbol table:
...

The dummy .gdb_index is ignored when loading the symbols, and instead partial
symbols are used.  Consequently, we get the same result as if we'd removed
-Wl,--gdb-index from the compilation.

Presumably, gold fails to generate a proper .gdb_index because it lacks
DWARF5 support.

Anyway, without a proper .gdb_index we can't test the gdb behaviour we're
trying to excercise.  Fix this by detecting whether we actually used a
.gdb_index for symbol loading.

Tested on x86_64-linux.

gdb/testsuite/ChangeLog:

2021-07-14  Tom de Vries  <tdevries@suse.de>

	* lib/gdb.exp (have_index): New proc.
	* gdb.base/gold-gdb-index.exp: Use have_index.
2021-07-14 11:37:19 +02:00

53 lines
1.5 KiB
Plaintext

# Copyright 2020-2021 Free Software Foundation, Inc.
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>. */
# This tests the gdb workaround for PR binutils/15646.
standard_testfile .c gold-gdb-index-2.c
if { [have_fuse_ld_gold] == 0} {
return -1
}
if {[prepare_for_testing "failed to prepare" $testfile "$srcfile $srcfile2" \
{debug c++ additional_flags=-fuse-ld=gold \
additional_flags=-Wl,--gdb-index \
additional_flags=-ggnu-pubnames}]} {
return -1
}
if { [have_index $binfile] != "gdb_index" } {
return -1
}
gdb_test_no_output "set auto-solib-add off"
if ![runto_main] then {
fail "can't run to main"
return 0
}
gdb_test_no_output "set breakpoint pending off"
gdb_test "break N1::misspelled" "Function \"N1::misspelled\" not defined\."
gdb_test_multiple "maint info symtabs" "" {
-re -wrap "\{ symtab \[^\r\n\]*gold-gdb-index-2.c.*" {
fail $gdb_test_name
}
-re -wrap "" {
pass $gdb_test_name
}
}