Remove RCS keywords, since they no longer work after git migration.
[mmh] / sbr / peekc.c
1
2 /*
3  * peekc.c -- peek at the next character in a stream
4  *
5  * This code is Copyright (c) 2002, by the authors of nmh.  See the
6  * COPYRIGHT file in the root directory of the nmh distribution for
7  * complete copyright information.
8  */
9
10 #include <h/mh.h>
11
12
13 int
14 peekc(FILE *fp)
15 {
16     register int c;
17
18     c = getc(fp);
19     ungetc(c, fp);
20     return c;
21 }