diff options
Diffstat (limited to 'gdb/testsuite/gdb.ada/mi_variant.exp')
-rw-r--r-- | gdb/testsuite/gdb.ada/mi_variant.exp | 11 |
1 files changed, 2 insertions, 9 deletions
diff --git a/gdb/testsuite/gdb.ada/mi_variant.exp b/gdb/testsuite/gdb.ada/mi_variant.exp index 01c6720..d7e6191 100644 --- a/gdb/testsuite/gdb.ada/mi_variant.exp +++ b/gdb/testsuite/gdb.ada/mi_variant.exp @@ -33,16 +33,9 @@ foreach_with_prefix scenario {none all minimal} { return -1 } - gdb_exit - if [mi_gdb_start] { - continue - } - - mi_delete_breakpoints - mi_gdb_reinitialize_dir $srcdir/$subdir - mi_gdb_load ${binfile} + mi_clean_restart $binfile - if ![mi_run_to_main] then { + if {[mi_runto_main] < 0} { fail "cannot run to main, testcase aborted" return 0 } |