From: Rob Savoye <rob@cygnus>
Date: Wed, 17 Mar 1993 02:04:20 +0000 (+0000)
Subject: Catch error on close so runtest won't bomb.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=521cce5909e6f86367d5ec41faa1e70d02d69984;p=binutils-gdb.git

Catch error on close so runtest won't bomb.
---

diff --git a/gdb/testsuite/config/unix-gdb.exp b/gdb/testsuite/config/unix-gdb.exp
index 62456639980..2e5a117d8d0 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"
+    }    
 }
 
 #