gdb/testsuite: fix "continue outside of loop" TCL errors

Many test cases had a few lines in the beginning that look like:

if { condition } {
  continue
}

Where conditions varied, but were mostly in the form of ![runto_main] or
[skip_*_tests], making it quite clear that this code block was supposed
to finish the test if it entered the code block. This generates TCL
errors, as most of these tests are not inside loops.  All cases on which
this was an obvious mistake are changed in this patch.

gdb/testsuite/gdb.ada/mi_ex_cond.exp

@@ -59,7 +59,7 @@ set MIFLAGS "-i=mi"
 
 gdb_exit
 if [mi_gdb_start] {
-    continue
+    return
 }
 
 mi_delete_breakpoints

gdb/testsuite/gdb.ada/mi_task_arg.exp

@@ -28,7 +28,7 @@ set MIFLAGS "-i=mi"
 
 gdb_exit
 if [mi_gdb_start] {
-    continue
+    return
 }
 
 mi_delete_breakpoints

gdb/testsuite/gdb.ada/mi_task_info.exp

@@ -28,7 +28,7 @@ set MIFLAGS "-i=mi"
 
 gdb_exit
 if [mi_gdb_start] {
-    continue
+    return
 }
 
 mi_delete_breakpoints

gdb/testsuite/gdb.base/all-bin.exp

