diff options
author | jb <jb@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-10-31 14:59:19 +0000 |
---|---|---|
committer | jb <jb@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-10-31 14:59:19 +0000 |
commit | 68f57f43da4451a9e2d4a281a8cf93292087df7d (patch) | |
tree | 41e75a36bf344be0552dbdadfdb4a498e01f5710 /libgfortran/ChangeLog | |
parent | 411780149a7445ab51177f7337ac89748a09d143 (diff) | |
download | gcc-68f57f43da4451a9e2d4a281a8cf93292087df7d.tar.gz |
Update file position for inquire lazily.
libgfortran ChangeLog:
2011-10-31 Janne Blomqvist <jb@gcc.gnu.org>
* io/inquire.c (inquire_via_unit): Check whether we're at the
beginning or end if the position is unspecified. If the position
is not one of the 3 standard ones, return unspecified.
* io/io.h (update_position): Remove prototype.
* io/transfer.c (next_record): Set the position to unspecified,
letting inquire figure it out more exactly when needed.
* io/unit.c (update_position): Remove function.
testsuite ChangeLog:
2011-10-31 Janne Blomqvist <jb@gcc.gnu.org>
* gfortran.dg/inquire_5.f90: Update testcase to match the standard
and current implementation.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180703 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/ChangeLog')
-rw-r--r-- | libgfortran/ChangeLog | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 68ff646e4b6..cbad61af460 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,5 +1,15 @@ 2011-10-31 Janne Blomqvist <jb@gcc.gnu.org> + * io/inquire.c (inquire_via_unit): Check whether we're at the + beginning or end if the position is unspecified. If the position + is not one of the 3 standard ones, return unspecified. + * io/io.h (update_position): Remove prototype. + * io/transfer.c (next_record): Set the position to unspecified, + letting inquire figure it out more exactly when needed. + * io/unit.c (update_position): Remove function. + +2011-10-31 Janne Blomqvist <jb@gcc.gnu.org> + * io/unix.h (struct stream): Add size function pointer. (ssize): New inline function. (file_length): Remove prototype. |