[Bug fortran/56981] Slow I/O: Unformatted 5x slower, large sys component; formatted slow as well

[jb at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=56981

--- Comment #10 from Janne Blomqvist <jb at gcc dot gnu.org> ---
Author: jb
Date: Sun Jun  8 05:43:29 2014
New Revision: 211353

URL: http://gcc.gnu.org/viewcvs?rev=211353&root=gcc&view=rev
Log:
PR 56981 Flush buffer at record boundary if possible.

2014-06-08  Janne Blomqvist  <jb@gcc.gnu.org>

    PR libfortran/56981
    * io/unix.h (struct stream_vtable): Add new member function,
    markeor.
    (smarkeor): New inline function.
    (flush_if_unbuffered): Remove prototype.
    * io/unix.c (raw_markeor): New function.
    (raw_vtable): Initialize markeor member.
    (buf_markeor): New function.
    (buf_vtable): Initialize markeor member.
    (mem_vtable): Likewise.
    (mem4_vtable): Likewise.
    (flush_if_unbuffered): Remove function.
    * io/transfer.c (next_record): Call smarkeor instead of
    flush_if_unbuffered.

Modified:
    trunk/libgfortran/ChangeLog
    trunk/libgfortran/io/transfer.c
    trunk/libgfortran/io/unix.c
    trunk/libgfortran/io/unix.h