Use require !skip_btrace_tests
authorTom Tromey <tom@tromey.com>
Wed, 14 Dec 2022 16:42:37 +0000 (09:42 -0700)
committerTom Tromey <tom@tromey.com>
Fri, 13 Jan 2023 20:18:55 +0000 (13:18 -0700)
This changes some tests to use "require !skip_btrace_tests".

27 files changed:
gdb/testsuite/gdb.btrace/buffer-size.exp
gdb/testsuite/gdb.btrace/data.exp
gdb/testsuite/gdb.btrace/delta.exp
gdb/testsuite/gdb.btrace/enable-new-thread.exp
gdb/testsuite/gdb.btrace/enable-running.exp
gdb/testsuite/gdb.btrace/enable.exp
gdb/testsuite/gdb.btrace/exception.exp
gdb/testsuite/gdb.btrace/function_call_history.exp
gdb/testsuite/gdb.btrace/gcore.exp
gdb/testsuite/gdb.btrace/instruction_history.exp
gdb/testsuite/gdb.btrace/multi-inferior.exp
gdb/testsuite/gdb.btrace/multi-thread-step.exp
gdb/testsuite/gdb.btrace/nohist.exp
gdb/testsuite/gdb.btrace/non-stop.exp
gdb/testsuite/gdb.btrace/reconnect.exp
gdb/testsuite/gdb.btrace/record_goto-step.exp
gdb/testsuite/gdb.btrace/record_goto.exp
gdb/testsuite/gdb.btrace/rn-dl-bind.exp
gdb/testsuite/gdb.btrace/segv.exp
gdb/testsuite/gdb.btrace/step.exp
gdb/testsuite/gdb.btrace/stepi.exp
gdb/testsuite/gdb.btrace/tailcall-only.exp
gdb/testsuite/gdb.btrace/tailcall.exp
gdb/testsuite/gdb.btrace/unknown_functions.exp
gdb/testsuite/gdb.btrace/vdso.exp
gdb/testsuite/gdb.python/py-record-btrace-threads.exp
gdb/testsuite/gdb.python/py-record-btrace.exp

