Part 1.1 of PR25561.
commit8eeccdd32f5b60caa1706c406d4681128a6c1c4c
authorjb <jb@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 16 May 2008 17:42:44 +0000 (16 17:42 +0000)
committerjb <jb@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 16 May 2008 17:42:44 +0000 (16 17:42 +0000)
treeb8d80d6121e1e056d1aaacd9882dd2ff45f168cb
parentc4755a91ea781e9d1eabc5c743d21f556eb58342
Part 1.1 of PR25561.

2008-05-15  Janne Blomqvist  <jb@gcc.gnu.org>

PR libfortran/25561
* io/io.h (struct fbuf): Change pointer to position offset.
* io/fbuf.c (fbuf_init): Reduce default size of buffer, ptr=>pos
changes.
(fbuf_reset): ptr=>pos changes.
(fbuf_alloc): If the request doesn't fit, don't waste memory by
keeping flushed bytes. ptr=>pos changes.
(fbuf_flush): ptr=>pos changes.
(fbuf_seek): Don't seek past the left tab limit, don't update active
byte count.
* io/open.c (new_unit): If RECL has been specified, used that as
initial buffer size.

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