diff options
| author | Paul Brook <paul@codesourcery.com> | 2004-10-07 21:30:50 +0000 |
|---|---|---|
| committer | Paul Brook <pbrook@gcc.gnu.org> | 2004-10-07 21:30:50 +0000 |
| commit | 5615e8cdcefe4c702cd8e79fccadf4bf1b9237f5 (patch) | |
| tree | b7ea43ee8fbb0688523cec944bf0d9d33a0978bf /libgfortran/io/unix.c | |
| parent | add2402ef09ed864788f5501ad8bfc54fd48913b (diff) | |
| download | gcc-5615e8cdcefe4c702cd8e79fccadf4bf1b9237f5.zip gcc-5615e8cdcefe4c702cd8e79fccadf4bf1b9237f5.tar.gz gcc-5615e8cdcefe4c702cd8e79fccadf4bf1b9237f5.tar.bz2 | |
transfer.c (finalize_transfer): Free internal streams.
* io/transfer.c (finalize_transfer): Free internal streams.
* io/unix.c (mem_close): Free stream object.
From-SVN: r88709
Diffstat (limited to 'libgfortran/io/unix.c')
| -rw-r--r-- | libgfortran/io/unix.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/libgfortran/io/unix.c b/libgfortran/io/unix.c index e55966b..c8b18fc 100644 --- a/libgfortran/io/unix.c +++ b/libgfortran/io/unix.c @@ -811,6 +811,7 @@ mem_truncate (unix_stream * s) static try mem_close (unix_stream * s) { + free_mem (s); return SUCCESS; } |