gdb/testsuite/

[deliverable/binutils-gdb.git] / gdb / testsuite / gdb.threads / non-ldr-exc-4.exp

diff --git a/gdb/testsuite/gdb.threads/non-ldr-exc-4.exp b/gdb/testsuite/gdb.threads/non-ldr-exc-4.exp
index be0ac73ae929ee83f905f08e99fd259cf68161eb..9ce5a1be7473eddc739448a1969afd49350a5544 100644 (file)
--- a/gdb/testsuite/gdb.threads/non-ldr-exc-4.exp
+++ b/gdb/testsuite/gdb.threads/non-ldr-exc-4.exp
@@ -30,29 +30,31 @@ if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executab
     return -1
 }
 
-proc do_test { lock_sched } { with_test_prefix "lock-sched$lock_sched" {
-    global executable
+proc do_test { lock_sched } {
+    with_test_prefix "lock-sched$lock_sched" {
+       global executable
 
-    clean_restart ${executable}
+       clean_restart ${executable}
 
-    if ![runto_main] {
-       return -1
-    }
+       if ![runto_main] {
+           return -1
+       }
 
-    gdb_breakpoint [gdb_get_line_number "break-here"]
-    gdb_continue_to_breakpoint "break-here" ".* break-here .*"
+       gdb_breakpoint [gdb_get_line_number "break-here"]
+       gdb_continue_to_breakpoint "break-here" ".* break-here .*"
 
-    # Also test with sched-lock to make sure we can follow the
-    # non-leader thread execing even though the main thread wasn't
-    # resumed before the exec.
-    if { $lock_sched } {
-       gdb_test_no_output "set scheduler-locking on"
-    }
+       # Also test with sched-lock to make sure we can follow the
+       # non-leader thread execing even though the main thread wasn't
+       # resumed before the exec.
+       if { $lock_sched } {
+           gdb_test_no_output "set scheduler-locking on"
+       }
 
-    gdb_test "continue" \
-       ".*is executing new program.*Breakpoint 1, main.* at .*" \
-       "continue over exec"
-}}
+       gdb_test "continue" \
+           ".*is executing new program.*Breakpoint 1, main.* at .*" \
+           "continue over exec"
+    }
+}
 
 do_test 0
 do_test 1