Subversion Repositories Kolibri OS

(root)/programs/develop/ktcc/trunk/libc/stdio/fclose.c – Rev 6433 → 7172


#include 
#include 
#include 
 
int fclose(FILE* file)
{
    if(!file)
    {
        errno = E_INVALIDPTR;
        return EOF;
    }
 
    if(file->buffer)
        free(file->buffer);
    if(file->filename)
        free(file->filename);
	free(file);
 
	return 0;
}

Rev 6433	Rev 7172
1	#include	1	#include
2	#include	2	#include
3	#include	3	#include
4		4
5	int fclose(FILE* file)	5	int fclose(FILE* file)
6	{	6	{
7	if(!file)	7	if(!file)
8	{	8	{
9	errno = E_INVALIDPTR;	9	errno = E_INVALIDPTR;
10	return EOF;	10	return EOF;
11	}	11	}
12		12
13	if(file->buffer)	13	if(file->buffer)
14	free(file->buffer);	14	free(file->buffer);
-		15	if(file->filename)
-		16	free(file->filename);
15	free(file);	17	free(file);
16		18
17	return 0;	19	return 0;
18	}	20	}