
     1  !!! %option  stack=30
     2  !!!  19-Feb-82         !!!! 15/5/78
     3  {Modified run under new subsystem so that it can support its own supervisor}
     4  
     5  !!!!!!!!!!!%CONTROL 1;   ! ... TEST ONLY SWITCHES
     6  %CONSTSTRING(5) VERSION = "4.12"
     7  
503 @ 4405:         LINE   6 "regression-compile-tmp/comp412.imp"
504 @ 4443:         PUSHS  "4.12"
505 @ 4449:         DEF    VERSION p1=V_0081 a/tf=31 b/format=5 c/ostate=12  type=3 (string) form=1 (simple) special=0 (<special:0>) linkage=2 (constant) spec=0 indirect=1 unass=0
506 @ 4468:         INIT   1

     8  %CONSTINTEGER GBASE= 426
507 @ 4471:         LINE   8 "regression-compile-tmp/comp412.imp"

     9  %CONSTINTEGER  GMAX = 512;   !???
    10  
    11     {Changed from %CONST to %OWN to get 8.1 pass1 to accept source}
508 @ 4509:         LINE   9 "regression-compile-tmp/comp412.imp"

    12  %ownSHORTINTEGERARRAY PHRASE(132:255) = 326, 137, 219,   0,
    13   386, 164, 242, 246, 216, 210, 229,  98,
    14   378, 183, 310, 292, 268, 259, 349, 221,
    15   367, 364, 410, 413, 416, 419, 422, 391,
    16   405, 199, 236, 158, 382, 357,   0, 278,
    17   285, 307, 302, 318, 321, 346, 341, 370,
    18   425, 426,   0,   0,   0,   0,   0,   0,
    19     0,   0,   0,   0,   0,   0,   0,   0,
    20     0,   0,   0,   0,   0,   0,   0,   0,
    21     0,   0,   0,   0,   0,   0,   0,   0,
    22     0,   0,   0,   0,   0,   0,   0,   0,
    23     0,   0,   0,   0,   0,   0,   0,   0,
    24     0,   0,   0,   0,   0,   0,   0,   0,
    25     0,   0,   0,   0,   0,   0,   0,   0,
    26     0,   0,   0,   0,   0,   0,   0,   0,
    27     0,   0,   1,   7,  40,  49,  96,   0
    28  
509 @ 4547:         LINE   12 "regression-compile-tmp/comp412.imp"
510 @ 4585:         PUSHI  #0x00000084
511 @ 4590:         PUSHI  #0x000000ff
512 @ 4595:         BOUNDS
513 @ 4596:         DEF    PHRASE p1=V_0082 a/tf=1b b/format=3 c/ostate=121  type=1 (integer) form=11 (array) special=2 (short-integer) linkage=1 (own) spec=0 indirect=0 unass=1
514 @ 4614:         PUSHI  #0x00000146
515 @ 4619:         INIT   1
516 @ 4622:         PUSHI  #0x00000089
517 @ 4627:         INIT   1
518 @ 4630:         PUSHI  #0x000000db
519 @ 4635:         INIT   1
520 @ 4638:         PUSHI  #0x00000000
521 @ 4643:         INIT   1
522 @ 4646:         PUSHI  #0x00000182
523 @ 4651:         INIT   1
524 @ 4654:         PUSHI  #0x000000a4
525 @ 4659:         INIT   1
526 @ 4662:         PUSHI  #0x000000f2
527 @ 4667:         INIT   1
528 @ 4670:         PUSHI  #0x000000f6
529 @ 4675:         INIT   1
530 @ 4678:         PUSHI  #0x000000d8
531 @ 4683:         INIT   1
532 @ 4686:         PUSHI  #0x000000d2
533 @ 4691:         INIT   1
534 @ 4694:         PUSHI  #0x000000e5
535 @ 4699:         INIT   1
536 @ 4702:         PUSHI  #0x00000062
537 @ 4707:         INIT   1
538 @ 4710:         PUSHI  #0x0000017a
539 @ 4715:         INIT   1
540 @ 4718:         PUSHI  #0x000000b7
541 @ 4723:         INIT   1
542 @ 4726:         PUSHI  #0x00000136
543 @ 4731:         INIT   1
544 @ 4734:         PUSHI  #0x00000124
545 @ 4739:         INIT   1
546 @ 4742:         PUSHI  #0x0000010c
547 @ 4747:         INIT   1
548 @ 4750:         PUSHI  #0x00000103
549 @ 4755:         INIT   1
550 @ 4758:         PUSHI  #0x0000015d
551 @ 4763:         INIT   1
552 @ 4766:         PUSHI  #0x000000dd
553 @ 4771:         INIT   1
554 @ 4774:         PUSHI  #0x0000016f
555 @ 4779:         INIT   1
556 @ 4782:         PUSHI  #0x0000016c
557 @ 4787:         INIT   1
558 @ 4790:         PUSHI  #0x0000019a
559 @ 4795:         INIT   1
560 @ 4798:         PUSHI  #0x0000019d
561 @ 4803:         INIT   1
562 @ 4806:         PUSHI  #0x000001a0
563 @ 4811:         INIT   1
564 @ 4814:         PUSHI  #0x000001a3
565 @ 4819:         INIT   1
566 @ 4822:         PUSHI  #0x000001a6
567 @ 4827:         INIT   1
568 @ 4830:         PUSHI  #0x00000187
569 @ 4835:         INIT   1
570 @ 4838:         PUSHI  #0x00000195
571 @ 4843:         INIT   1
572 @ 4846:         PUSHI  #0x000000c7
573 @ 4851:         INIT   1
574 @ 4854:         PUSHI  #0x000000ec
575 @ 4859:         INIT   1
576 @ 4862:         PUSHI  #0x0000009e
577 @ 4867:         INIT   1
578 @ 4870:         PUSHI  #0x0000017e
579 @ 4875:         INIT   1
580 @ 4878:         PUSHI  #0x00000165
581 @ 4883:         INIT   1
582 @ 4886:         PUSHI  #0x00000000
583 @ 4891:         INIT   1
584 @ 4894:         PUSHI  #0x00000116
585 @ 4899:         INIT   1
586 @ 4902:         PUSHI  #0x0000011d
587 @ 4907:         INIT   1
588 @ 4910:         PUSHI  #0x00000133
589 @ 4915:         INIT   1
590 @ 4918:         PUSHI  #0x0000012e
591 @ 4923:         INIT   1
592 @ 4926:         PUSHI  #0x0000013e
593 @ 4931:         INIT   1
594 @ 4934:         PUSHI  #0x00000141
595 @ 4939:         INIT   1
596 @ 4942:         PUSHI  #0x0000015a
597 @ 4947:         INIT   1
598 @ 4950:         PUSHI  #0x00000155
599 @ 4955:         INIT   1
600 @ 4958:         PUSHI  #0x00000172
601 @ 4963:         INIT   1
602 @ 4966:         PUSHI  #0x000001a9
603 @ 4971:         INIT   1
604 @ 4974:         PUSHI  #0x000001aa
605 @ 4979:         INIT   1
606 @ 4982:         PUSHI  #0x00000000
607 @ 4987:         INIT   1
608 @ 4990:         PUSHI  #0x00000000
609 @ 4995:         INIT   1
610 @ 4998:         PUSHI  #0x00000000
611 @ 5003:         INIT   1
612 @ 5006:         PUSHI  #0x00000000
613 @ 5011:         INIT   1
614 @ 5014:         PUSHI  #0x00000000
615 @ 5019:         INIT   1
616 @ 5022:         PUSHI  #0x00000000
617 @ 5027:         INIT   1
618 @ 5030:         PUSHI  #0x00000000
619 @ 5035:         INIT   1
620 @ 5038:         PUSHI  #0x00000000
621 @ 5043:         INIT   1
622 @ 5046:         PUSHI  #0x00000000
623 @ 5051:         INIT   1
624 @ 5054:         PUSHI  #0x00000000
625 @ 5059:         INIT   1
626 @ 5062:         PUSHI  #0x00000000
627 @ 5067:         INIT   1
628 @ 5070:         PUSHI  #0x00000000
629 @ 5075:         INIT   1
630 @ 5078:         PUSHI  #0x00000000
631 @ 5083:         INIT   1
632 @ 5086:         PUSHI  #0x00000000
633 @ 5091:         INIT   1
634 @ 5094:         PUSHI  #0x00000000
635 @ 5099:         INIT   1
636 @ 5102:         PUSHI  #0x00000000
637 @ 5107:         INIT   1
638 @ 5110:         PUSHI  #0x00000000
639 @ 5115:         INIT   1
640 @ 5118:         PUSHI  #0x00000000
641 @ 5123:         INIT   1
642 @ 5126:         PUSHI  #0x00000000
643 @ 5131:         INIT   1
644 @ 5134:         PUSHI  #0x00000000
645 @ 5139:         INIT   1
646 @ 5142:         PUSHI  #0x00000000
647 @ 5147:         INIT   1
648 @ 5150:         PUSHI  #0x00000000
649 @ 5155:         INIT   1
650 @ 5158:         PUSHI  #0x00000000
651 @ 5163:         INIT   1
652 @ 5166:         PUSHI  #0x00000000
653 @ 5171:         INIT   1
654 @ 5174:         PUSHI  #0x00000000
655 @ 5179:         INIT   1
656 @ 5182:         PUSHI  #0x00000000
657 @ 5187:         INIT   1
658 @ 5190:         PUSHI  #0x00000000
659 @ 5195:         INIT   1
660 @ 5198:         PUSHI  #0x00000000
661 @ 5203:         INIT   1
662 @ 5206:         PUSHI  #0x00000000
663 @ 5211:         INIT   1
664 @ 5214:         PUSHI  #0x00000000
665 @ 5219:         INIT   1
666 @ 5222:         PUSHI  #0x00000000
667 @ 5227:         INIT   1
668 @ 5230:         PUSHI  #0x00000000
669 @ 5235:         INIT   1
670 @ 5238:         PUSHI  #0x00000000
671 @ 5243:         INIT   1
672 @ 5246:         PUSHI  #0x00000000
673 @ 5251:         INIT   1
674 @ 5254:         PUSHI  #0x00000000
675 @ 5259:         INIT   1
676 @ 5262:         PUSHI  #0x00000000
677 @ 5267:         INIT   1
678 @ 5270:         PUSHI  #0x00000000
679 @ 5275:         INIT   1
680 @ 5278:         PUSHI  #0x00000000
681 @ 5283:         INIT   1
682 @ 5286:         PUSHI  #0x00000000
683 @ 5291:         INIT   1
684 @ 5294:         PUSHI  #0x00000000
685 @ 5299:         INIT   1
686 @ 5302:         PUSHI  #0x00000000
687 @ 5307:         INIT   1
688 @ 5310:         PUSHI  #0x00000000
689 @ 5315:         INIT   1
690 @ 5318:         PUSHI  #0x00000000
691 @ 5323:         INIT   1
692 @ 5326:         PUSHI  #0x00000000
693 @ 5331:         INIT   1
694 @ 5334:         PUSHI  #0x00000000
695 @ 5339:         INIT   1
696 @ 5342:         PUSHI  #0x00000000
697 @ 5347:         INIT   1
698 @ 5350:         PUSHI  #0x00000000
699 @ 5355:         INIT   1
700 @ 5358:         PUSHI  #0x00000000
701 @ 5363:         INIT   1
702 @ 5366:         PUSHI  #0x00000000
703 @ 5371:         INIT   1
704 @ 5374:         PUSHI  #0x00000000
705 @ 5379:         INIT   1
706 @ 5382:         PUSHI  #0x00000000
707 @ 5387:         INIT   1
708 @ 5390:         PUSHI  #0x00000000
709 @ 5395:         INIT   1
710 @ 5398:         PUSHI  #0x00000000
711 @ 5403:         INIT   1
712 @ 5406:         PUSHI  #0x00000000
713 @ 5411:         INIT   1
714 @ 5414:         PUSHI  #0x00000000
715 @ 5419:         INIT   1
716 @ 5422:         PUSHI  #0x00000000
717 @ 5427:         INIT   1
718 @ 5430:         PUSHI  #0x00000000
719 @ 5435:         INIT   1
720 @ 5438:         PUSHI  #0x00000000
721 @ 5443:         INIT   1
722 @ 5446:         PUSHI  #0x00000000
723 @ 5451:         INIT   1
724 @ 5454:         PUSHI  #0x00000000
725 @ 5459:         INIT   1
726 @ 5462:         PUSHI  #0x00000000
727 @ 5467:         INIT   1
728 @ 5470:         PUSHI  #0x00000000
729 @ 5475:         INIT   1
730 @ 5478:         PUSHI  #0x00000000
731 @ 5483:         INIT   1
732 @ 5486:         PUSHI  #0x00000000
733 @ 5491:         INIT   1
734 @ 5494:         PUSHI  #0x00000000
735 @ 5499:         INIT   1
736 @ 5502:         PUSHI  #0x00000000
737 @ 5507:         INIT   1
738 @ 5510:         PUSHI  #0x00000000
739 @ 5515:         INIT   1
740 @ 5518:         PUSHI  #0x00000000
741 @ 5523:         INIT   1
742 @ 5526:         PUSHI  #0x00000000
743 @ 5531:         INIT   1
744 @ 5534:         PUSHI  #0x00000000
745 @ 5539:         INIT   1
746 @ 5542:         PUSHI  #0x00000000
747 @ 5547:         INIT   1
748 @ 5550:         PUSHI  #0x00000000
749 @ 5555:         INIT   1
750 @ 5558:         PUSHI  #0x00000001
751 @ 5563:         INIT   1
752 @ 5566:         PUSHI  #0x00000007
753 @ 5571:         INIT   1
754 @ 5574:         PUSHI  #0x00000028
755 @ 5579:         INIT   1
756 @ 5582:         PUSHI  #0x00000031
757 @ 5587:         INIT   1
758 @ 5590:         PUSHI  #0x00000060
759 @ 5595:         INIT   1
760 @ 5598:         PUSHI  #0x00000000
761 @ 5603:         INIT   1

    29  %CONSTBYTEINTEGERARRAY ATOMIC(105:130) =
    30    14,   9,   4,  20,   6, 110, 111,  30,
    31     3,  80,  59,  59,  13,   4,  13,  59,
    32    43,  73,  79,  72,  71,   4,   2,   2,
    33     4,   2
    34  
762 @ 5606:         LINE   29 "regression-compile-tmp/comp412.imp"
763 @ 5644:         PUSHI  #0x00000069
764 @ 5649:         PUSHI  #0x00000082
765 @ 5654:         BOUNDS
766 @ 5655:         DEF    ATOMIC p1=V_0083 a/tf=1b b/format=2 c/ostate=112  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
767 @ 5673:         PUSHI  #0x0000000e
768 @ 5678:         INIT   1
769 @ 5681:         PUSHI  #0x00000009
770 @ 5686:         INIT   1
771 @ 5689:         PUSHI  #0x00000004
772 @ 5694:         INIT   1
773 @ 5697:         PUSHI  #0x00000014
774 @ 5702:         INIT   1
775 @ 5705:         PUSHI  #0x00000006
776 @ 5710:         INIT   1
777 @ 5713:         PUSHI  #0x0000006e
778 @ 5718:         INIT   1
779 @ 5721:         PUSHI  #0x0000006f
780 @ 5726:         INIT   1
781 @ 5729:         PUSHI  #0x0000001e
782 @ 5734:         INIT   1
783 @ 5737:         PUSHI  #0x00000003
784 @ 5742:         INIT   1
785 @ 5745:         PUSHI  #0x00000050
786 @ 5750:         INIT   1
787 @ 5753:         PUSHI  #0x0000003b
788 @ 5758:         INIT   1
789 @ 5761:         PUSHI  #0x0000003b
790 @ 5766:         INIT   1
791 @ 5769:         PUSHI  #0x0000000d
792 @ 5774:         INIT   1
793 @ 5777:         PUSHI  #0x00000004
794 @ 5782:         INIT   1
795 @ 5785:         PUSHI  #0x0000000d
796 @ 5790:         INIT   1
797 @ 5793:         PUSHI  #0x0000003b
798 @ 5798:         INIT   1
799 @ 5801:         PUSHI  #0x0000002b
800 @ 5806:         INIT   1
801 @ 5809:         PUSHI  #0x00000049
802 @ 5814:         INIT   1
803 @ 5817:         PUSHI  #0x0000004f
804 @ 5822:         INIT   1
805 @ 5825:         PUSHI  #0x00000048
806 @ 5830:         INIT   1
807 @ 5833:         PUSHI  #0x00000047
808 @ 5838:         INIT   1
809 @ 5841:         PUSHI  #0x00000004
810 @ 5846:         INIT   1
811 @ 5849:         PUSHI  #0x00000002
812 @ 5854:         INIT   1
813 @ 5857:         PUSHI  #0x00000002
814 @ 5862:         INIT   1
815 @ 5865:         PUSHI  #0x00000004
816 @ 5870:         INIT   1
817 @ 5873:         PUSHI  #0x00000002
818 @ 5878:         INIT   1

    35  %OWNSHORTINTEGERARRAY GRAM(0:GMAX) =
    36         0,  -32765,       4,       5,     511,    8198,       4,  -32748,
    37    -32747,  -32741,  -32740,  -32739,  -32738,  -32737,      15,  -32736,
    38    -32750,     511,  -32257,      15,      27,      22,  -32744,     511,
    39      8217,  -32747,     511,     511,     511,      27,      33,      37,
    40        36,    8226,  -32750,     511,      16,    8230,  -32737,     511,
    41    -32726,     511,      43,      44,  -32725,  -32721,      27,  -32725,
    42        44,  -32708,  -32706,  -32698,  -32689,  -32688,  -32687,  -32741,
    43    -32675,  -32686,  -32741,      66,  -32706,     511,  -32698,  -32695,
    44    -32257,      27,  -24482,  -24482,  -32673,     511,      71,  -32694,
    45    -32695,     511,  -32695,  -32257,      77,  -32681,     511,      89,
    46    -32257,    4187,  -32685,      84,  -32685,  -32695,     511,  -32695,
    47        27,  -32703,      73,  -32695,     511,    8219,    8219,   12315,
    48        97,      27,  -32657,  -32647,  -32655,  -32654,  -32647,  -32660,
    49    -32653,  -32651,  -32646,     122,  -32645,  -32649,     120,  -32644,
    50       121,  -32643,     126,  -32645,     119,  -32641,     128,  -24576,
    51      8192,     129,     130,       0,    8192,    8192,    8192,    8192,
    52       131,     132,     133,     134,     114,     115,     135,  -32649,
    53       123,  -32768,  -32622,  -32621,  -32620,  -32624,  -32619,     150,
    54    -32623,    8344,    8192,     126,     125,     154,  -32613,       0,
    55    -32612,       0,     157,       0,   20480,     150,  -32607,  -32606,
    56       163,    4096,    4608,    2048,  -32594,  -32768,  -32768,  -32594,
    57    -32594,  -32593,  -32593,  -32591,  -32591,     177,     178,  -32589,
    58         0,     180,     181,       0,     182,       0,     175,  -32594,
    59    -32768,  -32768,  -32594,  -32594,  -32594,  -32574,  -32574,  -32573,
    60    -32573,     195,     196,     197,       0,     198,     194,  -32564,
    61    -32564,  -32562,  -32562,     206,  -32561,       0,     208,       0,
    62       209,     204,  -32555,  -32768,       0,     214,   12503,       0,
    63      8409,  -32552,       0,  -24576,    8192,  -32542,     223,  -32541,
    64    -32540,     174,       0,     215,       0,  -32532,  -32536,     241,
    65    -32529,  -24576,  -32533,    8192,  -32533,  -32533,    8192,  -24576,
    66      8192,       0,     243,  -32526,  -32768,     243,  -32520,     249,
    67       250,     254,  -32516,       0,  -32518,     250,    8447,     256,
    68    -32510,       0,       0,  -32507,     262,    4608,    2311,     264,
    69     18697,  -32501,       0,   10240,  -32498,     271,     272,     273,
    70       274,     125,   16659,  -32491,       0,    8192,  -32768,  -32486,
    71    -32485,       0,     215,    8476,       0,  -32768,  -32768,  -32478,
    72    -32477,       0,     215,     284,  -32468,  -32474,    8487,  -32474,
    73    -32467,  -32468,  -32468,       0,    8489,    8488,    8495,  -32466,
    74    -32462,       0,    8496,    8500,  -32461,       0,  -32452,    8504,
    75    -32457,  -32451,  -32452,       0,    8506,    8505,    8511,  -32450,
    76         0,    8514,  -32447,  -32443,       0,    8515,  -32434,  -32440,
    77      8521,  -32440,  -32430,  -32429,  -32429,       0,    8527,  -32428,
    78    -32428,       0,    8522,    8523,    8527,    8534,  -32427,  -32423,
    79         0,    8535,    8539,  -32422,       0,     350,  -24223,  -24222,
    80         0,     355,     351,  -24223,       0,    8550,     359,    8552,
    81       361,    8554,     363,    8192,     365,    4462,       0,     368,
    82    -32401,       0,     371,    4468,     373,   12662,  -32392,     377,
    83       371,       0,     379,    8572,  -32390,       0,     383,    8576,
    84       385,    8407,  -32380,       0,  -32378,    8448,     388,  -32768,
    85    -32768,  -32370,  -32370,  -32369,  -32369,     399,     401,  -32366,
    86         0,       0,     403,     404,     398,     406,    4503,  -32359,
    87       377,     406,     411,    4508,     365,     414,    4511,     411,
    88       417,    4514,     414,     420,    4517,     417,     423,    4520,
    89       420,       0,       0,       0,       0,       0,       0,       0,
    90         0,       0,       0,       0,       0,       0,       0,       0,
    91         0,       0,       0,       0,       0,       0,       0,       0,
    92         0,       0,       0,       0,       0,       0,       0,       0,
    93         0,       0,       0,       0,       0,       0,       0,       0,
    94         0,       0,       0,       0,       0,       0,       0,       0,
    95         0,       0,       0,       0,       0,       0,       0,       0,
    96         0,       0,       0,       0,       0,       0,       0,       0,
    97         0,       0,       0,       0,       0,       0,       0,       0,
    98         0,       0,       0,       0,       0,       0,       0,       0,
    99         0,       0,       0,       0,       0,       0,       0,       0,
   100         0
   101  
819 @ 5881:         LINE   35 "regression-compile-tmp/comp412.imp"
820 @ 5919:         PUSHI  #0x00000000
821 @ 5924:         PUSHI  #0x00000200
822 @ 5929:         BOUNDS
823 @ 5930:         DEF    GRAM p1=V_0084 a/tf=1b b/format=3 c/ostate=121  type=1 (integer) form=11 (array) special=2 (short-integer) linkage=1 (own) spec=0 indirect=0 unass=1
824 @ 5946:         PUSHI  #0x00000000
825 @ 5951:         INIT   1
826 @ 5954:         PUSHI  #0xffff8003
827 @ 5959:         INIT   1
828 @ 5962:         PUSHI  #0x00000004
829 @ 5967:         INIT   1
830 @ 5970:         PUSHI  #0x00000005
831 @ 5975:         INIT   1
832 @ 5978:         PUSHI  #0x000001ff
833 @ 5983:         INIT   1
834 @ 5986:         PUSHI  #0x00002006
835 @ 5991:         INIT   1
836 @ 5994:         PUSHI  #0x00000004
837 @ 5999:         INIT   1
838 @ 6002:         PUSHI  #0xffff8014
839 @ 6007:         INIT   1
840 @ 6010:         PUSHI  #0xffff8015
841 @ 6015:         INIT   1
842 @ 6018:         PUSHI  #0xffff801b
843 @ 6023:         INIT   1
844 @ 6026:         PUSHI  #0xffff801c
845 @ 6031:         INIT   1
846 @ 6034:         PUSHI  #0xffff801d
847 @ 6039:         INIT   1
848 @ 6042:         PUSHI  #0xffff801e
849 @ 6047:         INIT   1
850 @ 6050:         PUSHI  #0xffff801f
851 @ 6055:         INIT   1
852 @ 6058:         PUSHI  #0x0000000f
853 @ 6063:         INIT   1
854 @ 6066:         PUSHI  #0xffff8020
855 @ 6071:         INIT   1
856 @ 6074:         PUSHI  #0xffff8012
857 @ 6079:         INIT   1
858 @ 6082:         PUSHI  #0x000001ff
859 @ 6087:         INIT   1
860 @ 6090:         PUSHI  #0xffff81ff
861 @ 6095:         INIT   1
862 @ 6098:         PUSHI  #0x0000000f
863 @ 6103:         INIT   1
864 @ 6106:         PUSHI  #0x0000001b
865 @ 6111:         INIT   1
866 @ 6114:         PUSHI  #0x00000016
867 @ 6119:         INIT   1
868 @ 6122:         PUSHI  #0xffff8018
869 @ 6127:         INIT   1
870 @ 6130:         PUSHI  #0x000001ff
871 @ 6135:         INIT   1
872 @ 6138:         PUSHI  #0x00002019
873 @ 6143:         INIT   1
874 @ 6146:         PUSHI  #0xffff8015
875 @ 6151:         INIT   1
876 @ 6154:         PUSHI  #0x000001ff
877 @ 6159:         INIT   1
878 @ 6162:         PUSHI  #0x000001ff
879 @ 6167:         INIT   1
880 @ 6170:         PUSHI  #0x000001ff
881 @ 6175:         INIT   1
882 @ 6178:         PUSHI  #0x0000001b
883 @ 6183:         INIT   1
884 @ 6186:         PUSHI  #0x00000021
885 @ 6191:         INIT   1
886 @ 6194:         PUSHI  #0x00000025
887 @ 6199:         INIT   1
888 @ 6202:         PUSHI  #0x00000024
889 @ 6207:         INIT   1
890 @ 6210:         PUSHI  #0x00002022
891 @ 6215:         INIT   1
892 @ 6218:         PUSHI  #0xffff8012
893 @ 6223:         INIT   1
894 @ 6226:         PUSHI  #0x000001ff
895 @ 6231:         INIT   1
896 @ 6234:         PUSHI  #0x00000010
897 @ 6239:         INIT   1
898 @ 6242:         PUSHI  #0x00002026
899 @ 6247:         INIT   1
900 @ 6250:         PUSHI  #0xffff801f
901 @ 6255:         INIT   1
902 @ 6258:         PUSHI  #0x000001ff
903 @ 6263:         INIT   1
904 @ 6266:         PUSHI  #0xffff802a
905 @ 6271:         INIT   1
906 @ 6274:         PUSHI  #0x000001ff
907 @ 6279:         INIT   1
908 @ 6282:         PUSHI  #0x0000002b
909 @ 6287:         INIT   1
910 @ 6290:         PUSHI  #0x0000002c
911 @ 6295:         INIT   1
912 @ 6298:         PUSHI  #0xffff802b
913 @ 6303:         INIT   1
914 @ 6306:         PUSHI  #0xffff802f
915 @ 6311:         INIT   1
916 @ 6314:         PUSHI  #0x0000001b
917 @ 6319:         INIT   1
918 @ 6322:         PUSHI  #0xffff802b
919 @ 6327:         INIT   1
920 @ 6330:         PUSHI  #0x0000002c
921 @ 6335:         INIT   1
922 @ 6338:         PUSHI  #0xffff803c
923 @ 6343:         INIT   1
924 @ 6346:         PUSHI  #0xffff803e
925 @ 6351:         INIT   1
926 @ 6354:         PUSHI  #0xffff8046
927 @ 6359:         INIT   1
928 @ 6362:         PUSHI  #0xffff804f
929 @ 6367:         INIT   1
930 @ 6370:         PUSHI  #0xffff8050
931 @ 6375:         INIT   1
932 @ 6378:         PUSHI  #0xffff8051
933 @ 6383:         INIT   1
934 @ 6386:         PUSHI  #0xffff801b
935 @ 6391:         INIT   1
936 @ 6394:         PUSHI  #0xffff805d
937 @ 6399:         INIT   1
938 @ 6402:         PUSHI  #0xffff8052
939 @ 6407:         INIT   1
940 @ 6410:         PUSHI  #0xffff801b
941 @ 6415:         INIT   1
942 @ 6418:         PUSHI  #0x00000042
943 @ 6423:         INIT   1
944 @ 6426:         PUSHI  #0xffff803e
945 @ 6431:         INIT   1
946 @ 6434:         PUSHI  #0x000001ff
947 @ 6439:         INIT   1
948 @ 6442:         PUSHI  #0xffff8046
949 @ 6447:         INIT   1
950 @ 6450:         PUSHI  #0xffff8049
951 @ 6455:         INIT   1
952 @ 6458:         PUSHI  #0xffff81ff
953 @ 6463:         INIT   1
954 @ 6466:         PUSHI  #0x0000001b
955 @ 6471:         INIT   1
956 @ 6474:         PUSHI  #0xffffa05e
957 @ 6479:         INIT   1
958 @ 6482:         PUSHI  #0xffffa05e
959 @ 6487:         INIT   1
960 @ 6490:         PUSHI  #0xffff805f
961 @ 6495:         INIT   1
962 @ 6498:         PUSHI  #0x000001ff
963 @ 6503:         INIT   1
964 @ 6506:         PUSHI  #0x00000047
965 @ 6511:         INIT   1
966 @ 6514:         PUSHI  #0xffff804a
967 @ 6519:         INIT   1
968 @ 6522:         PUSHI  #0xffff8049
969 @ 6527:         INIT   1
970 @ 6530:         PUSHI  #0x000001ff
971 @ 6535:         INIT   1
972 @ 6538:         PUSHI  #0xffff8049
973 @ 6543:         INIT   1
974 @ 6546:         PUSHI  #0xffff81ff
975 @ 6551:         INIT   1
976 @ 6554:         PUSHI  #0x0000004d
977 @ 6559:         INIT   1
978 @ 6562:         PUSHI  #0xffff8057
979 @ 6567:         INIT   1
980 @ 6570:         PUSHI  #0x000001ff
981 @ 6575:         INIT   1
982 @ 6578:         PUSHI  #0x00000059
983 @ 6583:         INIT   1
984 @ 6586:         PUSHI  #0xffff81ff
985 @ 6591:         INIT   1
986 @ 6594:         PUSHI  #0x0000105b
987 @ 6599:         INIT   1
988 @ 6602:         PUSHI  #0xffff8053
989 @ 6607:         INIT   1
990 @ 6610:         PUSHI  #0x00000054
991 @ 6615:         INIT   1
992 @ 6618:         PUSHI  #0xffff8053
993 @ 6623:         INIT   1
994 @ 6626:         PUSHI  #0xffff8049
995 @ 6631:         INIT   1
996 @ 6634:         PUSHI  #0x000001ff
997 @ 6639:         INIT   1
998 @ 6642:         PUSHI  #0xffff8049
999 @ 6647:         INIT   1
1000 @ 6650:         PUSHI  #0x0000001b
1001 @ 6655:         INIT   1
1002 @ 6658:         PUSHI  #0xffff8041
1003 @ 6663:         INIT   1
1004 @ 6666:         PUSHI  #0x00000049
1005 @ 6671:         INIT   1
1006 @ 6674:         PUSHI  #0xffff8049
1007 @ 6679:         INIT   1
1008 @ 6682:         PUSHI  #0x000001ff
1009 @ 6687:         INIT   1
1010 @ 6690:         PUSHI  #0x0000201b
1011 @ 6695:         INIT   1
1012 @ 6698:         PUSHI  #0x0000201b
1013 @ 6703:         INIT   1
1014 @ 6706:         PUSHI  #0x0000301b
1015 @ 6711:         INIT   1
1016 @ 6714:         PUSHI  #0x00000061
1017 @ 6719:         INIT   1
1018 @ 6722:         PUSHI  #0x0000001b
1019 @ 6727:         INIT   1
1020 @ 6730:         PUSHI  #0xffff806f
1021 @ 6735:         INIT   1
1022 @ 6738:         PUSHI  #0xffff8079
1023 @ 6743:         INIT   1
1024 @ 6746:         PUSHI  #0xffff8071
1025 @ 6751:         INIT   1
1026 @ 6754:         PUSHI  #0xffff8072
1027 @ 6759:         INIT   1
1028 @ 6762:         PUSHI  #0xffff8079
1029 @ 6767:         INIT   1
1030 @ 6770:         PUSHI  #0xffff806c
1031 @ 6775:         INIT   1
1032 @ 6778:         PUSHI  #0xffff8073
1033 @ 6783:         INIT   1
1034 @ 6786:         PUSHI  #0xffff8075
1035 @ 6791:         INIT   1
1036 @ 6794:         PUSHI  #0xffff807a
1037 @ 6799:         INIT   1
1038 @ 6802:         PUSHI  #0x0000007a
1039 @ 6807:         INIT   1
1040 @ 6810:         PUSHI  #0xffff807b
1041 @ 6815:         INIT   1
1042 @ 6818:         PUSHI  #0xffff8077
1043 @ 6823:         INIT   1
1044 @ 6826:         PUSHI  #0x00000078
1045 @ 6831:         INIT   1
1046 @ 6834:         PUSHI  #0xffff807c
1047 @ 6839:         INIT   1
1048 @ 6842:         PUSHI  #0x00000079
1049 @ 6847:         INIT   1
1050 @ 6850:         PUSHI  #0xffff807d
1051 @ 6855:         INIT   1
1052 @ 6858:         PUSHI  #0x0000007e
1053 @ 6863:         INIT   1
1054 @ 6866:         PUSHI  #0xffff807b
1055 @ 6871:         INIT   1
1056 @ 6874:         PUSHI  #0x00000077
1057 @ 6879:         INIT   1
1058 @ 6882:         PUSHI  #0xffff807f
1059 @ 6887:         INIT   1
1060 @ 6890:         PUSHI  #0x00000080
1061 @ 6895:         INIT   1
1062 @ 6898:         PUSHI  #0xffffa000
1063 @ 6903:         INIT   1
1064 @ 6906:         PUSHI  #0x00002000
1065 @ 6911:         INIT   1
1066 @ 6914:         PUSHI  #0x00000081
1067 @ 6919:         INIT   1
1068 @ 6922:         PUSHI  #0x00000082
1069 @ 6927:         INIT   1
1070 @ 6930:         PUSHI  #0x00000000
1071 @ 6935:         INIT   1
1072 @ 6938:         PUSHI  #0x00002000
1073 @ 6943:         INIT   1
1074 @ 6946:         PUSHI  #0x00002000
1075 @ 6951:         INIT   1
1076 @ 6954:         PUSHI  #0x00002000
1077 @ 6959:         INIT   1
1078 @ 6962:         PUSHI  #0x00002000
1079 @ 6967:         INIT   1
1080 @ 6970:         PUSHI  #0x00000083
1081 @ 6975:         INIT   1
1082 @ 6978:         PUSHI  #0x00000084
1083 @ 6983:         INIT   1
1084 @ 6986:         PUSHI  #0x00000085
1085 @ 6991:         INIT   1
1086 @ 6994:         PUSHI  #0x00000086
1087 @ 6999:         INIT   1
1088 @ 7002:         PUSHI  #0x00000072
1089 @ 7007:         INIT   1
1090 @ 7010:         PUSHI  #0x00000073
1091 @ 7015:         INIT   1
1092 @ 7018:         PUSHI  #0x00000087
1093 @ 7023:         INIT   1
1094 @ 7026:         PUSHI  #0xffff8077
1095 @ 7031:         INIT   1
1096 @ 7034:         PUSHI  #0x0000007b
1097 @ 7039:         INIT   1
1098 @ 7042:         PUSHI  #0xffff8000
1099 @ 7047:         INIT   1
1100 @ 7050:         PUSHI  #0xffff8092
1101 @ 7055:         INIT   1
1102 @ 7058:         PUSHI  #0xffff8093
1103 @ 7063:         INIT   1
1104 @ 7066:         PUSHI  #0xffff8094
1105 @ 7071:         INIT   1
1106 @ 7074:         PUSHI  #0xffff8090
1107 @ 7079:         INIT   1
1108 @ 7082:         PUSHI  #0xffff8095
1109 @ 7087:         INIT   1
1110 @ 7090:         PUSHI  #0x00000096
1111 @ 7095:         INIT   1
1112 @ 7098:         PUSHI  #0xffff8091
1113 @ 7103:         INIT   1
1114 @ 7106:         PUSHI  #0x00002098
1115 @ 7111:         INIT   1
1116 @ 7114:         PUSHI  #0x00002000
1117 @ 7119:         INIT   1
1118 @ 7122:         PUSHI  #0x0000007e
1119 @ 7127:         INIT   1
1120 @ 7130:         PUSHI  #0x0000007d
1121 @ 7135:         INIT   1
1122 @ 7138:         PUSHI  #0x0000009a
1123 @ 7143:         INIT   1
1124 @ 7146:         PUSHI  #0xffff809b
1125 @ 7151:         INIT   1
1126 @ 7154:         PUSHI  #0x00000000
1127 @ 7159:         INIT   1
1128 @ 7162:         PUSHI  #0xffff809c
1129 @ 7167:         INIT   1
1130 @ 7170:         PUSHI  #0x00000000
1131 @ 7175:         INIT   1
1132 @ 7178:         PUSHI  #0x0000009d
1133 @ 7183:         INIT   1
1134 @ 7186:         PUSHI  #0x00000000
1135 @ 7191:         INIT   1
1136 @ 7194:         PUSHI  #0x00005000
1137 @ 7199:         INIT   1
1138 @ 7202:         PUSHI  #0x00000096
1139 @ 7207:         INIT   1
1140 @ 7210:         PUSHI  #0xffff80a1
1141 @ 7215:         INIT   1
1142 @ 7218:         PUSHI  #0xffff80a2
1143 @ 7223:         INIT   1
1144 @ 7226:         PUSHI  #0x000000a3
1145 @ 7231:         INIT   1
1146 @ 7234:         PUSHI  #0x00001000
1147 @ 7239:         INIT   1
1148 @ 7242:         PUSHI  #0x00001200
1149 @ 7247:         INIT   1
1150 @ 7250:         PUSHI  #0x00000800
1151 @ 7255:         INIT   1
1152 @ 7258:         PUSHI  #0xffff80ae
1153 @ 7263:         INIT   1
1154 @ 7266:         PUSHI  #0xffff8000
1155 @ 7271:         INIT   1
1156 @ 7274:         PUSHI  #0xffff8000
1157 @ 7279:         INIT   1
1158 @ 7282:         PUSHI  #0xffff80ae
1159 @ 7287:         INIT   1
1160 @ 7290:         PUSHI  #0xffff80ae
1161 @ 7295:         INIT   1
1162 @ 7298:         PUSHI  #0xffff80af
1163 @ 7303:         INIT   1
1164 @ 7306:         PUSHI  #0xffff80af
1165 @ 7311:         INIT   1
1166 @ 7314:         PUSHI  #0xffff80b1
1167 @ 7319:         INIT   1
1168 @ 7322:         PUSHI  #0xffff80b1
1169 @ 7327:         INIT   1
1170 @ 7330:         PUSHI  #0x000000b1
1171 @ 7335:         INIT   1
1172 @ 7338:         PUSHI  #0x000000b2
1173 @ 7343:         INIT   1
1174 @ 7346:         PUSHI  #0xffff80b3
1175 @ 7351:         INIT   1
1176 @ 7354:         PUSHI  #0x00000000
1177 @ 7359:         INIT   1
1178 @ 7362:         PUSHI  #0x000000b4
1179 @ 7367:         INIT   1
1180 @ 7370:         PUSHI  #0x000000b5
1181 @ 7375:         INIT   1
1182 @ 7378:         PUSHI  #0x00000000
1183 @ 7383:         INIT   1
1184 @ 7386:         PUSHI  #0x000000b6
1185 @ 7391:         INIT   1
1186 @ 7394:         PUSHI  #0x00000000
1187 @ 7399:         INIT   1
1188 @ 7402:         PUSHI  #0x000000af
1189 @ 7407:         INIT   1
1190 @ 7410:         PUSHI  #0xffff80ae
1191 @ 7415:         INIT   1
1192 @ 7418:         PUSHI  #0xffff8000
1193 @ 7423:         INIT   1
1194 @ 7426:         PUSHI  #0xffff8000
1195 @ 7431:         INIT   1
1196 @ 7434:         PUSHI  #0xffff80ae
1197 @ 7439:         INIT   1
1198 @ 7442:         PUSHI  #0xffff80ae
1199 @ 7447:         INIT   1
1200 @ 7450:         PUSHI  #0xffff80ae
1201 @ 7455:         INIT   1
1202 @ 7458:         PUSHI  #0xffff80c2
1203 @ 7463:         INIT   1
1204 @ 7466:         PUSHI  #0xffff80c2
1205 @ 7471:         INIT   1
1206 @ 7474:         PUSHI  #0xffff80c3
1207 @ 7479:         INIT   1
1208 @ 7482:         PUSHI  #0xffff80c3
1209 @ 7487:         INIT   1
1210 @ 7490:         PUSHI  #0x000000c3
1211 @ 7495:         INIT   1
1212 @ 7498:         PUSHI  #0x000000c4
1213 @ 7503:         INIT   1
1214 @ 7506:         PUSHI  #0x000000c5
1215 @ 7511:         INIT   1
1216 @ 7514:         PUSHI  #0x00000000
1217 @ 7519:         INIT   1
1218 @ 7522:         PUSHI  #0x000000c6
1219 @ 7527:         INIT   1
1220 @ 7530:         PUSHI  #0x000000c2
1221 @ 7535:         INIT   1
1222 @ 7538:         PUSHI  #0xffff80cc
1223 @ 7543:         INIT   1
1224 @ 7546:         PUSHI  #0xffff80cc
1225 @ 7551:         INIT   1
1226 @ 7554:         PUSHI  #0xffff80ce
1227 @ 7559:         INIT   1
1228 @ 7562:         PUSHI  #0xffff80ce
1229 @ 7567:         INIT   1
1230 @ 7570:         PUSHI  #0x000000ce
1231 @ 7575:         INIT   1
1232 @ 7578:         PUSHI  #0xffff80cf
1233 @ 7583:         INIT   1
1234 @ 7586:         PUSHI  #0x00000000
1235 @ 7591:         INIT   1
1236 @ 7594:         PUSHI  #0x000000d0
1237 @ 7599:         INIT   1
1238 @ 7602:         PUSHI  #0x00000000
1239 @ 7607:         INIT   1
1240 @ 7610:         PUSHI  #0x000000d1
1241 @ 7615:         INIT   1
1242 @ 7618:         PUSHI  #0x000000cc
1243 @ 7623:         INIT   1
1244 @ 7626:         PUSHI  #0xffff80d5
1245 @ 7631:         INIT   1
1246 @ 7634:         PUSHI  #0xffff8000
1247 @ 7639:         INIT   1
1248 @ 7642:         PUSHI  #0x00000000
1249 @ 7647:         INIT   1
1250 @ 7650:         PUSHI  #0x000000d6
1251 @ 7655:         INIT   1
1252 @ 7658:         PUSHI  #0x000030d7
1253 @ 7663:         INIT   1
1254 @ 7666:         PUSHI  #0x00000000
1255 @ 7671:         INIT   1
1256 @ 7674:         PUSHI  #0x000020d9
1257 @ 7679:         INIT   1
1258 @ 7682:         PUSHI  #0xffff80d8
1259 @ 7687:         INIT   1
1260 @ 7690:         PUSHI  #0x00000000
1261 @ 7695:         INIT   1
1262 @ 7698:         PUSHI  #0xffffa000
1263 @ 7703:         INIT   1
1264 @ 7706:         PUSHI  #0x00002000
1265 @ 7711:         INIT   1
1266 @ 7714:         PUSHI  #0xffff80e2
1267 @ 7719:         INIT   1
1268 @ 7722:         PUSHI  #0x000000df
1269 @ 7727:         INIT   1
1270 @ 7730:         PUSHI  #0xffff80e3
1271 @ 7735:         INIT   1
1272 @ 7738:         PUSHI  #0xffff80e4
1273 @ 7743:         INIT   1
1274 @ 7746:         PUSHI  #0x000000ae
1275 @ 7751:         INIT   1
1276 @ 7754:         PUSHI  #0x00000000
1277 @ 7759:         INIT   1
1278 @ 7762:         PUSHI  #0x000000d7
1279 @ 7767:         INIT   1
1280 @ 7770:         PUSHI  #0x00000000
1281 @ 7775:         INIT   1
1282 @ 7778:         PUSHI  #0xffff80ec
1283 @ 7783:         INIT   1
1284 @ 7786:         PUSHI  #0xffff80e8
1285 @ 7791:         INIT   1
1286 @ 7794:         PUSHI  #0x000000f1
1287 @ 7799:         INIT   1
1288 @ 7802:         PUSHI  #0xffff80ef
1289 @ 7807:         INIT   1
1290 @ 7810:         PUSHI  #0xffffa000
1291 @ 7815:         INIT   1
1292 @ 7818:         PUSHI  #0xffff80eb
1293 @ 7823:         INIT   1
1294 @ 7826:         PUSHI  #0x00002000
1295 @ 7831:         INIT   1
1296 @ 7834:         PUSHI  #0xffff80eb
1297 @ 7839:         INIT   1
1298 @ 7842:         PUSHI  #0xffff80eb
1299 @ 7847:         INIT   1
1300 @ 7850:         PUSHI  #0x00002000
1301 @ 7855:         INIT   1
1302 @ 7858:         PUSHI  #0xffffa000
1303 @ 7863:         INIT   1
1304 @ 7866:         PUSHI  #0x00002000
1305 @ 7871:         INIT   1
1306 @ 7874:         PUSHI  #0x00000000
1307 @ 7879:         INIT   1
1308 @ 7882:         PUSHI  #0x000000f3
1309 @ 7887:         INIT   1
1310 @ 7890:         PUSHI  #0xffff80f2
1311 @ 7895:         INIT   1
1312 @ 7898:         PUSHI  #0xffff8000
1313 @ 7903:         INIT   1
1314 @ 7906:         PUSHI  #0x000000f3
1315 @ 7911:         INIT   1
1316 @ 7914:         PUSHI  #0xffff80f8
1317 @ 7919:         INIT   1
1318 @ 7922:         PUSHI  #0x000000f9
1319 @ 7927:         INIT   1
1320 @ 7930:         PUSHI  #0x000000fa
1321 @ 7935:         INIT   1
1322 @ 7938:         PUSHI  #0x000000fe
1323 @ 7943:         INIT   1
1324 @ 7946:         PUSHI  #0xffff80fc
1325 @ 7951:         INIT   1
1326 @ 7954:         PUSHI  #0x00000000
1327 @ 7959:         INIT   1
1328 @ 7962:         PUSHI  #0xffff80fa
1329 @ 7967:         INIT   1
1330 @ 7970:         PUSHI  #0x000000fa
1331 @ 7975:         INIT   1
1332 @ 7978:         PUSHI  #0x000020ff
1333 @ 7983:         INIT   1
1334 @ 7986:         PUSHI  #0x00000100
1335 @ 7991:         INIT   1
1336 @ 7994:         PUSHI  #0xffff8102
1337 @ 7999:         INIT   1
1338 @ 8002:         PUSHI  #0x00000000
1339 @ 8007:         INIT   1
1340 @ 8010:         PUSHI  #0x00000000
1341 @ 8015:         INIT   1
1342 @ 8018:         PUSHI  #0xffff8105
1343 @ 8023:         INIT   1
1344 @ 8026:         PUSHI  #0x00000106
1345 @ 8031:         INIT   1
1346 @ 8034:         PUSHI  #0x00001200
1347 @ 8039:         INIT   1
1348 @ 8042:         PUSHI  #0x00000907
1349 @ 8047:         INIT   1
1350 @ 8050:         PUSHI  #0x00000108
1351 @ 8055:         INIT   1
1352 @ 8058:         PUSHI  #0x00004909
1353 @ 8063:         INIT   1
1354 @ 8066:         PUSHI  #0xffff810b
1355 @ 8071:         INIT   1
1356 @ 8074:         PUSHI  #0x00000000
1357 @ 8079:         INIT   1
1358 @ 8082:         PUSHI  #0x00002800
1359 @ 8087:         INIT   1
1360 @ 8090:         PUSHI  #0xffff810e
1361 @ 8095:         INIT   1
1362 @ 8098:         PUSHI  #0x0000010f
1363 @ 8103:         INIT   1
1364 @ 8106:         PUSHI  #0x00000110
1365 @ 8111:         INIT   1
1366 @ 8114:         PUSHI  #0x00000111
1367 @ 8119:         INIT   1
1368 @ 8122:         PUSHI  #0x00000112
1369 @ 8127:         INIT   1
1370 @ 8130:         PUSHI  #0x0000007d
1371 @ 8135:         INIT   1
1372 @ 8138:         PUSHI  #0x00004113
1373 @ 8143:         INIT   1
1374 @ 8146:         PUSHI  #0xffff8115
1375 @ 8151:         INIT   1
1376 @ 8154:         PUSHI  #0x00000000
1377 @ 8159:         INIT   1
1378 @ 8162:         PUSHI  #0x00002000
1379 @ 8167:         INIT   1
1380 @ 8170:         PUSHI  #0xffff8000
1381 @ 8175:         INIT   1
1382 @ 8178:         PUSHI  #0xffff811a
1383 @ 8183:         INIT   1
1384 @ 8186:         PUSHI  #0xffff811b
1385 @ 8191:         INIT   1
1386 @ 8194:         PUSHI  #0x00000000
1387 @ 8199:         INIT   1
1388 @ 8202:         PUSHI  #0x000000d7
1389 @ 8207:         INIT   1
1390 @ 8210:         PUSHI  #0x0000211c
1391 @ 8215:         INIT   1
1392 @ 8218:         PUSHI  #0x00000000
1393 @ 8223:         INIT   1
1394 @ 8226:         PUSHI  #0xffff8000
1395 @ 8231:         INIT   1
1396 @ 8234:         PUSHI  #0xffff8000
1397 @ 8239:         INIT   1
1398 @ 8242:         PUSHI  #0xffff8122
1399 @ 8247:         INIT   1
1400 @ 8250:         PUSHI  #0xffff8123
1401 @ 8255:         INIT   1
1402 @ 8258:         PUSHI  #0x00000000
1403 @ 8263:         INIT   1
1404 @ 8266:         PUSHI  #0x000000d7
1405 @ 8271:         INIT   1
1406 @ 8274:         PUSHI  #0x0000011c
1407 @ 8279:         INIT   1
1408 @ 8282:         PUSHI  #0xffff812c
1409 @ 8287:         INIT   1
1410 @ 8290:         PUSHI  #0xffff8126
1411 @ 8295:         INIT   1
1412 @ 8298:         PUSHI  #0x00002127
1413 @ 8303:         INIT   1
1414 @ 8306:         PUSHI  #0xffff8126
1415 @ 8311:         INIT   1
1416 @ 8314:         PUSHI  #0xffff812d
1417 @ 8319:         INIT   1
1418 @ 8322:         PUSHI  #0xffff812c
1419 @ 8327:         INIT   1
1420 @ 8330:         PUSHI  #0xffff812c
1421 @ 8335:         INIT   1
1422 @ 8338:         PUSHI  #0x00000000
1423 @ 8343:         INIT   1
1424 @ 8346:         PUSHI  #0x00002129
1425 @ 8351:         INIT   1
1426 @ 8354:         PUSHI  #0x00002128
1427 @ 8359:         INIT   1
1428 @ 8362:         PUSHI  #0x0000212f
1429 @ 8367:         INIT   1
1430 @ 8370:         PUSHI  #0xffff812e
1431 @ 8375:         INIT   1
1432 @ 8378:         PUSHI  #0xffff8132
1433 @ 8383:         INIT   1
1434 @ 8386:         PUSHI  #0x00000000
1435 @ 8391:         INIT   1
1436 @ 8394:         PUSHI  #0x00002130
1437 @ 8399:         INIT   1
1438 @ 8402:         PUSHI  #0x00002134
1439 @ 8407:         INIT   1
1440 @ 8410:         PUSHI  #0xffff8133
1441 @ 8415:         INIT   1
1442 @ 8418:         PUSHI  #0x00000000
1443 @ 8423:         INIT   1
1444 @ 8426:         PUSHI  #0xffff813c
1445 @ 8431:         INIT   1
1446 @ 8434:         PUSHI  #0x00002138
1447 @ 8439:         INIT   1
1448 @ 8442:         PUSHI  #0xffff8137
1449 @ 8447:         INIT   1
1450 @ 8450:         PUSHI  #0xffff813d
1451 @ 8455:         INIT   1
1452 @ 8458:         PUSHI  #0xffff813c
1453 @ 8463:         INIT   1
1454 @ 8466:         PUSHI  #0x00000000
1455 @ 8471:         INIT   1
1456 @ 8474:         PUSHI  #0x0000213a
1457 @ 8479:         INIT   1
1458 @ 8482:         PUSHI  #0x00002139
1459 @ 8487:         INIT   1
1460 @ 8490:         PUSHI  #0x0000213f
1461 @ 8495:         INIT   1
1462 @ 8498:         PUSHI  #0xffff813e
1463 @ 8503:         INIT   1
1464 @ 8506:         PUSHI  #0x00000000
1465 @ 8511:         INIT   1
1466 @ 8514:         PUSHI  #0x00002142
1467 @ 8519:         INIT   1
1468 @ 8522:         PUSHI  #0xffff8141
1469 @ 8527:         INIT   1
1470 @ 8530:         PUSHI  #0xffff8145
1471 @ 8535:         INIT   1
1472 @ 8538:         PUSHI  #0x00000000
1473 @ 8543:         INIT   1
1474 @ 8546:         PUSHI  #0x00002143
1475 @ 8551:         INIT   1
1476 @ 8554:         PUSHI  #0xffff814e
1477 @ 8559:         INIT   1
1478 @ 8562:         PUSHI  #0xffff8148
1479 @ 8567:         INIT   1
1480 @ 8570:         PUSHI  #0x00002149
1481 @ 8575:         INIT   1
1482 @ 8578:         PUSHI  #0xffff8148
1483 @ 8583:         INIT   1
1484 @ 8586:         PUSHI  #0xffff8152
1485 @ 8591:         INIT   1
1486 @ 8594:         PUSHI  #0xffff8153
1487 @ 8599:         INIT   1
1488 @ 8602:         PUSHI  #0xffff8153
1489 @ 8607:         INIT   1
1490 @ 8610:         PUSHI  #0x00000000
1491 @ 8615:         INIT   1
1492 @ 8618:         PUSHI  #0x0000214f
1493 @ 8623:         INIT   1
1494 @ 8626:         PUSHI  #0xffff8154
1495 @ 8631:         INIT   1
1496 @ 8634:         PUSHI  #0xffff8154
1497 @ 8639:         INIT   1
1498 @ 8642:         PUSHI  #0x00000000
1499 @ 8647:         INIT   1
1500 @ 8650:         PUSHI  #0x0000214a
1501 @ 8655:         INIT   1
1502 @ 8658:         PUSHI  #0x0000214b
1503 @ 8663:         INIT   1
1504 @ 8666:         PUSHI  #0x0000214f
1505 @ 8671:         INIT   1
1506 @ 8674:         PUSHI  #0x00002156
1507 @ 8679:         INIT   1
1508 @ 8682:         PUSHI  #0xffff8155
1509 @ 8687:         INIT   1
1510 @ 8690:         PUSHI  #0xffff8159
1511 @ 8695:         INIT   1
1512 @ 8698:         PUSHI  #0x00000000
1513 @ 8703:         INIT   1
1514 @ 8706:         PUSHI  #0x00002157
1515 @ 8711:         INIT   1
1516 @ 8714:         PUSHI  #0x0000215b
1517 @ 8719:         INIT   1
1518 @ 8722:         PUSHI  #0xffff815a
1519 @ 8727:         INIT   1
1520 @ 8730:         PUSHI  #0x00000000
1521 @ 8735:         INIT   1
1522 @ 8738:         PUSHI  #0x0000015e
1523 @ 8743:         INIT   1
1524 @ 8746:         PUSHI  #0xffffa161
1525 @ 8751:         INIT   1
1526 @ 8754:         PUSHI  #0xffffa162
1527 @ 8759:         INIT   1
1528 @ 8762:         PUSHI  #0x00000000
1529 @ 8767:         INIT   1
1530 @ 8770:         PUSHI  #0x00000163
1531 @ 8775:         INIT   1
1532 @ 8778:         PUSHI  #0x0000015f
1533 @ 8783:         INIT   1
1534 @ 8786:         PUSHI  #0xffffa161
1535 @ 8791:         INIT   1
1536 @ 8794:         PUSHI  #0x00000000
1537 @ 8799:         INIT   1
1538 @ 8802:         PUSHI  #0x00002166
1539 @ 8807:         INIT   1
1540 @ 8810:         PUSHI  #0x00000167
1541 @ 8815:         INIT   1
1542 @ 8818:         PUSHI  #0x00002168
1543 @ 8823:         INIT   1
1544 @ 8826:         PUSHI  #0x00000169
1545 @ 8831:         INIT   1
1546 @ 8834:         PUSHI  #0x0000216a
1547 @ 8839:         INIT   1
1548 @ 8842:         PUSHI  #0x0000016b
1549 @ 8847:         INIT   1
1550 @ 8850:         PUSHI  #0x00002000
1551 @ 8855:         INIT   1
1552 @ 8858:         PUSHI  #0x0000016d
1553 @ 8863:         INIT   1
1554 @ 8866:         PUSHI  #0x0000116e
1555 @ 8871:         INIT   1
1556 @ 8874:         PUSHI  #0x00000000
1557 @ 8879:         INIT   1
1558 @ 8882:         PUSHI  #0x00000170
1559 @ 8887:         INIT   1
1560 @ 8890:         PUSHI  #0xffff816f
1561 @ 8895:         INIT   1
1562 @ 8898:         PUSHI  #0x00000000
1563 @ 8903:         INIT   1
1564 @ 8906:         PUSHI  #0x00000173
1565 @ 8911:         INIT   1
1566 @ 8914:         PUSHI  #0x00001174
1567 @ 8919:         INIT   1
1568 @ 8922:         PUSHI  #0x00000175
1569 @ 8927:         INIT   1
1570 @ 8930:         PUSHI  #0x00003176
1571 @ 8935:         INIT   1
1572 @ 8938:         PUSHI  #0xffff8178
1573 @ 8943:         INIT   1
1574 @ 8946:         PUSHI  #0x00000179
1575 @ 8951:         INIT   1
1576 @ 8954:         PUSHI  #0x00000173
1577 @ 8959:         INIT   1
1578 @ 8962:         PUSHI  #0x00000000
1579 @ 8967:         INIT   1
1580 @ 8970:         PUSHI  #0x0000017b
1581 @ 8975:         INIT   1
1582 @ 8978:         PUSHI  #0x0000217c
1583 @ 8983:         INIT   1
1584 @ 8986:         PUSHI  #0xffff817a
1585 @ 8991:         INIT   1
1586 @ 8994:         PUSHI  #0x00000000
1587 @ 8999:         INIT   1
1588 @ 9002:         PUSHI  #0x0000017f
1589 @ 9007:         INIT   1
1590 @ 9010:         PUSHI  #0x00002180
1591 @ 9015:         INIT   1
1592 @ 9018:         PUSHI  #0x00000181
1593 @ 9023:         INIT   1
1594 @ 9026:         PUSHI  #0x000020d7
1595 @ 9031:         INIT   1
1596 @ 9034:         PUSHI  #0xffff8184
1597 @ 9039:         INIT   1
1598 @ 9042:         PUSHI  #0x00000000
1599 @ 9047:         INIT   1
1600 @ 9050:         PUSHI  #0xffff8186
1601 @ 9055:         INIT   1
1602 @ 9058:         PUSHI  #0x00002100
1603 @ 9063:         INIT   1
1604 @ 9066:         PUSHI  #0x00000184
1605 @ 9071:         INIT   1
1606 @ 9074:         PUSHI  #0xffff8000
1607 @ 9079:         INIT   1
1608 @ 9082:         PUSHI  #0xffff8000
1609 @ 9087:         INIT   1
1610 @ 9090:         PUSHI  #0xffff818e
1611 @ 9095:         INIT   1
1612 @ 9098:         PUSHI  #0xffff818e
1613 @ 9103:         INIT   1
1614 @ 9106:         PUSHI  #0xffff818f
1615 @ 9111:         INIT   1
1616 @ 9114:         PUSHI  #0xffff818f
1617 @ 9119:         INIT   1
1618 @ 9122:         PUSHI  #0x0000018f
1619 @ 9127:         INIT   1
1620 @ 9130:         PUSHI  #0x00000191
1621 @ 9135:         INIT   1
1622 @ 9138:         PUSHI  #0xffff8192
1623 @ 9143:         INIT   1
1624 @ 9146:         PUSHI  #0x00000000
1625 @ 9151:         INIT   1
1626 @ 9154:         PUSHI  #0x00000000
1627 @ 9159:         INIT   1
1628 @ 9162:         PUSHI  #0x00000193
1629 @ 9167:         INIT   1
1630 @ 9170:         PUSHI  #0x00000194
1631 @ 9175:         INIT   1
1632 @ 9178:         PUSHI  #0x0000018e
1633 @ 9183:         INIT   1
1634 @ 9186:         PUSHI  #0x00000196
1635 @ 9191:         INIT   1
1636 @ 9194:         PUSHI  #0x00001197
1637 @ 9199:         INIT   1
1638 @ 9202:         PUSHI  #0xffff8199
1639 @ 9207:         INIT   1
1640 @ 9210:         PUSHI  #0x00000179
1641 @ 9215:         INIT   1
1642 @ 9218:         PUSHI  #0x00000196
1643 @ 9223:         INIT   1
1644 @ 9226:         PUSHI  #0x0000019b
1645 @ 9231:         INIT   1
1646 @ 9234:         PUSHI  #0x0000119c
1647 @ 9239:         INIT   1
1648 @ 9242:         PUSHI  #0x0000016d
1649 @ 9247:         INIT   1
1650 @ 9250:         PUSHI  #0x0000019e
1651 @ 9255:         INIT   1
1652 @ 9258:         PUSHI  #0x0000119f
1653 @ 9263:         INIT   1
1654 @ 9266:         PUSHI  #0x0000019b
1655 @ 9271:         INIT   1
1656 @ 9274:         PUSHI  #0x000001a1
1657 @ 9279:         INIT   1
1658 @ 9282:         PUSHI  #0x000011a2
1659 @ 9287:         INIT   1
1660 @ 9290:         PUSHI  #0x0000019e
1661 @ 9295:         INIT   1
1662 @ 9298:         PUSHI  #0x000001a4
1663 @ 9303:         INIT   1
1664 @ 9306:         PUSHI  #0x000011a5
1665 @ 9311:         INIT   1
1666 @ 9314:         PUSHI  #0x000001a1
1667 @ 9319:         INIT   1
1668 @ 9322:         PUSHI  #0x000001a7
1669 @ 9327:         INIT   1
1670 @ 9330:         PUSHI  #0x000011a8
1671 @ 9335:         INIT   1
1672 @ 9338:         PUSHI  #0x000001a4
1673 @ 9343:         INIT   1
1674 @ 9346:         PUSHI  #0x00000000
1675 @ 9351:         INIT   1
1676 @ 9354:         PUSHI  #0x00000000
1677 @ 9359:         INIT   1
1678 @ 9362:         PUSHI  #0x00000000
1679 @ 9367:         INIT   1
1680 @ 9370:         PUSHI  #0x00000000
1681 @ 9375:         INIT   1
1682 @ 9378:         PUSHI  #0x00000000
1683 @ 9383:         INIT   1
1684 @ 9386:         PUSHI  #0x00000000
1685 @ 9391:         INIT   1
1686 @ 9394:         PUSHI  #0x00000000
1687 @ 9399:         INIT   1
1688 @ 9402:         PUSHI  #0x00000000
1689 @ 9407:         INIT   1
1690 @ 9410:         PUSHI  #0x00000000
1691 @ 9415:         INIT   1
1692 @ 9418:         PUSHI  #0x00000000
1693 @ 9423:         INIT   1
1694 @ 9426:         PUSHI  #0x00000000
1695 @ 9431:         INIT   1
1696 @ 9434:         PUSHI  #0x00000000
1697 @ 9439:         INIT   1
1698 @ 9442:         PUSHI  #0x00000000
1699 @ 9447:         INIT   1
1700 @ 9450:         PUSHI  #0x00000000
1701 @ 9455:         INIT   1
1702 @ 9458:         PUSHI  #0x00000000
1703 @ 9463:         INIT   1
1704 @ 9466:         PUSHI  #0x00000000
1705 @ 9471:         INIT   1
1706 @ 9474:         PUSHI  #0x00000000
1707 @ 9479:         INIT   1
1708 @ 9482:         PUSHI  #0x00000000
1709 @ 9487:         INIT   1
1710 @ 9490:         PUSHI  #0x00000000
1711 @ 9495:         INIT   1
1712 @ 9498:         PUSHI  #0x00000000
1713 @ 9503:         INIT   1
1714 @ 9506:         PUSHI  #0x00000000
1715 @ 9511:         INIT   1
1716 @ 9514:         PUSHI  #0x00000000
1717 @ 9519:         INIT   1
1718 @ 9522:         PUSHI  #0x00000000
1719 @ 9527:         INIT   1
1720 @ 9530:         PUSHI  #0x00000000
1721 @ 9535:         INIT   1
1722 @ 9538:         PUSHI  #0x00000000
1723 @ 9543:         INIT   1
1724 @ 9546:         PUSHI  #0x00000000
1725 @ 9551:         INIT   1
1726 @ 9554:         PUSHI  #0x00000000
1727 @ 9559:         INIT   1
1728 @ 9562:         PUSHI  #0x00000000
1729 @ 9567:         INIT   1
1730 @ 9570:         PUSHI  #0x00000000
1731 @ 9575:         INIT   1
1732 @ 9578:         PUSHI  #0x00000000
1733 @ 9583:         INIT   1
1734 @ 9586:         PUSHI  #0x00000000
1735 @ 9591:         INIT   1
1736 @ 9594:         PUSHI  #0x00000000
1737 @ 9599:         INIT   1
1738 @ 9602:         PUSHI  #0x00000000
1739 @ 9607:         INIT   1
1740 @ 9610:         PUSHI  #0x00000000
1741 @ 9615:         INIT   1
1742 @ 9618:         PUSHI  #0x00000000
1743 @ 9623:         INIT   1
1744 @ 9626:         PUSHI  #0x00000000
1745 @ 9631:         INIT   1
1746 @ 9634:         PUSHI  #0x00000000
1747 @ 9639:         INIT   1
1748 @ 9642:         PUSHI  #0x00000000
1749 @ 9647:         INIT   1
1750 @ 9650:         PUSHI  #0x00000000
1751 @ 9655:         INIT   1
1752 @ 9658:         PUSHI  #0x00000000
1753 @ 9663:         INIT   1
1754 @ 9666:         PUSHI  #0x00000000
1755 @ 9671:         INIT   1
1756 @ 9674:         PUSHI  #0x00000000
1757 @ 9679:         INIT   1
1758 @ 9682:         PUSHI  #0x00000000
1759 @ 9687:         INIT   1
1760 @ 9690:         PUSHI  #0x00000000
1761 @ 9695:         INIT   1
1762 @ 9698:         PUSHI  #0x00000000
1763 @ 9703:         INIT   1
1764 @ 9706:         PUSHI  #0x00000000
1765 @ 9711:         INIT   1
1766 @ 9714:         PUSHI  #0x00000000
1767 @ 9719:         INIT   1
1768 @ 9722:         PUSHI  #0x00000000
1769 @ 9727:         INIT   1
1770 @ 9730:         PUSHI  #0x00000000
1771 @ 9735:         INIT   1
1772 @ 9738:         PUSHI  #0x00000000
1773 @ 9743:         INIT   1
1774 @ 9746:         PUSHI  #0x00000000
1775 @ 9751:         INIT   1
1776 @ 9754:         PUSHI  #0x00000000
1777 @ 9759:         INIT   1
1778 @ 9762:         PUSHI  #0x00000000
1779 @ 9767:         INIT   1
1780 @ 9770:         PUSHI  #0x00000000
1781 @ 9775:         INIT   1
1782 @ 9778:         PUSHI  #0x00000000
1783 @ 9783:         INIT   1
1784 @ 9786:         PUSHI  #0x00000000
1785 @ 9791:         INIT   1
1786 @ 9794:         PUSHI  #0x00000000
1787 @ 9799:         INIT   1
1788 @ 9802:         PUSHI  #0x00000000
1789 @ 9807:         INIT   1
1790 @ 9810:         PUSHI  #0x00000000
1791 @ 9815:         INIT   1
1792 @ 9818:         PUSHI  #0x00000000
1793 @ 9823:         INIT   1
1794 @ 9826:         PUSHI  #0x00000000
1795 @ 9831:         INIT   1
1796 @ 9834:         PUSHI  #0x00000000
1797 @ 9839:         INIT   1
1798 @ 9842:         PUSHI  #0x00000000
1799 @ 9847:         INIT   1
1800 @ 9850:         PUSHI  #0x00000000
1801 @ 9855:         INIT   1
1802 @ 9858:         PUSHI  #0x00000000
1803 @ 9863:         INIT   1
1804 @ 9866:         PUSHI  #0x00000000
1805 @ 9871:         INIT   1
1806 @ 9874:         PUSHI  #0x00000000
1807 @ 9879:         INIT   1
1808 @ 9882:         PUSHI  #0x00000000
1809 @ 9887:         INIT   1
1810 @ 9890:         PUSHI  #0x00000000
1811 @ 9895:         INIT   1
1812 @ 9898:         PUSHI  #0x00000000
1813 @ 9903:         INIT   1
1814 @ 9906:         PUSHI  #0x00000000
1815 @ 9911:         INIT   1
1816 @ 9914:         PUSHI  #0x00000000
1817 @ 9919:         INIT   1
1818 @ 9922:         PUSHI  #0x00000000
1819 @ 9927:         INIT   1
1820 @ 9930:         PUSHI  #0x00000000
1821 @ 9935:         INIT   1
1822 @ 9938:         PUSHI  #0x00000000
1823 @ 9943:         INIT   1
1824 @ 9946:         PUSHI  #0x00000000
1825 @ 9951:         INIT   1
1826 @ 9954:         PUSHI  #0x00000000
1827 @ 9959:         INIT   1
1828 @ 9962:         PUSHI  #0x00000000
1829 @ 9967:         INIT   1
1830 @ 9970:         PUSHI  #0x00000000
1831 @ 9975:         INIT   1
1832 @ 9978:         PUSHI  #0x00000000
1833 @ 9983:         INIT   1
1834 @ 9986:         PUSHI  #0x00000000
1835 @ 9991:         INIT   1
1836 @ 9994:         PUSHI  #0x00000000
1837 @ 9999:         INIT   1
1838 @ 10002:         PUSHI  #0x00000000
1839 @ 10007:         INIT   1
1840 @ 10010:         PUSHI  #0x00000000
1841 @ 10015:         INIT   1
1842 @ 10018:         PUSHI  #0x00000000
1843 @ 10023:         INIT   1
1844 @ 10026:         PUSHI  #0x00000000
1845 @ 10031:         INIT   1
1846 @ 10034:         PUSHI  #0x00000000
1847 @ 10039:         INIT   1
1848 @ 10042:         PUSHI  #0x00000000
1849 @ 10047:         INIT   1

   102  %OWNBYTEINTEGERARRAY GCLASS(0:GMAX) =
   103       255,     114,     116,       1,      89,     162,       2,      53,
   104        54,      49,      50,      51,      52,      57,     142,       1,
   105       118,     117,      13,     142,     152,     152,       6,     117,
   106       142,     118,     117,      13,      59,     144,      59,     152,
   107        83,     164,       6,     117,     128,     164,       4,      13,
   108         1,      13,      56,      59,      56,       4,       2,      56,
   109        59,      34,      35,      28,      29,      10,      11,      33,
   110        42,      19,      48,     133,      35,      13,      28,      12,
   111       119,     133,      28,      29,      11,      13,     150,       5,
   112        12,     119,      12,     119,     133,      35,      13,     150,
   113       119,     165,      15,      83,       4,      12,     119,      12,
   114       133,       5,      10,      10,     119,      83,     150,     165,
   115         1,     138,      63,      62,      61,      60,      64,      75,
   116        74,      77,      78,      76,      94,     109,      20,      20,
   117        95,      20,     109,      94,     109,      20,      95,      83,
   118       161,     101,     101,     143,     159,     137,     163,     166,
   119       101,     153,     153,     153,     102,     102,     102,     109,
   120        94,      23,       8,      22,      21,      24,      73,     143,
   121        15,      83,     141,      90,      91,     101,     112,       0,
   122         4,       0,     153,     133,     147,     102,      86,      87,
   123        88,     147,     146,     140,      70,      67,      68,      69,
   124        71,      74,      75,      76,      77,      78,     101,      94,
   125         0,     101,     153,     137,     153,     102,     102,      70,
   126        67,      68,      69,      72,      71,      74,      75,      76,
   127        77,      78,      94,     101,     145,     153,     102,      74,
   128        75,      76,      77,      78,      94,       0,     101,     161,
   129       153,     102,      80,      81,     115,       1,     147,       2,
   130       134,     105,       0,      82,     145,      99,     100,       1,
   131        32,      79,     149,     150,     151,      86,      87,      88,
   132        43,      84,      45,      83,      43,      45,      83,      84,
   133        83,      82,     139,       4,       2,     139,      53,      51,
   134        59,     152,       4,       0,      59,     139,     164,      97,
   135         4,       0,     136,      99,     100,     148,     140,      46,
   136       140,      46,       0,     140,      99,     100,     132,     137,
   137        46,     108,     132,      46,       0,     132,      83,       1,
   138         9,     145,     147,     167,     106,      84,      83,       1,
   139         9,     145,     132,     168,      43,      45,     167,      36,
   140        38,      39,      40,       0,     170,     169,     167,      36,
   141        38,       0,     169,     167,      36,       0,      43,     168,
   142        37,      41,      40,       0,     172,     171,     168,      37,
   143         0,     168,      37,      41,       0,     171,      43,      45,
   144       168,      36,      38,      39,      40,       0,     174,      39,
   145        40,       0,     173,     174,     172,     168,      36,      38,
   146         0,     173,     168,      36,       0,     151,      30,      31,
   147         0,     151,     151,      30,       0,     137,       6,     147,
   148         4,     147,     126,     147,       1,     147,     127,      59,
   149         4,       0,       1,     147,     113,     147,       4,       2,
   150        98,      97,     152,     175,       4,       0,       1,     162,
   151       113,     162,      59,     139,       4,     164,      59,      70,
   152        69,      74,      75,      76,      77,      78,      94,      95,
   153         0,     159,     101,     153,     102,       1,     147,       4,
   154       127,      98,       1,     147,     107,       1,     147,     107,
   155         1,     147,     107,       1,     147,     107,       1,     147,
   156       107,     124,     125,     147,     107,     147,     107,     147,
   157       107,     147,     127,       0,       0,       0,       0,       0,
   158         0,       0,       0,       0,       0,       0,       0,       0,
   159         0,       0,       0,       0,       0,       0,       0,       0,
   160         0,       0,       0,       0,       0,       0,       0,       0,
   161         0,       0,       0,       0,       0,       0,       0,       0,
   162         0,       0,       0,       0,       0,       0,       0,       0,
   163         0,       0,       0,       0,       0,       0,       0,       0,
   164         0,       0,       0,       0,       0,       0,       0,       0,
   165         0,       0,       0,       0,       0,       0,       0,       0,
   166         0,       0,       0,       0,       0,       0,       0,       0,
   167         0
   168  
1850 @ 10050:         LINE   102 "regression-compile-tmp/comp412.imp"
1851 @ 10088:         PUSHI  #0x00000000
1852 @ 10093:         PUSHI  #0x00000200
1853 @ 10098:         BOUNDS
1854 @ 10099:         DEF    GCLASS p1=V_0085 a/tf=1b b/format=2 c/ostate=121  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=1 (own) spec=0 indirect=0 unass=1
1855 @ 10117:         PUSHI  #0x000000ff
1856 @ 10122:         INIT   1
1857 @ 10125:         PUSHI  #0x00000072
1858 @ 10130:         INIT   1
1859 @ 10133:         PUSHI  #0x00000074
1860 @ 10138:         INIT   1
1861 @ 10141:         PUSHI  #0x00000001
1862 @ 10146:         INIT   1
1863 @ 10149:         PUSHI  #0x00000059
1864 @ 10154:         INIT   1
1865 @ 10157:         PUSHI  #0x000000a2
1866 @ 10162:         INIT   1
1867 @ 10165:         PUSHI  #0x00000002
1868 @ 10170:         INIT   1
1869 @ 10173:         PUSHI  #0x00000035
1870 @ 10178:         INIT   1
1871 @ 10181:         PUSHI  #0x00000036
1872 @ 10186:         INIT   1
1873 @ 10189:         PUSHI  #0x00000031
1874 @ 10194:         INIT   1
1875 @ 10197:         PUSHI  #0x00000032
1876 @ 10202:         INIT   1
1877 @ 10205:         PUSHI  #0x00000033
1878 @ 10210:         INIT   1
1879 @ 10213:         PUSHI  #0x00000034
1880 @ 10218:         INIT   1
1881 @ 10221:         PUSHI  #0x00000039
1882 @ 10226:         INIT   1
1883 @ 10229:         PUSHI  #0x0000008e
1884 @ 10234:         INIT   1
1885 @ 10237:         PUSHI  #0x00000001
1886 @ 10242:         INIT   1
1887 @ 10245:         PUSHI  #0x00000076
1888 @ 10250:         INIT   1
1889 @ 10253:         PUSHI  #0x00000075
1890 @ 10258:         INIT   1
1891 @ 10261:         PUSHI  #0x0000000d
1892 @ 10266:         INIT   1
1893 @ 10269:         PUSHI  #0x0000008e
1894 @ 10274:         INIT   1
1895 @ 10277:         PUSHI  #0x00000098
1896 @ 10282:         INIT   1
1897 @ 10285:         PUSHI  #0x00000098
1898 @ 10290:         INIT   1
1899 @ 10293:         PUSHI  #0x00000006
1900 @ 10298:         INIT   1
1901 @ 10301:         PUSHI  #0x00000075
1902 @ 10306:         INIT   1
1903 @ 10309:         PUSHI  #0x0000008e
1904 @ 10314:         INIT   1
1905 @ 10317:         PUSHI  #0x00000076
1906 @ 10322:         INIT   1
1907 @ 10325:         PUSHI  #0x00000075
1908 @ 10330:         INIT   1
1909 @ 10333:         PUSHI  #0x0000000d
1910 @ 10338:         INIT   1
1911 @ 10341:         PUSHI  #0x0000003b
1912 @ 10346:         INIT   1
1913 @ 10349:         PUSHI  #0x00000090
1914 @ 10354:         INIT   1
1915 @ 10357:         PUSHI  #0x0000003b
1916 @ 10362:         INIT   1
1917 @ 10365:         PUSHI  #0x00000098
1918 @ 10370:         INIT   1
1919 @ 10373:         PUSHI  #0x00000053
1920 @ 10378:         INIT   1
1921 @ 10381:         PUSHI  #0x000000a4
1922 @ 10386:         INIT   1
1923 @ 10389:         PUSHI  #0x00000006
1924 @ 10394:         INIT   1
1925 @ 10397:         PUSHI  #0x00000075
1926 @ 10402:         INIT   1
1927 @ 10405:         PUSHI  #0x00000080
1928 @ 10410:         INIT   1
1929 @ 10413:         PUSHI  #0x000000a4
1930 @ 10418:         INIT   1
1931 @ 10421:         PUSHI  #0x00000004
1932 @ 10426:         INIT   1
1933 @ 10429:         PUSHI  #0x0000000d
1934 @ 10434:         INIT   1
1935 @ 10437:         PUSHI  #0x00000001
1936 @ 10442:         INIT   1
1937 @ 10445:         PUSHI  #0x0000000d
1938 @ 10450:         INIT   1
1939 @ 10453:         PUSHI  #0x00000038
1940 @ 10458:         INIT   1
1941 @ 10461:         PUSHI  #0x0000003b
1942 @ 10466:         INIT   1
1943 @ 10469:         PUSHI  #0x00000038
1944 @ 10474:         INIT   1
1945 @ 10477:         PUSHI  #0x00000004
1946 @ 10482:         INIT   1
1947 @ 10485:         PUSHI  #0x00000002
1948 @ 10490:         INIT   1
1949 @ 10493:         PUSHI  #0x00000038
1950 @ 10498:         INIT   1
1951 @ 10501:         PUSHI  #0x0000003b
1952 @ 10506:         INIT   1
1953 @ 10509:         PUSHI  #0x00000022
1954 @ 10514:         INIT   1
1955 @ 10517:         PUSHI  #0x00000023
1956 @ 10522:         INIT   1
1957 @ 10525:         PUSHI  #0x0000001c
1958 @ 10530:         INIT   1
1959 @ 10533:         PUSHI  #0x0000001d
1960 @ 10538:         INIT   1
1961 @ 10541:         PUSHI  #0x0000000a
1962 @ 10546:         INIT   1
1963 @ 10549:         PUSHI  #0x0000000b
1964 @ 10554:         INIT   1
1965 @ 10557:         PUSHI  #0x00000021
1966 @ 10562:         INIT   1
1967 @ 10565:         PUSHI  #0x0000002a
1968 @ 10570:         INIT   1
1969 @ 10573:         PUSHI  #0x00000013
1970 @ 10578:         INIT   1
1971 @ 10581:         PUSHI  #0x00000030
1972 @ 10586:         INIT   1
1973 @ 10589:         PUSHI  #0x00000085
1974 @ 10594:         INIT   1
1975 @ 10597:         PUSHI  #0x00000023
1976 @ 10602:         INIT   1
1977 @ 10605:         PUSHI  #0x0000000d
1978 @ 10610:         INIT   1
1979 @ 10613:         PUSHI  #0x0000001c
1980 @ 10618:         INIT   1
1981 @ 10621:         PUSHI  #0x0000000c
1982 @ 10626:         INIT   1
1983 @ 10629:         PUSHI  #0x00000077
1984 @ 10634:         INIT   1
1985 @ 10637:         PUSHI  #0x00000085
1986 @ 10642:         INIT   1
1987 @ 10645:         PUSHI  #0x0000001c
1988 @ 10650:         INIT   1
1989 @ 10653:         PUSHI  #0x0000001d
1990 @ 10658:         INIT   1
1991 @ 10661:         PUSHI  #0x0000000b
1992 @ 10666:         INIT   1
1993 @ 10669:         PUSHI  #0x0000000d
1994 @ 10674:         INIT   1
1995 @ 10677:         PUSHI  #0x00000096
1996 @ 10682:         INIT   1
1997 @ 10685:         PUSHI  #0x00000005
1998 @ 10690:         INIT   1
1999 @ 10693:         PUSHI  #0x0000000c
2000 @ 10698:         INIT   1
2001 @ 10701:         PUSHI  #0x00000077
2002 @ 10706:         INIT   1
2003 @ 10709:         PUSHI  #0x0000000c
2004 @ 10714:         INIT   1
2005 @ 10717:         PUSHI  #0x00000077
2006 @ 10722:         INIT   1
2007 @ 10725:         PUSHI  #0x00000085
2008 @ 10730:         INIT   1
2009 @ 10733:         PUSHI  #0x00000023
2010 @ 10738:         INIT   1
2011 @ 10741:         PUSHI  #0x0000000d
2012 @ 10746:         INIT   1
2013 @ 10749:         PUSHI  #0x00000096
2014 @ 10754:         INIT   1
2015 @ 10757:         PUSHI  #0x00000077
2016 @ 10762:         INIT   1
2017 @ 10765:         PUSHI  #0x000000a5
2018 @ 10770:         INIT   1
2019 @ 10773:         PUSHI  #0x0000000f
2020 @ 10778:         INIT   1
2021 @ 10781:         PUSHI  #0x00000053
2022 @ 10786:         INIT   1
2023 @ 10789:         PUSHI  #0x00000004
2024 @ 10794:         INIT   1
2025 @ 10797:         PUSHI  #0x0000000c
2026 @ 10802:         INIT   1
2027 @ 10805:         PUSHI  #0x00000077
2028 @ 10810:         INIT   1
2029 @ 10813:         PUSHI  #0x0000000c
2030 @ 10818:         INIT   1
2031 @ 10821:         PUSHI  #0x00000085
2032 @ 10826:         INIT   1
2033 @ 10829:         PUSHI  #0x00000005
2034 @ 10834:         INIT   1
2035 @ 10837:         PUSHI  #0x0000000a
2036 @ 10842:         INIT   1
2037 @ 10845:         PUSHI  #0x0000000a
2038 @ 10850:         INIT   1
2039 @ 10853:         PUSHI  #0x00000077
2040 @ 10858:         INIT   1
2041 @ 10861:         PUSHI  #0x00000053
2042 @ 10866:         INIT   1
2043 @ 10869:         PUSHI  #0x00000096
2044 @ 10874:         INIT   1
2045 @ 10877:         PUSHI  #0x000000a5
2046 @ 10882:         INIT   1
2047 @ 10885:         PUSHI  #0x00000001
2048 @ 10890:         INIT   1
2049 @ 10893:         PUSHI  #0x0000008a
2050 @ 10898:         INIT   1
2051 @ 10901:         PUSHI  #0x0000003f
2052 @ 10906:         INIT   1
2053 @ 10909:         PUSHI  #0x0000003e
2054 @ 10914:         INIT   1
2055 @ 10917:         PUSHI  #0x0000003d
2056 @ 10922:         INIT   1
2057 @ 10925:         PUSHI  #0x0000003c
2058 @ 10930:         INIT   1
2059 @ 10933:         PUSHI  #0x00000040
2060 @ 10938:         INIT   1
2061 @ 10941:         PUSHI  #0x0000004b
2062 @ 10946:         INIT   1
2063 @ 10949:         PUSHI  #0x0000004a
2064 @ 10954:         INIT   1
2065 @ 10957:         PUSHI  #0x0000004d
2066 @ 10962:         INIT   1
2067 @ 10965:         PUSHI  #0x0000004e
2068 @ 10970:         INIT   1
2069 @ 10973:         PUSHI  #0x0000004c
2070 @ 10978:         INIT   1
2071 @ 10981:         PUSHI  #0x0000005e
2072 @ 10986:         INIT   1
2073 @ 10989:         PUSHI  #0x0000006d
2074 @ 10994:         INIT   1
2075 @ 10997:         PUSHI  #0x00000014
2076 @ 11002:         INIT   1
2077 @ 11005:         PUSHI  #0x00000014
2078 @ 11010:         INIT   1
2079 @ 11013:         PUSHI  #0x0000005f
2080 @ 11018:         INIT   1
2081 @ 11021:         PUSHI  #0x00000014
2082 @ 11026:         INIT   1
2083 @ 11029:         PUSHI  #0x0000006d
2084 @ 11034:         INIT   1
2085 @ 11037:         PUSHI  #0x0000005e
2086 @ 11042:         INIT   1
2087 @ 11045:         PUSHI  #0x0000006d
2088 @ 11050:         INIT   1
2089 @ 11053:         PUSHI  #0x00000014
2090 @ 11058:         INIT   1
2091 @ 11061:         PUSHI  #0x0000005f
2092 @ 11066:         INIT   1
2093 @ 11069:         PUSHI  #0x00000053
2094 @ 11074:         INIT   1
2095 @ 11077:         PUSHI  #0x000000a1
2096 @ 11082:         INIT   1
2097 @ 11085:         PUSHI  #0x00000065
2098 @ 11090:         INIT   1
2099 @ 11093:         PUSHI  #0x00000065
2100 @ 11098:         INIT   1
2101 @ 11101:         PUSHI  #0x0000008f
2102 @ 11106:         INIT   1
2103 @ 11109:         PUSHI  #0x0000009f
2104 @ 11114:         INIT   1
2105 @ 11117:         PUSHI  #0x00000089
2106 @ 11122:         INIT   1
2107 @ 11125:         PUSHI  #0x000000a3
2108 @ 11130:         INIT   1
2109 @ 11133:         PUSHI  #0x000000a6
2110 @ 11138:         INIT   1
2111 @ 11141:         PUSHI  #0x00000065
2112 @ 11146:         INIT   1
2113 @ 11149:         PUSHI  #0x00000099
2114 @ 11154:         INIT   1
2115 @ 11157:         PUSHI  #0x00000099
2116 @ 11162:         INIT   1
2117 @ 11165:         PUSHI  #0x00000099
2118 @ 11170:         INIT   1
2119 @ 11173:         PUSHI  #0x00000066
2120 @ 11178:         INIT   1
2121 @ 11181:         PUSHI  #0x00000066
2122 @ 11186:         INIT   1
2123 @ 11189:         PUSHI  #0x00000066
2124 @ 11194:         INIT   1
2125 @ 11197:         PUSHI  #0x0000006d
2126 @ 11202:         INIT   1
2127 @ 11205:         PUSHI  #0x0000005e
2128 @ 11210:         INIT   1
2129 @ 11213:         PUSHI  #0x00000017
2130 @ 11218:         INIT   1
2131 @ 11221:         PUSHI  #0x00000008
2132 @ 11226:         INIT   1
2133 @ 11229:         PUSHI  #0x00000016
2134 @ 11234:         INIT   1
2135 @ 11237:         PUSHI  #0x00000015
2136 @ 11242:         INIT   1
2137 @ 11245:         PUSHI  #0x00000018
2138 @ 11250:         INIT   1
2139 @ 11253:         PUSHI  #0x00000049
2140 @ 11258:         INIT   1
2141 @ 11261:         PUSHI  #0x0000008f
2142 @ 11266:         INIT   1
2143 @ 11269:         PUSHI  #0x0000000f
2144 @ 11274:         INIT   1
2145 @ 11277:         PUSHI  #0x00000053
2146 @ 11282:         INIT   1
2147 @ 11285:         PUSHI  #0x0000008d
2148 @ 11290:         INIT   1
2149 @ 11293:         PUSHI  #0x0000005a
2150 @ 11298:         INIT   1
2151 @ 11301:         PUSHI  #0x0000005b
2152 @ 11306:         INIT   1
2153 @ 11309:         PUSHI  #0x00000065
2154 @ 11314:         INIT   1
2155 @ 11317:         PUSHI  #0x00000070
2156 @ 11322:         INIT   1
2157 @ 11325:         PUSHI  #0x00000000
2158 @ 11330:         INIT   1
2159 @ 11333:         PUSHI  #0x00000004
2160 @ 11338:         INIT   1
2161 @ 11341:         PUSHI  #0x00000000
2162 @ 11346:         INIT   1
2163 @ 11349:         PUSHI  #0x00000099
2164 @ 11354:         INIT   1
2165 @ 11357:         PUSHI  #0x00000085
2166 @ 11362:         INIT   1
2167 @ 11365:         PUSHI  #0x00000093
2168 @ 11370:         INIT   1
2169 @ 11373:         PUSHI  #0x00000066
2170 @ 11378:         INIT   1
2171 @ 11381:         PUSHI  #0x00000056
2172 @ 11386:         INIT   1
2173 @ 11389:         PUSHI  #0x00000057
2174 @ 11394:         INIT   1
2175 @ 11397:         PUSHI  #0x00000058
2176 @ 11402:         INIT   1
2177 @ 11405:         PUSHI  #0x00000093
2178 @ 11410:         INIT   1
2179 @ 11413:         PUSHI  #0x00000092
2180 @ 11418:         INIT   1
2181 @ 11421:         PUSHI  #0x0000008c
2182 @ 11426:         INIT   1
2183 @ 11429:         PUSHI  #0x00000046
2184 @ 11434:         INIT   1
2185 @ 11437:         PUSHI  #0x00000043
2186 @ 11442:         INIT   1
2187 @ 11445:         PUSHI  #0x00000044
2188 @ 11450:         INIT   1
2189 @ 11453:         PUSHI  #0x00000045
2190 @ 11458:         INIT   1
2191 @ 11461:         PUSHI  #0x00000047
2192 @ 11466:         INIT   1
2193 @ 11469:         PUSHI  #0x0000004a
2194 @ 11474:         INIT   1
2195 @ 11477:         PUSHI  #0x0000004b
2196 @ 11482:         INIT   1
2197 @ 11485:         PUSHI  #0x0000004c
2198 @ 11490:         INIT   1
2199 @ 11493:         PUSHI  #0x0000004d
2200 @ 11498:         INIT   1
2201 @ 11501:         PUSHI  #0x0000004e
2202 @ 11506:         INIT   1
2203 @ 11509:         PUSHI  #0x00000065
2204 @ 11514:         INIT   1
2205 @ 11517:         PUSHI  #0x0000005e
2206 @ 11522:         INIT   1
2207 @ 11525:         PUSHI  #0x00000000
2208 @ 11530:         INIT   1
2209 @ 11533:         PUSHI  #0x00000065
2210 @ 11538:         INIT   1
2211 @ 11541:         PUSHI  #0x00000099
2212 @ 11546:         INIT   1
2213 @ 11549:         PUSHI  #0x00000089
2214 @ 11554:         INIT   1
2215 @ 11557:         PUSHI  #0x00000099
2216 @ 11562:         INIT   1
2217 @ 11565:         PUSHI  #0x00000066
2218 @ 11570:         INIT   1
2219 @ 11573:         PUSHI  #0x00000066
2220 @ 11578:         INIT   1
2221 @ 11581:         PUSHI  #0x00000046
2222 @ 11586:         INIT   1
2223 @ 11589:         PUSHI  #0x00000043
2224 @ 11594:         INIT   1
2225 @ 11597:         PUSHI  #0x00000044
2226 @ 11602:         INIT   1
2227 @ 11605:         PUSHI  #0x00000045
2228 @ 11610:         INIT   1
2229 @ 11613:         PUSHI  #0x00000048
2230 @ 11618:         INIT   1
2231 @ 11621:         PUSHI  #0x00000047
2232 @ 11626:         INIT   1
2233 @ 11629:         PUSHI  #0x0000004a
2234 @ 11634:         INIT   1
2235 @ 11637:         PUSHI  #0x0000004b
2236 @ 11642:         INIT   1
2237 @ 11645:         PUSHI  #0x0000004c
2238 @ 11650:         INIT   1
2239 @ 11653:         PUSHI  #0x0000004d
2240 @ 11658:         INIT   1
2241 @ 11661:         PUSHI  #0x0000004e
2242 @ 11666:         INIT   1
2243 @ 11669:         PUSHI  #0x0000005e
2244 @ 11674:         INIT   1
2245 @ 11677:         PUSHI  #0x00000065
2246 @ 11682:         INIT   1
2247 @ 11685:         PUSHI  #0x00000091
2248 @ 11690:         INIT   1
2249 @ 11693:         PUSHI  #0x00000099
2250 @ 11698:         INIT   1
2251 @ 11701:         PUSHI  #0x00000066
2252 @ 11706:         INIT   1
2253 @ 11709:         PUSHI  #0x0000004a
2254 @ 11714:         INIT   1
2255 @ 11717:         PUSHI  #0x0000004b
2256 @ 11722:         INIT   1
2257 @ 11725:         PUSHI  #0x0000004c
2258 @ 11730:         INIT   1
2259 @ 11733:         PUSHI  #0x0000004d
2260 @ 11738:         INIT   1
2261 @ 11741:         PUSHI  #0x0000004e
2262 @ 11746:         INIT   1
2263 @ 11749:         PUSHI  #0x0000005e
2264 @ 11754:         INIT   1
2265 @ 11757:         PUSHI  #0x00000000
2266 @ 11762:         INIT   1
2267 @ 11765:         PUSHI  #0x00000065
2268 @ 11770:         INIT   1
2269 @ 11773:         PUSHI  #0x000000a1
2270 @ 11778:         INIT   1
2271 @ 11781:         PUSHI  #0x00000099
2272 @ 11786:         INIT   1
2273 @ 11789:         PUSHI  #0x00000066
2274 @ 11794:         INIT   1
2275 @ 11797:         PUSHI  #0x00000050
2276 @ 11802:         INIT   1
2277 @ 11805:         PUSHI  #0x00000051
2278 @ 11810:         INIT   1
2279 @ 11813:         PUSHI  #0x00000073
2280 @ 11818:         INIT   1
2281 @ 11821:         PUSHI  #0x00000001
2282 @ 11826:         INIT   1
2283 @ 11829:         PUSHI  #0x00000093
2284 @ 11834:         INIT   1
2285 @ 11837:         PUSHI  #0x00000002
2286 @ 11842:         INIT   1
2287 @ 11845:         PUSHI  #0x00000086
2288 @ 11850:         INIT   1
2289 @ 11853:         PUSHI  #0x00000069
2290 @ 11858:         INIT   1
2291 @ 11861:         PUSHI  #0x00000000
2292 @ 11866:         INIT   1
2293 @ 11869:         PUSHI  #0x00000052
2294 @ 11874:         INIT   1
2295 @ 11877:         PUSHI  #0x00000091
2296 @ 11882:         INIT   1
2297 @ 11885:         PUSHI  #0x00000063
2298 @ 11890:         INIT   1
2299 @ 11893:         PUSHI  #0x00000064
2300 @ 11898:         INIT   1
2301 @ 11901:         PUSHI  #0x00000001
2302 @ 11906:         INIT   1
2303 @ 11909:         PUSHI  #0x00000020
2304 @ 11914:         INIT   1
2305 @ 11917:         PUSHI  #0x0000004f
2306 @ 11922:         INIT   1
2307 @ 11925:         PUSHI  #0x00000095
2308 @ 11930:         INIT   1
2309 @ 11933:         PUSHI  #0x00000096
2310 @ 11938:         INIT   1
2311 @ 11941:         PUSHI  #0x00000097
2312 @ 11946:         INIT   1
2313 @ 11949:         PUSHI  #0x00000056
2314 @ 11954:         INIT   1
2315 @ 11957:         PUSHI  #0x00000057
2316 @ 11962:         INIT   1
2317 @ 11965:         PUSHI  #0x00000058
2318 @ 11970:         INIT   1
2319 @ 11973:         PUSHI  #0x0000002b
2320 @ 11978:         INIT   1
2321 @ 11981:         PUSHI  #0x00000054
2322 @ 11986:         INIT   1
2323 @ 11989:         PUSHI  #0x0000002d
2324 @ 11994:         INIT   1
2325 @ 11997:         PUSHI  #0x00000053
2326 @ 12002:         INIT   1
2327 @ 12005:         PUSHI  #0x0000002b
2328 @ 12010:         INIT   1
2329 @ 12013:         PUSHI  #0x0000002d
2330 @ 12018:         INIT   1
2331 @ 12021:         PUSHI  #0x00000053
2332 @ 12026:         INIT   1
2333 @ 12029:         PUSHI  #0x00000054
2334 @ 12034:         INIT   1
2335 @ 12037:         PUSHI  #0x00000053
2336 @ 12042:         INIT   1
2337 @ 12045:         PUSHI  #0x00000052
2338 @ 12050:         INIT   1
2339 @ 12053:         PUSHI  #0x0000008b
2340 @ 12058:         INIT   1
2341 @ 12061:         PUSHI  #0x00000004
2342 @ 12066:         INIT   1
2343 @ 12069:         PUSHI  #0x00000002
2344 @ 12074:         INIT   1
2345 @ 12077:         PUSHI  #0x0000008b
2346 @ 12082:         INIT   1
2347 @ 12085:         PUSHI  #0x00000035
2348 @ 12090:         INIT   1
2349 @ 12093:         PUSHI  #0x00000033
2350 @ 12098:         INIT   1
2351 @ 12101:         PUSHI  #0x0000003b
2352 @ 12106:         INIT   1
2353 @ 12109:         PUSHI  #0x00000098
2354 @ 12114:         INIT   1
2355 @ 12117:         PUSHI  #0x00000004
2356 @ 12122:         INIT   1
2357 @ 12125:         PUSHI  #0x00000000
2358 @ 12130:         INIT   1
2359 @ 12133:         PUSHI  #0x0000003b
2360 @ 12138:         INIT   1
2361 @ 12141:         PUSHI  #0x0000008b
2362 @ 12146:         INIT   1
2363 @ 12149:         PUSHI  #0x000000a4
2364 @ 12154:         INIT   1
2365 @ 12157:         PUSHI  #0x00000061
2366 @ 12162:         INIT   1
2367 @ 12165:         PUSHI  #0x00000004
2368 @ 12170:         INIT   1
2369 @ 12173:         PUSHI  #0x00000000
2370 @ 12178:         INIT   1
2371 @ 12181:         PUSHI  #0x00000088
2372 @ 12186:         INIT   1
2373 @ 12189:         PUSHI  #0x00000063
2374 @ 12194:         INIT   1
2375 @ 12197:         PUSHI  #0x00000064
2376 @ 12202:         INIT   1
2377 @ 12205:         PUSHI  #0x00000094
2378 @ 12210:         INIT   1
2379 @ 12213:         PUSHI  #0x0000008c
2380 @ 12218:         INIT   1
2381 @ 12221:         PUSHI  #0x0000002e
2382 @ 12226:         INIT   1
2383 @ 12229:         PUSHI  #0x0000008c
2384 @ 12234:         INIT   1
2385 @ 12237:         PUSHI  #0x0000002e
2386 @ 12242:         INIT   1
2387 @ 12245:         PUSHI  #0x00000000
2388 @ 12250:         INIT   1
2389 @ 12253:         PUSHI  #0x0000008c
2390 @ 12258:         INIT   1
2391 @ 12261:         PUSHI  #0x00000063
2392 @ 12266:         INIT   1
2393 @ 12269:         PUSHI  #0x00000064
2394 @ 12274:         INIT   1
2395 @ 12277:         PUSHI  #0x00000084
2396 @ 12282:         INIT   1
2397 @ 12285:         PUSHI  #0x00000089
2398 @ 12290:         INIT   1
2399 @ 12293:         PUSHI  #0x0000002e
2400 @ 12298:         INIT   1
2401 @ 12301:         PUSHI  #0x0000006c
2402 @ 12306:         INIT   1
2403 @ 12309:         PUSHI  #0x00000084
2404 @ 12314:         INIT   1
2405 @ 12317:         PUSHI  #0x0000002e
2406 @ 12322:         INIT   1
2407 @ 12325:         PUSHI  #0x00000000
2408 @ 12330:         INIT   1
2409 @ 12333:         PUSHI  #0x00000084
2410 @ 12338:         INIT   1
2411 @ 12341:         PUSHI  #0x00000053
2412 @ 12346:         INIT   1
2413 @ 12349:         PUSHI  #0x00000001
2414 @ 12354:         INIT   1
2415 @ 12357:         PUSHI  #0x00000009
2416 @ 12362:         INIT   1
2417 @ 12365:         PUSHI  #0x00000091
2418 @ 12370:         INIT   1
2419 @ 12373:         PUSHI  #0x00000093
2420 @ 12378:         INIT   1
2421 @ 12381:         PUSHI  #0x000000a7
2422 @ 12386:         INIT   1
2423 @ 12389:         PUSHI  #0x0000006a
2424 @ 12394:         INIT   1
2425 @ 12397:         PUSHI  #0x00000054
2426 @ 12402:         INIT   1
2427 @ 12405:         PUSHI  #0x00000053
2428 @ 12410:         INIT   1
2429 @ 12413:         PUSHI  #0x00000001
2430 @ 12418:         INIT   1
2431 @ 12421:         PUSHI  #0x00000009
2432 @ 12426:         INIT   1
2433 @ 12429:         PUSHI  #0x00000091
2434 @ 12434:         INIT   1
2435 @ 12437:         PUSHI  #0x00000084
2436 @ 12442:         INIT   1
2437 @ 12445:         PUSHI  #0x000000a8
2438 @ 12450:         INIT   1
2439 @ 12453:         PUSHI  #0x0000002b
2440 @ 12458:         INIT   1
2441 @ 12461:         PUSHI  #0x0000002d
2442 @ 12466:         INIT   1
2443 @ 12469:         PUSHI  #0x000000a7
2444 @ 12474:         INIT   1
2445 @ 12477:         PUSHI  #0x00000024
2446 @ 12482:         INIT   1
2447 @ 12485:         PUSHI  #0x00000026
2448 @ 12490:         INIT   1
2449 @ 12493:         PUSHI  #0x00000027
2450 @ 12498:         INIT   1
2451 @ 12501:         PUSHI  #0x00000028
2452 @ 12506:         INIT   1
2453 @ 12509:         PUSHI  #0x00000000
2454 @ 12514:         INIT   1
2455 @ 12517:         PUSHI  #0x000000aa
2456 @ 12522:         INIT   1
2457 @ 12525:         PUSHI  #0x000000a9
2458 @ 12530:         INIT   1
2459 @ 12533:         PUSHI  #0x000000a7
2460 @ 12538:         INIT   1
2461 @ 12541:         PUSHI  #0x00000024
2462 @ 12546:         INIT   1
2463 @ 12549:         PUSHI  #0x00000026
2464 @ 12554:         INIT   1
2465 @ 12557:         PUSHI  #0x00000000
2466 @ 12562:         INIT   1
2467 @ 12565:         PUSHI  #0x000000a9
2468 @ 12570:         INIT   1
2469 @ 12573:         PUSHI  #0x000000a7
2470 @ 12578:         INIT   1
2471 @ 12581:         PUSHI  #0x00000024
2472 @ 12586:         INIT   1
2473 @ 12589:         PUSHI  #0x00000000
2474 @ 12594:         INIT   1
2475 @ 12597:         PUSHI  #0x0000002b
2476 @ 12602:         INIT   1
2477 @ 12605:         PUSHI  #0x000000a8
2478 @ 12610:         INIT   1
2479 @ 12613:         PUSHI  #0x00000025
2480 @ 12618:         INIT   1
2481 @ 12621:         PUSHI  #0x00000029
2482 @ 12626:         INIT   1
2483 @ 12629:         PUSHI  #0x00000028
2484 @ 12634:         INIT   1
2485 @ 12637:         PUSHI  #0x00000000
2486 @ 12642:         INIT   1
2487 @ 12645:         PUSHI  #0x000000ac
2488 @ 12650:         INIT   1
2489 @ 12653:         PUSHI  #0x000000ab
2490 @ 12658:         INIT   1
2491 @ 12661:         PUSHI  #0x000000a8
2492 @ 12666:         INIT   1
2493 @ 12669:         PUSHI  #0x00000025
2494 @ 12674:         INIT   1
2495 @ 12677:         PUSHI  #0x00000000
2496 @ 12682:         INIT   1
2497 @ 12685:         PUSHI  #0x000000a8
2498 @ 12690:         INIT   1
2499 @ 12693:         PUSHI  #0x00000025
2500 @ 12698:         INIT   1
2501 @ 12701:         PUSHI  #0x00000029
2502 @ 12706:         INIT   1
2503 @ 12709:         PUSHI  #0x00000000
2504 @ 12714:         INIT   1
2505 @ 12717:         PUSHI  #0x000000ab
2506 @ 12722:         INIT   1
2507 @ 12725:         PUSHI  #0x0000002b
2508 @ 12730:         INIT   1
2509 @ 12733:         PUSHI  #0x0000002d
2510 @ 12738:         INIT   1
2511 @ 12741:         PUSHI  #0x000000a8
2512 @ 12746:         INIT   1
2513 @ 12749:         PUSHI  #0x00000024
2514 @ 12754:         INIT   1
2515 @ 12757:         PUSHI  #0x00000026
2516 @ 12762:         INIT   1
2517 @ 12765:         PUSHI  #0x00000027
2518 @ 12770:         INIT   1
2519 @ 12773:         PUSHI  #0x00000028
2520 @ 12778:         INIT   1
2521 @ 12781:         PUSHI  #0x00000000
2522 @ 12786:         INIT   1
2523 @ 12789:         PUSHI  #0x000000ae
2524 @ 12794:         INIT   1
2525 @ 12797:         PUSHI  #0x00000027
2526 @ 12802:         INIT   1
2527 @ 12805:         PUSHI  #0x00000028
2528 @ 12810:         INIT   1
2529 @ 12813:         PUSHI  #0x00000000
2530 @ 12818:         INIT   1
2531 @ 12821:         PUSHI  #0x000000ad
2532 @ 12826:         INIT   1
2533 @ 12829:         PUSHI  #0x000000ae
2534 @ 12834:         INIT   1
2535 @ 12837:         PUSHI  #0x000000ac
2536 @ 12842:         INIT   1
2537 @ 12845:         PUSHI  #0x000000a8
2538 @ 12850:         INIT   1
2539 @ 12853:         PUSHI  #0x00000024
2540 @ 12858:         INIT   1
2541 @ 12861:         PUSHI  #0x00000026
2542 @ 12866:         INIT   1
2543 @ 12869:         PUSHI  #0x00000000
2544 @ 12874:         INIT   1
2545 @ 12877:         PUSHI  #0x000000ad
2546 @ 12882:         INIT   1
2547 @ 12885:         PUSHI  #0x000000a8
2548 @ 12890:         INIT   1
2549 @ 12893:         PUSHI  #0x00000024
2550 @ 12898:         INIT   1
2551 @ 12901:         PUSHI  #0x00000000
2552 @ 12906:         INIT   1
2553 @ 12909:         PUSHI  #0x00000097
2554 @ 12914:         INIT   1
2555 @ 12917:         PUSHI  #0x0000001e
2556 @ 12922:         INIT   1
2557 @ 12925:         PUSHI  #0x0000001f
2558 @ 12930:         INIT   1
2559 @ 12933:         PUSHI  #0x00000000
2560 @ 12938:         INIT   1
2561 @ 12941:         PUSHI  #0x00000097
2562 @ 12946:         INIT   1
2563 @ 12949:         PUSHI  #0x00000097
2564 @ 12954:         INIT   1
2565 @ 12957:         PUSHI  #0x0000001e
2566 @ 12962:         INIT   1
2567 @ 12965:         PUSHI  #0x00000000
2568 @ 12970:         INIT   1
2569 @ 12973:         PUSHI  #0x00000089
2570 @ 12978:         INIT   1
2571 @ 12981:         PUSHI  #0x00000006
2572 @ 12986:         INIT   1
2573 @ 12989:         PUSHI  #0x00000093
2574 @ 12994:         INIT   1
2575 @ 12997:         PUSHI  #0x00000004
2576 @ 13002:         INIT   1
2577 @ 13005:         PUSHI  #0x00000093
2578 @ 13010:         INIT   1
2579 @ 13013:         PUSHI  #0x0000007e
2580 @ 13018:         INIT   1
2581 @ 13021:         PUSHI  #0x00000093
2582 @ 13026:         INIT   1
2583 @ 13029:         PUSHI  #0x00000001
2584 @ 13034:         INIT   1
2585 @ 13037:         PUSHI  #0x00000093
2586 @ 13042:         INIT   1
2587 @ 13045:         PUSHI  #0x0000007f
2588 @ 13050:         INIT   1
2589 @ 13053:         PUSHI  #0x0000003b
2590 @ 13058:         INIT   1
2591 @ 13061:         PUSHI  #0x00000004
2592 @ 13066:         INIT   1
2593 @ 13069:         PUSHI  #0x00000000
2594 @ 13074:         INIT   1
2595 @ 13077:         PUSHI  #0x00000001
2596 @ 13082:         INIT   1
2597 @ 13085:         PUSHI  #0x00000093
2598 @ 13090:         INIT   1
2599 @ 13093:         PUSHI  #0x00000071
2600 @ 13098:         INIT   1
2601 @ 13101:         PUSHI  #0x00000093
2602 @ 13106:         INIT   1
2603 @ 13109:         PUSHI  #0x00000004
2604 @ 13114:         INIT   1
2605 @ 13117:         PUSHI  #0x00000002
2606 @ 13122:         INIT   1
2607 @ 13125:         PUSHI  #0x00000062
2608 @ 13130:         INIT   1
2609 @ 13133:         PUSHI  #0x00000061
2610 @ 13138:         INIT   1
2611 @ 13141:         PUSHI  #0x00000098
2612 @ 13146:         INIT   1
2613 @ 13149:         PUSHI  #0x000000af
2614 @ 13154:         INIT   1
2615 @ 13157:         PUSHI  #0x00000004
2616 @ 13162:         INIT   1
2617 @ 13165:         PUSHI  #0x00000000
2618 @ 13170:         INIT   1
2619 @ 13173:         PUSHI  #0x00000001
2620 @ 13178:         INIT   1
2621 @ 13181:         PUSHI  #0x000000a2
2622 @ 13186:         INIT   1
2623 @ 13189:         PUSHI  #0x00000071
2624 @ 13194:         INIT   1
2625 @ 13197:         PUSHI  #0x000000a2
2626 @ 13202:         INIT   1
2627 @ 13205:         PUSHI  #0x0000003b
2628 @ 13210:         INIT   1
2629 @ 13213:         PUSHI  #0x0000008b
2630 @ 13218:         INIT   1
2631 @ 13221:         PUSHI  #0x00000004
2632 @ 13226:         INIT   1
2633 @ 13229:         PUSHI  #0x000000a4
2634 @ 13234:         INIT   1
2635 @ 13237:         PUSHI  #0x0000003b
2636 @ 13242:         INIT   1
2637 @ 13245:         PUSHI  #0x00000046
2638 @ 13250:         INIT   1
2639 @ 13253:         PUSHI  #0x00000045
2640 @ 13258:         INIT   1
2641 @ 13261:         PUSHI  #0x0000004a
2642 @ 13266:         INIT   1
2643 @ 13269:         PUSHI  #0x0000004b
2644 @ 13274:         INIT   1
2645 @ 13277:         PUSHI  #0x0000004c
2646 @ 13282:         INIT   1
2647 @ 13285:         PUSHI  #0x0000004d
2648 @ 13290:         INIT   1
2649 @ 13293:         PUSHI  #0x0000004e
2650 @ 13298:         INIT   1
2651 @ 13301:         PUSHI  #0x0000005e
2652 @ 13306:         INIT   1
2653 @ 13309:         PUSHI  #0x0000005f
2654 @ 13314:         INIT   1
2655 @ 13317:         PUSHI  #0x00000000
2656 @ 13322:         INIT   1
2657 @ 13325:         PUSHI  #0x0000009f
2658 @ 13330:         INIT   1
2659 @ 13333:         PUSHI  #0x00000065
2660 @ 13338:         INIT   1
2661 @ 13341:         PUSHI  #0x00000099
2662 @ 13346:         INIT   1
2663 @ 13349:         PUSHI  #0x00000066
2664 @ 13354:         INIT   1
2665 @ 13357:         PUSHI  #0x00000001
2666 @ 13362:         INIT   1
2667 @ 13365:         PUSHI  #0x00000093
2668 @ 13370:         INIT   1
2669 @ 13373:         PUSHI  #0x00000004
2670 @ 13378:         INIT   1
2671 @ 13381:         PUSHI  #0x0000007f
2672 @ 13386:         INIT   1
2673 @ 13389:         PUSHI  #0x00000062
2674 @ 13394:         INIT   1
2675 @ 13397:         PUSHI  #0x00000001
2676 @ 13402:         INIT   1
2677 @ 13405:         PUSHI  #0x00000093
2678 @ 13410:         INIT   1
2679 @ 13413:         PUSHI  #0x0000006b
2680 @ 13418:         INIT   1
2681 @ 13421:         PUSHI  #0x00000001
2682 @ 13426:         INIT   1
2683 @ 13429:         PUSHI  #0x00000093
2684 @ 13434:         INIT   1
2685 @ 13437:         PUSHI  #0x0000006b
2686 @ 13442:         INIT   1
2687 @ 13445:         PUSHI  #0x00000001
2688 @ 13450:         INIT   1
2689 @ 13453:         PUSHI  #0x00000093
2690 @ 13458:         INIT   1
2691 @ 13461:         PUSHI  #0x0000006b
2692 @ 13466:         INIT   1
2693 @ 13469:         PUSHI  #0x00000001
2694 @ 13474:         INIT   1
2695 @ 13477:         PUSHI  #0x00000093
2696 @ 13482:         INIT   1
2697 @ 13485:         PUSHI  #0x0000006b
2698 @ 13490:         INIT   1
2699 @ 13493:         PUSHI  #0x00000001
2700 @ 13498:         INIT   1
2701 @ 13501:         PUSHI  #0x00000093
2702 @ 13506:         INIT   1
2703 @ 13509:         PUSHI  #0x0000006b
2704 @ 13514:         INIT   1
2705 @ 13517:         PUSHI  #0x0000007c
2706 @ 13522:         INIT   1
2707 @ 13525:         PUSHI  #0x0000007d
2708 @ 13530:         INIT   1
2709 @ 13533:         PUSHI  #0x00000093
2710 @ 13538:         INIT   1
2711 @ 13541:         PUSHI  #0x0000006b
2712 @ 13546:         INIT   1
2713 @ 13549:         PUSHI  #0x00000093
2714 @ 13554:         INIT   1
2715 @ 13557:         PUSHI  #0x0000006b
2716 @ 13562:         INIT   1
2717 @ 13565:         PUSHI  #0x00000093
2718 @ 13570:         INIT   1
2719 @ 13573:         PUSHI  #0x0000006b
2720 @ 13578:         INIT   1
2721 @ 13581:         PUSHI  #0x00000093
2722 @ 13586:         INIT   1
2723 @ 13589:         PUSHI  #0x0000007f
2724 @ 13594:         INIT   1
2725 @ 13597:         PUSHI  #0x00000000
2726 @ 13602:         INIT   1
2727 @ 13605:         PUSHI  #0x00000000
2728 @ 13610:         INIT   1
2729 @ 13613:         PUSHI  #0x00000000
2730 @ 13618:         INIT   1
2731 @ 13621:         PUSHI  #0x00000000
2732 @ 13626:         INIT   1
2733 @ 13629:         PUSHI  #0x00000000
2734 @ 13634:         INIT   1
2735 @ 13637:         PUSHI  #0x00000000
2736 @ 13642:         INIT   1
2737 @ 13645:         PUSHI  #0x00000000
2738 @ 13650:         INIT   1
2739 @ 13653:         PUSHI  #0x00000000
2740 @ 13658:         INIT   1
2741 @ 13661:         PUSHI  #0x00000000
2742 @ 13666:         INIT   1
2743 @ 13669:         PUSHI  #0x00000000
2744 @ 13674:         INIT   1
2745 @ 13677:         PUSHI  #0x00000000
2746 @ 13682:         INIT   1
2747 @ 13685:         PUSHI  #0x00000000
2748 @ 13690:         INIT   1
2749 @ 13693:         PUSHI  #0x00000000
2750 @ 13698:         INIT   1
2751 @ 13701:         PUSHI  #0x00000000
2752 @ 13706:         INIT   1
2753 @ 13709:         PUSHI  #0x00000000
2754 @ 13714:         INIT   1
2755 @ 13717:         PUSHI  #0x00000000
2756 @ 13722:         INIT   1
2757 @ 13725:         PUSHI  #0x00000000
2758 @ 13730:         INIT   1
2759 @ 13733:         PUSHI  #0x00000000
2760 @ 13738:         INIT   1
2761 @ 13741:         PUSHI  #0x00000000
2762 @ 13746:         INIT   1
2763 @ 13749:         PUSHI  #0x00000000
2764 @ 13754:         INIT   1
2765 @ 13757:         PUSHI  #0x00000000
2766 @ 13762:         INIT   1
2767 @ 13765:         PUSHI  #0x00000000
2768 @ 13770:         INIT   1
2769 @ 13773:         PUSHI  #0x00000000
2770 @ 13778:         INIT   1
2771 @ 13781:         PUSHI  #0x00000000
2772 @ 13786:         INIT   1
2773 @ 13789:         PUSHI  #0x00000000
2774 @ 13794:         INIT   1
2775 @ 13797:         PUSHI  #0x00000000
2776 @ 13802:         INIT   1
2777 @ 13805:         PUSHI  #0x00000000
2778 @ 13810:         INIT   1
2779 @ 13813:         PUSHI  #0x00000000
2780 @ 13818:         INIT   1
2781 @ 13821:         PUSHI  #0x00000000
2782 @ 13826:         INIT   1
2783 @ 13829:         PUSHI  #0x00000000
2784 @ 13834:         INIT   1
2785 @ 13837:         PUSHI  #0x00000000
2786 @ 13842:         INIT   1
2787 @ 13845:         PUSHI  #0x00000000
2788 @ 13850:         INIT   1
2789 @ 13853:         PUSHI  #0x00000000
2790 @ 13858:         INIT   1
2791 @ 13861:         PUSHI  #0x00000000
2792 @ 13866:         INIT   1
2793 @ 13869:         PUSHI  #0x00000000
2794 @ 13874:         INIT   1
2795 @ 13877:         PUSHI  #0x00000000
2796 @ 13882:         INIT   1
2797 @ 13885:         PUSHI  #0x00000000
2798 @ 13890:         INIT   1
2799 @ 13893:         PUSHI  #0x00000000
2800 @ 13898:         INIT   1
2801 @ 13901:         PUSHI  #0x00000000
2802 @ 13906:         INIT   1
2803 @ 13909:         PUSHI  #0x00000000
2804 @ 13914:         INIT   1
2805 @ 13917:         PUSHI  #0x00000000
2806 @ 13922:         INIT   1
2807 @ 13925:         PUSHI  #0x00000000
2808 @ 13930:         INIT   1
2809 @ 13933:         PUSHI  #0x00000000
2810 @ 13938:         INIT   1
2811 @ 13941:         PUSHI  #0x00000000
2812 @ 13946:         INIT   1
2813 @ 13949:         PUSHI  #0x00000000
2814 @ 13954:         INIT   1
2815 @ 13957:         PUSHI  #0x00000000
2816 @ 13962:         INIT   1
2817 @ 13965:         PUSHI  #0x00000000
2818 @ 13970:         INIT   1
2819 @ 13973:         PUSHI  #0x00000000
2820 @ 13978:         INIT   1
2821 @ 13981:         PUSHI  #0x00000000
2822 @ 13986:         INIT   1
2823 @ 13989:         PUSHI  #0x00000000
2824 @ 13994:         INIT   1
2825 @ 13997:         PUSHI  #0x00000000
2826 @ 14002:         INIT   1
2827 @ 14005:         PUSHI  #0x00000000
2828 @ 14010:         INIT   1
2829 @ 14013:         PUSHI  #0x00000000
2830 @ 14018:         INIT   1
2831 @ 14021:         PUSHI  #0x00000000
2832 @ 14026:         INIT   1
2833 @ 14029:         PUSHI  #0x00000000
2834 @ 14034:         INIT   1
2835 @ 14037:         PUSHI  #0x00000000
2836 @ 14042:         INIT   1
2837 @ 14045:         PUSHI  #0x00000000
2838 @ 14050:         INIT   1
2839 @ 14053:         PUSHI  #0x00000000
2840 @ 14058:         INIT   1
2841 @ 14061:         PUSHI  #0x00000000
2842 @ 14066:         INIT   1
2843 @ 14069:         PUSHI  #0x00000000
2844 @ 14074:         INIT   1
2845 @ 14077:         PUSHI  #0x00000000
2846 @ 14082:         INIT   1
2847 @ 14085:         PUSHI  #0x00000000
2848 @ 14090:         INIT   1
2849 @ 14093:         PUSHI  #0x00000000
2850 @ 14098:         INIT   1
2851 @ 14101:         PUSHI  #0x00000000
2852 @ 14106:         INIT   1
2853 @ 14109:         PUSHI  #0x00000000
2854 @ 14114:         INIT   1
2855 @ 14117:         PUSHI  #0x00000000
2856 @ 14122:         INIT   1
2857 @ 14125:         PUSHI  #0x00000000
2858 @ 14130:         INIT   1
2859 @ 14133:         PUSHI  #0x00000000
2860 @ 14138:         INIT   1
2861 @ 14141:         PUSHI  #0x00000000
2862 @ 14146:         INIT   1
2863 @ 14149:         PUSHI  #0x00000000
2864 @ 14154:         INIT   1
2865 @ 14157:         PUSHI  #0x00000000
2866 @ 14162:         INIT   1
2867 @ 14165:         PUSHI  #0x00000000
2868 @ 14170:         INIT   1
2869 @ 14173:         PUSHI  #0x00000000
2870 @ 14178:         INIT   1
2871 @ 14181:         PUSHI  #0x00000000
2872 @ 14186:         INIT   1
2873 @ 14189:         PUSHI  #0x00000000
2874 @ 14194:         INIT   1
2875 @ 14197:         PUSHI  #0x00000000
2876 @ 14202:         INIT   1
2877 @ 14205:         PUSHI  #0x00000000
2878 @ 14210:         INIT   1
2879 @ 14213:         PUSHI  #0x00000000
2880 @ 14218:         INIT   1

   169  %CONSTSHORTINTEGERARRAY KDICT(32: 538) =
   170         0,     511,     131,     527,     131,     131,     531,     131,
   171       535,     539,     543,     551,     555,     559,     575,     579,
   172       129,     129,     129,     129,     129,     129,     129,     129,
   173       129,     129,     591,     594,     599,     619,     635,     131,
   174       131,     652,     724,     752,     840,     876,    1020,     128,
   175       128,    1084,     128,     128,    1296,    1320,    1344,    1384,
   176      1408,     128,    1460,    1824,    2056,    2080,     128,    2112,
   177       128,     128,     128,     131,    2127,     131,     131,    2151,
   178       131,     131,     131,     131,     131,     131,     131,     131,
   179       131,     131,     131,     131,     131,     131,     131,     131,
   180       131,     131,     131,     131,     131,     131,     131,     131,
   181       131,     131,     131,     131,    2155,     131,     131,  -32351,
   182    -16119,   16679,   16743,   18734,   16614,   16385,   16386,  -16282,
   183     16489,   17128,   16388,  -32322,  -15576,   17195,   16392,   21710,
   184    -32465,   19369,   16550,   16387,   16397,  -32196,  -32451,   18542,
   185     18798,   16804,  -32323,  -14138,   18670,   19284,  -32195,  -32450,
   186     18606,   16868,   18862,  -30642,   10578,   11457,  -31922,  -32429,
   187     16823,    8912,      67,   16951,    9921,      69,  -32429,   16887,
   188      8912,      67,   17079,      68,   18910,  -32187,   10841,      69,
   189     16896,    9415,      78,   17393,  -30070,  -32177,    8665,    8908,
   190     16394,  -31027,      78,  -31533,      84,  -32183,   10194,      76,
   191     17386,   10958,      69,   18135,      84,   16512,    8909,   10830,
   192     16391,   16384,  -32055,   10073,    9921,    8649,   16704,    9153,
   193     10190,    8915,   17322,  -28340,  -31026,  -31530,      88,  -32055,
   194      8916,   10066,    9793,   16768,      84,   18071,   10053,      84,
   195     16399,      68,  -32433,   21873,      70,  -31034,  -31540,      80,
   196    -32059,   10194,   10567,    9921,   22001,    9938,   22065,   10697,
   197        84,   17904,    9801,      69,   21937,    8915,   19171,  -31039,
   198    -31543,  -32306,   10575,   16395,  -32429,   17143,    8912,      67,
   199     17207,    9422,    9299,   19106,   10700,      69,   17623,  -26042,
   200     10830,    9157,   10565,  -28607,  -29626,  -30643,  -31794,  -32301,
   201    -15243,   17528,    8912,      67,   23416,    9921,      69,  -32301,
   202    -15179,   17592,    8912,      67,   23480,   10305,  -32301,  -14734,
   203     18040,    8912,      67,   24306,      78,  -32301,  -14798,   17976,
   204      8912,      67,   24370,   10578,   11457,  -31922,  -32429,   18163,
   205      8912,      67,   23539,    9921,      69,  -32301,  -14539,   18232,
   206      8912,      67,   23608,   18204,  -32183,   10063,      71,   17024,
   207     10835,   17840,   10305,  -32429,   16631,    8912,      67,   16695,
   208    -32319,   10831,   18464,    8909,  -32301,  -16201,   16568,    8912,
   209        67,   17015,  -32050,  -32302,   10071,   16448,   18975,   19219,
   210    -31291,    8914,    9412,    8387,    8916,  -32301,  -15694,   17080,
   211      8912,      67,   24050,    9938,   16832,  -31419,   10959,    9428,
   212      8910,  -32301,  -15886,   16888,    8912,      67,   24114,  -29759,
   213    -30909,  -31408,  -32173,   10964,   10066,   17495,    9813,    7892,
   214    -32451,   17430,   17045,    8389,      84,   19041,   10575,      68,
   215    -32088,   10182,    9938,   10817,   21810,   21521,      76,  -27455,
   216    -28474,  -29491,  -30642,  -32301,  -10123,   22648,  -31540,  -32178,
   217      8912,      67,   23672,   10575,    8397,      76,   18032,   10063,
   218        71,   17968,    9921,      69,  -32301,  -10059,   22712,    8912,
   219        67,   23736,   10305,  -32301,   -9614,   23160,    8912,      67,
   220     24178,      78,  -32301,   -9678,   23096,    8912,      67,   24242,
   221     10578,   11457,  -31922,  -32429,   23283,    8912,      67,   23795,
   222      9921,      69,  -32301,   -9419,   23352,    8912,      67,   23864,
   223    -25656,  -26167,  -26672,  -31532,  -32041,   10713,    8916,      77,
   224     16640,   10825,    9283,   16825,  -28223,  -28593,    9426,    9166,
   225    -29144,  -30015,  -31034,  -32051,    8398,    8909,  -12107,   20664,
   226     10305,  -32301,  -11662,   21112,    8912,      67,   24498,      78,
   227    -32301,  -11726,   21048,    8912,      67,   23922,   10578,   11457,
   228      8398,    8909,  -11467,   21304,   20496,      80,   17751,   10834,
   229     16396,    8645,   -8206,   24567,   10055,    9793,   17688,   10575,
   230        84,   16960,  -32184,   10962,      69,   17559,   10053,   16389,
   231        78,  -32180,    9428,      76,   18397,   10693,      83,   18268,
   232      9416,    8908,   18333,  -32067,  -32292,  -15771,   17005,   17252,
   233     18734,   16402,   16649
   234  
   235  !*******************************************
   236  !*                                         *
   237  !*        TRANSPORTABLE IMP COMPILER       *
   238  !*                                         *
   239  !*      COPYRIGHT   PETER S. ROBERTSON     *
   240  !*      DEPARTMENT OF COMPUTER SCIENCE     *
   241  !*         UNIVERSITY OF EDINBURGH         *
   242  !*           ALL RIGHTS RESERVED           *
   243  !*                                         *
   244  !*******************************************
   245  !
   246  ! THROUGHOUT THE SOURCE TEXT OF THIS PROGRAM, THE LOWER CASE
   247  ! ALPHABET IS REPRESENTED BY LETTER+32 E.G.  'A'+32
   248  
2881 @ 14221:         LINE   169 "regression-compile-tmp/comp412.imp"
2882 @ 14259:         PUSHI  #0x00000020
2883 @ 14264:         PUSHI  #0x0000021a
2884 @ 14269:         BOUNDS
2885 @ 14270:         DEF    KDICT p1=V_0086 a/tf=1b b/format=3 c/ostate=112  type=1 (integer) form=11 (array) special=2 (short-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
2886 @ 14287:         PUSHI  #0x00000000
2887 @ 14292:         INIT   1
2888 @ 14295:         PUSHI  #0x000001ff
2889 @ 14300:         INIT   1
2890 @ 14303:         PUSHI  #0x00000083
2891 @ 14308:         INIT   1
2892 @ 14311:         PUSHI  #0x0000020f
2893 @ 14316:         INIT   1
2894 @ 14319:         PUSHI  #0x00000083
2895 @ 14324:         INIT   1
2896 @ 14327:         PUSHI  #0x00000083
2897 @ 14332:         INIT   1
2898 @ 14335:         PUSHI  #0x00000213
2899 @ 14340:         INIT   1
2900 @ 14343:         PUSHI  #0x00000083
2901 @ 14348:         INIT   1
2902 @ 14351:         PUSHI  #0x00000217
2903 @ 14356:         INIT   1
2904 @ 14359:         PUSHI  #0x0000021b
2905 @ 14364:         INIT   1
2906 @ 14367:         PUSHI  #0x0000021f
2907 @ 14372:         INIT   1
2908 @ 14375:         PUSHI  #0x00000227
2909 @ 14380:         INIT   1
2910 @ 14383:         PUSHI  #0x0000022b
2911 @ 14388:         INIT   1
2912 @ 14391:         PUSHI  #0x0000022f
2913 @ 14396:         INIT   1
2914 @ 14399:         PUSHI  #0x0000023f
2915 @ 14404:         INIT   1
2916 @ 14407:         PUSHI  #0x00000243
2917 @ 14412:         INIT   1
2918 @ 14415:         PUSHI  #0x00000081
2919 @ 14420:         INIT   1
2920 @ 14423:         PUSHI  #0x00000081
2921 @ 14428:         INIT   1
2922 @ 14431:         PUSHI  #0x00000081
2923 @ 14436:         INIT   1
2924 @ 14439:         PUSHI  #0x00000081
2925 @ 14444:         INIT   1
2926 @ 14447:         PUSHI  #0x00000081
2927 @ 14452:         INIT   1
2928 @ 14455:         PUSHI  #0x00000081
2929 @ 14460:         INIT   1
2930 @ 14463:         PUSHI  #0x00000081
2931 @ 14468:         INIT   1
2932 @ 14471:         PUSHI  #0x00000081
2933 @ 14476:         INIT   1
2934 @ 14479:         PUSHI  #0x00000081
2935 @ 14484:         INIT   1
2936 @ 14487:         PUSHI  #0x00000081
2937 @ 14492:         INIT   1
2938 @ 14495:         PUSHI  #0x0000024f
2939 @ 14500:         INIT   1
2940 @ 14503:         PUSHI  #0x00000252
2941 @ 14508:         INIT   1
2942 @ 14511:         PUSHI  #0x00000257
2943 @ 14516:         INIT   1
2944 @ 14519:         PUSHI  #0x0000026b
2945 @ 14524:         INIT   1
2946 @ 14527:         PUSHI  #0x0000027b
2947 @ 14532:         INIT   1
2948 @ 14535:         PUSHI  #0x00000083
2949 @ 14540:         INIT   1
2950 @ 14543:         PUSHI  #0x00000083
2951 @ 14548:         INIT   1
2952 @ 14551:         PUSHI  #0x0000028c
2953 @ 14556:         INIT   1
2954 @ 14559:         PUSHI  #0x000002d4
2955 @ 14564:         INIT   1
2956 @ 14567:         PUSHI  #0x000002f0
2957 @ 14572:         INIT   1
2958 @ 14575:         PUSHI  #0x00000348
2959 @ 14580:         INIT   1
2960 @ 14583:         PUSHI  #0x0000036c
2961 @ 14588:         INIT   1
2962 @ 14591:         PUSHI  #0x000003fc
2963 @ 14596:         INIT   1
2964 @ 14599:         PUSHI  #0x00000080
2965 @ 14604:         INIT   1
2966 @ 14607:         PUSHI  #0x00000080
2967 @ 14612:         INIT   1
2968 @ 14615:         PUSHI  #0x0000043c
2969 @ 14620:         INIT   1
2970 @ 14623:         PUSHI  #0x00000080
2971 @ 14628:         INIT   1
2972 @ 14631:         PUSHI  #0x00000080
2973 @ 14636:         INIT   1
2974 @ 14639:         PUSHI  #0x00000510
2975 @ 14644:         INIT   1
2976 @ 14647:         PUSHI  #0x00000528
2977 @ 14652:         INIT   1
2978 @ 14655:         PUSHI  #0x00000540
2979 @ 14660:         INIT   1
2980 @ 14663:         PUSHI  #0x00000568
2981 @ 14668:         INIT   1
2982 @ 14671:         PUSHI  #0x00000580
2983 @ 14676:         INIT   1
2984 @ 14679:         PUSHI  #0x00000080
2985 @ 14684:         INIT   1
2986 @ 14687:         PUSHI  #0x000005b4
2987 @ 14692:         INIT   1
2988 @ 14695:         PUSHI  #0x00000720
2989 @ 14700:         INIT   1
2990 @ 14703:         PUSHI  #0x00000808
2991 @ 14708:         INIT   1
2992 @ 14711:         PUSHI  #0x00000820
2993 @ 14716:         INIT   1
2994 @ 14719:         PUSHI  #0x00000080
2995 @ 14724:         INIT   1
2996 @ 14727:         PUSHI  #0x00000840
2997 @ 14732:         INIT   1
2998 @ 14735:         PUSHI  #0x00000080
2999 @ 14740:         INIT   1
3000 @ 14743:         PUSHI  #0x00000080
3001 @ 14748:         INIT   1
3002 @ 14751:         PUSHI  #0x00000080
3003 @ 14756:         INIT   1
3004 @ 14759:         PUSHI  #0x00000083
3005 @ 14764:         INIT   1
3006 @ 14767:         PUSHI  #0x0000084f
3007 @ 14772:         INIT   1
3008 @ 14775:         PUSHI  #0x00000083
3009 @ 14780:         INIT   1
3010 @ 14783:         PUSHI  #0x00000083
3011 @ 14788:         INIT   1
3012 @ 14791:         PUSHI  #0x00000867
3013 @ 14796:         INIT   1
3014 @ 14799:         PUSHI  #0x00000083
3015 @ 14804:         INIT   1
3016 @ 14807:         PUSHI  #0x00000083
3017 @ 14812:         INIT   1
3018 @ 14815:         PUSHI  #0x00000083
3019 @ 14820:         INIT   1
3020 @ 14823:         PUSHI  #0x00000083
3021 @ 14828:         INIT   1
3022 @ 14831:         PUSHI  #0x00000083
3023 @ 14836:         INIT   1
3024 @ 14839:         PUSHI  #0x00000083
3025 @ 14844:         INIT   1
3026 @ 14847:         PUSHI  #0x00000083
3027 @ 14852:         INIT   1
3028 @ 14855:         PUSHI  #0x00000083
3029 @ 14860:         INIT   1
3030 @ 14863:         PUSHI  #0x00000083
3031 @ 14868:         INIT   1
3032 @ 14871:         PUSHI  #0x00000083
3033 @ 14876:         INIT   1
3034 @ 14879:         PUSHI  #0x00000083
3035 @ 14884:         INIT   1
3036 @ 14887:         PUSHI  #0x00000083
3037 @ 14892:         INIT   1
3038 @ 14895:         PUSHI  #0x00000083
3039 @ 14900:         INIT   1
3040 @ 14903:         PUSHI  #0x00000083
3041 @ 14908:         INIT   1
3042 @ 14911:         PUSHI  #0x00000083
3043 @ 14916:         INIT   1
3044 @ 14919:         PUSHI  #0x00000083
3045 @ 14924:         INIT   1
3046 @ 14927:         PUSHI  #0x00000083
3047 @ 14932:         INIT   1
3048 @ 14935:         PUSHI  #0x00000083
3049 @ 14940:         INIT   1
3050 @ 14943:         PUSHI  #0x00000083
3051 @ 14948:         INIT   1
3052 @ 14951:         PUSHI  #0x00000083
3053 @ 14956:         INIT   1
3054 @ 14959:         PUSHI  #0x00000083
3055 @ 14964:         INIT   1
3056 @ 14967:         PUSHI  #0x00000083
3057 @ 14972:         INIT   1
3058 @ 14975:         PUSHI  #0x00000083
3059 @ 14980:         INIT   1
3060 @ 14983:         PUSHI  #0x00000083
3061 @ 14988:         INIT   1
3062 @ 14991:         PUSHI  #0x00000083
3063 @ 14996:         INIT   1
3064 @ 14999:         PUSHI  #0x00000083
3065 @ 15004:         INIT   1
3066 @ 15007:         PUSHI  #0x00000083
3067 @ 15012:         INIT   1
3068 @ 15015:         PUSHI  #0x00000083
3069 @ 15020:         INIT   1
3070 @ 15023:         PUSHI  #0x0000086b
3071 @ 15028:         INIT   1
3072 @ 15031:         PUSHI  #0x00000083
3073 @ 15036:         INIT   1
3074 @ 15039:         PUSHI  #0x00000083
3075 @ 15044:         INIT   1
3076 @ 15047:         PUSHI  #0xffff81a1
3077 @ 15052:         INIT   1
3078 @ 15055:         PUSHI  #0xffffc109
3079 @ 15060:         INIT   1
3080 @ 15063:         PUSHI  #0x00004127
3081 @ 15068:         INIT   1
3082 @ 15071:         PUSHI  #0x00004167
3083 @ 15076:         INIT   1
3084 @ 15079:         PUSHI  #0x0000492e
3085 @ 15084:         INIT   1
3086 @ 15087:         PUSHI  #0x000040e6
3087 @ 15092:         INIT   1
3088 @ 15095:         PUSHI  #0x00004001
3089 @ 15100:         INIT   1
3090 @ 15103:         PUSHI  #0x00004002
3091 @ 15108:         INIT   1
3092 @ 15111:         PUSHI  #0xffffc066
3093 @ 15116:         INIT   1
3094 @ 15119:         PUSHI  #0x00004069
3095 @ 15124:         INIT   1
3096 @ 15127:         PUSHI  #0x000042e8
3097 @ 15132:         INIT   1
3098 @ 15135:         PUSHI  #0x00004004
3099 @ 15140:         INIT   1
3100 @ 15143:         PUSHI  #0xffff81be
3101 @ 15148:         INIT   1
3102 @ 15151:         PUSHI  #0xffffc328
3103 @ 15156:         INIT   1
3104 @ 15159:         PUSHI  #0x0000432b
3105 @ 15164:         INIT   1
3106 @ 15167:         PUSHI  #0x00004008
3107 @ 15172:         INIT   1
3108 @ 15175:         PUSHI  #0x000054ce
3109 @ 15180:         INIT   1
3110 @ 15183:         PUSHI  #0xffff812f
3111 @ 15188:         INIT   1
3112 @ 15191:         PUSHI  #0x00004ba9
3113 @ 15196:         INIT   1
3114 @ 15199:         PUSHI  #0x000040a6
3115 @ 15204:         INIT   1
3116 @ 15207:         PUSHI  #0x00004003
3117 @ 15212:         INIT   1
3118 @ 15215:         PUSHI  #0x0000400d
3119 @ 15220:         INIT   1
3120 @ 15223:         PUSHI  #0xffff823c
3121 @ 15228:         INIT   1
3122 @ 15231:         PUSHI  #0xffff813d
3123 @ 15236:         INIT   1
3124 @ 15239:         PUSHI  #0x0000486e
3125 @ 15244:         INIT   1
3126 @ 15247:         PUSHI  #0x0000496e
3127 @ 15252:         INIT   1
3128 @ 15255:         PUSHI  #0x000041a4
3129 @ 15260:         INIT   1
3130 @ 15263:         PUSHI  #0xffff81bd
3131 @ 15268:         INIT   1
3132 @ 15271:         PUSHI  #0xffffc8c6
3133 @ 15276:         INIT   1
3134 @ 15279:         PUSHI  #0x000048ee
3135 @ 15284:         INIT   1
3136 @ 15287:         PUSHI  #0x00004b54
3137 @ 15292:         INIT   1
3138 @ 15295:         PUSHI  #0xffff823d
3139 @ 15300:         INIT   1
3140 @ 15303:         PUSHI  #0xffff813e
3141 @ 15308:         INIT   1
3142 @ 15311:         PUSHI  #0x000048ae
3143 @ 15316:         INIT   1
3144 @ 15319:         PUSHI  #0x000041e4
3145 @ 15324:         INIT   1
3146 @ 15327:         PUSHI  #0x000049ae
3147 @ 15332:         INIT   1
3148 @ 15335:         PUSHI  #0xffff884e
3149 @ 15340:         INIT   1
3150 @ 15343:         PUSHI  #0x00002952
3151 @ 15348:         INIT   1
3152 @ 15351:         PUSHI  #0x00002cc1
3153 @ 15356:         INIT   1
3154 @ 15359:         PUSHI  #0xffff834e
3155 @ 15364:         INIT   1
3156 @ 15367:         PUSHI  #0xffff8153
3157 @ 15372:         INIT   1
3158 @ 15375:         PUSHI  #0x000041b7
3159 @ 15380:         INIT   1
3160 @ 15383:         PUSHI  #0x000022d0
3161 @ 15388:         INIT   1
3162 @ 15391:         PUSHI  #0x00000043
3163 @ 15396:         INIT   1
3164 @ 15399:         PUSHI  #0x00004237
3165 @ 15404:         INIT   1
3166 @ 15407:         PUSHI  #0x000026c1
3167 @ 15412:         INIT   1
3168 @ 15415:         PUSHI  #0x00000045
3169 @ 15420:         INIT   1
3170 @ 15423:         PUSHI  #0xffff8153
3171 @ 15428:         INIT   1
3172 @ 15431:         PUSHI  #0x000041f7
3173 @ 15436:         INIT   1
3174 @ 15439:         PUSHI  #0x000022d0
3175 @ 15444:         INIT   1
3176 @ 15447:         PUSHI  #0x00000043
3177 @ 15452:         INIT   1
3178 @ 15455:         PUSHI  #0x000042b7
3179 @ 15460:         INIT   1
3180 @ 15463:         PUSHI  #0x00000044
3181 @ 15468:         INIT   1
3182 @ 15471:         PUSHI  #0x000049de
3183 @ 15476:         INIT   1
3184 @ 15479:         PUSHI  #0xffff8245
3185 @ 15484:         INIT   1
3186 @ 15487:         PUSHI  #0x00002a59
3187 @ 15492:         INIT   1
3188 @ 15495:         PUSHI  #0x00000045
3189 @ 15500:         INIT   1
3190 @ 15503:         PUSHI  #0x00004200
3191 @ 15508:         INIT   1
3192 @ 15511:         PUSHI  #0x000024c7
3193 @ 15516:         INIT   1
3194 @ 15519:         PUSHI  #0x0000004e
3195 @ 15524:         INIT   1
3196 @ 15527:         PUSHI  #0x000043f1
3197 @ 15532:         INIT   1
3198 @ 15535:         PUSHI  #0xffff8a8a
3199 @ 15540:         INIT   1
3200 @ 15543:         PUSHI  #0xffff824f
3201 @ 15548:         INIT   1
3202 @ 15551:         PUSHI  #0x000021d9
3203 @ 15556:         INIT   1
3204 @ 15559:         PUSHI  #0x000022cc
3205 @ 15564:         INIT   1
3206 @ 15567:         PUSHI  #0x0000400a
3207 @ 15572:         INIT   1
3208 @ 15575:         PUSHI  #0xffff86cd
3209 @ 15580:         INIT   1
3210 @ 15583:         PUSHI  #0x0000004e
3211 @ 15588:         INIT   1
3212 @ 15591:         PUSHI  #0xffff84d3
3213 @ 15596:         INIT   1
3214 @ 15599:         PUSHI  #0x00000054
3215 @ 15604:         INIT   1
3216 @ 15607:         PUSHI  #0xffff8249
3217 @ 15612:         INIT   1
3218 @ 15615:         PUSHI  #0x000027d2
3219 @ 15620:         INIT   1
3220 @ 15623:         PUSHI  #0x0000004c
3221 @ 15628:         INIT   1
3222 @ 15631:         PUSHI  #0x000043ea
3223 @ 15636:         INIT   1
3224 @ 15639:         PUSHI  #0x00002ace
3225 @ 15644:         INIT   1
3226 @ 15647:         PUSHI  #0x00000045
3227 @ 15652:         INIT   1
3228 @ 15655:         PUSHI  #0x000046d7
3229 @ 15660:         INIT   1
3230 @ 15663:         PUSHI  #0x00000054
3231 @ 15668:         INIT   1
3232 @ 15671:         PUSHI  #0x00004080
3233 @ 15676:         INIT   1
3234 @ 15679:         PUSHI  #0x000022cd
3235 @ 15684:         INIT   1
3236 @ 15687:         PUSHI  #0x00002a4e
3237 @ 15692:         INIT   1
3238 @ 15695:         PUSHI  #0x00004007
3239 @ 15700:         INIT   1
3240 @ 15703:         PUSHI  #0x00004000
3241 @ 15708:         INIT   1
3242 @ 15711:         PUSHI  #0xffff82c9
3243 @ 15716:         INIT   1
3244 @ 15719:         PUSHI  #0x00002759
3245 @ 15724:         INIT   1
3246 @ 15727:         PUSHI  #0x000026c1
3247 @ 15732:         INIT   1
3248 @ 15735:         PUSHI  #0x000021c9
3249 @ 15740:         INIT   1
3250 @ 15743:         PUSHI  #0x00004140
3251 @ 15748:         INIT   1
3252 @ 15751:         PUSHI  #0x000023c1
3253 @ 15756:         INIT   1
3254 @ 15759:         PUSHI  #0x000027ce
3255 @ 15764:         INIT   1
3256 @ 15767:         PUSHI  #0x000022d3
3257 @ 15772:         INIT   1
3258 @ 15775:         PUSHI  #0x000043aa
3259 @ 15780:         INIT   1
3260 @ 15783:         PUSHI  #0xffff914c
3261 @ 15788:         INIT   1
3262 @ 15791:         PUSHI  #0xffff86ce
3263 @ 15796:         INIT   1
3264 @ 15799:         PUSHI  #0xffff84d6
3265 @ 15804:         INIT   1
3266 @ 15807:         PUSHI  #0x00000058
3267 @ 15812:         INIT   1
3268 @ 15815:         PUSHI  #0xffff82c9
3269 @ 15820:         INIT   1
3270 @ 15823:         PUSHI  #0x000022d4
3271 @ 15828:         INIT   1
3272 @ 15831:         PUSHI  #0x00002752
3273 @ 15836:         INIT   1
3274 @ 15839:         PUSHI  #0x00002641
3275 @ 15844:         INIT   1
3276 @ 15847:         PUSHI  #0x00004180
3277 @ 15852:         INIT   1
3278 @ 15855:         PUSHI  #0x00000054
3279 @ 15860:         INIT   1
3280 @ 15863:         PUSHI  #0x00004697
3281 @ 15868:         INIT   1
3282 @ 15871:         PUSHI  #0x00002745
3283 @ 15876:         INIT   1
3284 @ 15879:         PUSHI  #0x00000054
3285 @ 15884:         INIT   1
3286 @ 15887:         PUSHI  #0x0000400f
3287 @ 15892:         INIT   1
3288 @ 15895:         PUSHI  #0x00000044
3289 @ 15900:         INIT   1
3290 @ 15903:         PUSHI  #0xffff814f
3291 @ 15908:         INIT   1
3292 @ 15911:         PUSHI  #0x00005571
3293 @ 15916:         INIT   1
3294 @ 15919:         PUSHI  #0x00000046
3295 @ 15924:         INIT   1
3296 @ 15927:         PUSHI  #0xffff86c6
3297 @ 15932:         INIT   1
3298 @ 15935:         PUSHI  #0xffff84cc
3299 @ 15940:         INIT   1
3300 @ 15943:         PUSHI  #0x00000050
3301 @ 15948:         INIT   1
3302 @ 15951:         PUSHI  #0xffff82c5
3303 @ 15956:         INIT   1
3304 @ 15959:         PUSHI  #0x000027d2
3305 @ 15964:         INIT   1
3306 @ 15967:         PUSHI  #0x00002947
3307 @ 15972:         INIT   1
3308 @ 15975:         PUSHI  #0x000026c1
3309 @ 15980:         INIT   1
3310 @ 15983:         PUSHI  #0x000055f1
3311 @ 15988:         INIT   1
3312 @ 15991:         PUSHI  #0x000026d2
3313 @ 15996:         INIT   1
3314 @ 15999:         PUSHI  #0x00005631
3315 @ 16004:         INIT   1
3316 @ 16007:         PUSHI  #0x000029c9
3317 @ 16012:         INIT   1
3318 @ 16015:         PUSHI  #0x00000054
3319 @ 16020:         INIT   1
3320 @ 16023:         PUSHI  #0x000045f0
3321 @ 16028:         INIT   1
3322 @ 16031:         PUSHI  #0x00002649
3323 @ 16036:         INIT   1
3324 @ 16039:         PUSHI  #0x00000045
3325 @ 16044:         INIT   1
3326 @ 16047:         PUSHI  #0x000055b1
3327 @ 16052:         INIT   1
3328 @ 16055:         PUSHI  #0x000022d3
3329 @ 16060:         INIT   1
3330 @ 16063:         PUSHI  #0x00004ae3
3331 @ 16068:         INIT   1
3332 @ 16071:         PUSHI  #0xffff86c1
3333 @ 16076:         INIT   1
3334 @ 16079:         PUSHI  #0xffff84c9
3335 @ 16084:         INIT   1
3336 @ 16087:         PUSHI  #0xffff81ce
3337 @ 16092:         INIT   1
3338 @ 16095:         PUSHI  #0x0000294f
3339 @ 16100:         INIT   1
3340 @ 16103:         PUSHI  #0x0000400b
3341 @ 16108:         INIT   1
3342 @ 16111:         PUSHI  #0xffff8153
3343 @ 16116:         INIT   1
3344 @ 16119:         PUSHI  #0x000042f7
3345 @ 16124:         INIT   1
3346 @ 16127:         PUSHI  #0x000022d0
3347 @ 16132:         INIT   1
3348 @ 16135:         PUSHI  #0x00000043
3349 @ 16140:         INIT   1
3350 @ 16143:         PUSHI  #0x00004337
3351 @ 16148:         INIT   1
3352 @ 16151:         PUSHI  #0x000024ce
3353 @ 16156:         INIT   1
3354 @ 16159:         PUSHI  #0x00002453
3355 @ 16164:         INIT   1
3356 @ 16167:         PUSHI  #0x00004aa2
3357 @ 16172:         INIT   1
3358 @ 16175:         PUSHI  #0x000029cc
3359 @ 16180:         INIT   1
3360 @ 16183:         PUSHI  #0x00000045
3361 @ 16188:         INIT   1
3362 @ 16191:         PUSHI  #0x000044d7
3363 @ 16196:         INIT   1
3364 @ 16199:         PUSHI  #0xffff9a46
3365 @ 16204:         INIT   1
3366 @ 16207:         PUSHI  #0x00002a4e
3367 @ 16212:         INIT   1
3368 @ 16215:         PUSHI  #0x000023c5
3369 @ 16220:         INIT   1
3370 @ 16223:         PUSHI  #0x00002945
3371 @ 16228:         INIT   1
3372 @ 16231:         PUSHI  #0xffff9041
3373 @ 16236:         INIT   1
3374 @ 16239:         PUSHI  #0xffff8c46
3375 @ 16244:         INIT   1
3376 @ 16247:         PUSHI  #0xffff884d
3377 @ 16252:         INIT   1
3378 @ 16255:         PUSHI  #0xffff83ce
3379 @ 16260:         INIT   1
3380 @ 16263:         PUSHI  #0xffff81d3
3381 @ 16268:         INIT   1
3382 @ 16271:         PUSHI  #0xffffc475
3383 @ 16276:         INIT   1
3384 @ 16279:         PUSHI  #0x00004478
3385 @ 16284:         INIT   1
3386 @ 16287:         PUSHI  #0x000022d0
3387 @ 16292:         INIT   1
3388 @ 16295:         PUSHI  #0x00000043
3389 @ 16300:         INIT   1
3390 @ 16303:         PUSHI  #0x00005b78
3391 @ 16308:         INIT   1
3392 @ 16311:         PUSHI  #0x000026c1
3393 @ 16316:         INIT   1
3394 @ 16319:         PUSHI  #0x00000045
3395 @ 16324:         INIT   1
3396 @ 16327:         PUSHI  #0xffff81d3
3397 @ 16332:         INIT   1
3398 @ 16335:         PUSHI  #0xffffc4b5
3399 @ 16340:         INIT   1
3400 @ 16343:         PUSHI  #0x000044b8
3401 @ 16348:         INIT   1
3402 @ 16351:         PUSHI  #0x000022d0
3403 @ 16356:         INIT   1
3404 @ 16359:         PUSHI  #0x00000043
3405 @ 16364:         INIT   1
3406 @ 16367:         PUSHI  #0x00005bb8
3407 @ 16372:         INIT   1
3408 @ 16375:         PUSHI  #0x00002841
3409 @ 16380:         INIT   1
3410 @ 16383:         PUSHI  #0xffff81d3
3411 @ 16388:         INIT   1
3412 @ 16391:         PUSHI  #0xffffc672
3413 @ 16396:         INIT   1
3414 @ 16399:         PUSHI  #0x00004678
3415 @ 16404:         INIT   1
3416 @ 16407:         PUSHI  #0x000022d0
3417 @ 16412:         INIT   1
3418 @ 16415:         PUSHI  #0x00000043
3419 @ 16420:         INIT   1
3420 @ 16423:         PUSHI  #0x00005ef2
3421 @ 16428:         INIT   1
3422 @ 16431:         PUSHI  #0x0000004e
3423 @ 16436:         INIT   1
3424 @ 16439:         PUSHI  #0xffff81d3
3425 @ 16444:         INIT   1
3426 @ 16447:         PUSHI  #0xffffc632
3427 @ 16452:         INIT   1
3428 @ 16455:         PUSHI  #0x00004638
3429 @ 16460:         INIT   1
3430 @ 16463:         PUSHI  #0x000022d0
3431 @ 16468:         INIT   1
3432 @ 16471:         PUSHI  #0x00000043
3433 @ 16476:         INIT   1
3434 @ 16479:         PUSHI  #0x00005f32
3435 @ 16484:         INIT   1
3436 @ 16487:         PUSHI  #0x00002952
3437 @ 16492:         INIT   1
3438 @ 16495:         PUSHI  #0x00002cc1
3439 @ 16500:         INIT   1
3440 @ 16503:         PUSHI  #0xffff834e
3441 @ 16508:         INIT   1
3442 @ 16511:         PUSHI  #0xffff8153
3443 @ 16516:         INIT   1
3444 @ 16519:         PUSHI  #0x000046f3
3445 @ 16524:         INIT   1
3446 @ 16527:         PUSHI  #0x000022d0
3447 @ 16532:         INIT   1
3448 @ 16535:         PUSHI  #0x00000043
3449 @ 16540:         INIT   1
3450 @ 16543:         PUSHI  #0x00005bf3
3451 @ 16548:         INIT   1
3452 @ 16551:         PUSHI  #0x000026c1
3453 @ 16556:         INIT   1
3454 @ 16559:         PUSHI  #0x00000045
3455 @ 16564:         INIT   1
3456 @ 16567:         PUSHI  #0xffff81d3
3457 @ 16572:         INIT   1
3458 @ 16575:         PUSHI  #0xffffc735
3459 @ 16580:         INIT   1
3460 @ 16583:         PUSHI  #0x00004738
3461 @ 16588:         INIT   1
3462 @ 16591:         PUSHI  #0x000022d0
3463 @ 16596:         INIT   1
3464 @ 16599:         PUSHI  #0x00000043
3465 @ 16604:         INIT   1
3466 @ 16607:         PUSHI  #0x00005c38
3467 @ 16612:         INIT   1
3468 @ 16615:         PUSHI  #0x0000471c
3469 @ 16620:         INIT   1
3470 @ 16623:         PUSHI  #0xffff8249
3471 @ 16628:         INIT   1
3472 @ 16631:         PUSHI  #0x0000274f
3473 @ 16636:         INIT   1
3474 @ 16639:         PUSHI  #0x00000047
3475 @ 16644:         INIT   1
3476 @ 16647:         PUSHI  #0x00004280
3477 @ 16652:         INIT   1
3478 @ 16655:         PUSHI  #0x00002a53
3479 @ 16660:         INIT   1
3480 @ 16663:         PUSHI  #0x000045b0
3481 @ 16668:         INIT   1
3482 @ 16671:         PUSHI  #0x00002841
3483 @ 16676:         INIT   1
3484 @ 16679:         PUSHI  #0xffff8153
3485 @ 16684:         INIT   1
3486 @ 16687:         PUSHI  #0x000040f7
3487 @ 16692:         INIT   1
3488 @ 16695:         PUSHI  #0x000022d0
3489 @ 16700:         INIT   1
3490 @ 16703:         PUSHI  #0x00000043
3491 @ 16708:         INIT   1
3492 @ 16711:         PUSHI  #0x00004137
3493 @ 16716:         INIT   1
3494 @ 16719:         PUSHI  #0xffff81c1
3495 @ 16724:         INIT   1
3496 @ 16727:         PUSHI  #0x00002a4f
3497 @ 16732:         INIT   1
3498 @ 16735:         PUSHI  #0x00004820
3499 @ 16740:         INIT   1
3500 @ 16743:         PUSHI  #0x000022cd
3501 @ 16748:         INIT   1
3502 @ 16751:         PUSHI  #0xffff81d3
3503 @ 16756:         INIT   1
3504 @ 16759:         PUSHI  #0xffffc0b7
3505 @ 16764:         INIT   1
3506 @ 16767:         PUSHI  #0x000040b8
3507 @ 16772:         INIT   1
3508 @ 16775:         PUSHI  #0x000022d0
3509 @ 16780:         INIT   1
3510 @ 16783:         PUSHI  #0x00000043
3511 @ 16788:         INIT   1
3512 @ 16791:         PUSHI  #0x00004277
3513 @ 16796:         INIT   1
3514 @ 16799:         PUSHI  #0xffff82ce
3515 @ 16804:         INIT   1
3516 @ 16807:         PUSHI  #0xffff81d2
3517 @ 16812:         INIT   1
3518 @ 16815:         PUSHI  #0x00002757
3519 @ 16820:         INIT   1
3520 @ 16823:         PUSHI  #0x00004040
3521 @ 16828:         INIT   1
3522 @ 16831:         PUSHI  #0x00004a1f
3523 @ 16836:         INIT   1
3524 @ 16839:         PUSHI  #0x00004b13
3525 @ 16844:         INIT   1
3526 @ 16847:         PUSHI  #0xffff85c5
3527 @ 16852:         INIT   1
3528 @ 16855:         PUSHI  #0x000022d2
3529 @ 16860:         INIT   1
3530 @ 16863:         PUSHI  #0x000024c4
3531 @ 16868:         INIT   1
3532 @ 16871:         PUSHI  #0x000020c3
3533 @ 16876:         INIT   1
3534 @ 16879:         PUSHI  #0x000022d4
3535 @ 16884:         INIT   1
3536 @ 16887:         PUSHI  #0xffff81d3
3537 @ 16892:         INIT   1
3538 @ 16895:         PUSHI  #0xffffc2b2
3539 @ 16900:         INIT   1
3540 @ 16903:         PUSHI  #0x000042b8
3541 @ 16908:         INIT   1
3542 @ 16911:         PUSHI  #0x000022d0
3543 @ 16916:         INIT   1
3544 @ 16919:         PUSHI  #0x00000043
3545 @ 16924:         INIT   1
3546 @ 16927:         PUSHI  #0x00005df2
3547 @ 16932:         INIT   1
3548 @ 16935:         PUSHI  #0x000026d2
3549 @ 16940:         INIT   1
3550 @ 16943:         PUSHI  #0x000041c0
3551 @ 16948:         INIT   1
3552 @ 16951:         PUSHI  #0xffff8545
3553 @ 16956:         INIT   1
3554 @ 16959:         PUSHI  #0x00002acf
3555 @ 16964:         INIT   1
3556 @ 16967:         PUSHI  #0x000024d4
3557 @ 16972:         INIT   1
3558 @ 16975:         PUSHI  #0x000022ce
3559 @ 16980:         INIT   1
3560 @ 16983:         PUSHI  #0xffff81d3
3561 @ 16988:         INIT   1
3562 @ 16991:         PUSHI  #0xffffc1f2
3563 @ 16996:         INIT   1
3564 @ 16999:         PUSHI  #0x000041f8
3565 @ 17004:         INIT   1
3566 @ 17007:         PUSHI  #0x000022d0
3567 @ 17012:         INIT   1
3568 @ 17015:         PUSHI  #0x00000043
3569 @ 17020:         INIT   1
3570 @ 17023:         PUSHI  #0x00005e32
3571 @ 17028:         INIT   1
3572 @ 17031:         PUSHI  #0xffff8bc1
3573 @ 17036:         INIT   1
3574 @ 17039:         PUSHI  #0xffff8743
3575 @ 17044:         INIT   1
3576 @ 17047:         PUSHI  #0xffff8550
3577 @ 17052:         INIT   1
3578 @ 17055:         PUSHI  #0xffff8253
3579 @ 17060:         INIT   1
3580 @ 17063:         PUSHI  #0x00002ad4
3581 @ 17068:         INIT   1
3582 @ 17071:         PUSHI  #0x00002752
3583 @ 17076:         INIT   1
3584 @ 17079:         PUSHI  #0x00004457
3585 @ 17084:         INIT   1
3586 @ 17087:         PUSHI  #0x00002655
3587 @ 17092:         INIT   1
3588 @ 17095:         PUSHI  #0x00001ed4
3589 @ 17100:         INIT   1
3590 @ 17103:         PUSHI  #0xffff813d
3591 @ 17108:         INIT   1
3592 @ 17111:         PUSHI  #0x00004416
3593 @ 17116:         INIT   1
3594 @ 17119:         PUSHI  #0x00004295
3595 @ 17124:         INIT   1
3596 @ 17127:         PUSHI  #0x000020c5
3597 @ 17132:         INIT   1
3598 @ 17135:         PUSHI  #0x00000054
3599 @ 17140:         INIT   1
3600 @ 17143:         PUSHI  #0x00004a61
3601 @ 17148:         INIT   1
3602 @ 17151:         PUSHI  #0x0000294f
3603 @ 17156:         INIT   1
3604 @ 17159:         PUSHI  #0x00000044
3605 @ 17164:         INIT   1
3606 @ 17167:         PUSHI  #0xffff82a8
3607 @ 17172:         INIT   1
3608 @ 17175:         PUSHI  #0x000027c6
3609 @ 17180:         INIT   1
3610 @ 17183:         PUSHI  #0x000026d2
3611 @ 17188:         INIT   1
3612 @ 17191:         PUSHI  #0x00002a41
3613 @ 17196:         INIT   1
3614 @ 17199:         PUSHI  #0x00005532
3615 @ 17204:         INIT   1
3616 @ 17207:         PUSHI  #0x00005411
3617 @ 17212:         INIT   1
3618 @ 17215:         PUSHI  #0x0000004c
3619 @ 17220:         INIT   1
3620 @ 17223:         PUSHI  #0xffff94c1
3621 @ 17228:         INIT   1
3622 @ 17231:         PUSHI  #0xffff90c6
3623 @ 17236:         INIT   1
3624 @ 17239:         PUSHI  #0xffff8ccd
3625 @ 17244:         INIT   1
3626 @ 17247:         PUSHI  #0xffff884e
3627 @ 17252:         INIT   1
3628 @ 17255:         PUSHI  #0xffff81d3
3629 @ 17260:         INIT   1
3630 @ 17263:         PUSHI  #0xffffd875
3631 @ 17268:         INIT   1
3632 @ 17271:         PUSHI  #0x00005878
3633 @ 17276:         INIT   1
3634 @ 17279:         PUSHI  #0xffff84cc
3635 @ 17284:         INIT   1
3636 @ 17287:         PUSHI  #0xffff824e
3637 @ 17292:         INIT   1
3638 @ 17295:         PUSHI  #0x000022d0
3639 @ 17300:         INIT   1
3640 @ 17303:         PUSHI  #0x00000043
3641 @ 17308:         INIT   1
3642 @ 17311:         PUSHI  #0x00005c78
3643 @ 17316:         INIT   1
3644 @ 17319:         PUSHI  #0x0000294f
3645 @ 17324:         INIT   1
3646 @ 17327:         PUSHI  #0x000020cd
3647 @ 17332:         INIT   1
3648 @ 17335:         PUSHI  #0x0000004c
3649 @ 17340:         INIT   1
3650 @ 17343:         PUSHI  #0x00004670
3651 @ 17348:         INIT   1
3652 @ 17351:         PUSHI  #0x0000274f
3653 @ 17356:         INIT   1
3654 @ 17359:         PUSHI  #0x00000047
3655 @ 17364:         INIT   1
3656 @ 17367:         PUSHI  #0x00004630
3657 @ 17372:         INIT   1
3658 @ 17375:         PUSHI  #0x000026c1
3659 @ 17380:         INIT   1
3660 @ 17383:         PUSHI  #0x00000045
3661 @ 17388:         INIT   1
3662 @ 17391:         PUSHI  #0xffff81d3
3663 @ 17396:         INIT   1
3664 @ 17399:         PUSHI  #0xffffd8b5
3665 @ 17404:         INIT   1
3666 @ 17407:         PUSHI  #0x000058b8
3667 @ 17412:         INIT   1
3668 @ 17415:         PUSHI  #0x000022d0
3669 @ 17420:         INIT   1
3670 @ 17423:         PUSHI  #0x00000043
3671 @ 17428:         INIT   1
3672 @ 17431:         PUSHI  #0x00005cb8
3673 @ 17436:         INIT   1
3674 @ 17439:         PUSHI  #0x00002841
3675 @ 17444:         INIT   1
3676 @ 17447:         PUSHI  #0xffff81d3
3677 @ 17452:         INIT   1
3678 @ 17455:         PUSHI  #0xffffda72
3679 @ 17460:         INIT   1
3680 @ 17463:         PUSHI  #0x00005a78
3681 @ 17468:         INIT   1
3682 @ 17471:         PUSHI  #0x000022d0
3683 @ 17476:         INIT   1
3684 @ 17479:         PUSHI  #0x00000043
3685 @ 17484:         INIT   1
3686 @ 17487:         PUSHI  #0x00005e72
3687 @ 17492:         INIT   1
3688 @ 17495:         PUSHI  #0x0000004e
3689 @ 17500:         INIT   1
3690 @ 17503:         PUSHI  #0xffff81d3
3691 @ 17508:         INIT   1
3692 @ 17511:         PUSHI  #0xffffda32
3693 @ 17516:         INIT   1
3694 @ 17519:         PUSHI  #0x00005a38
3695 @ 17524:         INIT   1
3696 @ 17527:         PUSHI  #0x000022d0
3697 @ 17532:         INIT   1
3698 @ 17535:         PUSHI  #0x00000043
3699 @ 17540:         INIT   1
3700 @ 17543:         PUSHI  #0x00005eb2
3701 @ 17548:         INIT   1
3702 @ 17551:         PUSHI  #0x00002952
3703 @ 17556:         INIT   1
3704 @ 17559:         PUSHI  #0x00002cc1
3705 @ 17564:         INIT   1
3706 @ 17567:         PUSHI  #0xffff834e
3707 @ 17572:         INIT   1
3708 @ 17575:         PUSHI  #0xffff8153
3709 @ 17580:         INIT   1
3710 @ 17583:         PUSHI  #0x00005af3
3711 @ 17588:         INIT   1
3712 @ 17591:         PUSHI  #0x000022d0
3713 @ 17596:         INIT   1
3714 @ 17599:         PUSHI  #0x00000043
3715 @ 17604:         INIT   1
3716 @ 17607:         PUSHI  #0x00005cf3
3717 @ 17612:         INIT   1
3718 @ 17615:         PUSHI  #0x000026c1
3719 @ 17620:         INIT   1
3720 @ 17623:         PUSHI  #0x00000045
3721 @ 17628:         INIT   1
3722 @ 17631:         PUSHI  #0xffff81d3
3723 @ 17636:         INIT   1
3724 @ 17639:         PUSHI  #0xffffdb35
3725 @ 17644:         INIT   1
3726 @ 17647:         PUSHI  #0x00005b38
3727 @ 17652:         INIT   1
3728 @ 17655:         PUSHI  #0x000022d0
3729 @ 17660:         INIT   1
3730 @ 17663:         PUSHI  #0x00000043
3731 @ 17668:         INIT   1
3732 @ 17671:         PUSHI  #0x00005d38
3733 @ 17676:         INIT   1
3734 @ 17679:         PUSHI  #0xffff9bc8
3735 @ 17684:         INIT   1
3736 @ 17687:         PUSHI  #0xffff99c9
3737 @ 17692:         INIT   1
3738 @ 17695:         PUSHI  #0xffff97d0
3739 @ 17700:         INIT   1
3740 @ 17703:         PUSHI  #0xffff84d4
3741 @ 17708:         INIT   1
3742 @ 17711:         PUSHI  #0xffff82d7
3743 @ 17716:         INIT   1
3744 @ 17719:         PUSHI  #0x000029d9
3745 @ 17724:         INIT   1
3746 @ 17727:         PUSHI  #0x000022d4
3747 @ 17732:         INIT   1
3748 @ 17735:         PUSHI  #0x0000004d
3749 @ 17740:         INIT   1
3750 @ 17743:         PUSHI  #0x00004100
3751 @ 17748:         INIT   1
3752 @ 17751:         PUSHI  #0x00002a49
3753 @ 17756:         INIT   1
3754 @ 17759:         PUSHI  #0x00002443
3755 @ 17764:         INIT   1
3756 @ 17767:         PUSHI  #0x000041b9
3757 @ 17772:         INIT   1
3758 @ 17775:         PUSHI  #0xffff91c1
3759 @ 17780:         INIT   1
3760 @ 17783:         PUSHI  #0xffff904f
3761 @ 17788:         INIT   1
3762 @ 17791:         PUSHI  #0x000024d2
3763 @ 17796:         INIT   1
3764 @ 17799:         PUSHI  #0x000023ce
3765 @ 17804:         INIT   1
3766 @ 17807:         PUSHI  #0xffff8e28
3767 @ 17812:         INIT   1
3768 @ 17815:         PUSHI  #0xffff8ac1
3769 @ 17820:         INIT   1
3770 @ 17823:         PUSHI  #0xffff86c6
3771 @ 17828:         INIT   1
3772 @ 17831:         PUSHI  #0xffff82cd
3773 @ 17836:         INIT   1
3774 @ 17839:         PUSHI  #0x000020ce
3775 @ 17844:         INIT   1
3776 @ 17847:         PUSHI  #0x000022cd
3777 @ 17852:         INIT   1
3778 @ 17855:         PUSHI  #0xffffd0b5
3779 @ 17860:         INIT   1
3780 @ 17863:         PUSHI  #0x000050b8
3781 @ 17868:         INIT   1
3782 @ 17871:         PUSHI  #0x00002841
3783 @ 17876:         INIT   1
3784 @ 17879:         PUSHI  #0xffff81d3
3785 @ 17884:         INIT   1
3786 @ 17887:         PUSHI  #0xffffd272
3787 @ 17892:         INIT   1
3788 @ 17895:         PUSHI  #0x00005278
3789 @ 17900:         INIT   1
3790 @ 17903:         PUSHI  #0x000022d0
3791 @ 17908:         INIT   1
3792 @ 17911:         PUSHI  #0x00000043
3793 @ 17916:         INIT   1
3794 @ 17919:         PUSHI  #0x00005fb2
3795 @ 17924:         INIT   1
3796 @ 17927:         PUSHI  #0x0000004e
3797 @ 17932:         INIT   1
3798 @ 17935:         PUSHI  #0xffff81d3
3799 @ 17940:         INIT   1
3800 @ 17943:         PUSHI  #0xffffd232
3801 @ 17948:         INIT   1
3802 @ 17951:         PUSHI  #0x00005238
3803 @ 17956:         INIT   1
3804 @ 17959:         PUSHI  #0x000022d0
3805 @ 17964:         INIT   1
3806 @ 17967:         PUSHI  #0x00000043
3807 @ 17972:         INIT   1
3808 @ 17975:         PUSHI  #0x00005d72
3809 @ 17980:         INIT   1
3810 @ 17983:         PUSHI  #0x00002952
3811 @ 17988:         INIT   1
3812 @ 17991:         PUSHI  #0x00002cc1
3813 @ 17996:         INIT   1
3814 @ 17999:         PUSHI  #0x000020ce
3815 @ 18004:         INIT   1
3816 @ 18007:         PUSHI  #0x000022cd
3817 @ 18012:         INIT   1
3818 @ 18015:         PUSHI  #0xffffd335
3819 @ 18020:         INIT   1
3820 @ 18023:         PUSHI  #0x00005338
3821 @ 18028:         INIT   1
3822 @ 18031:         PUSHI  #0x00005010
3823 @ 18036:         INIT   1
3824 @ 18039:         PUSHI  #0x00000050
3825 @ 18044:         INIT   1
3826 @ 18047:         PUSHI  #0x00004557
3827 @ 18052:         INIT   1
3828 @ 18055:         PUSHI  #0x00002a52
3829 @ 18060:         INIT   1
3830 @ 18063:         PUSHI  #0x0000400c
3831 @ 18068:         INIT   1
3832 @ 18071:         PUSHI  #0x000021c5
3833 @ 18076:         INIT   1
3834 @ 18079:         PUSHI  #0xffffdff2
3835 @ 18084:         INIT   1
3836 @ 18087:         PUSHI  #0x00005ff7
3837 @ 18092:         INIT   1
3838 @ 18095:         PUSHI  #0x00002747
3839 @ 18100:         INIT   1
3840 @ 18103:         PUSHI  #0x00002641
3841 @ 18108:         INIT   1
3842 @ 18111:         PUSHI  #0x00004518
3843 @ 18116:         INIT   1
3844 @ 18119:         PUSHI  #0x0000294f
3845 @ 18124:         INIT   1
3846 @ 18127:         PUSHI  #0x00000054
3847 @ 18132:         INIT   1
3848 @ 18135:         PUSHI  #0x00004240
3849 @ 18140:         INIT   1
3850 @ 18143:         PUSHI  #0xffff8248
3851 @ 18148:         INIT   1
3852 @ 18151:         PUSHI  #0x00002ad2
3853 @ 18156:         INIT   1
3854 @ 18159:         PUSHI  #0x00000045
3855 @ 18164:         INIT   1
3856 @ 18167:         PUSHI  #0x00004497
3857 @ 18172:         INIT   1
3858 @ 18175:         PUSHI  #0x00002745
3859 @ 18180:         INIT   1
3860 @ 18183:         PUSHI  #0x00004005
3861 @ 18188:         INIT   1
3862 @ 18191:         PUSHI  #0x0000004e
3863 @ 18196:         INIT   1
3864 @ 18199:         PUSHI  #0xffff824c
3865 @ 18204:         INIT   1
3866 @ 18207:         PUSHI  #0x000024d4
3867 @ 18212:         INIT   1
3868 @ 18215:         PUSHI  #0x0000004c
3869 @ 18220:         INIT   1
3870 @ 18223:         PUSHI  #0x000047dd
3871 @ 18228:         INIT   1
3872 @ 18231:         PUSHI  #0x000029c5
3873 @ 18236:         INIT   1
3874 @ 18239:         PUSHI  #0x00000053
3875 @ 18244:         INIT   1
3876 @ 18247:         PUSHI  #0x0000475c
3877 @ 18252:         INIT   1
3878 @ 18255:         PUSHI  #0x000024c8
3879 @ 18260:         INIT   1
3880 @ 18263:         PUSHI  #0x000022cc
3881 @ 18268:         INIT   1
3882 @ 18271:         PUSHI  #0x0000479d
3883 @ 18276:         INIT   1
3884 @ 18279:         PUSHI  #0xffff82bd
3885 @ 18284:         INIT   1
3886 @ 18287:         PUSHI  #0xffff81dc
3887 @ 18292:         INIT   1
3888 @ 18295:         PUSHI  #0xffffc265
3889 @ 18300:         INIT   1
3890 @ 18303:         PUSHI  #0x0000426d
3891 @ 18308:         INIT   1
3892 @ 18311:         PUSHI  #0x00004364
3893 @ 18316:         INIT   1
3894 @ 18319:         PUSHI  #0x0000492e
3895 @ 18324:         INIT   1
3896 @ 18327:         PUSHI  #0x00004012
3897 @ 18332:         INIT   1
3898 @ 18335:         PUSHI  #0x00004109
3899 @ 18340:         INIT   1

   249  %CONSTINTEGER SS0=250, SS1=251, SS2=252, SS3=253, SS4=254
3900 @ 18343:         LINE   249 "regression-compile-tmp/comp412.imp"

   250  %CONSTINTEGER NULL=512;    !???
3901 @ 18381:         LINE   250 "regression-compile-tmp/comp412.imp"

   251  %CONSTINTEGER TRANSP = 18
3902 @ 18419:         LINE   251 "regression-compile-tmp/comp412.imp"

   252  %CONSTINTEGER PHRASES = 132
3903 @ 18457:         LINE   252 "regression-compile-tmp/comp412.imp"

   253  %CONSTINTEGER EQUIVS = 105
3904 @ 18495:         LINE   253 "regression-compile-tmp/comp412.imp"

   254  %CONSTINTEGER DIRECTIVES = 86
3905 @ 18533:         LINE   254 "regression-compile-tmp/comp412.imp"

   255  %CONSTINTEGER ANAPP=160
3906 @ 18571:         LINE   255 "regression-compile-tmp/comp412.imp"

   256  %CONSTINTEGER GLOBAL=0
3907 @ 18609:         LINE   256 "regression-compile-tmp/comp412.imp"

   257  %CONSTINTEGER ICONST=83, RCONST=84, SCONST=82
3908 @ 18647:         LINE   257 "regression-compile-tmp/comp412.imp"

   258  %CONSTINTEGER LB=1, RB=2
3909 @ 18685:         LINE   258 "regression-compile-tmp/comp412.imp"

   259  %CONSTINTEGER PRE1=49, PRE2=57
3910 @ 18723:         LINE   259 "regression-compile-tmp/comp412.imp"

   260  %CONSTINTEGER OWN1=53, OWN2=51
3911 @ 18761:         LINE   260 "regression-compile-tmp/comp412.imp"

   261  %CONSTINTEGER SET1=60, SET2=64
3912 @ 18799:         LINE   261 "regression-compile-tmp/comp412.imp"

   262  %CONSTINTEGER CHECK1=66, CHECK2=72
3913 @ 18837:         LINE   262 "regression-compile-tmp/comp412.imp"

   263  %CONSTINTEGER DEF1=60, DEF2=79
3914 @ 18875:         LINE   263 "regression-compile-tmp/comp412.imp"

   264  %CONSTINTEGER IDENT=59, SWITCH=80, COMMENT=7
3915 @ 18913:         LINE   264 "regression-compile-tmp/comp412.imp"

   265  %CONSTINTEGER TERMIN=13
3916 @ 18951:         LINE   265 "regression-compile-tmp/comp412.imp"

   266  %CONSTINTEGER APPEP=153
3917 @ 18989:         LINE   266 "regression-compile-tmp/comp412.imp"

   267  %CONSTINTEGER PAGE SIZE = 64
3918 @ 19027:         LINE   267 "regression-compile-tmp/comp412.imp"

   268  %CONSTINTEGER STX = 2
3919 @ 19065:         LINE   268 "regression-compile-tmp/comp412.imp"

   269  %CONSTINTEGER PAGE = 12
   270  !*********************************************
   271  !* OTYPE * MOD * SPECD * FORMAT * APP * LINK *
   272  !*********************************************
   273  !    3      2      1       1       1      8
   274  !
   275  ! OTYPE : 1 OWN
   276  !         2 CONST
   277  !         3 EXTRINSIC
   278  !         4 SYSTEM
   279  !         5 DYNAMIC
   280  !         6 EXTERNAL
   281  !         7 PERM
   282  !
   283  !*******************************
   284  !* LENGTH * USED * TYPE * FORM *
   285  !*******************************
   286  !     8       1      3      4
   287  !
3920 @ 19103:         LINE   269 "regression-compile-tmp/comp412.imp"

   288  %BEGIN
   289  ! ------I/O STREAM ASSIGNMENTS CHANGED TEMPORARILY------
3921 @ 19141:         LINE   288 "regression-compile-tmp/comp412.imp"
3922 @ 19179:         BEGIN  _lev0id0 {lev=0 --> 1}

   290  %CONSTINTEGER PRIM = 2, PROG = 1;           ! INPUT STREAMS
3923 @ 19180:            LINE   290 "regression-compile-tmp/comp412.imp"

   291  %CONSTINTEGER REPORT=3,OBJ=2, LISTING=1;    ! OUTPUT STREAMS
3924 @ 19218:            LINE   291 "regression-compile-tmp/comp412.imp"

   292  %CONSTINTEGER EOP=87;                       ! ENDOFPROGRAM SUBATOM
3925 @ 19256:            LINE   292 "regression-compile-tmp/comp412.imp"

   293  %CONSTINTEGER EOF=86;                       ! ENDOFFILE SUBATOM
3926 @ 19294:            LINE   293 "regression-compile-tmp/comp412.imp"

   294  %CONSTINTEGER TEXT LIMIT=255;               ! MAX STRING LENGTH
3927 @ 19332:            LINE   294 "regression-compile-tmp/comp412.imp"

   295  %CONSTBYTEINTEGERARRAY CMAP(0 : 15)= 0, 67, 68, 81, 65, 83, 80, 73,
   296                                      72, 71, 79, 69, 7 0, 66, 0, 0
3928 @ 19370:            LINE   295 "regression-compile-tmp/comp412.imp"
3929 @ 19408:            PUSHI  #0x00000000
3930 @ 19413:            PUSHI  #0x0000000f
3931 @ 19418:            BOUNDS
3932 @ 19419:            DEF    CMAP p1=V_0087 a/tf=1b b/format=2 c/ostate=112  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
3933 @ 19435:            PUSHI  #0x00000000
3934 @ 19440:            INIT   1
3935 @ 19443:            PUSHI  #0x00000043
3936 @ 19448:            INIT   1
3937 @ 19451:            PUSHI  #0x00000044
3938 @ 19456:            INIT   1
3939 @ 19459:            PUSHI  #0x00000051
3940 @ 19464:            INIT   1
3941 @ 19467:            PUSHI  #0x00000041
3942 @ 19472:            INIT   1
3943 @ 19475:            PUSHI  #0x00000053
3944 @ 19480:            INIT   1
3945 @ 19483:            PUSHI  #0x00000050
3946 @ 19488:            INIT   1
3947 @ 19491:            PUSHI  #0x00000049
3948 @ 19496:            INIT   1
3949 @ 19499:            PUSHI  #0x00000048
3950 @ 19504:            INIT   1
3951 @ 19507:            PUSHI  #0x00000047
3952 @ 19512:            INIT   1
3953 @ 19515:            PUSHI  #0x0000004f
3954 @ 19520:            INIT   1
3955 @ 19523:            PUSHI  #0x00000045
3956 @ 19528:            INIT   1
3957 @ 19531:            PUSHI  #0x00000046
3958 @ 19536:            INIT   1
3959 @ 19539:            PUSHI  #0x00000042
3960 @ 19544:            INIT   1
3961 @ 19547:            PUSHI  #0x00000000
3962 @ 19552:            INIT   1
3963 @ 19555:            PUSHI  #0x00000000
3964 @ 19560:            INIT   1

   297  %CONSTINTEGER STRING = 16, RECORD=17;       ! STRING/RECORD SUBATOMS
3965 @ 19563:            LINE   297 "regression-compile-tmp/comp412.imp"

   298  %CONSTINTEGER SPECIAL=55;                   ! SPECIAL DECLARATOR
3966 @ 19601:            LINE   298 "regression-compile-tmp/comp412.imp"

   299  %CONSTINTEGER RFN=65;                       ! RECORDFORMAT NAME CLASS
3967 @ 19639:            LINE   299 "regression-compile-tmp/comp412.imp"

   300  %CONSTINTEGER ULINE=18;                     ! CLASS FOR '_'
3968 @ 19677:            LINE   300 "regression-compile-tmp/comp412.imp"

   301  %CONSTINTEGER NULL STRING=401
3969 @ 19715:            LINE   301 "regression-compile-tmp/comp412.imp"

   302  %OWNINTEGER PERMIN = 1;                     ! PERM/PROG SWITCH
3970 @ 19753:            LINE   302 "regression-compile-tmp/comp412.imp"
3971 @ 19791:            PUSHI  #0x00000001
3972 @ 19796:            DEF    PERMIN p1=V_0088 a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
3973 @ 19814:            INIT   1

   303  %OWNINTEGER DIAG = 0, CONTROL = 0
3974 @ 19817:            LINE   303 "regression-compile-tmp/comp412.imp"
3975 @ 19855:            PUSHI  #0x00000000
3976 @ 19860:            DEF    DIAG p1=V_0089 a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
3977 @ 19876:            INIT   1
3978 @ 19879:            PUSHI  #0x00000000
3979 @ 19884:            DEF    CONTROL p1=V_008a a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
3980 @ 19903:            INIT   1

   304  %OWNINTEGER BPT=0;                          ! CODE BUFFER POINTER
3981 @ 19906:            LINE   304 "regression-compile-tmp/comp412.imp"
3982 @ 19944:            PUSHI  #0x00000000
3983 @ 19949:            DEF    BPT p1=V_008b a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
3984 @ 19964:            INIT   1

   305  %OWNSHORTINTEGERARRAY BUFFER(1 : 401)
3985 @ 19967:            LINE   305 "regression-compile-tmp/comp412.imp"
3986 @ 20005:            PUSHI  #0x00000001
3987 @ 20010:            PUSHI  #0x00000191
3988 @ 20015:            BOUNDS
3989 @ 20016:            DEF    BUFFER p1=V_008c a/tf=1b b/format=3 c/ostate=121  type=1 (integer) form=11 (array) special=2 (short-integer) linkage=1 (own) spec=0 indirect=0 unass=1
3990 @ 20034:            INIT   401

   306  %CONSTINTEGER MCODE = 38
   307  
   308     !  %DIAGNOSE FLAGS (2\\N)
   309     !
   310     !  0  -  GRAMMAR TRACE
   311     !  1  -  RECORD USE
   312     !  2  -  APP DEFN.
   313     !  3  -  RECORD DEFN.
   314     !
3991 @ 20037:            LINE   306 "regression-compile-tmp/comp412.imp"

   315     %ROUTINESPEC FAULT(%INTEGER N)
   316  !*********************************************
   317  !* ALMOST THE WHOLE COMPILER ASSUMES A 16 BIT WORD. *
   318  !*********************************************
3992 @ 20075:            LINE   315 "regression-compile-tmp/comp412.imp"
3993 @ 20113:            DEF    FAULT (_lev0id0_FAULT) p1=V_008d a/tf=7 b/format=0 c/ostate=8  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=1 indirect=0 unass=0
3994 @ 20130:            START  ( FORMAL PARAMETERS  {lev=1 --> 2, nested=0 --> 1}
3995 @ 20131:               DEF    N p1=V_008e a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
3996 @ 20144:            FINISH ) {lev=1}

   319  %OWNINTEGER MARK = ' '
3997 @ 20145:            LINE   319 "regression-compile-tmp/comp412.imp"
3998 @ 20183:            PUSHI  #0x00000020
3999 @ 20188:            DEF    MARK p1=V_008e a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
4000 @ 20204:            INIT   1

   320  %OWNINTEGER FILE = 0;                       ! BEGIN OR EXTERNAL FILE ?
4001 @ 20207:            LINE   320 "regression-compile-tmp/comp412.imp"
4002 @ 20245:            PUSHI  #0x00000000
4003 @ 20250:            DEF    FILE p1=V_008f a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
4004 @ 20266:            INIT   1

   321  %CONSTINTEGER DICT END = 2750
4005 @ 20269:            LINE   321 "regression-compile-tmp/comp412.imp"

   322  %INTEGERARRAY DICT(0:DICT END)
4006 @ 20307:            LINE   322 "regression-compile-tmp/comp412.imp"
4007 @ 20345:            DEF    DICT p1=V_0090 a/tf=1b b/format=1 c/ostate=100  type=1 (integer) form=11 (array) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4008 @ 20361:            PUSHI  #0x00000000
4009 @ 20366:            PUSHI  #0x00000abe
4010 @ 20371:            DIM    0001 0001

   323  %CONSTINTEGER MAX LAB = 80
4011 @ 20377:            LINE   323 "regression-compile-tmp/comp412.imp"

   324  %BYTEINTEGERARRAY LABINF(1 : MAX LAB)
4012 @ 20415:            LINE   324 "regression-compile-tmp/comp412.imp"
4013 @ 20453:            DEF    LABINF p1=V_0091 a/tf=1b b/format=2 c/ostate=100  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=0 (auto) spec=0 indirect=0 unass=0
4014 @ 20471:            PUSHI  #0x00000001
4015 @ 20476:            PUSHI  #0x00000050
4016 @ 20481:            DIM    0001 0001

   325  %INTEGER LIST, LREALS;                      ! OPTION FLAGS
4017 @ 20487:            LINE   325 "regression-compile-tmp/comp412.imp"
4018 @ 20525:            DEF    LIST p1=V_0092 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4019 @ 20541:            DEF    LREALS p1=V_0093 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   326  %INTEGER STATS;                             ! NUMBER OF STATEMENTS
4020 @ 20559:            LINE   326 "regression-compile-tmp/comp412.imp"
4021 @ 20597:            DEF    STATS p1=V_0094 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   327  %ownINTEGER CODE = 0;                              ! OBJECT FILE SIZE
4022 @ 20614:            LINE   327 "regression-compile-tmp/comp412.imp"
4023 @ 20652:            PUSHI  #0x00000000
4024 @ 20657:            DEF    CODE p1=V_0095 a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
4025 @ 20673:            INIT   1

   328  %INTEGER LINES;                             ! LINES ON LISTING PAGE
4026 @ 20676:            LINE   328 "regression-compile-tmp/comp412.imp"
4027 @ 20714:            DEF    LINES p1=V_0096 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   329  %INTEGER LINENUM;                           ! CURRENT LINE NUMBER
4028 @ 20731:            LINE   329 "regression-compile-tmp/comp412.imp"
4029 @ 20769:            DEF    LINENUM p1=V_0097 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   330  %INTEGER LIT;                               ! LAST LITERAL POS
4030 @ 20788:            LINE   330 "regression-compile-tmp/comp412.imp"
4031 @ 20826:            DEF    LIT p1=V_0098 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   331  %INTEGER LIT POS;                           ! LITERAL TEXT POINTER
4032 @ 20841:            LINE   331 "regression-compile-tmp/comp412.imp"
4033 @ 20879:            DEF    LITPOS p1=V_0099 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   332  %INTEGER LIMIT;                             ! DIGIT SEARCH LIMIT
4034 @ 20897:            LINE   332 "regression-compile-tmp/comp412.imp"
4035 @ 20935:            DEF    LIMIT p1=V_009a a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   333  %INTEGER DIGIT;                             ! CURRECT DIGIT
4036 @ 20952:            LINE   333 "regression-compile-tmp/comp412.imp"
4037 @ 20990:            DEF    DIGIT p1=V_009b a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   334  %INTEGER OLD SYM;                           ! FIRST SYM OF NAME
4038 @ 21007:            LINE   334 "regression-compile-tmp/comp412.imp"
4039 @ 21045:            DEF    OLDSYM p1=V_009c a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   335  %INTEGER LABEL;                             ! CURRENT LABEL
4040 @ 21063:            LINE   335 "regression-compile-tmp/comp412.imp"
4041 @ 21101:            DEF    LABEL p1=V_009d a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   336  %INTEGER X;                                 ! CURRENT TAG APP/FORMAT
4042 @ 21118:            LINE   336 "regression-compile-tmp/comp412.imp"
4043 @ 21156:            DEF    X p1=V_009e a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   337  %ownINTEGER SYM = 0;                               ! CURRENT INPUT SYMBOL
4044 @ 21169:            LINE   337 "regression-compile-tmp/comp412.imp"
4045 @ 21207:            PUSHI  #0x00000000
4046 @ 21212:            DEF    SYM p1=V_009f a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
4047 @ 21227:            INIT   1

   338  %INTEGER ATOM1;                             ! CURRENT ATOM
4048 @ 21230:            LINE   338 "regression-compile-tmp/comp412.imp"
4049 @ 21268:            DEF    ATOM1 p1=V_00a0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   339  %INTEGER ATOM2;                             ! VARIANT OF ATOM1
4050 @ 21285:            LINE   339 "regression-compile-tmp/comp412.imp"
4051 @ 21323:            DEF    ATOM2 p1=V_00a1 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   340  %INTEGER SUBATOM;                           ! EXTRA INFO
4052 @ 21340:            LINE   340 "regression-compile-tmp/comp412.imp"
4053 @ 21378:            DEF    SUBATOM p1=V_00a2 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   341  %INTEGER LAST;                              ! LAST ATOM TYPE
4054 @ 21397:            LINE   341 "regression-compile-tmp/comp412.imp"
4055 @ 21435:            DEF    LAST p1=V_00a3 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   342  %INTEGER SS TYPE;                           ! 0 LABEL, 1 DECLARATION,
   343                                              ! 2 FORMAL PARAMS, 3 STATEMENT
4056 @ 21451:            LINE   342 "regression-compile-tmp/comp412.imp"
4057 @ 21489:            DEF    SSTYPE p1=V_00a4 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   344  %INTEGER SYMTYPE;                           ! -2:LETTER, -1: DIGIT
   345                                              ! 0:TERMINATOR, 1: OTHER
4058 @ 21507:            LINE   344 "regression-compile-tmp/comp412.imp"
4059 @ 21545:            DEF    SYMTYPE p1=V_00a5 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   346  %INTEGER TYPE;                              ! VARIABLE TYPE WANTED
4060 @ 21564:            LINE   346 "regression-compile-tmp/comp412.imp"
4061 @ 21602:            DEF    TYPE p1=V_00a6 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   347  %INTEGER VAR TYPE;                          ! VARIABLE TYPE FOUND
4062 @ 21618:            LINE   347 "regression-compile-tmp/comp412.imp"
4063 @ 21656:            DEF    VARTYPE p1=V_00a7 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   348  %ownINTEGER POS = 0;                               ! CURRENT INPUT POSITION
4064 @ 21675:            LINE   348 "regression-compile-tmp/comp412.imp"
4065 @ 21713:            PUSHI  #0x00000000
4066 @ 21718:            DEF    POS p1=V_00a8 a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
4067 @ 21733:            INIT   1

   349  %INTEGER ATOM POS;                          ! CURRENT ATOM START POSN.
4068 @ 21736:            LINE   349 "regression-compile-tmp/comp412.imp"
4069 @ 21774:            DEF    ATOMPOS p1=V_00a9 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   350  %INTEGER DUP;                               ! DUPLICATE FLAG
4070 @ 21793:            LINE   350 "regression-compile-tmp/comp412.imp"
4071 @ 21831:            DEF    DUP p1=V_00aa a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   351  %INTEGER OUT;                               ! CURRENT OUTPUT STREAM
4072 @ 21846:            LINE   351 "regression-compile-tmp/comp412.imp"
4073 @ 21884:            DEF    OUT p1=V_00ab a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   352  %INTEGER PREFIX, SPREFIX;                   ! OWN, BYTE, EXTERNAL ETC.
4074 @ 21899:            LINE   352 "regression-compile-tmp/comp412.imp"
4075 @ 21937:            DEF    PREFIX p1=V_00ac a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4076 @ 21955:            DEF    SPREFIX p1=V_00ad a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   353  %INTEGER CONST INT
4077 @ 21974:            LINE   353 "regression-compile-tmp/comp412.imp"
4078 @ 22012:            DEF    CONSTINT p1=V_00ae a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   354  %INTEGER O TYPE
4079 @ 22032:            LINE   354 "regression-compile-tmp/comp412.imp"
4080 @ 22070:            DEF    OTYPE p1=V_00af a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   355  %INTEGER DEC TYPE;                          ! CURRENT DECLARATOR
4081 @ 22087:            LINE   355 "regression-compile-tmp/comp412.imp"
4082 @ 22125:            DEF    DECTYPE p1=V_00b0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   356  %OWNINTEGERARRAY CNEST(0 :10);              ! STACK FOR CONDITIONS
4083 @ 22144:            LINE   356 "regression-compile-tmp/comp412.imp"
4084 @ 22182:            PUSHI  #0x00000000
4085 @ 22187:            PUSHI  #0x0000000a
4086 @ 22192:            BOUNDS
4087 @ 22193:            DEF    CNEST p1=V_00b1 a/tf=1b b/format=1 c/ostate=121  type=1 (integer) form=11 (array) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
4088 @ 22210:            INIT   11

   357  %OWNBYTEINTEGERARRAY LINE(1 : 73);          ! INPUT LINE BUFFER
4089 @ 22213:            LINE   357 "regression-compile-tmp/comp412.imp"
4090 @ 22251:            PUSHI  #0x00000001
4091 @ 22256:            PUSHI  #0x00000049
4092 @ 22261:            BOUNDS
4093 @ 22262:            DEF    LINE p1=V_00b2 a/tf=1b b/format=2 c/ostate=121  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=1 (own) spec=0 indirect=0 unass=1
4094 @ 22278:            INIT   73

   358  %CONSTINTEGER RECLEN = -300;     ! -(MAX LENGTH OF ANALYSIS RECORD)
4095 @ 22281:            LINE   358 "regression-compile-tmp/comp412.imp"

   359  %INTEGERARRAY REF, CO, SUB, LOC(RECLEN : -1)
4096 @ 22319:            LINE   359 "regression-compile-tmp/comp412.imp"
4097 @ 22357:            DEF    REF p1=V_00b3 a/tf=1b b/format=1 c/ostate=100  type=1 (integer) form=11 (array) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4098 @ 22372:            DEF    CO p1=V_00b4 a/tf=1b b/format=1 c/ostate=100  type=1 (integer) form=11 (array) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4099 @ 22386:            DEF    SUB p1=V_00b5 a/tf=1b b/format=1 c/ostate=100  type=1 (integer) form=11 (array) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4100 @ 22401:            DEF    LOC p1=V_00b6 a/tf=1b b/format=1 c/ostate=100  type=1 (integer) form=11 (array) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4101 @ 22416:            PUSHI  #0xfffffed4
4102 @ 22421:            PUSHI  #0x00000001
4103 @ 22426:            NEGATE
4104 @ 22427:            DIM    0001 0004

   360  %INTEGER SS;                                ! SOURCE STATEMENT ENTRY
4105 @ 22433:            LINE   360 "regression-compile-tmp/comp412.imp"
4106 @ 22471:            DEF    SS p1=V_00b7 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   361  %INTEGER A;                                 ! ATOM POINTER
4107 @ 22485:            LINE   361 "regression-compile-tmp/comp412.imp"
4108 @ 22523:            DEF    A p1=V_00b8 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   362  %INTEGER P;                                 ! PHRASE POINTER
4109 @ 22536:            LINE   362 "regression-compile-tmp/comp412.imp"
4110 @ 22574:            DEF    P p1=V_00b9 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   363  %INTEGER FAULTY;                            ! FAULT INDICATOR
4111 @ 22587:            LINE   363 "regression-compile-tmp/comp412.imp"
4112 @ 22625:            DEF    FAULTY p1=V_00ba a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   364  %INTEGER F TYPE;                            ! TYPE OF FAULT
4113 @ 22643:            LINE   364 "regression-compile-tmp/comp412.imp"
4114 @ 22681:            DEF    FTYPE p1=V_00bb a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   365  %INTEGER G LIMIT;                           ! END OF GRAM POINTER
4115 @ 22698:            LINE   365 "regression-compile-tmp/comp412.imp"
4116 @ 22736:            DEF    GLIMIT p1=V_00bc a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   366  %INTEGER T LIMIT;                           ! MAX EXTENT OF DICTIONARY
4117 @ 22754:            LINE   366 "regression-compile-tmp/comp412.imp"
4118 @ 22792:            DEF    TLIMIT p1=V_00bd a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   367  %INTEGER TMAX;                              ! CURRENT MAX TAG (FREE)
4119 @ 22810:            LINE   367 "regression-compile-tmp/comp412.imp"
4120 @ 22848:            DEF    TMAX p1=V_00be a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   368  %INTEGER T BASE;                            ! FIRST NAME AT CURRENT LEVEL
4121 @ 22864:            LINE   368 "regression-compile-tmp/comp412.imp"
4122 @ 22902:            DEF    TBASE p1=V_00bf a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   369  %INTEGER DP;                                ! END OF CURRENT NAME
4123 @ 22919:            LINE   369 "regression-compile-tmp/comp412.imp"
4124 @ 22957:            DEF    DP p1=V_00c0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   370  %INTEGER RELOCATE;                          ! RELOCATION FOR FORMATS
4125 @ 22971:            LINE   370 "regression-compile-tmp/comp412.imp"
4126 @ 23009:            DEF    RELOCATE p1=V_00c1 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   371  %INTEGER APP
4127 @ 23029:            LINE   371 "regression-compile-tmp/comp412.imp"
4128 @ 23067:            DEF    APP p1=V_00c2 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   372  %SHORTINTEGERNAME PAPP;                     ! ==PHRASE(APPEP)
4129 @ 23082:            LINE   372 "regression-compile-tmp/comp412.imp"
4130 @ 23120:            DEF    PAPP p1=V_00c3 a/tf=12 b/format=3 c/ostate=0  type=1 (integer) form=2 (name) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0

   373  %INTEGER EILAB;                             ! %ELSEIF LABEL
4131 @ 23136:            LINE   373 "regression-compile-tmp/comp412.imp"
4132 @ 23174:            DEF    EILAB p1=V_00c4 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   374  %ownINTEGER MARGIN = 0
4133 @ 23191:            LINE   374 "regression-compile-tmp/comp412.imp"
4134 @ 23229:            PUSHI  #0x00000000
4135 @ 23234:            DEF    MARGIN p1=V_00c5 a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
4136 @ 23252:            INIT   1

   375  %INTEGER INHIBIT;                       ! FLAG FOR DECLARATIONS MISPLA
   376  
4137 @ 23255:            LINE   375 "regression-compile-tmp/comp412.imp"
4138 @ 23293:            DEF    INHIBIT p1=V_00c6 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   377  %ROUTINE SEND
4139 @ 23312:            LINE   377 "regression-compile-tmp/comp412.imp"
4140 @ 23350:            DEF    SEND (_lev0id0_SEND) p1=V_00c7 a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4141 @ 23366:               START  ( FORMAL PARAMETERS  {lev=2 --> 3, nested=0 --> 1}
4142 @ 23367:               FINISH ) {lev=2}

   378     %INTEGER J
4143 @ 23368:               LINE   378 "regression-compile-tmp/comp412.imp"
4144 @ 23406:               DEF    J p1=V_00c8 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   379     %RETURN %IF BPT <= 0
4145 @ 23419:               LINE   379 "regression-compile-tmp/comp412.imp"
4146 @ 23457:               PUSH   BPT
4147 @ 23460:               PUSHI  #0x00000000
4148 @ 23465:               JUMPIF > L_0004
4149 @ 23469:               RETURN
4150 @ 23470:               LOCATE L_0004

   380     FAULT(22) %IF BPT >= LITPOS
4151 @ 23473:               LINE   380 "regression-compile-tmp/comp412.imp"
4152 @ 23511:               PUSH   BPT
4153 @ 23514:               PUSH   LITPOS
4154 @ 23517:               JUMPIF < L_0004
4155 @ 23521:               PUSH   FAULT
4156 @ 23524:               PUSHI  #0x00000016
4157 @ 23529:               ASSPAR
4158 @ 23530:               CALL  
4159 @ 23531:               LOCATE L_0004

   381     %IF FAULTY = 0 %START
4160 @ 23534:               LINE   381 "regression-compile-tmp/comp412.imp"
4161 @ 23572:               PUSH   FAULTY
4162 @ 23575:               PUSHI  #0x00000000
4163 @ 23580:               JUMPIF # L_0004

   382        SELECTOUTPUT(OBJ)
4164 @ 23584:               LINE   382 "regression-compile-tmp/comp412.imp"
4165 @ 23622:               PUSH   SELECTOUTPUT
4166 @ 23625:               PUSHI  #0x00000002
4167 @ 23630:               ASSPAR
4168 @ 23631:               CALL  

   383        PRINTSYMBOL(BUFFER(J)) %FOR J = 1,1,BPT
4169 @ 23632:               LINE   383 "regression-compile-tmp/comp412.imp"
4170 @ 23670:               PUSH   J
4171 @ 23673:               PUSHI  #0x00000001
4172 @ 23678:               PUSH   BPT
4173 @ 23681:               PUSHI  #0x00000001
4174 @ 23686:               FOR    L_0006
4175 @ 23689:               PUSH   PRINTSYMBOL
4176 @ 23692:               PUSH   BUFFER
4177 @ 23695:               PUSH   J
4178 @ 23698:               ACCESS
4179 @ 23699:               ASSPAR
4180 @ 23700:               CALL  
4181 @ 23701:               REPEAT L_0006
4182 @ 23704:               LOCATE L_0007

   384        SELECTOUTPUT(LISTING)
4183 @ 23707:               LINE   384 "regression-compile-tmp/comp412.imp"
4184 @ 23745:               PUSH   SELECTOUTPUT
4185 @ 23748:               PUSHI  #0x00000001
4186 @ 23753:               ASSPAR
4187 @ 23754:               CALL  

   385     %FINISH
4188 @ 23755:               LINE   385 "regression-compile-tmp/comp412.imp"
4189 @ 23793:               LOCATE L_0004

   386     BPT=0
4190 @ 23796:               LINE   386 "regression-compile-tmp/comp412.imp"
4191 @ 23834:               PUSH   BPT
4192 @ 23837:               PUSHI  #0x00000000
4193 @ 23842:               ASSVAL

   387  %END
4194 @ 23843:               LINE   387 "regression-compile-tmp/comp412.imp"
4195 @ 23881:            END    _lev0id0_SEND {lev=2 --> 1}

   388  %ROUTINE PUT(%INTEGER N)
4196 @ 23882:            LINE   388 "regression-compile-tmp/comp412.imp"
4197 @ 23920:            DEF    PUT (_lev0id0_PUT) p1=V_00c8 a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4198 @ 23935:               START  ( FORMAL PARAMETERS  {lev=2 --> 3, nested=0 --> 1}
4199 @ 23936:                  DEF    N p1=V_00c9 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4200 @ 23949:               FINISH ) {lev=2}

   389     CODE = CODE+1
4201 @ 23950:               LINE   389 "regression-compile-tmp/comp412.imp"
4202 @ 23988:               PUSH   CODE
4203 @ 23991:               PUSH   CODE
4204 @ 23994:               PUSHI  #0x00000001
4205 @ 23999:               ADD   
4206 @ 24000:               ASSVAL

   390     SEND %IF BPT > 71
4207 @ 24001:               LINE   390 "regression-compile-tmp/comp412.imp"
4208 @ 24039:               PUSH   BPT
4209 @ 24042:               PUSHI  #0x00000047
4210 @ 24047:               JUMPIF <= L_0004
4211 @ 24051:               PUSH   SEND
4212 @ 24054:               CALL  
4213 @ 24055:               LOCATE L_0004

   391     BPT=BPT+1; BUFFER(BPT)=N
4214 @ 24058:               LINE   391 "regression-compile-tmp/comp412.imp"
4215 @ 24096:               PUSH   BPT
4216 @ 24099:               PUSH   BPT
4217 @ 24102:               PUSHI  #0x00000001
4218 @ 24107:               ADD   
4219 @ 24108:               ASSVAL
4220 @ 24109:               LINE   391 "regression-compile-tmp/comp412.imp"
4221 @ 24147:               PUSH   BUFFER
4222 @ 24150:               PUSH   BPT
4223 @ 24153:               ACCESS
4224 @ 24154:               PUSH   N
4225 @ 24157:               ASSVAL

   392  %END
4226 @ 24158:               LINE   392 "regression-compile-tmp/comp412.imp"
4227 @ 24196:            END    _lev0id0_PUT {lev=2 --> 1}

   393  %ROUTINE ADDR(%INTEGER N)
4228 @ 24197:            LINE   393 "regression-compile-tmp/comp412.imp"
4229 @ 24235:            DEF    ADDR (_lev0id0_ADDR) p1=V_00c9 a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4230 @ 24251:               START  ( FORMAL PARAMETERS  {lev=2 --> 3, nested=0 --> 1}
4231 @ 24252:                  DEF    N p1=V_00ca a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4232 @ 24265:               FINISH ) {lev=2}

   394     %INTEGER V
4233 @ 24266:               LINE   394 "regression-compile-tmp/comp412.imp"
4234 @ 24304:               DEF    V p1=V_00cb a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   395     V=N//10
4235 @ 24317:               LINE   395 "regression-compile-tmp/comp412.imp"
4236 @ 24355:               PUSH   V
4237 @ 24358:               PUSH   N
4238 @ 24361:               PUSHI  #0x0000000a
4239 @ 24366:               QUOT  
4240 @ 24367:               ASSVAL

   396     ADDR(V) %UNLESS V=0
4241 @ 24368:               LINE   396 "regression-compile-tmp/comp412.imp"
4242 @ 24406:               PUSH   V
4243 @ 24409:               PUSHI  #0x00000000
4244 @ 24414:               JUMPIF = L_0004
4245 @ 24418:               PUSH   ADDR
4246 @ 24421:               PUSH   V
4247 @ 24424:               ASSPAR
4248 @ 24425:               CALL  
4249 @ 24426:               LOCATE L_0004

   397     PUT(N-V*10+'0')
4250 @ 24429:               LINE   397 "regression-compile-tmp/comp412.imp"
4251 @ 24467:               PUSH   PUT
4252 @ 24470:               PUSH   N
4253 @ 24473:               PUSH   V
4254 @ 24476:               PUSHI  #0x0000000a
4255 @ 24481:               MUL   
4256 @ 24482:               SUB   
4257 @ 24483:               PUSHI  #0x00000030
4258 @ 24488:               ADD   
4259 @ 24489:               ASSPAR
4260 @ 24490:               CALL  

   398  %END
4261 @ 24491:               LINE   398 "regression-compile-tmp/comp412.imp"
4262 @ 24529:            END    _lev0id0_ADDR {lev=2 --> 1}

   399  %ROUTINE OP(%INTEGER C, A)
4263 @ 24530:            LINE   399 "regression-compile-tmp/comp412.imp"
4264 @ 24568:            DEF    OP (_lev0id0_OP) p1=V_00ca a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4265 @ 24582:               START  ( FORMAL PARAMETERS  {lev=2 --> 3, nested=0 --> 1}
4266 @ 24583:                  DEF    C p1=V_00cb a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4267 @ 24596:                  DEF    A p1=V_00cc a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4268 @ 24609:               FINISH ) {lev=2}

   400     PUT(C); ADDR(A)
4269 @ 24610:               LINE   400 "regression-compile-tmp/comp412.imp"
4270 @ 24648:               PUSH   PUT
4271 @ 24651:               PUSH   C
4272 @ 24654:               ASSPAR
4273 @ 24655:               CALL  
4274 @ 24656:               LINE   400 "regression-compile-tmp/comp412.imp"
4275 @ 24694:               PUSH   ADDR
4276 @ 24697:               PUSH   A
4277 @ 24700:               ASSPAR
4278 @ 24701:               CALL  

   401  %END
4279 @ 24702:               LINE   401 "regression-compile-tmp/comp412.imp"
4280 @ 24740:            END    _lev0id0_OP {lev=2 --> 1}

   402  %ROUTINE PRINT NAME(%INTEGER N)
4281 @ 24741:            LINE   402 "regression-compile-tmp/comp412.imp"
4282 @ 24779:            DEF    PRINTNAME (_lev0id0_PRINTNAME) p1=V_00cb a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4283 @ 24800:               START  ( FORMAL PARAMETERS  {lev=2 --> 3, nested=0 --> 1}
4284 @ 24801:                  DEF    N p1=V_00cc a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4285 @ 24814:               FINISH ) {lev=2}

   403     %INTEGER D, FLAG
   404  ! ----- 'UNPACK' USES AT LEAST A 30-BIT WORD ----
4286 @ 24815:               LINE   403 "regression-compile-tmp/comp412.imp"
4287 @ 24853:               DEF    D p1=V_00cd a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4288 @ 24866:               DEF    FLAG p1=V_00ce a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   405     %ROUTINE UNPACK(%INTEGER V)
4289 @ 24882:               LINE   405 "regression-compile-tmp/comp412.imp"
4290 @ 24920:               DEF    UNPACK (_lev0id0_PRINTNAME_UNPACK) p1=V_00cf a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4291 @ 24938:                  START  ( FORMAL PARAMETERS  {lev=3 --> 4, nested=0 --> 1}
4292 @ 24939:                     DEF    V p1=V_00d0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4293 @ 24952:                  FINISH ) {lev=3}

   406        %INTEGER J, N, C
4294 @ 24953:                  LINE   406 "regression-compile-tmp/comp412.imp"
4295 @ 24991:                  DEF    J p1=V_00d1 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4296 @ 25004:                  DEF    N p1=V_00d2 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4297 @ 25017:                  DEF    C p1=V_00d3 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   407        %CYCLE  J = 24,-6,0
4298 @ 25030:                  LINE   407 "regression-compile-tmp/comp412.imp"
4299 @ 25068:                  PUSH   J
4300 @ 25071:                  PUSHI  #0x00000006
4301 @ 25076:                  NEGATE
4302 @ 25077:                  PUSHI  #0x00000000
4303 @ 25082:                  PUSHI  #0x00000018
4304 @ 25087:                  FOR    L_0003

   408           C = (V>>J)&63
4305 @ 25090:                  LINE   408 "regression-compile-tmp/comp412.imp"
4306 @ 25128:                  PUSH   C
4307 @ 25131:                  PUSH   V
4308 @ 25134:                  PUSH   J
4309 @ 25137:                  RSH   
4310 @ 25138:                  PUSHI  #0x0000003f
4311 @ 25143:                  AND   
4312 @ 25144:                  ASSVAL

   409           %IF C # 0 %START
4313 @ 25145:                  LINE   409 "regression-compile-tmp/comp412.imp"
4314 @ 25183:                  PUSH   C
4315 @ 25186:                  PUSHI  #0x00000000
4316 @ 25191:                  JUMPIF = L_0007

   410              C = C+32;   ! ADD IN 32 REMOVED WHEN PACKING
4317 @ 25195:                  LINE   410 "regression-compile-tmp/comp412.imp"
4318 @ 25233:                  PUSH   C
4319 @ 25236:                  PUSH   C
4320 @ 25239:                  PUSHI  #0x00000020
4321 @ 25244:                  ADD   
4322 @ 25245:                  ASSVAL

   411              %IF FLAG # 0 %START
4323 @ 25246:                  LINE   411 "regression-compile-tmp/comp412.imp"
4324 @ 25284:                  PUSH   FLAG
4325 @ 25287:                  PUSHI  #0x00000000
4326 @ 25292:                  JUMPIF = L_000a

   412                 %IF FLAG < 0 %THEN PUT(C) %ELSE PRINT SYMBOL(C)
4327 @ 25296:                  LINE   412 "regression-compile-tmp/comp412.imp"
4328 @ 25334:                  PUSH   FLAG
4329 @ 25337:                  PUSHI  #0x00000000
4330 @ 25342:                  JUMPIF >= L_000d
4331 @ 25346:                  PUSH   PUT
4332 @ 25349:                  PUSH   C
4333 @ 25352:                  ASSPAR
4334 @ 25353:                  CALL  
4335 @ 25354:                  GOTO   L_000c
4336 @ 25357:                  LOCATE L_000d
4337 @ 25360:                  PUSH   PRINTSYMBOL
4338 @ 25363:                  PUSH   C
4339 @ 25366:                  ASSPAR
4340 @ 25367:                  CALL  
4341 @ 25368:                  LOCATE L_000c

   413                 FLAG = FLAG+1
4342 @ 25371:                  LINE   413 "regression-compile-tmp/comp412.imp"
4343 @ 25409:                  PUSH   FLAG
4344 @ 25412:                  PUSH   FLAG
4345 @ 25415:                  PUSHI  #0x00000001
4346 @ 25420:                  ADD   
4347 @ 25421:                  ASSVAL

   414              %FINISH
4348 @ 25422:                  LINE   414 "regression-compile-tmp/comp412.imp"
4349 @ 25460:                  LOCATE L_000a

   415           %FINISH
4350 @ 25463:                  LINE   415 "regression-compile-tmp/comp412.imp"
4351 @ 25501:                  LOCATE L_0007

   416        %REPEAT
4352 @ 25504:                  LINE   416 "regression-compile-tmp/comp412.imp"
4353 @ 25542:                  REPEAT L_0003
4354 @ 25545:                  LOCATE L_0004

   417     %END
4355 @ 25548:                  LINE   417 "regression-compile-tmp/comp412.imp"
4356 @ 25586:               END    _lev0id0_PRINTNAME_UNPACK {lev=3 --> 2}

   418     %IF N < 0 %THEN N = -N %AND FLAG = -13 %ELSE FLAG = 1
4357 @ 25587:               LINE   418 "regression-compile-tmp/comp412.imp"
4358 @ 25625:               PUSH   N
4359 @ 25628:               PUSHI  #0x00000000
4360 @ 25633:               JUMPIF >= L_0004
4361 @ 25637:               PUSH   N
4362 @ 25640:               PUSH   N
4363 @ 25643:               NEGATE
4364 @ 25644:               ASSVAL
4365 @ 25645:               PUSH   FLAG
4366 @ 25648:               PUSHI  #0x0000000d
4367 @ 25653:               NEGATE
4368 @ 25654:               ASSVAL
4369 @ 25655:               GOTO   L_0003
4370 @ 25658:               LOCATE L_0004
4371 @ 25661:               PUSH   FLAG
4372 @ 25664:               PUSHI  #0x00000001
4373 @ 25669:               ASSVAL
4374 @ 25670:               LOCATE L_0003

   419     D=DICT(N)
4375 @ 25673:               LINE   419 "regression-compile-tmp/comp412.imp"
4376 @ 25711:               PUSH   D
4377 @ 25714:               PUSH   DICT
4378 @ 25717:               PUSH   N
4379 @ 25720:               ACCESS
4380 @ 25721:               ASSVAL

   420     UNPACK(DICT(D-2)) %FOR D = N-D&255, 1, N-D>>11&3
4381 @ 25722:               LINE   420 "regression-compile-tmp/comp412.imp"
4382 @ 25760:               PUSH   D
4383 @ 25763:               PUSHI  #0x00000001
4384 @ 25768:               PUSH   N
4385 @ 25771:               PUSH   D
4386 @ 25774:               PUSHI  #0x0000000b
4387 @ 25779:               RSH   
4388 @ 25780:               PUSHI  #0x00000003
4389 @ 25785:               AND   
4390 @ 25786:               SUB   
4391 @ 25787:               PUSH   N
4392 @ 25790:               PUSH   D
4393 @ 25793:               PUSHI  #0x000000ff
4394 @ 25798:               AND   
4395 @ 25799:               SUB   
4396 @ 25800:               FOR    L_0003
4397 @ 25803:               PUSH   UNPACK
4398 @ 25806:               PUSH   DICT
4399 @ 25809:               PUSH   D
4400 @ 25812:               PUSHI  #0x00000002
4401 @ 25817:               SUB   
4402 @ 25818:               ACCESS
4403 @ 25819:               ASSPAR
4404 @ 25820:               CALL  
4405 @ 25821:               REPEAT L_0003
4406 @ 25824:               LOCATE L_0004

   421  %END
   422  
4407 @ 25827:               LINE   421 "regression-compile-tmp/comp412.imp"
4408 @ 25865:            END    _lev0id0_PRINTNAME {lev=2 --> 1}

   423  %ROUTINE FAULT(%INTEGER N)
4409 @ 25866:            LINE   423 "regression-compile-tmp/comp412.imp"
4410 @ 25904:            DEF    FAULT (_lev0id0_FAULT) p1=V_008d a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4411 @ 25921:               START  ( FORMAL PARAMETERS  {lev=2 --> 3, nested=0 --> 1}
4412 @ 25922:                  DEF    N p1=V_00cc a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4413 @ 25935:               FINISH ) {lev=2}

   424        %INTEGER  ERROR POS, STREAM, SPACING, pos2
4414 @ 25936:               LINE   424 "regression-compile-tmp/comp412.imp"
4415 @ 25974:               DEF    ERRORPOS p1=V_00cd a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4416 @ 25994:               DEF    STREAM p1=V_00ce a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4417 @ 26012:               DEF    SPACING p1=V_00cf a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4418 @ 26031:               DEF    POS2 p1=V_00d0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   425        %SWITCH FM(-1 : 24)
4419 @ 26047:               LINE   425 "regression-compile-tmp/comp412.imp"
4420 @ 26085:               PUSHI  #0xffffffff
4421 @ 26090:               PUSHI  #0x00000018
4422 @ 26095:               BOUNDS
4423 @ 26096:               DEF    FM p1=V_00d1 a/tf=6 b/format=0 c/ostate=0  type=0 (<type:0>) form=6 (switch) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   426        STREAM = REPORT;  SELECTOUTPUT(REPORT)
4424 @ 26110:               LINE   426 "regression-compile-tmp/comp412.imp"
4425 @ 26148:               PUSH   STREAM
4426 @ 26151:               PUSHI  #0x00000003
4427 @ 26156:               ASSVAL
4428 @ 26157:               LINE   426 "regression-compile-tmp/comp412.imp"
4429 @ 26195:               PUSH   SELECTOUTPUT
4430 @ 26198:               PUSHI  #0x00000003
4431 @ 26203:               ASSPAR
4432 @ 26204:               CALL  

   427        ATOM POS = DUP %IF DUP # 0
4433 @ 26205:               LINE   427 "regression-compile-tmp/comp412.imp"
4434 @ 26243:               PUSH   DUP
4435 @ 26246:               PUSHI  #0x00000000
4436 @ 26251:               JUMPIF = L_0004
4437 @ 26255:               PUSH   ATOMPOS
4438 @ 26258:               PUSH   DUP
4439 @ 26261:               ASSVAL
4440 @ 26262:               LOCATE L_0004

   428        ERROR POS = ATOM POS
4441 @ 26265:               LINE   428 "regression-compile-tmp/comp412.imp"
4442 @ 26303:               PUSH   ERRORPOS
4443 @ 26306:               PUSH   ATOMPOS
4444 @ 26309:               ASSVAL

   429        ERROR POS = 0 %IF ERROR POS = POS %AND N > 1
4445 @ 26310:               LINE   429 "regression-compile-tmp/comp412.imp"
4446 @ 26348:               PUSH   ERRORPOS
4447 @ 26351:               PUSH   POS
4448 @ 26354:               JUMPIF # L_0004
4449 @ 26358:               PUSH   N
4450 @ 26361:               PUSHI  #0x00000001
4451 @ 26366:               JUMPIF <= L_0004
4452 @ 26370:               PUSH   ERRORPOS
4453 @ 26373:               PUSHI  #0x00000000
4454 @ 26378:               ASSVAL
4455 @ 26379:               LOCATE L_0004

   430        FAULTY=FAULTY+1
4456 @ 26382:               LINE   430 "regression-compile-tmp/comp412.imp"
4457 @ 26420:               PUSH   FAULTY
4458 @ 26423:               PUSH   FAULTY
4459 @ 26426:               PUSHI  #0x00000001
4460 @ 26431:               ADD   
4461 @ 26432:               ASSVAL

   431        SPACING = MARGIN+ERROR POS+8 -2
4462 @ 26433:               LINE   431 "regression-compile-tmp/comp412.imp"
4463 @ 26471:               PUSH   SPACING
4464 @ 26474:               PUSH   MARGIN
4465 @ 26477:               PUSH   ERRORPOS
4466 @ 26480:               ADD   
4467 @ 26481:               PUSHI  #0x00000008
4468 @ 26486:               ADD   
4469 @ 26487:               PUSHI  #0x00000002
4470 @ 26492:               SUB   
4471 @ 26493:               ASSVAL

   432        %CYCLE
4472 @ 26494:               LINE   432 "regression-compile-tmp/comp412.imp"
4473 @ 26532:               LOCATE L_0003

   433           %IF POS > 0 %AND (LIST # 0 %OR STREAM = REPORT) %START
4474 @ 26535:               LINE   433 "regression-compile-tmp/comp412.imp"
4475 @ 26573:               PUSH   POS
4476 @ 26576:               PUSHI  #0x00000000
4477 @ 26581:               JUMPIF <= L_0007
4478 @ 26585:               PUSH   LIST
4479 @ 26588:               PUSHI  #0x00000000
4480 @ 26593:               JUMPIF # L_0008
4481 @ 26597:               PUSH   STREAM
4482 @ 26600:               PUSHI  #0x00000003
4483 @ 26605:               JUMPIF # L_0007
4484 @ 26609:               LOCATE L_0008

   434              WRITE(LINE NUM, 4) %AND SPACE %IF STREAM # REPORT
4485 @ 26612:               LINE   434 "regression-compile-tmp/comp412.imp"
4486 @ 26650:               PUSH   STREAM
4487 @ 26653:               PUSHI  #0x00000003
4488 @ 26658:               JUMPIF = L_000a
4489 @ 26662:               PUSH   WRITE
4490 @ 26665:               PUSH   LINENUM
4491 @ 26668:               ASSPAR
4492 @ 26669:               PUSHI  #0x00000004
4493 @ 26674:               ASSPAR
4494 @ 26675:               CALL  
4495 @ 26676:               PUSH   SPACE
4496 @ 26679:               CALL  
4497 @ 26680:               LOCATE L_000a

   435              pos2 = POS
4498 @ 26683:               LINE   435 "regression-compile-tmp/comp412.imp"
4499 @ 26721:               PUSH   POS2
4500 @ 26724:               PUSH   POS
4501 @ 26727:               ASSVAL

   436              %CYCLE POS = 1,1,pos2
4502 @ 26728:               LINE   436 "regression-compile-tmp/comp412.imp"
4503 @ 26766:               PUSH   POS
4504 @ 26769:               PUSHI  #0x00000001
4505 @ 26774:               PUSH   POS2
4506 @ 26777:               PUSHI  #0x00000001
4507 @ 26782:               FOR    L_0009

   437                 PRINTSYMBOL('|') %IF POS = ERROR POS %AND STREAM=REPORT
4508 @ 26785:               LINE   437 "regression-compile-tmp/comp412.imp"
4509 @ 26823:               PUSH   POS
4510 @ 26826:               PUSH   ERRORPOS
4511 @ 26829:               JUMPIF # L_000d
4512 @ 26833:               PUSH   STREAM
4513 @ 26836:               PUSHI  #0x00000003
4514 @ 26841:               JUMPIF # L_000d
4515 @ 26845:               PUSH   PRINTSYMBOL
4516 @ 26848:               PUSHI  #0x0000007c
4517 @ 26853:               ASSPAR
4518 @ 26854:               CALL  
4519 @ 26855:               LOCATE L_000d

   438                 PRINTSYMBOL(LINE(POS))
4520 @ 26858:               LINE   438 "regression-compile-tmp/comp412.imp"
4521 @ 26896:               PUSH   PRINTSYMBOL
4522 @ 26899:               PUSH   LINE
4523 @ 26902:               PUSH   POS
4524 @ 26905:               ACCESS
4525 @ 26906:               ASSPAR
4526 @ 26907:               CALL  

   439              %REPEAT
4527 @ 26908:               LINE   439 "regression-compile-tmp/comp412.imp"
4528 @ 26946:               REPEAT L_0009
4529 @ 26949:               LOCATE L_000a

   440              SYM=LINE(POS)
4530 @ 26952:               LINE   440 "regression-compile-tmp/comp412.imp"
4531 @ 26990:               PUSH   SYM
4532 @ 26993:               PUSH   LINE
4533 @ 26996:               PUSH   POS
4534 @ 26999:               ACCESS
4535 @ 27000:               ASSVAL

   441           %FINISH
4536 @ 27001:               LINE   441 "regression-compile-tmp/comp412.imp"
4537 @ 27039:               LOCATE L_0007

   442           NEWLINE %IF SYM # NL
4538 @ 27042:               LINE   442 "regression-compile-tmp/comp412.imp"
4539 @ 27080:               PUSH   SYM
4540 @ 27083:               PUSHI  #0x0000000a
4541 @ 27088:               JUMPIF = L_0007
4542 @ 27092:               PUSH   NEWLINE
4543 @ 27095:               CALL  
4544 @ 27096:               LOCATE L_0007

   443           PRINTSYMBOL('*')
4545 @ 27099:               LINE   443 "regression-compile-tmp/comp412.imp"
4546 @ 27137:               PUSH   PRINTSYMBOL
4547 @ 27140:               PUSHI  #0x0000002a
4548 @ 27145:               ASSPAR
4549 @ 27146:               CALL  

   444           %IF STREAM = REPORT %START
4550 @ 27147:               LINE   444 "regression-compile-tmp/comp412.imp"
4551 @ 27185:               PUSH   STREAM
4552 @ 27188:               PUSHI  #0x00000003
4553 @ 27193:               JUMPIF # L_0007

   445              WRITE(LINE NUM, 4);  SPACE
4554 @ 27197:               LINE   445 "regression-compile-tmp/comp412.imp"
4555 @ 27235:               PUSH   WRITE
4556 @ 27238:               PUSH   LINENUM
4557 @ 27241:               ASSPAR
4558 @ 27242:               PUSHI  #0x00000004
4559 @ 27247:               ASSPAR
4560 @ 27248:               CALL  
4561 @ 27249:               LINE   445 "regression-compile-tmp/comp412.imp"
4562 @ 27287:               PUSH   SPACE
4563 @ 27290:               CALL  

   446           %ELSE
4564 @ 27291:               LINE   446 "regression-compile-tmp/comp412.imp"
4565 @ 27329:               GOTO   L_0006
4566 @ 27332:               LOCATE L_0007

   447              SPACE
4567 @ 27335:               LINE   447 "regression-compile-tmp/comp412.imp"
4568 @ 27373:               PUSH   SPACE
4569 @ 27376:               CALL  

   448              %IF ERROR POS # 0 %START
4570 @ 27377:               LINE   448 "regression-compile-tmp/comp412.imp"
4571 @ 27415:               PUSH   ERRORPOS
4572 @ 27418:               PUSHI  #0x00000000
4573 @ 27423:               JUMPIF = L_000a

   449                 SPACES(SPACING-1);  PRINTSTRING("! ")
4574 @ 27427:               LINE   449 "regression-compile-tmp/comp412.imp"
4575 @ 27465:               PUSH   SPACES
4576 @ 27468:               PUSH   SPACING
4577 @ 27471:               PUSHI  #0x00000001
4578 @ 27476:               SUB   
4579 @ 27477:               ASSPAR
4580 @ 27478:               CALL  
4581 @ 27479:               LINE   449 "regression-compile-tmp/comp412.imp"
4582 @ 27517:               PUSH   PRINTSTRING
4583 @ 27520:               PUSHS  "! "
4584 @ 27524:               ASSPAR
4585 @ 27525:               CALL  

   450              %FINISH
4586 @ 27526:               LINE   450 "regression-compile-tmp/comp412.imp"
4587 @ 27564:               LOCATE L_000a

   451           %FINISH
4588 @ 27567:               LINE   451 "regression-compile-tmp/comp412.imp"
4589 @ 27605:               LOCATE L_0006

   452           ->FM(N)
4590 @ 27608:               LINE   452 "regression-compile-tmp/comp412.imp"
4591 @ 27646:               PUSH   N
4592 @ 27649:               SJUMP  209

   453  FM(24):   PRINTSTRING("COMPILER ERROR!");  ->F
4593 @ 27652:               LINE   453 "regression-compile-tmp/comp412.imp"
4594 @ 27690:               PUSHI  #0x00000018
4595 @ 27695:               SLABEL 209
4596 @ 27698:               LINE   453 "regression-compile-tmp/comp412.imp"
4597 @ 27736:               PUSH   PRINTSTRING
4598 @ 27739:               PUSHS  "COMPILER ERROR!"
4599 @ 27756:               ASSPAR
4600 @ 27757:               CALL  
4601 @ 27758:               LINE   453 "regression-compile-tmp/comp412.imp"
4602 @ 27796:               JUMP   L_00d2

   454  FM(20):   PRINTSTRING("TEXT TOO LONG");  ->F
4603 @ 27799:               LINE   454 "regression-compile-tmp/comp412.imp"
4604 @ 27837:               PUSHI  #0x00000014
4605 @ 27842:               SLABEL 209
4606 @ 27845:               LINE   454 "regression-compile-tmp/comp412.imp"
4607 @ 27883:               PUSH   PRINTSTRING
4608 @ 27886:               PUSHS  "TEXT TOO LONG"
4609 @ 27901:               ASSPAR
4610 @ 27902:               CALL  
4611 @ 27903:               LINE   454 "regression-compile-tmp/comp412.imp"
4612 @ 27941:               JUMP   L_00d2

   455  FM(21):   PRINTSTRING("TOO MANY NAMES");  ->F
4613 @ 27944:               LINE   455 "regression-compile-tmp/comp412.imp"
4614 @ 27982:               PUSHI  #0x00000015
4615 @ 27987:               SLABEL 209
4616 @ 27990:               LINE   455 "regression-compile-tmp/comp412.imp"
4617 @ 28028:               PUSH   PRINTSTRING
4618 @ 28031:               PUSHS  "TOO MANY NAMES"
4619 @ 28047:               ASSPAR
4620 @ 28048:               CALL  
4621 @ 28049:               LINE   455 "regression-compile-tmp/comp412.imp"
4622 @ 28087:               JUMP   L_00d2

   456  FM(22):   PRINTSTRING("TOO MANY LONG NAMES");  ->F
4623 @ 28090:               LINE   456 "regression-compile-tmp/comp412.imp"
4624 @ 28128:               PUSHI  #0x00000016
4625 @ 28133:               SLABEL 209
4626 @ 28136:               LINE   456 "regression-compile-tmp/comp412.imp"
4627 @ 28174:               PUSH   PRINTSTRING
4628 @ 28177:               PUSHS  "TOO MANY LONG NAMES"
4629 @ 28198:               ASSPAR
4630 @ 28199:               CALL  
4631 @ 28200:               LINE   456 "regression-compile-tmp/comp412.imp"
4632 @ 28238:               JUMP   L_00d2

   457  FM(23):   PRINTSTRING("PROGRAM TOO COMPLEX");  ->F
4633 @ 28241:               LINE   457 "regression-compile-tmp/comp412.imp"
4634 @ 28279:               PUSHI  #0x00000017
4635 @ 28284:               SLABEL 209
4636 @ 28287:               LINE   457 "regression-compile-tmp/comp412.imp"
4637 @ 28325:               PUSH   PRINTSTRING
4638 @ 28328:               PUSHS  "PROGRAM TOO COMPLEX"
4639 @ 28349:               ASSPAR
4640 @ 28350:               CALL  
4641 @ 28351:               LINE   457 "regression-compile-tmp/comp412.imp"
4642 @ 28389:               JUMP   L_00d2

   458  FM(18):   PRINTSTRING("ACCESS")
4643 @ 28392:               LINE   458 "regression-compile-tmp/comp412.imp"
4644 @ 28430:               PUSHI  #0x00000012
4645 @ 28435:               SLABEL 209
4646 @ 28438:               LINE   458 "regression-compile-tmp/comp412.imp"
4647 @ 28476:               PUSH   PRINTSTRING
4648 @ 28479:               PUSHS  "ACCESS"
4649 @ 28487:               ASSPAR
4650 @ 28488:               CALL  

   459           FAULTY = FAULTY-1 %IF STREAM = REPORT
4651 @ 28489:               LINE   459 "regression-compile-tmp/comp412.imp"
4652 @ 28527:               PUSH   STREAM
4653 @ 28530:               PUSHI  #0x00000003
4654 @ 28535:               JUMPIF # L_0007
4655 @ 28539:               PUSH   FAULTY
4656 @ 28542:               PUSH   FAULTY
4657 @ 28545:               PUSHI  #0x00000001
4658 @ 28550:               SUB   
4659 @ 28551:               ASSVAL
4660 @ 28552:               LOCATE L_0007

   460           ->F
4661 @ 28555:               LINE   460 "regression-compile-tmp/comp412.imp"
4662 @ 28593:               JUMP   L_00d2

   461  FM(0):    PRINTSTRING("FORM");      ->F
4663 @ 28596:               LINE   461 "regression-compile-tmp/comp412.imp"
4664 @ 28634:               PUSHI  #0x00000000
4665 @ 28639:               SLABEL 209
4666 @ 28642:               LINE   461 "regression-compile-tmp/comp412.imp"
4667 @ 28680:               PUSH   PRINTSTRING
4668 @ 28683:               PUSHS  "FORM"
4669 @ 28689:               ASSPAR
4670 @ 28690:               CALL  
4671 @ 28691:               LINE   461 "regression-compile-tmp/comp412.imp"
4672 @ 28729:               JUMP   L_00d2

   462  FM(1):    PRINTSTRING("ATOM");      ->F
4673 @ 28732:               LINE   462 "regression-compile-tmp/comp412.imp"
4674 @ 28770:               PUSHI  #0x00000001
4675 @ 28775:               SLABEL 209
4676 @ 28778:               LINE   462 "regression-compile-tmp/comp412.imp"
4677 @ 28816:               PUSH   PRINTSTRING
4678 @ 28819:               PUSHS  "ATOM"
4679 @ 28825:               ASSPAR
4680 @ 28826:               CALL  
4681 @ 28827:               LINE   462 "regression-compile-tmp/comp412.imp"
4682 @ 28865:               JUMP   L_00d2

   463  FM(2):    PRINTSTRING("TYPE");      ->F
4683 @ 28868:               LINE   463 "regression-compile-tmp/comp412.imp"
4684 @ 28906:               PUSHI  #0x00000002
4685 @ 28911:               SLABEL 209
4686 @ 28914:               LINE   463 "regression-compile-tmp/comp412.imp"
4687 @ 28952:               PUSH   PRINTSTRING
4688 @ 28955:               PUSHS  "TYPE"
4689 @ 28961:               ASSPAR
4690 @ 28962:               CALL  
4691 @ 28963:               LINE   463 "regression-compile-tmp/comp412.imp"
4692 @ 29001:               JUMP   L_00d2

   464  FM(3):    PRINTSTRING("NAME");      ->F
4693 @ 29004:               LINE   464 "regression-compile-tmp/comp412.imp"
4694 @ 29042:               PUSHI  #0x00000003
4695 @ 29047:               SLABEL 209
4696 @ 29050:               LINE   464 "regression-compile-tmp/comp412.imp"
4697 @ 29088:               PUSH   PRINTSTRING
4698 @ 29091:               PUSHS  "NAME"
4699 @ 29097:               ASSPAR
4700 @ 29098:               CALL  
4701 @ 29099:               LINE   464 "regression-compile-tmp/comp412.imp"
4702 @ 29137:               JUMP   L_00d2

   465  FM(4):    PRINTSTRING("SIZE");      ->F
4703 @ 29140:               LINE   465 "regression-compile-tmp/comp412.imp"
4704 @ 29178:               PUSHI  #0x00000004
4705 @ 29183:               SLABEL 209
4706 @ 29186:               LINE   465 "regression-compile-tmp/comp412.imp"
4707 @ 29224:               PUSH   PRINTSTRING
4708 @ 29227:               PUSHS  "SIZE"
4709 @ 29233:               ASSPAR
4710 @ 29234:               CALL  
4711 @ 29235:               LINE   465 "regression-compile-tmp/comp412.imp"
4712 @ 29273:               JUMP   L_00d2

   466  FM(5):    PRINTSTRING("CONTEXT");   ->F
4713 @ 29276:               LINE   466 "regression-compile-tmp/comp412.imp"
4714 @ 29314:               PUSHI  #0x00000005
4715 @ 29319:               SLABEL 209
4716 @ 29322:               LINE   466 "regression-compile-tmp/comp412.imp"
4717 @ 29360:               PUSH   PRINTSTRING
4718 @ 29363:               PUSHS  "CONTEXT"
4719 @ 29372:               ASSPAR
4720 @ 29373:               CALL  
4721 @ 29374:               LINE   466 "regression-compile-tmp/comp412.imp"
4722 @ 29412:               JUMP   L_00d2

   467  FM(6):    PRINTSTRING("MATCH");     ->F
4723 @ 29415:               LINE   467 "regression-compile-tmp/comp412.imp"
4724 @ 29453:               PUSHI  #0x00000006
4725 @ 29458:               SLABEL 209
4726 @ 29461:               LINE   467 "regression-compile-tmp/comp412.imp"
4727 @ 29499:               PUSH   PRINTSTRING
4728 @ 29502:               PUSHS  "MATCH"
4729 @ 29509:               ASSPAR
4730 @ 29510:               CALL  
4731 @ 29511:               LINE   467 "regression-compile-tmp/comp412.imp"
4732 @ 29549:               JUMP   L_00d2

   468  FM(7):    PRINTSTRING("COPY");      ->F
4733 @ 29552:               LINE   468 "regression-compile-tmp/comp412.imp"
4734 @ 29590:               PUSHI  #0x00000007
4735 @ 29595:               SLABEL 209
4736 @ 29598:               LINE   468 "regression-compile-tmp/comp412.imp"
4737 @ 29636:               PUSH   PRINTSTRING
4738 @ 29639:               PUSHS  "COPY"
4739 @ 29645:               ASSPAR
4740 @ 29646:               CALL  
4741 @ 29647:               LINE   468 "regression-compile-tmp/comp412.imp"
4742 @ 29685:               JUMP   L_00d2

   469  FM(8):    PRINTSTRING("SPEC");      ->F
4743 @ 29688:               LINE   469 "regression-compile-tmp/comp412.imp"
4744 @ 29726:               PUSHI  #0x00000008
4745 @ 29731:               SLABEL 209
4746 @ 29734:               LINE   469 "regression-compile-tmp/comp412.imp"
4747 @ 29772:               PUSH   PRINTSTRING
4748 @ 29775:               PUSHS  "SPEC"
4749 @ 29781:               ASSPAR
4750 @ 29782:               CALL  
4751 @ 29783:               LINE   469 "regression-compile-tmp/comp412.imp"
4752 @ 29821:               JUMP   L_00d2

   470  FM(9):    PRINTSTRING("%END");      ->MISS
4753 @ 29824:               LINE   470 "regression-compile-tmp/comp412.imp"
4754 @ 29862:               PUSHI  #0x00000009
4755 @ 29867:               SLABEL 209
4756 @ 29870:               LINE   470 "regression-compile-tmp/comp412.imp"
4757 @ 29908:               PUSH   PRINTSTRING
4758 @ 29911:               PUSHS  "%END"
4759 @ 29917:               ASSPAR
4760 @ 29918:               CALL  
4761 @ 29919:               LINE   470 "regression-compile-tmp/comp412.imp"
4762 @ 29957:               JUMP   L_00d3

   471  FM(10):   PRINTSTRING("%CYCLE");    ->MISS
4763 @ 29960:               LINE   471 "regression-compile-tmp/comp412.imp"
4764 @ 29998:               PUSHI  #0x0000000a
4765 @ 30003:               SLABEL 209
4766 @ 30006:               LINE   471 "regression-compile-tmp/comp412.imp"
4767 @ 30044:               PUSH   PRINTSTRING
4768 @ 30047:               PUSHS  "%CYCLE"
4769 @ 30055:               ASSPAR
4770 @ 30056:               CALL  
4771 @ 30057:               LINE   471 "regression-compile-tmp/comp412.imp"
4772 @ 30095:               JUMP   L_00d3

   472  FM(11):   PRINTSTRING("%REPEAT");   ->MISS
4773 @ 30098:               LINE   472 "regression-compile-tmp/comp412.imp"
4774 @ 30136:               PUSHI  #0x0000000b
4775 @ 30141:               SLABEL 209
4776 @ 30144:               LINE   472 "regression-compile-tmp/comp412.imp"
4777 @ 30182:               PUSH   PRINTSTRING
4778 @ 30185:               PUSHS  "%REPEAT"
4779 @ 30194:               ASSPAR
4780 @ 30195:               CALL  
4781 @ 30196:               LINE   472 "regression-compile-tmp/comp412.imp"
4782 @ 30234:               JUMP   L_00d3

   473  FM(12):   PRINTSYMBOL('"');  PRINT NAME(X); PRINTSYMBOL('"');  ->MISS
4783 @ 30237:               LINE   473 "regression-compile-tmp/comp412.imp"
4784 @ 30275:               PUSHI  #0x0000000c
4785 @ 30280:               SLABEL 209
4786 @ 30283:               LINE   473 "regression-compile-tmp/comp412.imp"
4787 @ 30321:               PUSH   PRINTSYMBOL
4788 @ 30324:               PUSHI  #0x00000022
4789 @ 30329:               ASSPAR
4790 @ 30330:               CALL  
4791 @ 30331:               LINE   473 "regression-compile-tmp/comp412.imp"
4792 @ 30369:               PUSH   PRINTNAME
4793 @ 30372:               PUSH   X
4794 @ 30375:               ASSPAR
4795 @ 30376:               CALL  
4796 @ 30377:               LINE   473 "regression-compile-tmp/comp412.imp"
4797 @ 30415:               PUSH   PRINTSYMBOL
4798 @ 30418:               PUSHI  #0x00000022
4799 @ 30423:               ASSPAR
4800 @ 30424:               CALL  
4801 @ 30425:               LINE   473 "regression-compile-tmp/comp412.imp"
4802 @ 30463:               JUMP   L_00d3

   474  FM(13):   PRINTSTRING("%START");    ->MISS
4803 @ 30466:               LINE   474 "regression-compile-tmp/comp412.imp"
4804 @ 30504:               PUSHI  #0x0000000d
4805 @ 30509:               SLABEL 209
4806 @ 30512:               LINE   474 "regression-compile-tmp/comp412.imp"
4807 @ 30550:               PUSH   PRINTSTRING
4808 @ 30553:               PUSHS  "%START"
4809 @ 30561:               ASSPAR
4810 @ 30562:               CALL  
4811 @ 30563:               LINE   474 "regression-compile-tmp/comp412.imp"
4812 @ 30601:               JUMP   L_00d3

   475  FM(14):   PRINTSTRING("%FINISH");   ->MISS
4813 @ 30604:               LINE   475 "regression-compile-tmp/comp412.imp"
4814 @ 30642:               PUSHI  #0x0000000e
4815 @ 30647:               SLABEL 209
4816 @ 30650:               LINE   475 "regression-compile-tmp/comp412.imp"
4817 @ 30688:               PUSH   PRINTSTRING
4818 @ 30691:               PUSHS  "%FINISH"
4819 @ 30700:               ASSPAR
4820 @ 30701:               CALL  
4821 @ 30702:               LINE   475 "regression-compile-tmp/comp412.imp"
4822 @ 30740:               JUMP   L_00d3

   476  FM(15):   PRINTSTRING("ORDER");     ->F
4823 @ 30743:               LINE   476 "regression-compile-tmp/comp412.imp"
4824 @ 30781:               PUSHI  #0x0000000f
4825 @ 30786:               SLABEL 209
4826 @ 30789:               LINE   476 "regression-compile-tmp/comp412.imp"
4827 @ 30827:               PUSH   PRINTSTRING
4828 @ 30830:               PUSHS  "ORDER"
4829 @ 30837:               ASSPAR
4830 @ 30838:               CALL  
4831 @ 30839:               LINE   476 "regression-compile-tmp/comp412.imp"
4832 @ 30877:               JUMP   L_00d2

   477  FM(16):   PRINTSTRING("BOUNDS");     ->F
4833 @ 30880:               LINE   477 "regression-compile-tmp/comp412.imp"
4834 @ 30918:               PUSHI  #0x00000010
4835 @ 30923:               SLABEL 209
4836 @ 30926:               LINE   477 "regression-compile-tmp/comp412.imp"
4837 @ 30964:               PUSH   PRINTSTRING
4838 @ 30967:               PUSHS  "BOUNDS"
4839 @ 30975:               ASSPAR
4840 @ 30976:               CALL  
4841 @ 30977:               LINE   477 "regression-compile-tmp/comp412.imp"
4842 @ 31015:               JUMP   L_00d2

   478  FM(17):   PRINTSTRING("RESULT")
4843 @ 31018:               LINE   478 "regression-compile-tmp/comp412.imp"
4844 @ 31056:               PUSHI  #0x00000011
4845 @ 31061:               SLABEL 209
4846 @ 31064:               LINE   478 "regression-compile-tmp/comp412.imp"
4847 @ 31102:               PUSH   PRINTSTRING
4848 @ 31105:               PUSHS  "RESULT"
4849 @ 31113:               ASSPAR
4850 @ 31114:               CALL  

   479  MISS:     PRINTSTRING(" MISSING")
4851 @ 31115:               LINE   479 "regression-compile-tmp/comp412.imp"
4852 @ 31153:               LABEL  L_00d3
4853 @ 31156:               LINE   479 "regression-compile-tmp/comp412.imp"
4854 @ 31194:               PUSH   PRINTSTRING
4855 @ 31197:               PUSHS  " MISSING"
4856 @ 31207:               ASSPAR
4857 @ 31208:               CALL  

   480  F:        NEWLINE
4858 @ 31209:               LINE   480 "regression-compile-tmp/comp412.imp"
4859 @ 31247:               LABEL  L_00d2
4860 @ 31250:               LINE   480 "regression-compile-tmp/comp412.imp"
4861 @ 31288:               PUSH   NEWLINE
4862 @ 31291:               CALL  

   481           %EXIT %IF STREAM = LISTING
4863 @ 31292:               LINE   481 "regression-compile-tmp/comp412.imp"
4864 @ 31330:               PUSH   STREAM
4865 @ 31333:               PUSHI  #0x00000001
4866 @ 31338:               JUMPIF # L_0007
4867 @ 31342:               GOTO   L_0004
4868 @ 31345:               LOCATE L_0007

   482           STREAM = LISTING;  SELECTOUTPUT(LISTING)
4869 @ 31348:               LINE   482 "regression-compile-tmp/comp412.imp"
4870 @ 31386:               PUSH   STREAM
4871 @ 31389:               PUSHI  #0x00000001
4872 @ 31394:               ASSVAL
4873 @ 31395:               LINE   482 "regression-compile-tmp/comp412.imp"
4874 @ 31433:               PUSH   SELECTOUTPUT
4875 @ 31436:               PUSHI  #0x00000001
4876 @ 31441:               ASSPAR
4877 @ 31442:               CALL  

   483        %REPEAT
4878 @ 31443:               LINE   483 "regression-compile-tmp/comp412.imp"
4879 @ 31481:               REPEAT L_0003
4880 @ 31484:               LOCATE L_0004

   484        MARGIN = MARGIN+POS %AND SPACES(MARGIN+8) %IF SYM # NL
4881 @ 31487:               LINE   484 "regression-compile-tmp/comp412.imp"
4882 @ 31525:               PUSH   SYM
4883 @ 31528:               PUSHI  #0x0000000a
4884 @ 31533:               JUMPIF = L_0004
4885 @ 31537:               PUSH   MARGIN
4886 @ 31540:               PUSH   MARGIN
4887 @ 31543:               PUSH   POS
4888 @ 31546:               ADD   
4889 @ 31547:               ASSVAL
4890 @ 31548:               PUSH   SPACES
4891 @ 31551:               PUSH   MARGIN
4892 @ 31554:               PUSHI  #0x00000008
4893 @ 31559:               ADD   
4894 @ 31560:               ASSPAR
4895 @ 31561:               CALL  
4896 @ 31562:               LOCATE L_0004

   485        POS = 0;  OUT = 0
4897 @ 31565:               LINE   485 "regression-compile-tmp/comp412.imp"
4898 @ 31603:               PUSH   POS
4899 @ 31606:               PUSHI  #0x00000000
4900 @ 31611:               ASSVAL
4901 @ 31612:               LINE   485 "regression-compile-tmp/comp412.imp"
4902 @ 31650:               PUSH   OUT
4903 @ 31653:               PUSHI  #0x00000000
4904 @ 31658:               ASSVAL

   486        %SIGNAL 0,10 %IF N >= 20
4905 @ 31659:               LINE   486 "regression-compile-tmp/comp412.imp"
4906 @ 31697:               PUSH   N
4907 @ 31700:               PUSHI  #0x00000014
4908 @ 31705:               JUMPIF < L_0004
4909 @ 31709:               PUSHI  #0x0000000a
4910 @ 31714:               EVENT  0000
4911 @ 31717:               LOCATE L_0004

   487  %END
   488  
   489  ! ---- 'C GEN' DEPENDS ON A 32-BIT WORD ----
4912 @ 31720:               LINE   487 "regression-compile-tmp/comp412.imp"
4913 @ 31758:            END    _lev0id0_FAULT {lev=2 --> 1}

   490  %ROUTINE C GEN(%INTEGER N)
4914 @ 31759:            LINE   490 "regression-compile-tmp/comp412.imp"
4915 @ 31797:            DEF    CGEN (_lev0id0_CGEN) p1=V_00cc a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4916 @ 31813:               START  ( FORMAL PARAMETERS  {lev=2 --> 3, nested=0 --> 1}
4917 @ 31814:                  DEF    N p1=V_00cd a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4918 @ 31827:               FINISH ) {lev=2}

   491        %INTEGER J, M, L
4919 @ 31828:               LINE   491 "regression-compile-tmp/comp412.imp"
4920 @ 31866:               DEF    J p1=V_00ce a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4921 @ 31879:               DEF    M p1=V_00cf a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
4922 @ 31892:               DEF    L p1=V_00d0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   492        M = N;  N = |M|
4923 @ 31905:               LINE   492 "regression-compile-tmp/comp412.imp"
4924 @ 31943:               PUSH   M
4925 @ 31946:               PUSH   N
4926 @ 31949:               ASSVAL
4927 @ 31950:               LINE   492 "regression-compile-tmp/comp412.imp"
4928 @ 31988:               PUSH   N
4929 @ 31991:               PUSH   M
4930 @ 31994:               MOD   
4931 @ 31995:               ASSVAL

   493        %IF N>>16 = 0 %THEN L = 4 %ELSE L = 8
4932 @ 31996:               LINE   493 "regression-compile-tmp/comp412.imp"
4933 @ 32034:               PUSH   N
4934 @ 32037:               PUSHI  #0x00000010
4935 @ 32042:               RSH   
4936 @ 32043:               PUSHI  #0x00000000
4937 @ 32048:               JUMPIF # L_0004
4938 @ 32052:               PUSH   L
4939 @ 32055:               PUSHI  #0x00000004
4940 @ 32060:               ASSVAL
4941 @ 32061:               GOTO   L_0003
4942 @ 32064:               LOCATE L_0004
4943 @ 32067:               PUSH   L
4944 @ 32070:               PUSHI  #0x00000008
4945 @ 32075:               ASSVAL
4946 @ 32076:               LOCATE L_0003

   494        PUT('N');  PUT(L+1+'0');  PUT(',');  PUT('Y')
4947 @ 32079:               LINE   494 "regression-compile-tmp/comp412.imp"
4948 @ 32117:               PUSH   PUT
4949 @ 32120:               PUSHI  #0x0000004e
4950 @ 32125:               ASSPAR
4951 @ 32126:               CALL  
4952 @ 32127:               LINE   494 "regression-compile-tmp/comp412.imp"
4953 @ 32165:               PUSH   PUT
4954 @ 32168:               PUSH   L
4955 @ 32171:               PUSHI  #0x00000001
4956 @ 32176:               ADD   
4957 @ 32177:               PUSHI  #0x00000030
4958 @ 32182:               ADD   
4959 @ 32183:               ASSPAR
4960 @ 32184:               CALL  
4961 @ 32185:               LINE   494 "regression-compile-tmp/comp412.imp"
4962 @ 32223:               PUSH   PUT
4963 @ 32226:               PUSHI  #0x0000002c
4964 @ 32231:               ASSPAR
4965 @ 32232:               CALL  
4966 @ 32233:               LINE   494 "regression-compile-tmp/comp412.imp"
4967 @ 32271:               PUSH   PUT
4968 @ 32274:               PUSHI  #0x00000059
4969 @ 32279:               ASSPAR
4970 @ 32280:               CALL  

   495        PUT( (N>>J)&15+'A' ) %FOR J = (L-1)*4, -4, 0
4971 @ 32281:               LINE   495 "regression-compile-tmp/comp412.imp"
4972 @ 32319:               PUSH   J
4973 @ 32322:               PUSHI  #0x00000004
4974 @ 32327:               NEGATE
4975 @ 32328:               PUSHI  #0x00000000
4976 @ 32333:               PUSH   L
4977 @ 32336:               PUSHI  #0x00000001
4978 @ 32341:               SUB   
4979 @ 32342:               PUSHI  #0x00000004
4980 @ 32347:               MUL   
4981 @ 32348:               FOR    L_0003
4982 @ 32351:               PUSH   PUT
4983 @ 32354:               PUSH   N
4984 @ 32357:               PUSH   J
4985 @ 32360:               RSH   
4986 @ 32361:               PUSHI  #0x0000000f
4987 @ 32366:               AND   
4988 @ 32367:               PUSHI  #0x00000041
4989 @ 32372:               ADD   
4990 @ 32373:               ASSPAR
4991 @ 32374:               CALL  
4992 @ 32375:               REPEAT L_0003
4993 @ 32378:               LOCATE L_0004

   496        PUT('U') %IF M < 0
4994 @ 32381:               LINE   496 "regression-compile-tmp/comp412.imp"
4995 @ 32419:               PUSH   M
4996 @ 32422:               PUSHI  #0x00000000
4997 @ 32427:               JUMPIF >= L_0004
4998 @ 32431:               PUSH   PUT
4999 @ 32434:               PUSHI  #0x00000055
5000 @ 32439:               ASSPAR
5001 @ 32440:               CALL  
5002 @ 32441:               LOCATE L_0004

   497        LIT = CODE
5003 @ 32444:               LINE   497 "regression-compile-tmp/comp412.imp"
5004 @ 32482:               PUSH   LIT
5005 @ 32485:               PUSH   CODE
5006 @ 32488:               ASSVAL

   498  %END
5007 @ 32489:               LINE   498 "regression-compile-tmp/comp412.imp"
5008 @ 32527:            END    _lev0id0_CGEN {lev=2 --> 1}

   499  %INTEGERFN EVAL(%INTEGER P)
5009 @ 32528:            LINE   499 "regression-compile-tmp/comp412.imp"
5010 @ 32566:            DEF    EVAL (_lev0id0_EVAL) p1=V_00cd a/tf=18 b/format=1 c/ostate=10  type=1 (integer) form=8 (function) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=1 unass=0
5011 @ 32582:               START  ( FORMAL PARAMETERS  {lev=2 --> 3, nested=0 --> 1}
5012 @ 32583:                  DEF    P p1=V_00ce a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5013 @ 32596:               FINISH ) {lev=2}

   500     %CONSTBYTEINTEGERARRAY BASIS('V' : 'Z')=3,1,8,4,0
5014 @ 32597:               LINE   500 "regression-compile-tmp/comp412.imp"
5015 @ 32635:               PUSHI  #0x00000056
5016 @ 32640:               PUSHI  #0x0000005a
5017 @ 32645:               BOUNDS
5018 @ 32646:               DEF    BASIS p1=V_00cf a/tf=1b b/format=2 c/ostate=112  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
5019 @ 32663:               PUSHI  #0x00000003
5020 @ 32668:               INIT   1
5021 @ 32671:               PUSHI  #0x00000001
5022 @ 32676:               INIT   1
5023 @ 32679:               PUSHI  #0x00000008
5024 @ 32684:               INIT   1
5025 @ 32687:               PUSHI  #0x00000004
5026 @ 32692:               INIT   1
5027 @ 32695:               PUSHI  #0x00000000
5028 @ 32700:               INIT   1

   501     %INTEGER N, J, B, S, L, MOD
5029 @ 32703:               LINE   501 "regression-compile-tmp/comp412.imp"
5030 @ 32741:               DEF    N p1=V_00d0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5031 @ 32754:               DEF    J p1=V_00d1 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5032 @ 32767:               DEF    B p1=V_00d2 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5033 @ 32780:               DEF    S p1=V_00d3 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5034 @ 32793:               DEF    L p1=V_00d4 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5035 @ 32806:               DEF    MOD p1=V_00d5 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   502     N=0
5036 @ 32821:               LINE   502 "regression-compile-tmp/comp412.imp"
5037 @ 32859:               PUSH   N
5038 @ 32862:               PUSHI  #0x00000000
5039 @ 32867:               ASSVAL

   503     %RESULT = DICT(-P) %IF P < 0
5040 @ 32868:               LINE   503 "regression-compile-tmp/comp412.imp"
5041 @ 32906:               PUSH   P
5042 @ 32909:               PUSHI  #0x00000000
5043 @ 32914:               JUMPIF >= L_0004
5044 @ 32918:               PUSH   DICT
5045 @ 32921:               PUSH   P
5046 @ 32924:               NEGATE
5047 @ 32925:               ACCESS
5048 @ 32926:               RESULT
5049 @ 32927:               LOCATE L_0004

   504     L=BUFFER(P);  %RESULT=0 %IF L=0 %OR L=1
5050 @ 32930:               LINE   504 "regression-compile-tmp/comp412.imp"
5051 @ 32968:               PUSH   L
5052 @ 32971:               PUSH   BUFFER
5053 @ 32974:               PUSH   P
5054 @ 32977:               ACCESS
5055 @ 32978:               ASSVAL
5056 @ 32979:               LINE   504 "regression-compile-tmp/comp412.imp"
5057 @ 33017:               PUSH   L
5058 @ 33020:               PUSHI  #0x00000000
5059 @ 33025:               JUMPIF = L_0005
5060 @ 33029:               PUSH   L
5061 @ 33032:               PUSHI  #0x00000001
5062 @ 33037:               JUMPIF # L_0004
5063 @ 33041:               LOCATE L_0005
5064 @ 33044:               PUSHI  #0x00000000
5065 @ 33049:               RESULT
5066 @ 33050:               LOCATE L_0004

   505     B=BUFFER(P-1);  %RESULT=B %IF L < 0
5067 @ 33053:               LINE   505 "regression-compile-tmp/comp412.imp"
5068 @ 33091:               PUSH   B
5069 @ 33094:               PUSH   BUFFER
5070 @ 33097:               PUSH   P
5071 @ 33100:               PUSHI  #0x00000001
5072 @ 33105:               SUB   
5073 @ 33106:               ACCESS
5074 @ 33107:               ASSVAL
5075 @ 33108:               LINE   505 "regression-compile-tmp/comp412.imp"
5076 @ 33146:               PUSH   L
5077 @ 33149:               PUSHI  #0x00000000
5078 @ 33154:               JUMPIF >= L_0004
5079 @ 33158:               PUSH   B
5080 @ 33161:               RESULT
5081 @ 33162:               LOCATE L_0004

   506     B=BASIS(B)
5082 @ 33165:               LINE   506 "regression-compile-tmp/comp412.imp"
5083 @ 33203:               PUSH   B
5084 @ 33206:               PUSH   BASIS
5085 @ 33209:               PUSH   B
5086 @ 33212:               ACCESS
5087 @ 33213:               ASSVAL

   507     MOD='A'; MOD=0 %IF B=8
5088 @ 33214:               LINE   507 "regression-compile-tmp/comp412.imp"
5089 @ 33252:               PUSH   MOD
5090 @ 33255:               PUSHI  #0x00000041
5091 @ 33260:               ASSVAL
5092 @ 33261:               LINE   507 "regression-compile-tmp/comp412.imp"
5093 @ 33299:               PUSH   B
5094 @ 33302:               PUSHI  #0x00000008
5095 @ 33307:               JUMPIF # L_0004
5096 @ 33311:               PUSH   MOD
5097 @ 33314:               PUSHI  #0x00000000
5098 @ 33319:               ASSVAL
5099 @ 33320:               LOCATE L_0004

   508     %CYCLE J=P-2,-1,P-L
5100 @ 33323:               LINE   508 "regression-compile-tmp/comp412.imp"
5101 @ 33361:               PUSH   J
5102 @ 33364:               PUSHI  #0x00000001
5103 @ 33369:               NEGATE
5104 @ 33370:               PUSH   P
5105 @ 33373:               PUSH   L
5106 @ 33376:               SUB   
5107 @ 33377:               PUSH   P
5108 @ 33380:               PUSHI  #0x00000002
5109 @ 33385:               SUB   
5110 @ 33386:               FOR    L_0003

   509        S=BUFFER(J)-MOD
5111 @ 33389:               LINE   509 "regression-compile-tmp/comp412.imp"
5112 @ 33427:               PUSH   S
5113 @ 33430:               PUSH   BUFFER
5114 @ 33433:               PUSH   J
5115 @ 33436:               ACCESS
5116 @ 33437:               PUSH   MOD
5117 @ 33440:               SUB   
5118 @ 33441:               ASSVAL

   510        %IF B=0 %THEN N=N*10 %ELSE N=N<<B
5119 @ 33442:               LINE   510 "regression-compile-tmp/comp412.imp"
5120 @ 33480:               PUSH   B
5121 @ 33483:               PUSHI  #0x00000000
5122 @ 33488:               JUMPIF # L_0007
5123 @ 33492:               PUSH   N
5124 @ 33495:               PUSH   N
5125 @ 33498:               PUSHI  #0x0000000a
5126 @ 33503:               MUL   
5127 @ 33504:               ASSVAL
5128 @ 33505:               GOTO   L_0006
5129 @ 33508:               LOCATE L_0007
5130 @ 33511:               PUSH   N
5131 @ 33514:               PUSH   N
5132 @ 33517:               PUSH   B
5133 @ 33520:               LSH   
5134 @ 33521:               ASSVAL
5135 @ 33522:               LOCATE L_0006

   511        N=N+S
5136 @ 33525:               LINE   511 "regression-compile-tmp/comp412.imp"
5137 @ 33563:               PUSH   N
5138 @ 33566:               PUSH   N
5139 @ 33569:               PUSH   S
5140 @ 33572:               ADD   
5141 @ 33573:               ASSVAL

   512     %REPEAT
5142 @ 33574:               LINE   512 "regression-compile-tmp/comp412.imp"
5143 @ 33612:               REPEAT L_0003
5144 @ 33615:               LOCATE L_0004

   513     %RESULT=N
5145 @ 33618:               LINE   513 "regression-compile-tmp/comp412.imp"
5146 @ 33656:               PUSH   N
5147 @ 33659:               RESULT

   514  %END
   515  
5148 @ 33660:               LINE   514 "regression-compile-tmp/comp412.imp"
5149 @ 33698:            END    _lev0id0_EVAL {lev=2 --> 1}

   516     %ROUTINE COMPILE BLOCK(%INTEGER LEVEL, BLOCK TYPE, %C
   517        %INTEGERNAME FPP)
5150 @ 33699:            LINE   516 "regression-compile-tmp/comp412.imp"
5151 @ 33737:            DEF    COMPILEBLOCK (_lev0id0_COMPILEBLOCK) p1=V_00ce a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5152 @ 33761:               START  ( FORMAL PARAMETERS  {lev=2 --> 3, nested=0 --> 1}
5153 @ 33762:                  DEF    LEVEL p1=V_00cf a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5154 @ 33779:                  DEF    BLOCKTYPE p1=V_00d0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5155 @ 33800:                  DEF    FPP p1=V_00d1 a/tf=12 b/format=1 c/ostate=0  type=1 (integer) form=2 (name) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5156 @ 33815:               FINISH ) {lev=2}

   518        %INTEGER J, K, XX, COUNT, ACCESS = 0
5157 @ 33816:               LINE   518 "regression-compile-tmp/comp412.imp"
5158 @ 33854:               DEF    J p1=V_00d2 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5159 @ 33867:               DEF    K p1=V_00d3 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5160 @ 33880:               DEF    XX p1=V_00d4 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5161 @ 33894:               DEF    COUNT p1=V_00d5 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5162 @ 33911:               DEF    ACCESS p1=V_00d6 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5163 @ 33929:               PUSH   ACCESS
5164 @ 33932:               PUSHI  #0x00000000
5165 @ 33937:               ASSVAL

   519        %INTEGER FP;                         ! START OF FORMAT
5166 @ 33938:               LINE   519 "regression-compile-tmp/comp412.imp"
5167 @ 33976:               DEF    FP p1=V_00d7 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   520        %INTEGER FORMAT;                     ! CURRENT FORMAT POINTER
5168 @ 33990:               LINE   520 "regression-compile-tmp/comp412.imp"
5169 @ 34028:               DEF    FORMAT p1=V_00d8 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   521        %INTEGER A CHAIN;                    ! ARRAY CHAIN
5170 @ 34046:               LINE   521 "regression-compile-tmp/comp412.imp"
5171 @ 34084:               DEF    ACHAIN p1=V_00d9 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   522        %INTEGER OLD LABEL
5172 @ 34102:               LINE   522 "regression-compile-tmp/comp412.imp"
5173 @ 34140:               DEF    OLDLABEL p1=V_00da a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   523        %INTEGER APARM, OLD T BASE, OLD T LIMIT
5174 @ 34160:               LINE   523 "regression-compile-tmp/comp412.imp"
5175 @ 34198:               DEF    APARM p1=V_00db a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5176 @ 34215:               DEF    OLDTBASE p1=V_00dc a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5177 @ 34235:               DEF    OLDTLIMIT p1=V_00dd a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   524        %OWNINTEGER SPEC=1
5178 @ 34256:               LINE   524 "regression-compile-tmp/comp412.imp"
5179 @ 34294:               PUSHI  #0x00000001
5180 @ 34299:               DEF    SPEC p1=V_00de a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
5181 @ 34315:               INIT   1

   525        OLD T BASE=T BASE
5182 @ 34318:               LINE   525 "regression-compile-tmp/comp412.imp"
5183 @ 34356:               PUSH   OLDTBASE
5184 @ 34359:               PUSH   TBASE
5185 @ 34362:               ASSVAL

   526        T BASE=T MAX
5186 @ 34363:               LINE   526 "regression-compile-tmp/comp412.imp"
5187 @ 34401:               PUSH   TBASE
5188 @ 34404:               PUSH   TMAX
5189 @ 34407:               ASSVAL

   527        OLD T LIMIT=T LIMIT;  OLD LABEL = LABEL
5190 @ 34408:               LINE   527 "regression-compile-tmp/comp412.imp"
5191 @ 34446:               PUSH   OLDTLIMIT
5192 @ 34449:               PUSH   TLIMIT
5193 @ 34452:               ASSVAL
5194 @ 34453:               LINE   527 "regression-compile-tmp/comp412.imp"
5195 @ 34491:               PUSH   OLDLABEL
5196 @ 34494:               PUSH   LABEL
5197 @ 34497:               ASSVAL

   528        INHIBIT = INHIBIT<<1
   529  
5198 @ 34498:               LINE   528 "regression-compile-tmp/comp412.imp"
5199 @ 34536:               PUSH   INHIBIT
5200 @ 34539:               PUSH   INHIBIT
5201 @ 34542:               PUSHI  #0x00000001
5202 @ 34547:               LSH   
5203 @ 34548:               ASSVAL

   530        %ROUTINE DEF LAB(%INTEGER L)
5204 @ 34549:               LINE   530 "regression-compile-tmp/comp412.imp"
5205 @ 34587:               DEF    DEFLAB (_lev0id0_COMPILEBLOCK_DEFLAB) p1=V_00df a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5206 @ 34605:                  START  ( FORMAL PARAMETERS  {lev=3 --> 4, nested=0 --> 1}
5207 @ 34606:                     DEF    L p1=V_00e0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5208 @ 34619:                  FINISH ) {lev=3}

   531           INHIBIT = INHIBIT!1
5209 @ 34620:                  LINE   531 "regression-compile-tmp/comp412.imp"
5210 @ 34658:                  PUSH   INHIBIT
5211 @ 34661:                  PUSH   INHIBIT
5212 @ 34664:                  PUSHI  #0x00000001
5213 @ 34669:                  OR    
5214 @ 34670:                  ASSVAL

   532           PUT(':');  ADDR(L)
5215 @ 34671:                  LINE   532 "regression-compile-tmp/comp412.imp"
5216 @ 34709:                  PUSH   PUT
5217 @ 34712:                  PUSHI  #0x0000003a
5218 @ 34717:                  ASSPAR
5219 @ 34718:                  CALL  
5220 @ 34719:                  LINE   532 "regression-compile-tmp/comp412.imp"
5221 @ 34757:                  PUSH   ADDR
5222 @ 34760:                  PUSH   L
5223 @ 34763:                  ASSPAR
5224 @ 34764:                  CALL  

   533           ACCESS = 1
5225 @ 34765:                  LINE   533 "regression-compile-tmp/comp412.imp"
5226 @ 34803:                  PUSH   ACCESS
5227 @ 34806:                  PUSHI  #0x00000001
5228 @ 34811:                  ASSVAL

   534        %END
5229 @ 34812:                  LINE   534 "regression-compile-tmp/comp412.imp"
5230 @ 34850:               END    _lev0id0_COMPILEBLOCK_DEFLAB {lev=3 --> 2}

   535        %ROUTINE ANALYSE SS(%INTEGER CONT)
5231 @ 34851:               LINE   535 "regression-compile-tmp/comp412.imp"
5232 @ 34889:               DEF    ANALYSESS (_lev0id0_COMPILEBLOCK_ANALYSESS) p1=V_00e0 a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5233 @ 34910:                  START  ( FORMAL PARAMETERS  {lev=3 --> 4, nested=0 --> 1}
5234 @ 34911:                     DEF    CONT p1=V_00e1 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5235 @ 34927:                  FINISH ) {lev=3}

   536        %INTEGER CLASS;                      ! CLASS OF ATOM WANTED
5236 @ 34928:                  LINE   536 "regression-compile-tmp/comp412.imp"
5237 @ 34966:                  DEF    CLASS p1=V_00e2 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   537        %INTEGER LIM;                        ! LOOKUP LIMIT
5238 @ 34983:                  LINE   537 "regression-compile-tmp/comp412.imp"
5239 @ 35021:                  DEF    LIM p1=V_00e3 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   538        %OWNINTEGER TAG=0;                   ! CURRENT VAR TAG
5240 @ 35036:                  LINE   538 "regression-compile-tmp/comp412.imp"
5241 @ 35074:                  PUSHI  #0x00000000
5242 @ 35079:                  DEF    TAG p1=V_00e4 a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
5243 @ 35094:                  INIT   1

   539        %OWNINTEGER DELIM = '"'
5244 @ 35097:                  LINE   539 "regression-compile-tmp/comp412.imp"
5245 @ 35135:                  PUSHI  #0x00000022
5246 @ 35140:                  DEF    DELIM p1=V_00e5 a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
5247 @ 35157:                  INIT   1

   540        %OWNINTEGER QUOTE=0;                 ! TEXT MODE FLAG
5248 @ 35160:                  LINE   540 "regression-compile-tmp/comp412.imp"
5249 @ 35198:                  PUSHI  #0x00000000
5250 @ 35203:                  DEF    QUOTE p1=V_00e6 a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
5251 @ 35220:                  INIT   1

   541        %OWNINTEGER KEY=0;                   ! SYMBOL DICT KEY
   542  
5252 @ 35223:                  LINE   541 "regression-compile-tmp/comp412.imp"
5253 @ 35261:                  PUSHI  #0x00000000
5254 @ 35266:                  DEF    KEY p1=V_00e7 a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
5255 @ 35281:                  INIT   1

   543        %ROUTINE DECLARE IDEN
5256 @ 35284:                  LINE   543 "regression-compile-tmp/comp412.imp"
5257 @ 35322:                  DEF    DECLAREIDEN (_lev0id0_COMPILEBLOCK_ANALYSESS_DECLAREIDEN) p1=V_00e8 a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5258 @ 35345:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
5259 @ 35346:                     FINISH ) {lev=4}

   544           %INTEGER EXTRA, FF
5260 @ 35347:                     LINE   544 "regression-compile-tmp/comp412.imp"
5261 @ 35385:                     DEF    EXTRA p1=V_00e9 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5262 @ 35402:                     DEF    FF p1=V_00ea a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   545           %INTEGERNAME FLAG
5263 @ 35416:                     LINE   545 "regression-compile-tmp/comp412.imp"
5264 @ 35454:                     DEF    FLAG p1=V_00eb a/tf=12 b/format=1 c/ostate=0  type=1 (integer) form=2 (name) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   546           %IF SUBATOM#0 %START;             ! ALREADY EXISTS
5265 @ 35470:                     LINE   546 "regression-compile-tmp/comp412.imp"
5266 @ 35508:                     PUSH   SUBATOM
5267 @ 35511:                     PUSHI  #0x00000000
5268 @ 35516:                     JUMPIF = L_0004

   547              FLAG == DICT(SUBATOM)
5269 @ 35520:                     LINE   547 "regression-compile-tmp/comp412.imp"
5270 @ 35558:                     PUSH   FLAG
5271 @ 35561:                     PUSH   DICT
5272 @ 35564:                     PUSH   SUBATOM
5273 @ 35567:                     ACCESS
5274 @ 35568:                     ASSREF

   548              TAG=DICT(SUBATOM-1)
5275 @ 35569:                     LINE   548 "regression-compile-tmp/comp412.imp"
5276 @ 35607:                     PUSH   TAG
5277 @ 35610:                     PUSH   DICT
5278 @ 35613:                     PUSH   SUBATOM
5279 @ 35616:                     PUSHI  #0x00000001
5280 @ 35621:                     SUB   
5281 @ 35622:                     ACCESS
5282 @ 35623:                     ASSVAL

   549              %IF FLAG&1024#0 %START;        ! SPEC GIVEN
5283 @ 35624:                     LINE   549 "regression-compile-tmp/comp412.imp"
5284 @ 35662:                     PUSH   FLAG
5285 @ 35665:                     PUSHI  #0x00000400
5286 @ 35670:                     AND   
5287 @ 35671:                     PUSHI  #0x00000000
5288 @ 35676:                     JUMPIF = L_0007

   550                 %IF TAG&15=3 %START;        ! LABEL REF
5289 @ 35680:                     LINE   550 "regression-compile-tmp/comp412.imp"
5290 @ 35718:                     PUSH   TAG
5291 @ 35721:                     PUSHI  #0x0000000f
5292 @ 35726:                     AND   
5293 @ 35727:                     PUSHI  #0x00000003
5294 @ 35732:                     JUMPIF # L_000a

   551                    FLAG=FLAG!!1024 %IF DECTYPE=3
5295 @ 35736:                     LINE   551 "regression-compile-tmp/comp412.imp"
5296 @ 35774:                     PUSH   DECTYPE
5297 @ 35777:                     PUSHI  #0x00000003
5298 @ 35782:                     JUMPIF # L_000d
5299 @ 35786:                     PUSH   FLAG
5300 @ 35789:                     PUSH   FLAG
5301 @ 35792:                     PUSHI  #0x00000400
5302 @ 35797:                     XOR   
5303 @ 35798:                     ASSVAL
5304 @ 35799:                     LOCATE L_000d

   552                    %RETURN
5305 @ 35802:                     LINE   552 "regression-compile-tmp/comp412.imp"
5306 @ 35840:                     RETURN

   553                 %FINISH
5307 @ 35841:                     LINE   553 "regression-compile-tmp/comp412.imp"
5308 @ 35879:                     LOCATE L_000a

   554                 %IF DECTYPE = TAG&(\128) %OR DECTYPE=1 %START;! SAME TYPE
5309 @ 35882:                     LINE   554 "regression-compile-tmp/comp412.imp"
5310 @ 35920:                     PUSH   DECTYPE
5311 @ 35923:                     PUSH   TAG
5312 @ 35926:                     PUSHI  #0x00000080
5313 @ 35931:                     NOT   
5314 @ 35932:                     AND   
5315 @ 35933:                     JUMPIF = L_000b
5316 @ 35937:                     PUSH   DECTYPE
5317 @ 35940:                     PUSHI  #0x00000001
5318 @ 35945:                     JUMPIF # L_000a
5319 @ 35949:                     LOCATE L_000b

   555                    %IF (7 <= TAG&15 <= 10 %AND SPEC > 0) %C
   556                    %OR TAG&15 = 4 %OR DECTYPE=1 %START;   ! VALID REDEFINITION
5320 @ 35952:                     LINE   555 "regression-compile-tmp/comp412.imp"
5321 @ 35990:                     PUSHI  #0x00000007
5322 @ 35995:                     PUSH   TAG
5323 @ 35998:                     PUSHI  #0x0000000f
5324 @ 36003:                     AND   
5325 @ 36004:                     JUMPIFD > L_000f
5326 @ 36008:                     PUSHI  #0x0000000a
5327 @ 36013:                     JUMPIF > L_000f
5328 @ 36017:                     PUSH   SPEC
5329 @ 36020:                     PUSHI  #0x00000000
5330 @ 36025:                     JUMPIF > L_000e
5331 @ 36029:                     LOCATE L_000f
5332 @ 36032:                     PUSH   TAG
5333 @ 36035:                     PUSHI  #0x0000000f
5334 @ 36040:                     AND   
5335 @ 36041:                     PUSHI  #0x00000004
5336 @ 36046:                     JUMPIF = L_000e
5337 @ 36050:                     PUSH   DECTYPE
5338 @ 36053:                     PUSHI  #0x00000001
5339 @ 36058:                     JUMPIF # L_000d
5340 @ 36062:                     LOCATE L_000e

   557                       FLAG = FLAG!!1024;    ! REMOVE SPEC BIT
5341 @ 36065:                     LINE   557 "regression-compile-tmp/comp412.imp"
5342 @ 36103:                     PUSH   FLAG
5343 @ 36106:                     PUSH   FLAG
5344 @ 36109:                     PUSHI  #0x00000400
5345 @ 36114:                     XOR   
5346 @ 36115:                     ASSVAL

   558                       DECTYPE = TAG&(\128)
5347 @ 36116:                     LINE   558 "regression-compile-tmp/comp412.imp"
5348 @ 36154:                     PUSH   DECTYPE
5349 @ 36157:                     PUSH   TAG
5350 @ 36160:                     PUSHI  #0x00000080
5351 @ 36165:                     NOT   
5352 @ 36166:                     AND   
5353 @ 36167:                     ASSVAL

   559                       %RETURN
5354 @ 36168:                     LINE   559 "regression-compile-tmp/comp412.imp"
5355 @ 36206:                     RETURN

   560                    %FINISH
5356 @ 36207:                     LINE   560 "regression-compile-tmp/comp412.imp"
5357 @ 36245:                     LOCATE L_000d

   561                 %FINISH
5358 @ 36248:                     LINE   561 "regression-compile-tmp/comp412.imp"
5359 @ 36286:                     LOCATE L_000a

   562              %FINISH
5360 @ 36289:                     LINE   562 "regression-compile-tmp/comp412.imp"
5361 @ 36327:                     LOCATE L_0007

   563              DUP=ATOM POS %IF DUP=0
5362 @ 36330:                     LINE   563 "regression-compile-tmp/comp412.imp"
5363 @ 36368:                     PUSH   DUP
5364 @ 36371:                     PUSHI  #0x00000000
5365 @ 36376:                     JUMPIF # L_0007
5366 @ 36380:                     PUSH   DUP
5367 @ 36383:                     PUSH   ATOMPOS
5368 @ 36386:                     ASSVAL
5369 @ 36387:                     LOCATE L_0007

   564              %RETURN %IF DECTYPE=0;         ! LABEL
5370 @ 36390:                     LINE   564 "regression-compile-tmp/comp412.imp"
5371 @ 36428:                     PUSH   DECTYPE
5372 @ 36431:                     PUSHI  #0x00000000
5373 @ 36436:                     JUMPIF # L_0007
5374 @ 36440:                     RETURN
5375 @ 36441:                     LOCATE L_0007

   565           %FINISH
5376 @ 36444:                     LINE   565 "regression-compile-tmp/comp412.imp"
5377 @ 36482:                     LOCATE L_0004

   566           EXTRA=DP;                         ! APP + FORMAT
5378 @ 36485:                     LINE   566 "regression-compile-tmp/comp412.imp"
5379 @ 36523:                     PUSH   EXTRA
5380 @ 36526:                     PUSH   DP
5381 @ 36529:                     ASSVAL

   567           TAG=DECTYPE
5382 @ 36530:                     LINE   567 "regression-compile-tmp/comp412.imp"
5383 @ 36568:                     PUSH   TAG
5384 @ 36571:                     PUSH   DECTYPE
5385 @ 36574:                     ASSVAL

   568           FF=0
5386 @ 36575:                     LINE   568 "regression-compile-tmp/comp412.imp"
5387 @ 36613:                     PUSH   FF
5388 @ 36616:                     PUSHI  #0x00000000
5389 @ 36621:                     ASSVAL

   569           %IF DECTYPE = 0 %START
5390 @ 36622:                     LINE   569 "regression-compile-tmp/comp412.imp"
5391 @ 36660:                     PUSH   DECTYPE
5392 @ 36663:                     PUSHI  #0x00000000
5393 @ 36668:                     JUMPIF # L_0004

   570              TAG = 3;  FF = 1024
5394 @ 36672:                     LINE   570 "regression-compile-tmp/comp412.imp"
5395 @ 36710:                     PUSH   TAG
5396 @ 36713:                     PUSHI  #0x00000003
5397 @ 36718:                     ASSVAL
5398 @ 36719:                     LINE   570 "regression-compile-tmp/comp412.imp"
5399 @ 36757:                     PUSH   FF
5400 @ 36760:                     PUSHI  #0x00000400
5401 @ 36765:                     ASSVAL

   571           %ELSE
5402 @ 36766:                     LINE   571 "regression-compile-tmp/comp412.imp"
5403 @ 36804:                     GOTO   L_0003
5404 @ 36807:                     LOCATE L_0004

   572              FF = FF!SPREFIX<<13
5405 @ 36810:                     LINE   572 "regression-compile-tmp/comp412.imp"
5406 @ 36848:                     PUSH   FF
5407 @ 36851:                     PUSH   FF
5408 @ 36854:                     PUSH   SPREFIX
5409 @ 36857:                     PUSHI  #0x0000000d
5410 @ 36862:                     LSH   
5411 @ 36863:                     OR    
5412 @ 36864:                     ASSVAL

   573           %FINISH
5413 @ 36865:                     LINE   573 "regression-compile-tmp/comp412.imp"
5414 @ 36903:                     LOCATE L_0003

   574           %IF TAG&15 >= 7 %START;           ! APP NEEDED
5415 @ 36906:                     LINE   574 "regression-compile-tmp/comp412.imp"
5416 @ 36944:                     PUSH   TAG
5417 @ 36947:                     PUSHI  #0x0000000f
5418 @ 36952:                     AND   
5419 @ 36953:                     PUSHI  #0x00000007
5420 @ 36958:                     JUMPIF < L_0004

   575              FF = FF!1024 %IF SSTYPE = 2 %AND TAG&15 <= 10
5421 @ 36962:                     LINE   575 "regression-compile-tmp/comp412.imp"
5422 @ 37000:                     PUSH   SSTYPE
5423 @ 37003:                     PUSHI  #0x00000002
5424 @ 37008:                     JUMPIF # L_0007
5425 @ 37012:                     PUSH   TAG
5426 @ 37015:                     PUSHI  #0x0000000f
5427 @ 37020:                     AND   
5428 @ 37021:                     PUSHI  #0x0000000a
5429 @ 37026:                     JUMPIF > L_0007
5430 @ 37030:                     PUSH   FF
5431 @ 37033:                     PUSH   FF
5432 @ 37036:                     PUSHI  #0x00000400
5433 @ 37041:                     OR    
5434 @ 37042:                     ASSVAL
5435 @ 37043:                     LOCATE L_0007

   576              CONST INT = 0
5436 @ 37046:                     LINE   576 "regression-compile-tmp/comp412.imp"
5437 @ 37084:                     PUSH   CONSTINT
5438 @ 37087:                     PUSHI  #0x00000000
5439 @ 37092:                     ASSVAL

   577              %UNLESS 11#TAG&15#13 %START
5440 @ 37093:                     LINE   577 "regression-compile-tmp/comp412.imp"
5441 @ 37131:                     PUSHI  #0x0000000b
5442 @ 37136:                     PUSH   TAG
5443 @ 37139:                     PUSHI  #0x0000000f
5444 @ 37144:                     AND   
5445 @ 37145:                     JUMPIFD = L_0008
5446 @ 37149:                     PUSHI  #0x0000000d
5447 @ 37154:                     JUMPIF # L_0007
5448 @ 37158:                     LOCATE L_0008

   578                 %IF SPREFIX=1 %OR SPREFIX=2 %C
   579                 %THEN DICT(DP)=APP %ELSE %START
5449 @ 37161:                     LINE   578 "regression-compile-tmp/comp412.imp"
5450 @ 37199:                     PUSH   SPREFIX
5451 @ 37202:                     PUSHI  #0x00000001
5452 @ 37207:                     JUMPIF = L_000b
5453 @ 37211:                     PUSH   SPREFIX
5454 @ 37214:                     PUSHI  #0x00000002
5455 @ 37219:                     JUMPIF # L_000a
5456 @ 37223:                     LOCATE L_000b
5457 @ 37226:                     PUSH   DICT
5458 @ 37229:                     PUSH   DP
5459 @ 37232:                     ACCESS
5460 @ 37233:                     PUSH   APP
5461 @ 37236:                     ASSVAL
5462 @ 37237:                     GOTO   L_0009
5463 @ 37240:                     LOCATE L_000a

   580                    APARM=1; DICT(DP)=A CHAIN
5464 @ 37243:                     LINE   580 "regression-compile-tmp/comp412.imp"
5465 @ 37281:                     PUSH   APARM
5466 @ 37284:                     PUSHI  #0x00000001
5467 @ 37289:                     ASSVAL
5468 @ 37290:                     LINE   580 "regression-compile-tmp/comp412.imp"
5469 @ 37328:                     PUSH   DICT
5470 @ 37331:                     PUSH   DP
5471 @ 37334:                     ACCESS
5472 @ 37335:                     PUSH   ACHAIN
5473 @ 37338:                     ASSVAL

   581                    A CHAIN=DP
5474 @ 37339:                     LINE   581 "regression-compile-tmp/comp412.imp"
5475 @ 37377:                     PUSH   ACHAIN
5476 @ 37380:                     PUSH   DP
5477 @ 37383:                     ASSVAL

   582                 %FINISH
5478 @ 37384:                     LINE   582 "regression-compile-tmp/comp412.imp"
5479 @ 37422:                     LOCATE L_0009

   583              %FINISH %ELSE DICT(DP)=0
5480 @ 37425:                     LINE   583 "regression-compile-tmp/comp412.imp"
5481 @ 37463:                     GOTO   L_0006
5482 @ 37466:                     LOCATE L_0007
5483 @ 37469:                     PUSH   DICT
5484 @ 37472:                     PUSH   DP
5485 @ 37475:                     ACCESS
5486 @ 37476:                     PUSHI  #0x00000000
5487 @ 37481:                     ASSVAL
5488 @ 37482:                     LOCATE L_0006

   584              DP=DP+1;  FF=FF!256;           ! SET APP BIT
5489 @ 37485:                     LINE   584 "regression-compile-tmp/comp412.imp"
5490 @ 37523:                     PUSH   DP
5491 @ 37526:                     PUSH   DP
5492 @ 37529:                     PUSHI  #0x00000001
5493 @ 37534:                     ADD   
5494 @ 37535:                     ASSVAL
5495 @ 37536:                     LINE   584 "regression-compile-tmp/comp412.imp"
5496 @ 37574:                     PUSH   FF
5497 @ 37577:                     PUSH   FF
5498 @ 37580:                     PUSHI  #0x00000100
5499 @ 37585:                     OR    
5500 @ 37586:                     ASSVAL

   585              FF=FF!1024 %IF SPEC < 0 %AND SPREFIX < 3
5501 @ 37587:                     LINE   585 "regression-compile-tmp/comp412.imp"
5502 @ 37625:                     PUSH   SPEC
5503 @ 37628:                     PUSHI  #0x00000000
5504 @ 37633:                     JUMPIF >= L_0007
5505 @ 37637:                     PUSH   SPREFIX
5506 @ 37640:                     PUSHI  #0x00000003
5507 @ 37645:                     JUMPIF >= L_0007
5508 @ 37649:                     PUSH   FF
5509 @ 37652:                     PUSH   FF
5510 @ 37655:                     PUSHI  #0x00000400
5511 @ 37660:                     OR    
5512 @ 37661:                     ASSVAL
5513 @ 37662:                     LOCATE L_0007

   586           %FINISH
5514 @ 37665:                     LINE   586 "regression-compile-tmp/comp412.imp"
5515 @ 37703:                     LOCATE L_0004

   587           %IF TAG&X'70'=X'50' %START;       ! RECORD
5516 @ 37706:                     LINE   587 "regression-compile-tmp/comp412.imp"
5517 @ 37744:                     PUSH   TAG
5518 @ 37747:                     PUSHI  #0x00000070
5519 @ 37752:                     AND   
5520 @ 37753:                     PUSHI  #0x00000050
5521 @ 37758:                     JUMPIF # L_0004

   588              DICT(DP)=FORMAT; DP=DP+1
5522 @ 37762:                     LINE   588 "regression-compile-tmp/comp412.imp"
5523 @ 37800:                     PUSH   DICT
5524 @ 37803:                     PUSH   DP
5525 @ 37806:                     ACCESS
5526 @ 37807:                     PUSH   FORMAT
5527 @ 37810:                     ASSVAL
5528 @ 37811:                     LINE   588 "regression-compile-tmp/comp412.imp"
5529 @ 37849:                     PUSH   DP
5530 @ 37852:                     PUSH   DP
5531 @ 37855:                     PUSHI  #0x00000001
5532 @ 37860:                     ADD   
5533 @ 37861:                     ASSVAL

   589              FF=FF!512;                     ! SET FORMAT BIT
5534 @ 37862:                     LINE   589 "regression-compile-tmp/comp412.imp"
5535 @ 37900:                     PUSH   FF
5536 @ 37903:                     PUSH   FF
5537 @ 37906:                     PUSHI  #0x00000200
5538 @ 37911:                     OR    
5539 @ 37912:                     ASSVAL

   590           %FINISH
5540 @ 37913:                     LINE   590 "regression-compile-tmp/comp412.imp"
5541 @ 37951:                     LOCATE L_0004

   591           %IF TAG&15=6 %START;              ! SWITCH
5542 @ 37954:                     LINE   591 "regression-compile-tmp/comp412.imp"
5543 @ 37992:                     PUSH   TAG
5544 @ 37995:                     PUSHI  #0x0000000f
5545 @ 38000:                     AND   
5546 @ 38001:                     PUSHI  #0x00000006
5547 @ 38006:                     JUMPIF # L_0004

   592              DICT(DP)=0
5548 @ 38010:                     LINE   592 "regression-compile-tmp/comp412.imp"
5549 @ 38048:                     PUSH   DICT
5550 @ 38051:                     PUSH   DP
5551 @ 38054:                     ACCESS
5552 @ 38055:                     PUSHI  #0x00000000
5553 @ 38060:                     ASSVAL

   593              DP=DP+1
5554 @ 38061:                     LINE   593 "regression-compile-tmp/comp412.imp"
5555 @ 38099:                     PUSH   DP
5556 @ 38102:                     PUSH   DP
5557 @ 38105:                     PUSHI  #0x00000001
5558 @ 38110:                     ADD   
5559 @ 38111:                     ASSVAL

   594           %FINISH
5560 @ 38112:                     LINE   594 "regression-compile-tmp/comp412.imp"
5561 @ 38150:                     LOCATE L_0004

   595           TAG = TAG!128 %IF SPREFIX > 3 %OR PERMIN# 0
5562 @ 38153:                     LINE   595 "regression-compile-tmp/comp412.imp"
5563 @ 38191:                     PUSH   SPREFIX
5564 @ 38194:                     PUSHI  #0x00000003
5565 @ 38199:                     JUMPIF > L_0005
5566 @ 38203:                     PUSH   PERMIN
5567 @ 38206:                     PUSHI  #0x00000000
5568 @ 38211:                     JUMPIF = L_0004
5569 @ 38215:                     LOCATE L_0005
5570 @ 38218:                     PUSH   TAG
5571 @ 38221:                     PUSH   TAG
5572 @ 38224:                     PUSHI  #0x00000080
5573 @ 38229:                     OR    
5574 @ 38230:                     ASSVAL
5575 @ 38231:                     LOCATE L_0004

   596           %IF CONST INT # 0 %START
5576 @ 38234:                     LINE   596 "regression-compile-tmp/comp412.imp"
5577 @ 38272:                     PUSH   CONSTINT
5578 @ 38275:                     PUSHI  #0x00000000
5579 @ 38280:                     JUMPIF = L_0004

   597              DICT(DP) = 0;  DP = DP+1
5580 @ 38284:                     LINE   597 "regression-compile-tmp/comp412.imp"
5581 @ 38322:                     PUSH   DICT
5582 @ 38325:                     PUSH   DP
5583 @ 38328:                     ACCESS
5584 @ 38329:                     PUSHI  #0x00000000
5585 @ 38334:                     ASSVAL
5586 @ 38335:                     LINE   597 "regression-compile-tmp/comp412.imp"
5587 @ 38373:                     PUSH   DP
5588 @ 38376:                     PUSH   DP
5589 @ 38379:                     PUSHI  #0x00000001
5590 @ 38384:                     ADD   
5591 @ 38385:                     ASSVAL

   598              TAG = TAG&X'FFF0'+5
5592 @ 38386:                     LINE   598 "regression-compile-tmp/comp412.imp"
5593 @ 38424:                     PUSH   TAG
5594 @ 38427:                     PUSH   TAG
5595 @ 38430:                     PUSHI  #0x0000fff0
5596 @ 38435:                     AND   
5597 @ 38436:                     PUSHI  #0x00000005
5598 @ 38441:                     ADD   
5599 @ 38442:                     ASSVAL

   599           %FINISH
5600 @ 38443:                     LINE   599 "regression-compile-tmp/comp412.imp"
5601 @ 38481:                     LOCATE L_0004

   600           EXTRA=DP-EXTRA;                   ! 1=APP, 2=APP+FORMAT, 0=NEITH
5602 @ 38484:                     LINE   600 "regression-compile-tmp/comp412.imp"
5603 @ 38522:                     PUSH   EXTRA
5604 @ 38525:                     PUSH   DP
5605 @ 38528:                     PUSH   EXTRA
5606 @ 38531:                     SUB   
5607 @ 38532:                     ASSVAL

   601           DICT(DP) = TAG; TYPE=TAG>>4&7
5608 @ 38533:                     LINE   601 "regression-compile-tmp/comp412.imp"
5609 @ 38571:                     PUSH   DICT
5610 @ 38574:                     PUSH   DP
5611 @ 38577:                     ACCESS
5612 @ 38578:                     PUSH   TAG
5613 @ 38581:                     ASSVAL
5614 @ 38582:                     LINE   601 "regression-compile-tmp/comp412.imp"
5615 @ 38620:                     PUSH   TYPE
5616 @ 38623:                     PUSH   TAG
5617 @ 38626:                     PUSHI  #0x00000004
5618 @ 38631:                     RSH   
5619 @ 38632:                     PUSHI  #0x00000007
5620 @ 38637:                     AND   
5621 @ 38638:                     ASSVAL

   602           DP=DP+1
5622 @ 38639:                     LINE   602 "regression-compile-tmp/comp412.imp"
5623 @ 38677:                     PUSH   DP
5624 @ 38680:                     PUSH   DP
5625 @ 38683:                     PUSHI  #0x00000001
5626 @ 38688:                     ADD   
5627 @ 38689:                     ASSVAL

   603           DICT(DP) = FF!(DP-T MAX-2)!EXTRA<<11
5628 @ 38690:                     LINE   603 "regression-compile-tmp/comp412.imp"
5629 @ 38728:                     PUSH   DICT
5630 @ 38731:                     PUSH   DP
5631 @ 38734:                     ACCESS
5632 @ 38735:                     PUSH   FF
5633 @ 38738:                     PUSH   DP
5634 @ 38741:                     PUSH   TMAX
5635 @ 38744:                     SUB   
5636 @ 38745:                     PUSHI  #0x00000002
5637 @ 38750:                     SUB   
5638 @ 38751:                     OR    
5639 @ 38752:                     PUSH   EXTRA
5640 @ 38755:                     PUSHI  #0x0000000b
5641 @ 38760:                     LSH   
5642 @ 38761:                     OR    
5643 @ 38762:                     ASSVAL

   604           SUBATOM=DP; TMAX=DP+1
5644 @ 38763:                     LINE   604 "regression-compile-tmp/comp412.imp"
5645 @ 38801:                     PUSH   SUBATOM
5646 @ 38804:                     PUSH   DP
5647 @ 38807:                     ASSVAL
5648 @ 38808:                     LINE   604 "regression-compile-tmp/comp412.imp"
5649 @ 38846:                     PUSH   TMAX
5650 @ 38849:                     PUSH   DP
5651 @ 38852:                     PUSHI  #0x00000001
5652 @ 38857:                     ADD   
5653 @ 38858:                     ASSVAL

   605           X=DP
5654 @ 38859:                     LINE   605 "regression-compile-tmp/comp412.imp"
5655 @ 38897:                     PUSH   X
5656 @ 38900:                     PUSH   DP
5657 @ 38903:                     ASSVAL

   606     %END
   607  
5658 @ 38904:                     LINE   606 "regression-compile-tmp/comp412.imp"
5659 @ 38942:                  END    _lev0id0_COMPILEBLOCK_ANALYSESS_DECLAREIDEN {lev=4 --> 3}

   608     %ROUTINE READ SYM
5660 @ 38943:                  LINE   608 "regression-compile-tmp/comp412.imp"
5661 @ 38981:                  DEF    READSYM (_lev0id0_COMPILEBLOCK_ANALYSESS_READSYM) p1=V_00e9 a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5662 @ 39000:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
5663 @ 39001:                     FINISH ) {lev=4}

   609        %IF SYM<32 %START
5664 @ 39002:                     LINE   609 "regression-compile-tmp/comp412.imp"
5665 @ 39040:                     PUSH   SYM
5666 @ 39043:                     PUSHI  #0x00000020
5667 @ 39048:                     JUMPIF >= L_0004

   610           LINE NUM = LINE NUM+1
5668 @ 39052:                     LINE   610 "regression-compile-tmp/comp412.imp"
5669 @ 39090:                     PUSH   LINENUM
5670 @ 39093:                     PUSH   LINENUM
5671 @ 39096:                     PUSHI  #0x00000001
5672 @ 39101:                     ADD   
5673 @ 39102:                     ASSVAL

   611           ATOM POS = 0;  POS = 0;  MARGIN = 0
5674 @ 39103:                     LINE   611 "regression-compile-tmp/comp412.imp"
5675 @ 39141:                     PUSH   ATOMPOS
5676 @ 39144:                     PUSHI  #0x00000000
5677 @ 39149:                     ASSVAL
5678 @ 39150:                     LINE   611 "regression-compile-tmp/comp412.imp"
5679 @ 39188:                     PUSH   POS
5680 @ 39191:                     PUSHI  #0x00000000
5681 @ 39196:                     ASSVAL
5682 @ 39197:                     LINE   611 "regression-compile-tmp/comp412.imp"
5683 @ 39235:                     PUSH   MARGIN
5684 @ 39238:                     PUSHI  #0x00000000
5685 @ 39243:                     ASSVAL

   612           %IF LIST = 0 %START
5686 @ 39244:                     LINE   612 "regression-compile-tmp/comp412.imp"
5687 @ 39282:                     PUSH   LIST
5688 @ 39285:                     PUSHI  #0x00000000
5689 @ 39290:                     JUMPIF # L_0007

   613              WRITE(LINE NUM, 5)
5690 @ 39294:                     LINE   613 "regression-compile-tmp/comp412.imp"
5691 @ 39332:                     PUSH   WRITE
5692 @ 39335:                     PUSH   LINENUM
5693 @ 39338:                     ASSPAR
5694 @ 39339:                     PUSHI  #0x00000005
5695 @ 39344:                     ASSPAR
5696 @ 39345:                     CALL  

   614              %IF QUOTE # 0 %THEN PRINT SYMBOL('"') %ELSE %START
5697 @ 39346:                     LINE   614 "regression-compile-tmp/comp412.imp"
5698 @ 39384:                     PUSH   QUOTE
5699 @ 39387:                     PUSHI  #0x00000000
5700 @ 39392:                     JUMPIF = L_000a
5701 @ 39396:                     PUSH   PRINTSYMBOL
5702 @ 39399:                     PUSHI  #0x00000022
5703 @ 39404:                     ASSPAR
5704 @ 39405:                     CALL  
5705 @ 39406:                     GOTO   L_0009
5706 @ 39409:                     LOCATE L_000a

   615                 PRINT SYMBOL(MARK);  MARK = ' '
5707 @ 39412:                     LINE   615 "regression-compile-tmp/comp412.imp"
5708 @ 39450:                     PUSH   PRINTSYMBOL
5709 @ 39453:                     PUSH   MARK
5710 @ 39456:                     ASSPAR
5711 @ 39457:                     CALL  
5712 @ 39458:                     LINE   615 "regression-compile-tmp/comp412.imp"
5713 @ 39496:                     PUSH   MARK
5714 @ 39499:                     PUSHI  #0x00000020
5715 @ 39504:                     ASSVAL

   616              %FINISH
5716 @ 39505:                     LINE   616 "regression-compile-tmp/comp412.imp"
5717 @ 39543:                     LOCATE L_0009

   617              SPACE
5718 @ 39546:                     LINE   617 "regression-compile-tmp/comp412.imp"
5719 @ 39584:                     PUSH   SPACE
5720 @ 39587:                     CALL  

   618           %FINISH
5721 @ 39588:                     LINE   618 "regression-compile-tmp/comp412.imp"
5722 @ 39626:                     LOCATE L_0007

   619           SYM TYPE=1
5723 @ 39629:                     LINE   619 "regression-compile-tmp/comp412.imp"
5724 @ 39667:                     PUSH   SYMTYPE
5725 @ 39670:                     PUSHI  #0x00000001
5726 @ 39675:                     ASSVAL

   620        %FINISH
5727 @ 39676:                     LINE   620 "regression-compile-tmp/comp412.imp"
5728 @ 39714:                     LOCATE L_0004

   621        %CYCLE
5729 @ 39717:                     LINE   621 "regression-compile-tmp/comp412.imp"
5730 @ 39755:                     LOCATE L_0003

   622           %CYCLE
5731 @ 39758:                     LINE   622 "regression-compile-tmp/comp412.imp"
5732 @ 39796:                     LOCATE L_0006

   623              READSYMBOL(SYM)
5733 @ 39799:                     LINE   623 "regression-compile-tmp/comp412.imp"
5734 @ 39837:                     PUSH   READSYMBOL
5735 @ 39840:                     PUSH   SYM
5736 @ 39843:                     ASSPAR
5737 @ 39844:                     CALL  

   624              %IF SYM = PAGE %START
5738 @ 39845:                     LINE   624 "regression-compile-tmp/comp412.imp"
5739 @ 39883:                     PUSH   SYM
5740 @ 39886:                     PUSHI  #0x0000000c
5741 @ 39891:                     JUMPIF # L_000a

   625                 LINES = 0 %AND %CONTINUE %IF QUOTE = 0
5742 @ 39895:                     LINE   625 "regression-compile-tmp/comp412.imp"
5743 @ 39933:                     PUSH   QUOTE
5744 @ 39936:                     PUSHI  #0x00000000
5745 @ 39941:                     JUMPIF # L_000d
5746 @ 39945:                     PUSH   LINES
5747 @ 39948:                     PUSHI  #0x00000000
5748 @ 39953:                     ASSVAL
5749 @ 39954:                     GOTO   L_0008
5750 @ 39957:                     LOCATE L_000d

   626                 LINES = PAGE SIZE
5751 @ 39960:                     LINE   626 "regression-compile-tmp/comp412.imp"
5752 @ 39998:                     PUSH   LINES
5753 @ 40001:                     PUSHI  #0x00000040
5754 @ 40006:                     ASSVAL

   627              %FINISH
5755 @ 40007:                     LINE   627 "regression-compile-tmp/comp412.imp"
5756 @ 40045:                     LOCATE L_000a

   628              PRINTSYMBOL(SYM) %IF LIST = 0
5757 @ 40048:                     LINE   628 "regression-compile-tmp/comp412.imp"
5758 @ 40086:                     PUSH   LIST
5759 @ 40089:                     PUSHI  #0x00000000
5760 @ 40094:                     JUMPIF # L_000a
5761 @ 40098:                     PUSH   PRINTSYMBOL
5762 @ 40101:                     PUSH   SYM
5763 @ 40104:                     ASSPAR
5764 @ 40105:                     CALL  
5765 @ 40106:                     LOCATE L_000a

   629              POS=POS+1 %AND LINE(POS)=SYM %UNLESS POS >= 73
5766 @ 40109:                     LINE   629 "regression-compile-tmp/comp412.imp"
5767 @ 40147:                     PUSH   POS
5768 @ 40150:                     PUSHI  #0x00000049
5769 @ 40155:                     JUMPIF >= L_000a
5770 @ 40159:                     PUSH   POS
5771 @ 40162:                     PUSH   POS
5772 @ 40165:                     PUSHI  #0x00000001
5773 @ 40170:                     ADD   
5774 @ 40171:                     ASSVAL
5775 @ 40172:                     PUSH   LINE
5776 @ 40175:                     PUSH   POS
5777 @ 40178:                     ACCESS
5778 @ 40179:                     PUSH   SYM
5779 @ 40182:                     ASSVAL
5780 @ 40183:                     LOCATE L_000a

   630              %RETURN %IF QUOTE#0
5781 @ 40186:                     LINE   630 "regression-compile-tmp/comp412.imp"
5782 @ 40224:                     PUSH   QUOTE
5783 @ 40227:                     PUSHI  #0x00000000
5784 @ 40232:                     JUMPIF = L_000a
5785 @ 40236:                     RETURN
5786 @ 40237:                     LOCATE L_000a

   631              %EXIT %IF SYM#' '
5787 @ 40240:                     LINE   631 "regression-compile-tmp/comp412.imp"
5788 @ 40278:                     PUSH   SYM
5789 @ 40281:                     PUSHI  #0x00000020
5790 @ 40286:                     JUMPIF = L_000a
5791 @ 40290:                     GOTO   L_0007
5792 @ 40293:                     LOCATE L_000a

   632              SYM TYPE=1
5793 @ 40296:                     LINE   632 "regression-compile-tmp/comp412.imp"
5794 @ 40334:                     PUSH   SYMTYPE
5795 @ 40337:                     PUSHI  #0x00000001
5796 @ 40342:                     ASSVAL

   633           %REPEAT
5797 @ 40343:                     LINE   633 "regression-compile-tmp/comp412.imp"
5798 @ 40381:                     LOCATE L_0008
5799 @ 40384:                     REPEAT L_0006
5800 @ 40387:                     LOCATE L_0007

   634           %EXIT %UNLESS SYM='%'
5801 @ 40390:                     LINE   634 "regression-compile-tmp/comp412.imp"
5802 @ 40428:                     PUSH   SYM
5803 @ 40431:                     PUSHI  #0x00000025
5804 @ 40436:                     JUMPIF = L_0007
5805 @ 40440:                     GOTO   L_0004
5806 @ 40443:                     LOCATE L_0007

   635           SYM TYPE=2
5807 @ 40446:                     LINE   635 "regression-compile-tmp/comp412.imp"
5808 @ 40484:                     PUSH   SYMTYPE
5809 @ 40487:                     PUSHI  #0x00000002
5810 @ 40492:                     ASSVAL

   636        %REPEAT
5811 @ 40493:                     LINE   636 "regression-compile-tmp/comp412.imp"
5812 @ 40531:                     REPEAT L_0003
5813 @ 40534:                     LOCATE L_0004

   637        %IF SYM<32 %THEN SYMTYPE=0 %AND MARK='+' %ELSE %START
5814 @ 40537:                     LINE   637 "regression-compile-tmp/comp412.imp"
5815 @ 40575:                     PUSH   SYM
5816 @ 40578:                     PUSHI  #0x00000020
5817 @ 40583:                     JUMPIF >= L_0004
5818 @ 40587:                     PUSH   SYMTYPE
5819 @ 40590:                     PUSHI  #0x00000000
5820 @ 40595:                     ASSVAL
5821 @ 40596:                     PUSH   MARK
5822 @ 40599:                     PUSHI  #0x0000002b
5823 @ 40604:                     ASSVAL
5824 @ 40605:                     GOTO   L_0003
5825 @ 40608:                     LOCATE L_0004

   638           SYM=SYM-32 %IF 'A'+32 <= SYM <= 'Z'+32; ! ...CONVERT LOWER CASE
5826 @ 40611:                     LINE   638 "regression-compile-tmp/comp412.imp"
5827 @ 40649:                     PUSHI  #0x00000041
5828 @ 40654:                     PUSHI  #0x00000020
5829 @ 40659:                     ADD   
5830 @ 40660:                     PUSH   SYM
5831 @ 40663:                     JUMPIFD > L_0007
5832 @ 40667:                     PUSHI  #0x0000005a
5833 @ 40672:                     PUSHI  #0x00000020
5834 @ 40677:                     ADD   
5835 @ 40678:                     JUMPIF > L_0007
5836 @ 40682:                     PUSH   SYM
5837 @ 40685:                     PUSH   SYM
5838 @ 40688:                     PUSHI  #0x00000020
5839 @ 40693:                     SUB   
5840 @ 40694:                     ASSVAL
5841 @ 40695:                     LOCATE L_0007

   639           KEY=KDICT(SYM)
5842 @ 40698:                     LINE   639 "regression-compile-tmp/comp412.imp"
5843 @ 40736:                     PUSH   KEY
5844 @ 40739:                     PUSH   KDICT
5845 @ 40742:                     PUSH   SYM
5846 @ 40745:                     ACCESS
5847 @ 40746:                     ASSVAL

   640           SYM TYPE=KEY&3-2 %UNLESS KEY&3=0 %AND SYMTYPE=2
5848 @ 40747:                     LINE   640 "regression-compile-tmp/comp412.imp"
5849 @ 40785:                     PUSH   KEY
5850 @ 40788:                     PUSHI  #0x00000003
5851 @ 40793:                     AND   
5852 @ 40794:                     PUSHI  #0x00000000
5853 @ 40799:                     JUMPIF # L_0008
5854 @ 40803:                     PUSH   SYMTYPE
5855 @ 40806:                     PUSHI  #0x00000002
5856 @ 40811:                     JUMPIF = L_0007
5857 @ 40815:                     LOCATE L_0008
5858 @ 40818:                     PUSH   SYMTYPE
5859 @ 40821:                     PUSH   KEY
5860 @ 40824:                     PUSHI  #0x00000003
5861 @ 40829:                     AND   
5862 @ 40830:                     PUSHI  #0x00000002
5863 @ 40835:                     SUB   
5864 @ 40836:                     ASSVAL
5865 @ 40837:                     LOCATE L_0007

   641        %FINISH
5866 @ 40840:                     LINE   641 "regression-compile-tmp/comp412.imp"
5867 @ 40878:                     LOCATE L_0003

   642     %END
   643  
5868 @ 40881:                     LINE   642 "regression-compile-tmp/comp412.imp"
5869 @ 40919:                  END    _lev0id0_COMPILEBLOCK_ANALYSESS_READSYM {lev=4 --> 3}

   644     %ROUTINE LOOKUP(%INTEGER P)
5870 @ 40920:                  LINE   644 "regression-compile-tmp/comp412.imp"
5871 @ 40958:                  DEF    LOOKUP (_lev0id0_COMPILEBLOCK_ANALYSESS_LOOKUP) p1=V_00ea a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5872 @ 40976:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
5873 @ 40977:                        DEF    P p1=V_00eb a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5874 @ 40990:                     FINISH ) {lev=4}

   645        %INTEGER OLD, NEW, L, DISP, D, SIZE, FIRST
5875 @ 40991:                     LINE   645 "regression-compile-tmp/comp412.imp"
5876 @ 41029:                     DEF    OLD p1=V_00ec a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5877 @ 41044:                     DEF    NEW p1=V_00ed a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5878 @ 41059:                     DEF    L p1=V_00ee a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5879 @ 41072:                     DEF    DISP p1=V_00ef a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5880 @ 41088:                     DEF    D p1=V_00f0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5881 @ 41101:                     DEF    SIZE p1=V_00f1 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
5882 @ 41117:                     DEF    FIRST p1=V_00f2 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   646        COUNT=0;  SIZE = DP-TMAX+1;  FIRST = DICT(T MAX)
5883 @ 41134:                     LINE   646 "regression-compile-tmp/comp412.imp"
5884 @ 41172:                     PUSH   COUNT
5885 @ 41175:                     PUSHI  #0x00000000
5886 @ 41180:                     ASSVAL
5887 @ 41181:                     LINE   646 "regression-compile-tmp/comp412.imp"
5888 @ 41219:                     PUSH   SIZE
5889 @ 41222:                     PUSH   DP
5890 @ 41225:                     PUSH   TMAX
5891 @ 41228:                     SUB   
5892 @ 41229:                     PUSHI  #0x00000001
5893 @ 41234:                     ADD   
5894 @ 41235:                     ASSVAL
5895 @ 41236:                     LINE   646 "regression-compile-tmp/comp412.imp"
5896 @ 41274:                     PUSH   FIRST
5897 @ 41277:                     PUSH   DICT
5898 @ 41280:                     PUSH   TMAX
5899 @ 41283:                     ACCESS
5900 @ 41284:                     ASSVAL

   647        %WHILE P > LIM %CYCLE
5901 @ 41285:                     LINE   647 "regression-compile-tmp/comp412.imp"
5902 @ 41323:                     LOCATE L_0003
5903 @ 41326:                     PUSH   P
5904 @ 41329:                     PUSH   LIM
5905 @ 41332:                     JUMPIF <= L_0004

   648           COUNT = COUNT-1
5906 @ 41336:                     LINE   648 "regression-compile-tmp/comp412.imp"
5907 @ 41374:                     PUSH   COUNT
5908 @ 41377:                     PUSH   COUNT
5909 @ 41380:                     PUSHI  #0x00000001
5910 @ 41385:                     SUB   
5911 @ 41386:                     ASSVAL

   649           P=P-1
5912 @ 41387:                     LINE   649 "regression-compile-tmp/comp412.imp"
5913 @ 41425:                     PUSH   P
5914 @ 41428:                     PUSH   P
5915 @ 41431:                     PUSHI  #0x00000001
5916 @ 41436:                     SUB   
5917 @ 41437:                     ASSVAL

   650           D=DICT(P)
5918 @ 41438:                     LINE   650 "regression-compile-tmp/comp412.imp"
5919 @ 41476:                     PUSH   D
5920 @ 41479:                     PUSH   DICT
5921 @ 41482:                     PUSH   P
5922 @ 41485:                     ACCESS
5923 @ 41486:                     ASSVAL

   651           DISP=D&255+2
5924 @ 41487:                     LINE   651 "regression-compile-tmp/comp412.imp"
5925 @ 41525:                     PUSH   DISP
5926 @ 41528:                     PUSH   D
5927 @ 41531:                     PUSHI  #0x000000ff
5928 @ 41536:                     AND   
5929 @ 41537:                     PUSHI  #0x00000002
5930 @ 41542:                     ADD   
5931 @ 41543:                     ASSVAL

   652           L=D>>11&3; OLD=P-DISP; X=P; P=OLD
5932 @ 41544:                     LINE   652 "regression-compile-tmp/comp412.imp"
5933 @ 41582:                     PUSH   L
5934 @ 41585:                     PUSH   D
5935 @ 41588:                     PUSHI  #0x0000000b
5936 @ 41593:                     RSH   
5937 @ 41594:                     PUSHI  #0x00000003
5938 @ 41599:                     AND   
5939 @ 41600:                     ASSVAL
5940 @ 41601:                     LINE   652 "regression-compile-tmp/comp412.imp"
5941 @ 41639:                     PUSH   OLD
5942 @ 41642:                     PUSH   P
5943 @ 41645:                     PUSH   DISP
5944 @ 41648:                     SUB   
5945 @ 41649:                     ASSVAL
5946 @ 41650:                     LINE   652 "regression-compile-tmp/comp412.imp"
5947 @ 41688:                     PUSH   X
5948 @ 41691:                     PUSH   P
5949 @ 41694:                     ASSVAL
5950 @ 41695:                     LINE   652 "regression-compile-tmp/comp412.imp"
5951 @ 41733:                     PUSH   P
5952 @ 41736:                     PUSH   OLD
5953 @ 41739:                     ASSVAL

   653           %IF SIZE+L-DISP=0 %AND DICT(OLD) = FIRST %START
5954 @ 41740:                     LINE   653 "regression-compile-tmp/comp412.imp"
5955 @ 41778:                     PUSH   SIZE
5956 @ 41781:                     PUSH   L
5957 @ 41784:                     ADD   
5958 @ 41785:                     PUSH   DISP
5959 @ 41788:                     SUB   
5960 @ 41789:                     PUSHI  #0x00000000
5961 @ 41794:                     JUMPIF # L_0007
5962 @ 41798:                     PUSH   DICT
5963 @ 41801:                     PUSH   OLD
5964 @ 41804:                     ACCESS
5965 @ 41805:                     PUSH   FIRST
5966 @ 41808:                     JUMPIF # L_0007

   654              NEW=T MAX
5967 @ 41812:                     LINE   654 "regression-compile-tmp/comp412.imp"
5968 @ 41850:                     PUSH   NEW
5969 @ 41853:                     PUSH   TMAX
5970 @ 41856:                     ASSVAL

   655              %CYCLE
5971 @ 41857:                     LINE   655 "regression-compile-tmp/comp412.imp"
5972 @ 41895:                     LOCATE L_0009

   656                 NEW = NEW+1;  OLD = OLD+1
5973 @ 41898:                     LINE   656 "regression-compile-tmp/comp412.imp"
5974 @ 41936:                     PUSH   NEW
5975 @ 41939:                     PUSH   NEW
5976 @ 41942:                     PUSHI  #0x00000001
5977 @ 41947:                     ADD   
5978 @ 41948:                     ASSVAL
5979 @ 41949:                     LINE   656 "regression-compile-tmp/comp412.imp"
5980 @ 41987:                     PUSH   OLD
5981 @ 41990:                     PUSH   OLD
5982 @ 41993:                     PUSHI  #0x00000001
5983 @ 41998:                     ADD   
5984 @ 41999:                     ASSVAL

   657                 %IF NEW=DP %START;           ! FOUND IT
5985 @ 42000:                     LINE   657 "regression-compile-tmp/comp412.imp"
5986 @ 42038:                     PUSH   NEW
5987 @ 42041:                     PUSH   DP
5988 @ 42044:                     JUMPIF # L_000d

   658                    O TYPE = D>>13
5989 @ 42048:                     LINE   658 "regression-compile-tmp/comp412.imp"
5990 @ 42086:                     PUSH   OTYPE
5991 @ 42089:                     PUSH   D
5992 @ 42092:                     PUSHI  #0x0000000d
5993 @ 42097:                     RSH   
5994 @ 42098:                     ASSVAL

   659                    TAG = DICT(X-1)
5995 @ 42099:                     LINE   659 "regression-compile-tmp/comp412.imp"
5996 @ 42137:                     PUSH   TAG
5997 @ 42140:                     PUSH   DICT
5998 @ 42143:                     PUSH   X
5999 @ 42146:                     PUSHI  #0x00000001
6000 @ 42151:                     SUB   
6001 @ 42152:                     ACCESS
6002 @ 42153:                     ASSVAL

   660                    ATOM2=CMAP(TAG&15);       ! FORM -> CLASS
6003 @ 42154:                     LINE   660 "regression-compile-tmp/comp412.imp"
6004 @ 42192:                     PUSH   ATOM2
6005 @ 42195:                     PUSH   CMAP
6006 @ 42198:                     PUSH   TAG
6007 @ 42201:                     PUSHI  #0x0000000f
6008 @ 42206:                     AND   
6009 @ 42207:                     ACCESS
6010 @ 42208:                     ASSVAL

   661                    SUB ATOM=X; VAR TYPE=TAG>>4&7
6011 @ 42209:                     LINE   661 "regression-compile-tmp/comp412.imp"
6012 @ 42247:                     PUSH   SUBATOM
6013 @ 42250:                     PUSH   X
6014 @ 42253:                     ASSVAL
6015 @ 42254:                     LINE   661 "regression-compile-tmp/comp412.imp"
6016 @ 42292:                     PUSH   VARTYPE
6017 @ 42295:                     PUSH   TAG
6018 @ 42298:                     PUSHI  #0x00000004
6019 @ 42303:                     RSH   
6020 @ 42304:                     PUSHI  #0x00000007
6021 @ 42309:                     AND   
6022 @ 42310:                     ASSVAL

   662                    ATOM2 = 66 %IF VARTYPE = 0 %AND ATOM2 = 68
6023 @ 42311:                     LINE   662 "regression-compile-tmp/comp412.imp"
6024 @ 42349:                     PUSH   VARTYPE
6025 @ 42352:                     PUSHI  #0x00000000
6026 @ 42357:                     JUMPIF # L_0010
6027 @ 42361:                     PUSH   ATOM2
6028 @ 42364:                     PUSHI  #0x00000044
6029 @ 42369:                     JUMPIF # L_0010
6030 @ 42373:                     PUSH   ATOM2
6031 @ 42376:                     PUSHI  #0x00000042
6032 @ 42381:                     ASSVAL
6033 @ 42382:                     LOCATE L_0010

   663                    ATOM1 = ATOM2 %AND SUBATOM = -OLD %IF ATOM2 = ICONST
6034 @ 42385:                     LINE   663 "regression-compile-tmp/comp412.imp"
6035 @ 42423:                     PUSH   ATOM2
6036 @ 42426:                     PUSHI  #0x00000053
6037 @ 42431:                     JUMPIF # L_0010
6038 @ 42435:                     PUSH   ATOM1
6039 @ 42438:                     PUSH   ATOM2
6040 @ 42441:                     ASSVAL
6041 @ 42442:                     PUSH   SUBATOM
6042 @ 42445:                     PUSH   OLD
6043 @ 42448:                     NEGATE
6044 @ 42449:                     ASSVAL
6045 @ 42450:                     LOCATE L_0010

   664                    %IF D&256#0 %START;       ! SET APP
6046 @ 42453:                     LINE   664 "regression-compile-tmp/comp412.imp"
6047 @ 42491:                     PUSH   D
6048 @ 42494:                     PUSHI  #0x00000100
6049 @ 42499:                     AND   
6050 @ 42500:                     PUSHI  #0x00000000
6051 @ 42505:                     JUMPIF = L_0010

   665                       PAPP=|DICT(OLD)|
6052 @ 42509:                     LINE   665 "regression-compile-tmp/comp412.imp"
6053 @ 42547:                     PUSH   PAPP
6054 @ 42550:                     PUSH   DICT
6055 @ 42553:                     PUSH   OLD
6056 @ 42556:                     ACCESS
6057 @ 42557:                     MOD   
6058 @ 42558:                     ASSVAL

   666                       %IF PAPP=0 %START
6059 @ 42559:                     LINE   666 "regression-compile-tmp/comp412.imp"
6060 @ 42597:                     PUSH   PAPP
6061 @ 42600:                     PUSHI  #0x00000000
6062 @ 42605:                     JUMPIF # L_0013

   667                          %IF 11 <= TAG&15 <= 12 %START
6063 @ 42609:                     LINE   667 "regression-compile-tmp/comp412.imp"
6064 @ 42647:                     PUSHI  #0x0000000b
6065 @ 42652:                     PUSH   TAG
6066 @ 42655:                     PUSHI  #0x0000000f
6067 @ 42660:                     AND   
6068 @ 42661:                     JUMPIFD > L_0016
6069 @ 42665:                     PUSHI  #0x0000000c
6070 @ 42670:                     JUMPIF > L_0016

   668                             PAPP=PHRASE(ANAPP)
6071 @ 42674:                     LINE   668 "regression-compile-tmp/comp412.imp"
6072 @ 42712:                     PUSH   PAPP
6073 @ 42715:                     PUSH   PHRASE
6074 @ 42718:                     PUSHI  #0x000000a0
6075 @ 42723:                     ACCESS
6076 @ 42724:                     ASSVAL

   669                             APARM=OLD<<3+1;  ! 1 DIMEN
6077 @ 42725:                     LINE   669 "regression-compile-tmp/comp412.imp"
6078 @ 42763:                     PUSH   APARM
6079 @ 42766:                     PUSH   OLD
6080 @ 42769:                     PUSHI  #0x00000003
6081 @ 42774:                     LSH   
6082 @ 42775:                     PUSHI  #0x00000001
6083 @ 42780:                     ADD   
6084 @ 42781:                     ASSVAL

   670                          %ELSE
6085 @ 42782:                     LINE   670 "regression-compile-tmp/comp412.imp"
6086 @ 42820:                     GOTO   L_0015
6087 @ 42823:                     LOCATE L_0016

   671                             F TYPE=8
6088 @ 42826:                     LINE   671 "regression-compile-tmp/comp412.imp"
6089 @ 42864:                     PUSH   FTYPE
6090 @ 42867:                     PUSHI  #0x00000008
6091 @ 42872:                     ASSVAL

   672                             %RETURN %IF SPEC < 0
6092 @ 42873:                     LINE   672 "regression-compile-tmp/comp412.imp"
6093 @ 42911:                     PUSH   SPEC
6094 @ 42914:                     PUSHI  #0x00000000
6095 @ 42919:                     JUMPIF >= L_0019
6096 @ 42923:                     RETURN
6097 @ 42924:                     LOCATE L_0019

   673                             ATOM1=0; ATOM2=0
6098 @ 42927:                     LINE   673 "regression-compile-tmp/comp412.imp"
6099 @ 42965:                     PUSH   ATOM1
6100 @ 42968:                     PUSHI  #0x00000000
6101 @ 42973:                     ASSVAL
6102 @ 42974:                     LINE   673 "regression-compile-tmp/comp412.imp"
6103 @ 43012:                     PUSH   ATOM2
6104 @ 43015:                     PUSHI  #0x00000000
6105 @ 43020:                     ASSVAL

   674                          %FINISH
6106 @ 43021:                     LINE   674 "regression-compile-tmp/comp412.imp"
6107 @ 43059:                     LOCATE L_0015

   675                       %FINISH
6108 @ 43062:                     LINE   675 "regression-compile-tmp/comp412.imp"
6109 @ 43100:                     LOCATE L_0013

   676                       OLD=OLD+1
6110 @ 43103:                     LINE   676 "regression-compile-tmp/comp412.imp"
6111 @ 43141:                     PUSH   OLD
6112 @ 43144:                     PUSH   OLD
6113 @ 43147:                     PUSHI  #0x00000001
6114 @ 43152:                     ADD   
6115 @ 43153:                     ASSVAL

   677                    %FINISH %ELSE PAPP=APP;   ! DEFAULT APP
6116 @ 43154:                     LINE   677 "regression-compile-tmp/comp412.imp"
6117 @ 43192:                     GOTO   L_000f
6118 @ 43195:                     LOCATE L_0010
6119 @ 43198:                     PUSH   PAPP
6120 @ 43201:                     PUSH   APP
6121 @ 43204:                     ASSVAL
6122 @ 43205:                     LOCATE L_000f

   678                    FORMAT=0
6123 @ 43208:                     LINE   678 "regression-compile-tmp/comp412.imp"
6124 @ 43246:                     PUSH   FORMAT
6125 @ 43249:                     PUSHI  #0x00000000
6126 @ 43254:                     ASSVAL

   679                    %IF D&512#0 %START
6127 @ 43255:                     LINE   679 "regression-compile-tmp/comp412.imp"
6128 @ 43293:                     PUSH   D
6129 @ 43296:                     PUSHI  #0x00000200
6130 @ 43301:                     AND   
6131 @ 43302:                     PUSHI  #0x00000000
6132 @ 43307:                     JUMPIF = L_0010

   680                       %IF ATOM2=RFN %THEN FORMAT=SUBATOM %ELSE %START
6133 @ 43311:                     LINE   680 "regression-compile-tmp/comp412.imp"
6134 @ 43349:                     PUSH   ATOM2
6135 @ 43352:                     PUSHI  #0x00000041
6136 @ 43357:                     JUMPIF # L_0013
6137 @ 43361:                     PUSH   FORMAT
6138 @ 43364:                     PUSH   SUBATOM
6139 @ 43367:                     ASSVAL
6140 @ 43368:                     GOTO   L_0012
6141 @ 43371:                     LOCATE L_0013

   681                          FORMAT=DICT(DICT(OLD)-2)
6142 @ 43374:                     LINE   681 "regression-compile-tmp/comp412.imp"
6143 @ 43412:                     PUSH   FORMAT
6144 @ 43415:                     PUSH   DICT
6145 @ 43418:                     PUSH   DICT
6146 @ 43421:                     PUSH   OLD
6147 @ 43424:                     ACCESS
6148 @ 43425:                     PUSHI  #0x00000002
6149 @ 43430:                     SUB   
6150 @ 43431:                     ACCESS
6151 @ 43432:                     ASSVAL

   682                          ATOM2=ATOM2+7
6152 @ 43433:                     LINE   682 "regression-compile-tmp/comp412.imp"
6153 @ 43471:                     PUSH   ATOM2
6154 @ 43474:                     PUSH   ATOM2
6155 @ 43477:                     PUSHI  #0x00000007
6156 @ 43482:                     ADD   
6157 @ 43483:                     ASSVAL

   683                       %FINISH
6158 @ 43484:                     LINE   683 "regression-compile-tmp/comp412.imp"
6159 @ 43522:                     LOCATE L_0012

   684                    %FINISH
6160 @ 43525:                     LINE   684 "regression-compile-tmp/comp412.imp"
6161 @ 43563:                     LOCATE L_0010

   685                    DICT(X-1)=DICT(X-1)!128 %UNLESS SPEC < 0
6162 @ 43566:                     LINE   685 "regression-compile-tmp/comp412.imp"
6163 @ 43604:                     PUSH   SPEC
6164 @ 43607:                     PUSHI  #0x00000000
6165 @ 43612:                     JUMPIF < L_0010
6166 @ 43616:                     PUSH   DICT
6167 @ 43619:                     PUSH   X
6168 @ 43622:                     PUSHI  #0x00000001
6169 @ 43627:                     SUB   
6170 @ 43628:                     ACCESS
6171 @ 43629:                     PUSH   DICT
6172 @ 43632:                     PUSH   X
6173 @ 43635:                     PUSHI  #0x00000001
6174 @ 43640:                     SUB   
6175 @ 43641:                     ACCESS
6176 @ 43642:                     PUSHI  #0x00000080
6177 @ 43647:                     OR    
6178 @ 43648:                     ASSVAL
6179 @ 43649:                     LOCATE L_0010

   686                    SUBATOM=COUNT %IF LIM > T MAX
6180 @ 43652:                     LINE   686 "regression-compile-tmp/comp412.imp"
6181 @ 43690:                     PUSH   LIM
6182 @ 43693:                     PUSH   TMAX
6183 @ 43696:                     JUMPIF <= L_0010
6184 @ 43700:                     PUSH   SUBATOM
6185 @ 43703:                     PUSH   COUNT
6186 @ 43706:                     ASSVAL
6187 @ 43707:                     LOCATE L_0010

   687                    %RETURN
6188 @ 43710:                     LINE   687 "regression-compile-tmp/comp412.imp"
6189 @ 43748:                     RETURN

   688                 %FINISH
6190 @ 43749:                     LINE   688 "regression-compile-tmp/comp412.imp"
6191 @ 43787:                     LOCATE L_000d

   689                 %EXIT %IF DICT(NEW) # DICT(OLD)
6192 @ 43790:                     LINE   689 "regression-compile-tmp/comp412.imp"
6193 @ 43828:                     PUSH   DICT
6194 @ 43831:                     PUSH   NEW
6195 @ 43834:                     ACCESS
6196 @ 43835:                     PUSH   DICT
6197 @ 43838:                     PUSH   OLD
6198 @ 43841:                     ACCESS
6199 @ 43842:                     JUMPIF = L_000d
6200 @ 43846:                     GOTO   L_000a
6201 @ 43849:                     LOCATE L_000d

   690              %REPEAT
6202 @ 43852:                     LINE   690 "regression-compile-tmp/comp412.imp"
6203 @ 43890:                     REPEAT L_0009
6204 @ 43893:                     LOCATE L_000a

   691           %FINISH
6205 @ 43896:                     LINE   691 "regression-compile-tmp/comp412.imp"
6206 @ 43934:                     LOCATE L_0007

   692        %REPEAT
6207 @ 43937:                     LINE   692 "regression-compile-tmp/comp412.imp"
6208 @ 43975:                     REPEAT L_0003
6209 @ 43978:                     LOCATE L_0004

   693     %END
   694  
6210 @ 43981:                     LINE   693 "regression-compile-tmp/comp412.imp"
6211 @ 44019:                  END    _lev0id0_COMPILEBLOCK_ANALYSESS_LOOKUP {lev=4 --> 3}

   695     %ROUTINE CODE DIGIT
6212 @ 44020:                  LINE   695 "regression-compile-tmp/comp412.imp"
6213 @ 44058:                  DEF    CODEDIGIT (_lev0id0_COMPILEBLOCK_ANALYSESS_CODEDIGIT) p1=V_00eb a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
6214 @ 44079:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
6215 @ 44080:                     FINISH ) {lev=4}

   696        %IF LIMIT=0 %START;                  ! MULTI CHAR
6216 @ 44081:                     LINE   696 "regression-compile-tmp/comp412.imp"
6217 @ 44119:                     PUSH   LIMIT
6218 @ 44122:                     PUSHI  #0x00000000
6219 @ 44127:                     JUMPIF # L_0004

   697           DIGIT = SYM
6220 @ 44131:                     LINE   697 "regression-compile-tmp/comp412.imp"
6221 @ 44169:                     PUSH   DIGIT
6222 @ 44172:                     PUSH   SYM
6223 @ 44175:                     ASSVAL

   698           %IF DIGIT = '''' %START
6224 @ 44176:                     LINE   698 "regression-compile-tmp/comp412.imp"
6225 @ 44214:                     PUSH   DIGIT
6226 @ 44217:                     PUSHI  #0x00000027
6227 @ 44222:                     JUMPIF # L_0007

   699              QUOTE = 0
6228 @ 44226:                     LINE   699 "regression-compile-tmp/comp412.imp"
6229 @ 44264:                     PUSH   QUOTE
6230 @ 44267:                     PUSHI  #0x00000000
6231 @ 44272:                     ASSVAL

   700              READSYM
6232 @ 44273:                     LINE   700 "regression-compile-tmp/comp412.imp"
6233 @ 44311:                     PUSH   READSYM
6234 @ 44314:                     CALL  

   701              DIGIT = -1 %AND %RETURN %UNLESS SYM = ''''
6235 @ 44315:                     LINE   701 "regression-compile-tmp/comp412.imp"
6236 @ 44353:                     PUSH   SYM
6237 @ 44356:                     PUSHI  #0x00000027
6238 @ 44361:                     JUMPIF = L_000a
6239 @ 44365:                     PUSH   DIGIT
6240 @ 44368:                     PUSHI  #0x00000001
6241 @ 44373:                     NEGATE
6242 @ 44374:                     ASSVAL
6243 @ 44375:                     RETURN
6244 @ 44376:                     LOCATE L_000a

   702              QUOTE = 1
6245 @ 44379:                     LINE   702 "regression-compile-tmp/comp412.imp"
6246 @ 44417:                     PUSH   QUOTE
6247 @ 44420:                     PUSHI  #0x00000001
6248 @ 44425:                     ASSVAL

   703           %FINISH
6249 @ 44426:                     LINE   703 "regression-compile-tmp/comp412.imp"
6250 @ 44464:                     LOCATE L_0007

   704           READSYM
6251 @ 44467:                     LINE   704 "regression-compile-tmp/comp412.imp"
6252 @ 44505:                     PUSH   READSYM
6253 @ 44508:                     CALL  

   705        %ELSE
6254 @ 44509:                     LINE   705 "regression-compile-tmp/comp412.imp"
6255 @ 44547:                     GOTO   L_0003
6256 @ 44550:                     LOCATE L_0004

   706           %IF '0' <= SYM <= '9' %OR 'A' <= SYM <= 'F' %START
6257 @ 44553:                     LINE   706 "regression-compile-tmp/comp412.imp"
6258 @ 44591:                     PUSHI  #0x00000030
6259 @ 44596:                     PUSH   SYM
6260 @ 44599:                     JUMPIFD > L_0009
6261 @ 44603:                     PUSHI  #0x00000039
6262 @ 44608:                     JUMPIF <= L_0008
6263 @ 44612:                     LOCATE L_0009
6264 @ 44615:                     PUSHI  #0x00000041
6265 @ 44620:                     PUSH   SYM
6266 @ 44623:                     JUMPIFD > L_0007
6267 @ 44627:                     PUSHI  #0x00000046
6268 @ 44632:                     JUMPIF > L_0007
6269 @ 44636:                     LOCATE L_0008

   707              %IF SYM <= '9' %THEN DIGIT = SYM-'0' %C
   708                             %ELSE DIGIT = SYM-'A'+10
6270 @ 44639:                     LINE   707 "regression-compile-tmp/comp412.imp"
6271 @ 44677:                     PUSH   SYM
6272 @ 44680:                     PUSHI  #0x00000039
6273 @ 44685:                     JUMPIF > L_000a
6274 @ 44689:                     PUSH   DIGIT
6275 @ 44692:                     PUSH   SYM
6276 @ 44695:                     PUSHI  #0x00000030
6277 @ 44700:                     SUB   
6278 @ 44701:                     ASSVAL
6279 @ 44702:                     GOTO   L_0009
6280 @ 44705:                     LOCATE L_000a
6281 @ 44708:                     PUSH   DIGIT
6282 @ 44711:                     PUSH   SYM
6283 @ 44714:                     PUSHI  #0x00000041
6284 @ 44719:                     SUB   
6285 @ 44720:                     PUSHI  #0x0000000a
6286 @ 44725:                     ADD   
6287 @ 44726:                     ASSVAL
6288 @ 44727:                     LOCATE L_0009

   709                 %IF DIGIT <= LIMIT %START
6289 @ 44730:                     LINE   709 "regression-compile-tmp/comp412.imp"
6290 @ 44768:                     PUSH   DIGIT
6291 @ 44771:                     PUSH   LIMIT
6292 @ 44774:                     JUMPIF > L_000a

   710                    DIGIT = DIGIT+'A'
6293 @ 44778:                     LINE   710 "regression-compile-tmp/comp412.imp"
6294 @ 44816:                     PUSH   DIGIT
6295 @ 44819:                     PUSH   DIGIT
6296 @ 44822:                     PUSHI  #0x00000041
6297 @ 44827:                     ADD   
6298 @ 44828:                     ASSVAL

   711                    READ SYM
6299 @ 44829:                     LINE   711 "regression-compile-tmp/comp412.imp"
6300 @ 44867:                     PUSH   READSYM
6301 @ 44870:                     CALL  

   712                    %RETURN
6302 @ 44871:                     LINE   712 "regression-compile-tmp/comp412.imp"
6303 @ 44909:                     RETURN

   713                 %FINISH
6304 @ 44910:                     LINE   713 "regression-compile-tmp/comp412.imp"
6305 @ 44948:                     LOCATE L_000a

   714           %FINISH
6306 @ 44951:                     LINE   714 "regression-compile-tmp/comp412.imp"
6307 @ 44989:                     LOCATE L_0007

   715           DIGIT=0;  QUOTE=0
6308 @ 44992:                     LINE   715 "regression-compile-tmp/comp412.imp"
6309 @ 45030:                     PUSH   DIGIT
6310 @ 45033:                     PUSHI  #0x00000000
6311 @ 45038:                     ASSVAL
6312 @ 45039:                     LINE   715 "regression-compile-tmp/comp412.imp"
6313 @ 45077:                     PUSH   QUOTE
6314 @ 45080:                     PUSHI  #0x00000000
6315 @ 45085:                     ASSVAL

   716           %IF SYM='''' %START
6316 @ 45086:                     LINE   716 "regression-compile-tmp/comp412.imp"
6317 @ 45124:                     PUSH   SYM
6318 @ 45127:                     PUSHI  #0x00000027
6319 @ 45132:                     JUMPIF # L_0007

   717              %IF LIMIT # 9 %START
6320 @ 45136:                     LINE   717 "regression-compile-tmp/comp412.imp"
6321 @ 45174:                     PUSH   LIMIT
6322 @ 45177:                     PUSHI  #0x00000009
6323 @ 45182:                     JUMPIF = L_000a

   718                 DIGIT = -1;  READSYM
6324 @ 45186:                     LINE   718 "regression-compile-tmp/comp412.imp"
6325 @ 45224:                     PUSH   DIGIT
6326 @ 45227:                     PUSHI  #0x00000001
6327 @ 45232:                     NEGATE
6328 @ 45233:                     ASSVAL
6329 @ 45234:                     LINE   718 "regression-compile-tmp/comp412.imp"
6330 @ 45272:                     PUSH   READSYM
6331 @ 45275:                     CALL  

   719              %FINISH
6332 @ 45276:                     LINE   719 "regression-compile-tmp/comp412.imp"
6333 @ 45314:                     LOCATE L_000a

   720           %FINISH
6334 @ 45317:                     LINE   720 "regression-compile-tmp/comp412.imp"
6335 @ 45355:                     LOCATE L_0007

   721        %FINISH
6336 @ 45358:                     LINE   721 "regression-compile-tmp/comp412.imp"
6337 @ 45396:                     LOCATE L_0003

   722     %END
   723  
6338 @ 45399:                     LINE   722 "regression-compile-tmp/comp412.imp"
6339 @ 45437:                  END    _lev0id0_COMPILEBLOCK_ANALYSESS_CODEDIGIT {lev=4 --> 3}

   724     %ROUTINE CODE ATOM
6340 @ 45438:                  LINE   724 "regression-compile-tmp/comp412.imp"
6341 @ 45476:                  DEF    CODEATOM (_lev0id0_COMPILEBLOCK_ANALYSESS_CODEATOM) p1=V_00ec a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
6342 @ 45496:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
6343 @ 45497:                     FINISH ) {lev=4}

   725        %INTEGER TP
6344 @ 45498:                     LINE   725 "regression-compile-tmp/comp412.imp"
6345 @ 45536:                     DEF    TP p1=V_00ed a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   726        %ROUTINE TPUT(%INTEGER S)
6346 @ 45550:                     LINE   726 "regression-compile-tmp/comp412.imp"
6347 @ 45588:                     DEF    TPUT (_lev0id0_COMPILEBLOCK_ANALYSESS_CODEATOM_TPUT) p1=V_00ee a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
6348 @ 45604:                        START  ( FORMAL PARAMETERS  {lev=5 --> 6, nested=0 --> 1}
6349 @ 45605:                           DEF    S p1=V_00ef a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
6350 @ 45618:                        FINISH ) {lev=5}

   727           POS = 0 %IF S < 32
6351 @ 45619:                        LINE   727 "regression-compile-tmp/comp412.imp"
6352 @ 45657:                        PUSH   S
6353 @ 45660:                        PUSHI  #0x00000020
6354 @ 45665:                        JUMPIF >= L_0004
6355 @ 45669:                        PUSH   POS
6356 @ 45672:                        PUSHI  #0x00000000
6357 @ 45677:                        ASSVAL
6358 @ 45678:                        LOCATE L_0004

   728           FAULT(20) %IF TP = TEXT LIMIT
6359 @ 45681:                        LINE   728 "regression-compile-tmp/comp412.imp"
6360 @ 45719:                        PUSH   TP
6361 @ 45722:                        PUSHI  #0x000000ff
6362 @ 45727:                        JUMPIF # L_0004
6363 @ 45731:                        PUSH   FAULT
6364 @ 45734:                        PUSHI  #0x00000014
6365 @ 45739:                        ASSPAR
6366 @ 45740:                        CALL  
6367 @ 45741:                        LOCATE L_0004

   729           TP = TP+1;  BUFFER(LITPOS-TP) = S
6368 @ 45744:                        LINE   729 "regression-compile-tmp/comp412.imp"
6369 @ 45782:                        PUSH   TP
6370 @ 45785:                        PUSH   TP
6371 @ 45788:                        PUSHI  #0x00000001
6372 @ 45793:                        ADD   
6373 @ 45794:                        ASSVAL
6374 @ 45795:                        LINE   729 "regression-compile-tmp/comp412.imp"
6375 @ 45833:                        PUSH   BUFFER
6376 @ 45836:                        PUSH   LITPOS
6377 @ 45839:                        PUSH   TP
6378 @ 45842:                        SUB   
6379 @ 45843:                        ACCESS
6380 @ 45844:                        PUSH   S
6381 @ 45847:                        ASSVAL

   730        %END
6382 @ 45848:                        LINE   730 "regression-compile-tmp/comp412.imp"
6383 @ 45886:                     END    _lev0id0_COMPILEBLOCK_ANALYSESS_CODEATOM_TPUT {lev=5 --> 4}

   731        %INTEGERNAME SS
6384 @ 45887:                     LINE   731 "regression-compile-tmp/comp412.imp"
6385 @ 45925:                     DEF    SS p1=V_00ef a/tf=12 b/format=1 c/ostate=0  type=1 (integer) form=2 (name) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   732        %INTEGER DTYPE, XTYPE, SRMOD, SLEN, PREFIX
6386 @ 45939:                     LINE   732 "regression-compile-tmp/comp412.imp"
6387 @ 45977:                     DEF    DTYPE p1=V_00f0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
6388 @ 45994:                     DEF    XTYPE p1=V_00f1 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
6389 @ 46011:                     DEF    SRMOD p1=V_00f2 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
6390 @ 46028:                     DEF    SLEN p1=V_00f3 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
6391 @ 46044:                     DEF    PREFIX p1=V_00f4 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   733        %INTEGER J, K, L, S, LP
6392 @ 46062:                     LINE   733 "regression-compile-tmp/comp412.imp"
6393 @ 46100:                     DEF    J p1=V_00f5 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
6394 @ 46113:                     DEF    K p1=V_00f6 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
6395 @ 46126:                     DEF    L p1=V_00f7 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
6396 @ 46139:                     DEF    S p1=V_00f8 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
6397 @ 46152:                     DEF    LP p1=V_00f9 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   734        %CONSTBYTEINTEGERARRAY BASE SYM(1 : 4)= 'X', 'M', 'B', 'K'
6398 @ 46166:                     LINE   734 "regression-compile-tmp/comp412.imp"
6399 @ 46204:                     PUSHI  #0x00000001
6400 @ 46209:                     PUSHI  #0x00000004
6401 @ 46214:                     BOUNDS
6402 @ 46215:                     DEF    BASESYM p1=V_00fa a/tf=1b b/format=2 c/ostate=112  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
6403 @ 46234:                     PUSHI  #0x00000058
6404 @ 46239:                     INIT   1
6405 @ 46242:                     PUSHI  #0x0000004d
6406 @ 46247:                     INIT   1
6407 @ 46250:                     PUSHI  #0x00000042
6408 @ 46255:                     INIT   1
6409 @ 46258:                     PUSHI  #0x0000004b
6410 @ 46263:                     INIT   1

   735        %CONSTSHORTINTEGERARRAY BASE INF(1:4)=
   736                                          X'590F',X'5800',X'5701',X'5607'
6411 @ 46266:                     LINE   735 "regression-compile-tmp/comp412.imp"
6412 @ 46304:                     PUSHI  #0x00000001
6413 @ 46309:                     PUSHI  #0x00000004
6414 @ 46314:                     BOUNDS
6415 @ 46315:                     DEF    BASEINF p1=V_00fb a/tf=1b b/format=3 c/ostate=112  type=1 (integer) form=11 (array) special=2 (short-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
6416 @ 46334:                     PUSHI  #0x0000590f
6417 @ 46339:                     INIT   1
6418 @ 46342:                     PUSHI  #0x00005800
6419 @ 46347:                     INIT   1
6420 @ 46350:                     PUSHI  #0x00005701
6421 @ 46355:                     INIT   1
6422 @ 46358:                     PUSHI  #0x00005607
6423 @ 46363:                     INIT   1

   737        %CONSTSHORTINTEGER SPS=117;          ! START OF SPEC SUB
6424 @ 46366:                     LINE   737 "regression-compile-tmp/comp412.imp"

   738        %CONSTBYTEINTEGERARRAY SPEC SUB(SPS : 127)=%C
   739                                      8,9,10,7,105,104,25,24,72,73,1
6425 @ 46404:                     LINE   738 "regression-compile-tmp/comp412.imp"
6426 @ 46442:                     PUSHI  #0x00000075
6427 @ 46447:                     PUSHI  #0x0000007f
6428 @ 46452:                     BOUNDS
6429 @ 46453:                     DEF    SPECSUB p1=V_00fc a/tf=1b b/format=2 c/ostate=112  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
6430 @ 46472:                     PUSHI  #0x00000008
6431 @ 46477:                     INIT   1
6432 @ 46480:                     PUSHI  #0x00000009
6433 @ 46485:                     INIT   1
6434 @ 46488:                     PUSHI  #0x0000000a
6435 @ 46493:                     INIT   1
6436 @ 46496:                     PUSHI  #0x00000007
6437 @ 46501:                     INIT   1
6438 @ 46504:                     PUSHI  #0x00000069
6439 @ 46509:                     INIT   1
6440 @ 46512:                     PUSHI  #0x00000068
6441 @ 46517:                     INIT   1
6442 @ 46520:                     PUSHI  #0x00000019
6443 @ 46525:                     INIT   1
6444 @ 46528:                     PUSHI  #0x00000018
6445 @ 46533:                     INIT   1
6446 @ 46536:                     PUSHI  #0x00000048
6447 @ 46541:                     INIT   1
6448 @ 46544:                     PUSHI  #0x00000049
6449 @ 46549:                     INIT   1
6450 @ 46552:                     PUSHI  #0x00000001
6451 @ 46557:                     INIT   1

   740        %CONSTSHORTINTEGERARRAY P VALUE(0 : 10)=%C
   741                                      0,
   742                                X'1827'(2), X'1067', X'0127'(2),X'10A7',
   743                                X'00A7',X'2418',X'4418',
   744                                X'2218'
6452 @ 46560:                     LINE   740 "regression-compile-tmp/comp412.imp"
6453 @ 46598:                     PUSHI  #0x00000000
6454 @ 46603:                     PUSHI  #0x0000000a
6455 @ 46608:                     BOUNDS
6456 @ 46609:                     DEF    PVALUE p1=V_00fd a/tf=1b b/format=3 c/ostate=112  type=1 (integer) form=11 (array) special=2 (short-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
6457 @ 46627:                     PUSHI  #0x00000000
6458 @ 46632:                     INIT   1
6459 @ 46635:                     PUSHI  #0x00001827
6460 @ 46640:                     INIT   2
6461 @ 46643:                     PUSHI  #0x00001067
6462 @ 46648:                     INIT   1
6463 @ 46651:                     PUSHI  #0x00000127
6464 @ 46656:                     INIT   2
6465 @ 46659:                     PUSHI  #0x000010a7
6466 @ 46664:                     INIT   1
6467 @ 46667:                     PUSHI  #0x000000a7
6468 @ 46672:                     INIT   1
6469 @ 46675:                     PUSHI  #0x00002418
6470 @ 46680:                     INIT   1
6471 @ 46683:                     PUSHI  #0x00004418
6472 @ 46688:                     INIT   1
6473 @ 46691:                     PUSHI  #0x00002218
6474 @ 46696:                     INIT   1

   745        %CONSTSHORTINTEGERARRAY SATOMS(1 : 12) =
   746  !         SPEC,     NAME,     MAP,      MAPSPEC,    <NULL>,
   747            X'0035',  X'3835',  X'3238',  X'0032',    X'3835',
   748  !         ARRAY     ARRAYNAME ARRAYSPEC NAMESPEC    ARRAYNAMESPEC,
   749            X'0033',  X'3835',  X'0033',  X'3835',    X'3835',
   750  !         FN,       FNSPEC
   751            X'3238',  X'0032'
   752  
6475 @ 46699:                     LINE   745 "regression-compile-tmp/comp412.imp"
6476 @ 46737:                     PUSHI  #0x00000001
6477 @ 46742:                     PUSHI  #0x0000000c
6478 @ 46747:                     BOUNDS
6479 @ 46748:                     DEF    SATOMS p1=V_00fe a/tf=1b b/format=3 c/ostate=112  type=1 (integer) form=11 (array) special=2 (short-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
6480 @ 46766:                     PUSHI  #0x00000035
6481 @ 46771:                     INIT   1
6482 @ 46774:                     PUSHI  #0x00003835
6483 @ 46779:                     INIT   1
6484 @ 46782:                     PUSHI  #0x00003238
6485 @ 46787:                     INIT   1
6486 @ 46790:                     PUSHI  #0x00000032
6487 @ 46795:                     INIT   1
6488 @ 46798:                     PUSHI  #0x00003835
6489 @ 46803:                     INIT   1
6490 @ 46806:                     PUSHI  #0x00000033
6491 @ 46811:                     INIT   1
6492 @ 46814:                     PUSHI  #0x00003835
6493 @ 46819:                     INIT   1
6494 @ 46822:                     PUSHI  #0x00000033
6495 @ 46827:                     INIT   1
6496 @ 46830:                     PUSHI  #0x00003835
6497 @ 46835:                     INIT   1
6498 @ 46838:                     PUSHI  #0x00003835
6499 @ 46843:                     INIT   1
6500 @ 46846:                     PUSHI  #0x00003238
6501 @ 46851:                     INIT   1
6502 @ 46854:                     PUSHI  #0x00000032
6503 @ 46859:                     INIT   1

   753        %CONSTBYTEINTEGERARRAY SCLASS(1 : 12) =
   754  !         SPEC,     NAME,     MAP,      MAPSPEC,    <NULL>,
   755            109,      2,        9,        118,        1,
   756  !         ARRAY,    ARRAYNAME,ARRAYSPEC,NAMESPEC,   ARRAYNAMESPEC,
   757            11,       12,       111,      110,        112,
   758  !         FN,       FNSPEC
   759            8,        117
6504 @ 46862:                     LINE   753 "regression-compile-tmp/comp412.imp"
6505 @ 46900:                     PUSHI  #0x00000001
6506 @ 46905:                     PUSHI  #0x0000000c
6507 @ 46910:                     BOUNDS
6508 @ 46911:                     DEF    SCLASS p1=V_00ff a/tf=1b b/format=2 c/ostate=112  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
6509 @ 46929:                     PUSHI  #0x0000006d
6510 @ 46934:                     INIT   1
6511 @ 46937:                     PUSHI  #0x00000002
6512 @ 46942:                     INIT   1
6513 @ 46945:                     PUSHI  #0x00000009
6514 @ 46950:                     INIT   1
6515 @ 46953:                     PUSHI  #0x00000076
6516 @ 46958:                     INIT   1
6517 @ 46961:                     PUSHI  #0x00000001
6518 @ 46966:                     INIT   1
6519 @ 46969:                     PUSHI  #0x0000000b
6520 @ 46974:                     INIT   1
6521 @ 46977:                     PUSHI  #0x0000000c
6522 @ 46982:                     INIT   1
6523 @ 46985:                     PUSHI  #0x0000006f
6524 @ 46990:                     INIT   1
6525 @ 46993:                     PUSHI  #0x0000006e
6526 @ 46998:                     INIT   1
6527 @ 47001:                     PUSHI  #0x00000070
6528 @ 47006:                     INIT   1
6529 @ 47009:                     PUSHI  #0x00000008
6530 @ 47014:                     INIT   1
6531 @ 47017:                     PUSHI  #0x00000075
6532 @ 47022:                     INIT   1

   760        %CONSTINTEGER XSPS = 109
6533 @ 47025:                     LINE   760 "regression-compile-tmp/comp412.imp"

   761        %CONSTINTEGERARRAY XMOD(XSPS : 116) = 17,18,27,28,97,98,107,108
6534 @ 47063:                     LINE   761 "regression-compile-tmp/comp412.imp"
6535 @ 47101:                     PUSHI  #0x0000006d
6536 @ 47106:                     PUSHI  #0x00000074
6537 @ 47111:                     BOUNDS
6538 @ 47112:                     DEF    XMOD p1=V_0100 a/tf=1b b/format=1 c/ostate=112  type=1 (integer) form=11 (array) special=0 (<special:0>) linkage=2 (constant) spec=0 indirect=1 unass=0
6539 @ 47128:                     PUSHI  #0x00000011
6540 @ 47133:                     INIT   1
6541 @ 47136:                     PUSHI  #0x00000012
6542 @ 47141:                     INIT   1
6543 @ 47144:                     PUSHI  #0x0000001b
6544 @ 47149:                     INIT   1
6545 @ 47152:                     PUSHI  #0x0000001c
6546 @ 47157:                     INIT   1
6547 @ 47160:                     PUSHI  #0x00000061
6548 @ 47165:                     INIT   1
6549 @ 47168:                     PUSHI  #0x00000062
6550 @ 47173:                     INIT   1
6551 @ 47176:                     PUSHI  #0x0000006b
6552 @ 47181:                     INIT   1
6553 @ 47184:                     PUSHI  #0x0000006c
6554 @ 47189:                     INIT   1

   762        LP=LIT POS
6555 @ 47192:                     LINE   762 "regression-compile-tmp/comp412.imp"
6556 @ 47230:                     PUSH   LP
6557 @ 47233:                     PUSH   LITPOS
6558 @ 47236:                     ASSVAL

   763        ATOM POS=POS; LAST=ATOM1
6559 @ 47237:                     LINE   763 "regression-compile-tmp/comp412.imp"
6560 @ 47275:                     PUSH   ATOMPOS
6561 @ 47278:                     PUSH   POS
6562 @ 47281:                     ASSVAL
6563 @ 47282:                     LINE   763 "regression-compile-tmp/comp412.imp"
6564 @ 47320:                     PUSH   LAST
6565 @ 47323:                     PUSH   ATOM1
6566 @ 47326:                     ASSVAL

   764        %IF QUOTE#0 %START;                  ! CONTINUATION OF STRING CONST
6567 @ 47327:                     LINE   764 "regression-compile-tmp/comp412.imp"
6568 @ 47365:                     PUSH   QUOTE
6569 @ 47368:                     PUSHI  #0x00000000
6570 @ 47373:                     JUMPIF = L_0004

   765           TP=0
6571 @ 47377:                     LINE   765 "regression-compile-tmp/comp412.imp"
6572 @ 47415:                     PUSH   TP
6573 @ 47418:                     PUSHI  #0x00000000
6574 @ 47423:                     ASSVAL

   766           TPUT(QUOTE>>8); TPUT(QUOTE&255)
6575 @ 47424:                     LINE   766 "regression-compile-tmp/comp412.imp"
6576 @ 47462:                     PUSH   TPUT
6577 @ 47465:                     PUSH   QUOTE
6578 @ 47468:                     PUSHI  #0x00000008
6579 @ 47473:                     RSH   
6580 @ 47474:                     ASSPAR
6581 @ 47475:                     CALL  
6582 @ 47476:                     LINE   766 "regression-compile-tmp/comp412.imp"
6583 @ 47514:                     PUSH   TPUT
6584 @ 47517:                     PUSH   QUOTE
6585 @ 47520:                     PUSHI  #0x000000ff
6586 @ 47525:                     AND   
6587 @ 47526:                     ASSPAR
6588 @ 47527:                     CALL  

   767           %CYCLE
6589 @ 47528:                     LINE   767 "regression-compile-tmp/comp412.imp"
6590 @ 47566:                     LOCATE L_0006

   768              READSYM
6591 @ 47569:                     LINE   768 "regression-compile-tmp/comp412.imp"
6592 @ 47607:                     PUSH   READSYM
6593 @ 47610:                     CALL  

   769              %IF SYM= DELIM %START
6594 @ 47611:                     LINE   769 "regression-compile-tmp/comp412.imp"
6595 @ 47649:                     PUSH   SYM
6596 @ 47652:                     PUSH   DELIM
6597 @ 47655:                     JUMPIF # L_000a

   770                 QUOTE=0
6598 @ 47659:                     LINE   770 "regression-compile-tmp/comp412.imp"
6599 @ 47697:                     PUSH   QUOTE
6600 @ 47700:                     PUSHI  #0x00000000
6601 @ 47705:                     ASSVAL

   771                 READSYM; %EXIT %IF SYM# DELIM
6602 @ 47706:                     LINE   771 "regression-compile-tmp/comp412.imp"
6603 @ 47744:                     PUSH   READSYM
6604 @ 47747:                     CALL  
6605 @ 47748:                     LINE   771 "regression-compile-tmp/comp412.imp"
6606 @ 47786:                     PUSH   SYM
6607 @ 47789:                     PUSH   DELIM
6608 @ 47792:                     JUMPIF = L_000d
6609 @ 47796:                     GOTO   L_0007
6610 @ 47799:                     LOCATE L_000d

   772                 QUOTE=1
6611 @ 47802:                     LINE   772 "regression-compile-tmp/comp412.imp"
6612 @ 47840:                     PUSH   QUOTE
6613 @ 47843:                     PUSHI  #0x00000001
6614 @ 47848:                     ASSVAL

   773              %FINISH
6615 @ 47849:                     LINE   773 "regression-compile-tmp/comp412.imp"
6616 @ 47887:                     LOCATE L_000a

   774              TPUT(SYM)
6617 @ 47890:                     LINE   774 "regression-compile-tmp/comp412.imp"
6618 @ 47928:                     PUSH   TPUT
6619 @ 47931:                     PUSH   SYM
6620 @ 47934:                     ASSPAR
6621 @ 47935:                     CALL  

   775           %REPEAT
6622 @ 47936:                     LINE   775 "regression-compile-tmp/comp412.imp"
6623 @ 47974:                     REPEAT L_0006
6624 @ 47977:                     LOCATE L_0007

   776           BUFFER(LIT POS)=TP
6625 @ 47980:                     LINE   776 "regression-compile-tmp/comp412.imp"
6626 @ 48018:                     PUSH   BUFFER
6627 @ 48021:                     PUSH   LITPOS
6628 @ 48024:                     ACCESS
6629 @ 48025:                     PUSH   TP
6630 @ 48028:                     ASSVAL

   777           LITPOS=LITPOS-TP-1
6631 @ 48029:                     LINE   777 "regression-compile-tmp/comp412.imp"
6632 @ 48067:                     PUSH   LITPOS
6633 @ 48070:                     PUSH   LITPOS
6634 @ 48073:                     PUSH   TP
6635 @ 48076:                     SUB   
6636 @ 48077:                     PUSHI  #0x00000001
6637 @ 48082:                     SUB   
6638 @ 48083:                     ASSVAL

   778        %FINISH
6639 @ 48084:                     LINE   778 "regression-compile-tmp/comp412.imp"
6640 @ 48122:                     LOCATE L_0004

   779        SLEN=0; XTYPE=0; SRMOD=0; PREFIX=0
6641 @ 48125:                     LINE   779 "regression-compile-tmp/comp412.imp"
6642 @ 48163:                     PUSH   SLEN
6643 @ 48166:                     PUSHI  #0x00000000
6644 @ 48171:                     ASSVAL
6645 @ 48172:                     LINE   779 "regression-compile-tmp/comp412.imp"
6646 @ 48210:                     PUSH   XTYPE
6647 @ 48213:                     PUSHI  #0x00000000
6648 @ 48218:                     ASSVAL
6649 @ 48219:                     LINE   779 "regression-compile-tmp/comp412.imp"
6650 @ 48257:                     PUSH   SRMOD
6651 @ 48260:                     PUSHI  #0x00000000
6652 @ 48265:                     ASSVAL
6653 @ 48266:                     LINE   779 "regression-compile-tmp/comp412.imp"
6654 @ 48304:                     PUSH   PREFIX
6655 @ 48307:                     PUSHI  #0x00000000
6656 @ 48312:                     ASSVAL

   780        %CYCLE
6657 @ 48313:                     LINE   780 "regression-compile-tmp/comp412.imp"
6658 @ 48351:                     LOCATE L_0003

   781           ATOM1=0; ATOM2=0; SUB ATOM=0; TAG=0
6659 @ 48354:                     LINE   781 "regression-compile-tmp/comp412.imp"
6660 @ 48392:                     PUSH   ATOM1
6661 @ 48395:                     PUSHI  #0x00000000
6662 @ 48400:                     ASSVAL
6663 @ 48401:                     LINE   781 "regression-compile-tmp/comp412.imp"
6664 @ 48439:                     PUSH   ATOM2
6665 @ 48442:                     PUSHI  #0x00000000
6666 @ 48447:                     ASSVAL
6667 @ 48448:                     LINE   781 "regression-compile-tmp/comp412.imp"
6668 @ 48486:                     PUSH   SUBATOM
6669 @ 48489:                     PUSHI  #0x00000000
6670 @ 48494:                     ASSVAL
6671 @ 48495:                     LINE   781 "regression-compile-tmp/comp412.imp"
6672 @ 48533:                     PUSH   TAG
6673 @ 48536:                     PUSHI  #0x00000000
6674 @ 48541:                     ASSVAL

   782           ATOM1=TERMIN %AND %RETURN %IF SYMTYPE=0
6675 @ 48542:                     LINE   782 "regression-compile-tmp/comp412.imp"
6676 @ 48580:                     PUSH   SYMTYPE
6677 @ 48583:                     PUSHI  #0x00000000
6678 @ 48588:                     JUMPIF # L_0007
6679 @ 48592:                     PUSH   ATOM1
6680 @ 48595:                     PUSHI  #0x0000000d
6681 @ 48600:                     ASSVAL
6682 @ 48601:                     RETURN
6683 @ 48602:                     LOCATE L_0007

   783           %IF SYMTYPE=-1 %START;             ! DIGIT
6684 @ 48605:                     LINE   783 "regression-compile-tmp/comp412.imp"
6685 @ 48643:                     PUSH   SYMTYPE
6686 @ 48646:                     PUSHI  #0x00000001
6687 @ 48651:                     NEGATE
6688 @ 48652:                     JUMPIF # L_0007

   784              %UNLESS (LAST=0 %AND OUT=0) %OR LAST=8%START
6689 @ 48656:                     LINE   784 "regression-compile-tmp/comp412.imp"
6690 @ 48694:                     PUSH   LAST
6691 @ 48697:                     PUSHI  #0x00000000
6692 @ 48702:                     JUMPIF # L_000b
6693 @ 48706:                     PUSH   OUT
6694 @ 48709:                     PUSHI  #0x00000000
6695 @ 48714:                     JUMPIF = L_000a
6696 @ 48718:                     LOCATE L_000b
6697 @ 48721:                     PUSH   LAST
6698 @ 48724:                     PUSHI  #0x00000008
6699 @ 48729:                     JUMPIF = L_000a

   785                 LIMIT=9; DIGIT='Z'
6700 @ 48733:                     LINE   785 "regression-compile-tmp/comp412.imp"
6701 @ 48771:                     PUSH   LIMIT
6702 @ 48774:                     PUSHI  #0x00000009
6703 @ 48779:                     ASSVAL
6704 @ 48780:                     LINE   785 "regression-compile-tmp/comp412.imp"
6705 @ 48818:                     PUSH   DIGIT
6706 @ 48821:                     PUSHI  #0x0000005a
6707 @ 48826:                     ASSVAL

   786  NEW BASE:      ATOM1=ICONST;  ATOM2 = ICONST
6708 @ 48827:                     LINE   786 "regression-compile-tmp/comp412.imp"
6709 @ 48865:                     LABEL  L_0101
6710 @ 48868:                     LINE   786 "regression-compile-tmp/comp412.imp"
6711 @ 48906:                     PUSH   ATOM1
6712 @ 48909:                     PUSHI  #0x00000053
6713 @ 48914:                     ASSVAL
6714 @ 48915:                     LINE   786 "regression-compile-tmp/comp412.imp"
6715 @ 48953:                     PUSH   ATOM2
6716 @ 48956:                     PUSHI  #0x00000053
6717 @ 48961:                     ASSVAL

   787                 %CYCLE
6718 @ 48962:                     LINE   787 "regression-compile-tmp/comp412.imp"
6719 @ 49000:                     LOCATE L_000c

   788                    LIT POS=LIT POS-1
6720 @ 49003:                     LINE   788 "regression-compile-tmp/comp412.imp"
6721 @ 49041:                     PUSH   LITPOS
6722 @ 49044:                     PUSH   LITPOS
6723 @ 49047:                     PUSHI  #0x00000001
6724 @ 49052:                     SUB   
6725 @ 49053:                     ASSVAL

   789                    BUFFER(LIT POS)=DIGIT
6726 @ 49054:                     LINE   789 "regression-compile-tmp/comp412.imp"
6727 @ 49092:                     PUSH   BUFFER
6728 @ 49095:                     PUSH   LITPOS
6729 @ 49098:                     ACCESS
6730 @ 49099:                     PUSH   DIGIT
6731 @ 49102:                     ASSVAL

   790                    CODE DIGIT
6732 @ 49103:                     LINE   790 "regression-compile-tmp/comp412.imp"
6733 @ 49141:                     PUSH   CODEDIGIT
6734 @ 49144:                     CALL  

   791                    %IF DIGIT <= 0 %START
6735 @ 49145:                     LINE   791 "regression-compile-tmp/comp412.imp"
6736 @ 49183:                     PUSH   DIGIT
6737 @ 49186:                     PUSHI  #0x00000000
6738 @ 49191:                     JUMPIF > L_0010

   792                       %IF LIMIT = 9 %AND SYM = '.' %AND ATOM1 = ICONST %START
6739 @ 49195:                     LINE   792 "regression-compile-tmp/comp412.imp"
6740 @ 49233:                     PUSH   LIMIT
6741 @ 49236:                     PUSHI  #0x00000009
6742 @ 49241:                     JUMPIF # L_0013
6743 @ 49245:                     PUSH   SYM
6744 @ 49248:                     PUSHI  #0x0000002e
6745 @ 49253:                     JUMPIF # L_0013
6746 @ 49257:                     PUSH   ATOM1
6747 @ 49260:                     PUSHI  #0x00000053
6748 @ 49265:                     JUMPIF # L_0013

   793                          DIGIT = '.'
6749 @ 49269:                     LINE   793 "regression-compile-tmp/comp412.imp"
6750 @ 49307:                     PUSH   DIGIT
6751 @ 49310:                     PUSHI  #0x0000002e
6752 @ 49315:                     ASSVAL

   794                          ATOM1 = RCONST;  ATOM2 = RCONST
6753 @ 49316:                     LINE   794 "regression-compile-tmp/comp412.imp"
6754 @ 49354:                     PUSH   ATOM1
6755 @ 49357:                     PUSHI  #0x00000054
6756 @ 49362:                     ASSVAL
6757 @ 49363:                     LINE   794 "regression-compile-tmp/comp412.imp"
6758 @ 49401:                     PUSH   ATOM2
6759 @ 49404:                     PUSHI  #0x00000054
6760 @ 49409:                     ASSVAL

   795                          LP = LP-1
6761 @ 49410:                     LINE   795 "regression-compile-tmp/comp412.imp"
6762 @ 49448:                     PUSH   LP
6763 @ 49451:                     PUSH   LP
6764 @ 49454:                     PUSHI  #0x00000001
6765 @ 49459:                     SUB   
6766 @ 49460:                     ASSVAL

   796                          READ SYM
6767 @ 49461:                     LINE   796 "regression-compile-tmp/comp412.imp"
6768 @ 49499:                     PUSH   READSYM
6769 @ 49502:                     CALL  

   797                       %ELSE
6770 @ 49503:                     LINE   797 "regression-compile-tmp/comp412.imp"
6771 @ 49541:                     GOTO   L_0012
6772 @ 49544:                     LOCATE L_0013

   798                          ATOM1=0 %IF LIMIT#9 %AND DIGIT=0
6773 @ 49547:                     LINE   798 "regression-compile-tmp/comp412.imp"
6774 @ 49585:                     PUSH   LIMIT
6775 @ 49588:                     PUSHI  #0x00000009
6776 @ 49593:                     JUMPIF = L_0016
6777 @ 49597:                     PUSH   DIGIT
6778 @ 49600:                     PUSHI  #0x00000000
6779 @ 49605:                     JUMPIF # L_0016
6780 @ 49609:                     PUSH   ATOM1
6781 @ 49612:                     PUSHI  #0x00000000
6782 @ 49617:                     ASSVAL
6783 @ 49618:                     LOCATE L_0016

   799                          BUFFER(LP)=LP-LITPOS
6784 @ 49621:                     LINE   799 "regression-compile-tmp/comp412.imp"
6785 @ 49659:                     PUSH   BUFFER
6786 @ 49662:                     PUSH   LP
6787 @ 49665:                     ACCESS
6788 @ 49666:                     PUSH   LP
6789 @ 49669:                     PUSH   LITPOS
6790 @ 49672:                     SUB   
6791 @ 49673:                     ASSVAL

   800                          LIT POS=LIT POS-1
6792 @ 49674:                     LINE   800 "regression-compile-tmp/comp412.imp"
6793 @ 49712:                     PUSH   LITPOS
6794 @ 49715:                     PUSH   LITPOS
6795 @ 49718:                     PUSHI  #0x00000001
6796 @ 49723:                     SUB   
6797 @ 49724:                     ASSVAL

   801                          SUBATOM=LP
6798 @ 49725:                     LINE   801 "regression-compile-tmp/comp412.imp"
6799 @ 49763:                     PUSH   SUBATOM
6800 @ 49766:                     PUSH   LP
6801 @ 49769:                     ASSVAL

   802                          FAULT(23) %IF LITPOS <= 0
6802 @ 49770:                     LINE   802 "regression-compile-tmp/comp412.imp"
6803 @ 49808:                     PUSH   LITPOS
6804 @ 49811:                     PUSHI  #0x00000000
6805 @ 49816:                     JUMPIF > L_0016
6806 @ 49820:                     PUSH   FAULT
6807 @ 49823:                     PUSHI  #0x00000017
6808 @ 49828:                     ASSPAR
6809 @ 49829:                     CALL  
6810 @ 49830:                     LOCATE L_0016

   803                          %RETURN
6811 @ 49833:                     LINE   803 "regression-compile-tmp/comp412.imp"
6812 @ 49871:                     RETURN

   804                       %FINISH
6813 @ 49872:                     LINE   804 "regression-compile-tmp/comp412.imp"
6814 @ 49910:                     LOCATE L_0012

   805                    %FINISH
6815 @ 49913:                     LINE   805 "regression-compile-tmp/comp412.imp"
6816 @ 49951:                     LOCATE L_0010

   806                 %REPEAT
6817 @ 49954:                     LINE   806 "regression-compile-tmp/comp412.imp"
6818 @ 49992:                     REPEAT L_000c

   807              %FINISH
6819 @ 49995:                     LINE   807 "regression-compile-tmp/comp412.imp"
6820 @ 50033:                     LOCATE L_000a

   808           %FINISH
6821 @ 50036:                     LINE   808 "regression-compile-tmp/comp412.imp"
6822 @ 50074:                     LOCATE L_0007

   809           %IF SYM TYPE < 0 %START;           ! LETTER
6823 @ 50077:                     LINE   809 "regression-compile-tmp/comp412.imp"
6824 @ 50115:                     PUSH   SYMTYPE
6825 @ 50118:                     PUSHI  #0x00000000
6826 @ 50123:                     JUMPIF >= L_0007

   810              DP=T MAX
6827 @ 50127:                     LINE   810 "regression-compile-tmp/comp412.imp"
6828 @ 50165:                     PUSH   DP
6829 @ 50168:                     PUSH   TMAX
6830 @ 50171:                     ASSVAL

   811              OLD SYM=SYM
   812  ! ---- THE FOLLOWING PACKING ROUTINE IS WORD-LENGTH DEPENDENT BUT CAN
   813  !      BE MODIFIED WITH NO OTHER SIDE-EFFECTS PROVIDED COMPLEMENTARY
   814  !      ALTERATIONS ARE MADE TO  'UNPACK'  IN ROUTINE 'PRINT NAME' ----
6831 @ 50172:                     LINE   811 "regression-compile-tmp/comp412.imp"
6832 @ 50210:                     PUSH   OLDSYM
6833 @ 50213:                     PUSH   SYM
6834 @ 50216:                     ASSVAL

   815              %CYCLE
6835 @ 50217:                     LINE   815 "regression-compile-tmp/comp412.imp"
6836 @ 50255:                     LOCATE L_0009

   816                 SS == DICT(DP)
6837 @ 50258:                     LINE   816 "regression-compile-tmp/comp412.imp"
6838 @ 50296:                     PUSH   SS
6839 @ 50299:                     PUSH   DICT
6840 @ 50302:                     PUSH   DP
6841 @ 50305:                     ACCESS
6842 @ 50306:                     ASSREF

   817                 SS = SYM-32
6843 @ 50307:                     LINE   817 "regression-compile-tmp/comp412.imp"
6844 @ 50345:                     PUSH   SS
6845 @ 50348:                     PUSH   SYM
6846 @ 50351:                     PUSHI  #0x00000020
6847 @ 50356:                     SUB   
6848 @ 50357:                     ASSVAL

   818                 READ SYM; %EXIT %IF SYM TYPE >= 0
6849 @ 50358:                     LINE   818 "regression-compile-tmp/comp412.imp"
6850 @ 50396:                     PUSH   READSYM
6851 @ 50399:                     CALL  
6852 @ 50400:                     LINE   818 "regression-compile-tmp/comp412.imp"
6853 @ 50438:                     PUSH   SYMTYPE
6854 @ 50441:                     PUSHI  #0x00000000
6855 @ 50446:                     JUMPIF < L_000d
6856 @ 50450:                     GOTO   L_000a
6857 @ 50453:                     LOCATE L_000d

   819                 OLD SYM=0
6858 @ 50456:                     LINE   819 "regression-compile-tmp/comp412.imp"
6859 @ 50494:                     PUSH   OLDSYM
6860 @ 50497:                     PUSHI  #0x00000000
6861 @ 50502:                     ASSVAL

   820                 SS = (SS<<6) + (SYM-32)
6862 @ 50503:                     LINE   820 "regression-compile-tmp/comp412.imp"
6863 @ 50541:                     PUSH   SS
6864 @ 50544:                     PUSH   SS
6865 @ 50547:                     PUSHI  #0x00000006
6866 @ 50552:                     LSH   
6867 @ 50553:                     PUSH   SYM
6868 @ 50556:                     PUSHI  #0x00000020
6869 @ 50561:                     SUB   
6870 @ 50562:                     ADD   
6871 @ 50563:                     ASSVAL

   821                 READ SYM;  %EXIT %IF SYM TYPE >= 0
6872 @ 50564:                     LINE   821 "regression-compile-tmp/comp412.imp"
6873 @ 50602:                     PUSH   READSYM
6874 @ 50605:                     CALL  
6875 @ 50606:                     LINE   821 "regression-compile-tmp/comp412.imp"
6876 @ 50644:                     PUSH   SYMTYPE
6877 @ 50647:                     PUSHI  #0x00000000
6878 @ 50652:                     JUMPIF < L_000d
6879 @ 50656:                     GOTO   L_000a
6880 @ 50659:                     LOCATE L_000d

   822                 SS = (SS<<6) + (SYM-32)
6881 @ 50662:                     LINE   822 "regression-compile-tmp/comp412.imp"
6882 @ 50700:                     PUSH   SS
6883 @ 50703:                     PUSH   SS
6884 @ 50706:                     PUSHI  #0x00000006
6885 @ 50711:                     LSH   
6886 @ 50712:                     PUSH   SYM
6887 @ 50715:                     PUSHI  #0x00000020
6888 @ 50720:                     SUB   
6889 @ 50721:                     ADD   
6890 @ 50722:                     ASSVAL

   823                 READ SYM;  %EXIT %IF SYM TYPE >= 0
6891 @ 50723:                     LINE   823 "regression-compile-tmp/comp412.imp"
6892 @ 50761:                     PUSH   READSYM
6893 @ 50764:                     CALL  
6894 @ 50765:                     LINE   823 "regression-compile-tmp/comp412.imp"
6895 @ 50803:                     PUSH   SYMTYPE
6896 @ 50806:                     PUSHI  #0x00000000
6897 @ 50811:                     JUMPIF < L_000d
6898 @ 50815:                     GOTO   L_000a
6899 @ 50818:                     LOCATE L_000d

   824                 SS = (SS<<6) + (SYM-32)
6900 @ 50821:                     LINE   824 "regression-compile-tmp/comp412.imp"
6901 @ 50859:                     PUSH   SS
6902 @ 50862:                     PUSH   SS
6903 @ 50865:                     PUSHI  #0x00000006
6904 @ 50870:                     LSH   
6905 @ 50871:                     PUSH   SYM
6906 @ 50874:                     PUSHI  #0x00000020
6907 @ 50879:                     SUB   
6908 @ 50880:                     ADD   
6909 @ 50881:                     ASSVAL

   825                 READ SYM;  %EXIT %IF SYM TYPE >= 0
6910 @ 50882:                     LINE   825 "regression-compile-tmp/comp412.imp"
6911 @ 50920:                     PUSH   READSYM
6912 @ 50923:                     CALL  
6913 @ 50924:                     LINE   825 "regression-compile-tmp/comp412.imp"
6914 @ 50962:                     PUSH   SYMTYPE
6915 @ 50965:                     PUSHI  #0x00000000
6916 @ 50970:                     JUMPIF < L_000d
6917 @ 50974:                     GOTO   L_000a
6918 @ 50977:                     LOCATE L_000d

   826                 SS = (SS<<6) + (SYM-32)
6919 @ 50980:                     LINE   826 "regression-compile-tmp/comp412.imp"
6920 @ 51018:                     PUSH   SS
6921 @ 51021:                     PUSH   SS
6922 @ 51024:                     PUSHI  #0x00000006
6923 @ 51029:                     LSH   
6924 @ 51030:                     PUSH   SYM
6925 @ 51033:                     PUSHI  #0x00000020
6926 @ 51038:                     SUB   
6927 @ 51039:                     ADD   
6928 @ 51040:                     ASSVAL

   827                 READ SYM;  %EXIT %IF SYM TYPE >= 0
6929 @ 51041:                     LINE   827 "regression-compile-tmp/comp412.imp"
6930 @ 51079:                     PUSH   READSYM
6931 @ 51082:                     CALL  
6932 @ 51083:                     LINE   827 "regression-compile-tmp/comp412.imp"
6933 @ 51121:                     PUSH   SYMTYPE
6934 @ 51124:                     PUSHI  #0x00000000
6935 @ 51129:                     JUMPIF < L_000d
6936 @ 51133:                     GOTO   L_000a
6937 @ 51136:                     LOCATE L_000d

   828                 DP=DP+1
6938 @ 51139:                     LINE   828 "regression-compile-tmp/comp412.imp"
6939 @ 51177:                     PUSH   DP
6940 @ 51180:                     PUSH   DP
6941 @ 51183:                     PUSHI  #0x00000001
6942 @ 51188:                     ADD   
6943 @ 51189:                     ASSVAL

   829              %REPEAT
6944 @ 51190:                     LINE   829 "regression-compile-tmp/comp412.imp"
6945 @ 51228:                     REPEAT L_0009
6946 @ 51231:                     LOCATE L_000a

   830              %IF SYM='''' %AND OLD SYM # 0 %START
6947 @ 51234:                     LINE   830 "regression-compile-tmp/comp412.imp"
6948 @ 51272:                     PUSH   SYM
6949 @ 51275:                     PUSHI  #0x00000027
6950 @ 51280:                     JUMPIF # L_000a
6951 @ 51284:                     PUSH   OLDSYM
6952 @ 51287:                     PUSHI  #0x00000000
6953 @ 51292:                     JUMPIF = L_000a

   831                 DELIM = ''''
6954 @ 51296:                     LINE   831 "regression-compile-tmp/comp412.imp"
6955 @ 51334:                     PUSH   DELIM
6956 @ 51337:                     PUSHI  #0x00000027
6957 @ 51342:                     ASSVAL

   832                 %CYCLE J=1,1,4
6958 @ 51343:                     LINE   832 "regression-compile-tmp/comp412.imp"
6959 @ 51381:                     PUSH   J
6960 @ 51384:                     PUSHI  #0x00000001
6961 @ 51389:                     PUSHI  #0x00000004
6962 @ 51394:                     PUSHI  #0x00000001
6963 @ 51399:                     FOR    L_000c

   833                    %IF OLD SYM=BASE SYM(J) %START
6964 @ 51402:                     LINE   833 "regression-compile-tmp/comp412.imp"
6965 @ 51440:                     PUSH   OLDSYM
6966 @ 51443:                     PUSH   BASESYM
6967 @ 51446:                     PUSH   J
6968 @ 51449:                     ACCESS
6969 @ 51450:                     JUMPIF # L_0010

   834                       QUOTE = 1
6970 @ 51454:                     LINE   834 "regression-compile-tmp/comp412.imp"
6971 @ 51492:                     PUSH   QUOTE
6972 @ 51495:                     PUSHI  #0x00000001
6973 @ 51500:                     ASSVAL

   835                       K=BASE INF(J)
6974 @ 51501:                     LINE   835 "regression-compile-tmp/comp412.imp"
6975 @ 51539:                     PUSH   K
6976 @ 51542:                     PUSH   BASEINF
6977 @ 51545:                     PUSH   J
6978 @ 51548:                     ACCESS
6979 @ 51549:                     ASSVAL

   836                       DIGIT=K>>8; LIMIT=K&255
6980 @ 51550:                     LINE   836 "regression-compile-tmp/comp412.imp"
6981 @ 51588:                     PUSH   DIGIT
6982 @ 51591:                     PUSH   K
6983 @ 51594:                     PUSHI  #0x00000008
6984 @ 51599:                     RSH   
6985 @ 51600:                     ASSVAL
6986 @ 51601:                     LINE   836 "regression-compile-tmp/comp412.imp"
6987 @ 51639:                     PUSH   LIMIT
6988 @ 51642:                     PUSH   K
6989 @ 51645:                     PUSHI  #0x000000ff
6990 @ 51650:                     AND   
6991 @ 51651:                     ASSVAL

   837                       READSYM
6992 @ 51652:                     LINE   837 "regression-compile-tmp/comp412.imp"
6993 @ 51690:                     PUSH   READSYM
6994 @ 51693:                     CALL  

   838                       -> NEW BASE
6995 @ 51694:                     LINE   838 "regression-compile-tmp/comp412.imp"
6996 @ 51732:                     JUMP   L_0101

   839                    %FINISH
6997 @ 51735:                     LINE   839 "regression-compile-tmp/comp412.imp"
6998 @ 51773:                     LOCATE L_0010

   840                 %REPEAT
6999 @ 51776:                     LINE   840 "regression-compile-tmp/comp412.imp"
7000 @ 51814:                     REPEAT L_000c
7001 @ 51817:                     LOCATE L_000d

   841              %FINISH
7002 @ 51820:                     LINE   841 "regression-compile-tmp/comp412.imp"
7003 @ 51858:                     LOCATE L_000a

   842              DP=DP+1
7004 @ 51861:                     LINE   842 "regression-compile-tmp/comp412.imp"
7005 @ 51899:                     PUSH   DP
7006 @ 51902:                     PUSH   DP
7007 @ 51905:                     PUSHI  #0x00000001
7008 @ 51910:                     ADD   
7009 @ 51911:                     ASSVAL

   843              FAULT(21) %IF DP >= T LIMIT
7010 @ 51912:                     LINE   843 "regression-compile-tmp/comp412.imp"
7011 @ 51950:                     PUSH   DP
7012 @ 51953:                     PUSH   TLIMIT
7013 @ 51956:                     JUMPIF < L_000a
7014 @ 51960:                     PUSH   FAULT
7015 @ 51963:                     PUSHI  #0x00000015
7016 @ 51968:                     ASSPAR
7017 @ 51969:                     CALL  
7018 @ 51970:                     LOCATE L_000a

   844              ATOM1=IDENT; ATOM2=IDENT
7019 @ 51973:                     LINE   844 "regression-compile-tmp/comp412.imp"
7020 @ 52011:                     PUSH   ATOM1
7021 @ 52014:                     PUSHI  #0x0000003b
7022 @ 52019:                     ASSVAL
7023 @ 52020:                     LINE   844 "regression-compile-tmp/comp412.imp"
7024 @ 52058:                     PUSH   ATOM2
7025 @ 52061:                     PUSHI  #0x0000003b
7026 @ 52066:                     ASSVAL

   845              LIM=T BASE; LOOKUP(T MAX)
7027 @ 52067:                     LINE   845 "regression-compile-tmp/comp412.imp"
7028 @ 52105:                     PUSH   LIM
7029 @ 52108:                     PUSH   TBASE
7030 @ 52111:                     ASSVAL
7031 @ 52112:                     LINE   845 "regression-compile-tmp/comp412.imp"
7032 @ 52150:                     PUSH   LOOKUP
7033 @ 52153:                     PUSH   TMAX
7034 @ 52156:                     ASSPAR
7035 @ 52157:                     CALL  

   846              %RETURN
7036 @ 52158:                     LINE   846 "regression-compile-tmp/comp412.imp"
7037 @ 52196:                     RETURN

   847           %FINISH
7038 @ 52197:                     LINE   847 "regression-compile-tmp/comp412.imp"
7039 @ 52235:                     LOCATE L_0007

   848           %IF SYM='''' %OR SYM = '"' %START
7040 @ 52238:                     LINE   848 "regression-compile-tmp/comp412.imp"
7041 @ 52276:                     PUSH   SYM
7042 @ 52279:                     PUSHI  #0x00000027
7043 @ 52284:                     JUMPIF = L_0008
7044 @ 52288:                     PUSH   SYM
7045 @ 52291:                     PUSHI  #0x00000022
7046 @ 52296:                     JUMPIF # L_0007
7047 @ 52300:                     LOCATE L_0008

   849              DELIM = SYM
7048 @ 52303:                     LINE   849 "regression-compile-tmp/comp412.imp"
7049 @ 52341:                     PUSH   DELIM
7050 @ 52344:                     PUSH   SYM
7051 @ 52347:                     ASSVAL

   850              QUOTE=1;                        ! INTO TEXT MODE
7052 @ 52348:                     LINE   850 "regression-compile-tmp/comp412.imp"
7053 @ 52386:                     PUSH   QUOTE
7054 @ 52389:                     PUSHI  #0x00000001
7055 @ 52394:                     ASSVAL

   851              ATOM1=SCONST;                   ! SYMBOL, OR
7056 @ 52395:                     LINE   851 "regression-compile-tmp/comp412.imp"
7057 @ 52433:                     PUSH   ATOM1
7058 @ 52436:                     PUSHI  #0x00000052
7059 @ 52441:                     ASSVAL

   852              ATOM2=ICONST;                   ! STRING
7060 @ 52442:                     LINE   852 "regression-compile-tmp/comp412.imp"
7061 @ 52480:                     PUSH   ATOM2
7062 @ 52483:                     PUSHI  #0x00000053
7063 @ 52488:                     ASSVAL

   853              READSYM;  SUB ATOM=SYM;         ! FIRST CHAR
7064 @ 52489:                     LINE   853 "regression-compile-tmp/comp412.imp"
7065 @ 52527:                     PUSH   READSYM
7066 @ 52530:                     CALL  
7067 @ 52531:                     LINE   853 "regression-compile-tmp/comp412.imp"
7068 @ 52569:                     PUSH   SUBATOM
7069 @ 52572:                     PUSH   SYM
7070 @ 52575:                     ASSVAL

   854              QUOTE=0 %IF SUBATOM=DELIM
7071 @ 52576:                     LINE   854 "regression-compile-tmp/comp412.imp"
7072 @ 52614:                     PUSH   SUBATOM
7073 @ 52617:                     PUSH   DELIM
7074 @ 52620:                     JUMPIF # L_000a
7075 @ 52624:                     PUSH   QUOTE
7076 @ 52627:                     PUSHI  #0x00000000
7077 @ 52632:                     ASSVAL
7078 @ 52633:                     LOCATE L_000a

   855              READSYM
7079 @ 52636:                     LINE   855 "regression-compile-tmp/comp412.imp"
7080 @ 52674:                     PUSH   READSYM
7081 @ 52677:                     CALL  

   856              %IF SUBATOM=DELIM %START;       ! ' ' FOUND
7082 @ 52678:                     LINE   856 "regression-compile-tmp/comp412.imp"
7083 @ 52716:                     PUSH   SUBATOM
7084 @ 52719:                     PUSH   DELIM
7085 @ 52722:                     JUMPIF # L_000a

   857                 %IF SYM#DELIM %START;        ! NULL SYMBOL OR STRING
7086 @ 52726:                     LINE   857 "regression-compile-tmp/comp412.imp"
7087 @ 52764:                     PUSH   SYM
7088 @ 52767:                     PUSH   DELIM
7089 @ 52770:                     JUMPIF = L_000d

   858                    SUB ATOM=NULL STRING; %RETURN
7090 @ 52774:                     LINE   858 "regression-compile-tmp/comp412.imp"
7091 @ 52812:                     PUSH   SUBATOM
7092 @ 52815:                     PUSHI  #0x00000191
7093 @ 52820:                     ASSVAL
7094 @ 52821:                     LINE   858 "regression-compile-tmp/comp412.imp"
7095 @ 52859:                     RETURN

   859                 %FINISH
   860                                            ! ' ' ' FOUND
7096 @ 52860:                     LINE   859 "regression-compile-tmp/comp412.imp"
7097 @ 52898:                     LOCATE L_000d

   861                 QUOTE=1
7098 @ 52901:                     LINE   861 "regression-compile-tmp/comp412.imp"
7099 @ 52939:                     PUSH   QUOTE
7100 @ 52942:                     PUSHI  #0x00000001
7101 @ 52947:                     ASSVAL

   862              READSYM;                      ! '' -> '
7102 @ 52948:                     LINE   862 "regression-compile-tmp/comp412.imp"
7103 @ 52986:                     PUSH   READSYM
7104 @ 52989:                     CALL  

   863              %FINISH
7105 @ 52990:                     LINE   863 "regression-compile-tmp/comp412.imp"
7106 @ 53028:                     LOCATE L_000a

   864              %IF SYM=DELIM %START;           ! FOUND DELIM %OR '?'
7107 @ 53031:                     LINE   864 "regression-compile-tmp/comp412.imp"
7108 @ 53069:                     PUSH   SYM
7109 @ 53072:                     PUSH   DELIM
7110 @ 53075:                     JUMPIF # L_000a

   865                 QUOTE=0
7111 @ 53079:                     LINE   865 "regression-compile-tmp/comp412.imp"
7112 @ 53117:                     PUSH   QUOTE
7113 @ 53120:                     PUSHI  #0x00000000
7114 @ 53125:                     ASSVAL

   866                 READ SYM;                    ! SKIP QUOTE
7115 @ 53126:                     LINE   866 "regression-compile-tmp/comp412.imp"
7116 @ 53164:                     PUSH   READSYM
7117 @ 53167:                     CALL  

   867                 %IF SYM#DELIM %START
7118 @ 53168:                     LINE   867 "regression-compile-tmp/comp412.imp"
7119 @ 53206:                     PUSH   SYM
7120 @ 53209:                     PUSH   DELIM
7121 @ 53212:                     JUMPIF = L_000d

   868                    LITPOS=LITPOS-2
7122 @ 53216:                     LINE   868 "regression-compile-tmp/comp412.imp"
7123 @ 53254:                     PUSH   LITPOS
7124 @ 53257:                     PUSH   LITPOS
7125 @ 53260:                     PUSHI  #0x00000002
7126 @ 53265:                     SUB   
7127 @ 53266:                     ASSVAL

   869                    BUFFER(LITPOS+2)=-1
7128 @ 53267:                     LINE   869 "regression-compile-tmp/comp412.imp"
7129 @ 53305:                     PUSH   BUFFER
7130 @ 53308:                     PUSH   LITPOS
7131 @ 53311:                     PUSHI  #0x00000002
7132 @ 53316:                     ADD   
7133 @ 53317:                     ACCESS
7134 @ 53318:                     PUSHI  #0x00000001
7135 @ 53323:                     NEGATE
7136 @ 53324:                     ASSVAL

   870                    BUFFER(LITPOS+1)=SUBATOM
7137 @ 53325:                     LINE   870 "regression-compile-tmp/comp412.imp"
7138 @ 53363:                     PUSH   BUFFER
7139 @ 53366:                     PUSH   LITPOS
7140 @ 53369:                     PUSHI  #0x00000001
7141 @ 53374:                     ADD   
7142 @ 53375:                     ACCESS
7143 @ 53376:                     PUSH   SUBATOM
7144 @ 53379:                     ASSVAL

   871                    SUBATOM=LITPOS+2
7145 @ 53380:                     LINE   871 "regression-compile-tmp/comp412.imp"
7146 @ 53418:                     PUSH   SUBATOM
7147 @ 53421:                     PUSH   LITPOS
7148 @ 53424:                     PUSHI  #0x00000002
7149 @ 53429:                     ADD   
7150 @ 53430:                     ASSVAL

   872                    %RETURN
7151 @ 53431:                     LINE   872 "regression-compile-tmp/comp412.imp"
7152 @ 53469:                     RETURN

   873                 %FINISH
7153 @ 53470:                     LINE   873 "regression-compile-tmp/comp412.imp"
7154 @ 53508:                     LOCATE L_000d

   874              %FINISH
7155 @ 53511:                     LINE   874 "regression-compile-tmp/comp412.imp"
7156 @ 53549:                     LOCATE L_000a

   875              QUOTE=SUBATOM<<8+SYM;           ! PRESERVE SYMBOLS
7157 @ 53552:                     LINE   875 "regression-compile-tmp/comp412.imp"
7158 @ 53590:                     PUSH   QUOTE
7159 @ 53593:                     PUSH   SUBATOM
7160 @ 53596:                     PUSHI  #0x00000008
7161 @ 53601:                     LSH   
7162 @ 53602:                     PUSH   SYM
7163 @ 53605:                     ADD   
7164 @ 53606:                     ASSVAL

   876              ATOM2=SCONST;                   ! IT MUST BE A STRING
7165 @ 53607:                     LINE   876 "regression-compile-tmp/comp412.imp"
7166 @ 53645:                     PUSH   ATOM2
7167 @ 53648:                     PUSHI  #0x00000052
7168 @ 53653:                     ASSVAL

   877              SUBATOM=LITPOS
7169 @ 53654:                     LINE   877 "regression-compile-tmp/comp412.imp"
7170 @ 53692:                     PUSH   SUBATOM
7171 @ 53695:                     PUSH   LITPOS
7172 @ 53698:                     ASSVAL

   878              %RETURN
7173 @ 53699:                     LINE   878 "regression-compile-tmp/comp412.imp"
7174 @ 53737:                     RETURN

   879           %FINISH
7175 @ 53738:                     LINE   879 "regression-compile-tmp/comp412.imp"
7176 @ 53776:                     LOCATE L_0007

   880           DP=KEY>>2;                         ! INDEX INTO DICT
7177 @ 53779:                     LINE   880 "regression-compile-tmp/comp412.imp"
7178 @ 53817:                     PUSH   DP
7179 @ 53820:                     PUSH   KEY
7180 @ 53823:                     PUSHI  #0x00000002
7181 @ 53828:                     RSH   
7182 @ 53829:                     ASSVAL

   881           READ SYM;                          ! GET NEXT SYMBOL
7183 @ 53830:                     LINE   881 "regression-compile-tmp/comp412.imp"
7184 @ 53868:                     PUSH   READSYM
7185 @ 53871:                     CALL  

   882           %CYCLE
7186 @ 53872:                     LINE   882 "regression-compile-tmp/comp412.imp"
7187 @ 53910:                     LOCATE L_0006

   883              S=KDICT(DP)
7188 @ 53913:                     LINE   883 "regression-compile-tmp/comp412.imp"
7189 @ 53951:                     PUSH   S
7190 @ 53954:                     PUSH   KDICT
7191 @ 53957:                     PUSH   DP
7192 @ 53960:                     ACCESS
7193 @ 53961:                     ASSVAL

   884              %EXIT %IF S&X'4000'#0;          ! END OF LIST MARKER
7194 @ 53962:                     LINE   884 "regression-compile-tmp/comp412.imp"
7195 @ 54000:                     PUSH   S
7196 @ 54003:                     PUSHI  #0x00004000
7197 @ 54008:                     AND   
7198 @ 54009:                     PUSHI  #0x00000000
7199 @ 54014:                     JUMPIF = L_000a
7200 @ 54018:                     GOTO   L_0007
7201 @ 54021:                     LOCATE L_000a

   885              %IF S&127#SYM %OR SYMTYPE < 0 %START
7202 @ 54024:                     LINE   885 "regression-compile-tmp/comp412.imp"
7203 @ 54062:                     PUSH   S
7204 @ 54065:                     PUSHI  #0x0000007f
7205 @ 54070:                     AND   
7206 @ 54071:                     PUSH   SYM
7207 @ 54074:                     JUMPIF # L_000b
7208 @ 54078:                     PUSH   SYMTYPE
7209 @ 54081:                     PUSHI  #0x00000000
7210 @ 54086:                     JUMPIF >= L_000a
7211 @ 54090:                     LOCATE L_000b

   886                 ATOM POS=POS %AND %RETURN %IF S >= 0
7212 @ 54093:                     LINE   886 "regression-compile-tmp/comp412.imp"
7213 @ 54131:                     PUSH   S
7214 @ 54134:                     PUSHI  #0x00000000
7215 @ 54139:                     JUMPIF < L_000d
7216 @ 54143:                     PUSH   ATOMPOS
7217 @ 54146:                     PUSH   POS
7218 @ 54149:                     ASSVAL
7219 @ 54150:                     RETURN
7220 @ 54151:                     LOCATE L_000d

   887                 DP=DP+1;                     ! ONTO ALTERNATIVE
7221 @ 54154:                     LINE   887 "regression-compile-tmp/comp412.imp"
7222 @ 54192:                     PUSH   DP
7223 @ 54195:                     PUSH   DP
7224 @ 54198:                     PUSHI  #0x00000001
7225 @ 54203:                     ADD   
7226 @ 54204:                     ASSVAL

   888              %ELSE
7227 @ 54205:                     LINE   888 "regression-compile-tmp/comp412.imp"
7228 @ 54243:                     GOTO   L_0009
7229 @ 54246:                     LOCATE L_000a

   889                 K = S>>7&127;  READ SYM
7230 @ 54249:                     LINE   889 "regression-compile-tmp/comp412.imp"
7231 @ 54287:                     PUSH   K
7232 @ 54290:                     PUSH   S
7233 @ 54293:                     PUSHI  #0x00000007
7234 @ 54298:                     RSH   
7235 @ 54299:                     PUSHI  #0x0000007f
7236 @ 54304:                     AND   
7237 @ 54305:                     ASSVAL
7238 @ 54306:                     LINE   889 "regression-compile-tmp/comp412.imp"
7239 @ 54344:                     PUSH   READSYM
7240 @ 54347:                     CALL  

   890                 %IF S > 0 %START
7241 @ 54348:                     LINE   890 "regression-compile-tmp/comp412.imp"
7242 @ 54386:                     PUSH   S
7243 @ 54389:                     PUSHI  #0x00000000
7244 @ 54394:                     JUMPIF <= L_000d

   891                    %IF K # 0 %START
7245 @ 54398:                     LINE   891 "regression-compile-tmp/comp412.imp"
7246 @ 54436:                     PUSH   K
7247 @ 54439:                     PUSHI  #0x00000000
7248 @ 54444:                     JUMPIF = L_0010

   892                       ATOM POS = POS %AND %RETURN %IF K#SYM %OR SYMTYPE<0
7249 @ 54448:                     LINE   892 "regression-compile-tmp/comp412.imp"
7250 @ 54486:                     PUSH   K
7251 @ 54489:                     PUSH   SYM
7252 @ 54492:                     JUMPIF # L_0014
7253 @ 54496:                     PUSH   SYMTYPE
7254 @ 54499:                     PUSHI  #0x00000000
7255 @ 54504:                     JUMPIF >= L_0013
7256 @ 54508:                     LOCATE L_0014
7257 @ 54511:                     PUSH   ATOMPOS
7258 @ 54514:                     PUSH   POS
7259 @ 54517:                     ASSVAL
7260 @ 54518:                     RETURN
7261 @ 54519:                     LOCATE L_0013

   893                       READ SYM
7262 @ 54522:                     LINE   893 "regression-compile-tmp/comp412.imp"
7263 @ 54560:                     PUSH   READSYM
7264 @ 54563:                     CALL  

   894                    %FINISH
7265 @ 54564:                     LINE   894 "regression-compile-tmp/comp412.imp"
7266 @ 54602:                     LOCATE L_0010

   895                    K = 1
7267 @ 54605:                     LINE   895 "regression-compile-tmp/comp412.imp"
7268 @ 54643:                     PUSH   K
7269 @ 54646:                     PUSHI  #0x00000001
7270 @ 54651:                     ASSVAL

   896                 %FINISH
7271 @ 54652:                     LINE   896 "regression-compile-tmp/comp412.imp"
7272 @ 54690:                     LOCATE L_000d

   897                 DP = DP+K
7273 @ 54693:                     LINE   897 "regression-compile-tmp/comp412.imp"
7274 @ 54731:                     PUSH   DP
7275 @ 54734:                     PUSH   DP
7276 @ 54737:                     PUSH   K
7277 @ 54740:                     ADD   
7278 @ 54741:                     ASSVAL

   898              %FINISH
7279 @ 54742:                     LINE   898 "regression-compile-tmp/comp412.imp"
7280 @ 54780:                     LOCATE L_0009

   899           %REPEAT
7281 @ 54783:                     LINE   899 "regression-compile-tmp/comp412.imp"
7282 @ 54821:                     REPEAT L_0006
7283 @ 54824:                     LOCATE L_0007

   900           ATOM1=S&63;                        ! PICK OFF CLASS
7284 @ 54827:                     LINE   900 "regression-compile-tmp/comp412.imp"
7285 @ 54865:                     PUSH   ATOM1
7286 @ 54868:                     PUSH   S
7287 @ 54871:                     PUSHI  #0x0000003f
7288 @ 54876:                     AND   
7289 @ 54877:                     ASSVAL

   901           SUB ATOM=S>>6&255
7290 @ 54878:                     LINE   901 "regression-compile-tmp/comp412.imp"
7291 @ 54916:                     PUSH   SUBATOM
7292 @ 54919:                     PUSH   S
7293 @ 54922:                     PUSHI  #0x00000006
7294 @ 54927:                     RSH   
7295 @ 54928:                     PUSHI  #0x000000ff
7296 @ 54933:                     AND   
7297 @ 54934:                     ASSVAL

   902           %EXIT %IF ATOM1#0
7298 @ 54935:                     LINE   902 "regression-compile-tmp/comp412.imp"
7299 @ 54973:                     PUSH   ATOM1
7300 @ 54976:                     PUSHI  #0x00000000
7301 @ 54981:                     JUMPIF = L_0007
7302 @ 54985:                     GOTO   L_0004
7303 @ 54988:                     LOCATE L_0007

   903           L=P VALUE(SUBATOM)
7304 @ 54991:                     LINE   903 "regression-compile-tmp/comp412.imp"
7305 @ 55029:                     PUSH   L
7306 @ 55032:                     PUSH   PVALUE
7307 @ 55035:                     PUSH   SUBATOM
7308 @ 55038:                     ACCESS
7309 @ 55039:                     ASSVAL

   904           %IF L#0 %START
7310 @ 55040:                     LINE   904 "regression-compile-tmp/comp412.imp"
7311 @ 55078:                     PUSH   L
7312 @ 55081:                     PUSHI  #0x00000000
7313 @ 55086:                     JUMPIF = L_0007

   905              %RETURN %IF PREFIX&L&63 # 0 %OR (LAST # 0 %AND L&1 # 0)
7314 @ 55090:                     LINE   905 "regression-compile-tmp/comp412.imp"
7315 @ 55128:                     PUSH   PREFIX
7316 @ 55131:                     PUSH   L
7317 @ 55134:                     AND   
7318 @ 55135:                     PUSHI  #0x0000003f
7319 @ 55140:                     AND   
7320 @ 55141:                     PUSHI  #0x00000000
7321 @ 55146:                     JUMPIF # L_000b
7322 @ 55150:                     PUSH   LAST
7323 @ 55153:                     PUSHI  #0x00000000
7324 @ 55158:                     JUMPIF = L_000a
7325 @ 55162:                     PUSH   L
7326 @ 55165:                     PUSHI  #0x00000001
7327 @ 55170:                     AND   
7328 @ 55171:                     PUSHI  #0x00000000
7329 @ 55176:                     JUMPIF = L_000a
7330 @ 55180:                     LOCATE L_000b
7331 @ 55183:                     RETURN
7332 @ 55184:                     LOCATE L_000a

   906              PREFIX=PREFIX!L>>6
7333 @ 55187:                     LINE   906 "regression-compile-tmp/comp412.imp"
7334 @ 55225:                     PUSH   PREFIX
7335 @ 55228:                     PUSH   PREFIX
7336 @ 55231:                     PUSH   L
7337 @ 55234:                     PUSHI  #0x00000006
7338 @ 55239:                     RSH   
7339 @ 55240:                     OR    
7340 @ 55241:                     ASSVAL

   907              XTYPE=SUBATOM %IF SUBATOM <= 7
7341 @ 55242:                     LINE   907 "regression-compile-tmp/comp412.imp"
7342 @ 55280:                     PUSH   SUBATOM
7343 @ 55283:                     PUSHI  #0x00000007
7344 @ 55288:                     JUMPIF > L_000a
7345 @ 55292:                     PUSH   XTYPE
7346 @ 55295:                     PUSH   SUBATOM
7347 @ 55298:                     ASSVAL
7348 @ 55299:                     LOCATE L_000a

   908           %FINISH
7349 @ 55302:                     LINE   908 "regression-compile-tmp/comp412.imp"
7350 @ 55340:                     LOCATE L_0007

   909           ATOM POS=POS
7351 @ 55343:                     LINE   909 "regression-compile-tmp/comp412.imp"
7352 @ 55381:                     PUSH   ATOMPOS
7353 @ 55384:                     PUSH   POS
7354 @ 55387:                     ASSVAL

   910        %REPEAT;                             ! ROUND FOR ANOTHER
7355 @ 55388:                     LINE   910 "regression-compile-tmp/comp412.imp"
7356 @ 55426:                     REPEAT L_0003
7357 @ 55429:                     LOCATE L_0004

   911        ATOM2=KDICT(DP+1)&63 %IF S < 0;      ! VARIANT
7358 @ 55432:                     LINE   911 "regression-compile-tmp/comp412.imp"
7359 @ 55470:                     PUSH   S
7360 @ 55473:                     PUSHI  #0x00000000
7361 @ 55478:                     JUMPIF >= L_0004
7362 @ 55482:                     PUSH   ATOM2
7363 @ 55485:                     PUSH   KDICT
7364 @ 55488:                     PUSH   DP
7365 @ 55491:                     PUSHI  #0x00000001
7366 @ 55496:                     ADD   
7367 @ 55497:                     ACCESS
7368 @ 55498:                     PUSHI  #0x0000003f
7369 @ 55503:                     AND   
7370 @ 55504:                     ASSVAL
7371 @ 55505:                     LOCATE L_0004

   912        %IF ATOM1=STRING %OR ATOM1=RECORD %START
7372 @ 55508:                     LINE   912 "regression-compile-tmp/comp412.imp"
7373 @ 55546:                     PUSH   ATOM1
7374 @ 55549:                     PUSHI  #0x00000010
7375 @ 55554:                     JUMPIF = L_0005
7376 @ 55558:                     PUSH   ATOM1
7377 @ 55561:                     PUSHI  #0x00000011
7378 @ 55566:                     JUMPIF # L_0004
7379 @ 55570:                     LOCATE L_0005

   913           DTYPE=ATOM1
7380 @ 55573:                     LINE   913 "regression-compile-tmp/comp412.imp"
7381 @ 55611:                     PUSH   DTYPE
7382 @ 55614:                     PUSH   ATOM1
7383 @ 55617:                     ASSVAL

   914           CODE ATOM
7384 @ 55618:                     LINE   914 "regression-compile-tmp/comp412.imp"
7385 @ 55656:                     PUSH   CODEATOM
7386 @ 55659:                     CALL  

   915           %IF DTYPE=STRING %START
7387 @ 55660:                     LINE   915 "regression-compile-tmp/comp412.imp"
7388 @ 55698:                     PUSH   DTYPE
7389 @ 55701:                     PUSHI  #0x00000010
7390 @ 55706:                     JUMPIF # L_0007

   916              ATOM1=0 %AND %RETURN %UNLESS ATOM1=ICONST
7391 @ 55710:                     LINE   916 "regression-compile-tmp/comp412.imp"
7392 @ 55748:                     PUSH   ATOM1
7393 @ 55751:                     PUSHI  #0x00000053
7394 @ 55756:                     JUMPIF = L_000a
7395 @ 55760:                     PUSH   ATOM1
7396 @ 55763:                     PUSHI  #0x00000000
7397 @ 55768:                     ASSVAL
7398 @ 55769:                     RETURN
7399 @ 55770:                     LOCATE L_000a

   917              SLEN=EVAL(SUBATOM);            ! STRING LENGTH
7400 @ 55773:                     LINE   917 "regression-compile-tmp/comp412.imp"
7401 @ 55811:                     PUSH   SLEN
7402 @ 55814:                     PUSH   EVAL
7403 @ 55817:                     PUSH   SUBATOM
7404 @ 55820:                     ASSPAR
7405 @ 55821:                     CALL  
7406 @ 55822:                     ASSVAL

   918              %UNLESS 0 < SLEN <= TEXT LIMIT %START
7407 @ 55823:                     LINE   918 "regression-compile-tmp/comp412.imp"
7408 @ 55861:                     PUSHI  #0x00000000
7409 @ 55866:                     PUSH   SLEN
7410 @ 55869:                     JUMPIFD >= L_000b
7411 @ 55873:                     PUSHI  #0x000000ff
7412 @ 55878:                     JUMPIF <= L_000a
7413 @ 55882:                     LOCATE L_000b

   919                 ATOM1=0; F TYPE=4
7414 @ 55885:                     LINE   919 "regression-compile-tmp/comp412.imp"
7415 @ 55923:                     PUSH   ATOM1
7416 @ 55926:                     PUSHI  #0x00000000
7417 @ 55931:                     ASSVAL
7418 @ 55932:                     LINE   919 "regression-compile-tmp/comp412.imp"
7419 @ 55970:                     PUSH   FTYPE
7420 @ 55973:                     PUSHI  #0x00000004
7421 @ 55978:                     ASSVAL

   920                 %RETURN
7422 @ 55979:                     LINE   920 "regression-compile-tmp/comp412.imp"
7423 @ 56017:                     RETURN

   921              %FINISH
7424 @ 56018:                     LINE   921 "regression-compile-tmp/comp412.imp"
7425 @ 56056:                     LOCATE L_000a

   922              SRMOD=X'40';                   ! TYPE FOR STRING
7426 @ 56059:                     LINE   922 "regression-compile-tmp/comp412.imp"
7427 @ 56097:                     PUSH   SRMOD
7428 @ 56100:                     PUSHI  #0x00000040
7429 @ 56105:                     ASSVAL

   923           %ELSE
7430 @ 56106:                     LINE   923 "regression-compile-tmp/comp412.imp"
7431 @ 56144:                     GOTO   L_0006
7432 @ 56147:                     LOCATE L_0007

   924              %IF ATOM2=IDENT %START
7433 @ 56150:                     LINE   924 "regression-compile-tmp/comp412.imp"
7434 @ 56188:                     PUSH   ATOM2
7435 @ 56191:                     PUSHI  #0x0000003b
7436 @ 56196:                     JUMPIF # L_000a

   925                 LIM=GLOBAL; LOOKUP(T BASE)
7437 @ 56200:                     LINE   925 "regression-compile-tmp/comp412.imp"
7438 @ 56238:                     PUSH   LIM
7439 @ 56241:                     PUSHI  #0x00000000
7440 @ 56246:                     ASSVAL
7441 @ 56247:                     LINE   925 "regression-compile-tmp/comp412.imp"
7442 @ 56285:                     PUSH   LOOKUP
7443 @ 56288:                     PUSH   TBASE
7444 @ 56291:                     ASSPAR
7445 @ 56292:                     CALL  

   926              %FINISH
7446 @ 56293:                     LINE   926 "regression-compile-tmp/comp412.imp"
7447 @ 56331:                     LOCATE L_000a

   927              %UNLESS ATOM2 = RFN %START
7448 @ 56334:                     LINE   927 "regression-compile-tmp/comp412.imp"
7449 @ 56372:                     PUSH   ATOM2
7450 @ 56375:                     PUSHI  #0x00000041
7451 @ 56380:                     JUMPIF = L_000a

   928                 F TYPE = 3
7452 @ 56384:                     LINE   928 "regression-compile-tmp/comp412.imp"
7453 @ 56422:                     PUSH   FTYPE
7454 @ 56425:                     PUSHI  #0x00000003
7455 @ 56430:                     ASSVAL

   929                 ATOM1 = 0;  ATOM2 = 0
7456 @ 56431:                     LINE   929 "regression-compile-tmp/comp412.imp"
7457 @ 56469:                     PUSH   ATOM1
7458 @ 56472:                     PUSHI  #0x00000000
7459 @ 56477:                     ASSVAL
7460 @ 56478:                     LINE   929 "regression-compile-tmp/comp412.imp"
7461 @ 56516:                     PUSH   ATOM2
7462 @ 56519:                     PUSHI  #0x00000000
7463 @ 56524:                     ASSVAL

   930                 %RETURN
7464 @ 56525:                     LINE   930 "regression-compile-tmp/comp412.imp"
7465 @ 56563:                     RETURN

   931              %FINISH
7466 @ 56564:                     LINE   931 "regression-compile-tmp/comp412.imp"
7467 @ 56602:                     LOCATE L_000a

   932              SRMOD=X'50';                   ! TYPE FOR RECORD
7468 @ 56605:                     LINE   932 "regression-compile-tmp/comp412.imp"
7469 @ 56643:                     PUSH   SRMOD
7470 @ 56646:                     PUSHI  #0x00000050
7471 @ 56651:                     ASSVAL

   933           %FINISH
7472 @ 56652:                     LINE   933 "regression-compile-tmp/comp412.imp"
7473 @ 56690:                     LOCATE L_0006

   934           CODE ATOM
7474 @ 56693:                     LINE   934 "regression-compile-tmp/comp412.imp"
7475 @ 56731:                     PUSH   CODEATOM
7476 @ 56734:                     CALL  

   935           ATOM1=0 %AND %RETURN %IF ATOM1#RB
7477 @ 56735:                     LINE   935 "regression-compile-tmp/comp412.imp"
7478 @ 56773:                     PUSH   ATOM1
7479 @ 56776:                     PUSHI  #0x00000002
7480 @ 56781:                     JUMPIF = L_0007
7481 @ 56785:                     PUSH   ATOM1
7482 @ 56788:                     PUSHI  #0x00000000
7483 @ 56793:                     ASSVAL
7484 @ 56794:                     RETURN
7485 @ 56795:                     LOCATE L_0007

   936           %IF SYM TYPE=2 %START;            ! KEYWORD FOLLOWS
7486 @ 56798:                     LINE   936 "regression-compile-tmp/comp412.imp"
7487 @ 56836:                     PUSH   SYMTYPE
7488 @ 56839:                     PUSHI  #0x00000002
7489 @ 56844:                     JUMPIF # L_0007

   937              CODE ATOM
7490 @ 56848:                     LINE   937 "regression-compile-tmp/comp412.imp"
7491 @ 56886:                     PUSH   CODEATOM
7492 @ 56889:                     CALL  

   938              %IF ATOM1 # SPECIAL %AND ATOM2 # SPECIAL %START
7493 @ 56890:                     LINE   938 "regression-compile-tmp/comp412.imp"
7494 @ 56928:                     PUSH   ATOM1
7495 @ 56931:                     PUSHI  #0x00000037
7496 @ 56936:                     JUMPIF = L_000a
7497 @ 56940:                     PUSH   ATOM2
7498 @ 56943:                     PUSHI  #0x00000037
7499 @ 56948:                     JUMPIF = L_000a

   939                 ATOM1 = 0;  ATOM2 = 0;  %RETURN
7500 @ 56952:                     LINE   939 "regression-compile-tmp/comp412.imp"
7501 @ 56990:                     PUSH   ATOM1
7502 @ 56993:                     PUSHI  #0x00000000
7503 @ 56998:                     ASSVAL
7504 @ 56999:                     LINE   939 "regression-compile-tmp/comp412.imp"
7505 @ 57037:                     PUSH   ATOM2
7506 @ 57040:                     PUSHI  #0x00000000
7507 @ 57045:                     ASSVAL
7508 @ 57046:                     LINE   939 "regression-compile-tmp/comp412.imp"
7509 @ 57084:                     RETURN

   940              %FINISH
7510 @ 57085:                     LINE   940 "regression-compile-tmp/comp412.imp"
7511 @ 57123:                     LOCATE L_000a

   941              SUBATOM = 1 %IF SUBATOM = 127;! SPEC
7512 @ 57126:                     LINE   941 "regression-compile-tmp/comp412.imp"
7513 @ 57164:                     PUSH   SUBATOM
7514 @ 57167:                     PUSHI  #0x0000007f
7515 @ 57172:                     JUMPIF # L_000a
7516 @ 57176:                     PUSH   SUBATOM
7517 @ 57179:                     PUSHI  #0x00000001
7518 @ 57184:                     ASSVAL
7519 @ 57185:                     LOCATE L_000a

   942           %FINISH %ELSE SUBATOM=5;          ! NULL SPECIAL
7520 @ 57188:                     LINE   942 "regression-compile-tmp/comp412.imp"
7521 @ 57226:                     GOTO   L_0006
7522 @ 57229:                     LOCATE L_0007
7523 @ 57232:                     PUSH   SUBATOM
7524 @ 57235:                     PUSHI  #0x00000005
7525 @ 57240:                     ASSVAL
7526 @ 57241:                     LOCATE L_0006

   943           ATOM1=0 %AND %RETURN %C
   944           %IF DTYPE=RECORD %AND SUBATOM >= 11
7527 @ 57244:                     LINE   943 "regression-compile-tmp/comp412.imp"
7528 @ 57282:                     PUSH   DTYPE
7529 @ 57285:                     PUSHI  #0x00000011
7530 @ 57290:                     JUMPIF # L_0007
7531 @ 57294:                     PUSH   SUBATOM
7532 @ 57297:                     PUSHI  #0x0000000b
7533 @ 57302:                     JUMPIF < L_0007
7534 @ 57306:                     PUSH   ATOM1
7535 @ 57309:                     PUSHI  #0x00000000
7536 @ 57314:                     ASSVAL
7537 @ 57315:                     RETURN
7538 @ 57316:                     LOCATE L_0007

   945           K=SATOMS(SUBATOM)
7539 @ 57319:                     LINE   945 "regression-compile-tmp/comp412.imp"
7540 @ 57357:                     PUSH   K
7541 @ 57360:                     PUSH   SATOMS
7542 @ 57363:                     PUSH   SUBATOM
7543 @ 57366:                     ACCESS
7544 @ 57367:                     ASSVAL

   946           ATOM1=K&255; ATOM2=K>>8&255
7545 @ 57368:                     LINE   946 "regression-compile-tmp/comp412.imp"
7546 @ 57406:                     PUSH   ATOM1
7547 @ 57409:                     PUSH   K
7548 @ 57412:                     PUSHI  #0x000000ff
7549 @ 57417:                     AND   
7550 @ 57418:                     ASSVAL
7551 @ 57419:                     LINE   946 "regression-compile-tmp/comp412.imp"
7552 @ 57457:                     PUSH   ATOM2
7553 @ 57460:                     PUSH   K
7554 @ 57463:                     PUSHI  #0x00000008
7555 @ 57468:                     RSH   
7556 @ 57469:                     PUSHI  #0x000000ff
7557 @ 57474:                     AND   
7558 @ 57475:                     ASSVAL

   947           SUBATOM=SCLASS(SUBATOM)
7559 @ 57476:                     LINE   947 "regression-compile-tmp/comp412.imp"
7560 @ 57514:                     PUSH   SUBATOM
7561 @ 57517:                     PUSH   SCLASS
7562 @ 57520:                     PUSH   SUBATOM
7563 @ 57523:                     ACCESS
7564 @ 57524:                     ASSVAL

   948        %ELSE
7565 @ 57525:                     LINE   948 "regression-compile-tmp/comp412.imp"
7566 @ 57563:                     GOTO   L_0003
7567 @ 57566:                     LOCATE L_0004

   949           %UNLESS PRE1 <= ATOM1 <= PRE2 %START
7568 @ 57569:                     LINE   949 "regression-compile-tmp/comp412.imp"
7569 @ 57607:                     PUSHI  #0x00000031
7570 @ 57612:                     PUSH   ATOM1
7571 @ 57615:                     JUMPIFD > L_0008
7572 @ 57619:                     PUSHI  #0x00000039
7573 @ 57624:                     JUMPIF <= L_0007
7574 @ 57628:                     LOCATE L_0008

   950              ATOM1=0 %IF PREFIX#0
7575 @ 57631:                     LINE   950 "regression-compile-tmp/comp412.imp"
7576 @ 57669:                     PUSH   PREFIX
7577 @ 57672:                     PUSHI  #0x00000000
7578 @ 57677:                     JUMPIF = L_000a
7579 @ 57681:                     PUSH   ATOM1
7580 @ 57684:                     PUSHI  #0x00000000
7581 @ 57689:                     ASSVAL
7582 @ 57690:                     LOCATE L_000a

   951              %RETURN
7583 @ 57693:                     LINE   951 "regression-compile-tmp/comp412.imp"
7584 @ 57731:                     RETURN

   952           %FINISH
7585 @ 57732:                     LINE   952 "regression-compile-tmp/comp412.imp"
7586 @ 57770:                     LOCATE L_0007

   953        %FINISH
7587 @ 57773:                     LINE   953 "regression-compile-tmp/comp412.imp"
7588 @ 57811:                     LOCATE L_0003

   954        %IF SUBATOM >= SPS %START
7589 @ 57814:                     LINE   954 "regression-compile-tmp/comp412.imp"
7590 @ 57852:                     PUSH   SUBATOM
7591 @ 57855:                     PUSHI  #0x00000075
7592 @ 57860:                     JUMPIF < L_0004

   955           SPEC = -1;  SUBATOM = SPEC SUB(SUBATOM)
7593 @ 57864:                     LINE   955 "regression-compile-tmp/comp412.imp"
7594 @ 57902:                     PUSH   SPEC
7595 @ 57905:                     PUSHI  #0x00000001
7596 @ 57910:                     NEGATE
7597 @ 57911:                     ASSVAL
7598 @ 57912:                     LINE   955 "regression-compile-tmp/comp412.imp"
7599 @ 57950:                     PUSH   SUBATOM
7600 @ 57953:                     PUSH   SPECSUB
7601 @ 57956:                     PUSH   SUBATOM
7602 @ 57959:                     ACCESS
7603 @ 57960:                     ASSVAL

   956        %ELSE %IF SUBATOM >= XSPS
7604 @ 57961:                     LINE   956 "regression-compile-tmp/comp412.imp"
7605 @ 57999:                     GOTO   L_0003
7606 @ 58002:                     LOCATE L_0004
7607 @ 58005:                     PUSH   SUBATOM
7608 @ 58008:                     PUSHI  #0x0000006d
7609 @ 58013:                     JUMPIF < L_0004

   957           %IF XTYPE # 6 %START
7610 @ 58017:                     LINE   957 "regression-compile-tmp/comp412.imp"
7611 @ 58055:                     PUSH   XTYPE
7612 @ 58058:                     PUSHI  #0x00000006
7613 @ 58063:                     JUMPIF = L_0007

   958              ATOM1 = 0;  ATOM2 = 0;  %RETURN
7614 @ 58067:                     LINE   958 "regression-compile-tmp/comp412.imp"
7615 @ 58105:                     PUSH   ATOM1
7616 @ 58108:                     PUSHI  #0x00000000
7617 @ 58113:                     ASSVAL
7618 @ 58114:                     LINE   958 "regression-compile-tmp/comp412.imp"
7619 @ 58152:                     PUSH   ATOM2
7620 @ 58155:                     PUSHI  #0x00000000
7621 @ 58160:                     ASSVAL
7622 @ 58161:                     LINE   958 "regression-compile-tmp/comp412.imp"
7623 @ 58199:                     RETURN

   959           %FINISH
7624 @ 58200:                     LINE   959 "regression-compile-tmp/comp412.imp"
7625 @ 58238:                     LOCATE L_0007

   960           XTYPE = 3;                         ! EXTRINSIC!!
7626 @ 58241:                     LINE   960 "regression-compile-tmp/comp412.imp"
7627 @ 58279:                     PUSH   XTYPE
7628 @ 58282:                     PUSHI  #0x00000003
7629 @ 58287:                     ASSVAL

   961           SUBATOM = XMOD(SUBATOM)
7630 @ 58288:                     LINE   961 "regression-compile-tmp/comp412.imp"
7631 @ 58326:                     PUSH   SUBATOM
7632 @ 58329:                     PUSH   XMOD
7633 @ 58332:                     PUSH   SUBATOM
7634 @ 58335:                     ACCESS
7635 @ 58336:                     ASSVAL

   962           SRMOD = SRMOD-X'10' %IF SRMOD # 0
7636 @ 58337:                     LINE   962 "regression-compile-tmp/comp412.imp"
7637 @ 58375:                     PUSH   SRMOD
7638 @ 58378:                     PUSHI  #0x00000000
7639 @ 58383:                     JUMPIF = L_0007
7640 @ 58387:                     PUSH   SRMOD
7641 @ 58390:                     PUSH   SRMOD
7642 @ 58393:                     PUSHI  #0x00000010
7643 @ 58398:                     SUB   
7644 @ 58399:                     ASSVAL
7645 @ 58400:                     LOCATE L_0007

   963        %FINISH
7646 @ 58403:                     LINE   963 "regression-compile-tmp/comp412.imp"
7647 @ 58441:                     LOCATE L_0004
7648 @ 58444:                     LOCATE L_0003

   964        %IF PREFIX&64#0 %START;              ! OWN DATA
7649 @ 58447:                     LINE   964 "regression-compile-tmp/comp412.imp"
7650 @ 58485:                     PUSH   PREFIX
7651 @ 58488:                     PUSHI  #0x00000040
7652 @ 58493:                     AND   
7653 @ 58494:                     PUSHI  #0x00000000
7654 @ 58499:                     JUMPIF = L_0004

   965           %UNLESS ATOM1 = OWN1 %OR ATOM1 = OWN2 %START;! NON-DATA
7655 @ 58503:                     LINE   965 "regression-compile-tmp/comp412.imp"
7656 @ 58541:                     PUSH   ATOM1
7657 @ 58544:                     PUSHI  #0x00000035
7658 @ 58549:                     JUMPIF = L_0007
7659 @ 58553:                     PUSH   ATOM1
7660 @ 58556:                     PUSHI  #0x00000033
7661 @ 58561:                     JUMPIF = L_0007

   966              %IF XTYPE <= 3 %START;          ! CONSTROUTINE ?
7662 @ 58565:                     LINE   966 "regression-compile-tmp/comp412.imp"
7663 @ 58603:                     PUSH   XTYPE
7664 @ 58606:                     PUSHI  #0x00000003
7665 @ 58611:                     JUMPIF > L_000a

   967                 ATOM1 = 0;  %RETURN
7666 @ 58615:                     LINE   967 "regression-compile-tmp/comp412.imp"
7667 @ 58653:                     PUSH   ATOM1
7668 @ 58656:                     PUSHI  #0x00000000
7669 @ 58661:                     ASSVAL
7670 @ 58662:                     LINE   967 "regression-compile-tmp/comp412.imp"
7671 @ 58700:                     RETURN

   968              %FINISH
7672 @ 58701:                     LINE   968 "regression-compile-tmp/comp412.imp"
7673 @ 58739:                     LOCATE L_000a

   969           %ELSE
7674 @ 58742:                     LINE   969 "regression-compile-tmp/comp412.imp"
7675 @ 58780:                     GOTO   L_0006
7676 @ 58783:                     LOCATE L_0007

   970              ATOM1=ATOM1+1;                 ! ONTO '%OWN' VARIANT
7677 @ 58786:                     LINE   970 "regression-compile-tmp/comp412.imp"
7678 @ 58824:                     PUSH   ATOM1
7679 @ 58827:                     PUSH   ATOM1
7680 @ 58830:                     PUSHI  #0x00000001
7681 @ 58835:                     ADD   
7682 @ 58836:                     ASSVAL

   971              OUT=(SUB ATOM+SRMOD)>>4
7683 @ 58837:                     LINE   971 "regression-compile-tmp/comp412.imp"
7684 @ 58875:                     PUSH   OUT
7685 @ 58878:                     PUSH   SUBATOM
7686 @ 58881:                     PUSH   SRMOD
7687 @ 58884:                     ADD   
7688 @ 58885:                     PUSHI  #0x00000004
7689 @ 58890:                     RSH   
7690 @ 58891:                     ASSVAL

   972              %IF SUBATOM&1 = 0  %START;     ! CONSTNAME ?
7691 @ 58892:                     LINE   972 "regression-compile-tmp/comp412.imp"
7692 @ 58930:                     PUSH   SUBATOM
7693 @ 58933:                     PUSHI  #0x00000001
7694 @ 58938:                     AND   
7695 @ 58939:                     PUSHI  #0x00000000
7696 @ 58944:                     JUMPIF # L_000a

   973                 OUT = 1;                    ! ADDRESSES ARE INTEGERS
7697 @ 58948:                     LINE   973 "regression-compile-tmp/comp412.imp"
7698 @ 58986:                     PUSH   OUT
7699 @ 58989:                     PUSHI  #0x00000001
7700 @ 58994:                     ASSVAL

   974              %ELSE
7701 @ 58995:                     LINE   974 "regression-compile-tmp/comp412.imp"
7702 @ 59033:                     GOTO   L_0009
7703 @ 59036:                     LOCATE L_000a

   975                 CONST INT = 1 %IF XTYPE = 2 %C
   976                             %AND (SUBATOM+SRMOD)&X'70' <= X'30'
7704 @ 59039:                     LINE   975 "regression-compile-tmp/comp412.imp"
7705 @ 59077:                     PUSH   XTYPE
7706 @ 59080:                     PUSHI  #0x00000002
7707 @ 59085:                     JUMPIF # L_000d
7708 @ 59089:                     PUSH   SUBATOM
7709 @ 59092:                     PUSH   SRMOD
7710 @ 59095:                     ADD   
7711 @ 59096:                     PUSHI  #0x00000070
7712 @ 59101:                     AND   
7713 @ 59102:                     PUSHI  #0x00000030
7714 @ 59107:                     JUMPIF > L_000d
7715 @ 59111:                     PUSH   CONSTINT
7716 @ 59114:                     PUSHI  #0x00000001
7717 @ 59119:                     ASSVAL
7718 @ 59120:                     LOCATE L_000d

   977              %FINISH
7719 @ 59123:                     LINE   977 "regression-compile-tmp/comp412.imp"
7720 @ 59161:                     LOCATE L_0009

   978              OUT = 15 %IF XTYPE = 3;        ! DON'T INITIALIZE EXTRINSICS
7721 @ 59164:                     LINE   978 "regression-compile-tmp/comp412.imp"
7722 @ 59202:                     PUSH   XTYPE
7723 @ 59205:                     PUSHI  #0x00000003
7724 @ 59210:                     JUMPIF # L_000a
7725 @ 59214:                     PUSH   OUT
7726 @ 59217:                     PUSHI  #0x0000000f
7727 @ 59222:                     ASSVAL
7728 @ 59223:                     LOCATE L_000a

   979           %FINISH
7729 @ 59226:                     LINE   979 "regression-compile-tmp/comp412.imp"
7730 @ 59264:                     LOCATE L_0006

   980        %FINISH
7731 @ 59267:                     LINE   980 "regression-compile-tmp/comp412.imp"
7732 @ 59305:                     LOCATE L_0004

   981        SUBATOM=SUBATOM+LREALS %IF SUBATOM&X'70'=X'60'
7733 @ 59308:                     LINE   981 "regression-compile-tmp/comp412.imp"
7734 @ 59346:                     PUSH   SUBATOM
7735 @ 59349:                     PUSHI  #0x00000070
7736 @ 59354:                     AND   
7737 @ 59355:                     PUSHI  #0x00000060
7738 @ 59360:                     JUMPIF # L_0004
7739 @ 59364:                     PUSH   SUBATOM
7740 @ 59367:                     PUSH   SUBATOM
7741 @ 59370:                     PUSH   LREALS
7742 @ 59373:                     ADD   
7743 @ 59374:                     ASSVAL
7744 @ 59375:                     LOCATE L_0004

   982        SUBATOM=SUBATOM+SLEN<<8+SRMOD+(PREFIX>>3&X'70')
7745 @ 59378:                     LINE   982 "regression-compile-tmp/comp412.imp"
7746 @ 59416:                     PUSH   SUBATOM
7747 @ 59419:                     PUSH   SUBATOM
7748 @ 59422:                     PUSH   SLEN
7749 @ 59425:                     PUSHI  #0x00000008
7750 @ 59430:                     LSH   
7751 @ 59431:                     ADD   
7752 @ 59432:                     PUSH   SRMOD
7753 @ 59435:                     ADD   
7754 @ 59436:                     PUSH   PREFIX
7755 @ 59439:                     PUSHI  #0x00000003
7756 @ 59444:                     RSH   
7757 @ 59445:                     PUSHI  #0x00000070
7758 @ 59450:                     AND   
7759 @ 59451:                     ADD   
7760 @ 59452:                     ASSVAL

   983        DEC TYPE=SUBATOM
7761 @ 59453:                     LINE   983 "regression-compile-tmp/comp412.imp"
7762 @ 59491:                     PUSH   DECTYPE
7763 @ 59494:                     PUSH   SUBATOM
7764 @ 59497:                     ASSVAL

   984        SPREFIX=XTYPE
7765 @ 59498:                     LINE   984 "regression-compile-tmp/comp412.imp"
7766 @ 59536:                     PUSH   SPREFIX
7767 @ 59539:                     PUSH   XTYPE
7768 @ 59542:                     ASSVAL

   985        PREFIX=0
7769 @ 59543:                     LINE   985 "regression-compile-tmp/comp412.imp"
7770 @ 59581:                     PUSH   PREFIX
7771 @ 59584:                     PUSHI  #0x00000000
7772 @ 59589:                     ASSVAL

   986     %END
   987  !*************************************************************
   988  !* DEC TYPE: <EXT><EXTR><CONST><OWN><DYN><SYS><FLAG1><FLAG2> *
   989  !*************************************************************
7773 @ 59590:                     LINE   986 "regression-compile-tmp/comp412.imp"
7774 @ 59628:                  END    _lev0id0_COMPILEBLOCK_ANALYSESS_CODEATOM {lev=4 --> 3}

   990     %INTEGERFN GAPP
7775 @ 59629:                  LINE   990 "regression-compile-tmp/comp412.imp"
7776 @ 59667:                  DEF    GAPP (_lev0id0_COMPILEBLOCK_ANALYSESS_GAPP) p1=V_00ed a/tf=18 b/format=1 c/ostate=10  type=1 (integer) form=8 (function) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=1 unass=0
7777 @ 59683:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
7778 @ 59684:                     FINISH ) {lev=4}

   991        %CONSTINTEGER PSEP = 129, PCALL = 130
7779 @ 59685:                     LINE   991 "regression-compile-tmp/comp412.imp"

   992        %INTEGER L, P, TYPE, NEXT, C
7780 @ 59723:                     LINE   992 "regression-compile-tmp/comp412.imp"
7781 @ 59761:                     DEF    L p1=V_00ee a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
7782 @ 59774:                     DEF    P p1=V_00ef a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
7783 @ 59787:                     DEF    TYPE p1=V_00f0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
7784 @ 59803:                     DEF    NEXT p1=V_00f1 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
7785 @ 59819:                     DEF    C p1=V_00f2 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

   993        %INTEGERFN CLASS(%INTEGER T)
7786 @ 59832:                     LINE   993 "regression-compile-tmp/comp412.imp"
7787 @ 59870:                     DEF    CLASS (_lev0id0_COMPILEBLOCK_ANALYSESS_GAPP_CLASS) p1=V_00f3 a/tf=18 b/format=1 c/ostate=10  type=1 (integer) form=8 (function) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=1 unass=0
7788 @ 59887:                        START  ( FORMAL PARAMETERS  {lev=5 --> 6, nested=0 --> 1}
7789 @ 59888:                           DEF    T p1=V_00f4 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
7790 @ 59901:                        FINISH ) {lev=5}

   994           %CONSTBYTEINTEGERARRAY EXPS(0 : 7)=0,147(3),140,0,146(2)
7791 @ 59902:                        LINE   994 "regression-compile-tmp/comp412.imp"
7792 @ 59940:                        PUSHI  #0x00000000
7793 @ 59945:                        PUSHI  #0x00000007
7794 @ 59950:                        BOUNDS
7795 @ 59951:                        DEF    EXPS p1=V_00f5 a/tf=1b b/format=2 c/ostate=112  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
7796 @ 59967:                        PUSHI  #0x00000000
7797 @ 59972:                        INIT   1
7798 @ 59975:                        PUSHI  #0x00000093
7799 @ 59980:                        INIT   3
7800 @ 59983:                        PUSHI  #0x0000008c
7801 @ 59988:                        INIT   1
7802 @ 59991:                        PUSHI  #0x00000000
7803 @ 59996:                        INIT   1
7804 @ 59999:                        PUSHI  #0x00000092
7805 @ 60004:                        INIT   2

   995           %CONSTBYTEINTEGERARRAY PARM MAP(0 : 15)=0,0,137,0,0,0,0,122,
   996                                               176,177,123,0,159,0,0,0
7806 @ 60007:                        LINE   995 "regression-compile-tmp/comp412.imp"
7807 @ 60045:                        PUSHI  #0x00000000
7808 @ 60050:                        PUSHI  #0x0000000f
7809 @ 60055:                        BOUNDS
7810 @ 60056:                        DEF    PARMMAP p1=V_00f6 a/tf=1b b/format=2 c/ostate=112  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
7811 @ 60075:                        PUSHI  #0x00000000
7812 @ 60080:                        INIT   1
7813 @ 60083:                        PUSHI  #0x00000000
7814 @ 60088:                        INIT   1
7815 @ 60091:                        PUSHI  #0x00000089
7816 @ 60096:                        INIT   1
7817 @ 60099:                        PUSHI  #0x00000000
7818 @ 60104:                        INIT   1
7819 @ 60107:                        PUSHI  #0x00000000
7820 @ 60112:                        INIT   1
7821 @ 60115:                        PUSHI  #0x00000000
7822 @ 60120:                        INIT   1
7823 @ 60123:                        PUSHI  #0x00000000
7824 @ 60128:                        INIT   1
7825 @ 60131:                        PUSHI  #0x0000007a
7826 @ 60136:                        INIT   1
7827 @ 60139:                        PUSHI  #0x000000b0
7828 @ 60144:                        INIT   1
7829 @ 60147:                        PUSHI  #0x000000b1
7830 @ 60152:                        INIT   1
7831 @ 60155:                        PUSHI  #0x0000007b
7832 @ 60160:                        INIT   1
7833 @ 60163:                        PUSHI  #0x00000000
7834 @ 60168:                        INIT   1
7835 @ 60171:                        PUSHI  #0x0000009f
7836 @ 60176:                        INIT   1
7837 @ 60179:                        PUSHI  #0x00000000
7838 @ 60184:                        INIT   1
7839 @ 60187:                        PUSHI  #0x00000000
7840 @ 60192:                        INIT   1
7841 @ 60195:                        PUSHI  #0x00000000
7842 @ 60200:                        INIT   1

   997           %CONSTBYTEINTEGERARRAY TMOD(0:7) = 0,8(3),4,0,9,9
7843 @ 60203:                        LINE   997 "regression-compile-tmp/comp412.imp"
7844 @ 60241:                        PUSHI  #0x00000000
7845 @ 60246:                        PUSHI  #0x00000007
7846 @ 60251:                        BOUNDS
7847 @ 60252:                        DEF    TMOD p1=V_00f7 a/tf=1b b/format=2 c/ostate=112  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
7848 @ 60268:                        PUSHI  #0x00000000
7849 @ 60273:                        INIT   1
7850 @ 60276:                        PUSHI  #0x00000008
7851 @ 60281:                        INIT   3
7852 @ 60284:                        PUSHI  #0x00000004
7853 @ 60289:                        INIT   1
7854 @ 60292:                        PUSHI  #0x00000000
7855 @ 60297:                        INIT   1
7856 @ 60300:                        PUSHI  #0x00000009
7857 @ 60305:                        INIT   1
7858 @ 60308:                        PUSHI  #0x00000009
7859 @ 60313:                        INIT   1

   998           TYPE = T>>4
7860 @ 60316:                        LINE   998 "regression-compile-tmp/comp412.imp"
7861 @ 60354:                        PUSH   TYPE
7862 @ 60357:                        PUSH   T
7863 @ 60360:                        PUSHI  #0x00000004
7864 @ 60365:                        RSH   
7865 @ 60366:                        ASSVAL

   999           TYPE = TMOD(TYPE) %AND %RESULT = EXPS(T>>4) %IF T&15 = 1;! EXPRN
7866 @ 60367:                        LINE   999 "regression-compile-tmp/comp412.imp"
7867 @ 60405:                        PUSH   T
7868 @ 60408:                        PUSHI  #0x0000000f
7869 @ 60413:                        AND   
7870 @ 60414:                        PUSHI  #0x00000001
7871 @ 60419:                        JUMPIF # L_0004
7872 @ 60423:                        PUSH   TYPE
7873 @ 60426:                        PUSH   TMOD
7874 @ 60429:                        PUSH   TYPE
7875 @ 60432:                        ACCESS
7876 @ 60433:                        ASSVAL
7877 @ 60434:                        PUSH   EXPS
7878 @ 60437:                        PUSH   T
7879 @ 60440:                        PUSHI  #0x00000004
7880 @ 60445:                        RSH   
7881 @ 60446:                        ACCESS
7882 @ 60447:                        RESULT
7883 @ 60448:                        LOCATE L_0004

  1000           TYPE = 10 %IF TYPE = 0
7884 @ 60451:                        LINE   1000 "regression-compile-tmp/comp412.imp"
7885 @ 60489:                        PUSH   TYPE
7886 @ 60492:                        PUSHI  #0x00000000
7887 @ 60497:                        JUMPIF # L_0004
7888 @ 60501:                        PUSH   TYPE
7889 @ 60504:                        PUSHI  #0x0000000a
7890 @ 60509:                        ASSVAL
7891 @ 60510:                        LOCATE L_0004

  1001           %RESULT=PARM MAP(T&15);           ! CORRECT CLASS FOR NAMES
7892 @ 60513:                        LINE   1001 "regression-compile-tmp/comp412.imp"
7893 @ 60551:                        PUSH   PARMMAP
7894 @ 60554:                        PUSH   T
7895 @ 60557:                        PUSHI  #0x0000000f
7896 @ 60562:                        AND   
7897 @ 60563:                        ACCESS
7898 @ 60564:                        RESULT

  1002        %END
7899 @ 60565:                        LINE   1002 "regression-compile-tmp/comp412.imp"
7900 @ 60603:                     END    _lev0id0_COMPILEBLOCK_ANALYSESS_GAPP_CLASS {lev=5 --> 4}

  1003        %ROUTINE SET GCELL(%INTEGER C, GC, LEN)
7901 @ 60604:                     LINE   1003 "regression-compile-tmp/comp412.imp"
7902 @ 60642:                     DEF    SETGCELL (_lev0id0_COMPILEBLOCK_ANALYSESS_GAPP_SETGCELL) p1=V_00f4 a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
7903 @ 60662:                        START  ( FORMAL PARAMETERS  {lev=5 --> 6, nested=0 --> 1}
7904 @ 60663:                           DEF    C p1=V_00f5 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
7905 @ 60676:                           DEF    GC p1=V_00f6 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
7906 @ 60690:                           DEF    LEN p1=V_00f7 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
7907 @ 60705:                        FINISH ) {lev=5}

  1004           C = C<<9;  C = C+L %UNLESS GC = PCALL
7908 @ 60706:                        LINE   1004 "regression-compile-tmp/comp412.imp"
7909 @ 60744:                        PUSH   C
7910 @ 60747:                        PUSH   C
7911 @ 60750:                        PUSHI  #0x00000009
7912 @ 60755:                        LSH   
7913 @ 60756:                        ASSVAL
7914 @ 60757:                        LINE   1004 "regression-compile-tmp/comp412.imp"
7915 @ 60795:                        PUSH   GC
7916 @ 60798:                        PUSHI  #0x00000082
7917 @ 60803:                        JUMPIF = L_0004
7918 @ 60807:                        PUSH   C
7919 @ 60810:                        PUSH   C
7920 @ 60813:                        PUSH   L
7921 @ 60816:                        ADD   
7922 @ 60817:                        ASSVAL
7923 @ 60818:                        LOCATE L_0004

  1005           %WHILE L#GLIMIT %CYCLE
7924 @ 60821:                        LINE   1005 "regression-compile-tmp/comp412.imp"
7925 @ 60859:                        LOCATE L_0003
7926 @ 60862:                        PUSH   L
7927 @ 60865:                        PUSH   GLIMIT
7928 @ 60868:                        JUMPIF = L_0004

  1006              L=L+1
7929 @ 60872:                        LINE   1006 "regression-compile-tmp/comp412.imp"
7930 @ 60910:                        PUSH   L
7931 @ 60913:                        PUSH   L
7932 @ 60916:                        PUSHI  #0x00000001
7933 @ 60921:                        ADD   
7934 @ 60922:                        ASSVAL

  1007              %RETURN %IF GRAM(L)=C %AND GCLASS(L) = GC %C
  1008              %AND (TAG&X'70'#X'40' %OR GRAM(L-1)=LEN)
7935 @ 60923:                        LINE   1007 "regression-compile-tmp/comp412.imp"
7936 @ 60961:                        PUSH   GRAM
7937 @ 60964:                        PUSH   L
7938 @ 60967:                        ACCESS
7939 @ 60968:                        PUSH   C
7940 @ 60971:                        JUMPIF # L_0007
7941 @ 60975:                        PUSH   GCLASS
7942 @ 60978:                        PUSH   L
7943 @ 60981:                        ACCESS
7944 @ 60982:                        PUSH   GC
7945 @ 60985:                        JUMPIF # L_0007
7946 @ 60989:                        PUSH   TAG
7947 @ 60992:                        PUSHI  #0x00000070
7948 @ 60997:                        AND   
7949 @ 60998:                        PUSHI  #0x00000040
7950 @ 61003:                        JUMPIF # L_0008
7951 @ 61007:                        PUSH   GRAM
7952 @ 61010:                        PUSH   L
7953 @ 61013:                        PUSHI  #0x00000001
7954 @ 61018:                        SUB   
7955 @ 61019:                        ACCESS
7956 @ 61020:                        PUSH   LEN
7957 @ 61023:                        JUMPIF # L_0007
7958 @ 61027:                        LOCATE L_0008
7959 @ 61030:                        RETURN
7960 @ 61031:                        LOCATE L_0007

  1009           %REPEAT
7961 @ 61034:                        LINE   1009 "regression-compile-tmp/comp412.imp"
7962 @ 61072:                        REPEAT L_0003
7963 @ 61075:                        LOCATE L_0004

  1010           %IF TAG&X'70'=X'40' %START
7964 @ 61078:                        LINE   1010 "regression-compile-tmp/comp412.imp"
7965 @ 61116:                        PUSH   TAG
7966 @ 61119:                        PUSHI  #0x00000070
7967 @ 61124:                        AND   
7968 @ 61125:                        PUSHI  #0x00000040
7969 @ 61130:                        JUMPIF # L_0004

  1011              GLIMIT=GLIMIT+1;  GRAM(GLIMIT)=LEN;  ! SET STRING LE
7970 @ 61134:                        LINE   1011 "regression-compile-tmp/comp412.imp"
7971 @ 61172:                        PUSH   GLIMIT
7972 @ 61175:                        PUSH   GLIMIT
7973 @ 61178:                        PUSHI  #0x00000001
7974 @ 61183:                        ADD   
7975 @ 61184:                        ASSVAL
7976 @ 61185:                        LINE   1011 "regression-compile-tmp/comp412.imp"
7977 @ 61223:                        PUSH   GRAM
7978 @ 61226:                        PUSH   GLIMIT
7979 @ 61229:                        ACCESS
7980 @ 61230:                        PUSH   LEN
7981 @ 61233:                        ASSVAL

  1012           %FINISH
7982 @ 61234:                        LINE   1012 "regression-compile-tmp/comp412.imp"
7983 @ 61272:                        LOCATE L_0004

  1013           GLIMIT=GLIMIT+1; GRAM(GLIMIT)=C;  GCLASS(GLIMIT) = GC
7984 @ 61275:                        LINE   1013 "regression-compile-tmp/comp412.imp"
7985 @ 61313:                        PUSH   GLIMIT
7986 @ 61316:                        PUSH   GLIMIT
7987 @ 61319:                        PUSHI  #0x00000001
7988 @ 61324:                        ADD   
7989 @ 61325:                        ASSVAL
7990 @ 61326:                        LINE   1013 "regression-compile-tmp/comp412.imp"
7991 @ 61364:                        PUSH   GRAM
7992 @ 61367:                        PUSH   GLIMIT
7993 @ 61370:                        ACCESS
7994 @ 61371:                        PUSH   C
7995 @ 61374:                        ASSVAL
7996 @ 61375:                        LINE   1013 "regression-compile-tmp/comp412.imp"
7997 @ 61413:                        PUSH   GCLASS
7998 @ 61416:                        PUSH   GLIMIT
7999 @ 61419:                        ACCESS
8000 @ 61420:                        PUSH   GC
8001 @ 61423:                        ASSVAL

  1014           L=GLIMIT
8002 @ 61424:                        LINE   1014 "regression-compile-tmp/comp412.imp"
8003 @ 61462:                        PUSH   L
8004 @ 61465:                        PUSH   GLIMIT
8005 @ 61468:                        ASSVAL

  1015           %IF DIAG&4 # 0 %START
8006 @ 61469:                        LINE   1015 "regression-compile-tmp/comp412.imp"
8007 @ 61507:                        PUSH   DIAG
8008 @ 61510:                        PUSHI  #0x00000004
8009 @ 61515:                        AND   
8010 @ 61516:                        PUSHI  #0x00000000
8011 @ 61521:                        JUMPIF = L_0004

  1016              PRINTSTRING("SET");  WRITE(L, 3)
8012 @ 61525:                        LINE   1016 "regression-compile-tmp/comp412.imp"
8013 @ 61563:                        PUSH   PRINTSTRING
8014 @ 61566:                        PUSHS  "SET"
8015 @ 61571:                        ASSPAR
8016 @ 61572:                        CALL  
8017 @ 61573:                        LINE   1016 "regression-compile-tmp/comp412.imp"
8018 @ 61611:                        PUSH   WRITE
8019 @ 61614:                        PUSH   L
8020 @ 61617:                        ASSPAR
8021 @ 61618:                        PUSHI  #0x00000003
8022 @ 61623:                        ASSPAR
8023 @ 61624:                        CALL  

  1017              WRITE(C, 3);  WRITE(GC, 3);  WRITE(LEN, 3)
8024 @ 61625:                        LINE   1017 "regression-compile-tmp/comp412.imp"
8025 @ 61663:                        PUSH   WRITE
8026 @ 61666:                        PUSH   C
8027 @ 61669:                        ASSPAR
8028 @ 61670:                        PUSHI  #0x00000003
8029 @ 61675:                        ASSPAR
8030 @ 61676:                        CALL  
8031 @ 61677:                        LINE   1017 "regression-compile-tmp/comp412.imp"
8032 @ 61715:                        PUSH   WRITE
8033 @ 61718:                        PUSH   GC
8034 @ 61721:                        ASSPAR
8035 @ 61722:                        PUSHI  #0x00000003
8036 @ 61727:                        ASSPAR
8037 @ 61728:                        CALL  
8038 @ 61729:                        LINE   1017 "regression-compile-tmp/comp412.imp"
8039 @ 61767:                        PUSH   WRITE
8040 @ 61770:                        PUSH   LEN
8041 @ 61773:                        ASSPAR
8042 @ 61774:                        PUSHI  #0x00000003
8043 @ 61779:                        ASSPAR
8044 @ 61780:                        CALL  

  1018              NEWLINE
8045 @ 61781:                        LINE   1018 "regression-compile-tmp/comp412.imp"
8046 @ 61819:                        PUSH   NEWLINE
8047 @ 61822:                        CALL  

  1019           %FINISH
8048 @ 61823:                        LINE   1019 "regression-compile-tmp/comp412.imp"
8049 @ 61861:                        LOCATE L_0004

  1020        %END
  1021  
8050 @ 61864:                        LINE   1020 "regression-compile-tmp/comp412.imp"
8051 @ 61902:                     END    _lev0id0_COMPILEBLOCK_ANALYSESS_GAPP_SETGCELL {lev=5 --> 4}

  1022        %RESULT = NULL %IF TBASE=TMAX
8052 @ 61903:                     LINE   1022 "regression-compile-tmp/comp412.imp"
8053 @ 61941:                     PUSH   TBASE
8054 @ 61944:                     PUSH   TMAX
8055 @ 61947:                     JUMPIF # L_0004
8056 @ 61951:                     PUSHI  #0x00000200
8057 @ 61956:                     RESULT
8058 @ 61957:                     LOCATE L_0004

  1023        L = GBASE;  P = TMAX
8059 @ 61960:                     LINE   1023 "regression-compile-tmp/comp412.imp"
8060 @ 61998:                     PUSH   L
8061 @ 62001:                     PUSHI  #0x000001aa
8062 @ 62006:                     ASSVAL
8063 @ 62007:                     LINE   1023 "regression-compile-tmp/comp412.imp"
8064 @ 62045:                     PUSH   P
8065 @ 62048:                     PUSH   TMAX
8066 @ 62051:                     ASSVAL

  1024        SET GCELL(0, PCALL, 0)
8067 @ 62052:                     LINE   1024 "regression-compile-tmp/comp412.imp"
8068 @ 62090:                     PUSH   SETGCELL
8069 @ 62093:                     PUSHI  #0x00000000
8070 @ 62098:                     ASSPAR
8071 @ 62099:                     PUSHI  #0x00000082
8072 @ 62104:                     ASSPAR
8073 @ 62105:                     PUSHI  #0x00000000
8074 @ 62110:                     ASSPAR
8075 @ 62111:                     CALL  

  1025        %CYCLE
8076 @ 62112:                     LINE   1025 "regression-compile-tmp/comp412.imp"
8077 @ 62150:                     LOCATE L_0003

  1026           P = P-1
8078 @ 62153:                     LINE   1026 "regression-compile-tmp/comp412.imp"
8079 @ 62191:                     PUSH   P
8080 @ 62194:                     PUSH   P
8081 @ 62197:                     PUSHI  #0x00000001
8082 @ 62202:                     SUB   
8083 @ 62203:                     ASSVAL

  1027           NEXT = P-DICT(P)&255-2
8084 @ 62204:                     LINE   1027 "regression-compile-tmp/comp412.imp"
8085 @ 62242:                     PUSH   NEXT
8086 @ 62245:                     PUSH   P
8087 @ 62248:                     PUSH   DICT
8088 @ 62251:                     PUSH   P
8089 @ 62254:                     ACCESS
8090 @ 62255:                     PUSHI  #0x000000ff
8091 @ 62260:                     AND   
8092 @ 62261:                     SUB   
8093 @ 62262:                     PUSHI  #0x00000002
8094 @ 62267:                     SUB   
8095 @ 62268:                     ASSVAL

  1028           TAG = DICT(P-1)
8096 @ 62269:                     LINE   1028 "regression-compile-tmp/comp412.imp"
8097 @ 62307:                     PUSH   TAG
8098 @ 62310:                     PUSH   DICT
8099 @ 62313:                     PUSH   P
8100 @ 62316:                     PUSHI  #0x00000001
8101 @ 62321:                     SUB   
8102 @ 62322:                     ACCESS
8103 @ 62323:                     ASSVAL

  1029           C = CLASS(TAG&127)
8104 @ 62324:                     LINE   1029 "regression-compile-tmp/comp412.imp"
8105 @ 62362:                     PUSH   C
8106 @ 62365:                     PUSH   CLASS
8107 @ 62368:                     PUSH   TAG
8108 @ 62371:                     PUSHI  #0x0000007f
8109 @ 62376:                     AND   
8110 @ 62377:                     ASSPAR
8111 @ 62378:                     CALL  
8112 @ 62379:                     ASSVAL

  1030           SET GCELL(TYPE, C, TAG>>8&255)
8113 @ 62380:                     LINE   1030 "regression-compile-tmp/comp412.imp"
8114 @ 62418:                     PUSH   SETGCELL
8115 @ 62421:                     PUSH   TYPE
8116 @ 62424:                     ASSPAR
8117 @ 62425:                     PUSH   C
8118 @ 62428:                     ASSPAR
8119 @ 62429:                     PUSH   TAG
8120 @ 62432:                     PUSHI  #0x00000008
8121 @ 62437:                     RSH   
8122 @ 62438:                     PUSHI  #0x000000ff
8123 @ 62443:                     AND   
8124 @ 62444:                     ASSPAR
8125 @ 62445:                     CALL  

  1031           %EXIT %IF NEXT <= TBASE
8126 @ 62446:                     LINE   1031 "regression-compile-tmp/comp412.imp"
8127 @ 62484:                     PUSH   NEXT
8128 @ 62487:                     PUSH   TBASE
8129 @ 62490:                     JUMPIF > L_0007
8130 @ 62494:                     GOTO   L_0004
8131 @ 62497:                     LOCATE L_0007

  1032           P = NEXT
8132 @ 62500:                     LINE   1032 "regression-compile-tmp/comp412.imp"
8133 @ 62538:                     PUSH   P
8134 @ 62541:                     PUSH   NEXT
8135 @ 62544:                     ASSVAL

  1033           SET GCELL(0, PSEP, 0)
8136 @ 62545:                     LINE   1033 "regression-compile-tmp/comp412.imp"
8137 @ 62583:                     PUSH   SETGCELL
8138 @ 62586:                     PUSHI  #0x00000000
8139 @ 62591:                     ASSPAR
8140 @ 62592:                     PUSHI  #0x00000081
8141 @ 62597:                     ASSPAR
8142 @ 62598:                     PUSHI  #0x00000000
8143 @ 62603:                     ASSPAR
8144 @ 62604:                     CALL  

  1034        %REPEAT
8145 @ 62605:                     LINE   1034 "regression-compile-tmp/comp412.imp"
8146 @ 62643:                     REPEAT L_0003
8147 @ 62646:                     LOCATE L_0004

  1035        SET GCELL(0, LB, 0)
8148 @ 62649:                     LINE   1035 "regression-compile-tmp/comp412.imp"
8149 @ 62687:                     PUSH   SETGCELL
8150 @ 62690:                     PUSHI  #0x00000000
8151 @ 62695:                     ASSPAR
8152 @ 62696:                     PUSHI  #0x00000001
8153 @ 62701:                     ASSPAR
8154 @ 62702:                     PUSHI  #0x00000000
8155 @ 62707:                     ASSPAR
8156 @ 62708:                     CALL  

  1036        FAULT(23) %IF GLIMIT >= GMAX
8157 @ 62709:                     LINE   1036 "regression-compile-tmp/comp412.imp"
8158 @ 62747:                     PUSH   GLIMIT
8159 @ 62750:                     PUSHI  #0x00000200
8160 @ 62755:                     JUMPIF < L_0004
8161 @ 62759:                     PUSH   FAULT
8162 @ 62762:                     PUSHI  #0x00000017
8163 @ 62767:                     ASSPAR
8164 @ 62768:                     CALL  
8165 @ 62769:                     LOCATE L_0004

  1037        %RESULT=L
8166 @ 62772:                     LINE   1037 "regression-compile-tmp/comp412.imp"
8167 @ 62810:                     PUSH   L
8168 @ 62813:                     RESULT

  1038     %END
  1039  
8169 @ 62814:                     LINE   1038 "regression-compile-tmp/comp412.imp"
8170 @ 62852:                  END    _lev0id0_COMPILEBLOCK_ANALYSESS_GAPP {lev=4 --> 3}

  1040     %ROUTINE HEX(%INTEGER N)
8171 @ 62853:                  LINE   1040 "regression-compile-tmp/comp412.imp"
8172 @ 62891:                  DEF    HEX (_lev0id0_COMPILEBLOCK_ANALYSESS_HEX) p1=V_00ee a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8173 @ 62906:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
8174 @ 62907:                        DEF    N p1=V_00ef a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8175 @ 62920:                     FINISH ) {lev=4}

  1041        %INTEGER J,K
8176 @ 62921:                     LINE   1041 "regression-compile-tmp/comp412.imp"
8177 @ 62959:                     DEF    J p1=V_00f0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8178 @ 62972:                     DEF    K p1=V_00f1 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1042        %CYCLE J = 1, 1, 4
8179 @ 62985:                     LINE   1042 "regression-compile-tmp/comp412.imp"
8180 @ 63023:                     PUSH   J
8181 @ 63026:                     PUSHI  #0x00000001
8182 @ 63031:                     PUSHI  #0x00000004
8183 @ 63036:                     PUSHI  #0x00000001
8184 @ 63041:                     FOR    L_0003

  1043           K = N>>12;  N = N<<4
8185 @ 63044:                     LINE   1043 "regression-compile-tmp/comp412.imp"
8186 @ 63082:                     PUSH   K
8187 @ 63085:                     PUSH   N
8188 @ 63088:                     PUSHI  #0x0000000c
8189 @ 63093:                     RSH   
8190 @ 63094:                     ASSVAL
8191 @ 63095:                     LINE   1043 "regression-compile-tmp/comp412.imp"
8192 @ 63133:                     PUSH   N
8193 @ 63136:                     PUSH   N
8194 @ 63139:                     PUSHI  #0x00000004
8195 @ 63144:                     LSH   
8196 @ 63145:                     ASSVAL

  1044           %IF K > 9 %THEN K = K-10+'A' %ELSE K = K+'0'
8197 @ 63146:                     LINE   1044 "regression-compile-tmp/comp412.imp"
8198 @ 63184:                     PUSH   K
8199 @ 63187:                     PUSHI  #0x00000009
8200 @ 63192:                     JUMPIF <= L_0007
8201 @ 63196:                     PUSH   K
8202 @ 63199:                     PUSH   K
8203 @ 63202:                     PUSHI  #0x0000000a
8204 @ 63207:                     SUB   
8205 @ 63208:                     PUSHI  #0x00000041
8206 @ 63213:                     ADD   
8207 @ 63214:                     ASSVAL
8208 @ 63215:                     GOTO   L_0006
8209 @ 63218:                     LOCATE L_0007
8210 @ 63221:                     PUSH   K
8211 @ 63224:                     PUSH   K
8212 @ 63227:                     PUSHI  #0x00000030
8213 @ 63232:                     ADD   
8214 @ 63233:                     ASSVAL
8215 @ 63234:                     LOCATE L_0006

  1045           PRINTSYMBOL(K)
8216 @ 63237:                     LINE   1045 "regression-compile-tmp/comp412.imp"
8217 @ 63275:                     PUSH   PRINTSYMBOL
8218 @ 63278:                     PUSH   K
8219 @ 63281:                     ASSPAR
8220 @ 63282:                     CALL  

  1046        %REPEAT
8221 @ 63283:                     LINE   1046 "regression-compile-tmp/comp412.imp"
8222 @ 63321:                     REPEAT L_0003
8223 @ 63324:                     LOCATE L_0004

  1047     %END
8224 @ 63327:                     LINE   1047 "regression-compile-tmp/comp412.imp"
8225 @ 63365:                  END    _lev0id0_COMPILEBLOCK_ANALYSESS_HEX {lev=4 --> 3}

  1048     %ROUTINE ANALYSE(%INTEGER G)
8226 @ 63366:                  LINE   1048 "regression-compile-tmp/comp412.imp"
8227 @ 63404:                  DEF    ANALYSE (_lev0id0_COMPILEBLOCK_ANALYSESS_ANALYSE) p1=V_00ef a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8228 @ 63423:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
8229 @ 63424:                        DEF    G p1=V_00f0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8230 @ 63437:                     FINISH ) {lev=4}

  1049        %SWITCH DIR(86:102)
8231 @ 63438:                     LINE   1049 "regression-compile-tmp/comp412.imp"
8232 @ 63476:                     PUSHI  #0x00000056
8233 @ 63481:                     PUSHI  #0x00000066
8234 @ 63486:                     BOUNDS
8235 @ 63487:                     DEF    DIR p1=V_00f1 a/tf=6 b/format=0 c/ostate=0  type=0 (<type:0>) form=6 (switch) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1050        %INTEGER EXTEND, AMBIG, SUB LOCK, DOWN LOCK
8236 @ 63502:                     LINE   1050 "regression-compile-tmp/comp412.imp"
8237 @ 63540:                     DEF    EXTEND p1=V_00f2 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8238 @ 63558:                     DEF    AMBIG p1=V_00f3 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8239 @ 63575:                     DEF    SUBLOCK p1=V_00f4 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8240 @ 63594:                     DEF    DOWNLOCK p1=V_00f5 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1051        %INTEGER J, K, L, N, A1, NODE, NEW TYPE, T
  1052  
8241 @ 63614:                     LINE   1051 "regression-compile-tmp/comp412.imp"
8242 @ 63652:                     DEF    J p1=V_00f6 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8243 @ 63665:                     DEF    K p1=V_00f7 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8244 @ 63678:                     DEF    L p1=V_00f8 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8245 @ 63691:                     DEF    N p1=V_00f9 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8246 @ 63704:                     DEF    A1 p1=V_00fa a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8247 @ 63718:                     DEF    NODE p1=V_00fb a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8248 @ 63734:                     DEF    NEWTYPE p1=V_00fc a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8249 @ 63753:                     DEF    T p1=V_00fd a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1053        %ROUTINE REORDER
8250 @ 63766:                     LINE   1053 "regression-compile-tmp/comp412.imp"
8251 @ 63804:                     DEF    REORDER (_lev0id0_COMPILEBLOCK_ANALYSESS_ANALYSE_REORDER) p1=V_00fe a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8252 @ 63823:                        START  ( FORMAL PARAMETERS  {lev=5 --> 6, nested=0 --> 1}
8253 @ 63824:                        FINISH ) {lev=5}

  1054           %INTEGERNAME X, Y
8254 @ 63825:                        LINE   1054 "regression-compile-tmp/comp412.imp"
8255 @ 63863:                        DEF    X p1=V_00ff a/tf=12 b/format=1 c/ostate=0  type=1 (integer) form=2 (name) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8256 @ 63876:                        DEF    Y p1=V_0100 a/tf=12 b/format=1 c/ostate=0  type=1 (integer) form=2 (name) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1055           %INTEGER R
8257 @ 63889:                        LINE   1055 "regression-compile-tmp/comp412.imp"
8258 @ 63927:                        DEF    R p1=V_0101 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1056           K=0
8259 @ 63940:                        LINE   1056 "regression-compile-tmp/comp412.imp"
8260 @ 63978:                        PUSH   K
8261 @ 63981:                        PUSHI  #0x00000000
8262 @ 63986:                        ASSVAL

  1057           %WHILE N < 0 %CYCLE
8263 @ 63987:                        LINE   1057 "regression-compile-tmp/comp412.imp"
8264 @ 64025:                        LOCATE L_0003
8265 @ 64028:                        PUSH   N
8266 @ 64031:                        PUSHI  #0x00000000
8267 @ 64036:                        JUMPIF >= L_0004

  1058              R=REF(N); J=CO(N)
8268 @ 64040:                        LINE   1058 "regression-compile-tmp/comp412.imp"
8269 @ 64078:                        PUSH   R
8270 @ 64081:                        PUSH   REF
8271 @ 64084:                        PUSH   N
8272 @ 64087:                        ACCESS
8273 @ 64088:                        ASSVAL
8274 @ 64089:                        LINE   1058 "regression-compile-tmp/comp412.imp"
8275 @ 64127:                        PUSH   J
8276 @ 64130:                        PUSH   CO
8277 @ 64133:                        PUSH   N
8278 @ 64136:                        ACCESS
8279 @ 64137:                        ASSVAL

  1059              %IF LOC(N)&X'FF' > TRANSP %START;! DROP TRANSPARENT
8280 @ 64138:                        LINE   1059 "regression-compile-tmp/comp412.imp"
8281 @ 64176:                        PUSH   LOC
8282 @ 64179:                        PUSH   N
8283 @ 64182:                        ACCESS
8284 @ 64183:                        PUSHI  #0x000000ff
8285 @ 64188:                        AND   
8286 @ 64189:                        PUSHI  #0x00000012
8287 @ 64194:                        JUMPIF <= L_0007

  1060                 X == K;  R=R&X'6000';         ! PICK OFF ORDER
8288 @ 64198:                        LINE   1060 "regression-compile-tmp/comp412.imp"
8289 @ 64236:                        PUSH   X
8290 @ 64239:                        PUSH   K
8291 @ 64242:                        ASSREF
8292 @ 64243:                        LINE   1060 "regression-compile-tmp/comp412.imp"
8293 @ 64281:                        PUSH   R
8294 @ 64284:                        PUSH   R
8295 @ 64287:                        PUSHI  #0x00006000
8296 @ 64292:                        AND   
8297 @ 64293:                        ASSVAL

  1061                 %WHILE X#0 %CYCLE
8298 @ 64294:                        LINE   1061 "regression-compile-tmp/comp412.imp"
8299 @ 64332:                        LOCATE L_0009
8300 @ 64335:                        PUSH   X
8301 @ 64338:                        PUSHI  #0x00000000
8302 @ 64343:                        JUMPIF = L_000a

  1062                    Y == REF(X)
8303 @ 64347:                        LINE   1062 "regression-compile-tmp/comp412.imp"
8304 @ 64385:                        PUSH   Y
8305 @ 64388:                        PUSH   REF
8306 @ 64391:                        PUSH   X
8307 @ 64394:                        ACCESS
8308 @ 64395:                        ASSREF

  1063                    %EXIT %IF Y&X'6000' <= R
8309 @ 64396:                        LINE   1063 "regression-compile-tmp/comp412.imp"
8310 @ 64434:                        PUSH   Y
8311 @ 64437:                        PUSHI  #0x00006000
8312 @ 64442:                        AND   
8313 @ 64443:                        PUSH   R
8314 @ 64446:                        JUMPIF > L_000d
8315 @ 64450:                        GOTO   L_000a
8316 @ 64453:                        LOCATE L_000d

  1064                    Y=Y-X'2000';               ! DECREMENT ORDERING CODE
8317 @ 64456:                        LINE   1064 "regression-compile-tmp/comp412.imp"
8318 @ 64494:                        PUSH   Y
8319 @ 64497:                        PUSH   Y
8320 @ 64500:                        PUSHI  #0x00002000
8321 @ 64505:                        SUB   
8322 @ 64506:                        ASSVAL

  1065                    X == CO(X);                ! ON DOWN THE CHAIN
8323 @ 64507:                        LINE   1065 "regression-compile-tmp/comp412.imp"
8324 @ 64545:                        PUSH   X
8325 @ 64548:                        PUSH   CO
8326 @ 64551:                        PUSH   X
8327 @ 64554:                        ACCESS
8328 @ 64555:                        ASSREF

  1066                 %REPEAT
8329 @ 64556:                        LINE   1066 "regression-compile-tmp/comp412.imp"
8330 @ 64594:                        REPEAT L_0009
8331 @ 64597:                        LOCATE L_000a

  1067                 CO(N)=X; X=N
8332 @ 64600:                        LINE   1067 "regression-compile-tmp/comp412.imp"
8333 @ 64638:                        PUSH   CO
8334 @ 64641:                        PUSH   N
8335 @ 64644:                        ACCESS
8336 @ 64645:                        PUSH   X
8337 @ 64648:                        ASSVAL
8338 @ 64649:                        LINE   1067 "regression-compile-tmp/comp412.imp"
8339 @ 64687:                        PUSH   X
8340 @ 64690:                        PUSH   N
8341 @ 64693:                        ASSVAL

  1068              %FINISH
8342 @ 64694:                        LINE   1068 "regression-compile-tmp/comp412.imp"
8343 @ 64732:                        LOCATE L_0007

  1069              N=J
8344 @ 64735:                        LINE   1069 "regression-compile-tmp/comp412.imp"
8345 @ 64773:                        PUSH   N
8346 @ 64776:                        PUSH   J
8347 @ 64779:                        ASSVAL

  1070           %REPEAT
8348 @ 64780:                        LINE   1070 "regression-compile-tmp/comp412.imp"
8349 @ 64818:                        REPEAT L_0003
8350 @ 64821:                        LOCATE L_0004

  1071           %IF DIAG&8 # 0 %START
8351 @ 64824:                        LINE   1071 "regression-compile-tmp/comp412.imp"
8352 @ 64862:                        PUSH   DIAG
8353 @ 64865:                        PUSHI  #0x00000008
8354 @ 64870:                        AND   
8355 @ 64871:                        PUSHI  #0x00000000
8356 @ 64876:                        JUMPIF = L_0004

  1072              PRINTSTRING("REORDER N =");  WRITE(N, 3);  NEWLINE
8357 @ 64880:                        LINE   1072 "regression-compile-tmp/comp412.imp"
8358 @ 64918:                        PUSH   PRINTSTRING
8359 @ 64921:                        PUSHS  "REORDER N ="
8360 @ 64934:                        ASSPAR
8361 @ 64935:                        CALL  
8362 @ 64936:                        LINE   1072 "regression-compile-tmp/comp412.imp"
8363 @ 64974:                        PUSH   WRITE
8364 @ 64977:                        PUSH   N
8365 @ 64980:                        ASSPAR
8366 @ 64981:                        PUSHI  #0x00000003
8367 @ 64986:                        ASSPAR
8368 @ 64987:                        CALL  
8369 @ 64988:                        LINE   1072 "regression-compile-tmp/comp412.imp"
8370 @ 65026:                        PUSH   NEWLINE
8371 @ 65029:                        CALL  

  1073           %FINISH
8372 @ 65030:                        LINE   1073 "regression-compile-tmp/comp412.imp"
8373 @ 65068:                        LOCATE L_0004

  1074        %END
8374 @ 65071:                        LINE   1074 "regression-compile-tmp/comp412.imp"
8375 @ 65109:                     END    _lev0id0_COMPILEBLOCK_ANALYSESS_ANALYSE_REORDER {lev=5 --> 4}

  1075        %ROUTINE SHOW(%INTEGER Z)
8376 @ 65110:                     LINE   1075 "regression-compile-tmp/comp412.imp"
8377 @ 65148:                     DEF    SHOW (_lev0id0_COMPILEBLOCK_ANALYSESS_ANALYSE_SHOW) p1=V_00ff a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8378 @ 65164:                        START  ( FORMAL PARAMETERS  {lev=5 --> 6, nested=0 --> 1}
8379 @ 65165:                           DEF    Z p1=V_0100 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
8380 @ 65178:                        FINISH ) {lev=5}

  1076           WRITE(Z, 3)
8381 @ 65179:                        LINE   1076 "regression-compile-tmp/comp412.imp"
8382 @ 65217:                        PUSH   WRITE
8383 @ 65220:                        PUSH   Z
8384 @ 65223:                        ASSPAR
8385 @ 65224:                        PUSHI  #0x00000003
8386 @ 65229:                        ASSPAR
8387 @ 65230:                        CALL  

  1077           PRINTSTRING(" [")
8388 @ 65231:                        LINE   1077 "regression-compile-tmp/comp412.imp"
8389 @ 65269:                        PUSH   PRINTSTRING
8390 @ 65272:                        PUSHS  " ["
8391 @ 65276:                        ASSPAR
8392 @ 65277:                        CALL  

  1078           HEX(REF(Z))
8393 @ 65278:                        LINE   1078 "regression-compile-tmp/comp412.imp"
8394 @ 65316:                        PUSH   HEX
8395 @ 65319:                        PUSH   REF
8396 @ 65322:                        PUSH   Z
8397 @ 65325:                        ACCESS
8398 @ 65326:                        ASSPAR
8399 @ 65327:                        CALL  

  1079           SPACE;  HEX(CO(Z))
8400 @ 65328:                        LINE   1079 "regression-compile-tmp/comp412.imp"
8401 @ 65366:                        PUSH   SPACE
8402 @ 65369:                        CALL  
8403 @ 65370:                        LINE   1079 "regression-compile-tmp/comp412.imp"
8404 @ 65408:                        PUSH   HEX
8405 @ 65411:                        PUSH   CO
8406 @ 65414:                        PUSH   Z
8407 @ 65417:                        ACCESS
8408 @ 65418:                        ASSPAR
8409 @ 65419:                        CALL  

  1080           SPACE;  HEX(SUB(Z))
8410 @ 65420:                        LINE   1080 "regression-compile-tmp/comp412.imp"
8411 @ 65458:                        PUSH   SPACE
8412 @ 65461:                        CALL  
8413 @ 65462:                        LINE   1080 "regression-compile-tmp/comp412.imp"
8414 @ 65500:                        PUSH   HEX
8415 @ 65503:                        PUSH   SUB
8416 @ 65506:                        PUSH   Z
8417 @ 65509:                        ACCESS
8418 @ 65510:                        ASSPAR
8419 @ 65511:                        CALL  

  1081           SPACE;  HEX(LOC(Z))
8420 @ 65512:                        LINE   1081 "regression-compile-tmp/comp412.imp"
8421 @ 65550:                        PUSH   SPACE
8422 @ 65553:                        CALL  
8423 @ 65554:                        LINE   1081 "regression-compile-tmp/comp412.imp"
8424 @ 65592:                        PUSH   HEX
8425 @ 65595:                        PUSH   LOC
8426 @ 65598:                        PUSH   Z
8427 @ 65601:                        ACCESS
8428 @ 65602:                        ASSPAR
8429 @ 65603:                        CALL  

  1082           PRINTSYMBOL(']');  NEWLINE
8430 @ 65604:                        LINE   1082 "regression-compile-tmp/comp412.imp"
8431 @ 65642:                        PUSH   PRINTSYMBOL
8432 @ 65645:                        PUSHI  #0x0000005d
8433 @ 65650:                        ASSPAR
8434 @ 65651:                        CALL  
8435 @ 65652:                        LINE   1082 "regression-compile-tmp/comp412.imp"
8436 @ 65690:                        PUSH   NEWLINE
8437 @ 65693:                        CALL  

  1083        %END
8438 @ 65694:                        LINE   1083 "regression-compile-tmp/comp412.imp"
8439 @ 65732:                     END    _lev0id0_COMPILEBLOCK_ANALYSESS_ANALYSE_SHOW {lev=5 --> 4}

  1084        EXTEND=0;  SUB LOCK = 0;  DOWN LOCK = 0
8440 @ 65733:                     LINE   1084 "regression-compile-tmp/comp412.imp"
8441 @ 65771:                     PUSH   EXTEND
8442 @ 65774:                     PUSHI  #0x00000000
8443 @ 65779:                     ASSVAL
8444 @ 65780:                     LINE   1084 "regression-compile-tmp/comp412.imp"
8445 @ 65818:                     PUSH   SUBLOCK
8446 @ 65821:                     PUSHI  #0x00000000
8447 @ 65826:                     ASSVAL
8448 @ 65827:                     LINE   1084 "regression-compile-tmp/comp412.imp"
8449 @ 65865:                     PUSH   DOWNLOCK
8450 @ 65868:                     PUSHI  #0x00000000
8451 @ 65873:                     ASSVAL

  1085        A=0; A1=0; N=0; NODE=0
8452 @ 65874:                     LINE   1085 "regression-compile-tmp/comp412.imp"
8453 @ 65912:                     PUSH   A
8454 @ 65915:                     PUSHI  #0x00000000
8455 @ 65920:                     ASSVAL
8456 @ 65921:                     LINE   1085 "regression-compile-tmp/comp412.imp"
8457 @ 65959:                     PUSH   A1
8458 @ 65962:                     PUSHI  #0x00000000
8459 @ 65967:                     ASSVAL
8460 @ 65968:                     LINE   1085 "regression-compile-tmp/comp412.imp"
8461 @ 66006:                     PUSH   N
8462 @ 66009:                     PUSHI  #0x00000000
8463 @ 66014:                     ASSVAL
8464 @ 66015:                     LINE   1085 "regression-compile-tmp/comp412.imp"
8465 @ 66053:                     PUSH   NODE
8466 @ 66056:                     PUSHI  #0x00000000
8467 @ 66061:                     ASSVAL

  1086        AMBIG=0
8468 @ 66062:                     LINE   1086 "regression-compile-tmp/comp412.imp"
8469 @ 66100:                     PUSH   AMBIG
8470 @ 66103:                     PUSHI  #0x00000000
8471 @ 66108:                     ASSVAL

  1087        P = RECLEN
8472 @ 66109:                     LINE   1087 "regression-compile-tmp/comp412.imp"
8473 @ 66147:                     PUSH   P
8474 @ 66150:                     PUSHI  #0xfffffed4
8475 @ 66155:                     ASSVAL

  1088  L1:     J=GRAM(G);  K = GCLASS(G);  ->EOP %IF K = 0
8476 @ 66156:                     LINE   1088 "regression-compile-tmp/comp412.imp"
8477 @ 66194:                     LABEL  L_0100
8478 @ 66197:                     LINE   1088 "regression-compile-tmp/comp412.imp"
8479 @ 66235:                     PUSH   J
8480 @ 66238:                     PUSH   GRAM
8481 @ 66241:                     PUSH   G
8482 @ 66244:                     ACCESS
8483 @ 66245:                     ASSVAL
8484 @ 66246:                     LINE   1088 "regression-compile-tmp/comp412.imp"
8485 @ 66284:                     PUSH   K
8486 @ 66287:                     PUSH   GCLASS
8487 @ 66290:                     PUSH   G
8488 @ 66293:                     ACCESS
8489 @ 66294:                     ASSVAL
8490 @ 66295:                     LINE   1088 "regression-compile-tmp/comp412.imp"
8491 @ 66333:                     PUSH   K
8492 @ 66336:                     PUSHI  #0x00000000
8493 @ 66341:                     JUMPIF # L_0004
8494 @ 66345:                     JUMP   L_0101
8495 @ 66348:                     LOCATE L_0004

  1089        NEW TYPE = J>>9&15
8496 @ 66351:                     LINE   1089 "regression-compile-tmp/comp412.imp"
8497 @ 66389:                     PUSH   NEWTYPE
8498 @ 66392:                     PUSH   J
8499 @ 66395:                     PUSHI  #0x00000009
8500 @ 66400:                     RSH   
8501 @ 66401:                     PUSHI  #0x0000000f
8502 @ 66406:                     AND   
8503 @ 66407:                     ASSVAL

  1090        NEW TYPE = TYPE %IF NEW TYPE = 0
8504 @ 66408:                     LINE   1090 "regression-compile-tmp/comp412.imp"
8505 @ 66446:                     PUSH   NEWTYPE
8506 @ 66449:                     PUSHI  #0x00000000
8507 @ 66454:                     JUMPIF # L_0004
8508 @ 66458:                     PUSH   NEWTYPE
8509 @ 66461:                     PUSH   TYPE
8510 @ 66464:                     ASSVAL
8511 @ 66465:                     LOCATE L_0004

  1091        %IF DIAG&1 # 0 %START
8512 @ 66468:                     LINE   1091 "regression-compile-tmp/comp412.imp"
8513 @ 66506:                     PUSH   DIAG
8514 @ 66509:                     PUSHI  #0x00000001
8515 @ 66514:                     AND   
8516 @ 66515:                     PUSHI  #0x00000000
8517 @ 66520:                     JUMPIF = L_0004

  1092           WRITE(G, 4);  WRITE(K, 3)
8518 @ 66524:                     LINE   1092 "regression-compile-tmp/comp412.imp"
8519 @ 66562:                     PUSH   WRITE
8520 @ 66565:                     PUSH   G
8521 @ 66568:                     ASSPAR
8522 @ 66569:                     PUSHI  #0x00000004
8523 @ 66574:                     ASSPAR
8524 @ 66575:                     CALL  
8525 @ 66576:                     LINE   1092 "regression-compile-tmp/comp412.imp"
8526 @ 66614:                     PUSH   WRITE
8527 @ 66617:                     PUSH   K
8528 @ 66620:                     ASSPAR
8529 @ 66621:                     PUSHI  #0x00000003
8530 @ 66626:                     ASSPAR
8531 @ 66627:                     CALL  

  1093           WRITE(ATOM1, 3);  WRITE(ATOM2, 3);  WRITE(SUBATOM, 3)
8532 @ 66628:                     LINE   1093 "regression-compile-tmp/comp412.imp"
8533 @ 66666:                     PUSH   WRITE
8534 @ 66669:                     PUSH   ATOM1
8535 @ 66672:                     ASSPAR
8536 @ 66673:                     PUSHI  #0x00000003
8537 @ 66678:                     ASSPAR
8538 @ 66679:                     CALL  
8539 @ 66680:                     LINE   1093 "regression-compile-tmp/comp412.imp"
8540 @ 66718:                     PUSH   WRITE
8541 @ 66721:                     PUSH   ATOM2
8542 @ 66724:                     ASSPAR
8543 @ 66725:                     PUSHI  #0x00000003
8544 @ 66730:                     ASSPAR
8545 @ 66731:                     CALL  
8546 @ 66732:                     LINE   1093 "regression-compile-tmp/comp412.imp"
8547 @ 66770:                     PUSH   WRITE
8548 @ 66773:                     PUSH   SUBATOM
8549 @ 66776:                     ASSPAR
8550 @ 66777:                     PUSHI  #0x00000003
8551 @ 66782:                     ASSPAR
8552 @ 66783:                     CALL  

  1094           WRITE(TYPE, 2);  WRITE(FORMAT, 3)
8553 @ 66784:                     LINE   1094 "regression-compile-tmp/comp412.imp"
8554 @ 66822:                     PUSH   WRITE
8555 @ 66825:                     PUSH   TYPE
8556 @ 66828:                     ASSPAR
8557 @ 66829:                     PUSHI  #0x00000002
8558 @ 66834:                     ASSPAR
8559 @ 66835:                     CALL  
8560 @ 66836:                     LINE   1094 "regression-compile-tmp/comp412.imp"
8561 @ 66874:                     PUSH   WRITE
8562 @ 66877:                     PUSH   FORMAT
8563 @ 66880:                     ASSPAR
8564 @ 66881:                     PUSHI  #0x00000003
8565 @ 66886:                     ASSPAR
8566 @ 66887:                     CALL  

  1095           NEWLINE
8567 @ 66888:                     LINE   1095 "regression-compile-tmp/comp412.imp"
8568 @ 66926:                     PUSH   NEWLINE
8569 @ 66929:                     CALL  

  1096        %FINISH
8570 @ 66930:                     LINE   1096 "regression-compile-tmp/comp412.imp"
8571 @ 66968:                     LOCATE L_0004

  1097        %IF K >= PHRASES %START;             ! PHRASE
8572 @ 66971:                     LINE   1097 "regression-compile-tmp/comp412.imp"
8573 @ 67009:                     PUSH   K
8574 @ 67012:                     PUSHI  #0x00000084
8575 @ 67017:                     JUMPIF < L_0004

  1098           P=P+1; F TYPE=4 %AND -> ERROR %IF P=A
8576 @ 67021:                     LINE   1098 "regression-compile-tmp/comp412.imp"
8577 @ 67059:                     PUSH   P
8578 @ 67062:                     PUSH   P
8579 @ 67065:                     PUSHI  #0x00000001
8580 @ 67070:                     ADD   
8581 @ 67071:                     ASSVAL
8582 @ 67072:                     LINE   1098 "regression-compile-tmp/comp412.imp"
8583 @ 67110:                     PUSH   P
8584 @ 67113:                     PUSH   A
8585 @ 67116:                     JUMPIF # L_0007
8586 @ 67120:                     PUSH   FTYPE
8587 @ 67123:                     PUSHI  #0x00000004
8588 @ 67128:                     ASSVAL
8589 @ 67129:                     JUMP   L_0102
8590 @ 67132:                     LOCATE L_0007

  1099           REF(P)=J; CO(P)=N
8591 @ 67135:                     LINE   1099 "regression-compile-tmp/comp412.imp"
8592 @ 67173:                     PUSH   REF
8593 @ 67176:                     PUSH   P
8594 @ 67179:                     ACCESS
8595 @ 67180:                     PUSH   J
8596 @ 67183:                     ASSVAL
8597 @ 67184:                     LINE   1099 "regression-compile-tmp/comp412.imp"
8598 @ 67222:                     PUSH   CO
8599 @ 67225:                     PUSH   P
8600 @ 67228:                     ACCESS
8601 @ 67229:                     PUSH   N
8602 @ 67232:                     ASSVAL

  1100           LOC(P)=TYPE<<8+K
8603 @ 67233:                     LINE   1100 "regression-compile-tmp/comp412.imp"
8604 @ 67271:                     PUSH   LOC
8605 @ 67274:                     PUSH   P
8606 @ 67277:                     ACCESS
8607 @ 67278:                     PUSH   TYPE
8608 @ 67281:                     PUSHI  #0x00000008
8609 @ 67286:                     LSH   
8610 @ 67287:                     PUSH   K
8611 @ 67290:                     ADD   
8612 @ 67291:                     ASSVAL

  1101           TYPE=NEW TYPE
8613 @ 67292:                     LINE   1101 "regression-compile-tmp/comp412.imp"
8614 @ 67330:                     PUSH   TYPE
8615 @ 67333:                     PUSH   NEWTYPE
8616 @ 67336:                     ASSVAL

  1102           SHOW(P) %IF DIAG&8 # 0
8617 @ 67337:                     LINE   1102 "regression-compile-tmp/comp412.imp"
8618 @ 67375:                     PUSH   DIAG
8619 @ 67378:                     PUSHI  #0x00000008
8620 @ 67383:                     AND   
8621 @ 67384:                     PUSHI  #0x00000000
8622 @ 67389:                     JUMPIF = L_0007
8623 @ 67393:                     PUSH   SHOW
8624 @ 67396:                     PUSH   P
8625 @ 67399:                     ASSPAR
8626 @ 67400:                     CALL  
8627 @ 67401:                     LOCATE L_0007

  1103           N=-P
8628 @ 67404:                     LINE   1103 "regression-compile-tmp/comp412.imp"
8629 @ 67442:                     PUSH   N
8630 @ 67445:                     PUSH   P
8631 @ 67448:                     NEGATE
8632 @ 67449:                     ASSVAL

  1104           G=PHRASE(K)
8633 @ 67450:                     LINE   1104 "regression-compile-tmp/comp412.imp"
8634 @ 67488:                     PUSH   G
8635 @ 67491:                     PUSH   PHRASE
8636 @ 67494:                     PUSH   K
8637 @ 67497:                     ACCESS
8638 @ 67498:                     ASSVAL

  1105           -> L1
8639 @ 67499:                     LINE   1105 "regression-compile-tmp/comp412.imp"
8640 @ 67537:                     JUMP   L_0100

  1106        %FINISH
8641 @ 67540:                     LINE   1106 "regression-compile-tmp/comp412.imp"
8642 @ 67578:                     LOCATE L_0004

  1107        CLASS=K
8643 @ 67581:                     LINE   1107 "regression-compile-tmp/comp412.imp"
8644 @ 67619:                     PUSH   CLASS
8645 @ 67622:                     PUSH   K
8646 @ 67625:                     ASSVAL

  1108        CLASS=ATOMIC(CLASS) %IF CLASS >= EQUIVS
8647 @ 67626:                     LINE   1108 "regression-compile-tmp/comp412.imp"
8648 @ 67664:                     PUSH   CLASS
8649 @ 67667:                     PUSHI  #0x00000069
8650 @ 67672:                     JUMPIF < L_0004
8651 @ 67676:                     PUSH   CLASS
8652 @ 67679:                     PUSH   ATOMIC
8653 @ 67682:                     PUSH   CLASS
8654 @ 67685:                     ACCESS
8655 @ 67686:                     ASSVAL
8656 @ 67687:                     LOCATE L_0004

  1109        ->DIR(CLASS) %IF CLASS >= DIRECTIVES
8657 @ 67690:                     LINE   1109 "regression-compile-tmp/comp412.imp"
8658 @ 67728:                     PUSH   CLASS
8659 @ 67731:                     PUSHI  #0x00000056
8660 @ 67736:                     JUMPIF < L_0004
8661 @ 67740:                     PUSH   CLASS
8662 @ 67743:                     SJUMP  241
8663 @ 67746:                     LOCATE L_0004

  1110        %IF ATOM2=IDENT %AND (DEF1 <= CLASS <= DEF2 %OR  CLASS = ICONST)%START
8664 @ 67749:                     LINE   1110 "regression-compile-tmp/comp412.imp"
8665 @ 67787:                     PUSH   ATOM2
8666 @ 67790:                     PUSHI  #0x0000003b
8667 @ 67795:                     JUMPIF # L_0004
8668 @ 67799:                     PUSHI  #0x0000003c
8669 @ 67804:                     PUSH   CLASS
8670 @ 67807:                     JUMPIFD > L_0006
8671 @ 67811:                     PUSHI  #0x0000004f
8672 @ 67816:                     JUMPIF <= L_0005
8673 @ 67820:                     LOCATE L_0006
8674 @ 67823:                     PUSH   CLASS
8675 @ 67826:                     PUSHI  #0x00000053
8676 @ 67831:                     JUMPIF # L_0004
8677 @ 67835:                     LOCATE L_0005

  1111           LIM=GLOBAL; LOOKUP(T BASE)
8678 @ 67838:                     LINE   1111 "regression-compile-tmp/comp412.imp"
8679 @ 67876:                     PUSH   LIM
8680 @ 67879:                     PUSHI  #0x00000000
8681 @ 67884:                     ASSVAL
8682 @ 67885:                     LINE   1111 "regression-compile-tmp/comp412.imp"
8683 @ 67923:                     PUSH   LOOKUP
8684 @ 67926:                     PUSH   TBASE
8685 @ 67929:                     ASSPAR
8686 @ 67930:                     CALL  

  1112        %FINISH
8687 @ 67931:                     LINE   1112 "regression-compile-tmp/comp412.imp"
8688 @ 67969:                     LOCATE L_0004

  1113        %IF SET1 <= CLASS <= SET2 %AND %C
  1114                                (OTYPE#2 %OR ATOM2=68 %OR ATOM2=70) %START
8689 @ 67972:                     LINE   1113 "regression-compile-tmp/comp412.imp"
8690 @ 68010:                     PUSHI  #0x0000003c
8691 @ 68015:                     PUSH   CLASS
8692 @ 68018:                     JUMPIFD > L_0004
8693 @ 68022:                     PUSHI  #0x00000040
8694 @ 68027:                     JUMPIF > L_0004
8695 @ 68031:                     PUSH   OTYPE
8696 @ 68034:                     PUSHI  #0x00000002
8697 @ 68039:                     JUMPIF # L_0005
8698 @ 68043:                     PUSH   ATOM2
8699 @ 68046:                     PUSHI  #0x00000044
8700 @ 68051:                     JUMPIF = L_0005
8701 @ 68055:                     PUSH   ATOM2
8702 @ 68058:                     PUSHI  #0x00000046
8703 @ 68063:                     JUMPIF # L_0004
8704 @ 68067:                     LOCATE L_0005

  1115           CLASS = CLASS+7;  TYPE = TAG>>4&7
8705 @ 68070:                     LINE   1115 "regression-compile-tmp/comp412.imp"
8706 @ 68108:                     PUSH   CLASS
8707 @ 68111:                     PUSH   CLASS
8708 @ 68114:                     PUSHI  #0x00000007
8709 @ 68119:                     ADD   
8710 @ 68120:                     ASSVAL
8711 @ 68121:                     LINE   1115 "regression-compile-tmp/comp412.imp"
8712 @ 68159:                     PUSH   TYPE
8713 @ 68162:                     PUSH   TAG
8714 @ 68165:                     PUSHI  #0x00000004
8715 @ 68170:                     RSH   
8716 @ 68171:                     PUSHI  #0x00000007
8717 @ 68176:                     AND   
8718 @ 68177:                     ASSVAL

  1116        %FINISH
8719 @ 68178:                     LINE   1116 "regression-compile-tmp/comp412.imp"
8720 @ 68216:                     LOCATE L_0004

  1117        NEW TYPE=TYPE
8721 @ 68219:                     LINE   1117 "regression-compile-tmp/comp412.imp"
8722 @ 68257:                     PUSH   NEWTYPE
8723 @ 68260:                     PUSH   TYPE
8724 @ 68263:                     ASSVAL

  1118        %IF CLASS=ATOM1 %OR CLASS=ATOM2 %START
8725 @ 68264:                     LINE   1118 "regression-compile-tmp/comp412.imp"
8726 @ 68302:                     PUSH   CLASS
8727 @ 68305:                     PUSH   ATOM1
8728 @ 68308:                     JUMPIF = L_0005
8729 @ 68312:                     PUSH   CLASS
8730 @ 68315:                     PUSH   ATOM2
8731 @ 68318:                     JUMPIF # L_0004
8732 @ 68322:                     LOCATE L_0005

  1119           %IF CLASS = IDENT %START
8733 @ 68325:                     LINE   1119 "regression-compile-tmp/comp412.imp"
8734 @ 68363:                     PUSH   CLASS
8735 @ 68366:                     PUSHI  #0x0000003b
8736 @ 68371:                     JUMPIF # L_0007

  1120              DECLARE IDEN
8737 @ 68375:                     LINE   1120 "regression-compile-tmp/comp412.imp"
8738 @ 68413:                     PUSH   DECLAREIDEN
8739 @ 68416:                     CALL  

  1121              TYPE = 15 %IF NEWTYPE = 15
8740 @ 68417:                     LINE   1121 "regression-compile-tmp/comp412.imp"
8741 @ 68455:                     PUSH   NEWTYPE
8742 @ 68458:                     PUSHI  #0x0000000f
8743 @ 68463:                     JUMPIF # L_000a
8744 @ 68467:                     PUSH   TYPE
8745 @ 68470:                     PUSHI  #0x0000000f
8746 @ 68475:                     ASSVAL
8747 @ 68476:                     LOCATE L_000a

  1122           %FINISH
8748 @ 68479:                     LINE   1122 "regression-compile-tmp/comp412.imp"
8749 @ 68517:                     LOCATE L_0007

  1123           %IF CHECK1 <= CLASS <= CHECK2 %START
8750 @ 68520:                     LINE   1123 "regression-compile-tmp/comp412.imp"
8751 @ 68558:                     PUSHI  #0x00000042
8752 @ 68563:                     PUSH   CLASS
8753 @ 68566:                     JUMPIFD > L_0007
8754 @ 68570:                     PUSHI  #0x00000048
8755 @ 68575:                     JUMPIF > L_0007

  1124              %IF VAR TYPE#TYPE %START
8756 @ 68579:                     LINE   1124 "regression-compile-tmp/comp412.imp"
8757 @ 68617:                     PUSH   VARTYPE
8758 @ 68620:                     PUSH   TYPE
8759 @ 68623:                     JUMPIF = L_000a

  1125                 %UNLESS VARTYPE <= 3 %AND (TYPE=8 %OR TYPE=9) %START
8760 @ 68627:                     LINE   1125 "regression-compile-tmp/comp412.imp"
8761 @ 68665:                     PUSH   VARTYPE
8762 @ 68668:                     PUSHI  #0x00000003
8763 @ 68673:                     JUMPIF > L_000e
8764 @ 68677:                     PUSH   TYPE
8765 @ 68680:                     PUSHI  #0x00000008
8766 @ 68685:                     JUMPIF = L_000d
8767 @ 68689:                     PUSH   TYPE
8768 @ 68692:                     PUSHI  #0x00000009
8769 @ 68697:                     JUMPIF = L_000d
8770 @ 68701:                     LOCATE L_000e

  1126                    %UNLESS VARTYPE >= 6 %AND TYPE=9 %START
8771 @ 68704:                     LINE   1126 "regression-compile-tmp/comp412.imp"
8772 @ 68742:                     PUSH   VARTYPE
8773 @ 68745:                     PUSHI  #0x00000006
8774 @ 68750:                     JUMPIF < L_0011
8775 @ 68754:                     PUSH   TYPE
8776 @ 68757:                     PUSHI  #0x00000009
8777 @ 68762:                     JUMPIF = L_0010
8778 @ 68766:                     LOCATE L_0011

  1127                       %UNLESS TYPE = 10 %START
8779 @ 68769:                     LINE   1127 "regression-compile-tmp/comp412.imp"
8780 @ 68807:                     PUSH   TYPE
8781 @ 68810:                     PUSHI  #0x0000000a
8782 @ 68815:                     JUMPIF = L_0013

  1128                          F TYPE = 2;  ->ALT
8783 @ 68819:                     LINE   1128 "regression-compile-tmp/comp412.imp"
8784 @ 68857:                     PUSH   FTYPE
8785 @ 68860:                     PUSHI  #0x00000002
8786 @ 68865:                     ASSVAL
8787 @ 68866:                     LINE   1128 "regression-compile-tmp/comp412.imp"
8788 @ 68904:                     JUMP   L_0103

  1129                       %FINISH
8789 @ 68907:                     LINE   1129 "regression-compile-tmp/comp412.imp"
8790 @ 68945:                     LOCATE L_0013

  1130                    %FINISH
8791 @ 68948:                     LINE   1130 "regression-compile-tmp/comp412.imp"
8792 @ 68986:                     LOCATE L_0010

  1131                 %FINISH
8793 @ 68989:                     LINE   1131 "regression-compile-tmp/comp412.imp"
8794 @ 69027:                     LOCATE L_000d

  1132              %FINISH
8795 @ 69030:                     LINE   1132 "regression-compile-tmp/comp412.imp"
8796 @ 69068:                     LOCATE L_000a

  1133              F TYPE=0
8797 @ 69071:                     LINE   1133 "regression-compile-tmp/comp412.imp"
8798 @ 69109:                     PUSH   FTYPE
8799 @ 69112:                     PUSHI  #0x00000000
8800 @ 69117:                     ASSVAL

  1134           %FINISH
8801 @ 69118:                     LINE   1134 "regression-compile-tmp/comp412.imp"
8802 @ 69156:                     LOCATE L_0007

  1135  ENTRY:    A=A-1; F TYPE=4 %AND -> ERROR %IF A=P
8803 @ 69159:                     LINE   1135 "regression-compile-tmp/comp412.imp"
8804 @ 69197:                     LABEL  L_0104
8805 @ 69200:                     LINE   1135 "regression-compile-tmp/comp412.imp"
8806 @ 69238:                     PUSH   A
8807 @ 69241:                     PUSH   A
8808 @ 69244:                     PUSHI  #0x00000001
8809 @ 69249:                     SUB   
8810 @ 69250:                     ASSVAL
8811 @ 69251:                     LINE   1135 "regression-compile-tmp/comp412.imp"
8812 @ 69289:                     PUSH   A
8813 @ 69292:                     PUSH   P
8814 @ 69295:                     JUMPIF # L_0007
8815 @ 69299:                     PUSH   FTYPE
8816 @ 69302:                     PUSHI  #0x00000004
8817 @ 69307:                     ASSVAL
8818 @ 69308:                     JUMP   L_0102
8819 @ 69311:                     LOCATE L_0007

  1136           REF(A)=J; CO(A)=N
8820 @ 69314:                     LINE   1136 "regression-compile-tmp/comp412.imp"
8821 @ 69352:                     PUSH   REF
8822 @ 69355:                     PUSH   A
8823 @ 69358:                     ACCESS
8824 @ 69359:                     PUSH   J
8825 @ 69362:                     ASSVAL
8826 @ 69363:                     LINE   1136 "regression-compile-tmp/comp412.imp"
8827 @ 69401:                     PUSH   CO
8828 @ 69404:                     PUSH   A
8829 @ 69407:                     ACCESS
8830 @ 69408:                     PUSH   N
8831 @ 69411:                     ASSVAL

  1137           LOC(A)=TYPE<<8+K
8832 @ 69412:                     LINE   1137 "regression-compile-tmp/comp412.imp"
8833 @ 69450:                     PUSH   LOC
8834 @ 69453:                     PUSH   A
8835 @ 69456:                     ACCESS
8836 @ 69457:                     PUSH   TYPE
8837 @ 69460:                     PUSHI  #0x00000008
8838 @ 69465:                     LSH   
8839 @ 69466:                     PUSH   K
8840 @ 69469:                     ADD   
8841 @ 69470:                     ASSVAL

  1138           TYPE=NEW TYPE
8842 @ 69471:                     LINE   1138 "regression-compile-tmp/comp412.imp"
8843 @ 69509:                     PUSH   TYPE
8844 @ 69512:                     PUSH   NEWTYPE
8845 @ 69515:                     ASSVAL

  1139           SUB(A)=SUBATOM
8846 @ 69516:                     LINE   1139 "regression-compile-tmp/comp412.imp"
8847 @ 69554:                     PUSH   SUB
8848 @ 69557:                     PUSH   A
8849 @ 69560:                     ACCESS
8850 @ 69561:                     PUSH   SUBATOM
8851 @ 69564:                     ASSVAL

  1140           SHOW(A) %IF DIAG&8 # 0
8852 @ 69565:                     LINE   1140 "regression-compile-tmp/comp412.imp"
8853 @ 69603:                     PUSH   DIAG
8854 @ 69606:                     PUSHI  #0x00000008
8855 @ 69611:                     AND   
8856 @ 69612:                     PUSHI  #0x00000000
8857 @ 69617:                     JUMPIF = L_0007
8858 @ 69621:                     PUSH   SHOW
8859 @ 69624:                     PUSH   A
8860 @ 69627:                     ASSPAR
8861 @ 69628:                     CALL  
8862 @ 69629:                     LOCATE L_0007

  1141           ->DONE %IF J&511 = 511;           ! END OF SS
8863 @ 69632:                     LINE   1141 "regression-compile-tmp/comp412.imp"
8864 @ 69670:                     PUSH   J
8865 @ 69673:                     PUSHI  #0x000001ff
8866 @ 69678:                     AND   
8867 @ 69679:                     PUSHI  #0x000001ff
8868 @ 69684:                     JUMPIF # L_0007
8869 @ 69688:                     JUMP   L_0105
8870 @ 69691:                     LOCATE L_0007

  1142           -> NEXT %IF AMBIG=0;              ! NOT AMBIGUOUS
8871 @ 69694:                     LINE   1142 "regression-compile-tmp/comp412.imp"
8872 @ 69732:                     PUSH   AMBIG
8873 @ 69735:                     PUSHI  #0x00000000
8874 @ 69740:                     JUMPIF # L_0007
8875 @ 69744:                     JUMP   L_0106
8876 @ 69747:                     LOCATE L_0007

  1143           G=AMBIG; AMBIG=0; -> L1
8877 @ 69750:                     LINE   1143 "regression-compile-tmp/comp412.imp"
8878 @ 69788:                     PUSH   G
8879 @ 69791:                     PUSH   AMBIG
8880 @ 69794:                     ASSVAL
8881 @ 69795:                     LINE   1143 "regression-compile-tmp/comp412.imp"
8882 @ 69833:                     PUSH   AMBIG
8883 @ 69836:                     PUSHI  #0x00000000
8884 @ 69841:                     ASSVAL
8885 @ 69842:                     LINE   1143 "regression-compile-tmp/comp412.imp"
8886 @ 69880:                     JUMP   L_0100

  1144        %FINISH
8887 @ 69883:                     LINE   1144 "regression-compile-tmp/comp412.imp"
8888 @ 69921:                     LOCATE L_0004

  1145  ALT:   G=G+1;  -> L1 %IF J < 0;              ! TRY ALTERNATIVE
8889 @ 69924:                     LINE   1145 "regression-compile-tmp/comp412.imp"
8890 @ 69962:                     LABEL  L_0103
8891 @ 69965:                     LINE   1145 "regression-compile-tmp/comp412.imp"
8892 @ 70003:                     PUSH   G
8893 @ 70006:                     PUSH   G
8894 @ 70009:                     PUSHI  #0x00000001
8895 @ 70014:                     ADD   
8896 @ 70015:                     ASSVAL
8897 @ 70016:                     LINE   1145 "regression-compile-tmp/comp412.imp"
8898 @ 70054:                     PUSH   J
8899 @ 70057:                     PUSHI  #0x00000000
8900 @ 70062:                     JUMPIF >= L_0004
8901 @ 70066:                     JUMP   L_0100
8902 @ 70069:                     LOCATE L_0004

  1146  NEXT:  %IF NODE=A1 %START;                  ! LAST NODE FOR THIS ATOM
8903 @ 70072:                     LINE   1146 "regression-compile-tmp/comp412.imp"
8904 @ 70110:                     LABEL  L_0106
8905 @ 70113:                     LINE   1146 "regression-compile-tmp/comp412.imp"
8906 @ 70151:                     PUSH   NODE
8907 @ 70154:                     PUSH   A1
8908 @ 70157:                     JUMPIF # L_0004

  1147           EXTEND=0; SUB LOCK=0;  DOWN LOCK = 0
8909 @ 70161:                     LINE   1147 "regression-compile-tmp/comp412.imp"
8910 @ 70199:                     PUSH   EXTEND
8911 @ 70202:                     PUSHI  #0x00000000
8912 @ 70207:                     ASSVAL
8913 @ 70208:                     LINE   1147 "regression-compile-tmp/comp412.imp"
8914 @ 70246:                     PUSH   SUBLOCK
8915 @ 70249:                     PUSHI  #0x00000000
8916 @ 70254:                     ASSVAL
8917 @ 70255:                     LINE   1147 "regression-compile-tmp/comp412.imp"
8918 @ 70293:                     PUSH   DOWNLOCK
8919 @ 70296:                     PUSHI  #0x00000000
8920 @ 70301:                     ASSVAL

  1148           -> ERROR %IF NODE=A;              ! NO NEW NODES
8921 @ 70302:                     LINE   1148 "regression-compile-tmp/comp412.imp"
8922 @ 70340:                     PUSH   NODE
8923 @ 70343:                     PUSH   A
8924 @ 70346:                     JUMPIF # L_0007
8925 @ 70350:                     JUMP   L_0102
8926 @ 70353:                     LOCATE L_0007

  1149           A1=A
8927 @ 70356:                     LINE   1149 "regression-compile-tmp/comp412.imp"
8928 @ 70394:                     PUSH   A1
8929 @ 70397:                     PUSH   A
8930 @ 70400:                     ASSVAL

  1150           CODE ATOM %IF CLASS < DIRECTIVES; ! GET NEXT ATOM
8931 @ 70401:                     LINE   1150 "regression-compile-tmp/comp412.imp"
8932 @ 70439:                     PUSH   CLASS
8933 @ 70442:                     PUSHI  #0x00000056
8934 @ 70447:                     JUMPIF >= L_0007
8935 @ 70451:                     PUSH   CODEATOM
8936 @ 70454:                     CALL  
8937 @ 70455:                     LOCATE L_0007

  1151        %FINISH
8938 @ 70458:                     LINE   1151 "regression-compile-tmp/comp412.imp"
8939 @ 70496:                     LOCATE L_0004

  1152        NODE=NODE-1; N=NODE
8940 @ 70499:                     LINE   1152 "regression-compile-tmp/comp412.imp"
8941 @ 70537:                     PUSH   NODE
8942 @ 70540:                     PUSH   NODE
8943 @ 70543:                     PUSHI  #0x00000001
8944 @ 70548:                     SUB   
8945 @ 70549:                     ASSVAL
8946 @ 70550:                     LINE   1152 "regression-compile-tmp/comp412.imp"
8947 @ 70588:                     PUSH   N
8948 @ 70591:                     PUSH   NODE
8949 @ 70594:                     ASSVAL

  1153        %IF EXTEND#0 %START
8950 @ 70595:                     LINE   1153 "regression-compile-tmp/comp412.imp"
8951 @ 70633:                     PUSH   EXTEND
8952 @ 70636:                     PUSHI  #0x00000000
8953 @ 70641:                     JUMPIF = L_0004

  1154           K = LOC(N)&255
8954 @ 70645:                     LINE   1154 "regression-compile-tmp/comp412.imp"
8955 @ 70683:                     PUSH   K
8956 @ 70686:                     PUSH   LOC
8957 @ 70689:                     PUSH   N
8958 @ 70692:                     ACCESS
8959 @ 70693:                     PUSHI  #0x000000ff
8960 @ 70698:                     AND   
8961 @ 70699:                     ASSVAL

  1155           %IF K # 0 %START
8962 @ 70700:                     LINE   1155 "regression-compile-tmp/comp412.imp"
8963 @ 70738:                     PUSH   K
8964 @ 70741:                     PUSHI  #0x00000000
8965 @ 70746:                     JUMPIF = L_0007

  1156              J=REF(N)
8966 @ 70750:                     LINE   1156 "regression-compile-tmp/comp412.imp"
8967 @ 70788:                     PUSH   J
8968 @ 70791:                     PUSH   REF
8969 @ 70794:                     PUSH   N
8970 @ 70797:                     ACCESS
8971 @ 70798:                     ASSVAL

  1157              TYPE = LOC(N)>>8
8972 @ 70799:                     LINE   1157 "regression-compile-tmp/comp412.imp"
8973 @ 70837:                     PUSH   TYPE
8974 @ 70840:                     PUSH   LOC
8975 @ 70843:                     PUSH   N
8976 @ 70846:                     ACCESS
8977 @ 70847:                     PUSHI  #0x00000008
8978 @ 70852:                     RSH   
8979 @ 70853:                     ASSVAL

  1158              N=CO(N);                       ! WELL ?
8980 @ 70854:                     LINE   1158 "regression-compile-tmp/comp412.imp"
8981 @ 70892:                     PUSH   N
8982 @ 70895:                     PUSH   CO
8983 @ 70898:                     PUSH   N
8984 @ 70901:                     ACCESS
8985 @ 70902:                     ASSVAL

  1159              -> ENTRY
8986 @ 70903:                     LINE   1159 "regression-compile-tmp/comp412.imp"
8987 @ 70941:                     JUMP   L_0104

  1160           %FINISH
8988 @ 70944:                     LINE   1160 "regression-compile-tmp/comp412.imp"
8989 @ 70982:                     LOCATE L_0007

  1161        %FINISH
8990 @ 70985:                     LINE   1161 "regression-compile-tmp/comp412.imp"
8991 @ 71023:                     LOCATE L_0004

  1162        -> SKIP
8992 @ 71026:                     LINE   1162 "regression-compile-tmp/comp412.imp"
8993 @ 71064:                     JUMP   L_0107

  1163  EOP:   REORDER
8994 @ 71067:                     LINE   1163 "regression-compile-tmp/comp412.imp"
8995 @ 71105:                     LABEL  L_0101
8996 @ 71108:                     LINE   1163 "regression-compile-tmp/comp412.imp"
8997 @ 71146:                     PUSH   REORDER
8998 @ 71149:                     CALL  

  1164        N=-N; SUB(N)=K
8999 @ 71150:                     LINE   1164 "regression-compile-tmp/comp412.imp"
9000 @ 71188:                     PUSH   N
9001 @ 71191:                     PUSH   N
9002 @ 71194:                     NEGATE
9003 @ 71195:                     ASSVAL
9004 @ 71196:                     LINE   1164 "regression-compile-tmp/comp412.imp"
9005 @ 71234:                     PUSH   SUB
9006 @ 71237:                     PUSH   N
9007 @ 71240:                     ACCESS
9008 @ 71241:                     PUSH   K
9009 @ 71244:                     ASSVAL

  1165  SKIP:                                       ! ON DOWN CHAIN
9010 @ 71245:                     LINE   1165 "regression-compile-tmp/comp412.imp"
9011 @ 71283:                     LABEL  L_0107

  1166        G=REF(N)&511; -> EOP %IF G=0
9012 @ 71286:                     LINE   1166 "regression-compile-tmp/comp412.imp"
9013 @ 71324:                     PUSH   G
9014 @ 71327:                     PUSH   REF
9015 @ 71330:                     PUSH   N
9016 @ 71333:                     ACCESS
9017 @ 71334:                     PUSHI  #0x000001ff
9018 @ 71339:                     AND   
9019 @ 71340:                     ASSVAL
9020 @ 71341:                     LINE   1166 "regression-compile-tmp/comp412.imp"
9021 @ 71379:                     PUSH   G
9022 @ 71382:                     PUSHI  #0x00000000
9023 @ 71387:                     JUMPIF # L_0004
9024 @ 71391:                     JUMP   L_0101
9025 @ 71394:                     LOCATE L_0004

  1167        TYPE=LOC(N)>>8
9026 @ 71397:                     LINE   1167 "regression-compile-tmp/comp412.imp"
9027 @ 71435:                     PUSH   TYPE
9028 @ 71438:                     PUSH   LOC
9029 @ 71441:                     PUSH   N
9030 @ 71444:                     ACCESS
9031 @ 71445:                     PUSHI  #0x00000008
9032 @ 71450:                     RSH   
9033 @ 71451:                     ASSVAL

  1168        -> L1
9034 @ 71452:                     LINE   1168 "regression-compile-tmp/comp412.imp"
9035 @ 71490:                     JUMP   L_0100

  1169  DIR(89):                                    ! %COLON
9036 @ 71493:                     LINE   1169 "regression-compile-tmp/comp412.imp"
9037 @ 71531:                     PUSHI  #0x00000059
9038 @ 71536:                     SLABEL 241

  1170        -> ERROR %UNLESS ATOM1=3;            ! LOOK FOR COLON
9039 @ 71539:                     LINE   1170 "regression-compile-tmp/comp412.imp"
9040 @ 71577:                     PUSH   ATOM1
9041 @ 71580:                     PUSHI  #0x00000003
9042 @ 71585:                     JUMPIF = L_0004
9043 @ 71589:                     JUMP   L_0102
9044 @ 71592:                     LOCATE L_0004

  1171  DONE:  N=A; REORDER; SS=K
9045 @ 71595:                     LINE   1171 "regression-compile-tmp/comp412.imp"
9046 @ 71633:                     LABEL  L_0105
9047 @ 71636:                     LINE   1171 "regression-compile-tmp/comp412.imp"
9048 @ 71674:                     PUSH   N
9049 @ 71677:                     PUSH   A
9050 @ 71680:                     ASSVAL
9051 @ 71681:                     LINE   1171 "regression-compile-tmp/comp412.imp"
9052 @ 71719:                     PUSH   REORDER
9053 @ 71722:                     CALL  
9054 @ 71723:                     LINE   1171 "regression-compile-tmp/comp412.imp"
9055 @ 71761:                     PUSH   SS
9056 @ 71764:                     PUSH   K
9057 @ 71767:                     ASSVAL

  1172        %RETURN %IF DUP=0
9058 @ 71768:                     LINE   1172 "regression-compile-tmp/comp412.imp"
9059 @ 71806:                     PUSH   DUP
9060 @ 71809:                     PUSHI  #0x00000000
9061 @ 71814:                     JUMPIF # L_0004
9062 @ 71818:                     RETURN
9063 @ 71819:                     LOCATE L_0004

  1173        F TYPE=7
9064 @ 71822:                     LINE   1173 "regression-compile-tmp/comp412.imp"
9065 @ 71860:                     PUSH   FTYPE
9066 @ 71863:                     PUSHI  #0x00000007
9067 @ 71868:                     ASSVAL

  1174  ERROR:
9068 @ 71869:                     LINE   1174 "regression-compile-tmp/comp412.imp"
9069 @ 71907:                     LABEL  L_0102

  1175        QUOTE=0 %AND READSYM %WHILE NL#SYM#';'
9070 @ 71910:                     LINE   1175 "regression-compile-tmp/comp412.imp"
9071 @ 71948:                     LOCATE L_0003
9072 @ 71951:                     PUSHI  #0x0000000a
9073 @ 71956:                     PUSH   SYM
9074 @ 71959:                     JUMPIFD = L_0004
9075 @ 71963:                     PUSHI  #0x0000003b
9076 @ 71968:                     JUMPIF = L_0004
9077 @ 71972:                     PUSH   QUOTE
9078 @ 71975:                     PUSHI  #0x00000000
9079 @ 71980:                     ASSVAL
9080 @ 71981:                     PUSH   READSYM
9081 @ 71984:                     CALL  
9082 @ 71985:                     REPEAT L_0003
9083 @ 71988:                     LOCATE L_0004

  1176        %IF F TYPE=0 %START
9084 @ 71991:                     LINE   1176 "regression-compile-tmp/comp412.imp"
9085 @ 72029:                     PUSH   FTYPE
9086 @ 72032:                     PUSHI  #0x00000000
9087 @ 72037:                     JUMPIF # L_0004

  1177           %IF ATOM1=IDENT %AND LIM=GLOBAL %START
9088 @ 72041:                     LINE   1177 "regression-compile-tmp/comp412.imp"
9089 @ 72079:                     PUSH   ATOM1
9090 @ 72082:                     PUSHI  #0x0000003b
9091 @ 72087:                     JUMPIF # L_0007
9092 @ 72091:                     PUSH   LIM
9093 @ 72094:                     PUSHI  #0x00000000
9094 @ 72099:                     JUMPIF # L_0007

  1178              F TYPE=3
9095 @ 72103:                     LINE   1178 "regression-compile-tmp/comp412.imp"
9096 @ 72141:                     PUSH   FTYPE
9097 @ 72144:                     PUSHI  #0x00000003
9098 @ 72149:                     ASSVAL

  1179           %ELSE %IF ATOM1 = 0
9099 @ 72150:                     LINE   1179 "regression-compile-tmp/comp412.imp"
9100 @ 72188:                     GOTO   L_0006
9101 @ 72191:                     LOCATE L_0007
9102 @ 72194:                     PUSH   ATOM1
9103 @ 72197:                     PUSHI  #0x00000000
9104 @ 72202:                     JUMPIF # L_0007

  1180              FTYPE = 1
9105 @ 72206:                     LINE   1180 "regression-compile-tmp/comp412.imp"
9106 @ 72244:                     PUSH   FTYPE
9107 @ 72247:                     PUSHI  #0x00000001
9108 @ 72252:                     ASSVAL

  1181           %ELSE %IF SCONST <= ATOM1 <= RCONST
9109 @ 72253:                     LINE   1181 "regression-compile-tmp/comp412.imp"
9110 @ 72291:                     GOTO   L_0006
9111 @ 72294:                     LOCATE L_0007
9112 @ 72297:                     PUSHI  #0x00000052
9113 @ 72302:                     PUSH   ATOM1
9114 @ 72305:                     JUMPIFD > L_0007
9115 @ 72309:                     PUSHI  #0x00000054
9116 @ 72314:                     JUMPIF > L_0007

  1182              FTYPE = 2
9117 @ 72318:                     LINE   1182 "regression-compile-tmp/comp412.imp"
9118 @ 72356:                     PUSH   FTYPE
9119 @ 72359:                     PUSHI  #0x00000002
9120 @ 72364:                     ASSVAL

  1183              FTYPE = 5 %IF TYPE = 15
9121 @ 72365:                     LINE   1183 "regression-compile-tmp/comp412.imp"
9122 @ 72403:                     PUSH   TYPE
9123 @ 72406:                     PUSHI  #0x0000000f
9124 @ 72411:                     JUMPIF # L_000a
9125 @ 72415:                     PUSH   FTYPE
9126 @ 72418:                     PUSHI  #0x00000005
9127 @ 72423:                     ASSVAL
9128 @ 72424:                     LOCATE L_000a

  1184           %FINISH
9129 @ 72427:                     LINE   1184 "regression-compile-tmp/comp412.imp"
9130 @ 72465:                     LOCATE L_0007
9131 @ 72468:                     LOCATE L_0006

  1185        %FINISH
9132 @ 72471:                     LINE   1185 "regression-compile-tmp/comp412.imp"
9133 @ 72509:                     LOCATE L_0004

  1186        FAULT(F TYPE)
9134 @ 72512:                     LINE   1186 "regression-compile-tmp/comp412.imp"
9135 @ 72550:                     PUSH   FAULT
9136 @ 72553:                     PUSH   FTYPE
9137 @ 72556:                     ASSPAR
9138 @ 72557:                     CALL  

  1187        QUOTE=0; SYMTYPE=0; DEC TYPE=0
9139 @ 72558:                     LINE   1187 "regression-compile-tmp/comp412.imp"
9140 @ 72596:                     PUSH   QUOTE
9141 @ 72599:                     PUSHI  #0x00000000
9142 @ 72604:                     ASSVAL
9143 @ 72605:                     LINE   1187 "regression-compile-tmp/comp412.imp"
9144 @ 72643:                     PUSH   SYMTYPE
9145 @ 72646:                     PUSHI  #0x00000000
9146 @ 72651:                     ASSVAL
9147 @ 72652:                     LINE   1187 "regression-compile-tmp/comp412.imp"
9148 @ 72690:                     PUSH   DECTYPE
9149 @ 72693:                     PUSHI  #0x00000000
9150 @ 72698:                     ASSVAL

  1188        PREFIX=0; SPREFIX=0;  CONST INT = 0
9151 @ 72699:                     LINE   1188 "regression-compile-tmp/comp412.imp"
9152 @ 72737:                     PUSH   PREFIX
9153 @ 72740:                     PUSHI  #0x00000000
9154 @ 72745:                     ASSVAL
9155 @ 72746:                     LINE   1188 "regression-compile-tmp/comp412.imp"
9156 @ 72784:                     PUSH   SPREFIX
9157 @ 72787:                     PUSHI  #0x00000000
9158 @ 72792:                     ASSVAL
9159 @ 72793:                     LINE   1188 "regression-compile-tmp/comp412.imp"
9160 @ 72831:                     PUSH   CONSTINT
9161 @ 72834:                     PUSHI  #0x00000000
9162 @ 72839:                     ASSVAL

  1189        %RETURN
9163 @ 72840:                     LINE   1189 "regression-compile-tmp/comp412.imp"
9164 @ 72878:                     RETURN

  1190  DIR(86):                                    ! %INT
9165 @ 72879:                     LINE   1190 "regression-compile-tmp/comp412.imp"
9166 @ 72917:                     PUSHI  #0x00000056
9167 @ 72922:                     SLABEL 241

  1191        -> ALT %IF TYPE > 3 %AND TYPE#8;     ! NOT INTEGER
9168 @ 72925:                     LINE   1191 "regression-compile-tmp/comp412.imp"
9169 @ 72963:                     PUSH   TYPE
9170 @ 72966:                     PUSHI  #0x00000003
9171 @ 72971:                     JUMPIF <= L_0004
9172 @ 72975:                     PUSH   TYPE
9173 @ 72978:                     PUSHI  #0x00000008
9174 @ 72983:                     JUMPIF = L_0004
9175 @ 72987:                     JUMP   L_0103
9176 @ 72990:                     LOCATE L_0004

  1192  DCONT:
9177 @ 72993:                     LINE   1192 "regression-compile-tmp/comp412.imp"
9178 @ 73031:                     LABEL  L_0108

  1193        G = J&511
9179 @ 73034:                     LINE   1193 "regression-compile-tmp/comp412.imp"
9180 @ 73072:                     PUSH   G
9181 @ 73075:                     PUSH   J
9182 @ 73078:                     PUSHI  #0x000001ff
9183 @ 73083:                     AND   
9184 @ 73084:                     ASSVAL

  1194        -> EOP %IF G=0;                      ! END OF PHRASE
9185 @ 73085:                     LINE   1194 "regression-compile-tmp/comp412.imp"
9186 @ 73123:                     PUSH   G
9187 @ 73126:                     PUSHI  #0x00000000
9188 @ 73131:                     JUMPIF # L_0004
9189 @ 73135:                     JUMP   L_0101
9190 @ 73138:                     LOCATE L_0004

  1195        -> L1
9191 @ 73141:                     LINE   1195 "regression-compile-tmp/comp412.imp"
9192 @ 73179:                     JUMP   L_0100

  1196  DIR(87):                                    ! %REAL
9193 @ 73182:                     LINE   1196 "regression-compile-tmp/comp412.imp"
9194 @ 73220:                     PUSHI  #0x00000057
9195 @ 73225:                     SLABEL 241

  1197        -> ALT %IF TYPE < 6 %OR TYPE=8 %OR TYPE = 15;! NOT REAL
9196 @ 73228:                     LINE   1197 "regression-compile-tmp/comp412.imp"
9197 @ 73266:                     PUSH   TYPE
9198 @ 73269:                     PUSHI  #0x00000006
9199 @ 73274:                     JUMPIF < L_0005
9200 @ 73278:                     PUSH   TYPE
9201 @ 73281:                     PUSHI  #0x00000008
9202 @ 73286:                     JUMPIF = L_0005
9203 @ 73290:                     PUSH   TYPE
9204 @ 73293:                     PUSHI  #0x0000000f
9205 @ 73298:                     JUMPIF # L_0004
9206 @ 73302:                     LOCATE L_0005
9207 @ 73305:                     JUMP   L_0103
9208 @ 73308:                     LOCATE L_0004

  1198        -> DCONT
9209 @ 73311:                     LINE   1198 "regression-compile-tmp/comp412.imp"
9210 @ 73349:                     JUMP   L_0108

  1199  DIR(88):                                    ! %STR
9211 @ 73352:                     LINE   1199 "regression-compile-tmp/comp412.imp"
9212 @ 73390:                     PUSHI  #0x00000058
9213 @ 73395:                     SLABEL 241

  1200        -> ALT %IF TYPE#4;                   ! NOT STRING
9214 @ 73398:                     LINE   1200 "regression-compile-tmp/comp412.imp"
9215 @ 73436:                     PUSH   TYPE
9216 @ 73439:                     PUSHI  #0x00000004
9217 @ 73444:                     JUMPIF = L_0004
9218 @ 73448:                     JUMP   L_0103
9219 @ 73451:                     LOCATE L_0004

  1201        -> DCONT
9220 @ 73454:                     LINE   1201 "regression-compile-tmp/comp412.imp"
9221 @ 73492:                     JUMP   L_0108

  1202  DIR(90):                                    ! %FN
9222 @ 73495:                     LINE   1202 "regression-compile-tmp/comp412.imp"
9223 @ 73533:                     PUSHI  #0x0000005a
9224 @ 73538:                     SLABEL 241

  1203        %IF BLOCK TYPE&15 # 8 %START;        ! NOT A FUNCTION
9225 @ 73541:                     LINE   1203 "regression-compile-tmp/comp412.imp"
9226 @ 73579:                     PUSH   BLOCKTYPE
9227 @ 73582:                     PUSHI  #0x0000000f
9228 @ 73587:                     AND   
9229 @ 73588:                     PUSHI  #0x00000008
9230 @ 73593:                     JUMPIF = L_0004

  1204           ->DALT %IF DIAG >= 0 %OR BLOCKTYPE&15 # 9;  ! OR A FUNNY MAP
9231 @ 73597:                     LINE   1204 "regression-compile-tmp/comp412.imp"
9232 @ 73635:                     PUSH   DIAG
9233 @ 73638:                     PUSHI  #0x00000000
9234 @ 73643:                     JUMPIF >= L_0008
9235 @ 73647:                     PUSH   BLOCKTYPE
9236 @ 73650:                     PUSHI  #0x0000000f
9237 @ 73655:                     AND   
9238 @ 73656:                     PUSHI  #0x00000009
9239 @ 73661:                     JUMPIF = L_0007
9240 @ 73665:                     LOCATE L_0008
9241 @ 73668:                     JUMP   L_0109
9242 @ 73671:                     LOCATE L_0007

  1205        %FINISH
9243 @ 73674:                     LINE   1205 "regression-compile-tmp/comp412.imp"
9244 @ 73712:                     LOCATE L_0004

  1206        TYPE=BLOCK TYPE>>4&7
9245 @ 73715:                     LINE   1206 "regression-compile-tmp/comp412.imp"
9246 @ 73753:                     PUSH   TYPE
9247 @ 73756:                     PUSH   BLOCKTYPE
9248 @ 73759:                     PUSHI  #0x00000004
9249 @ 73764:                     RSH   
9250 @ 73765:                     PUSHI  #0x00000007
9251 @ 73770:                     AND   
9252 @ 73771:                     ASSVAL

  1207        %IF TYPE <= 3 %THEN TYPE=8 %ELSE %START
9253 @ 73772:                     LINE   1207 "regression-compile-tmp/comp412.imp"
9254 @ 73810:                     PUSH   TYPE
9255 @ 73813:                     PUSHI  #0x00000003
9256 @ 73818:                     JUMPIF > L_0004
9257 @ 73822:                     PUSH   TYPE
9258 @ 73825:                     PUSHI  #0x00000008
9259 @ 73830:                     ASSVAL
9260 @ 73831:                     GOTO   L_0003
9261 @ 73834:                     LOCATE L_0004

  1208           TYPE=9 %IF TYPE >= 6
9262 @ 73837:                     LINE   1208 "regression-compile-tmp/comp412.imp"
9263 @ 73875:                     PUSH   TYPE
9264 @ 73878:                     PUSHI  #0x00000006
9265 @ 73883:                     JUMPIF < L_0007
9266 @ 73887:                     PUSH   TYPE
9267 @ 73890:                     PUSHI  #0x00000009
9268 @ 73895:                     ASSVAL
9269 @ 73896:                     LOCATE L_0007

  1209        %FINISH
9270 @ 73899:                     LINE   1209 "regression-compile-tmp/comp412.imp"
9271 @ 73937:                     LOCATE L_0003

  1210        -> DCONT
9272 @ 73940:                     LINE   1210 "regression-compile-tmp/comp412.imp"
9273 @ 73978:                     JUMP   L_0108

  1211  DIR(91):                                    ! %M
9274 @ 73981:                     LINE   1211 "regression-compile-tmp/comp412.imp"
9275 @ 74019:                     PUSHI  #0x0000005b
9276 @ 74024:                     SLABEL 241

  1212        -> DALT %IF BLOCK TYPE&15#9;         ! NOT A MAP
9277 @ 74027:                     LINE   1212 "regression-compile-tmp/comp412.imp"
9278 @ 74065:                     PUSH   BLOCKTYPE
9279 @ 74068:                     PUSHI  #0x0000000f
9280 @ 74073:                     AND   
9281 @ 74074:                     PUSHI  #0x00000009
9282 @ 74079:                     JUMPIF = L_0004
9283 @ 74083:                     JUMP   L_0109
9284 @ 74086:                     LOCATE L_0004

  1213        TYPE=BLOCK TYPE>>4&7
9285 @ 74089:                     LINE   1213 "regression-compile-tmp/comp412.imp"
9286 @ 74127:                     PUSH   TYPE
9287 @ 74130:                     PUSH   BLOCKTYPE
9288 @ 74133:                     PUSHI  #0x00000004
9289 @ 74138:                     RSH   
9290 @ 74139:                     PUSHI  #0x00000007
9291 @ 74144:                     AND   
9292 @ 74145:                     ASSVAL

  1214        -> DCONT
9293 @ 74146:                     LINE   1214 "regression-compile-tmp/comp412.imp"
9294 @ 74184:                     JUMP   L_0108

  1215  DIR(94):                                    ! %SUB
9295 @ 74187:                     LINE   1215 "regression-compile-tmp/comp412.imp"
9296 @ 74225:                     PUSHI  #0x0000005e
9297 @ 74230:                     SLABEL 241

  1216        -> DCONT %IF SUB LOCK#0
9298 @ 74233:                     LINE   1216 "regression-compile-tmp/comp412.imp"
9299 @ 74271:                     PUSH   SUBLOCK
9300 @ 74274:                     PUSHI  #0x00000000
9301 @ 74279:                     JUMPIF = L_0004
9302 @ 74283:                     JUMP   L_0108
9303 @ 74286:                     LOCATE L_0004

  1217        -> ALT %UNLESS ATOM1=U LINE
9304 @ 74289:                     LINE   1217 "regression-compile-tmp/comp412.imp"
9305 @ 74327:                     PUSH   ATOM1
9306 @ 74330:                     PUSHI  #0x00000012
9307 @ 74335:                     JUMPIF = L_0004
9308 @ 74339:                     JUMP   L_0103
9309 @ 74342:                     LOCATE L_0004

  1218        -> ERROR %IF SYMTYPE # -2
9310 @ 74345:                     LINE   1218 "regression-compile-tmp/comp412.imp"
9311 @ 74383:                     PUSH   SYMTYPE
9312 @ 74386:                     PUSHI  #0x00000002
9313 @ 74391:                     NEGATE
9314 @ 74392:                     JUMPIF = L_0004
9315 @ 74396:                     JUMP   L_0102
9316 @ 74399:                     LOCATE L_0004

  1219        L=FORMAT
9317 @ 74402:                     LINE   1219 "regression-compile-tmp/comp412.imp"
9318 @ 74440:                     PUSH   L
9319 @ 74443:                     PUSH   FORMAT
9320 @ 74446:                     ASSVAL

  1220        CODE ATOM
9321 @ 74447:                     LINE   1220 "regression-compile-tmp/comp412.imp"
9322 @ 74485:                     PUSH   CODEATOM
9323 @ 74488:                     CALL  

  1221        ATOM2=0
9324 @ 74489:                     LINE   1221 "regression-compile-tmp/comp412.imp"
9325 @ 74527:                     PUSH   ATOM2
9326 @ 74530:                     PUSHI  #0x00000000
9327 @ 74535:                     ASSVAL

  1222        F TYPE=8 %AND -> ERROR %IF L <= 0
9328 @ 74536:                     LINE   1222 "regression-compile-tmp/comp412.imp"
9329 @ 74574:                     PUSH   L
9330 @ 74577:                     PUSHI  #0x00000000
9331 @ 74582:                     JUMPIF > L_0004
9332 @ 74586:                     PUSH   FTYPE
9333 @ 74589:                     PUSHI  #0x00000008
9334 @ 74594:                     ASSVAL
9335 @ 74595:                     JUMP   L_0102
9336 @ 74598:                     LOCATE L_0004

  1223        LIM=DICT(L);                         ! ONTO THE END
9337 @ 74601:                     LINE   1223 "regression-compile-tmp/comp412.imp"
9338 @ 74639:                     PUSH   LIM
9339 @ 74642:                     PUSH   DICT
9340 @ 74645:                     PUSH   L
9341 @ 74648:                     ACCESS
9342 @ 74649:                     ASSVAL

  1224        LOOKUP(L);                           ! LOOK FOR SUBNAME
9343 @ 74650:                     LINE   1224 "regression-compile-tmp/comp412.imp"
9344 @ 74688:                     PUSH   LOOKUP
9345 @ 74691:                     PUSH   L
9346 @ 74694:                     ASSPAR
9347 @ 74695:                     CALL  

  1225        F TYPE=3 %AND -> ERROR %IF ATOM2=0
  1226                                            ! NOT FOUND
9348 @ 74696:                     LINE   1225 "regression-compile-tmp/comp412.imp"
9349 @ 74734:                     PUSH   ATOM2
9350 @ 74737:                     PUSHI  #0x00000000
9351 @ 74742:                     JUMPIF # L_0004
9352 @ 74746:                     PUSH   FTYPE
9353 @ 74749:                     PUSHI  #0x00000003
9354 @ 74754:                     ASSVAL
9355 @ 74755:                     JUMP   L_0102
9356 @ 74758:                     LOCATE L_0004

  1227        SUB LOCK=1
9357 @ 74761:                     LINE   1227 "regression-compile-tmp/comp412.imp"
9358 @ 74799:                     PUSH   SUBLOCK
9359 @ 74802:                     PUSHI  #0x00000001
9360 @ 74807:                     ASSVAL

  1228        -> DCONT
9361 @ 74808:                     LINE   1228 "regression-compile-tmp/comp412.imp"
9362 @ 74846:                     JUMP   L_0108

  1229  DIR(95):                                    ! %APP
9363 @ 74849:                     LINE   1229 "regression-compile-tmp/comp412.imp"
9364 @ 74887:                     PUSHI  #0x0000005f
9365 @ 74892:                     SLABEL 241

  1230        -> ALT %UNLESS ATOM1=LB
9366 @ 74895:                     LINE   1230 "regression-compile-tmp/comp412.imp"
9367 @ 74933:                     PUSH   ATOM1
9368 @ 74936:                     PUSHI  #0x00000001
9369 @ 74941:                     JUMPIF = L_0004
9370 @ 74945:                     JUMP   L_0103
9371 @ 74948:                     LOCATE L_0004

  1231        -> DCONT
9372 @ 74951:                     LINE   1231 "regression-compile-tmp/comp412.imp"
9373 @ 74989:                     JUMP   L_0108

  1232  DIR(97):                                    ! %SETPLUS
9374 @ 74992:                     LINE   1232 "regression-compile-tmp/comp412.imp"
9375 @ 75030:                     PUSHI  #0x00000061
9376 @ 75035:                     SLABEL 241

  1233        PAPP = APP
9377 @ 75038:                     LINE   1233 "regression-compile-tmp/comp412.imp"
9378 @ 75076:                     PUSH   PAPP
9379 @ 75079:                     PUSH   APP
9380 @ 75082:                     ASSVAL

  1234        L = PHRASE(152+APARM&7)
9381 @ 75083:                     LINE   1234 "regression-compile-tmp/comp412.imp"
9382 @ 75121:                     PUSH   L
9383 @ 75124:                     PUSH   PHRASE
9384 @ 75127:                     PUSHI  #0x00000098
9385 @ 75132:                     PUSH   APARM
9386 @ 75135:                     PUSHI  #0x00000007
9387 @ 75140:                     AND   
9388 @ 75141:                     ADD   
9389 @ 75142:                     ACCESS
9390 @ 75143:                     ASSVAL

  1235        DICT(APARM>>3)=L %IF APARM&X'FFF8'#0
9391 @ 75144:                     LINE   1235 "regression-compile-tmp/comp412.imp"
9392 @ 75182:                     PUSH   APARM
9393 @ 75185:                     PUSHI  #0x0000fff8
9394 @ 75190:                     AND   
9395 @ 75191:                     PUSHI  #0x00000000
9396 @ 75196:                     JUMPIF = L_0004
9397 @ 75200:                     PUSH   DICT
9398 @ 75203:                     PUSH   APARM
9399 @ 75206:                     PUSHI  #0x00000003
9400 @ 75211:                     RSH   
9401 @ 75212:                     ACCESS
9402 @ 75213:                     PUSH   L
9403 @ 75216:                     ASSVAL
9404 @ 75217:                     LOCATE L_0004

  1236        %WHILE A CHAIN#0 %CYCLE
9405 @ 75220:                     LINE   1236 "regression-compile-tmp/comp412.imp"
9406 @ 75258:                     LOCATE L_0003
9407 @ 75261:                     PUSH   ACHAIN
9408 @ 75264:                     PUSHI  #0x00000000
9409 @ 75269:                     JUMPIF = L_0004

  1237           T=A CHAIN; A CHAIN=DICT(T); DICT(T)=L
9410 @ 75273:                     LINE   1237 "regression-compile-tmp/comp412.imp"
9411 @ 75311:                     PUSH   T
9412 @ 75314:                     PUSH   ACHAIN
9413 @ 75317:                     ASSVAL
9414 @ 75318:                     LINE   1237 "regression-compile-tmp/comp412.imp"
9415 @ 75356:                     PUSH   ACHAIN
9416 @ 75359:                     PUSH   DICT
9417 @ 75362:                     PUSH   T
9418 @ 75365:                     ACCESS
9419 @ 75366:                     ASSVAL
9420 @ 75367:                     LINE   1237 "regression-compile-tmp/comp412.imp"
9421 @ 75405:                     PUSH   DICT
9422 @ 75408:                     PUSH   T
9423 @ 75411:                     ACCESS
9424 @ 75412:                     PUSH   L
9425 @ 75415:                     ASSVAL

  1238        %REPEAT
  1239                                            ! SET APP FOR ARRAY
9426 @ 75416:                     LINE   1238 "regression-compile-tmp/comp412.imp"
9427 @ 75454:                     REPEAT L_0003
9428 @ 75457:                     LOCATE L_0004

  1240        -> DCONT
9429 @ 75460:                     LINE   1240 "regression-compile-tmp/comp412.imp"
9430 @ 75498:                     JUMP   L_0108

  1241  DIR(98):                                    ! %PLUS
9431 @ 75501:                     LINE   1241 "regression-compile-tmp/comp412.imp"
9432 @ 75539:                     PUSHI  #0x00000062
9433 @ 75544:                     SLABEL 241

  1242        F TYPE=4 %AND -> ERROR %IF APARM&7=6
9434 @ 75547:                     LINE   1242 "regression-compile-tmp/comp412.imp"
9435 @ 75585:                     PUSH   APARM
9436 @ 75588:                     PUSHI  #0x00000007
9437 @ 75593:                     AND   
9438 @ 75594:                     PUSHI  #0x00000006
9439 @ 75599:                     JUMPIF # L_0004
9440 @ 75603:                     PUSH   FTYPE
9441 @ 75606:                     PUSHI  #0x00000004
9442 @ 75611:                     ASSVAL
9443 @ 75612:                     JUMP   L_0102
9444 @ 75615:                     LOCATE L_0004

  1243        APARM=APARM+1
9445 @ 75618:                     LINE   1243 "regression-compile-tmp/comp412.imp"
9446 @ 75656:                     PUSH   APARM
9447 @ 75659:                     PUSH   APARM
9448 @ 75662:                     PUSHI  #0x00000001
9449 @ 75667:                     ADD   
9450 @ 75668:                     ASSVAL

  1244        -> DCONT
9451 @ 75669:                     LINE   1244 "regression-compile-tmp/comp412.imp"
9452 @ 75707:                     JUMP   L_0108

  1245  DIR(99):                                    ! %AMBIG
9453 @ 75710:                     LINE   1245 "regression-compile-tmp/comp412.imp"
9454 @ 75748:                     PUSHI  #0x00000063
9455 @ 75753:                     SLABEL 241

  1246        AMBIG=J&511
9456 @ 75756:                     LINE   1246 "regression-compile-tmp/comp412.imp"
9457 @ 75794:                     PUSH   AMBIG
9458 @ 75797:                     PUSH   J
9459 @ 75800:                     PUSHI  #0x000001ff
9460 @ 75805:                     AND   
9461 @ 75806:                     ASSVAL

  1247        -> ALT
9462 @ 75807:                     LINE   1247 "regression-compile-tmp/comp412.imp"
9463 @ 75845:                     JUMP   L_0103

  1248  DIR(100):                                   !  %DUMMY
9464 @ 75848:                     LINE   1248 "regression-compile-tmp/comp412.imp"
9465 @ 75886:                     PUSHI  #0x00000064
9466 @ 75891:                     SLABEL 241

  1249           EXTEND = 1 %IF A1 # A
9467 @ 75894:                     LINE   1249 "regression-compile-tmp/comp412.imp"
9468 @ 75932:                     PUSH   A1
9469 @ 75935:                     PUSH   A
9470 @ 75938:                     JUMPIF = L_0004
9471 @ 75942:                     PUSH   EXTEND
9472 @ 75945:                     PUSHI  #0x00000001
9473 @ 75950:                     ASSVAL
9474 @ 75951:                     LOCATE L_0004

  1250           A1 = A1-1;  K = 0
9475 @ 75954:                     LINE   1250 "regression-compile-tmp/comp412.imp"
9476 @ 75992:                     PUSH   A1
9477 @ 75995:                     PUSH   A1
9478 @ 75998:                     PUSHI  #0x00000001
9479 @ 76003:                     SUB   
9480 @ 76004:                     ASSVAL
9481 @ 76005:                     LINE   1250 "regression-compile-tmp/comp412.imp"
9482 @ 76043:                     PUSH   K
9483 @ 76046:                     PUSHI  #0x00000000
9484 @ 76051:                     ASSVAL

  1251           ->ENTRY
9485 @ 76052:                     LINE   1251 "regression-compile-tmp/comp412.imp"
9486 @ 76090:                     JUMP   L_0104

  1252  DIR(101):                                   ! %LUP
9487 @ 76093:                     LINE   1252 "regression-compile-tmp/comp412.imp"
9488 @ 76131:                     PUSHI  #0x00000065
9489 @ 76136:                     SLABEL 241

  1253        DICT(T LIMIT-2)=APARM
9490 @ 76139:                     LINE   1253 "regression-compile-tmp/comp412.imp"
9491 @ 76177:                     PUSH   DICT
9492 @ 76180:                     PUSH   TLIMIT
9493 @ 76183:                     PUSHI  #0x00000002
9494 @ 76188:                     SUB   
9495 @ 76189:                     ACCESS
9496 @ 76190:                     PUSH   APARM
9497 @ 76193:                     ASSVAL

  1254        DICT(T LIMIT-1)=FORMAT
9498 @ 76194:                     LINE   1254 "regression-compile-tmp/comp412.imp"
9499 @ 76232:                     PUSH   DICT
9500 @ 76235:                     PUSH   TLIMIT
9501 @ 76238:                     PUSHI  #0x00000001
9502 @ 76243:                     SUB   
9503 @ 76244:                     ACCESS
9504 @ 76245:                     PUSH   FORMAT
9505 @ 76248:                     ASSVAL

  1255        ->DCONT %UNLESS NODE = A1
9506 @ 76249:                     LINE   1255 "regression-compile-tmp/comp412.imp"
9507 @ 76287:                     PUSH   NODE
9508 @ 76290:                     PUSH   A1
9509 @ 76293:                     JUMPIF = L_0004
9510 @ 76297:                     JUMP   L_0108
9511 @ 76300:                     LOCATE L_0004

  1256        TLIMIT = TLIMIT-2;  FAULT(23) %IF T LIMIT <= T MAX
9512 @ 76303:                     LINE   1256 "regression-compile-tmp/comp412.imp"
9513 @ 76341:                     PUSH   TLIMIT
9514 @ 76344:                     PUSH   TLIMIT
9515 @ 76347:                     PUSHI  #0x00000002
9516 @ 76352:                     SUB   
9517 @ 76353:                     ASSVAL
9518 @ 76354:                     LINE   1256 "regression-compile-tmp/comp412.imp"
9519 @ 76392:                     PUSH   TLIMIT
9520 @ 76395:                     PUSH   TMAX
9521 @ 76398:                     JUMPIF > L_0004
9522 @ 76402:                     PUSH   FAULT
9523 @ 76405:                     PUSHI  #0x00000017
9524 @ 76410:                     ASSPAR
9525 @ 76411:                     CALL  
9526 @ 76412:                     LOCATE L_0004

  1257        -> DCONT
9527 @ 76415:                     LINE   1257 "regression-compile-tmp/comp412.imp"
9528 @ 76453:                     JUMP   L_0108

  1258  DIR(102):                                   ! %LDOWN
9529 @ 76456:                     LINE   1258 "regression-compile-tmp/comp412.imp"
9530 @ 76494:                     PUSHI  #0x00000066
9531 @ 76499:                     SLABEL 241

  1259        ->DCONT %IF DOWN LOCK # 0
9532 @ 76502:                     LINE   1259 "regression-compile-tmp/comp412.imp"
9533 @ 76540:                     PUSH   DOWNLOCK
9534 @ 76543:                     PUSHI  #0x00000000
9535 @ 76548:                     JUMPIF = L_0004
9536 @ 76552:                     JUMP   L_0108
9537 @ 76555:                     LOCATE L_0004

  1260        DOWN LOCK = 1
9538 @ 76558:                     LINE   1260 "regression-compile-tmp/comp412.imp"
9539 @ 76596:                     PUSH   DOWNLOCK
9540 @ 76599:                     PUSHI  #0x00000001
9541 @ 76604:                     ASSVAL

  1261        APARM=DICT(T LIMIT  )
9542 @ 76605:                     LINE   1261 "regression-compile-tmp/comp412.imp"
9543 @ 76643:                     PUSH   APARM
9544 @ 76646:                     PUSH   DICT
9545 @ 76649:                     PUSH   TLIMIT
9546 @ 76652:                     ACCESS
9547 @ 76653:                     ASSVAL

  1262        FORMAT=DICT(T LIMIT+1)
9548 @ 76654:                     LINE   1262 "regression-compile-tmp/comp412.imp"
9549 @ 76692:                     PUSH   FORMAT
9550 @ 76695:                     PUSH   DICT
9551 @ 76698:                     PUSH   TLIMIT
9552 @ 76701:                     PUSHI  #0x00000001
9553 @ 76706:                     ADD   
9554 @ 76707:                     ACCESS
9555 @ 76708:                     ASSVAL

  1263        T LIMIT = T LIMIT+2 %IF NODE = A1
9556 @ 76709:                     LINE   1263 "regression-compile-tmp/comp412.imp"
9557 @ 76747:                     PUSH   NODE
9558 @ 76750:                     PUSH   A1
9559 @ 76753:                     JUMPIF # L_0004
9560 @ 76757:                     PUSH   TLIMIT
9561 @ 76760:                     PUSH   TLIMIT
9562 @ 76763:                     PUSHI  #0x00000002
9563 @ 76768:                     ADD   
9564 @ 76769:                     ASSVAL
9565 @ 76770:                     LOCATE L_0004

  1264        -> D CONT
9566 @ 76773:                     LINE   1264 "regression-compile-tmp/comp412.imp"
9567 @ 76811:                     JUMP   L_0108

  1265  DALT:  F TYPE=5;                            ! CONTEXT
9568 @ 76814:                     LINE   1265 "regression-compile-tmp/comp412.imp"
9569 @ 76852:                     LABEL  L_0109
9570 @ 76855:                     LINE   1265 "regression-compile-tmp/comp412.imp"
9571 @ 76893:                     PUSH   FTYPE
9572 @ 76896:                     PUSHI  #0x00000005
9573 @ 76901:                     ASSVAL

  1266        -> ALT
9574 @ 76902:                     LINE   1266 "regression-compile-tmp/comp412.imp"
9575 @ 76940:                     JUMP   L_0103

  1267     %END;                                   ! OF ANALYSE
9576 @ 76943:                     LINE   1267 "regression-compile-tmp/comp412.imp"
9577 @ 76981:                  END    _lev0id0_COMPILEBLOCK_ANALYSESS_ANALYSE {lev=4 --> 3}

  1268        FORMAT=0; APARM=0; RELOCATE=0
9578 @ 76982:                  LINE   1268 "regression-compile-tmp/comp412.imp"
9579 @ 77020:                  PUSH   FORMAT
9580 @ 77023:                  PUSHI  #0x00000000
9581 @ 77028:                  ASSVAL
9582 @ 77029:                  LINE   1268 "regression-compile-tmp/comp412.imp"
9583 @ 77067:                  PUSH   APARM
9584 @ 77070:                  PUSHI  #0x00000000
9585 @ 77075:                  ASSVAL
9586 @ 77076:                  LINE   1268 "regression-compile-tmp/comp412.imp"
9587 @ 77114:                  PUSH   RELOCATE
9588 @ 77117:                  PUSHI  #0x00000000
9589 @ 77122:                  ASSVAL

  1269        LITPOS=400
9590 @ 77123:                  LINE   1269 "regression-compile-tmp/comp412.imp"
9591 @ 77161:                  PUSH   LITPOS
9592 @ 77164:                  PUSHI  #0x00000190
9593 @ 77169:                  ASSVAL

  1270        SS=0; DEC TYPE=0; DUP=0;  CONST INT = 0
9594 @ 77170:                  LINE   1270 "regression-compile-tmp/comp412.imp"
9595 @ 77208:                  PUSH   SS
9596 @ 77211:                  PUSHI  #0x00000000
9597 @ 77216:                  ASSVAL
9598 @ 77217:                  LINE   1270 "regression-compile-tmp/comp412.imp"
9599 @ 77255:                  PUSH   DECTYPE
9600 @ 77258:                  PUSHI  #0x00000000
9601 @ 77263:                  ASSVAL
9602 @ 77264:                  LINE   1270 "regression-compile-tmp/comp412.imp"
9603 @ 77302:                  PUSH   DUP
9604 @ 77305:                  PUSHI  #0x00000000
9605 @ 77310:                  ASSVAL
9606 @ 77311:                  LINE   1270 "regression-compile-tmp/comp412.imp"
9607 @ 77349:                  PUSH   CONSTINT
9608 @ 77352:                  PUSHI  #0x00000000
9609 @ 77357:                  ASSVAL

  1271        PREFIX=0; SPREFIX=0
9610 @ 77358:                  LINE   1271 "regression-compile-tmp/comp412.imp"
9611 @ 77396:                  PUSH   PREFIX
9612 @ 77399:                  PUSHI  #0x00000000
9613 @ 77404:                  ASSVAL
9614 @ 77405:                  LINE   1271 "regression-compile-tmp/comp412.imp"
9615 @ 77443:                  PUSH   SPREFIX
9616 @ 77446:                  PUSHI  #0x00000000
9617 @ 77451:                  ASSVAL

  1272        A CHAIN=0; F TYPE=0; MARK = ' '
9618 @ 77452:                  LINE   1272 "regression-compile-tmp/comp412.imp"
9619 @ 77490:                  PUSH   ACHAIN
9620 @ 77493:                  PUSHI  #0x00000000
9621 @ 77498:                  ASSVAL
9622 @ 77499:                  LINE   1272 "regression-compile-tmp/comp412.imp"
9623 @ 77537:                  PUSH   FTYPE
9624 @ 77540:                  PUSHI  #0x00000000
9625 @ 77545:                  ASSVAL
9626 @ 77546:                  LINE   1272 "regression-compile-tmp/comp412.imp"
9627 @ 77584:                  PUSH   MARK
9628 @ 77587:                  PUSHI  #0x00000020
9629 @ 77592:                  ASSVAL

  1273        %IF CONT=0 %START
9630 @ 77593:                  LINE   1273 "regression-compile-tmp/comp412.imp"
9631 @ 77631:                  PUSH   CONT
9632 @ 77634:                  PUSHI  #0x00000000
9633 @ 77639:                  JUMPIF # L_0004

  1274           MARGIN = MARGIN+POS
9634 @ 77643:                  LINE   1274 "regression-compile-tmp/comp412.imp"
9635 @ 77681:                  PUSH   MARGIN
9636 @ 77684:                  PUSH   MARGIN
9637 @ 77687:                  PUSH   POS
9638 @ 77690:                  ADD   
9639 @ 77691:                  ASSVAL

  1275           %IF SYM TYPE=0 %START
9640 @ 77692:                  LINE   1275 "regression-compile-tmp/comp412.imp"
9641 @ 77730:                  PUSH   SYMTYPE
9642 @ 77733:                  PUSHI  #0x00000000
9643 @ 77738:                  JUMPIF # L_0007

  1276              POS=0; READ SYM
9644 @ 77742:                  LINE   1276 "regression-compile-tmp/comp412.imp"
9645 @ 77780:                  PUSH   POS
9646 @ 77783:                  PUSHI  #0x00000000
9647 @ 77788:                  ASSVAL
9648 @ 77789:                  LINE   1276 "regression-compile-tmp/comp412.imp"
9649 @ 77827:                  PUSH   READSYM
9650 @ 77830:                  CALL  

  1277           %FINISH
9651 @ 77831:                  LINE   1277 "regression-compile-tmp/comp412.imp"
9652 @ 77869:                  LOCATE L_0007

  1278           ATOM1=0
9653 @ 77872:                  LINE   1278 "regression-compile-tmp/comp412.imp"
9654 @ 77910:                  PUSH   ATOM1
9655 @ 77913:                  PUSHI  #0x00000000
9656 @ 77918:                  ASSVAL

  1279           %IF SYMTYPE=0 %OR SYM='!' %START
9657 @ 77919:                  LINE   1279 "regression-compile-tmp/comp412.imp"
9658 @ 77957:                  PUSH   SYMTYPE
9659 @ 77960:                  PUSHI  #0x00000000
9660 @ 77965:                  JUMPIF = L_0008
9661 @ 77969:                  PUSH   SYM
9662 @ 77972:                  PUSHI  #0x00000021
9663 @ 77977:                  JUMPIF # L_0007
9664 @ 77981:                  LOCATE L_0008

  1280  SKIP:        READSYM %WHILE SYMTYPE#0
9665 @ 77984:                  LINE   1280 "regression-compile-tmp/comp412.imp"
9666 @ 78022:                  LABEL  L_00f0
9667 @ 78025:                  LINE   1280 "regression-compile-tmp/comp412.imp"
9668 @ 78063:                  LOCATE L_0009
9669 @ 78066:                  PUSH   SYMTYPE
9670 @ 78069:                  PUSHI  #0x00000000
9671 @ 78074:                  JUMPIF = L_000a
9672 @ 78078:                  PUSH   READSYM
9673 @ 78081:                  CALL  
9674 @ 78082:                  REPEAT L_0009
9675 @ 78085:                  LOCATE L_000a

  1281              %RETURN
9676 @ 78088:                  LINE   1281 "regression-compile-tmp/comp412.imp"
9677 @ 78126:                  RETURN

  1282           %FINISH
9678 @ 78127:                  LINE   1282 "regression-compile-tmp/comp412.imp"
9679 @ 78165:                  LOCATE L_0007

  1283           CODE ATOM; -> SKIP %IF ATOM1=COMMENT
9680 @ 78168:                  LINE   1283 "regression-compile-tmp/comp412.imp"
9681 @ 78206:                  PUSH   CODEATOM
9682 @ 78209:                  CALL  
9683 @ 78210:                  LINE   1283 "regression-compile-tmp/comp412.imp"
9684 @ 78248:                  PUSH   ATOM1
9685 @ 78251:                  PUSHI  #0x00000007
9686 @ 78256:                  JUMPIF # L_0007
9687 @ 78260:                  JUMP   L_00f0
9688 @ 78263:                  LOCATE L_0007

  1284           STATS=STATS+1
9689 @ 78266:                  LINE   1284 "regression-compile-tmp/comp412.imp"
9690 @ 78304:                  PUSH   STATS
9691 @ 78307:                  PUSH   STATS
9692 @ 78310:                  PUSHI  #0x00000001
9693 @ 78315:                  ADD   
9694 @ 78316:                  ASSVAL

  1285           OP('O',LINE NUM) %IF  PERMIN = 0; ! DUMP LINE NUMBER
9695 @ 78317:                  LINE   1285 "regression-compile-tmp/comp412.imp"
9696 @ 78355:                  PUSH   PERMIN
9697 @ 78358:                  PUSHI  #0x00000000
9698 @ 78363:                  JUMPIF # L_0007
9699 @ 78367:                  PUSH   OP
9700 @ 78370:                  PUSHI  #0x0000004f
9701 @ 78375:                  ASSPAR
9702 @ 78376:                  PUSH   LINENUM
9703 @ 78379:                  ASSPAR
9704 @ 78380:                  CALL  
9705 @ 78381:                  LOCATE L_0007

  1286           %IF ATOM1 =  MCODE %AND SUBATOM = 1 %START
9706 @ 78384:                  LINE   1286 "regression-compile-tmp/comp412.imp"
9707 @ 78422:                  PUSH   ATOM1
9708 @ 78425:                  PUSHI  #0x00000026
9709 @ 78430:                  JUMPIF # L_0007
9710 @ 78434:                  PUSH   SUBATOM
9711 @ 78437:                  PUSHI  #0x00000001
9712 @ 78442:                  JUMPIF # L_0007

  1287              CODE ATOM
9713 @ 78446:                  LINE   1287 "regression-compile-tmp/comp412.imp"
9714 @ 78484:                  PUSH   CODEATOM
9715 @ 78487:                  CALL  

  1288              %IF ATOM2 = IDENT %START
9716 @ 78488:                  LINE   1288 "regression-compile-tmp/comp412.imp"
9717 @ 78526:                  PUSH   ATOM2
9718 @ 78529:                  PUSHI  #0x0000003b
9719 @ 78534:                  JUMPIF # L_000a

  1289                 LIM = GLOBAL;  LOOKUP(T BASE)
9720 @ 78538:                  LINE   1289 "regression-compile-tmp/comp412.imp"
9721 @ 78576:                  PUSH   LIM
9722 @ 78579:                  PUSHI  #0x00000000
9723 @ 78584:                  ASSVAL
9724 @ 78585:                  LINE   1289 "regression-compile-tmp/comp412.imp"
9725 @ 78623:                  PUSH   LOOKUP
9726 @ 78626:                  PUSH   TBASE
9727 @ 78629:                  ASSPAR
9728 @ 78630:                  CALL  

  1290              %FINISH
9729 @ 78631:                  LINE   1290 "regression-compile-tmp/comp412.imp"
9730 @ 78669:                  LOCATE L_000a

  1291              FAULT(0) %IF ATOM2 # ICONST
9731 @ 78672:                  LINE   1291 "regression-compile-tmp/comp412.imp"
9732 @ 78710:                  PUSH   ATOM2
9733 @ 78713:                  PUSHI  #0x00000053
9734 @ 78718:                  JUMPIF = L_000a
9735 @ 78722:                  PUSH   FAULT
9736 @ 78725:                  PUSHI  #0x00000000
9737 @ 78730:                  ASSPAR
9738 @ 78731:                  CALL  
9739 @ 78732:                  LOCATE L_000a

  1292              CGEN(EVAL(SUBATOM));  PUT('P')
9740 @ 78735:                  LINE   1292 "regression-compile-tmp/comp412.imp"
9741 @ 78773:                  PUSH   CGEN
9742 @ 78776:                  PUSH   EVAL
9743 @ 78779:                  PUSH   SUBATOM
9744 @ 78782:                  ASSPAR
9745 @ 78783:                  CALL  
9746 @ 78784:                  ASSPAR
9747 @ 78785:                  CALL  
9748 @ 78786:                  LINE   1292 "regression-compile-tmp/comp412.imp"
9749 @ 78824:                  PUSH   PUT
9750 @ 78827:                  PUSHI  #0x00000050
9751 @ 78832:                  ASSPAR
9752 @ 78833:                  CALL  

  1293              %RETURN
9753 @ 78834:                  LINE   1293 "regression-compile-tmp/comp412.imp"
9754 @ 78872:                  RETURN

  1294           %FINISH
9755 @ 78873:                  LINE   1294 "regression-compile-tmp/comp412.imp"
9756 @ 78911:                  LOCATE L_0007

  1295           TYPE=0
9757 @ 78914:                  LINE   1295 "regression-compile-tmp/comp412.imp"
9758 @ 78952:                  PUSH   TYPE
9759 @ 78955:                  PUSHI  #0x00000000
9760 @ 78960:                  ASSVAL

  1296           %IF ATOM1=IDENT %AND (SYM=':' %OR ATOM2=SWITCH) %START
9761 @ 78961:                  LINE   1296 "regression-compile-tmp/comp412.imp"
9762 @ 78999:                  PUSH   ATOM1
9763 @ 79002:                  PUSHI  #0x0000003b
9764 @ 79007:                  JUMPIF # L_0007
9765 @ 79011:                  PUSH   SYM
9766 @ 79014:                  PUSHI  #0x0000003a
9767 @ 79019:                  JUMPIF = L_0008
9768 @ 79023:                  PUSH   ATOM2
9769 @ 79026:                  PUSHI  #0x00000050
9770 @ 79031:                  JUMPIF # L_0007
9771 @ 79035:                  LOCATE L_0008

  1297              DEC TYPE=3
9772 @ 79038:                  LINE   1297 "regression-compile-tmp/comp412.imp"
9773 @ 79076:                  PUSH   DECTYPE
9774 @ 79079:                  PUSHI  #0x00000003
9775 @ 79084:                  ASSVAL

  1298              SS TYPE=0; ANALYSE(PHRASE(SS0));!  LABEL
9776 @ 79085:                  LINE   1298 "regression-compile-tmp/comp412.imp"
9777 @ 79123:                  PUSH   SSTYPE
9778 @ 79126:                  PUSHI  #0x00000000
9779 @ 79131:                  ASSVAL
9780 @ 79132:                  LINE   1298 "regression-compile-tmp/comp412.imp"
9781 @ 79170:                  PUSH   ANALYSE
9782 @ 79173:                  PUSH   PHRASE
9783 @ 79176:                  PUSHI  #0x000000fa
9784 @ 79181:                  ACCESS
9785 @ 79182:                  ASSPAR
9786 @ 79183:                  CALL  

  1299           %ELSE
9787 @ 79184:                  LINE   1299 "regression-compile-tmp/comp412.imp"
9788 @ 79222:                  GOTO   L_0006
9789 @ 79225:                  LOCATE L_0007

  1300              %IF DEC TYPE#0 %OR OUT#0 %START
9790 @ 79228:                  LINE   1300 "regression-compile-tmp/comp412.imp"
9791 @ 79266:                  PUSH   DECTYPE
9792 @ 79269:                  PUSHI  #0x00000000
9793 @ 79274:                  JUMPIF # L_000b
9794 @ 79278:                  PUSH   OUT
9795 @ 79281:                  PUSHI  #0x00000000
9796 @ 79286:                  JUMPIF = L_000a
9797 @ 79290:                  LOCATE L_000b

  1301                 TYPE=OUT
9798 @ 79293:                  LINE   1301 "regression-compile-tmp/comp412.imp"
9799 @ 79331:                  PUSH   TYPE
9800 @ 79334:                  PUSH   OUT
9801 @ 79337:                  ASSVAL

  1302                 SS TYPE=1;  ANALYSE(PHRASE(SS1));! DECLARATION
9802 @ 79338:                  LINE   1302 "regression-compile-tmp/comp412.imp"
9803 @ 79376:                  PUSH   SSTYPE
9804 @ 79379:                  PUSHI  #0x00000001
9805 @ 79384:                  ASSVAL
9806 @ 79385:                  LINE   1302 "regression-compile-tmp/comp412.imp"
9807 @ 79423:                  PUSH   ANALYSE
9808 @ 79426:                  PUSH   PHRASE
9809 @ 79429:                  PUSHI  #0x000000fb
9810 @ 79434:                  ACCESS
9811 @ 79435:                  ASSPAR
9812 @ 79436:                  CALL  

  1303              %ELSE
9813 @ 79437:                  LINE   1303 "regression-compile-tmp/comp412.imp"
9814 @ 79475:                  GOTO   L_0009
9815 @ 79478:                  LOCATE L_000a

  1304                 SS TYPE=3;  ANALYSE(PHRASE(SS3));! STATEMENT
9816 @ 79481:                  LINE   1304 "regression-compile-tmp/comp412.imp"
9817 @ 79519:                  PUSH   SSTYPE
9818 @ 79522:                  PUSHI  #0x00000003
9819 @ 79527:                  ASSVAL
9820 @ 79528:                  LINE   1304 "regression-compile-tmp/comp412.imp"
9821 @ 79566:                  PUSH   ANALYSE
9822 @ 79569:                  PUSH   PHRASE
9823 @ 79572:                  PUSHI  #0x000000fd
9824 @ 79577:                  ACCESS
9825 @ 79578:                  ASSPAR
9826 @ 79579:                  CALL  

  1305              %FINISH
9827 @ 79580:                  LINE   1305 "regression-compile-tmp/comp412.imp"
9828 @ 79618:                  LOCATE L_0009

  1306           %FINISH
9829 @ 79621:                  LINE   1306 "regression-compile-tmp/comp412.imp"
9830 @ 79659:                  LOCATE L_0006

  1307           %RETURN
9831 @ 79662:                  LINE   1307 "regression-compile-tmp/comp412.imp"
9832 @ 79700:                  RETURN

  1308        %FINISH
9833 @ 79701:                  LINE   1308 "regression-compile-tmp/comp412.imp"
9834 @ 79739:                  LOCATE L_0004

  1309        CODE ATOM
9835 @ 79742:                  LINE   1309 "regression-compile-tmp/comp412.imp"
9836 @ 79780:                  PUSH   CODEATOM
9837 @ 79783:                  CALL  

  1310        %IF CONT > 0 %START;                 ! APP
9838 @ 79784:                  LINE   1310 "regression-compile-tmp/comp412.imp"
9839 @ 79822:                  PUSH   CONT
9840 @ 79825:                  PUSHI  #0x00000000
9841 @ 79830:                  JUMPIF <= L_0004

  1311           SS TYPE=2;  ANALYSE(PHRASE(SS2)); ! FORMAL PARAMETER
9842 @ 79834:                  LINE   1311 "regression-compile-tmp/comp412.imp"
9843 @ 79872:                  PUSH   SSTYPE
9844 @ 79875:                  PUSHI  #0x00000002
9845 @ 79880:                  ASSVAL
9846 @ 79881:                  LINE   1311 "regression-compile-tmp/comp412.imp"
9847 @ 79919:                  PUSH   ANALYSE
9848 @ 79922:                  PUSH   PHRASE
9849 @ 79925:                  PUSHI  #0x000000fc
9850 @ 79930:                  ACCESS
9851 @ 79931:                  ASSPAR
9852 @ 79932:                  CALL  

  1312           J=GAPP
9853 @ 79933:                  LINE   1312 "regression-compile-tmp/comp412.imp"
9854 @ 79971:                  PUSH   J
9855 @ 79974:                  PUSH   GAPP
9856 @ 79977:                  CALL  
9857 @ 79978:                  ASSVAL

  1313           FAULT(6) %IF 0#|FPP|#J
9858 @ 79979:                  LINE   1313 "regression-compile-tmp/comp412.imp"
9859 @ 80017:                  PUSHI  #0x00000000
9860 @ 80022:                  PUSH   FPP
9861 @ 80025:                  MOD   
9862 @ 80026:                  JUMPIFD = L_0007
9863 @ 80030:                  PUSH   J
9864 @ 80033:                  JUMPIF = L_0007
9865 @ 80037:                  PUSH   FAULT
9866 @ 80040:                  PUSHI  #0x00000006
9867 @ 80045:                  ASSPAR
9868 @ 80046:                  CALL  
9869 @ 80047:                  LOCATE L_0007

  1314           FPP=J*SPEC
9870 @ 80050:                  LINE   1314 "regression-compile-tmp/comp412.imp"
9871 @ 80088:                  PUSH   FPP
9872 @ 80091:                  PUSH   J
9873 @ 80094:                  PUSH   SPEC
9874 @ 80097:                  MUL   
9875 @ 80098:                  ASSVAL

  1315        %ELSE;                               ! RECORDFORMAT
9876 @ 80099:                  LINE   1315 "regression-compile-tmp/comp412.imp"
9877 @ 80137:                  GOTO   L_0003
9878 @ 80140:                  LOCATE L_0004

  1316           FP=TMAX;                          ! REMEMBER START OF NAMES
9879 @ 80143:                  LINE   1316 "regression-compile-tmp/comp412.imp"
9880 @ 80181:                  PUSH   FP
9881 @ 80184:                  PUSH   TMAX
9882 @ 80187:                  ASSVAL

  1317           SS TYPE=4; ANALYSE(PHRASE(SS4))
9883 @ 80188:                  LINE   1317 "regression-compile-tmp/comp412.imp"
9884 @ 80226:                  PUSH   SSTYPE
9885 @ 80229:                  PUSHI  #0x00000004
9886 @ 80234:                  ASSVAL
9887 @ 80235:                  LINE   1317 "regression-compile-tmp/comp412.imp"
9888 @ 80273:                  PUSH   ANALYSE
9889 @ 80276:                  PUSH   PHRASE
9890 @ 80279:                  PUSHI  #0x000000fe
9891 @ 80284:                  ACCESS
9892 @ 80285:                  ASSPAR
9893 @ 80286:                  CALL  

  1318           %IF SS#0 %AND TMAX > FP %START
9894 @ 80287:                  LINE   1318 "regression-compile-tmp/comp412.imp"
9895 @ 80325:                  PUSH   SS
9896 @ 80328:                  PUSHI  #0x00000000
9897 @ 80333:                  JUMPIF = L_0007
9898 @ 80337:                  PUSH   TMAX
9899 @ 80340:                  PUSH   FP
9900 @ 80343:                  JUMPIF <= L_0007

  1319              J=T LIMIT+TBASE-TMAX-1
9901 @ 80347:                  LINE   1319 "regression-compile-tmp/comp412.imp"
9902 @ 80385:                  PUSH   J
9903 @ 80388:                  PUSH   TLIMIT
9904 @ 80391:                  PUSH   TBASE
9905 @ 80394:                  ADD   
9906 @ 80395:                  PUSH   TMAX
9907 @ 80398:                  SUB   
9908 @ 80399:                  PUSHI  #0x00000001
9909 @ 80404:                  SUB   
9910 @ 80405:                  ASSVAL

  1320              FAULT(21) %IF J <= TMAX
9911 @ 80406:                  LINE   1320 "regression-compile-tmp/comp412.imp"
9912 @ 80444:                  PUSH   J
9913 @ 80447:                  PUSH   TMAX
9914 @ 80450:                  JUMPIF > L_000a
9915 @ 80454:                  PUSH   FAULT
9916 @ 80457:                  PUSHI  #0x00000015
9917 @ 80462:                  ASSPAR
9918 @ 80463:                  CALL  
9919 @ 80464:                  LOCATE L_000a

  1321              FPP=T LIMIT-1;                 ! FILL IN FORMAT REFERENCE
9920 @ 80467:                  LINE   1321 "regression-compile-tmp/comp412.imp"
9921 @ 80505:                  PUSH   FPP
9922 @ 80508:                  PUSH   TLIMIT
9923 @ 80511:                  PUSHI  #0x00000001
9924 @ 80516:                  SUB   
9925 @ 80517:                  ASSVAL

  1322              DICT(FPP)=J;                   ! END OF FORMAT
9926 @ 80518:                  LINE   1322 "regression-compile-tmp/comp412.imp"
9927 @ 80556:                  PUSH   DICT
9928 @ 80559:                  PUSH   FPP
9929 @ 80562:                  ACCESS
9930 @ 80563:                  PUSH   J
9931 @ 80566:                  ASSVAL

  1323              RELOCATE=J-FP
9932 @ 80567:                  LINE   1323 "regression-compile-tmp/comp412.imp"
9933 @ 80605:                  PUSH   RELOCATE
9934 @ 80608:                  PUSH   J
9935 @ 80611:                  PUSH   FP
9936 @ 80614:                  SUB   
9937 @ 80615:                  ASSVAL

  1324              %CYCLE K=J,1,FPP-1
9938 @ 80616:                  LINE   1324 "regression-compile-tmp/comp412.imp"
9939 @ 80654:                  PUSH   K
9940 @ 80657:                  PUSHI  #0x00000001
9941 @ 80662:                  PUSH   FPP
9942 @ 80665:                  PUSHI  #0x00000001
9943 @ 80670:                  SUB   
9944 @ 80671:                  PUSH   J
9945 @ 80674:                  FOR    L_0009

  1325                 DICT(K)=DICT(FP)
9946 @ 80677:                  LINE   1325 "regression-compile-tmp/comp412.imp"
9947 @ 80715:                  PUSH   DICT
9948 @ 80718:                  PUSH   K
9949 @ 80721:                  ACCESS
9950 @ 80722:                  PUSH   DICT
9951 @ 80725:                  PUSH   FP
9952 @ 80728:                  ACCESS
9953 @ 80729:                  ASSVAL

  1326                 FP=FP+1
9954 @ 80730:                  LINE   1326 "regression-compile-tmp/comp412.imp"
9955 @ 80768:                  PUSH   FP
9956 @ 80771:                  PUSH   FP
9957 @ 80774:                  PUSHI  #0x00000001
9958 @ 80779:                  ADD   
9959 @ 80780:                  ASSVAL

  1327              %REPEAT
9960 @ 80781:                  LINE   1327 "regression-compile-tmp/comp412.imp"
9961 @ 80819:                  REPEAT L_0009
9962 @ 80822:                  LOCATE L_000a

  1328              T LIMIT=J
9963 @ 80825:                  LINE   1328 "regression-compile-tmp/comp412.imp"
9964 @ 80863:                  PUSH   TLIMIT
9965 @ 80866:                  PUSH   J
9966 @ 80869:                  ASSVAL

  1329           %FINISH
9967 @ 80870:                  LINE   1329 "regression-compile-tmp/comp412.imp"
9968 @ 80908:                  LOCATE L_0007

  1330        %FINISH
9969 @ 80911:                  LINE   1330 "regression-compile-tmp/comp412.imp"
9970 @ 80949:                  LOCATE L_0003

  1331     %END;                                   ! ANALYSE SS
9971 @ 80952:                  LINE   1331 "regression-compile-tmp/comp412.imp"
9972 @ 80990:               END    _lev0id0_COMPILEBLOCK_ANALYSESS {lev=3 --> 2}

  1332     %ROUTINE COMPILE SS
9973 @ 80991:               LINE   1332 "regression-compile-tmp/comp412.imp"
9974 @ 81029:               DEF    COMPILESS (_lev0id0_COMPILEBLOCK_COMPILESS) p1=V_00e1 a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
9975 @ 81050:                  START  ( FORMAL PARAMETERS  {lev=3 --> 4, nested=0 --> 1}
9976 @ 81051:                  FINISH ) {lev=3}

  1333        %CONSTBYTEINTEGERARRAY RCOMP(33:40)=34,33,35,36,38,37,39,40
9977 @ 81052:                  LINE   1333 "regression-compile-tmp/comp412.imp"
9978 @ 81090:                  PUSHI  #0x00000021
9979 @ 81095:                  PUSHI  #0x00000028
9980 @ 81100:                  BOUNDS
9981 @ 81101:                  DEF    RCOMP p1=V_00e2 a/tf=1b b/format=2 c/ostate=112  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
9982 @ 81118:                  PUSHI  #0x00000022
9983 @ 81123:                  INIT   1
9984 @ 81126:                  PUSHI  #0x00000021
9985 @ 81131:                  INIT   1
9986 @ 81134:                  PUSHI  #0x00000023
9987 @ 81139:                  INIT   1
9988 @ 81142:                  PUSHI  #0x00000024
9989 @ 81147:                  INIT   1
9990 @ 81150:                  PUSHI  #0x00000026
9991 @ 81155:                  INIT   1
9992 @ 81158:                  PUSHI  #0x00000025
9993 @ 81163:                  INIT   1
9994 @ 81166:                  PUSHI  #0x00000027
9995 @ 81171:                  INIT   1
9996 @ 81174:                  PUSHI  #0x00000028
9997 @ 81179:                  INIT   1

  1334        %CONSTBYTEINTEGERARRAY COMP(33:40)='>','<','=','#',')','(',116,107
  1335        !  116 = LOWER CASE 'T',  107 = LOWER CASE 'K'
9998 @ 81182:                  LINE   1334 "regression-compile-tmp/comp412.imp"
9999 @ 81220:                  PUSHI  #0x00000021
10000 @ 81225:                  PUSHI  #0x00000028
10001 @ 81230:                  BOUNDS
10002 @ 81231:                  DEF    COMP p1=V_00e3 a/tf=1b b/format=2 c/ostate=112  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
10003 @ 81247:                  PUSHI  #0x0000003e
10004 @ 81252:                  INIT   1
10005 @ 81255:                  PUSHI  #0x0000003c
10006 @ 81260:                  INIT   1
10007 @ 81263:                  PUSHI  #0x0000003d
10008 @ 81268:                  INIT   1
10009 @ 81271:                  PUSHI  #0x00000023
10010 @ 81276:                  INIT   1
10011 @ 81279:                  PUSHI  #0x00000029
10012 @ 81284:                  INIT   1
10013 @ 81287:                  PUSHI  #0x00000028
10014 @ 81292:                  INIT   1
10015 @ 81295:                  PUSHI  #0x00000074
10016 @ 81300:                  INIT   1
10017 @ 81303:                  PUSHI  #0x0000006b
10018 @ 81308:                  INIT   1

  1336        %CONSTBYTEINTEGERARRAY CON OP(82 : 84)='''', 'N', 'D'
10019 @ 81311:                  LINE   1336 "regression-compile-tmp/comp412.imp"
10020 @ 81349:                  PUSHI  #0x00000052
10021 @ 81354:                  PUSHI  #0x00000054
10022 @ 81359:                  BOUNDS
10023 @ 81360:                  DEF    CONOP p1=V_00e4 a/tf=1b b/format=2 c/ostate=112  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
10024 @ 81377:                  PUSHI  #0x00000027
10025 @ 81382:                  INIT   1
10026 @ 81385:                  PUSHI  #0x0000004e
10027 @ 81390:                  INIT   1
10028 @ 81393:                  PUSHI  #0x00000044
10029 @ 81398:                  INIT   1

  1337        %CONSTBYTEINTEGERARRAY OPCODE(1:10)='*','/','&','!',
  1338                                            '%','[',']','.','\',120
  1339        ! 120 = LOWER CASE 'X'
10030 @ 81401:                  LINE   1337 "regression-compile-tmp/comp412.imp"
10031 @ 81439:                  PUSHI  #0x00000001
10032 @ 81444:                  PUSHI  #0x0000000a
10033 @ 81449:                  BOUNDS
10034 @ 81450:                  DEF    OPCODE p1=V_00e5 a/tf=1b b/format=2 c/ostate=112  type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0
10035 @ 81468:                  PUSHI  #0x0000002a
10036 @ 81473:                  INIT   1
10037 @ 81476:                  PUSHI  #0x0000002f
10038 @ 81481:                  INIT   1
10039 @ 81484:                  PUSHI  #0x00000026
10040 @ 81489:                  INIT   1
10041 @ 81492:                  PUSHI  #0x00000021
10042 @ 81497:                  INIT   1
10043 @ 81500:                  PUSHI  #0x00000025
10044 @ 81505:                  INIT   1
10045 @ 81508:                  PUSHI  #0x0000005b
10046 @ 81513:                  INIT   1
10047 @ 81516:                  PUSHI  #0x0000005d
10048 @ 81521:                  INIT   1
10049 @ 81524:                  PUSHI  #0x0000002e
10050 @ 81529:                  INIT   1
10051 @ 81532:                  PUSHI  #0x0000005c
10052 @ 81537:                  INIT   1
10053 @ 81540:                  PUSHI  #0x00000078
10054 @ 81545:                  INIT   1

  1340        %SWITCH C(1 : 130), D(50 : 57)
10055 @ 81548:                  LINE   1340 "regression-compile-tmp/comp412.imp"
10056 @ 81586:                  PUSHI  #0x00000001
10057 @ 81591:                  PUSHI  #0x00000082
10058 @ 81596:                  BOUNDS
10059 @ 81597:                  DEF    C p1=V_00e6 a/tf=6 b/format=0 c/ostate=0  type=0 (<type:0>) form=6 (switch) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10060 @ 81610:                  PUSHI  #0x00000032
10061 @ 81615:                  PUSHI  #0x00000039
10062 @ 81620:                  BOUNDS
10063 @ 81621:                  DEF    D p1=V_00e7 a/tf=6 b/format=0 c/ostate=0  type=0 (<type:0>) form=6 (switch) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1341        %BYTEINTEGERNAME MM
10064 @ 81634:                  LINE   1341 "regression-compile-tmp/comp412.imp"
10065 @ 81672:                  DEF    MM p1=V_00e8 a/tf=12 b/format=2 c/ostate=0  type=1 (integer) form=2 (name) special=1 (byte-integer) linkage=0 (auto) spec=0 indirect=0 unass=0

  1342        %INTEGERNAME M
10066 @ 81686:                  LINE   1342 "regression-compile-tmp/comp412.imp"
10067 @ 81724:                  DEF    M p1=V_00e9 a/tf=12 b/format=1 c/ostate=0  type=1 (integer) form=2 (name) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1343        %INTEGER L, DIM, K
10068 @ 81737:                  LINE   1343 "regression-compile-tmp/comp412.imp"
10069 @ 81775:                  DEF    L p1=V_00ea a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10070 @ 81788:                  DEF    DIM p1=V_00eb a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10071 @ 81803:                  DEF    K p1=V_00ec a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1344        %OWNINTEGER OWN DEF=0
10072 @ 81816:                  LINE   1344 "regression-compile-tmp/comp412.imp"
10073 @ 81854:                  PUSHI  #0x00000000
10074 @ 81859:                  DEF    OWNDEF p1=V_00ed a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
10075 @ 81877:                  INIT   1

  1345        %OWNINTEGER BP SIZE=0
10076 @ 81880:                  LINE   1345 "regression-compile-tmp/comp412.imp"
10077 @ 81918:                  PUSHI  #0x00000000
10078 @ 81923:                  DEF    BPSIZE p1=V_00ee a/tf=11 b/format=1 c/ostate=21  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=1 (own) spec=0 indirect=0 unass=1
10079 @ 81941:                  INIT   1

  1346        %INTEGER CALL PENDING, PRED PENDING, PRED OP
10080 @ 81944:                  LINE   1346 "regression-compile-tmp/comp412.imp"
10081 @ 81982:                  DEF    CALLPENDING p1=V_00ef a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10082 @ 82005:                  DEF    PREDPENDING p1=V_00f0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10083 @ 82028:                  DEF    PREDOP p1=V_00f1 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1347        %INTEGER GLOBAL NOT, LOCAL NOT
10084 @ 82046:                  LINE   1347 "regression-compile-tmp/comp412.imp"
10085 @ 82084:                  DEF    GLOBALNOT p1=V_00f2 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10086 @ 82105:                  DEF    LOCALNOT p1=V_00f3 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1348        %INTEGER CLAST, CMOD, OPS, BIT, CLEVEL, DOUBLE
10087 @ 82125:                  LINE   1348 "regression-compile-tmp/comp412.imp"
10088 @ 82163:                  DEF    CLAST p1=V_00f4 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10089 @ 82180:                  DEF    CMOD p1=V_00f5 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10090 @ 82196:                  DEF    OPS p1=V_00f6 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10091 @ 82211:                  DEF    BIT p1=V_00f7 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10092 @ 82226:                  DEF    CLEVEL p1=V_00f8 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10093 @ 82244:                  DEF    DOUBLE p1=V_00f9 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1349        %INTEGER PLAB, LOOP LAB, ULAB, CONDS, ELSE
10094 @ 82262:                  LINE   1349 "regression-compile-tmp/comp412.imp"
10095 @ 82300:                  DEF    PLAB p1=V_00fa a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10096 @ 82316:                  DEF    LOOPLAB p1=V_00fb a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10097 @ 82335:                  DEF    ULAB p1=V_00fc a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10098 @ 82351:                  DEF    CONDS p1=V_00fd a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10099 @ 82368:                  DEF    ELSE p1=V_00fe a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1350        %INTEGER  LIT1, LIT2, STARTT
10100 @ 82384:                  LINE   1350 "regression-compile-tmp/comp412.imp"
10101 @ 82422:                  DEF    LIT1 p1=V_00ff a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10102 @ 82438:                  DEF    LIT2 p1=V_0100 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10103 @ 82454:                  DEF    STARTT p1=V_0101 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1351        %INTEGER NEXT, CLASS, DCLASS, LINK
  1352  
10104 @ 82472:                  LINE   1351 "regression-compile-tmp/comp412.imp"
10105 @ 82510:                  DEF    NEXT p1=V_0102 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10106 @ 82526:                  DEF    CLASS p1=V_0103 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10107 @ 82543:                  DEF    DCLASS p1=V_0104 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10108 @ 82561:                  DEF    LINK p1=V_0105 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1353        %ROUTINE AOP(%INTEGER C, A)
10109 @ 82577:                  LINE   1353 "regression-compile-tmp/comp412.imp"
10110 @ 82615:                  DEF    AOP (_lev0id0_COMPILEBLOCK_COMPILESS_AOP) p1=V_0106 a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10111 @ 82630:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
10112 @ 82631:                        DEF    C p1=V_0107 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10113 @ 82644:                        DEF    A p1=V_0108 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10114 @ 82657:                     FINISH ) {lev=4}

  1354           PUT(C)
10115 @ 82658:                     LINE   1354 "regression-compile-tmp/comp412.imp"
10116 @ 82696:                     PUSH   PUT
10117 @ 82699:                     PUSH   C
10118 @ 82702:                     ASSPAR
10119 @ 82703:                     CALL  

  1355           %IF A < 0 %START
10120 @ 82704:                     LINE   1355 "regression-compile-tmp/comp412.imp"
10121 @ 82742:                     PUSH   A
10122 @ 82745:                     PUSHI  #0x00000000
10123 @ 82750:                     JUMPIF >= L_0004

  1356              A = -A;  PUT('-')
10124 @ 82754:                     LINE   1356 "regression-compile-tmp/comp412.imp"
10125 @ 82792:                     PUSH   A
10126 @ 82795:                     PUSH   A
10127 @ 82798:                     NEGATE
10128 @ 82799:                     ASSVAL
10129 @ 82800:                     LINE   1356 "regression-compile-tmp/comp412.imp"
10130 @ 82838:                     PUSH   PUT
10131 @ 82841:                     PUSHI  #0x0000002d
10132 @ 82846:                     ASSPAR
10133 @ 82847:                     CALL  

  1357           %ELSE
10134 @ 82848:                     LINE   1357 "regression-compile-tmp/comp412.imp"
10135 @ 82886:                     GOTO   L_0003
10136 @ 82889:                     LOCATE L_0004

  1358              A = A//2
10137 @ 82892:                     LINE   1358 "regression-compile-tmp/comp412.imp"
10138 @ 82930:                     PUSH   A
10139 @ 82933:                     PUSH   A
10140 @ 82936:                     PUSHI  #0x00000002
10141 @ 82941:                     QUOT  
10142 @ 82942:                     ASSVAL

  1359           %FINISH
10143 @ 82943:                     LINE   1359 "regression-compile-tmp/comp412.imp"
10144 @ 82981:                     LOCATE L_0003

  1360           ADDR(A)
10145 @ 82984:                     LINE   1360 "regression-compile-tmp/comp412.imp"
10146 @ 83022:                     PUSH   ADDR
10147 @ 83025:                     PUSH   A
10148 @ 83028:                     ASSPAR
10149 @ 83029:                     CALL  

  1361        %END
  1362  
10150 @ 83030:                     LINE   1361 "regression-compile-tmp/comp412.imp"
10151 @ 83068:                  END    _lev0id0_COMPILEBLOCK_COMPILESS_AOP {lev=4 --> 3}

  1363        %ROUTINE EXTRA(%INTEGER N)
10152 @ 83069:                  LINE   1363 "regression-compile-tmp/comp412.imp"
10153 @ 83107:                  DEF    EXTRA (_lev0id0_COMPILEBLOCK_COMPILESS_EXTRA) p1=V_0107 a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10154 @ 83124:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
10155 @ 83125:                        DEF    N p1=V_0108 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10156 @ 83138:                     FINISH ) {lev=4}

  1364           PUT(','); ADDR(N)
10157 @ 83139:                     LINE   1364 "regression-compile-tmp/comp412.imp"
10158 @ 83177:                     PUSH   PUT
10159 @ 83180:                     PUSHI  #0x0000002c
10160 @ 83185:                     ASSPAR
10161 @ 83186:                     CALL  
10162 @ 83187:                     LINE   1364 "regression-compile-tmp/comp412.imp"
10163 @ 83225:                     PUSH   ADDR
10164 @ 83228:                     PUSH   N
10165 @ 83231:                     ASSPAR
10166 @ 83232:                     CALL  

  1365        %END
  1366  
10167 @ 83233:                     LINE   1365 "regression-compile-tmp/comp412.imp"
10168 @ 83271:                  END    _lev0id0_COMPILEBLOCK_COMPILESS_EXTRA {lev=4 --> 3}

  1367        %ROUTINE DEF(%INTEGER N)
10169 @ 83272:                  LINE   1367 "regression-compile-tmp/comp412.imp"
10170 @ 83310:                  DEF    DEF (_lev0id0_COMPILEBLOCK_COMPILESS_DEF) p1=V_0108 a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10171 @ 83325:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
10172 @ 83326:                        DEF    N p1=V_0109 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10173 @ 83339:                     FINISH ) {lev=4}

  1368           %INTEGER K
10174 @ 83340:                     LINE   1368 "regression-compile-tmp/comp412.imp"
10175 @ 83378:                     DEF    K p1=V_010a a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1369           N=N+RELOCATE
10176 @ 83391:                     LINE   1369 "regression-compile-tmp/comp412.imp"
10177 @ 83429:                     PUSH   N
10178 @ 83432:                     PUSH   N
10179 @ 83435:                     PUSH   RELOCATE
10180 @ 83438:                     ADD   
10181 @ 83439:                     ASSVAL

  1370           AOP('$',N);  PRINT NAME(-N)
10182 @ 83440:                     LINE   1370 "regression-compile-tmp/comp412.imp"
10183 @ 83478:                     PUSH   AOP
10184 @ 83481:                     PUSHI  #0x00000024
10185 @ 83486:                     ASSPAR
10186 @ 83487:                     PUSH   N
10187 @ 83490:                     ASSPAR
10188 @ 83491:                     CALL  
10189 @ 83492:                     LINE   1370 "regression-compile-tmp/comp412.imp"
10190 @ 83530:                     PUSH   PRINTNAME
10191 @ 83533:                     PUSH   N
10192 @ 83536:                     NEGATE
10193 @ 83537:                     ASSPAR
10194 @ 83538:                     CALL  

  1371           K=DICT(N-1)
10195 @ 83539:                     LINE   1371 "regression-compile-tmp/comp412.imp"
10196 @ 83577:                     PUSH   K
10197 @ 83580:                     PUSH   DICT
10198 @ 83583:                     PUSH   N
10199 @ 83586:                     PUSHI  #0x00000001
10200 @ 83591:                     SUB   
10201 @ 83592:                     ACCESS
10202 @ 83593:                     ASSVAL

  1372           EXTRA(K&127);                     ! TYPE!FORM
10203 @ 83594:                     LINE   1372 "regression-compile-tmp/comp412.imp"
10204 @ 83632:                     PUSH   EXTRA
10205 @ 83635:                     PUSH   K
10206 @ 83638:                     PUSHI  #0x0000007f
10207 @ 83643:                     AND   
10208 @ 83644:                     ASSPAR
10209 @ 83645:                     CALL  

  1373           EXTRA(K>>8&255);                  ! MAX STRING LENGTH
10210 @ 83646:                     LINE   1373 "regression-compile-tmp/comp412.imp"
10211 @ 83684:                     PUSH   EXTRA
10212 @ 83687:                     PUSH   K
10213 @ 83690:                     PUSHI  #0x00000008
10214 @ 83695:                     RSH   
10215 @ 83696:                     PUSHI  #0x000000ff
10216 @ 83701:                     AND   
10217 @ 83702:                     ASSPAR
10218 @ 83703:                     CALL  

  1374           EXTRA(DICT(N)>>13&7);             ! OTYPE
  1375                                            ! RECORD
10219 @ 83704:                     LINE   1374 "regression-compile-tmp/comp412.imp"
10220 @ 83742:                     PUSH   EXTRA
10221 @ 83745:                     PUSH   DICT
10222 @ 83748:                     PUSH   N
10223 @ 83751:                     ACCESS
10224 @ 83752:                     PUSHI  #0x0000000d
10225 @ 83757:                     RSH   
10226 @ 83758:                     PUSHI  #0x00000007
10227 @ 83763:                     AND   
10228 @ 83764:                     ASSPAR
10229 @ 83765:                     CALL  

  1376           AOP(',',DICT(N-2)) %IF K&X'70'=X'50' %AND K&127#84
10230 @ 83766:                     LINE   1376 "regression-compile-tmp/comp412.imp"
10231 @ 83804:                     PUSH   K
10232 @ 83807:                     PUSHI  #0x00000070
10233 @ 83812:                     AND   
10234 @ 83813:                     PUSHI  #0x00000050
10235 @ 83818:                     JUMPIF # L_0004
10236 @ 83822:                     PUSH   K
10237 @ 83825:                     PUSHI  #0x0000007f
10238 @ 83830:                     AND   
10239 @ 83831:                     PUSHI  #0x00000054
10240 @ 83836:                     JUMPIF = L_0004
10241 @ 83840:                     PUSH   AOP
10242 @ 83843:                     PUSHI  #0x0000002c
10243 @ 83848:                     ASSPAR
10244 @ 83849:                     PUSH   DICT
10245 @ 83852:                     PUSH   N
10246 @ 83855:                     PUSHI  #0x00000002
10247 @ 83860:                     SUB   
10248 @ 83861:                     ACCESS
10249 @ 83862:                     ASSPAR
10250 @ 83863:                     CALL  
10251 @ 83864:                     LOCATE L_0004

  1377        %END
  1378  
10252 @ 83867:                     LINE   1377 "regression-compile-tmp/comp412.imp"
10253 @ 83905:                  END    _lev0id0_COMPILEBLOCK_COMPILESS_DEF {lev=4 --> 3}

  1379        %ROUTINE CALL
10254 @ 83906:                  LINE   1379 "regression-compile-tmp/comp412.imp"
10255 @ 83944:                  DEF    CALL (_lev0id0_COMPILEBLOCK_COMPILESS_CALL) p1=V_0109 a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10256 @ 83960:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
10257 @ 83961:                     FINISH ) {lev=4}

  1380           %INTEGER P
10258 @ 83962:                     LINE   1380 "regression-compile-tmp/comp412.imp"
10259 @ 84000:                     DEF    P p1=V_010a a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1381           CALL PENDING = 1
10260 @ 84013:                     LINE   1381 "regression-compile-tmp/comp412.imp"
10261 @ 84051:                     PUSH   CALLPENDING
10262 @ 84054:                     PUSHI  #0x00000001
10263 @ 84059:                     ASSVAL

  1382           AOP('@',X)
10264 @ 84060:                     LINE   1382 "regression-compile-tmp/comp412.imp"
10265 @ 84098:                     PUSH   AOP
10266 @ 84101:                     PUSHI  #0x00000040
10267 @ 84106:                     ASSPAR
10268 @ 84107:                     PUSH   X
10269 @ 84110:                     ASSPAR
10270 @ 84111:                     CALL  

  1383           P = X
10271 @ 84112:                     LINE   1383 "regression-compile-tmp/comp412.imp"
10272 @ 84150:                     PUSH   P
10273 @ 84153:                     PUSH   X
10274 @ 84156:                     ASSVAL

  1384           P = P-1 %IF DICT(X)&512 # 0
10275 @ 84157:                     LINE   1384 "regression-compile-tmp/comp412.imp"
10276 @ 84195:                     PUSH   DICT
10277 @ 84198:                     PUSH   X
10278 @ 84201:                     ACCESS
10279 @ 84202:                     PUSHI  #0x00000200
10280 @ 84207:                     AND   
10281 @ 84208:                     PUSHI  #0x00000000
10282 @ 84213:                     JUMPIF = L_0004
10283 @ 84217:                     PUSH   P
10284 @ 84220:                     PUSH   P
10285 @ 84223:                     PUSHI  #0x00000001
10286 @ 84228:                     SUB   
10287 @ 84229:                     ASSVAL
10288 @ 84230:                     LOCATE L_0004

  1385           %IF |DICT(P-2)| = NULL %START
10289 @ 84233:                     LINE   1385 "regression-compile-tmp/comp412.imp"
10290 @ 84271:                     PUSH   DICT
10291 @ 84274:                     PUSH   P
10292 @ 84277:                     PUSHI  #0x00000002
10293 @ 84282:                     SUB   
10294 @ 84283:                     ACCESS
10295 @ 84284:                     MOD   
10296 @ 84285:                     PUSHI  #0x00000200
10297 @ 84290:                     JUMPIF # L_0004

  1386              PUT('E');  CALL PENDING = 0
10298 @ 84294:                     LINE   1386 "regression-compile-tmp/comp412.imp"
10299 @ 84332:                     PUSH   PUT
10300 @ 84335:                     PUSHI  #0x00000045
10301 @ 84340:                     ASSPAR
10302 @ 84341:                     CALL  
10303 @ 84342:                     LINE   1386 "regression-compile-tmp/comp412.imp"
10304 @ 84380:                     PUSH   CALLPENDING
10305 @ 84383:                     PUSHI  #0x00000000
10306 @ 84388:                     ASSVAL

  1387           %ELSE
10307 @ 84389:                     LINE   1387 "regression-compile-tmp/comp412.imp"
10308 @ 84427:                     GOTO   L_0003
10309 @ 84430:                     LOCATE L_0004

  1388              PRED PENDING = PRED PENDING<<1
10310 @ 84433:                     LINE   1388 "regression-compile-tmp/comp412.imp"
10311 @ 84471:                     PUSH   PREDPENDING
10312 @ 84474:                     PUSH   PREDPENDING
10313 @ 84477:                     PUSHI  #0x00000001
10314 @ 84482:                     LSH   
10315 @ 84483:                     ASSVAL

  1389           %FINISH
10316 @ 84484:                     LINE   1389 "regression-compile-tmp/comp412.imp"
10317 @ 84522:                     LOCATE L_0003

  1390        %END
10318 @ 84525:                     LINE   1390 "regression-compile-tmp/comp412.imp"
10319 @ 84563:                  END    _lev0id0_COMPILEBLOCK_COMPILESS_CALL {lev=4 --> 3}

  1391        %ROUTINE SET SIZE
10320 @ 84564:                  LINE   1391 "regression-compile-tmp/comp412.imp"
10321 @ 84602:                  DEF    SETSIZE (_lev0id0_COMPILEBLOCK_COMPILESS_SETSIZE) p1=V_010a a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10322 @ 84621:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
10323 @ 84622:                     FINISH ) {lev=4}

  1392           BP SIZE=LIT1-LIT2+1
10324 @ 84623:                     LINE   1392 "regression-compile-tmp/comp412.imp"
10325 @ 84661:                     PUSH   BPSIZE
10326 @ 84664:                     PUSH   LIT1
10327 @ 84667:                     PUSH   LIT2
10328 @ 84670:                     SUB   
10329 @ 84671:                     PUSHI  #0x00000001
10330 @ 84676:                     ADD   
10331 @ 84677:                     ASSVAL

  1393           %IF BPSIZE <= 0 %START
10332 @ 84678:                     LINE   1393 "regression-compile-tmp/comp412.imp"
10333 @ 84716:                     PUSH   BPSIZE
10334 @ 84719:                     PUSHI  #0x00000000
10335 @ 84724:                     JUMPIF > L_0004

  1394              ATOM POS=0; FAULT(4)
10336 @ 84728:                     LINE   1394 "regression-compile-tmp/comp412.imp"
10337 @ 84766:                     PUSH   ATOMPOS
10338 @ 84769:                     PUSHI  #0x00000000
10339 @ 84774:                     ASSVAL
10340 @ 84775:                     LINE   1394 "regression-compile-tmp/comp412.imp"
10341 @ 84813:                     PUSH   FAULT
10342 @ 84816:                     PUSHI  #0x00000004
10343 @ 84821:                     ASSPAR
10344 @ 84822:                     CALL  

  1395              BP SIZE=1
10345 @ 84823:                     LINE   1395 "regression-compile-tmp/comp412.imp"
10346 @ 84861:                     PUSH   BPSIZE
10347 @ 84864:                     PUSHI  #0x00000001
10348 @ 84869:                     ASSVAL

  1396           %FINISH
10349 @ 84870:                     LINE   1396 "regression-compile-tmp/comp412.imp"
10350 @ 84908:                     LOCATE L_0004

  1397           PUT('B'+32);  ADDR(BP SIZE)
10351 @ 84911:                     LINE   1397 "regression-compile-tmp/comp412.imp"
10352 @ 84949:                     PUSH   PUT
10353 @ 84952:                     PUSHI  #0x00000042
10354 @ 84957:                     PUSHI  #0x00000020
10355 @ 84962:                     ADD   
10356 @ 84963:                     ASSPAR
10357 @ 84964:                     CALL  
10358 @ 84965:                     LINE   1397 "regression-compile-tmp/comp412.imp"
10359 @ 85003:                     PUSH   ADDR
10360 @ 85006:                     PUSH   BPSIZE
10361 @ 85009:                     ASSPAR
10362 @ 85010:                     CALL  

  1398        %END
  1399  
10363 @ 85011:                     LINE   1398 "regression-compile-tmp/comp412.imp"
10364 @ 85049:                  END    _lev0id0_COMPILEBLOCK_COMPILESS_SETSIZE {lev=4 --> 3}

  1400        %ROUTINE POP LAB(%INTEGER MODE)
10365 @ 85050:                  LINE   1400 "regression-compile-tmp/comp412.imp"
10366 @ 85088:                  DEF    POPLAB (_lev0id0_COMPILEBLOCK_COMPILESS_POPLAB) p1=V_010b a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10367 @ 85106:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
10368 @ 85107:                        DEF    MODE p1=V_010c a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10369 @ 85123:                     FINISH ) {lev=4}

  1401           %INTEGER L
10370 @ 85124:                     LINE   1401 "regression-compile-tmp/comp412.imp"
10371 @ 85162:                     DEF    L p1=V_010d a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1402           %IF LABEL > OLD LABEL %START
10372 @ 85175:                     LINE   1402 "regression-compile-tmp/comp412.imp"
10373 @ 85213:                     PUSH   LABEL
10374 @ 85216:                     PUSH   OLDLABEL
10375 @ 85219:                     JUMPIF <= L_0004

  1403              L = LAB INF(LABEL>>2)
10376 @ 85223:                     LINE   1403 "regression-compile-tmp/comp412.imp"
10377 @ 85261:                     PUSH   L
10378 @ 85264:                     PUSH   LABINF
10379 @ 85267:                     PUSH   LABEL
10380 @ 85270:                     PUSHI  #0x00000002
10381 @ 85275:                     RSH   
10382 @ 85276:                     ACCESS
10383 @ 85277:                     ASSVAL

  1404              %IF (L!!MODE)&1 # 0 %START
10384 @ 85278:                     LINE   1404 "regression-compile-tmp/comp412.imp"
10385 @ 85316:                     PUSH   L
10386 @ 85319:                     PUSH   MODE
10387 @ 85322:                     XOR   
10388 @ 85323:                     PUSHI  #0x00000001
10389 @ 85328:                     AND   
10390 @ 85329:                     PUSHI  #0x00000000
10391 @ 85334:                     JUMPIF = L_0007

  1405                 LABEL = LABEL-4;  P LAB = LABEL
10392 @ 85338:                     LINE   1405 "regression-compile-tmp/comp412.imp"
10393 @ 85376:                     PUSH   LABEL
10394 @ 85379:                     PUSH   LABEL
10395 @ 85382:                     PUSHI  #0x00000004
10396 @ 85387:                     SUB   
10397 @ 85388:                     ASSVAL
10398 @ 85389:                     LINE   1405 "regression-compile-tmp/comp412.imp"
10399 @ 85427:                     PUSH   PLAB
10400 @ 85430:                     PUSH   LABEL
10401 @ 85433:                     ASSVAL

  1406                 EILAB = PLAB+1 %IF L&4 # 0
10402 @ 85434:                     LINE   1406 "regression-compile-tmp/comp412.imp"
10403 @ 85472:                     PUSH   L
10404 @ 85475:                     PUSHI  #0x00000004
10405 @ 85480:                     AND   
10406 @ 85481:                     PUSHI  #0x00000000
10407 @ 85486:                     JUMPIF = L_000a
10408 @ 85490:                     PUSH   EILAB
10409 @ 85493:                     PUSH   PLAB
10410 @ 85496:                     PUSHI  #0x00000001
10411 @ 85501:                     ADD   
10412 @ 85502:                     ASSVAL
10413 @ 85503:                     LOCATE L_000a

  1407                 P LAB = P LAB+1 %IF L&3 = 3
10414 @ 85506:                     LINE   1407 "regression-compile-tmp/comp412.imp"
10415 @ 85544:                     PUSH   L
10416 @ 85547:                     PUSHI  #0x00000003
10417 @ 85552:                     AND   
10418 @ 85553:                     PUSHI  #0x00000003
10419 @ 85558:                     JUMPIF # L_000a
10420 @ 85562:                     PUSH   PLAB
10421 @ 85565:                     PUSH   PLAB
10422 @ 85568:                     PUSHI  #0x00000001
10423 @ 85573:                     ADD   
10424 @ 85574:                     ASSVAL
10425 @ 85575:                     LOCATE L_000a

  1408                 PLAB = 0 %IF L&8 = 0;        ! NO EXIT CONDITION
10426 @ 85578:                     LINE   1408 "regression-compile-tmp/comp412.imp"
10427 @ 85616:                     PUSH   L
10428 @ 85619:                     PUSHI  #0x00000008
10429 @ 85624:                     AND   
10430 @ 85625:                     PUSHI  #0x00000000
10431 @ 85630:                     JUMPIF # L_000a
10432 @ 85634:                     PUSH   PLAB
10433 @ 85637:                     PUSHI  #0x00000000
10434 @ 85642:                     ASSVAL
10435 @ 85643:                     LOCATE L_000a

  1409                 %RETURN
10436 @ 85646:                     LINE   1409 "regression-compile-tmp/comp412.imp"
10437 @ 85684:                     RETURN

  1410              %FINISH
10438 @ 85685:                     LINE   1410 "regression-compile-tmp/comp412.imp"
10439 @ 85723:                     LOCATE L_0007

  1411           %FINISH
10440 @ 85726:                     LINE   1411 "regression-compile-tmp/comp412.imp"
10441 @ 85764:                     LOCATE L_0004

  1412           %IF MODE = 0 %THEN MODE = 13 %ELSE MODE = 10
10442 @ 85767:                     LINE   1412 "regression-compile-tmp/comp412.imp"
10443 @ 85805:                     PUSH   MODE
10444 @ 85808:                     PUSHI  #0x00000000
10445 @ 85813:                     JUMPIF # L_0004
10446 @ 85817:                     PUSH   MODE
10447 @ 85820:                     PUSHI  #0x0000000d
10448 @ 85825:                     ASSVAL
10449 @ 85826:                     GOTO   L_0003
10450 @ 85829:                     LOCATE L_0004
10451 @ 85832:                     PUSH   MODE
10452 @ 85835:                     PUSHI  #0x0000000a
10453 @ 85840:                     ASSVAL
10454 @ 85841:                     LOCATE L_0003

  1413           FAULT(MODE);  ACCESS = 1
10455 @ 85844:                     LINE   1413 "regression-compile-tmp/comp412.imp"
10456 @ 85882:                     PUSH   FAULT
10457 @ 85885:                     PUSH   MODE
10458 @ 85888:                     ASSPAR
10459 @ 85889:                     CALL  
10460 @ 85890:                     LINE   1413 "regression-compile-tmp/comp412.imp"
10461 @ 85928:                     PUSH   ACCESS
10462 @ 85931:                     PUSHI  #0x00000001
10463 @ 85936:                     ASSVAL

  1414        %END
  1415  
10464 @ 85937:                     LINE   1414 "regression-compile-tmp/comp412.imp"
10465 @ 85975:                  END    _lev0id0_COMPILEBLOCK_COMPILESS_POPLAB {lev=4 --> 3}

  1416        %ROUTINE C END
10466 @ 85976:                  LINE   1416 "regression-compile-tmp/comp412.imp"
10467 @ 86014:                  DEF    CEND (_lev0id0_COMPILEBLOCK_COMPILESS_CEND) p1=V_010c a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10468 @ 86030:                     START  ( FORMAL PARAMETERS  {lev=4 --> 5, nested=0 --> 1}
10469 @ 86031:                     FINISH ) {lev=4}

  1417           %INTEGER L, T,LIM, FLAG
10470 @ 86032:                     LINE   1417 "regression-compile-tmp/comp412.imp"
10471 @ 86070:                     DEF    L p1=V_010d a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10472 @ 86083:                     DEF    T p1=V_010e a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10473 @ 86096:                     DEF    LIM p1=V_010f a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
10474 @ 86111:                     DEF    FLAG p1=V_0110 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1418           %IF X=88 %START;                  ! ENDOFPERM
10475 @ 86127:                     LINE   1418 "regression-compile-tmp/comp412.imp"
10476 @ 86165:                     PUSH   X
10477 @ 86168:                     PUSHI  #0x00000058
10478 @ 86173:                     JUMPIF # L_0004

  1419              STATS=0; LINE NUM=0
10479 @ 86177:                     LINE   1419 "regression-compile-tmp/comp412.imp"
10480 @ 86215:                     PUSH   STATS
10481 @ 86218:                     PUSHI  #0x00000000
10482 @ 86223:                     ASSVAL
10483 @ 86224:                     LINE   1419 "regression-compile-tmp/comp412.imp"
10484 @ 86262:                     PUSH   LINENUM
10485 @ 86265:                     PUSHI  #0x00000000
10486 @ 86270:                     ASSVAL

  1420              LIST=LIST&1; DEC TYPE=0
10487 @ 86271:                     LINE   1420 "regression-compile-tmp/comp412.imp"
10488 @ 86309:                     PUSH   LIST
10489 @ 86312:                     PUSH   LIST
10490 @ 86315:                     PUSHI  #0x00000001
10491 @ 86320:                     AND   
10492 @ 86321:                     ASSVAL
10493 @ 86322:                     LINE   1420 "regression-compile-tmp/comp412.imp"
10494 @ 86360:                     PUSH   DECTYPE
10495 @ 86363:                     PUSHI  #0x00000000
10496 @ 86368:                     ASSVAL

  1421              SELECTINPUT(PROG);             ! ONTO SOURCE PROGRAM
10497 @ 86369:                     LINE   1421 "regression-compile-tmp/comp412.imp"
10498 @ 86407:                     PUSH   SELECTINPUT
10499 @ 86410:                     PUSHI  #0x00000001
10500 @ 86415:                     ASSPAR
10501 @ 86416:                     CALL  

  1422              PERMIN = 0;                    ! SHOW NOT IN PERM
10502 @ 86417:                     LINE   1422 "regression-compile-tmp/comp412.imp"
10503 @ 86455:                     PUSH   PERMIN
10504 @ 86458:                     PUSHI  #0x00000000
10505 @ 86463:                     ASSVAL

  1423              %RETURN
10506 @ 86464:                     LINE   1423 "regression-compile-tmp/comp412.imp"
10507 @ 86502:                     RETURN

  1424           %FINISH
10508 @ 86503:                     LINE   1424 "regression-compile-tmp/comp412.imp"
10509 @ 86541:                     LOCATE L_0004

  1425           ATOM POS = 0;  FLAG = SYM
10510 @ 86544:                     LINE   1425 "regression-compile-tmp/comp412.imp"
10511 @ 86582:                     PUSH   ATOMPOS
10512 @ 86585:                     PUSHI  #0x00000000
10513 @ 86590:                     ASSVAL
10514 @ 86591:                     LINE   1425 "regression-compile-tmp/comp412.imp"
10515 @ 86629:                     PUSH   FLAG
10516 @ 86632:                     PUSH   SYM
10517 @ 86635:                     ASSVAL

  1426           %IF LEVEL = 1 %AND X # EOP %AND FILE = 2 %START
10518 @ 86636:                     LINE   1426 "regression-compile-tmp/comp412.imp"
10519 @ 86674:                     PUSH   LEVEL
10520 @ 86677:                     PUSHI  #0x00000001
10521 @ 86682:                     JUMPIF # L_0004
10522 @ 86686:                     PUSH   X
10523 @ 86689:                     PUSHI  #0x00000057
10524 @ 86694:                     JUMPIF = L_0004
10525 @ 86698:                     PUSH   FILE
10526 @ 86701:                     PUSHI  #0x00000002
10527 @ 86706:                     JUMPIF # L_0004

  1427              DEC TYPE = EOP;  FAULT(5)
10528 @ 86710:                     LINE   1427 "regression-compile-tmp/comp412.imp"
10529 @ 86748:                     PUSH   DECTYPE
10530 @ 86751:                     PUSHI  #0x00000057
10531 @ 86756:                     ASSVAL
10532 @ 86757:                     LINE   1427 "regression-compile-tmp/comp412.imp"
10533 @ 86795:                     PUSH   FAULT
10534 @ 86798:                     PUSHI  #0x00000005
10535 @ 86803:                     ASSPAR
10536 @ 86804:                     CALL  

  1428           %FINISH
10537 @ 86805:                     LINE   1428 "regression-compile-tmp/comp412.imp"
10538 @ 86843:                     LOCATE L_0004

  1429           LIM = T BASE
10539 @ 86846:                     LINE   1429 "regression-compile-tmp/comp412.imp"
10540 @ 86884:                     PUSH   LIM
10541 @ 86887:                     PUSH   TBASE
10542 @ 86890:                     ASSVAL

  1430           %IF X=EOP %OR X=EOF %START;       ! EOP
10543 @ 86891:                     LINE   1430 "regression-compile-tmp/comp412.imp"
10544 @ 86929:                     PUSH   X
10545 @ 86932:                     PUSHI  #0x00000057
10546 @ 86937:                     JUMPIF = L_0005
10547 @ 86941:                     PUSH   X
10548 @ 86944:                     PUSHI  #0x00000056
10549 @ 86949:                     JUMPIF # L_0004
10550 @ 86953:                     LOCATE L_0005

  1431              X = X-EOF;    ! EOF -> 0,  EOP -> L1
10551 @ 86956:                     LINE   1431 "regression-compile-tmp/comp412.imp"
10552 @ 86994:                     PUSH   X
10553 @ 86997:                     PUSH   X
10554 @ 87000:                     PUSHI  #0x00000056
10555 @ 87005:                     SUB   
10556 @ 87006:                     ASSVAL

  1432              FAULT(5) %UNLESS X = LEVEL
10557 @ 87007:                     LINE   1432 "regression-compile-tmp/comp412.imp"
10558 @ 87045:                     PUSH   X
10559 @ 87048:                     PUSH   LEVEL
10560 @ 87051:                     JUMPIF = L_0007
10561 @ 87055:                     PUSH   FAULT
10562 @ 87058:                     PUSHI  #0x00000005
10563 @ 87063:                     ASSPAR
10564 @ 87064:                     CALL  
10565 @ 87065:                     LOCATE L_0007

  1433              PUT(';')
10566 @ 87068:                     LINE   1433 "regression-compile-tmp/comp412.imp"
10567 @ 87106:                     PUSH   PUT
10568 @ 87109:                     PUSHI  #0x0000003b
10569 @ 87114:                     ASSPAR
10570 @ 87115:                     CALL  

  1434              %WHILE LEVEL > 1 %CYCLE
10571 @ 87116:                     LINE   1434 "regression-compile-tmp/comp412.imp"
10572 @ 87154:                     LOCATE L_0006
10573 @ 87157:                     PUSH   LEVEL
10574 @ 87160:                     PUSHI  #0x00000001
10575 @ 87165:                     JUMPIF <= L_0007

  1435                 FAULT(9)
10576 @ 87169:                     LINE   1435 "regression-compile-tmp/comp412.imp"
10577 @ 87207:                     PUSH   FAULT
10578 @ 87210:                     PUSHI  #0x00000009
10579 @ 87215:                     ASSPAR
10580 @ 87216:                     CALL  

  1436                 LEVEL=LEVEL-1
10581 @ 87217:                     LINE   1436 "regression-compile-tmp/comp412.imp"
10582 @ 87255:                     PUSH   LEVEL
10583 @ 87258:                     PUSH   LEVEL
10584 @ 87261:                     PUSHI  #0x00000001
10585 @ 87266:                     SUB   
10586 @ 87267:                     ASSVAL

  1437              %REPEAT
10587 @ 87268:                     LINE   1437 "regression-compile-tmp/comp412.imp"
10588 @ 87306:                     REPEAT L_0006
10589 @ 87309:                     LOCATE L_0007

  1438              LIM = GLOBAL;                  ! GIVE UNUSED FOR GLOBALS
10590 @ 87312:                     LINE   1438 "regression-compile-tmp/comp412.imp"
10591 @ 87350:                     PUSH   LIM
10592 @ 87353:                     PUSHI  #0x00000000
10593 @ 87358:                     ASSVAL

  1439           %ELSE
10594 @ 87359:                     LINE   1439 "regression-compile-tmp/comp412.imp"
10595 @ 87397:                     GOTO   L_0003
10596 @ 87400:                     LOCATE L_0004

  1440              FAULT(5) %IF LEVEL <= 1 %AND FILE = 2
10597 @ 87403:                     LINE   1440 "regression-compile-tmp/comp412.imp"
10598 @ 87441:                     PUSH   LEVEL
10599 @ 87444:                     PUSHI  #0x00000001
10600 @ 87449:                     JUMPIF > L_0007
10601 @ 87453:                     PUSH   FILE
10602 @ 87456:                     PUSHI  #0x00000002
10603 @ 87461:                     JUMPIF # L_0007
10604 @ 87465:                     PUSH   FAULT
10605 @ 87468:                     PUSHI  #0x00000005
10606 @ 87473:                     ASSPAR
10607 @ 87474:                     CALL  
10608 @ 87475:                     LOCATE L_0007

  1441              PUT(';')
10609 @ 87478:                     LINE   1441 "regression-compile-tmp/comp412.imp"
10610 @ 87516:                     PUSH   PUT
10611 @ 87519:                     PUSHI  #0x0000003b
10612 @ 87524:                     ASSPAR
10613 @ 87525:                     CALL  

  1442           %FINISH
10614 @ 87526:                     LINE   1442 "regression-compile-tmp/comp412.imp"
10615 @ 87564:                     LOCATE L_0003

  1443           %WHILE LABEL > OLD LABEL %CYCLE
10616 @ 87567:                     LINE   1443 "regression-compile-tmp/comp412.imp"
10617 @ 87605:                     LOCATE L_0003
10618 @ 87608:                     PUSH   LABEL
10619 @ 87611:                     PUSH   OLDLABEL
10620 @ 87614:                     JUMPIF <= L_0004

  1444              L=LABINF(LABEL>>2)
10621 @ 87618:                     LINE   1444 "regression-compile-tmp/comp412.imp"
10622 @ 87656:                     PUSH   L
10623 @ 87659:                     PUSH   LABINF
10624 @ 87662:                     PUSH   LABEL
10625 @ 87665:                     PUSHI  #0x00000002
10626 @ 87670:                     RSH   
10627 @ 87671:                     ACCESS
10628 @ 87672:                     ASSVAL

  1445              %IF L&7=2 %THEN L=11 %ELSE L=14
10629 @ 87673:                     LINE   1445 "regression-compile-tmp/comp412.imp"
10630 @ 87711:                     PUSH   L
10631 @ 87714:                     PUSHI  #0x00000007
10632 @ 87719:                     AND   
10633 @ 87720:                     PUSHI  #0x00000002
10634 @ 87725:                     JUMPIF # L_0007
10635 @ 87729:                     PUSH   L
10636 @ 87732:                     PUSHI  #0x0000000b
10637 @ 87737:                     ASSVAL
10638 @ 87738:                     GOTO   L_0006
10639 @ 87741:                     LOCATE L_0007
10640 @ 87744:                     PUSH   L
10641 @ 87747:                     PUSHI  #0x0000000e
10642 @ 87752:                     ASSVAL
10643 @ 87753:                     LOCATE L_0006

  1446              LABEL=LABEL-4
10644 @ 87756:                     LINE   1446 "regression-compile-tmp/comp412.imp"
10645 @ 87794:                     PUSH   LABEL
10646 @ 87797:                     PUSH   LABEL
10647 @ 87800:                     PUSHI  #0x00000004
10648 @ 87805:                     SUB   
10649 @ 87806:                     ASSVAL

  1447              FAULT(L)
10650 @ 87807:                     LINE   1447 "regression-compile-tmp/comp412.imp"
10651 @ 87845:                     PUSH   FAULT
10652 @ 87848:                     PUSH   L
10653 @ 87851:                     ASSPAR
10654 @ 87852:                     CALL  

  1448           %REPEAT
10655 @ 87853:                     LINE   1448 "regression-compile-tmp/comp412.imp"
10656 @ 87891:                     REPEAT L_0003
10657 @ 87894:                     LOCATE L_0004

  1449           FAULT(17) %IF ACCESS # 0 %AND 8 <= BLOCKTYPE&15 <= 10
10658 @ 87897:                     LINE   1449 "regression-compile-tmp/comp412.imp"
10659 @ 87935:                     PUSH   ACCESS
10660 @ 87938:                     PUSHI  #0x00000000
10661 @ 87943:                     JUMPIF = L_0004
10662 @ 87947:                     PUSHI  #0x00000008
10663 @ 87952:                     PUSH   BLOCKTYPE
10664 @ 87955:                     PUSHI  #0x0000000f
10665 @ 87960:                     AND   
10666 @ 87961:                     JUMPIFD > L_0004
10667 @ 87965:                     PUSHI  #0x0000000a
10668 @ 87970:                     JUMPIF > L_0004
10669 @ 87974:                     PUSH   FAULT
10670 @ 87977:                     PUSHI  #0x00000011
10671 @ 87982:                     ASSPAR
10672 @ 87983:                     CALL  
10673 @ 87984:                     LOCATE L_0004

  1450           X=T MAX-1
10674 @ 87987:                     LINE   1450 "regression-compile-tmp/comp412.imp"
10675 @ 88025:                     PUSH   X
10676 @ 88028:                     PUSH   TMAX
10677 @ 88031:                     PUSHI  #0x00000001
10678 @ 88036:                     SUB   
10679 @ 88037:                     ASSVAL

  1451           %WHILE X > LIM %CYCLE
10680 @ 88038:                     LINE   1451 "regression-compile-tmp/comp412.imp"
10681 @ 88076:                     LOCATE L_0003
10682 @ 88079:                     PUSH   X
10683 @ 88082:                     PUSH   LIM
10684 @ 88085:                     JUMPIF <= L_0004

  1452              T=DICT(X)
10685 @ 88089:                     LINE   1452 "regression-compile-tmp/comp412.imp"
10686 @ 88127:                     PUSH   T
10687 @ 88130:                     PUSH   DICT
10688 @ 88133:                     PUSH   X
10689 @ 88136:                     ACCESS
10690 @ 88137:                     ASSVAL

  1453              %IF DICT(X-1)&128=0=LIST %AND T&X'400' = 0  %START
10691 @ 88138:                     LINE   1453 "regression-compile-tmp/comp412.imp"
10692 @ 88176:                     PUSH   DICT
10693 @ 88179:                     PUSH   X
10694 @ 88182:                     PUSHI  #0x00000001
10695 @ 88187:                     SUB   
10696 @ 88188:                     ACCESS
10697 @ 88189:                     PUSHI  #0x00000080
10698 @ 88194:                     AND   
10699 @ 88195:                     PUSHI  #0x00000000
10700 @ 88200:                     JUMPIFD # L_0007
10701 @ 88204:                     PUSH   LIST
10702 @ 88207:                     JUMPIF # L_0007
10703 @ 88211:                     PUSH   T
10704 @ 88214:                     PUSHI  #0x00000400
10705 @ 88219:                     AND   
10706 @ 88220:                     PUSHI  #0x00000000
10707 @ 88225:                     JUMPIF # L_0007

  1454                 %IF CONTROL&X'1000' = 0 %START
10708 @ 88229:                     LINE   1454 "regression-compile-tmp/comp412.imp"
10709 @ 88267:                     PUSH   CONTROL
10710 @ 88270:                     PUSHI  #0x00001000
10711 @ 88275:                     AND   
10712 @ 88276:                     PUSHI  #0x00000000
10713 @ 88281:                     JUMPIF # L_000a

  1455                    %IF FLAG # NL %START
10714 @ 88285:                     LINE   1455 "regression-compile-tmp/comp412.imp"
10715 @ 88323:                     PUSH   FLAG
10716 @ 88326:                     PUSHI  #0x0000000a
10717 @ 88331:                     JUMPIF = L_000d

  1456                       MARGIN = MARGIN+POS
10718 @ 88335:                     LINE   1456 "regression-compile-tmp/comp412.imp"
10719 @ 88373:                     PUSH   MARGIN
10720 @ 88376:                     PUSH   MARGIN
10721 @ 88379:                     PUSH   POS
10722 @ 88382:                     ADD   
10723 @ 88383:                     ASSVAL

  1457                       NEWLINE
10724 @ 88384:                     LINE   1457 "regression-compile-tmp/comp412.imp"
10725 @ 88422:                     PUSH   NEWLINE
10726 @ 88425:                     CALL  

  1458                       FLAG = 0
10727 @ 88426:                     LINE   1458 "regression-compile-tmp/comp412.imp"
10728 @ 88464:                     PUSH   FLAG
10729 @ 88467:                     PUSHI  #0x00000000
10730 @ 88472:                     ASSVAL

  1459                    %FINISH
10731 @ 88473:                     LINE   1459 "regression-compile-tmp/comp412.imp"
10732 @ 88511:                     LOCATE L_000d

  1460                    PRINTSTRING("? ")
10733 @ 88514:                     LINE   1460 "regression-compile-tmp/comp412.imp"
10734 @ 88552:                     PUSH   PRINTSTRING
10735 @ 88555:                     PUSHS  "? "
10736 @ 88559:                     ASSPAR
10737 @ 88560:                     CALL  

  1461                    PRINT NAME(X)
10738 @ 88561:                     LINE   1461 "regression-compile-tmp/comp412.imp"
10739 @ 88599:                     PUSH   PRINTNAME
10740 @ 88602:                     PUSH   X
10741 @ 88605:                     ASSPAR
10742 @ 88606:                     CALL  

  1462                    PRINTSTRING(" UNUSED
  1463  ")
10743 @ 88607:                     LINE   1462 "regression-compile-tmp/comp412.imp"
10744 @ 88645:                     PUSH   PRINTSTRING
10745 @ 88648:                     PUSHS  " UNUSED\n"
10746 @ 88658:                     ASSPAR
10747 @ 88659:                     CALL  

  1464                 %FINISH
10748 @ 88660:                     LINE   1464 "regression-compile-tmp/comp412.imp"
10749 @ 88698:                     LOCATE L_000a

  1465              %FINISH
10750 @ 88701:                     LINE   1465 "regression-compile-tmp/comp412.imp"
10751 @ 88739:                     LOCATE L_0007

  1466              FAULT(12) %IF T&X'400'#0
10752 @ 88742:                     LINE   1466 "regression-compile-tmp/comp412.imp"
10753 @ 88780:                     PUSH   T
10754 @ 88783:                     PUSHI  #0x00000400
10755 @ 88788:                     AND   
10756 @ 88789:                     PUSHI  #0x00000000
10757 @ 88794:                     JUMPIF = L_0007
10758 @ 88798:                     PUSH   FAULT
10759 @ 88801:                     PUSHI  #0x0000000c
10760 @ 88806:                     ASSPAR
10761 @ 88807:                     CALL  
10762 @ 88808:                     LOCATE L_0007

  1467              X=X-T&255-3
10763 @ 88811:                     LINE   1467 "regression-compile-tmp/comp412.imp"
10764 @ 88849:                     PUSH   X
10765 @ 88852:                     PUSH   X
10766 @ 88855:                     PUSH   T
10767 @ 88858:                     PUSHI  #0x000000ff
10768 @ 88863:                     AND   
10769 @ 88864:                     SUB   
10770 @ 88865:                     PUSHI  #0x00000003
10771 @ 88870:                     SUB   
10772 @ 88871:                     ASSVAL

  1468           %REPEAT
10773 @ 88872:                     LINE   1468 "regression-compile-tmp/comp412.imp"
10774 @ 88910:                     REPEAT L_0003
10775 @ 88913:                     LOCATE L_0004

  1469           printsymbol(11)
10776 @ 88916:                     LINE   1469 "regression-compile-tmp/comp412.imp"
10777 @ 88954:                     PUSH   PRINTSYMBOL
10778 @ 88957:                     PUSHI  #0x0000000b
10779 @ 88962:                     ASSPAR
10780 @ 88963:                     CALL  

  1470           SPACES(MARGIN+8) %IF FLAG = 0
10781 @ 88964:                     LINE   1470 "regression-compile-tmp/comp412.imp"
10782 @ 89002:                     PUSH   FLAG
10783 @ 89005:                     PUSHI  #0x00000000
10784 @ 89010:                     JUMPIF # L_0004
10785 @ 89014:                     PUSH   SPACES
10786 @ 89017:                     PUSH   MARGIN
10787 @ 89020:                     PUSHI  #0x00000008
10788 @ 89025:                     ADD   
10789 @ 89026:                     ASSPAR
10790 @ 89027:                     CALL  
10791 @ 89028:                     LOCATE L_0004

  1471        %END
10792 @ 89031:                     LINE   1471 "regression-compile-tmp/comp412.imp"
10793 @ 89069:                  END    _lev0id0_COMPILEBLOCK_COMPILESS_CEND {lev=4 --> 3}

  1472        FAULT(24) %IF LABEL < 4 %OR LABEL > MAX LAB<<2
10794 @ 89070:                  LINE   1472 "regression-compile-tmp/comp412.imp"
10795 @ 89108:                  PUSH   LABEL
10796 @ 89111:                  PUSHI  #0x00000004
10797 @ 89116:                  JUMPIF < L_0005
10798 @ 89120:                  PUSH   LABEL
10799 @ 89123:                  PUSHI  #0x00000050
10800 @ 89128:                  PUSHI  #0x00000002
10801 @ 89133:                  LSH   
10802 @ 89134:                  JUMPIF <= L_0004
10803 @ 89138:                  LOCATE L_0005
10804 @ 89141:                  PUSH   FAULT
10805 @ 89144:                  PUSHI  #0x00000018
10806 @ 89149:                  ASSPAR
10807 @ 89150:                  CALL  
10808 @ 89151:                  LOCATE L_0004

  1473        %IF ACCESS = 0 %AND SSTYPE = 3 %AND 33 # LOC(-1)&255 # 34 %START
10809 @ 89154:                  LINE   1473 "regression-compile-tmp/comp412.imp"
10810 @ 89192:                  PUSH   ACCESS
10811 @ 89195:                  PUSHI  #0x00000000
10812 @ 89200:                  JUMPIF # L_0004
10813 @ 89204:                  PUSH   SSTYPE
10814 @ 89207:                  PUSHI  #0x00000003
10815 @ 89212:                  JUMPIF # L_0004
10816 @ 89216:                  PUSHI  #0x00000021
10817 @ 89221:                  PUSH   LOC
10818 @ 89224:                  PUSHI  #0x00000001
10819 @ 89229:                  NEGATE
10820 @ 89230:                  ACCESS
10821 @ 89231:                  PUSHI  #0x000000ff
10822 @ 89236:                  AND   
10823 @ 89237:                  JUMPIFD = L_0004
10824 @ 89241:                  PUSHI  #0x00000022
10825 @ 89246:                  JUMPIF = L_0004

  1474           FAULT(18) %IF CONTROL&X'1000' = 0;  ACCESS = 1
10826 @ 89250:                  LINE   1474 "regression-compile-tmp/comp412.imp"
10827 @ 89288:                  PUSH   CONTROL
10828 @ 89291:                  PUSHI  #0x00001000
10829 @ 89296:                  AND   
10830 @ 89297:                  PUSHI  #0x00000000
10831 @ 89302:                  JUMPIF # L_0007
10832 @ 89306:                  PUSH   FAULT
10833 @ 89309:                  PUSHI  #0x00000012
10834 @ 89314:                  ASSPAR
10835 @ 89315:                  CALL  
10836 @ 89316:                  LOCATE L_0007
10837 @ 89319:                  LINE   1474 "regression-compile-tmp/comp412.imp"
10838 @ 89357:                  PUSH   ACCESS
10839 @ 89360:                  PUSHI  #0x00000001
10840 @ 89365:                  ASSVAL

  1475        %FINISH
10841 @ 89366:                  LINE   1475 "regression-compile-tmp/comp412.imp"
10842 @ 89404:                  LOCATE L_0004

  1476        CONDS=0; DIM=0;  PRED PENDING = 0;  PRED OP = 0
10843 @ 89407:                  LINE   1476 "regression-compile-tmp/comp412.imp"
10844 @ 89445:                  PUSH   CONDS
10845 @ 89448:                  PUSHI  #0x00000000
10846 @ 89453:                  ASSVAL
10847 @ 89454:                  LINE   1476 "regression-compile-tmp/comp412.imp"
10848 @ 89492:                  PUSH   DIM
10849 @ 89495:                  PUSHI  #0x00000000
10850 @ 89500:                  ASSVAL
10851 @ 89501:                  LINE   1476 "regression-compile-tmp/comp412.imp"
10852 @ 89539:                  PUSH   PREDPENDING
10853 @ 89542:                  PUSHI  #0x00000000
10854 @ 89547:                  ASSVAL
10855 @ 89548:                  LINE   1476 "regression-compile-tmp/comp412.imp"
10856 @ 89586:                  PUSH   PREDOP
10857 @ 89589:                  PUSHI  #0x00000000
10858 @ 89594:                  ASSVAL

  1477        STARTT=0;                            ! DEFAULT TO CYCLE
10859 @ 89595:                  LINE   1477 "regression-compile-tmp/comp412.imp"
10860 @ 89633:                  PUSH   STARTT
10861 @ 89636:                  PUSHI  #0x00000000
10862 @ 89641:                  ASSVAL

  1478        PLAB=0; ULAB=0; LOOP LAB=0;  ELSE = 0;  EILAB = 0
10863 @ 89642:                  LINE   1478 "regression-compile-tmp/comp412.imp"
10864 @ 89680:                  PUSH   PLAB
10865 @ 89683:                  PUSHI  #0x00000000
10866 @ 89688:                  ASSVAL
10867 @ 89689:                  LINE   1478 "regression-compile-tmp/comp412.imp"
10868 @ 89727:                  PUSH   ULAB
10869 @ 89730:                  PUSHI  #0x00000000
10870 @ 89735:                  ASSVAL
10871 @ 89736:                  LINE   1478 "regression-compile-tmp/comp412.imp"
10872 @ 89774:                  PUSH   LOOPLAB
10873 @ 89777:                  PUSHI  #0x00000000
10874 @ 89782:                  ASSVAL
10875 @ 89783:                  LINE   1478 "regression-compile-tmp/comp412.imp"
10876 @ 89821:                  PUSH   ELSE
10877 @ 89824:                  PUSHI  #0x00000000
10878 @ 89829:                  ASSVAL
10879 @ 89830:                  LINE   1478 "regression-compile-tmp/comp412.imp"
10880 @ 89868:                  PUSH   EILAB
10881 @ 89871:                  PUSHI  #0x00000000
10882 @ 89876:                  ASSVAL

  1479        LIT1=0; LIT2=0
10883 @ 89877:                  LINE   1479 "regression-compile-tmp/comp412.imp"
10884 @ 89915:                  PUSH   LIT1
10885 @ 89918:                  PUSHI  #0x00000000
10886 @ 89923:                  ASSVAL
10887 @ 89924:                  LINE   1479 "regression-compile-tmp/comp412.imp"
10888 @ 89962:                  PUSH   LIT2
10889 @ 89965:                  PUSHI  #0x00000000
10890 @ 89970:                  ASSVAL

  1480        NEXT=SS; LINK=0
10891 @ 89971:                  LINE   1480 "regression-compile-tmp/comp412.imp"
10892 @ 90009:                  PUSH   NEXT
10893 @ 90012:                  PUSH   SS
10894 @ 90015:                  ASSVAL
10895 @ 90016:                  LINE   1480 "regression-compile-tmp/comp412.imp"
10896 @ 90054:                  PUSH   LINK
10897 @ 90057:                  PUSHI  #0x00000000
10898 @ 90062:                  ASSVAL

  1481        LIT=0
10899 @ 90063:                  LINE   1481 "regression-compile-tmp/comp412.imp"
10900 @ 90101:                  PUSH   LIT
10901 @ 90104:                  PUSHI  #0x00000000
10902 @ 90109:                  ASSVAL

  1482        DCLASS = 0
10903 @ 90110:                  LINE   1482 "regression-compile-tmp/comp412.imp"
10904 @ 90148:                  PUSH   DCLASS
10905 @ 90151:                  PUSHI  #0x00000000
10906 @ 90156:                  ASSVAL

  1483  TOP:   %CYCLE
10907 @ 90157:                  LINE   1483 "regression-compile-tmp/comp412.imp"
10908 @ 90195:                  LABEL  L_010d
10909 @ 90198:                  LINE   1483 "regression-compile-tmp/comp412.imp"
10910 @ 90236:                  LOCATE L_0003

  1484           X=SUB(NEXT)
10911 @ 90239:                  LINE   1484 "regression-compile-tmp/comp412.imp"
10912 @ 90277:                  PUSH   X
10913 @ 90280:                  PUSH   SUB
10914 @ 90283:                  PUSH   NEXT
10915 @ 90286:                  ACCESS
10916 @ 90287:                  ASSVAL

  1485           %EXIT %UNLESS X < 0 %AND NEXT <= P
10917 @ 90288:                  LINE   1485 "regression-compile-tmp/comp412.imp"
10918 @ 90326:                  PUSH   X
10919 @ 90329:                  PUSHI  #0x00000000
10920 @ 90334:                  JUMPIF >= L_0008
10921 @ 90338:                  PUSH   NEXT
10922 @ 90341:                  PUSH   P
10923 @ 90344:                  JUMPIF <= L_0007
10924 @ 90348:                  LOCATE L_0008
10925 @ 90351:                  GOTO   L_0004
10926 @ 90354:                  LOCATE L_0007

  1486           %IF CO(NEXT)#0 %START
10927 @ 90357:                  LINE   1486 "regression-compile-tmp/comp412.imp"
10928 @ 90395:                  PUSH   CO
10929 @ 90398:                  PUSH   NEXT
10930 @ 90401:                  ACCESS
10931 @ 90402:                  PUSHI  #0x00000000
10932 @ 90407:                  JUMPIF = L_0007

  1487              SUB(NEXT)=LINK; LINK=NEXT
10933 @ 90411:                  LINE   1487 "regression-compile-tmp/comp412.imp"
10934 @ 90449:                  PUSH   SUB
10935 @ 90452:                  PUSH   NEXT
10936 @ 90455:                  ACCESS
10937 @ 90456:                  PUSH   LINK
10938 @ 90459:                  ASSVAL
10939 @ 90460:                  LINE   1487 "regression-compile-tmp/comp412.imp"
10940 @ 90498:                  PUSH   LINK
10941 @ 90501:                  PUSH   NEXT
10942 @ 90504:                  ASSVAL

  1488           %FINISH
10943 @ 90505:                  LINE   1488 "regression-compile-tmp/comp412.imp"
10944 @ 90543:                  LOCATE L_0007

  1489           NEXT=X
10945 @ 90546:                  LINE   1489 "regression-compile-tmp/comp412.imp"
10946 @ 90584:                  PUSH   NEXT
10947 @ 90587:                  PUSH   X
10948 @ 90590:                  ASSVAL

  1490        %REPEAT
10949 @ 90591:                  LINE   1490 "regression-compile-tmp/comp412.imp"
10950 @ 90629:                  REPEAT L_0003
10951 @ 90632:                  LOCATE L_0004

  1491        CLASS=LOC(NEXT)&255
10952 @ 90635:                  LINE   1491 "regression-compile-tmp/comp412.imp"
10953 @ 90673:                  PUSH   CLASS
10954 @ 90676:                  PUSH   LOC
10955 @ 90679:                  PUSH   NEXT
10956 @ 90682:                  ACCESS
10957 @ 90683:                  PUSHI  #0x000000ff
10958 @ 90688:                  AND   
10959 @ 90689:                  ASSVAL

  1492        %IF DIAG&2 # 0 %START
10960 @ 90690:                  LINE   1492 "regression-compile-tmp/comp412.imp"
10961 @ 90728:                  PUSH   DIAG
10962 @ 90731:                  PUSHI  #0x00000002
10963 @ 90736:                  AND   
10964 @ 90737:                  PUSHI  #0x00000000
10965 @ 90742:                  JUMPIF = L_0004

  1493           PRINTSTRING("C =");  WRITE(CLASS, 3)
10966 @ 90746:                  LINE   1493 "regression-compile-tmp/comp412.imp"
10967 @ 90784:                  PUSH   PRINTSTRING
10968 @ 90787:                  PUSHS  "C ="
10969 @ 90792:                  ASSPAR
10970 @ 90793:                  CALL  
10971 @ 90794:                  LINE   1493 "regression-compile-tmp/comp412.imp"
10972 @ 90832:                  PUSH   WRITE
10973 @ 90835:                  PUSH   CLASS
10974 @ 90838:                  ASSPAR
10975 @ 90839:                  PUSHI  #0x00000003
10976 @ 90844:                  ASSPAR
10977 @ 90845:                  CALL  

  1494           PRINTSTRING("  X =");  WRITE(X, 3)
10978 @ 90846:                  LINE   1494 "regression-compile-tmp/comp412.imp"
10979 @ 90884:                  PUSH   PRINTSTRING
10980 @ 90887:                  PUSHS  "  X ="
10981 @ 90894:                  ASSPAR
10982 @ 90895:                  CALL  
10983 @ 90896:                  LINE   1494 "regression-compile-tmp/comp412.imp"
10984 @ 90934:                  PUSH   WRITE
10985 @ 90937:                  PUSH   X
10986 @ 90940:                  ASSPAR
10987 @ 90941:                  PUSHI  #0x00000003
10988 @ 90946:                  ASSPAR
10989 @ 90947:                  CALL  

  1495           PRINTSTRING("  NEXT =");  WRITE(NEXT, 3)
10990 @ 90948:                  LINE   1495 "regression-compile-tmp/comp412.imp"
10991 @ 90986:                  PUSH   PRINTSTRING
10992 @ 90989:                  PUSHS  "  NEXT ="
10993 @ 90999:                  ASSPAR
10994 @ 91000:                  CALL  
10995 @ 91001:                  LINE   1495 "regression-compile-tmp/comp412.imp"
10996 @ 91039:                  PUSH   WRITE
10997 @ 91042:                  PUSH   NEXT
10998 @ 91045:                  ASSPAR
10999 @ 91046:                  PUSHI  #0x00000003
11000 @ 91051:                  ASSPAR
11001 @ 91052:                  CALL  

  1496           NEWLINE
11002 @ 91053:                  LINE   1496 "regression-compile-tmp/comp412.imp"
11003 @ 91091:                  PUSH   NEWLINE
11004 @ 91094:                  CALL  

  1497        %FINISH
11005 @ 91095:                  LINE   1497 "regression-compile-tmp/comp412.imp"
11006 @ 91133:                  LOCATE L_0004

  1498        NEXT=CO(NEXT)
11007 @ 91136:                  LINE   1498 "regression-compile-tmp/comp412.imp"
11008 @ 91174:                  PUSH   NEXT
11009 @ 91177:                  PUSH   CO
11010 @ 91180:                  PUSH   NEXT
11011 @ 91183:                  ACCESS
11012 @ 91184:                  ASSVAL

  1499        -> C(X) %IF CLASS < PRE1
11013 @ 91185:                  LINE   1499 "regression-compile-tmp/comp412.imp"
11014 @ 91223:                  PUSH   CLASS
11015 @ 91226:                  PUSHI  #0x00000031
11016 @ 91231:                  JUMPIF >= L_0004
11017 @ 91235:                  PUSH   X
11018 @ 91238:                  SJUMP  230
11019 @ 91241:                  LOCATE L_0004

  1500        -> CONT %IF CLASS=APPEP
11020 @ 91244:                  LINE   1500 "regression-compile-tmp/comp412.imp"
11021 @ 91282:                  PUSH   CLASS
11022 @ 91285:                  PUSHI  #0x00000099
11023 @ 91290:                  JUMPIF # L_0004
11024 @ 91294:                  JUMP   L_010e
11025 @ 91297:                  LOCATE L_0004

  1501        -> C(CLASS) %UNLESS CLASS=IDENT
11026 @ 91300:                  LINE   1501 "regression-compile-tmp/comp412.imp"
11027 @ 91338:                  PUSH   CLASS
11028 @ 91341:                  PUSHI  #0x0000003b
11029 @ 91346:                  JUMPIF = L_0004
11030 @ 91350:                  PUSH   CLASS
11031 @ 91353:                  SJUMP  230
11032 @ 91356:                  LOCATE L_0004

  1502        -> D(DCLASS)
11033 @ 91359:                  LINE   1502 "regression-compile-tmp/comp412.imp"
11034 @ 91397:                  PUSH   DCLASS
11035 @ 91400:                  SJUMP  231

  1503  ACONT: ACCESS = 0
11036 @ 91403:                  LINE   1503 "regression-compile-tmp/comp412.imp"
11037 @ 91441:                  LABEL  L_010f
11038 @ 91444:                  LINE   1503 "regression-compile-tmp/comp412.imp"
11039 @ 91482:                  PUSH   ACCESS
11040 @ 91485:                  PUSHI  #0x00000000
11041 @ 91490:                  ASSVAL

  1504  C(112):                                     ! %AND (UI)
11042 @ 91491:                  LINE   1504 "regression-compile-tmp/comp412.imp"
11043 @ 91529:                  PUSHI  #0x00000070
11044 @ 91534:                  SLABEL 230

  1505  CONT:  %CYCLE
11045 @ 91537:                  LINE   1505 "regression-compile-tmp/comp412.imp"
11046 @ 91575:                  LABEL  L_010e
11047 @ 91578:                  LINE   1505 "regression-compile-tmp/comp412.imp"
11048 @ 91616:                  LOCATE L_0003

  1506           ->TOP %IF NEXT#0
11049 @ 91619:                  LINE   1506 "regression-compile-tmp/comp412.imp"
11050 @ 91657:                  PUSH   NEXT
11051 @ 91660:                  PUSHI  #0x00000000
11052 @ 91665:                  JUMPIF = L_0007
11053 @ 91669:                  JUMP   L_010d
11054 @ 91672:                  LOCATE L_0007

  1507           ->RETURN %IF LINK=0
11055 @ 91675:                  LINE   1507 "regression-compile-tmp/comp412.imp"
11056 @ 91713:                  PUSH   LINK
11057 @ 91716:                  PUSHI  #0x00000000
11058 @ 91721:                  JUMPIF # L_0007
11059 @ 91725:                  JUMP   L_0110
11060 @ 91728:                  LOCATE L_0007

  1508           NEXT=CO(LINK); LINK=SUB(LINK)
11061 @ 91731:                  LINE   1508 "regression-compile-tmp/comp412.imp"
11062 @ 91769:                  PUSH   NEXT
11063 @ 91772:                  PUSH   CO
11064 @ 91775:                  PUSH   LINK
11065 @ 91778:                  ACCESS
11066 @ 91779:                  ASSVAL
11067 @ 91780:                  LINE   1508 "regression-compile-tmp/comp412.imp"
11068 @ 91818:                  PUSH   LINK
11069 @ 91821:                  PUSH   SUB
11070 @ 91824:                  PUSH   LINK
11071 @ 91827:                  ACCESS
11072 @ 91828:                  ASSVAL

  1509        %REPEAT
11073 @ 91829:                  LINE   1509 "regression-compile-tmp/comp412.imp"
11074 @ 91867:                  REPEAT L_0003

  1510  C(9):                                       ! '\'
11075 @ 91870:                  LINE   1510 "regression-compile-tmp/comp412.imp"
11076 @ 91908:                  PUSHI  #0x00000009
11077 @ 91913:                  SLABEL 230

  1511        %IF CLASS = 45 %START;! LOGICAL NOT
11078 @ 91916:                  LINE   1511 "regression-compile-tmp/comp412.imp"
11079 @ 91954:                  PUSH   CLASS
11080 @ 91957:                  PUSHI  #0x0000002d
11081 @ 91962:                  JUMPIF # L_0004

  1512           LIT1=\LIT1 %AND LIT = LIT+1 %IF LIT=CODE
11082 @ 91966:                  LINE   1512 "regression-compile-tmp/comp412.imp"
11083 @ 92004:                  PUSH   LIT
11084 @ 92007:                  PUSH   CODE
11085 @ 92010:                  JUMPIF # L_0007
11086 @ 92014:                  PUSH   LIT1
11087 @ 92017:                  PUSH   LIT1
11088 @ 92020:                  NOT   
11089 @ 92021:                  ASSVAL
11090 @ 92022:                  PUSH   LIT
11091 @ 92025:                  PUSH   LIT
11092 @ 92028:                  PUSHI  #0x00000001
11093 @ 92033:                  ADD   
11094 @ 92034:                  ASSVAL
11095 @ 92035:                  LOCATE L_0007

  1513        %ELSE
11096 @ 92038:                  LINE   1513 "regression-compile-tmp/comp412.imp"
11097 @ 92076:                  GOTO   L_0003
11098 @ 92079:                  LOCATE L_0004

  1514           X = 10
11099 @ 92082:                  LINE   1514 "regression-compile-tmp/comp412.imp"
11100 @ 92120:                  PUSH   X
11101 @ 92123:                  PUSHI  #0x0000000a
11102 @ 92128:                  ASSVAL

  1515        %FINISH
11103 @ 92129:                  LINE   1515 "regression-compile-tmp/comp412.imp"
11104 @ 92167:                  LOCATE L_0003

  1516  C(1):                                       ! '*'
11105 @ 92170:                  LINE   1516 "regression-compile-tmp/comp412.imp"
11106 @ 92208:                  PUSHI  #0x00000001
11107 @ 92213:                  SLABEL 230

  1517  C(2):                                       ! '/'
11108 @ 92216:                  LINE   1517 "regression-compile-tmp/comp412.imp"
11109 @ 92254:                  PUSHI  #0x00000002
11110 @ 92259:                  SLABEL 230

  1518  C(3):                                       ! '&'
11111 @ 92262:                  LINE   1518 "regression-compile-tmp/comp412.imp"
11112 @ 92300:                  PUSHI  #0x00000003
11113 @ 92305:                  SLABEL 230

  1519  C(4):                                       ! '!'
11114 @ 92308:                  LINE   1519 "regression-compile-tmp/comp412.imp"
11115 @ 92346:                  PUSHI  #0x00000004
11116 @ 92351:                  SLABEL 230

  1520  C(5):                                       ! '!!'
11117 @ 92354:                  LINE   1520 "regression-compile-tmp/comp412.imp"
11118 @ 92392:                  PUSHI  #0x00000005
11119 @ 92397:                  SLABEL 230

  1521  C(6):                                       ! '<<'
11120 @ 92400:                  LINE   1521 "regression-compile-tmp/comp412.imp"
11121 @ 92438:                  PUSHI  #0x00000006
11122 @ 92443:                  SLABEL 230

  1522  C(7):                                       ! '>>'
11123 @ 92446:                  LINE   1522 "regression-compile-tmp/comp412.imp"
11124 @ 92484:                  PUSHI  #0x00000007
11125 @ 92489:                  SLABEL 230

  1523  C(8):                                       ! '.'
11126 @ 92492:                  LINE   1523 "regression-compile-tmp/comp412.imp"
11127 @ 92530:                  PUSHI  #0x00000008
11128 @ 92535:                  SLABEL 230

  1524        PUT(OPCODE(X)); -> CONT
11129 @ 92538:                  LINE   1524 "regression-compile-tmp/comp412.imp"
11130 @ 92576:                  PUSH   PUT
11131 @ 92579:                  PUSH   OPCODE
11132 @ 92582:                  PUSH   X
11133 @ 92585:                  ACCESS
11134 @ 92586:                  ASSPAR
11135 @ 92587:                  CALL  
11136 @ 92588:                  LINE   1524 "regression-compile-tmp/comp412.imp"
11137 @ 92626:                  JUMP   L_010e

  1525  C(46):PUT('Q');  ->CONT;!    REAL DIVIDE
11138 @ 92629:                  LINE   1525 "regression-compile-tmp/comp412.imp"
11139 @ 92667:                  PUSHI  #0x0000002e
11140 @ 92672:                  SLABEL 230
11141 @ 92675:                  LINE   1525 "regression-compile-tmp/comp412.imp"
11142 @ 92713:                  PUSH   PUT
11143 @ 92716:                  PUSHI  #0x00000051
11144 @ 92721:                  ASSPAR
11145 @ 92722:                  CALL  
11146 @ 92723:                  LINE   1525 "regression-compile-tmp/comp412.imp"
11147 @ 92761:                  JUMP   L_010e

  1526  C(10): PUT('M');  -> ACONT;                  ! %RESULT==
11148 @ 92764:                  LINE   1526 "regression-compile-tmp/comp412.imp"
11149 @ 92802:                  PUSHI  #0x0000000a
11150 @ 92807:                  SLABEL 230
11151 @ 92810:                  LINE   1526 "regression-compile-tmp/comp412.imp"
11152 @ 92848:                  PUSH   PUT
11153 @ 92851:                  PUSHI  #0x0000004d
11154 @ 92856:                  ASSPAR
11155 @ 92857:                  CALL  
11156 @ 92858:                  LINE   1526 "regression-compile-tmp/comp412.imp"
11157 @ 92896:                  JUMP   L_010f

  1527  C(11): PUT('+') %UNLESS CLASS=44;           ! UNARY PLUS
11158 @ 92899:                  LINE   1527 "regression-compile-tmp/comp412.imp"
11159 @ 92937:                  PUSHI  #0x0000000b
11160 @ 92942:                  SLABEL 230
11161 @ 92945:                  LINE   1527 "regression-compile-tmp/comp412.imp"
11162 @ 92983:                  PUSH   CLASS
11163 @ 92986:                  PUSHI  #0x0000002c
11164 @ 92991:                  JUMPIF = L_0004
11165 @ 92995:                  PUSH   PUT
11166 @ 92998:                  PUSHI  #0x0000002b
11167 @ 93003:                  ASSPAR
11168 @ 93004:                  CALL  
11169 @ 93005:                  LOCATE L_0004

  1528        -> CONT
11170 @ 93008:                  LINE   1528 "regression-compile-tmp/comp412.imp"
11171 @ 93046:                  JUMP   L_010e

  1529  C(12): %IF CLASS#43 %THEN PUT('-') %ELSE %START
11172 @ 93049:                  LINE   1529 "regression-compile-tmp/comp412.imp"
11173 @ 93087:                  PUSHI  #0x0000000c
11174 @ 93092:                  SLABEL 230
11175 @ 93095:                  LINE   1529 "regression-compile-tmp/comp412.imp"
11176 @ 93133:                  PUSH   CLASS
11177 @ 93136:                  PUSHI  #0x0000002b
11178 @ 93141:                  JUMPIF = L_0004
11179 @ 93145:                  PUSH   PUT
11180 @ 93148:                  PUSHI  #0x0000002d
11181 @ 93153:                  ASSPAR
11182 @ 93154:                  CALL  
11183 @ 93155:                  GOTO   L_0003
11184 @ 93158:                  LOCATE L_0004

  1530           LIT1=-LIT1 %AND LIT = LIT+1 %IF LIT=CODE
11185 @ 93161:                  LINE   1530 "regression-compile-tmp/comp412.imp"
11186 @ 93199:                  PUSH   LIT
11187 @ 93202:                  PUSH   CODE
11188 @ 93205:                  JUMPIF # L_0007
11189 @ 93209:                  PUSH   LIT1
11190 @ 93212:                  PUSH   LIT1
11191 @ 93215:                  NEGATE
11192 @ 93216:                  ASSVAL
11193 @ 93217:                  PUSH   LIT
11194 @ 93220:                  PUSH   LIT
11195 @ 93223:                  PUSHI  #0x00000001
11196 @ 93228:                  ADD   
11197 @ 93229:                  ASSVAL
11198 @ 93230:                  LOCATE L_0007

  1531           PUT('U')
11199 @ 93233:                  LINE   1531 "regression-compile-tmp/comp412.imp"
11200 @ 93271:                  PUSH   PUT
11201 @ 93274:                  PUSHI  #0x00000055
11202 @ 93279:                  ASSPAR
11203 @ 93280:                  CALL  

  1532        %FINISH
11204 @ 93281:                  LINE   1532 "regression-compile-tmp/comp412.imp"
11205 @ 93319:                  LOCATE L_0003

  1533        -> CONT
11206 @ 93322:                  LINE   1533 "regression-compile-tmp/comp412.imp"
11207 @ 93360:                  JUMP   L_010e

  1534  C(13): PUT('X');  ->CONT;                   ! \\
11208 @ 93363:                  LINE   1534 "regression-compile-tmp/comp412.imp"
11209 @ 93401:                  PUSHI  #0x0000000d
11210 @ 93406:                  SLABEL 230
11211 @ 93409:                  LINE   1534 "regression-compile-tmp/comp412.imp"
11212 @ 93447:                  PUSH   PUT
11213 @ 93450:                  PUSHI  #0x00000058
11214 @ 93455:                  ASSPAR
11215 @ 93456:                  CALL  
11216 @ 93457:                  LINE   1534 "regression-compile-tmp/comp412.imp"
11217 @ 93495:                  JUMP   L_010e

  1535  C(14): PUT('Y'+32);  DIAG = LIT1;  -> CONT;    ! DIAG
11218 @ 93498:                  LINE   1535 "regression-compile-tmp/comp412.imp"
11219 @ 93536:                  PUSHI  #0x0000000e
11220 @ 93541:                  SLABEL 230
11221 @ 93544:                  LINE   1535 "regression-compile-tmp/comp412.imp"
11222 @ 93582:                  PUSH   PUT
11223 @ 93585:                  PUSHI  #0x00000059
11224 @ 93590:                  PUSHI  #0x00000020
11225 @ 93595:                  ADD   
11226 @ 93596:                  ASSPAR
11227 @ 93597:                  CALL  
11228 @ 93598:                  LINE   1535 "regression-compile-tmp/comp412.imp"
11229 @ 93636:                  PUSH   DIAG
11230 @ 93639:                  PUSH   LIT1
11231 @ 93642:                  ASSVAL
11232 @ 93643:                  LINE   1535 "regression-compile-tmp/comp412.imp"
11233 @ 93681:                  JUMP   L_010e

  1536  C(15): PUT('Z'+32);  CONTROL = LIT1;  -> CONT; ! CONTROL
11234 @ 93684:                  LINE   1536 "regression-compile-tmp/comp412.imp"
11235 @ 93722:                  PUSHI  #0x0000000f
11236 @ 93727:                  SLABEL 230
11237 @ 93730:                  LINE   1536 "regression-compile-tmp/comp412.imp"
11238 @ 93768:                  PUSH   PUT
11239 @ 93771:                  PUSHI  #0x0000005a
11240 @ 93776:                  PUSHI  #0x00000020
11241 @ 93781:                  ADD   
11242 @ 93782:                  ASSPAR
11243 @ 93783:                  CALL  
11244 @ 93784:                  LINE   1536 "regression-compile-tmp/comp412.imp"
11245 @ 93822:                  PUSH   CONTROL
11246 @ 93825:                  PUSH   LIT1
11247 @ 93828:                  ASSVAL
11248 @ 93829:                  LINE   1536 "regression-compile-tmp/comp412.imp"
11249 @ 93867:                  JUMP   L_010e

  1537  C(16): PUT('V');  -> ACONT;                 ! %RESULT=
11250 @ 93870:                  LINE   1537 "regression-compile-tmp/comp412.imp"
11251 @ 93908:                  PUSHI  #0x00000010
11252 @ 93913:                  SLABEL 230
11253 @ 93916:                  LINE   1537 "regression-compile-tmp/comp412.imp"
11254 @ 93954:                  PUSH   PUT
11255 @ 93957:                  PUSHI  #0x00000056
11256 @ 93962:                  ASSPAR
11257 @ 93963:                  CALL  
11258 @ 93964:                  LINE   1537 "regression-compile-tmp/comp412.imp"
11259 @ 94002:                  JUMP   L_010f

  1538  C(17): %IF BLOCKTYPE # 7 %START
11260 @ 94005:                  LINE   1538 "regression-compile-tmp/comp412.imp"
11261 @ 94043:                  PUSHI  #0x00000011
11262 @ 94048:                  SLABEL 230
11263 @ 94051:                  LINE   1538 "regression-compile-tmp/comp412.imp"
11264 @ 94089:                  PUSH   BLOCKTYPE
11265 @ 94092:                  PUSHI  #0x00000007
11266 @ 94097:                  JUMPIF = L_0004

  1539            FAULT(5) %UNLESS DIAG < 0 %AND BLOCKTYPE&15 = 8
11267 @ 94101:                  LINE   1539 "regression-compile-tmp/comp412.imp"
11268 @ 94139:                  PUSH   DIAG
11269 @ 94142:                  PUSHI  #0x00000000
11270 @ 94147:                  JUMPIF >= L_0008
11271 @ 94151:                  PUSH   BLOCKTYPE
11272 @ 94154:                  PUSHI  #0x0000000f
11273 @ 94159:                  AND   
11274 @ 94160:                  PUSHI  #0x00000008
11275 @ 94165:                  JUMPIF = L_0007
11276 @ 94169:                  LOCATE L_0008
11277 @ 94172:                  PUSH   FAULT
11278 @ 94175:                  PUSHI  #0x00000005
11279 @ 94180:                  ASSPAR
11280 @ 94181:                  CALL  
11281 @ 94182:                  LOCATE L_0007

  1540         %FINISH
11282 @ 94185:                  LINE   1540 "regression-compile-tmp/comp412.imp"
11283 @ 94223:                  LOCATE L_0004

  1541         PUT('R');  -> ACONT;                 ! RETURN
11284 @ 94226:                  LINE   1541 "regression-compile-tmp/comp412.imp"
11285 @ 94264:                  PUSH   PUT
11286 @ 94267:                  PUSHI  #0x00000052
11287 @ 94272:                  ASSPAR
11288 @ 94273:                  CALL  
11289 @ 94274:                  LINE   1541 "regression-compile-tmp/comp412.imp"
11290 @ 94312:                  JUMP   L_010f

  1542  C(18): PUT('T');  -> PREDT;                 ! TRUE
11291 @ 94315:                  LINE   1542 "regression-compile-tmp/comp412.imp"
11292 @ 94353:                  PUSHI  #0x00000012
11293 @ 94358:                  SLABEL 230
11294 @ 94361:                  LINE   1542 "regression-compile-tmp/comp412.imp"
11295 @ 94399:                  PUSH   PUT
11296 @ 94402:                  PUSHI  #0x00000054
11297 @ 94407:                  ASSPAR
11298 @ 94408:                  CALL  
11299 @ 94409:                  LINE   1542 "regression-compile-tmp/comp412.imp"
11300 @ 94447:                  JUMP   L_0111

  1543  C(19): PUT('K');                            ! FALSE
11301 @ 94450:                  LINE   1543 "regression-compile-tmp/comp412.imp"
11302 @ 94488:                  PUSHI  #0x00000013
11303 @ 94493:                  SLABEL 230
11304 @ 94496:                  LINE   1543 "regression-compile-tmp/comp412.imp"
11305 @ 94534:                  PUSH   PUT
11306 @ 94537:                  PUSHI  #0x0000004b
11307 @ 94542:                  ASSPAR
11308 @ 94543:                  CALL  

  1544  PREDT: FAULT(5) %UNLESS BLOCKTYPE = 10
11309 @ 94544:                  LINE   1544 "regression-compile-tmp/comp412.imp"
11310 @ 94582:                  LABEL  L_0111
11311 @ 94585:                  LINE   1544 "regression-compile-tmp/comp412.imp"
11312 @ 94623:                  PUSH   BLOCKTYPE
11313 @ 94626:                  PUSHI  #0x0000000a
11314 @ 94631:                  JUMPIF = L_0004
11315 @ 94635:                  PUSH   FAULT
11316 @ 94638:                  PUSHI  #0x00000005
11317 @ 94643:                  ASSPAR
11318 @ 94644:                  CALL  
11319 @ 94645:                  LOCATE L_0004

  1545         ->ACONT
11320 @ 94648:                  LINE   1545 "regression-compile-tmp/comp412.imp"
11321 @ 94686:                  JUMP   L_010f

  1546  C(20): PUT(101);  -> ACONT;                 ! %SIGNAL
11322 @ 94689:                  LINE   1546 "regression-compile-tmp/comp412.imp"
11323 @ 94727:                  PUSHI  #0x00000014
11324 @ 94732:                  SLABEL 230
11325 @ 94735:                  LINE   1546 "regression-compile-tmp/comp412.imp"
11326 @ 94773:                  PUSH   PUT
11327 @ 94776:                  PUSHI  #0x00000065
11328 @ 94781:                  ASSPAR
11329 @ 94782:                  CALL  
11330 @ 94783:                  LINE   1546 "regression-compile-tmp/comp412.imp"
11331 @ 94821:                  JUMP   L_010f

  1547  C(44):LIT2 = 0;                             ! %ON %EVENT
11332 @ 94824:                  LINE   1547 "regression-compile-tmp/comp412.imp"
11333 @ 94862:                  PUSHI  #0x0000002c
11334 @ 94867:                  SLABEL 230
11335 @ 94870:                  LINE   1547 "regression-compile-tmp/comp412.imp"
11336 @ 94908:                  PUSH   LIT2
11337 @ 94911:                  PUSHI  #0x00000000
11338 @ 94916:                  ASSVAL

  1548        FAULT(15) %IF INHIBIT&1 # 0
11339 @ 94917:                  LINE   1548 "regression-compile-tmp/comp412.imp"
11340 @ 94955:                  PUSH   INHIBIT
11341 @ 94958:                  PUSHI  #0x00000001
11342 @ 94963:                  AND   
11343 @ 94964:                  PUSHI  #0x00000000
11344 @ 94969:                  JUMPIF = L_0004
11345 @ 94973:                  PUSH   FAULT
11346 @ 94976:                  PUSHI  #0x0000000f
11347 @ 94981:                  ASSPAR
11348 @ 94982:                  CALL  
11349 @ 94983:                  LOCATE L_0004

  1549        INHIBIT = INHIBIT!1
11350 @ 94986:                  LINE   1549 "regression-compile-tmp/comp412.imp"
11351 @ 95024:                  PUSH   INHIBIT
11352 @ 95027:                  PUSH   INHIBIT
11353 @ 95030:                  PUSHI  #0x00000001
11354 @ 95035:                  OR    
11355 @ 95036:                  ASSVAL

  1550        %CYCLE
11356 @ 95037:                  LINE   1550 "regression-compile-tmp/comp412.imp"
11357 @ 95075:                  LOCATE L_0003

  1551           %EXIT %IF NEXT = 0
11358 @ 95078:                  LINE   1551 "regression-compile-tmp/comp412.imp"
11359 @ 95116:                  PUSH   NEXT
11360 @ 95119:                  PUSHI  #0x00000000
11361 @ 95124:                  JUMPIF # L_0007
11362 @ 95128:                  GOTO   L_0004
11363 @ 95131:                  LOCATE L_0007

  1552           X = SUB(NEXT)
11364 @ 95134:                  LINE   1552 "regression-compile-tmp/comp412.imp"
11365 @ 95172:                  PUSH   X
11366 @ 95175:                  PUSH   SUB
11367 @ 95178:                  PUSH   NEXT
11368 @ 95181:                  ACCESS
11369 @ 95182:                  ASSVAL

  1553           %EXIT %IF (X < 0 %AND NEXT <= P) %OR LOC(NEXT)&255 # ICONST
11370 @ 95183:                  LINE   1553 "regression-compile-tmp/comp412.imp"
11371 @ 95221:                  PUSH   X
11372 @ 95224:                  PUSHI  #0x00000000
11373 @ 95229:                  JUMPIF >= L_0009
11374 @ 95233:                  PUSH   NEXT
11375 @ 95236:                  PUSH   P
11376 @ 95239:                  JUMPIF <= L_0008
11377 @ 95243:                  LOCATE L_0009
11378 @ 95246:                  PUSH   LOC
11379 @ 95249:                  PUSH   NEXT
11380 @ 95252:                  ACCESS
11381 @ 95253:                  PUSHI  #0x000000ff
11382 @ 95258:                  AND   
11383 @ 95259:                  PUSHI  #0x00000053
11384 @ 95264:                  JUMPIF = L_0007
11385 @ 95268:                  LOCATE L_0008
11386 @ 95271:                  GOTO   L_0004
11387 @ 95274:                  LOCATE L_0007

  1554           NEXT = CO(NEXT)
11388 @ 95277:                  LINE   1554 "regression-compile-tmp/comp412.imp"
11389 @ 95315:                  PUSH   NEXT
11390 @ 95318:                  PUSH   CO
11391 @ 95321:                  PUSH   NEXT
11392 @ 95324:                  ACCESS
11393 @ 95325:                  ASSVAL

  1555           LIT1 = EVAL(X)
11394 @ 95326:                  LINE   1555 "regression-compile-tmp/comp412.imp"
11395 @ 95364:                  PUSH   LIT1
11396 @ 95367:                  PUSH   EVAL
11397 @ 95370:                  PUSH   X
11398 @ 95373:                  ASSPAR
11399 @ 95374:                  CALL  
11400 @ 95375:                  ASSVAL

  1556           FAULT(16) %AND LIT1 = 0 %UNLESS 0 <= LIT1 <= 15
11401 @ 95376:                  LINE   1556 "regression-compile-tmp/comp412.imp"
11402 @ 95414:                  PUSHI  #0x00000000
11403 @ 95419:                  PUSH   LIT1
11404 @ 95422:                  JUMPIFD > L_0008
11405 @ 95426:                  PUSHI  #0x0000000f
11406 @ 95431:                  JUMPIF <= L_0007
11407 @ 95435:                  LOCATE L_0008
11408 @ 95438:                  PUSH   FAULT
11409 @ 95441:                  PUSHI  #0x00000010
11410 @ 95446:                  ASSPAR
11411 @ 95447:                  CALL  
11412 @ 95448:                  PUSH   LIT1
11413 @ 95451:                  PUSHI  #0x00000000
11414 @ 95456:                  ASSVAL
11415 @ 95457:                  LOCATE L_0007

  1557           LIT2 = LIT2!(1<<LIT1)
11416 @ 95460:                  LINE   1557 "regression-compile-tmp/comp412.imp"
11417 @ 95498:                  PUSH   LIT2
11418 @ 95501:                  PUSH   LIT2
11419 @ 95504:                  PUSHI  #0x00000001
11420 @ 95509:                  PUSH   LIT1
11421 @ 95512:                  LSH   
11422 @ 95513:                  OR    
11423 @ 95514:                  ASSVAL

  1558        %REPEAT
11424 @ 95515:                  LINE   1558 "regression-compile-tmp/comp412.imp"
11425 @ 95553:                  REPEAT L_0003
11426 @ 95556:                  LOCATE L_0004

  1559        FAULT(16) %IF LIT2 = 0
11427 @ 95559:                  LINE   1559 "regression-compile-tmp/comp412.imp"
11428 @ 95597:                  PUSH   LIT2
11429 @ 95600:                  PUSHI  #0x00000000
11430 @ 95605:                  JUMPIF # L_0004
11431 @ 95609:                  PUSH   FAULT
11432 @ 95612:                  PUSHI  #0x00000010
11433 @ 95617:                  ASSPAR
11434 @ 95618:                  CALL  
11435 @ 95619:                  LOCATE L_0004

  1560        STARTT = 1+8
11436 @ 95622:                  LINE   1560 "regression-compile-tmp/comp412.imp"
11437 @ 95660:                  PUSH   STARTT
11438 @ 95663:                  PUSHI  #0x00000001
11439 @ 95668:                  PUSHI  #0x00000008
11440 @ 95673:                  ADD   
11441 @ 95674:                  ASSVAL

  1561        OP(111, LIT2);  OP(',', LABEL)
11442 @ 95675:                  LINE   1561 "regression-compile-tmp/comp412.imp"
11443 @ 95713:                  PUSH   OP
11444 @ 95716:                  PUSHI  #0x0000006f
11445 @ 95721:                  ASSPAR
11446 @ 95722:                  PUSH   LIT2
11447 @ 95725:                  ASSPAR
11448 @ 95726:                  CALL  
11449 @ 95727:                  LINE   1561 "regression-compile-tmp/comp412.imp"
11450 @ 95765:                  PUSH   OP
11451 @ 95768:                  PUSHI  #0x0000002c
11452 @ 95773:                  ASSPAR
11453 @ 95774:                  PUSH   LABEL
11454 @ 95777:                  ASSPAR
11455 @ 95778:                  CALL  

  1562        ->CONT
11456 @ 95779:                  LINE   1562 "regression-compile-tmp/comp412.imp"
11457 @ 95817:                  JUMP   L_010e

  1563  C(21): PUT('S'+32);  -> ACONT;                 ! %STOP
11458 @ 95820:                  LINE   1563 "regression-compile-tmp/comp412.imp"
11459 @ 95858:                  PUSHI  #0x00000015
11460 @ 95863:                  SLABEL 230
11461 @ 95866:                  LINE   1563 "regression-compile-tmp/comp412.imp"
11462 @ 95904:                  PUSH   PUT
11463 @ 95907:                  PUSHI  #0x00000053
11464 @ 95912:                  PUSHI  #0x00000020
11465 @ 95917:                  ADD   
11466 @ 95918:                  ASSPAR
11467 @ 95919:                  CALL  
11468 @ 95920:                  LINE   1563 "regression-compile-tmp/comp412.imp"
11469 @ 95958:                  JUMP   L_010f

  1564  C(22): LIST=LIST&2;  -> CONT;               ! %LIST
11470 @ 95961:                  LINE   1564 "regression-compile-tmp/comp412.imp"
11471 @ 95999:                  PUSHI  #0x00000016
11472 @ 96004:                  SLABEL 230
11473 @ 96007:                  LINE   1564 "regression-compile-tmp/comp412.imp"
11474 @ 96045:                  PUSH   LIST
11475 @ 96048:                  PUSH   LIST
11476 @ 96051:                  PUSHI  #0x00000002
11477 @ 96056:                  AND   
11478 @ 96057:                  ASSVAL
11479 @ 96058:                  LINE   1564 "regression-compile-tmp/comp412.imp"
11480 @ 96096:                  JUMP   L_010e

  1565  C(23): LIST=LIST!1;  -> CONT;               ! %ENDOFLIST
11481 @ 96099:                  LINE   1565 "regression-compile-tmp/comp412.imp"
11482 @ 96137:                  PUSHI  #0x00000017
11483 @ 96142:                  SLABEL 230
11484 @ 96145:                  LINE   1565 "regression-compile-tmp/comp412.imp"
11485 @ 96183:                  PUSH   LIST
11486 @ 96186:                  PUSH   LIST
11487 @ 96189:                  PUSHI  #0x00000001
11488 @ 96194:                  OR    
11489 @ 96195:                  ASSVAL
11490 @ 96196:                  LINE   1565 "regression-compile-tmp/comp412.imp"
11491 @ 96234:                  JUMP   L_010e

  1566  C(24): LREALS=16;  -> CONT;                 ! %REALSLONG
11492 @ 96237:                  LINE   1566 "regression-compile-tmp/comp412.imp"
11493 @ 96275:                  PUSHI  #0x00000018
11494 @ 96280:                  SLABEL 230
11495 @ 96283:                  LINE   1566 "regression-compile-tmp/comp412.imp"
11496 @ 96321:                  PUSH   LREALS
11497 @ 96324:                  PUSHI  #0x00000010
11498 @ 96329:                  ASSVAL
11499 @ 96330:                  LINE   1566 "regression-compile-tmp/comp412.imp"
11500 @ 96368:                  JUMP   L_010e

  1567  C(25): LREALS=0;  -> CONT;                  ! %REALSNORMAL
11501 @ 96371:                  LINE   1567 "regression-compile-tmp/comp412.imp"
11502 @ 96409:                  PUSHI  #0x00000019
11503 @ 96414:                  SLABEL 230
11504 @ 96417:                  LINE   1567 "regression-compile-tmp/comp412.imp"
11505 @ 96455:                  PUSH   LREALS
11506 @ 96458:                  PUSHI  #0x00000000
11507 @ 96463:                  ASSVAL
11508 @ 96464:                  LINE   1567 "regression-compile-tmp/comp412.imp"
11509 @ 96502:                  JUMP   L_010e

  1568  C(109):PUT('S');  -> CONT;                  ! 'EQ'
11510 @ 96505:                  LINE   1568 "regression-compile-tmp/comp412.imp"
11511 @ 96543:                  PUSHI  #0x0000006d
11512 @ 96548:                  SLABEL 230
11513 @ 96551:                  LINE   1568 "regression-compile-tmp/comp412.imp"
11514 @ 96589:                  PUSH   PUT
11515 @ 96592:                  PUSHI  #0x00000053
11516 @ 96597:                  ASSPAR
11517 @ 96598:                  CALL  
11518 @ 96599:                  LINE   1568 "regression-compile-tmp/comp412.imp"
11519 @ 96637:                  JUMP   L_010e

  1569  C(45): PUT('Z');  -> CONT;                  ! EQEQ
11520 @ 96640:                  LINE   1569 "regression-compile-tmp/comp412.imp"
11521 @ 96678:                  PUSHI  #0x0000002d
11522 @ 96683:                  SLABEL 230
11523 @ 96686:                  LINE   1569 "regression-compile-tmp/comp412.imp"
11524 @ 96724:                  PUSH   PUT
11525 @ 96727:                  PUSHI  #0x0000005a
11526 @ 96732:                  ASSPAR
11527 @ 96733:                  CALL  
11528 @ 96734:                  LINE   1569 "regression-compile-tmp/comp412.imp"
11529 @ 96772:                  JUMP   L_010e

  1570  C(26):                                      ! EXIT
11530 @ 96775:                  LINE   1570 "regression-compile-tmp/comp412.imp"
11531 @ 96813:                  PUSHI  #0x0000001a
11532 @ 96818:                  SLABEL 230

  1571  C(27):                                      ! CONTINUE
11533 @ 96821:                  LINE   1571 "regression-compile-tmp/comp412.imp"
11534 @ 96859:                  PUSHI  #0x0000001b
11535 @ 96864:                  SLABEL 230

  1572        L=LABEL
11536 @ 96867:                  LINE   1572 "regression-compile-tmp/comp412.imp"
11537 @ 96905:                  PUSH   L
11538 @ 96908:                  PUSH   LABEL
11539 @ 96911:                  ASSVAL

  1573        %WHILE L > OLD LABEL %CYCLE
11540 @ 96912:                  LINE   1573 "regression-compile-tmp/comp412.imp"
11541 @ 96950:                  LOCATE L_0003
11542 @ 96953:                  PUSH   L
11543 @ 96956:                  PUSH   OLDLABEL
11544 @ 96959:                  JUMPIF <= L_0004

  1574           %IF LABINF(L>>2)&7=2 %START;! CYCLE FOUND
11545 @ 96963:                  LINE   1574 "regression-compile-tmp/comp412.imp"
11546 @ 97001:                  PUSH   LABINF
11547 @ 97004:                  PUSH   L
11548 @ 97007:                  PUSHI  #0x00000002
11549 @ 97012:                  RSH   
11550 @ 97013:                  ACCESS
11551 @ 97014:                  PUSHI  #0x00000007
11552 @ 97019:                  AND   
11553 @ 97020:                  PUSHI  #0x00000002
11554 @ 97025:                  JUMPIF # L_0007

  1575              %IF X = 26 %START
11555 @ 97029:                  LINE   1575 "regression-compile-tmp/comp412.imp"
11556 @ 97067:                  PUSH   X
11557 @ 97070:                  PUSHI  #0x0000001a
11558 @ 97075:                  JUMPIF # L_000a

  1576                 MM == LABINF(L>>2)
11559 @ 97079:                  LINE   1576 "regression-compile-tmp/comp412.imp"
11560 @ 97117:                  PUSH   MM
11561 @ 97120:                  PUSH   LABINF
11562 @ 97123:                  PUSH   L
11563 @ 97126:                  PUSHI  #0x00000002
11564 @ 97131:                  RSH   
11565 @ 97132:                  ACCESS
11566 @ 97133:                  ASSREF

  1577                 MM = MM!8
11567 @ 97134:                  LINE   1577 "regression-compile-tmp/comp412.imp"
11568 @ 97172:                  PUSH   MM
11569 @ 97175:                  PUSH   MM
11570 @ 97178:                  PUSHI  #0x00000008
11571 @ 97183:                  OR    
11572 @ 97184:                  ASSVAL

  1578                 L = L-2;  X = 'F'
11573 @ 97185:                  LINE   1578 "regression-compile-tmp/comp412.imp"
11574 @ 97223:                  PUSH   L
11575 @ 97226:                  PUSH   L
11576 @ 97229:                  PUSHI  #0x00000002
11577 @ 97234:                  SUB   
11578 @ 97235:                  ASSVAL
11579 @ 97236:                  LINE   1578 "regression-compile-tmp/comp412.imp"
11580 @ 97274:                  PUSH   X
11581 @ 97277:                  PUSHI  #0x00000046
11582 @ 97282:                  ASSVAL

  1579              %ELSE
11583 @ 97283:                  LINE   1579 "regression-compile-tmp/comp412.imp"
11584 @ 97321:                  GOTO   L_0009
11585 @ 97324:                  LOCATE L_000a

  1580                 X = 113
11586 @ 97327:                  LINE   1580 "regression-compile-tmp/comp412.imp"
11587 @ 97365:                  PUSH   X
11588 @ 97368:                  PUSHI  #0x00000071
11589 @ 97373:                  ASSVAL

  1581              %FINISH
11590 @ 97374:                  LINE   1581 "regression-compile-tmp/comp412.imp"
11591 @ 97412:                  LOCATE L_0009

  1582              OP(X,L-2)
11592 @ 97415:                  LINE   1582 "regression-compile-tmp/comp412.imp"
11593 @ 97453:                  PUSH   OP
11594 @ 97456:                  PUSH   X
11595 @ 97459:                  ASSPAR
11596 @ 97460:                  PUSH   L
11597 @ 97463:                  PUSHI  #0x00000002
11598 @ 97468:                  SUB   
11599 @ 97469:                  ASSPAR
11600 @ 97470:                  CALL  

  1583              -> ACONT
11601 @ 97471:                  LINE   1583 "regression-compile-tmp/comp412.imp"
11602 @ 97509:                  JUMP   L_010f

  1584           %FINISH
11603 @ 97512:                  LINE   1584 "regression-compile-tmp/comp412.imp"
11604 @ 97550:                  LOCATE L_0007

  1585           L=L-4
11605 @ 97553:                  LINE   1585 "regression-compile-tmp/comp412.imp"
11606 @ 97591:                  PUSH   L
11607 @ 97594:                  PUSH   L
11608 @ 97597:                  PUSHI  #0x00000004
11609 @ 97602:                  SUB   
11610 @ 97603:                  ASSVAL

  1586        %REPEAT
11611 @ 97604:                  LINE   1586 "regression-compile-tmp/comp412.imp"
11612 @ 97642:                  REPEAT L_0003
11613 @ 97645:                  LOCATE L_0004

  1587        FAULT(10);  ->CONT
11614 @ 97648:                  LINE   1587 "regression-compile-tmp/comp412.imp"
11615 @ 97686:                  PUSH   FAULT
11616 @ 97689:                  PUSHI  #0x0000000a
11617 @ 97694:                  ASSPAR
11618 @ 97695:                  CALL  
11619 @ 97696:                  LINE   1587 "regression-compile-tmp/comp412.imp"
11620 @ 97734:                  JUMP   L_010e

  1588  C(31): ULAB=LABEL+3;  OP(117,ULAB);         ! UNTIL
11621 @ 97737:                  LINE   1588 "regression-compile-tmp/comp412.imp"
11622 @ 97775:                  PUSHI  #0x0000001f
11623 @ 97780:                  SLABEL 230
11624 @ 97783:                  LINE   1588 "regression-compile-tmp/comp412.imp"
11625 @ 97821:                  PUSH   ULAB
11626 @ 97824:                  PUSH   LABEL
11627 @ 97827:                  PUSHI  #0x00000003
11628 @ 97832:                  ADD   
11629 @ 97833:                  ASSVAL
11630 @ 97834:                  LINE   1588 "regression-compile-tmp/comp412.imp"
11631 @ 97872:                  PUSH   OP
11632 @ 97875:                  PUSHI  #0x00000075
11633 @ 97880:                  ASSPAR
11634 @ 97881:                  PUSH   ULAB
11635 @ 97884:                  ASSPAR
11636 @ 97885:                  CALL  

  1589  C(30): LOOP LAB=LABEL+2;  DEF LAB(LOOP LAB);! WHILE
11637 @ 97886:                  LINE   1589 "regression-compile-tmp/comp412.imp"
11638 @ 97924:                  PUSHI  #0x0000001e
11639 @ 97929:                  SLABEL 230
11640 @ 97932:                  LINE   1589 "regression-compile-tmp/comp412.imp"
11641 @ 97970:                  PUSH   LOOPLAB
11642 @ 97973:                  PUSH   LABEL
11643 @ 97976:                  PUSHI  #0x00000002
11644 @ 97981:                  ADD   
11645 @ 97982:                  ASSVAL
11646 @ 97983:                  LINE   1589 "regression-compile-tmp/comp412.imp"
11647 @ 98021:                  PUSH   DEFLAB
11648 @ 98024:                  PUSH   LOOPLAB
11649 @ 98027:                  ASSPAR
11650 @ 98028:                  CALL  

  1590  C(28):                                      ! IF
11651 @ 98029:                  LINE   1590 "regression-compile-tmp/comp412.imp"
11652 @ 98067:                  PUSHI  #0x0000001c
11653 @ 98072:                  SLABEL 230

  1591  C(29):                                      ! UNLESS
11654 @ 98075:                  LINE   1591 "regression-compile-tmp/comp412.imp"
11655 @ 98113:                  PUSHI  #0x0000001d
11656 @ 98118:                  SLABEL 230

  1592        EILAB = PLAB %IF ELSE # 0
11657 @ 98121:                  LINE   1592 "regression-compile-tmp/comp412.imp"
11658 @ 98159:                  PUSH   ELSE
11659 @ 98162:                  PUSHI  #0x00000000
11660 @ 98167:                  JUMPIF = L_0004
11661 @ 98171:                  PUSH   EILAB
11662 @ 98174:                  PUSH   PLAB
11663 @ 98177:                  ASSVAL
11664 @ 98178:                  LOCATE L_0004

  1593        INHIBIT = INHIBIT!1
11665 @ 98181:                  LINE   1593 "regression-compile-tmp/comp412.imp"
11666 @ 98219:                  PUSH   INHIBIT
11667 @ 98222:                  PUSH   INHIBIT
11668 @ 98225:                  PUSHI  #0x00000001
11669 @ 98230:                  OR    
11670 @ 98231:                  ASSVAL

  1594        CONDS=1; DOUBLE=0
11671 @ 98232:                  LINE   1594 "regression-compile-tmp/comp412.imp"
11672 @ 98270:                  PUSH   CONDS
11673 @ 98273:                  PUSHI  #0x00000001
11674 @ 98278:                  ASSVAL
11675 @ 98279:                  LINE   1594 "regression-compile-tmp/comp412.imp"
11676 @ 98317:                  PUSH   DOUBLE
11677 @ 98320:                  PUSHI  #0x00000000
11678 @ 98325:                  ASSVAL

  1595        STARTT=(X-26)>>1+8
11679 @ 98326:                  LINE   1595 "regression-compile-tmp/comp412.imp"
11680 @ 98364:                  PUSH   STARTT
11681 @ 98367:                  PUSH   X
11682 @ 98370:                  PUSHI  #0x0000001a
11683 @ 98375:                  SUB   
11684 @ 98376:                  PUSHI  #0x00000001
11685 @ 98381:                  RSH   
11686 @ 98382:                  PUSHI  #0x00000008
11687 @ 98387:                  ADD   
11688 @ 98388:                  ASSVAL

  1596        GLOBAL NOT=0; C LAST=1
11689 @ 98389:                  LINE   1596 "regression-compile-tmp/comp412.imp"
11690 @ 98427:                  PUSH   GLOBALNOT
11691 @ 98430:                  PUSHI  #0x00000000
11692 @ 98435:                  ASSVAL
11693 @ 98436:                  LINE   1596 "regression-compile-tmp/comp412.imp"
11694 @ 98474:                  PUSH   CLAST
11695 @ 98477:                  PUSHI  #0x00000001
11696 @ 98482:                  ASSVAL

  1597        CMOD=0; CLEVEL=1; OPS=1
11697 @ 98483:                  LINE   1597 "regression-compile-tmp/comp412.imp"
11698 @ 98521:                  PUSH   CMOD
11699 @ 98524:                  PUSHI  #0x00000000
11700 @ 98529:                  ASSVAL
11701 @ 98530:                  LINE   1597 "regression-compile-tmp/comp412.imp"
11702 @ 98568:                  PUSH   CLEVEL
11703 @ 98571:                  PUSHI  #0x00000001
11704 @ 98576:                  ASSVAL
11705 @ 98577:                  LINE   1597 "regression-compile-tmp/comp412.imp"
11706 @ 98615:                  PUSH   OPS
11707 @ 98618:                  PUSHI  #0x00000001
11708 @ 98623:                  ASSVAL

  1598        LOCAL NOT=X&1; P LAB=LABEL
11709 @ 98624:                  LINE   1598 "regression-compile-tmp/comp412.imp"
11710 @ 98662:                  PUSH   LOCALNOT
11711 @ 98665:                  PUSH   X
11712 @ 98668:                  PUSHI  #0x00000001
11713 @ 98673:                  AND   
11714 @ 98674:                  ASSVAL
11715 @ 98675:                  LINE   1598 "regression-compile-tmp/comp412.imp"
11716 @ 98713:                  PUSH   PLAB
11717 @ 98716:                  PUSH   LABEL
11718 @ 98719:                  ASSVAL

  1599        CNEST(0)=P LAB; CNEST(1)=P LAB
11719 @ 98720:                  LINE   1599 "regression-compile-tmp/comp412.imp"
11720 @ 98758:                  PUSH   CNEST
11721 @ 98761:                  PUSHI  #0x00000000
11722 @ 98766:                  ACCESS
11723 @ 98767:                  PUSH   PLAB
11724 @ 98770:                  ASSVAL
11725 @ 98771:                  LINE   1599 "regression-compile-tmp/comp412.imp"
11726 @ 98809:                  PUSH   CNEST
11727 @ 98812:                  PUSHI  #0x00000001
11728 @ 98817:                  ACCESS
11729 @ 98818:                  PUSH   PLAB
11730 @ 98821:                  ASSVAL

  1600        -> CONT
11731 @ 98822:                  LINE   1600 "regression-compile-tmp/comp412.imp"
11732 @ 98860:                  JUMP   L_010e

  1601  C(32): LOCAL NOT=LOCAL NOT!!1;  -> CONT;    ! %NOT
11733 @ 98863:                  LINE   1601 "regression-compile-tmp/comp412.imp"
11734 @ 98901:                  PUSHI  #0x00000020
11735 @ 98906:                  SLABEL 230
11736 @ 98909:                  LINE   1601 "regression-compile-tmp/comp412.imp"
11737 @ 98947:                  PUSH   LOCALNOT
11738 @ 98950:                  PUSH   LOCALNOT
11739 @ 98953:                  PUSHI  #0x00000001
11740 @ 98958:                  XOR   
11741 @ 98959:                  ASSVAL
11742 @ 98960:                  LINE   1601 "regression-compile-tmp/comp412.imp"
11743 @ 98998:                  JUMP   L_010e

  1602  C(79):
11744 @ 99001:                  LINE   1602 "regression-compile-tmp/comp412.imp"
11745 @ 99039:                  PUSHI  #0x0000004f
11746 @ 99044:                  SLABEL 230

  1603        CALL;                                ! P
11747 @ 99047:                  LINE   1603 "regression-compile-tmp/comp412.imp"
11748 @ 99085:                  PUSH   CALL
11749 @ 99088:                  CALL  

  1604        PRED OP = 4
11750 @ 99089:                  LINE   1604 "regression-compile-tmp/comp412.imp"
11751 @ 99127:                  PUSH   PREDOP
11752 @ 99130:                  PUSHI  #0x00000004
11753 @ 99135:                  ASSVAL

  1605        ->PAC %IF CALL PENDING = 0
11754 @ 99136:                  LINE   1605 "regression-compile-tmp/comp412.imp"
11755 @ 99174:                  PUSH   CALLPENDING
11756 @ 99177:                  PUSHI  #0x00000000
11757 @ 99182:                  JUMPIF # L_0004
11758 @ 99186:                  JUMP   L_0112
11759 @ 99189:                  LOCATE L_0004

  1606        PRED PENDING = PRED PENDING!2
11760 @ 99192:                  LINE   1606 "regression-compile-tmp/comp412.imp"
11761 @ 99230:                  PUSH   PREDPENDING
11762 @ 99233:                  PUSH   PREDPENDING
11763 @ 99236:                  PUSHI  #0x00000002
11764 @ 99241:                  OR    
11765 @ 99242:                  ASSVAL

  1607        ->CONT
11766 @ 99243:                  LINE   1607 "regression-compile-tmp/comp412.imp"
11767 @ 99281:                  JUMP   L_010e

  1608  C(108): PUT('C');                           ! ACOMP
11768 @ 99284:                  LINE   1608 "regression-compile-tmp/comp412.imp"
11769 @ 99322:                  PUSHI  #0x0000006c
11770 @ 99327:                  SLABEL 230
11771 @ 99330:                  LINE   1608 "regression-compile-tmp/comp412.imp"
11772 @ 99368:                  PUSH   PUT
11773 @ 99371:                  PUSHI  #0x00000043
11774 @ 99376:                  ASSPAR
11775 @ 99377:                  CALL  

  1609  PAC:   X=35;                                ! '='
11776 @ 99378:                  LINE   1609 "regression-compile-tmp/comp412.imp"
11777 @ 99416:                  LABEL  L_0112
11778 @ 99419:                  LINE   1609 "regression-compile-tmp/comp412.imp"
11779 @ 99457:                  PUSH   X
11780 @ 99460:                  PUSHI  #0x00000023
11781 @ 99465:                  ASSVAL

  1610        CONDS = CONDS-1
11782 @ 99466:                  LINE   1610 "regression-compile-tmp/comp412.imp"
11783 @ 99504:                  PUSH   CONDS
11784 @ 99507:                  PUSH   CONDS
11785 @ 99510:                  PUSHI  #0x00000001
11786 @ 99515:                  SUB   
11787 @ 99516:                  ASSVAL

  1611        -> COP
11788 @ 99517:                  LINE   1611 "regression-compile-tmp/comp412.imp"
11789 @ 99555:                  JUMP   L_0113

  1612  C(33):                                      ! <
11790 @ 99558:                  LINE   1612 "regression-compile-tmp/comp412.imp"
11791 @ 99596:                  PUSHI  #0x00000021
11792 @ 99601:                  SLABEL 230

  1613  C(34):                                      ! >
11793 @ 99604:                  LINE   1613 "regression-compile-tmp/comp412.imp"
11794 @ 99642:                  PUSHI  #0x00000022
11795 @ 99647:                  SLABEL 230

  1614  C(35):                                      ! =
11796 @ 99650:                  LINE   1614 "regression-compile-tmp/comp412.imp"
11797 @ 99688:                  PUSHI  #0x00000023
11798 @ 99693:                  SLABEL 230

  1615  C(36):                                      ! #
11799 @ 99696:                  LINE   1615 "regression-compile-tmp/comp412.imp"
11800 @ 99734:                  PUSHI  #0x00000024
11801 @ 99739:                  SLABEL 230

  1616  C(37):                                      ! <=
11802 @ 99742:                  LINE   1616 "regression-compile-tmp/comp412.imp"
11803 @ 99780:                  PUSHI  #0x00000025
11804 @ 99785:                  SLABEL 230

  1617  C(38):                                      ! >=
11805 @ 99788:                  LINE   1617 "regression-compile-tmp/comp412.imp"
11806 @ 99826:                  PUSHI  #0x00000026
11807 @ 99831:                  SLABEL 230

  1618        CONDS=CONDS-1
11808 @ 99834:                  LINE   1618 "regression-compile-tmp/comp412.imp"
11809 @ 99872:                  PUSH   CONDS
11810 @ 99875:                  PUSH   CONDS
11811 @ 99878:                  PUSHI  #0x00000001
11812 @ 99883:                  SUB   
11813 @ 99884:                  ASSVAL

  1619        %IF NEXT#0    %START;                ! DOUBLE SIDED
11814 @ 99885:                  LINE   1619 "regression-compile-tmp/comp412.imp"
11815 @ 99923:                  PUSH   NEXT
11816 @ 99926:                  PUSHI  #0x00000000
11817 @ 99931:                  JUMPIF = L_0004

  1620           PUT(126);                         ! SHOW DOUBLE SIDED
11818 @ 99935:                  LINE   1620 "regression-compile-tmp/comp412.imp"
11819 @ 99973:                  PUSH   PUT
11820 @ 99976:                  PUSHI  #0x0000007e
11821 @ 99981:                  ASSPAR
11822 @ 99982:                  CALL  

  1621           DOUBLE=1;  BIT=1;                 ! PSEUDO %AND
11823 @ 99983:                  LINE   1621 "regression-compile-tmp/comp412.imp"
11824 @ 100021:                  PUSH   DOUBLE
11825 @ 100024:                  PUSHI  #0x00000001
11826 @ 100029:                  ASSVAL
11827 @ 100030:                  LINE   1621 "regression-compile-tmp/comp412.imp"
11828 @ 100068:                  PUSH   BIT
11829 @ 100071:                  PUSHI  #0x00000001
11830 @ 100076:                  ASSVAL

  1622           -> ANDOP
11831 @ 100077:                  LINE   1622 "regression-compile-tmp/comp412.imp"
11832 @ 100115:                  JUMP   L_0114

  1623        %FINISH
11833 @ 100118:                  LINE   1623 "regression-compile-tmp/comp412.imp"
11834 @ 100156:                  LOCATE L_0004

  1624        %IF DOUBLE # 0 %START
11835 @ 100159:                  LINE   1624 "regression-compile-tmp/comp412.imp"
11836 @ 100197:                  PUSH   DOUBLE
11837 @ 100200:                  PUSHI  #0x00000000
11838 @ 100205:                  JUMPIF = L_0004

  1625           DOUBLE = 0;  X = RCOMP(X)
11839 @ 100209:                  LINE   1625 "regression-compile-tmp/comp412.imp"
11840 @ 100247:                  PUSH   DOUBLE
11841 @ 100250:                  PUSHI  #0x00000000
11842 @ 100255:                  ASSVAL
11843 @ 100256:                  LINE   1625 "regression-compile-tmp/comp412.imp"
11844 @ 100294:                  PUSH   X
11845 @ 100297:                  PUSH   RCOMP
11846 @ 100300:                  PUSH   X
11847 @ 100303:                  ACCESS
11848 @ 100304:                  ASSVAL

  1626        %FINISH
11849 @ 100305:                  LINE   1626 "regression-compile-tmp/comp412.imp"
11850 @ 100343:                  LOCATE L_0004

  1627        PUT('?')
11851 @ 100346:                  LINE   1627 "regression-compile-tmp/comp412.imp"
11852 @ 100384:                  PUSH   PUT
11853 @ 100387:                  PUSHI  #0x0000003f
11854 @ 100392:                  ASSPAR
11855 @ 100393:                  CALL  

  1628  COP:  LOCAL NOT=(LOCAL NOT!!GLOBAL NOT)&1
11856 @ 100394:                  LINE   1628 "regression-compile-tmp/comp412.imp"
11857 @ 100432:                  LABEL  L_0113
11858 @ 100435:                  LINE   1628 "regression-compile-tmp/comp412.imp"
11859 @ 100473:                  PUSH   LOCALNOT
11860 @ 100476:                  PUSH   LOCALNOT
11861 @ 100479:                  PUSH   GLOBALNOT
11862 @ 100482:                  XOR   
11863 @ 100483:                  PUSHI  #0x00000001
11864 @ 100488:                  AND   
11865 @ 100489:                  ASSVAL

  1629        X=X!!7 %IF LOCAL NOT#0
11866 @ 100490:                  LINE   1629 "regression-compile-tmp/comp412.imp"
11867 @ 100528:                  PUSH   LOCALNOT
11868 @ 100531:                  PUSHI  #0x00000000
11869 @ 100536:                  JUMPIF = L_0004
11870 @ 100540:                  PUSH   X
11871 @ 100543:                  PUSH   X
11872 @ 100546:                  PUSHI  #0x00000007
11873 @ 100551:                  XOR   
11874 @ 100552:                  ASSVAL
11875 @ 100553:                  LOCATE L_0004

  1630        %IF CLAST#0 %START
11876 @ 100556:                  LINE   1630 "regression-compile-tmp/comp412.imp"
11877 @ 100594:                  PUSH   CLAST
11878 @ 100597:                  PUSHI  #0x00000000
11879 @ 100602:                  JUMPIF = L_0004

  1631           X=X!!7 %IF OPS&1#0
11880 @ 100606:                  LINE   1631 "regression-compile-tmp/comp412.imp"
11881 @ 100644:                  PUSH   OPS
11882 @ 100647:                  PUSHI  #0x00000001
11883 @ 100652:                  AND   
11884 @ 100653:                  PUSHI  #0x00000000
11885 @ 100658:                  JUMPIF = L_0007
11886 @ 100662:                  PUSH   X
11887 @ 100665:                  PUSH   X
11888 @ 100668:                  PUSHI  #0x00000007
11889 @ 100673:                  XOR   
11890 @ 100674:                  ASSVAL
11891 @ 100675:                  LOCATE L_0007

  1632           OP(COMP(X+PRED OP),CNEST(CLEVEL))
11892 @ 100678:                  LINE   1632 "regression-compile-tmp/comp412.imp"
11893 @ 100716:                  PUSH   OP
11894 @ 100719:                  PUSH   COMP
11895 @ 100722:                  PUSH   X
11896 @ 100725:                  PUSH   PREDOP
11897 @ 100728:                  ADD   
11898 @ 100729:                  ACCESS
11899 @ 100730:                  ASSPAR
11900 @ 100731:                  PUSH   CNEST
11901 @ 100734:                  PUSH   CLEVEL
11902 @ 100737:                  ACCESS
11903 @ 100738:                  ASSPAR
11904 @ 100739:                  CALL  

  1633        %ELSE
11905 @ 100740:                  LINE   1633 "regression-compile-tmp/comp412.imp"
11906 @ 100778:                  GOTO   L_0003
11907 @ 100781:                  LOCATE L_0004

  1634           %WHILE CMOD&1#0 %CYCLE
11908 @ 100784:                  LINE   1634 "regression-compile-tmp/comp412.imp"
11909 @ 100822:                  LOCATE L_0006
11910 @ 100825:                  PUSH   CMOD
11911 @ 100828:                  PUSHI  #0x00000001
11912 @ 100833:                  AND   
11913 @ 100834:                  PUSHI  #0x00000000
11914 @ 100839:                  JUMPIF = L_0007

  1635              CMOD=CMOD>>1; OPS=OPS>>1
11915 @ 100843:                  LINE   1635 "regression-compile-tmp/comp412.imp"
11916 @ 100881:                  PUSH   CMOD
11917 @ 100884:                  PUSH   CMOD
11918 @ 100887:                  PUSHI  #0x00000001
11919 @ 100892:                  RSH   
11920 @ 100893:                  ASSVAL
11921 @ 100894:                  LINE   1635 "regression-compile-tmp/comp412.imp"
11922 @ 100932:                  PUSH   OPS
11923 @ 100935:                  PUSH   OPS
11924 @ 100938:                  PUSHI  #0x00000001
11925 @ 100943:                  RSH   
11926 @ 100944:                  ASSVAL

  1636              CLEVEL=CLEVEL-1
11927 @ 100945:                  LINE   1636 "regression-compile-tmp/comp412.imp"
11928 @ 100983:                  PUSH   CLEVEL
11929 @ 100986:                  PUSH   CLEVEL
11930 @ 100989:                  PUSHI  #0x00000001
11931 @ 100994:                  SUB   
11932 @ 100995:                  ASSVAL

  1637              GLOBAL NOT=GLOBAL NOT>>1
11933 @ 100996:                  LINE   1637 "regression-compile-tmp/comp412.imp"
11934 @ 101034:                  PUSH   GLOBALNOT
11935 @ 101037:                  PUSH   GLOBALNOT
11936 @ 101040:                  PUSHI  #0x00000001
11937 @ 101045:                  RSH   
11938 @ 101046:                  ASSVAL

  1638           %REPEAT
11939 @ 101047:                  LINE   1638 "regression-compile-tmp/comp412.imp"
11940 @ 101085:                  REPEAT L_0006
11941 @ 101088:                  LOCATE L_0007

  1639           CMOD=CMOD>>1; OPS=OPS>>1; CLEVEL=CLEVEL-1
11942 @ 101091:                  LINE   1639 "regression-compile-tmp/comp412.imp"
11943 @ 101129:                  PUSH   CMOD
11944 @ 101132:                  PUSH   CMOD
11945 @ 101135:                  PUSHI  #0x00000001
11946 @ 101140:                  RSH   
11947 @ 101141:                  ASSVAL
11948 @ 101142:                  LINE   1639 "regression-compile-tmp/comp412.imp"
11949 @ 101180:                  PUSH   OPS
11950 @ 101183:                  PUSH   OPS
11951 @ 101186:                  PUSHI  #0x00000001
11952 @ 101191:                  RSH   
11953 @ 101192:                  ASSVAL
11954 @ 101193:                  LINE   1639 "regression-compile-tmp/comp412.imp"
11955 @ 101231:                  PUSH   CLEVEL
11956 @ 101234:                  PUSH   CLEVEL
11957 @ 101237:                  PUSHI  #0x00000001
11958 @ 101242:                  SUB   
11959 @ 101243:                  ASSVAL

  1640           GLOBAL NOT=GLOBAL NOT>>1
11960 @ 101244:                  LINE   1640 "regression-compile-tmp/comp412.imp"
11961 @ 101282:                  PUSH   GLOBALNOT
11962 @ 101285:                  PUSH   GLOBALNOT
11963 @ 101288:                  PUSHI  #0x00000001
11964 @ 101293:                  RSH   
11965 @ 101294:                  ASSVAL

  1641           X=X!!7 %IF OPS&1#0
11966 @ 101295:                  LINE   1641 "regression-compile-tmp/comp412.imp"
11967 @ 101333:                  PUSH   OPS
11968 @ 101336:                  PUSHI  #0x00000001
11969 @ 101341:                  AND   
11970 @ 101342:                  PUSHI  #0x00000000
11971 @ 101347:                  JUMPIF = L_0007
11972 @ 101351:                  PUSH   X
11973 @ 101354:                  PUSH   X
11974 @ 101357:                  PUSHI  #0x00000007
11975 @ 101362:                  XOR   
11976 @ 101363:                  ASSVAL
11977 @ 101364:                  LOCATE L_0007

  1642           OP(COMP(X+PRED OP),CNEST(CLEVEL))
11978 @ 101367:                  LINE   1642 "regression-compile-tmp/comp412.imp"
11979 @ 101405:                  PUSH   OP
11980 @ 101408:                  PUSH   COMP
11981 @ 101411:                  PUSH   X
11982 @ 101414:                  PUSH   PREDOP
11983 @ 101417:                  ADD   
11984 @ 101418:                  ACCESS
11985 @ 101419:                  ASSPAR
11986 @ 101420:                  PUSH   CNEST
11987 @ 101423:                  PUSH   CLEVEL
11988 @ 101426:                  ACCESS
11989 @ 101427:                  ASSPAR
11990 @ 101428:                  CALL  

  1643           DEF LAB(LABEL) %UNLESS LABEL=CNEST(CLEVEL)
11991 @ 101429:                  LINE   1643 "regression-compile-tmp/comp412.imp"
11992 @ 101467:                  PUSH   LABEL
11993 @ 101470:                  PUSH   CNEST
11994 @ 101473:                  PUSH   CLEVEL
11995 @ 101476:                  ACCESS
11996 @ 101477:                  JUMPIF = L_0007
11997 @ 101481:                  PUSH   DEFLAB
11998 @ 101484:                  PUSH   LABEL
11999 @ 101487:                  ASSPAR
12000 @ 101488:                  CALL  
12001 @ 101489:                  LOCATE L_0007

  1644           LABEL=CNEST(CLEVEL)
12002 @ 101492:                  LINE   1644 "regression-compile-tmp/comp412.imp"
12003 @ 101530:                  PUSH   LABEL
12004 @ 101533:                  PUSH   CNEST
12005 @ 101536:                  PUSH   CLEVEL
12006 @ 101539:                  ACCESS
12007 @ 101540:                  ASSVAL

  1645        %FINISH
12008 @ 101541:                  LINE   1645 "regression-compile-tmp/comp412.imp"
12009 @ 101579:                  LOCATE L_0003

  1646        CLAST=0; LOCAL NOT=0;  PRED OP = 0
12010 @ 101582:                  LINE   1646 "regression-compile-tmp/comp412.imp"
12011 @ 101620:                  PUSH   CLAST
12012 @ 101623:                  PUSHI  #0x00000000
12013 @ 101628:                  ASSVAL
12014 @ 101629:                  LINE   1646 "regression-compile-tmp/comp412.imp"
12015 @ 101667:                  PUSH   LOCALNOT
12016 @ 101670:                  PUSHI  #0x00000000
12017 @ 101675:                  ASSVAL
12018 @ 101676:                  LINE   1646 "regression-compile-tmp/comp412.imp"
12019 @ 101714:                  PUSH   PREDOP
12020 @ 101717:                  PUSHI  #0x00000000
12021 @ 101722:                  ASSVAL

  1647        DEF LAB(ULAB) %IF CONDS <= 0 %AND ULAB#0
12022 @ 101723:                  LINE   1647 "regression-compile-tmp/comp412.imp"
12023 @ 101761:                  PUSH   CONDS
12024 @ 101764:                  PUSHI  #0x00000000
12025 @ 101769:                  JUMPIF > L_0004
12026 @ 101773:                  PUSH   ULAB
12027 @ 101776:                  PUSHI  #0x00000000
12028 @ 101781:                  JUMPIF = L_0004
12029 @ 101785:                  PUSH   DEFLAB
12030 @ 101788:                  PUSH   ULAB
12031 @ 101791:                  ASSPAR
12032 @ 101792:                  CALL  
12033 @ 101793:                  LOCATE L_0004

  1648        PUT('"') %IF DOUBLE # 0
12034 @ 101796:                  LINE   1648 "regression-compile-tmp/comp412.imp"
12035 @ 101834:                  PUSH   DOUBLE
12036 @ 101837:                  PUSHI  #0x00000000
12037 @ 101842:                  JUMPIF = L_0004
12038 @ 101846:                  PUSH   PUT
12039 @ 101849:                  PUSHI  #0x00000022
12040 @ 101854:                  ASSPAR
12041 @ 101855:                  CALL  
12042 @ 101856:                  LOCATE L_0004

  1649        -> CONT
12043 @ 101859:                  LINE   1649 "regression-compile-tmp/comp412.imp"
12044 @ 101897:                  JUMP   L_010e

  1650  C(39):                                      ! AND
12045 @ 101900:                  LINE   1650 "regression-compile-tmp/comp412.imp"
12046 @ 101938:                  PUSHI  #0x00000027
12047 @ 101943:                  SLABEL 230

  1651  C(40):                                      ! OR
12048 @ 101946:                  LINE   1651 "regression-compile-tmp/comp412.imp"
12049 @ 101984:                  PUSHI  #0x00000028
12050 @ 101989:                  SLABEL 230

  1652        BIT=X&1;                             ! 1=AND, 0=OR
12051 @ 101992:                  LINE   1652 "regression-compile-tmp/comp412.imp"
12052 @ 102030:                  PUSH   BIT
12053 @ 102033:                  PUSH   X
12054 @ 102036:                  PUSHI  #0x00000001
12055 @ 102041:                  AND   
12056 @ 102042:                  ASSVAL

  1653  ANDOP: CONDS=CONDS+1
12057 @ 102043:                  LINE   1653 "regression-compile-tmp/comp412.imp"
12058 @ 102081:                  LABEL  L_0114
12059 @ 102084:                  LINE   1653 "regression-compile-tmp/comp412.imp"
12060 @ 102122:                  PUSH   CONDS
12061 @ 102125:                  PUSH   CONDS
12062 @ 102128:                  PUSHI  #0x00000001
12063 @ 102133:                  ADD   
12064 @ 102134:                  ASSVAL

  1654        LOCAL NOT=(LOCAL NOT!!GLOBAL NOT)&1
12065 @ 102135:                  LINE   1654 "regression-compile-tmp/comp412.imp"
12066 @ 102173:                  PUSH   LOCALNOT
12067 @ 102176:                  PUSH   LOCALNOT
12068 @ 102179:                  PUSH   GLOBALNOT
12069 @ 102182:                  XOR   
12070 @ 102183:                  PUSHI  #0x00000001
12071 @ 102188:                  AND   
12072 @ 102189:                  ASSVAL

  1655        BIT=BIT!!LOCAL NOT
12073 @ 102190:                  LINE   1655 "regression-compile-tmp/comp412.imp"
12074 @ 102228:                  PUSH   BIT
12075 @ 102231:                  PUSH   BIT
12076 @ 102234:                  PUSH   LOCALNOT
12077 @ 102237:                  XOR   
12078 @ 102238:                  ASSVAL

  1656        %IF BIT=OPS&1 %START
12079 @ 102239:                  LINE   1656 "regression-compile-tmp/comp412.imp"
12080 @ 102277:                  PUSH   BIT
12081 @ 102280:                  PUSH   OPS
12082 @ 102283:                  PUSHI  #0x00000001
12083 @ 102288:                  AND   
12084 @ 102289:                  JUMPIF # L_0004

  1657           %IF CLAST#0 %START
12085 @ 102293:                  LINE   1657 "regression-compile-tmp/comp412.imp"
12086 @ 102331:                  PUSH   CLAST
12087 @ 102334:                  PUSHI  #0x00000000
12088 @ 102339:                  JUMPIF = L_0007

  1658              CMOD=CMOD<<1
12089 @ 102343:                  LINE   1658 "regression-compile-tmp/comp412.imp"
12090 @ 102381:                  PUSH   CMOD
12091 @ 102384:                  PUSH   CMOD
12092 @ 102387:                  PUSHI  #0x00000001
12093 @ 102392:                  LSH   
12094 @ 102393:                  ASSVAL

  1659              CNEST(CLEVEL+1)=CNEST(CLEVEL)
12095 @ 102394:                  LINE   1659 "regression-compile-tmp/comp412.imp"
12096 @ 102432:                  PUSH   CNEST
12097 @ 102435:                  PUSH   CLEVEL
12098 @ 102438:                  PUSHI  #0x00000001
12099 @ 102443:                  ADD   
12100 @ 102444:                  ACCESS
12101 @ 102445:                  PUSH   CNEST
12102 @ 102448:                  PUSH   CLEVEL
12103 @ 102451:                  ACCESS
12104 @ 102452:                  ASSVAL

  1660              CLEVEL=CLEVEL+1
12105 @ 102453:                  LINE   1660 "regression-compile-tmp/comp412.imp"
12106 @ 102491:                  PUSH   CLEVEL
12107 @ 102494:                  PUSH   CLEVEL
12108 @ 102497:                  PUSHI  #0x00000001
12109 @ 102502:                  ADD   
12110 @ 102503:                  ASSVAL

  1661              OPS=OPS<<1!BIT
12111 @ 102504:                  LINE   1661 "regression-compile-tmp/comp412.imp"
12112 @ 102542:                  PUSH   OPS
12113 @ 102545:                  PUSH   OPS
12114 @ 102548:                  PUSHI  #0x00000001
12115 @ 102553:                  LSH   
12116 @ 102554:                  PUSH   BIT
12117 @ 102557:                  OR    
12118 @ 102558:                  ASSVAL

  1662              GLOBAL NOT=GLOBAL NOT<<1!LOCAL NOT
12119 @ 102559:                  LINE   1662 "regression-compile-tmp/comp412.imp"
12120 @ 102597:                  PUSH   GLOBALNOT
12121 @ 102600:                  PUSH   GLOBALNOT
12122 @ 102603:                  PUSHI  #0x00000001
12123 @ 102608:                  LSH   
12124 @ 102609:                  PUSH   LOCALNOT
12125 @ 102612:                  OR    
12126 @ 102613:                  ASSVAL

  1663           %FINISH
12127 @ 102614:                  LINE   1663 "regression-compile-tmp/comp412.imp"
12128 @ 102652:                  LOCATE L_0007

  1664        %ELSE
12129 @ 102655:                  LINE   1664 "regression-compile-tmp/comp412.imp"
12130 @ 102693:                  GOTO   L_0003
12131 @ 102696:                  LOCATE L_0004

  1665           CMOD=CMOD<<1
12132 @ 102699:                  LINE   1665 "regression-compile-tmp/comp412.imp"
12133 @ 102737:                  PUSH   CMOD
12134 @ 102740:                  PUSH   CMOD
12135 @ 102743:                  PUSHI  #0x00000001
12136 @ 102748:                  LSH   
12137 @ 102749:                  ASSVAL

  1666           %IF CLAST#0 %START
12138 @ 102750:                  LINE   1666 "regression-compile-tmp/comp412.imp"
12139 @ 102788:                  PUSH   CLAST
12140 @ 102791:                  PUSHI  #0x00000000
12141 @ 102796:                  JUMPIF = L_0007

  1667              LABEL=LABEL+4
12142 @ 102800:                  LINE   1667 "regression-compile-tmp/comp412.imp"
12143 @ 102838:                  PUSH   LABEL
12144 @ 102841:                  PUSH   LABEL
12145 @ 102844:                  PUSHI  #0x00000004
12146 @ 102849:                  ADD   
12147 @ 102850:                  ASSVAL

  1668              CLEVEL=CLEVEL+1; CNEST(CLEVEL)=LABEL
12148 @ 102851:                  LINE   1668 "regression-compile-tmp/comp412.imp"
12149 @ 102889:                  PUSH   CLEVEL
12150 @ 102892:                  PUSH   CLEVEL
12151 @ 102895:                  PUSHI  #0x00000001
12152 @ 102900:                  ADD   
12153 @ 102901:                  ASSVAL
12154 @ 102902:                  LINE   1668 "regression-compile-tmp/comp412.imp"
12155 @ 102940:                  PUSH   CNEST
12156 @ 102943:                  PUSH   CLEVEL
12157 @ 102946:                  ACCESS
12158 @ 102947:                  PUSH   LABEL
12159 @ 102950:                  ASSVAL

  1669           %ELSE
12160 @ 102951:                  LINE   1669 "regression-compile-tmp/comp412.imp"
12161 @ 102989:                  GOTO   L_0006
12162 @ 102992:                  LOCATE L_0007

  1670              CMOD=CMOD!1
12163 @ 102995:                  LINE   1670 "regression-compile-tmp/comp412.imp"
12164 @ 103033:                  PUSH   CMOD
12165 @ 103036:                  PUSH   CMOD
12166 @ 103039:                  PUSHI  #0x00000001
12167 @ 103044:                  OR    
12168 @ 103045:                  ASSVAL

  1671              %IF OPS>>1&1 = BIT %START
12169 @ 103046:                  LINE   1671 "regression-compile-tmp/comp412.imp"
12170 @ 103084:                  PUSH   OPS
12171 @ 103087:                  PUSHI  #0x00000001
12172 @ 103092:                  RSH   
12173 @ 103093:                  PUSHI  #0x00000001
12174 @ 103098:                  AND   
12175 @ 103099:                  PUSH   BIT
12176 @ 103102:                  JUMPIF # L_000a

  1672                 L = CNEST(CLEVEL-1)
12177 @ 103106:                  LINE   1672 "regression-compile-tmp/comp412.imp"
12178 @ 103144:                  PUSH   L
12179 @ 103147:                  PUSH   CNEST
12180 @ 103150:                  PUSH   CLEVEL
12181 @ 103153:                  PUSHI  #0x00000001
12182 @ 103158:                  SUB   
12183 @ 103159:                  ACCESS
12184 @ 103160:                  ASSVAL

  1673              %ELSE
12185 @ 103161:                  LINE   1673 "regression-compile-tmp/comp412.imp"
12186 @ 103199:                  GOTO   L_0009
12187 @ 103202:                  LOCATE L_000a

  1674                 LABEL=LABEL+4; L=LABEL
12188 @ 103205:                  LINE   1674 "regression-compile-tmp/comp412.imp"
12189 @ 103243:                  PUSH   LABEL
12190 @ 103246:                  PUSH   LABEL
12191 @ 103249:                  PUSHI  #0x00000004
12192 @ 103254:                  ADD   
12193 @ 103255:                  ASSVAL
12194 @ 103256:                  LINE   1674 "regression-compile-tmp/comp412.imp"
12195 @ 103294:                  PUSH   L
12196 @ 103297:                  PUSH   LABEL
12197 @ 103300:                  ASSVAL

  1675              %FINISH
12198 @ 103301:                  LINE   1675 "regression-compile-tmp/comp412.imp"
12199 @ 103339:                  LOCATE L_0009

  1676              CLEVEL=CLEVEL+1; CNEST(CLEVEL)=L
12200 @ 103342:                  LINE   1676 "regression-compile-tmp/comp412.imp"
12201 @ 103380:                  PUSH   CLEVEL
12202 @ 103383:                  PUSH   CLEVEL
12203 @ 103386:                  PUSHI  #0x00000001
12204 @ 103391:                  ADD   
12205 @ 103392:                  ASSVAL
12206 @ 103393:                  LINE   1676 "regression-compile-tmp/comp412.imp"
12207 @ 103431:                  PUSH   CNEST
12208 @ 103434:                  PUSH   CLEVEL
12209 @ 103437:                  ACCESS
12210 @ 103438:                  PUSH   L
12211 @ 103441:                  ASSVAL

  1677           %FINISH
12212 @ 103442:                  LINE   1677 "regression-compile-tmp/comp412.imp"
12213 @ 103480:                  LOCATE L_0006

  1678           OPS=OPS<<1!BIT
12214 @ 103483:                  LINE   1678 "regression-compile-tmp/comp412.imp"
12215 @ 103521:                  PUSH   OPS
12216 @ 103524:                  PUSH   OPS
12217 @ 103527:                  PUSHI  #0x00000001
12218 @ 103532:                  LSH   
12219 @ 103533:                  PUSH   BIT
12220 @ 103536:                  OR    
12221 @ 103537:                  ASSVAL

  1679           GLOBAL NOT=GLOBAL NOT<<1!LOCAL NOT
12222 @ 103538:                  LINE   1679 "regression-compile-tmp/comp412.imp"
12223 @ 103576:                  PUSH   GLOBALNOT
12224 @ 103579:                  PUSH   GLOBALNOT
12225 @ 103582:                  PUSHI  #0x00000001
12226 @ 103587:                  LSH   
12227 @ 103588:                  PUSH   LOCALNOT
12228 @ 103591:                  OR    
12229 @ 103592:                  ASSVAL

  1680        %FINISH
12230 @ 103593:                  LINE   1680 "regression-compile-tmp/comp412.imp"
12231 @ 103631:                  LOCATE L_0003

  1681        CLAST=1; LOCAL NOT=0
12232 @ 103634:                  LINE   1681 "regression-compile-tmp/comp412.imp"
12233 @ 103672:                  PUSH   CLAST
12234 @ 103675:                  PUSHI  #0x00000001
12235 @ 103680:                  ASSVAL
12236 @ 103681:                  LINE   1681 "regression-compile-tmp/comp412.imp"
12237 @ 103719:                  PUSH   LOCALNOT
12238 @ 103722:                  PUSHI  #0x00000000
12239 @ 103727:                  ASSVAL

  1682        -> CONT %IF DOUBLE=0
12240 @ 103728:                  LINE   1682 "regression-compile-tmp/comp412.imp"
12241 @ 103766:                  PUSH   DOUBLE
12242 @ 103769:                  PUSHI  #0x00000000
12243 @ 103774:                  JUMPIF # L_0004
12244 @ 103778:                  JUMP   L_010e
12245 @ 103781:                  LOCATE L_0004

  1683        -> COP;                              ! REJOIN CONDITIONS
12246 @ 103784:                  LINE   1683 "regression-compile-tmp/comp412.imp"
12247 @ 103822:                  JUMP   L_0113

  1684  C(119):                                     ! STARTT
12248 @ 103825:                  LINE   1684 "regression-compile-tmp/comp412.imp"
12249 @ 103863:                  PUSHI  #0x00000077
12250 @ 103868:                  SLABEL 230

  1685        STARTT = 2 %AND DEF LAB(LABEL+2) %IF STARTT = 0
12251 @ 103871:                  LINE   1685 "regression-compile-tmp/comp412.imp"
12252 @ 103909:                  PUSH   STARTT
12253 @ 103912:                  PUSHI  #0x00000000
12254 @ 103917:                  JUMPIF # L_0004
12255 @ 103921:                  PUSH   STARTT
12256 @ 103924:                  PUSHI  #0x00000002
12257 @ 103929:                  ASSVAL
12258 @ 103930:                  PUSH   DEFLAB
12259 @ 103933:                  PUSH   LABEL
12260 @ 103936:                  PUSHI  #0x00000002
12261 @ 103941:                  ADD   
12262 @ 103942:                  ASSPAR
12263 @ 103943:                  CALL  
12264 @ 103944:                  LOCATE L_0004

  1686        LABEL = LABEL+4
12265 @ 103947:                  LINE   1686 "regression-compile-tmp/comp412.imp"
12266 @ 103985:                  PUSH   LABEL
12267 @ 103988:                  PUSH   LABEL
12268 @ 103991:                  PUSHI  #0x00000004
12269 @ 103996:                  ADD   
12270 @ 103997:                  ASSVAL

  1687        FAULT(23) %IF LABEL>>2 > MAX LAB
12271 @ 103998:                  LINE   1687 "regression-compile-tmp/comp412.imp"
12272 @ 104036:                  PUSH   LABEL
12273 @ 104039:                  PUSHI  #0x00000002
12274 @ 104044:                  RSH   
12275 @ 104045:                  PUSHI  #0x00000050
12276 @ 104050:                  JUMPIF <= L_0004
12277 @ 104054:                  PUSH   FAULT
12278 @ 104057:                  PUSHI  #0x00000017
12279 @ 104062:                  ASSPAR
12280 @ 104063:                  CALL  
12281 @ 104064:                  LOCATE L_0004

  1688        LABINF(LABEL>>2) = STARTT+ELSE
12282 @ 104067:                  LINE   1688 "regression-compile-tmp/comp412.imp"
12283 @ 104105:                  PUSH   LABINF
12284 @ 104108:                  PUSH   LABEL
12285 @ 104111:                  PUSHI  #0x00000002
12286 @ 104116:                  RSH   
12287 @ 104117:                  ACCESS
12288 @ 104118:                  PUSH   STARTT
12289 @ 104121:                  PUSH   ELSE
12290 @ 104124:                  ADD   
12291 @ 104125:                  ASSVAL

  1689        LOOP LAB = 0;  P LAB = 0;            ! LABEL NO LONGER PENDING
12292 @ 104126:                  LINE   1689 "regression-compile-tmp/comp412.imp"
12293 @ 104164:                  PUSH   LOOPLAB
12294 @ 104167:                  PUSHI  #0x00000000
12295 @ 104172:                  ASSVAL
12296 @ 104173:                  LINE   1689 "regression-compile-tmp/comp412.imp"
12297 @ 104211:                  PUSH   PLAB
12298 @ 104214:                  PUSHI  #0x00000000
12299 @ 104219:                  ASSVAL

  1690        ELSE = 0;  EILAB = 0
12300 @ 104220:                  LINE   1690 "regression-compile-tmp/comp412.imp"
12301 @ 104258:                  PUSH   ELSE
12302 @ 104261:                  PUSHI  #0x00000000
12303 @ 104266:                  ASSVAL
12304 @ 104267:                  LINE   1690 "regression-compile-tmp/comp412.imp"
12305 @ 104305:                  PUSH   EILAB
12306 @ 104308:                  PUSHI  #0x00000000
12307 @ 104313:                  ASSVAL

  1691        ->CONT
12308 @ 104314:                  LINE   1691 "regression-compile-tmp/comp412.imp"
12309 @ 104352:                  JUMP   L_010e

  1692  C(41): OP('B',LABEL-2);                     ! REPEAT
12310 @ 104355:                  LINE   1692 "regression-compile-tmp/comp412.imp"
12311 @ 104393:                  PUSHI  #0x00000029
12312 @ 104398:                  SLABEL 230
12313 @ 104401:                  LINE   1692 "regression-compile-tmp/comp412.imp"
12314 @ 104439:                  PUSH   OP
12315 @ 104442:                  PUSHI  #0x00000042
12316 @ 104447:                  ASSPAR
12317 @ 104448:                  PUSH   LABEL
12318 @ 104451:                  PUSHI  #0x00000002
12319 @ 104456:                  SUB   
12320 @ 104457:                  ASSPAR
12321 @ 104458:                  CALL  

  1693        ACCESS = 0
12322 @ 104459:                  LINE   1693 "regression-compile-tmp/comp412.imp"
12323 @ 104497:                  PUSH   ACCESS
12324 @ 104500:                  PUSHI  #0x00000000
12325 @ 104505:                  ASSVAL

  1694  C(42): POP LAB(X&1);  ->CONT;               ! FINISH
12326 @ 104506:                  LINE   1694 "regression-compile-tmp/comp412.imp"
12327 @ 104544:                  PUSHI  #0x0000002a
12328 @ 104549:                  SLABEL 230
12329 @ 104552:                  LINE   1694 "regression-compile-tmp/comp412.imp"
12330 @ 104590:                  PUSH   POPLAB
12331 @ 104593:                  PUSH   X
12332 @ 104596:                  PUSHI  #0x00000001
12333 @ 104601:                  AND   
12334 @ 104602:                  ASSPAR
12335 @ 104603:                  CALL  
12336 @ 104604:                  LINE   1694 "regression-compile-tmp/comp412.imp"
12337 @ 104642:                  JUMP   L_010e

  1695  C(43):                                      ! ELSE
12338 @ 104645:                  LINE   1695 "regression-compile-tmp/comp412.imp"
12339 @ 104683:                  PUSHI  #0x0000002b
12340 @ 104688:                  SLABEL 230

  1696        POP LAB(0) %IF P LAB = 0;            ! (FINISH) ELSE ...
12341 @ 104691:                  LINE   1696 "regression-compile-tmp/comp412.imp"
12342 @ 104729:                  PUSH   PLAB
12343 @ 104732:                  PUSHI  #0x00000000
12344 @ 104737:                  JUMPIF # L_0004
12345 @ 104741:                  PUSH   POPLAB
12346 @ 104744:                  PUSHI  #0x00000000
12347 @ 104749:                  ASSPAR
12348 @ 104750:                  CALL  
12349 @ 104751:                  LOCATE L_0004

  1697        FAULT(5) %AND -> RETURN %IF PLAB&1#0
12350 @ 104754:                  LINE   1697 "regression-compile-tmp/comp412.imp"
12351 @ 104792:                  PUSH   PLAB
12352 @ 104795:                  PUSHI  #0x00000001
12353 @ 104800:                  AND   
12354 @ 104801:                  PUSHI  #0x00000000
12355 @ 104806:                  JUMPIF = L_0004
12356 @ 104810:                  PUSH   FAULT
12357 @ 104813:                  PUSHI  #0x00000005
12358 @ 104818:                  ASSPAR
12359 @ 104819:                  CALL  
12360 @ 104820:                  JUMP   L_0110
12361 @ 104823:                  LOCATE L_0004

  1698        OP('F',PLAB+1) %UNLESS ACCESS = 0
12362 @ 104826:                  LINE   1698 "regression-compile-tmp/comp412.imp"
12363 @ 104864:                  PUSH   ACCESS
12364 @ 104867:                  PUSHI  #0x00000000
12365 @ 104872:                  JUMPIF = L_0004
12366 @ 104876:                  PUSH   OP
12367 @ 104879:                  PUSHI  #0x00000046
12368 @ 104884:                  ASSPAR
12369 @ 104885:                  PUSH   PLAB
12370 @ 104888:                  PUSHI  #0x00000001
12371 @ 104893:                  ADD   
12372 @ 104894:                  ASSPAR
12373 @ 104895:                  CALL  
12374 @ 104896:                  LOCATE L_0004

  1699        DEF LAB(PLAB)
12375 @ 104899:                  LINE   1699 "regression-compile-tmp/comp412.imp"
12376 @ 104937:                  PUSH   DEFLAB
12377 @ 104940:                  PUSH   PLAB
12378 @ 104943:                  ASSPAR
12379 @ 104944:                  CALL  

  1700        PLAB=PLAB+1
12380 @ 104945:                  LINE   1700 "regression-compile-tmp/comp412.imp"
12381 @ 104983:                  PUSH   PLAB
12382 @ 104986:                  PUSH   PLAB
12383 @ 104989:                  PUSHI  #0x00000001
12384 @ 104994:                  ADD   
12385 @ 104995:                  ASSVAL

  1701        STARTT=3+8;                          ! SHOW ELSE
12386 @ 104996:                  LINE   1701 "regression-compile-tmp/comp412.imp"
12387 @ 105034:                  PUSH   STARTT
12388 @ 105037:                  PUSHI  #0x00000003
12389 @ 105042:                  PUSHI  #0x00000008
12390 @ 105047:                  ADD   
12391 @ 105048:                  ASSVAL

  1702        ELSE = 4
12392 @ 105049:                  LINE   1702 "regression-compile-tmp/comp412.imp"
12393 @ 105087:                  PUSH   ELSE
12394 @ 105090:                  PUSHI  #0x00000004
12395 @ 105095:                  ASSVAL

  1703        -> CONT
12396 @ 105096:                  LINE   1703 "regression-compile-tmp/comp412.imp"
12397 @ 105134:                  JUMP   L_010e

  1704  C(54): OWN DEF=0;  OUT=0;                   ! OWNVTYPE
12398 @ 105137:                  LINE   1704 "regression-compile-tmp/comp412.imp"
12399 @ 105175:                  PUSHI  #0x00000036
12400 @ 105180:                  SLABEL 230
12401 @ 105183:                  LINE   1704 "regression-compile-tmp/comp412.imp"
12402 @ 105221:                  PUSH   OWNDEF
12403 @ 105224:                  PUSHI  #0x00000000
12404 @ 105229:                  ASSVAL
12405 @ 105230:                  LINE   1704 "regression-compile-tmp/comp412.imp"
12406 @ 105268:                  PUSH   OUT
12407 @ 105271:                  PUSHI  #0x00000000
12408 @ 105276:                  ASSVAL

  1705  C(51):                                      ! ATYPE
12409 @ 105277:                  LINE   1705 "regression-compile-tmp/comp412.imp"
12410 @ 105315:                  PUSHI  #0x00000033
12411 @ 105320:                  SLABEL 230

  1706  C(52):                                      ! OWN ATYPE
12412 @ 105323:                  LINE   1706 "regression-compile-tmp/comp412.imp"
12413 @ 105361:                  PUSHI  #0x00000034
12414 @ 105366:                  SLABEL 230

  1707  C(53):                                      ! VTYPE
12415 @ 105369:                  LINE   1707 "regression-compile-tmp/comp412.imp"
12416 @ 105407:                  PUSHI  #0x00000035
12417 @ 105412:                  SLABEL 230

  1708  C(56):                                      ! TYPE
12418 @ 105415:                  LINE   1708 "regression-compile-tmp/comp412.imp"
12419 @ 105453:                  PUSHI  #0x00000038
12420 @ 105458:                  SLABEL 230

  1709        FAULT(15) %IF INHIBIT&1 # 0 %AND SPEC > 0
12421 @ 105461:                  LINE   1709 "regression-compile-tmp/comp412.imp"
12422 @ 105499:                  PUSH   INHIBIT
12423 @ 105502:                  PUSHI  #0x00000001
12424 @ 105507:                  AND   
12425 @ 105508:                  PUSHI  #0x00000000
12426 @ 105513:                  JUMPIF = L_0004
12427 @ 105517:                  PUSH   SPEC
12428 @ 105520:                  PUSHI  #0x00000000
12429 @ 105525:                  JUMPIF <= L_0004
12430 @ 105529:                  PUSH   FAULT
12431 @ 105532:                  PUSHI  #0x0000000f
12432 @ 105537:                  ASSPAR
12433 @ 105538:                  CALL  
12434 @ 105539:                  LOCATE L_0004

  1710  C(50):                                      ! RTYPE
12435 @ 105542:                  LINE   1710 "regression-compile-tmp/comp412.imp"
12436 @ 105580:                  PUSHI  #0x00000032
12437 @ 105585:                  SLABEL 230

  1711  C(57):                                      ! SWITCH
12438 @ 105588:                  LINE   1711 "regression-compile-tmp/comp412.imp"
12439 @ 105626:                  PUSHI  #0x00000039
12440 @ 105631:                  SLABEL 230

  1712        DCLASS=CLASS; -> CONT
12441 @ 105634:                  LINE   1712 "regression-compile-tmp/comp412.imp"
12442 @ 105672:                  PUSH   DCLASS
12443 @ 105675:                  PUSH   CLASS
12444 @ 105678:                  ASSVAL
12445 @ 105679:                  LINE   1712 "regression-compile-tmp/comp412.imp"
12446 @ 105717:                  JUMP   L_010e

  1713  C(60):                                      ! VSET
12447 @ 105720:                  LINE   1713 "regression-compile-tmp/comp412.imp"
12448 @ 105758:                  PUSHI  #0x0000003c
12449 @ 105763:                  SLABEL 230

  1714  C(61):                                      ! NSET
12450 @ 105766:                  LINE   1714 "regression-compile-tmp/comp412.imp"
12451 @ 105804:                  PUSHI  #0x0000003d
12452 @ 105809:                  SLABEL 230

  1715  C(67):                                      ! V
12453 @ 105812:                  LINE   1715 "regression-compile-tmp/comp412.imp"
12454 @ 105850:                  PUSHI  #0x00000043
12455 @ 105855:                  SLABEL 230

  1716  C(68):                                      ! N
12456 @ 105858:                  LINE   1716 "regression-compile-tmp/comp412.imp"
12457 @ 105896:                  PUSHI  #0x00000044
12458 @ 105901:                  SLABEL 230

  1717  C(74):                                      ! RECV
12459 @ 105904:                  LINE   1717 "regression-compile-tmp/comp412.imp"
12460 @ 105942:                  PUSHI  #0x0000004a
12461 @ 105947:                  SLABEL 230

  1718  C(75):                                      ! RECN
12462 @ 105950:                  LINE   1718 "regression-compile-tmp/comp412.imp"
12463 @ 105988:                  PUSHI  #0x0000004b
12464 @ 105993:                  SLABEL 230

  1719  C(122):                                     ! RTP
12465 @ 105996:                  LINE   1719 "regression-compile-tmp/comp412.imp"
12466 @ 106034:                  PUSHI  #0x0000007a
12467 @ 106039:                  SLABEL 230

  1720  C(123):                                     ! PP
12468 @ 106042:                  LINE   1720 "regression-compile-tmp/comp412.imp"
12469 @ 106080:                  PUSHI  #0x0000007b
12470 @ 106085:                  SLABEL 230

  1721  C(124):                                     ! FNP
12471 @ 106088:                  LINE   1721 "regression-compile-tmp/comp412.imp"
12472 @ 106126:                  PUSHI  #0x0000007c
12473 @ 106131:                  SLABEL 230

  1722  C(125):                                     ! MP
12474 @ 106134:                  LINE   1722 "regression-compile-tmp/comp412.imp"
12475 @ 106172:                  PUSHI  #0x0000007d
12476 @ 106177:                  SLABEL 230

  1723  C(77):                                      ! RECAN
12477 @ 106180:                  LINE   1723 "regression-compile-tmp/comp412.imp"
12478 @ 106218:                  PUSHI  #0x0000004d
12479 @ 106223:                  SLABEL 230

  1724  C(63):                                      ! ANSET
12480 @ 106226:                  LINE   1724 "regression-compile-tmp/comp412.imp"
12481 @ 106264:                  PUSHI  #0x0000003f
12482 @ 106269:                  SLABEL 230

  1725  C(70):                                      ! AN
12483 @ 106272:                  LINE   1725 "regression-compile-tmp/comp412.imp"
12484 @ 106310:                  PUSHI  #0x00000046
12485 @ 106315:                  SLABEL 230

  1726  C(62):                                      ! ASET
12486 @ 106318:                  LINE   1726 "regression-compile-tmp/comp412.imp"
12487 @ 106356:                  PUSHI  #0x0000003e
12488 @ 106361:                  SLABEL 230

  1727  C(69):                                      ! A
12489 @ 106364:                  LINE   1727 "regression-compile-tmp/comp412.imp"
12490 @ 106402:                  PUSHI  #0x00000045
12491 @ 106407:                  SLABEL 230

  1728  C(76):                                      ! RECA
12492 @ 106410:                  LINE   1728 "regression-compile-tmp/comp412.imp"
12493 @ 106448:                  PUSHI  #0x0000004c
12494 @ 106453:                  SLABEL 230

  1729        AOP('@', X);  ->CONT
12495 @ 106456:                  LINE   1729 "regression-compile-tmp/comp412.imp"
12496 @ 106494:                  PUSH   AOP
12497 @ 106497:                  PUSHI  #0x00000040
12498 @ 106502:                  ASSPAR
12499 @ 106503:                  PUSH   X
12500 @ 106506:                  ASSPAR
12501 @ 106507:                  CALL  
12502 @ 106508:                  LINE   1729 "regression-compile-tmp/comp412.imp"
12503 @ 106546:                  JUMP   L_010e

  1730  C(65):                                      ! RFN
12504 @ 106549:                  LINE   1730 "regression-compile-tmp/comp412.imp"
12505 @ 106587:                  PUSHI  #0x00000041
12506 @ 106592:                  SLABEL 230

  1731  C(66):                                      ! AFN
12507 @ 106595:                  LINE   1731 "regression-compile-tmp/comp412.imp"
12508 @ 106633:                  PUSHI  #0x00000042
12509 @ 106638:                  SLABEL 230

  1732        -> CONT
12510 @ 106641:                  LINE   1732 "regression-compile-tmp/comp412.imp"
12511 @ 106679:                  JUMP   L_010e

  1733  C(71):                                      ! M
12512 @ 106682:                  LINE   1733 "regression-compile-tmp/comp412.imp"
12513 @ 106720:                  PUSHI  #0x00000047
12514 @ 106725:                  SLABEL 230

  1734  C(72):                                      ! F
12515 @ 106728:                  LINE   1734 "regression-compile-tmp/comp412.imp"
12516 @ 106766:                  PUSHI  #0x00000048
12517 @ 106771:                  SLABEL 230

  1735  C(73):                                      ! RT
12518 @ 106774:                  LINE   1735 "regression-compile-tmp/comp412.imp"
12519 @ 106812:                  PUSHI  #0x00000049
12520 @ 106817:                  SLABEL 230

  1736  C(78):                                      ! RECORDMAP
12521 @ 106820:                  LINE   1736 "regression-compile-tmp/comp412.imp"
12522 @ 106858:                  PUSHI  #0x0000004e
12523 @ 106863:                  SLABEL 230

  1737  C(64):                                      ! MSET
12524 @ 106866:                  LINE   1737 "regression-compile-tmp/comp412.imp"
12525 @ 106904:                  PUSHI  #0x00000040
12526 @ 106909:                  SLABEL 230

  1738        CALL;  -> CONT
12527 @ 106912:                  LINE   1738 "regression-compile-tmp/comp412.imp"
12528 @ 106950:                  PUSH   CALL
12529 @ 106953:                  CALL  
12530 @ 106954:                  LINE   1738 "regression-compile-tmp/comp412.imp"
12531 @ 106992:                  JUMP   L_010e

  1739  C(83): LIT2=LIT1;  LIT1=EVAL(X);            ! 'ICONST'
12532 @ 106995:                  LINE   1739 "regression-compile-tmp/comp412.imp"
12533 @ 107033:                  PUSHI  #0x00000053
12534 @ 107038:                  SLABEL 230
12535 @ 107041:                  LINE   1739 "regression-compile-tmp/comp412.imp"
12536 @ 107079:                  PUSH   LIT2
12537 @ 107082:                  PUSH   LIT1
12538 @ 107085:                  ASSVAL
12539 @ 107086:                  LINE   1739 "regression-compile-tmp/comp412.imp"
12540 @ 107124:                  PUSH   LIT1
12541 @ 107127:                  PUSH   EVAL
12542 @ 107130:                  PUSH   X
12543 @ 107133:                  ASSPAR
12544 @ 107134:                  CALL  
12545 @ 107135:                  ASSVAL

  1740        CGEN(LIT1) %AND ->CONT %IF X < 0
12546 @ 107136:                  LINE   1740 "regression-compile-tmp/comp412.imp"
12547 @ 107174:                  PUSH   X
12548 @ 107177:                  PUSHI  #0x00000000
12549 @ 107182:                  JUMPIF >= L_0004
12550 @ 107186:                  PUSH   CGEN
12551 @ 107189:                  PUSH   LIT1
12552 @ 107192:                  ASSPAR
12553 @ 107193:                  CALL  
12554 @ 107194:                  JUMP   L_010e
12555 @ 107197:                  LOCATE L_0004

  1741  C(82):                                      ! SCONST
12556 @ 107200:                  LINE   1741 "regression-compile-tmp/comp412.imp"
12557 @ 107238:                  PUSHI  #0x00000052
12558 @ 107243:                  SLABEL 230

  1742  C(84):                                      ! 'RCONST'
12559 @ 107246:                  LINE   1742 "regression-compile-tmp/comp412.imp"
12560 @ 107284:                  PUSHI  #0x00000054
12561 @ 107289:                  SLABEL 230

  1743        L=BUFFER(X)
12562 @ 107292:                  LINE   1743 "regression-compile-tmp/comp412.imp"
12563 @ 107330:                  PUSH   L
12564 @ 107333:                  PUSH   BUFFER
12565 @ 107336:                  PUSH   X
12566 @ 107339:                  ACCESS
12567 @ 107340:                  ASSVAL

  1744        %IF L <= 0 %AND CLASS=ICONST %START; ! SYMBOL
12568 @ 107341:                  LINE   1744 "regression-compile-tmp/comp412.imp"
12569 @ 107379:                  PUSH   L
12570 @ 107382:                  PUSHI  #0x00000000
12571 @ 107387:                  JUMPIF > L_0004
12572 @ 107391:                  PUSH   CLASS
12573 @ 107394:                  PUSHI  #0x00000053
12574 @ 107399:                  JUMPIF # L_0004

  1745           OP('N',3); L=BUFFER(X-1)
12575 @ 107403:                  LINE   1745 "regression-compile-tmp/comp412.imp"
12576 @ 107441:                  PUSH   OP
12577 @ 107444:                  PUSHI  #0x0000004e
12578 @ 107449:                  ASSPAR
12579 @ 107450:                  PUSHI  #0x00000003
12580 @ 107455:                  ASSPAR
12581 @ 107456:                  CALL  
12582 @ 107457:                  LINE   1745 "regression-compile-tmp/comp412.imp"
12583 @ 107495:                  PUSH   L
12584 @ 107498:                  PUSH   BUFFER
12585 @ 107501:                  PUSH   X
12586 @ 107504:                  PUSHI  #0x00000001
12587 @ 107509:                  SUB   
12588 @ 107510:                  ACCESS
12589 @ 107511:                  ASSVAL

  1746           PUT(','); PUT('Z')
12590 @ 107512:                  LINE   1746 "regression-compile-tmp/comp412.imp"
12591 @ 107550:                  PUSH   PUT
12592 @ 107553:                  PUSHI  #0x0000002c
12593 @ 107558:                  ASSPAR
12594 @ 107559:                  CALL  
12595 @ 107560:                  LINE   1746 "regression-compile-tmp/comp412.imp"
12596 @ 107598:                  PUSH   PUT
12597 @ 107601:                  PUSHI  #0x0000005a
12598 @ 107606:                  ASSPAR
12599 @ 107607:                  CALL  

  1747           X=L//10
12600 @ 107608:                  LINE   1747 "regression-compile-tmp/comp412.imp"
12601 @ 107646:                  PUSH   X
12602 @ 107649:                  PUSH   L
12603 @ 107652:                  PUSHI  #0x0000000a
12604 @ 107657:                  QUOT  
12605 @ 107658:                  ASSVAL

  1748           PUT(X+'A')
12606 @ 107659:                  LINE   1748 "regression-compile-tmp/comp412.imp"
12607 @ 107697:                  PUSH   PUT
12608 @ 107700:                  PUSH   X
12609 @ 107703:                  PUSHI  #0x00000041
12610 @ 107708:                  ADD   
12611 @ 107709:                  ASSPAR
12612 @ 107710:                  CALL  

  1749           PUT(L-X*10+'A')
12613 @ 107711:                  LINE   1749 "regression-compile-tmp/comp412.imp"
12614 @ 107749:                  PUSH   PUT
12615 @ 107752:                  PUSH   L
12616 @ 107755:                  PUSH   X
12617 @ 107758:                  PUSHI  #0x0000000a
12618 @ 107763:                  MUL   
12619 @ 107764:                  SUB   
12620 @ 107765:                  PUSHI  #0x00000041
12621 @ 107770:                  ADD   
12622 @ 107771:                  ASSPAR
12623 @ 107772:                  CALL  

  1750        %ELSE
12624 @ 107773:                  LINE   1750 "regression-compile-tmp/comp412.imp"
12625 @ 107811:                  GOTO   L_0003
12626 @ 107814:                  LOCATE L_0004

  1751           L=|L|
12627 @ 107817:                  LINE   1751 "regression-compile-tmp/comp412.imp"
12628 @ 107855:                  PUSH   L
12629 @ 107858:                  PUSH   L
12630 @ 107861:                  MOD   
12631 @ 107862:                  ASSVAL

  1752           OP(CONOP(CLASS),L)
12632 @ 107863:                  LINE   1752 "regression-compile-tmp/comp412.imp"
12633 @ 107901:                  PUSH   OP
12634 @ 107904:                  PUSH   CONOP
12635 @ 107907:                  PUSH   CLASS
12636 @ 107910:                  ACCESS
12637 @ 107911:                  ASSPAR
12638 @ 107912:                  PUSH   L
12639 @ 107915:                  ASSPAR
12640 @ 107916:                  CALL  

  1753           %IF L > 0 %START
12641 @ 107917:                  LINE   1753 "regression-compile-tmp/comp412.imp"
12642 @ 107955:                  PUSH   L
12643 @ 107958:                  PUSHI  #0x00000000
12644 @ 107963:                  JUMPIF <= L_0007

  1754              %integer x2
12645 @ 107967:                  LINE   1754 "regression-compile-tmp/comp412.imp"
12646 @ 108005:                  DEF    X2 p1=V_0115 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0

  1755              PUT(',')
12647 @ 108019:                  LINE   1755 "regression-compile-tmp/comp412.imp"
12648 @ 108057:                  PUSH   PUT
12649 @ 108060:                  PUSHI  #0x0000002c
12650 @ 108065:                  ASSPAR
12651 @ 108066:                  CALL  

  1756              x2 = X
12652 @ 108067:                  LINE   1756 "regression-compile-tmp/comp412.imp"
12653 @ 108105:                  PUSH   X2
12654 @ 108108:                  PUSH   X
12655 @ 108111:                  ASSVAL

  1757              %CYCLE X=x2-1,-1,x2-L
12656 @ 108112:                  LINE   1757 "regression-compile-tmp/comp412.imp"
12657 @ 108150:                  PUSH   X
12658 @ 108153:                  PUSHI  #0x00000001
12659 @ 108158:                  NEGATE
12660 @ 108159:                  PUSH   X2
12661 @ 108162:                  PUSH   L
12662 @ 108165:                  SUB   
12663 @ 108166:                  PUSH   X2
12664 @ 108169:                  PUSHI  #0x00000001
12665 @ 108174:                  SUB   
12666 @ 108175:                  FOR    L_0009

  1758                 PUT(BUFFER(X))
12667 @ 108178:                  LINE   1758 "regression-compile-tmp/comp412.imp"
12668 @ 108216:                  PUSH   PUT
12669 @ 108219:                  PUSH   BUFFER
12670 @ 108222:                  PUSH   X
12671 @ 108225:                  ACCESS
12672 @ 108226:                  ASSPAR
12673 @ 108227:                  CALL  

  1759              %REPEAT
12674 @ 108228:                  LINE   1759 "regression-compile-tmp/comp412.imp"
12675 @ 108266:                  REPEAT L_0009
12676 @ 108269:                  LOCATE L_000a

  1760           %FINISH
12677 @ 108272:                  LINE   1760 "regression-compile-tmp/comp412.imp"
12678 @ 108310:                  LOCATE L_0007

  1761        %FINISH
12679 @ 108313:                  LINE   1761 "regression-compile-tmp/comp412.imp"
12680 @ 108351:                  LOCATE L_0003

  1762        LIT=CODE
12681 @ 108354:                  LINE   1762 "regression-compile-tmp/comp412.imp"
12682 @ 108392:                  PUSH   LIT
12683 @ 108395:                  PUSH   CODE
12684 @ 108398:                  ASSVAL

  1763        -> CONT
12685 @ 108399:                  LINE   1763 "regression-compile-tmp/comp412.imp"
12686 @ 108437:                  JUMP   L_010e

  1764  C(105):PUT('.');  -> CONT;                  ! '.'
12687 @ 108440:                  LINE   1764 "regression-compile-tmp/comp412.imp"
12688 @ 108478:                  PUSHI  #0x00000069
12689 @ 108483:                  SLABEL 230
12690 @ 108486:                  LINE   1764 "regression-compile-tmp/comp412.imp"
12691 @ 108524:                  PUSH   PUT
12692 @ 108527:                  PUSHI  #0x0000002e
12693 @ 108532:                  ASSPAR
12694 @ 108533:                  CALL  
12695 @ 108534:                  LINE   1764 "regression-compile-tmp/comp412.imp"
12696 @ 108572:                  JUMP   L_010e

  1765  C(106):PUT('V'+32); -> CONT
12697 @ 108575:                  LINE   1765 "regression-compile-tmp/comp412.imp"
12698 @ 108613:                  PUSHI  #0x0000006a
12699 @ 108618:                  SLABEL 230
12700 @ 108621:                  LINE   1765 "regression-compile-tmp/comp412.imp"
12701 @ 108659:                  PUSH   PUT
12702 @ 108662:                  PUSHI  #0x00000056
12703 @ 108667:                  PUSHI  #0x00000020
12704 @ 108672:                  ADD   
12705 @ 108673:                  ASSPAR
12706 @ 108674:                  CALL  
12707 @ 108675:                  LINE   1765 "regression-compile-tmp/comp412.imp"
12708 @ 108713:                  JUMP   L_010e

  1766  C(126):PUT('F'+32);                            ! COM
12709 @ 108716:                  LINE   1766 "regression-compile-tmp/comp412.imp"
12710 @ 108754:                  PUSHI  #0x0000007e
12711 @ 108759:                  SLABEL 230
12712 @ 108762:                  LINE   1766 "regression-compile-tmp/comp412.imp"
12713 @ 108800:                  PUSH   PUT
12714 @ 108803:                  PUSHI  #0x00000046
12715 @ 108808:                  PUSHI  #0x00000020
12716 @ 108813:                  ADD   
12717 @ 108814:                  ASSPAR
12718 @ 108815:                  CALL  

  1767        STARTT=2+8;                          ! PSEUDO %CYCLE
12719 @ 108816:                  LINE   1767 "regression-compile-tmp/comp412.imp"
12720 @ 108854:                  PUSH   STARTT
12721 @ 108857:                  PUSHI  #0x00000002
12722 @ 108862:                  PUSHI  #0x00000008
12723 @ 108867:                  ADD   
12724 @ 108868:                  ASSVAL

  1768        P LAB=LABEL; LOOP LAB=P LAB+2
12725 @ 108869:                  LINE   1768 "regression-compile-tmp/comp412.imp"
12726 @ 108907:                  PUSH   PLAB
12727 @ 108910:                  PUSH   LABEL
12728 @ 108913:                  ASSVAL
12729 @ 108914:                  LINE   1768 "regression-compile-tmp/comp412.imp"
12730 @ 108952:                  PUSH   LOOPLAB
12731 @ 108955:                  PUSH   PLAB
12732 @ 108958:                  PUSHI  #0x00000002
12733 @ 108963:                  ADD   
12734 @ 108964:                  ASSVAL

  1769        DEF LAB(LOOP LAB)
12735 @ 108965:                  LINE   1769 "regression-compile-tmp/comp412.imp"
12736 @ 109003:                  PUSH   DEFLAB
12737 @ 109006:                  PUSH   LOOPLAB
12738 @ 109009:                  ASSPAR
12739 @ 109010:                  CALL  

  1770        -> CONT
12740 @ 109011:                  LINE   1770 "regression-compile-tmp/comp412.imp"
12741 @ 109049:                  JUMP   L_010e

  1771  C(113):                                     ! BSEP
12742 @ 109052:                  LINE   1771 "regression-compile-tmp/comp412.imp"
12743 @ 109090:                  PUSHI  #0x00000071
12744 @ 109095:                  SLABEL 230

  1772        %IF SPREFIX=0 %THEN DIM=DIM+1 %ELSE SET SIZE
12745 @ 109098:                  LINE   1772 "regression-compile-tmp/comp412.imp"
12746 @ 109136:                  PUSH   SPREFIX
12747 @ 109139:                  PUSHI  #0x00000000
12748 @ 109144:                  JUMPIF # L_0004
12749 @ 109148:                  PUSH   DIM
12750 @ 109151:                  PUSH   DIM
12751 @ 109154:                  PUSHI  #0x00000001
12752 @ 109159:                  ADD   
12753 @ 109160:                  ASSVAL
12754 @ 109161:                  GOTO   L_0003
12755 @ 109164:                  LOCATE L_0004
12756 @ 109167:                  PUSH   SETSIZE
12757 @ 109170:                  CALL  
12758 @ 109171:                  LOCATE L_0003

  1773        -> CONT
12759 @ 109174:                  LINE   1773 "regression-compile-tmp/comp412.imp"
12760 @ 109212:                  JUMP   L_010e

  1774  C(116): AOP('L',X)
12761 @ 109215:                  LINE   1774 "regression-compile-tmp/comp412.imp"
12762 @ 109253:                  PUSHI  #0x00000074
12763 @ 109258:                  SLABEL 230
12764 @ 109261:                  LINE   1774 "regression-compile-tmp/comp412.imp"
12765 @ 109299:                  PUSH   AOP
12766 @ 109302:                  PUSHI  #0x0000004c
12767 @ 109307:                  ASSPAR
12768 @ 109308:                  PUSH   X
12769 @ 109311:                  ASSPAR
12770 @ 109312:                  CALL  

  1775        ACCESS = 1
12771 @ 109313:                  LINE   1775 "regression-compile-tmp/comp412.imp"
12772 @ 109351:                  PUSH   ACCESS
12773 @ 109354:                  PUSHI  #0x00000001
12774 @ 109359:                  ASSVAL

  1776        INHIBIT = INHIBIT!1; -> CONT
12775 @ 109360:                  LINE   1776 "regression-compile-tmp/comp412.imp"
12776 @ 109398:                  PUSH   INHIBIT
12777 @ 109401:                  PUSH   INHIBIT
12778 @ 109404:                  PUSHI  #0x00000001
12779 @ 109409:                  OR    
12780 @ 109410:                  ASSVAL
12781 @ 109411:                  LINE   1776 "regression-compile-tmp/comp412.imp"
12782 @ 109449:                  JUMP   L_010e

  1777  C(80): INHIBIT = INHIBIT!1;         ! SWITCH
12783 @ 109452:                  LINE   1777 "regression-compile-tmp/comp412.imp"
12784 @ 109490:                  PUSHI  #0x00000050
12785 @ 109495:                  SLABEL 230
12786 @ 109498:                  LINE   1777 "regression-compile-tmp/comp412.imp"
12787 @ 109536:                  PUSH   INHIBIT
12788 @ 109539:                  PUSH   INHIBIT
12789 @ 109542:                  PUSHI  #0x00000001
12790 @ 109547:                  OR    
12791 @ 109548:                  ASSVAL

  1778        AOP('W',X);  ->ACONT
12792 @ 109549:                  LINE   1778 "regression-compile-tmp/comp412.imp"
12793 @ 109587:                  PUSH   AOP
12794 @ 109590:                  PUSHI  #0x00000057
12795 @ 109595:                  ASSPAR
12796 @ 109596:                  PUSH   X
12797 @ 109599:                  ASSPAR
12798 @ 109600:                  CALL  
12799 @ 109601:                  LINE   1778 "regression-compile-tmp/comp412.imp"
12800 @ 109639:                  JUMP   L_010f

  1779  C(114):INHIBIT = INHIBIT!1;        ! SLAB
12801 @ 109642:                  LINE   1779 "regression-compile-tmp/comp412.imp"
12802 @ 109680:                  PUSHI  #0x00000072
12803 @ 109685:                  SLABEL 230
12804 @ 109688:                  LINE   1779 "regression-compile-tmp/comp412.imp"
12805 @ 109726:                  PUSH   INHIBIT
12806 @ 109729:                  PUSH   INHIBIT
12807 @ 109732:                  PUSHI  #0x00000001
12808 @ 109737:                  OR    
12809 @ 109738:                  ASSVAL

  1780        ACCESS = 1
12810 @ 109739:                  LINE   1780 "regression-compile-tmp/comp412.imp"
12811 @ 109777:                  PUSH   ACCESS
12812 @ 109780:                  PUSHI  #0x00000001
12813 @ 109785:                  ASSVAL

  1781        AOP('_',X)
12814 @ 109786:                  LINE   1781 "regression-compile-tmp/comp412.imp"
12815 @ 109824:                  PUSH   AOP
12816 @ 109827:                  PUSHI  #0x0000005f
12817 @ 109832:                  ASSPAR
12818 @ 109833:                  PUSH   X
12819 @ 109836:                  ASSPAR
12820 @ 109837:                  CALL  

  1782        L=DICT(X-2);                         ! POINTER TO TABLE
12821 @ 109838:                  LINE   1782 "regression-compile-tmp/comp412.imp"
12822 @ 109876:                  PUSH   L
12823 @ 109879:                  PUSH   DICT
12824 @ 109882:                  PUSH   X
12825 @ 109885:                  PUSHI  #0x00000002
12826 @ 109890:                  SUB   
12827 @ 109891:                  ACCESS
12828 @ 109892:                  ASSVAL

  1783        K=DICT(L);                           ! LOWER BOUND
12829 @ 109893:                  LINE   1783 "regression-compile-tmp/comp412.imp"
12830 @ 109931:                  PUSH   K
12831 @ 109934:                  PUSH   DICT
12832 @ 109937:                  PUSH   L
12833 @ 109940:                  ACCESS
12834 @ 109941:                  ASSVAL

  1784        FAULT(16) %AND ->CONT  %UNLESS K <= LIT1 <= DICT(L-1)
12835 @ 109942:                  LINE   1784 "regression-compile-tmp/comp412.imp"
12836 @ 109980:                  PUSH   K
12837 @ 109983:                  PUSH   LIT1
12838 @ 109986:                  JUMPIFD > L_0005
12839 @ 109990:                  PUSH   DICT
12840 @ 109993:                  PUSH   L
12841 @ 109996:                  PUSHI  #0x00000001
12842 @ 110001:                  SUB   
12843 @ 110002:                  ACCESS
12844 @ 110003:                  JUMPIF <= L_0004
12845 @ 110007:                  LOCATE L_0005
12846 @ 110010:                  PUSH   FAULT
12847 @ 110013:                  PUSHI  #0x00000010
12848 @ 110018:                  ASSPAR
12849 @ 110019:                  CALL  
12850 @ 110020:                  JUMP   L_010e
12851 @ 110023:                  LOCATE L_0004

  1785        K=LIT1-K
12852 @ 110026:                  LINE   1785 "regression-compile-tmp/comp412.imp"
12853 @ 110064:                  PUSH   K
12854 @ 110067:                  PUSH   LIT1
12855 @ 110070:                  PUSH   K
12856 @ 110073:                  SUB   
12857 @ 110074:                  ASSVAL

  1786        L=L-K>>4;                            ! ENTRY POINT
12858 @ 110075:                  LINE   1786 "regression-compile-tmp/comp412.imp"
12859 @ 110113:                  PUSH   L
12860 @ 110116:                  PUSH   L
12861 @ 110119:                  PUSH   K
12862 @ 110122:                  PUSHI  #0x00000004
12863 @ 110127:                  RSH   
12864 @ 110128:                  SUB   
12865 @ 110129:                  ASSVAL

  1787        K=1<<(K&15);                         ! REQUISITE BIT
12866 @ 110130:                  LINE   1787 "regression-compile-tmp/comp412.imp"
12867 @ 110168:                  PUSH   K
12868 @ 110171:                  PUSHI  #0x00000001
12869 @ 110176:                  PUSH   K
12870 @ 110179:                  PUSHI  #0x0000000f
12871 @ 110184:                  AND   
12872 @ 110185:                  LSH   
12873 @ 110186:                  ASSVAL

  1788        M == DICT(L-2)
12874 @ 110187:                  LINE   1788 "regression-compile-tmp/comp412.imp"
12875 @ 110225:                  PUSH   M
12876 @ 110228:                  PUSH   DICT
12877 @ 110231:                  PUSH   L
12878 @ 110234:                  PUSHI  #0x00000002
12879 @ 110239:                  SUB   
12880 @ 110240:                  ACCESS
12881 @ 110241:                  ASSREF

  1789        FAULT(7) %IF M&K#0
12882 @ 110242:                  LINE   1789 "regression-compile-tmp/comp412.imp"
12883 @ 110280:                  PUSH   M
12884 @ 110283:                  PUSH   K
12885 @ 110286:                  AND   
12886 @ 110287:                  PUSHI  #0x00000000
12887 @ 110292:                  JUMPIF = L_0004
12888 @ 110296:                  PUSH   FAULT
12889 @ 110299:                  PUSHI  #0x00000007
12890 @ 110304:                  ASSPAR
12891 @ 110305:                  CALL  
12892 @ 110306:                  LOCATE L_0004

  1790        M = M!K
12893 @ 110309:                  LINE   1790 "regression-compile-tmp/comp412.imp"
12894 @ 110347:                  PUSH   M
12895 @ 110350:                  PUSH   M
12896 @ 110353:                  PUSH   K
12897 @ 110356:                  OR    
12898 @ 110357:                  ASSVAL

  1791        -> CONT
12899 @ 110358:                  LINE   1791 "regression-compile-tmp/comp412.imp"
12900 @ 110396:                  JUMP   L_010e

  1792  C(81): INHIBIT = INHIBIT!1;         ! 'BL'
12901 @ 110399:                  LINE   1792 "regression-compile-tmp/comp412.imp"
12902 @ 110437:                  PUSHI  #0x00000051
12903 @ 110442:                  SLABEL 230
12904 @ 110445:                  LINE   1792 "regression-compile-tmp/comp412.imp"
12905 @ 110483:                  PUSH   INHIBIT
12906 @ 110486:                  PUSH   INHIBIT
12907 @ 110489:                  PUSHI  #0x00000001
12908 @ 110494:                  OR    
12909 @ 110495:                  ASSVAL

  1793  C(115): AOP('J',X);  -> ACONT;               ! 'FL'
12910 @ 110496:                  LINE   1793 "regression-compile-tmp/comp412.imp"
12911 @ 110534:                  PUSHI  #0x00000073
12912 @ 110539:                  SLABEL 230
12913 @ 110542:                  LINE   1793 "regression-compile-tmp/comp412.imp"
12914 @ 110580:                  PUSH   AOP
12915 @ 110583:                  PUSHI  #0x0000004a
12916 @ 110588:                  ASSPAR
12917 @ 110589:                  PUSH   X
12918 @ 110592:                  ASSPAR
12919 @ 110593:                  CALL  
12920 @ 110594:                  LINE   1793 "regression-compile-tmp/comp412.imp"
12921 @ 110632:                  JUMP   L_010f

  1794  C(128):LIT1 = BPSIZE %IF LIT1 = 0
12922 @ 110635:                  LINE   1794 "regression-compile-tmp/comp412.imp"
12923 @ 110673:                  PUSHI  #0x00000080
12924 @ 110678:                  SLABEL 230
12925 @ 110681:                  LINE   1794 "regression-compile-tmp/comp412.imp"
12926 @ 110719:                  PUSH   LIT1
12927 @ 110722:                  PUSHI  #0x00000000
12928 @ 110727:                  JUMPIF # L_0004
12929 @ 110731:                  PUSH   LIT1
12930 @ 110734:                  PUSH   BPSIZE
12931 @ 110737:                  ASSVAL
12932 @ 110738:                  LOCATE L_0004

  1795        BPSIZE=BP SIZE-LIT1+1;               ! ORB
12933 @ 110741:                  LINE   1795 "regression-compile-tmp/comp412.imp"
12934 @ 110779:                  PUSH   BPSIZE
12935 @ 110782:                  PUSH   BPSIZE
12936 @ 110785:                  PUSH   LIT1
12937 @ 110788:                  SUB   
12938 @ 110789:                  PUSHI  #0x00000001
12939 @ 110794:                  ADD   
12940 @ 110795:                  ASSVAL

  1796        -> OF %IF LIT1 <= 0
12941 @ 110796:                  LINE   1796 "regression-compile-tmp/comp412.imp"
12942 @ 110834:                  PUSH   LIT1
12943 @ 110837:                  PUSHI  #0x00000000
12944 @ 110842:                  JUMPIF > L_0004
12945 @ 110846:                  JUMP   L_0116
12946 @ 110849:                  LOCATE L_0004

  1797        -> CONT
12947 @ 110852:                  LINE   1797 "regression-compile-tmp/comp412.imp"
12948 @ 110890:                  JUMP   L_010e

  1798  C(129):PUT('P'+32);  ->CONT;                   ! PSEP
12949 @ 110893:                  LINE   1798 "regression-compile-tmp/comp412.imp"
12950 @ 110931:                  PUSHI  #0x00000081
12951 @ 110936:                  SLABEL 230
12952 @ 110939:                  LINE   1798 "regression-compile-tmp/comp412.imp"
12953 @ 110977:                  PUSH   PUT
12954 @ 110980:                  PUSHI  #0x00000050
12955 @ 110985:                  PUSHI  #0x00000020
12956 @ 110990:                  ADD   
12957 @ 110991:                  ASSPAR
12958 @ 110992:                  CALL  
12959 @ 110993:                  LINE   1798 "regression-compile-tmp/comp412.imp"
12960 @ 111031:                  JUMP   L_010e

  1799  C(130):PUT('P'+32);  PUT('E')
12961 @ 111034:                  LINE   1799 "regression-compile-tmp/comp412.imp"
12962 @ 111072:                  PUSHI  #0x00000082
12963 @ 111077:                  SLABEL 230
12964 @ 111080:                  LINE   1799 "regression-compile-tmp/comp412.imp"
12965 @ 111118:                  PUSH   PUT
12966 @ 111121:                  PUSHI  #0x00000050
12967 @ 111126:                  PUSHI  #0x00000020
12968 @ 111131:                  ADD   
12969 @ 111132:                  ASSPAR
12970 @ 111133:                  CALL  
12971 @ 111134:                  LINE   1799 "regression-compile-tmp/comp412.imp"
12972 @ 111172:                  PUSH   PUT
12973 @ 111175:                  PUSHI  #0x00000045
12974 @ 111180:                  ASSPAR
12975 @ 111181:                  CALL  

  1800        PRED PENDING = PRED PENDING>>1
12976 @ 111182:                  LINE   1800 "regression-compile-tmp/comp412.imp"
12977 @ 111220:                  PUSH   PREDPENDING
12978 @ 111223:                  PUSH   PREDPENDING
12979 @ 111226:                  PUSHI  #0x00000001
12980 @ 111231:                  RSH   
12981 @ 111232:                  ASSVAL

  1801        PRED PENDING = PRED PENDING-1 %AND ->PAC %IF PRED PENDING&1 # 0
12982 @ 111233:                  LINE   1801 "regression-compile-tmp/comp412.imp"
12983 @ 111271:                  PUSH   PREDPENDING
12984 @ 111274:                  PUSHI  #0x00000001
12985 @ 111279:                  AND   
12986 @ 111280:                  PUSHI  #0x00000000
12987 @ 111285:                  JUMPIF = L_0004
12988 @ 111289:                  PUSH   PREDPENDING
12989 @ 111292:                  PUSH   PREDPENDING
12990 @ 111295:                  PUSHI  #0x00000001
12991 @ 111300:                  SUB   
12992 @ 111301:                  ASSVAL
12993 @ 111302:                  JUMP   L_0112
12994 @ 111305:                  LOCATE L_0004

  1802        ->CONT
12995 @ 111308:                  LINE   1802 "regression-compile-tmp/comp412.imp"
12996 @ 111346:                  JUMP   L_010e

  1803  C(107): PUT('I'+32);  ->CONT;                  ! ASSEP
12997 @ 111349:                  LINE   1803 "regression-compile-tmp/comp412.imp"
12998 @ 111387:                  PUSHI  #0x0000006b
12999 @ 111392:                  SLABEL 230
13000 @ 111395:                  LINE   1803 "regression-compile-tmp/comp412.imp"
13001 @ 111433:                  PUSH   PUT
13002 @ 111436:                  PUSHI  #0x00000049
13003 @ 111441:                  PUSHI  #0x00000020
13004 @ 111446:                  ADD   
13005 @ 111447:                  ASSPAR
13006 @ 111448:                  CALL  
13007 @ 111449:                  LINE   1803 "regression-compile-tmp/comp412.imp"
13008 @ 111487:                  JUMP   L_010e

  1804  C(118): %IF DCLASS#54 %START;               ! OSEP
13009 @ 111490:                  LINE   1804 "regression-compile-tmp/comp412.imp"
13010 @ 111528:                  PUSHI  #0x00000076
13011 @ 111533:                  SLABEL 230
13012 @ 111536:                  LINE   1804 "regression-compile-tmp/comp412.imp"
13013 @ 111574:                  PUSH   DCLASS
13014 @ 111577:                  PUSHI  #0x00000036
13015 @ 111582:                  JUMPIF = L_0004

  1805           BP SIZE=BP SIZE-1
13016 @ 111586:                  LINE   1805 "regression-compile-tmp/comp412.imp"
13017 @ 111624:                  PUSH   BPSIZE
13018 @ 111627:                  PUSH   BPSIZE
13019 @ 111630:                  PUSHI  #0x00000001
13020 @ 111635:                  SUB   
13021 @ 111636:                  ASSVAL

  1806           %IF BP SIZE <= 0 %START
13022 @ 111637:                  LINE   1806 "regression-compile-tmp/comp412.imp"
13023 @ 111675:                  PUSH   BPSIZE
13024 @ 111678:                  PUSHI  #0x00000000
13025 @ 111683:                  JUMPIF > L_0007

  1807  OF:          ATOM POS=0; FAULT(16)
13026 @ 111687:                  LINE   1807 "regression-compile-tmp/comp412.imp"
13027 @ 111725:                  LABEL  L_0116
13028 @ 111728:                  LINE   1807 "regression-compile-tmp/comp412.imp"
13029 @ 111766:                  PUSH   ATOMPOS
13030 @ 111769:                  PUSHI  #0x00000000
13031 @ 111774:                  ASSVAL
13032 @ 111775:                  LINE   1807 "regression-compile-tmp/comp412.imp"
13033 @ 111813:                  PUSH   FAULT
13034 @ 111816:                  PUSHI  #0x00000010
13035 @ 111821:                  ASSPAR
13036 @ 111822:                  CALL  

  1808              OUT=0
13037 @ 111823:                  LINE   1808 "regression-compile-tmp/comp412.imp"
13038 @ 111861:                  PUSH   OUT
13039 @ 111864:                  PUSHI  #0x00000000
13040 @ 111869:                  ASSVAL

  1809              -> RETURN
13041 @ 111870:                  LINE   1809 "regression-compile-tmp/comp412.imp"
13042 @ 111908:                  JUMP   L_0110

  1810           %FINISH
13043 @ 111911:                  LINE   1810 "regression-compile-tmp/comp412.imp"
13044 @ 111949:                  LOCATE L_0007

  1811        %FINISH
13045 @ 111952:                  LINE   1811 "regression-compile-tmp/comp412.imp"
13046 @ 111990:                  LOCATE L_0004

  1812  OSEP:  PUT('A')
13047 @ 111993:                  LINE   1812 "regression-compile-tmp/comp412.imp"
13048 @ 112031:                  LABEL  L_0117
13049 @ 112034:                  LINE   1812 "regression-compile-tmp/comp412.imp"
13050 @ 112072:                  PUSH   PUT
13051 @ 112075:                  PUSHI  #0x00000041
13052 @ 112080:                  ASSPAR
13053 @ 112081:                  CALL  

  1813        EXTRA(OWN DEF) %IF OWN DEF > 1
13054 @ 112082:                  LINE   1813 "regression-compile-tmp/comp412.imp"
13055 @ 112120:                  PUSH   OWNDEF
13056 @ 112123:                  PUSHI  #0x00000001
13057 @ 112128:                  JUMPIF <= L_0004
13058 @ 112132:                  PUSH   EXTRA
13059 @ 112135:                  PUSH   OWNDEF
13060 @ 112138:                  ASSPAR
13061 @ 112139:                  CALL  
13062 @ 112140:                  LOCATE L_0004

  1814        OWN DEF=0;  LIT1 = 0
13063 @ 112143:                  LINE   1814 "regression-compile-tmp/comp412.imp"
13064 @ 112181:                  PUSH   OWNDEF
13065 @ 112184:                  PUSHI  #0x00000000
13066 @ 112189:                  ASSVAL
13067 @ 112190:                  LINE   1814 "regression-compile-tmp/comp412.imp"
13068 @ 112228:                  PUSH   LIT1
13069 @ 112231:                  PUSHI  #0x00000000
13070 @ 112236:                  ASSVAL

  1815        -> CONT
13071 @ 112237:                  LINE   1815 "regression-compile-tmp/comp412.imp"
13072 @ 112275:                  JUMP   L_010e

  1816  C(117): BP SIZE=BP SIZE-1 %IF OUT#0;        ! OWNT
13073 @ 112278:                  LINE   1816 "regression-compile-tmp/comp412.imp"
13074 @ 112316:                  PUSHI  #0x00000075
13075 @ 112321:                  SLABEL 230
13076 @ 112324:                  LINE   1816 "regression-compile-tmp/comp412.imp"
13077 @ 112362:                  PUSH   OUT
13078 @ 112365:                  PUSHI  #0x00000000
13079 @ 112370:                  JUMPIF = L_0004
13080 @ 112374:                  PUSH   BPSIZE
13081 @ 112377:                  PUSH   BPSIZE
13082 @ 112380:                  PUSHI  #0x00000001
13083 @ 112385:                  SUB   
13084 @ 112386:                  ASSVAL
13085 @ 112387:                  LOCATE L_0004

  1817        OUT=0
13086 @ 112390:                  LINE   1817 "regression-compile-tmp/comp412.imp"
13087 @ 112428:                  PUSH   OUT
13088 @ 112431:                  PUSHI  #0x00000000
13089 @ 112436:                  ASSVAL

  1818        -> OSEP %IF BP SIZE=0
13090 @ 112437:                  LINE   1818 "regression-compile-tmp/comp412.imp"
13091 @ 112475:                  PUSH   BPSIZE
13092 @ 112478:                  PUSHI  #0x00000000
13093 @ 112483:                  JUMPIF # L_0004
13094 @ 112487:                  JUMP   L_0117
13095 @ 112490:                  LOCATE L_0004

  1819        BP SIZE=0
13096 @ 112493:                  LINE   1819 "regression-compile-tmp/comp412.imp"
13097 @ 112531:                  PUSH   BPSIZE
13098 @ 112534:                  PUSHI  #0x00000000
13099 @ 112539:                  ASSVAL

  1820        -> OF %IF BUFFER(BPT)='A' %OR LIT = CODE
13100 @ 112540:                  LINE   1820 "regression-compile-tmp/comp412.imp"
13101 @ 112578:                  PUSH   BUFFER
13102 @ 112581:                  PUSH   BPT
13103 @ 112584:                  ACCESS
13104 @ 112585:                  PUSHI  #0x00000041
13105 @ 112590:                  JUMPIF = L_0005
13106 @ 112594:                  PUSH   LIT
13107 @ 112597:                  PUSH   CODE
13108 @ 112600:                  JUMPIF # L_0004
13109 @ 112604:                  LOCATE L_0005
13110 @ 112607:                  JUMP   L_0116
13111 @ 112610:                  LOCATE L_0004

  1821        PUT('I');                            ! INDICATE CLEAR
13112 @ 112613:                  LINE   1821 "regression-compile-tmp/comp412.imp"
13113 @ 112651:                  PUSH   PUT
13114 @ 112654:                  PUSHI  #0x00000049
13115 @ 112659:                  ASSPAR
13116 @ 112660:                  CALL  

  1822        -> CONT
13117 @ 112661:                  LINE   1822 "regression-compile-tmp/comp412.imp"
13118 @ 112699:                  JUMP   L_010e

  1823  C(110):                                     ! LRB
13119 @ 112702:                  LINE   1823 "regression-compile-tmp/comp412.imp"
13120 @ 112740:                  PUSHI  #0x0000006e
13121 @ 112745:                  SLABEL 230

  1824  C(111):                                     ! RRB
13122 @ 112748:                  LINE   1824 "regression-compile-tmp/comp412.imp"
13123 @ 112786:                  PUSHI  #0x0000006f
13124 @ 112791:                  SLABEL 230

  1825        -> CONT
13125 @ 112794:                  LINE   1825 "regression-compile-tmp/comp412.imp"
13126 @ 112832:                  JUMP   L_010e

  1826  C(127):PUT('A'+32);  -> CONT
13127 @ 112835:                  LINE   1826 "regression-compile-tmp/comp412.imp"
13128 @ 112873:                  PUSHI  #0x0000007f
13129 @ 112878:                  SLABEL 230
13130 @ 112881:                  LINE   1826 "regression-compile-tmp/comp412.imp"
13131 @ 112919:                  PUSH   PUT
13132 @ 112922:                  PUSHI  #0x00000041
13133 @ 112927:                  PUSHI  #0x00000020
13134 @ 112932:                  ADD   
13135 @ 112933:                  ASSPAR
13136 @ 112934:                  CALL  
13137 @ 112935:                  LINE   1826 "regression-compile-tmp/comp412.imp"
13138 @ 112973:                  JUMP   L_010e

  1827  D(54): OWN DEF=OWN DEF+1;                   ! OWNVTYPE
13139 @ 112976:                  LINE   1827 "regression-compile-tmp/comp412.imp"
13140 @ 113014:                  PUSHI  #0x00000036
13141 @ 113019:                  SLABEL 231
13142 @ 113022:                  LINE   1827 "regression-compile-tmp/comp412.imp"
13143 @ 113060:                  PUSH   OWNDEF
13144 @ 113063:                  PUSH   OWNDEF
13145 @ 113066:                  PUSHI  #0x00000001
13146 @ 113071:                  ADD   
13147 @ 113072:                  ASSVAL

  1828        DICT(X-2) = LIT1 %IF CONST INT # 0
13148 @ 113073:                  LINE   1828 "regression-compile-tmp/comp412.imp"
13149 @ 113111:                  PUSH   CONSTINT
13150 @ 113114:                  PUSHI  #0x00000000
13151 @ 113119:                  JUMPIF = L_0004
13152 @ 113123:                  PUSH   DICT
13153 @ 113126:                  PUSH   X
13154 @ 113129:                  PUSHI  #0x00000002
13155 @ 113134:                  SUB   
13156 @ 113135:                  ACCESS
13157 @ 113136:                  PUSH   LIT1
13158 @ 113139:                  ASSVAL
13159 @ 113140:                  LOCATE L_0004

  1829        -> DDD
13160 @ 113143:                  LINE   1829 "regression-compile-tmp/comp412.imp"
13161 @ 113181:                  JUMP   L_0118

  1830  D(57):                                      ! SWITCH
13162 @ 113184:                  LINE   1830 "regression-compile-tmp/comp412.imp"
13163 @ 113222:                  PUSHI  #0x00000039
13164 @ 113227:                  SLABEL 231

  1831        %IF LIT=CODE %THEN %START;           ! SWITCH DEF
13165 @ 113230:                  LINE   1831 "regression-compile-tmp/comp412.imp"
13166 @ 113268:                  PUSH   LIT
13167 @ 113271:                  PUSH   CODE
13168 @ 113274:                  JUMPIF # L_0004

  1832           PUT('W'+32)
13169 @ 113278:                  LINE   1832 "regression-compile-tmp/comp412.imp"
13170 @ 113316:                  PUSH   PUT
13171 @ 113319:                  PUSHI  #0x00000057
13172 @ 113324:                  PUSHI  #0x00000020
13173 @ 113329:                  ADD   
13174 @ 113330:                  ASSPAR
13175 @ 113331:                  CALL  

  1833           DICT(X-2)=T LIMIT-1
13176 @ 113332:                  LINE   1833 "regression-compile-tmp/comp412.imp"
13177 @ 113370:                  PUSH   DICT
13178 @ 113373:                  PUSH   X
13179 @ 113376:                  PUSHI  #0x00000002
13180 @ 113381:                  SUB   
13181 @ 113382:                  ACCESS
13182 @ 113383:                  PUSH   TLIMIT
13183 @ 113386:                  PUSHI  #0x00000001
13184 @ 113391:                  SUB   
13185 @ 113392:                  ASSVAL

  1834           DICT(TLIMIT-1)=LIT2;              ! LOWER BOUND
13186 @ 113393:                  LINE   1834 "regression-compile-tmp/comp412.imp"
13187 @ 113431:                  PUSH   DICT
13188 @ 113434:                  PUSH   TLIMIT
13189 @ 113437:                  PUSHI  #0x00000001
13190 @ 113442:                  SUB   
13191 @ 113443:                  ACCESS
13192 @ 113444:                  PUSH   LIT2
13193 @ 113447:                  ASSVAL

  1835           DICT(TLIMIT-2)=LIT1;              ! UPPER BOUND
13194 @ 113448:                  LINE   1835 "regression-compile-tmp/comp412.imp"
13195 @ 113486:                  PUSH   DICT
13196 @ 113489:                  PUSH   TLIMIT
13197 @ 113492:                  PUSHI  #0x00000002
13198 @ 113497:                  SUB   
13199 @ 113498:                  ACCESS
13200 @ 113499:                  PUSH   LIT1
13201 @ 113502:                  ASSVAL

  1836           %IF LIT1 < LIT2 %START;           ! BOUNDS INSIDE-OUT
13202 @ 113503:                  LINE   1836 "regression-compile-tmp/comp412.imp"
13203 @ 113541:                  PUSH   LIT1
13204 @ 113544:                  PUSH   LIT2
13205 @ 113547:                  JUMPIF >= L_0007

  1837              ATOM POS=0; FAULT(4)
13206 @ 113551:                  LINE   1837 "regression-compile-tmp/comp412.imp"
13207 @ 113589:                  PUSH   ATOMPOS
13208 @ 113592:                  PUSHI  #0x00000000
13209 @ 113597:                  ASSVAL
13210 @ 113598:                  LINE   1837 "regression-compile-tmp/comp412.imp"
13211 @ 113636:                  PUSH   FAULT
13212 @ 113639:                  PUSHI  #0x00000004
13213 @ 113644:                  ASSPAR
13214 @ 113645:                  CALL  

  1838              LIT1=LIT2
13215 @ 113646:                  LINE   1838 "regression-compile-tmp/comp412.imp"
13216 @ 113684:                  PUSH   LIT1
13217 @ 113687:                  PUSH   LIT2
13218 @ 113690:                  ASSVAL

  1839           %FINISH
13219 @ 113691:                  LINE   1839 "regression-compile-tmp/comp412.imp"
13220 @ 113729:                  LOCATE L_0007

  1840           K=LIT1-LIT2+1
13221 @ 113732:                  LINE   1840 "regression-compile-tmp/comp412.imp"
13222 @ 113770:                  PUSH   K
13223 @ 113773:                  PUSH   LIT1
13224 @ 113776:                  PUSH   LIT2
13225 @ 113779:                  SUB   
13226 @ 113780:                  PUSHI  #0x00000001
13227 @ 113785:                  ADD   
13228 @ 113786:                  ASSVAL

  1841           K=(K+15)>>4;                      ! ENTRIES NEEDED
13229 @ 113787:                  LINE   1841 "regression-compile-tmp/comp412.imp"
13230 @ 113825:                  PUSH   K
13231 @ 113828:                  PUSH   K
13232 @ 113831:                  PUSHI  #0x0000000f
13233 @ 113836:                  ADD   
13234 @ 113837:                  PUSHI  #0x00000004
13235 @ 113842:                  RSH   
13236 @ 113843:                  ASSVAL

  1842           TLIMIT=TLIMIT-K-3
13237 @ 113844:                  LINE   1842 "regression-compile-tmp/comp412.imp"
13238 @ 113882:                  PUSH   TLIMIT
13239 @ 113885:                  PUSH   TLIMIT
13240 @ 113888:                  PUSH   K
13241 @ 113891:                  SUB   
13242 @ 113892:                  PUSHI  #0x00000003
13243 @ 113897:                  SUB   
13244 @ 113898:                  ASSVAL

  1843           FAULT(23) %IF T LIMIT <= TMAX
13245 @ 113899:                  LINE   1843 "regression-compile-tmp/comp412.imp"
13246 @ 113937:                  PUSH   TLIMIT
13247 @ 113940:                  PUSH   TMAX
13248 @ 113943:                  JUMPIF > L_0007
13249 @ 113947:                  PUSH   FAULT
13250 @ 113950:                  PUSHI  #0x00000017
13251 @ 113955:                  ASSPAR
13252 @ 113956:                  CALL  
13253 @ 113957:                  LOCATE L_0007

  1844           DICT(L)=0 %FOR L = TLIMIT,1,TLIMIT+K
13254 @ 113960:                  LINE   1844 "regression-compile-tmp/comp412.imp"
13255 @ 113998:                  PUSH   L
13256 @ 114001:                  PUSHI  #0x00000001
13257 @ 114006:                  PUSH   TLIMIT
13258 @ 114009:                  PUSH   K
13259 @ 114012:                  ADD   
13260 @ 114013:                  PUSH   TLIMIT
13261 @ 114016:                  FOR    L_0006
13262 @ 114019:                  PUSH   DICT
13263 @ 114022:                  PUSH   L
13264 @ 114025:                  ACCESS
13265 @ 114026:                  PUSHI  #0x00000000
13266 @ 114031:                  ASSVAL
13267 @ 114032:                  REPEAT L_0006
13268 @ 114035:                  LOCATE L_0007

  1845        %FINISH
13269 @ 114038:                  LINE   1845 "regression-compile-tmp/comp412.imp"
13270 @ 114076:                  LOCATE L_0004

  1846  D(50):                                      ! RTYPE
13271 @ 114079:                  LINE   1846 "regression-compile-tmp/comp412.imp"
13272 @ 114117:                  PUSHI  #0x00000032
13273 @ 114122:                  SLABEL 231

  1847        OP('F',0) %IF DCLASS=50 %AND DEC TYPE#84 %AND SPEC >= 0 %C
  1848                                %AND LEVEL # 0
  1849                                            ! JUMP ROUND ROUTINE
13274 @ 114125:                  LINE   1847 "regression-compile-tmp/comp412.imp"
13275 @ 114163:                  PUSH   DCLASS
13276 @ 114166:                  PUSHI  #0x00000032
13277 @ 114171:                  JUMPIF # L_0004
13278 @ 114175:                  PUSH   DECTYPE
13279 @ 114178:                  PUSHI  #0x00000054
13280 @ 114183:                  JUMPIF = L_0004
13281 @ 114187:                  PUSH   SPEC
13282 @ 114190:                  PUSHI  #0x00000000
13283 @ 114195:                  JUMPIF < L_0004
13284 @ 114199:                  PUSH   LEVEL
13285 @ 114202:                  PUSHI  #0x00000000
13286 @ 114207:                  JUMPIF = L_0004
13287 @ 114211:                  PUSH   OP
13288 @ 114214:                  PUSHI  #0x00000046
13289 @ 114219:                  ASSPAR
13290 @ 114220:                  PUSHI  #0x00000000
13291 @ 114225:                  ASSPAR
13292 @ 114226:                  CALL  
13293 @ 114227:                  LOCATE L_0004

  1850  D(56):                                      ! TYPE
13294 @ 114230:                  LINE   1850 "regression-compile-tmp/comp412.imp"
13295 @ 114268:                  PUSHI  #0x00000038
13296 @ 114273:                  SLABEL 231

  1851  D(53):                                      ! VTYPE
13297 @ 114276:                  LINE   1851 "regression-compile-tmp/comp412.imp"
13298 @ 114314:                  PUSHI  #0x00000035
13299 @ 114319:                  SLABEL 231

  1852  DDD:   DEF(X)
13300 @ 114322:                  LINE   1852 "regression-compile-tmp/comp412.imp"
13301 @ 114360:                  LABEL  L_0118
13302 @ 114363:                  LINE   1852 "regression-compile-tmp/comp412.imp"
13303 @ 114401:                  PUSH   DEF
13304 @ 114404:                  PUSH   X
13305 @ 114407:                  ASSPAR
13306 @ 114408:                  CALL  

  1853        -> CONT
13307 @ 114409:                  LINE   1853 "regression-compile-tmp/comp412.imp"
13308 @ 114447:                  JUMP   L_010e

  1854  D(51):                                      ! ARRAY DEC
13309 @ 114450:                  LINE   1854 "regression-compile-tmp/comp412.imp"
13310 @ 114488:                  PUSHI  #0x00000033
13311 @ 114493:                  SLABEL 231

  1855        %IF DIM#0 %START;                    ! SET UP DOPE VECTOR
13312 @ 114496:                  LINE   1855 "regression-compile-tmp/comp412.imp"
13313 @ 114534:                  PUSH   DIM
13314 @ 114537:                  PUSHI  #0x00000000
13315 @ 114542:                  JUMPIF = L_0004

  1856           OP('D'+32, DIM);  DIM = 0
13316 @ 114546:                  LINE   1856 "regression-compile-tmp/comp412.imp"
13317 @ 114584:                  PUSH   OP
13318 @ 114587:                  PUSHI  #0x00000044
13319 @ 114592:                  PUSHI  #0x00000020
13320 @ 114597:                  ADD   
13321 @ 114598:                  ASSPAR
13322 @ 114599:                  PUSH   DIM
13323 @ 114602:                  ASSPAR
13324 @ 114603:                  CALL  
13325 @ 114604:                  LINE   1856 "regression-compile-tmp/comp412.imp"
13326 @ 114642:                  PUSH   DIM
13327 @ 114645:                  PUSHI  #0x00000000
13328 @ 114650:                  ASSVAL

  1857        %FINISH
13329 @ 114651:                  LINE   1857 "regression-compile-tmp/comp412.imp"
13330 @ 114689:                  LOCATE L_0004

  1858        DEF(X);  PUT('H'+32)
13331 @ 114692:                  LINE   1858 "regression-compile-tmp/comp412.imp"
13332 @ 114730:                  PUSH   DEF
13333 @ 114733:                  PUSH   X
13334 @ 114736:                  ASSPAR
13335 @ 114737:                  CALL  
13336 @ 114738:                  LINE   1858 "regression-compile-tmp/comp412.imp"
13337 @ 114776:                  PUSH   PUT
13338 @ 114779:                  PUSHI  #0x00000048
13339 @ 114784:                  PUSHI  #0x00000020
13340 @ 114789:                  ADD   
13341 @ 114790:                  ASSPAR
13342 @ 114791:                  CALL  

  1859        PUT('C'+32) %IF DICT(X-1)&15#13;        ! NO SPACE FOR FORMATS
13343 @ 114792:                  LINE   1859 "regression-compile-tmp/comp412.imp"
13344 @ 114830:                  PUSH   DICT
13345 @ 114833:                  PUSH   X
13346 @ 114836:                  PUSHI  #0x00000001
13347 @ 114841:                  SUB   
13348 @ 114842:                  ACCESS
13349 @ 114843:                  PUSHI  #0x0000000f
13350 @ 114848:                  AND   
13351 @ 114849:                  PUSHI  #0x0000000d
13352 @ 114854:                  JUMPIF = L_0004
13353 @ 114858:                  PUSH   PUT
13354 @ 114861:                  PUSHI  #0x00000043
13355 @ 114866:                  PUSHI  #0x00000020
13356 @ 114871:                  ADD   
13357 @ 114872:                  ASSPAR
13358 @ 114873:                  CALL  
13359 @ 114874:                  LOCATE L_0004

  1860        -> CONT
13360 @ 114877:                  LINE   1860 "regression-compile-tmp/comp412.imp"
13361 @ 114915:                  JUMP   L_010e

  1861  D(52): DEF(X);  OUT=TYPE;                   ! OWNARRAY
13362 @ 114918:                  LINE   1861 "regression-compile-tmp/comp412.imp"
13363 @ 114956:                  PUSHI  #0x00000034
13364 @ 114961:                  SLABEL 231
13365 @ 114964:                  LINE   1861 "regression-compile-tmp/comp412.imp"
13366 @ 115002:                  PUSH   DEF
13367 @ 115005:                  PUSH   X
13368 @ 115008:                  ASSPAR
13369 @ 115009:                  CALL  
13370 @ 115010:                  LINE   1861 "regression-compile-tmp/comp412.imp"
13371 @ 115048:                  PUSH   OUT
13372 @ 115051:                  PUSH   TYPE
13373 @ 115054:                  ASSVAL

  1862        BPSIZE = 1 %IF TYPE = 15;            ! EXTRINSICS
13374 @ 115055:                  LINE   1862 "regression-compile-tmp/comp412.imp"
13375 @ 115093:                  PUSH   TYPE
13376 @ 115096:                  PUSHI  #0x0000000f
13377 @ 115101:                  JUMPIF # L_0004
13378 @ 115105:                  PUSH   BPSIZE
13379 @ 115108:                  PUSHI  #0x00000001
13380 @ 115113:                  ASSVAL
13381 @ 115114:                  LOCATE L_0004

  1863        ->CONT
13382 @ 115117:                  LINE   1863 "regression-compile-tmp/comp412.imp"
13383 @ 115155:                  JUMP   L_010e

  1864  C(49):                                      ! BEGEND
13384 @ 115158:                  LINE   1864 "regression-compile-tmp/comp412.imp"
13385 @ 115196:                  PUSHI  #0x00000031
13386 @ 115201:                  SLABEL 230

  1865        %IF X=15 %THEN PUT('H') %AND XX=NULL STRING %ELSE C END
13387 @ 115204:                  LINE   1865 "regression-compile-tmp/comp412.imp"
13388 @ 115242:                  PUSH   X
13389 @ 115245:                  PUSHI  #0x0000000f
13390 @ 115250:                  JUMPIF # L_0004
13391 @ 115254:                  PUSH   PUT
13392 @ 115257:                  PUSHI  #0x00000048
13393 @ 115262:                  ASSPAR
13394 @ 115263:                  CALL  
13395 @ 115264:                  PUSH   XX
13396 @ 115267:                  PUSHI  #0x00000191
13397 @ 115272:                  ASSVAL
13398 @ 115273:                  GOTO   L_0003
13399 @ 115276:                  LOCATE L_0004
13400 @ 115279:                  PUSH   CEND
13401 @ 115282:                  CALL  
13402 @ 115283:                  LOCATE L_0003

  1866  RETURN:
  1867                                            !
  1868                                            ! DEAL WITH LABELS
  1869                                            !
13403 @ 115286:                  LINE   1866 "regression-compile-tmp/comp412.imp"
13404 @ 115324:                  LABEL  L_0110

  1870        OP('B',LOOP LAB) %IF LOOP LAB#0
13405 @ 115327:                  LINE   1870 "regression-compile-tmp/comp412.imp"
13406 @ 115365:                  PUSH   LOOPLAB
13407 @ 115368:                  PUSHI  #0x00000000
13408 @ 115373:                  JUMPIF = L_0004
13409 @ 115377:                  PUSH   OP
13410 @ 115380:                  PUSHI  #0x00000042
13411 @ 115385:                  ASSPAR
13412 @ 115386:                  PUSH   LOOPLAB
13413 @ 115389:                  ASSPAR
13414 @ 115390:                  CALL  
13415 @ 115391:                  LOCATE L_0004

  1871        DEF LAB(EILAB) %IF EILAB # 0 %AND EILAB # PLAB
13416 @ 115394:                  LINE   1871 "regression-compile-tmp/comp412.imp"
13417 @ 115432:                  PUSH   EILAB
13418 @ 115435:                  PUSHI  #0x00000000
13419 @ 115440:                  JUMPIF = L_0004
13420 @ 115444:                  PUSH   EILAB
13421 @ 115447:                  PUSH   PLAB
13422 @ 115450:                  JUMPIF = L_0004
13423 @ 115454:                  PUSH   DEFLAB
13424 @ 115457:                  PUSH   EILAB
13425 @ 115460:                  ASSPAR
13426 @ 115461:                  CALL  
13427 @ 115462:                  LOCATE L_0004

  1872        DEF LAB(P LAB) %IF P LAB#0
13428 @ 115465:                  LINE   1872 "regression-compile-tmp/comp412.imp"
13429 @ 115503:                  PUSH   PLAB
13430 @ 115506:                  PUSHI  #0x00000000
13431 @ 115511:                  JUMPIF = L_0004
13432 @ 115515:                  PUSH   DEFLAB
13433 @ 115518:                  PUSH   PLAB
13434 @ 115521:                  ASSPAR
13435 @ 115522:                  CALL  
13436 @ 115523:                  LOCATE L_0004

  1873     %END;                                   ! OF COMPILE SS
13437 @ 115526:                  LINE   1873 "regression-compile-tmp/comp412.imp"
13438 @ 115564:               END    _lev0id0_COMPILEBLOCK_COMPILESS {lev=3 --> 2}

  1874     %IF BLOCK TYPE=0 %START;                ! RECORD FORMAT
13439 @ 115565:               LINE   1874 "regression-compile-tmp/comp412.imp"
13440 @ 115603:               PUSH   BLOCKTYPE
13441 @ 115606:               PUSHI  #0x00000000
13442 @ 115611:               JUMPIF # L_0004

  1875        ANALYSE SS(-1)
13443 @ 115615:               LINE   1875 "regression-compile-tmp/comp412.imp"
13444 @ 115653:               PUSH   ANALYSESS
13445 @ 115656:               PUSHI  #0x00000001
13446 @ 115661:               NEGATE
13447 @ 115662:               ASSPAR
13448 @ 115663:               CALL  

  1876        XX=X-2
13449 @ 115664:               LINE   1876 "regression-compile-tmp/comp412.imp"
13450 @ 115702:               PUSH   XX
13451 @ 115705:               PUSH   X
13452 @ 115708:               PUSHI  #0x00000002
13453 @ 115713:               SUB   
13454 @ 115714:               ASSVAL

  1877        OP('G', 2)
13455 @ 115715:               LINE   1877 "regression-compile-tmp/comp412.imp"
13456 @ 115753:               PUSH   OP
13457 @ 115756:               PUSHI  #0x00000047
13458 @ 115761:               ASSPAR
13459 @ 115762:               PUSHI  #0x00000002
13460 @ 115767:               ASSPAR
13461 @ 115768:               CALL  

  1878        COMPILE SS %IF SS#0
13462 @ 115769:               LINE   1878 "regression-compile-tmp/comp412.imp"
13463 @ 115807:               PUSH   SS
13464 @ 115810:               PUSHI  #0x00000000
13465 @ 115815:               JUMPIF = L_0007
13466 @ 115819:               PUSH   COMPILESS
13467 @ 115822:               CALL  
13468 @ 115823:               LOCATE L_0007

  1879        OP('G',2);                           ! FORMAT END
13469 @ 115826:               LINE   1879 "regression-compile-tmp/comp412.imp"
13470 @ 115864:               PUSH   OP
13471 @ 115867:               PUSHI  #0x00000047
13472 @ 115872:               ASSPAR
13473 @ 115873:               PUSHI  #0x00000002
13474 @ 115878:               ASSPAR
13475 @ 115879:               CALL  

  1880        -> L9
13476 @ 115880:               LINE   1880 "regression-compile-tmp/comp412.imp"
13477 @ 115918:               JUMP   L_00e2

  1881     %FINISH
13478 @ 115921:               LINE   1881 "regression-compile-tmp/comp412.imp"
13479 @ 115959:               LOCATE L_0004

  1882     %IF BLOCKTYPE&15#15 %START;             ! NOT BEGIN
13480 @ 115962:               LINE   1882 "regression-compile-tmp/comp412.imp"
13481 @ 116000:               PUSH   BLOCKTYPE
13482 @ 116003:               PUSHI  #0x0000000f
13483 @ 116008:               AND   
13484 @ 116009:               PUSHI  #0x0000000f
13485 @ 116014:               JUMPIF = L_0004

  1883        ANALYSE SS(1);                       ! FORMAL PARAMETERS
13486 @ 116018:               LINE   1883 "regression-compile-tmp/comp412.imp"
13487 @ 116056:               PUSH   ANALYSESS
13488 @ 116059:               PUSHI  #0x00000001
13489 @ 116064:               ASSPAR
13490 @ 116065:               CALL  

  1884        %IF SPEC < 0 %THEN K = 0 %ELSE K = 1
13491 @ 116066:               LINE   1884 "regression-compile-tmp/comp412.imp"
13492 @ 116104:               PUSH   SPEC
13493 @ 116107:               PUSHI  #0x00000000
13494 @ 116112:               JUMPIF >= L_0007
13495 @ 116116:               PUSH   K
13496 @ 116119:               PUSHI  #0x00000000
13497 @ 116124:               ASSVAL
13498 @ 116125:               GOTO   L_0006
13499 @ 116128:               LOCATE L_0007
13500 @ 116131:               PUSH   K
13501 @ 116134:               PUSHI  #0x00000001
13502 @ 116139:               ASSVAL
13503 @ 116140:               LOCATE L_0006

  1885        OP('G', K)
13504 @ 116143:               LINE   1885 "regression-compile-tmp/comp412.imp"
13505 @ 116181:               PUSH   OP
13506 @ 116184:               PUSHI  #0x00000047
13507 @ 116189:               ASSPAR
13508 @ 116190:               PUSH   K
13509 @ 116193:               ASSPAR
13510 @ 116194:               CALL  

  1886        COMPILE SS %IF SS # 0
13511 @ 116195:               LINE   1886 "regression-compile-tmp/comp412.imp"
13512 @ 116233:               PUSH   SS
13513 @ 116236:               PUSHI  #0x00000000
13514 @ 116241:               JUMPIF = L_0007
13515 @ 116245:               PUSH   COMPILESS
13516 @ 116248:               CALL  
13517 @ 116249:               LOCATE L_0007

  1887        OP('G', K)
13518 @ 116252:               LINE   1887 "regression-compile-tmp/comp412.imp"
13519 @ 116290:               PUSH   OP
13520 @ 116293:               PUSHI  #0x00000047
13521 @ 116298:               ASSPAR
13522 @ 116299:               PUSH   K
13523 @ 116302:               ASSPAR
13524 @ 116303:               CALL  

  1888        -> L9 %IF K = 0
13525 @ 116304:               LINE   1888 "regression-compile-tmp/comp412.imp"
13526 @ 116342:               PUSH   K
13527 @ 116345:               PUSHI  #0x00000000
13528 @ 116350:               JUMPIF # L_0007
13529 @ 116354:               JUMP   L_00e2
13530 @ 116357:               LOCATE L_0007

  1889     %FINISH
13531 @ 116360:               LINE   1889 "regression-compile-tmp/comp412.imp"
13532 @ 116398:               LOCATE L_0004

  1890     ACCESS = 1
13533 @ 116401:               LINE   1890 "regression-compile-tmp/comp412.imp"
13534 @ 116439:               PUSH   ACCESS
13535 @ 116442:               PUSHI  #0x00000001
13536 @ 116447:               ASSVAL

  1891     %CYCLE
13537 @ 116448:               LINE   1891 "regression-compile-tmp/comp412.imp"
13538 @ 116486:               LOCATE L_0003

  1892        ANALYSE SS(0)
13539 @ 116489:               LINE   1892 "regression-compile-tmp/comp412.imp"
13540 @ 116527:               PUSH   ANALYSESS
13541 @ 116530:               PUSHI  #0x00000000
13542 @ 116535:               ASSPAR
13543 @ 116536:               CALL  

  1893        XX=X-2
13544 @ 116537:               LINE   1893 "regression-compile-tmp/comp412.imp"
13545 @ 116575:               PUSH   XX
13546 @ 116578:               PUSH   X
13547 @ 116581:               PUSHI  #0x00000002
13548 @ 116586:               SUB   
13549 @ 116587:               ASSVAL

  1894        COMPILE SS %IF SS#0
13550 @ 116588:               LINE   1894 "regression-compile-tmp/comp412.imp"
13551 @ 116626:               PUSH   SS
13552 @ 116629:               PUSHI  #0x00000000
13553 @ 116634:               JUMPIF = L_0007
13554 @ 116638:               PUSH   COMPILESS
13555 @ 116641:               CALL  
13556 @ 116642:               LOCATE L_0007

  1895        COMPILE BLOCK(0,0,DICT(XX)) %IF DEC TYPE=84
13557 @ 116645:               LINE   1895 "regression-compile-tmp/comp412.imp"
13558 @ 116683:               PUSH   DECTYPE
13559 @ 116686:               PUSHI  #0x00000054
13560 @ 116691:               JUMPIF # L_0007
13561 @ 116695:               PUSH   COMPILEBLOCK
13562 @ 116698:               PUSHI  #0x00000000
13563 @ 116703:               ASSPAR
13564 @ 116704:               PUSHI  #0x00000000
13565 @ 116709:               ASSPAR
13566 @ 116710:               PUSH   DICT
13567 @ 116713:               PUSH   XX
13568 @ 116716:               ACCESS
13569 @ 116717:               ASSPAR
13570 @ 116718:               CALL  
13571 @ 116719:               LOCATE L_0007

  1896        %EXIT %IF DECTYPE=85 %OR DEC TYPE=EOP %C
  1897        %OR DEC TYPE=EOF
13572 @ 116722:               LINE   1896 "regression-compile-tmp/comp412.imp"
13573 @ 116760:               PUSH   DECTYPE
13574 @ 116763:               PUSHI  #0x00000055
13575 @ 116768:               JUMPIF = L_0008
13576 @ 116772:               PUSH   DECTYPE
13577 @ 116775:               PUSHI  #0x00000057
13578 @ 116780:               JUMPIF = L_0008
13579 @ 116784:               PUSH   DECTYPE
13580 @ 116787:               PUSHI  #0x00000056
13581 @ 116792:               JUMPIF # L_0007
13582 @ 116796:               LOCATE L_0008
13583 @ 116799:               GOTO   L_0004
13584 @ 116802:               LOCATE L_0007

  1898        %IF 7 <= DECTYPE&15 <= 10 %OR DECTYPE=15 %START
13585 @ 116805:               LINE   1898 "regression-compile-tmp/comp412.imp"
13586 @ 116843:               PUSHI  #0x00000007
13587 @ 116848:               PUSH   DECTYPE
13588 @ 116851:               PUSHI  #0x0000000f
13589 @ 116856:               AND   
13590 @ 116857:               JUMPIFD > L_0009
13591 @ 116861:               PUSHI  #0x0000000a
13592 @ 116866:               JUMPIF <= L_0008
13593 @ 116870:               LOCATE L_0009
13594 @ 116873:               PUSH   DECTYPE
13595 @ 116876:               PUSHI  #0x0000000f
13596 @ 116881:               JUMPIF # L_0007
13597 @ 116885:               LOCATE L_0008

  1899           XX=XX-1 %IF DECTYPE&X'70'=X'50';  ! RECORDMAPS
13598 @ 116888:               LINE   1899 "regression-compile-tmp/comp412.imp"
13599 @ 116926:               PUSH   DECTYPE
13600 @ 116929:               PUSHI  #0x00000070
13601 @ 116934:               AND   
13602 @ 116935:               PUSHI  #0x00000050
13603 @ 116940:               JUMPIF # L_000a
13604 @ 116944:               PUSH   XX
13605 @ 116947:               PUSH   XX
13606 @ 116950:               PUSHI  #0x00000001
13607 @ 116955:               SUB   
13608 @ 116956:               ASSVAL
13609 @ 116957:               LOCATE L_000a

  1900           %IF LEVEL = 0 %AND DECTYPE = 15 %START
13610 @ 116960:               LINE   1900 "regression-compile-tmp/comp412.imp"
13611 @ 116998:               PUSH   LEVEL
13612 @ 117001:               PUSHI  #0x00000000
13613 @ 117006:               JUMPIF # L_000a
13614 @ 117010:               PUSH   DECTYPE
13615 @ 117013:               PUSHI  #0x0000000f
13616 @ 117018:               JUMPIF # L_000a

  1901              %IF FILE = 0 %THEN FILE = 2 %ELSE FAULT(5)
13617 @ 117022:               LINE   1901 "regression-compile-tmp/comp412.imp"
13618 @ 117060:               PUSH   FILE
13619 @ 117063:               PUSHI  #0x00000000
13620 @ 117068:               JUMPIF # L_000d
13621 @ 117072:               PUSH   FILE
13622 @ 117075:               PUSHI  #0x00000002
13623 @ 117080:               ASSVAL
13624 @ 117081:               GOTO   L_000c
13625 @ 117084:               LOCATE L_000d
13626 @ 117087:               PUSH   FAULT
13627 @ 117090:               PUSHI  #0x00000005
13628 @ 117095:               ASSPAR
13629 @ 117096:               CALL  
13630 @ 117097:               LOCATE L_000c

  1902           %FINISH
13631 @ 117100:               LINE   1902 "regression-compile-tmp/comp412.imp"
13632 @ 117138:               LOCATE L_000a

  1903           %IF SPEC > 0 %AND SPREFIX > 3 %AND SPREFIX # 7 %START
13633 @ 117141:               LINE   1903 "regression-compile-tmp/comp412.imp"
13634 @ 117179:               PUSH   SPEC
13635 @ 117182:               PUSHI  #0x00000000
13636 @ 117187:               JUMPIF <= L_000a
13637 @ 117191:               PUSH   SPREFIX
13638 @ 117194:               PUSHI  #0x00000003
13639 @ 117199:               JUMPIF <= L_000a
13640 @ 117203:               PUSH   SPREFIX
13641 @ 117206:               PUSHI  #0x00000007
13642 @ 117211:               JUMPIF = L_000a

  1904              %IF LEVEL # 0 %THEN FAULT(15) %ELSE FILE = 1
13643 @ 117215:               LINE   1904 "regression-compile-tmp/comp412.imp"
13644 @ 117253:               PUSH   LEVEL
13645 @ 117256:               PUSHI  #0x00000000
13646 @ 117261:               JUMPIF = L_000d
13647 @ 117265:               PUSH   FAULT
13648 @ 117268:               PUSHI  #0x0000000f
13649 @ 117273:               ASSPAR
13650 @ 117274:               CALL  
13651 @ 117275:               GOTO   L_000c
13652 @ 117278:               LOCATE L_000d
13653 @ 117281:               PUSH   FILE
13654 @ 117284:               PUSHI  #0x00000001
13655 @ 117289:               ASSVAL
13656 @ 117290:               LOCATE L_000c

  1905           %FINISH
13657 @ 117293:               LINE   1905 "regression-compile-tmp/comp412.imp"
13658 @ 117331:               LOCATE L_000a

  1906           COMPILE BLOCK(LEVEL+1,DECTYPE,DICT(XX))
13659 @ 117334:               LINE   1906 "regression-compile-tmp/comp412.imp"
13660 @ 117372:               PUSH   COMPILEBLOCK
13661 @ 117375:               PUSH   LEVEL
13662 @ 117378:               PUSHI  #0x00000001
13663 @ 117383:               ADD   
13664 @ 117384:               ASSPAR
13665 @ 117385:               PUSH   DECTYPE
13666 @ 117388:               ASSPAR
13667 @ 117389:               PUSH   DICT
13668 @ 117392:               PUSH   XX
13669 @ 117395:               ACCESS
13670 @ 117396:               ASSPAR
13671 @ 117397:               CALL  

  1907           POS=0 %AND %EXIT %C
  1908           %IF DEC TYPE=EOP %OR DEC TYPE=EOF;! PREMATURE END
13672 @ 117398:               LINE   1907 "regression-compile-tmp/comp412.imp"
13673 @ 117436:               PUSH   DECTYPE
13674 @ 117439:               PUSHI  #0x00000057
13675 @ 117444:               JUMPIF = L_000b
13676 @ 117448:               PUSH   DECTYPE
13677 @ 117451:               PUSHI  #0x00000056
13678 @ 117456:               JUMPIF # L_000a
13679 @ 117460:               LOCATE L_000b
13680 @ 117463:               PUSH   POS
13681 @ 117466:               PUSHI  #0x00000000
13682 @ 117471:               ASSVAL
13683 @ 117472:               GOTO   L_0004
13684 @ 117475:               LOCATE L_000a

  1909           %FINISH
13685 @ 117478:               LINE   1909 "regression-compile-tmp/comp412.imp"
13686 @ 117516:               LOCATE L_0007

  1910     %REPEAT
  1911  ! POINT TO JUMP ROUND ROUTINE
13687 @ 117519:               LINE   1910 "regression-compile-tmp/comp412.imp"
13688 @ 117557:               REPEAT L_0003
13689 @ 117560:               LOCATE L_0004

  1912     DEF LAB(0) %UNLESS BLOCK TYPE=15 %OR LEVEL = 0
13690 @ 117563:               LINE   1912 "regression-compile-tmp/comp412.imp"
13691 @ 117601:               PUSH   BLOCKTYPE
13692 @ 117604:               PUSHI  #0x0000000f
13693 @ 117609:               JUMPIF = L_0004
13694 @ 117613:               PUSH   LEVEL
13695 @ 117616:               PUSHI  #0x00000000
13696 @ 117621:               JUMPIF = L_0004
13697 @ 117625:               PUSH   DEFLAB
13698 @ 117628:               PUSHI  #0x00000000
13699 @ 117633:               ASSPAR
13700 @ 117634:               CALL  
13701 @ 117635:               LOCATE L_0004

  1913  L9:  SPEC=1; TMAX=T BASE; T BASE=OLD T BASE
13702 @ 117638:               LINE   1913 "regression-compile-tmp/comp412.imp"
13703 @ 117676:               LABEL  L_00e2
13704 @ 117679:               LINE   1913 "regression-compile-tmp/comp412.imp"
13705 @ 117717:               PUSH   SPEC
13706 @ 117720:               PUSHI  #0x00000001
13707 @ 117725:               ASSVAL
13708 @ 117726:               LINE   1913 "regression-compile-tmp/comp412.imp"
13709 @ 117764:               PUSH   TMAX
13710 @ 117767:               PUSH   TBASE
13711 @ 117770:               ASSVAL
13712 @ 117771:               LINE   1913 "regression-compile-tmp/comp412.imp"
13713 @ 117809:               PUSH   TBASE
13714 @ 117812:               PUSH   OLDTBASE
13715 @ 117815:               ASSVAL

  1914     LABEL = OLD LABEL
13716 @ 117816:               LINE   1914 "regression-compile-tmp/comp412.imp"
13717 @ 117854:               PUSH   LABEL
13718 @ 117857:               PUSH   OLDLABEL
13719 @ 117860:               ASSVAL

  1915     T LIMIT=OLD T LIMIT %IF BLOCK TYPE#0
13720 @ 117861:               LINE   1915 "regression-compile-tmp/comp412.imp"
13721 @ 117899:               PUSH   BLOCKTYPE
13722 @ 117902:               PUSHI  #0x00000000
13723 @ 117907:               JUMPIF = L_0004
13724 @ 117911:               PUSH   TLIMIT
13725 @ 117914:               PUSH   OLDTLIMIT
13726 @ 117917:               ASSVAL
13727 @ 117918:               LOCATE L_0004

  1916     INHIBIT = INHIBIT>>1
13728 @ 117921:               LINE   1916 "regression-compile-tmp/comp412.imp"
13729 @ 117959:               PUSH   INHIBIT
13730 @ 117962:               PUSH   INHIBIT
13731 @ 117965:               PUSHI  #0x00000001
13732 @ 117970:               RSH   
13733 @ 117971:               ASSVAL

  1917  %END;                                       ! COMPILE BLOCK
  1918  
13734 @ 117972:               LINE   1917 "regression-compile-tmp/comp412.imp"
13735 @ 118010:            END    _lev0id0_COMPILEBLOCK {lev=2 --> 1}

  1919  %ROUTINE  SUMMARISE(%INTEGER STREAM)
13736 @ 118011:            LINE   1919 "regression-compile-tmp/comp412.imp"
13737 @ 118049:            DEF    SUMMARISE (_lev0id0_SUMMARISE) p1=V_00cf a/tf=7 b/format=0 c/ostate=0  type=0 (<type:0>) form=7 (routine) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
13738 @ 118070:               START  ( FORMAL PARAMETERS  {lev=2 --> 3, nested=0 --> 1}
13739 @ 118071:                  DEF    STREAM p1=V_00d0 a/tf=11 b/format=1 c/ostate=0  type=1 (integer) form=1 (simple) special=0 (<special:0>) linkage=0 (auto) spec=0 indirect=0 unass=0
13740 @ 118089:               FINISH ) {lev=2}

  1920     SELECT OUTPUT(STREAM)
13741 @ 118090:               LINE   1920 "regression-compile-tmp/comp412.imp"
13742 @ 118128:               PUSH   SELECTOUTPUT
13743 @ 118131:               PUSH   STREAM
13744 @ 118134:               ASSPAR
13745 @ 118135:               CALL  

  1921     %IF FAULTY = 0 %START
13746 @ 118136:               LINE   1921 "regression-compile-tmp/comp412.imp"
13747 @ 118174:               PUSH   FAULTY
13748 @ 118177:               PUSHI  #0x00000000
13749 @ 118182:               JUMPIF # L_0004

  1922        WRITE(STATS,5);  PRINT STRING(" STATEMENTS COMPILED
  1923  ")
13750 @ 118186:               LINE   1922 "regression-compile-tmp/comp412.imp"
13751 @ 118224:               PUSH   WRITE
13752 @ 118227:               PUSH   STATS
13753 @ 118230:               ASSPAR
13754 @ 118231:               PUSHI  #0x00000005
13755 @ 118236:               ASSPAR
13756 @ 118237:               CALL  
13757 @ 118238:               LINE   1922 "regression-compile-tmp/comp412.imp"
13758 @ 118276:               PUSH   PRINTSTRING
13759 @ 118279:               PUSHS  " STATEMENTS COMPILED\n"
13760 @ 118302:               ASSPAR
13761 @ 118303:               CALL  

  1924     %ELSE
13762 @ 118304:               LINE   1924 "regression-compile-tmp/comp412.imp"
13763 @ 118342:               GOTO   L_0003
13764 @ 118345:               LOCATE L_0004

  1925        PRINT STRING("PROGRAM CONTAINS");  WRITE(FAULTY,1)
13765 @ 118348:               LINE   1925 "regression-compile-tmp/comp412.imp"
13766 @ 118386:               PUSH   PRINTSTRING
13767 @ 118389:               PUSHS  "PROGRAM CONTAINS"
13768 @ 118407:               ASSPAR
13769 @ 118408:               CALL  
13770 @ 118409:               LINE   1925 "regression-compile-tmp/comp412.imp"
13771 @ 118447:               PUSH   WRITE
13772 @ 118450:               PUSH   FAULTY
13773 @ 118453:               ASSPAR
13774 @ 118454:               PUSHI  #0x00000001
13775 @ 118459:               ASSPAR
13776 @ 118460:               CALL  

  1926        PRINT STRING(" FAULT");  PRINT SYMBOL('S') %IF FAULTY # 1
13777 @ 118461:               LINE   1926 "regression-compile-tmp/comp412.imp"
13778 @ 118499:               PUSH   PRINTSTRING
13779 @ 118502:               PUSHS  " FAULT"
13780 @ 118510:               ASSPAR
13781 @ 118511:               CALL  
13782 @ 118512:               LINE   1926 "regression-compile-tmp/comp412.imp"
13783 @ 118550:               PUSH   FAULTY
13784 @ 118553:               PUSHI  #0x00000001
13785 @ 118558:               JUMPIF = L_0007
13786 @ 118562:               PUSH   PRINTSYMBOL
13787 @ 118565:               PUSHI  #0x00000053
13788 @ 118570:               ASSPAR
13789 @ 118571:               CALL  
13790 @ 118572:               LOCATE L_0007

  1927        NEWLINE
13791 @ 118575:               LINE   1927 "regression-compile-tmp/comp412.imp"
13792 @ 118613:               PUSH   NEWLINE
13793 @ 118616:               CALL  

  1928     %FINISH
13794 @ 118617:               LINE   1928 "regression-compile-tmp/comp412.imp"
13795 @ 118655:               LOCATE L_0003

  1929     CLOSE OUTPUT;        !  TO ENSURE BUFFER FLUSHING
13796 @ 118658:               LINE   1929 "regression-compile-tmp/comp412.imp"
13797 @ 118696:               PUSH   CLOSEOUTPUT
13798 @ 118699:               CALL  

  1930  %END
  1931  
13799 @ 118700:               LINE   1930 "regression-compile-tmp/comp412.imp"
13800 @ 118738:            END    _lev0id0_SUMMARISE {lev=2 --> 1}

  1932     open input(PRIM, "interdata/prims.imp")
13801 @ 118739:            LINE   1932 "regression-compile-tmp/comp412.imp"
13802 @ 118777:            PUSH   OPENINPUT
13803 @ 118780:            PUSHI  #0x00000002
13804 @ 118785:            ASSPAR
13805 @ 118786:            PUSHS  "interdata/prims.imp"
13806 @ 118807:            ASSPAR
13807 @ 118808:            CALL  

  1933     open input(PROG, "interdata/test.imp")
13808 @ 118809:            LINE   1933 "regression-compile-tmp/comp412.imp"
13809 @ 118847:            PUSH   OPENINPUT
13810 @ 118850:            PUSHI  #0x00000001
13811 @ 118855:            ASSPAR
13812 @ 118856:            PUSHS  "interdata/test.imp"
13813 @ 118876:            ASSPAR
13814 @ 118877:            CALL  

  1934     open output(REPORT, "interdata/test.rpt")
13815 @ 118878:            LINE   1934 "regression-compile-tmp/comp412.imp"
13816 @ 118916:            PUSH   OPENOUTPUT
13817 @ 118919:            PUSHI  #0x00000003
13818 @ 118924:            ASSPAR
13819 @ 118925:            PUSHS  "interdata/test.rpt"
13820 @ 118945:            ASSPAR
13821 @ 118946:            CALL  

  1935     open output(OBJ, "interdata/test.icd")
13822 @ 118947:            LINE   1935 "regression-compile-tmp/comp412.imp"
13823 @ 118985:            PUSH   OPENOUTPUT
13824 @ 118988:            PUSHI  #0x00000002
13825 @ 118993:            ASSPAR
13826 @ 118994:            PUSHS  "interdata/test.icd"
13827 @ 119014:            ASSPAR
13828 @ 119015:            CALL  

  1936     open output(LISTING, "interdata/test.lis")
  1937     
  1938  !!!!   COMREG(0) = -1;      !IN CASE IT BOMBS OUT
13829 @ 119016:            LINE   1936 "regression-compile-tmp/comp412.imp"
13830 @ 119054:            PUSH   OPENOUTPUT
13831 @ 119057:            PUSHI  #0x00000001
13832 @ 119062:            ASSPAR
13833 @ 119063:            PUSHS  "interdata/test.lis"
13834 @ 119083:            ASSPAR
13835 @ 119084:            CALL  

  1939     SELECTOUTPUT(LISTING);  SELECT INPUT(PRIM)
  1940  
13836 @ 119085:            LINE   1939 "regression-compile-tmp/comp412.imp"
13837 @ 119123:            PUSH   SELECTOUTPUT
13838 @ 119126:            PUSHI  #0x00000001
13839 @ 119131:            ASSPAR
13840 @ 119132:            CALL  
13841 @ 119133:            LINE   1939 "regression-compile-tmp/comp412.imp"
13842 @ 119171:            PUSH   SELECTINPUT
13843 @ 119174:            PUSHI  #0x00000002
13844 @ 119179:            ASSPAR
13845 @ 119180:            CALL  

  1941     NEWLINE;  SPACES(5)
13846 @ 119181:            LINE   1941 "regression-compile-tmp/comp412.imp"
13847 @ 119219:            PUSH   NEWLINE
13848 @ 119222:            CALL  
13849 @ 119223:            LINE   1941 "regression-compile-tmp/comp412.imp"
13850 @ 119261:            PUSH   SPACES
13851 @ 119264:            PUSHI  #0x00000005
13852 @ 119269:            ASSPAR
13853 @ 119270:            CALL  

  1942     PRINT STRING("EDINBURGH C.S. IMP COMPILER  VERSION ")
13854 @ 119271:            LINE   1942 "regression-compile-tmp/comp412.imp"
13855 @ 119309:            PUSH   PRINTSTRING
13856 @ 119312:            PUSHS  "EDINBURGH C.S. IMP COMPILER  VERSION "
13857 @ 119351:            ASSPAR
13858 @ 119352:            CALL  

  1943     PRINT STRING(VERSION)
13859 @ 119353:            LINE   1943 "regression-compile-tmp/comp412.imp"
13860 @ 119391:            PUSH   PRINTSTRING
13861 @ 119394:            PUSH   VERSION
13862 @ 119397:            ASSPAR
13863 @ 119398:            CALL  

  1944     NEWLINES(2)
  1945  
13864 @ 119399:            LINE   1944 "regression-compile-tmp/comp412.imp"
13865 @ 119437:            PUSH   NEWLINES
13866 @ 119440:            PUSHI  #0x00000002
13867 @ 119445:            ASSPAR
13868 @ 119446:            CALL  

  1946     control = 0;      ! **** optimise only:  for supervisor maintenance
13869 @ 119447:            LINE   1946 "regression-compile-tmp/comp412.imp"
13870 @ 119485:            PUSH   CONTROL
13871 @ 119488:            PUSHI  #0x00000000
13872 @ 119493:            ASSVAL

  1947     {CONTROL = COMREG(14)};  CGEN(CONTROL);  PUT('Z'+32)
13873 @ 119494:            LINE   1947 "regression-compile-tmp/comp412.imp"
13874 @ 119532:            PUSH   CGEN
13875 @ 119535:            PUSH   CONTROL
13876 @ 119538:            ASSPAR
13877 @ 119539:            CALL  
13878 @ 119540:            LINE   1947 "regression-compile-tmp/comp412.imp"
13879 @ 119578:            PUSH   PUT
13880 @ 119581:            PUSHI  #0x0000005a
13881 @ 119586:            PUSHI  #0x00000020
13882 @ 119591:            ADD   
13883 @ 119592:            ASSPAR
13884 @ 119593:            CALL  

  1948     LIST = 2
13885 @ 119594:            LINE   1948 "regression-compile-tmp/comp412.imp"
13886 @ 119632:            PUSH   LIST
13887 @ 119635:            PUSHI  #0x00000002
13888 @ 119640:            ASSVAL

  1949     CODE=0
13889 @ 119641:            LINE   1949 "regression-compile-tmp/comp412.imp"
13890 @ 119679:            PUSH   CODE
13891 @ 119682:            PUSHI  #0x00000000
13892 @ 119687:            ASSVAL

  1950     LREALS=0;                                ! REALSNORMAL
13893 @ 119688:            LINE   1950 "regression-compile-tmp/comp412.imp"
13894 @ 119726:            PUSH   LREALS
13895 @ 119729:            PUSHI  #0x00000000
13896 @ 119734:            ASSVAL

  1951     FAULTY=0
13897 @ 119735:            LINE   1951 "regression-compile-tmp/comp412.imp"
13898 @ 119773:            PUSH   FAULTY
13899 @ 119776:            PUSHI  #0x00000000
13900 @ 119781:            ASSVAL

  1952     OUT = 0
13901 @ 119782:            LINE   1952 "regression-compile-tmp/comp412.imp"
13902 @ 119820:            PUSH   OUT
13903 @ 119823:            PUSHI  #0x00000000
13904 @ 119828:            ASSVAL

  1953     SYMTYPE=0; PAPP == PHRASE(APPEP);  APP = PAPP
13905 @ 119829:            LINE   1953 "regression-compile-tmp/comp412.imp"
13906 @ 119867:            PUSH   SYMTYPE
13907 @ 119870:            PUSHI  #0x00000000
13908 @ 119875:            ASSVAL
13909 @ 119876:            LINE   1953 "regression-compile-tmp/comp412.imp"
13910 @ 119914:            PUSH   PAPP
13911 @ 119917:            PUSH   PHRASE
13912 @ 119920:            PUSHI  #0x00000099
13913 @ 119925:            ACCESS
13914 @ 119926:            ASSREF
13915 @ 119927:            LINE   1953 "regression-compile-tmp/comp412.imp"
13916 @ 119965:            PUSH   APP
13917 @ 119968:            PUSH   PAPP
13918 @ 119971:            ASSVAL

  1954     STATS=0; LINE NUM=0
13919 @ 119972:            LINE   1954 "regression-compile-tmp/comp412.imp"
13920 @ 120010:            PUSH   STATS
13921 @ 120013:            PUSHI  #0x00000000
13922 @ 120018:            ASSVAL
13923 @ 120019:            LINE   1954 "regression-compile-tmp/comp412.imp"
13924 @ 120057:            PUSH   LINENUM
13925 @ 120060:            PUSHI  #0x00000000
13926 @ 120065:            ASSVAL

  1955     BUFFER(NULL STRING)=0
13927 @ 120066:            LINE   1955 "regression-compile-tmp/comp412.imp"
13928 @ 120104:            PUSH   BUFFER
13929 @ 120107:            PUSHI  #0x00000191
13930 @ 120112:            ACCESS
13931 @ 120113:            PUSHI  #0x00000000
13932 @ 120118:            ASSVAL

  1956     T LIMIT=DICT END-1; G LIMIT=GBASE; LABEL=4
13933 @ 120119:            LINE   1956 "regression-compile-tmp/comp412.imp"
13934 @ 120157:            PUSH   TLIMIT
13935 @ 120160:            PUSHI  #0x00000abe
13936 @ 120165:            PUSHI  #0x00000001
13937 @ 120170:            SUB   
13938 @ 120171:            ASSVAL
13939 @ 120172:            LINE   1956 "regression-compile-tmp/comp412.imp"
13940 @ 120210:            PUSH   GLIMIT
13941 @ 120213:            PUSHI  #0x000001aa
13942 @ 120218:            ASSVAL
13943 @ 120219:            LINE   1956 "regression-compile-tmp/comp412.imp"
13944 @ 120257:            PUSH   LABEL
13945 @ 120260:            PUSHI  #0x00000004
13946 @ 120265:            ASSVAL

  1957     T MAX=GLOBAL; T BASE=GLOBAL
13947 @ 120266:            LINE   1957 "regression-compile-tmp/comp412.imp"
13948 @ 120304:            PUSH   TMAX
13949 @ 120307:            PUSHI  #0x00000000
13950 @ 120312:            ASSVAL
13951 @ 120313:            LINE   1957 "regression-compile-tmp/comp412.imp"
13952 @ 120351:            PUSH   TBASE
13953 @ 120354:            PUSHI  #0x00000000
13954 @ 120359:            ASSVAL

  1958     X=0; ATOM1=0; LAST=0;  INHIBIT = 0
13955 @ 120360:            LINE   1958 "regression-compile-tmp/comp412.imp"
13956 @ 120398:            PUSH   X
13957 @ 120401:            PUSHI  #0x00000000
13958 @ 120406:            ASSVAL
13959 @ 120407:            LINE   1958 "regression-compile-tmp/comp412.imp"
13960 @ 120445:            PUSH   ATOM1
13961 @ 120448:            PUSHI  #0x00000000
13962 @ 120453:            ASSVAL
13963 @ 120454:            LINE   1958 "regression-compile-tmp/comp412.imp"
13964 @ 120492:            PUSH   LAST
13965 @ 120495:            PUSHI  #0x00000000
13966 @ 120500:            ASSVAL
13967 @ 120501:            LINE   1958 "regression-compile-tmp/comp412.imp"
13968 @ 120539:            PUSH   INHIBIT
13969 @ 120542:            PUSHI  #0x00000000
13970 @ 120547:            ASSVAL

  1959     COMPILE BLOCK(0,15,DICT(TLIMIT));        ! COMPILE A BEGIN TO START
13971 @ 120548:            LINE   1959 "regression-compile-tmp/comp412.imp"
13972 @ 120586:            PUSH   COMPILEBLOCK
13973 @ 120589:            PUSHI  #0x00000000
13974 @ 120594:            ASSPAR
13975 @ 120595:            PUSHI  #0x0000000f
13976 @ 120600:            ASSPAR
13977 @ 120601:            PUSH   DICT
13978 @ 120604:            PUSH   TLIMIT
13979 @ 120607:            ACCESS
13980 @ 120608:            ASSPAR
13981 @ 120609:            CALL  

  1960     PUT(';')
13982 @ 120610:            LINE   1960 "regression-compile-tmp/comp412.imp"
13983 @ 120648:            PUSH   PUT
13984 @ 120651:            PUSHI  #0x0000003b
13985 @ 120656:            ASSPAR
13986 @ 120657:            CALL  

  1961     PUT(4);                                  ! TO TERMINATE
13987 @ 120658:            LINE   1961 "regression-compile-tmp/comp412.imp"
13988 @ 120696:            PUSH   PUT
13989 @ 120699:            PUSHI  #0x00000004
13990 @ 120704:            ASSPAR
13991 @ 120705:            CALL  

  1962     SEND;                                    ! CLEAR THE BUFFER
13992 @ 120706:            LINE   1962 "regression-compile-tmp/comp412.imp"
13993 @ 120744:            PUSH   SEND
13994 @ 120747:            CALL  

  1963     SUMMARISE(LISTING)
  1964  !!!!   COMREG(0) = -FAULTY
  1965  !!!!   COMREG(0) = STATS %IF COMREG(0) = 0
13995 @ 120748:            LINE   1963 "regression-compile-tmp/comp412.imp"
13996 @ 120786:            PUSH   SUMMARISE
13997 @ 120789:            PUSHI  #0x00000001
13998 @ 120794:            ASSPAR
13999 @ 120795:            CALL  

  1966     %signal 15,1 %if faulty # 0
14000 @ 120796:            LINE   1966 "regression-compile-tmp/comp412.imp"
14001 @ 120834:            PUSH   FAULTY
14002 @ 120837:            PUSHI  #0x00000000
14003 @ 120842:            JUMPIF = L_0004
14004 @ 120846:            PUSHI  #0x00000001
14005 @ 120851:            EVENT  000f
14006 @ 120854:            LOCATE L_0004

  1967  %ENDOFPROGRAM
14007 @ 120857:            LINE   1967 "regression-compile-tmp/comp412.imp"
14008 @ 120895:         END    _lev0id0 {lev=1 --> 0}
14009 @ 120896:         END     {lev=0 --> -1}
14010 @ 120897: 

