OSDN Git Service

When finalizing I/O transfer, set current_record to 0 before returning.
authorjb <jb@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 17 Jul 2009 19:40:23 +0000 (19:40 +0000)
committerjb <jb@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 17 Jul 2009 19:40:23 +0000 (19:40 +0000)
commitb0a0b7f90237e1ff97d0831c453ad1fd7c5070d6
tree3b7e875280b0d4f1359830ee122c4bd052dcc4a0
parent7ddff01e4296f5e0ea1a23a64738f5203dd7f5b0
When finalizing I/O transfer, set current_record to 0 before returning.

PR libfortran/40714

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