From 929f2cf4105ccf12d0684c6d5838f58f0ee5e7c7 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Vincent=20Lef=C3=A8vre?= <vincent-gcc@vinc17.net>
Date: Wed, 4 Aug 2021 17:25:52 +0200
Subject: [PATCH] gcov: check return code of a fclose

gcc/ChangeLog:

	PR gcov-profile/101773
	* gcov-io.c (gcov_close): Check return code of a fclose.
---
 gcc/gcov-io.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/gcc/gcov-io.c b/gcc/gcov-io.c
index 4b1e11d45305..7819593234a9 100644
--- a/gcc/gcov-io.c
+++ b/gcc/gcov-io.c
@@ -199,7 +199,9 @@ gcov_close (void)
 {
   if (gcov_var.file)
     {
-      fclose (gcov_var.file);
+      if (fclose (gcov_var.file))
+	gcov_var.error = 1;
+
       gcov_var.file = 0;
     }
   gcov_var.mode = 0;
-- 
2.47.2