aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/testsuite')
-rw-r--r--gdb/testsuite/gdb.fortran/array-slices-bad.exp10
1 files changed, 5 insertions, 5 deletions
diff --git a/gdb/testsuite/gdb.fortran/array-slices-bad.exp b/gdb/testsuite/gdb.fortran/array-slices-bad.exp
index d7b0069..280628d 100644
--- a/gdb/testsuite/gdb.fortran/array-slices-bad.exp
+++ b/gdb/testsuite/gdb.fortran/array-slices-bad.exp
@@ -25,17 +25,17 @@ if {[prepare_for_testing ${testfile}.exp ${testfile} ${srcfile} \
return -1
}
+if {![runto [gdb_get_line_number "First Breakpoint"]]} {
+ perror "couldn't run to breakpoint First Breakpoint"
+ return -1
+}
+
# Avoid shared lib symbols.
gdb_test_no_output "set auto-solib-add off"
# Avoid libc symbols, in particular the 'array' type.
gdb_test_no_output "nosharedlibrary"
-if {![runto [gdb_get_line_number "First Breakpoint"]]} {
- perror "couldn't run to breakpoint First Breakpoint"
- return -1
-}
-
gdb_breakpoint [gdb_get_line_number "Second Breakpoint"]
gdb_breakpoint [gdb_get_line_number "Final Breakpoint"]