* gdb.trace/collection.exp (run_trace_experiment): Make sure
authorPedro Alves <palves@redhat.com>
Mon, 29 Mar 2010 00:46:54 +0000 (00:46 +0000)
committerPedro Alves <palves@redhat.com>
Mon, 29 Mar 2010 00:46:54 +0000 (00:46 +0000)
"tstart" is silent.

gdb/testsuite/ChangeLog
gdb/testsuite/gdb.trace/collection.exp

index ee3f08236a569dac2b3a6eff314f1b7b7b550270..c0bd842453013317cc357cffcd0cf433886e38dd 100644 (file)
@@ -1,3 +1,8 @@
+2010-03-29  Pedro Alves  <pedro@codesourcery.com>
+
+       * gdb.trace/collection.exp (run_trace_experiment): Make sure
+       "tstart" is silent.
+
 2010-03-29  Pedro Alves  <pedro@codesourcery.com>
 
        * gdb.trace/collection.exp (executable): New.
index b05aa35981cb14cf3b2a197de4ec7ca8092c6fd6..5d510abc75bde5909473280ee04d9ff513a2ee10 100644 (file)
@@ -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"