diff options
author | Andrew Cagney <cagney@redhat.com> | 2004-02-10 21:00:15 +0000 |
---|---|---|
committer | Andrew Cagney <cagney@redhat.com> | 2004-02-10 21:00:15 +0000 |
commit | 5c5455dc1e55c5bd2a0bc4cbba45964417dc7800 (patch) | |
tree | 4375f6a56a73ce806454a3027c115935e5a6db11 /gdb/testsuite | |
parent | 8e08f1091d64a6ada384e136b9167e517ef3cbca (diff) | |
download | gdb-5c5455dc1e55c5bd2a0bc4cbba45964417dc7800.zip gdb-5c5455dc1e55c5bd2a0bc4cbba45964417dc7800.tar.gz gdb-5c5455dc1e55c5bd2a0bc4cbba45964417dc7800.tar.bz2 |
2004-02-10 Andrew Cagney <cagney@redhat.com>
* lib/gdb.exp (gdb_expect_list): Recover from internal-errors
using gdb_internal_error_resync.
Diffstat (limited to 'gdb/testsuite')
-rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gdb/testsuite/lib/gdb.exp | 10 |
2 files changed, 15 insertions, 0 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 93287a5..1ca6ce5 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2004-02-10 Andrew Cagney <cagney@redhat.com> + + * lib/gdb.exp (gdb_expect_list): Recover from internal-errors + using gdb_internal_error_resync. + 2004-02-09 Daniel Jacobowitz <drow@mvista.com> * gdb.threads/thread-specific.exp: Stop early if no threads are diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index 8933897..5cd54ab 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -1470,6 +1470,11 @@ proc gdb_expect_list {test sentinel list} { fail "${test} (pattern ${index} + sentinel)" set ok 0 } + -re ".*A problem internal to GDB has been detected" { + fail "${test} (GDB internal error)" + set ok 0 + gdb_internal_error_resync + } timeout { fail "${test} (pattern ${index} + sentinel) (timeout)" set ok 0 @@ -1488,6 +1493,11 @@ proc gdb_expect_list {test sentinel list} { fail "${test} (pattern ${index})" set ok 0 } + -re ".*A problem internal to GDB has been detected" { + fail "${test} (GDB internal error)" + set ok 0 + gdb_internal_error_resync + } timeout { fail "${test} (pattern ${index}) (timeout)" set ok 0 |