diff options
author | Andreas Arnez <arnez@linux.vnet.ibm.com> | 2018-03-23 10:38:23 +0100 |
---|---|---|
committer | Andreas Arnez <arnez@linux.vnet.ibm.com> | 2018-03-23 10:38:23 +0100 |
commit | 079670b94ade4b5792fa74b29a6b5b4626f27185 (patch) | |
tree | 4c960fdc6f66dc10cd52ade894002a44073d0e22 /gdb/testsuite | |
parent | a2b2bc12af45f48617729c1413a1a01c0ee957ca (diff) | |
download | gdb-079670b94ade4b5792fa74b29a6b5b4626f27185.zip gdb-079670b94ade4b5792fa74b29a6b5b4626f27185.tar.gz gdb-079670b94ade4b5792fa74b29a6b5b4626f27185.tar.bz2 |
Testsuite: fully migrate to use_gdb_stub convenience func
In the GDB test suite, there are still multiple invocations of
"target_info exists use_gdb_stub". However, the recommended way of
checking for use_gdb_stub is to call the convenience function of the same
name.
Replace these occurrences and just call "use_gdb_stub" instead.
gdb/testsuite/ChangeLog:
* gdb.ada/exec_changed.exp: Replace "target_info exists
use_gdb_stub" by "use_gdb_stub".
* gdb.ada/start.exp: Likewise.
* gdb.base/async-shell.exp: Likewise.
* gdb.base/attach-pie-misread.exp: Likewise.
* gdb.base/attach-wait-input.exp: Likewise.
* gdb.base/break-entry.exp: Likewise.
* gdb.base/break-interp.exp: Likewise.
* gdb.base/dprintf-detach.exp: Likewise.
* gdb.base/nostdlib.exp: Likewise.
* gdb.base/solib-nodir.exp: Likewise.
* gdb.base/statistics.exp: Likewise.
* gdb.base/testenv.exp: Likewise.
* gdb.mi/mi-exec-run.exp: Likewise.
* gdb.mi/mi-start.exp: Likewise.
* gdb.multi/dummy-frame-restore.exp: Likewise.
* gdb.multi/multi-arch-exec.exp: Likewise.
* gdb.multi/multi-arch.exp: Likewise.
* gdb.multi/tids.exp: Likewise.
* gdb.multi/watchpoint-multi.exp: Likewise.
* gdb.python/py-events.exp: Likewise.
* gdb.threads/attach-into-signal.exp: Likewise.
* gdb.threads/attach-stopped.exp: Likewise.
* gdb.threads/threadapply.exp: Likewise.
* lib/selftest-support.exp: Likewise.
Diffstat (limited to 'gdb/testsuite')
25 files changed, 52 insertions, 24 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index bbd0991..065b1c3 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,31 @@ +2018-03-23 Andreas Arnez <arnez@linux.vnet.ibm.com> + + * gdb.ada/exec_changed.exp: Replace "target_info exists + use_gdb_stub" by "use_gdb_stub". + * gdb.ada/start.exp: Likewise. + * gdb.base/async-shell.exp: Likewise. + * gdb.base/attach-pie-misread.exp: Likewise. + * gdb.base/attach-wait-input.exp: Likewise. + * gdb.base/break-entry.exp: Likewise. + * gdb.base/break-interp.exp: Likewise. + * gdb.base/dprintf-detach.exp: Likewise. + * gdb.base/nostdlib.exp: Likewise. + * gdb.base/solib-nodir.exp: Likewise. + * gdb.base/statistics.exp: Likewise. + * gdb.base/testenv.exp: Likewise. + * gdb.mi/mi-exec-run.exp: Likewise. + * gdb.mi/mi-start.exp: Likewise. + * gdb.multi/dummy-frame-restore.exp: Likewise. + * gdb.multi/multi-arch-exec.exp: Likewise. + * gdb.multi/multi-arch.exp: Likewise. + * gdb.multi/tids.exp: Likewise. + * gdb.multi/watchpoint-multi.exp: Likewise. + * gdb.python/py-events.exp: Likewise. + * gdb.threads/attach-into-signal.exp: Likewise. + * gdb.threads/attach-stopped.exp: Likewise. + * gdb.threads/threadapply.exp: Likewise. + * lib/selftest-support.exp: Likewise. + 2018-03-22 Andreas Arnez <arnez@linux.vnet.ibm.com> * gdb.base/info-proc.exp: Add test for "info proc cmdline". diff --git a/gdb/testsuite/gdb.ada/exec_changed.exp b/gdb/testsuite/gdb.ada/exec_changed.exp index 8070eec..943a751 100644 --- a/gdb/testsuite/gdb.ada/exec_changed.exp +++ b/gdb/testsuite/gdb.ada/exec_changed.exp @@ -19,7 +19,7 @@ if { [skip_ada_tests] } { return -1 } # This testcase verifies the behavior of the `start' command, which # does not work when we use the gdb stub... -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { untested "skipping tests due to use_gdb_stub" return } diff --git a/gdb/testsuite/gdb.ada/start.exp b/gdb/testsuite/gdb.ada/start.exp index 711f3df..cbf615e 100644 --- a/gdb/testsuite/gdb.ada/start.exp +++ b/gdb/testsuite/gdb.ada/start.exp @@ -19,7 +19,7 @@ if { [skip_ada_tests] } { return -1 } # This testcase verifies the behavior of the `start' command, which # does not work when we use the gdb stub... -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { untested "skipping test due to gdb stub" return } diff --git a/gdb/testsuite/gdb.base/async-shell.exp b/gdb/testsuite/gdb.base/async-shell.exp index c7782f4..37046d6 100644 --- a/gdb/testsuite/gdb.base/async-shell.exp +++ b/gdb/testsuite/gdb.base/async-shell.exp @@ -21,7 +21,7 @@ if { ![support_displaced_stepping] } { } # The testfile uses "run". The real bug happened only for ![is_remote target]. -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { return 0 } diff --git a/gdb/testsuite/gdb.base/attach-pie-misread.exp b/gdb/testsuite/gdb.base/attach-pie-misread.exp index aa7710a..b693d3a 100644 --- a/gdb/testsuite/gdb.base/attach-pie-misread.exp +++ b/gdb/testsuite/gdb.base/attach-pie-misread.exp @@ -14,7 +14,7 @@ # along with this program. If not, see <http://www.gnu.org/licenses/>. # This test only works on GNU/Linux. -if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub] +if { ![isnative] || [is_remote host] || [use_gdb_stub] || ![istarget *-linux*] || [skip_shlib_tests]} { continue } diff --git a/gdb/testsuite/gdb.base/attach-wait-input.exp b/gdb/testsuite/gdb.base/attach-wait-input.exp index 67abaa2..776cac8 100644 --- a/gdb/testsuite/gdb.base/attach-wait-input.exp +++ b/gdb/testsuite/gdb.base/attach-wait-input.exp @@ -29,7 +29,7 @@ # simpler to do, so we test with both editing on and off. # The test uses the "attach" command. -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { return } diff --git a/gdb/testsuite/gdb.base/break-entry.exp b/gdb/testsuite/gdb.base/break-entry.exp index 8775b38..85de662 100644 --- a/gdb/testsuite/gdb.base/break-entry.exp +++ b/gdb/testsuite/gdb.base/break-entry.exp @@ -27,7 +27,7 @@ standard_testfile start.c -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { untested "skipping tests due to use_gdb_stub" return } diff --git a/gdb/testsuite/gdb.base/break-interp.exp b/gdb/testsuite/gdb.base/break-interp.exp index a065d98..72117cb 100644 --- a/gdb/testsuite/gdb.base/break-interp.exp +++ b/gdb/testsuite/gdb.base/break-interp.exp @@ -14,7 +14,7 @@ # along with this program. If not, see <http://www.gnu.org/licenses/>. # This test only works on GNU/Linux. -if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub] +if { ![isnative] || [is_remote host] || [use_gdb_stub] || ![istarget *-linux*] || [skip_shlib_tests]} { continue } diff --git a/gdb/testsuite/gdb.base/dprintf-detach.exp b/gdb/testsuite/gdb.base/dprintf-detach.exp index ed92c4a..4c3b33b 100644 --- a/gdb/testsuite/gdb.base/dprintf-detach.exp +++ b/gdb/testsuite/gdb.base/dprintf-detach.exp @@ -21,7 +21,7 @@ load_lib gdbserver-support.exp # The test relies on "detach/attach". -if { [target_info exists use_gdb_stub] } then { +if { [use_gdb_stub] } then { return 0 } diff --git a/gdb/testsuite/gdb.base/nostdlib.exp b/gdb/testsuite/gdb.base/nostdlib.exp index 54b6cb3..2ce2132 100644 --- a/gdb/testsuite/gdb.base/nostdlib.exp +++ b/gdb/testsuite/gdb.base/nostdlib.exp @@ -18,7 +18,7 @@ standard_testfile .c # If we're using a stub, breakpoints at the entry point will not trigger. # See also the comment in break-entry.exp. -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { untested "skipping tests due to use_gdb_stub" return } diff --git a/gdb/testsuite/gdb.base/solib-nodir.exp b/gdb/testsuite/gdb.base/solib-nodir.exp index 42314c8..911d614 100644 --- a/gdb/testsuite/gdb.base/solib-nodir.exp +++ b/gdb/testsuite/gdb.base/solib-nodir.exp @@ -25,7 +25,7 @@ if [is_remote target] { # We need to be able to influence the target's environment and working # directory. Can't do that if when we connect the inferior is already # running. -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { return } diff --git a/gdb/testsuite/gdb.base/statistics.exp b/gdb/testsuite/gdb.base/statistics.exp index eb99ff4..c093b03 100644 --- a/gdb/testsuite/gdb.base/statistics.exp +++ b/gdb/testsuite/gdb.base/statistics.exp @@ -18,7 +18,7 @@ standard_testfile gdb_exit # Inlined default_gdb_start. -set use_gdb_stub [target_info exists use_gdb_stub] +set use_gdb_stub [use_gdb_stub] set res [remote_spawn host "$GDB $INTERNAL_GDBFLAGS $GDBFLAGS [host_info gdb_opts] -statistics"] if { $res < 0 || $res == "" } { perror "Spawning $GDB failed." diff --git a/gdb/testsuite/gdb.base/testenv.exp b/gdb/testsuite/gdb.base/testenv.exp index 4c123d9..4c4c6e6 100644 --- a/gdb/testsuite/gdb.base/testenv.exp +++ b/gdb/testsuite/gdb.base/testenv.exp @@ -20,7 +20,7 @@ # Can't pass environment variables to the inferior if when we connect, # the inferior is already running. -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { return } diff --git a/gdb/testsuite/gdb.mi/mi-exec-run.exp b/gdb/testsuite/gdb.mi/mi-exec-run.exp index 7e1758f..ca3da5d 100644 --- a/gdb/testsuite/gdb.mi/mi-exec-run.exp +++ b/gdb/testsuite/gdb.mi/mi-exec-run.exp @@ -28,7 +28,7 @@ set MIFLAGS "-i=mi" # The purpose of this testcase is to test the -exec-run command. If we # cannot use it, then there is no point in running this testcase. -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { untested "cannot use -exec-run command" return -1 } diff --git a/gdb/testsuite/gdb.mi/mi-start.exp b/gdb/testsuite/gdb.mi/mi-start.exp index 64f7f47..185318a 100644 --- a/gdb/testsuite/gdb.mi/mi-start.exp +++ b/gdb/testsuite/gdb.mi/mi-start.exp @@ -19,7 +19,7 @@ set MIFLAGS "-i=mi" # The purpose of this testcase is to test the --start option of # the -exec-run command. If we cannot use the -exec-run command, # then there is no point in running this testcase... -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { untested "cannot use -exec-run command" return -1 } diff --git a/gdb/testsuite/gdb.multi/dummy-frame-restore.exp b/gdb/testsuite/gdb.multi/dummy-frame-restore.exp index 4372081..b5b012f 100644 --- a/gdb/testsuite/gdb.multi/dummy-frame-restore.exp +++ b/gdb/testsuite/gdb.multi/dummy-frame-restore.exp @@ -17,7 +17,7 @@ standard_testfile .c set executable ${testfile} # The plain remote target can't do multiple inferiors. -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { return } diff --git a/gdb/testsuite/gdb.multi/multi-arch-exec.exp b/gdb/testsuite/gdb.multi/multi-arch-exec.exp index eaaa9ec..9ff439d 100644 --- a/gdb/testsuite/gdb.multi/multi-arch-exec.exp +++ b/gdb/testsuite/gdb.multi/multi-arch-exec.exp @@ -19,7 +19,7 @@ set testfile "multi-arch-exec" # The plain remote target can't do multiple inferiors. -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { return } diff --git a/gdb/testsuite/gdb.multi/multi-arch.exp b/gdb/testsuite/gdb.multi/multi-arch.exp index 61ab15b..3a90f02 100644 --- a/gdb/testsuite/gdb.multi/multi-arch.exp +++ b/gdb/testsuite/gdb.multi/multi-arch.exp @@ -19,7 +19,7 @@ set testfile "multi-arch" # The plain remote target can't do multiple inferiors. -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { return } diff --git a/gdb/testsuite/gdb.multi/tids.exp b/gdb/testsuite/gdb.multi/tids.exp index 334e08e..67349b5 100644 --- a/gdb/testsuite/gdb.multi/tids.exp +++ b/gdb/testsuite/gdb.multi/tids.exp @@ -22,7 +22,7 @@ standard_testfile # Multiple inferiors are needed, therefore both native and extended # gdbserver modes are supported. Only non-extended gdbserver is not # supported. -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { untested "using gdb stub" return } diff --git a/gdb/testsuite/gdb.multi/watchpoint-multi.exp b/gdb/testsuite/gdb.multi/watchpoint-multi.exp index 5234304..bba1b90 100644 --- a/gdb/testsuite/gdb.multi/watchpoint-multi.exp +++ b/gdb/testsuite/gdb.multi/watchpoint-multi.exp @@ -18,7 +18,7 @@ set executable ${testfile} # Multiple inferiors are needed, therefore both native and extended gdbserver # modes are supported. Only non-extended gdbserver is not supported. -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { untested "using gdb stub" return } diff --git a/gdb/testsuite/gdb.python/py-events.exp b/gdb/testsuite/gdb.python/py-events.exp index 26cc802..5109e7a 100644 --- a/gdb/testsuite/gdb.python/py-events.exp +++ b/gdb/testsuite/gdb.python/py-events.exp @@ -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/>. -if [target_info exists use_gdb_stub] { +if [use_gdb_stub] { return 0 } diff --git a/gdb/testsuite/gdb.threads/attach-into-signal.exp b/gdb/testsuite/gdb.threads/attach-into-signal.exp index 446f00c..4a0a670 100644 --- a/gdb/testsuite/gdb.threads/attach-into-signal.exp +++ b/gdb/testsuite/gdb.threads/attach-into-signal.exp @@ -17,7 +17,7 @@ # This file was created by Jan Kratochvil <jan.kratochvil@redhat.com>. # This test only works on Linux -if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub] +if { ![isnative] || [is_remote host] || [use_gdb_stub] || ![istarget *-linux*] } { continue } diff --git a/gdb/testsuite/gdb.threads/attach-stopped.exp b/gdb/testsuite/gdb.threads/attach-stopped.exp index 6c8c8bf..a3916c6 100644 --- a/gdb/testsuite/gdb.threads/attach-stopped.exp +++ b/gdb/testsuite/gdb.threads/attach-stopped.exp @@ -18,7 +18,7 @@ # This file was updated by Jan Kratochvil <jan.kratochvil@redhat.com>. # This test only works on Linux -if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub] +if { ![isnative] || [is_remote host] || [use_gdb_stub] || ![istarget *-linux*] } { continue } diff --git a/gdb/testsuite/gdb.threads/threadapply.exp b/gdb/testsuite/gdb.threads/threadapply.exp index fc8aac6..8979ee3 100644 --- a/gdb/testsuite/gdb.threads/threadapply.exp +++ b/gdb/testsuite/gdb.threads/threadapply.exp @@ -105,7 +105,7 @@ proc kill_and_remove_inferior {thread_set} { # The test starts multiple inferiors, therefore non-extended # remote is not supported. - if [target_info exists use_gdb_stub] { + if [use_gdb_stub] { unsupported "using gdb stub" return } diff --git a/gdb/testsuite/lib/selftest-support.exp b/gdb/testsuite/lib/selftest-support.exp index 89e2e3f..f7169e0 100644 --- a/gdb/testsuite/lib/selftest-support.exp +++ b/gdb/testsuite/lib/selftest-support.exp @@ -140,7 +140,7 @@ proc do_self_tests {function body} { # ... or with a stub-like server? I.e., gdbserver + "target # remote"? In that case we won't be able to pass command line # arguments to GDB, and selftest_setup wants to do exactly that. - if [target_info exists use_gdb_stub] { + if [use_gdb_stub] { return } |