diff options
Diffstat (limited to 'gdb/testsuite/gdb.fortran/array-bounds.exp')
| -rw-r--r-- | gdb/testsuite/gdb.fortran/array-bounds.exp | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gdb/testsuite/gdb.fortran/array-bounds.exp b/gdb/testsuite/gdb.fortran/array-bounds.exp index 12bf5c2..3f25273 100644 --- a/gdb/testsuite/gdb.fortran/array-bounds.exp +++ b/gdb/testsuite/gdb.fortran/array-bounds.exp @@ -20,13 +20,14 @@ if { [skip_fortran_tests] } { return -1 } set testfile "array-bounds" standard_testfile .f90 +load_lib fortran.exp if {[prepare_for_testing $testfile.exp $testfile $srcfile {f90 debug}]} { return -1 } -if {![runto MAIN__]} { - perror "Could not run to breakpoint `MAIN__'." +if {![fortran_runto_main]} { + perror "Could not run to main." continue } |