| 510 | } |
| 511 | |
| 512 | void test_cmd(int i) |
| 513 | { |
| 514 | int ii; |
| 515 | |
| 516 | if (i<0) |
| 517 | { |
| 518 | ii= -i; |
| 519 | if (ii < 32) |
| 520 | { |
| 521 | si_opt_1 &= ~Sy_bit(ii); |
| 522 | } |
| 523 | else if (ii < 64) |
| 524 | { |
| 525 | si_opt_2 &= ~Sy_bit(ii-32); |
| 526 | } |
| 527 | else |
| 528 | WerrorS("out of bounds\n"); |
| 529 | } |
| 530 | else if (i<32) |
| 531 | { |
| 532 | ii=i; |
| 533 | if (Sy_bit(ii) & kOptions) |
| 534 | { |
| 535 | WarnS("Gerhard, use the option command"); |
| 536 | si_opt_1 |= Sy_bit(ii); |
| 537 | } |
| 538 | else if (Sy_bit(ii) & validOpts) |
| 539 | si_opt_1 |= Sy_bit(ii); |
| 540 | } |
| 541 | else if (i<64) |
| 542 | { |
| 543 | ii=i-32; |
| 544 | si_opt_2 |= Sy_bit(ii); |
| 545 | } |
| 546 | else |
| 547 | WerrorS("out of bounds\n"); |
| 548 | } |
| 549 | |
| 550 | int exprlist_length(leftv v) |
| 551 | { |