diff options
| author | Nathan Sidwell <nathan@codesourcery.com> | 2005-03-08 10:12:21 +0000 |
|---|---|---|
| committer | Nathan Sidwell <nathan@codesourcery.com> | 2005-03-08 10:12:21 +0000 |
| commit | 610c33621293cce01b9f2eeaecebc509ed82dbe8 (patch) | |
| tree | 76289ce8a7fd7c0af1c39bcb9530a6318cbdf4b6 /gdb/testsuite/gdb.trace | |
| parent | 4dae92b90aa8ba8b480dbf1743559f456b2ca229 (diff) | |
| download | gdb-610c33621293cce01b9f2eeaecebc509ed82dbe8.tar.gz | |
* gdb.base/sigbpt.exp: Disable if gdb,nosignals.
* gdb.base/signull.exp: Disable if gdb,nosignals.
* gdb.cp/bs15503.exp: Disable if skip_cplus_tests
* gdb.cp/exception.exp: Disable if skip_cplus_tests.
* gdb.mi/mi-console.exp: Disable hello test if gdb,noinferiorio.
* gdb.mi/mi2-console.exp: Likewise.
* gdb.trace/collection.exp (run_trace_experiment): Consume the
continue output at start.
(gdb_collect_locals_test): Robustify regexp.
* gdb.trace/passc-dyn.exp: Fix comment typo.
* gdb.trace/tfind.exp: Don't enable optimization. Remove stray ']'.
Diffstat (limited to 'gdb/testsuite/gdb.trace')
| -rw-r--r-- | gdb/testsuite/gdb.trace/collection.exp | 15 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.trace/passc-dyn.exp | 2 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.trace/tfind.exp | 8 |
3 files changed, 16 insertions, 9 deletions
diff --git a/gdb/testsuite/gdb.trace/collection.exp b/gdb/testsuite/gdb.trace/collection.exp index a6ac5d80248..61fddd8bd52 100644 --- a/gdb/testsuite/gdb.trace/collection.exp +++ b/gdb/testsuite/gdb.trace/collection.exp @@ -79,7 +79,18 @@ proc test_register { reg test_id } { } proc run_trace_experiment { msg test_func } { - gdb_run_cmd + global gdb_prompt + gdb_run_cmd + gdb_expect { + -re ".*Breakpoint \[0-9\]+, begin .*$gdb_prompt $" { + } + -re ".*$gdb_prompt $" { + fail "collect $msg: advance to go" + } + timeout { + fail "collect $msg: advance to go (timeout)" + } + } gdb_test "tstart" \ "\[\r\n\]+" \ "collect $msg: start trace experiment" @@ -280,7 +291,7 @@ proc gdb_collect_locals_test { func mylocs msg } { run_trace_experiment $msg $func gdb_test "print locc" \ - "\\$\[0-9\]+ = 11 '.013'$cr" \ + "\\$\[0-9\]+ = 11 '.\[a-z0-7\]+'$cr" \ "collect $msg: collected local char" gdb_test "print loci" \ "\\$\[0-9\]+ = 12$cr" \ diff --git a/gdb/testsuite/gdb.trace/passc-dyn.exp b/gdb/testsuite/gdb.trace/passc-dyn.exp index d0c27ea4386..fc096c85605 100644 --- a/gdb/testsuite/gdb.trace/passc-dyn.exp +++ b/gdb/testsuite/gdb.trace/passc-dyn.exp @@ -66,7 +66,7 @@ gdb_reinitialize_dir $srcdir/$subdir # We generously give ourselves one "pass" if we successfully # detect that this test cannot be run on this target! if { ![gdb_target_supports_trace] } then { - pass "Current target does not supporst trace" + pass "Current target does not support trace" return 1; } diff --git a/gdb/testsuite/gdb.trace/tfind.exp b/gdb/testsuite/gdb.trace/tfind.exp index 95073518218..e11bb7f994e 100644 --- a/gdb/testsuite/gdb.trace/tfind.exp +++ b/gdb/testsuite/gdb.trace/tfind.exp @@ -54,12 +54,8 @@ if [istarget "m68k-*-elf"] then { set srcfile ${testfile}.c set binfile $objdir/$subdir/$testfile - # Why does this test require '-O1' level optimization? (In - # general, the optimization level should be left under the control - # of the test framework (target_list and so on), so if we don't - # have to override it in individual tests like this, we shouldn't.) if { [gdb_compile "$srcdir/$subdir/$srcfile" "$binfile" \ - executable {debug additional_flags=-w optimize=-O1}] != "" } { + executable {debug additional_flags=-w}] != "" } { gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail." } gdb_load $binfile @@ -303,7 +299,7 @@ gdb_tfind_test "8.13: tracepoint <no arg>" "tracepoint" \ "\$tracepoint" "$tdp1"; gdb_test "printf \"x \%d x\\n\", \$trace_frame == \$save_frame" \ "x 0 x" \ - "8.13: tracepoint <no arg>, tracepoint number unchanged"] + "8.13: tracepoint <no arg>, tracepoint number unchanged" # 1.12 set tracepoint in prologue # |