Commit | Line | Data |
---|---|---|
52960f2f ML |
1 | # include "refer..c" |
2 | static char ahead[1000]; | |
3 | static int peeked 0; | |
4 | static int noteof 1; | |
5 | input (s) | |
6 | char *s; | |
7 | { | |
8 | if (peeked) | |
9 | { | |
10 | peeked=0; | |
11 | if (noteof==0) return(0); | |
12 | strcpy (s, ahead); | |
13 | return(s); | |
14 | } | |
15 | return(fgets(s, 1000, in)); | |
16 | } | |
17 | lookat() | |
18 | { | |
19 | if (peeked) return(ahead); | |
20 | noteof=input(ahead); | |
21 | peeked=1; | |
22 | return(noteof); | |
23 | } | |
24 | addch(s, c) | |
25 | char *s; | |
26 | { | |
27 | while (*s) s++; | |
28 | *s++ = c; | |
29 | *s = 0; | |
30 | } |