projects
/
mmh
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
7d5f7f9c54ee9c0d97bfa55ae6aad956fa53b101
[mmh]
/
sbr
/
peekc.c
1
/*
2
** peekc.c -- peek at the next character in a stream
3
**
4
** This code is Copyright (c) 2002, by the authors of nmh. See the
5
** COPYRIGHT file in the root directory of the nmh distribution for
6
** complete copyright information.
7
*/
8
9
#include <h/mh.h>
10
11
12
int
13
peekc(FILE *fp)
14
{
15
register int c;
16
17
c = getc(fp);
18
ungetc(c, fp);
19
return c;
20
}