diff options
Diffstat (limited to 'libgfortran/io/unit.c')
| -rw-r--r-- | libgfortran/io/unit.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/libgfortran/io/unit.c b/libgfortran/io/unit.c index 6a22784..90e6d85 100644 --- a/libgfortran/io/unit.c +++ b/libgfortran/io/unit.c @@ -430,6 +430,7 @@ get_internal_unit (st_parameter_dt *dtp) dtp->u.p.skips = 0; dtp->u.p.pending_spaces = 0; dtp->u.p.max_pos = 0; + dtp->u.p.at_eof = 0; /* This flag tells us the unit is assigned to internal I/O. */ |