From: Pedro Alves Date: Mon, 29 Mar 2010 00:46:54 +0000 (+0000) Subject: * gdb.trace/collection.exp (run_trace_experiment): Make sure X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=a8121990c1dc9e6c91bc469f4bc387b0db50c6ae;p=binutils-gdb.git * gdb.trace/collection.exp (run_trace_experiment): Make sure "tstart" is silent. --- diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index ee3f08236a5..c0bd8424530 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2010-03-29 Pedro Alves + + * gdb.trace/collection.exp (run_trace_experiment): Make sure + "tstart" is silent. + 2010-03-29 Pedro Alves * gdb.trace/collection.exp (executable): New. diff --git a/gdb/testsuite/gdb.trace/collection.exp b/gdb/testsuite/gdb.trace/collection.exp index b05aa35981c..5d510abc75b 100644 --- a/gdb/testsuite/gdb.trace/collection.exp +++ b/gdb/testsuite/gdb.trace/collection.exp @@ -93,13 +93,19 @@ proc prepare_for_trace_test {} { } proc run_trace_experiment { msg test_func } { + global gdb_prompt + gdb_test "continue" \ ".*Breakpoint \[0-9\]+, begin .*" \ "collect $msg: advance to begin" - gdb_test "tstart" \ - "\[\r\n\]+" \ - "collect $msg: start trace experiment" + set test "collect $msg: start trace experiment" + gdb_test_multiple "tstart" "$test" { + -re "^tstart\r\n$gdb_prompt $" { + pass "$test" + } + } + gdb_test "continue" \ "Continuing.*Breakpoint \[0-9\]+, end.*" \ "collect $msg: run trace experiment"