@@ -43,7 +43,7 @@ if {[prepare_for_testing "failed to prepare" $testfile $srcfile debug]} {
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 gdb_test "next" "return 0;" "continuing after dummy()"

gdb/testsuite/gdb.base/arithmet.exp

@@ -39,7 +39,7 @@ if {[prepare_for_testing "failed to prepare" $testfile $srcfile {debug nowarning
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 #

gdb/testsuite/gdb.base/arrayidx.exp

@@ -28,7 +28,7 @@ clean_restart ${binfile}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 # First, print the array without the indexes

gdb/testsuite/gdb.base/assign.exp

@@ -42,7 +42,7 @@ clean_restart ${binfile}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 gdb_test "next" "return 0;" "continuing after dummy()"

gdb/testsuite/gdb.base/async.exp

@@ -29,7 +29,7 @@ if {[prepare_for_testing "failed to prepare" $testfile $srcfile debug]} {
 #
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 gdb_test "break baz" ".*" ""

gdb/testsuite/gdb.base/attach-pie-misread.exp

@@ -16,7 +16,7 @@
 # This test only works on GNU/Linux.
 if { ![isnative] || [is_remote host] || [use_gdb_stub]
      || ![istarget *-linux*] || [skip_shlib_tests]} {
-    continue
+    return
 }
 
 load_lib prelink-support.exp

gdb/testsuite/gdb.base/bfp-test.exp

@@ -27,7 +27,7 @@ clean_restart ${binfile}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 # Run to the breakpoint at return.

gdb/testsuite/gdb.base/bitshift.exp

@@ -180,7 +180,7 @@ proc test_shifts {} {
 	    "unknown" "ada" "modula-2" "pascal" "fortran"
 	}
 	if {[lsearch -exact $skip_langs $lang] >= 0} {
-	    continue
+	    return
 	}
 
 	gdb_test_no_output "set language $lang"

gdb/testsuite/gdb.base/bp-cmds-continue-ctrl-c.exp

@@ -21,7 +21,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping because of nosignals."
-    continue
+    return
 }
 
 # This test requires sending ^C to interrupt the running target.

gdb/testsuite/gdb.base/branch-to-self.exp

@@ -17,7 +17,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping branch-to-self.exp because of nosignals."
-    continue
+    return
 }
 
 standard_testfile

gdb/testsuite/gdb.base/break-interp.exp

@@ -16,7 +16,7 @@
 # This test only works on GNU/Linux.
 if { ![isnative] || [is_remote host] || [use_gdb_stub]
      || ![istarget *-linux*] || [skip_shlib_tests]} {
-    continue
+    return
 }
 
 load_lib prelink-support.exp

gdb/testsuite/gdb.base/call-ar-st.exp

@@ -23,7 +23,7 @@ standard_testfile
 # test.
 if [target_info exists gdb,cannot_call_functions] {
     unsupported "this target can not call functions"
-    continue
+    return
 }
 
 # Create and source the file that provides information about the compiler
@@ -50,7 +50,7 @@ gdb_test_no_output "set width 0"
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 get_debug_format

gdb/testsuite/gdb.base/call-rt-st.exp

@@ -41,7 +41,7 @@ if [get_compiler_info] {
 # test.
 if [target_info exists gdb,cannot_call_functions] {
     unsupported "this target can not call functions"
-    continue
+    return
 }
 
 set skip_float_test [gdb_skip_float_test]
@@ -56,7 +56,7 @@ gdb_test_no_output "set width 0"
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 

gdb/testsuite/gdb.base/call-sc.exp

@@ -24,7 +24,7 @@
 
 if [target_info exists gdb,cannot_call_functions] {
     unsupported "this target can not call functions"
-    continue
+    return
 }
 
 standard_testfile .c

gdb/testsuite/gdb.base/call-signal-resume.exp

@@ -22,7 +22,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping call-signal-resume.exp because of nosignals."
-    continue
+    return
 }
 
 
@@ -37,7 +37,7 @@ if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb
 # test.
 if [target_info exists gdb,cannot_call_functions] {
     unsupported "this target can not call functions"
-    continue
+    return
 }
 
 proc get_dummy_frame_number { } {

gdb/testsuite/gdb.base/call-strs.exp

@@ -29,7 +29,7 @@ standard_testfile
 # test.
 if [target_info exists gdb,cannot_call_functions] {
     unsupported "this target can not call functions"
-    continue
+    return
 }
 
 
@@ -44,7 +44,7 @@ gdb_test_no_output "set width 0"
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 set prev_timeout $timeout

gdb/testsuite/gdb.base/callexit.exp

@@ -25,7 +25,7 @@ if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb
 # test.
 if [target_info exists gdb,cannot_call_functions] {
     unsupported "this target can not call functions"
-    continue
+    return
 }
 
 # Start with a fresh gdb.

gdb/testsuite/gdb.base/callfuncs.exp

@@ -27,7 +27,7 @@ if [support_complex_tests] {
 # test.
 if [target_info exists gdb,cannot_call_functions] {
     unsupported "this target can not call functions"
-    continue
+    return
 }
 
 set skip_float_test [gdb_skip_float_test]

gdb/testsuite/gdb.base/cast-call.exp

@@ -18,7 +18,7 @@
 
 if {[target_info exists gdb,cannot_call_functions]} {
     unsupported "this target can not call functions"
-    continue
+    return
 }
 
 standard_testfile .c

gdb/testsuite/gdb.base/catch-fork-static.exp

@@ -24,7 +24,7 @@
 # Until "catch fork" is implemented on other targets...
 #
 if { ![istarget "*-*-linux*"] && ![istarget "*-*-openbsd*"] } then {
-    continue
+    return
 }
 
 # Reusing foll-fork.c since it's a simple forking program.

gdb/testsuite/gdb.base/catch-signal-fork.exp

@@ -15,7 +15,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping catch-signal-fork.exp because of nosignals."
-    continue
+    return
 }
 
 standard_testfile

gdb/testsuite/gdb.base/catch-signal.exp

@@ -15,7 +15,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping catch-signal.exp because of nosignals."
-    continue
+    return
 }
 
 standard_testfile

gdb/testsuite/gdb.base/checkpoint.exp

@@ -17,13 +17,13 @@
 # other targets...
 #
 if {![istarget "*-*-linux*"]} then {
-    continue
+    return
 }
 
 # Checkpoint support is currently implemented in the Linux native
 # target, so only works with "target native".
 if { [target_info gdb_protocol] != "" } {
-    continue
+    return
 }
 
 # Must name the source file explicitly, otherwise when driven by

gdb/testsuite/gdb.base/cond-expr.exp

@@ -44,7 +44,7 @@ clean_restart ${binfile}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 gdb_test "print (2 ? 3 : 4)" "\[0-9\]* = 3" \

gdb/testsuite/gdb.base/consecutive.exp

@@ -32,7 +32,7 @@ if {[prepare_for_testing "failed to prepare" $testfile $srcfile {debug nowarning
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 set is_stmt [is_stmt_addresses $srcfile]

gdb/testsuite/gdb.base/constvars.exp

@@ -48,7 +48,7 @@ clean_restart ${binfile}
 #
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 get_debug_format

gdb/testsuite/gdb.base/ctf-constvars.exp

@@ -43,7 +43,7 @@ if { [prepare_for_testing "failed to prepare" ${testfile} \
 #
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 # test vars and pointers

gdb/testsuite/gdb.base/ctf-ptype.exp

@@ -281,7 +281,7 @@ if [runto_main] then {
 
   if [target_info exists gdb,cannot_call_functions] {
     unsupported "this target can not call functions"
-    continue
+    return
   }
 
   # We need to up this because this can be really slow on some boards.

gdb/testsuite/gdb.base/dfp-test.exp

@@ -32,7 +32,7 @@ clean_restart ${binfile}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 set sizeof_long [get_sizeof "long" 4]

gdb/testsuite/gdb.base/disasm-optim.exp

@@ -16,7 +16,7 @@
 # This test exercises disassemble /s with optimized and inlined code.
 
 if { ![is_amd64_regs_target] } {
-    continue
+    return
 }
 
 standard_testfile .S

gdb/testsuite/gdb.base/enum_cond.exp

@@ -29,7 +29,7 @@ clean_restart $testfile
 
 if ![runto_main] then {
     perror "could not run to main"
-    continue
+    return
 }
 
 gdb_test "break call_me if param.e == 1" \

gdb/testsuite/gdb.base/eval-skip.exp

@@ -48,7 +48,7 @@ clean_restart ${binfile}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 gdb_test_no_output "set variable x=14" "set variable x=14"

gdb/testsuite/gdb.base/exe-lock.exp

@@ -39,7 +39,7 @@ if { ! [file exists $binfile] } {
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 gdb_continue_to_end

gdb/testsuite/gdb.base/exitsignal.exp

@@ -23,7 +23,7 @@
 
 if { [target_info exists gdb,nosignals] } {
     verbose "Skipping exitsignal.exp because of nosignals."
-    continue
+    return
 }
 
 standard_testfile segv.c

gdb/testsuite/gdb.base/exprs.exp

@@ -38,7 +38,7 @@ clean_restart ${binfile}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 proc test_expr { args } {

gdb/testsuite/gdb.base/fileio.exp

@@ -17,7 +17,7 @@
 
 if [target_info exists gdb,nofileio] {
     verbose "Skipping fileio.exp because of no fileio capabilities."
-    continue
+    return
 }
 
 
@@ -64,7 +64,7 @@ gdb_test_no_output "set width 0"
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 gdb_test "break stop" "Breakpoint .*$srcfile.*" 

gdb/testsuite/gdb.base/float.exp

@@ -31,7 +31,7 @@ if { [prepare_for_testing "failed to prepare" float float.c] } {
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 # Test "info float".

gdb/testsuite/gdb.base/float128.exp

@@ -34,7 +34,7 @@ clean_restart ${binfile}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 # Run to the breakpoint at return.

gdb/testsuite/gdb.base/floatn.exp

@@ -34,7 +34,7 @@ clean_restart ${binfile}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 # Run to the breakpoint at return.

gdb/testsuite/gdb.base/foll-exec-mode.exp

@@ -30,13 +30,13 @@
 # required for follow-exec-mode testing.
 if { [target_info exists gdb_protocol]
      && [target_info gdb_protocol] == "remote" } {
-    continue
+    return
 }
 
 # Until "catch exec" is implemented on other targets...
 #
 if {![istarget "*-linux*"]} then {
-     continue
+     return
 }
 
 standard_testfile foll-exec-mode.c

gdb/testsuite/gdb.base/foll-exec.exp

@@ -19,7 +19,7 @@
 # Until "catch exec" is implemented on other targets...
 #
 if { ![istarget "*-linux*"] } then {
-    continue
+    return
 }
 
 standard_testfile foll-exec.c

gdb/testsuite/gdb.base/gdb1250.exp

@@ -32,7 +32,7 @@ if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb
 clean_restart ${binfile}
 
 if ![runto abort {allow-pending}] then {
-    continue
+    return
 }
 
 # See http://sources.redhat.com/gdb/bugs/1250

gdb/testsuite/gdb.base/gdb1821.exp

@@ -30,7 +30,7 @@ if {[prepare_for_testing "failed to prepare" $testfile $srcfile debug]} {
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 } 
 gdb_test "print /x bar" "{x__0 = 0x0, y__0 = 0x0, z__1 = 0x0}" 
 

gdb/testsuite/gdb.base/infcall-input.exp

@@ -20,7 +20,7 @@ standard_testfile
 
 if [target_info exists gdb,cannot_call_functions] {
     unsupported "can not call functions"
-    continue
+    return
 }
 
 if {[prepare_for_testing "failed to prepare" $testfile $srcfile debug]} {

gdb/testsuite/gdb.base/inferior-died.exp

@@ -18,7 +18,7 @@
 #
 if { ![istarget "*-*-linux*"] } then {
     unsupported "inferior-died.exp"
-    continue
+    return
 }
 
 if { ![support_displaced_stepping] } {

gdb/testsuite/gdb.base/interrupt-daemon-attach.exp

@@ -15,7 +15,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping interrupt-daemon-attach.exp because of nosignals."
-    continue
+    return
 }
 
 # This test requires sending ^C to interrupt the running target.

gdb/testsuite/gdb.base/interrupt.exp

@@ -15,7 +15,7 @@
 
 if [target_info exists gdb,nointerrupts] {
     verbose "Skipping interrupt.exp because of nointerrupts."
-    continue
+    return
 }
 
 if [target_info exists gdb,noinferiorio] {

gdb/testsuite/gdb.base/kill-after-signal.exp

@@ -22,7 +22,7 @@ if { ![can_single_step_to_signal_handler] } {
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping kill-after-signal.exp because of nosignals."
-    continue
+    return
 }
 
 if [prepare_for_testing "failed to prepare" ${testfile}] {

gdb/testsuite/gdb.base/logical.exp

@@ -45,7 +45,7 @@ clean_restart ${binfile}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 proc evaluate { vars ops } {

gdb/testsuite/gdb.base/miscexprs.exp

@@ -56,7 +56,7 @@ clean_restart ${binfile}
 #
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 gdb_test "break marker1" ".*" ""

gdb/testsuite/gdb.base/multi-forks.exp

@@ -17,7 +17,7 @@
 # other targets...
 #
 if { ![istarget "*-*-linux*"] } then {
-    continue
+    return
 }
 
 

gdb/testsuite/gdb.base/nested-subp1.exp

@@ -42,7 +42,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${testcase}.c" \
 clean_restart "${testcase}"
 if ![runto_main] {
     perror "could not run to main"
-    continue
+    return
 }
 
 set bp_location [gdb_get_line_number "STOP" "${testcase}.c"]

gdb/testsuite/gdb.base/nested-subp2.exp

@@ -42,7 +42,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${testcase}.c" \
 clean_restart "${testcase}"
 if ![runto_main] {
     perror "could not run to main"
-    continue
+    return
 }
 
 set bp_location [gdb_get_line_number "STOP" "${testcase}.c"]

gdb/testsuite/gdb.base/nested-subp3.exp

@@ -42,7 +42,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${testcase}.c" \
 clean_restart "${testcase}"
 if ![runto_main] {
     perror "could not run to main"
-    continue
+    return
 }
 
 set bp_location [gdb_get_line_number "STOP" "${testcase}.c"]

gdb/testsuite/gdb.base/pc-fp.exp

@@ -36,7 +36,7 @@ if {[prepare_for_testing "failed to prepare" $testfile $srcfile {debug nowarning
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 

gdb/testsuite/gdb.base/permissions.exp

@@ -87,7 +87,7 @@ gdb_load ${binfile}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 gdb_test "print x = 45" "$decimal = 45" "set a global"

gdb/testsuite/gdb.base/pie-execl.exp

@@ -20,14 +20,14 @@ global inferior_spawn_id
 global gdb_spawn_id
 
 if ![istarget *-linux*] {
-    continue
+    return
 }
 
 # In remote mode we cannot use the 'set args' command, and this
 # test requires it.
 if { [target_info exists gdb_protocol] } then {
     if { [target_info gdb_protocol] == "remote" } then {
-	continue
+	return
     }
 }
 

gdb/testsuite/gdb.base/pointers.exp

@@ -45,7 +45,7 @@ clean_restart ${binfile}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 gdb_test "next " "more_code.*;" "continuing after dummy()"

gdb/testsuite/gdb.base/prologue.exp

@@ -14,7 +14,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 { [skip_cplus_tests] } { continue }
+if { [skip_cplus_tests] } {  return }
 
 standard_testfile .c
 
@@ -27,7 +27,7 @@ clean_restart ${binfile}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 proc find_breakpoint_pc { sym } {

gdb/testsuite/gdb.base/ptype.exp

@@ -591,7 +591,7 @@ if [runto_main] then {
 
   if [target_info exists gdb,cannot_call_functions] {
     unsupported "this target can not call functions"
-    continue
+    return
   }
 
   # We need to up this because this can be really slow on some boards.

gdb/testsuite/gdb.base/random-signal.exp

@@ -15,7 +15,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping catch-signal.exp because of nosignals."
-    continue
+    return
 }
 
 # This test requires sending ^C to interrupt the running target.

gdb/testsuite/gdb.base/readnever.exp

@@ -36,7 +36,7 @@ save_vars { GDBFLAGS } {
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 gdb_test "break fun_three" \

gdb/testsuite/gdb.base/relational.exp

@@ -39,7 +39,7 @@ if [get_compiler_info] {
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 #

gdb/testsuite/gdb.base/relativedebug.exp

@@ -15,7 +15,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping relativedebug.exp because of nosignals."
-    continue
+    return
 }
 
 standard_testfile .c

gdb/testsuite/gdb.base/savedregs.exp

@@ -26,7 +26,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping savedregs.exp because of nosignals."
-    continue
+    return
 }
 
 

gdb/testsuite/gdb.base/setvar.exp

@@ -43,7 +43,7 @@ gdb_test_no_output "set print sevenbit-strings"
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 # Determine expected output for unsigned long variables,

gdb/testsuite/gdb.base/sigall.exp

@@ -15,7 +15,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping sigall.exp because of nosignals."
-    continue
+    return
 }
 
 standard_testfile

gdb/testsuite/gdb.base/sigaltstack.exp

@@ -24,7 +24,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping sigaltstack.exp because of nosignals."
-    continue
+    return
 }
 
 

gdb/testsuite/gdb.base/sigbpt.exp

@@ -30,7 +30,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping sigbpt.exp because of nosignals."
-    continue
+    return
 }
 
 

gdb/testsuite/gdb.base/sigchld.exp

@@ -18,7 +18,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping sigchld.exp because of nosignals."
-    continue
+    return
 }
 
 standard_testfile .c

gdb/testsuite/gdb.base/siginfo-addr.exp

@@ -23,7 +23,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping siginfo-addr.exp because of nosignals."
-    continue
+    return
 }
 
 standard_testfile

gdb/testsuite/gdb.base/siginfo-infcall.exp

@@ -15,7 +15,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping siginfo-infcall.exp because of nosignals."
-    continue
+    return
 }
 
 standard_testfile .c

gdb/testsuite/gdb.base/siginfo-obj.exp

@@ -23,7 +23,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping siginfo-obj.exp because of nosignals."
-    continue
+    return
 }
 
 if { ![supports_get_siginfo_type] } {

gdb/testsuite/gdb.base/siginfo-thread.exp

@@ -18,7 +18,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping siginfo-thread.exp because of nosignals."
-    continue
+    return
 }
 
 if { ![supports_get_siginfo_type] } {

gdb/testsuite/gdb.base/siginfo.exp

@@ -25,7 +25,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping siginfo.exp because of nosignals."
-    continue
+    return
 }
 
 

gdb/testsuite/gdb.base/signals.exp

@@ -15,7 +15,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping signals.exp because of nosignals."
-    continue
+    return
 }
 
 

gdb/testsuite/gdb.base/signull.exp

@@ -29,7 +29,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping signull.exp because of nosignals."
-    continue
+    return
 }
 
 

gdb/testsuite/gdb.base/sigrepeat.exp

@@ -21,7 +21,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping sigrepeat.exp because of nosignals."
-    continue
+    return
 }
 
 

gdb/testsuite/gdb.base/sigstep.exp

@@ -23,7 +23,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping sigstep.exp because of nosignals."
-    continue
+    return
 }
 
 

gdb/testsuite/gdb.base/sigwinch-notty.exp

@@ -19,13 +19,13 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping $subdir/$gdb_test_file_name.exp because of nosignals."
-    continue
+    return
 }
 
 # The testfile relies on "run" from the command line, so only works
 # with "target native".
 if { [target_info gdb_protocol] != "" } {
-    continue
+    return
 }
 
 gdb_exit

gdb/testsuite/gdb.base/sizeof.exp

@@ -35,7 +35,7 @@ if {[prepare_for_testing "failed to prepare" $testfile $srcfile debug]} {
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 #

gdb/testsuite/gdb.base/skip-solib.exp

@@ -22,7 +22,7 @@
 # This only works on GNU/Linux.
 if { ![isnative] || [is_remote host] || ![istarget *-linux*]
      || [skip_shlib_tests]} {
-    continue
+    return
 }
 
 set test "skip-solib"

gdb/testsuite/gdb.base/store.exp

@@ -32,7 +32,7 @@ if [get_compiler_info] {
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 #

gdb/testsuite/gdb.base/structs.exp

@@ -21,7 +21,7 @@
 
 if [target_info exists gdb,cannot_call_functions] {
     unsupported "this target can not call functions"
-    continue
+    return
 }
 
 standard_testfile .c

gdb/testsuite/gdb.base/symbol-alias.exp

@@ -21,7 +21,7 @@ if { [prepare_for_testing "failed to prepare" ${testfile} [list $srcfile $srcfil
 }
 
 if ![runto_main] then {
-    continue
+    return
 }
 
 # Functions.

gdb/testsuite/gdb.base/unwindonsignal.exp

@@ -15,7 +15,7 @@
 
 if [target_info exists gdb,nosignals] {
     verbose "Skipping unwindonsignal.exp because of nosignals."
-    continue
+    return
 }
 
 
@@ -23,7 +23,7 @@ if [target_info exists gdb,nosignals] {
 # test.
 if [target_info exists gdb,cannot_call_functions] {
     unsupported "this target can not call functions"
-    continue
+    return
 }
 
 standard_testfile

gdb/testsuite/gdb.base/varargs.exp

@@ -64,7 +64,7 @@ if [gdb_skip_stdio_test "varargs.exp"] {
 
 if ![runto test] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 gdb_test_stdio "print find_max1(5,1,2,3,4,5)" \

gdb/testsuite/gdb.base/volatile.exp

@@ -50,7 +50,7 @@ if [get_compiler_info] {
 #
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 get_debug_format

gdb/testsuite/gdb.base/whatis-exp.exp

@@ -39,7 +39,7 @@ if { [prepare_for_testing "failed to prepare" whatis-exp int-type.c {debug nowar
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 #

gdb/testsuite/gdb.cp/ambiguous.exp

@@ -19,7 +19,7 @@
 # about the field or baseclass being ambiguous is emitted at the right
 # times.
 
-if { [skip_cplus_tests] } { continue }
+if { [skip_cplus_tests] } {  return }
 
 standard_testfile .cc
 
@@ -43,7 +43,7 @@ if {[prepare_for_testing "failed to prepare" $testfile $srcfile \
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 # Run to a breakpoint after the variables have been initialized so we

gdb/testsuite/gdb.cp/anon-ns.exp

@@ -17,7 +17,7 @@
 
 # This file is part of the gdb testsuite.
 
-if {[skip_cplus_tests]} { continue }
+if {[skip_cplus_tests]} { return }
 
 standard_testfile .cc anon-ns2.cc
 
@@ -27,7 +27,7 @@ if {[prepare_for_testing "failed to prepare" $testfile "$srcfile $srcfile2" {c++
 
 if {![runto_main]} {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 set ans {(anonymous namespace)}

gdb/testsuite/gdb.cp/bs15503.exp

@@ -17,7 +17,7 @@
 # This file was written by Sue Kimura (sue_kimura@hp.com)
 # Rewritten by Michael Chastain (mec.gnu@mindspring.com)
 
-if { [skip_stl_tests] } { continue }
+if { [skip_stl_tests] } { return }
 
 standard_testfile .cc
 
@@ -31,7 +31,7 @@ if {[prepare_for_testing "failed to prepare" $testfile $srcfile {debug c++}]} {
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 # Set breakpoint on template function

gdb/testsuite/gdb.cp/casts.exp

@@ -25,7 +25,7 @@
 #
 
 
-if { [skip_cplus_tests] } { continue }
+if { [skip_cplus_tests] } { return }
 
 standard_testfile .cc casts03.cc
 
@@ -39,7 +39,7 @@ if {[prepare_for_testing "failed to prepare" $testfile $srcfile {debug c++}]} {
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 # Prevent symbol on address 0x0 being printed.
@@ -187,7 +187,7 @@ if {[prepare_for_testing "failed to prepare" ${testfile}03 $srcfile2 \
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint"
-    continue
+   return
 }
 
 # Prevent symbol on address 0x0 being printed.

gdb/testsuite/gdb.cp/class2.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 { [skip_cplus_tests] } { continue }
+if { [skip_cplus_tests] } { return }
 
 
 standard_testfile .cc
@@ -35,7 +35,7 @@ gdb_test_no_output "set print symbol off"
 
 if ![runto_main] then {
     perror "couldn't run to main"
-    continue
+    return
 }
 
 get_debug_format

gdb/testsuite/gdb.cp/constexpr-field.exp

@@ -15,7 +15,7 @@
 
 # This file is part of the gdb testsuite.
 
-if {[skip_cplus_tests]} { continue }
+if {[skip_cplus_tests]} { return }
 
 standard_testfile .cc
 
@@ -26,7 +26,7 @@ if {[prepare_for_testing "failed to prepare" $testfile $srcfile \
 
 if {![runto_main]} {
     perror "couldn't run to breakpoint"
-    continue
+    return
 }
 
 # "x" sometimes isn't available due to

gdb/testsuite/gdb.cp/converts.exp

@@ -23,7 +23,7 @@ if { [prepare_for_testing "failed to prepare" ${testfile} ${srcfile} {debug c++}
 
 if ![runto_main] then {
     perror "couldn't run to breakpoint main"
-    continue
+    return
 }
 
 gdb_breakpoint [gdb_get_line_number "end of main"]

gdb/testsuite/gdb.cp/cpsizeof.exp

@@ -16,7 +16,7 @@
 
 standard_testfile .cc
 
-if {[skip_cplus_tests]} { continue }
+if {[skip_cplus_tests]} { return }
 
 if {[prepare_for_testing "failed to prepare" $testfile $srcfile {debug c++}] } {
      return -1
@@ -24,7 +24,7 @@ if {[prepare_for_testing "failed to prepare" $testfile $srcfile {debug c++}] } {
 
 if {![runto_main]} {
     perror "could not run to main"
-    continue
+    return
 }
 
 gdb_breakpoint [gdb_get_line_number "break here"]