USG_PG3/usr/source/portc2/unget.c

Compare this file to the similar file:
Show the results in this format: 

# include "../portc1/ciodec.c"
ungetc (c, fn)
{
struct fileps *fp;
/* push back onto input */
fp = &IEH3fpts[fn];
if (fp->wrflag == 0)
	IEH3mbuf(fn,0);
if (fp->bptr <= fp->buff - 100)
	IEH3err("ungetc/unprintf: buffer full file %d",fn);
*--fp->bptr = c;
fp->nchars++;
return(c);
}