[Bug fortran/44698] I/O: FLUSH does not actually flush the buffer?

[burnus at gcc dot gnu dot org]

------- Comment #1 from burnus at gcc dot gnu dot org  2010-06-28 17:16 -------
For Windows (MinGW64), Kai reports that adding the following to buf_flush
helps:

@@ -404,6 +407,9 @@
   s->ndirty -= writelen;
   if (s->ndirty != 0)
     return -1;
+#ifdef _WIN32
+  _commit (s->fd);
+#endif
   return 0;


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44698