diff options
| -rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.threads/manythreads.exp | 20 |
2 files changed, 24 insertions, 1 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index c953e57f33..cf5d3b4f1c 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2007-06-12 Daniel Jacobowitz <dan@codesourcery.com> + + * gdb.threads/manythreads.exp: Prevent expect buffer overflow + in info threads output. + 2007-06-12 Ulrich Weigand <Ulrich.Weigand@de.ibm.com> Markus Deuling <deuling@de.ibm.com> diff --git a/gdb/testsuite/gdb.threads/manythreads.exp b/gdb/testsuite/gdb.threads/manythreads.exp index 903a3b1443..0ceacf538d 100644 --- a/gdb/testsuite/gdb.threads/manythreads.exp +++ b/gdb/testsuite/gdb.threads/manythreads.exp @@ -81,7 +81,25 @@ gdb_test_multiple "" "stop threads 1" { } } -gdb_test "info threads" ".*1 Thread .*" +set cmd "info threads" +set ok 0 +gdb_test_multiple $cmd $cmd { + -re " 1 Thread " { + set ok 1 + exp_continue + } + -re ".*\r\n" { + # Eat this line and continue, to prevent the buffer overflowing. + exp_continue + } + -re "$gdb_prompt $" { + if { $ok } { + pass $cmd + } else { + fail $cmd + } + } +} set message "second continue" gdb_test_multiple "continue" "second continue" { |
