diff options
| author | Rob Savoye <rob@cygnus> | 1993-03-17 02:04:20 +0000 |
|---|---|---|
| committer | Rob Savoye <rob@cygnus> | 1993-03-17 02:04:20 +0000 |
| commit | 521cce5909e6f86367d5ec41faa1e70d02d69984 (patch) | |
| tree | 54d2a52c2be16436781ab8781988e7ce2cb966ff /gdb | |
| parent | 400b81b5e6b1e3b857a94ae5d7e67940ae3ee565 (diff) | |
| download | gdb-521cce5909e6f86367d5ec41faa1e70d02d69984.zip gdb-521cce5909e6f86367d5ec41faa1e70d02d69984.tar.gz gdb-521cce5909e6f86367d5ec41faa1e70d02d69984.tar.bz2 | |
Catch error on close so runtest won't bomb.
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/testsuite/config/unix-gdb.exp | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/gdb/testsuite/config/unix-gdb.exp b/gdb/testsuite/config/unix-gdb.exp index 6245663..2e5a117 100644 --- a/gdb/testsuite/config/unix-gdb.exp +++ b/gdb/testsuite/config/unix-gdb.exp @@ -139,6 +139,7 @@ proc gdb_exit {} { } catch "send \"quit\n\"" result if [string match "write\(spawn_id=\[0-9\]+\): Bad file number" $result] then { + catch "close" return 0 } expect { @@ -161,6 +162,11 @@ proc gdb_exit {} { close } } + catch "close" + + if $verbose>1 then { + send_user "Quitting $GDB $GDBFLAGS\n" + } } # |