diff options
| -rw-r--r-- | libgfortran/ChangeLog | 5 | ||||
| -rw-r--r-- | libgfortran/io/unix.c | 1 |
2 files changed, 6 insertions, 0 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 3ecabcd..227f61b 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,5 +1,10 @@ 2006-05-29 Jerry DeLisle <jvdelisle@gcc.gnu.org> + PR libgfortran/27757 + * io/unix.c (fd_seek): Set active to zero. + +2006-05-29 Jerry DeLisle <jvdelisle@gcc.gnu.org> + PR libgfortran/27634 * io/format.c (parse_format_list): Allow missing period in format only if -std=legacy. diff --git a/libgfortran/io/unix.c b/libgfortran/io/unix.c index 93f4ea6..560047f 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; } |