[gdb/testsuite] Fix DUPLICATEs in gdb.dwarf2/implptr-64bit.exp

When running test-case gdb.dwarf2/implptr-64bit.exp with target board
unix/-m32, I noticed:
...
DUPLICATE: gdb.dwarf2/implptr-64bit.exp: failed to prepare
...

Fix this by using with_test_prefix.

Tested on x86_64-linux.
This commit is contained in:
Tom de Vries 2021-09-24 12:39:15 +02:00
parent 11a607f8cb
commit d8f2441d85

View File

@ -21,11 +21,9 @@ if {![dwarf2_support]} {
standard_testfile main.c
proc test { dwarf_version offset_size addr_size ref_addr_size two_cu } {
proc test_1 { name dwarf_version offset_size addr_size ref_addr_size two_cu } {
global testfile srcfile
set name "d${dwarf_version}o${offset_size}a${addr_size}r${ref_addr_size}t${two_cu}"
# Make some DWARF for the test.
set asm_file [standard_output_file ${testfile}-${name}.S]
Dwarf::assemble $asm_file {
@ -137,7 +135,23 @@ proc test { dwarf_version offset_size addr_size ref_addr_size two_cu } {
return -1
}
gdb_test "p/x p->f" " = 0x1010101" $name
gdb_test "p/x p->f" " = 0x1010101"
}
proc test { dwarf_version offset_size addr_size ref_addr_size two_cu } {
set name \
[list \
"d${dwarf_version}" \
"o${offset_size}" \
"a${addr_size}" \
"r${ref_addr_size}" \
"t${two_cu}"]
set name [join $name "-"]
with_test_prefix $name {
test_1 $name \
$dwarf_version $offset_size $addr_size $ref_addr_size $two_cu
}
}
# DWARF_VERSION OFFSET_SIZE ADDR_SIZE REF_ADDR_SIZE TWO_CU