From 2cc3d93ee401d8ea05416a99b237a564832e4005 Mon Sep 17 00:00:00 2001
From: "H.J. Lu" <hongjiu.lu@intel.com>
Date: Thu, 12 Jan 2006 01:29:07 +0000
Subject: [PATCH] re PR testsuite/25728 (File descriptor leak in lib/gcov.exp)

2006-01-11  H.J. Lu  <hongjiu.lu@intel.com>

	PR testsuite/25728
	* lib/gcov.exp (verify-lines): Add "close $fd".

From-SVN: r109627
---
 gcc/testsuite/ChangeLog    | 5 +++++
 gcc/testsuite/lib/gcov.exp | 1 +
 2 files changed, 6 insertions(+)

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index e28bd6c56de..3032b348cc7 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2006-01-11  H.J. Lu  <hongjiu.lu@intel.com>
+
+	PR testsuite/25728
+	* lib/gcov.exp (verify-lines): Add "close $fd".
+
 2006-01-12  Yao Qi  <qiyaoltc@cn.ibm.com>
 	    Ben Elliston  <bje@au.ibm.com>
 
diff --git a/gcc/testsuite/lib/gcov.exp b/gcc/testsuite/lib/gcov.exp
index 1da53ad52bc..9e8b9d9d02c 100644
--- a/gcc/testsuite/lib/gcov.exp
+++ b/gcc/testsuite/lib/gcov.exp
@@ -53,6 +53,7 @@ proc verify-lines { testcase file } {
 	    }
 	}
     }
+    close $fd
     return $failed
 }
 
-- 
2.30.2