aboutsummaryrefslogtreecommitdiff
path: root/gdb
diff options
context:
space:
mode:
authorTom Tromey <tom@tromey.com>2023-02-22 14:49:47 -0700
committerTom Tromey <tom@tromey.com>2023-03-10 08:21:46 -0700
commit450d26c851c15e08249fc0fdeb3a06b31ac4fcfd (patch)
tree828224a9e444e3e3a0ea672ddb88cad7eb4c5ef6 /gdb
parent1cd0716eb199963ec63fcafa94699d14bbf45e01 (diff)
downloadfsf-binutils-gdb-450d26c851c15e08249fc0fdeb3a06b31ac4fcfd.zip
fsf-binutils-gdb-450d26c851c15e08249fc0fdeb3a06b31ac4fcfd.tar.gz
fsf-binutils-gdb-450d26c851c15e08249fc0fdeb3a06b31ac4fcfd.tar.bz2
Use require with target_info
This changes many tests to use 'require' when checking target_info. In a few spots, the require is hoisted to the top of the file, to avoid doing any extra work when the test is going to be skipped anyway.
Diffstat (limited to 'gdb')
-rw-r--r--gdb/testsuite/gdb.base/args.exp4
-rw-r--r--gdb/testsuite/gdb.base/bp-cmds-continue-ctrl-c.exp10
-rw-r--r--gdb/testsuite/gdb.base/branch-to-self.exp5
-rw-r--r--gdb/testsuite/gdb.base/call-ar-st.exp5
-rw-r--r--gdb/testsuite/gdb.base/call-rt-st.exp11
-rw-r--r--gdb/testsuite/gdb.base/call-sc.exp5
-rw-r--r--gdb/testsuite/gdb.base/call-signal-resume.exp16
-rw-r--r--gdb/testsuite/gdb.base/call-strs.exp5
-rw-r--r--gdb/testsuite/gdb.base/callexit.exp5
-rw-r--r--gdb/testsuite/gdb.base/callfuncs.exp5
-rw-r--r--gdb/testsuite/gdb.base/cast-call.exp5
-rw-r--r--gdb/testsuite/gdb.base/catch-gdb-caused-signals.exp5
-rw-r--r--gdb/testsuite/gdb.base/catch-signal-fork.exp5
-rw-r--r--gdb/testsuite/gdb.base/catch-signal-siginfo-cond.exp5
-rw-r--r--gdb/testsuite/gdb.base/catch-signal.exp5
-rw-r--r--gdb/testsuite/gdb.base/exitsignal.exp5
-rw-r--r--gdb/testsuite/gdb.base/fileio.exp5
-rw-r--r--gdb/testsuite/gdb.base/huge.exp4
-rw-r--r--gdb/testsuite/gdb.base/infcall-input.exp5
-rw-r--r--gdb/testsuite/gdb.base/inferior-args.exp5
-rw-r--r--gdb/testsuite/gdb.base/interrupt-daemon-attach.exp10
-rw-r--r--gdb/testsuite/gdb.base/interrupt.exp10
-rw-r--r--gdb/testsuite/gdb.base/kill-after-signal.exp5
-rw-r--r--gdb/testsuite/gdb.base/long-inferior-output.exp5
-rw-r--r--gdb/testsuite/gdb.base/long_long.exp4
-rw-r--r--gdb/testsuite/gdb.base/paginate-after-ctrl-c-running.exp5
-rw-r--r--gdb/testsuite/gdb.base/random-signal.exp10
-rw-r--r--gdb/testsuite/gdb.base/relativedebug.exp5
-rw-r--r--gdb/testsuite/gdb.base/savedregs.exp5
-rw-r--r--gdb/testsuite/gdb.base/sigall.exp5
-rw-r--r--gdb/testsuite/gdb.base/sigaltstack.exp5
-rw-r--r--gdb/testsuite/gdb.base/sigbpt.exp5
-rw-r--r--gdb/testsuite/gdb.base/sigchld.exp5
-rw-r--r--gdb/testsuite/gdb.base/siginfo-addr.exp5
-rw-r--r--gdb/testsuite/gdb.base/siginfo-infcall.exp5
-rw-r--r--gdb/testsuite/gdb.base/siginfo-obj.exp5
-rw-r--r--gdb/testsuite/gdb.base/siginfo-thread.exp5
-rw-r--r--gdb/testsuite/gdb.base/siginfo.exp5
-rw-r--r--gdb/testsuite/gdb.base/signals.exp5
-rw-r--r--gdb/testsuite/gdb.base/signest.exp5
-rw-r--r--gdb/testsuite/gdb.base/signull.exp5
-rw-r--r--gdb/testsuite/gdb.base/sigrepeat.exp5
-rw-r--r--gdb/testsuite/gdb.base/sigstep.exp5
-rw-r--r--gdb/testsuite/gdb.base/sigwinch-notty.exp5
-rw-r--r--gdb/testsuite/gdb.base/structs.exp5
-rw-r--r--gdb/testsuite/gdb.base/unwindonsignal.exp10
-rw-r--r--gdb/testsuite/gdb.base/watch-cond-infcall.exp5
-rw-r--r--gdb/testsuite/gdb.cp/gdb2495.exp10
-rw-r--r--gdb/testsuite/gdb.fortran/array-slices.exp4
-rw-r--r--gdb/testsuite/gdb.fortran/lbound-ubound.exp8
-rw-r--r--gdb/testsuite/gdb.gdb/python-helper.exp5
-rw-r--r--gdb/testsuite/gdb.mi/mi-syn-frame.exp5
-rw-r--r--gdb/testsuite/gdb.mi/mi-threads-interrupt.exp5
-rw-r--r--gdb/testsuite/gdb.reverse/sigall-precsave.exp5
-rw-r--r--gdb/testsuite/gdb.reverse/sigall-reverse.exp5
-rw-r--r--gdb/testsuite/gdb.server/reconnect-ctrl-c.exp5
-rw-r--r--gdb/testsuite/gdb.threads/continue-pending-status.exp5
-rw-r--r--gdb/testsuite/gdb.threads/hand-call-in-threads.exp11
-rw-r--r--gdb/testsuite/gdb.threads/interrupted-hand-call.exp11
-rw-r--r--gdb/testsuite/gdb.threads/leader-exit.exp5
-rw-r--r--gdb/testsuite/gdb.threads/manythreads.exp5
-rw-r--r--gdb/testsuite/gdb.threads/multiple-step-overs.exp5
-rw-r--r--gdb/testsuite/gdb.threads/names.exp4
-rw-r--r--gdb/testsuite/gdb.threads/non-stop-fair-events.exp5
-rw-r--r--gdb/testsuite/gdb.threads/pthreads.exp5
-rw-r--r--gdb/testsuite/gdb.threads/schedlock.exp5
-rw-r--r--gdb/testsuite/gdb.threads/signal-command-handle-nopass.exp5
-rw-r--r--gdb/testsuite/gdb.threads/signal-command-multiple-signals-pending.exp5
-rw-r--r--gdb/testsuite/gdb.threads/signal-delivered-right-thread.exp5
-rw-r--r--gdb/testsuite/gdb.threads/signal-sigtrap.exp5
-rw-r--r--gdb/testsuite/gdb.threads/signal-while-stepping-over-bp-other-thread.exp5
-rw-r--r--gdb/testsuite/gdb.threads/sigthread.exp9
-rw-r--r--gdb/testsuite/gdb.threads/thread-unwindonsignal.exp11
-rw-r--r--gdb/testsuite/gdb.trace/signal.exp5
-rw-r--r--gdb/testsuite/gdb.tui/completion.exp4
75 files changed, 100 insertions, 341 deletions
diff --git a/gdb/testsuite/gdb.base/args.exp b/gdb/testsuite/gdb.base/args.exp
index 1789074..0b55c44 100644
--- a/gdb/testsuite/gdb.base/args.exp
+++ b/gdb/testsuite/gdb.base/args.exp
@@ -16,9 +16,7 @@
# This is a test for the gdb invocation option --args.
# Skip test if target does not support argument passing.
-if [target_info exists noargs] {
- return
-}
+require {!target_info exists noargs}
# This test requires starting new inferior processes, skip it if the target
# board is a stub.
diff --git a/gdb/testsuite/gdb.base/bp-cmds-continue-ctrl-c.exp b/gdb/testsuite/gdb.base/bp-cmds-continue-ctrl-c.exp
index d8eb353..f773fdbe 100644
--- a/gdb/testsuite/gdb.base/bp-cmds-continue-ctrl-c.exp
+++ b/gdb/testsuite/gdb.base/bp-cmds-continue-ctrl-c.exp
@@ -19,16 +19,10 @@
# the terminal (between the stop and the re-resume), the resulting
# "Quit" doesn't mess up the debug session.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
# This test requires sending ^C to interrupt the running target.
-if [target_info exists gdb,nointerrupts] {
- verbose "Skipping because of nointerrupts."
- return
-}
+require {!target_info exists gdb,nointerrupts}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/branch-to-self.exp b/gdb/testsuite/gdb.base/branch-to-self.exp
index 0327955..abb12c0 100644
--- a/gdb/testsuite/gdb.base/branch-to-self.exp
+++ b/gdb/testsuite/gdb.base/branch-to-self.exp
@@ -15,10 +15,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 gdb,nosignals] {
- verbose "Skipping branch-to-self.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/call-ar-st.exp b/gdb/testsuite/gdb.base/call-ar-st.exp
index 7e2aee6..8abd3b4 100644
--- a/gdb/testsuite/gdb.base/call-ar-st.exp
+++ b/gdb/testsuite/gdb.base/call-ar-st.exp
@@ -21,10 +21,7 @@ standard_testfile
# Some targets can't call functions, so don't even bother with this
# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "this target can not call functions"
- return
-}
+require {!target_info exists gdb,cannot_call_functions}
# Create and source the file that provides information about the compiler
# used to compile the test case.
diff --git a/gdb/testsuite/gdb.base/call-rt-st.exp b/gdb/testsuite/gdb.base/call-rt-st.exp
index a84c167..9840e3c 100644
--- a/gdb/testsuite/gdb.base/call-rt-st.exp
+++ b/gdb/testsuite/gdb.base/call-rt-st.exp
@@ -19,7 +19,9 @@
# corresponding source file: call_return_struct.c
-
+# Some targets can't do function calls, so don't even bother with this
+# test.
+require {!target_info exists gdb,cannot_call_functions}
standard_testfile .c
@@ -28,13 +30,6 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb
return -1
}
-# Some targets can't do function calls, so don't even bother with this
-# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "this target can not call functions"
- return
-}
-
set allow_float_test [allow_float_test]
# Start with a fresh gdb.
diff --git a/gdb/testsuite/gdb.base/call-sc.exp b/gdb/testsuite/gdb.base/call-sc.exp
index cda6f61..45728de 100644
--- a/gdb/testsuite/gdb.base/call-sc.exp
+++ b/gdb/testsuite/gdb.base/call-sc.exp
@@ -22,10 +22,7 @@
# Some targets can't call functions, so don't even bother with this
# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "this target can not call functions"
- return
-}
+require {!target_info exists gdb,cannot_call_functions}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/call-signal-resume.exp b/gdb/testsuite/gdb.base/call-signal-resume.exp
index 2388b94..a08ca7e 100644
--- a/gdb/testsuite/gdb.base/call-signal-resume.exp
+++ b/gdb/testsuite/gdb.base/call-signal-resume.exp
@@ -20,10 +20,11 @@
# 2) Inferior is stopped at a signal. Upon resumption it should continue
# with that signal, regardless of whatever the hand-called function did.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping call-signal-resume.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
+
+# Some targets can't do function calls, so don't even bother with this
+# test.
+require {!target_info exists gdb,cannot_call_functions}
standard_testfile call-signals.c
@@ -33,13 +34,6 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb
return -1
}
-# Some targets can't do function calls, so don't even bother with this
-# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "this target can not call functions"
- return
-}
-
proc get_dummy_frame_number { } {
global gdb_prompt
diff --git a/gdb/testsuite/gdb.base/call-strs.exp b/gdb/testsuite/gdb.base/call-strs.exp
index 90fe176..f1577cb 100644
--- a/gdb/testsuite/gdb.base/call-strs.exp
+++ b/gdb/testsuite/gdb.base/call-strs.exp
@@ -27,10 +27,7 @@ standard_testfile
# Some targets can't call functions, so don't even bother with this
# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "this target can not call functions"
- return
-}
+require {!target_info exists gdb,cannot_call_functions}
if {[prepare_for_testing "failed to prepare" $testfile $srcfile debug]} {
diff --git a/gdb/testsuite/gdb.base/callexit.exp b/gdb/testsuite/gdb.base/callexit.exp
index 4ed6893..a684979 100644
--- a/gdb/testsuite/gdb.base/callexit.exp
+++ b/gdb/testsuite/gdb.base/callexit.exp
@@ -23,10 +23,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb
# Some targets can't do function calls, so don't even bother with this
# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "this target can not call functions"
- return
-}
+require {!target_info exists gdb,cannot_call_functions}
# Start with a fresh gdb.
diff --git a/gdb/testsuite/gdb.base/callfuncs.exp b/gdb/testsuite/gdb.base/callfuncs.exp
index 9bbf108..2c797a2 100644
--- a/gdb/testsuite/gdb.base/callfuncs.exp
+++ b/gdb/testsuite/gdb.base/callfuncs.exp
@@ -27,10 +27,7 @@ if [support_complex_tests] {
# Some targets can't do function calls, so don't even bother with this
# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "this target can not call functions"
- return
-}
+require {!target_info exists gdb,cannot_call_functions}
set allow_float_test [allow_float_test]
diff --git a/gdb/testsuite/gdb.base/cast-call.exp b/gdb/testsuite/gdb.base/cast-call.exp
index d80524f..7e55cd3 100644
--- a/gdb/testsuite/gdb.base/cast-call.exp
+++ b/gdb/testsuite/gdb.base/cast-call.exp
@@ -16,10 +16,7 @@
# along with this program. If not, see <http://www.gnu.org/licenses/>.
-if {[target_info exists gdb,cannot_call_functions]} {
- unsupported "this target can not call functions"
- return
-}
+require {!target_info exists gdb,cannot_call_functions}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/catch-gdb-caused-signals.exp b/gdb/testsuite/gdb.base/catch-gdb-caused-signals.exp
index 580221c..9908c1a 100644
--- a/gdb/testsuite/gdb.base/catch-gdb-caused-signals.exp
+++ b/gdb/testsuite/gdb.base/catch-gdb-caused-signals.exp
@@ -23,10 +23,7 @@ standard_testfile
# Some targets can't call functions, so don't even bother with this
# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "cannot call functions"
- return
-}
+require {!target_info exists gdb,cannot_call_functions}
set dp_location [gdb_get_line_number "set dprintf here"]
set bp_location [gdb_get_line_number "set breakpoint here"]
diff --git a/gdb/testsuite/gdb.base/catch-signal-fork.exp b/gdb/testsuite/gdb.base/catch-signal-fork.exp
index 3dac304..fce5b65 100644
--- a/gdb/testsuite/gdb.base/catch-signal-fork.exp
+++ b/gdb/testsuite/gdb.base/catch-signal-fork.exp
@@ -13,10 +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 gdb,nosignals] {
- verbose "Skipping catch-signal-fork.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/catch-signal-siginfo-cond.exp b/gdb/testsuite/gdb.base/catch-signal-siginfo-cond.exp
index 182b2f2..7a9452f 100644
--- a/gdb/testsuite/gdb.base/catch-signal-siginfo-cond.exp
+++ b/gdb/testsuite/gdb.base/catch-signal-siginfo-cond.exp
@@ -25,10 +25,7 @@
# 56 return INLINE_SYSCALL (tgkill, 3, pid, selftid, sig);
# (gdb) FAIL: gdb.base/catch-signal-siginfo-cond.exp: continue
-if [target_info exists gdb,nosignals] {
- verbose "Skipping catch-signal-siginfo-cond.exp because of nosignals."
- return -1
-}
+require {!target_info exists gdb,nosignals}
require supports_get_siginfo_type
diff --git a/gdb/testsuite/gdb.base/catch-signal.exp b/gdb/testsuite/gdb.base/catch-signal.exp
index 774eb8e..b3f202f 100644
--- a/gdb/testsuite/gdb.base/catch-signal.exp
+++ b/gdb/testsuite/gdb.base/catch-signal.exp
@@ -13,10 +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 gdb,nosignals] {
- verbose "Skipping catch-signal.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/exitsignal.exp b/gdb/testsuite/gdb.base/exitsignal.exp
index d38e9ff..24e4aa1 100644
--- a/gdb/testsuite/gdb.base/exitsignal.exp
+++ b/gdb/testsuite/gdb.base/exitsignal.exp
@@ -21,10 +21,7 @@
# killed by a signal. However, if it was killed by an uncaught
# signal, then there is no way for it to have exited.
-if { [target_info exists gdb,nosignals] } {
- verbose "Skipping exitsignal.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile segv.c
diff --git a/gdb/testsuite/gdb.base/fileio.exp b/gdb/testsuite/gdb.base/fileio.exp
index 09ca29e..33c88d0 100644
--- a/gdb/testsuite/gdb.base/fileio.exp
+++ b/gdb/testsuite/gdb.base/fileio.exp
@@ -15,10 +15,7 @@
# This file was written by Corinna Vinschen <vinschen@redhat.com>
-if [target_info exists gdb,nofileio] {
- verbose "Skipping fileio.exp because of no fileio capabilities."
- return
-}
+require {!target_info exists gdb,nofileio}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/huge.exp b/gdb/testsuite/gdb.base/huge.exp
index d1dac02..e28310c 100644
--- a/gdb/testsuite/gdb.base/huge.exp
+++ b/gdb/testsuite/gdb.base/huge.exp
@@ -19,9 +19,7 @@
# Define if you want to skip this test
# (could be very time-consuming on remote targets with slow connection).
#
-if [target_info exists gdb,skip_huge_test] {
- return
-}
+require {!target_info exists gdb,skip_huge_test}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/infcall-input.exp b/gdb/testsuite/gdb.base/infcall-input.exp
index 1de3bc9..2e276b6 100644
--- a/gdb/testsuite/gdb.base/infcall-input.exp
+++ b/gdb/testsuite/gdb.base/infcall-input.exp
@@ -18,10 +18,7 @@
standard_testfile
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "can not call functions"
- return
-}
+require {!target_info exists gdb,cannot_call_functions}
if {[prepare_for_testing "failed to prepare" $testfile $srcfile debug]} {
return -1
diff --git a/gdb/testsuite/gdb.base/inferior-args.exp b/gdb/testsuite/gdb.base/inferior-args.exp
index 3d38173..19bada6 100644
--- a/gdb/testsuite/gdb.base/inferior-args.exp
+++ b/gdb/testsuite/gdb.base/inferior-args.exp
@@ -16,10 +16,7 @@
# Test running an inferior with arguments.
# This does not work on boards that don't support inferior arguments.
-if {[target_info exists noargs]} {
- verbose "skipping gdb.base/inferior-args.exp because of noargs"
- return
-}
+require {!target_info exists noargs}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/interrupt-daemon-attach.exp b/gdb/testsuite/gdb.base/interrupt-daemon-attach.exp
index 0448de1..ba3383f 100644
--- a/gdb/testsuite/gdb.base/interrupt-daemon-attach.exp
+++ b/gdb/testsuite/gdb.base/interrupt-daemon-attach.exp
@@ -13,16 +13,10 @@
# 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 gdb,nosignals] {
- verbose "Skipping interrupt-daemon-attach.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
# This test requires sending ^C to interrupt the running target.
-if [target_info exists gdb,nointerrupts] {
- verbose "Skipping interrupt-daemon-attach.exp because of nointerrupts."
- return
-}
+require {!target_info exists gdb,nointerrupts}
require can_spawn_for_attach
diff --git a/gdb/testsuite/gdb.base/interrupt.exp b/gdb/testsuite/gdb.base/interrupt.exp
index 8159942..19628e2 100644
--- a/gdb/testsuite/gdb.base/interrupt.exp
+++ b/gdb/testsuite/gdb.base/interrupt.exp
@@ -13,15 +13,9 @@
# 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 gdb,nointerrupts] {
- verbose "Skipping interrupt.exp because of nointerrupts."
- return
-}
+require {!target_info exists gdb,nointerrupts}
-if [target_info exists gdb,noinferiorio] {
- verbose "Skipping interrupt.exp because of noinferiorio."
- return
-}
+require {!target_info exists gdb,noinferiorio}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/kill-after-signal.exp b/gdb/testsuite/gdb.base/kill-after-signal.exp
index 1372c96..5ca84a9 100644
--- a/gdb/testsuite/gdb.base/kill-after-signal.exp
+++ b/gdb/testsuite/gdb.base/kill-after-signal.exp
@@ -17,10 +17,7 @@ standard_testfile .c
require can_single_step_to_signal_handler
-if [target_info exists gdb,nosignals] {
- verbose "Skipping kill-after-signal.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
if [prepare_for_testing "failed to prepare" ${testfile}] {
return -1
diff --git a/gdb/testsuite/gdb.base/long-inferior-output.exp b/gdb/testsuite/gdb.base/long-inferior-output.exp
index 58fd715..a287fdc 100644
--- a/gdb/testsuite/gdb.base/long-inferior-output.exp
+++ b/gdb/testsuite/gdb.base/long-inferior-output.exp
@@ -28,10 +28,7 @@
#
# 4. The breakpoint is never reached.
-if [target_info exists gdb,noinferiorio] {
- verbose "Skipping because of noinferiorio."
- return
-}
+require {!target_info exists gdb,noinferiorio}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/long_long.exp b/gdb/testsuite/gdb.base/long_long.exp
index 3e72d69..6aa26f1 100644
--- a/gdb/testsuite/gdb.base/long_long.exp
+++ b/gdb/testsuite/gdb.base/long_long.exp
@@ -18,9 +18,7 @@
# long_long.exp Test printing of 64-bit things in 32-bit gdb.
# Also test differnet kinds of formats.
#
-if [target_info exists no_long_long] {
- return 0
-}
+require {!target_info exists no_long_long}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/paginate-after-ctrl-c-running.exp b/gdb/testsuite/gdb.base/paginate-after-ctrl-c-running.exp
index 05f89e4..f129608 100644
--- a/gdb/testsuite/gdb.base/paginate-after-ctrl-c-running.exp
+++ b/gdb/testsuite/gdb.base/paginate-after-ctrl-c-running.exp
@@ -13,10 +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 gdb,nointerrupts] {
- verbose "Skipping paginate-after-ctrl-c-running.exp because of nointerrupts."
- return
-}
+require {!target_info exists gdb,nointerrupts}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/random-signal.exp b/gdb/testsuite/gdb.base/random-signal.exp
index b08a1c5..7e53c91 100644
--- a/gdb/testsuite/gdb.base/random-signal.exp
+++ b/gdb/testsuite/gdb.base/random-signal.exp
@@ -13,16 +13,10 @@
# 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 gdb,nosignals] {
- verbose "Skipping catch-signal.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
# This test requires sending ^C to interrupt the running target.
-if [target_info exists gdb,nointerrupts] {
- verbose "Skipping random-signal.exp because of nointerrupts."
- return
-}
+require {!target_info exists gdb,nointerrupts}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/relativedebug.exp b/gdb/testsuite/gdb.base/relativedebug.exp
index 004d3d9..41eb0cc 100644
--- a/gdb/testsuite/gdb.base/relativedebug.exp
+++ b/gdb/testsuite/gdb.base/relativedebug.exp
@@ -13,10 +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 gdb,nosignals] {
- verbose "Skipping relativedebug.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/savedregs.exp b/gdb/testsuite/gdb.base/savedregs.exp
index 598d51b..212fa61 100644
--- a/gdb/testsuite/gdb.base/savedregs.exp
+++ b/gdb/testsuite/gdb.base/savedregs.exp
@@ -24,10 +24,7 @@
# instructions executed to perform the call may affect "info frame"
# output.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping savedregs.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/sigall.exp b/gdb/testsuite/gdb.base/sigall.exp
index 7f78d24..5b62321 100644
--- a/gdb/testsuite/gdb.base/sigall.exp
+++ b/gdb/testsuite/gdb.base/sigall.exp
@@ -13,10 +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 gdb,nosignals] {
- verbose "Skipping sigall.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/sigaltstack.exp b/gdb/testsuite/gdb.base/sigaltstack.exp
index 6acc4da..3f1348a 100644
--- a/gdb/testsuite/gdb.base/sigaltstack.exp
+++ b/gdb/testsuite/gdb.base/sigaltstack.exp
@@ -22,10 +22,7 @@
# This test confirms that GDB can both backtrace through and finish
# such a stack.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping sigaltstack.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/sigbpt.exp b/gdb/testsuite/gdb.base/sigbpt.exp
index e5dace1..892d756 100644
--- a/gdb/testsuite/gdb.base/sigbpt.exp
+++ b/gdb/testsuite/gdb.base/sigbpt.exp
@@ -28,10 +28,7 @@
# instruction. Since the kernel problems can be "fixed" using
# software single-step this is KFAILed rather than XFAILed.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping sigbpt.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/sigchld.exp b/gdb/testsuite/gdb.base/sigchld.exp
index 2374e1e..532e22e 100644
--- a/gdb/testsuite/gdb.base/sigchld.exp
+++ b/gdb/testsuite/gdb.base/sigchld.exp
@@ -16,10 +16,7 @@
# Check that GDB isn't messing the SIGCHLD mask while creating an
# inferior.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping sigchld.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/siginfo-addr.exp b/gdb/testsuite/gdb.base/siginfo-addr.exp
index b11b461..a2359fd 100644
--- a/gdb/testsuite/gdb.base/siginfo-addr.exp
+++ b/gdb/testsuite/gdb.base/siginfo-addr.exp
@@ -21,10 +21,7 @@
# This test confirms that the si_addr value is correct rather than
# having been corrupted when GDB passed the signal on to the handler.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping siginfo-addr.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile
if {[prepare_for_testing "failed to prepare" $testfile $srcfile debug]} {
diff --git a/gdb/testsuite/gdb.base/siginfo-infcall.exp b/gdb/testsuite/gdb.base/siginfo-infcall.exp
index fdc7e01..efc83b0 100644
--- a/gdb/testsuite/gdb.base/siginfo-infcall.exp
+++ b/gdb/testsuite/gdb.base/siginfo-infcall.exp
@@ -13,10 +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 gdb,nosignals] {
- verbose "Skipping siginfo-infcall.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/siginfo-obj.exp b/gdb/testsuite/gdb.base/siginfo-obj.exp
index 9d8bfe7..634d926 100644
--- a/gdb/testsuite/gdb.base/siginfo-obj.exp
+++ b/gdb/testsuite/gdb.base/siginfo-obj.exp
@@ -21,10 +21,7 @@
# This test confirms that we can inspect signal info using the
# $_siginfo convenience variable.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping siginfo-obj.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
require supports_get_siginfo_type
diff --git a/gdb/testsuite/gdb.base/siginfo-thread.exp b/gdb/testsuite/gdb.base/siginfo-thread.exp
index 718889f..122be71 100644
--- a/gdb/testsuite/gdb.base/siginfo-thread.exp
+++ b/gdb/testsuite/gdb.base/siginfo-thread.exp
@@ -16,10 +16,7 @@
# Multi-threaded siginfo test.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping siginfo-thread.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
require supports_get_siginfo_type
diff --git a/gdb/testsuite/gdb.base/siginfo.exp b/gdb/testsuite/gdb.base/siginfo.exp
index 1a6ad9b..4083120 100644
--- a/gdb/testsuite/gdb.base/siginfo.exp
+++ b/gdb/testsuite/gdb.base/siginfo.exp
@@ -23,10 +23,7 @@
# alternative sa_sigaction signal handler, and second that GDB can
# nexti/stepi out of such a handler.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping siginfo.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/signals.exp b/gdb/testsuite/gdb.base/signals.exp
index 6c41739..338cf4b 100644
--- a/gdb/testsuite/gdb.base/signals.exp
+++ b/gdb/testsuite/gdb.base/signals.exp
@@ -13,10 +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 gdb,nosignals] {
- verbose "Skipping signals.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/signest.exp b/gdb/testsuite/gdb.base/signest.exp
index 1785f89..65c87c3 100644
--- a/gdb/testsuite/gdb.base/signest.exp
+++ b/gdb/testsuite/gdb.base/signest.exp
@@ -17,10 +17,7 @@
standard_testfile
-if [target_info exists gdb,nosignals] {
- verbose "Skipping ${testfile}.exp because of nosignals."
- return -1
-}
+require {!target_info exists gdb,nosignals}
if [prepare_for_testing "failed to prepare" ${testfile} ${srcfile} {debug}] {
return -1
diff --git a/gdb/testsuite/gdb.base/signull.exp b/gdb/testsuite/gdb.base/signull.exp
index a7cda03..9facc6d 100644
--- a/gdb/testsuite/gdb.base/signull.exp
+++ b/gdb/testsuite/gdb.base/signull.exp
@@ -27,10 +27,7 @@
# This also tests backtrace/gdb1476.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping signull.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/sigrepeat.exp b/gdb/testsuite/gdb.base/sigrepeat.exp
index 26d2dee..8726f85 100644
--- a/gdb/testsuite/gdb.base/sigrepeat.exp
+++ b/gdb/testsuite/gdb.base/sigrepeat.exp
@@ -19,10 +19,7 @@
# sigalrm signals and hence cause repeated signal delivery without any
# cpu advancment.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping sigrepeat.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/sigstep.exp b/gdb/testsuite/gdb.base/sigstep.exp
index 54cdfda..51737f5 100644
--- a/gdb/testsuite/gdb.base/sigstep.exp
+++ b/gdb/testsuite/gdb.base/sigstep.exp
@@ -21,10 +21,7 @@
# This test runs the program up to the signal handler, and then
# attempts to step/next out of the handler and back into main.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping sigstep.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/sigwinch-notty.exp b/gdb/testsuite/gdb.base/sigwinch-notty.exp
index 0be0791..efb0baf 100644
--- a/gdb/testsuite/gdb.base/sigwinch-notty.exp
+++ b/gdb/testsuite/gdb.base/sigwinch-notty.exp
@@ -17,10 +17,7 @@
# without readline, and, it receives a SIGWINCH. Regression test for
# PR gdb/26056.
-if [target_info exists gdb,nosignals] {
- verbose "Skipping $subdir/$gdb_test_file_name.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
# The testfile relies on "run" from the command line, so only works
# with "target native".
diff --git a/gdb/testsuite/gdb.base/structs.exp b/gdb/testsuite/gdb.base/structs.exp
index 0a19205..abfaabc 100644
--- a/gdb/testsuite/gdb.base/structs.exp
+++ b/gdb/testsuite/gdb.base/structs.exp
@@ -19,10 +19,7 @@
# Some targets can't call functions, so don't even bother with this
# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "this target can not call functions"
- return
-}
+require {!target_info exists gdb,cannot_call_functions}
standard_testfile .c
diff --git a/gdb/testsuite/gdb.base/unwindonsignal.exp b/gdb/testsuite/gdb.base/unwindonsignal.exp
index d10d1fe..625b0c4 100644
--- a/gdb/testsuite/gdb.base/unwindonsignal.exp
+++ b/gdb/testsuite/gdb.base/unwindonsignal.exp
@@ -13,18 +13,12 @@
# 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 gdb,nosignals] {
- verbose "Skipping unwindonsignal.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
# Some targets can't do function calls, so don't even bother with this
# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "this target can not call functions"
- return
-}
+require {!target_info exists gdb,cannot_call_functions}
standard_testfile
diff --git a/gdb/testsuite/gdb.base/watch-cond-infcall.exp b/gdb/testsuite/gdb.base/watch-cond-infcall.exp
index c8f5d58..7daa2b7 100644
--- a/gdb/testsuite/gdb.base/watch-cond-infcall.exp
+++ b/gdb/testsuite/gdb.base/watch-cond-infcall.exp
@@ -26,10 +26,7 @@ set allow_hw_watchpoint_tests_p [allow_hw_watchpoint_tests]
standard_testfile
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "can not call functions"
- return
-}
+require {!target_info exists gdb,cannot_call_functions}
if { [build_executable ${testfile}.exp ${testfile} ${testfile}.c {debug}] } {
untested "failed to compile"
diff --git a/gdb/testsuite/gdb.cp/gdb2495.exp b/gdb/testsuite/gdb.cp/gdb2495.exp
index 0cb8bdd..e3c0cca 100644
--- a/gdb/testsuite/gdb.cp/gdb2495.exp
+++ b/gdb/testsuite/gdb.cp/gdb2495.exp
@@ -33,19 +33,13 @@
require allow_cplus_tests
-if [target_info exists gdb,nosignals] {
- verbose "Skipping gdb2495.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
standard_testfile .cc
# Some targets can't do function calls, so don't even bother with this
# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "this target can not call functions"
- return
-}
+require {!target_info exists gdb,cannot_call_functions}
if {[prepare_for_testing "failed to prepare" $testfile $srcfile {debug c++}]} {
return -1
diff --git a/gdb/testsuite/gdb.fortran/array-slices.exp b/gdb/testsuite/gdb.fortran/array-slices.exp
index 56bed15..ce17b8d 100644
--- a/gdb/testsuite/gdb.fortran/array-slices.exp
+++ b/gdb/testsuite/gdb.fortran/array-slices.exp
@@ -36,9 +36,7 @@
require allow_fortran_tests
# This test relies on output from the inferior.
-if [target_info exists gdb,noinferiorio] {
- return -1
-}
+require {!target_info exists gdb,noinferiorio}
standard_testfile ".f90"
load_lib fortran.exp
diff --git a/gdb/testsuite/gdb.fortran/lbound-ubound.exp b/gdb/testsuite/gdb.fortran/lbound-ubound.exp
index bb652a9..fced41f 100644
--- a/gdb/testsuite/gdb.fortran/lbound-ubound.exp
+++ b/gdb/testsuite/gdb.fortran/lbound-ubound.exp
@@ -17,6 +17,9 @@
require allow_fortran_tests
+# This test relies on output from the inferior.
+require {!target_info exists gdb,noinferiorio}
+
standard_testfile ".F90"
load_lib fortran.exp
@@ -32,11 +35,6 @@ if ![fortran_runto_main] {
return -1
}
-# This test relies on output from the inferior.
-if [target_info exists gdb,noinferiorio] {
- return 0
-}
-
# Avoid libc symbols, in particular the 'array' type.
gdb_test_no_output "nosharedlibrary"
diff --git a/gdb/testsuite/gdb.gdb/python-helper.exp b/gdb/testsuite/gdb.gdb/python-helper.exp
index 16b4199..dbd78cb 100644
--- a/gdb/testsuite/gdb.gdb/python-helper.exp
+++ b/gdb/testsuite/gdb.gdb/python-helper.exp
@@ -19,10 +19,7 @@
load_lib selftest-support.exp
-if [target_info exists gdb,noinferiorio] {
- verbose "Skipping because of no inferiorio capabilities."
- return
-}
+require {!target_info exists gdb,noinferiorio}
require allow_python_tests
diff --git a/gdb/testsuite/gdb.mi/mi-syn-frame.exp b/gdb/testsuite/gdb.mi/mi-syn-frame.exp
index 5b3e60f..40df312 100644
--- a/gdb/testsuite/gdb.mi/mi-syn-frame.exp
+++ b/gdb/testsuite/gdb.mi/mi-syn-frame.exp
@@ -16,10 +16,7 @@
# Test MI output with synthetic frames on the stack (call dummies,
# signal handlers).
-if [target_info exists gdb,nosignals] {
- verbose "Skipping mi-syn-frame.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
load_lib mi-support.exp
set MIFLAGS "-i=mi"
diff --git a/gdb/testsuite/gdb.mi/mi-threads-interrupt.exp b/gdb/testsuite/gdb.mi/mi-threads-interrupt.exp
index 149940d..bbb8219 100644
--- a/gdb/testsuite/gdb.mi/mi-threads-interrupt.exp
+++ b/gdb/testsuite/gdb.mi/mi-threads-interrupt.exp
@@ -13,10 +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 gdb,nointerrupts] {
- verbose "Skipping mi-threads-interrupt.exp because of nointerrupts."
- return
-}
+require {!target_info exists gdb,nointerrupts}
load_lib mi-support.exp
set MIFLAGS "-i=mi"
diff --git a/gdb/testsuite/gdb.reverse/sigall-precsave.exp b/gdb/testsuite/gdb.reverse/sigall-precsave.exp
index e2a786a..7bbffa1 100644
--- a/gdb/testsuite/gdb.reverse/sigall-precsave.exp
+++ b/gdb/testsuite/gdb.reverse/sigall-precsave.exp
@@ -13,10 +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 gdb,nosignals] {
- verbose "Skipping sigall-precsave.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
require supports_reverse
diff --git a/gdb/testsuite/gdb.reverse/sigall-reverse.exp b/gdb/testsuite/gdb.reverse/sigall-reverse.exp
index 7891dca..ffbcac7 100644
--- a/gdb/testsuite/gdb.reverse/sigall-reverse.exp
+++ b/gdb/testsuite/gdb.reverse/sigall-reverse.exp
@@ -13,10 +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 gdb,nosignals] {
- verbose "Skipping sigall-reverse.exp because of nosignals."
- return
-}
+require {!target_info exists gdb,nosignals}
require supports_reverse
diff --git a/gdb/testsuite/gdb.server/reconnect-ctrl-c.exp b/gdb/testsuite/gdb.server/reconnect-ctrl-c.exp
index 6146cc3..d7a934d 100644
--- a/gdb/testsuite/gdb.server/reconnect-ctrl-c.exp
+++ b/gdb/testsuite/gdb.server/reconnect-ctrl-c.exp
@@ -21,10 +21,7 @@ load_lib gdbserver-support.exp
require allow_gdbserver_tests
-if [target_info exists gdb,nointerrupts] {
- verbose "Skipping reconnect-ctrl-c.exp because of nointerrupts."
- return
-}
+require {!target_info exists gdb,nointerrupts}
standard_testfile
diff --git a/gdb/testsuite/gdb.threads/continue-pending-status.exp b/gdb/testsuite/gdb.threads/continue-pending-status.exp
index 6132a0f..8cf65e4 100644
--- a/gdb/testsuite/gdb.threads/continue-pending-status.exp
+++ b/gdb/testsuite/gdb.threads/continue-pending-status.exp
@@ -17,10 +17,7 @@
# thread, then switching to a thread that has a status pending and
# continuing.
-if [target_info exists gdb,nointerrupts] {
- verbose "Skipping continue-pending-status.exp because of nointerrupts."
- return
-}
+require {!target_info exists gdb,nointerrupts}
standard_testfile
diff --git a/gdb/testsuite/gdb.threads/hand-call-in-threads.exp b/gdb/testsuite/gdb.threads/hand-call-in-threads.exp
index 33619911..58039dd 100644
--- a/gdb/testsuite/gdb.threads/hand-call-in-threads.exp
+++ b/gdb/testsuite/gdb.threads/hand-call-in-threads.exp
@@ -19,15 +19,12 @@ set NR_THREADS 4
standard_testfile
-if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug "additional_flags=-DNR_THREADS=$NR_THREADS"]] != "" } {
- return -1
-}
-
# Some targets can't do function calls, so don't even bother with this
# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "this target can not call functions"
- return
+require {!target_info exists gdb,cannot_call_functions}
+
+if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug "additional_flags=-DNR_THREADS=$NR_THREADS"]] != "" } {
+ return -1
}
proc get_dummy_frame_number { } {
diff --git a/gdb/testsuite/gdb.threads/interrupted-hand-call.exp b/gdb/testsuite/gdb.threads/interrupted-hand-call.exp
index ed1ea9f..0edc645 100644
--- a/gdb/testsuite/gdb.threads/interrupted-hand-call.exp
+++ b/gdb/testsuite/gdb.threads/interrupted-hand-call.exp
@@ -20,15 +20,12 @@ set NR_THREADS 4
standard_testfile
-if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug "additional_flags=-DNR_THREADS=$NR_THREADS"]] != "" } {
- return -1
-}
-
# Some targets can't do function calls, so don't even bother with this
# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "this target can not call functions"
- return
+require {!target_info exists gdb,cannot_call_functions}
+
+if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug "additional_flags=-DNR_THREADS=$NR_THREADS"]] != "" } {
+ return -1
}
clean_restart ${binfile}
diff --git a/gdb/testsuite/gdb.threads/leader-exit.exp b/gdb/testsuite/gdb.threads/leader-exit.exp
index df392c7..95811e9 100644
--- a/gdb/testsuite/gdb.threads/leader-exit.exp
+++ b/gdb/testsuite/gdb.threads/leader-exit.exp
@@ -13,10 +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 gdb,nointerrupts] {
- verbose "Skipping leader-exit.exp because of nointerrupts."
- return
-}
+require {!target_info exists gdb,nointerrupts}
# Exit of the thread group leader should not break GDB.
diff --git a/gdb/testsuite/gdb.threads/manythreads.exp b/gdb/testsuite/gdb.threads/manythreads.exp
index da3f66a..5a17651 100644
--- a/gdb/testsuite/gdb.threads/manythreads.exp
+++ b/gdb/testsuite/gdb.threads/manythreads.exp
@@ -17,10 +17,7 @@
# This file was written by Jeff Johnston. (jjohnstn@redhat.com)
# This test requires sending ^C to interrupt the running target.
-if [target_info exists gdb,nointerrupts] {
- verbose "Skipping manythreads.exp because of nointerrupts."
- return
-}
+require {!target_info exists gdb,nointerrupts}
standard_testfile
diff --git a/gdb/testsuite/gdb.threads/multiple-step-overs.exp b/gdb/testsuite/gdb.threads/multiple-step-overs.exp
index fffdb74..5e8b025 100644
--- a/gdb/testsuite/gdb.threads/multiple-step-overs.exp
+++ b/gdb/testsuite/gdb.threads/multiple-step-overs.exp
@@ -19,10 +19,7 @@
standard_testfile
set executable ${testfile}
-if [target_info exists gdb,nosignals] {
- verbose "Skipping ${testfile}.exp because of nosignals."
- return -1
-}
+require {!target_info exists gdb,nosignals}
if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
executable [list debug "incdir=${objdir}"]] != "" } {
diff --git a/gdb/testsuite/gdb.threads/names.exp b/gdb/testsuite/gdb.threads/names.exp
index f90e4aa..5622e4e 100644
--- a/gdb/testsuite/gdb.threads/names.exp
+++ b/gdb/testsuite/gdb.threads/names.exp
@@ -16,9 +16,7 @@
# Verify that thread name features work properly (e.g. they show up in info
# threads).
-if [target_info exists gdb,no_thread_names] {
- return
-}
+require {!target_info exists gdb,no_thread_names}
standard_testfile
diff --git a/gdb/testsuite/gdb.threads/non-stop-fair-events.exp b/gdb/testsuite/gdb.threads/non-stop-fair-events.exp
index 8ce5712..4b063f3 100644
--- a/gdb/testsuite/gdb.threads/non-stop-fair-events.exp
+++ b/gdb/testsuite/gdb.threads/non-stop-fair-events.exp
@@ -19,10 +19,7 @@
standard_testfile
set executable ${testfile}
-if [target_info exists gdb,nosignals] {
- verbose "Skipping ${testfile}.exp because of nosignals."
- return -1
-}
+require {!target_info exists gdb,nosignals}
set options { "additional_flags=-DTIMEOUT=$timeout" debug pthreads }
if {[prepare_for_testing "failed to prepare" $testfile $srcfile $options] == -1} {
diff --git a/gdb/testsuite/gdb.threads/pthreads.exp b/gdb/testsuite/gdb.threads/pthreads.exp
index acd073c..41a7cb3 100644
--- a/gdb/testsuite/gdb.threads/pthreads.exp
+++ b/gdb/testsuite/gdb.threads/pthreads.exp
@@ -16,10 +16,7 @@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This test requires sending ^C to interrupt the running target.
-if [target_info exists gdb,nointerrupts] {
- verbose "Skipping pthreads.exp because of nointerrupts."
- return
-}
+require {!target_info exists gdb,nointerrupts}
standard_testfile
diff --git a/gdb/testsuite/gdb.threads/schedlock.exp b/gdb/testsuite/gdb.threads/schedlock.exp
index 0843501..3c60f6b 100644
--- a/gdb/testsuite/gdb.threads/schedlock.exp
+++ b/gdb/testsuite/gdb.threads/schedlock.exp
@@ -20,10 +20,7 @@
# This test requires sending ^C to interrupt the running target.
-if [target_info exists gdb,nointerrupts] {
- verbose "Skipping schedlock.exp because of nointerrupts."
- return
-}
+require {!target_info exists gdb,nointerrupts}
standard_testfile
diff --git a/gdb/testsuite/gdb.threads/signal-command-handle-nopass.exp b/gdb/testsuite/gdb.threads/signal-command-handle-nopass.exp
index ed03e7a..a099dbb 100644
--- a/gdb/testsuite/gdb.threads/signal-command-handle-nopass.exp
+++ b/gdb/testsuite/gdb.threads/signal-command-handle-nopass.exp
@@ -20,10 +20,7 @@
standard_testfile
-if [target_info exists gdb,nosignals] {
- verbose "Skipping ${testfile}.exp because of nosignals."
- return -1
-}
+require {!target_info exists gdb,nosignals}
if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
executable { debug }] != "" } {
diff --git a/gdb/testsuite/gdb.threads/signal-command-multiple-signals-pending.exp b/gdb/testsuite/gdb.threads/signal-command-multiple-signals-pending.exp
index ac391ea..0802e40 100644
--- a/gdb/testsuite/gdb.threads/signal-command-multiple-signals-pending.exp
+++ b/gdb/testsuite/gdb.threads/signal-command-multiple-signals-pending.exp
@@ -18,10 +18,7 @@
standard_testfile
-if [target_info exists gdb,nosignals] {
- verbose "Skipping ${testfile}.exp because of nosignals."
- return -1
-}
+require {!target_info exists gdb,nosignals}
if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
executable { debug }] != "" } {
diff --git a/gdb/testsuite/gdb.threads/signal-delivered-right-thread.exp b/gdb/testsuite/gdb.threads/signal-delivered-right-thread.exp
index fb4cbb0..3407cfa 100644
--- a/gdb/testsuite/gdb.threads/signal-delivered-right-thread.exp
+++ b/gdb/testsuite/gdb.threads/signal-delivered-right-thread.exp
@@ -15,10 +15,7 @@
standard_testfile
-if [target_info exists gdb,nosignals] {
- verbose "Skipping ${testfile}.exp because of nosignals."
- return -1
-}
+require {!target_info exists gdb,nosignals}
if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
executable { debug }] != "" } {
diff --git a/gdb/testsuite/gdb.threads/signal-sigtrap.exp b/gdb/testsuite/gdb.threads/signal-sigtrap.exp
index b452731..1f52451 100644
--- a/gdb/testsuite/gdb.threads/signal-sigtrap.exp
+++ b/gdb/testsuite/gdb.threads/signal-sigtrap.exp
@@ -18,10 +18,7 @@
standard_testfile
-if [target_info exists gdb,nosignals] {
- verbose "Skipping ${testfile}.exp because of nosignals."
- return -1
-}
+require {!target_info exists gdb,nosignals}
if {[build_executable "failed to prepare" $testfile $srcfile \
{debug pthreads}]} {
diff --git a/gdb/testsuite/gdb.threads/signal-while-stepping-over-bp-other-thread.exp b/gdb/testsuite/gdb.threads/signal-while-stepping-over-bp-other-thread.exp
index 65ecdcd..7eba5bb 100644
--- a/gdb/testsuite/gdb.threads/signal-while-stepping-over-bp-other-thread.exp
+++ b/gdb/testsuite/gdb.threads/signal-while-stepping-over-bp-other-thread.exp
@@ -25,10 +25,7 @@ require !gdb_debug_enabled
standard_testfile
set executable ${testfile}
-if [target_info exists gdb,nosignals] {
- verbose "Skipping ${testfile}.exp because of nosignals."
- return -1
-}
+require {!target_info exists gdb,nosignals}
if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
executable [list debug "incdir=${objdir}"]] != "" } {
diff --git a/gdb/testsuite/gdb.threads/sigthread.exp b/gdb/testsuite/gdb.threads/sigthread.exp
index ce84357..5499c50 100644
--- a/gdb/testsuite/gdb.threads/sigthread.exp
+++ b/gdb/testsuite/gdb.threads/sigthread.exp
@@ -16,6 +16,9 @@
standard_testfile
+# This test requires sending ^C to interrupt the running target.
+require {!target_info exists gdb,nointerrupts}
+
if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
executable { debug }] != "" } {
return -1
@@ -36,12 +39,6 @@ gdb_test_multiple "continue" "continue" {
}
}
-# This test requires sending ^C to interrupt the running target.
-if [target_info exists gdb,nointerrupts] {
- verbose "Skipping sigthread.exp because of nointerrupts."
- return
-}
-
# For this to work we must be sure to consume the "Continuing."
# message first, or GDB's signal handler may not be in place.
after 500 {send_gdb "\003"}
diff --git a/gdb/testsuite/gdb.threads/thread-unwindonsignal.exp b/gdb/testsuite/gdb.threads/thread-unwindonsignal.exp
index b3e3288..68a99f6 100644
--- a/gdb/testsuite/gdb.threads/thread-unwindonsignal.exp
+++ b/gdb/testsuite/gdb.threads/thread-unwindonsignal.exp
@@ -20,15 +20,12 @@ set NR_THREADS 4
standard_testfile interrupted-hand-call.c
-if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug "additional_flags=-DNR_THREADS=$NR_THREADS"]] != "" } {
- return -1
-}
-
# Some targets can't do function calls, so don't even bother with this
# test.
-if [target_info exists gdb,cannot_call_functions] {
- unsupported "this target can not call functions"
- return
+require {!target_info exists gdb,cannot_call_functions}
+
+if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug "additional_flags=-DNR_THREADS=$NR_THREADS"]] != "" } {
+ return -1
}
clean_restart ${binfile}
diff --git a/gdb/testsuite/gdb.trace/signal.exp b/gdb/testsuite/gdb.trace/signal.exp
index f64b7db..b02198e 100644
--- a/gdb/testsuite/gdb.trace/signal.exp
+++ b/gdb/testsuite/gdb.trace/signal.exp
@@ -28,10 +28,7 @@
load_lib "trace-support.exp"
-if [target_info exists gdb,nosignals] {
- verbose "Skipping signal.exp because of nosignals."
- return -1
-}
+require {!target_info exists gdb,nosignals}
standard_testfile
diff --git a/gdb/testsuite/gdb.tui/completion.exp b/gdb/testsuite/gdb.tui/completion.exp
index 97d0f80..0a959b4 100644
--- a/gdb/testsuite/gdb.tui/completion.exp
+++ b/gdb/testsuite/gdb.tui/completion.exp
@@ -19,9 +19,7 @@ tuiterm_env
clean_restart
-if {[target_info exists gdb,nointerrupts]} {
- return
-}
+require {!target_info exists gdb,nointerrupts}
gdb_test_no_output "set max-completions unlimited"