(finclude): Clean error msf if file_size_and_mode fails.

From-SVN: r1558

diff --git a/gcc/cccp.c b/gcc/cccp.c
index 76feed7f7d18298b42d5ba4a96be5037b897fd12..c84e62094cf9ed7b086d22830dcef2bbeaba634f 100644 (file)
--- a/gcc/cccp.c
+++ b/gcc/cccp.c
@@ -3972,7 +3972,11 @@ finclude (f, fname, op, system_header_p, dirptr)
   CHECK_DEPTH (return;);
 
   if (file_size_and_mode (f, &st_mode, &st_size) < 0)
-    goto nope;         /* Impossible? */
+    {
+      perror_with_name (fname);
+      close (f);
+      return;
+    }
 
   fp = &instack[indepth + 1];
   bzero (fp, sizeof (FILE_BUF));