OSDN Git Service

2007-03-25 Jerry DeLisle <jvdelisle@gcc.gnu.org>
authorjvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 26 Mar 2007 03:23:15 +0000 (03:23 +0000)
committerjvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 26 Mar 2007 03:23:15 +0000 (03:23 +0000)
commit26e1cef6be20ec9eb7d3f1ed9d219192d5b83349
tree7005f5c75c7f6dbaca78f2f73008ed5b96700d1d
parent02d78b1887dd47a36866b39f25bad3666bf435f5
2007-03-25  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

PR libgfortran/31199
*io/io.h: Add saved_pos to gfc_unit structure.
*io/open.c (new_unit): Initialize saved_pos.
*io/transfer.c (data_transfer_init): Set max_pos to value in saved_pos.
(next_record_w): Fix whitespace.
(finalze_transfer): Calculate max_pos for ADVANCE="no" and save it for
later use.  If not ADVANCE="no" set saved_pos to zero.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@123205 138bc75d-0d04-0410-961f-82ee72b054a4
libgfortran/ChangeLog
libgfortran/io/io.h
libgfortran/io/open.c
libgfortran/io/transfer.c