* gdb.base/checkpoint.exp: Rewrite 600 checkpoint test to
collect output incrementally.
This commit is contained in:
parent
b1b7d09b07
commit
47b67b6080
@ -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
|
||||
|
@ -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...
|
||||
|
Loading…
Reference in New Issue
Block a user