[gdb/testsuite] Remove hardcoded filenames in gdb.dwarf2/*.exp

There's a common occurance in dwarf assembly test-cases, where a file test.exp
contains:
...
standard_testfile test.c test-dw.S
...

The "test.c" arg can be abbreviated to ".c".

Make standard_testfile treat args with "-" prefix the same as with "." prefix,
such that we can write:
...
standard_testfile .c -dw.S
...
and apply this in gdb.dwarf2/*.exp.

Tested on x86_64-linux.

gdb/testsuite/ChangeLog:

2020-10-17  Tom de Vries  <tdevries@suse.de>

	* lib/gdb.exp (standard_testfile): Also treat args starting with '-'
	as suffix.
	* gdb.dwarf2/atomic.c: Rename to ...
	* gdb.dwarf2/atomic-type.c: ... this.
	* gdb.dwarf2/dw2-ranges2.c: Rename to ...
	* gdb.dwarf2/dw2-ranges-2.c: ... this.
	* gdb.dwarf2/dw2-ranges3.c: Rename to ...
	* gdb.dwarf2/dw2-ranges-3.c: ... this.
	* gdb.dwarf2/fission-mix2.c: Rename to ...
	* gdb.dwarf2/fission-mix-2.c: ... this.
	* gdb.dwarf2/ada-linkage-name.exp: Use more suffix args for
	standard_testfile.
	* gdb.dwarf2/ada-valprint-error.exp: Same.
	* gdb.dwarf2/arr-stride.exp: Same.
	* gdb.dwarf2/arr-subrange.exp: Same.
	* gdb.dwarf2/atomic-type.exp: Same.
	* gdb.dwarf2/bad-regnum.exp: Same.
	* gdb.dwarf2/break-inline-psymtab.exp: Same.
	* gdb.dwarf2/clang-debug-names-2.exp: Same.
	* gdb.dwarf2/clang-debug-names.exp: Same.
	* gdb.dwarf2/comp-unit-lang.exp: Same.
	* gdb.dwarf2/corrupt.exp: Same.
	* gdb.dwarf2/count.exp: Same.
	* gdb.dwarf2/cpp-linkage-name.exp: Same.
	* gdb.dwarf2/data-loc.exp: Same.
	* gdb.dwarf2/dw2-align.exp: Same.
	* gdb.dwarf2/dw2-bad-elf.exp: Same.
	* gdb.dwarf2/dw2-bad-mips-linkage-name.exp: Same.
	* gdb.dwarf2/dw2-bad-unresolved.exp: Same.
	* gdb.dwarf2/dw2-case-insensitive.exp: Same.
	* gdb.dwarf2/dw2-cp-infcall-ref-static.exp: Same.
	* gdb.dwarf2/dw2-ifort-parameter.exp: Same.
	* gdb.dwarf2/dw2-inline-many-frames.exp: Same.
	* gdb.dwarf2/dw2-inline-param.exp: Same.
	* gdb.dwarf2/dw2-inline-small-func.exp: Same.
	* gdb.dwarf2/dw2-inline-stepping.exp: Same.
	* gdb.dwarf2/dw2-is-stmt-2.exp: Same.
	* gdb.dwarf2/dw2-is-stmt.exp: Same.
	* gdb.dwarf2/dw2-line-number-zero.exp: Same.
	* gdb.dwarf2/dw2-namespaceless-anonymous.exp: Same.
	* gdb.dwarf2/dw2-opt-structptr.exp: Same.
	* gdb.dwarf2/dw2-param-error.exp: Same.
	* gdb.dwarf2/dw2-ranges-base.exp: Same.
	* gdb.dwarf2/dw2-ranges.exp: Same.
	* gdb.dwarf2/dw2-unusual-field-names.exp: Same.
	* gdb.dwarf2/dw2-vendor-extended-opcode.exp: Same.
	* gdb.dwarf2/dw4-sig-types.exp: Same.
	* gdb.dwarf2/dynarr-ptr.exp: Same.
	* gdb.dwarf2/enum-type.exp: Same.
	* gdb.dwarf2/fission-mix.exp: Same.
	* gdb.dwarf2/formdata16.exp: Same.
	* gdb.dwarf2/implptrconst.exp: Same.
	* gdb.dwarf2/implptrpiece.exp: Same.
	* gdb.dwarf2/info-locals-optimized-out.exp: Same.
	* gdb.dwarf2/main-subprogram.exp: Same.
	* gdb.dwarf2/method-ptr.exp: Same.
	* gdb.dwarf2/missing-sig-type.exp: Same.
	* gdb.dwarf2/nonvar-access.exp: Same.
	* gdb.dwarf2/opaque-type-lookup.exp: Same.
	* gdb.dwarf2/shortpiece.exp: Same.
	* gdb.dwarf2/staticvirtual.exp: Same.
	* gdb.dwarf2/subrange.exp: Same.
	* gdb.dwarf2/symtab-producer.exp: Same.
	* gdb.dwarf2/typedef-void-finish.exp: Same.
	* gdb.dwarf2/var-access.exp: Same.
	* gdb.dwarf2/variant.exp: Same.
	* gdb.dwarf2/void-type.exp: Same.
	* gdb.dwarf2/dw2-ranges-psym.exp: Same.  Use main.c instead of
	dw2-ranges-main.c.
	* gdb.dwarf2/dw2-ranges-main.c: Remove.
This commit is contained in:
Tom de Vries 2020-10-17 00:10:31 +02:00
parent 874ef0386f
commit d1c8a76d05
64 changed files with 138 additions and 82 deletions

View File

@ -1,3 +1,76 @@
2020-10-17 Tom de Vries <tdevries@suse.de>
* lib/gdb.exp (standard_testfile): Also treat args starting with '-'
as suffix.
* gdb.dwarf2/atomic.c: Rename to ...
* gdb.dwarf2/atomic-type.c: ... this.
* gdb.dwarf2/dw2-ranges2.c: Rename to ...
* gdb.dwarf2/dw2-ranges-2.c: ... this.
* gdb.dwarf2/dw2-ranges3.c: Rename to ...
* gdb.dwarf2/dw2-ranges-3.c: ... this.
* gdb.dwarf2/fission-mix2.c: Rename to ...
* gdb.dwarf2/fission-mix-2.c: ... this.
* gdb.dwarf2/ada-linkage-name.exp: Use more suffix args for
standard_testfile.
* gdb.dwarf2/ada-valprint-error.exp: Same.
* gdb.dwarf2/arr-stride.exp: Same.
* gdb.dwarf2/arr-subrange.exp: Same.
* gdb.dwarf2/atomic-type.exp: Same.
* gdb.dwarf2/bad-regnum.exp: Same.
* gdb.dwarf2/break-inline-psymtab.exp: Same.
* gdb.dwarf2/clang-debug-names-2.exp: Same.
* gdb.dwarf2/clang-debug-names.exp: Same.
* gdb.dwarf2/comp-unit-lang.exp: Same.
* gdb.dwarf2/corrupt.exp: Same.
* gdb.dwarf2/count.exp: Same.
* gdb.dwarf2/cpp-linkage-name.exp: Same.
* gdb.dwarf2/data-loc.exp: Same.
* gdb.dwarf2/dw2-align.exp: Same.
* gdb.dwarf2/dw2-bad-elf.exp: Same.
* gdb.dwarf2/dw2-bad-mips-linkage-name.exp: Same.
* gdb.dwarf2/dw2-bad-unresolved.exp: Same.
* gdb.dwarf2/dw2-case-insensitive.exp: Same.
* gdb.dwarf2/dw2-cp-infcall-ref-static.exp: Same.
* gdb.dwarf2/dw2-ifort-parameter.exp: Same.
* gdb.dwarf2/dw2-inline-many-frames.exp: Same.
* gdb.dwarf2/dw2-inline-param.exp: Same.
* gdb.dwarf2/dw2-inline-small-func.exp: Same.
* gdb.dwarf2/dw2-inline-stepping.exp: Same.
* gdb.dwarf2/dw2-is-stmt-2.exp: Same.
* gdb.dwarf2/dw2-is-stmt.exp: Same.
* gdb.dwarf2/dw2-line-number-zero.exp: Same.
* gdb.dwarf2/dw2-namespaceless-anonymous.exp: Same.
* gdb.dwarf2/dw2-opt-structptr.exp: Same.
* gdb.dwarf2/dw2-param-error.exp: Same.
* gdb.dwarf2/dw2-ranges-base.exp: Same.
* gdb.dwarf2/dw2-ranges.exp: Same.
* gdb.dwarf2/dw2-unusual-field-names.exp: Same.
* gdb.dwarf2/dw2-vendor-extended-opcode.exp: Same.
* gdb.dwarf2/dw4-sig-types.exp: Same.
* gdb.dwarf2/dynarr-ptr.exp: Same.
* gdb.dwarf2/enum-type.exp: Same.
* gdb.dwarf2/fission-mix.exp: Same.
* gdb.dwarf2/formdata16.exp: Same.
* gdb.dwarf2/implptrconst.exp: Same.
* gdb.dwarf2/implptrpiece.exp: Same.
* gdb.dwarf2/info-locals-optimized-out.exp: Same.
* gdb.dwarf2/main-subprogram.exp: Same.
* gdb.dwarf2/method-ptr.exp: Same.
* gdb.dwarf2/missing-sig-type.exp: Same.
* gdb.dwarf2/nonvar-access.exp: Same.
* gdb.dwarf2/opaque-type-lookup.exp: Same.
* gdb.dwarf2/shortpiece.exp: Same.
* gdb.dwarf2/staticvirtual.exp: Same.
* gdb.dwarf2/subrange.exp: Same.
* gdb.dwarf2/symtab-producer.exp: Same.
* gdb.dwarf2/typedef-void-finish.exp: Same.
* gdb.dwarf2/var-access.exp: Same.
* gdb.dwarf2/variant.exp: Same.
* gdb.dwarf2/void-type.exp: Same.
* gdb.dwarf2/dw2-ranges-psym.exp: Same. Use main.c instead of
dw2-ranges-main.c.
* gdb.dwarf2/dw2-ranges-main.c: Remove.
2020-10-16 Tom de Vries <tdevries@suse.de>
* lib/gdb.exp (gdb_breakpoint): Remove mention of "passfail".

View File

@ -23,7 +23,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile ada-linkage-name.c ada-linkage-name-debug.S
standard_testfile .c -debug.S
# Set up the DWARF for the test.

View File

@ -19,7 +19,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile ada-valprint-error.c ada-valprint-error-dw.S
standard_testfile .c -dw.S
# We need to know the size of integer and address types in order
# to write some of the debugging info we'd like to generate.

View File

@ -19,7 +19,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile arr-stride.c arr-stride-dw.S
standard_testfile .c -dw.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -19,7 +19,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile arr-subrange.c arr-subrange-dw.S
standard_testfile .c -dw.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -19,7 +19,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile atomic.c atomic-type-dw.S
standard_testfile .c -dw.S
# Make some DWARF for the test.

View File

@ -20,7 +20,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile bad-regnum.c bad-regnum-dw.S
standard_testfile .c -dw.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -13,7 +13,7 @@
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
standard_testfile break-inline-psymtab.c break-inline-psymtab-2.c
standard_testfile .c -2.c
set sources [list $srcfile $srcfile2]
if { [prepare_for_testing "failed to prepare" ${testfile} $sources] } {

View File

@ -20,8 +20,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile clang-debug-names-2.c clang-debug-names-debug-2.S \
clang-debug-names-2-foo.c
standard_testfile .c -debug.S -foo.c
lassign \
[function_range main \

View File

@ -20,7 +20,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile clang-debug-names.c clang-debug-names-debug.S
standard_testfile .c -debug.S
lassign [function_range main ${srcdir}/${subdir}/${srcfile}] \
main_start main_length

View File

@ -25,7 +25,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile .c comp-unit-lang.S
standard_testfile .c .S
# Assemble the DWARF using CU_LANG as compilation unit's language.
# Run to a function in that compilation unit and check that GDB

View File

@ -22,7 +22,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile corrupt.c corrupt.S
standard_testfile .c .S
# Make the DWARF used for the test.
#

View File

@ -22,7 +22,7 @@ if { ![dwarf2_support] } {
return 0
}
standard_testfile main.c count.S
standard_testfile main.c .S
set asm_file [standard_output_file $srcfile2]
Dwarf::assemble $asm_file {

View File

@ -25,7 +25,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile cpp-linkage-name.c cpp-linkage-name-debug.S
standard_testfile .c -debug.S
# Set up the DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -19,7 +19,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile data-loc.c data-loc-dw.S
standard_testfile .c -dw.S
# We need to know the size of integer and address types in order
# to write some of the debugging info we'd like to generate.

View File

@ -19,7 +19,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile main.c align-dw.S
standard_testfile main.c -dw.S
# Make some DWARF for the test.

View File

@ -34,7 +34,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile dw2-bad-elf.c dw2-bad-elf-other.S dw2-bad-elf-dwarf.S
standard_testfile .c -other.S -dwarf.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile3]

View File

@ -20,7 +20,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile dw2-bad-mips-linkage-name.c dw2-bad-mips-linkage-name.S
standard_testfile .c .S
# Set up the DWARF for the test.

View File

@ -20,7 +20,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile dw2-bad-unresolved.c dw2-bad-unresolved-2.S
standard_testfile .c -2.S
# Set up the DWARF for the test.
# The key part of this is the definition of variable "var" having no location.

View File

@ -19,7 +19,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile .c dw2-case-insensitive-debug.S
standard_testfile .c -debug.S
if [is_ilp32_target] {
set ptrbits 32

View File

@ -25,7 +25,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile .S dw2-cp-infcall-ref-static-main.c
standard_testfile .S -main.c
if { [prepare_for_testing "failed to prepare" ${testfile} \
[list $srcfile2 $srcfile] {}] } {

View File

@ -22,7 +22,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile .c dw2-ifort-parameter-dw.S
standard_testfile .c -dw.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -38,7 +38,7 @@ if !$gcc_compiled {
return 0
}
standard_testfile dw2-inline-many-frames.c dw2-inline-many-frames.S
standard_testfile .c .S
set asm_file [standard_output_file $srcfile2]
Dwarf::assemble $asm_file {

View File

@ -19,7 +19,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile .S dw2-inline-param-main.c
standard_testfile .S -main.c
if { [prepare_for_testing "failed to prepare" "${testfile}" \
[list $srcfile2 $srcfile] {nodebug}] } {

View File

@ -39,8 +39,8 @@ if !$gcc_compiled {
return 0
}
standard_testfile dw2-inline-small-func-lbls.c dw2-inline-small-func.S \
dw2-inline-small-func.c dw2-inline-small-func.h
standard_testfile -lbls.c .S \
.c .h
set asm_file [standard_output_file $srcfile2]
Dwarf::assemble $asm_file {

View File

@ -38,7 +38,7 @@ if !$gcc_compiled {
return 0
}
standard_testfile dw2-inline-stepping.c dw2-inline-stepping.S
standard_testfile .c .S
set asm_file [standard_output_file $srcfile2]
Dwarf::assemble $asm_file {

View File

@ -38,7 +38,7 @@ if !$gcc_compiled {
return 0
}
standard_testfile dw2-is-stmt-2.c dw2-is-stmt-2.S
standard_testfile .c .S
set asm_file [standard_output_file $srcfile2]
Dwarf::assemble $asm_file {

View File

@ -38,7 +38,7 @@ if !$gcc_compiled {
return 0
}
standard_testfile dw2-is-stmt.c dw2-is-stmt.S
standard_testfile .c .S
set asm_file [standard_output_file $srcfile2]
Dwarf::assemble $asm_file {

View File

@ -29,7 +29,7 @@ if !$gcc_compiled {
return 0
}
standard_testfile .c dw2-line-number-zero-dw.S
standard_testfile .c -dw.S
set asm_file [standard_output_file $srcfile2]
Dwarf::assemble $asm_file {

View File

@ -21,7 +21,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile dw2-namespaceless-anonymous.c dw2-namespaceless-anonymous.S
standard_testfile .c .S
set asm_file [standard_output_file $srcfile2]
Dwarf::assemble $asm_file {

View File

@ -28,7 +28,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile dw2-opt-structptr.c dw2-opt-structptr-dw.S
standard_testfile .c -dw.S
# Generate a test program with dwarf information showing the variable
# 'ptr', a pointer-to-struct, as optimized out. The dwarf will also

View File

@ -19,7 +19,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile .S dw2-param-error-main.c
standard_testfile .S -main.c
if { [prepare_for_testing "failed to prepare" "${testfile}" \
[list $srcfile2 $srcfile] {nodebug}] } {

View File

@ -32,7 +32,7 @@ if !$gcc_compiled {
return 0
}
standard_testfile dw2-ranges-base.c dw2-ranges-base-dw.S
standard_testfile .c -dw.S
set asm_file [standard_output_file $srcfile2]
Dwarf::assemble $asm_file {

View File

@ -1,19 +0,0 @@
/* Copyright 2019-2020 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/>. */
int main ()
{
return 0;
}

