ack/modules/src/system/close.c
1987-01-06 11:41:50 +00:00

12 lines
127 B
C

/* $Header$ */
#include <system.h>
sys_close(fp)
register File *fp;
{
fp->o_flags = 0;
close(fp->o_fd);
fp->o_fd = -1;
}