fclose.c

来自「mips架构的bootloader,99左右的版本 但源代码现在没人更新了」· C语言 代码 · 共 23 行

/*************************************************************
 * File: lib/fclose.c
 * Purpose: Part of C runtime library
 * Author: Phil Bunce ([e-mail])
 * Revision History:
 *	970304	Start of revision history
 */

#include <stdio.h>

/*************************************************************
*  int fclose(fp) close stream
*/
int fclose(fp)
FILE *fp;
{
close(fp->fd);
free(fp->buf);
fp->valid = 0;
return(0);
}