diff options
author | Michael Snyder <msnyder@vmware.com> | 2009-10-22 19:53:10 +0000 |
---|---|---|
committer | Michael Snyder <msnyder@vmware.com> | 2009-10-22 19:53:10 +0000 |
commit | 4cf866a3ee7728ec7e6e3f8f3bb8a57f8c1818ba (patch) | |
tree | 3fd09d1d55bad7cd1cbf912ee9d0830499b4c4ac /gdb/testsuite/gdb.reverse/consecutive-reverse.exp | |
parent | 29153c240adea2794a6ec1c8c4da1dbe3654a045 (diff) | |
download | gdb-4cf866a3ee7728ec7e6e3f8f3bb8a57f8c1818ba.zip gdb-4cf866a3ee7728ec7e6e3f8f3bb8a57f8c1818ba.tar.gz gdb-4cf866a3ee7728ec7e6e3f8f3bb8a57f8c1818ba.tar.bz2 |
2009-10-22 Michael Snyder <msnyder@vmware.com>
* gdb.reverse/consecutive-reverse.exp: Substitute gdb_test_multiple
for gdb_expect. Adjust one test's expect strings for the new
format of disassemble.
* gdb.reverse/finish-reverse.exp: Delete 'return'.
* gdb.reverse/sigall-reverse.exp: Substitute gdb_test for
gdb_test_multiple.
* gdb.reverse/step-reverse.exp: Delete 'return'.
* gdb.reverse/until-reverse.exp: Delete blank lines.
* gdb.reverse/watch-reverse.exp: Delete blank lines.
Diffstat (limited to 'gdb/testsuite/gdb.reverse/consecutive-reverse.exp')
-rw-r--r-- | gdb/testsuite/gdb.reverse/consecutive-reverse.exp | 13 |
1 files changed, 3 insertions, 10 deletions
diff --git a/gdb/testsuite/gdb.reverse/consecutive-reverse.exp b/gdb/testsuite/gdb.reverse/consecutive-reverse.exp index e2ba83a..d3ab968 100644 --- a/gdb/testsuite/gdb.reverse/consecutive-reverse.exp +++ b/gdb/testsuite/gdb.reverse/consecutive-reverse.exp @@ -50,7 +50,7 @@ gdb_expect { global foo2_addr global gdb_prompt - -re "($hex).*\[\r\n\]+($hex).*$gdb_prompt $" { + -re "=> ($hex).*\[\r\n\]+ ($hex).*$gdb_prompt $" { set foo1_addr $expect_out(1,string) set foo2_addr $expect_out(2,string) pass "get breakpoint address for foo" @@ -68,8 +68,8 @@ gdb_expect { gdb_test "break \*$foo2_addr" "Breakpoint $decimal at $foo2_addr: file .*" \ "set bp, 2nd instr" -send_gdb "step\n" -gdb_expect { +set testmsg "stopped at bp, 2nd instr" +gdb_test_multiple "step" $testmsg { -re "Breakpoint $decimal, ($hex) in foo.*$gdb_prompt $" { set stop_addr $expect_out(1,string) if [eval expr "$foo2_addr == $stop_addr"] then { @@ -78,13 +78,6 @@ gdb_expect { fail "stopped at bp, 2nd instr (wrong address)" } } - -re ".*$gdb_prompt $" { - fail "stopped at bp, 2nd instr" - } - timeout { - fail "stopped at bp, 2nd instr (timeout)" - - } } ### |