diff options
Diffstat (limited to 'gdb/testsuite/gdb.base/shlib-call.exp')
| -rw-r--r-- | gdb/testsuite/gdb.base/shlib-call.exp | 26 |
1 files changed, 15 insertions, 11 deletions
diff --git a/gdb/testsuite/gdb.base/shlib-call.exp b/gdb/testsuite/gdb.base/shlib-call.exp index e1664da1a8..2c9b4957aa 100644 --- a/gdb/testsuite/gdb.base/shlib-call.exp +++ b/gdb/testsuite/gdb.base/shlib-call.exp @@ -170,18 +170,22 @@ gdb_test_no_output "set width 0" # test that we can re-set breakpoints in shared libraries gdb_breakpoint "shr1" "allow-pending" -# FIXME: should not send "run" explicitly. Non-portable. - -if ![is_remote target] { - gdb_test "run" "Starting program:.*Breakpoint .,.*" \ - "run to bp in shared library" - - gdb_continue_to_end "" continue 1 +set test "run to bp in shared library" +gdb_run_cmd +gdb_test_multiple "" $test { + -re "Breakpoint .,.*${gdb_prompt} " { + pass $test + } +} - gdb_test "run" "Starting program:.*Breakpoint .,.*" \ - "re-run to bp in shared library (PR's 16495, 18213)" +gdb_continue_to_end "" continue 1 - gdb_continue_to_end "" continue 1 +set test "re-run to bp in shared library (PR's 16495, 18213)" +gdb_run_cmd +gdb_test_multiple "" $test { + -re "Breakpoint .,.*${gdb_prompt} " { + pass $test + } } -return 0 +gdb_continue_to_end "" continue 1 |