kolibrios-fun/programs/develop/metcc/trunk/libc/file/ungetc.c

12 lines
226 B
C
Raw Normal View History

#include "stdio.h"
int ungetc(int c,FILE* file)
{
if (c==EOF)
return EOF;
if (file->filepos<=0 || file->filepos>file->filesize)
return EOF;
file->filepos--;
file->buffer[file->filepos]=(char)c;
return c;
}