diff options
author | Vladimir Prus <vladimir@codesourcery.com> | 2008-04-05 17:12:46 +0000 |
---|---|---|
committer | Vladimir Prus <vladimir@codesourcery.com> | 2008-04-05 17:12:46 +0000 |
commit | bb3784283e3ddfb19761aabcc5ade9956e34b311 (patch) | |
tree | daa7163a406290ffcc15b95ec03b0aaf6b2a5a81 /gdb/testsuite/gdb.mi/mi2-stack.exp | |
parent | 051568b4d03e758bfc57f55cfda27b65879edd7e (diff) | |
download | gdb-bb3784283e3ddfb19761aabcc5ade9956e34b311.zip gdb-bb3784283e3ddfb19761aabcc5ade9956e34b311.tar.gz gdb-bb3784283e3ddfb19761aabcc5ade9956e34b311.tar.bz2 |
* lib/mi-support.exp (mi_expect_stop): New.
(mi_run_cmd): Change the
token. Use mi_send_resuming_command, use
mi_expect_stop.
(mi_execute_to_helper): Rename to mi_execute_to.
(mi_send_resuming_command): Add more error patterns.
(mi_wait_for_stop): Renamed to...
(mi_get_stop_line): ...this.
(mi_run_inline_test): Adjust.
* gdb.mi/mi-cli.exp: Use mi_execute_to/mi_expect_stop.
* gdb.mi/mi-console.exp: Likewise.
* gdb.mi/mi-pending.exp: Likewise.
* gdb.mi/mi-simplerun.exp: Likewise.
* gdb.mi/mi-stack.exp: Likewise.
* gdb.mi/mi-stepi.exp: Likewise.
* gdb.mi/mi-syn-frame.exp: Add comment.
* gdb.mi/mi-until.exp: Likewise.
* gdb.mi/mi-var-display.exp: Likewise.
* gdb.mi/mi-watch.exp: Likewise.
* gdb.mi/mi2-cli.exp: Likewise.
* gdb.mi/mi2-console.exp: Likewise.
* gdb.mi/mi2-simplerun.exp: Likewise.
* gdb.mi/mi2-stack.exp: Likewise.
* gdb.mi/mi2-stepi.exp: Likewise.
* gdb.mi/mi2-until.exp: Likewise.
* gdb.mi/mi2-var-display.exp: Likewise.
* gdb.mi/mi2-watch.exp: Likewise.
Diffstat (limited to 'gdb/testsuite/gdb.mi/mi2-stack.exp')
-rw-r--r-- | gdb/testsuite/gdb.mi/mi2-stack.exp | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/gdb/testsuite/gdb.mi/mi2-stack.exp b/gdb/testsuite/gdb.mi/mi2-stack.exp index 0b6f14c..88be36c 100644 --- a/gdb/testsuite/gdb.mi/mi2-stack.exp +++ b/gdb/testsuite/gdb.mi/mi2-stack.exp @@ -173,13 +173,8 @@ proc test_stack_locals_listing {} { set line_callee4_return_0 [gdb_get_line_number "return 0;"] # step until A, B, C, D have some reasonable values. -send_gdb "-exec-next 4\n" -gdb_expect { - -re "\\^running\r\n${mi_gdb_prompt}\\*stopped,reason=\"end-stepping-range\",thread-id=\"\[01\]\",frame=\{addr=\"$hex\",func=\"callee4\",args=\\\[\\\],file=\".*${srcfile}\",fullname=\"${fullname_syntax}${srcfile}\",line=\"$line_callee4_return_0\"\}\r\n$mi_gdb_prompt$" { - pass "next's in callee4" - } - timeout { fail "next in callee4 (timeout)" } -} +mi_execute_to "exec-next 4" "end-stepping-range" "callee4" "" ".*${srcfile}" $line_callee4_return_0 ""\ + "next's in callee4" mi_gdb_test "232-stack-list-locals 1" \ "232\\^done,locals=\\\[\{name=\"A\",value=\"1\"\},\{name=\"B\",value=\"2\"\},\{name=\"C\",value=\"3\"\},\{name=\"D\",value=\"\\{0, 1, 2\\}\"\}\\\]" \ |