1 /* 2 !!DESCRIPTION!! C-Manual Chapter 7.14: assignment operators 3 !!ORIGIN!! LCC 4.1 Testsuite 4 !!LICENCE!! own, freely distributeable for non-profit. read CPYRIGHT.LCC 5 */ 6 7 #include "common.h" 8 9 struct defs { 10 int cbits; /* No. of bits per char */ 11 int ibits; /* int */ 12 int sbits; /* short */ 13 int lbits; /* long */ 14 int ubits; /* unsigned */ 15 int fbits; /* float */ 16 int dbits; /* double */ 17 #ifndef NO_FLOATS 18 float fprec; /* Smallest number that can be */ 19 float dprec; /* significantly added to 1. */ 20 #endif 21 int flgs; /* Print return codes, by section */ 22 int flgm; /* Announce machine dependencies */ 23 int flgd; /* give explicit diagnostics */ 24 int flgl; /* Report local return codes. */ 25 int rrc; /* recent return code */ 26 int crc; /* Cumulative return code */ 27 char rfs[8]; /* Return from section */ 28 }; 29 30 int lbits; /* long */ 31 int ubits; /* unsigned */ 32 int fbits; /* float */ 33 int dbits; /* double */ 34 #ifndef NO_FLOATS 35 float fprec; /* Smallest number that can be */ 36 float dprec; /* significantly added to 1. */ 37 #endif 38 int flgs; /* Print return codes, by section */ 39 int flgm; /* Announce machine dependencies */ 40 int flgd; /* give explicit diagnostics */ 41 int flgl; /* Report local return codes. */ 42 int rrc; /* recent return code */ 43 int crc; /* Cumulative return code */ 44 char rfs[8]; /* Return from section */ 45 46 #ifndef NO_OLD_FUNC_DECL 47 s714(pd0) /* 7.14 Assignment operators */ 48 struct defs *pd0; 49 { 50 #else 51 int s714(struct defs *pd0){ 52 #endif 53 static char f[] = "Local error %d.\n"; 54 static char s714er[] = "s714,er%d\n"; 55 static char qs714[8] = "s714 "; 56 register int prlc, lrc; 57 int rc; 58 char cl, cr; 59 short sl, sr; 60 int il, ir; 61 long ll, lr; 62 unsigned ul, ur; 63 #ifndef NO_FLOATS 64 float fl, fr; 65 double dl, dr; 66 #else 67 signed fl, fr; 68 signed dl, dr; 69 #endif 70 char *ps, *pt; 71 ps = qs714; 72 pt = pd0->rfs; 73 rc = 0; 74 lrc = 0; 75 prlc = pd0->flgl; 76 while (*pt++ = *ps++); 77 78 /* This section tests the assignment operators. 79 80 It is an exhaustive test of all assignment statements 81 of the form: 82 83 vl op vr 84 85 where vl and vr are variables from the set 86 {char,short,int,long,unsigned,float,double} and op is 87 one of the assignment operators. There are 395 such 88 statements. 89 90 The initial values for the variables have been chosen 91 so that both the initial values and the results will 92 "fit" in just about any implementation, and that the re- 93 sults will be such that they test for the proper form- 94 ation of composite operators, rather than checking for 95 the valid operation of those operators' components. 96 For example, in checking >>=, we want to verify that 97 a right shift and a move take place, rather than 98 whether or not there may be some peculiarities about 99 the right shift. Such tests have been made previously, 100 and to repeat them here would be to throw out a red 101 herring. 102 103 The table below lists the operators, assignment targets, 104 initial values for left and right operands, and the 105 expected values of the results. 106 107 = += -= *= /= %= >>= <<= &= ^= |= 108 char 2 7 3 10 2 1 1 20 8 6 14 109 short 2 7 3 10 2 1 1 20 8 6 14 110 int 2 7 3 10 2 1 1 20 8 6 14 111 long 2 7 3 10 2 1 1 20 8 6 14 112 unsigned 2 7 3 10 2 1 1 20 8 6 14 113 float 2 7 3 10 2.5 | | 114 double 2 7 3 10 2.5 | | 115 | | 116 initial (5,2) | (5,2) | (12,10) 117 118 The following machine-generated program reflects the 119 tests described in the table. 120 */ 121 122 cl = 5; cr = 2; 123 cl = cr; 124 if(cl != 2){ 125 lrc = 1; 126 if(prlc) printf(f,lrc); 127 } 128 cl = 5; sr = 2; 129 cl = sr; 130 if(cl != 2){ 131 lrc = 2; 132 if(prlc) printf(f,lrc); 133 } 134 cl = 5; ir = 2; 135 cl = ir; 136 if(cl != 2){ 137 lrc = 3; 138 if(prlc) printf(f,lrc); 139 } 140 cl = 5; lr = 2; 141 cl = lr; 142 if(cl != 2){ 143 lrc = 4; 144 if(prlc) printf(f,lrc); 145 } 146 cl = 5; ur = 2; 147 cl = ur; 148 if(cl != 2){ 149 lrc = 5; 150 if(prlc) printf(f,lrc); 151 } 152 cl = 5; fr = 2; 153 cl = fr; 154 if(cl != 2){ 155 lrc = 6; 156 if(prlc) printf(f,lrc); 157 } 158 cl = 5; dr = 2; 159 cl = dr; 160 if(cl != 2){ 161 lrc = 7; 162 if(prlc) printf(f,lrc); 163 } 164 sl = 5; cr = 2; 165 sl = cr; 166 if(sl != 2){ 167 lrc = 8; 168 if(prlc) printf(f,lrc); 169 } 170 sl = 5; sr = 2; 171 sl = sr; 172 if(sl != 2){ 173 lrc = 9; 174 if(prlc) printf(f,lrc); 175 } 176 sl = 5; ir = 2; 177 sl = ir; 178 if(sl != 2){ 179 lrc = 10; 180 if(prlc) printf(f,lrc); 181 } 182 sl = 5; lr = 2; 183 sl = lr; 184 if(sl != 2){ 185 lrc = 11; 186 if(prlc) printf(f,lrc); 187 } 188 sl = 5; ur = 2; 189 sl = ur; 190 if(sl != 2){ 191 lrc = 12; 192 if(prlc) printf(f,lrc); 193 } 194 sl = 5; fr = 2; 195 sl = fr; 196 if(sl != 2){ 197 lrc = 13; 198 if(prlc) printf(f,lrc); 199 } 200 sl = 5; dr = 2; 201 sl = dr; 202 if(sl != 2){ 203 lrc = 14; 204 if(prlc) printf(f,lrc); 205 } 206 il = 5; cr = 2; 207 il = cr; 208 if(il != 2){ 209 lrc = 15; 210 if(prlc) printf(f,lrc); 211 } 212 il = 5; sr = 2; 213 il = sr; 214 if(il != 2){ 215 lrc = 16; 216 if(prlc) printf(f,lrc); 217 } 218 il = 5; ir = 2; 219 il = ir; 220 if(il != 2){ 221 lrc = 17; 222 if(prlc) printf(f,lrc); 223 } 224 il = 5; lr = 2; 225 il = lr; 226 if(il != 2){ 227 lrc = 18; 228 if(prlc) printf(f,lrc); 229 } 230 il = 5; ur = 2; 231 il = ur; 232 if(il != 2){ 233 lrc = 19; 234 if(prlc) printf(f,lrc); 235 } 236 il = 5; fr = 2; 237 il = fr; 238 if(il != 2){ 239 lrc = 20; 240 if(prlc) printf(f,lrc); 241 } 242 il = 5; dr = 2; 243 il = dr; 244 if(il != 2){ 245 lrc = 21; 246 if(prlc) printf(f,lrc); 247 } 248 ll = 5; cr = 2; 249 ll = cr; 250 if(ll != 2){ 251 lrc = 22; 252 if(prlc) printf(f,lrc); 253 } 254 ll = 5; sr = 2; 255 ll = sr; 256 if(ll != 2){ 257 lrc = 23; 258 if(prlc) printf(f,lrc); 259 } 260 ll = 5; ir = 2; 261 ll = ir; 262 if(ll != 2){ 263 lrc = 24; 264 if(prlc) printf(f,lrc); 265 } 266 ll = 5; lr = 2; 267 ll = lr; 268 if(ll != 2){ 269 lrc = 25; 270 if(prlc) printf(f,lrc); 271 } 272 ll = 5; ur = 2; 273 ll = ur; 274 if(ll != 2){ 275 lrc = 26; 276 if(prlc) printf(f,lrc); 277 } 278 ll = 5; fr = 2; 279 ll = fr; 280 if(ll != 2){ 281 lrc = 27; 282 if(prlc) printf(f,lrc); 283 } 284 ll = 5; dr = 2; 285 ll = dr; 286 if(ll != 2){ 287 lrc = 28; 288 if(prlc) printf(f,lrc); 289 } 290 ul = 5; cr = 2; 291 ul = cr; 292 if(ul != 2){ 293 lrc = 29; 294 if(prlc) printf(f,lrc); 295 } 296 ul = 5; sr = 2; 297 ul = sr; 298 if(ul != 2){ 299 lrc = 30; 300 if(prlc) printf(f,lrc); 301 } 302 ul = 5; ir = 2; 303 ul = ir; 304 if(ul != 2){ 305 lrc = 31; 306 if(prlc) printf(f,lrc); 307 } 308 ul = 5; lr = 2; 309 ul = lr; 310 if(ul != 2){ 311 lrc = 32; 312 if(prlc) printf(f,lrc); 313 } 314 ul = 5; ur = 2; 315 ul = ur; 316 if(ul != 2){ 317 lrc = 33; 318 if(prlc) printf(f,lrc); 319 } 320 ul = 5; fr = 2; 321 ul = fr; 322 if(ul != 2){ 323 lrc = 34; 324 if(prlc) printf(f,lrc); 325 } 326 ul = 5; dr = 2; 327 ul = dr; 328 if(ul != 2){ 329 lrc = 35; 330 if(prlc) printf(f,lrc); 331 } 332 fl = 5; cr = 2; 333 fl = cr; 334 if(fl != 2){ 335 lrc = 36; 336 if(prlc) printf(f,lrc); 337 } 338 fl = 5; sr = 2; 339 fl = sr; 340 if(fl != 2){ 341 lrc = 37; 342 if(prlc) printf(f,lrc); 343 } 344 fl = 5; ir = 2; 345 fl = ir; 346 if(fl != 2){ 347 lrc = 38; 348 if(prlc) printf(f,lrc); 349 } 350 fl = 5; lr = 2; 351 fl = lr; 352 if(fl != 2){ 353 lrc = 39; 354 if(prlc) printf(f,lrc); 355 } 356 fl = 5; ur = 2; 357 fl = ur; 358 if(fl != 2){ 359 lrc = 40; 360 if(prlc) printf(f,lrc); 361 } 362 fl = 5; fr = 2; 363 fl = fr; 364 if(fl != 2){ 365 lrc = 41; 366 if(prlc) printf(f,lrc); 367 } 368 fl = 5; dr = 2; 369 fl = dr; 370 if(fl != 2){ 371 lrc = 42; 372 if(prlc) printf(f,lrc); 373 } 374 dl = 5; cr = 2; 375 dl = cr; 376 if(dl != 2){ 377 lrc = 43; 378 if(prlc) printf(f,lrc); 379 } 380 dl = 5; sr = 2; 381 dl = sr; 382 if(dl != 2){ 383 lrc = 44; 384 if(prlc) printf(f,lrc); 385 } 386 dl = 5; ir = 2; 387 dl = ir; 388 if(dl != 2){ 389 lrc = 45; 390 if(prlc) printf(f,lrc); 391 } 392 dl = 5; lr = 2; 393 dl = lr; 394 if(dl != 2){ 395 lrc = 46; 396 if(prlc) printf(f,lrc); 397 } 398 dl = 5; ur = 2; 399 dl = ur; 400 if(dl != 2){ 401 lrc = 47; 402 if(prlc) printf(f,lrc); 403 } 404 dl = 5; fr = 2; 405 dl = fr; 406 if(dl != 2){ 407 lrc = 48; 408 if(prlc) printf(f,lrc); 409 } 410 dl = 5; dr = 2; 411 dl = dr; 412 if(dl != 2){ 413 lrc = 49; 414 if(prlc) printf(f,lrc); 415 } 416 cl = 5; cr = 2; 417 cl += cr; 418 if(cl != 7){ 419 lrc = 50; 420 if(prlc) printf(f,lrc); 421 } 422 cl = 5; sr = 2; 423 cl += sr; 424 if(cl != 7){ 425 lrc = 51; 426 if(prlc) printf(f,lrc); 427 } 428 cl = 5; ir = 2; 429 cl += ir; 430 if(cl != 7){ 431 lrc = 52; 432 if(prlc) printf(f,lrc); 433 } 434 cl = 5; lr = 2; 435 cl += lr; 436 if(cl != 7){ 437 lrc = 53; 438 if(prlc) printf(f,lrc); 439 } 440 cl = 5; ur = 2; 441 cl += ur; 442 if(cl != 7){ 443 lrc = 54; 444 if(prlc) printf(f,lrc); 445 } 446 cl = 5; fr = 2; 447 cl += fr; 448 if(cl != 7){ 449 lrc = 55; 450 if(prlc) printf(f,lrc); 451 } 452 cl = 5; dr = 2; 453 cl += dr; 454 if(cl != 7){ 455 lrc = 56; 456 if(prlc) printf(f,lrc); 457 } 458 sl = 5; cr = 2; 459 sl += cr; 460 if(sl != 7){ 461 lrc = 57; 462 if(prlc) printf(f,lrc); 463 } 464 sl = 5; sr = 2; 465 sl += sr; 466 if(sl != 7){ 467 lrc = 58; 468 if(prlc) printf(f,lrc); 469 } 470 sl = 5; ir = 2; 471 sl += ir; 472 if(sl != 7){ 473 lrc = 59; 474 if(prlc) printf(f,lrc); 475 } 476 sl = 5; lr = 2; 477 sl += lr; 478 if(sl != 7){ 479 lrc = 60; 480 if(prlc) printf(f,lrc); 481 } 482 sl = 5; ur = 2; 483 sl += ur; 484 if(sl != 7){ 485 lrc = 61; 486 if(prlc) printf(f,lrc); 487 } 488 sl = 5; fr = 2; 489 sl += fr; 490 if(sl != 7){ 491 lrc = 62; 492 if(prlc) printf(f,lrc); 493 } 494 sl = 5; dr = 2; 495 sl += dr; 496 if(sl != 7){ 497 lrc = 63; 498 if(prlc) printf(f,lrc); 499 } 500 il = 5; cr = 2; 501 il += cr; 502 if(il != 7){ 503 lrc = 64; 504 if(prlc) printf(f,lrc); 505 } 506 il = 5; sr = 2; 507 il += sr; 508 if(il != 7){ 509 lrc = 65; 510 if(prlc) printf(f,lrc); 511 } 512 il = 5; ir = 2; 513 il += ir; 514 if(il != 7){ 515 lrc = 66; 516 if(prlc) printf(f,lrc); 517 } 518 il = 5; lr = 2; 519 il += lr; 520 if(il != 7){ 521 lrc = 67; 522 if(prlc) printf(f,lrc); 523 } 524 il = 5; ur = 2; 525 il += ur; 526 if(il != 7){ 527 lrc = 68; 528 if(prlc) printf(f,lrc); 529 } 530 il = 5; fr = 2; 531 il += fr; 532 if(il != 7){ 533 lrc = 69; 534 if(prlc) printf(f,lrc); 535 } 536 il = 5; dr = 2; 537 il += dr; 538 if(il != 7){ 539 lrc = 70; 540 if(prlc) printf(f,lrc); 541 } 542 ll = 5; cr = 2; 543 ll += cr; 544 if(ll != 7){ 545 lrc = 71; 546 if(prlc) printf(f,lrc); 547 } 548 ll = 5; sr = 2; 549 ll += sr; 550 if(ll != 7){ 551 lrc = 72; 552 if(prlc) printf(f,lrc); 553 } 554 ll = 5; ir = 2; 555 ll += ir; 556 if(ll != 7){ 557 lrc = 73; 558 if(prlc) printf(f,lrc); 559 } 560 ll = 5; lr = 2; 561 ll += lr; 562 if(ll != 7){ 563 lrc = 74; 564 if(prlc) printf(f,lrc); 565 } 566 ll = 5; ur = 2; 567 ll += ur; 568 if(ll != 7){ 569 lrc = 75; 570 if(prlc) printf(f,lrc); 571 } 572 ll = 5; fr = 2; 573 ll += fr; 574 if(ll != 7){ 575 lrc = 76; 576 if(prlc) printf(f,lrc); 577 } 578 ll = 5; dr = 2; 579 ll += dr; 580 if(ll != 7){ 581 lrc = 77; 582 if(prlc) printf(f,lrc); 583 } 584 ul = 5; cr = 2; 585 ul += cr; 586 if(ul != 7){ 587 lrc = 78; 588 if(prlc) printf(f,lrc); 589 } 590 ul = 5; sr = 2; 591 ul += sr; 592 if(ul != 7){ 593 lrc = 79; 594 if(prlc) printf(f,lrc); 595 } 596 ul = 5; ir = 2; 597 ul += ir; 598 if(ul != 7){ 599 lrc = 80; 600 if(prlc) printf(f,lrc); 601 } 602 ul = 5; lr = 2; 603 ul += lr; 604 if(ul != 7){ 605 lrc = 81; 606 if(prlc) printf(f,lrc); 607 } 608 ul = 5; ur = 2; 609 ul += ur; 610 if(ul != 7){ 611 lrc = 82; 612 if(prlc) printf(f,lrc); 613 } 614 ul = 5; fr = 2; 615 ul += fr; 616 if(ul != 7){ 617 lrc = 83; 618 if(prlc) printf(f,lrc); 619 } 620 ul = 5; dr = 2; 621 ul += dr; 622 if(ul != 7){ 623 lrc = 84; 624 if(prlc) printf(f,lrc); 625 } 626 fl = 5; cr = 2; 627 fl += cr; 628 if(fl != 7){ 629 lrc = 85; 630 if(prlc) printf(f,lrc); 631 } 632 fl = 5; sr = 2; 633 fl += sr; 634 if(fl != 7){ 635 lrc = 86; 636 if(prlc) printf(f,lrc); 637 } 638 fl = 5; ir = 2; 639 fl += ir; 640 if(fl != 7){ 641 lrc = 87; 642 if(prlc) printf(f,lrc); 643 } 644 fl = 5; lr = 2; 645 fl += lr; 646 if(fl != 7){ 647 lrc = 88; 648 if(prlc) printf(f,lrc); 649 } 650 fl = 5; ur = 2; 651 fl += ur; 652 if(fl != 7){ 653 lrc = 89; 654 if(prlc) printf(f,lrc); 655 } 656 fl = 5; fr = 2; 657 fl += fr; 658 if(fl != 7){ 659 lrc = 90; 660 if(prlc) printf(f,lrc); 661 } 662 fl = 5; dr = 2; 663 fl += dr; 664 if(fl != 7){ 665 lrc = 91; 666 if(prlc) printf(f,lrc); 667 } 668 dl = 5; cr = 2; 669 dl += cr; 670 if(dl != 7){ 671 lrc = 92; 672 if(prlc) printf(f,lrc); 673 } 674 dl = 5; sr = 2; 675 dl += sr; 676 if(dl != 7){ 677 lrc = 93; 678 if(prlc) printf(f,lrc); 679 } 680 dl = 5; ir = 2; 681 dl += ir; 682 if(dl != 7){ 683 lrc = 94; 684 if(prlc) printf(f,lrc); 685 } 686 dl = 5; lr = 2; 687 dl += lr; 688 if(dl != 7){ 689 lrc = 95; 690 if(prlc) printf(f,lrc); 691 } 692 dl = 5; ur = 2; 693 dl += ur; 694 if(dl != 7){ 695 lrc = 96; 696 if(prlc) printf(f,lrc); 697 } 698 dl = 5; fr = 2; 699 dl += fr; 700 if(dl != 7){ 701 lrc = 97; 702 if(prlc) printf(f,lrc); 703 } 704 dl = 5; dr = 2; 705 dl += dr; 706 if(dl != 7){ 707 lrc = 98; 708 if(prlc) printf(f,lrc); 709 } 710 cl = 5; cr = 2; 711 cl -= cr; 712 if(cl != 3){ 713 lrc = 99; 714 if(prlc) printf(f,lrc); 715 } 716 cl = 5; sr = 2; 717 cl -= sr; 718 if(cl != 3){ 719 lrc = 100; 720 if(prlc) printf(f,lrc); 721 } 722 cl = 5; ir = 2; 723 cl -= ir; 724 if(cl != 3){ 725 lrc = 101; 726 if(prlc) printf(f,lrc); 727 } 728 cl = 5; lr = 2; 729 cl -= lr; 730 if(cl != 3){ 731 lrc = 102; 732 if(prlc) printf(f,lrc); 733 } 734 cl = 5; ur = 2; 735 cl -= ur; 736 if(cl != 3){ 737 lrc = 103; 738 if(prlc) printf(f,lrc); 739 } 740 cl = 5; fr = 2; 741 cl -= fr; 742 if(cl != 3){ 743 lrc = 104; 744 if(prlc) printf(f,lrc); 745 } 746 cl = 5; dr = 2; 747 cl -= dr; 748 if(cl != 3){ 749 lrc = 105; 750 if(prlc) printf(f,lrc); 751 } 752 sl = 5; cr = 2; 753 sl -= cr; 754 if(sl != 3){ 755 lrc = 106; 756 if(prlc) printf(f,lrc); 757 } 758 sl = 5; sr = 2; 759 sl -= sr; 760 if(sl != 3){ 761 lrc = 107; 762 if(prlc) printf(f,lrc); 763 } 764 sl = 5; ir = 2; 765 sl -= ir; 766 if(sl != 3){ 767 lrc = 108; 768 if(prlc) printf(f,lrc); 769 } 770 sl = 5; lr = 2; 771 sl -= lr; 772 if(sl != 3){ 773 lrc = 109; 774 if(prlc) printf(f,lrc); 775 } 776 sl = 5; ur = 2; 777 sl -= ur; 778 if(sl != 3){ 779 lrc = 110; 780 if(prlc) printf(f,lrc); 781 } 782 sl = 5; fr = 2; 783 sl -= fr; 784 if(sl != 3){ 785 lrc = 111; 786 if(prlc) printf(f,lrc); 787 } 788 sl = 5; dr = 2; 789 sl -= dr; 790 if(sl != 3){ 791 lrc = 112; 792 if(prlc) printf(f,lrc); 793 } 794 il = 5; cr = 2; 795 il -= cr; 796 if(il != 3){ 797 lrc = 113; 798 if(prlc) printf(f,lrc); 799 } 800 il = 5; sr = 2; 801 il -= sr; 802 if(il != 3){ 803 lrc = 114; 804 if(prlc) printf(f,lrc); 805 } 806 il = 5; ir = 2; 807 il -= ir; 808 if(il != 3){ 809 lrc = 115; 810 if(prlc) printf(f,lrc); 811 } 812 il = 5; lr = 2; 813 il -= lr; 814 if(il != 3){ 815 lrc = 116; 816 if(prlc) printf(f,lrc); 817 } 818 il = 5; ur = 2; 819 il -= ur; 820 if(il != 3){ 821 lrc = 117; 822 if(prlc) printf(f,lrc); 823 } 824 il = 5; fr = 2; 825 il -= fr; 826 if(il != 3){ 827 lrc = 118; 828 if(prlc) printf(f,lrc); 829 } 830 il = 5; dr = 2; 831 il -= dr; 832 if(il != 3){ 833 lrc = 119; 834 if(prlc) printf(f,lrc); 835 } 836 ll = 5; cr = 2; 837 ll -= cr; 838 if(ll != 3){ 839 lrc = 120; 840 if(prlc) printf(f,lrc); 841 } 842 ll = 5; sr = 2; 843 ll -= sr; 844 if(ll != 3){ 845 lrc = 121; 846 if(prlc) printf(f,lrc); 847 } 848 ll = 5; ir = 2; 849 ll -= ir; 850 if(ll != 3){ 851 lrc = 122; 852 if(prlc) printf(f,lrc); 853 } 854 ll = 5; lr = 2; 855 ll -= lr; 856 if(ll != 3){ 857 lrc = 123; 858 if(prlc) printf(f,lrc); 859 } 860 ll = 5; ur = 2; 861 ll -= ur; 862 if(ll != 3){ 863 lrc = 124; 864 if(prlc) printf(f,lrc); 865 } 866 ll = 5; fr = 2; 867 ll -= fr; 868 if(ll != 3){ 869 lrc = 125; 870 if(prlc) printf(f,lrc); 871 } 872 ll = 5; dr = 2; 873 ll -= dr; 874 if(ll != 3){ 875 lrc = 126; 876 if(prlc) printf(f,lrc); 877 } 878 ul = 5; cr = 2; 879 ul -= cr; 880 if(ul != 3){ 881 lrc = 127; 882 if(prlc) printf(f,lrc); 883 } 884 ul = 5; sr = 2; 885 ul -= sr; 886 if(ul != 3){ 887 lrc = 128; 888 if(prlc) printf(f,lrc); 889 } 890 ul = 5; ir = 2; 891 ul -= ir; 892 if(ul != 3){ 893 lrc = 129; 894 if(prlc) printf(f,lrc); 895 } 896 ul = 5; lr = 2; 897 ul -= lr; 898 if(ul != 3){ 899 lrc = 130; 900 if(prlc) printf(f,lrc); 901 } 902 ul = 5; ur = 2; 903 ul -= ur; 904 if(ul != 3){ 905 lrc = 131; 906 if(prlc) printf(f,lrc); 907 } 908 ul = 5; fr = 2; 909 ul -= fr; 910 if(ul != 3){ 911 lrc = 132; 912 if(prlc) printf(f,lrc); 913 } 914 ul = 5; dr = 2; 915 ul -= dr; 916 if(ul != 3){ 917 lrc = 133; 918 if(prlc) printf(f,lrc); 919 } 920 fl = 5; cr = 2; 921 fl -= cr; 922 if(fl != 3){ 923 lrc = 134; 924 if(prlc) printf(f,lrc); 925 } 926 fl = 5; sr = 2; 927 fl -= sr; 928 if(fl != 3){ 929 lrc = 135; 930 if(prlc) printf(f,lrc); 931 } 932 fl = 5; ir = 2; 933 fl -= ir; 934 if(fl != 3){ 935 lrc = 136; 936 if(prlc) printf(f,lrc); 937 } 938 fl = 5; lr = 2; 939 fl -= lr; 940 if(fl != 3){ 941 lrc = 137; 942 if(prlc) printf(f,lrc); 943 } 944 fl = 5; ur = 2; 945 fl -= ur; 946 if(fl != 3){ 947 lrc = 138; 948 if(prlc) printf(f,lrc); 949 } 950 fl = 5; fr = 2; 951 fl -= fr; 952 if(fl != 3){ 953 lrc = 139; 954 if(prlc) printf(f,lrc); 955 } 956 fl = 5; dr = 2; 957 fl -= dr; 958 if(fl != 3){ 959 lrc = 140; 960 if(prlc) printf(f,lrc); 961 } 962 dl = 5; cr = 2; 963 dl -= cr; 964 if(dl != 3){ 965 lrc = 141; 966 if(prlc) printf(f,lrc); 967 } 968 dl = 5; sr = 2; 969 dl -= sr; 970 if(dl != 3){ 971 lrc = 142; 972 if(prlc) printf(f,lrc); 973 } 974 dl = 5; ir = 2; 975 dl -= ir; 976 if(dl != 3){ 977 lrc = 143; 978 if(prlc) printf(f,lrc); 979 } 980 dl = 5; lr = 2; 981 dl -= lr; 982 if(dl != 3){ 983 lrc = 144; 984 if(prlc) printf(f,lrc); 985 } 986 dl = 5; ur = 2; 987 dl -= ur; 988 if(dl != 3){ 989 lrc = 145; 990 if(prlc) printf(f,lrc); 991 } 992 dl = 5; fr = 2; 993 dl -= fr; 994 if(dl != 3){ 995 lrc = 146; 996 if(prlc) printf(f,lrc); 997 } 998 dl = 5; dr = 2; 999 dl -= dr; 1000 if(dl != 3){ 1001 lrc = 147; 1002 if(prlc) printf(f,lrc); 1003 } 1004 cl = 5; cr = 2; 1005 cl *= cr; 1006 if(cl != 10){ 1007 lrc = 148; 1008 if(prlc) printf(f,lrc); 1009 } 1010 cl = 5; sr = 2; 1011 cl *= sr; 1012 if(cl != 10){ 1013 lrc = 149; 1014 if(prlc) printf(f,lrc); 1015 } 1016 cl = 5; ir = 2; 1017 cl *= ir; 1018 if(cl != 10){ 1019 lrc = 150; 1020 if(prlc) printf(f,lrc); 1021 } 1022 cl = 5; lr = 2; 1023 cl *= lr; 1024 if(cl != 10){ 1025 lrc = 151; 1026 if(prlc) printf(f,lrc); 1027 } 1028 cl = 5; ur = 2; 1029 cl *= ur; 1030 if(cl != 10){ 1031 lrc = 152; 1032 if(prlc) printf(f,lrc); 1033 } 1034 cl = 5; fr = 2; 1035 cl *= fr; 1036 if(cl != 10){ 1037 lrc = 153; 1038 if(prlc) printf(f,lrc); 1039 } 1040 cl = 5; dr = 2; 1041 cl *= dr; 1042 if(cl != 10){ 1043 lrc = 154; 1044 if(prlc) printf(f,lrc); 1045 } 1046 sl = 5; cr = 2; 1047 sl *= cr; 1048 if(sl != 10){ 1049 lrc = 155; 1050 if(prlc) printf(f,lrc); 1051 } 1052 sl = 5; sr = 2; 1053 sl *= sr; 1054 if(sl != 10){ 1055 lrc = 156; 1056 if(prlc) printf(f,lrc); 1057 } 1058 sl = 5; ir = 2; 1059 sl *= ir; 1060 if(sl != 10){ 1061 lrc = 157; 1062 if(prlc) printf(f,lrc); 1063 } 1064 sl = 5; lr = 2; 1065 sl *= lr; 1066 if(sl != 10){ 1067 lrc = 158; 1068 if(prlc) printf(f,lrc); 1069 } 1070 sl = 5; ur = 2; 1071 sl *= ur; 1072 if(sl != 10){ 1073 lrc = 159; 1074 if(prlc) printf(f,lrc); 1075 } 1076 sl = 5; fr = 2; 1077 sl *= fr; 1078 if(sl != 10){ 1079 lrc = 160; 1080 if(prlc) printf(f,lrc); 1081 } 1082 sl = 5; dr = 2; 1083 sl *= dr; 1084 if(sl != 10){ 1085 lrc = 161; 1086 if(prlc) printf(f,lrc); 1087 } 1088 il = 5; cr = 2; 1089 il *= cr; 1090 if(il != 10){ 1091 lrc = 162; 1092 if(prlc) printf(f,lrc); 1093 } 1094 il = 5; sr = 2; 1095 il *= sr; 1096 if(il != 10){ 1097 lrc = 163; 1098 if(prlc) printf(f,lrc); 1099 } 1100 il = 5; ir = 2; 1101 il *= ir; 1102 if(il != 10){ 1103 lrc = 164; 1104 if(prlc) printf(f,lrc); 1105 } 1106 il = 5; lr = 2; 1107 il *= lr; 1108 if(il != 10){ 1109 lrc = 165; 1110 if(prlc) printf(f,lrc); 1111 } 1112 il = 5; ur = 2; 1113 il *= ur; 1114 if(il != 10){ 1115 lrc = 166; 1116 if(prlc) printf(f,lrc); 1117 } 1118 il = 5; fr = 2; 1119 il *= fr; 1120 if(il != 10){ 1121 lrc = 167; 1122 if(prlc) printf(f,lrc); 1123 } 1124 il = 5; dr = 2; 1125 il *= dr; 1126 if(il != 10){ 1127 lrc = 168; 1128 if(prlc) printf(f,lrc); 1129 } 1130 ll = 5; cr = 2; 1131 ll *= cr; 1132 if(ll != 10){ 1133 lrc = 169; 1134 if(prlc) printf(f,lrc); 1135 } 1136 ll = 5; sr = 2; 1137 ll *= sr; 1138 if(ll != 10){ 1139 lrc = 170; 1140 if(prlc) printf(f,lrc); 1141 } 1142 ll = 5; ir = 2; 1143 ll *= ir; 1144 if(ll != 10){ 1145 lrc = 171; 1146 if(prlc) printf(f,lrc); 1147 } 1148 ll = 5; lr = 2; 1149 ll *= lr; 1150 if(ll != 10){ 1151 lrc = 172; 1152 if(prlc) printf(f,lrc); 1153 } 1154 ll = 5; ur = 2; 1155 ll *= ur; 1156 if(ll != 10){ 1157 lrc = 173; 1158 if(prlc) printf(f,lrc); 1159 } 1160 ll = 5; fr = 2; 1161 ll *= fr; 1162 if(ll != 10){ 1163 lrc = 174; 1164 if(prlc) printf(f,lrc); 1165 } 1166 ll = 5; dr = 2; 1167 ll *= dr; 1168 if(ll != 10){ 1169 lrc = 175; 1170 if(prlc) printf(f,lrc); 1171 } 1172 ul = 5; cr = 2; 1173 ul *= cr; 1174 if(ul != 10){ 1175 lrc = 176; 1176 if(prlc) printf(f,lrc); 1177 } 1178 ul = 5; sr = 2; 1179 ul *= sr; 1180 if(ul != 10){ 1181 lrc = 177; 1182 if(prlc) printf(f,lrc); 1183 } 1184 ul = 5; ir = 2; 1185 ul *= ir; 1186 if(ul != 10){ 1187 lrc = 178; 1188 if(prlc) printf(f,lrc); 1189 } 1190 ul = 5; lr = 2; 1191 ul *= lr; 1192 if(ul != 10){ 1193 lrc = 179; 1194 if(prlc) printf(f,lrc); 1195 } 1196 ul = 5; ur = 2; 1197 ul *= ur; 1198 if(ul != 10){ 1199 lrc = 180; 1200 if(prlc) printf(f,lrc); 1201 } 1202 ul = 5; fr = 2; 1203 ul *= fr; 1204 if(ul != 10){ 1205 lrc = 181; 1206 if(prlc) printf(f,lrc); 1207 } 1208 ul = 5; dr = 2; 1209 ul *= dr; 1210 if(ul != 10){ 1211 lrc = 182; 1212 if(prlc) printf(f,lrc); 1213 } 1214 fl = 5; cr = 2; 1215 fl *= cr; 1216 if(fl != 10){ 1217 lrc = 183; 1218 if(prlc) printf(f,lrc); 1219 } 1220 fl = 5; sr = 2; 1221 fl *= sr; 1222 if(fl != 10){ 1223 lrc = 184; 1224 if(prlc) printf(f,lrc); 1225 } 1226 fl = 5; ir = 2; 1227 fl *= ir; 1228 if(fl != 10){ 1229 lrc = 185; 1230 if(prlc) printf(f,lrc); 1231 } 1232 fl = 5; lr = 2; 1233 fl *= lr; 1234 if(fl != 10){ 1235 lrc = 186; 1236 if(prlc) printf(f,lrc); 1237 } 1238 fl = 5; ur = 2; 1239 fl *= ur; 1240 if(fl != 10){ 1241 lrc = 187; 1242 if(prlc) printf(f,lrc); 1243 } 1244 fl = 5; fr = 2; 1245 fl *= fr; 1246 if(fl != 10){ 1247 lrc = 188; 1248 if(prlc) printf(f,lrc); 1249 } 1250 fl = 5; dr = 2; 1251 fl *= dr; 1252 if(fl != 10){ 1253 lrc = 189; 1254 if(prlc) printf(f,lrc); 1255 } 1256 dl = 5; cr = 2; 1257 dl *= cr; 1258 if(dl != 10){ 1259 lrc = 190; 1260 if(prlc) printf(f,lrc); 1261 } 1262 dl = 5; sr = 2; 1263 dl *= sr; 1264 if(dl != 10){ 1265 lrc = 191; 1266 if(prlc) printf(f,lrc); 1267 } 1268 dl = 5; ir = 2; 1269 dl *= ir; 1270 if(dl != 10){ 1271 lrc = 192; 1272 if(prlc) printf(f,lrc); 1273 } 1274 dl = 5; lr = 2; 1275 dl *= lr; 1276 if(dl != 10){ 1277 lrc = 193; 1278 if(prlc) printf(f,lrc); 1279 } 1280 dl = 5; ur = 2; 1281 dl *= ur; 1282 if(dl != 10){ 1283 lrc = 194; 1284 if(prlc) printf(f,lrc); 1285 } 1286 dl = 5; fr = 2; 1287 dl *= fr; 1288 if(dl != 10){ 1289 lrc = 195; 1290 if(prlc) printf(f,lrc); 1291 } 1292 dl = 5; dr = 2; 1293 dl *= dr; 1294 if(dl != 10){ 1295 lrc = 196; 1296 if(prlc) printf(f,lrc); 1297 } 1298 cl = 5; cr = 2; 1299 cl /= cr; 1300 if(cl != 2){ 1301 lrc = 197; 1302 if(prlc) printf(f,lrc); 1303 } 1304 cl = 5; sr = 2; 1305 cl /= sr; 1306 if(cl != 2){ 1307 lrc = 198; 1308 if(prlc) printf(f,lrc); 1309 } 1310 cl = 5; ir = 2; 1311 cl /= ir; 1312 if(cl != 2){ 1313 lrc = 199; 1314 if(prlc) printf(f,lrc); 1315 } 1316 cl = 5; lr = 2; 1317 cl /= lr; 1318 if(cl != 2){ 1319 lrc = 200; 1320 if(prlc) printf(f,lrc); 1321 } 1322 cl = 5; ur = 2; 1323 cl /= ur; 1324 if(cl != 2){ 1325 lrc = 201; 1326 if(prlc) printf(f,lrc); 1327 } 1328 cl = 5; fr = 2; 1329 cl /= fr; 1330 if(cl != 2){ 1331 lrc = 202; 1332 if(prlc) printf(f,lrc); 1333 } 1334 cl = 5; dr = 2; 1335 cl /= dr; 1336 if(cl != 2){ 1337 lrc = 203; 1338 if(prlc) printf(f,lrc); 1339 } 1340 sl = 5; cr = 2; 1341 sl /= cr; 1342 if(sl != 2){ 1343 lrc = 204; 1344 if(prlc) printf(f,lrc); 1345 } 1346 sl = 5; sr = 2; 1347 sl /= sr; 1348 if(sl != 2){ 1349 lrc = 205; 1350 if(prlc) printf(f,lrc); 1351 } 1352 sl = 5; ir = 2; 1353 sl /= ir; 1354 if(sl != 2){ 1355 lrc = 206; 1356 if(prlc) printf(f,lrc); 1357 } 1358 sl = 5; lr = 2; 1359 sl /= lr; 1360 if(sl != 2){ 1361 lrc = 207; 1362 if(prlc) printf(f,lrc); 1363 } 1364 sl = 5; ur = 2; 1365 sl /= ur; 1366 if(sl != 2){ 1367 lrc = 208; 1368 if(prlc) printf(f,lrc); 1369 } 1370 sl = 5; fr = 2; 1371 sl /= fr; 1372 if(sl != 2){ 1373 lrc = 209; 1374 if(prlc) printf(f,lrc); 1375 } 1376 sl = 5; dr = 2; 1377 sl /= dr; 1378 if(sl != 2){ 1379 lrc = 210; 1380 if(prlc) printf(f,lrc); 1381 } 1382 il = 5; cr = 2; 1383 il /= cr; 1384 if(il != 2){ 1385 lrc = 211; 1386 if(prlc) printf(f,lrc); 1387 } 1388 il = 5; sr = 2; 1389 il /= sr; 1390 if(il != 2){ 1391 lrc = 212; 1392 if(prlc) printf(f,lrc); 1393 } 1394 il = 5; ir = 2; 1395 il /= ir; 1396 if(il != 2){ 1397 lrc = 213; 1398 if(prlc) printf(f,lrc); 1399 } 1400 il = 5; lr = 2; 1401 il /= lr; 1402 if(il != 2){ 1403 lrc = 214; 1404 if(prlc) printf(f,lrc); 1405 } 1406 il = 5; ur = 2; 1407 il /= ur; 1408 if(il != 2){ 1409 lrc = 215; 1410 if(prlc) printf(f,lrc); 1411 } 1412 il = 5; fr = 2; 1413 il /= fr; 1414 if(il != 2){ 1415 lrc = 216; 1416 if(prlc) printf(f,lrc); 1417 } 1418 il = 5; dr = 2; 1419 il /= dr; 1420 if(il != 2){ 1421 lrc = 217; 1422 if(prlc) printf(f,lrc); 1423 } 1424 ll = 5; cr = 2; 1425 ll /= cr; 1426 if(ll != 2){ 1427 lrc = 218; 1428 if(prlc) printf(f,lrc); 1429 } 1430 ll = 5; sr = 2; 1431 ll /= sr; 1432 if(ll != 2){ 1433 lrc = 219; 1434 if(prlc) printf(f,lrc); 1435 } 1436 ll = 5; ir = 2; 1437 ll /= ir; 1438 if(ll != 2){ 1439 lrc = 220; 1440 if(prlc) printf(f,lrc); 1441 } 1442 ll = 5; lr = 2; 1443 ll /= lr; 1444 if(ll != 2){ 1445 lrc = 221; 1446 if(prlc) printf(f,lrc); 1447 } 1448 ll = 5; ur = 2; 1449 ll /= ur; 1450 if(ll != 2){ 1451 lrc = 222; 1452 if(prlc) printf(f,lrc); 1453 } 1454 ll = 5; fr = 2; 1455 ll /= fr; 1456 if(ll != 2){ 1457 lrc = 223; 1458 if(prlc) printf(f,lrc); 1459 } 1460 ll = 5; dr = 2; 1461 ll /= dr; 1462 if(ll != 2){ 1463 lrc = 224; 1464 if(prlc) printf(f,lrc); 1465 } 1466 ul = 5; cr = 2; 1467 ul /= cr; 1468 if(ul != 2){ 1469 lrc = 225; 1470 if(prlc) printf(f,lrc); 1471 } 1472 ul = 5; sr = 2; 1473 ul /= sr; 1474 if(ul != 2){ 1475 lrc = 226; 1476 if(prlc) printf(f,lrc); 1477 } 1478 ul = 5; ir = 2; 1479 ul /= ir; 1480 if(ul != 2){ 1481 lrc = 227; 1482 if(prlc) printf(f,lrc); 1483 } 1484 ul = 5; lr = 2; 1485 ul /= lr; 1486 if(ul != 2){ 1487 lrc = 228; 1488 if(prlc) printf(f,lrc); 1489 } 1490 ul = 5; ur = 2; 1491 ul /= ur; 1492 if(ul != 2){ 1493 lrc = 229; 1494 if(prlc) printf(f,lrc); 1495 } 1496 ul = 5; fr = 2; 1497 ul /= fr; 1498 if(ul != 2){ 1499 lrc = 230; 1500 if(prlc) printf(f,lrc); 1501 } 1502 ul = 5; dr = 2; 1503 ul /= dr; 1504 if(ul != 2){ 1505 lrc = 231; 1506 if(prlc) printf(f,lrc); 1507 } 1508 1509 #ifdef NO_FLOATS 1510 fl = 5; cr = 2; 1511 fl /= cr; 1512 if(fl != 2){ 1513 lrc = 232; 1514 if(prlc) printf(f,lrc); 1515 } 1516 fl = 5; sr = 2; 1517 fl /= sr; 1518 if(fl != 2){ 1519 lrc = 233; 1520 if(prlc) printf(f,lrc); 1521 } 1522 fl = 5; ir = 2; 1523 fl /= ir; 1524 if(fl != 2){ 1525 lrc = 234; 1526 if(prlc) printf(f,lrc); 1527 } 1528 fl = 5; lr = 2; 1529 fl /= lr; 1530 if(fl != 2){ 1531 lrc = 235; 1532 if(prlc) printf(f,lrc); 1533 } 1534 fl = 5; ur = 2; 1535 fl /= ur; 1536 if(fl != 2){ 1537 lrc = 236; 1538 if(prlc) printf(f,lrc); 1539 } 1540 fl = 5; fr = 2; 1541 fl /= fr; 1542 if(fl != 2){ 1543 lrc = 237; 1544 if(prlc) printf(f,lrc); 1545 } 1546 fl = 5; dr = 2; 1547 fl /= dr; 1548 if(fl != 2){ 1549 lrc = 238; 1550 if(prlc) printf(f,lrc); 1551 } 1552 dl = 5; cr = 2; 1553 dl /= cr; 1554 if(dl != 2){ 1555 lrc = 239; 1556 if(prlc) printf(f,lrc); 1557 } 1558 dl = 5; sr = 2; 1559 dl /= sr; 1560 if(dl != 2){ 1561 lrc = 240; 1562 if(prlc) printf(f,lrc); 1563 } 1564 dl = 5; ir = 2; 1565 dl /= ir; 1566 if(dl != 2){ 1567 lrc = 241; 1568 if(prlc) printf(f,lrc); 1569 } 1570 dl = 5; lr = 2; 1571 dl /= lr; 1572 if(dl != 2){ 1573 lrc = 242; 1574 if(prlc) printf(f,lrc); 1575 } 1576 dl = 5; ur = 2; 1577 dl /= ur; 1578 if(dl != 2){ 1579 lrc = 243; 1580 if(prlc) printf(f,lrc); 1581 } 1582 dl = 5; fr = 2; 1583 dl /= fr; 1584 if(dl != 2){ 1585 lrc = 244; 1586 if(prlc) printf(f,lrc); 1587 } 1588 dl = 5; dr = 2; 1589 dl /= dr; 1590 if(dl != 2){ 1591 lrc = 245; 1592 if(prlc) printf(f,lrc); 1593 } 1594 #else 1595 fl = 5; cr = 2; 1596 fl /= cr; 1597 if(fl != 2.5){ 1598 lrc = 232; 1599 if(prlc) printf(f,lrc); 1600 } 1601 fl = 5; sr = 2; 1602 fl /= sr; 1603 if(fl != 2.5){ 1604 lrc = 233; 1605 if(prlc) printf(f,lrc); 1606 } 1607 fl = 5; ir = 2; 1608 fl /= ir; 1609 if(fl != 2.5){ 1610 lrc = 234; 1611 if(prlc) printf(f,lrc); 1612 } 1613 fl = 5; lr = 2; 1614 fl /= lr; 1615 if(fl != 2.5){ 1616 lrc = 235; 1617 if(prlc) printf(f,lrc); 1618 } 1619 fl = 5; ur = 2; 1620 fl /= ur; 1621 if(fl != 2.5){ 1622 lrc = 236; 1623 if(prlc) printf(f,lrc); 1624 } 1625 fl = 5; fr = 2; 1626 fl /= fr; 1627 if(fl != 2.5){ 1628 lrc = 237; 1629 if(prlc) printf(f,lrc); 1630 } 1631 fl = 5; dr = 2; 1632 fl /= dr; 1633 if(fl != 2.5){ 1634 lrc = 238; 1635 if(prlc) printf(f,lrc); 1636 } 1637 dl = 5; cr = 2; 1638 dl /= cr; 1639 if(dl != 2.5){ 1640 lrc = 239; 1641 if(prlc) printf(f,lrc); 1642 } 1643 dl = 5; sr = 2; 1644 dl /= sr; 1645 if(dl != 2.5){ 1646 lrc = 240; 1647 if(prlc) printf(f,lrc); 1648 } 1649 dl = 5; ir = 2; 1650 dl /= ir; 1651 if(dl != 2.5){ 1652 lrc = 241; 1653 if(prlc) printf(f,lrc); 1654 } 1655 dl = 5; lr = 2; 1656 dl /= lr; 1657 if(dl != 2.5){ 1658 lrc = 242; 1659 if(prlc) printf(f,lrc); 1660 } 1661 dl = 5; ur = 2; 1662 dl /= ur; 1663 if(dl != 2.5){ 1664 lrc = 243; 1665 if(prlc) printf(f,lrc); 1666 } 1667 dl = 5; fr = 2; 1668 dl /= fr; 1669 if(dl != 2.5){ 1670 lrc = 244; 1671 if(prlc) printf(f,lrc); 1672 } 1673 dl = 5; dr = 2; 1674 dl /= dr; 1675 if(dl != 2.5){ 1676 lrc = 245; 1677 if(prlc) printf(f,lrc); 1678 } 1679 #endif 1680 cl = 5; cr = 2; 1681 cl %= cr; 1682 if(cl != 1){ 1683 lrc = 246; 1684 if(prlc) printf(f,lrc); 1685 } 1686 cl = 5; sr = 2; 1687 cl %= sr; 1688 if(cl != 1){ 1689 lrc = 247; 1690 if(prlc) printf(f,lrc); 1691 } 1692 cl = 5; ir = 2; 1693 cl %= ir; 1694 if(cl != 1){ 1695 lrc = 248; 1696 if(prlc) printf(f,lrc); 1697 } 1698 cl = 5; lr = 2; 1699 cl %= lr; 1700 if(cl != 1){ 1701 lrc = 249; 1702 if(prlc) printf(f,lrc); 1703 } 1704 cl = 5; ur = 2; 1705 cl %= ur; 1706 if(cl != 1){ 1707 lrc = 250; 1708 if(prlc) printf(f,lrc); 1709 } 1710 sl = 5; cr = 2; 1711 sl %= cr; 1712 if(sl != 1){ 1713 lrc = 251; 1714 if(prlc) printf(f,lrc); 1715 } 1716 sl = 5; sr = 2; 1717 sl %= sr; 1718 if(sl != 1){ 1719 lrc = 252; 1720 if(prlc) printf(f,lrc); 1721 } 1722 sl = 5; ir = 2; 1723 sl %= ir; 1724 if(sl != 1){ 1725 lrc = 253; 1726 if(prlc) printf(f,lrc); 1727 } 1728 sl = 5; lr = 2; 1729 sl %= lr; 1730 if(sl != 1){ 1731 lrc = 254; 1732 if(prlc) printf(f,lrc); 1733 } 1734 sl = 5; ur = 2; 1735 sl %= ur; 1736 if(sl != 1){ 1737 lrc = 255; 1738 if(prlc) printf(f,lrc); 1739 } 1740 1741 if(lrc != 0) { 1742 rc = 1; 1743 if(pd0->flgd != 0) printf(s714er,1); 1744 } 1745 return rc; 1746 } 1747 1748 /********************************************************************************************* 1749 the main loop that launches the sections 1750 *********************************************************************************************/ 1751 1752 #ifndef NO_TYPELESS_STRUCT_PTR section(int j,struct * pd0)1753 int section(int j,struct* pd0){ 1754 #else 1755 int section(int j,void* pd0){ 1756 #endif 1757 switch(j){ 1758 case 0: return s714(pd0); 1759 } 1760 } 1761 1762 #define cq_sections 1 1763 1764 /* 1765 C REFERENCE MANUAL (main) 1766 */ 1767 1768 #ifndef NO_OLD_FUNC_DECL 1769 main(n,args) 1770 int n; 1771 char **args; 1772 { 1773 #else 1774 int main(int n,char **args) { 1775 #endif 1776 1777 int j; 1778 static struct defs d0, *pd0; 1779 1780 d0.flgs = 1; /* These flags dictate */ 1781 d0.flgm = 1; /* the verbosity of */ 1782 d0.flgd = 1; /* the program. */ 1783 d0.flgl = 1; 1784 1785 pd0 = &d0; 1786 1787 for (j=0; j<cq_sections; j++) { 1788 d0.rrc=section(j,pd0); 1789 d0.crc=d0.crc+d0.rrc; 1790 if(d0.flgs != 0) printf("Section %s returned %d.\n",d0.rfs,d0.rrc); 1791 } 1792 1793 if(d0.crc == 0) printf("\nNo errors detected.\n"); 1794 else printf("\nFailed.\n"); 1795 1796 return d0.crc; 1797 } 1798