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

[burnus at gcc dot gnu.org]

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

--- Comment #8 from Tobias Burnus <burnus at gcc dot gnu.org> 2013-04-29 09:34:58 UTC ---
Author: jb
Date: Mon Apr 29 08:42:00 2013
New Revision: 198390

URL: http://gcc.gnu.org/viewcvs?rev=198390&root=gcc&view=rev
Log:
PR 56981 Improve unbuffered performance on special files.

2013-04-29  Janne Blomqvist  <jb@gcc.gnu.org>

        PR fortran/56981
        * io/transfer.c (next_record_w_unf): First fix head marker, then
        write tail.
        (next_record): Call flush_if_unbuffered.
        * io/unix.c (struct unix_stream): Add field unbuffered.
        (flush_if_unbuffered): New function.
        (fd_to_stream): New argument.
        (open_external): Fix fd_to_stream call.
        (input_stream): Likewise.
        (output_stream): Likewise.
        (error_stream): Likewise.
        * io/unix.h (flush_if_unbuffered): New prototype.

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