From: Owen Shepherd Date: Mon, 21 Jul 2014 13:49:21 +0000 (+0100) Subject: Merge X-Git-Url: https://pd.if.org/git/?p=pdclib.old;a=commitdiff_plain;h=a2d905faa640c50f1a736a510ef574d99d917df4;hp=8208319e85b55e47e65de1c16d78681915057120 Merge --- diff --git a/functions/stdio/fclose.c b/functions/stdio/fclose.c index 9452413..bc8d852 100644 --- a/functions/stdio/fclose.c +++ b/functions/stdio/fclose.c @@ -55,6 +55,11 @@ int fclose( FILE * stream ) { remove( stream->filename ); } + /* Free user buffer (SetVBuf allocated) */ + if ( ! ( stream->status & _PDCLIB_FREEBUFFER ) ) + { + free( stream->buffer ); + } /* Free stream */ if ( ! ( stream->status & _PDCLIB_STATIC ) ) {