[Bug fortran/31366] Last record truncated for read after short write, direct access file

[jvdelisle at gcc dot gnu dot org]

------- Comment #10 from jvdelisle at gcc dot gnu dot org  2007-04-01 16:24 -------
Subject: Bug 31366

Author: jvdelisle
Date: Sun Apr  1 16:23:48 2007
New Revision: 123401

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=123401
Log:
2007-04-01  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        PR libgfortran/31366
        * io/transfer.c (read_block_direct): Do not generate error when reading
        past EOF on a short record that is less than the RECL= specified.

2007-04-01  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        PR libgfortran/31207
        * io/unit.c (close_unit_1): If there are bytes previously written from
        ADVANCE="no", move to the end before closing.

Modified:
    trunk/libgfortran/ChangeLog
    trunk/libgfortran/io/transfer.c
    trunk/libgfortran/io/unit.c


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31366