kolibrios/programs/develop/ktcc/trunk/libc/stdio/fclose.c
turbocat e08c6968ef ktcc: rollback to r9529
git-svn-id: svn://kolibrios.org@9558 a494cfbc-eb01-0410-851d-a64ba20cac60
2022-01-02 12:16:17 +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;
}