kolibrios-gitea/programs/develop/ktcc/trunk/libc/stdio/fclose.c
siemargl b7fe2ec210 fix libck
git-svn-id: svn://kolibrios.org@7172 a494cfbc-eb01-0410-851d-a64ba20cac60
2018-03-05 17:53:31 +00:00

21 lines
311 B
C

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
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;
}