10 |
|
|
11 |
|
|
12 |
|
|
13 |
< |
static PRIMITIVE peof = {PEOF, 0200, -1, -1, -1, -1, NULL}; |
13 |
> |
static PRIMITIVE peof = {PEOF, 0200, {-1, -1, -1, -1}, NULL, NULL}; |
14 |
|
|
15 |
|
|
16 |
< |
readp(p, fp) /* get human-readable primitive */ |
17 |
< |
|
18 |
< |
PRIMITIVE *p; |
19 |
< |
FILE *fp; |
20 |
< |
|
16 |
> |
int |
17 |
> |
readp( /* get human-readable primitive */ |
18 |
> |
PRIMITIVE *p, |
19 |
> |
FILE *fp |
20 |
> |
) |
21 |
|
{ |
22 |
|
char inbuf[MAXARGS]; |
23 |
|
register int c, nargs; |
76 |
|
|
77 |
|
|
78 |
|
|
79 |
+ |
void |
80 |
+ |
writep( /* print primitive in human-readable form */ |
81 |
+ |
register PRIMITIVE *p, |
82 |
+ |
FILE *fp |
83 |
+ |
) |
84 |
|
|
80 |
– |
writep(p, fp) /* print primitive in human-readable form */ |
81 |
– |
|
82 |
– |
register PRIMITIVE *p; |
83 |
– |
FILE *fp; |
84 |
– |
|
85 |
|
{ |
86 |
|
|
87 |
|
if (fp == NULL) fp = stdout; |
111 |
|
|
112 |
|
|
113 |
|
|
114 |
+ |
void |
115 |
+ |
writeof( /* write end of file command to fp */ |
116 |
+ |
FILE *fp |
117 |
+ |
) |
118 |
|
|
115 |
– |
writeof(fp) /* write end of file command to fp */ |
116 |
– |
|
117 |
– |
FILE *fp; |
118 |
– |
|
119 |
|
{ |
120 |
|
|
121 |
|
writep(&peof, fp); |
122 |
|
|
123 |
< |
} |
123 |
> |
} |
124 |
> |
|