gdb/testsuite: remove get_compiler_info calls from gdb.exp and dwarf.exp

We don't need to call get_compiler_info before calling
test_compiler_info; test_compiler_info includes a call to
get_compiler_info.

This commit cleans up lib/gdb.exp and lib/dwarf.exp a little by
removing some unneeded calls to get_compiler_info.  We could do the
same cleanup throughout the testsuite, but I'm leaving that for
another day.

There should be no change in the test results after this commit.
This commit is contained in:
Andrew Burgess 2022-06-08 14:25:00 +01:00
parent 61ee7510b3
commit 1562f64fec
2 changed files with 1 additions and 30 deletions

View File

@ -110,14 +110,6 @@ proc build_executable_and_dwo_files { testname executable options args } {
set binfile $executable
}
set info_options ""
if { [lsearch -exact $options "c++"] >= 0 } {
set info_options "c++"
}
if [get_compiler_info ${info_options}] {
return -1
}
set func gdb_compile
if {[lsearch -regexp $options \
{^(pthreads|shlib|shlib_pthreads|openmp)$}] != -1} {

View File

@ -3238,10 +3238,6 @@ gdb_caching_proc skip_altivec_tests {
}
# Make sure we have a compiler that understands altivec.
if [get_compiler_info] {
warning "Could not get compiler info"
return 1
}
if [test_compiler_info gcc*] {
set compile_flags "additional_flags=-maltivec"
} elseif [test_compiler_info xlc*] {
@ -3357,10 +3353,6 @@ gdb_caching_proc skip_vsx_tests {
}
# Make sure we have a compiler that understands altivec.
if [get_compiler_info] {
warning "Could not get compiler info"
return 1
}
if [test_compiler_info gcc*] {
set compile_flags "additional_flags=-mvsx"
} elseif [test_compiler_info xlc*] {
@ -4781,11 +4773,8 @@ proc gdb_compile_shlib_1 {sources dest options} {
} elseif { [lsearch -exact $options "f90"] >= 0 } {
set info_options "f90"
}
if [get_compiler_info ${info_options}] {
return -1
}
switch -glob [test_compiler_info] {
switch -glob [test_compiler_info "" ${info_options}] {
"xlc-*" {
lappend obj_options "additional_flags=-qpic"
}
@ -6964,16 +6953,6 @@ proc build_executable_from_specs {testname executable options args} {
set binfile [standard_output_file $executable]
set info_options ""
if { [lsearch -exact $options "c++"] >= 0 } {
set info_options "c++"
} elseif { [lsearch -exact $options "f90"] >= 0 } {
set info_options "f90"
}
if [get_compiler_info ${info_options}] {
return -1
}
set func gdb_compile
set func_index [lsearch -regexp $options {^(pthreads|shlib|shlib_pthreads|openmp)$}]
if {$func_index != -1} {