| 303 |
|
register int x; |
| 304 |
|
if (!isfloat(zspec) || (zvalue = atof(zspec)) <= 0.0) |
| 305 |
|
syserror(zspec); |
| 306 |
– |
exit(1); |
| 306 |
|
for (x = scanlen(&tresolu); x-- > 0; ) |
| 307 |
|
zin[x] = zvalue; |
| 308 |
|
} |
| 695 |
|
cp = combuf; |
| 696 |
|
wp = argv; |
| 697 |
|
for ( ; ; ) { |
| 698 |
< |
while (isspace(*cp)) cp++; |
| 699 |
< |
if (!*cp) break; |
| 700 |
< |
*wp++ = cp; |
| 701 |
< |
while (!isspace(*cp)) |
| 702 |
< |
if (!*cp++) goto done; |
| 703 |
< |
*cp++ = '\0'; |
| 698 |
> |
while (isspace(*cp)) /* nullify spaces */ |
| 699 |
> |
*cp++ = '\0'; |
| 700 |
> |
if (!*cp) /* all done? */ |
| 701 |
> |
break; |
| 702 |
> |
*wp++ = cp; /* add argument to list */ |
| 703 |
> |
while (*++cp && !isspace(*cp)) |
| 704 |
> |
; |
| 705 |
|
} |
| 706 |
– |
done: |
| 706 |
|
*wp = NULL; |
| 707 |
|
/* start process */ |
| 708 |
|
if ((rval = open_process(PDesc, argv)) < 0) |
