diff options
author | Janne Blomqvist <jb@gcc.gnu.org> | 2010-11-03 22:49:31 +0200 |
---|---|---|
committer | Janne Blomqvist <jb@gcc.gnu.org> | 2010-11-03 22:49:31 +0200 |
commit | 576e00858c8b8d6d9477fd44e8b210ab25b6de69 (patch) | |
tree | ea49d5e945975d3ea074d31cc2addc838f18e0c2 /libgfortran/io/unix.c | |
parent | 92d54f6df5e9455ff4c9425171ff3a0a67e07bd2 (diff) | |
download | gcc-576e00858c8b8d6d9477fd44e8b210ab25b6de69.zip gcc-576e00858c8b8d6d9477fd44e8b210ab25b6de69.tar.gz gcc-576e00858c8b8d6d9477fd44e8b210ab25b6de69.tar.bz2 |
Remove unused empty_internal_buffer function
From-SVN: r166276
Diffstat (limited to 'libgfortran/io/unix.c')
-rw-r--r-- | libgfortran/io/unix.c | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/libgfortran/io/unix.c b/libgfortran/io/unix.c index a2903af..67d8eb9 100644 --- a/libgfortran/io/unix.c +++ b/libgfortran/io/unix.c @@ -849,15 +849,6 @@ mem_close (unix_stream * s) define functional equivalents of the following. *********************************************************************/ -/* empty_internal_buffer()-- Zero the buffer of Internal file */ - -void -empty_internal_buffer(stream *strm) -{ - unix_stream * s = (unix_stream *) strm; - memset(s->buffer, ' ', s->file_length); -} - /* open_internal()-- Returns a stream structure from a character(kind=1) internal file */ |