From a93a92aa53ba78a9d00468b2ec4571a098109a92 Mon Sep 17 00:00:00 2001
From: Joey Ye <joey.ye@arm.com>
Date: Tue, 11 Sep 2018 08:55:25 +0000
Subject: [PATCH] gcov.exp (verify-intermediate): Add missing close.

2018-09-11  Joey Ye  <joey.ye@arm.com>

    * lib/gcov.exp (verify-intermediate): Add missing close.

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

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 2af919b99fe..a758e1c1aa3 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2018-09-11  Joey Ye  <joey.ye@arm.com>
+
+	* lib/gcov.exp (verify-intermediate): Add missing close.
+
 2018-09-11  Janus Weil  <janus@gcc.gnu.org>
 
 	PR fortran/86830
diff --git a/gcc/testsuite/lib/gcov.exp b/gcc/testsuite/lib/gcov.exp
index 03eb14a3f4f..f35ca59fbe3 100644
--- a/gcc/testsuite/lib/gcov.exp
+++ b/gcc/testsuite/lib/gcov.exp
@@ -133,6 +133,7 @@ proc verify-intermediate { testname testcase file } {
 	fail "$testname expected 'branch:' tag not found"
 	incr failed
     }
+    close $fd
     return $failed
 }
 
-- 
2.30.2