10 |
|
#include "rtio.h" |
11 |
|
|
12 |
|
#include <stdlib.h> |
13 |
– |
#include <math.h> |
13 |
|
#include <ctype.h> |
14 |
|
|
15 |
|
int |
16 |
< |
fgetval(fp, ty, vp) /* get specified data word */ |
17 |
< |
register FILE *fp; |
18 |
< |
int ty; |
19 |
< |
void *vp; /* type depends on ty */ |
16 |
> |
fgetval( /* get specified data word */ |
17 |
> |
FILE *fp, |
18 |
> |
int ty, |
19 |
> |
void *vp /* type depends on ty */ |
20 |
> |
) |
21 |
|
{ |
22 |
|
char wrd[64]; |
23 |
< |
register char *cp; |
24 |
< |
register int c; |
23 |
> |
char *cp; |
24 |
> |
int c; |
25 |
|
/* elide comments (# to EOL) */ |
26 |
|
do { |
27 |
|
while ((c = getc(fp)) != EOF && isspace(c)) |