View File

@ -31,7 +31,7 @@ if !$gcc_compiled {
return 0
}
standard_testfile dw2-ranges-main.c dw2-ranges-psym.c dw2-ranges-psym-dw.S
standard_testfile main.c .c -dw.S
# We need to know the size of integer and address types in order to
# write some of the debugging info we'd like to generate.

View File

@ -32,7 +32,7 @@ if !$gcc_compiled {
return 0
}
standard_testfile dw2-ranges.c dw2-ranges2.c dw2-ranges3.c
standard_testfile .c -2.c -3.c
set asmfile [standard_output_file ${testfile}.s]
set asmfile2 [standard_output_file ${testfile}2.s]
set asmfile3 [standard_output_file ${testfile}3.s]

View File

@ -34,7 +34,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile dw2-unusual-field-names.c dw2-unusual-field-names.S
standard_testfile .c .S
set asm_file [standard_output_file $srcfile2]
# We need to know the size of integer and address types in order to

View File

@ -29,7 +29,7 @@ if !$gcc_compiled {
return 0
}
standard_testfile dw2-vendor-extended-opcode.c dw2-vendor-extended-opcode-dw.S
standard_testfile .c -dw.S
set asm_file [standard_output_file $srcfile2]
Dwarf::assemble $asm_file {

View File

@ -15,7 +15,7 @@
# Test dwarf4 signatured types (DW_TAG_type_unit).
standard_testfile .cc dw4-sig-types-b.cc
standard_testfile .cc -b.cc
# This test is intended for targets which support DWARF-4.
# Since we pass an explicit -gdwarf-4 -fdebug-types-section to the compiler,

View File

@ -19,7 +19,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile dynarr-ptr.c dynarr-ptr-dw.S
standard_testfile .c -dw.S
# We need to know the size of integer and address types in order
# to write some of the debugging info we'd like to generate.

View File

@ -19,7 +19,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile main.c enum-type-dw.S
standard_testfile main.c -dw.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -20,11 +20,11 @@ if ![dwarf2_support] {
return 0
}
standard_testfile fission-mix.c fission-mix2.c
standard_testfile .c -2.c
set objfile [standard_output_file ${testfile}.o]
set objfile2 [standard_output_file ${testfile}2.o]
# Compile fission-mix.c without Fission and fission-mix2.c with Fission.
# Compile fission-mix.c without Fission and fission-mix-2.c with Fission.
if { [gdb_compile ${srcdir}/${subdir}/${srcfile} $objfile object {debug}] != "" } {
return -1
}

View File

@ -20,7 +20,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile .c formdata16-dw.S
standard_testfile .c -dw.S
# We need to know the endianess in order
# to write some of the debugging info we'd like to generate.

View File

@ -22,7 +22,7 @@ if {![dwarf2_support]} {
if { [skip_cplus_tests] } { continue }
standard_testfile .c implptrconst-dw.S
standard_testfile .c -dw.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -22,7 +22,7 @@ if {![dwarf2_support]} {
if { [skip_cplus_tests] } { continue }
standard_testfile main.c implptrpiece-dw.S
standard_testfile main.c -dw.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -22,7 +22,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile .c ${gdb_test_file_name}-dw.S
standard_testfile .c -dw.S
# Make some DWARF for the test.

View File

@ -19,7 +19,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile main-subprogram.c enum-type-dw.S
standard_testfile .c -dw.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -21,7 +21,7 @@ if {![dwarf2_support]} {
if { [skip_cplus_tests] } { continue }
standard_testfile .cc method-ptr-dw.S
standard_testfile .cc -dw.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -21,7 +21,7 @@ if {![dwarf2_support]} {
if { [skip_cplus_tests] } { continue }
standard_testfile main.c missing-sig-type-dw4.S
standard_testfile main.c -dw4.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -21,7 +21,7 @@ load_lib dwarf.exp
if {![dwarf2_support]} { return 0 }
standard_testfile main.c nonvar-access-dw.S
standard_testfile main.c -dw.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -22,7 +22,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile opaque-type-lookup.c opaque-type-lookup-1.S opaque-type-lookup-2.c
standard_testfile .c -1.S -2.c
# Create the DWARF.
set asm_file [standard_output_file $srcfile2]

View File

@ -20,7 +20,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile main.c shortpiece-dw.S
standard_testfile main.c -dw.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -21,7 +21,7 @@ if {![dwarf2_support]} {
if { [skip_cplus_tests] } { continue }
standard_testfile main.c staticvirtual-dw.S
standard_testfile main.c -dw.S
# Make DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -21,7 +21,7 @@ if {![dwarf2_support]} {
if { [skip_cplus_tests] } { continue }
standard_testfile method-ptr.cc subrange-dw.S
standard_testfile method-ptr.cc -dw.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -24,7 +24,7 @@ if {![dwarf2_support]} {
# This test can also only be run when we have python support in gdb,
# but that test can only be done after gdb has started, below.
standard_testfile main.c symtab-producer-dw.S
standard_testfile main.c -dw.S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -24,7 +24,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile void-type.c typedef-void-finish.S
standard_testfile void-type.c .S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -44,7 +44,7 @@ if { [is_aarch64_target] } {
return
}
standard_testfile .c ${gdb_test_file_name}-dw.S
standard_testfile .c -dw.S
# Make some DWARF for the test.

View File

@ -23,7 +23,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile .c variant.S
standard_testfile .c .S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -31,7 +31,7 @@ if {![dwarf2_support]} {
return 0
}
standard_testfile void-type.c void-type.S
standard_testfile .c .S
# Make some DWARF for the test.
set asm_file [standard_output_file $srcfile2]

View File

@ -5277,7 +5277,7 @@ proc cached_file { filename txt {executable 0}} {
# Without any arguments, the .exp file's base name is used to
# compute the source file name. The ".c" extension is added in this case.
# If ARGS is not empty, each entry is a source file specification.
# If the specification starts with a ".", it is treated as a suffix
# If the specification starts with a "." or "-", it is treated as a suffix
# to append to the .exp file's base name.
# If the specification is the empty string, it is treated as if it
# were ".c".
@ -5324,8 +5324,11 @@ proc standard_testfile {args} {
# Handle an extension.
if {$arg == ""} {
set arg $testfile.c
} elseif {[string range $arg 0 0] == "."} {
set arg $testfile$arg
} else {
set first [string range $arg 0 0]
if { $first == "." || $first == "-" } {
set arg $testfile$arg
}
}
set $varname $arg