diff options
Diffstat (limited to 'libgfortran/io/unix.c')
| -rw-r--r-- | libgfortran/io/unix.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/libgfortran/io/unix.c b/libgfortran/io/unix.c index 93f4ea692d3..560047f88f8 100644 --- a/libgfortran/io/unix.c +++ b/libgfortran/io/unix.c @@ -569,6 +569,7 @@ fd_seek (unix_stream * s, gfc_offset offset) } s->physical_offset = s->logical_offset = offset; + s->active = 0; return (lseek (s->fd, offset, SEEK_SET) < 0) ? FAILURE : SUCCESS; } |