diff options
author | jb <jb@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-16 17:42:44 +0000 |
---|---|---|
committer | jb <jb@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-16 17:42:44 +0000 |
commit | 8eeccdd32f5b60caa1706c406d4681128a6c1c4c (patch) | |
tree | b8d80d6121e1e056d1aaacd9882dd2ff45f168cb /libgfortran/io/io.h | |
parent | c4755a91ea781e9d1eabc5c743d21f556eb58342 (diff) | |
download | gcc-8eeccdd32f5b60caa1706c406d4681128a6c1c4c.tar.gz |
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
Diffstat (limited to 'libgfortran/io/io.h')
-rw-r--r-- | libgfortran/io/io.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/io/io.h b/libgfortran/io/io.h index e554d8cccbc..7f9f38f80c0 100644 --- a/libgfortran/io/io.h +++ b/libgfortran/io/io.h @@ -537,7 +537,7 @@ typedef struct fbuf size_t len; /* Length of buffer. */ size_t act; /* Active bytes in buffer. */ size_t flushed; /* Flushed bytes from beginning of buffer. */ - char *ptr; /* Current position in buffer. */ + size_t pos; /* Current position in buffer. */ } fbuf; |