aboutsummaryrefslogtreecommitdiff
path: root/libgfortran/io
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/io')
-rw-r--r--libgfortran/io/endfile.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/libgfortran/io/endfile.c b/libgfortran/io/endfile.c
index ca40fe4..d8462a3 100644
--- a/libgfortran/io/endfile.c
+++ b/libgfortran/io/endfile.c
@@ -38,6 +38,7 @@ st_endfile (void)
if (u->current_record)
next_record (1);
+ flush(u->s);
struncate (u->s);
u->endfile = AFTER_ENDFILE;
}