diff options
Diffstat (limited to 'gdb/testsuite/gdb.ada/mi_string_access.exp')
| -rw-r--r-- | gdb/testsuite/gdb.ada/mi_string_access.exp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gdb/testsuite/gdb.ada/mi_string_access.exp b/gdb/testsuite/gdb.ada/mi_string_access.exp index 25c0490..3a54e94 100644 --- a/gdb/testsuite/gdb.ada/mi_string_access.exp +++ b/gdb/testsuite/gdb.ada/mi_string_access.exp @@ -26,13 +26,13 @@ foreach_gnat_encoding scenario flags {all minimal} { lappend flags debug if {[gdb_compile_ada "${srcfile}" "${binfile}-${scenario}" executable $flags] != ""} { - return -1 + return } - mi_clean_restart $binfile-$scenario + mi_clean_restart $::testfile-$scenario if {[mi_runto_main] < 0} { - return 0 + return } set bp_location [gdb_get_line_number "STOP" ${testdir}/bar.adb] |