[gdb/testsuite] Remove unused globals
Remove unused global variable declarations. Tested on x86_64-linux. gdb/testsuite/ChangeLog: 2020-02-27 Tom de Vries <tdevries@suse.de> * config/sid.exp: Remove unused globals. * gdb.base/attach.exp: Same. * gdb.base/catch-load.exp: Same. * gdb.base/dbx.exp: Same. * lib/gdb.exp: Same. * lib/mi-support.exp: Same. * lib/prompt.exp: Same.
This commit is contained in:
parent
c8d4f6dfd9
commit
3608f86c42
|
@ -1,3 +1,13 @@
|
|||
2020-02-27 Tom de Vries <tdevries@suse.de>
|
||||
|
||||
* config/sid.exp: Remove unused globals.
|
||||
* gdb.base/attach.exp: Same.
|
||||
* gdb.base/catch-load.exp: Same.
|
||||
* gdb.base/dbx.exp: Same.
|
||||
* lib/gdb.exp: Same.
|
||||
* lib/mi-support.exp: Same.
|
||||
* lib/prompt.exp: Same.
|
||||
|
||||
2020-02-27 Tom de Vries <tdevries@suse.de>
|
||||
|
||||
* lib/tuiterm.exp (spawn): Handle case that spawn_out(slave,name) is
|
||||
|
|
|
@ -15,8 +15,6 @@
|
|||
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||
|
||||
proc sid_start {} {
|
||||
global verbose
|
||||
|
||||
set port [lindex [split [target_info netport] ":"] 1]
|
||||
|
||||
# Set a default endianness
|
||||
|
|
|
@ -53,10 +53,6 @@ proc_with_prefix do_attach_failure_tests {} {
|
|||
global binfile
|
||||
global escapedbinfile
|
||||
global srcfile
|
||||
global testfile
|
||||
global subdir
|
||||
global timeout
|
||||
global decimal
|
||||
|
||||
clean_restart $binfile
|
||||
|
||||
|
@ -205,8 +201,6 @@ proc_with_prefix do_attach_tests {} {
|
|||
global binfile
|
||||
global escapedbinfile
|
||||
global srcfile
|
||||
global testfile
|
||||
global subdir
|
||||
global timeout
|
||||
global decimal
|
||||
|
||||
|
@ -439,10 +433,6 @@ proc_with_prefix do_call_attach_tests {} {
|
|||
proc_with_prefix do_command_attach_tests {} {
|
||||
global gdb_prompt
|
||||
global binfile
|
||||
global verbose
|
||||
global GDB
|
||||
global INTERNAL_GDBFLAGS
|
||||
global GDBFLAGS
|
||||
|
||||
if ![isnative] then {
|
||||
unsupported "command attach test"
|
||||
|
|
|
@ -46,8 +46,7 @@ if { [gdb_compile_shlib "${srcdir}/${subdir}/${srcfile2}" ${binfile2} {debug}] !
|
|||
# MATCH is a boolean saying whether we expect the catchpoint to be hit.
|
||||
proc one_catch_load_test {scenario kind match sostop} {
|
||||
with_test_prefix "${scenario}" {
|
||||
global verbose testfile testfile2 binfile2 binfile2_dlopen
|
||||
global srcfile
|
||||
global testfile testfile2 binfile2 binfile2_dlopen
|
||||
global decimal gdb_prompt
|
||||
|
||||
clean_restart $testfile
|
||||
|
|
|
@ -26,7 +26,6 @@ if {[build_executable $testfile.exp $testfile \
|
|||
# start gdb -- start gdb running, default procedure
|
||||
#
|
||||
proc dbx_gdb_start { } {
|
||||
global verbose
|
||||
global GDB
|
||||
global INTERNAL_GDBFLAGS GDBFLAGS
|
||||
global prompt
|
||||
|
@ -153,7 +152,6 @@ set old_gdb_file_cmd_args [info args gdb_file_cmd]
|
|||
set old_gdb_file_cmd_body [info body gdb_file_cmd]
|
||||
|
||||
proc gdb_file_cmd {arg} {
|
||||
global verbose
|
||||
global loadpath
|
||||
global loadfile
|
||||
global GDB
|
||||
|
|
|
@ -159,7 +159,6 @@ proc gdb_version { } {
|
|||
#
|
||||
|
||||
proc gdb_unload {} {
|
||||
global verbose
|
||||
global GDB
|
||||
global gdb_prompt
|
||||
send_gdb "file\n"
|
||||
|
@ -1617,7 +1616,6 @@ proc gdb_reinitialize_dir { subdir } {
|
|||
proc default_gdb_exit {} {
|
||||
global GDB
|
||||
global INTERNAL_GDBFLAGS GDBFLAGS
|
||||
global verbose
|
||||
global gdb_spawn_id inferior_spawn_id
|
||||
global inotify_log_file
|
||||
|
||||
|
@ -1683,7 +1681,6 @@ proc default_gdb_exit {} {
|
|||
|
||||
proc gdb_file_cmd { arg } {
|
||||
global gdb_prompt
|
||||
global verbose
|
||||
global GDB
|
||||
global last_loaded_file
|
||||
|
||||
|
@ -5131,7 +5128,6 @@ set debug_format "unknown"
|
|||
|
||||
proc get_debug_format { } {
|
||||
global gdb_prompt
|
||||
global verbose
|
||||
global expect_out
|
||||
global debug_format
|
||||
|
||||
|
|
|
@ -55,7 +55,6 @@ proc mi_gdb_exit {} {
|
|||
proc mi_uncatched_gdb_exit {} {
|
||||
global GDB
|
||||
global INTERNAL_GDBFLAGS GDBFLAGS
|
||||
global verbose
|
||||
global gdb_spawn_id gdb_main_spawn_id
|
||||
global mi_spawn_id inferior_spawn_id
|
||||
global gdb_prompt
|
||||
|
@ -185,7 +184,7 @@ proc mi_gdb_start_separate_mi_tty { args } {
|
|||
# get really slow. Give gdb at least 3 minutes to start up.
|
||||
#
|
||||
proc default_mi_gdb_start { args } {
|
||||
global verbose use_gdb_stub
|
||||
global use_gdb_stub
|
||||
global GDB
|
||||
global INTERNAL_GDBFLAGS GDBFLAGS
|
||||
global gdb_prompt
|
||||
|
@ -482,7 +481,6 @@ proc mi_gdb_target_cmd { targetname serialport } {
|
|||
# return a -1 if anything goes wrong.
|
||||
#
|
||||
proc mi_gdb_file_cmd { arg } {
|
||||
global verbose
|
||||
global loadpath
|
||||
global loadfile
|
||||
global GDB
|
||||
|
@ -553,7 +551,6 @@ proc mi_gdb_file_cmd { arg } {
|
|||
# return a -1 if anything goes wrong.
|
||||
#
|
||||
proc mi_gdb_target_load { } {
|
||||
global verbose
|
||||
global loadpath
|
||||
global loadfile
|
||||
global GDB
|
||||
|
|
|
@ -24,7 +24,6 @@
|
|||
# uses pass if it sees $gdb_prompt, and fail if it sees $gdb_prompt_fail.
|
||||
#
|
||||
proc default_prompt_gdb_start { } {
|
||||
global verbose
|
||||
global GDB
|
||||
global INTERNAL_GDBFLAGS GDBFLAGS
|
||||
global gdb_prompt
|
||||
|
|
Loading…
Reference in New Issue