index 6790323f854cad33ff7a7bb2108f40f6228e76a9..d0a9086604f10bb56696bb8ad27b39adc0750fa9 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile record_goto.c
 if [prepare_for_testing "failed to prepare" $testfile $srcfile] {
index 77248beb1a2aa599cac3a792a1fc8e0ebad998fd..8be2a4ccdead8daab5cce40427f6daee1d0e7633 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile
 if [prepare_for_testing "failed to prepare" $testfile $srcfile] {
index e21cbfb87ebb1df5c3858dd26bef20de6c9ff781..e4307e15a5bc1e1108976ead7fa257610f5affa2 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile record_goto.c
 if [prepare_for_testing "failed to prepare" $testfile $srcfile] {
index fb6b9ca3dd2970bc45865075b576f99c9f19fada..22cc33f142ffaa7322c49afd1a5e6c28c9733284 100644 (file)
 
 # Test that new threads of recorded inferiors also get recorded.
 
-if { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile
 if [prepare_for_testing "failed to prepare" $testfile $srcfile {debug pthreads}] {
index 2c24b8d8398968aad8736db900e290ccc4b3e525..6e626e3a0535e20292409ed8a1b17a96444cd081 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile
 if {[gdb_compile_pthreads "$srcdir/$subdir/$srcfile" "$binfile" executable {debug}] != "" } {
index 1c29131e97ba1cec4c3ae01f6f37c6f06b343e0c..bb57f7b8a74ccfc170ef9a500ba61ed6c93b7291 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 # start fresh - without an executable
 gdb_exit
index 731ebe1cf906f6385ba78bb256c0418599cad7f2..e84ff14d193e3dbaf989cfa0060d4e8a18e9dabc 100755 (executable)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 # We expect a specific function call history.  This gets messed up with
 # PIE on 32-bit.
index 562412f121c03af77f8fc5ec9d4b1eed8458eb36..fd35d762796a9df267a288e918e3501900a59a5c 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 # We expect a specific function call history.  This gets messed up with
 # PIE on 32-bit.
index 4b056c0fee0266d6f374552808c94823aa06b7f1..1e98860aee3cacd97a092738dc15cfef8bd407ad 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile record_goto.c
 if [prepare_for_testing "failed to prepare" $testfile $srcfile] {
index b9043b36eacdd7bbad741db8a2aab4f8761b476e..0e525c73cb768fffd892cd1ad87252a771c089d0 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile .c .S
 if [prepare_for_testing "failed to prepare" $testfile "$srcfile $srcfile2" {debug}] {
index 87bf029e4be90181fdcc8a0b68f504e6ad5f2a2c..727161e4dbd1d09c9524b88aaeeaa858df699d19 100644 (file)
 #
 # Each inferior can be recorded separately.
 
-if { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 if { [use_gdb_stub] } {
     unsupported "test creates multiple inferiors"
index d58b791b4e1db5a08afda38fb7f5ccf2a805ec4a..a18734843ae786084de7101f739ab182fa0203ac 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile
 if {[gdb_compile_pthreads "$srcdir/$subdir/$srcfile" "$binfile" executable {debug}] != "" } {
index 607101324318410cd7cf78fea66bfa9d421a9528..0875b8a6e226ce7810f6779552812f024938f298 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile record_goto.c
 if [prepare_for_testing "failed to prepare" $testfile $srcfile] {
index 0cc78e97f1676544164c0f616359407664a31700..278064fbac5913217ca95ff38af5c6b3340d9f91 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile
 if {[gdb_compile_pthreads "$srcdir/$subdir/$srcfile" "$binfile" executable {debug}] != "" } {
index 0adfc1b65fc98cbc39f4b4da447d0e06fe75fda1..868cf1f068060910cb791d5412168656401e8936 100644 (file)
 
 load_lib gdbserver-support.exp
 
-if { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 if { [skip_gdbserver_tests] } {
     unsupported "target does not support gdbserver"
     return -1
index f1a3f00ada9dc06b49be4e92a53f552c6bd9d585..1f289b47f6419ad7ae2806db02f1bc2b7fd1f2a0 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile record_goto.c
 if [prepare_for_testing "failed to prepare" $testfile $srcfile] {
index ab32a298ce35b8b42dbeccce800234ca3a4b390f..dce9ca18c6c2ff084eb9521de9a55aae7e8adffc 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 # The "record goto" command jumps to a specific instruction in the execution
 # trace.  To guarantee that we always get the same execution trace, we use
index c55ff18b003b359fbc571d10e780670bce9eec9e..f61aa936a8df839c07da569ac8f5fbdbf9b0f589 100644 (file)
 # Test that we can reverse-next over the dynamic linker's symbol
 # lookup code.
 
-if { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile
 if [prepare_for_testing "failed to prepare" $testfile $srcfile \
index 45b9d1d5b5ea4700ec2a8644f49fb0022e1b96d9..9d2567957296ce7ee74d55b804b60c9c3e89227e 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile
 if [prepare_for_testing "failed to prepare" $testfile $srcfile] {
index 438ff580b558a300b1a3dcd5e1eebbfcf01d370f..8ad58d48fdcb8252b5f7d9edff59e768b66eb6e2 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile record_goto.c
 if [prepare_for_testing "failed to prepare" $testfile $srcfile] {
index 06a68d9b1b4fac78160e70bf54849f4d87a5db04..f659d58cf7cb4bae71a235e68a93f89c2ebba525 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 # This test is stepping on instruction level.  To guarantee that we always
 # get the same execution trace, we use an assembly source file.
index 081a919b71936b59e945cbb967667d2b0e293149..16541b2eacfa28c90a7848d5c53ffa6552c09f35 100644 (file)
 # calls.  This used to cause a crash in get_frame_type.
 #
 
-if { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 # This test requires the compiler to generate a tail call.  To guarantee that
 # we always get one, we use an assembly source file.
index 028e03fc6f6548766ae82ff9609864c00912b4a1..f422fbb1b2a57140e6d7f3d97d42041b62ebc4e9 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 # This test requires the compiler to generate a tail call.  To guarantee that
 # we always get one, we use an assembly source file.
index 1bfa4dcd87334cb49afa369b261c43bf9dab0254..291d7df5963644054dbaecf6b1579e3329b325d9 100644 (file)
 # 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 { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile
 
index ef2ef2c8e8f6a4040f85f3d68d9b7ff7b6167e03..16a7e2307868dac6fa66c1e244ff98c9e9b64097 100644 (file)
 #
 # Test that we can access the vdso memory during replay for stepping.
 
-if { [skip_btrace_tests] } {
-    unsupported "target does not support record-btrace"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile
 if [prepare_for_testing "failed to prepare" $testfile $srcfile] {
index 53f4a7bba9819e7d17b9a25090cad2f6c1d3d98b..ef14edcededce1777c4360995e4dbea40abe91f9 100644 (file)
 
 # Skip this test if btrace is disabled.
 
-if { [skip_btrace_tests] } {
-    untested "skipping btrace tests"
-    return -1
-}
+require !skip_btrace_tests
 
 standard_testfile
 
index 0d36959464e9f1f19c8acd93edbcef53f298d7da..38c326f555f67560a48c5536064dd6cde16a4acc 100644 (file)
 
 # Skip this test if btrace is disabled.
 
-if { [skip_btrace_tests] } {
-    untested "skipping btrace tests"
-    return -1
-}
+require !skip_btrace_tests
 
 load_lib gdb-python.exp