Catch error on close so runtest won't bomb.

This commit is contained in:
Rob Savoye 1993-03-17 02:04:20 +00:00
parent 400b81b5e6
commit 521cce5909

View file

@ -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"
}
}
#