Added all of the MH sources, including RCS files, in
[mmh] / docs / historical / mh-6.8.5 / sbr / peekc.c
1 /* peekc.c - peek at the next character in a stream */
2
3 #include "../h/mh.h"
4 #include <stdio.h>
5
6
7 int     peekc(ib)
8 register FILE *ib;
9 {
10     register int    c;
11
12     c = getc (ib);
13     (void) ungetc (c, ib);
14
15     return c;
16 }