| 119 |
|
badarg(argc - i - 1,argv + i + 1, al)) \ |
| 120 |
|
goto badopt |
| 121 |
|
|
| 122 |
< |
#define bool(olen, var) switch (argv [i][olen]) { \ |
| 122 |
> |
#define check_bool(olen, var) switch (argv [i][olen]) { \ |
| 123 |
|
case '\0': var = !var; break; \ |
| 124 |
|
case 'y': case 'Y': case 't': case 'T': \ |
| 125 |
|
case '+': case '1': var = 1; break; \ |
| 297 |
|
|
| 298 |
|
if (argv[i][3] == 'O') { |
| 299 |
|
/* Get port modifiers file */ |
| 300 |
< |
rval = wordfile(portLp, getpath(argv [++i], |
| 301 |
< |
getrlibpath(), R_OK)); |
| 300 |
> |
rval = wordfile(portLp, AMBLLEN-(portLp-amblist), |
| 301 |
> |
getpath(argv [++i], getrlibpath(), R_OK)); |
| 302 |
|
if (rval < 0) { |
| 303 |
|
sprintf(errmsg, "cannot open photon port file %s", |
| 304 |
|
argv [i]); |
| 328 |
|
|
| 329 |
|
if (argv[i][3] == 'S') { |
| 330 |
|
/* Get sensor modifiers from file */ |
| 331 |
< |
rval = wordfile(sensLp, getpath(argv [++i], |
| 332 |
< |
getrlibpath(), R_OK)); |
| 331 |
> |
rval = wordfile(sensLp, MAXSET-(sensLp-photonSensorList), |
| 332 |
> |
getpath(argv [++i], getrlibpath(), R_OK)); |
| 333 |
|
if (rval < 0) { |
| 334 |
|
sprintf(errmsg, "cannot open antimatter sensor file %s", |
| 335 |
|
argv [i]); |
| 352 |
|
case 'b': |
| 353 |
|
if (argv [i][2] == 'v') { |
| 354 |
|
/* Back face visibility */ |
| 355 |
< |
bool(3, backvis); |
| 355 |
> |
check_bool(3, backvis); |
| 356 |
|
} |
| 357 |
|
|
| 358 |
|
else goto badopt; |
| 382 |
|
case 'f': |
| 383 |
|
if (argv [i][2] == 'o') { |
| 384 |
|
/* Force overwrite */ |
| 385 |
< |
bool(3, clobber); |
| 385 |
> |
check_bool(3, clobber); |
| 386 |
|
} |
| 387 |
|
|
| 388 |
|
else goto badopt; |
| 485 |
|
error(USER, errmsg); |
| 486 |
|
|
| 487 |
|
#undef check |
| 488 |
< |
#undef bool |
| 488 |
> |
#undef check_bool |
| 489 |
|
return 0; |
| 490 |
|
} |