| 69 |
|
fskip(s) /* skip float in string */ |
| 70 |
|
register char *s; |
| 71 |
|
{ |
| 72 |
< |
register char *cp = s; |
| 72 |
> |
register char *cp; |
| 73 |
|
|
| 74 |
< |
while (isspace(*cp)) |
| 75 |
< |
cp++; |
| 76 |
< |
if (*cp == '-' || *cp == '+') |
| 77 |
< |
cp++; |
| 78 |
< |
s = cp; |
| 74 |
> |
while (isspace(*s)) |
| 75 |
> |
s++; |
| 76 |
> |
if (*s == '-' || *s == '+') |
| 77 |
> |
s++; |
| 78 |
> |
cp = s; |
| 79 |
|
while (isdigit(*cp)) |
| 80 |
|
cp++; |
| 81 |
|
if (*cp == '.') { |
| 107 |
|
register char *cp; |
| 108 |
|
|
| 109 |
|
cp = iskip(s); |
| 110 |
< |
return(cp != NULL && strchr(*cp, ds) != NULL); |
| 110 |
> |
return(cp != NULL && strchr(ds, *cp) != NULL); |
| 111 |
|
} |
| 112 |
|
|
| 113 |
|
|
| 127 |
|
register char *cp; |
| 128 |
|
|
| 129 |
|
cp = fskip(s); |
| 130 |
< |
return(cp != NULL && strchr(*cp, ds) != NULL); |
| 130 |
> |
return(cp != NULL && strchr(ds, *cp) != NULL); |
| 131 |
|
} |