aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKai Tietz <kai.tietz@onevision.com>2010-07-11 20:43:25 +0000
committerJerry DeLisle <jvdelisle@gcc.gnu.org>2010-07-11 20:43:25 +0000
commit5bf935c3c802f43abc4774da415099faf600eeb2 (patch)
tree32270d72dec4236895613db1add2262290ef5091
parentf67df2ca8bbfccde03daf34c6c4a1078d0b67952 (diff)
downloadgcc-5bf935c3c802f43abc4774da415099faf600eeb2.zip
gcc-5bf935c3c802f43abc4774da415099faf600eeb2.tar.gz
gcc-5bf935c3c802f43abc4774da415099faf600eeb2.tar.bz2
re PR fortran/44698 (I/O: FLUSH does not actually flush the buffer?)
2010-07-11 Kai Tietz <kai.tietz@onevision.com> PR libfortran/44698 * io/unix.c (flush_buf): Add _commit for WIN32. From-SVN: r162060
-rw-r--r--libgfortran/ChangeLog5
-rw-r--r--libgfortran/io/unix.c4
2 files changed, 9 insertions, 0 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 9a523d5..943e8e1 100644
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,8 @@
+2010-07-11 Kai Tietz <kai.tietz@onevision.com>
+
+ PR libfortran/44698
+ * io/unix.c (flush_buf): Add _commit for WIN32.
+
2010-06-28 Tobias Burnus <burnus@net-b.de>
PR fortran/43298
diff --git a/libgfortran/io/unix.c b/libgfortran/io/unix.c
index f0cd3b9..afa5f45 100644
--- a/libgfortran/io/unix.c
+++ b/libgfortran/io/unix.c
@@ -405,6 +405,10 @@ buf_flush (unix_stream * s)
if (s->ndirty != 0)
return -1;
+#ifdef _WIN32
+ _commit (s->fd);
+#endif
+
return 0;
}