(_IO_new_file_close_it): Only call _IO_do_flush if stream was last used for

writing.

diff --git a/libio/fileops.c b/libio/fileops.c
index f429a6be90611fe7ffb64a8ea25c5ca7f8de00b7..8a12dae5aebefdf725b73d5d07e42d3cc308bba2 100644 (file)
--- a/libio/fileops.c
+++ b/libio/fileops.c
@@ -159,7 +159,11 @@ _IO_new_file_close_it (fp)
   if (!_IO_file_is_open (fp))
     return EOF;
 
-  write_status = _IO_do_flush (fp);
+  if ((fp->_flags & _IO_NO_WRITES) == 0
+      && (fp->_flags & _IO_CURRENTLY_PUTTING) != 0)
+    write_status = _IO_do_flush (fp);
+  else
+    write_status = 0;
 
   _IO_unsave_markers(fp);