diff options
| author | Michael Snyder <msnyder@vmware.com> | 2010-06-02 19:41:11 +0000 |
|---|---|---|
| committer | Michael Snyder <msnyder@vmware.com> | 2010-06-02 19:41:11 +0000 |
| commit | 0ab48859b9a642d6393ccb0c43bda33360b83750 (patch) | |
| tree | 5c23eb8063438843a1cca824ffd7f29c36a1b7af /gdb/testsuite/gdb.trace/collection.exp | |
| parent | 9eae7c5264c14e142dd52988f70d58f62755b2d0 (diff) | |
| download | gdb-0ab48859b9a642d6393ccb0c43bda33360b83750.zip gdb-0ab48859b9a642d6393ccb0c43bda33360b83750.tar.gz gdb-0ab48859b9a642d6393ccb0c43bda33360b83750.tar.bz2 | |
2010-05-26 Michael Snyder <msnyder@msnyder-server.eng.vmware.com>
* gdb.trace/actions.exp: Replace uses of send_gdb / gdb_expect.
* gdb.trace/backtrace.exp: Replace uses of send_gdb / gdb_expect.
* gdb.trace/collection.exp: Replace uses of send_gdb / gdb_expect.
* gdb.trace/deltrace.exp: Replace uses of send_gdb / gdb_expect.
* gdb.trace/infotrace.exp: Replace uses of send_gdb / gdb_expect.
* gdb.trace/limits.exp: Replace uses of send_gdb / gdb_expect.
* gdb.trace/report.exp: Replace uses of send_gdb / gdb_expect.
* gdb.trace/save-trace.exp: Replace uses of send_gdb / gdb_expect.
* gdb.trace/tfind.exp: Replace uses of send_gdb / gdb_expect.
* gdb.trace/tracecmd.exp: Replace uses of send_gdb / gdb_expect.
* gdb.trace/tsv.exp: Replace uses of send_gdb / gdb_expect.
Diffstat (limited to 'gdb/testsuite/gdb.trace/collection.exp')
| -rw-r--r-- | gdb/testsuite/gdb.trace/collection.exp | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/gdb/testsuite/gdb.trace/collection.exp b/gdb/testsuite/gdb.trace/collection.exp index 0a3f997..ffa7eb7 100644 --- a/gdb/testsuite/gdb.trace/collection.exp +++ b/gdb/testsuite/gdb.trace/collection.exp @@ -292,8 +292,7 @@ proc gdb_collect_locals_test { func mylocs msg } { # Find the comment-identified line for setting this tracepoint. set testline 0 - send_gdb "list $func, +30\n" - gdb_expect { + gdb_test_multiple "list $func, +30" "collect $msg: find tracepoint line" { -re "\[\r\n\](\[0-9\]+)\[^\r\n\]+ Set_Tracepoint_Here .*$gdb_prompt" { set testline $expect_out(1,string) pass "collect $msg: find tracepoint line" @@ -400,8 +399,7 @@ proc gdb_collect_expression_test { func expr val msg } { # Find the comment-identified line for setting this tracepoint. set testline 0 - send_gdb "list $func, +30\n" - gdb_expect { + gdb_test_multiple "list $func, +30" "collect $msg: find tracepoint line" { -re "\[\r\n\](\[0-9\]+)\[^\r\n\]+ Set_Tracepoint_Here .*$gdb_prompt" { set testline $expect_out(1,string) pass "collect $msg: find tracepoint line" @@ -443,8 +441,7 @@ proc gdb_collect_globals_test { } { # Find the comment-identified line for setting this tracepoint. set testline 0 - send_gdb "list globals_test_func, +30\n" - gdb_expect { + gdb_test_multiple "list globals_test_func, +30" "collect globals: find tracepoint line" { -re "\[\r\n\](\[0-9\]+)\[^\r\n\]+ Set_Tracepoint_Here .*$gdb_prompt" { set testline $expect_out(1,string) pass "collect globals: find tracepoint line" |