Checkpoint.
This commit is contained in:
parent
5f1cf8e6fb
commit
b237df90f9
19 changed files with 324 additions and 283 deletions
|
|
@ -104,6 +104,7 @@ void dodef(tbl *stp) /* collect args and switch input to defn */
|
|||
pushsrc(Macro, stp->cval);
|
||||
}
|
||||
|
||||
int
|
||||
getarg(char *p) /* pick up single argument, store in p, return length */
|
||||
{
|
||||
int n, c, npar;
|
||||
|
|
@ -139,6 +140,7 @@ char *pb = pbuf-1; /* next pushed back character */
|
|||
char ebuf[200]; /* collect input here for error reporting */
|
||||
char *ep = ebuf;
|
||||
|
||||
int
|
||||
input(void)
|
||||
{
|
||||
register int c = 0;
|
||||
|
|
@ -208,7 +210,7 @@ input(void)
|
|||
return c;
|
||||
}
|
||||
|
||||
|
||||
int
|
||||
unput(int c)
|
||||
{
|
||||
if (++pb >= pbuf + sizeof pbuf)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue