diff options
| author | Daniel Jacobowitz <drow@false.org> | 2007-03-09 15:20:16 +0000 |
|---|---|---|
| committer | Daniel Jacobowitz <drow@false.org> | 2007-03-09 15:20:16 +0000 |
| commit | 47b67b6080c44cfa45aab70b9966da28908c1021 (patch) | |
| tree | 38419c2e502f6269a2fcaf579afb2576fbdd15ca /gdb/testsuite | |
| parent | b1b7d09b07fca21544d7c10e61dce82417f99554 (diff) | |
| download | gdb-47b67b6080c44cfa45aab70b9966da28908c1021.zip gdb-47b67b6080c44cfa45aab70b9966da28908c1021.tar.gz gdb-47b67b6080c44cfa45aab70b9966da28908c1021.tar.bz2 | |
* gdb.base/checkpoint.exp: Rewrite 600 checkpoint test to
collect output incrementally.
Diffstat (limited to 'gdb/testsuite')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/checkpoint.exp | 17 |
2 files changed, 20 insertions, 2 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 81101fd..e827efd 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2007-03-09 Daniel Jacobowitz <dan@codesourcery.com> + + * gdb.base/checkpoint.exp: Rewrite 600 checkpoint test to + collect output incrementally. + 2007-03-08 Ulrich Weigand <Ulrich.Weigand@de.ibm.com> * gdb.mi/mi-var-cmd.exp: Allow value without "..." string diff --git a/gdb/testsuite/gdb.base/checkpoint.exp b/gdb/testsuite/gdb.base/checkpoint.exp index 1ca497a..297e254 100644 --- a/gdb/testsuite/gdb.base/checkpoint.exp +++ b/gdb/testsuite/gdb.base/checkpoint.exp @@ -359,8 +359,21 @@ gdb_expect { gdb_breakpoint $break2_loc gdb_test "continue" "breakpoint 2.*" "break2 with many checkpoints" -gdb_test "info checkpoints" " 600 .* 0 .*" \ - "info checkpoints with at least 600 checkpoints" +set count 0 +set msg "info checkpoints with at least 600 checkpoints" +gdb_test_multiple "info checkpoints" $msg { + -re " $decimal process \[^\r\]*\r\n" { + incr count + exp_continue + } + -re "$gdb_prompt $" { + if { $count >= 600 } { + pass $msg + } else { + fail $msg + } + } +} # # OK, kill 'em all... |