re PR libfortran/78549 (Very slow formatted internal file output)
commit606778c6f55c4df1f247097f4b73d2c551ff4889
authorJerry DeLisle <jvdelisle@gcc.gnu.org>
Thu, 14 Dec 2017 02:30:49 +0000 (14 02:30 +0000)
committerJerry DeLisle <jvdelisle@gcc.gnu.org>
Thu, 14 Dec 2017 02:30:49 +0000 (14 02:30 +0000)
tree5f68781b01180ebf39912f3254d5c1028b162c6c
parente69319afa646a9aba9eac5a8c16f9e7883f210e6
re PR libfortran/78549 (Very slow formatted internal file output)

2017-12-12  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        PR libgfortran/78549
        * io/inquire.c (inquire_via_unit): Adjust test for existence for
        pre-connected internal units.
        * io/transfer.c (finalize_transfer): When done with a transfer
        to internal units, free the format buffer and close the stream.
        (st_read_done): Delete freeing the stream, now handled using
        sclose in finalize_transfer. (st_write_done): Likewise.
        * io/unit.c (get_unit): Return NULL for special reserved unit
        numbers, signifying not accessible to the user.
        (init_units): Insert the two special internal units into the
        unit treap. This makes these unit structures available without
        further allocations for later use by internal unit I/O. These
        units are automatically deleted by normal program termination.
        * io/unix.c (mem_close): Add a guard check to protect from double free.

From-SVN: r255621
libgfortran/ChangeLog
libgfortran/io/inquire.c
libgfortran/io/transfer.c
libgfortran/io/unit.c
libgfortran/io/unix.c