1 ! IMP77 compiler first pass 2 3 !########################################################### 4 ! This program is a Copyright work. # 5 ! # 6 ! Over the last 40+ years a long and distinguished list of # 7 ! institutions, individuals and other entities have made # 8 ! contributions to portions of this program and may have a # 9 ! reasonable claim over rights to certain parts of the # 10 ! program. # 11 ! # 12 ! This version is therefore provided for education and # 13 ! demonstration purposes only # 14 !########################################################### 15 16 %begin 503 @ 4405: LINE 16 "regression-compile-tmp/pass1.imp" 504 @ 4441: BEGIN _lev0id0 {lev=0 --> 1} 17 %conststring(4) version = "8.4" 18 19 !configuration parameters 20 { minus one represents all bits set for an %integer } 21 { %integer could be 16,32,64 bits wide depending on the } 22 { processor being targeted } 23 { i.e 8086 (16 bits), 80386 (32 bits), i86_64 (64 bits) } 505 @ 4442: LINE 17 "regression-compile-tmp/pass1.imp" 506 @ 4478: PUSHS "8.4" 507 @ 4483: DEF VERSION p1=V_0081 a/tf=31 b/format=4 c/ostate=12 type=3 (string) form=1 (simple) special=3 (long-real) linkage=2 (constant) spec=0 indirect=1 unass=0 508 @ 4502: INIT 1 24 %constinteger minus one = -1; 25 ! Wee change needed to cross-compile the compiler when going from 16 bit to 32 bit world 26 ! %constinteger minus one = 16_7fff; 27 28 { now to set up various constants } 509 @ 4505: LINE 24 "regression-compile-tmp/pass1.imp" 29 %constinteger max int = ((minus one)>>1)//10 510 @ 4541: LINE 29 "regression-compile-tmp/pass1.imp" 30 %constinteger max dig = (minus one)>>1-maxint*10 511 @ 4577: LINE 30 "regression-compile-tmp/pass1.imp" 31 %constinteger byte size = 8; !bits per byte 512 @ 4613: LINE 31 "regression-compile-tmp/pass1.imp" 32 %constinteger max tag = 800; !max no. of tags 513 @ 4649: LINE 32 "regression-compile-tmp/pass1.imp" 33 %constinteger max dict = 6000; !max extent of dictionary 514 @ 4685: LINE 33 "regression-compile-tmp/pass1.imp" 34 %constinteger name bits = 11; !size of name table as a power of two 515 @ 4721: LINE 34 "regression-compile-tmp/pass1.imp" 35 %constinteger max names = 1<) linkage=1 (own) spec=0 indirect=0 unass=1 520 @ 4856: INIT 1 37 %constinteger lit max = 50; !max no. of constants/stat. 521 @ 4859: LINE 37 "regression-compile-tmp/pass1.imp" 38 %constinteger rec size = 520; !size of analysis record 522 @ 4895: LINE 38 "regression-compile-tmp/pass1.imp" 39 %constinteger dim limit = 6; !maximum array dimension 40 41 !symbols 523 @ 4931: LINE 39 "regression-compile-tmp/pass1.imp" 42 %constinteger ff = 12; !form feed 524 @ 4967: LINE 42 "regression-compile-tmp/pass1.imp" 43 %constinteger marker = '^'; !marker for faults 525 @ 5003: LINE 43 "regression-compile-tmp/pass1.imp" 44 %constinteger squote = '"'; !string quote 526 @ 5039: LINE 44 "regression-compile-tmp/pass1.imp" 45 %constinteger cquote = ''''; !character quote 46 47 !streams 527 @ 5075: LINE 45 "regression-compile-tmp/pass1.imp" 48 %constinteger report = 0, source = 1 528 @ 5111: LINE 48 "regression-compile-tmp/pass1.imp" 49 %constinteger object = 1, listing = 2 50 51 !types 529 @ 5147: LINE 49 "regression-compile-tmp/pass1.imp" 52 %constinteger integer = 1 530 @ 5183: LINE 52 "regression-compile-tmp/pass1.imp" 53 %constinteger real = 2 531 @ 5219: LINE 53 "regression-compile-tmp/pass1.imp" 54 %constinteger stringv = 3 532 @ 5255: LINE 54 "regression-compile-tmp/pass1.imp" 55 %constinteger record = 4 56 57 !forms 533 @ 5291: LINE 55 "regression-compile-tmp/pass1.imp" 58 %constinteger iform = integer<<4+1 534 @ 5327: LINE 58 "regression-compile-tmp/pass1.imp" 59 %constinteger var = 91 535 @ 5363: LINE 59 "regression-compile-tmp/pass1.imp" 60 %constinteger const = 93 536 @ 5399: LINE 60 "regression-compile-tmp/pass1.imp" 61 %constinteger swit = 105 537 @ 5435: LINE 61 "regression-compile-tmp/pass1.imp" 62 %constinteger comment = 22 538 @ 5471: LINE 62 "regression-compile-tmp/pass1.imp" 63 %constinteger termin = 20 539 @ 5507: LINE 63 "regression-compile-tmp/pass1.imp" 64 %constinteger lab = 3 540 @ 5543: LINE 64 "regression-compile-tmp/pass1.imp" 65 %constinteger jump = 54 541 @ 5579: LINE 65 "regression-compile-tmp/pass1.imp" 66 %constinteger recfm = 4 542 @ 5615: LINE 66 "regression-compile-tmp/pass1.imp" 67 %constinteger proc = 7; !class for proc 68 69 !phrase entries 543 @ 5651: LINE 67 "regression-compile-tmp/pass1.imp" 70 %constinteger escdec = 252 544 @ 5687: LINE 70 "regression-compile-tmp/pass1.imp" 71 %constinteger escproc = 253 545 @ 5723: LINE 71 "regression-compile-tmp/pass1.imp" 72 %constinteger escarray = 254 546 @ 5759: LINE 72 "regression-compile-tmp/pass1.imp" 73 %constinteger escrec = 255 74 75 !%recordformat arfm(%shortinteger class,sub,link,ptype,papp,pformat,x,pos);!imp77: 547 @ 5795: LINE 73 "regression-compile-tmp/pass1.imp" 76 %recordformat arfm(%integer class,sub,link,ptype,papp,pformat,x,pos) 77 548 @ 5831: LINE 76 "regression-compile-tmp/pass1.imp" 549 @ 5867: DEF ARFM p1=V_0083 a/tf=44 b/format=83 c/ostate=0 type=4 (record) form=4 (record-format) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 550 @ 5883: START ( RECORDFORMAT 551 @ 5884: DEF CLASS p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 552 @ 5901: DEF SUB p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 553 @ 5916: DEF LINK p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 554 @ 5932: DEF PTYPE p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 555 @ 5949: DEF PAPP p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 556 @ 5965: DEF PFORMAT p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 557 @ 5984: DEF X p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 558 @ 5997: DEF POS p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 559 @ 6012: FINISH ) 78 %recordformat tagfm(%integer app, format, %integer flags, index, text, link) 79 80 !flags 81 ! *===.===.===.===.===.====.====.====.===.======.======* 82 ! ! u ! c ! c ! p ! s ! a ! o ! pr ! s ! type ! form ! 83 ! ! 1 ! 1 ! 1 ! 1 ! 1 ! 1 ! 1 ! 1 ! 1 ! 3 ! 4 ! 84 ! *===^===^===^===^===^====^====^====^===^======^======* 85 ! u c c p s a o p s t f 86 ! s l o a u n w r p y o 87 ! e o n r b a n o e p r 88 ! d s s a n m t c e m 89 ! e t m a e 90 ! d s m 91 ! e 92 ! 93 ! 94 560 @ 6013: LINE 78 "regression-compile-tmp/pass1.imp" 561 @ 6049: DEF TAGFM p1=V_0084 a/tf=44 b/format=84 c/ostate=0 type=4 (record) form=4 (record-format) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 562 @ 6066: START ( RECORDFORMAT 563 @ 6067: DEF APP p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 564 @ 6082: DEF FORMAT p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 565 @ 6100: DEF FLAGS p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 566 @ 6117: DEF INDEX p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 567 @ 6134: DEF TEXT p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 568 @ 6150: DEF LINK p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 569 @ 6166: FINISH ) 95 %constinteger used bit = 2_1000000000000000 570 @ 6167: LINE 95 "regression-compile-tmp/pass1.imp" 96 %constinteger closed = 2_0100000000000000 571 @ 6203: LINE 96 "regression-compile-tmp/pass1.imp" 97 %constinteger const bit = 2_0010000000000000 572 @ 6239: LINE 97 "regression-compile-tmp/pass1.imp" 98 %constinteger parameters = 2_0001000000000000 573 @ 6275: LINE 98 "regression-compile-tmp/pass1.imp" 99 %constinteger subname = 2_0000100000000000 574 @ 6311: LINE 99 "regression-compile-tmp/pass1.imp" 100 %constinteger aname = 2_0000010000000000 575 @ 6347: LINE 100 "regression-compile-tmp/pass1.imp" 101 %constinteger own bit = 2_0000001000000000 576 @ 6383: LINE 101 "regression-compile-tmp/pass1.imp" 102 %constinteger prot = 2_0000000100000000 577 @ 6419: LINE 102 "regression-compile-tmp/pass1.imp" 103 %constinteger spec = 2_0000000010000000 104 578 @ 6455: LINE 103 "regression-compile-tmp/pass1.imp" 105 %constinteger trans bit = 16_4000 579 @ 6491: LINE 105 "regression-compile-tmp/pass1.imp" 106 %constinteger error = 16_8000 107 580 @ 6527: LINE 106 "regression-compile-tmp/pass1.imp" 108 %record(arfm)%array ar(1:rec size) 109 581 @ 6563: LINE 108 "regression-compile-tmp/pass1.imp" 582 @ 6599: DEF AR p1=V_0085 a/tf=4b b/format=83 c/ostate=100 type=4 (record) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 583 @ 6613: PUSHI #0x00000001 584 @ 6618: PUSHI #0x00000208 585 @ 6623: DIM 0001 0001 110 %owninteger class = 0; !class of atom wanted 586 @ 6629: LINE 110 "regression-compile-tmp/pass1.imp" 587 @ 6665: PUSHI #0x00000000 588 @ 6670: DEF CLASS p1=V_0086 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 589 @ 6687: INIT 1 111 %owninteger x = 0; !usually last tag 590 @ 6690: LINE 111 "regression-compile-tmp/pass1.imp" 591 @ 6726: PUSHI #0x00000000 592 @ 6731: DEF X p1=V_0087 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 593 @ 6744: INIT 1 112 %owninteger atom1 = 0; !atom class (major) 594 @ 6747: LINE 112 "regression-compile-tmp/pass1.imp" 595 @ 6783: PUSHI #0x00000000 596 @ 6788: DEF ATOM1 p1=V_0088 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 597 @ 6805: INIT 1 113 %owninteger atom2 = 0; !atom class (minor) 598 @ 6808: LINE 113 "regression-compile-tmp/pass1.imp" 599 @ 6844: PUSHI #0x00000000 600 @ 6849: DEF ATOM2 p1=V_0089 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 601 @ 6866: INIT 1 114 %owninteger subatom = 0; !extra info about atom 602 @ 6869: LINE 114 "regression-compile-tmp/pass1.imp" 603 @ 6905: PUSHI #0x00000000 604 @ 6910: DEF SUBATOM p1=V_008a a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 605 @ 6929: INIT 1 115 %owninteger type = 0 606 @ 6932: LINE 115 "regression-compile-tmp/pass1.imp" 607 @ 6968: PUSHI #0x00000000 608 @ 6973: DEF TYPE p1=V_008b a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 609 @ 6989: INIT 1 116 %owninteger app = 0 610 @ 6992: LINE 116 "regression-compile-tmp/pass1.imp" 611 @ 7028: PUSHI #0x00000000 612 @ 7033: DEF APP p1=V_008c a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 613 @ 7048: INIT 1 117 %owninteger format = 0; !atom info 614 @ 7051: LINE 117 "regression-compile-tmp/pass1.imp" 615 @ 7087: PUSHI #0x00000000 616 @ 7092: DEF FORMAT p1=V_008d a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 617 @ 7110: INIT 1 118 %integer hash value 618 @ 7113: LINE 118 "regression-compile-tmp/pass1.imp" 619 @ 7149: DEF HASHVALUE p1=V_008e a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 119 %owninteger faulty = 0; !fault indicator 620 @ 7170: LINE 119 "regression-compile-tmp/pass1.imp" 621 @ 7206: PUSHI #0x00000000 622 @ 7211: DEF FAULTY p1=V_008f a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 623 @ 7229: INIT 1 120 %owninteger fault rate = 0; !fault rate count 624 @ 7232: LINE 120 "regression-compile-tmp/pass1.imp" 625 @ 7268: PUSHI #0x00000000 626 @ 7273: DEF FAULTRATE p1=V_0090 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 627 @ 7294: INIT 1 121 %owninteger lines = 0; !current line number 628 @ 7297: LINE 121 "regression-compile-tmp/pass1.imp" 629 @ 7333: PUSHI #0x00000000 630 @ 7338: DEF LINES p1=V_0091 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 631 @ 7355: INIT 1 122 %owninteger text line = 0; !starting line for string const 632 @ 7358: LINE 122 "regression-compile-tmp/pass1.imp" 633 @ 7394: PUSHI #0x00000000 634 @ 7399: DEF TEXTLINE p1=V_0092 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 635 @ 7419: INIT 1 123 %owninteger margin = 0; !statement start margin 636 @ 7422: LINE 123 "regression-compile-tmp/pass1.imp" 637 @ 7458: PUSHI #0x00000000 638 @ 7463: DEF MARGIN p1=V_0093 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 639 @ 7481: INIT 1 124 %owninteger error margin = 0 640 @ 7484: LINE 124 "regression-compile-tmp/pass1.imp" 641 @ 7520: PUSHI #0x00000000 642 @ 7525: DEF ERRORMARGIN p1=V_0094 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 643 @ 7548: INIT 1 125 %owninteger error sym = 0 644 @ 7551: LINE 125 "regression-compile-tmp/pass1.imp" 645 @ 7587: PUSHI #0x00000000 646 @ 7592: DEF ERRORSYM p1=V_0095 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 647 @ 7612: INIT 1 126 %owninteger column = 0 648 @ 7615: LINE 126 "regression-compile-tmp/pass1.imp" 649 @ 7651: PUSHI #0x00000000 650 @ 7656: DEF COLUMN p1=V_0096 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 651 @ 7674: INIT 1 127 %owninteger stats = 0; !statements compiled 652 @ 7677: LINE 127 "regression-compile-tmp/pass1.imp" 653 @ 7713: PUSHI #0x00000000 654 @ 7718: DEF STATS p1=V_0097 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 655 @ 7735: INIT 1 128 %owninteger mon pos = 0; !flag for diagnose 656 @ 7738: LINE 128 "regression-compile-tmp/pass1.imp" 657 @ 7774: PUSHI #0x00000000 658 @ 7779: DEF MONPOS p1=V_0098 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 659 @ 7797: INIT 1 129 %owninteger sym = nl; !current input symbol 660 @ 7800: LINE 129 "regression-compile-tmp/pass1.imp" 661 @ 7836: PUSHI #0x0000000a 662 @ 7841: DEF SYM p1=V_0099 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 663 @ 7856: INIT 1 130 %owninteger symtype = 0; !type of current symbol 664 @ 7859: LINE 130 "regression-compile-tmp/pass1.imp" 665 @ 7895: PUSHI #0x00000000 666 @ 7900: DEF SYMTYPE p1=V_009a a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 667 @ 7919: INIT 1 131 %owninteger quote = 0; !>0 strings, <0 chars 668 @ 7922: LINE 131 "regression-compile-tmp/pass1.imp" 669 @ 7958: PUSHI #0x00000000 670 @ 7963: DEF QUOTE p1=V_009b a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 671 @ 7980: INIT 1 132 %owninteger end mark = 0; !%end flag 672 @ 7983: LINE 132 "regression-compile-tmp/pass1.imp" 673 @ 8019: PUSHI #0x00000000 674 @ 8024: DEF ENDMARK p1=V_009c a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 675 @ 8043: INIT 1 133 %owninteger cont = ' ' 676 @ 8046: LINE 133 "regression-compile-tmp/pass1.imp" 677 @ 8082: PUSHI #0x00000020 678 @ 8087: DEF CONT p1=V_009d a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 679 @ 8103: INIT 1 134 %owninteger csym = ' '; !listing continuation marker 680 @ 8106: LINE 134 "regression-compile-tmp/pass1.imp" 681 @ 8142: PUSHI #0x00000020 682 @ 8147: DEF CSYM p1=V_009e a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 683 @ 8163: INIT 1 135 %owninteger decl = 0; !current declarator flags 684 @ 8166: LINE 135 "regression-compile-tmp/pass1.imp" 685 @ 8202: PUSHI #0x00000000 686 @ 8207: DEF DECL p1=V_009f a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 687 @ 8223: INIT 1 136 %owninteger dim = 0; !arrayname dimension 688 @ 8226: LINE 136 "regression-compile-tmp/pass1.imp" 689 @ 8262: PUSHI #0x00000000 690 @ 8267: DEF DIM p1=V_00a0 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 691 @ 8282: INIT 1 137 %owninteger spec given = 0 138 692 @ 8285: LINE 137 "regression-compile-tmp/pass1.imp" 693 @ 8321: PUSHI #0x00000000 694 @ 8326: DEF SPECGIVEN p1=V_00a1 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 695 @ 8347: INIT 1 139 %owninteger escape class = 0; !when and where to escape 696 @ 8350: LINE 139 "regression-compile-tmp/pass1.imp" 697 @ 8386: PUSHI #0x00000000 698 @ 8391: DEF ESCAPECLASS p1=V_00a2 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 699 @ 8414: INIT 1 140 %owninteger protection = 0 700 @ 8417: LINE 140 "regression-compile-tmp/pass1.imp" 701 @ 8453: PUSHI #0x00000000 702 @ 8458: DEF PROTECTION p1=V_00a3 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 703 @ 8480: INIT 1 141 %owninteger atom flags = 0 704 @ 8483: LINE 141 "regression-compile-tmp/pass1.imp" 705 @ 8519: PUSHI #0x00000000 706 @ 8524: DEF ATOMFLAGS p1=V_00a4 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 707 @ 8545: INIT 1 142 %owninteger otype = 0; !current 'own' type 708 @ 8548: LINE 142 "regression-compile-tmp/pass1.imp" 709 @ 8584: PUSHI #0x00000000 710 @ 8589: DEF OTYPE p1=V_00a5 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 711 @ 8606: INIT 1 143 %owninteger reals ln = 1; ! =4 for %REALSLONG 712 @ 8609: LINE 143 "regression-compile-tmp/pass1.imp" 713 @ 8645: PUSHI #0x00000001 714 @ 8650: DEF REALSLN p1=V_00a6 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 715 @ 8669: INIT 1 144 %owninteger last1 = 0; !previous atom class 716 @ 8672: LINE 144 "regression-compile-tmp/pass1.imp" 717 @ 8708: PUSHI #0x00000000 718 @ 8713: DEF LAST1 p1=V_00a7 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 719 @ 8730: INIT 1 145 %owninteger gen type = 0 720 @ 8733: LINE 145 "regression-compile-tmp/pass1.imp" 721 @ 8769: PUSHI #0x00000000 722 @ 8774: DEF GENTYPE p1=V_00a8 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 723 @ 8793: INIT 1 146 %owninteger ptype = 0; !current phrase type 724 @ 8796: LINE 146 "regression-compile-tmp/pass1.imp" 725 @ 8832: PUSHI #0x00000000 726 @ 8837: DEF PTYPE p1=V_00a9 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 727 @ 8854: INIT 1 147 %owninteger papp = 0; !current phrase parameters 728 @ 8857: LINE 147 "regression-compile-tmp/pass1.imp" 729 @ 8893: PUSHI #0x00000000 730 @ 8898: DEF PAPP p1=V_00aa a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 731 @ 8914: INIT 1 148 %owninteger pformat = 0; !current phrase format 732 @ 8917: LINE 148 "regression-compile-tmp/pass1.imp" 733 @ 8953: PUSHI #0x00000000 734 @ 8958: DEF PFORMAT p1=V_00ab a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 735 @ 8977: INIT 1 149 %owninteger force = 0; !force next ptype 736 @ 8980: LINE 149 "regression-compile-tmp/pass1.imp" 737 @ 9016: PUSHI #0x00000000 738 @ 9021: DEF FORCE p1=V_00ac a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 739 @ 9038: INIT 1 150 %owninteger g = 0 740 @ 9041: LINE 150 "regression-compile-tmp/pass1.imp" 741 @ 9077: PUSHI #0x00000000 742 @ 9082: DEF G p1=V_00ad a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 743 @ 9095: INIT 1 151 %owninteger gg = 0 744 @ 9098: LINE 151 "regression-compile-tmp/pass1.imp" 745 @ 9134: PUSHI #0x00000000 746 @ 9139: DEF GG p1=V_00ae a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 747 @ 9153: INIT 1 152 %owninteger map gg = 0; !grammar entries 748 @ 9156: LINE 152 "regression-compile-tmp/pass1.imp" 749 @ 9192: PUSHI #0x00000000 750 @ 9197: DEF MAPGG p1=V_00af a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 751 @ 9214: INIT 1 153 %owninteger fdef = 0; !current format definition 752 @ 9217: LINE 153 "regression-compile-tmp/pass1.imp" 753 @ 9253: PUSHI #0x00000000 754 @ 9258: DEF FDEF p1=V_00b0 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 755 @ 9274: INIT 1 154 %owninteger this = -1; !current recordformat tag 756 @ 9277: LINE 154 "regression-compile-tmp/pass1.imp" 757 @ 9313: PUSHI #0xffffffff 758 @ 9318: DEF THIS p1=V_00b1 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 759 @ 9334: INIT 1 155 %owninteger nmin = 0; !analysis record atom pointer 760 @ 9337: LINE 155 "regression-compile-tmp/pass1.imp" 761 @ 9373: PUSHI #0x00000000 762 @ 9378: DEF NMIN p1=V_00b2 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 763 @ 9394: INIT 1 156 %owninteger nmax = 0; !analysis record phrase pointer 764 @ 9397: LINE 156 "regression-compile-tmp/pass1.imp" 765 @ 9433: PUSHI #0x00000000 766 @ 9438: DEF NMAX p1=V_00b3 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 767 @ 9454: INIT 1 157 %owninteger rbase = 0; !record format definition base 768 @ 9457: LINE 157 "regression-compile-tmp/pass1.imp" 769 @ 9493: PUSHI #0x00000000 770 @ 9498: DEF RBASE p1=V_00b4 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 771 @ 9515: INIT 1 158 %owninteger dmax = 1 772 @ 9518: LINE 158 "regression-compile-tmp/pass1.imp" 773 @ 9554: PUSHI #0x00000001 774 @ 9559: DEF DMAX p1=V_00b5 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 775 @ 9575: INIT 1 159 %owninteger tmin = max tag; !upper bound on tags 776 @ 9578: LINE 159 "regression-compile-tmp/pass1.imp" 777 @ 9614: PUSHI #0x00000320 778 @ 9619: DEF TMIN p1=V_00b6 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 779 @ 9635: INIT 1 160 %owninteger ss = 0; !source statement entry 780 @ 9638: LINE 160 "regression-compile-tmp/pass1.imp" 781 @ 9674: PUSHI #0x00000000 782 @ 9679: DEF SS p1=V_00b7 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 783 @ 9693: INIT 1 161 %string(63) include file 784 @ 9696: LINE 161 "regression-compile-tmp/pass1.imp" 785 @ 9732: DEF INCLUDEFILE p1=V_00b8 a/tf=31 b/format=3f c/ostate=0 type=3 (string) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 162 %owninteger include list = 0 786 @ 9755: LINE 162 "regression-compile-tmp/pass1.imp" 787 @ 9791: PUSHI #0x00000000 788 @ 9796: DEF INCLUDELIST p1=V_00b9 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 789 @ 9819: INIT 1 163 %owninteger include level= 0 790 @ 9822: LINE 163 "regression-compile-tmp/pass1.imp" 791 @ 9858: PUSHI #0x00000000 792 @ 9863: DEF INCLUDELEVEL p1=V_00ba a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 793 @ 9887: INIT 1 164 %owninteger include = 0; !=0 unused, #0 being used 794 @ 9890: LINE 164 "regression-compile-tmp/pass1.imp" 795 @ 9926: PUSHI #0x00000000 796 @ 9931: DEF INCLUDE p1=V_00bb a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 797 @ 9950: INIT 1 165 %owninteger perm = 1; !1 = compiling perm, 0 = program 798 @ 9953: LINE 165 "regression-compile-tmp/pass1.imp" 799 @ 9989: PUSHI #0x00000001 800 @ 9994: DEF PERM p1=V_00bc a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 801 @ 10010: INIT 1 166 %owninteger progmode = 0; !-1 = file, 1 = begin/eop 802 @ 10013: LINE 166 "regression-compile-tmp/pass1.imp" 803 @ 10049: PUSHI #0x00000000 804 @ 10054: DEF PROGMODE p1=V_00bd a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 805 @ 10074: INIT 1 167 %owninteger sstype = 0; !-1:exec stat 168 ! 0: declaration 169 ! 1: block in 170 ! 2: block out 806 @ 10077: LINE 167 "regression-compile-tmp/pass1.imp" 807 @ 10113: PUSHI #0x00000000 808 @ 10118: DEF SSTYPE p1=V_00be a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 809 @ 10136: INIT 1 171 %owninteger spec mode = 0; !>=0: definition 172 ! -1: proc spec 173 ! -2: recordformat 810 @ 10139: LINE 171 "regression-compile-tmp/pass1.imp" 811 @ 10175: PUSHI #0x00000000 812 @ 10180: DEF SPECMODE p1=V_00bf a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 813 @ 10200: INIT 1 174 %owninteger ocount = -1; !own constants wanted 814 @ 10203: LINE 174 "regression-compile-tmp/pass1.imp" 815 @ 10239: PUSHI #0xffffffff 816 @ 10244: DEF OCOUNT p1=V_00c0 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 817 @ 10262: INIT 1 175 %owninteger limit = 0; !lookup limit 818 @ 10265: LINE 175 "regression-compile-tmp/pass1.imp" 819 @ 10301: PUSHI #0x00000000 820 @ 10306: DEF LIMIT p1=V_00c1 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 821 @ 10323: INIT 1 176 %owninteger copy = 0; !duplicate name flag 822 @ 10326: LINE 176 "regression-compile-tmp/pass1.imp" 823 @ 10362: PUSHI #0x00000000 824 @ 10367: DEF COPY p1=V_00c2 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 825 @ 10383: INIT 1 177 %owninteger order = 0; !out of sequence flag 826 @ 10386: LINE 177 "regression-compile-tmp/pass1.imp" 827 @ 10422: PUSHI #0x00000000 828 @ 10427: DEF ORDER p1=V_00c3 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 829 @ 10444: INIT 1 178 %owninteger for warn = 0; !non-local flag 830 @ 10447: LINE 178 "regression-compile-tmp/pass1.imp" 831 @ 10483: PUSHI #0x00000000 832 @ 10488: DEF FORWARN p1=V_00c4 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 833 @ 10507: INIT 1 179 %owninteger dubious = 0; !flag for dubious statements 834 @ 10510: LINE 179 "regression-compile-tmp/pass1.imp" 835 @ 10546: PUSHI #0x00000000 836 @ 10551: DEF DUBIOUS p1=V_00c5 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 837 @ 10570: INIT 1 180 %owninteger dp = 1 838 @ 10573: LINE 180 "regression-compile-tmp/pass1.imp" 839 @ 10609: PUSHI #0x00000001 840 @ 10614: DEF DP p1=V_00c6 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 841 @ 10628: INIT 1 181 %owninteger pos1 = 0 842 @ 10631: LINE 181 "regression-compile-tmp/pass1.imp" 843 @ 10667: PUSHI #0x00000000 844 @ 10672: DEF POS1 p1=V_00c7 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 845 @ 10688: INIT 1 182 %owninteger pos2 = 0; !error position 846 @ 10691: LINE 182 "regression-compile-tmp/pass1.imp" 847 @ 10727: PUSHI #0x00000000 848 @ 10732: DEF POS2 p1=V_00c8 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 849 @ 10748: INIT 1 183 %owninteger pos = 0; !input line index 850 @ 10751: LINE 183 "regression-compile-tmp/pass1.imp" 851 @ 10787: PUSHI #0x00000000 852 @ 10792: DEF POS p1=V_00c9 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 853 @ 10807: INIT 1 184 %owninteger dimension = 0; !current array dimension 854 @ 10810: LINE 184 "regression-compile-tmp/pass1.imp" 855 @ 10846: PUSHI #0x00000000 856 @ 10851: DEF DIMENSION p1=V_00ca a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 857 @ 10872: INIT 1 185 %owninteger local = 0; !search limit for locals 858 @ 10875: LINE 185 "regression-compile-tmp/pass1.imp" 859 @ 10911: PUSHI #0x00000000 860 @ 10916: DEF LOCAL p1=V_00cb a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 861 @ 10933: INIT 1 186 %owninteger fm base = 0; !entry for format decls 862 @ 10936: LINE 186 "regression-compile-tmp/pass1.imp" 863 @ 10972: PUSHI #0x00000000 864 @ 10977: DEF FMBASE p1=V_00cc a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 865 @ 10995: INIT 1 187 %owninteger search base = 0; !entry for record_names 866 @ 10998: LINE 187 "regression-compile-tmp/pass1.imp" 867 @ 11034: PUSHI #0x00000000 868 @ 11039: DEF SEARCHBASE p1=V_00cd a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 869 @ 11061: INIT 1 188 %owninteger format list = 0; !size of current format list 870 @ 11064: LINE 188 "regression-compile-tmp/pass1.imp" 871 @ 11100: PUSHI #0x00000000 872 @ 11105: DEF FORMATLIST p1=V_00ce a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 873 @ 11127: INIT 1 189 %integer recid 874 @ 11130: LINE 189 "regression-compile-tmp/pass1.imp" 875 @ 11166: DEF RECID p1=V_00cf a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 190 %ownbyteintegerarray char(0:133) = ; !input line 191 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 192 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 193 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 194 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 195 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 196 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 197 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 198 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 199 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 200 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 201 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 202 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 203 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 204 10, 10, 10, 10 876 @ 11183: LINE 190 "regression-compile-tmp/pass1.imp" 877 @ 11219: PUSHI #0x00000000 878 @ 11224: PUSHI #0x00000085 879 @ 11229: BOUNDS 880 @ 11230: DEF CHAR p1=V_00d0 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 881 @ 11246: PUSHI #0x0000000a 882 @ 11251: INIT 1 883 @ 11254: PUSHI #0x0000000a 884 @ 11259: INIT 1 885 @ 11262: PUSHI #0x0000000a 886 @ 11267: INIT 1 887 @ 11270: PUSHI #0x0000000a 888 @ 11275: INIT 1 889 @ 11278: PUSHI #0x0000000a 890 @ 11283: INIT 1 891 @ 11286: PUSHI #0x0000000a 892 @ 11291: INIT 1 893 @ 11294: PUSHI #0x0000000a 894 @ 11299: INIT 1 895 @ 11302: PUSHI #0x0000000a 896 @ 11307: INIT 1 897 @ 11310: PUSHI #0x0000000a 898 @ 11315: INIT 1 899 @ 11318: PUSHI #0x0000000a 900 @ 11323: INIT 1 901 @ 11326: PUSHI #0x0000000a 902 @ 11331: INIT 1 903 @ 11334: PUSHI #0x0000000a 904 @ 11339: INIT 1 905 @ 11342: PUSHI #0x0000000a 906 @ 11347: INIT 1 907 @ 11350: PUSHI #0x0000000a 908 @ 11355: INIT 1 909 @ 11358: PUSHI #0x0000000a 910 @ 11363: INIT 1 911 @ 11366: PUSHI #0x0000000a 912 @ 11371: INIT 1 913 @ 11374: PUSHI #0x0000000a 914 @ 11379: INIT 1 915 @ 11382: PUSHI #0x0000000a 916 @ 11387: INIT 1 917 @ 11390: PUSHI #0x0000000a 918 @ 11395: INIT 1 919 @ 11398: PUSHI #0x0000000a 920 @ 11403: INIT 1 921 @ 11406: PUSHI #0x0000000a 922 @ 11411: INIT 1 923 @ 11414: PUSHI #0x0000000a 924 @ 11419: INIT 1 925 @ 11422: PUSHI #0x0000000a 926 @ 11427: INIT 1 927 @ 11430: PUSHI #0x0000000a 928 @ 11435: INIT 1 929 @ 11438: PUSHI #0x0000000a 930 @ 11443: INIT 1 931 @ 11446: PUSHI #0x0000000a 932 @ 11451: INIT 1 933 @ 11454: PUSHI #0x0000000a 934 @ 11459: INIT 1 935 @ 11462: PUSHI #0x0000000a 936 @ 11467: INIT 1 937 @ 11470: PUSHI #0x0000000a 938 @ 11475: INIT 1 939 @ 11478: PUSHI #0x0000000a 940 @ 11483: INIT 1 941 @ 11486: PUSHI #0x0000000a 942 @ 11491: INIT 1 943 @ 11494: PUSHI #0x0000000a 944 @ 11499: INIT 1 945 @ 11502: PUSHI #0x0000000a 946 @ 11507: INIT 1 947 @ 11510: PUSHI #0x0000000a 948 @ 11515: INIT 1 949 @ 11518: PUSHI #0x0000000a 950 @ 11523: INIT 1 951 @ 11526: PUSHI #0x0000000a 952 @ 11531: INIT 1 953 @ 11534: PUSHI #0x0000000a 954 @ 11539: INIT 1 955 @ 11542: PUSHI #0x0000000a 956 @ 11547: INIT 1 957 @ 11550: PUSHI #0x0000000a 958 @ 11555: INIT 1 959 @ 11558: PUSHI #0x0000000a 960 @ 11563: INIT 1 961 @ 11566: PUSHI #0x0000000a 962 @ 11571: INIT 1 963 @ 11574: PUSHI #0x0000000a 964 @ 11579: INIT 1 965 @ 11582: PUSHI #0x0000000a 966 @ 11587: INIT 1 967 @ 11590: PUSHI #0x0000000a 968 @ 11595: INIT 1 969 @ 11598: PUSHI #0x0000000a 970 @ 11603: INIT 1 971 @ 11606: PUSHI #0x0000000a 972 @ 11611: INIT 1 973 @ 11614: PUSHI #0x0000000a 974 @ 11619: INIT 1 975 @ 11622: PUSHI #0x0000000a 976 @ 11627: INIT 1 977 @ 11630: PUSHI #0x0000000a 978 @ 11635: INIT 1 979 @ 11638: PUSHI #0x0000000a 980 @ 11643: INIT 1 981 @ 11646: PUSHI #0x0000000a 982 @ 11651: INIT 1 983 @ 11654: PUSHI #0x0000000a 984 @ 11659: INIT 1 985 @ 11662: PUSHI #0x0000000a 986 @ 11667: INIT 1 987 @ 11670: PUSHI #0x0000000a 988 @ 11675: INIT 1 989 @ 11678: PUSHI #0x0000000a 990 @ 11683: INIT 1 991 @ 11686: PUSHI #0x0000000a 992 @ 11691: INIT 1 993 @ 11694: PUSHI #0x0000000a 994 @ 11699: INIT 1 995 @ 11702: PUSHI #0x0000000a 996 @ 11707: INIT 1 997 @ 11710: PUSHI #0x0000000a 998 @ 11715: INIT 1 999 @ 11718: PUSHI #0x0000000a 1000 @ 11723: INIT 1 1001 @ 11726: PUSHI #0x0000000a 1002 @ 11731: INIT 1 1003 @ 11734: PUSHI #0x0000000a 1004 @ 11739: INIT 1 1005 @ 11742: PUSHI #0x0000000a 1006 @ 11747: INIT 1 1007 @ 11750: PUSHI #0x0000000a 1008 @ 11755: INIT 1 1009 @ 11758: PUSHI #0x0000000a 1010 @ 11763: INIT 1 1011 @ 11766: PUSHI #0x0000000a 1012 @ 11771: INIT 1 1013 @ 11774: PUSHI #0x0000000a 1014 @ 11779: INIT 1 1015 @ 11782: PUSHI #0x0000000a 1016 @ 11787: INIT 1 1017 @ 11790: PUSHI #0x0000000a 1018 @ 11795: INIT 1 1019 @ 11798: PUSHI #0x0000000a 1020 @ 11803: INIT 1 1021 @ 11806: PUSHI #0x0000000a 1022 @ 11811: INIT 1 1023 @ 11814: PUSHI #0x0000000a 1024 @ 11819: INIT 1 1025 @ 11822: PUSHI #0x0000000a 1026 @ 11827: INIT 1 1027 @ 11830: PUSHI #0x0000000a 1028 @ 11835: INIT 1 1029 @ 11838: PUSHI #0x0000000a 1030 @ 11843: INIT 1 1031 @ 11846: PUSHI #0x0000000a 1032 @ 11851: INIT 1 1033 @ 11854: PUSHI #0x0000000a 1034 @ 11859: INIT 1 1035 @ 11862: PUSHI #0x0000000a 1036 @ 11867: INIT 1 1037 @ 11870: PUSHI #0x0000000a 1038 @ 11875: INIT 1 1039 @ 11878: PUSHI #0x0000000a 1040 @ 11883: INIT 1 1041 @ 11886: PUSHI #0x0000000a 1042 @ 11891: INIT 1 1043 @ 11894: PUSHI #0x0000000a 1044 @ 11899: INIT 1 1045 @ 11902: PUSHI #0x0000000a 1046 @ 11907: INIT 1 1047 @ 11910: PUSHI #0x0000000a 1048 @ 11915: INIT 1 1049 @ 11918: PUSHI #0x0000000a 1050 @ 11923: INIT 1 1051 @ 11926: PUSHI #0x0000000a 1052 @ 11931: INIT 1 1053 @ 11934: PUSHI #0x0000000a 1054 @ 11939: INIT 1 1055 @ 11942: PUSHI #0x0000000a 1056 @ 11947: INIT 1 1057 @ 11950: PUSHI #0x0000000a 1058 @ 11955: INIT 1 1059 @ 11958: PUSHI #0x0000000a 1060 @ 11963: INIT 1 1061 @ 11966: PUSHI #0x0000000a 1062 @ 11971: INIT 1 1063 @ 11974: PUSHI #0x0000000a 1064 @ 11979: INIT 1 1065 @ 11982: PUSHI #0x0000000a 1066 @ 11987: INIT 1 1067 @ 11990: PUSHI #0x0000000a 1068 @ 11995: INIT 1 1069 @ 11998: PUSHI #0x0000000a 1070 @ 12003: INIT 1 1071 @ 12006: PUSHI #0x0000000a 1072 @ 12011: INIT 1 1073 @ 12014: PUSHI #0x0000000a 1074 @ 12019: INIT 1 1075 @ 12022: PUSHI #0x0000000a 1076 @ 12027: INIT 1 1077 @ 12030: PUSHI #0x0000000a 1078 @ 12035: INIT 1 1079 @ 12038: PUSHI #0x0000000a 1080 @ 12043: INIT 1 1081 @ 12046: PUSHI #0x0000000a 1082 @ 12051: INIT 1 1083 @ 12054: PUSHI #0x0000000a 1084 @ 12059: INIT 1 1085 @ 12062: PUSHI #0x0000000a 1086 @ 12067: INIT 1 1087 @ 12070: PUSHI #0x0000000a 1088 @ 12075: INIT 1 1089 @ 12078: PUSHI #0x0000000a 1090 @ 12083: INIT 1 1091 @ 12086: PUSHI #0x0000000a 1092 @ 12091: INIT 1 1093 @ 12094: PUSHI #0x0000000a 1094 @ 12099: INIT 1 1095 @ 12102: PUSHI #0x0000000a 1096 @ 12107: INIT 1 1097 @ 12110: PUSHI #0x0000000a 1098 @ 12115: INIT 1 1099 @ 12118: PUSHI #0x0000000a 1100 @ 12123: INIT 1 1101 @ 12126: PUSHI #0x0000000a 1102 @ 12131: INIT 1 1103 @ 12134: PUSHI #0x0000000a 1104 @ 12139: INIT 1 1105 @ 12142: PUSHI #0x0000000a 1106 @ 12147: INIT 1 1107 @ 12150: PUSHI #0x0000000a 1108 @ 12155: INIT 1 1109 @ 12158: PUSHI #0x0000000a 1110 @ 12163: INIT 1 1111 @ 12166: PUSHI #0x0000000a 1112 @ 12171: INIT 1 1113 @ 12174: PUSHI #0x0000000a 1114 @ 12179: INIT 1 1115 @ 12182: PUSHI #0x0000000a 1116 @ 12187: INIT 1 1117 @ 12190: PUSHI #0x0000000a 1118 @ 12195: INIT 1 1119 @ 12198: PUSHI #0x0000000a 1120 @ 12203: INIT 1 1121 @ 12206: PUSHI #0x0000000a 1122 @ 12211: INIT 1 1123 @ 12214: PUSHI #0x0000000a 1124 @ 12219: INIT 1 1125 @ 12222: PUSHI #0x0000000a 1126 @ 12227: INIT 1 1127 @ 12230: PUSHI #0x0000000a 1128 @ 12235: INIT 1 1129 @ 12238: PUSHI #0x0000000a 1130 @ 12243: INIT 1 1131 @ 12246: PUSHI #0x0000000a 1132 @ 12251: INIT 1 1133 @ 12254: PUSHI #0x0000000a 1134 @ 12259: INIT 1 1135 @ 12262: PUSHI #0x0000000a 1136 @ 12267: INIT 1 1137 @ 12270: PUSHI #0x0000000a 1138 @ 12275: INIT 1 1139 @ 12278: PUSHI #0x0000000a 1140 @ 12283: INIT 1 1141 @ 12286: PUSHI #0x0000000a 1142 @ 12291: INIT 1 1143 @ 12294: PUSHI #0x0000000a 1144 @ 12299: INIT 1 1145 @ 12302: PUSHI #0x0000000a 1146 @ 12307: INIT 1 1147 @ 12310: PUSHI #0x0000000a 1148 @ 12315: INIT 1 205 %integerarray lit pool(0:lit max) 1149 @ 12318: LINE 205 "regression-compile-tmp/pass1.imp" 1150 @ 12354: DEF LITPOOL p1=V_00d1 a/tf=1b b/format=1 c/ostate=100 type=1 (integer) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1151 @ 12373: PUSHI #0x00000000 1152 @ 12378: PUSHI #0x00000032 1153 @ 12383: DIM 0001 0001 206 %owninteger lit = 0; !current literal (integer) 1154 @ 12389: LINE 206 "regression-compile-tmp/pass1.imp" 1155 @ 12425: PUSHI #0x00000000 1156 @ 12430: DEF LIT p1=V_00d2 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 1157 @ 12445: INIT 1 207 %owninteger lp = 0; !literals pointer 1158 @ 12448: LINE 207 "regression-compile-tmp/pass1.imp" 1159 @ 12484: PUSHI #0x00000000 1160 @ 12489: DEF LP p1=V_00d3 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 1161 @ 12503: INIT 1 208 %owninteger block x = 0; !block tag 1162 @ 12506: LINE 208 "regression-compile-tmp/pass1.imp" 1163 @ 12542: PUSHI #0x00000000 1164 @ 12547: DEF BLOCKX p1=V_00d4 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 1165 @ 12565: INIT 1 209 %owninteger list = 1; !<= to enable 1166 @ 12568: LINE 209 "regression-compile-tmp/pass1.imp" 1167 @ 12604: PUSHI #0x00000001 1168 @ 12609: DEF LIST p1=V_00d5 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 1169 @ 12625: INIT 1 210 %owninteger control = 0 1170 @ 12628: LINE 210 "regression-compile-tmp/pass1.imp" 1171 @ 12664: PUSHI #0x00000000 1172 @ 12669: DEF CONTROL p1=V_00d6 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 1173 @ 12688: INIT 1 211 %owninteger diag = 0; !diagnose flags 1174 @ 12691: LINE 211 "regression-compile-tmp/pass1.imp" 1175 @ 12727: PUSHI #0x00000000 1176 @ 12732: DEF DIAG p1=V_00d7 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 1177 @ 12748: INIT 1 212 %integerarray hash(0:max names) 1178 @ 12751: LINE 212 "regression-compile-tmp/pass1.imp" 1179 @ 12787: DEF HASH p1=V_00d8 a/tf=1b b/format=1 c/ostate=100 type=1 (integer) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1180 @ 12803: PUSHI #0x00000000 1181 @ 12808: PUSHI #0x000007ff 1182 @ 12813: DIM 0001 0001 213 %record(tagfm)%array tag(0:max tag) 1183 @ 12819: LINE 213 "regression-compile-tmp/pass1.imp" 1184 @ 12855: DEF TAG p1=V_00d9 a/tf=4b b/format=84 c/ostate=100 type=4 (record) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1185 @ 12870: PUSHI #0x00000000 1186 @ 12875: PUSHI #0x00000320 1187 @ 12880: DIM 0001 0001 214 %integerarray dict(1:max dict) 1188 @ 12886: LINE 214 "regression-compile-tmp/pass1.imp" 1189 @ 12922: DEF DICT p1=V_00da a/tf=1b b/format=1 c/ostate=100 type=1 (integer) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1190 @ 12938: PUSHI #0x00000001 1191 @ 12943: PUSHI #0x00001770 1192 @ 12948: DIM 0001 0001 215 %byteintegerarray buff(1:512) 1193 @ 12954: LINE 215 "regression-compile-tmp/pass1.imp" 1194 @ 12990: DEF BUFF p1=V_00db 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 1195 @ 13006: PUSHI #0x00000001 1196 @ 13011: PUSHI #0x00000200 1197 @ 13016: DIM 0001 0001 216 %owninteger bp = 0 217 218 { grammar related constants } 1198 @ 13022: LINE 216 "regression-compile-tmp/pass1.imp" 1199 @ 13058: PUSHI #0x00000000 1200 @ 13063: DEF BP p1=V_00dc a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 1201 @ 13077: INIT 1 219 %constinteger max grammar = 1720 1202 @ 13080: LINE 219 "regression-compile-tmp/pass1.imp" 220 %owninteger gmin = max grammar ;! upper bound on grammar 1203 @ 13116: LINE 220 "regression-compile-tmp/pass1.imp" 1204 @ 13152: PUSHI #0x000006b8 1205 @ 13157: DEF GMIN p1=V_00dd a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 1206 @ 13173: INIT 1 221 %constinteger manifest = 120, figurative = 130 1207 @ 13176: LINE 221 "regression-compile-tmp/pass1.imp" 222 %constinteger actions = 180, phrasal = 200 223 1208 @ 13212: LINE 222 "regression-compile-tmp/pass1.imp" 224 %constbyteintegerarray amap(0:15) = %c 225 89, 91, 92, 104, 94, 93, 105, 100, 101, 102, 103, 106, 107, 108, 109, 89 226 ! ? v n l fm const swit rp fp mp pp a an na nan ? 227 1209 @ 13248: LINE 224 "regression-compile-tmp/pass1.imp" 1210 @ 13284: PUSHI #0x00000000 1211 @ 13289: PUSHI #0x0000000f 1212 @ 13294: BOUNDS 1213 @ 13295: DEF AMAP p1=V_00de 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 1214 @ 13311: PUSHI #0x00000059 1215 @ 13316: INIT 1 1216 @ 13319: PUSHI #0x0000005b 1217 @ 13324: INIT 1 1218 @ 13327: PUSHI #0x0000005c 1219 @ 13332: INIT 1 1220 @ 13335: PUSHI #0x00000068 1221 @ 13340: INIT 1 1222 @ 13343: PUSHI #0x0000005e 1223 @ 13348: INIT 1 1224 @ 13351: PUSHI #0x0000005d 1225 @ 13356: INIT 1 1226 @ 13359: PUSHI #0x00000069 1227 @ 13364: INIT 1 1228 @ 13367: PUSHI #0x00000064 1229 @ 13372: INIT 1 1230 @ 13375: PUSHI #0x00000065 1231 @ 13380: INIT 1 1232 @ 13383: PUSHI #0x00000066 1233 @ 13388: INIT 1 1234 @ 13391: PUSHI #0x00000067 1235 @ 13396: INIT 1 1236 @ 13399: PUSHI #0x0000006a 1237 @ 13404: INIT 1 1238 @ 13407: PUSHI #0x0000006b 1239 @ 13412: INIT 1 1240 @ 13415: PUSHI #0x0000006c 1241 @ 13420: INIT 1 1242 @ 13423: PUSHI #0x0000006d 1243 @ 13428: INIT 1 1244 @ 13431: PUSHI #0x00000059 1245 @ 13436: INIT 1 228 %constbyteintegerarray atoms(0:15) = 89, 1, 1, 10, 9, 1, 10, 7, 229 7, 7, 7, 4, 1, 4, 1, 89 230 231 !*** start of generated tables *** 232 ! %include "i77.tables.imp" 1246 @ 13439: LINE 228 "regression-compile-tmp/pass1.imp" 1247 @ 13475: PUSHI #0x00000000 1248 @ 13480: PUSHI #0x0000000f 1249 @ 13485: BOUNDS 1250 @ 13486: DEF ATOMS p1=V_00df 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 1251 @ 13503: PUSHI #0x00000059 1252 @ 13508: INIT 1 1253 @ 13511: PUSHI #0x00000001 1254 @ 13516: INIT 1 1255 @ 13519: PUSHI #0x00000001 1256 @ 13524: INIT 1 1257 @ 13527: PUSHI #0x0000000a 1258 @ 13532: INIT 1 1259 @ 13535: PUSHI #0x00000009 1260 @ 13540: INIT 1 1261 @ 13543: PUSHI #0x00000001 1262 @ 13548: INIT 1 1263 @ 13551: PUSHI #0x0000000a 1264 @ 13556: INIT 1 1265 @ 13559: PUSHI #0x00000007 1266 @ 13564: INIT 1 1267 @ 13567: PUSHI #0x00000007 1268 @ 13572: INIT 1 1269 @ 13575: PUSHI #0x00000007 1270 @ 13580: INIT 1 1271 @ 13583: PUSHI #0x00000007 1272 @ 13588: INIT 1 1273 @ 13591: PUSHI #0x00000004 1274 @ 13596: INIT 1 1275 @ 13599: PUSHI #0x00000001 1276 @ 13604: INIT 1 1277 @ 13607: PUSHI #0x00000004 1278 @ 13612: INIT 1 1279 @ 13615: PUSHI #0x00000001 1280 @ 13620: INIT 1 1281 @ 13623: PUSHI #0x00000059 1282 @ 13628: INIT 1 233 %endoflist 1283 @ 13631: LINE 233 "regression-compile-tmp/pass1.imp" 234 %conststring(8)%array text(0:255) = %c 235 "Z","VDEC","OWNVDEC","EXTVSPEC","ADEC","OWNADEC","EXTASPEC","PROC", 236 "PROCSPEC","FORMDEC","SWDEC","LDEC","FORMSPEC","","","", 237 "","","OPTION","COMMA","T","COLON","COMMENT","LB", 238 "ALIAS","RB","SUB","ARRAYD","STYPE","ARRAY","NAME","PROCD", 239 "FNMAP","SWITCH","OWN","EXTERNAL","STRING","RECORD","FORMAT","SPEC", 240 "MCODE","LABEL","OP1","OP2","OP3","SIGN","UOP","MOD", 241 "DOT","COMP","ACOMP","EQ","EQEQ","JAM","JUMP","RESOP", 242 "AND","OR","NOT","WHILE","UNTIL","FOR","CWORD","EXIT", 243 "ON","SIGNAL","THEN","START","ELSE","FINISH","FELSE","CYCLE", 244 "REPEAT","PROGRAM","BEGIN","END","ENDPROG","ENDPERM","FRESULT","MRESULT", 245 "BACK","MONITOR","STOP","LIST","REALSLN","CONTROL","INCLUDE","MASS", 246 "RTYPE","ADDOP","IDENT","V","N","CONST","FM","", 247 "R","F","M","P","RP","FP","MP","PP", 248 "L","S","A","AN","NA","NAN","","", 249 "","","","","","","","", 250 "%MSTART","%CLEAR","%PRED","","%DUBIOUS","%DUP","%PIN","%POUT", 251 "%EDUP","","PIDENT","CIDENT","OIDENT","FNAME","SWID","DOTL", 252 "DOTR","ASEP","CSEP","OSEP","PSEP","ARB","BPLRB","ORB", 253 "PRB","CRB","RCRB","RECRB","RECLB","LAB","MLAB","SLAB", 254 "XNAME","OWNT","DBSEP","PCONST","CMOD","CSIGN","CUOP","COP1", 255 "COP2","COP3","INDEF","XELSE","CRESOP","NLAB","RUNTIL","ACONST", 256 "ORRB","FMANY","OSTRING","FMLB","FMRB","FMOR","RANGERB","FSID", 257 "","","","","","%DUMMY","%DECL","%TYPE", 258 "%ZERO","%APPLY","%PROT","%SETPROT","%PTYPE","%GAPP","%LOCAL","%GUARD", 259 "%MCODE","%CDUMMY","%SETTYPE","%OPER","%PARAM","%BLOCK","%OTHER","%COMPILE", 260 "APP","BASEAPP","APP2","APP3","APP4","APP5","APP6","ADEFN", 261 "NPARM","SWDEF","SWIDS","CIEXP","RCONST","SCONST","ARRAYP","XIMP", 262 "IMP","COND","SCOND","EXP1","EXP2","SEXP","IEXP","IEXP1", 263 "IEXP2","ISEXP","SEQ","FDEF","EXP","NARRAYP","STRUCT","RESEXP", 264 "BPL","CONSTB","FITEM","MOREA","CLIST","FPP","FPP0","FPP1", 265 "FPP2","INITVAR","RECEXP","EIMP","IDENTS","RANGE","RCONSTB","VARP", 266 "INITDEC","","","","ESCDEC","ESCPROC","ESCARRAY","ESCREC" 267 1284 @ 13667: LINE 234 "regression-compile-tmp/pass1.imp" 1285 @ 13703: PUSHI #0x00000000 1286 @ 13708: PUSHI #0x000000ff 1287 @ 13713: BOUNDS 1288 @ 13714: DEF TEXT p1=V_00e0 a/tf=3b b/format=8 c/ostate=112 type=3 (string) form=11 (array) special=0 () linkage=2 (constant) spec=0 indirect=1 unass=0 1289 @ 13730: PUSHS "Z" 1290 @ 13733: INIT 1 1291 @ 13736: PUSHS "VDEC" 1292 @ 13742: INIT 1 1293 @ 13745: PUSHS "OWNVDEC" 1294 @ 13754: INIT 1 1295 @ 13757: PUSHS "EXTVSPEC" 1296 @ 13767: INIT 1 1297 @ 13770: PUSHS "ADEC" 1298 @ 13776: INIT 1 1299 @ 13779: PUSHS "OWNADEC" 1300 @ 13788: INIT 1 1301 @ 13791: PUSHS "EXTASPEC" 1302 @ 13801: INIT 1 1303 @ 13804: PUSHS "PROC" 1304 @ 13810: INIT 1 1305 @ 13813: PUSHS "PROCSPEC" 1306 @ 13823: INIT 1 1307 @ 13826: PUSHS "FORMDEC" 1308 @ 13835: INIT 1 1309 @ 13838: PUSHS "SWDEC" 1310 @ 13845: INIT 1 1311 @ 13848: PUSHS "LDEC" 1312 @ 13854: INIT 1 1313 @ 13857: PUSHS "FORMSPEC" 1314 @ 13867: INIT 1 1315 @ 13870: PUSHS "" 1316 @ 13872: INIT 1 1317 @ 13875: PUSHS "" 1318 @ 13877: INIT 1 1319 @ 13880: PUSHS "" 1320 @ 13882: INIT 1 1321 @ 13885: PUSHS "" 1322 @ 13887: INIT 1 1323 @ 13890: PUSHS "" 1324 @ 13892: INIT 1 1325 @ 13895: PUSHS "OPTION" 1326 @ 13903: INIT 1 1327 @ 13906: PUSHS "COMMA" 1328 @ 13913: INIT 1 1329 @ 13916: PUSHS "T" 1330 @ 13919: INIT 1 1331 @ 13922: PUSHS "COLON" 1332 @ 13929: INIT 1 1333 @ 13932: PUSHS "COMMENT" 1334 @ 13941: INIT 1 1335 @ 13944: PUSHS "LB" 1336 @ 13948: INIT 1 1337 @ 13951: PUSHS "ALIAS" 1338 @ 13958: INIT 1 1339 @ 13961: PUSHS "RB" 1340 @ 13965: INIT 1 1341 @ 13968: PUSHS "SUB" 1342 @ 13973: INIT 1 1343 @ 13976: PUSHS "ARRAYD" 1344 @ 13984: INIT 1 1345 @ 13987: PUSHS "STYPE" 1346 @ 13994: INIT 1 1347 @ 13997: PUSHS "ARRAY" 1348 @ 14004: INIT 1 1349 @ 14007: PUSHS "NAME" 1350 @ 14013: INIT 1 1351 @ 14016: PUSHS "PROCD" 1352 @ 14023: INIT 1 1353 @ 14026: PUSHS "FNMAP" 1354 @ 14033: INIT 1 1355 @ 14036: PUSHS "SWITCH" 1356 @ 14044: INIT 1 1357 @ 14047: PUSHS "OWN" 1358 @ 14052: INIT 1 1359 @ 14055: PUSHS "EXTERNAL" 1360 @ 14065: INIT 1 1361 @ 14068: PUSHS "STRING" 1362 @ 14076: INIT 1 1363 @ 14079: PUSHS "RECORD" 1364 @ 14087: INIT 1 1365 @ 14090: PUSHS "FORMAT" 1366 @ 14098: INIT 1 1367 @ 14101: PUSHS "SPEC" 1368 @ 14107: INIT 1 1369 @ 14110: PUSHS "MCODE" 1370 @ 14117: INIT 1 1371 @ 14120: PUSHS "LABEL" 1372 @ 14127: INIT 1 1373 @ 14130: PUSHS "OP1" 1374 @ 14135: INIT 1 1375 @ 14138: PUSHS "OP2" 1376 @ 14143: INIT 1 1377 @ 14146: PUSHS "OP3" 1378 @ 14151: INIT 1 1379 @ 14154: PUSHS "SIGN" 1380 @ 14160: INIT 1 1381 @ 14163: PUSHS "UOP" 1382 @ 14168: INIT 1 1383 @ 14171: PUSHS "MOD" 1384 @ 14176: INIT 1 1385 @ 14179: PUSHS "DOT" 1386 @ 14184: INIT 1 1387 @ 14187: PUSHS "COMP" 1388 @ 14193: INIT 1 1389 @ 14196: PUSHS "ACOMP" 1390 @ 14203: INIT 1 1391 @ 14206: PUSHS "EQ" 1392 @ 14210: INIT 1 1393 @ 14213: PUSHS "EQEQ" 1394 @ 14219: INIT 1 1395 @ 14222: PUSHS "JAM" 1396 @ 14227: INIT 1 1397 @ 14230: PUSHS "JUMP" 1398 @ 14236: INIT 1 1399 @ 14239: PUSHS "RESOP" 1400 @ 14246: INIT 1 1401 @ 14249: PUSHS "AND" 1402 @ 14254: INIT 1 1403 @ 14257: PUSHS "OR" 1404 @ 14261: INIT 1 1405 @ 14264: PUSHS "NOT" 1406 @ 14269: INIT 1 1407 @ 14272: PUSHS "WHILE" 1408 @ 14279: INIT 1 1409 @ 14282: PUSHS "UNTIL" 1410 @ 14289: INIT 1 1411 @ 14292: PUSHS "FOR" 1412 @ 14297: INIT 1 1413 @ 14300: PUSHS "CWORD" 1414 @ 14307: INIT 1 1415 @ 14310: PUSHS "EXIT" 1416 @ 14316: INIT 1 1417 @ 14319: PUSHS "ON" 1418 @ 14323: INIT 1 1419 @ 14326: PUSHS "SIGNAL" 1420 @ 14334: INIT 1 1421 @ 14337: PUSHS "THEN" 1422 @ 14343: INIT 1 1423 @ 14346: PUSHS "START" 1424 @ 14353: INIT 1 1425 @ 14356: PUSHS "ELSE" 1426 @ 14362: INIT 1 1427 @ 14365: PUSHS "FINISH" 1428 @ 14373: INIT 1 1429 @ 14376: PUSHS "FELSE" 1430 @ 14383: INIT 1 1431 @ 14386: PUSHS "CYCLE" 1432 @ 14393: INIT 1 1433 @ 14396: PUSHS "REPEAT" 1434 @ 14404: INIT 1 1435 @ 14407: PUSHS "PROGRAM" 1436 @ 14416: INIT 1 1437 @ 14419: PUSHS "BEGIN" 1438 @ 14426: INIT 1 1439 @ 14429: PUSHS "END" 1440 @ 14434: INIT 1 1441 @ 14437: PUSHS "ENDPROG" 1442 @ 14446: INIT 1 1443 @ 14449: PUSHS "ENDPERM" 1444 @ 14458: INIT 1 1445 @ 14461: PUSHS "FRESULT" 1446 @ 14470: INIT 1 1447 @ 14473: PUSHS "MRESULT" 1448 @ 14482: INIT 1 1449 @ 14485: PUSHS "BACK" 1450 @ 14491: INIT 1 1451 @ 14494: PUSHS "MONITOR" 1452 @ 14503: INIT 1 1453 @ 14506: PUSHS "STOP" 1454 @ 14512: INIT 1 1455 @ 14515: PUSHS "LIST" 1456 @ 14521: INIT 1 1457 @ 14524: PUSHS "REALSLN" 1458 @ 14533: INIT 1 1459 @ 14536: PUSHS "CONTROL" 1460 @ 14545: INIT 1 1461 @ 14548: PUSHS "INCLUDE" 1462 @ 14557: INIT 1 1463 @ 14560: PUSHS "MASS" 1464 @ 14566: INIT 1 1465 @ 14569: PUSHS "RTYPE" 1466 @ 14576: INIT 1 1467 @ 14579: PUSHS "ADDOP" 1468 @ 14586: INIT 1 1469 @ 14589: PUSHS "IDENT" 1470 @ 14596: INIT 1 1471 @ 14599: PUSHS "V" 1472 @ 14602: INIT 1 1473 @ 14605: PUSHS "N" 1474 @ 14608: INIT 1 1475 @ 14611: PUSHS "CONST" 1476 @ 14618: INIT 1 1477 @ 14621: PUSHS "FM" 1478 @ 14625: INIT 1 1479 @ 14628: PUSHS "" 1480 @ 14630: INIT 1 1481 @ 14633: PUSHS "R" 1482 @ 14636: INIT 1 1483 @ 14639: PUSHS "F" 1484 @ 14642: INIT 1 1485 @ 14645: PUSHS "M" 1486 @ 14648: INIT 1 1487 @ 14651: PUSHS "P" 1488 @ 14654: INIT 1 1489 @ 14657: PUSHS "RP" 1490 @ 14661: INIT 1 1491 @ 14664: PUSHS "FP" 1492 @ 14668: INIT 1 1493 @ 14671: PUSHS "MP" 1494 @ 14675: INIT 1 1495 @ 14678: PUSHS "PP" 1496 @ 14682: INIT 1 1497 @ 14685: PUSHS "L" 1498 @ 14688: INIT 1 1499 @ 14691: PUSHS "S" 1500 @ 14694: INIT 1 1501 @ 14697: PUSHS "A" 1502 @ 14700: INIT 1 1503 @ 14703: PUSHS "AN" 1504 @ 14707: INIT 1 1505 @ 14710: PUSHS "NA" 1506 @ 14714: INIT 1 1507 @ 14717: PUSHS "NAN" 1508 @ 14722: INIT 1 1509 @ 14725: PUSHS "" 1510 @ 14727: INIT 1 1511 @ 14730: PUSHS "" 1512 @ 14732: INIT 1 1513 @ 14735: PUSHS "" 1514 @ 14737: INIT 1 1515 @ 14740: PUSHS "" 1516 @ 14742: INIT 1 1517 @ 14745: PUSHS "" 1518 @ 14747: INIT 1 1519 @ 14750: PUSHS "" 1520 @ 14752: INIT 1 1521 @ 14755: PUSHS "" 1522 @ 14757: INIT 1 1523 @ 14760: PUSHS "" 1524 @ 14762: INIT 1 1525 @ 14765: PUSHS "" 1526 @ 14767: INIT 1 1527 @ 14770: PUSHS "" 1528 @ 14772: INIT 1 1529 @ 14775: PUSHS "%MSTART" 1530 @ 14784: INIT 1 1531 @ 14787: PUSHS "%CLEAR" 1532 @ 14795: INIT 1 1533 @ 14798: PUSHS "%PRED" 1534 @ 14805: INIT 1 1535 @ 14808: PUSHS "" 1536 @ 14810: INIT 1 1537 @ 14813: PUSHS "%DUBIOUS" 1538 @ 14823: INIT 1 1539 @ 14826: PUSHS "%DUP" 1540 @ 14832: INIT 1 1541 @ 14835: PUSHS "%PIN" 1542 @ 14841: INIT 1 1543 @ 14844: PUSHS "%POUT" 1544 @ 14851: INIT 1 1545 @ 14854: PUSHS "%EDUP" 1546 @ 14861: INIT 1 1547 @ 14864: PUSHS "" 1548 @ 14866: INIT 1 1549 @ 14869: PUSHS "PIDENT" 1550 @ 14877: INIT 1 1551 @ 14880: PUSHS "CIDENT" 1552 @ 14888: INIT 1 1553 @ 14891: PUSHS "OIDENT" 1554 @ 14899: INIT 1 1555 @ 14902: PUSHS "FNAME" 1556 @ 14909: INIT 1 1557 @ 14912: PUSHS "SWID" 1558 @ 14918: INIT 1 1559 @ 14921: PUSHS "DOTL" 1560 @ 14927: INIT 1 1561 @ 14930: PUSHS "DOTR" 1562 @ 14936: INIT 1 1563 @ 14939: PUSHS "ASEP" 1564 @ 14945: INIT 1 1565 @ 14948: PUSHS "CSEP" 1566 @ 14954: INIT 1 1567 @ 14957: PUSHS "OSEP" 1568 @ 14963: INIT 1 1569 @ 14966: PUSHS "PSEP" 1570 @ 14972: INIT 1 1571 @ 14975: PUSHS "ARB" 1572 @ 14980: INIT 1 1573 @ 14983: PUSHS "BPLRB" 1574 @ 14990: INIT 1 1575 @ 14993: PUSHS "ORB" 1576 @ 14998: INIT 1 1577 @ 15001: PUSHS "PRB" 1578 @ 15006: INIT 1 1579 @ 15009: PUSHS "CRB" 1580 @ 15014: INIT 1 1581 @ 15017: PUSHS "RCRB" 1582 @ 15023: INIT 1 1583 @ 15026: PUSHS "RECRB" 1584 @ 15033: INIT 1 1585 @ 15036: PUSHS "RECLB" 1586 @ 15043: INIT 1 1587 @ 15046: PUSHS "LAB" 1588 @ 15051: INIT 1 1589 @ 15054: PUSHS "MLAB" 1590 @ 15060: INIT 1 1591 @ 15063: PUSHS "SLAB" 1592 @ 15069: INIT 1 1593 @ 15072: PUSHS "XNAME" 1594 @ 15079: INIT 1 1595 @ 15082: PUSHS "OWNT" 1596 @ 15088: INIT 1 1597 @ 15091: PUSHS "DBSEP" 1598 @ 15098: INIT 1 1599 @ 15101: PUSHS "PCONST" 1600 @ 15109: INIT 1 1601 @ 15112: PUSHS "CMOD" 1602 @ 15118: INIT 1 1603 @ 15121: PUSHS "CSIGN" 1604 @ 15128: INIT 1 1605 @ 15131: PUSHS "CUOP" 1606 @ 15137: INIT 1 1607 @ 15140: PUSHS "COP1" 1608 @ 15146: INIT 1 1609 @ 15149: PUSHS "COP2" 1610 @ 15155: INIT 1 1611 @ 15158: PUSHS "COP3" 1612 @ 15164: INIT 1 1613 @ 15167: PUSHS "INDEF" 1614 @ 15174: INIT 1 1615 @ 15177: PUSHS "XELSE" 1616 @ 15184: INIT 1 1617 @ 15187: PUSHS "CRESOP" 1618 @ 15195: INIT 1 1619 @ 15198: PUSHS "NLAB" 1620 @ 15204: INIT 1 1621 @ 15207: PUSHS "RUNTIL" 1622 @ 15215: INIT 1 1623 @ 15218: PUSHS "ACONST" 1624 @ 15226: INIT 1 1625 @ 15229: PUSHS "ORRB" 1626 @ 15235: INIT 1 1627 @ 15238: PUSHS "FMANY" 1628 @ 15245: INIT 1 1629 @ 15248: PUSHS "OSTRING" 1630 @ 15257: INIT 1 1631 @ 15260: PUSHS "FMLB" 1632 @ 15266: INIT 1 1633 @ 15269: PUSHS "FMRB" 1634 @ 15275: INIT 1 1635 @ 15278: PUSHS "FMOR" 1636 @ 15284: INIT 1 1637 @ 15287: PUSHS "RANGERB" 1638 @ 15296: INIT 1 1639 @ 15299: PUSHS "FSID" 1640 @ 15305: INIT 1 1641 @ 15308: PUSHS "" 1642 @ 15310: INIT 1 1643 @ 15313: PUSHS "" 1644 @ 15315: INIT 1 1645 @ 15318: PUSHS "" 1646 @ 15320: INIT 1 1647 @ 15323: PUSHS "" 1648 @ 15325: INIT 1 1649 @ 15328: PUSHS "" 1650 @ 15330: INIT 1 1651 @ 15333: PUSHS "%DUMMY" 1652 @ 15341: INIT 1 1653 @ 15344: PUSHS "%DECL" 1654 @ 15351: INIT 1 1655 @ 15354: PUSHS "%TYPE" 1656 @ 15361: INIT 1 1657 @ 15364: PUSHS "%ZERO" 1658 @ 15371: INIT 1 1659 @ 15374: PUSHS "%APPLY" 1660 @ 15382: INIT 1 1661 @ 15385: PUSHS "%PROT" 1662 @ 15392: INIT 1 1663 @ 15395: PUSHS "%SETPROT" 1664 @ 15405: INIT 1 1665 @ 15408: PUSHS "%PTYPE" 1666 @ 15416: INIT 1 1667 @ 15419: PUSHS "%GAPP" 1668 @ 15426: INIT 1 1669 @ 15429: PUSHS "%LOCAL" 1670 @ 15437: INIT 1 1671 @ 15440: PUSHS "%GUARD" 1672 @ 15448: INIT 1 1673 @ 15451: PUSHS "%MCODE" 1674 @ 15459: INIT 1 1675 @ 15462: PUSHS "%CDUMMY" 1676 @ 15471: INIT 1 1677 @ 15474: PUSHS "%SETTYPE" 1678 @ 15484: INIT 1 1679 @ 15487: PUSHS "%OPER" 1680 @ 15494: INIT 1 1681 @ 15497: PUSHS "%PARAM" 1682 @ 15505: INIT 1 1683 @ 15508: PUSHS "%BLOCK" 1684 @ 15516: INIT 1 1685 @ 15519: PUSHS "%OTHER" 1686 @ 15527: INIT 1 1687 @ 15530: PUSHS "%COMPILE" 1688 @ 15540: INIT 1 1689 @ 15543: PUSHS "APP" 1690 @ 15548: INIT 1 1691 @ 15551: PUSHS "BASEAPP" 1692 @ 15560: INIT 1 1693 @ 15563: PUSHS "APP2" 1694 @ 15569: INIT 1 1695 @ 15572: PUSHS "APP3" 1696 @ 15578: INIT 1 1697 @ 15581: PUSHS "APP4" 1698 @ 15587: INIT 1 1699 @ 15590: PUSHS "APP5" 1700 @ 15596: INIT 1 1701 @ 15599: PUSHS "APP6" 1702 @ 15605: INIT 1 1703 @ 15608: PUSHS "ADEFN" 1704 @ 15615: INIT 1 1705 @ 15618: PUSHS "NPARM" 1706 @ 15625: INIT 1 1707 @ 15628: PUSHS "SWDEF" 1708 @ 15635: INIT 1 1709 @ 15638: PUSHS "SWIDS" 1710 @ 15645: INIT 1 1711 @ 15648: PUSHS "CIEXP" 1712 @ 15655: INIT 1 1713 @ 15658: PUSHS "RCONST" 1714 @ 15666: INIT 1 1715 @ 15669: PUSHS "SCONST" 1716 @ 15677: INIT 1 1717 @ 15680: PUSHS "ARRAYP" 1718 @ 15688: INIT 1 1719 @ 15691: PUSHS "XIMP" 1720 @ 15697: INIT 1 1721 @ 15700: PUSHS "IMP" 1722 @ 15705: INIT 1 1723 @ 15708: PUSHS "COND" 1724 @ 15714: INIT 1 1725 @ 15717: PUSHS "SCOND" 1726 @ 15724: INIT 1 1727 @ 15727: PUSHS "EXP1" 1728 @ 15733: INIT 1 1729 @ 15736: PUSHS "EXP2" 1730 @ 15742: INIT 1 1731 @ 15745: PUSHS "SEXP" 1732 @ 15751: INIT 1 1733 @ 15754: PUSHS "IEXP" 1734 @ 15760: INIT 1 1735 @ 15763: PUSHS "IEXP1" 1736 @ 15770: INIT 1 1737 @ 15773: PUSHS "IEXP2" 1738 @ 15780: INIT 1 1739 @ 15783: PUSHS "ISEXP" 1740 @ 15790: INIT 1 1741 @ 15793: PUSHS "SEQ" 1742 @ 15798: INIT 1 1743 @ 15801: PUSHS "FDEF" 1744 @ 15807: INIT 1 1745 @ 15810: PUSHS "EXP" 1746 @ 15815: INIT 1 1747 @ 15818: PUSHS "NARRAYP" 1748 @ 15827: INIT 1 1749 @ 15830: PUSHS "STRUCT" 1750 @ 15838: INIT 1 1751 @ 15841: PUSHS "RESEXP" 1752 @ 15849: INIT 1 1753 @ 15852: PUSHS "BPL" 1754 @ 15857: INIT 1 1755 @ 15860: PUSHS "CONSTB" 1756 @ 15868: INIT 1 1757 @ 15871: PUSHS "FITEM" 1758 @ 15878: INIT 1 1759 @ 15881: PUSHS "MOREA" 1760 @ 15888: INIT 1 1761 @ 15891: PUSHS "CLIST" 1762 @ 15898: INIT 1 1763 @ 15901: PUSHS "FPP" 1764 @ 15906: INIT 1 1765 @ 15909: PUSHS "FPP0" 1766 @ 15915: INIT 1 1767 @ 15918: PUSHS "FPP1" 1768 @ 15924: INIT 1 1769 @ 15927: PUSHS "FPP2" 1770 @ 15933: INIT 1 1771 @ 15936: PUSHS "INITVAR" 1772 @ 15945: INIT 1 1773 @ 15948: PUSHS "RECEXP" 1774 @ 15956: INIT 1 1775 @ 15959: PUSHS "EIMP" 1776 @ 15965: INIT 1 1777 @ 15968: PUSHS "IDENTS" 1778 @ 15976: INIT 1 1779 @ 15979: PUSHS "RANGE" 1780 @ 15986: INIT 1 1781 @ 15989: PUSHS "RCONSTB" 1782 @ 15998: INIT 1 1783 @ 16001: PUSHS "VARP" 1784 @ 16007: INIT 1 1785 @ 16010: PUSHS "INITDEC" 1786 @ 16019: INIT 1 1787 @ 16022: PUSHS "" 1788 @ 16024: INIT 1 1789 @ 16027: PUSHS "" 1790 @ 16029: INIT 1 1791 @ 16032: PUSHS "" 1792 @ 16034: INIT 1 1793 @ 16037: PUSHS "ESCDEC" 1794 @ 16045: INIT 1 1795 @ 16048: PUSHS "ESCPROC" 1796 @ 16057: INIT 1 1797 @ 16060: PUSHS "ESCARRAY" 1798 @ 16070: INIT 1 1799 @ 16073: PUSHS "ESCREC" 1800 @ 16081: INIT 1 268 %constinteger gmax1=719 1801 @ 16084: LINE 268 "regression-compile-tmp/pass1.imp" 269 %owninteger gmax=719 1802 @ 16120: LINE 269 "regression-compile-tmp/pass1.imp" 1803 @ 16156: PUSHI #0x000002cf 1804 @ 16161: DEF GMAX p1=V_00e1 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 1805 @ 16177: INIT 1 270 %constinteger imp phrase =25 271 272 ! FLAG<1> 0<1> SS<2> 0<3> T<1> LINK<8> 1806 @ 16180: LINE 270 "regression-compile-tmp/pass1.imp" 273 %constshortintegerarray initial(0:119) = %c 274 24, 0, 0, 0, 0, 0, 0, 0, 275 0, 0, 0, 0, 0, 0, 0, 0, 276 0, 0, 23, 0, 0, 0, 0, 0, 277 0, 0, 0, 0, 0, 0, 0, 0, 278 0, 0, 0, 0, 0, 0, 0, 0, 279 20, 0, 0, 0, 0, 0, 0, 0, 280 0, 0, 0, 0, 0, 0, -32551, 0, 281 0, 0, 0, 13, 0, 14, 4, -32557, 282 16, -32550, 0, 0, 5, 6, 3, 12, 283 15, 8, 7, 9, 10, 11, -32558, -32554, 284 -32559, -32552, -32553, 18, 22, 17, 21, 19, 285 0, 0, 0, -32562, -32560, 0, 0, 0, 286 -32561, 0, 0, 0, 0, 0, 0, 0, 287 1, 2, 0, -32556, 0, -32555, 0, 0, 288 0, 0, 0, 0, 0, 0, 0, 0 289 1807 @ 16216: LINE 273 "regression-compile-tmp/pass1.imp" 1808 @ 16252: PUSHI #0x00000000 1809 @ 16257: PUSHI #0x00000077 1810 @ 16262: BOUNDS 1811 @ 16263: DEF INITIAL p1=V_00e2 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 1812 @ 16282: PUSHI #0x00000018 1813 @ 16287: INIT 1 1814 @ 16290: PUSHI #0x00000000 1815 @ 16295: INIT 1 1816 @ 16298: PUSHI #0x00000000 1817 @ 16303: INIT 1 1818 @ 16306: PUSHI #0x00000000 1819 @ 16311: INIT 1 1820 @ 16314: PUSHI #0x00000000 1821 @ 16319: INIT 1 1822 @ 16322: PUSHI #0x00000000 1823 @ 16327: INIT 1 1824 @ 16330: PUSHI #0x00000000 1825 @ 16335: INIT 1 1826 @ 16338: PUSHI #0x00000000 1827 @ 16343: INIT 1 1828 @ 16346: PUSHI #0x00000000 1829 @ 16351: INIT 1 1830 @ 16354: PUSHI #0x00000000 1831 @ 16359: INIT 1 1832 @ 16362: PUSHI #0x00000000 1833 @ 16367: INIT 1 1834 @ 16370: PUSHI #0x00000000 1835 @ 16375: INIT 1 1836 @ 16378: PUSHI #0x00000000 1837 @ 16383: INIT 1 1838 @ 16386: PUSHI #0x00000000 1839 @ 16391: INIT 1 1840 @ 16394: PUSHI #0x00000000 1841 @ 16399: INIT 1 1842 @ 16402: PUSHI #0x00000000 1843 @ 16407: INIT 1 1844 @ 16410: PUSHI #0x00000000 1845 @ 16415: INIT 1 1846 @ 16418: PUSHI #0x00000000 1847 @ 16423: INIT 1 1848 @ 16426: PUSHI #0x00000017 1849 @ 16431: INIT 1 1850 @ 16434: PUSHI #0x00000000 1851 @ 16439: INIT 1 1852 @ 16442: PUSHI #0x00000000 1853 @ 16447: INIT 1 1854 @ 16450: PUSHI #0x00000000 1855 @ 16455: INIT 1 1856 @ 16458: PUSHI #0x00000000 1857 @ 16463: INIT 1 1858 @ 16466: PUSHI #0x00000000 1859 @ 16471: INIT 1 1860 @ 16474: PUSHI #0x00000000 1861 @ 16479: INIT 1 1862 @ 16482: PUSHI #0x00000000 1863 @ 16487: INIT 1 1864 @ 16490: PUSHI #0x00000000 1865 @ 16495: INIT 1 1866 @ 16498: PUSHI #0x00000000 1867 @ 16503: INIT 1 1868 @ 16506: PUSHI #0x00000000 1869 @ 16511: INIT 1 1870 @ 16514: PUSHI #0x00000000 1871 @ 16519: INIT 1 1872 @ 16522: PUSHI #0x00000000 1873 @ 16527: INIT 1 1874 @ 16530: PUSHI #0x00000000 1875 @ 16535: INIT 1 1876 @ 16538: PUSHI #0x00000000 1877 @ 16543: INIT 1 1878 @ 16546: PUSHI #0x00000000 1879 @ 16551: INIT 1 1880 @ 16554: PUSHI #0x00000000 1881 @ 16559: INIT 1 1882 @ 16562: PUSHI #0x00000000 1883 @ 16567: INIT 1 1884 @ 16570: PUSHI #0x00000000 1885 @ 16575: INIT 1 1886 @ 16578: PUSHI #0x00000000 1887 @ 16583: INIT 1 1888 @ 16586: PUSHI #0x00000000 1889 @ 16591: INIT 1 1890 @ 16594: PUSHI #0x00000000 1891 @ 16599: INIT 1 1892 @ 16602: PUSHI #0x00000014 1893 @ 16607: INIT 1 1894 @ 16610: PUSHI #0x00000000 1895 @ 16615: INIT 1 1896 @ 16618: PUSHI #0x00000000 1897 @ 16623: INIT 1 1898 @ 16626: PUSHI #0x00000000 1899 @ 16631: INIT 1 1900 @ 16634: PUSHI #0x00000000 1901 @ 16639: INIT 1 1902 @ 16642: PUSHI #0x00000000 1903 @ 16647: INIT 1 1904 @ 16650: PUSHI #0x00000000 1905 @ 16655: INIT 1 1906 @ 16658: PUSHI #0x00000000 1907 @ 16663: INIT 1 1908 @ 16666: PUSHI #0x00000000 1909 @ 16671: INIT 1 1910 @ 16674: PUSHI #0x00000000 1911 @ 16679: INIT 1 1912 @ 16682: PUSHI #0x00000000 1913 @ 16687: INIT 1 1914 @ 16690: PUSHI #0x00000000 1915 @ 16695: INIT 1 1916 @ 16698: PUSHI #0x00000000 1917 @ 16703: INIT 1 1918 @ 16706: PUSHI #0x00000000 1919 @ 16711: INIT 1 1920 @ 16714: PUSHI #0xffff80d9 1921 @ 16719: INIT 1 1922 @ 16722: PUSHI #0x00000000 1923 @ 16727: INIT 1 1924 @ 16730: PUSHI #0x00000000 1925 @ 16735: INIT 1 1926 @ 16738: PUSHI #0x00000000 1927 @ 16743: INIT 1 1928 @ 16746: PUSHI #0x00000000 1929 @ 16751: INIT 1 1930 @ 16754: PUSHI #0x0000000d 1931 @ 16759: INIT 1 1932 @ 16762: PUSHI #0x00000000 1933 @ 16767: INIT 1 1934 @ 16770: PUSHI #0x0000000e 1935 @ 16775: INIT 1 1936 @ 16778: PUSHI #0x00000004 1937 @ 16783: INIT 1 1938 @ 16786: PUSHI #0xffff80d3 1939 @ 16791: INIT 1 1940 @ 16794: PUSHI #0x00000010 1941 @ 16799: INIT 1 1942 @ 16802: PUSHI #0xffff80da 1943 @ 16807: INIT 1 1944 @ 16810: PUSHI #0x00000000 1945 @ 16815: INIT 1 1946 @ 16818: PUSHI #0x00000000 1947 @ 16823: INIT 1 1948 @ 16826: PUSHI #0x00000005 1949 @ 16831: INIT 1 1950 @ 16834: PUSHI #0x00000006 1951 @ 16839: INIT 1 1952 @ 16842: PUSHI #0x00000003 1953 @ 16847: INIT 1 1954 @ 16850: PUSHI #0x0000000c 1955 @ 16855: INIT 1 1956 @ 16858: PUSHI #0x0000000f 1957 @ 16863: INIT 1 1958 @ 16866: PUSHI #0x00000008 1959 @ 16871: INIT 1 1960 @ 16874: PUSHI #0x00000007 1961 @ 16879: INIT 1 1962 @ 16882: PUSHI #0x00000009 1963 @ 16887: INIT 1 1964 @ 16890: PUSHI #0x0000000a 1965 @ 16895: INIT 1 1966 @ 16898: PUSHI #0x0000000b 1967 @ 16903: INIT 1 1968 @ 16906: PUSHI #0xffff80d2 1969 @ 16911: INIT 1 1970 @ 16914: PUSHI #0xffff80d6 1971 @ 16919: INIT 1 1972 @ 16922: PUSHI #0xffff80d1 1973 @ 16927: INIT 1 1974 @ 16930: PUSHI #0xffff80d8 1975 @ 16935: INIT 1 1976 @ 16938: PUSHI #0xffff80d7 1977 @ 16943: INIT 1 1978 @ 16946: PUSHI #0x00000012 1979 @ 16951: INIT 1 1980 @ 16954: PUSHI #0x00000016 1981 @ 16959: INIT 1 1982 @ 16962: PUSHI #0x00000011 1983 @ 16967: INIT 1 1984 @ 16970: PUSHI #0x00000015 1985 @ 16975: INIT 1 1986 @ 16978: PUSHI #0x00000013 1987 @ 16983: INIT 1 1988 @ 16986: PUSHI #0x00000000 1989 @ 16991: INIT 1 1990 @ 16994: PUSHI #0x00000000 1991 @ 16999: INIT 1 1992 @ 17002: PUSHI #0x00000000 1993 @ 17007: INIT 1 1994 @ 17010: PUSHI #0xffff80ce 1995 @ 17015: INIT 1 1996 @ 17018: PUSHI #0xffff80d0 1997 @ 17023: INIT 1 1998 @ 17026: PUSHI #0x00000000 1999 @ 17031: INIT 1 2000 @ 17034: PUSHI #0x00000000 2001 @ 17039: INIT 1 2002 @ 17042: PUSHI #0x00000000 2003 @ 17047: INIT 1 2004 @ 17050: PUSHI #0xffff80cf 2005 @ 17055: INIT 1 2006 @ 17058: PUSHI #0x00000000 2007 @ 17063: INIT 1 2008 @ 17066: PUSHI #0x00000000 2009 @ 17071: INIT 1 2010 @ 17074: PUSHI #0x00000000 2011 @ 17079: INIT 1 2012 @ 17082: PUSHI #0x00000000 2013 @ 17087: INIT 1 2014 @ 17090: PUSHI #0x00000000 2015 @ 17095: INIT 1 2016 @ 17098: PUSHI #0x00000000 2017 @ 17103: INIT 1 2018 @ 17106: PUSHI #0x00000000 2019 @ 17111: INIT 1 2020 @ 17114: PUSHI #0x00000001 2021 @ 17119: INIT 1 2022 @ 17122: PUSHI #0x00000002 2023 @ 17127: INIT 1 2024 @ 17130: PUSHI #0x00000000 2025 @ 17135: INIT 1 2026 @ 17138: PUSHI #0xffff80d4 2027 @ 17143: INIT 1 2028 @ 17146: PUSHI #0x00000000 2029 @ 17151: INIT 1 2030 @ 17154: PUSHI #0xffff80d5 2031 @ 17159: INIT 1 2032 @ 17162: PUSHI #0x00000000 2033 @ 17167: INIT 1 2034 @ 17170: PUSHI #0x00000000 2035 @ 17175: INIT 1 2036 @ 17178: PUSHI #0x00000000 2037 @ 17183: INIT 1 2038 @ 17186: PUSHI #0x00000000 2039 @ 17191: INIT 1 2040 @ 17194: PUSHI #0x00000000 2041 @ 17199: INIT 1 2042 @ 17202: PUSHI #0x00000000 2043 @ 17207: INIT 1 2044 @ 17210: PUSHI #0x00000000 2045 @ 17215: INIT 1 2046 @ 17218: PUSHI #0x00000000 2047 @ 17223: INIT 1 2048 @ 17226: PUSHI #0x00000000 2049 @ 17231: INIT 1 2050 @ 17234: PUSHI #0x00000000 2051 @ 17239: INIT 1 290 %constbyteintegerarray atomic(130:179) = %c 291 90, 90, 90, 90, 90, 48, 48, 19, 292 19, 19, 19, 25, 25, 25, 25, 25, 293 25, 25, 23, 104, 104, 105, 30, 20, 294 21, 93, 47, 45, 46, 42, 43, 44, 295 40, 68, 55, 104, 60, 93, 25, 40, 296 93, 23, 25, 57, 25, 90, 176, 177, 297 178, 179 298 2052 @ 17242: LINE 290 "regression-compile-tmp/pass1.imp" 2053 @ 17278: PUSHI #0x00000082 2054 @ 17283: PUSHI #0x000000b3 2055 @ 17288: BOUNDS 2056 @ 17289: DEF ATOMIC 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 2057 @ 17307: PUSHI #0x0000005a 2058 @ 17312: INIT 1 2059 @ 17315: PUSHI #0x0000005a 2060 @ 17320: INIT 1 2061 @ 17323: PUSHI #0x0000005a 2062 @ 17328: INIT 1 2063 @ 17331: PUSHI #0x0000005a 2064 @ 17336: INIT 1 2065 @ 17339: PUSHI #0x0000005a 2066 @ 17344: INIT 1 2067 @ 17347: PUSHI #0x00000030 2068 @ 17352: INIT 1 2069 @ 17355: PUSHI #0x00000030 2070 @ 17360: INIT 1 2071 @ 17363: PUSHI #0x00000013 2072 @ 17368: INIT 1 2073 @ 17371: PUSHI #0x00000013 2074 @ 17376: INIT 1 2075 @ 17379: PUSHI #0x00000013 2076 @ 17384: INIT 1 2077 @ 17387: PUSHI #0x00000013 2078 @ 17392: INIT 1 2079 @ 17395: PUSHI #0x00000019 2080 @ 17400: INIT 1 2081 @ 17403: PUSHI #0x00000019 2082 @ 17408: INIT 1 2083 @ 17411: PUSHI #0x00000019 2084 @ 17416: INIT 1 2085 @ 17419: PUSHI #0x00000019 2086 @ 17424: INIT 1 2087 @ 17427: PUSHI #0x00000019 2088 @ 17432: INIT 1 2089 @ 17435: PUSHI #0x00000019 2090 @ 17440: INIT 1 2091 @ 17443: PUSHI #0x00000019 2092 @ 17448: INIT 1 2093 @ 17451: PUSHI #0x00000017 2094 @ 17456: INIT 1 2095 @ 17459: PUSHI #0x00000068 2096 @ 17464: INIT 1 2097 @ 17467: PUSHI #0x00000068 2098 @ 17472: INIT 1 2099 @ 17475: PUSHI #0x00000069 2100 @ 17480: INIT 1 2101 @ 17483: PUSHI #0x0000001e 2102 @ 17488: INIT 1 2103 @ 17491: PUSHI #0x00000014 2104 @ 17496: INIT 1 2105 @ 17499: PUSHI #0x00000015 2106 @ 17504: INIT 1 2107 @ 17507: PUSHI #0x0000005d 2108 @ 17512: INIT 1 2109 @ 17515: PUSHI #0x0000002f 2110 @ 17520: INIT 1 2111 @ 17523: PUSHI #0x0000002d 2112 @ 17528: INIT 1 2113 @ 17531: PUSHI #0x0000002e 2114 @ 17536: INIT 1 2115 @ 17539: PUSHI #0x0000002a 2116 @ 17544: INIT 1 2117 @ 17547: PUSHI #0x0000002b 2118 @ 17552: INIT 1 2119 @ 17555: PUSHI #0x0000002c 2120 @ 17560: INIT 1 2121 @ 17563: PUSHI #0x00000028 2122 @ 17568: INIT 1 2123 @ 17571: PUSHI #0x00000044 2124 @ 17576: INIT 1 2125 @ 17579: PUSHI #0x00000037 2126 @ 17584: INIT 1 2127 @ 17587: PUSHI #0x00000068 2128 @ 17592: INIT 1 2129 @ 17595: PUSHI #0x0000003c 2130 @ 17600: INIT 1 2131 @ 17603: PUSHI #0x0000005d 2132 @ 17608: INIT 1 2133 @ 17611: PUSHI #0x00000019 2134 @ 17616: INIT 1 2135 @ 17619: PUSHI #0x00000028 2136 @ 17624: INIT 1 2137 @ 17627: PUSHI #0x0000005d 2138 @ 17632: INIT 1 2139 @ 17635: PUSHI #0x00000017 2140 @ 17640: INIT 1 2141 @ 17643: PUSHI #0x00000019 2142 @ 17648: INIT 1 2143 @ 17651: PUSHI #0x00000039 2144 @ 17656: INIT 1 2145 @ 17659: PUSHI #0x00000019 2146 @ 17664: INIT 1 2147 @ 17667: PUSHI #0x0000005a 2148 @ 17672: INIT 1 2149 @ 17675: PUSHI #0x000000b0 2150 @ 17680: INIT 1 2151 @ 17683: PUSHI #0x000000b1 2152 @ 17688: INIT 1 2153 @ 17691: PUSHI #0x000000b2 2154 @ 17696: INIT 1 2155 @ 17699: PUSHI #0x000000b3 2156 @ 17704: INIT 1 299 %ownshortintegerarray phrase(200:255) = %C 300 0, 564, 565, 567, 569, 571, 573, 562, 301 614, 203, 200, 602, 478, 480, 624, 298, 302 206, 308, 318, 433, 426, 437, 444, 458, 303 453, 461, 467, 482, 402, 627, 629, 603, 304 521, 511, 486, 502, 575, 527, 528, 543, 305 550, 578, 397, 287, 197, 636, 516, 621, 306 167, 0, 0, 0, 640, 693, 701, 709 307 308 ! MORE<1> 0<1> ORDER<2> TYPE<4> CLASS<8> 2157 @ 17707: LINE 299 "regression-compile-tmp/pass1.imp" 2158 @ 17743: PUSHI #0x000000c8 2159 @ 17748: PUSHI #0x000000ff 2160 @ 17753: BOUNDS 2161 @ 17754: DEF PHRASE p1=V_00e4 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 2162 @ 17772: PUSHI #0x00000000 2163 @ 17777: INIT 1 2164 @ 17780: PUSHI #0x00000234 2165 @ 17785: INIT 1 2166 @ 17788: PUSHI #0x00000235 2167 @ 17793: INIT 1 2168 @ 17796: PUSHI #0x00000237 2169 @ 17801: INIT 1 2170 @ 17804: PUSHI #0x00000239 2171 @ 17809: INIT 1 2172 @ 17812: PUSHI #0x0000023b 2173 @ 17817: INIT 1 2174 @ 17820: PUSHI #0x0000023d 2175 @ 17825: INIT 1 2176 @ 17828: PUSHI #0x00000232 2177 @ 17833: INIT 1 2178 @ 17836: PUSHI #0x00000266 2179 @ 17841: INIT 1 2180 @ 17844: PUSHI #0x000000cb 2181 @ 17849: INIT 1 2182 @ 17852: PUSHI #0x000000c8 2183 @ 17857: INIT 1 2184 @ 17860: PUSHI #0x0000025a 2185 @ 17865: INIT 1 2186 @ 17868: PUSHI #0x000001de 2187 @ 17873: INIT 1 2188 @ 17876: PUSHI #0x000001e0 2189 @ 17881: INIT 1 2190 @ 17884: PUSHI #0x00000270 2191 @ 17889: INIT 1 2192 @ 17892: PUSHI #0x0000012a 2193 @ 17897: INIT 1 2194 @ 17900: PUSHI #0x000000ce 2195 @ 17905: INIT 1 2196 @ 17908: PUSHI #0x00000134 2197 @ 17913: INIT 1 2198 @ 17916: PUSHI #0x0000013e 2199 @ 17921: INIT 1 2200 @ 17924: PUSHI #0x000001b1 2201 @ 17929: INIT 1 2202 @ 17932: PUSHI #0x000001aa 2203 @ 17937: INIT 1 2204 @ 17940: PUSHI #0x000001b5 2205 @ 17945: INIT 1 2206 @ 17948: PUSHI #0x000001bc 2207 @ 17953: INIT 1 2208 @ 17956: PUSHI #0x000001ca 2209 @ 17961: INIT 1 2210 @ 17964: PUSHI #0x000001c5 2211 @ 17969: INIT 1 2212 @ 17972: PUSHI #0x000001cd 2213 @ 17977: INIT 1 2214 @ 17980: PUSHI #0x000001d3 2215 @ 17985: INIT 1 2216 @ 17988: PUSHI #0x000001e2 2217 @ 17993: INIT 1 2218 @ 17996: PUSHI #0x00000192 2219 @ 18001: INIT 1 2220 @ 18004: PUSHI #0x00000273 2221 @ 18009: INIT 1 2222 @ 18012: PUSHI #0x00000275 2223 @ 18017: INIT 1 2224 @ 18020: PUSHI #0x0000025b 2225 @ 18025: INIT 1 2226 @ 18028: PUSHI #0x00000209 2227 @ 18033: INIT 1 2228 @ 18036: PUSHI #0x000001ff 2229 @ 18041: INIT 1 2230 @ 18044: PUSHI #0x000001e6 2231 @ 18049: INIT 1 2232 @ 18052: PUSHI #0x000001f6 2233 @ 18057: INIT 1 2234 @ 18060: PUSHI #0x0000023f 2235 @ 18065: INIT 1 2236 @ 18068: PUSHI #0x0000020f 2237 @ 18073: INIT 1 2238 @ 18076: PUSHI #0x00000210 2239 @ 18081: INIT 1 2240 @ 18084: PUSHI #0x0000021f 2241 @ 18089: INIT 1 2242 @ 18092: PUSHI #0x00000226 2243 @ 18097: INIT 1 2244 @ 18100: PUSHI #0x00000242 2245 @ 18105: INIT 1 2246 @ 18108: PUSHI #0x0000018d 2247 @ 18113: INIT 1 2248 @ 18116: PUSHI #0x0000011f 2249 @ 18121: INIT 1 2250 @ 18124: PUSHI #0x000000c5 2251 @ 18129: INIT 1 2252 @ 18132: PUSHI #0x0000027c 2253 @ 18137: INIT 1 2254 @ 18140: PUSHI #0x00000204 2255 @ 18145: INIT 1 2256 @ 18148: PUSHI #0x0000026d 2257 @ 18153: INIT 1 2258 @ 18156: PUSHI #0x000000a7 2259 @ 18161: INIT 1 2260 @ 18164: PUSHI #0x00000000 2261 @ 18169: INIT 1 2262 @ 18172: PUSHI #0x00000000 2263 @ 18177: INIT 1 2264 @ 18180: PUSHI #0x00000000 2265 @ 18185: INIT 1 2266 @ 18188: PUSHI #0x00000280 2267 @ 18193: INIT 1 2268 @ 18196: PUSHI #0x000002b5 2269 @ 18201: INIT 1 2270 @ 18204: PUSHI #0x000002bd 2271 @ 18209: INIT 1 2272 @ 18212: PUSHI #0x000002c5 2273 @ 18217: INIT 1 309 %ownshortintegerarray gram(0:max grammar) = %c 310 0, -28523, -28521, -28602, -32706, -28509, -28603, -24502, 311 -24503, -20405, -20404, -28595, -32697, -32709, -16323, -28600, 312 -32704, -28587, -28589, -32681, -16344, -28586, -28588, -12270, 313 -32586, 216, -12287, -16380, -8185, -8184, -12285, -12286, 314 -12283, -12282, -12279, -12276, -16373, 20490, -32706, -32701, 315 216, -16364, -28610, -28613, -28612, 16445, 217, -16364, 316 62, -32701, 16450, -16364, 5346, -16364, 166, -16344, 317 4332, 130, -16360, -16361, 126, 217, -32701, 216, 318 -16364, 16450, -32700, 16404, -32701, -32706, 216, 16405, 319 16407, -16222, 8414, 130, 217, -32697, 16450, 1250, 320 4307, 4318, 192, 93, 170, 90, 207, -16365, 321 16404, 90, -16360, -16365, 16404, 241, -16365, 16404, 322 132, 132, -16360, 4329, -16365, 16404, 133, 175, 323 90, -16365, 16404, 209, -16365, 16404, 4313, 217, 324 16451, 4263, 16384, 16384, 120, 216, -32700, 16404, 325 -32706, 16404, 243, 16409, 454, -32685, 16404, 454, 326 248, -16365, 16404, 4263, 194, -16360, 4329, -32717, 327 16404, 4263, 16407, 454, 237, 127, 215, 454, 328 4263, 16384, -16364, 1502, -32629, -16361, 153, -32606, 329 222, 143, -32629, 153, 454, 126, 16409, 454, 330 16384, 234, -16365, -32595, 147, -32678, 234, 193, 331 -32677, -32676, -32661, 109, -32717, 53, 52, 52, 332 52, 194, 194, 194, -28581, 4188, 194, -28566, 333 4203, 194, -28564, 4205, 4580, 16429, 183, 183, 334 186, 186, -28583, 0, 9437, 90, -16365, 0, 335 134, -16365, 0, 210, 4329, 199, -32677, -32672, 336 -32676, -32688, -32690, -32705, -32661, -32659, -32689, -32686, 337 -32687, -16330, 65, -32716, 186, -28583, -32717, -32715, 338 -32713, 52, -32664, 4201, 186, -32717, -32715, 55, 339 -16328, 0, 197, 197, 52, 52, 197, -28581, 340 -28580, 186, -28581, 4188, 4318, 194, -28581, 4188, 341 9437, 194, 194, 454, 16407, 216, 194, -28566, 342 -28565, 186, -28566, 4203, 194, -28564, -28563, 186, 343 -28564, 4205, 183, 183, 186, 183, -16365, 0, 344 183, 4580, 16429, 5095, 9444, 5348, 186, -28583, 345 -16328, 0, 16409, -16365, 0, 9437, 5348, 217, 346 -32701, 16450, -32701, 216, -32700, 0, -32701, -32706, 347 216, 243, 217, -16318, 0, -32552, 0, -32700, 348 0, -32706, 0, 215, -32550, 228, -28616, -28615, 349 0, 4096, 218, 218, -28616, 0, -32677, -32676, 350 -16361, -32710, -32669, -32662, -32661, -32660, -32659, 740, 351 -32039, 740, -32719, 4096, 194, -32719, -32718, -32604, 352 -32726, -32725, -32724, -32720, 4096, 710, 6116, -32719, 353 0, 710, 6116, -28581, 4188, 218, 122, 50, 354 16409, -32726, -32725, -32724, -32719, 4096, 710, 454, 355 195, 195, 195, 454, -28581, 4188, 194, -28566, 356 -28565, -28564, 4205, 195, 195, 195, 710, 4836, 357 5095, 4829, -32726, -32725, -32724, -32719, 4096, 4827, 358 4828, 454, -32720, -32719, 4096, 4829, 4827, 4828, 359 194, -32719, 0, 710, 4836, -16291, -32677, 92, 360 184, 121, -28581, -28580, -32722, -32723, 4317, -32726, 361 -32725, -32724, 0, 183, -32726, -32725, -32724, -32720, 362 0, 4316, 195, 195, 195, 454, -28581, 4188, 363 4315, 183, 4317, -32726, -32725, 0, 195, 195, 364 4315, 4317, -32726, 0, 195, -32677, -32676, -16361, 365 16431, 228, 228, 47, -32610, -32611, 5345, -32609, 366 -32608, -32607, 0, 4320, 4319, 5345, -32609, -32608, 367 0, 4319, 5345, -32609, 0, -32613, -16361, 16431, 368 222, 222, 156, -32677, 92, 183, 186, 1222, 369 16435, 228, 16403, 4324, 138, 8420, -32723, 4189, 370 93, 454, 148, -32674, 16546, 16409, -32597, 182, 371 -16383, 16388, 234, -16365, -32595, 172, -32678, 234, 372 90, 244, 246, -16365, 0, 235, -32678, 234, 373 -16365, 246, -16365, 0, -32678, 234, 90, 16407, 374 222, 16405, 222, 145, 16407, 222, 16405, 222, 375 146, 16407, 1252, 154, 5348, -16365, 142, 126, 376 182, -16383, 16391, 90, -16365, 127, -32678, 238, 377 90, 125, 239, -16365, 8319, 8430, 128, 126, 378 -16361, 127, 190, 240, 189, 16409, 182, -16383, 379 16391, 90, -16365, 0, -32678, 240, 90, 16623, 380 -16365, 0, 244, 232, 1252, 1252, 137, 1252, 381 137, 1252, 137, 1252, 137, 1252, 137, 222, 382 -16365, 0, 131, 194, -16360, -16333, -16332, 124, 383 181, -16292, -16277, 16493, -31802, 5342, -28581, 4188, 384 4263, 181, 186, 454, 16475, 183, -28583, 199, 385 5598, 9438, 222, -32677, -32676, 16407, 186, 228, 386 135, 16409, -32632, 0, -32677, 92, -32677, -32676, 387 -32662, -32661, -32660, -32659, 165, -32677, 92, 188, 388 -32662, 107, 188, -32660, 109, -32732, 37, -16344, 389 4318, 148, -32674, 16424, 222, 16405, 222, 174, 390 -28644, -32734, -32680, -28641, -32733, -32730, -32735, -32727, 391 -32738, 4326, -32738, -32739, -32741, -32736, 199, -28644, 392 -32680, -28641, 4326, -32739, -32741, 199, -32738, -32739, 393 -32741, -32736, -32729, 199, -32616, 199, -32739, -32741, 394 -32729, 199, -32616, -32729, 199, -28644, -32680, 4326, 395 -32738, -32739, -32741, 199, 245, 4318, 245, 16409, 396 152, 4318, 16409, 152, 245, -32672, -32671, -32670, 397 99, 16407, 200, 144, 185, -32677, 92, 16407, 398 -32582, 200, 200, 187, 141, -32677, 92, 16410, 399 191, -32677, -32676, -32662, -32661, -32660, 109, 198, 400 0(max grammar-gmax1) 401 2274 @ 18220: LINE 309 "regression-compile-tmp/pass1.imp" 2275 @ 18256: PUSHI #0x00000000 2276 @ 18261: PUSHI #0x000006b8 2277 @ 18266: BOUNDS 2278 @ 18267: DEF GRAM p1=V_00e5 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 2279 @ 18283: PUSHI #0x00000000 2280 @ 18288: INIT 1 2281 @ 18291: PUSHI #0xffff9095 2282 @ 18296: INIT 1 2283 @ 18299: PUSHI #0xffff9097 2284 @ 18304: INIT 1 2285 @ 18307: PUSHI #0xffff9046 2286 @ 18312: INIT 1 2287 @ 18315: PUSHI #0xffff803e 2288 @ 18320: INIT 1 2289 @ 18323: PUSHI #0xffff90a3 2290 @ 18328: INIT 1 2291 @ 18331: PUSHI #0xffff9045 2292 @ 18336: INIT 1 2293 @ 18339: PUSHI #0xffffa04a 2294 @ 18344: INIT 1 2295 @ 18347: PUSHI #0xffffa049 2296 @ 18352: INIT 1 2297 @ 18355: PUSHI #0xffffb04b 2298 @ 18360: INIT 1 2299 @ 18363: PUSHI #0xffffb04c 2300 @ 18368: INIT 1 2301 @ 18371: PUSHI #0xffff904d 2302 @ 18376: INIT 1 2303 @ 18379: PUSHI #0xffff8047 2304 @ 18384: INIT 1 2305 @ 18387: PUSHI #0xffff803b 2306 @ 18392: INIT 1 2307 @ 18395: PUSHI #0xffffc03d 2308 @ 18400: INIT 1 2309 @ 18403: PUSHI #0xffff9048 2310 @ 18408: INIT 1 2311 @ 18411: PUSHI #0xffff8040 2312 @ 18416: INIT 1 2313 @ 18419: PUSHI #0xffff9055 2314 @ 18424: INIT 1 2315 @ 18427: PUSHI #0xffff9053 2316 @ 18432: INIT 1 2317 @ 18435: PUSHI #0xffff8057 2318 @ 18440: INIT 1 2319 @ 18443: PUSHI #0xffffc028 2320 @ 18448: INIT 1 2321 @ 18451: PUSHI #0xffff9056 2322 @ 18456: INIT 1 2323 @ 18459: PUSHI #0xffff9054 2324 @ 18464: INIT 1 2325 @ 18467: PUSHI #0xffffd012 2326 @ 18472: INIT 1 2327 @ 18475: PUSHI #0xffff80b6 2328 @ 18480: INIT 1 2329 @ 18483: PUSHI #0x000000d8 2330 @ 18488: INIT 1 2331 @ 18491: PUSHI #0xffffd001 2332 @ 18496: INIT 1 2333 @ 18499: PUSHI #0xffffc004 2334 @ 18504: INIT 1 2335 @ 18507: PUSHI #0xffffe007 2336 @ 18512: INIT 1 2337 @ 18515: PUSHI #0xffffe008 2338 @ 18520: INIT 1 2339 @ 18523: PUSHI #0xffffd003 2340 @ 18528: INIT 1 2341 @ 18531: PUSHI #0xffffd002 2342 @ 18536: INIT 1 2343 @ 18539: PUSHI #0xffffd005 2344 @ 18544: INIT 1 2345 @ 18547: PUSHI #0xffffd006 2346 @ 18552: INIT 1 2347 @ 18555: PUSHI #0xffffd009 2348 @ 18560: INIT 1 2349 @ 18563: PUSHI #0xffffd00c 2350 @ 18568: INIT 1 2351 @ 18571: PUSHI #0xffffc00b 2352 @ 18576: INIT 1 2353 @ 18579: PUSHI #0x0000500a 2354 @ 18584: INIT 1 2355 @ 18587: PUSHI #0xffff803e 2356 @ 18592: INIT 1 2357 @ 18595: PUSHI #0xffff8043 2358 @ 18600: INIT 1 2359 @ 18603: PUSHI #0x000000d8 2360 @ 18608: INIT 1 2361 @ 18611: PUSHI #0xffffc014 2362 @ 18616: INIT 1 2363 @ 18619: PUSHI #0xffff903e 2364 @ 18624: INIT 1 2365 @ 18627: PUSHI #0xffff903b 2366 @ 18632: INIT 1 2367 @ 18635: PUSHI #0xffff903c 2368 @ 18640: INIT 1 2369 @ 18643: PUSHI #0x0000403d 2370 @ 18648: INIT 1 2371 @ 18651: PUSHI #0x000000d9 2372 @ 18656: INIT 1 2373 @ 18659: PUSHI #0xffffc014 2374 @ 18664: INIT 1 2375 @ 18667: PUSHI #0x0000003e 2376 @ 18672: INIT 1 2377 @ 18675: PUSHI #0xffff8043 2378 @ 18680: INIT 1 2379 @ 18683: PUSHI #0x00004042 2380 @ 18688: INIT 1 2381 @ 18691: PUSHI #0xffffc014 2382 @ 18696: INIT 1 2383 @ 18699: PUSHI #0x000014e2 2384 @ 18704: INIT 1 2385 @ 18707: PUSHI #0xffffc014 2386 @ 18712: INIT 1 2387 @ 18715: PUSHI #0x000000a6 2388 @ 18720: INIT 1 2389 @ 18723: PUSHI #0xffffc028 2390 @ 18728: INIT 1 2391 @ 18731: PUSHI #0x000010ec 2392 @ 18736: INIT 1 2393 @ 18739: PUSHI #0x00000082 2394 @ 18744: INIT 1 2395 @ 18747: PUSHI #0xffffc018 2396 @ 18752: INIT 1 2397 @ 18755: PUSHI #0xffffc017 2398 @ 18760: INIT 1 2399 @ 18763: PUSHI #0x0000007e 2400 @ 18768: INIT 1 2401 @ 18771: PUSHI #0x000000d9 2402 @ 18776: INIT 1 2403 @ 18779: PUSHI #0xffff8043 2404 @ 18784: INIT 1 2405 @ 18787: PUSHI #0x000000d8 2406 @ 18792: INIT 1 2407 @ 18795: PUSHI #0xffffc014 2408 @ 18800: INIT 1 2409 @ 18803: PUSHI #0x00004042 2410 @ 18808: INIT 1 2411 @ 18811: PUSHI #0xffff8044 2412 @ 18816: INIT 1 2413 @ 18819: PUSHI #0x00004014 2414 @ 18824: INIT 1 2415 @ 18827: PUSHI #0xffff8043 2416 @ 18832: INIT 1 2417 @ 18835: PUSHI #0xffff803e 2418 @ 18840: INIT 1 2419 @ 18843: PUSHI #0x000000d8 2420 @ 18848: INIT 1 2421 @ 18851: PUSHI #0x00004015 2422 @ 18856: INIT 1 2423 @ 18859: PUSHI #0x00004017 2424 @ 18864: INIT 1 2425 @ 18867: PUSHI #0xffffc0a2 2426 @ 18872: INIT 1 2427 @ 18875: PUSHI #0x000020de 2428 @ 18880: INIT 1 2429 @ 18883: PUSHI #0x00000082 2430 @ 18888: INIT 1 2431 @ 18891: PUSHI #0x000000d9 2432 @ 18896: INIT 1 2433 @ 18899: PUSHI #0xffff8047 2434 @ 18904: INIT 1 2435 @ 18907: PUSHI #0x00004042 2436 @ 18912: INIT 1 2437 @ 18915: PUSHI #0x000004e2 2438 @ 18920: INIT 1 2439 @ 18923: PUSHI #0x000010d3 2440 @ 18928: INIT 1 2441 @ 18931: PUSHI #0x000010de 2442 @ 18936: INIT 1 2443 @ 18939: PUSHI #0x000000c0 2444 @ 18944: INIT 1 2445 @ 18947: PUSHI #0x0000005d 2446 @ 18952: INIT 1 2447 @ 18955: PUSHI #0x000000aa 2448 @ 18960: INIT 1 2449 @ 18963: PUSHI #0x0000005a 2450 @ 18968: INIT 1 2451 @ 18971: PUSHI #0x000000cf 2452 @ 18976: INIT 1 2453 @ 18979: PUSHI #0xffffc013 2454 @ 18984: INIT 1 2455 @ 18987: PUSHI #0x00004014 2456 @ 18992: INIT 1 2457 @ 18995: PUSHI #0x0000005a 2458 @ 19000: INIT 1 2459 @ 19003: PUSHI #0xffffc018 2460 @ 19008: INIT 1 2461 @ 19011: PUSHI #0xffffc013 2462 @ 19016: INIT 1 2463 @ 19019: PUSHI #0x00004014 2464 @ 19024: INIT 1 2465 @ 19027: PUSHI #0x000000f1 2466 @ 19032: INIT 1 2467 @ 19035: PUSHI #0xffffc013 2468 @ 19040: INIT 1 2469 @ 19043: PUSHI #0x00004014 2470 @ 19048: INIT 1 2471 @ 19051: PUSHI #0x00000084 2472 @ 19056: INIT 1 2473 @ 19059: PUSHI #0x00000084 2474 @ 19064: INIT 1 2475 @ 19067: PUSHI #0xffffc018 2476 @ 19072: INIT 1 2477 @ 19075: PUSHI #0x000010e9 2478 @ 19080: INIT 1 2479 @ 19083: PUSHI #0xffffc013 2480 @ 19088: INIT 1 2481 @ 19091: PUSHI #0x00004014 2482 @ 19096: INIT 1 2483 @ 19099: PUSHI #0x00000085 2484 @ 19104: INIT 1 2485 @ 19107: PUSHI #0x000000af 2486 @ 19112: INIT 1 2487 @ 19115: PUSHI #0x0000005a 2488 @ 19120: INIT 1 2489 @ 19123: PUSHI #0xffffc013 2490 @ 19128: INIT 1 2491 @ 19131: PUSHI #0x00004014 2492 @ 19136: INIT 1 2493 @ 19139: PUSHI #0x000000d1 2494 @ 19144: INIT 1 2495 @ 19147: PUSHI #0xffffc013 2496 @ 19152: INIT 1 2497 @ 19155: PUSHI #0x00004014 2498 @ 19160: INIT 1 2499 @ 19163: PUSHI #0x000010d9 2500 @ 19168: INIT 1 2501 @ 19171: PUSHI #0x000000d9 2502 @ 19176: INIT 1 2503 @ 19179: PUSHI #0x00004043 2504 @ 19184: INIT 1 2505 @ 19187: PUSHI #0x000010a7 2506 @ 19192: INIT 1 2507 @ 19195: PUSHI #0x00004000 2508 @ 19200: INIT 1 2509 @ 19203: PUSHI #0x00004000 2510 @ 19208: INIT 1 2511 @ 19211: PUSHI #0x00000078 2512 @ 19216: INIT 1 2513 @ 19219: PUSHI #0x000000d8 2514 @ 19224: INIT 1 2515 @ 19227: PUSHI #0xffff8044 2516 @ 19232: INIT 1 2517 @ 19235: PUSHI #0x00004014 2518 @ 19240: INIT 1 2519 @ 19243: PUSHI #0xffff803e 2520 @ 19248: INIT 1 2521 @ 19251: PUSHI #0x00004014 2522 @ 19256: INIT 1 2523 @ 19259: PUSHI #0x000000f3 2524 @ 19264: INIT 1 2525 @ 19267: PUSHI #0x00004019 2526 @ 19272: INIT 1 2527 @ 19275: PUSHI #0x000001c6 2528 @ 19280: INIT 1 2529 @ 19283: PUSHI #0xffff8053 2530 @ 19288: INIT 1 2531 @ 19291: PUSHI #0x00004014 2532 @ 19296: INIT 1 2533 @ 19299: PUSHI #0x000001c6 2534 @ 19304: INIT 1 2535 @ 19307: PUSHI #0x000000f8 2536 @ 19312: INIT 1 2537 @ 19315: PUSHI #0xffffc013 2538 @ 19320: INIT 1 2539 @ 19323: PUSHI #0x00004014 2540 @ 19328: INIT 1 2541 @ 19331: PUSHI #0x000010a7 2542 @ 19336: INIT 1 2543 @ 19339: PUSHI #0x000000c2 2544 @ 19344: INIT 1 2545 @ 19347: PUSHI #0xffffc018 2546 @ 19352: INIT 1 2547 @ 19355: PUSHI #0x000010e9 2548 @ 19360: INIT 1 2549 @ 19363: PUSHI #0xffff8033 2550 @ 19368: INIT 1 2551 @ 19371: PUSHI #0x00004014 2552 @ 19376: INIT 1 2553 @ 19379: PUSHI #0x000010a7 2554 @ 19384: INIT 1 2555 @ 19387: PUSHI #0x00004017 2556 @ 19392: INIT 1 2557 @ 19395: PUSHI #0x000001c6 2558 @ 19400: INIT 1 2559 @ 19403: PUSHI #0x000000ed 2560 @ 19408: INIT 1 2561 @ 19411: PUSHI #0x0000007f 2562 @ 19416: INIT 1 2563 @ 19419: PUSHI #0x000000d7 2564 @ 19424: INIT 1 2565 @ 19427: PUSHI #0x000001c6 2566 @ 19432: INIT 1 2567 @ 19435: PUSHI #0x000010a7 2568 @ 19440: INIT 1 2569 @ 19443: PUSHI #0x00004000 2570 @ 19448: INIT 1 2571 @ 19451: PUSHI #0xffffc014 2572 @ 19456: INIT 1 2573 @ 19459: PUSHI #0x000005de 2574 @ 19464: INIT 1 2575 @ 19467: PUSHI #0xffff808b 2576 @ 19472: INIT 1 2577 @ 19475: PUSHI #0xffffc017 2578 @ 19480: INIT 1 2579 @ 19483: PUSHI #0x00000099 2580 @ 19488: INIT 1 2581 @ 19491: PUSHI #0xffff80a2 2582 @ 19496: INIT 1 2583 @ 19499: PUSHI #0x000000de 2584 @ 19504: INIT 1 2585 @ 19507: PUSHI #0x0000008f 2586 @ 19512: INIT 1 2587 @ 19515: PUSHI #0xffff808b 2588 @ 19520: INIT 1 2589 @ 19523: PUSHI #0x00000099 2590 @ 19528: INIT 1 2591 @ 19531: PUSHI #0x000001c6 2592 @ 19536: INIT 1 2593 @ 19539: PUSHI #0x0000007e 2594 @ 19544: INIT 1 2595 @ 19547: PUSHI #0x00004019 2596 @ 19552: INIT 1 2597 @ 19555: PUSHI #0x000001c6 2598 @ 19560: INIT 1 2599 @ 19563: PUSHI #0x00004000 2600 @ 19568: INIT 1 2601 @ 19571: PUSHI #0x000000ea 2602 @ 19576: INIT 1 2603 @ 19579: PUSHI #0xffffc013 2604 @ 19584: INIT 1 2605 @ 19587: PUSHI #0xffff80ad 2606 @ 19592: INIT 1 2607 @ 19595: PUSHI #0x00000093 2608 @ 19600: INIT 1 2609 @ 19603: PUSHI #0xffff805a 2610 @ 19608: INIT 1 2611 @ 19611: PUSHI #0x000000ea 2612 @ 19616: INIT 1 2613 @ 19619: PUSHI #0x000000c1 2614 @ 19624: INIT 1 2615 @ 19627: PUSHI #0xffff805b 2616 @ 19632: INIT 1 2617 @ 19635: PUSHI #0xffff805c 2618 @ 19640: INIT 1 2619 @ 19643: PUSHI #0xffff806b 2620 @ 19648: INIT 1 2621 @ 19651: PUSHI #0x0000006d 2622 @ 19656: INIT 1 2623 @ 19659: PUSHI #0xffff8033 2624 @ 19664: INIT 1 2625 @ 19667: PUSHI #0x00000035 2626 @ 19672: INIT 1 2627 @ 19675: PUSHI #0x00000034 2628 @ 19680: INIT 1 2629 @ 19683: PUSHI #0x00000034 2630 @ 19688: INIT 1 2631 @ 19691: PUSHI #0x00000034 2632 @ 19696: INIT 1 2633 @ 19699: PUSHI #0x000000c2 2634 @ 19704: INIT 1 2635 @ 19707: PUSHI #0x000000c2 2636 @ 19712: INIT 1 2637 @ 19715: PUSHI #0x000000c2 2638 @ 19720: INIT 1 2639 @ 19723: PUSHI #0xffff905b 2640 @ 19728: INIT 1 2641 @ 19731: PUSHI #0x0000105c 2642 @ 19736: INIT 1 2643 @ 19739: PUSHI #0x000000c2 2644 @ 19744: INIT 1 2645 @ 19747: PUSHI #0xffff906a 2646 @ 19752: INIT 1 2647 @ 19755: PUSHI #0x0000106b 2648 @ 19760: INIT 1 2649 @ 19763: PUSHI #0x000000c2 2650 @ 19768: INIT 1 2651 @ 19771: PUSHI #0xffff906c 2652 @ 19776: INIT 1 2653 @ 19779: PUSHI #0x0000106d 2654 @ 19784: INIT 1 2655 @ 19787: PUSHI #0x000011e4 2656 @ 19792: INIT 1 2657 @ 19795: PUSHI #0x0000402d 2658 @ 19800: INIT 1 2659 @ 19803: PUSHI #0x000000b7 2660 @ 19808: INIT 1 2661 @ 19811: PUSHI #0x000000b7 2662 @ 19816: INIT 1 2663 @ 19819: PUSHI #0x000000ba 2664 @ 19824: INIT 1 2665 @ 19827: PUSHI #0x000000ba 2666 @ 19832: INIT 1 2667 @ 19835: PUSHI #0xffff9059 2668 @ 19840: INIT 1 2669 @ 19843: PUSHI #0x00000000 2670 @ 19848: INIT 1 2671 @ 19851: PUSHI #0x000024dd 2672 @ 19856: INIT 1 2673 @ 19859: PUSHI #0x0000005a 2674 @ 19864: INIT 1 2675 @ 19867: PUSHI #0xffffc013 2676 @ 19872: INIT 1 2677 @ 19875: PUSHI #0x00000000 2678 @ 19880: INIT 1 2679 @ 19883: PUSHI #0x00000086 2680 @ 19888: INIT 1 2681 @ 19891: PUSHI #0xffffc013 2682 @ 19896: INIT 1 2683 @ 19899: PUSHI #0x00000000 2684 @ 19904: INIT 1 2685 @ 19907: PUSHI #0x000000d2 2686 @ 19912: INIT 1 2687 @ 19915: PUSHI #0x000010e9 2688 @ 19920: INIT 1 2689 @ 19923: PUSHI #0x000000c7 2690 @ 19928: INIT 1 2691 @ 19931: PUSHI #0xffff805b 2692 @ 19936: INIT 1 2693 @ 19939: PUSHI #0xffff8060 2694 @ 19944: INIT 1 2695 @ 19947: PUSHI #0xffff805c 2696 @ 19952: INIT 1 2697 @ 19955: PUSHI #0xffff8050 2698 @ 19960: INIT 1 2699 @ 19963: PUSHI #0xffff804e 2700 @ 19968: INIT 1 2701 @ 19971: PUSHI #0xffff803f 2702 @ 19976: INIT 1 2703 @ 19979: PUSHI #0xffff806b 2704 @ 19984: INIT 1 2705 @ 19987: PUSHI #0xffff806d 2706 @ 19992: INIT 1 2707 @ 19995: PUSHI #0xffff804f 2708 @ 20000: INIT 1 2709 @ 20003: PUSHI #0xffff8052 2710 @ 20008: INIT 1 2711 @ 20011: PUSHI #0xffff8051 2712 @ 20016: INIT 1 2713 @ 20019: PUSHI #0xffffc036 2714 @ 20024: INIT 1 2715 @ 20027: PUSHI #0x00000041 2716 @ 20032: INIT 1 2717 @ 20035: PUSHI #0xffff8034 2718 @ 20040: INIT 1 2719 @ 20043: PUSHI #0x000000ba 2720 @ 20048: INIT 1 2721 @ 20051: PUSHI #0xffff9059 2722 @ 20056: INIT 1 2723 @ 20059: PUSHI #0xffff8033 2724 @ 20064: INIT 1 2725 @ 20067: PUSHI #0xffff8035 2726 @ 20072: INIT 1 2727 @ 20075: PUSHI #0xffff8037 2728 @ 20080: INIT 1 2729 @ 20083: PUSHI #0x00000034 2730 @ 20088: INIT 1 2731 @ 20091: PUSHI #0xffff8068 2732 @ 20096: INIT 1 2733 @ 20099: PUSHI #0x00001069 2734 @ 20104: INIT 1 2735 @ 20107: PUSHI #0x000000ba 2736 @ 20112: INIT 1 2737 @ 20115: PUSHI #0xffff8033 2738 @ 20120: INIT 1 2739 @ 20123: PUSHI #0xffff8035 2740 @ 20128: INIT 1 2741 @ 20131: PUSHI #0x00000037 2742 @ 20136: INIT 1 2743 @ 20139: PUSHI #0xffffc038 2744 @ 20144: INIT 1 2745 @ 20147: PUSHI #0x00000000 2746 @ 20152: INIT 1 2747 @ 20155: PUSHI #0x000000c5 2748 @ 20160: INIT 1 2749 @ 20163: PUSHI #0x000000c5 2750 @ 20168: INIT 1 2751 @ 20171: PUSHI #0x00000034 2752 @ 20176: INIT 1 2753 @ 20179: PUSHI #0x00000034 2754 @ 20184: INIT 1 2755 @ 20187: PUSHI #0x000000c5 2756 @ 20192: INIT 1 2757 @ 20195: PUSHI #0xffff905b 2758 @ 20200: INIT 1 2759 @ 20203: PUSHI #0xffff905c 2760 @ 20208: INIT 1 2761 @ 20211: PUSHI #0x000000ba 2762 @ 20216: INIT 1 2763 @ 20219: PUSHI #0xffff905b 2764 @ 20224: INIT 1 2765 @ 20227: PUSHI #0x0000105c 2766 @ 20232: INIT 1 2767 @ 20235: PUSHI #0x000010de 2768 @ 20240: INIT 1 2769 @ 20243: PUSHI #0x000000c2 2770 @ 20248: INIT 1 2771 @ 20251: PUSHI #0xffff905b 2772 @ 20256: INIT 1 2773 @ 20259: PUSHI #0x0000105c 2774 @ 20264: INIT 1 2775 @ 20267: PUSHI #0x000024dd 2776 @ 20272: INIT 1 2777 @ 20275: PUSHI #0x000000c2 2778 @ 20280: INIT 1 2779 @ 20283: PUSHI #0x000000c2 2780 @ 20288: INIT 1 2781 @ 20291: PUSHI #0x000001c6 2782 @ 20296: INIT 1 2783 @ 20299: PUSHI #0x00004017 2784 @ 20304: INIT 1 2785 @ 20307: PUSHI #0x000000d8 2786 @ 20312: INIT 1 2787 @ 20315: PUSHI #0x000000c2 2788 @ 20320: INIT 1 2789 @ 20323: PUSHI #0xffff906a 2790 @ 20328: INIT 1 2791 @ 20331: PUSHI #0xffff906b 2792 @ 20336: INIT 1 2793 @ 20339: PUSHI #0x000000ba 2794 @ 20344: INIT 1 2795 @ 20347: PUSHI #0xffff906a 2796 @ 20352: INIT 1 2797 @ 20355: PUSHI #0x0000106b 2798 @ 20360: INIT 1 2799 @ 20363: PUSHI #0x000000c2 2800 @ 20368: INIT 1 2801 @ 20371: PUSHI #0xffff906c 2802 @ 20376: INIT 1 2803 @ 20379: PUSHI #0xffff906d 2804 @ 20384: INIT 1 2805 @ 20387: PUSHI #0x000000ba 2806 @ 20392: INIT 1 2807 @ 20395: PUSHI #0xffff906c 2808 @ 20400: INIT 1 2809 @ 20403: PUSHI #0x0000106d 2810 @ 20408: INIT 1 2811 @ 20411: PUSHI #0x000000b7 2812 @ 20416: INIT 1 2813 @ 20419: PUSHI #0x000000b7 2814 @ 20424: INIT 1 2815 @ 20427: PUSHI #0x000000ba 2816 @ 20432: INIT 1 2817 @ 20435: PUSHI #0x000000b7 2818 @ 20440: INIT 1 2819 @ 20443: PUSHI #0xffffc013 2820 @ 20448: INIT 1 2821 @ 20451: PUSHI #0x00000000 2822 @ 20456: INIT 1 2823 @ 20459: PUSHI #0x000000b7 2824 @ 20464: INIT 1 2825 @ 20467: PUSHI #0x000011e4 2826 @ 20472: INIT 1 2827 @ 20475: PUSHI #0x0000402d 2828 @ 20480: INIT 1 2829 @ 20483: PUSHI #0x000013e7 2830 @ 20488: INIT 1 2831 @ 20491: PUSHI #0x000024e4 2832 @ 20496: INIT 1 2833 @ 20499: PUSHI #0x000014e4 2834 @ 20504: INIT 1 2835 @ 20507: PUSHI #0x000000ba 2836 @ 20512: INIT 1 2837 @ 20515: PUSHI #0xffff9059 2838 @ 20520: INIT 1 2839 @ 20523: PUSHI #0xffffc038 2840 @ 20528: INIT 1 2841 @ 20531: PUSHI #0x00000000 2842 @ 20536: INIT 1 2843 @ 20539: PUSHI #0x00004019 2844 @ 20544: INIT 1 2845 @ 20547: PUSHI #0xffffc013 2846 @ 20552: INIT 1 2847 @ 20555: PUSHI #0x00000000 2848 @ 20560: INIT 1 2849 @ 20563: PUSHI #0x000024dd 2850 @ 20568: INIT 1 2851 @ 20571: PUSHI #0x000014e4 2852 @ 20576: INIT 1 2853 @ 20579: PUSHI #0x000000d9 2854 @ 20584: INIT 1 2855 @ 20587: PUSHI #0xffff8043 2856 @ 20592: INIT 1 2857 @ 20595: PUSHI #0x00004042 2858 @ 20600: INIT 1 2859 @ 20603: PUSHI #0xffff8043 2860 @ 20608: INIT 1 2861 @ 20611: PUSHI #0x000000d8 2862 @ 20616: INIT 1 2863 @ 20619: PUSHI #0xffff8044 2864 @ 20624: INIT 1 2865 @ 20627: PUSHI #0x00000000 2866 @ 20632: INIT 1 2867 @ 20635: PUSHI #0xffff8043 2868 @ 20640: INIT 1 2869 @ 20643: PUSHI #0xffff803e 2870 @ 20648: INIT 1 2871 @ 20651: PUSHI #0x000000d8 2872 @ 20656: INIT 1 2873 @ 20659: PUSHI #0x000000f3 2874 @ 20664: INIT 1 2875 @ 20667: PUSHI #0x000000d9 2876 @ 20672: INIT 1 2877 @ 20675: PUSHI #0xffffc042 2878 @ 20680: INIT 1 2879 @ 20683: PUSHI #0x00000000 2880 @ 20688: INIT 1 2881 @ 20691: PUSHI #0xffff80d8 2882 @ 20696: INIT 1 2883 @ 20699: PUSHI #0x00000000 2884 @ 20704: INIT 1 2885 @ 20707: PUSHI #0xffff8044 2886 @ 20712: INIT 1 2887 @ 20715: PUSHI #0x00000000 2888 @ 20720: INIT 1 2889 @ 20723: PUSHI #0xffff803e 2890 @ 20728: INIT 1 2891 @ 20731: PUSHI #0x00000000 2892 @ 20736: INIT 1 2893 @ 20739: PUSHI #0x000000d7 2894 @ 20744: INIT 1 2895 @ 20747: PUSHI #0xffff80da 2896 @ 20752: INIT 1 2897 @ 20755: PUSHI #0x000000e4 2898 @ 20760: INIT 1 2899 @ 20763: PUSHI #0xffff9038 2900 @ 20768: INIT 1 2901 @ 20771: PUSHI #0xffff9039 2902 @ 20776: INIT 1 2903 @ 20779: PUSHI #0x00000000 2904 @ 20784: INIT 1 2905 @ 20787: PUSHI #0x00001000 2906 @ 20792: INIT 1 2907 @ 20795: PUSHI #0x000000da 2908 @ 20800: INIT 1 2909 @ 20803: PUSHI #0x000000da 2910 @ 20808: INIT 1 2911 @ 20811: PUSHI #0xffff9038 2912 @ 20816: INIT 1 2913 @ 20819: PUSHI #0x00000000 2914 @ 20824: INIT 1 2915 @ 20827: PUSHI #0xffff805b 2916 @ 20832: INIT 1 2917 @ 20835: PUSHI #0xffff805c 2918 @ 20840: INIT 1 2919 @ 20843: PUSHI #0xffffc017 2920 @ 20848: INIT 1 2921 @ 20851: PUSHI #0xffff803a 2922 @ 20856: INIT 1 2923 @ 20859: PUSHI #0xffff8063 2924 @ 20864: INIT 1 2925 @ 20867: PUSHI #0xffff806a 2926 @ 20872: INIT 1 2927 @ 20875: PUSHI #0xffff806b 2928 @ 20880: INIT 1 2929 @ 20883: PUSHI #0xffff806c 2930 @ 20888: INIT 1 2931 @ 20891: PUSHI #0xffff806d 2932 @ 20896: INIT 1 2933 @ 20899: PUSHI #0x000002e4 2934 @ 20904: INIT 1 2935 @ 20907: PUSHI #0xffff82d9 2936 @ 20912: INIT 1 2937 @ 20915: PUSHI #0x000002e4 2938 @ 20920: INIT 1 2939 @ 20923: PUSHI #0xffff8031 2940 @ 20928: INIT 1 2941 @ 20931: PUSHI #0x00001000 2942 @ 20936: INIT 1 2943 @ 20939: PUSHI #0x000000c2 2944 @ 20944: INIT 1 2945 @ 20947: PUSHI #0xffff8031 2946 @ 20952: INIT 1 2947 @ 20955: PUSHI #0xffff8032 2948 @ 20960: INIT 1 2949 @ 20963: PUSHI #0xffff80a4 2950 @ 20968: INIT 1 2951 @ 20971: PUSHI #0xffff802a 2952 @ 20976: INIT 1 2953 @ 20979: PUSHI #0xffff802b 2954 @ 20984: INIT 1 2955 @ 20987: PUSHI #0xffff802c 2956 @ 20992: INIT 1 2957 @ 20995: PUSHI #0xffff8030 2958 @ 21000: INIT 1 2959 @ 21003: PUSHI #0x00001000 2960 @ 21008: INIT 1 2961 @ 21011: PUSHI #0x000002c6 2962 @ 21016: INIT 1 2963 @ 21019: PUSHI #0x000017e4 2964 @ 21024: INIT 1 2965 @ 21027: PUSHI #0xffff8031 2966 @ 21032: INIT 1 2967 @ 21035: PUSHI #0x00000000 2968 @ 21040: INIT 1 2969 @ 21043: PUSHI #0x000002c6 2970 @ 21048: INIT 1 2971 @ 21051: PUSHI #0x000017e4 2972 @ 21056: INIT 1 2973 @ 21059: PUSHI #0xffff905b 2974 @ 21064: INIT 1 2975 @ 21067: PUSHI #0x0000105c 2976 @ 21072: INIT 1 2977 @ 21075: PUSHI #0x000000da 2978 @ 21080: INIT 1 2979 @ 21083: PUSHI #0x0000007a 2980 @ 21088: INIT 1 2981 @ 21091: PUSHI #0x00000032 2982 @ 21096: INIT 1 2983 @ 21099: PUSHI #0x00004019 2984 @ 21104: INIT 1 2985 @ 21107: PUSHI #0xffff802a 2986 @ 21112: INIT 1 2987 @ 21115: PUSHI #0xffff802b 2988 @ 21120: INIT 1 2989 @ 21123: PUSHI #0xffff802c 2990 @ 21128: INIT 1 2991 @ 21131: PUSHI #0xffff8031 2992 @ 21136: INIT 1 2993 @ 21139: PUSHI #0x00001000 2994 @ 21144: INIT 1 2995 @ 21147: PUSHI #0x000002c6 2996 @ 21152: INIT 1 2997 @ 21155: PUSHI #0x000001c6 2998 @ 21160: INIT 1 2999 @ 21163: PUSHI #0x000000c3 3000 @ 21168: INIT 1 3001 @ 21171: PUSHI #0x000000c3 3002 @ 21176: INIT 1 3003 @ 21179: PUSHI #0x000000c3 3004 @ 21184: INIT 1 3005 @ 21187: PUSHI #0x000001c6 3006 @ 21192: INIT 1 3007 @ 21195: PUSHI #0xffff905b 3008 @ 21200: INIT 1 3009 @ 21203: PUSHI #0x0000105c 3010 @ 21208: INIT 1 3011 @ 21211: PUSHI #0x000000c2 3012 @ 21216: INIT 1 3013 @ 21219: PUSHI #0xffff906a 3014 @ 21224: INIT 1 3015 @ 21227: PUSHI #0xffff906b 3016 @ 21232: INIT 1 3017 @ 21235: PUSHI #0xffff906c 3018 @ 21240: INIT 1 3019 @ 21243: PUSHI #0x0000106d 3020 @ 21248: INIT 1 3021 @ 21251: PUSHI #0x000000c3 3022 @ 21256: INIT 1 3023 @ 21259: PUSHI #0x000000c3 3024 @ 21264: INIT 1 3025 @ 21267: PUSHI #0x000000c3 3026 @ 21272: INIT 1 3027 @ 21275: PUSHI #0x000002c6 3028 @ 21280: INIT 1 3029 @ 21283: PUSHI #0x000012e4 3030 @ 21288: INIT 1 3031 @ 21291: PUSHI #0x000013e7 3032 @ 21296: INIT 1 3033 @ 21299: PUSHI #0x000012dd 3034 @ 21304: INIT 1 3035 @ 21307: PUSHI #0xffff802a 3036 @ 21312: INIT 1 3037 @ 21315: PUSHI #0xffff802b 3038 @ 21320: INIT 1 3039 @ 21323: PUSHI #0xffff802c 3040 @ 21328: INIT 1 3041 @ 21331: PUSHI #0xffff8031 3042 @ 21336: INIT 1 3043 @ 21339: PUSHI #0x00001000 3044 @ 21344: INIT 1 3045 @ 21347: PUSHI #0x000012db 3046 @ 21352: INIT 1 3047 @ 21355: PUSHI #0x000012dc 3048 @ 21360: INIT 1 3049 @ 21363: PUSHI #0x000001c6 3050 @ 21368: INIT 1 3051 @ 21371: PUSHI #0xffff8030 3052 @ 21376: INIT 1 3053 @ 21379: PUSHI #0xffff8031 3054 @ 21384: INIT 1 3055 @ 21387: PUSHI #0x00001000 3056 @ 21392: INIT 1 3057 @ 21395: PUSHI #0x000012dd 3058 @ 21400: INIT 1 3059 @ 21403: PUSHI #0x000012db 3060 @ 21408: INIT 1 3061 @ 21411: PUSHI #0x000012dc 3062 @ 21416: INIT 1 3063 @ 21419: PUSHI #0x000000c2 3064 @ 21424: INIT 1 3065 @ 21427: PUSHI #0xffff8031 3066 @ 21432: INIT 1 3067 @ 21435: PUSHI #0x00000000 3068 @ 21440: INIT 1 3069 @ 21443: PUSHI #0x000002c6 3070 @ 21448: INIT 1 3071 @ 21451: PUSHI #0x000012e4 3072 @ 21456: INIT 1 3073 @ 21459: PUSHI #0xffffc05d 3074 @ 21464: INIT 1 3075 @ 21467: PUSHI #0xffff805b 3076 @ 21472: INIT 1 3077 @ 21475: PUSHI #0x0000005c 3078 @ 21480: INIT 1 3079 @ 21483: PUSHI #0x000000b8 3080 @ 21488: INIT 1 3081 @ 21491: PUSHI #0x00000079 3082 @ 21496: INIT 1 3083 @ 21499: PUSHI #0xffff905b 3084 @ 21504: INIT 1 3085 @ 21507: PUSHI #0xffff905c 3086 @ 21512: INIT 1 3087 @ 21515: PUSHI #0xffff802e 3088 @ 21520: INIT 1 3089 @ 21523: PUSHI #0xffff802d 3090 @ 21528: INIT 1 3091 @ 21531: PUSHI #0x000010dd 3092 @ 21536: INIT 1 3093 @ 21539: PUSHI #0xffff802a 3094 @ 21544: INIT 1 3095 @ 21547: PUSHI #0xffff802b 3096 @ 21552: INIT 1 3097 @ 21555: PUSHI #0xffff802c 3098 @ 21560: INIT 1 3099 @ 21563: PUSHI #0x00000000 3100 @ 21568: INIT 1 3101 @ 21571: PUSHI #0x000000b7 3102 @ 21576: INIT 1 3103 @ 21579: PUSHI #0xffff802a 3104 @ 21584: INIT 1 3105 @ 21587: PUSHI #0xffff802b 3106 @ 21592: INIT 1 3107 @ 21595: PUSHI #0xffff802c 3108 @ 21600: INIT 1 3109 @ 21603: PUSHI #0xffff8030 3110 @ 21608: INIT 1 3111 @ 21611: PUSHI #0x00000000 3112 @ 21616: INIT 1 3113 @ 21619: PUSHI #0x000010dc 3114 @ 21624: INIT 1 3115 @ 21627: PUSHI #0x000000c3 3116 @ 21632: INIT 1 3117 @ 21635: PUSHI #0x000000c3 3118 @ 21640: INIT 1 3119 @ 21643: PUSHI #0x000000c3 3120 @ 21648: INIT 1 3121 @ 21651: PUSHI #0x000001c6 3122 @ 21656: INIT 1 3123 @ 21659: PUSHI #0xffff905b 3124 @ 21664: INIT 1 3125 @ 21667: PUSHI #0x0000105c 3126 @ 21672: INIT 1 3127 @ 21675: PUSHI #0x000010db 3128 @ 21680: INIT 1 3129 @ 21683: PUSHI #0x000000b7 3130 @ 21688: INIT 1 3131 @ 21691: PUSHI #0x000010dd 3132 @ 21696: INIT 1 3133 @ 21699: PUSHI #0xffff802a 3134 @ 21704: INIT 1 3135 @ 21707: PUSHI #0xffff802b 3136 @ 21712: INIT 1 3137 @ 21715: PUSHI #0x00000000 3138 @ 21720: INIT 1 3139 @ 21723: PUSHI #0x000000c3 3140 @ 21728: INIT 1 3141 @ 21731: PUSHI #0x000000c3 3142 @ 21736: INIT 1 3143 @ 21739: PUSHI #0x000010db 3144 @ 21744: INIT 1 3145 @ 21747: PUSHI #0x000010dd 3146 @ 21752: INIT 1 3147 @ 21755: PUSHI #0xffff802a 3148 @ 21760: INIT 1 3149 @ 21763: PUSHI #0x00000000 3150 @ 21768: INIT 1 3151 @ 21771: PUSHI #0x000000c3 3152 @ 21776: INIT 1 3153 @ 21779: PUSHI #0xffff805b 3154 @ 21784: INIT 1 3155 @ 21787: PUSHI #0xffff805c 3156 @ 21792: INIT 1 3157 @ 21795: PUSHI #0xffffc017 3158 @ 21800: INIT 1 3159 @ 21803: PUSHI #0x0000402f 3160 @ 21808: INIT 1 3161 @ 21811: PUSHI #0x000000e4 3162 @ 21816: INIT 1 3163 @ 21819: PUSHI #0x000000e4 3164 @ 21824: INIT 1 3165 @ 21827: PUSHI #0x0000002f 3166 @ 21832: INIT 1 3167 @ 21835: PUSHI #0xffff809e 3168 @ 21840: INIT 1 3169 @ 21843: PUSHI #0xffff809d 3170 @ 21848: INIT 1 3171 @ 21851: PUSHI #0x000014e1 3172 @ 21856: INIT 1 3173 @ 21859: PUSHI #0xffff809f 3174 @ 21864: INIT 1 3175 @ 21867: PUSHI #0xffff80a0 3176 @ 21872: INIT 1 3177 @ 21875: PUSHI #0xffff80a1 3178 @ 21880: INIT 1 3179 @ 21883: PUSHI #0x00000000 3180 @ 21888: INIT 1 3181 @ 21891: PUSHI #0x000010e0 3182 @ 21896: INIT 1 3183 @ 21899: PUSHI #0x000010df 3184 @ 21904: INIT 1 3185 @ 21907: PUSHI #0x000014e1 3186 @ 21912: INIT 1 3187 @ 21915: PUSHI #0xffff809f 3188 @ 21920: INIT 1 3189 @ 21923: PUSHI #0xffff80a0 3190 @ 21928: INIT 1 3191 @ 21931: PUSHI #0x00000000 3192 @ 21936: INIT 1 3193 @ 21939: PUSHI #0x000010df 3194 @ 21944: INIT 1 3195 @ 21947: PUSHI #0x000014e1 3196 @ 21952: INIT 1 3197 @ 21955: PUSHI #0xffff809f 3198 @ 21960: INIT 1 3199 @ 21963: PUSHI #0x00000000 3200 @ 21968: INIT 1 3201 @ 21971: PUSHI #0xffff809b 3202 @ 21976: INIT 1 3203 @ 21979: PUSHI #0xffffc017 3204 @ 21984: INIT 1 3205 @ 21987: PUSHI #0x0000402f 3206 @ 21992: INIT 1 3207 @ 21995: PUSHI #0x000000de 3208 @ 22000: INIT 1 3209 @ 22003: PUSHI #0x000000de 3210 @ 22008: INIT 1 3211 @ 22011: PUSHI #0x0000009c 3212 @ 22016: INIT 1 3213 @ 22019: PUSHI #0xffff805b 3214 @ 22024: INIT 1 3215 @ 22027: PUSHI #0x0000005c 3216 @ 22032: INIT 1 3217 @ 22035: PUSHI #0x000000b7 3218 @ 22040: INIT 1 3219 @ 22043: PUSHI #0x000000ba 3220 @ 22048: INIT 1 3221 @ 22051: PUSHI #0x000004c6 3222 @ 22056: INIT 1 3223 @ 22059: PUSHI #0x00004033 3224 @ 22064: INIT 1 3225 @ 22067: PUSHI #0x000000e4 3226 @ 22072: INIT 1 3227 @ 22075: PUSHI #0x00004013 3228 @ 22080: INIT 1 3229 @ 22083: PUSHI #0x000010e4 3230 @ 22088: INIT 1 3231 @ 22091: PUSHI #0x0000008a 3232 @ 22096: INIT 1 3233 @ 22099: PUSHI #0x000020e4 3234 @ 22104: INIT 1 3235 @ 22107: PUSHI #0xffff802d 3236 @ 22112: INIT 1 3237 @ 22115: PUSHI #0x0000105d 3238 @ 22120: INIT 1 3239 @ 22123: PUSHI #0x0000005d 3240 @ 22128: INIT 1 3241 @ 22131: PUSHI #0x000001c6 3242 @ 22136: INIT 1 3243 @ 22139: PUSHI #0x00000094 3244 @ 22144: INIT 1 3245 @ 22147: PUSHI #0xffff805e 3246 @ 22152: INIT 1 3247 @ 22155: PUSHI #0x000040a2 3248 @ 22160: INIT 1 3249 @ 22163: PUSHI #0x00004019 3250 @ 22168: INIT 1 3251 @ 22171: PUSHI #0xffff80ab 3252 @ 22176: INIT 1 3253 @ 22179: PUSHI #0x000000b6 3254 @ 22184: INIT 1 3255 @ 22187: PUSHI #0xffffc001 3256 @ 22192: INIT 1 3257 @ 22195: PUSHI #0x00004004 3258 @ 22200: INIT 1 3259 @ 22203: PUSHI #0x000000ea 3260 @ 22208: INIT 1 3261 @ 22211: PUSHI #0xffffc013 3262 @ 22216: INIT 1 3263 @ 22219: PUSHI #0xffff80ad 3264 @ 22224: INIT 1 3265 @ 22227: PUSHI #0x000000ac 3266 @ 22232: INIT 1 3267 @ 22235: PUSHI #0xffff805a 3268 @ 22240: INIT 1 3269 @ 22243: PUSHI #0x000000ea 3270 @ 22248: INIT 1 3271 @ 22251: PUSHI #0x0000005a 3272 @ 22256: INIT 1 3273 @ 22259: PUSHI #0x000000f4 3274 @ 22264: INIT 1 3275 @ 22267: PUSHI #0x000000f6 3276 @ 22272: INIT 1 3277 @ 22275: PUSHI #0xffffc013 3278 @ 22280: INIT 1 3279 @ 22283: PUSHI #0x00000000 3280 @ 22288: INIT 1 3281 @ 22291: PUSHI #0x000000eb 3282 @ 22296: INIT 1 3283 @ 22299: PUSHI #0xffff805a 3284 @ 22304: INIT 1 3285 @ 22307: PUSHI #0x000000ea 3286 @ 22312: INIT 1 3287 @ 22315: PUSHI #0xffffc013 3288 @ 22320: INIT 1 3289 @ 22323: PUSHI #0x000000f6 3290 @ 22328: INIT 1 3291 @ 22331: PUSHI #0xffffc013 3292 @ 22336: INIT 1 3293 @ 22339: PUSHI #0x00000000 3294 @ 22344: INIT 1 3295 @ 22347: PUSHI #0xffff805a 3296 @ 22352: INIT 1 3297 @ 22355: PUSHI #0x000000ea 3298 @ 22360: INIT 1 3299 @ 22363: PUSHI #0x0000005a 3300 @ 22368: INIT 1 3301 @ 22371: PUSHI #0x00004017 3302 @ 22376: INIT 1 3303 @ 22379: PUSHI #0x000000de 3304 @ 22384: INIT 1 3305 @ 22387: PUSHI #0x00004015 3306 @ 22392: INIT 1 3307 @ 22395: PUSHI #0x000000de 3308 @ 22400: INIT 1 3309 @ 22403: PUSHI #0x00000091 3310 @ 22408: INIT 1 3311 @ 22411: PUSHI #0x00004017 3312 @ 22416: INIT 1 3313 @ 22419: PUSHI #0x000000de 3314 @ 22424: INIT 1 3315 @ 22427: PUSHI #0x00004015 3316 @ 22432: INIT 1 3317 @ 22435: PUSHI #0x000000de 3318 @ 22440: INIT 1 3319 @ 22443: PUSHI #0x00000092 3320 @ 22448: INIT 1 3321 @ 22451: PUSHI #0x00004017 3322 @ 22456: INIT 1 3323 @ 22459: PUSHI #0x000004e4 3324 @ 22464: INIT 1 3325 @ 22467: PUSHI #0x0000009a 3326 @ 22472: INIT 1 3327 @ 22475: PUSHI #0x000014e4 3328 @ 22480: INIT 1 3329 @ 22483: PUSHI #0xffffc013 3330 @ 22488: INIT 1 3331 @ 22491: PUSHI #0x0000008e 3332 @ 22496: INIT 1 3333 @ 22499: PUSHI #0x0000007e 3334 @ 22504: INIT 1 3335 @ 22507: PUSHI #0x000000b6 3336 @ 22512: INIT 1 3337 @ 22515: PUSHI #0xffffc001 3338 @ 22520: INIT 1 3339 @ 22523: PUSHI #0x00004007 3340 @ 22528: INIT 1 3341 @ 22531: PUSHI #0x0000005a 3342 @ 22536: INIT 1 3343 @ 22539: PUSHI #0xffffc013 3344 @ 22544: INIT 1 3345 @ 22547: PUSHI #0x0000007f 3346 @ 22552: INIT 1 3347 @ 22555: PUSHI #0xffff805a 3348 @ 22560: INIT 1 3349 @ 22563: PUSHI #0x000000ee 3350 @ 22568: INIT 1 3351 @ 22571: PUSHI #0x0000005a 3352 @ 22576: INIT 1 3353 @ 22579: PUSHI #0x0000007d 3354 @ 22584: INIT 1 3355 @ 22587: PUSHI #0x000000ef 3356 @ 22592: INIT 1 3357 @ 22595: PUSHI #0xffffc013 3358 @ 22600: INIT 1 3359 @ 22603: PUSHI #0x0000207f 3360 @ 22608: INIT 1 3361 @ 22611: PUSHI #0x000020ee 3362 @ 22616: INIT 1 3363 @ 22619: PUSHI #0x00000080 3364 @ 22624: INIT 1 3365 @ 22627: PUSHI #0x0000007e 3366 @ 22632: INIT 1 3367 @ 22635: PUSHI #0xffffc017 3368 @ 22640: INIT 1 3369 @ 22643: PUSHI #0x0000007f 3370 @ 22648: INIT 1 3371 @ 22651: PUSHI #0x000000be 3372 @ 22656: INIT 1 3373 @ 22659: PUSHI #0x000000f0 3374 @ 22664: INIT 1 3375 @ 22667: PUSHI #0x000000bd 3376 @ 22672: INIT 1 3377 @ 22675: PUSHI #0x00004019 3378 @ 22680: INIT 1 3379 @ 22683: PUSHI #0x000000b6 3380 @ 22688: INIT 1 3381 @ 22691: PUSHI #0xffffc001 3382 @ 22696: INIT 1 3383 @ 22699: PUSHI #0x00004007 3384 @ 22704: INIT 1 3385 @ 22707: PUSHI #0x0000005a 3386 @ 22712: INIT 1 3387 @ 22715: PUSHI #0xffffc013 3388 @ 22720: INIT 1 3389 @ 22723: PUSHI #0x00000000 3390 @ 22728: INIT 1 3391 @ 22731: PUSHI #0xffff805a 3392 @ 22736: INIT 1 3393 @ 22739: PUSHI #0x000000f0 3394 @ 22744: INIT 1 3395 @ 22747: PUSHI #0x0000005a 3396 @ 22752: INIT 1 3397 @ 22755: PUSHI #0x000040ef 3398 @ 22760: INIT 1 3399 @ 22763: PUSHI #0xffffc013 3400 @ 22768: INIT 1 3401 @ 22771: PUSHI #0x00000000 3402 @ 22776: INIT 1 3403 @ 22779: PUSHI #0x000000f4 3404 @ 22784: INIT 1 3405 @ 22787: PUSHI #0x000000e8 3406 @ 22792: INIT 1 3407 @ 22795: PUSHI #0x000004e4 3408 @ 22800: INIT 1 3409 @ 22803: PUSHI #0x000004e4 3410 @ 22808: INIT 1 3411 @ 22811: PUSHI #0x00000089 3412 @ 22816: INIT 1 3413 @ 22819: PUSHI #0x000004e4 3414 @ 22824: INIT 1 3415 @ 22827: PUSHI #0x00000089 3416 @ 22832: INIT 1 3417 @ 22835: PUSHI #0x000004e4 3418 @ 22840: INIT 1 3419 @ 22843: PUSHI #0x00000089 3420 @ 22848: INIT 1 3421 @ 22851: PUSHI #0x000004e4 3422 @ 22856: INIT 1 3423 @ 22859: PUSHI #0x00000089 3424 @ 22864: INIT 1 3425 @ 22867: PUSHI #0x000004e4 3426 @ 22872: INIT 1 3427 @ 22875: PUSHI #0x00000089 3428 @ 22880: INIT 1 3429 @ 22883: PUSHI #0x000000de 3430 @ 22888: INIT 1 3431 @ 22891: PUSHI #0xffffc013 3432 @ 22896: INIT 1 3433 @ 22899: PUSHI #0x00000000 3434 @ 22904: INIT 1 3435 @ 22907: PUSHI #0x00000083 3436 @ 22912: INIT 1 3437 @ 22915: PUSHI #0x000000c2 3438 @ 22920: INIT 1 3439 @ 22923: PUSHI #0xffffc018 3440 @ 22928: INIT 1 3441 @ 22931: PUSHI #0xffffc033 3442 @ 22936: INIT 1 3443 @ 22939: PUSHI #0xffffc034 3444 @ 22944: INIT 1 3445 @ 22947: PUSHI #0x0000007c 3446 @ 22952: INIT 1 3447 @ 22955: PUSHI #0x000000b5 3448 @ 22960: INIT 1 3449 @ 22963: PUSHI #0xffffc05c 3450 @ 22968: INIT 1 3451 @ 22971: PUSHI #0xffffc06b 3452 @ 22976: INIT 1 3453 @ 22979: PUSHI #0x0000406d 3454 @ 22984: INIT 1 3455 @ 22987: PUSHI #0xffff83c6 3456 @ 22992: INIT 1 3457 @ 22995: PUSHI #0x000014de 3458 @ 23000: INIT 1 3459 @ 23003: PUSHI #0xffff905b 3460 @ 23008: INIT 1 3461 @ 23011: PUSHI #0x0000105c 3462 @ 23016: INIT 1 3463 @ 23019: PUSHI #0x000010a7 3464 @ 23024: INIT 1 3465 @ 23027: PUSHI #0x000000b5 3466 @ 23032: INIT 1 3467 @ 23035: PUSHI #0x000000ba 3468 @ 23040: INIT 1 3469 @ 23043: PUSHI #0x000001c6 3470 @ 23048: INIT 1 3471 @ 23051: PUSHI #0x0000405b 3472 @ 23056: INIT 1 3473 @ 23059: PUSHI #0x000000b7 3474 @ 23064: INIT 1 3475 @ 23067: PUSHI #0xffff9059 3476 @ 23072: INIT 1 3477 @ 23075: PUSHI #0x000000c7 3478 @ 23080: INIT 1 3479 @ 23083: PUSHI #0x000015de 3480 @ 23088: INIT 1 3481 @ 23091: PUSHI #0x000024de 3482 @ 23096: INIT 1 3483 @ 23099: PUSHI #0x000000de 3484 @ 23104: INIT 1 3485 @ 23107: PUSHI #0xffff805b 3486 @ 23112: INIT 1 3487 @ 23115: PUSHI #0xffff805c 3488 @ 23120: INIT 1 3489 @ 23123: PUSHI #0x00004017 3490 @ 23128: INIT 1 3491 @ 23131: PUSHI #0x000000ba 3492 @ 23136: INIT 1 3493 @ 23139: PUSHI #0x000000e4 3494 @ 23144: INIT 1 3495 @ 23147: PUSHI #0x00000087 3496 @ 23152: INIT 1 3497 @ 23155: PUSHI #0x00004019 3498 @ 23160: INIT 1 3499 @ 23163: PUSHI #0xffff8088 3500 @ 23168: INIT 1 3501 @ 23171: PUSHI #0x00000000 3502 @ 23176: INIT 1 3503 @ 23179: PUSHI #0xffff805b 3504 @ 23184: INIT 1 3505 @ 23187: PUSHI #0x0000005c 3506 @ 23192: INIT 1 3507 @ 23195: PUSHI #0xffff805b 3508 @ 23200: INIT 1 3509 @ 23203: PUSHI #0xffff805c 3510 @ 23208: INIT 1 3511 @ 23211: PUSHI #0xffff806a 3512 @ 23216: INIT 1 3513 @ 23219: PUSHI #0xffff806b 3514 @ 23224: INIT 1 3515 @ 23227: PUSHI #0xffff806c 3516 @ 23232: INIT 1 3517 @ 23235: PUSHI #0xffff806d 3518 @ 23240: INIT 1 3519 @ 23243: PUSHI #0x000000a5 3520 @ 23248: INIT 1 3521 @ 23251: PUSHI #0xffff805b 3522 @ 23256: INIT 1 3523 @ 23259: PUSHI #0x0000005c 3524 @ 23264: INIT 1 3525 @ 23267: PUSHI #0x000000bc 3526 @ 23272: INIT 1 3527 @ 23275: PUSHI #0xffff806a 3528 @ 23280: INIT 1 3529 @ 23283: PUSHI #0x0000006b 3530 @ 23288: INIT 1 3531 @ 23291: PUSHI #0x000000bc 3532 @ 23296: INIT 1 3533 @ 23299: PUSHI #0xffff806c 3534 @ 23304: INIT 1 3535 @ 23307: PUSHI #0x0000006d 3536 @ 23312: INIT 1 3537 @ 23315: PUSHI #0xffff8024 3538 @ 23320: INIT 1 3539 @ 23323: PUSHI #0x00000025 3540 @ 23328: INIT 1 3541 @ 23331: PUSHI #0xffffc028 3542 @ 23336: INIT 1 3543 @ 23339: PUSHI #0x000010de 3544 @ 23344: INIT 1 3545 @ 23347: PUSHI #0x00000094 3546 @ 23352: INIT 1 3547 @ 23355: PUSHI #0xffff805e 3548 @ 23360: INIT 1 3549 @ 23363: PUSHI #0x00004028 3550 @ 23368: INIT 1 3551 @ 23371: PUSHI #0x000000de 3552 @ 23376: INIT 1 3553 @ 23379: PUSHI #0x00004015 3554 @ 23384: INIT 1 3555 @ 23387: PUSHI #0x000000de 3556 @ 23392: INIT 1 3557 @ 23395: PUSHI #0x000000ae 3558 @ 23400: INIT 1 3559 @ 23403: PUSHI #0xffff901c 3560 @ 23408: INIT 1 3561 @ 23411: PUSHI #0xffff8022 3562 @ 23416: INIT 1 3563 @ 23419: PUSHI #0xffff8058 3564 @ 23424: INIT 1 3565 @ 23427: PUSHI #0xffff901f 3566 @ 23432: INIT 1 3567 @ 23435: PUSHI #0xffff8023 3568 @ 23440: INIT 1 3569 @ 23443: PUSHI #0xffff8026 3570 @ 23448: INIT 1 3571 @ 23451: PUSHI #0xffff8021 3572 @ 23456: INIT 1 3573 @ 23459: PUSHI #0xffff8029 3574 @ 23464: INIT 1 3575 @ 23467: PUSHI #0xffff801e 3576 @ 23472: INIT 1 3577 @ 23475: PUSHI #0x000010e6 3578 @ 23480: INIT 1 3579 @ 23483: PUSHI #0xffff801e 3580 @ 23488: INIT 1 3581 @ 23491: PUSHI #0xffff801d 3582 @ 23496: INIT 1 3583 @ 23499: PUSHI #0xffff801b 3584 @ 23504: INIT 1 3585 @ 23507: PUSHI #0xffff8020 3586 @ 23512: INIT 1 3587 @ 23515: PUSHI #0x000000c7 3588 @ 23520: INIT 1 3589 @ 23523: PUSHI #0xffff901c 3590 @ 23528: INIT 1 3591 @ 23531: PUSHI #0xffff8058 3592 @ 23536: INIT 1 3593 @ 23539: PUSHI #0xffff901f 3594 @ 23544: INIT 1 3595 @ 23547: PUSHI #0x000010e6 3596 @ 23552: INIT 1 3597 @ 23555: PUSHI #0xffff801d 3598 @ 23560: INIT 1 3599 @ 23563: PUSHI #0xffff801b 3600 @ 23568: INIT 1 3601 @ 23571: PUSHI #0x000000c7 3602 @ 23576: INIT 1 3603 @ 23579: PUSHI #0xffff801e 3604 @ 23584: INIT 1 3605 @ 23587: PUSHI #0xffff801d 3606 @ 23592: INIT 1 3607 @ 23595: PUSHI #0xffff801b 3608 @ 23600: INIT 1 3609 @ 23603: PUSHI #0xffff8020 3610 @ 23608: INIT 1 3611 @ 23611: PUSHI #0xffff8027 3612 @ 23616: INIT 1 3613 @ 23619: PUSHI #0x000000c7 3614 @ 23624: INIT 1 3615 @ 23627: PUSHI #0xffff8098 3616 @ 23632: INIT 1 3617 @ 23635: PUSHI #0x000000c7 3618 @ 23640: INIT 1 3619 @ 23643: PUSHI #0xffff801d 3620 @ 23648: INIT 1 3621 @ 23651: PUSHI #0xffff801b 3622 @ 23656: INIT 1 3623 @ 23659: PUSHI #0xffff8027 3624 @ 23664: INIT 1 3625 @ 23667: PUSHI #0x000000c7 3626 @ 23672: INIT 1 3627 @ 23675: PUSHI #0xffff8098 3628 @ 23680: INIT 1 3629 @ 23683: PUSHI #0xffff8027 3630 @ 23688: INIT 1 3631 @ 23691: PUSHI #0x000000c7 3632 @ 23696: INIT 1 3633 @ 23699: PUSHI #0xffff901c 3634 @ 23704: INIT 1 3635 @ 23707: PUSHI #0xffff8058 3636 @ 23712: INIT 1 3637 @ 23715: PUSHI #0x000010e6 3638 @ 23720: INIT 1 3639 @ 23723: PUSHI #0xffff801e 3640 @ 23728: INIT 1 3641 @ 23731: PUSHI #0xffff801d 3642 @ 23736: INIT 1 3643 @ 23739: PUSHI #0xffff801b 3644 @ 23744: INIT 1 3645 @ 23747: PUSHI #0x000000c7 3646 @ 23752: INIT 1 3647 @ 23755: PUSHI #0x000000f5 3648 @ 23760: INIT 1 3649 @ 23763: PUSHI #0x000010de 3650 @ 23768: INIT 1 3651 @ 23771: PUSHI #0x000000f5 3652 @ 23776: INIT 1 3653 @ 23779: PUSHI #0x00004019 3654 @ 23784: INIT 1 3655 @ 23787: PUSHI #0x00000098 3656 @ 23792: INIT 1 3657 @ 23795: PUSHI #0x000010de 3658 @ 23800: INIT 1 3659 @ 23803: PUSHI #0x00004019 3660 @ 23808: INIT 1 3661 @ 23811: PUSHI #0x00000098 3662 @ 23816: INIT 1 3663 @ 23819: PUSHI #0x000000f5 3664 @ 23824: INIT 1 3665 @ 23827: PUSHI #0xffff8060 3666 @ 23832: INIT 1 3667 @ 23835: PUSHI #0xffff8061 3668 @ 23840: INIT 1 3669 @ 23843: PUSHI #0xffff8062 3670 @ 23848: INIT 1 3671 @ 23851: PUSHI #0x00000063 3672 @ 23856: INIT 1 3673 @ 23859: PUSHI #0x00004017 3674 @ 23864: INIT 1 3675 @ 23867: PUSHI #0x000000c8 3676 @ 23872: INIT 1 3677 @ 23875: PUSHI #0x00000090 3678 @ 23880: INIT 1 3679 @ 23883: PUSHI #0x000000b9 3680 @ 23888: INIT 1 3681 @ 23891: PUSHI #0xffff805b 3682 @ 23896: INIT 1 3683 @ 23899: PUSHI #0x0000005c 3684 @ 23904: INIT 1 3685 @ 23907: PUSHI #0x00004017 3686 @ 23912: INIT 1 3687 @ 23915: PUSHI #0xffff80ba 3688 @ 23920: INIT 1 3689 @ 23923: PUSHI #0x000000c8 3690 @ 23928: INIT 1 3691 @ 23931: PUSHI #0x000000c8 3692 @ 23936: INIT 1 3693 @ 23939: PUSHI #0x000000bb 3694 @ 23944: INIT 1 3695 @ 23947: PUSHI #0x0000008d 3696 @ 23952: INIT 1 3697 @ 23955: PUSHI #0xffff805b 3698 @ 23960: INIT 1 3699 @ 23963: PUSHI #0x0000005c 3700 @ 23968: INIT 1 3701 @ 23971: PUSHI #0x0000401a 3702 @ 23976: INIT 1 3703 @ 23979: PUSHI #0x000000bf 3704 @ 23984: INIT 1 3705 @ 23987: PUSHI #0xffff805b 3706 @ 23992: INIT 1 3707 @ 23995: PUSHI #0xffff805c 3708 @ 24000: INIT 1 3709 @ 24003: PUSHI #0xffff806a 3710 @ 24008: INIT 1 3711 @ 24011: PUSHI #0xffff806b 3712 @ 24016: INIT 1 3713 @ 24019: PUSHI #0xffff806c 3714 @ 24024: INIT 1 3715 @ 24027: PUSHI #0x0000006d 3716 @ 24032: INIT 1 3717 @ 24035: PUSHI #0x000000c6 3718 @ 24040: INIT 1 3719 @ 24043: PUSHI #0x00000000 3720 @ 24048: INIT 1001 402 %ownshortintegerarray glink(0:max grammar) = %c 403 -1, 71, 72, 38, 46, 47, 67, 67, 404 75, 67, 0, 67, 51, 76, 79, 53, 405 55, 80, 67, 81, 82, 83, 67, 84, 406 26, 41, 85, 86, 57, 57, 89, 93, 407 96, 97, 102, 103, 104, 107, 46, 67, 408 67, 0, 110, 110, 111, 52, 49, 0, 409 61, 67, 62, 0, 67, 0, 111, 112, 410 112, 58, 113, 114, 115, 64, 67, 66, 411 116, 117, 68, 0, 67, 122, 67, 0, 412 73, 123, 123, 67, 77, 67, 40, 77, 413 67, 67, 0, 124, 127, 128, 87, 86, 414 0, 90, 131, 89, 0, 94, 93, 0, 415 132, 98, 137, 100, 97, 0, 138, 67, 416 105, 104, 0, 108, 107, 0, 67, 67, 417 67, 139, 140, 141, 0, 118, 120, 116, 418 142, 116, 67, 71, 125, 67, 0, 67, 419 129, 85, 0, 143, 133, 144, 135, 145, 420 0, 156, 157, 59, 158, 67, 119, 91, 421 159, 146, 145, 148, 146, 151, 0, 153, 422 153, 154, 146, 0, 99, 160, 67, 134, 423 161, 162, 165, 161, 141, 162, 162, 168, 424 172, 174, 175, 176, 177, 178, 179, 182, 425 185, 188, 189, 180, 190, 190, 183, 191, 426 191, 186, 191, 191, 0, 188, 192, 193, 427 194, 0, 196, 0, 0, 198, 197, 0, 428 201, 200, 0, 204, 205, 0, 228, 232, 429 219, 234, 235, 0, 236, 237, 238, 0, 430 232, 226, 244, 245, 221, 248, 249, 250, 431 251, 245, 0, 252, 229, 249, 250, 251, 432 253, 0, 0, 188, 254, 260, 239, 269, 433 269, 242, 191, 191, 270, 246, 272, 272, 434 229, 273, 274, 275, 276, 0, 255, 266, 435 266, 258, 267, 267, 261, 266, 266, 264, 436 267, 267, 232, 268, 232, 0, 277, 0, 437 278, 232, 273, 232, 282, 283, 279, 285, 438 253, 0, 0, 286, 0, 232, 0, 288, 439 0, 290, 0, 292, 294, 0, 0, 297, 440 0, 0, 299, 301, 0, 303, 0, 305, 441 0, 307, 0, 0, 310, 313, 314, 315, 442 0, 0, 316, 311, 314, 0, 332, 332, 443 328, 349, 350, 351, 351, 351, 351, 330, 444 282, 352, 358, 0, 333, 341, 347, 359, 445 360, 361, 362, 363, 0, 342, 343, 345, 446 0, 346, 0, 269, 269, 0, 0, 366, 447 353, 371, 372, 373, 374, 0, 375, 376, 448 377, 383, 384, 364, 385, 385, 367, 269, 449 269, 269, 269, 389, 390, 391, 392, 393, 450 0, 378, 360, 361, 362, 341, 0, 379, 451 380, 386, 363, 341, 0, 353, 354, 355, 452 375, 395, 0, 396, 0, 400, 269, 269, 453 401, 0, 411, 411, 406, 417, 407, 418, 454 419, 420, 0, 412, 418, 419, 420, 421, 455 0, 409, 406, 424, 417, 422, 425, 425, 456 408, 415, 427, 430, 431, 0, 426, 432, 457 428, 434, 436, 0, 433, 269, 269, 441, 458 442, 282, 443, 0, 446, 451, 447, 446, 459 452, 451, 0, 449, 448, 454, 453, 457, 460 0, 455, 459, 458, 0, 269, 464, 465, 461 282, 466, 0, 469, 469, 470, 471, 472, 462 473, 474, 475, 476, 477, 0, 479, 269, 463 481, 0, 483, 485, 485, 205, 490, 488, 464 496, 497, 491, 494, 490, 0, 491, 491, 465 0, 498, 499, 501, 0, 0, 504, 506, 466 510, 499, 508, 0, 506, 506, 504, 512, 467 513, 514, 515, 0, 517, 518, 519, 520, 468 0, 522, 523, 524, 525, 522, 0, 528, 469 529, 531, 536, 532, 534, 0, 532, 0, 470 537, 538, 539, 541, 542, 542, 0, 544, 471 546, 0, 547, 548, 549, 533, 551, 553, 472 558, 554, 556, 0, 554, 0, 559, 560, 473 557, 0, 563, 205, 0, 566, 564, 568, 474 565, 570, 567, 572, 569, 574, 571, 576, 475 575, 0, 579, 580, 592, 593, 584, 205, 476 585, 588, 588, 588, 590, 205, 594, 594, 477 595, 596, 597, 581, 600, 598, 601, 0, 478 205, 205, 205, 606, 606, 607, 608, 609, 479 605, 610, 612, 0, 193, 193, 193, 193, 480 193, 193, 193, 193, 0, 623, 623, 192, 481 626, 626, 0, 626, 626, 631, 633, 282, 482 282, 634, 282, 282, 637, 638, 639, 0, 483 650, 677, 684, 666, 655, 205, 205, 205, 484 205, 650, 659, 668, 685, 666, 0, 662, 485 686, 666, 662, 668, 685, 0, 670, 674, 486 689, 666, 205, 0, 205, 0, 674, 689, 487 205, 0, 666, 205, 0, 680, 692, 680, 488 659, 668, 685, 0, 650, 687, 662, 688, 489 205, 690, 691, 666, 680, 697, 697, 697, 490 697, 698, 699, 700, 0, 703, 703, 704, 491 706, 707, 708, 708, 700, 711, 711, 712, 492 713, 719, 719, 719, 719, 719, 719, 0, 493 0(max grammar-gmax1) 494 3721 @ 24051: LINE 402 "regression-compile-tmp/pass1.imp" 3722 @ 24087: PUSHI #0x00000000 3723 @ 24092: PUSHI #0x000006b8 3724 @ 24097: BOUNDS 3725 @ 24098: DEF GLINK p1=V_00e6 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 3726 @ 24115: PUSHI #0xffffffff 3727 @ 24120: INIT 1 3728 @ 24123: PUSHI #0x00000047 3729 @ 24128: INIT 1 3730 @ 24131: PUSHI #0x00000048 3731 @ 24136: INIT 1 3732 @ 24139: PUSHI #0x00000026 3733 @ 24144: INIT 1 3734 @ 24147: PUSHI #0x0000002e 3735 @ 24152: INIT 1 3736 @ 24155: PUSHI #0x0000002f 3737 @ 24160: INIT 1 3738 @ 24163: PUSHI #0x00000043 3739 @ 24168: INIT 1 3740 @ 24171: PUSHI #0x00000043 3741 @ 24176: INIT 1 3742 @ 24179: PUSHI #0x0000004b 3743 @ 24184: INIT 1 3744 @ 24187: PUSHI #0x00000043 3745 @ 24192: INIT 1 3746 @ 24195: PUSHI #0x00000000 3747 @ 24200: INIT 1 3748 @ 24203: PUSHI #0x00000043 3749 @ 24208: INIT 1 3750 @ 24211: PUSHI #0x00000033 3751 @ 24216: INIT 1 3752 @ 24219: PUSHI #0x0000004c 3753 @ 24224: INIT 1 3754 @ 24227: PUSHI #0x0000004f 3755 @ 24232: INIT 1 3756 @ 24235: PUSHI #0x00000035 3757 @ 24240: INIT 1 3758 @ 24243: PUSHI #0x00000037 3759 @ 24248: INIT 1 3760 @ 24251: PUSHI #0x00000050 3761 @ 24256: INIT 1 3762 @ 24259: PUSHI #0x00000043 3763 @ 24264: INIT 1 3764 @ 24267: PUSHI #0x00000051 3765 @ 24272: INIT 1 3766 @ 24275: PUSHI #0x00000052 3767 @ 24280: INIT 1 3768 @ 24283: PUSHI #0x00000053 3769 @ 24288: INIT 1 3770 @ 24291: PUSHI #0x00000043 3771 @ 24296: INIT 1 3772 @ 24299: PUSHI #0x00000054 3773 @ 24304: INIT 1 3774 @ 24307: PUSHI #0x0000001a 3775 @ 24312: INIT 1 3776 @ 24315: PUSHI #0x00000029 3777 @ 24320: INIT 1 3778 @ 24323: PUSHI #0x00000055 3779 @ 24328: INIT 1 3780 @ 24331: PUSHI #0x00000056 3781 @ 24336: INIT 1 3782 @ 24339: PUSHI #0x00000039 3783 @ 24344: INIT 1 3784 @ 24347: PUSHI #0x00000039 3785 @ 24352: INIT 1 3786 @ 24355: PUSHI #0x00000059 3787 @ 24360: INIT 1 3788 @ 24363: PUSHI #0x0000005d 3789 @ 24368: INIT 1 3790 @ 24371: PUSHI #0x00000060 3791 @ 24376: INIT 1 3792 @ 24379: PUSHI #0x00000061 3793 @ 24384: INIT 1 3794 @ 24387: PUSHI #0x00000066 3795 @ 24392: INIT 1 3796 @ 24395: PUSHI #0x00000067 3797 @ 24400: INIT 1 3798 @ 24403: PUSHI #0x00000068 3799 @ 24408: INIT 1 3800 @ 24411: PUSHI #0x0000006b 3801 @ 24416: INIT 1 3802 @ 24419: PUSHI #0x0000002e 3803 @ 24424: INIT 1 3804 @ 24427: PUSHI #0x00000043 3805 @ 24432: INIT 1 3806 @ 24435: PUSHI #0x00000043 3807 @ 24440: INIT 1 3808 @ 24443: PUSHI #0x00000000 3809 @ 24448: INIT 1 3810 @ 24451: PUSHI #0x0000006e 3811 @ 24456: INIT 1 3812 @ 24459: PUSHI #0x0000006e 3813 @ 24464: INIT 1 3814 @ 24467: PUSHI #0x0000006f 3815 @ 24472: INIT 1 3816 @ 24475: PUSHI #0x00000034 3817 @ 24480: INIT 1 3818 @ 24483: PUSHI #0x00000031 3819 @ 24488: INIT 1 3820 @ 24491: PUSHI #0x00000000 3821 @ 24496: INIT 1 3822 @ 24499: PUSHI #0x0000003d 3823 @ 24504: INIT 1 3824 @ 24507: PUSHI #0x00000043 3825 @ 24512: INIT 1 3826 @ 24515: PUSHI #0x0000003e 3827 @ 24520: INIT 1 3828 @ 24523: PUSHI #0x00000000 3829 @ 24528: INIT 1 3830 @ 24531: PUSHI #0x00000043 3831 @ 24536: INIT 1 3832 @ 24539: PUSHI #0x00000000 3833 @ 24544: INIT 1 3834 @ 24547: PUSHI #0x0000006f 3835 @ 24552: INIT 1 3836 @ 24555: PUSHI #0x00000070 3837 @ 24560: INIT 1 3838 @ 24563: PUSHI #0x00000070 3839 @ 24568: INIT 1 3840 @ 24571: PUSHI #0x0000003a 3841 @ 24576: INIT 1 3842 @ 24579: PUSHI #0x00000071 3843 @ 24584: INIT 1 3844 @ 24587: PUSHI #0x00000072 3845 @ 24592: INIT 1 3846 @ 24595: PUSHI #0x00000073 3847 @ 24600: INIT 1 3848 @ 24603: PUSHI #0x00000040 3849 @ 24608: INIT 1 3850 @ 24611: PUSHI #0x00000043 3851 @ 24616: INIT 1 3852 @ 24619: PUSHI #0x00000042 3853 @ 24624: INIT 1 3854 @ 24627: PUSHI #0x00000074 3855 @ 24632: INIT 1 3856 @ 24635: PUSHI #0x00000075 3857 @ 24640: INIT 1 3858 @ 24643: PUSHI #0x00000044 3859 @ 24648: INIT 1 3860 @ 24651: PUSHI #0x00000000 3861 @ 24656: INIT 1 3862 @ 24659: PUSHI #0x00000043 3863 @ 24664: INIT 1 3864 @ 24667: PUSHI #0x0000007a 3865 @ 24672: INIT 1 3866 @ 24675: PUSHI #0x00000043 3867 @ 24680: INIT 1 3868 @ 24683: PUSHI #0x00000000 3869 @ 24688: INIT 1 3870 @ 24691: PUSHI #0x00000049 3871 @ 24696: INIT 1 3872 @ 24699: PUSHI #0x0000007b 3873 @ 24704: INIT 1 3874 @ 24707: PUSHI #0x0000007b 3875 @ 24712: INIT 1 3876 @ 24715: PUSHI #0x00000043 3877 @ 24720: INIT 1 3878 @ 24723: PUSHI #0x0000004d 3879 @ 24728: INIT 1 3880 @ 24731: PUSHI #0x00000043 3881 @ 24736: INIT 1 3882 @ 24739: PUSHI #0x00000028 3883 @ 24744: INIT 1 3884 @ 24747: PUSHI #0x0000004d 3885 @ 24752: INIT 1 3886 @ 24755: PUSHI #0x00000043 3887 @ 24760: INIT 1 3888 @ 24763: PUSHI #0x00000043 3889 @ 24768: INIT 1 3890 @ 24771: PUSHI #0x00000000 3891 @ 24776: INIT 1 3892 @ 24779: PUSHI #0x0000007c 3893 @ 24784: INIT 1 3894 @ 24787: PUSHI #0x0000007f 3895 @ 24792: INIT 1 3896 @ 24795: PUSHI #0x00000080 3897 @ 24800: INIT 1 3898 @ 24803: PUSHI #0x00000057 3899 @ 24808: INIT 1 3900 @ 24811: PUSHI #0x00000056 3901 @ 24816: INIT 1 3902 @ 24819: PUSHI #0x00000000 3903 @ 24824: INIT 1 3904 @ 24827: PUSHI #0x0000005a 3905 @ 24832: INIT 1 3906 @ 24835: PUSHI #0x00000083 3907 @ 24840: INIT 1 3908 @ 24843: PUSHI #0x00000059 3909 @ 24848: INIT 1 3910 @ 24851: PUSHI #0x00000000 3911 @ 24856: INIT 1 3912 @ 24859: PUSHI #0x0000005e 3913 @ 24864: INIT 1 3914 @ 24867: PUSHI #0x0000005d 3915 @ 24872: INIT 1 3916 @ 24875: PUSHI #0x00000000 3917 @ 24880: INIT 1 3918 @ 24883: PUSHI #0x00000084 3919 @ 24888: INIT 1 3920 @ 24891: PUSHI #0x00000062 3921 @ 24896: INIT 1 3922 @ 24899: PUSHI #0x00000089 3923 @ 24904: INIT 1 3924 @ 24907: PUSHI #0x00000064 3925 @ 24912: INIT 1 3926 @ 24915: PUSHI #0x00000061 3927 @ 24920: INIT 1 3928 @ 24923: PUSHI #0x00000000 3929 @ 24928: INIT 1 3930 @ 24931: PUSHI #0x0000008a 3931 @ 24936: INIT 1 3932 @ 24939: PUSHI #0x00000043 3933 @ 24944: INIT 1 3934 @ 24947: PUSHI #0x00000069 3935 @ 24952: INIT 1 3936 @ 24955: PUSHI #0x00000068 3937 @ 24960: INIT 1 3938 @ 24963: PUSHI #0x00000000 3939 @ 24968: INIT 1 3940 @ 24971: PUSHI #0x0000006c 3941 @ 24976: INIT 1 3942 @ 24979: PUSHI #0x0000006b 3943 @ 24984: INIT 1 3944 @ 24987: PUSHI #0x00000000 3945 @ 24992: INIT 1 3946 @ 24995: PUSHI #0x00000043 3947 @ 25000: INIT 1 3948 @ 25003: PUSHI #0x00000043 3949 @ 25008: INIT 1 3950 @ 25011: PUSHI #0x00000043 3951 @ 25016: INIT 1 3952 @ 25019: PUSHI #0x0000008b 3953 @ 25024: INIT 1 3954 @ 25027: PUSHI #0x0000008c 3955 @ 25032: INIT 1 3956 @ 25035: PUSHI #0x0000008d 3957 @ 25040: INIT 1 3958 @ 25043: PUSHI #0x00000000 3959 @ 25048: INIT 1 3960 @ 25051: PUSHI #0x00000076 3961 @ 25056: INIT 1 3962 @ 25059: PUSHI #0x00000078 3963 @ 25064: INIT 1 3964 @ 25067: PUSHI #0x00000074 3965 @ 25072: INIT 1 3966 @ 25075: PUSHI #0x0000008e 3967 @ 25080: INIT 1 3968 @ 25083: PUSHI #0x00000074 3969 @ 25088: INIT 1 3970 @ 25091: PUSHI #0x00000043 3971 @ 25096: INIT 1 3972 @ 25099: PUSHI #0x00000047 3973 @ 25104: INIT 1 3974 @ 25107: PUSHI #0x0000007d 3975 @ 25112: INIT 1 3976 @ 25115: PUSHI #0x00000043 3977 @ 25120: INIT 1 3978 @ 25123: PUSHI #0x00000000 3979 @ 25128: INIT 1 3980 @ 25131: PUSHI #0x00000043 3981 @ 25136: INIT 1 3982 @ 25139: PUSHI #0x00000081 3983 @ 25144: INIT 1 3984 @ 25147: PUSHI #0x00000055 3985 @ 25152: INIT 1 3986 @ 25155: PUSHI #0x00000000 3987 @ 25160: INIT 1 3988 @ 25163: PUSHI #0x0000008f 3989 @ 25168: INIT 1 3990 @ 25171: PUSHI #0x00000085 3991 @ 25176: INIT 1 3992 @ 25179: PUSHI #0x00000090 3993 @ 25184: INIT 1 3994 @ 25187: PUSHI #0x00000087 3995 @ 25192: INIT 1 3996 @ 25195: PUSHI #0x00000091 3997 @ 25200: INIT 1 3998 @ 25203: PUSHI #0x00000000 3999 @ 25208: INIT 1 4000 @ 25211: PUSHI #0x0000009c 4001 @ 25216: INIT 1 4002 @ 25219: PUSHI #0x0000009d 4003 @ 25224: INIT 1 4004 @ 25227: PUSHI #0x0000003b 4005 @ 25232: INIT 1 4006 @ 25235: PUSHI #0x0000009e 4007 @ 25240: INIT 1 4008 @ 25243: PUSHI #0x00000043 4009 @ 25248: INIT 1 4010 @ 25251: PUSHI #0x00000077 4011 @ 25256: INIT 1 4012 @ 25259: PUSHI #0x0000005b 4013 @ 25264: INIT 1 4014 @ 25267: PUSHI #0x0000009f 4015 @ 25272: INIT 1 4016 @ 25275: PUSHI #0x00000092 4017 @ 25280: INIT 1 4018 @ 25283: PUSHI #0x00000091 4019 @ 25288: INIT 1 4020 @ 25291: PUSHI #0x00000094 4021 @ 25296: INIT 1 4022 @ 25299: PUSHI #0x00000092 4023 @ 25304: INIT 1 4024 @ 25307: PUSHI #0x00000097 4025 @ 25312: INIT 1 4026 @ 25315: PUSHI #0x00000000 4027 @ 25320: INIT 1 4028 @ 25323: PUSHI #0x00000099 4029 @ 25328: INIT 1 4030 @ 25331: PUSHI #0x00000099 4031 @ 25336: INIT 1 4032 @ 25339: PUSHI #0x0000009a 4033 @ 25344: INIT 1 4034 @ 25347: PUSHI #0x00000092 4035 @ 25352: INIT 1 4036 @ 25355: PUSHI #0x00000000 4037 @ 25360: INIT 1 4038 @ 25363: PUSHI #0x00000063 4039 @ 25368: INIT 1 4040 @ 25371: PUSHI #0x000000a0 4041 @ 25376: INIT 1 4042 @ 25379: PUSHI #0x00000043 4043 @ 25384: INIT 1 4044 @ 25387: PUSHI #0x00000086 4045 @ 25392: INIT 1 4046 @ 25395: PUSHI #0x000000a1 4047 @ 25400: INIT 1 4048 @ 25403: PUSHI #0x000000a2 4049 @ 25408: INIT 1 4050 @ 25411: PUSHI #0x000000a5 4051 @ 25416: INIT 1 4052 @ 25419: PUSHI #0x000000a1 4053 @ 25424: INIT 1 4054 @ 25427: PUSHI #0x0000008d 4055 @ 25432: INIT 1 4056 @ 25435: PUSHI #0x000000a2 4057 @ 25440: INIT 1 4058 @ 25443: PUSHI #0x000000a2 4059 @ 25448: INIT 1 4060 @ 25451: PUSHI #0x000000a8 4061 @ 25456: INIT 1 4062 @ 25459: PUSHI #0x000000ac 4063 @ 25464: INIT 1 4064 @ 25467: PUSHI #0x000000ae 4065 @ 25472: INIT 1 4066 @ 25475: PUSHI #0x000000af 4067 @ 25480: INIT 1 4068 @ 25483: PUSHI #0x000000b0 4069 @ 25488: INIT 1 4070 @ 25491: PUSHI #0x000000b1 4071 @ 25496: INIT 1 4072 @ 25499: PUSHI #0x000000b2 4073 @ 25504: INIT 1 4074 @ 25507: PUSHI #0x000000b3 4075 @ 25512: INIT 1 4076 @ 25515: PUSHI #0x000000b6 4077 @ 25520: INIT 1 4078 @ 25523: PUSHI #0x000000b9 4079 @ 25528: INIT 1 4080 @ 25531: PUSHI #0x000000bc 4081 @ 25536: INIT 1 4082 @ 25539: PUSHI #0x000000bd 4083 @ 25544: INIT 1 4084 @ 25547: PUSHI #0x000000b4 4085 @ 25552: INIT 1 4086 @ 25555: PUSHI #0x000000be 4087 @ 25560: INIT 1 4088 @ 25563: PUSHI #0x000000be 4089 @ 25568: INIT 1 4090 @ 25571: PUSHI #0x000000b7 4091 @ 25576: INIT 1 4092 @ 25579: PUSHI #0x000000bf 4093 @ 25584: INIT 1 4094 @ 25587: PUSHI #0x000000bf 4095 @ 25592: INIT 1 4096 @ 25595: PUSHI #0x000000ba 4097 @ 25600: INIT 1 4098 @ 25603: PUSHI #0x000000bf 4099 @ 25608: INIT 1 4100 @ 25611: PUSHI #0x000000bf 4101 @ 25616: INIT 1 4102 @ 25619: PUSHI #0x00000000 4103 @ 25624: INIT 1 4104 @ 25627: PUSHI #0x000000bc 4105 @ 25632: INIT 1 4106 @ 25635: PUSHI #0x000000c0 4107 @ 25640: INIT 1 4108 @ 25643: PUSHI #0x000000c1 4109 @ 25648: INIT 1 4110 @ 25651: PUSHI #0x000000c2 4111 @ 25656: INIT 1 4112 @ 25659: PUSHI #0x00000000 4113 @ 25664: INIT 1 4114 @ 25667: PUSHI #0x000000c4 4115 @ 25672: INIT 1 4116 @ 25675: PUSHI #0x00000000 4117 @ 25680: INIT 1 4118 @ 25683: PUSHI #0x00000000 4119 @ 25688: INIT 1 4120 @ 25691: PUSHI #0x000000c6 4121 @ 25696: INIT 1 4122 @ 25699: PUSHI #0x000000c5 4123 @ 25704: INIT 1 4124 @ 25707: PUSHI #0x00000000 4125 @ 25712: INIT 1 4126 @ 25715: PUSHI #0x000000c9 4127 @ 25720: INIT 1 4128 @ 25723: PUSHI #0x000000c8 4129 @ 25728: INIT 1 4130 @ 25731: PUSHI #0x00000000 4131 @ 25736: INIT 1 4132 @ 25739: PUSHI #0x000000cc 4133 @ 25744: INIT 1 4134 @ 25747: PUSHI #0x000000cd 4135 @ 25752: INIT 1 4136 @ 25755: PUSHI #0x00000000 4137 @ 25760: INIT 1 4138 @ 25763: PUSHI #0x000000e4 4139 @ 25768: INIT 1 4140 @ 25771: PUSHI #0x000000e8 4141 @ 25776: INIT 1 4142 @ 25779: PUSHI #0x000000db 4143 @ 25784: INIT 1 4144 @ 25787: PUSHI #0x000000ea 4145 @ 25792: INIT 1 4146 @ 25795: PUSHI #0x000000eb 4147 @ 25800: INIT 1 4148 @ 25803: PUSHI #0x00000000 4149 @ 25808: INIT 1 4150 @ 25811: PUSHI #0x000000ec 4151 @ 25816: INIT 1 4152 @ 25819: PUSHI #0x000000ed 4153 @ 25824: INIT 1 4154 @ 25827: PUSHI #0x000000ee 4155 @ 25832: INIT 1 4156 @ 25835: PUSHI #0x00000000 4157 @ 25840: INIT 1 4158 @ 25843: PUSHI #0x000000e8 4159 @ 25848: INIT 1 4160 @ 25851: PUSHI #0x000000e2 4161 @ 25856: INIT 1 4162 @ 25859: PUSHI #0x000000f4 4163 @ 25864: INIT 1 4164 @ 25867: PUSHI #0x000000f5 4165 @ 25872: INIT 1 4166 @ 25875: PUSHI #0x000000dd 4167 @ 25880: INIT 1 4168 @ 25883: PUSHI #0x000000f8 4169 @ 25888: INIT 1 4170 @ 25891: PUSHI #0x000000f9 4171 @ 25896: INIT 1 4172 @ 25899: PUSHI #0x000000fa 4173 @ 25904: INIT 1 4174 @ 25907: PUSHI #0x000000fb 4175 @ 25912: INIT 1 4176 @ 25915: PUSHI #0x000000f5 4177 @ 25920: INIT 1 4178 @ 25923: PUSHI #0x00000000 4179 @ 25928: INIT 1 4180 @ 25931: PUSHI #0x000000fc 4181 @ 25936: INIT 1 4182 @ 25939: PUSHI #0x000000e5 4183 @ 25944: INIT 1 4184 @ 25947: PUSHI #0x000000f9 4185 @ 25952: INIT 1 4186 @ 25955: PUSHI #0x000000fa 4187 @ 25960: INIT 1 4188 @ 25963: PUSHI #0x000000fb 4189 @ 25968: INIT 1 4190 @ 25971: PUSHI #0x000000fd 4191 @ 25976: INIT 1 4192 @ 25979: PUSHI #0x00000000 4193 @ 25984: INIT 1 4194 @ 25987: PUSHI #0x00000000 4195 @ 25992: INIT 1 4196 @ 25995: PUSHI #0x000000bc 4197 @ 26000: INIT 1 4198 @ 26003: PUSHI #0x000000fe 4199 @ 26008: INIT 1 4200 @ 26011: PUSHI #0x00000104 4201 @ 26016: INIT 1 4202 @ 26019: PUSHI #0x000000ef 4203 @ 26024: INIT 1 4204 @ 26027: PUSHI #0x0000010d 4205 @ 26032: INIT 1 4206 @ 26035: PUSHI #0x0000010d 4207 @ 26040: INIT 1 4208 @ 26043: PUSHI #0x000000f2 4209 @ 26048: INIT 1 4210 @ 26051: PUSHI #0x000000bf 4211 @ 26056: INIT 1 4212 @ 26059: PUSHI #0x000000bf 4213 @ 26064: INIT 1 4214 @ 26067: PUSHI #0x0000010e 4215 @ 26072: INIT 1 4216 @ 26075: PUSHI #0x000000f6 4217 @ 26080: INIT 1 4218 @ 26083: PUSHI #0x00000110 4219 @ 26088: INIT 1 4220 @ 26091: PUSHI #0x00000110 4221 @ 26096: INIT 1 4222 @ 26099: PUSHI #0x000000e5 4223 @ 26104: INIT 1 4224 @ 26107: PUSHI #0x00000111 4225 @ 26112: INIT 1 4226 @ 26115: PUSHI #0x00000112 4227 @ 26120: INIT 1 4228 @ 26123: PUSHI #0x00000113 4229 @ 26128: INIT 1 4230 @ 26131: PUSHI #0x00000114 4231 @ 26136: INIT 1 4232 @ 26139: PUSHI #0x00000000 4233 @ 26144: INIT 1 4234 @ 26147: PUSHI #0x000000ff 4235 @ 26152: INIT 1 4236 @ 26155: PUSHI #0x0000010a 4237 @ 26160: INIT 1 4238 @ 26163: PUSHI #0x0000010a 4239 @ 26168: INIT 1 4240 @ 26171: PUSHI #0x00000102 4241 @ 26176: INIT 1 4242 @ 26179: PUSHI #0x0000010b 4243 @ 26184: INIT 1 4244 @ 26187: PUSHI #0x0000010b 4245 @ 26192: INIT 1 4246 @ 26195: PUSHI #0x00000105 4247 @ 26200: INIT 1 4248 @ 26203: PUSHI #0x0000010a 4249 @ 26208: INIT 1 4250 @ 26211: PUSHI #0x0000010a 4251 @ 26216: INIT 1 4252 @ 26219: PUSHI #0x00000108 4253 @ 26224: INIT 1 4254 @ 26227: PUSHI #0x0000010b 4255 @ 26232: INIT 1 4256 @ 26235: PUSHI #0x0000010b 4257 @ 26240: INIT 1 4258 @ 26243: PUSHI #0x000000e8 4259 @ 26248: INIT 1 4260 @ 26251: PUSHI #0x0000010c 4261 @ 26256: INIT 1 4262 @ 26259: PUSHI #0x000000e8 4263 @ 26264: INIT 1 4264 @ 26267: PUSHI #0x00000000 4265 @ 26272: INIT 1 4266 @ 26275: PUSHI #0x00000115 4267 @ 26280: INIT 1 4268 @ 26283: PUSHI #0x00000000 4269 @ 26288: INIT 1 4270 @ 26291: PUSHI #0x00000116 4271 @ 26296: INIT 1 4272 @ 26299: PUSHI #0x000000e8 4273 @ 26304: INIT 1 4274 @ 26307: PUSHI #0x00000111 4275 @ 26312: INIT 1 4276 @ 26315: PUSHI #0x000000e8 4277 @ 26320: INIT 1 4278 @ 26323: PUSHI #0x0000011a 4279 @ 26328: INIT 1 4280 @ 26331: PUSHI #0x0000011b 4281 @ 26336: INIT 1 4282 @ 26339: PUSHI #0x00000117 4283 @ 26344: INIT 1 4284 @ 26347: PUSHI #0x0000011d 4285 @ 26352: INIT 1 4286 @ 26355: PUSHI #0x000000fd 4287 @ 26360: INIT 1 4288 @ 26363: PUSHI #0x00000000 4289 @ 26368: INIT 1 4290 @ 26371: PUSHI #0x00000000 4291 @ 26376: INIT 1 4292 @ 26379: PUSHI #0x0000011e 4293 @ 26384: INIT 1 4294 @ 26387: PUSHI #0x00000000 4295 @ 26392: INIT 1 4296 @ 26395: PUSHI #0x000000e8 4297 @ 26400: INIT 1 4298 @ 26403: PUSHI #0x00000000 4299 @ 26408: INIT 1 4300 @ 26411: PUSHI #0x00000120 4301 @ 26416: INIT 1 4302 @ 26419: PUSHI #0x00000000 4303 @ 26424: INIT 1 4304 @ 26427: PUSHI #0x00000122 4305 @ 26432: INIT 1 4306 @ 26435: PUSHI #0x00000000 4307 @ 26440: INIT 1 4308 @ 26443: PUSHI #0x00000124 4309 @ 26448: INIT 1 4310 @ 26451: PUSHI #0x00000126 4311 @ 26456: INIT 1 4312 @ 26459: PUSHI #0x00000000 4313 @ 26464: INIT 1 4314 @ 26467: PUSHI #0x00000000 4315 @ 26472: INIT 1 4316 @ 26475: PUSHI #0x00000129 4317 @ 26480: INIT 1 4318 @ 26483: PUSHI #0x00000000 4319 @ 26488: INIT 1 4320 @ 26491: PUSHI #0x00000000 4321 @ 26496: INIT 1 4322 @ 26499: PUSHI #0x0000012b 4323 @ 26504: INIT 1 4324 @ 26507: PUSHI #0x0000012d 4325 @ 26512: INIT 1 4326 @ 26515: PUSHI #0x00000000 4327 @ 26520: INIT 1 4328 @ 26523: PUSHI #0x0000012f 4329 @ 26528: INIT 1 4330 @ 26531: PUSHI #0x00000000 4331 @ 26536: INIT 1 4332 @ 26539: PUSHI #0x00000131 4333 @ 26544: INIT 1 4334 @ 26547: PUSHI #0x00000000 4335 @ 26552: INIT 1 4336 @ 26555: PUSHI #0x00000133 4337 @ 26560: INIT 1 4338 @ 26563: PUSHI #0x00000000 4339 @ 26568: INIT 1 4340 @ 26571: PUSHI #0x00000000 4341 @ 26576: INIT 1 4342 @ 26579: PUSHI #0x00000136 4343 @ 26584: INIT 1 4344 @ 26587: PUSHI #0x00000139 4345 @ 26592: INIT 1 4346 @ 26595: PUSHI #0x0000013a 4347 @ 26600: INIT 1 4348 @ 26603: PUSHI #0x0000013b 4349 @ 26608: INIT 1 4350 @ 26611: PUSHI #0x00000000 4351 @ 26616: INIT 1 4352 @ 26619: PUSHI #0x00000000 4353 @ 26624: INIT 1 4354 @ 26627: PUSHI #0x0000013c 4355 @ 26632: INIT 1 4356 @ 26635: PUSHI #0x00000137 4357 @ 26640: INIT 1 4358 @ 26643: PUSHI #0x0000013a 4359 @ 26648: INIT 1 4360 @ 26651: PUSHI #0x00000000 4361 @ 26656: INIT 1 4362 @ 26659: PUSHI #0x0000014c 4363 @ 26664: INIT 1 4364 @ 26667: PUSHI #0x0000014c 4365 @ 26672: INIT 1 4366 @ 26675: PUSHI #0x00000148 4367 @ 26680: INIT 1 4368 @ 26683: PUSHI #0x0000015d 4369 @ 26688: INIT 1 4370 @ 26691: PUSHI #0x0000015e 4371 @ 26696: INIT 1 4372 @ 26699: PUSHI #0x0000015f 4373 @ 26704: INIT 1 4374 @ 26707: PUSHI #0x0000015f 4375 @ 26712: INIT 1 4376 @ 26715: PUSHI #0x0000015f 4377 @ 26720: INIT 1 4378 @ 26723: PUSHI #0x0000015f 4379 @ 26728: INIT 1 4380 @ 26731: PUSHI #0x0000014a 4381 @ 26736: INIT 1 4382 @ 26739: PUSHI #0x0000011a 4383 @ 26744: INIT 1 4384 @ 26747: PUSHI #0x00000160 4385 @ 26752: INIT 1 4386 @ 26755: PUSHI #0x00000166 4387 @ 26760: INIT 1 4388 @ 26763: PUSHI #0x00000000 4389 @ 26768: INIT 1 4390 @ 26771: PUSHI #0x0000014d 4391 @ 26776: INIT 1 4392 @ 26779: PUSHI #0x00000155 4393 @ 26784: INIT 1 4394 @ 26787: PUSHI #0x0000015b 4395 @ 26792: INIT 1 4396 @ 26795: PUSHI #0x00000167 4397 @ 26800: INIT 1 4398 @ 26803: PUSHI #0x00000168 4399 @ 26808: INIT 1 4400 @ 26811: PUSHI #0x00000169 4401 @ 26816: INIT 1 4402 @ 26819: PUSHI #0x0000016a 4403 @ 26824: INIT 1 4404 @ 26827: PUSHI #0x0000016b 4405 @ 26832: INIT 1 4406 @ 26835: PUSHI #0x00000000 4407 @ 26840: INIT 1 4408 @ 26843: PUSHI #0x00000156 4409 @ 26848: INIT 1 4410 @ 26851: PUSHI #0x00000157 4411 @ 26856: INIT 1 4412 @ 26859: PUSHI #0x00000159 4413 @ 26864: INIT 1 4414 @ 26867: PUSHI #0x00000000 4415 @ 26872: INIT 1 4416 @ 26875: PUSHI #0x0000015a 4417 @ 26880: INIT 1 4418 @ 26883: PUSHI #0x00000000 4419 @ 26888: INIT 1 4420 @ 26891: PUSHI #0x0000010d 4421 @ 26896: INIT 1 4422 @ 26899: PUSHI #0x0000010d 4423 @ 26904: INIT 1 4424 @ 26907: PUSHI #0x00000000 4425 @ 26912: INIT 1 4426 @ 26915: PUSHI #0x00000000 4427 @ 26920: INIT 1 4428 @ 26923: PUSHI #0x0000016e 4429 @ 26928: INIT 1 4430 @ 26931: PUSHI #0x00000161 4431 @ 26936: INIT 1 4432 @ 26939: PUSHI #0x00000173 4433 @ 26944: INIT 1 4434 @ 26947: PUSHI #0x00000174 4435 @ 26952: INIT 1 4436 @ 26955: PUSHI #0x00000175 4437 @ 26960: INIT 1 4438 @ 26963: PUSHI #0x00000176 4439 @ 26968: INIT 1 4440 @ 26971: PUSHI #0x00000000 4441 @ 26976: INIT 1 4442 @ 26979: PUSHI #0x00000177 4443 @ 26984: INIT 1 4444 @ 26987: PUSHI #0x00000178 4445 @ 26992: INIT 1 4446 @ 26995: PUSHI #0x00000179 4447 @ 27000: INIT 1 4448 @ 27003: PUSHI #0x0000017f 4449 @ 27008: INIT 1 4450 @ 27011: PUSHI #0x00000180 4451 @ 27016: INIT 1 4452 @ 27019: PUSHI #0x0000016c 4453 @ 27024: INIT 1 4454 @ 27027: PUSHI #0x00000181 4455 @ 27032: INIT 1 4456 @ 27035: PUSHI #0x00000181 4457 @ 27040: INIT 1 4458 @ 27043: PUSHI #0x0000016f 4459 @ 27048: INIT 1 4460 @ 27051: PUSHI #0x0000010d 4461 @ 27056: INIT 1 4462 @ 27059: PUSHI #0x0000010d 4463 @ 27064: INIT 1 4464 @ 27067: PUSHI #0x0000010d 4465 @ 27072: INIT 1 4466 @ 27075: PUSHI #0x0000010d 4467 @ 27080: INIT 1 4468 @ 27083: PUSHI #0x00000185 4469 @ 27088: INIT 1 4470 @ 27091: PUSHI #0x00000186 4471 @ 27096: INIT 1 4472 @ 27099: PUSHI #0x00000187 4473 @ 27104: INIT 1 4474 @ 27107: PUSHI #0x00000188 4475 @ 27112: INIT 1 4476 @ 27115: PUSHI #0x00000189 4477 @ 27120: INIT 1 4478 @ 27123: PUSHI #0x00000000 4479 @ 27128: INIT 1 4480 @ 27131: PUSHI #0x0000017a 4481 @ 27136: INIT 1 4482 @ 27139: PUSHI #0x00000168 4483 @ 27144: INIT 1 4484 @ 27147: PUSHI #0x00000169 4485 @ 27152: INIT 1 4486 @ 27155: PUSHI #0x0000016a 4487 @ 27160: INIT 1 4488 @ 27163: PUSHI #0x00000155 4489 @ 27168: INIT 1 4490 @ 27171: PUSHI #0x00000000 4491 @ 27176: INIT 1 4492 @ 27179: PUSHI #0x0000017b 4493 @ 27184: INIT 1 4494 @ 27187: PUSHI #0x0000017c 4495 @ 27192: INIT 1 4496 @ 27195: PUSHI #0x00000182 4497 @ 27200: INIT 1 4498 @ 27203: PUSHI #0x0000016b 4499 @ 27208: INIT 1 4500 @ 27211: PUSHI #0x00000155 4501 @ 27216: INIT 1 4502 @ 27219: PUSHI #0x00000000 4503 @ 27224: INIT 1 4504 @ 27227: PUSHI #0x00000161 4505 @ 27232: INIT 1 4506 @ 27235: PUSHI #0x00000162 4507 @ 27240: INIT 1 4508 @ 27243: PUSHI #0x00000163 4509 @ 27248: INIT 1 4510 @ 27251: PUSHI #0x00000177 4511 @ 27256: INIT 1 4512 @ 27259: PUSHI #0x0000018b 4513 @ 27264: INIT 1 4514 @ 27267: PUSHI #0x00000000 4515 @ 27272: INIT 1 4516 @ 27275: PUSHI #0x0000018c 4517 @ 27280: INIT 1 4518 @ 27283: PUSHI #0x00000000 4519 @ 27288: INIT 1 4520 @ 27291: PUSHI #0x00000190 4521 @ 27296: INIT 1 4522 @ 27299: PUSHI #0x0000010d 4523 @ 27304: INIT 1 4524 @ 27307: PUSHI #0x0000010d 4525 @ 27312: INIT 1 4526 @ 27315: PUSHI #0x00000191 4527 @ 27320: INIT 1 4528 @ 27323: PUSHI #0x00000000 4529 @ 27328: INIT 1 4530 @ 27331: PUSHI #0x0000019b 4531 @ 27336: INIT 1 4532 @ 27339: PUSHI #0x0000019b 4533 @ 27344: INIT 1 4534 @ 27347: PUSHI #0x00000196 4535 @ 27352: INIT 1 4536 @ 27355: PUSHI #0x000001a1 4537 @ 27360: INIT 1 4538 @ 27363: PUSHI #0x00000197 4539 @ 27368: INIT 1 4540 @ 27371: PUSHI #0x000001a2 4541 @ 27376: INIT 1 4542 @ 27379: PUSHI #0x000001a3 4543 @ 27384: INIT 1 4544 @ 27387: PUSHI #0x000001a4 4545 @ 27392: INIT 1 4546 @ 27395: PUSHI #0x00000000 4547 @ 27400: INIT 1 4548 @ 27403: PUSHI #0x0000019c 4549 @ 27408: INIT 1 4550 @ 27411: PUSHI #0x000001a2 4551 @ 27416: INIT 1 4552 @ 27419: PUSHI #0x000001a3 4553 @ 27424: INIT 1 4554 @ 27427: PUSHI #0x000001a4 4555 @ 27432: INIT 1 4556 @ 27435: PUSHI #0x000001a5 4557 @ 27440: INIT 1 4558 @ 27443: PUSHI #0x00000000 4559 @ 27448: INIT 1 4560 @ 27451: PUSHI #0x00000199 4561 @ 27456: INIT 1 4562 @ 27459: PUSHI #0x00000196 4563 @ 27464: INIT 1 4564 @ 27467: PUSHI #0x000001a8 4565 @ 27472: INIT 1 4566 @ 27475: PUSHI #0x000001a1 4567 @ 27480: INIT 1 4568 @ 27483: PUSHI #0x000001a6 4569 @ 27488: INIT 1 4570 @ 27491: PUSHI #0x000001a9 4571 @ 27496: INIT 1 4572 @ 27499: PUSHI #0x000001a9 4573 @ 27504: INIT 1 4574 @ 27507: PUSHI #0x00000198 4575 @ 27512: INIT 1 4576 @ 27515: PUSHI #0x0000019f 4577 @ 27520: INIT 1 4578 @ 27523: PUSHI #0x000001ab 4579 @ 27528: INIT 1 4580 @ 27531: PUSHI #0x000001ae 4581 @ 27536: INIT 1 4582 @ 27539: PUSHI #0x000001af 4583 @ 27544: INIT 1 4584 @ 27547: PUSHI #0x00000000 4585 @ 27552: INIT 1 4586 @ 27555: PUSHI #0x000001aa 4587 @ 27560: INIT 1 4588 @ 27563: PUSHI #0x000001b0 4589 @ 27568: INIT 1 4590 @ 27571: PUSHI #0x000001ac 4591 @ 27576: INIT 1 4592 @ 27579: PUSHI #0x000001b2 4593 @ 27584: INIT 1 4594 @ 27587: PUSHI #0x000001b4 4595 @ 27592: INIT 1 4596 @ 27595: PUSHI #0x00000000 4597 @ 27600: INIT 1 4598 @ 27603: PUSHI #0x000001b1 4599 @ 27608: INIT 1 4600 @ 27611: PUSHI #0x0000010d 4601 @ 27616: INIT 1 4602 @ 27619: PUSHI #0x0000010d 4603 @ 27624: INIT 1 4604 @ 27627: PUSHI #0x000001b9 4605 @ 27632: INIT 1 4606 @ 27635: PUSHI #0x000001ba 4607 @ 27640: INIT 1 4608 @ 27643: PUSHI #0x0000011a 4609 @ 27648: INIT 1 4610 @ 27651: PUSHI #0x000001bb 4611 @ 27656: INIT 1 4612 @ 27659: PUSHI #0x00000000 4613 @ 27664: INIT 1 4614 @ 27667: PUSHI #0x000001be 4615 @ 27672: INIT 1 4616 @ 27675: PUSHI #0x000001c3 4617 @ 27680: INIT 1 4618 @ 27683: PUSHI #0x000001bf 4619 @ 27688: INIT 1 4620 @ 27691: PUSHI #0x000001be 4621 @ 27696: INIT 1 4622 @ 27699: PUSHI #0x000001c4 4623 @ 27704: INIT 1 4624 @ 27707: PUSHI #0x000001c3 4625 @ 27712: INIT 1 4626 @ 27715: PUSHI #0x00000000 4627 @ 27720: INIT 1 4628 @ 27723: PUSHI #0x000001c1 4629 @ 27728: INIT 1 4630 @ 27731: PUSHI #0x000001c0 4631 @ 27736: INIT 1 4632 @ 27739: PUSHI #0x000001c6 4633 @ 27744: INIT 1 4634 @ 27747: PUSHI #0x000001c5 4635 @ 27752: INIT 1 4636 @ 27755: PUSHI #0x000001c9 4637 @ 27760: INIT 1 4638 @ 27763: PUSHI #0x00000000 4639 @ 27768: INIT 1 4640 @ 27771: PUSHI #0x000001c7 4641 @ 27776: INIT 1 4642 @ 27779: PUSHI #0x000001cb 4643 @ 27784: INIT 1 4644 @ 27787: PUSHI #0x000001ca 4645 @ 27792: INIT 1 4646 @ 27795: PUSHI #0x00000000 4647 @ 27800: INIT 1 4648 @ 27803: PUSHI #0x0000010d 4649 @ 27808: INIT 1 4650 @ 27811: PUSHI #0x000001d0 4651 @ 27816: INIT 1 4652 @ 27819: PUSHI #0x000001d1 4653 @ 27824: INIT 1 4654 @ 27827: PUSHI #0x0000011a 4655 @ 27832: INIT 1 4656 @ 27835: PUSHI #0x000001d2 4657 @ 27840: INIT 1 4658 @ 27843: PUSHI #0x00000000 4659 @ 27848: INIT 1 4660 @ 27851: PUSHI #0x000001d5 4661 @ 27856: INIT 1 4662 @ 27859: PUSHI #0x000001d5 4663 @ 27864: INIT 1 4664 @ 27867: PUSHI #0x000001d6 4665 @ 27872: INIT 1 4666 @ 27875: PUSHI #0x000001d7 4667 @ 27880: INIT 1 4668 @ 27883: PUSHI #0x000001d8 4669 @ 27888: INIT 1 4670 @ 27891: PUSHI #0x000001d9 4671 @ 27896: INIT 1 4672 @ 27899: PUSHI #0x000001da 4673 @ 27904: INIT 1 4674 @ 27907: PUSHI #0x000001db 4675 @ 27912: INIT 1 4676 @ 27915: PUSHI #0x000001dc 4677 @ 27920: INIT 1 4678 @ 27923: PUSHI #0x000001dd 4679 @ 27928: INIT 1 4680 @ 27931: PUSHI #0x00000000 4681 @ 27936: INIT 1 4682 @ 27939: PUSHI #0x000001df 4683 @ 27944: INIT 1 4684 @ 27947: PUSHI #0x0000010d 4685 @ 27952: INIT 1 4686 @ 27955: PUSHI #0x000001e1 4687 @ 27960: INIT 1 4688 @ 27963: PUSHI #0x00000000 4689 @ 27968: INIT 1 4690 @ 27971: PUSHI #0x000001e3 4691 @ 27976: INIT 1 4692 @ 27979: PUSHI #0x000001e5 4693 @ 27984: INIT 1 4694 @ 27987: PUSHI #0x000001e5 4695 @ 27992: INIT 1 4696 @ 27995: PUSHI #0x000000cd 4697 @ 28000: INIT 1 4698 @ 28003: PUSHI #0x000001ea 4699 @ 28008: INIT 1 4700 @ 28011: PUSHI #0x000001e8 4701 @ 28016: INIT 1 4702 @ 28019: PUSHI #0x000001f0 4703 @ 28024: INIT 1 4704 @ 28027: PUSHI #0x000001f1 4705 @ 28032: INIT 1 4706 @ 28035: PUSHI #0x000001eb 4707 @ 28040: INIT 1 4708 @ 28043: PUSHI #0x000001ee 4709 @ 28048: INIT 1 4710 @ 28051: PUSHI #0x000001ea 4711 @ 28056: INIT 1 4712 @ 28059: PUSHI #0x00000000 4713 @ 28064: INIT 1 4714 @ 28067: PUSHI #0x000001eb 4715 @ 28072: INIT 1 4716 @ 28075: PUSHI #0x000001eb 4717 @ 28080: INIT 1 4718 @ 28083: PUSHI #0x00000000 4719 @ 28088: INIT 1 4720 @ 28091: PUSHI #0x000001f2 4721 @ 28096: INIT 1 4722 @ 28099: PUSHI #0x000001f3 4723 @ 28104: INIT 1 4724 @ 28107: PUSHI #0x000001f5 4725 @ 28112: INIT 1 4726 @ 28115: PUSHI #0x00000000 4727 @ 28120: INIT 1 4728 @ 28123: PUSHI #0x00000000 4729 @ 28128: INIT 1 4730 @ 28131: PUSHI #0x000001f8 4731 @ 28136: INIT 1 4732 @ 28139: PUSHI #0x000001fa 4733 @ 28144: INIT 1 4734 @ 28147: PUSHI #0x000001fe 4735 @ 28152: INIT 1 4736 @ 28155: PUSHI #0x000001f3 4737 @ 28160: INIT 1 4738 @ 28163: PUSHI #0x000001fc 4739 @ 28168: INIT 1 4740 @ 28171: PUSHI #0x00000000 4741 @ 28176: INIT 1 4742 @ 28179: PUSHI #0x000001fa 4743 @ 28184: INIT 1 4744 @ 28187: PUSHI #0x000001fa 4745 @ 28192: INIT 1 4746 @ 28195: PUSHI #0x000001f8 4747 @ 28200: INIT 1 4748 @ 28203: PUSHI #0x00000200 4749 @ 28208: INIT 1 4750 @ 28211: PUSHI #0x00000201 4751 @ 28216: INIT 1 4752 @ 28219: PUSHI #0x00000202 4753 @ 28224: INIT 1 4754 @ 28227: PUSHI #0x00000203 4755 @ 28232: INIT 1 4756 @ 28235: PUSHI #0x00000000 4757 @ 28240: INIT 1 4758 @ 28243: PUSHI #0x00000205 4759 @ 28248: INIT 1 4760 @ 28251: PUSHI #0x00000206 4761 @ 28256: INIT 1 4762 @ 28259: PUSHI #0x00000207 4763 @ 28264: INIT 1 4764 @ 28267: PUSHI #0x00000208 4765 @ 28272: INIT 1 4766 @ 28275: PUSHI #0x00000000 4767 @ 28280: INIT 1 4768 @ 28283: PUSHI #0x0000020a 4769 @ 28288: INIT 1 4770 @ 28291: PUSHI #0x0000020b 4771 @ 28296: INIT 1 4772 @ 28299: PUSHI #0x0000020c 4773 @ 28304: INIT 1 4774 @ 28307: PUSHI #0x0000020d 4775 @ 28312: INIT 1 4776 @ 28315: PUSHI #0x0000020a 4777 @ 28320: INIT 1 4778 @ 28323: PUSHI #0x00000000 4779 @ 28328: INIT 1 4780 @ 28331: PUSHI #0x00000210 4781 @ 28336: INIT 1 4782 @ 28339: PUSHI #0x00000211 4783 @ 28344: INIT 1 4784 @ 28347: PUSHI #0x00000213 4785 @ 28352: INIT 1 4786 @ 28355: PUSHI #0x00000218 4787 @ 28360: INIT 1 4788 @ 28363: PUSHI #0x00000214 4789 @ 28368: INIT 1 4790 @ 28371: PUSHI #0x00000216 4791 @ 28376: INIT 1 4792 @ 28379: PUSHI #0x00000000 4793 @ 28384: INIT 1 4794 @ 28387: PUSHI #0x00000214 4795 @ 28392: INIT 1 4796 @ 28395: PUSHI #0x00000000 4797 @ 28400: INIT 1 4798 @ 28403: PUSHI #0x00000219 4799 @ 28408: INIT 1 4800 @ 28411: PUSHI #0x0000021a 4801 @ 28416: INIT 1 4802 @ 28419: PUSHI #0x0000021b 4803 @ 28424: INIT 1 4804 @ 28427: PUSHI #0x0000021d 4805 @ 28432: INIT 1 4806 @ 28435: PUSHI #0x0000021e 4807 @ 28440: INIT 1 4808 @ 28443: PUSHI #0x0000021e 4809 @ 28448: INIT 1 4810 @ 28451: PUSHI #0x00000000 4811 @ 28456: INIT 1 4812 @ 28459: PUSHI #0x00000220 4813 @ 28464: INIT 1 4814 @ 28467: PUSHI #0x00000222 4815 @ 28472: INIT 1 4816 @ 28475: PUSHI #0x00000000 4817 @ 28480: INIT 1 4818 @ 28483: PUSHI #0x00000223 4819 @ 28488: INIT 1 4820 @ 28491: PUSHI #0x00000224 4821 @ 28496: INIT 1 4822 @ 28499: PUSHI #0x00000225 4823 @ 28504: INIT 1 4824 @ 28507: PUSHI #0x00000215 4825 @ 28512: INIT 1 4826 @ 28515: PUSHI #0x00000227 4827 @ 28520: INIT 1 4828 @ 28523: PUSHI #0x00000229 4829 @ 28528: INIT 1 4830 @ 28531: PUSHI #0x0000022e 4831 @ 28536: INIT 1 4832 @ 28539: PUSHI #0x0000022a 4833 @ 28544: INIT 1 4834 @ 28547: PUSHI #0x0000022c 4835 @ 28552: INIT 1 4836 @ 28555: PUSHI #0x00000000 4837 @ 28560: INIT 1 4838 @ 28563: PUSHI #0x0000022a 4839 @ 28568: INIT 1 4840 @ 28571: PUSHI #0x00000000 4841 @ 28576: INIT 1 4842 @ 28579: PUSHI #0x0000022f 4843 @ 28584: INIT 1 4844 @ 28587: PUSHI #0x00000230 4845 @ 28592: INIT 1 4846 @ 28595: PUSHI #0x0000022d 4847 @ 28600: INIT 1 4848 @ 28603: PUSHI #0x00000000 4849 @ 28608: INIT 1 4850 @ 28611: PUSHI #0x00000233 4851 @ 28616: INIT 1 4852 @ 28619: PUSHI #0x000000cd 4853 @ 28624: INIT 1 4854 @ 28627: PUSHI #0x00000000 4855 @ 28632: INIT 1 4856 @ 28635: PUSHI #0x00000236 4857 @ 28640: INIT 1 4858 @ 28643: PUSHI #0x00000234 4859 @ 28648: INIT 1 4860 @ 28651: PUSHI #0x00000238 4861 @ 28656: INIT 1 4862 @ 28659: PUSHI #0x00000235 4863 @ 28664: INIT 1 4864 @ 28667: PUSHI #0x0000023a 4865 @ 28672: INIT 1 4866 @ 28675: PUSHI #0x00000237 4867 @ 28680: INIT 1 4868 @ 28683: PUSHI #0x0000023c 4869 @ 28688: INIT 1 4870 @ 28691: PUSHI #0x00000239 4871 @ 28696: INIT 1 4872 @ 28699: PUSHI #0x0000023e 4873 @ 28704: INIT 1 4874 @ 28707: PUSHI #0x0000023b 4875 @ 28712: INIT 1 4876 @ 28715: PUSHI #0x00000240 4877 @ 28720: INIT 1 4878 @ 28723: PUSHI #0x0000023f 4879 @ 28728: INIT 1 4880 @ 28731: PUSHI #0x00000000 4881 @ 28736: INIT 1 4882 @ 28739: PUSHI #0x00000243 4883 @ 28744: INIT 1 4884 @ 28747: PUSHI #0x00000244 4885 @ 28752: INIT 1 4886 @ 28755: PUSHI #0x00000250 4887 @ 28760: INIT 1 4888 @ 28763: PUSHI #0x00000251 4889 @ 28768: INIT 1 4890 @ 28771: PUSHI #0x00000248 4891 @ 28776: INIT 1 4892 @ 28779: PUSHI #0x000000cd 4893 @ 28784: INIT 1 4894 @ 28787: PUSHI #0x00000249 4895 @ 28792: INIT 1 4896 @ 28795: PUSHI #0x0000024c 4897 @ 28800: INIT 1 4898 @ 28803: PUSHI #0x0000024c 4899 @ 28808: INIT 1 4900 @ 28811: PUSHI #0x0000024c 4901 @ 28816: INIT 1 4902 @ 28819: PUSHI #0x0000024e 4903 @ 28824: INIT 1 4904 @ 28827: PUSHI #0x000000cd 4905 @ 28832: INIT 1 4906 @ 28835: PUSHI #0x00000252 4907 @ 28840: INIT 1 4908 @ 28843: PUSHI #0x00000252 4909 @ 28848: INIT 1 4910 @ 28851: PUSHI #0x00000253 4911 @ 28856: INIT 1 4912 @ 28859: PUSHI #0x00000254 4913 @ 28864: INIT 1 4914 @ 28867: PUSHI #0x00000255 4915 @ 28872: INIT 1 4916 @ 28875: PUSHI #0x00000245 4917 @ 28880: INIT 1 4918 @ 28883: PUSHI #0x00000258 4919 @ 28888: INIT 1 4920 @ 28891: PUSHI #0x00000256 4921 @ 28896: INIT 1 4922 @ 28899: PUSHI #0x00000259 4923 @ 28904: INIT 1 4924 @ 28907: PUSHI #0x00000000 4925 @ 28912: INIT 1 4926 @ 28915: PUSHI #0x000000cd 4927 @ 28920: INIT 1 4928 @ 28923: PUSHI #0x000000cd 4929 @ 28928: INIT 1 4930 @ 28931: PUSHI #0x000000cd 4931 @ 28936: INIT 1 4932 @ 28939: PUSHI #0x0000025e 4933 @ 28944: INIT 1 4934 @ 28947: PUSHI #0x0000025e 4935 @ 28952: INIT 1 4936 @ 28955: PUSHI #0x0000025f 4937 @ 28960: INIT 1 4938 @ 28963: PUSHI #0x00000260 4939 @ 28968: INIT 1 4940 @ 28971: PUSHI #0x00000261 4941 @ 28976: INIT 1 4942 @ 28979: PUSHI #0x0000025d 4943 @ 28984: INIT 1 4944 @ 28987: PUSHI #0x00000262 4945 @ 28992: INIT 1 4946 @ 28995: PUSHI #0x00000264 4947 @ 29000: INIT 1 4948 @ 29003: PUSHI #0x00000000 4949 @ 29008: INIT 1 4950 @ 29011: PUSHI #0x000000c1 4951 @ 29016: INIT 1 4952 @ 29019: PUSHI #0x000000c1 4953 @ 29024: INIT 1 4954 @ 29027: PUSHI #0x000000c1 4955 @ 29032: INIT 1 4956 @ 29035: PUSHI #0x000000c1 4957 @ 29040: INIT 1 4958 @ 29043: PUSHI #0x000000c1 4959 @ 29048: INIT 1 4960 @ 29051: PUSHI #0x000000c1 4961 @ 29056: INIT 1 4962 @ 29059: PUSHI #0x000000c1 4963 @ 29064: INIT 1 4964 @ 29067: PUSHI #0x000000c1 4965 @ 29072: INIT 1 4966 @ 29075: PUSHI #0x00000000 4967 @ 29080: INIT 1 4968 @ 29083: PUSHI #0x0000026f 4969 @ 29088: INIT 1 4970 @ 29091: PUSHI #0x0000026f 4971 @ 29096: INIT 1 4972 @ 29099: PUSHI #0x000000c0 4973 @ 29104: INIT 1 4974 @ 29107: PUSHI #0x00000272 4975 @ 29112: INIT 1 4976 @ 29115: PUSHI #0x00000272 4977 @ 29120: INIT 1 4978 @ 29123: PUSHI #0x00000000 4979 @ 29128: INIT 1 4980 @ 29131: PUSHI #0x00000272 4981 @ 29136: INIT 1 4982 @ 29139: PUSHI #0x00000272 4983 @ 29144: INIT 1 4984 @ 29147: PUSHI #0x00000277 4985 @ 29152: INIT 1 4986 @ 29155: PUSHI #0x00000279 4987 @ 29160: INIT 1 4988 @ 29163: PUSHI #0x0000011a 4989 @ 29168: INIT 1 4990 @ 29171: PUSHI #0x0000011a 4991 @ 29176: INIT 1 4992 @ 29179: PUSHI #0x0000027a 4993 @ 29184: INIT 1 4994 @ 29187: PUSHI #0x0000011a 4995 @ 29192: INIT 1 4996 @ 29195: PUSHI #0x0000011a 4997 @ 29200: INIT 1 4998 @ 29203: PUSHI #0x0000027d 4999 @ 29208: INIT 1 5000 @ 29211: PUSHI #0x0000027e 5001 @ 29216: INIT 1 5002 @ 29219: PUSHI #0x0000027f 5003 @ 29224: INIT 1 5004 @ 29227: PUSHI #0x00000000 5005 @ 29232: INIT 1 5006 @ 29235: PUSHI #0x0000028a 5007 @ 29240: INIT 1 5008 @ 29243: PUSHI #0x000002a5 5009 @ 29248: INIT 1 5010 @ 29251: PUSHI #0x000002ac 5011 @ 29256: INIT 1 5012 @ 29259: PUSHI #0x0000029a 5013 @ 29264: INIT 1 5014 @ 29267: PUSHI #0x0000028f 5015 @ 29272: INIT 1 5016 @ 29275: PUSHI #0x000000cd 5017 @ 29280: INIT 1 5018 @ 29283: PUSHI #0x000000cd 5019 @ 29288: INIT 1 5020 @ 29291: PUSHI #0x000000cd 5021 @ 29296: INIT 1 5022 @ 29299: PUSHI #0x000000cd 5023 @ 29304: INIT 1 5024 @ 29307: PUSHI #0x0000028a 5025 @ 29312: INIT 1 5026 @ 29315: PUSHI #0x00000293 5027 @ 29320: INIT 1 5028 @ 29323: PUSHI #0x0000029c 5029 @ 29328: INIT 1 5030 @ 29331: PUSHI #0x000002ad 5031 @ 29336: INIT 1 5032 @ 29339: PUSHI #0x0000029a 5033 @ 29344: INIT 1 5034 @ 29347: PUSHI #0x00000000 5035 @ 29352: INIT 1 5036 @ 29355: PUSHI #0x00000296 5037 @ 29360: INIT 1 5038 @ 29363: PUSHI #0x000002ae 5039 @ 29368: INIT 1 5040 @ 29371: PUSHI #0x0000029a 5041 @ 29376: INIT 1 5042 @ 29379: PUSHI #0x00000296 5043 @ 29384: INIT 1 5044 @ 29387: PUSHI #0x0000029c 5045 @ 29392: INIT 1 5046 @ 29395: PUSHI #0x000002ad 5047 @ 29400: INIT 1 5048 @ 29403: PUSHI #0x00000000 5049 @ 29408: INIT 1 5050 @ 29411: PUSHI #0x0000029e 5051 @ 29416: INIT 1 5052 @ 29419: PUSHI #0x000002a2 5053 @ 29424: INIT 1 5054 @ 29427: PUSHI #0x000002b1 5055 @ 29432: INIT 1 5056 @ 29435: PUSHI #0x0000029a 5057 @ 29440: INIT 1 5058 @ 29443: PUSHI #0x000000cd 5059 @ 29448: INIT 1 5060 @ 29451: PUSHI #0x00000000 5061 @ 29456: INIT 1 5062 @ 29459: PUSHI #0x000000cd 5063 @ 29464: INIT 1 5064 @ 29467: PUSHI #0x00000000 5065 @ 29472: INIT 1 5066 @ 29475: PUSHI #0x000002a2 5067 @ 29480: INIT 1 5068 @ 29483: PUSHI #0x000002b1 5069 @ 29488: INIT 1 5070 @ 29491: PUSHI #0x000000cd 5071 @ 29496: INIT 1 5072 @ 29499: PUSHI #0x00000000 5073 @ 29504: INIT 1 5074 @ 29507: PUSHI #0x0000029a 5075 @ 29512: INIT 1 5076 @ 29515: PUSHI #0x000000cd 5077 @ 29520: INIT 1 5078 @ 29523: PUSHI #0x00000000 5079 @ 29528: INIT 1 5080 @ 29531: PUSHI #0x000002a8 5081 @ 29536: INIT 1 5082 @ 29539: PUSHI #0x000002b4 5083 @ 29544: INIT 1 5084 @ 29547: PUSHI #0x000002a8 5085 @ 29552: INIT 1 5086 @ 29555: PUSHI #0x00000293 5087 @ 29560: INIT 1 5088 @ 29563: PUSHI #0x0000029c 5089 @ 29568: INIT 1 5090 @ 29571: PUSHI #0x000002ad 5091 @ 29576: INIT 1 5092 @ 29579: PUSHI #0x00000000 5093 @ 29584: INIT 1 5094 @ 29587: PUSHI #0x0000028a 5095 @ 29592: INIT 1 5096 @ 29595: PUSHI #0x000002af 5097 @ 29600: INIT 1 5098 @ 29603: PUSHI #0x00000296 5099 @ 29608: INIT 1 5100 @ 29611: PUSHI #0x000002b0 5101 @ 29616: INIT 1 5102 @ 29619: PUSHI #0x000000cd 5103 @ 29624: INIT 1 5104 @ 29627: PUSHI #0x000002b2 5105 @ 29632: INIT 1 5106 @ 29635: PUSHI #0x000002b3 5107 @ 29640: INIT 1 5108 @ 29643: PUSHI #0x0000029a 5109 @ 29648: INIT 1 5110 @ 29651: PUSHI #0x000002a8 5111 @ 29656: INIT 1 5112 @ 29659: PUSHI #0x000002b9 5113 @ 29664: INIT 1 5114 @ 29667: PUSHI #0x000002b9 5115 @ 29672: INIT 1 5116 @ 29675: PUSHI #0x000002b9 5117 @ 29680: INIT 1 5118 @ 29683: PUSHI #0x000002b9 5119 @ 29688: INIT 1 5120 @ 29691: PUSHI #0x000002ba 5121 @ 29696: INIT 1 5122 @ 29699: PUSHI #0x000002bb 5123 @ 29704: INIT 1 5124 @ 29707: PUSHI #0x000002bc 5125 @ 29712: INIT 1 5126 @ 29715: PUSHI #0x00000000 5127 @ 29720: INIT 1 5128 @ 29723: PUSHI #0x000002bf 5129 @ 29728: INIT 1 5130 @ 29731: PUSHI #0x000002bf 5131 @ 29736: INIT 1 5132 @ 29739: PUSHI #0x000002c0 5133 @ 29744: INIT 1 5134 @ 29747: PUSHI #0x000002c2 5135 @ 29752: INIT 1 5136 @ 29755: PUSHI #0x000002c3 5137 @ 29760: INIT 1 5138 @ 29763: PUSHI #0x000002c4 5139 @ 29768: INIT 1 5140 @ 29771: PUSHI #0x000002c4 5141 @ 29776: INIT 1 5142 @ 29779: PUSHI #0x000002bc 5143 @ 29784: INIT 1 5144 @ 29787: PUSHI #0x000002c7 5145 @ 29792: INIT 1 5146 @ 29795: PUSHI #0x000002c7 5147 @ 29800: INIT 1 5148 @ 29803: PUSHI #0x000002c8 5149 @ 29808: INIT 1 5150 @ 29811: PUSHI #0x000002c9 5151 @ 29816: INIT 1 5152 @ 29819: PUSHI #0x000002cf 5153 @ 29824: INIT 1 5154 @ 29827: PUSHI #0x000002cf 5155 @ 29832: INIT 1 5156 @ 29835: PUSHI #0x000002cf 5157 @ 29840: INIT 1 5158 @ 29843: PUSHI #0x000002cf 5159 @ 29848: INIT 1 5160 @ 29851: PUSHI #0x000002cf 5161 @ 29856: INIT 1 5162 @ 29859: PUSHI #0x000002cf 5163 @ 29864: INIT 1 5164 @ 29867: PUSHI #0x00000000 5165 @ 29872: INIT 1 5166 @ 29875: PUSHI #0x00000000 5167 @ 29880: INIT 1001 495 %constshortinteger max kdict = 618 5168 @ 29883: LINE 495 "regression-compile-tmp/pass1.imp" 496 %constshortintegerarray kdict(32:max kdict) = %c 497 0, 511, 131, 531, 131, 551, 559, 131, 498 567, 575, 583, 603, 623, 631, 663, 671, 499 129, 129, 129, 129, 129, 129, 129, 129, 500 129, 129, 691, 698, 707, 751, 795, 131, 501 131, 824, 900, 960, 1076, 1120, 1280, 128, 502 128, 1392, 128, 128, 1460, 1600, 1636, 1704, 503 1792, 128, 1872, 2088, 2284, 2316, 128, 2356, 504 128, 128, 128, 2375, 2383, 2415, 2423, 2443, 505 131, 131, 131, 131, 131, 131, 131, 131, 506 131, 131, 131, 131, 131, 131, 131, 131, 507 131, 131, 131, 131, 131, 131, 131, 131, 508 131, 131, 131, 131, 2451, 131, 2459, -32351, 509 16428, 25, 16428, 29, -32349, 16433, 1, 16434, 510 1, -16127, 0, 16427, 21, 16407, 0, 16409, 511 0, -32323, -10840, 40, 16471, 0, -32341, -10580, 512 32, 16473, 117, 16384, 19, -31955, -32322, -10580, 513 36, -9290, 0, 16473, 113, 16432, 13, -32337, 514 16427, 46, 16427, 17, 16405, 0, 16404, 0, 515 -31556, -31939, -32322, -9551, 2, 16433, 1, 16433, 516 5, 16426, 5, -31606, -32323, -9807, 0, -32374, 517 -9678, 0, 16436, 0, 16435, 0, -31939, -32322, 518 16433, 4, 16426, 9, 16433, 3, -30772, -31666, 519 10578, 11457, -32344, 16413, 2, 16411, 2, 68, 520 -32374, 16440, 0, 16440, 0, 8393, 83, 16408, 521 0, -31291, 10841, 69, -32311, 16412, 18, 10830, 522 9157, 10565, 16412, 18, 9415, 78, 16458, 0, 523 -32049, 8665, 8908, 16455, 0, -30131, 78, -31277, 524 84, -32055, 10194, 76, 16469, 0, 10958, 69, 525 16447, 32, 84, -32319, 16418, 2, 10830, 16418, 526 2, 8909, 10830, 16406, 0, -31927, 10073, 9921, 527 8649, 16419, 5, 9153, 10190, 8915, 16469, 1, 528 -27956, -31282, 88, -31927, 8916, 10066, 9793, 16419, 529 3, 84, 16447, 4, 68, -32305, 16459, 2, 530 70, -30650, -31284, 80, -31931, 10194, 10567, 9921, 531 16460, 1, 9938, 16461, 0, 10697, 84, 16467, 532 3, 9801, 69, 16460, 0, 8915, 16452, 0, 533 -29631, -30903, -31282, -31793, 10069, 10819, 10185, 78, 534 16416, 9, 82, 16445, 0, 16416, 9, 9422, 535 9299, -32315, 16453, 0, 10700, 69, 16454, 0, 536 10700, 69, 16464, 1210, -30778, 78, -31549, 8916, 537 8903, 82, -32344, 16412, 17, 16472, 17, 10956, 538 8900, 16470, 0, 16446, 44, -28735, -29239, 10063, 539 71, -30263, -31668, -32302, 16412, 20, 8389, 76, 540 16412, 36, 10063, 71, -32311, 16412, 21, 10830, 541 9157, 10565, 16412, 21, 10830, 9157, 10565, 16412, 542 20, 10835, 16467, 1, 8898, 76, 16425, 6, 543 -31935, 10063, 10825, 10575, 16465, 109, 80, 16416, 544 10, -32191, 10831, 16442, 0, 8909, -32314, 16414, 545 1, -31794, 10069, 10819, 10185, 78, 16416, 10, 546 16416, 10, -30770, -31408, -32174, 10071, 16418, 1, 547 -32374, 16441, 2, 16441, 2, 9428, 10063, 16402, 548 0, -32315, 16448, 0, 8918, 10830, 16448, 0, 549 -30523, 82, -31419, -31927, 9167, 8402, 77, 16457, 550 0, 77, 16419, 6, 9412, 8387, 8916, 16415, 551 123, 9938, 16419, 7, -31931, 10959, 9428, 8910, 552 16415, 104, -28351, -30397, -31024, -32045, 10964, 10066, 553 16464, 1319, 9813, 7892, -32323, 16462, 1384, 16463, 554 1241, 8389, 84, 16456, 0, 10575, 68, -32314, 555 16421, 64, 10575, 8397, 84, -32301, 16422, 9, 556 8912, 67, 16422, 12, 76, -32301, 16412, 33, 557 -31924, 10190, 9938, 9793, 16468, 1, 10063, 71, 558 16468, 4, -27704, -28983, -29488, -31276, -31913, 10713, 559 8916, 77, 16419, 4, 10825, 9283, 16417, 12, 560 -31423, -31921, 9426, 9166, 40, 16420, 48, 80, 561 16466, 115, 10834, 16451, 0, 8645, 16423, 0, 562 10055, 9793, -32315, 16449, 0, 8918, 10830, 16449, 563 0, 10575, 84, -32311, 16412, 19, 10830, 9157, 564 10565, 16412, 19, -32056, 10962, 69, 16464, 1354, 565 10053, 16450, 0, 78, -32052, 9428, 76, 16444, 566 182, 10693, 83, 16446, 46, 9416, 8908, 16443, 567 180, 16407, 0, -31939, -32292, -10454, 51, 16426, 568 13, 16433, 1, 16409, 0, -32290, -10454, 51, 569 16426, 13, 16410, 0, 16431, 14, -32323, 16430, 570 51, 16433, 1 5169 @ 29919: LINE 496 "regression-compile-tmp/pass1.imp" 5170 @ 29955: PUSHI #0x00000020 5171 @ 29960: PUSHI #0x0000026a 5172 @ 29965: BOUNDS 5173 @ 29966: DEF KDICT p1=V_00e7 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 5174 @ 29983: PUSHI #0x00000000 5175 @ 29988: INIT 1 5176 @ 29991: PUSHI #0x000001ff 5177 @ 29996: INIT 1 5178 @ 29999: PUSHI #0x00000083 5179 @ 30004: INIT 1 5180 @ 30007: PUSHI #0x00000213 5181 @ 30012: INIT 1 5182 @ 30015: PUSHI #0x00000083 5183 @ 30020: INIT 1 5184 @ 30023: PUSHI #0x00000227 5185 @ 30028: INIT 1 5186 @ 30031: PUSHI #0x0000022f 5187 @ 30036: INIT 1 5188 @ 30039: PUSHI #0x00000083 5189 @ 30044: INIT 1 5190 @ 30047: PUSHI #0x00000237 5191 @ 30052: INIT 1 5192 @ 30055: PUSHI #0x0000023f 5193 @ 30060: INIT 1 5194 @ 30063: PUSHI #0x00000247 5195 @ 30068: INIT 1 5196 @ 30071: PUSHI #0x0000025b 5197 @ 30076: INIT 1 5198 @ 30079: PUSHI #0x0000026f 5199 @ 30084: INIT 1 5200 @ 30087: PUSHI #0x00000277 5201 @ 30092: INIT 1 5202 @ 30095: PUSHI #0x00000297 5203 @ 30100: INIT 1 5204 @ 30103: PUSHI #0x0000029f 5205 @ 30108: INIT 1 5206 @ 30111: PUSHI #0x00000081 5207 @ 30116: INIT 1 5208 @ 30119: PUSHI #0x00000081 5209 @ 30124: INIT 1 5210 @ 30127: PUSHI #0x00000081 5211 @ 30132: INIT 1 5212 @ 30135: PUSHI #0x00000081 5213 @ 30140: INIT 1 5214 @ 30143: PUSHI #0x00000081 5215 @ 30148: INIT 1 5216 @ 30151: PUSHI #0x00000081 5217 @ 30156: INIT 1 5218 @ 30159: PUSHI #0x00000081 5219 @ 30164: INIT 1 5220 @ 30167: PUSHI #0x00000081 5221 @ 30172: INIT 1 5222 @ 30175: PUSHI #0x00000081 5223 @ 30180: INIT 1 5224 @ 30183: PUSHI #0x00000081 5225 @ 30188: INIT 1 5226 @ 30191: PUSHI #0x000002b3 5227 @ 30196: INIT 1 5228 @ 30199: PUSHI #0x000002ba 5229 @ 30204: INIT 1 5230 @ 30207: PUSHI #0x000002c3 5231 @ 30212: INIT 1 5232 @ 30215: PUSHI #0x000002ef 5233 @ 30220: INIT 1 5234 @ 30223: PUSHI #0x0000031b 5235 @ 30228: INIT 1 5236 @ 30231: PUSHI #0x00000083 5237 @ 30236: INIT 1 5238 @ 30239: PUSHI #0x00000083 5239 @ 30244: INIT 1 5240 @ 30247: PUSHI #0x00000338 5241 @ 30252: INIT 1 5242 @ 30255: PUSHI #0x00000384 5243 @ 30260: INIT 1 5244 @ 30263: PUSHI #0x000003c0 5245 @ 30268: INIT 1 5246 @ 30271: PUSHI #0x00000434 5247 @ 30276: INIT 1 5248 @ 30279: PUSHI #0x00000460 5249 @ 30284: INIT 1 5250 @ 30287: PUSHI #0x00000500 5251 @ 30292: INIT 1 5252 @ 30295: PUSHI #0x00000080 5253 @ 30300: INIT 1 5254 @ 30303: PUSHI #0x00000080 5255 @ 30308: INIT 1 5256 @ 30311: PUSHI #0x00000570 5257 @ 30316: INIT 1 5258 @ 30319: PUSHI #0x00000080 5259 @ 30324: INIT 1 5260 @ 30327: PUSHI #0x00000080 5261 @ 30332: INIT 1 5262 @ 30335: PUSHI #0x000005b4 5263 @ 30340: INIT 1 5264 @ 30343: PUSHI #0x00000640 5265 @ 30348: INIT 1 5266 @ 30351: PUSHI #0x00000664 5267 @ 30356: INIT 1 5268 @ 30359: PUSHI #0x000006a8 5269 @ 30364: INIT 1 5270 @ 30367: PUSHI #0x00000700 5271 @ 30372: INIT 1 5272 @ 30375: PUSHI #0x00000080 5273 @ 30380: INIT 1 5274 @ 30383: PUSHI #0x00000750 5275 @ 30388: INIT 1 5276 @ 30391: PUSHI #0x00000828 5277 @ 30396: INIT 1 5278 @ 30399: PUSHI #0x000008ec 5279 @ 30404: INIT 1 5280 @ 30407: PUSHI #0x0000090c 5281 @ 30412: INIT 1 5282 @ 30415: PUSHI #0x00000080 5283 @ 30420: INIT 1 5284 @ 30423: PUSHI #0x00000934 5285 @ 30428: INIT 1 5286 @ 30431: PUSHI #0x00000080 5287 @ 30436: INIT 1 5288 @ 30439: PUSHI #0x00000080 5289 @ 30444: INIT 1 5290 @ 30447: PUSHI #0x00000080 5291 @ 30452: INIT 1 5292 @ 30455: PUSHI #0x00000947 5293 @ 30460: INIT 1 5294 @ 30463: PUSHI #0x0000094f 5295 @ 30468: INIT 1 5296 @ 30471: PUSHI #0x0000096f 5297 @ 30476: INIT 1 5298 @ 30479: PUSHI #0x00000977 5299 @ 30484: INIT 1 5300 @ 30487: PUSHI #0x0000098b 5301 @ 30492: INIT 1 5302 @ 30495: PUSHI #0x00000083 5303 @ 30500: INIT 1 5304 @ 30503: PUSHI #0x00000083 5305 @ 30508: INIT 1 5306 @ 30511: PUSHI #0x00000083 5307 @ 30516: INIT 1 5308 @ 30519: PUSHI #0x00000083 5309 @ 30524: INIT 1 5310 @ 30527: PUSHI #0x00000083 5311 @ 30532: INIT 1 5312 @ 30535: PUSHI #0x00000083 5313 @ 30540: INIT 1 5314 @ 30543: PUSHI #0x00000083 5315 @ 30548: INIT 1 5316 @ 30551: PUSHI #0x00000083 5317 @ 30556: INIT 1 5318 @ 30559: PUSHI #0x00000083 5319 @ 30564: INIT 1 5320 @ 30567: PUSHI #0x00000083 5321 @ 30572: INIT 1 5322 @ 30575: PUSHI #0x00000083 5323 @ 30580: INIT 1 5324 @ 30583: PUSHI #0x00000083 5325 @ 30588: INIT 1 5326 @ 30591: PUSHI #0x00000083 5327 @ 30596: INIT 1 5328 @ 30599: PUSHI #0x00000083 5329 @ 30604: INIT 1 5330 @ 30607: PUSHI #0x00000083 5331 @ 30612: INIT 1 5332 @ 30615: PUSHI #0x00000083 5333 @ 30620: INIT 1 5334 @ 30623: PUSHI #0x00000083 5335 @ 30628: INIT 1 5336 @ 30631: PUSHI #0x00000083 5337 @ 30636: INIT 1 5338 @ 30639: PUSHI #0x00000083 5339 @ 30644: INIT 1 5340 @ 30647: PUSHI #0x00000083 5341 @ 30652: INIT 1 5342 @ 30655: PUSHI #0x00000083 5343 @ 30660: INIT 1 5344 @ 30663: PUSHI #0x00000083 5345 @ 30668: INIT 1 5346 @ 30671: PUSHI #0x00000083 5347 @ 30676: INIT 1 5348 @ 30679: PUSHI #0x00000083 5349 @ 30684: INIT 1 5350 @ 30687: PUSHI #0x00000083 5351 @ 30692: INIT 1 5352 @ 30695: PUSHI #0x00000083 5353 @ 30700: INIT 1 5354 @ 30703: PUSHI #0x00000083 5355 @ 30708: INIT 1 5356 @ 30711: PUSHI #0x00000083 5357 @ 30716: INIT 1 5358 @ 30719: PUSHI #0x00000993 5359 @ 30724: INIT 1 5360 @ 30727: PUSHI #0x00000083 5361 @ 30732: INIT 1 5362 @ 30735: PUSHI #0x0000099b 5363 @ 30740: INIT 1 5364 @ 30743: PUSHI #0xffff81a1 5365 @ 30748: INIT 1 5366 @ 30751: PUSHI #0x0000402c 5367 @ 30756: INIT 1 5368 @ 30759: PUSHI #0x00000019 5369 @ 30764: INIT 1 5370 @ 30767: PUSHI #0x0000402c 5371 @ 30772: INIT 1 5372 @ 30775: PUSHI #0x0000001d 5373 @ 30780: INIT 1 5374 @ 30783: PUSHI #0xffff81a3 5375 @ 30788: INIT 1 5376 @ 30791: PUSHI #0x00004031 5377 @ 30796: INIT 1 5378 @ 30799: PUSHI #0x00000001 5379 @ 30804: INIT 1 5380 @ 30807: PUSHI #0x00004032 5381 @ 30812: INIT 1 5382 @ 30815: PUSHI #0x00000001 5383 @ 30820: INIT 1 5384 @ 30823: PUSHI #0xffffc101 5385 @ 30828: INIT 1 5386 @ 30831: PUSHI #0x00000000 5387 @ 30836: INIT 1 5388 @ 30839: PUSHI #0x0000402b 5389 @ 30844: INIT 1 5390 @ 30847: PUSHI #0x00000015 5391 @ 30852: INIT 1 5392 @ 30855: PUSHI #0x00004017 5393 @ 30860: INIT 1 5394 @ 30863: PUSHI #0x00000000 5395 @ 30868: INIT 1 5396 @ 30871: PUSHI #0x00004019 5397 @ 30876: INIT 1 5398 @ 30879: PUSHI #0x00000000 5399 @ 30884: INIT 1 5400 @ 30887: PUSHI #0xffff81bd 5401 @ 30892: INIT 1 5402 @ 30895: PUSHI #0xffffd5a8 5403 @ 30900: INIT 1 5404 @ 30903: PUSHI #0x00000028 5405 @ 30908: INIT 1 5406 @ 30911: PUSHI #0x00004057 5407 @ 30916: INIT 1 5408 @ 30919: PUSHI #0x00000000 5409 @ 30924: INIT 1 5410 @ 30927: PUSHI #0xffff81ab 5411 @ 30932: INIT 1 5412 @ 30935: PUSHI #0xffffd6ac 5413 @ 30940: INIT 1 5414 @ 30943: PUSHI #0x00000020 5415 @ 30948: INIT 1 5416 @ 30951: PUSHI #0x00004059 5417 @ 30956: INIT 1 5418 @ 30959: PUSHI #0x00000075 5419 @ 30964: INIT 1 5420 @ 30967: PUSHI #0x00004000 5421 @ 30972: INIT 1 5422 @ 30975: PUSHI #0x00000013 5423 @ 30980: INIT 1 5424 @ 30983: PUSHI #0xffff832d 5425 @ 30988: INIT 1 5426 @ 30991: PUSHI #0xffff81be 5427 @ 30996: INIT 1 5428 @ 30999: PUSHI #0xffffd6ac 5429 @ 31004: INIT 1 5430 @ 31007: PUSHI #0x00000024 5431 @ 31012: INIT 1 5432 @ 31015: PUSHI #0xffffdbb6 5433 @ 31020: INIT 1 5434 @ 31023: PUSHI #0x00000000 5435 @ 31028: INIT 1 5436 @ 31031: PUSHI #0x00004059 5437 @ 31036: INIT 1 5438 @ 31039: PUSHI #0x00000071 5439 @ 31044: INIT 1 5440 @ 31047: PUSHI #0x00004030 5441 @ 31052: INIT 1 5442 @ 31055: PUSHI #0x0000000d 5443 @ 31060: INIT 1 5444 @ 31063: PUSHI #0xffff81af 5445 @ 31068: INIT 1 5446 @ 31071: PUSHI #0x0000402b 5447 @ 31076: INIT 1 5448 @ 31079: PUSHI #0x0000002e 5449 @ 31084: INIT 1 5450 @ 31087: PUSHI #0x0000402b 5451 @ 31092: INIT 1 5452 @ 31095: PUSHI #0x00000011 5453 @ 31100: INIT 1 5454 @ 31103: PUSHI #0x00004015 5455 @ 31108: INIT 1 5456 @ 31111: PUSHI #0x00000000 5457 @ 31116: INIT 1 5458 @ 31119: PUSHI #0x00004014 5459 @ 31124: INIT 1 5460 @ 31127: PUSHI #0x00000000 5461 @ 31132: INIT 1 5462 @ 31135: PUSHI #0xffff84bc 5463 @ 31140: INIT 1 5464 @ 31143: PUSHI #0xffff833d 5465 @ 31148: INIT 1 5466 @ 31151: PUSHI #0xffff81be 5467 @ 31156: INIT 1 5468 @ 31159: PUSHI #0xffffdab1 5469 @ 31164: INIT 1 5470 @ 31167: PUSHI #0x00000002 5471 @ 31172: INIT 1 5472 @ 31175: PUSHI #0x00004031 5473 @ 31180: INIT 1 5474 @ 31183: PUSHI #0x00000001 5475 @ 31188: INIT 1 5476 @ 31191: PUSHI #0x00004031 5477 @ 31196: INIT 1 5478 @ 31199: PUSHI #0x00000005 5479 @ 31204: INIT 1 5480 @ 31207: PUSHI #0x0000402a 5481 @ 31212: INIT 1 5482 @ 31215: PUSHI #0x00000005 5483 @ 31220: INIT 1 5484 @ 31223: PUSHI #0xffff848a 5485 @ 31228: INIT 1 5486 @ 31231: PUSHI #0xffff81bd 5487 @ 31236: INIT 1 5488 @ 31239: PUSHI #0xffffd9b1 5489 @ 31244: INIT 1 5490 @ 31247: PUSHI #0x00000000 5491 @ 31252: INIT 1 5492 @ 31255: PUSHI #0xffff818a 5493 @ 31260: INIT 1 5494 @ 31263: PUSHI #0xffffda32 5495 @ 31268: INIT 1 5496 @ 31271: PUSHI #0x00000000 5497 @ 31276: INIT 1 5498 @ 31279: PUSHI #0x00004034 5499 @ 31284: INIT 1 5500 @ 31287: PUSHI #0x00000000 5501 @ 31292: INIT 1 5502 @ 31295: PUSHI #0x00004033 5503 @ 31300: INIT 1 5504 @ 31303: PUSHI #0x00000000 5505 @ 31308: INIT 1 5506 @ 31311: PUSHI #0xffff833d 5507 @ 31316: INIT 1 5508 @ 31319: PUSHI #0xffff81be 5509 @ 31324: INIT 1 5510 @ 31327: PUSHI #0x00004031 5511 @ 31332: INIT 1 5512 @ 31335: PUSHI #0x00000004 5513 @ 31340: INIT 1 5514 @ 31343: PUSHI #0x0000402a 5515 @ 31348: INIT 1 5516 @ 31351: PUSHI #0x00000009 5517 @ 31356: INIT 1 5518 @ 31359: PUSHI #0x00004031 5519 @ 31364: INIT 1 5520 @ 31367: PUSHI #0x00000003 5521 @ 31372: INIT 1 5522 @ 31375: PUSHI #0xffff87cc 5523 @ 31380: INIT 1 5524 @ 31383: PUSHI #0xffff844e 5525 @ 31388: INIT 1 5526 @ 31391: PUSHI #0x00002952 5527 @ 31396: INIT 1 5528 @ 31399: PUSHI #0x00002cc1 5529 @ 31404: INIT 1 5530 @ 31407: PUSHI #0xffff81a8 5531 @ 31412: INIT 1 5532 @ 31415: PUSHI #0x0000401d 5533 @ 31420: INIT 1 5534 @ 31423: PUSHI #0x00000002 5535 @ 31428: INIT 1 5536 @ 31431: PUSHI #0x0000401b 5537 @ 31436: INIT 1 5538 @ 31439: PUSHI #0x00000002 5539 @ 31444: INIT 1 5540 @ 31447: PUSHI #0x00000044 5541 @ 31452: INIT 1 5542 @ 31455: PUSHI #0xffff818a 5543 @ 31460: INIT 1 5544 @ 31463: PUSHI #0x00004038 5545 @ 31468: INIT 1 5546 @ 31471: PUSHI #0x00000000 5547 @ 31476: INIT 1 5548 @ 31479: PUSHI #0x00004038 5549 @ 31484: INIT 1 5550 @ 31487: PUSHI #0x00000000 5551 @ 31492: INIT 1 5552 @ 31495: PUSHI #0x000020c9 5553 @ 31500: INIT 1 5554 @ 31503: PUSHI #0x00000053 5555 @ 31508: INIT 1 5556 @ 31511: PUSHI #0x00004018 5557 @ 31516: INIT 1 5558 @ 31519: PUSHI #0x00000000 5559 @ 31524: INIT 1 5560 @ 31527: PUSHI #0xffff85c5 5561 @ 31532: INIT 1 5562 @ 31535: PUSHI #0x00002a59 5563 @ 31540: INIT 1 5564 @ 31543: PUSHI #0x00000045 5565 @ 31548: INIT 1 5566 @ 31551: PUSHI #0xffff81c9 5567 @ 31556: INIT 1 5568 @ 31559: PUSHI #0x0000401c 5569 @ 31564: INIT 1 5570 @ 31567: PUSHI #0x00000012 5571 @ 31572: INIT 1 5572 @ 31575: PUSHI #0x00002a4e 5573 @ 31580: INIT 1 5574 @ 31583: PUSHI #0x000023c5 5575 @ 31588: INIT 1 5576 @ 31591: PUSHI #0x00002945 5577 @ 31596: INIT 1 5578 @ 31599: PUSHI #0x0000401c 5579 @ 31604: INIT 1 5580 @ 31607: PUSHI #0x00000012 5581 @ 31612: INIT 1 5582 @ 31615: PUSHI #0x000024c7 5583 @ 31620: INIT 1 5584 @ 31623: PUSHI #0x0000004e 5585 @ 31628: INIT 1 5586 @ 31631: PUSHI #0x0000404a 5587 @ 31636: INIT 1 5588 @ 31639: PUSHI #0x00000000 5589 @ 31644: INIT 1 5590 @ 31647: PUSHI #0xffff82cf 5591 @ 31652: INIT 1 5592 @ 31655: PUSHI #0x000021d9 5593 @ 31660: INIT 1 5594 @ 31663: PUSHI #0x000022cc 5595 @ 31668: INIT 1 5596 @ 31671: PUSHI #0x00004047 5597 @ 31676: INIT 1 5598 @ 31679: PUSHI #0x00000000 5599 @ 31684: INIT 1 5600 @ 31687: PUSHI #0xffff8a4d 5601 @ 31692: INIT 1 5602 @ 31695: PUSHI #0x0000004e 5603 @ 31700: INIT 1 5604 @ 31703: PUSHI #0xffff85d3 5605 @ 31708: INIT 1 5606 @ 31711: PUSHI #0x00000054 5607 @ 31716: INIT 1 5608 @ 31719: PUSHI #0xffff82c9 5609 @ 31724: INIT 1 5610 @ 31727: PUSHI #0x000027d2 5611 @ 31732: INIT 1 5612 @ 31735: PUSHI #0x0000004c 5613 @ 31740: INIT 1 5614 @ 31743: PUSHI #0x00004055 5615 @ 31748: INIT 1 5616 @ 31751: PUSHI #0x00000000 5617 @ 31756: INIT 1 5618 @ 31759: PUSHI #0x00002ace 5619 @ 31764: INIT 1 5620 @ 31767: PUSHI #0x00000045 5621 @ 31772: INIT 1 5622 @ 31775: PUSHI #0x0000403f 5623 @ 31780: INIT 1 5624 @ 31783: PUSHI #0x00000020 5625 @ 31788: INIT 1 5626 @ 31791: PUSHI #0x00000054 5627 @ 31796: INIT 1 5628 @ 31799: PUSHI #0xffff81c1 5629 @ 31804: INIT 1 5630 @ 31807: PUSHI #0x00004022 5631 @ 31812: INIT 1 5632 @ 31815: PUSHI #0x00000002 5633 @ 31820: INIT 1 5634 @ 31823: PUSHI #0x00002a4e 5635 @ 31828: INIT 1 5636 @ 31831: PUSHI #0x00004022 5637 @ 31836: INIT 1 5638 @ 31839: PUSHI #0x00000002 5639 @ 31844: INIT 1 5640 @ 31847: PUSHI #0x000022cd 5641 @ 31852: INIT 1 5642 @ 31855: PUSHI #0x00002a4e 5643 @ 31860: INIT 1 5644 @ 31863: PUSHI #0x00004016 5645 @ 31868: INIT 1 5646 @ 31871: PUSHI #0x00000000 5647 @ 31876: INIT 1 5648 @ 31879: PUSHI #0xffff8349 5649 @ 31884: INIT 1 5650 @ 31887: PUSHI #0x00002759 5651 @ 31892: INIT 1 5652 @ 31895: PUSHI #0x000026c1 5653 @ 31900: INIT 1 5654 @ 31903: PUSHI #0x000021c9 5655 @ 31908: INIT 1 5656 @ 31911: PUSHI #0x00004023 5657 @ 31916: INIT 1 5658 @ 31919: PUSHI #0x00000005 5659 @ 31924: INIT 1 5660 @ 31927: PUSHI #0x000023c1 5661 @ 31932: INIT 1 5662 @ 31935: PUSHI #0x000027ce 5663 @ 31940: INIT 1 5664 @ 31943: PUSHI #0x000022d3 5665 @ 31948: INIT 1 5666 @ 31951: PUSHI #0x00004055 5667 @ 31956: INIT 1 5668 @ 31959: PUSHI #0x00000001 5669 @ 31964: INIT 1 5670 @ 31967: PUSHI #0xffff92cc 5671 @ 31972: INIT 1 5672 @ 31975: PUSHI #0xffff85ce 5673 @ 31980: INIT 1 5674 @ 31983: PUSHI #0x00000058 5675 @ 31988: INIT 1 5676 @ 31991: PUSHI #0xffff8349 5677 @ 31996: INIT 1 5678 @ 31999: PUSHI #0x000022d4 5679 @ 32004: INIT 1 5680 @ 32007: PUSHI #0x00002752 5681 @ 32012: INIT 1 5682 @ 32015: PUSHI #0x00002641 5683 @ 32020: INIT 1 5684 @ 32023: PUSHI #0x00004023 5685 @ 32028: INIT 1 5686 @ 32031: PUSHI #0x00000003 5687 @ 32036: INIT 1 5688 @ 32039: PUSHI #0x00000054 5689 @ 32044: INIT 1 5690 @ 32047: PUSHI #0x0000403f 5691 @ 32052: INIT 1 5692 @ 32055: PUSHI #0x00000004 5693 @ 32060: INIT 1 5694 @ 32063: PUSHI #0x00000044 5695 @ 32068: INIT 1 5696 @ 32071: PUSHI #0xffff81cf 5697 @ 32076: INIT 1 5698 @ 32079: PUSHI #0x0000404b 5699 @ 32084: INIT 1 5700 @ 32087: PUSHI #0x00000002 5701 @ 32092: INIT 1 5702 @ 32095: PUSHI #0x00000046 5703 @ 32100: INIT 1 5704 @ 32103: PUSHI #0xffff8846 5705 @ 32108: INIT 1 5706 @ 32111: PUSHI #0xffff85cc 5707 @ 32116: INIT 1 5708 @ 32119: PUSHI #0x00000050 5709 @ 32124: INIT 1 5710 @ 32127: PUSHI #0xffff8345 5711 @ 32132: INIT 1 5712 @ 32135: PUSHI #0x000027d2 5713 @ 32140: INIT 1 5714 @ 32143: PUSHI #0x00002947 5715 @ 32148: INIT 1 5716 @ 32151: PUSHI #0x000026c1 5717 @ 32156: INIT 1 5718 @ 32159: PUSHI #0x0000404c 5719 @ 32164: INIT 1 5720 @ 32167: PUSHI #0x00000001 5721 @ 32172: INIT 1 5722 @ 32175: PUSHI #0x000026d2 5723 @ 32180: INIT 1 5724 @ 32183: PUSHI #0x0000404d 5725 @ 32188: INIT 1 5726 @ 32191: PUSHI #0x00000000 5727 @ 32196: INIT 1 5728 @ 32199: PUSHI #0x000029c9 5729 @ 32204: INIT 1 5730 @ 32207: PUSHI #0x00000054 5731 @ 32212: INIT 1 5732 @ 32215: PUSHI #0x00004053 5733 @ 32220: INIT 1 5734 @ 32223: PUSHI #0x00000003 5735 @ 32228: INIT 1 5736 @ 32231: PUSHI #0x00002649 5737 @ 32236: INIT 1 5738 @ 32239: PUSHI #0x00000045 5739 @ 32244: INIT 1 5740 @ 32247: PUSHI #0x0000404c 5741 @ 32252: INIT 1 5742 @ 32255: PUSHI #0x00000000 5743 @ 32260: INIT 1 5744 @ 32263: PUSHI #0x000022d3 5745 @ 32268: INIT 1 5746 @ 32271: PUSHI #0x00004044 5747 @ 32276: INIT 1 5748 @ 32279: PUSHI #0x00000000 5749 @ 32284: INIT 1 5750 @ 32287: PUSHI #0xffff8c41 5751 @ 32292: INIT 1 5752 @ 32295: PUSHI #0xffff8749 5753 @ 32300: INIT 1 5754 @ 32303: PUSHI #0xffff85ce 5755 @ 32308: INIT 1 5756 @ 32311: PUSHI #0xffff83cf 5757 @ 32316: INIT 1 5758 @ 32319: PUSHI #0x00002755 5759 @ 32324: INIT 1 5760 @ 32327: PUSHI #0x00002a43 5761 @ 32332: INIT 1 5762 @ 32335: PUSHI #0x000027c9 5763 @ 32340: INIT 1 5764 @ 32343: PUSHI #0x0000004e 5765 @ 32348: INIT 1 5766 @ 32351: PUSHI #0x00004020 5767 @ 32356: INIT 1 5768 @ 32359: PUSHI #0x00000009 5769 @ 32364: INIT 1 5770 @ 32367: PUSHI #0x00000052 5771 @ 32372: INIT 1 5772 @ 32375: PUSHI #0x0000403d 5773 @ 32380: INIT 1 5774 @ 32383: PUSHI #0x00000000 5775 @ 32388: INIT 1 5776 @ 32391: PUSHI #0x00004020 5777 @ 32396: INIT 1 5778 @ 32399: PUSHI #0x00000009 5779 @ 32404: INIT 1 5780 @ 32407: PUSHI #0x000024ce 5781 @ 32412: INIT 1 5782 @ 32415: PUSHI #0x00002453 5783 @ 32420: INIT 1 5784 @ 32423: PUSHI #0xffff81c5 5785 @ 32428: INIT 1 5786 @ 32431: PUSHI #0x00004045 5787 @ 32436: INIT 1 5788 @ 32439: PUSHI #0x00000000 5789 @ 32444: INIT 1 5790 @ 32447: PUSHI #0x000029cc 5791 @ 32452: INIT 1 5792 @ 32455: PUSHI #0x00000045 5793 @ 32460: INIT 1 5794 @ 32463: PUSHI #0x00004046 5795 @ 32468: INIT 1 5796 @ 32471: PUSHI #0x00000000 5797 @ 32476: INIT 1 5798 @ 32479: PUSHI #0x000029cc 5799 @ 32484: INIT 1 5800 @ 32487: PUSHI #0x00000045 5801 @ 32492: INIT 1 5802 @ 32495: PUSHI #0x00004050 5803 @ 32500: INIT 1 5804 @ 32503: PUSHI #0x000004ba 5805 @ 32508: INIT 1 5806 @ 32511: PUSHI #0xffff87c6 5807 @ 32516: INIT 1 5808 @ 32519: PUSHI #0x0000004e 5809 @ 32524: INIT 1 5810 @ 32527: PUSHI #0xffff84c3 5811 @ 32532: INIT 1 5812 @ 32535: PUSHI #0x000022d4 5813 @ 32540: INIT 1 5814 @ 32543: PUSHI #0x000022c7 5815 @ 32548: INIT 1 5816 @ 32551: PUSHI #0x00000052 5817 @ 32556: INIT 1 5818 @ 32559: PUSHI #0xffff81a8 5819 @ 32564: INIT 1 5820 @ 32567: PUSHI #0x0000401c 5821 @ 32572: INIT 1 5822 @ 32575: PUSHI #0x00000011 5823 @ 32580: INIT 1 5824 @ 32583: PUSHI #0x00004058 5825 @ 32588: INIT 1 5826 @ 32591: PUSHI #0x00000011 5827 @ 32596: INIT 1 5828 @ 32599: PUSHI #0x00002acc 5829 @ 32604: INIT 1 5830 @ 32607: PUSHI #0x000022c4 5831 @ 32612: INIT 1 5832 @ 32615: PUSHI #0x00004056 5833 @ 32620: INIT 1 5834 @ 32623: PUSHI #0x00000000 5835 @ 32628: INIT 1 5836 @ 32631: PUSHI #0x0000403e 5837 @ 32636: INIT 1 5838 @ 32639: PUSHI #0x0000002c 5839 @ 32644: INIT 1 5840 @ 32647: PUSHI #0xffff8fc1 5841 @ 32652: INIT 1 5842 @ 32655: PUSHI #0xffff8dc9 5843 @ 32660: INIT 1 5844 @ 32663: PUSHI #0x0000274f 5845 @ 32668: INIT 1 5846 @ 32671: PUSHI #0x00000047 5847 @ 32676: INIT 1 5848 @ 32679: PUSHI #0xffff89c9 5849 @ 32684: INIT 1 5850 @ 32687: PUSHI #0xffff844c 5851 @ 32692: INIT 1 5852 @ 32695: PUSHI #0xffff81d2 5853 @ 32700: INIT 1 5854 @ 32703: PUSHI #0x0000401c 5855 @ 32708: INIT 1 5856 @ 32711: PUSHI #0x00000014 5857 @ 32716: INIT 1 5858 @ 32719: PUSHI #0x000020c5 5859 @ 32724: INIT 1 5860 @ 32727: PUSHI #0x0000004c 5861 @ 32732: INIT 1 5862 @ 32735: PUSHI #0x0000401c 5863 @ 32740: INIT 1 5864 @ 32743: PUSHI #0x00000024 5865 @ 32748: INIT 1 5866 @ 32751: PUSHI #0x0000274f 5867 @ 32756: INIT 1 5868 @ 32759: PUSHI #0x00000047 5869 @ 32764: INIT 1 5870 @ 32767: PUSHI #0xffff81c9 5871 @ 32772: INIT 1 5872 @ 32775: PUSHI #0x0000401c 5873 @ 32780: INIT 1 5874 @ 32783: PUSHI #0x00000015 5875 @ 32788: INIT 1 5876 @ 32791: PUSHI #0x00002a4e 5877 @ 32796: INIT 1 5878 @ 32799: PUSHI #0x000023c5 5879 @ 32804: INIT 1 5880 @ 32807: PUSHI #0x00002945 5881 @ 32812: INIT 1 5882 @ 32815: PUSHI #0x0000401c 5883 @ 32820: INIT 1 5884 @ 32823: PUSHI #0x00000015 5885 @ 32828: INIT 1 5886 @ 32831: PUSHI #0x00002a4e 5887 @ 32836: INIT 1 5888 @ 32839: PUSHI #0x000023c5 5889 @ 32844: INIT 1 5890 @ 32847: PUSHI #0x00002945 5891 @ 32852: INIT 1 5892 @ 32855: PUSHI #0x0000401c 5893 @ 32860: INIT 1 5894 @ 32863: PUSHI #0x00000014 5895 @ 32868: INIT 1 5896 @ 32871: PUSHI #0x00002a53 5897 @ 32876: INIT 1 5898 @ 32879: PUSHI #0x00004053 5899 @ 32884: INIT 1 5900 @ 32887: PUSHI #0x00000001 5901 @ 32892: INIT 1 5902 @ 32895: PUSHI #0x000022c2 5903 @ 32900: INIT 1 5904 @ 32903: PUSHI #0x0000004c 5905 @ 32908: INIT 1 5906 @ 32911: PUSHI #0x00004029 5907 @ 32916: INIT 1 5908 @ 32919: PUSHI #0x00000006 5909 @ 32924: INIT 1 5910 @ 32927: PUSHI #0xffff8341 5911 @ 32932: INIT 1 5912 @ 32935: PUSHI #0x0000274f 5913 @ 32940: INIT 1 5914 @ 32943: PUSHI #0x00002a49 5915 @ 32948: INIT 1 5916 @ 32951: PUSHI #0x0000294f 5917 @ 32956: INIT 1 5918 @ 32959: PUSHI #0x00004051 5919 @ 32964: INIT 1 5920 @ 32967: PUSHI #0x0000006d 5921 @ 32972: INIT 1 5922 @ 32975: PUSHI #0x00000050 5923 @ 32980: INIT 1 5924 @ 32983: PUSHI #0x00004020 5925 @ 32988: INIT 1 5926 @ 32991: PUSHI #0x0000000a 5927 @ 32996: INIT 1 5928 @ 32999: PUSHI #0xffff8241 5929 @ 33004: INIT 1 5930 @ 33007: PUSHI #0x00002a4f 5931 @ 33012: INIT 1 5932 @ 33015: PUSHI #0x0000403a 5933 @ 33020: INIT 1 5934 @ 33023: PUSHI #0x00000000 5935 @ 33028: INIT 1 5936 @ 33031: PUSHI #0x000022cd 5937 @ 33036: INIT 1 5938 @ 33039: PUSHI #0xffff81c6 5939 @ 33044: INIT 1 5940 @ 33047: PUSHI #0x0000401e 5941 @ 33052: INIT 1 5942 @ 33055: PUSHI #0x00000001 5943 @ 33060: INIT 1 5944 @ 33063: PUSHI #0xffff83ce 5945 @ 33068: INIT 1 5946 @ 33071: PUSHI #0x00002755 5947 @ 33076: INIT 1 5948 @ 33079: PUSHI #0x00002a43 5949 @ 33084: INIT 1 5950 @ 33087: PUSHI #0x000027c9 5951 @ 33092: INIT 1 5952 @ 33095: PUSHI #0x0000004e 5953 @ 33100: INIT 1 5954 @ 33103: PUSHI #0x00004020 5955 @ 33108: INIT 1 5956 @ 33111: PUSHI #0x0000000a 5957 @ 33116: INIT 1 5958 @ 33119: PUSHI #0x00004020 5959 @ 33124: INIT 1 5960 @ 33127: PUSHI #0x0000000a 5961 @ 33132: INIT 1 5962 @ 33135: PUSHI #0xffff87ce 5963 @ 33140: INIT 1 5964 @ 33143: PUSHI #0xffff8550 5965 @ 33148: INIT 1 5966 @ 33151: PUSHI #0xffff8252 5967 @ 33156: INIT 1 5968 @ 33159: PUSHI #0x00002757 5969 @ 33164: INIT 1 5970 @ 33167: PUSHI #0x00004022 5971 @ 33172: INIT 1 5972 @ 33175: PUSHI #0x00000001 5973 @ 33180: INIT 1 5974 @ 33183: PUSHI #0xffff818a 5975 @ 33188: INIT 1 5976 @ 33191: PUSHI #0x00004039 5977 @ 33196: INIT 1 5978 @ 33199: PUSHI #0x00000002 5979 @ 33204: INIT 1 5980 @ 33207: PUSHI #0x00004039 5981 @ 33212: INIT 1 5982 @ 33215: PUSHI #0x00000002 5983 @ 33220: INIT 1 5984 @ 33223: PUSHI #0x000024d4 5985 @ 33228: INIT 1 5986 @ 33231: PUSHI #0x0000274f 5987 @ 33236: INIT 1 5988 @ 33239: PUSHI #0x00004012 5989 @ 33244: INIT 1 5990 @ 33247: PUSHI #0x00000000 5991 @ 33252: INIT 1 5992 @ 33255: PUSHI #0xffff81c5 5993 @ 33260: INIT 1 5994 @ 33263: PUSHI #0x00004040 5995 @ 33268: INIT 1 5996 @ 33271: PUSHI #0x00000000 5997 @ 33276: INIT 1 5998 @ 33279: PUSHI #0x000022d6 5999 @ 33284: INIT 1 6000 @ 33287: PUSHI #0x00002a4e 6001 @ 33292: INIT 1 6002 @ 33295: PUSHI #0x00004040 6003 @ 33300: INIT 1 6004 @ 33303: PUSHI #0x00000000 6005 @ 33308: INIT 1 6006 @ 33311: PUSHI #0xffff88c5 6007 @ 33316: INIT 1 6008 @ 33319: PUSHI #0x00000052 6009 @ 33324: INIT 1 6010 @ 33327: PUSHI #0xffff8545 6011 @ 33332: INIT 1 6012 @ 33335: PUSHI #0xffff8349 6013 @ 33340: INIT 1 6014 @ 33343: PUSHI #0x000023cf 6015 @ 33348: INIT 1 6016 @ 33351: PUSHI #0x000020d2 6017 @ 33356: INIT 1 6018 @ 33359: PUSHI #0x0000004d 6019 @ 33364: INIT 1 6020 @ 33367: PUSHI #0x00004049 6021 @ 33372: INIT 1 6022 @ 33375: PUSHI #0x00000000 6023 @ 33380: INIT 1 6024 @ 33383: PUSHI #0x0000004d 6025 @ 33388: INIT 1 6026 @ 33391: PUSHI #0x00004023 6027 @ 33396: INIT 1 6028 @ 33399: PUSHI #0x00000006 6029 @ 33404: INIT 1 6030 @ 33407: PUSHI #0x000024c4 6031 @ 33412: INIT 1 6032 @ 33415: PUSHI #0x000020c3 6033 @ 33420: INIT 1 6034 @ 33423: PUSHI #0x000022d4 6035 @ 33428: INIT 1 6036 @ 33431: PUSHI #0x0000401f 6037 @ 33436: INIT 1 6038 @ 33439: PUSHI #0x0000007b 6039 @ 33444: INIT 1 6040 @ 33447: PUSHI #0x000026d2 6041 @ 33452: INIT 1 6042 @ 33455: PUSHI #0x00004023 6043 @ 33460: INIT 1 6044 @ 33463: PUSHI #0x00000007 6045 @ 33468: INIT 1 6046 @ 33471: PUSHI #0xffff8345 6047 @ 33476: INIT 1 6048 @ 33479: PUSHI #0x00002acf 6049 @ 33484: INIT 1 6050 @ 33487: PUSHI #0x000024d4 6051 @ 33492: INIT 1 6052 @ 33495: PUSHI #0x000022ce 6053 @ 33500: INIT 1 6054 @ 33503: PUSHI #0x0000401f 6055 @ 33508: INIT 1 6056 @ 33511: PUSHI #0x00000068 6057 @ 33516: INIT 1 6058 @ 33519: PUSHI #0xffff9141 6059 @ 33524: INIT 1 6060 @ 33527: PUSHI #0xffff8943 6061 @ 33532: INIT 1 6062 @ 33535: PUSHI #0xffff86d0 6063 @ 33540: INIT 1 6064 @ 33543: PUSHI #0xffff82d3 6065 @ 33548: INIT 1 6066 @ 33551: PUSHI #0x00002ad4 6067 @ 33556: INIT 1 6068 @ 33559: PUSHI #0x00002752 6069 @ 33564: INIT 1 6070 @ 33567: PUSHI #0x00004050 6071 @ 33572: INIT 1 6072 @ 33575: PUSHI #0x00000527 6073 @ 33580: INIT 1 6074 @ 33583: PUSHI #0x00002655 6075 @ 33588: INIT 1 6076 @ 33591: PUSHI #0x00001ed4 6077 @ 33596: INIT 1 6078 @ 33599: PUSHI #0xffff81bd 6079 @ 33604: INIT 1 6080 @ 33607: PUSHI #0x0000404e 6081 @ 33612: INIT 1 6082 @ 33615: PUSHI #0x00000568 6083 @ 33620: INIT 1 6084 @ 33623: PUSHI #0x0000404f 6085 @ 33628: INIT 1 6086 @ 33631: PUSHI #0x000004d9 6087 @ 33636: INIT 1 6088 @ 33639: PUSHI #0x000020c5 6089 @ 33644: INIT 1 6090 @ 33647: PUSHI #0x00000054 6091 @ 33652: INIT 1 6092 @ 33655: PUSHI #0x00004048 6093 @ 33660: INIT 1 6094 @ 33663: PUSHI #0x00000000 6095 @ 33668: INIT 1 6096 @ 33671: PUSHI #0x0000294f 6097 @ 33676: INIT 1 6098 @ 33679: PUSHI #0x00000044 6099 @ 33684: INIT 1 6100 @ 33687: PUSHI #0xffff81c6 6101 @ 33692: INIT 1 6102 @ 33695: PUSHI #0x00004025 6103 @ 33700: INIT 1 6104 @ 33703: PUSHI #0x00000040 6105 @ 33708: INIT 1 6106 @ 33711: PUSHI #0x0000294f 6107 @ 33716: INIT 1 6108 @ 33719: PUSHI #0x000020cd 6109 @ 33724: INIT 1 6110 @ 33727: PUSHI #0x00000054 6111 @ 33732: INIT 1 6112 @ 33735: PUSHI #0xffff81d3 6113 @ 33740: INIT 1 6114 @ 33743: PUSHI #0x00004026 6115 @ 33748: INIT 1 6116 @ 33751: PUSHI #0x00000009 6117 @ 33756: INIT 1 6118 @ 33759: PUSHI #0x000022d0 6119 @ 33764: INIT 1 6120 @ 33767: PUSHI #0x00000043 6121 @ 33772: INIT 1 6122 @ 33775: PUSHI #0x00004026 6123 @ 33780: INIT 1 6124 @ 33783: PUSHI #0x0000000c 6125 @ 33788: INIT 1 6126 @ 33791: PUSHI #0x0000004c 6127 @ 33796: INIT 1 6128 @ 33799: PUSHI #0xffff81d3 6129 @ 33804: INIT 1 6130 @ 33807: PUSHI #0x0000401c 6131 @ 33812: INIT 1 6132 @ 33815: PUSHI #0x00000021 6133 @ 33820: INIT 1 6134 @ 33823: PUSHI #0xffff834c 6135 @ 33828: INIT 1 6136 @ 33831: PUSHI #0x000027ce 6137 @ 33836: INIT 1 6138 @ 33839: PUSHI #0x000026d2 6139 @ 33844: INIT 1 6140 @ 33847: PUSHI #0x00002641 6141 @ 33852: INIT 1 6142 @ 33855: PUSHI #0x00004054 6143 @ 33860: INIT 1 6144 @ 33863: PUSHI #0x00000001 6145 @ 33868: INIT 1 6146 @ 33871: PUSHI #0x0000274f 6147 @ 33876: INIT 1 6148 @ 33879: PUSHI #0x00000047 6149 @ 33884: INIT 1 6150 @ 33887: PUSHI #0x00004054 6151 @ 33892: INIT 1 6152 @ 33895: PUSHI #0x00000004 6153 @ 33900: INIT 1 6154 @ 33903: PUSHI #0xffff93c8 6155 @ 33908: INIT 1 6156 @ 33911: PUSHI #0xffff8ec9 6157 @ 33916: INIT 1 6158 @ 33919: PUSHI #0xffff8cd0 6159 @ 33924: INIT 1 6160 @ 33927: PUSHI #0xffff85d4 6161 @ 33932: INIT 1 6162 @ 33935: PUSHI #0xffff8357 6163 @ 33940: INIT 1 6164 @ 33943: PUSHI #0x000029d9 6165 @ 33948: INIT 1 6166 @ 33951: PUSHI #0x000022d4 6167 @ 33956: INIT 1 6168 @ 33959: PUSHI #0x0000004d 6169 @ 33964: INIT 1 6170 @ 33967: PUSHI #0x00004023 6171 @ 33972: INIT 1 6172 @ 33975: PUSHI #0x00000004 6173 @ 33980: INIT 1 6174 @ 33983: PUSHI #0x00002a49 6175 @ 33988: INIT 1 6176 @ 33991: PUSHI #0x00002443 6177 @ 33996: INIT 1 6178 @ 33999: PUSHI #0x00004021 6179 @ 34004: INIT 1 6180 @ 34007: PUSHI #0x0000000c 6181 @ 34012: INIT 1 6182 @ 34015: PUSHI #0xffff8541 6183 @ 34020: INIT 1 6184 @ 34023: PUSHI #0xffff834f 6185 @ 34028: INIT 1 6186 @ 34031: PUSHI #0x000024d2 6187 @ 34036: INIT 1 6188 @ 34039: PUSHI #0x000023ce 6189 @ 34044: INIT 1 6190 @ 34047: PUSHI #0x00000028 6191 @ 34052: INIT 1 6192 @ 34055: PUSHI #0x00004024 6193 @ 34060: INIT 1 6194 @ 34063: PUSHI #0x00000030 6195 @ 34068: INIT 1 6196 @ 34071: PUSHI #0x00000050 6197 @ 34076: INIT 1 6198 @ 34079: PUSHI #0x00004052 6199 @ 34084: INIT 1 6200 @ 34087: PUSHI #0x00000073 6201 @ 34092: INIT 1 6202 @ 34095: PUSHI #0x00002a52 6203 @ 34100: INIT 1 6204 @ 34103: PUSHI #0x00004043 6205 @ 34108: INIT 1 6206 @ 34111: PUSHI #0x00000000 6207 @ 34116: INIT 1 6208 @ 34119: PUSHI #0x000021c5 6209 @ 34124: INIT 1 6210 @ 34127: PUSHI #0x00004027 6211 @ 34132: INIT 1 6212 @ 34135: PUSHI #0x00000000 6213 @ 34140: INIT 1 6214 @ 34143: PUSHI #0x00002747 6215 @ 34148: INIT 1 6216 @ 34151: PUSHI #0x00002641 6217 @ 34156: INIT 1 6218 @ 34159: PUSHI #0xffff81c5 6219 @ 34164: INIT 1 6220 @ 34167: PUSHI #0x00004041 6221 @ 34172: INIT 1 6222 @ 34175: PUSHI #0x00000000 6223 @ 34180: INIT 1 6224 @ 34183: PUSHI #0x000022d6 6225 @ 34188: INIT 1 6226 @ 34191: PUSHI #0x00002a4e 6227 @ 34196: INIT 1 6228 @ 34199: PUSHI #0x00004041 6229 @ 34204: INIT 1 6230 @ 34207: PUSHI #0x00000000 6231 @ 34212: INIT 1 6232 @ 34215: PUSHI #0x0000294f 6233 @ 34220: INIT 1 6234 @ 34223: PUSHI #0x00000054 6235 @ 34228: INIT 1 6236 @ 34231: PUSHI #0xffff81c9 6237 @ 34236: INIT 1 6238 @ 34239: PUSHI #0x0000401c 6239 @ 34244: INIT 1 6240 @ 34247: PUSHI #0x00000013 6241 @ 34252: INIT 1 6242 @ 34255: PUSHI #0x00002a4e 6243 @ 34260: INIT 1 6244 @ 34263: PUSHI #0x000023c5 6245 @ 34268: INIT 1 6246 @ 34271: PUSHI #0x00002945 6247 @ 34276: INIT 1 6248 @ 34279: PUSHI #0x0000401c 6249 @ 34284: INIT 1 6250 @ 34287: PUSHI #0x00000013 6251 @ 34292: INIT 1 6252 @ 34295: PUSHI #0xffff82c8 6253 @ 34300: INIT 1 6254 @ 34303: PUSHI #0x00002ad2 6255 @ 34308: INIT 1 6256 @ 34311: PUSHI #0x00000045 6257 @ 34316: INIT 1 6258 @ 34319: PUSHI #0x00004050 6259 @ 34324: INIT 1 6260 @ 34327: PUSHI #0x0000054a 6261 @ 34332: INIT 1 6262 @ 34335: PUSHI #0x00002745 6263 @ 34340: INIT 1 6264 @ 34343: PUSHI #0x00004042 6265 @ 34348: INIT 1 6266 @ 34351: PUSHI #0x00000000 6267 @ 34356: INIT 1 6268 @ 34359: PUSHI #0x0000004e 6269 @ 34364: INIT 1 6270 @ 34367: PUSHI #0xffff82cc 6271 @ 34372: INIT 1 6272 @ 34375: PUSHI #0x000024d4 6273 @ 34380: INIT 1 6274 @ 34383: PUSHI #0x0000004c 6275 @ 34388: INIT 1 6276 @ 34391: PUSHI #0x0000403c 6277 @ 34396: INIT 1 6278 @ 34399: PUSHI #0x000000b6 6279 @ 34404: INIT 1 6280 @ 34407: PUSHI #0x000029c5 6281 @ 34412: INIT 1 6282 @ 34415: PUSHI #0x00000053 6283 @ 34420: INIT 1 6284 @ 34423: PUSHI #0x0000403e 6285 @ 34428: INIT 1 6286 @ 34431: PUSHI #0x0000002e 6287 @ 34436: INIT 1 6288 @ 34439: PUSHI #0x000024c8 6289 @ 34444: INIT 1 6290 @ 34447: PUSHI #0x000022cc 6291 @ 34452: INIT 1 6292 @ 34455: PUSHI #0x0000403b 6293 @ 34460: INIT 1 6294 @ 34463: PUSHI #0x000000b4 6295 @ 34468: INIT 1 6296 @ 34471: PUSHI #0x00004017 6297 @ 34476: INIT 1 6298 @ 34479: PUSHI #0x00000000 6299 @ 34484: INIT 1 6300 @ 34487: PUSHI #0xffff833d 6301 @ 34492: INIT 1 6302 @ 34495: PUSHI #0xffff81dc 6303 @ 34500: INIT 1 6304 @ 34503: PUSHI #0xffffd72a 6305 @ 34508: INIT 1 6306 @ 34511: PUSHI #0x00000033 6307 @ 34516: INIT 1 6308 @ 34519: PUSHI #0x0000402a 6309 @ 34524: INIT 1 6310 @ 34527: PUSHI #0x0000000d 6311 @ 34532: INIT 1 6312 @ 34535: PUSHI #0x00004031 6313 @ 34540: INIT 1 6314 @ 34543: PUSHI #0x00000001 6315 @ 34548: INIT 1 6316 @ 34551: PUSHI #0x00004019 6317 @ 34556: INIT 1 6318 @ 34559: PUSHI #0x00000000 6319 @ 34564: INIT 1 6320 @ 34567: PUSHI #0xffff81de 6321 @ 34572: INIT 1 6322 @ 34575: PUSHI #0xffffd72a 6323 @ 34580: INIT 1 6324 @ 34583: PUSHI #0x00000033 6325 @ 34588: INIT 1 6326 @ 34591: PUSHI #0x0000402a 6327 @ 34596: INIT 1 6328 @ 34599: PUSHI #0x0000000d 6329 @ 34604: INIT 1 6330 @ 34607: PUSHI #0x0000401a 6331 @ 34612: INIT 1 6332 @ 34615: PUSHI #0x00000000 6333 @ 34620: INIT 1 6334 @ 34623: PUSHI #0x0000402f 6335 @ 34628: INIT 1 6336 @ 34631: PUSHI #0x0000000e 6337 @ 34636: INIT 1 6338 @ 34639: PUSHI #0xffff81bd 6339 @ 34644: INIT 1 6340 @ 34647: PUSHI #0x0000402e 6341 @ 34652: INIT 1 6342 @ 34655: PUSHI #0x00000033 6343 @ 34660: INIT 1 6344 @ 34663: PUSHI #0x00004031 6345 @ 34668: INIT 1 6346 @ 34671: PUSHI #0x00000001 6347 @ 34676: INIT 1 571 %list 572 !%endoffile 573 !*** end of generated tables *** 574 6348 @ 34679: LINE 571 "regression-compile-tmp/pass1.imp" 575 %routine flush buffer( %integer limit ) 6349 @ 34715: LINE 575 "regression-compile-tmp/pass1.imp" 6350 @ 34751: DEF FLUSHBUFFER (_lev0id0_FLUSHBUFFER) p1=V_00e8 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6351 @ 34774: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 6352 @ 34775: DEF LIMIT p1=V_00e9 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6353 @ 34792: FINISH ) {lev=2} 576 %integer j 6354 @ 34793: LINE 576 "regression-compile-tmp/pass1.imp" 6355 @ 34829: DEF J p1=V_00ea a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 577 %if bp >= limit %start 6356 @ 34842: LINE 577 "regression-compile-tmp/pass1.imp" 6357 @ 34878: PUSH BP 6358 @ 34881: PUSH LIMIT 6359 @ 34884: JUMPIF < L_0004 578 %if faulty = 0 %start 6360 @ 34888: LINE 578 "regression-compile-tmp/pass1.imp" 6361 @ 34924: PUSH FAULTY 6362 @ 34927: PUSHI #0x00000000 6363 @ 34932: JUMPIF # L_0007 579 selectoutput(object) 6364 @ 34936: LINE 579 "regression-compile-tmp/pass1.imp" 6365 @ 34972: PUSH SELECTOUTPUT 6366 @ 34975: PUSHI #0x00000001 6367 @ 34980: ASSPAR 6368 @ 34981: CALL 580 %for j = 1, 1, bp %cycle 6369 @ 34982: LINE 580 "regression-compile-tmp/pass1.imp" 6370 @ 35018: PUSH J 6371 @ 35021: PUSHI #0x00000001 6372 @ 35026: PUSH BP 6373 @ 35029: PUSHI #0x00000001 6374 @ 35034: FOR L_0009 581 printsymbol(buff(j)) 6375 @ 35037: LINE 581 "regression-compile-tmp/pass1.imp" 6376 @ 35073: PUSH PRINTSYMBOL 6377 @ 35076: PUSH BUFF 6378 @ 35079: PUSH J 6379 @ 35082: ACCESS 6380 @ 35083: ASSPAR 6381 @ 35084: CALL 582 %repeat 6382 @ 35085: LINE 582 "regression-compile-tmp/pass1.imp" 6383 @ 35121: REPEAT L_0009 6384 @ 35124: LOCATE L_000a 583 selectoutput(listing) 6385 @ 35127: LINE 583 "regression-compile-tmp/pass1.imp" 6386 @ 35163: PUSH SELECTOUTPUT 6387 @ 35166: PUSHI #0x00000002 6388 @ 35171: ASSPAR 6389 @ 35172: CALL 584 %finish 6390 @ 35173: LINE 584 "regression-compile-tmp/pass1.imp" 6391 @ 35209: LOCATE L_0007 585 bp = 0 6392 @ 35212: LINE 585 "regression-compile-tmp/pass1.imp" 6393 @ 35248: PUSH BP 6394 @ 35251: PUSHI #0x00000000 6395 @ 35256: ASSVAL 586 %finish 6396 @ 35257: LINE 586 "regression-compile-tmp/pass1.imp" 6397 @ 35293: LOCATE L_0004 587 %end 588 6398 @ 35296: LINE 587 "regression-compile-tmp/pass1.imp" 6399 @ 35332: END _lev0id0_FLUSHBUFFER {lev=2 --> 1} 589 %routine add char( %byteinteger ch ) 6400 @ 35333: LINE 589 "regression-compile-tmp/pass1.imp" 6401 @ 35369: DEF ADDCHAR (_lev0id0_ADDCHAR) p1=V_00e9 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6402 @ 35388: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 6403 @ 35389: DEF CH p1=V_00ea a/tf=11 b/format=2 c/ostate=0 type=1 (integer) form=1 (simple) special=1 (byte-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 6404 @ 35403: FINISH ) {lev=2} 590 bp = bp + 1 6405 @ 35404: LINE 590 "regression-compile-tmp/pass1.imp" 6406 @ 35440: PUSH BP 6407 @ 35443: PUSH BP 6408 @ 35446: PUSHI #0x00000001 6409 @ 35451: ADD 6410 @ 35452: ASSVAL 591 buff(bp) = ch 6411 @ 35453: LINE 591 "regression-compile-tmp/pass1.imp" 6412 @ 35489: PUSH BUFF 6413 @ 35492: PUSH BP 6414 @ 35495: ACCESS 6415 @ 35496: PUSH CH 6416 @ 35499: ASSVAL 592 %end 593 6417 @ 35500: LINE 592 "regression-compile-tmp/pass1.imp" 6418 @ 35536: END _lev0id0_ADDCHAR {lev=2 --> 1} 594 %routine op(%integer code, param) 6419 @ 35537: LINE 594 "regression-compile-tmp/pass1.imp" 6420 @ 35573: DEF OP (_lev0id0_OP) p1=V_00ea a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6421 @ 35587: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 6422 @ 35588: DEF CODE p1=V_00eb a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6423 @ 35604: DEF PARAM p1=V_00ec a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6424 @ 35621: FINISH ) {lev=2} 595 buff(bp+1) = code 6425 @ 35622: LINE 595 "regression-compile-tmp/pass1.imp" 6426 @ 35658: PUSH BUFF 6427 @ 35661: PUSH BP 6428 @ 35664: PUSHI #0x00000001 6429 @ 35669: ADD 6430 @ 35670: ACCESS 6431 @ 35671: PUSH CODE 6432 @ 35674: ASSVAL 596 buff(bp+2) = param>>8 6433 @ 35675: LINE 596 "regression-compile-tmp/pass1.imp" 6434 @ 35711: PUSH BUFF 6435 @ 35714: PUSH BP 6436 @ 35717: PUSHI #0x00000002 6437 @ 35722: ADD 6438 @ 35723: ACCESS 6439 @ 35724: PUSH PARAM 6440 @ 35727: PUSHI #0x00000008 6441 @ 35732: RSH 6442 @ 35733: ASSVAL 597 buff(bp+3) = param 6443 @ 35734: LINE 597 "regression-compile-tmp/pass1.imp" 6444 @ 35770: PUSH BUFF 6445 @ 35773: PUSH BP 6446 @ 35776: PUSHI #0x00000003 6447 @ 35781: ADD 6448 @ 35782: ACCESS 6449 @ 35783: PUSH PARAM 6450 @ 35786: ASSVAL 598 bp = bp+3 6451 @ 35787: LINE 598 "regression-compile-tmp/pass1.imp" 6452 @ 35823: PUSH BP 6453 @ 35826: PUSH BP 6454 @ 35829: PUSHI #0x00000003 6455 @ 35834: ADD 6456 @ 35835: ASSVAL 599 %end 600 6457 @ 35836: LINE 599 "regression-compile-tmp/pass1.imp" 6458 @ 35872: END _lev0id0_OP {lev=2 --> 1} 601 %routine set const(%integer m) 6459 @ 35873: LINE 601 "regression-compile-tmp/pass1.imp" 6460 @ 35909: DEF SETCONST (_lev0id0_SETCONST) p1=V_00eb a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6461 @ 35929: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 6462 @ 35930: DEF M p1=V_00ec a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6463 @ 35943: FINISH ) {lev=2} 602 buff(bp+1) = 'N' 6464 @ 35944: LINE 602 "regression-compile-tmp/pass1.imp" 6465 @ 35980: PUSH BUFF 6466 @ 35983: PUSH BP 6467 @ 35986: PUSHI #0x00000001 6468 @ 35991: ADD 6469 @ 35992: ACCESS 6470 @ 35993: PUSHI #0x0000004e 6471 @ 35998: ASSVAL 603 buff(bp+5) = m; m = m>>8 6472 @ 35999: LINE 603 "regression-compile-tmp/pass1.imp" 6473 @ 36035: PUSH BUFF 6474 @ 36038: PUSH BP 6475 @ 36041: PUSHI #0x00000005 6476 @ 36046: ADD 6477 @ 36047: ACCESS 6478 @ 36048: PUSH M 6479 @ 36051: ASSVAL 6480 @ 36052: LINE 603 "regression-compile-tmp/pass1.imp" 6481 @ 36088: PUSH M 6482 @ 36091: PUSH M 6483 @ 36094: PUSHI #0x00000008 6484 @ 36099: RSH 6485 @ 36100: ASSVAL 604 buff(bp+4) = m; m = m>>8 6486 @ 36101: LINE 604 "regression-compile-tmp/pass1.imp" 6487 @ 36137: PUSH BUFF 6488 @ 36140: PUSH BP 6489 @ 36143: PUSHI #0x00000004 6490 @ 36148: ADD 6491 @ 36149: ACCESS 6492 @ 36150: PUSH M 6493 @ 36153: ASSVAL 6494 @ 36154: LINE 604 "regression-compile-tmp/pass1.imp" 6495 @ 36190: PUSH M 6496 @ 36193: PUSH M 6497 @ 36196: PUSHI #0x00000008 6498 @ 36201: RSH 6499 @ 36202: ASSVAL 605 buff(bp+3) = m; m = m>>8 6500 @ 36203: LINE 605 "regression-compile-tmp/pass1.imp" 6501 @ 36239: PUSH BUFF 6502 @ 36242: PUSH BP 6503 @ 36245: PUSHI #0x00000003 6504 @ 36250: ADD 6505 @ 36251: ACCESS 6506 @ 36252: PUSH M 6507 @ 36255: ASSVAL 6508 @ 36256: LINE 605 "regression-compile-tmp/pass1.imp" 6509 @ 36292: PUSH M 6510 @ 36295: PUSH M 6511 @ 36298: PUSHI #0x00000008 6512 @ 36303: RSH 6513 @ 36304: ASSVAL 606 buff(bp+2) = m 6514 @ 36305: LINE 606 "regression-compile-tmp/pass1.imp" 6515 @ 36341: PUSH BUFF 6516 @ 36344: PUSH BP 6517 @ 36347: PUSHI #0x00000002 6518 @ 36352: ADD 6519 @ 36353: ACCESS 6520 @ 36354: PUSH M 6521 @ 36357: ASSVAL 607 bp = bp+5 6522 @ 36358: LINE 607 "regression-compile-tmp/pass1.imp" 6523 @ 36394: PUSH BP 6524 @ 36397: PUSH BP 6525 @ 36400: PUSHI #0x00000005 6526 @ 36405: ADD 6527 @ 36406: ASSVAL 608 %end 609 6528 @ 36407: LINE 608 "regression-compile-tmp/pass1.imp" 6529 @ 36443: END _lev0id0_SETCONST {lev=2 --> 1} 610 %routine octal(%integer n) 6530 @ 36444: LINE 610 "regression-compile-tmp/pass1.imp" 6531 @ 36480: DEF OCTAL (_lev0id0_OCTAL) p1=V_00ec a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6532 @ 36497: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 6533 @ 36498: DEF N p1=V_00ed a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6534 @ 36511: FINISH ) {lev=2} 611 %integer m 6535 @ 36512: LINE 611 "regression-compile-tmp/pass1.imp" 6536 @ 36548: DEF M p1=V_00ee a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 612 m = n>>3 6537 @ 36561: LINE 612 "regression-compile-tmp/pass1.imp" 6538 @ 36597: PUSH M 6539 @ 36600: PUSH N 6540 @ 36603: PUSHI #0x00000003 6541 @ 36608: RSH 6542 @ 36609: ASSVAL 613 octal(m) %if m # 0 6543 @ 36610: LINE 613 "regression-compile-tmp/pass1.imp" 6544 @ 36646: PUSH M 6545 @ 36649: PUSHI #0x00000000 6546 @ 36654: JUMPIF = L_0004 6547 @ 36658: PUSH OCTAL 6548 @ 36661: PUSH M 6549 @ 36664: ASSPAR 6550 @ 36665: CALL 6551 @ 36666: LOCATE L_0004 614 add char( n&7+'0' ) 6552 @ 36669: LINE 614 "regression-compile-tmp/pass1.imp" 6553 @ 36705: PUSH ADDCHAR 6554 @ 36708: PUSH N 6555 @ 36711: PUSHI #0x00000007 6556 @ 36716: AND 6557 @ 36717: PUSHI #0x00000030 6558 @ 36722: ADD 6559 @ 36723: ASSPAR 6560 @ 36724: CALL 615 %end 616 6561 @ 36725: LINE 615 "regression-compile-tmp/pass1.imp" 6562 @ 36761: END _lev0id0_OCTAL {lev=2 --> 1} 617 %routine hexadecimal(%integer n) 6563 @ 36762: LINE 617 "regression-compile-tmp/pass1.imp" 6564 @ 36798: DEF HEXADECIMAL (_lev0id0_HEXADECIMAL) p1=V_00ed a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6565 @ 36821: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 6566 @ 36822: DEF N p1=V_00ee a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6567 @ 36835: FINISH ) {lev=2} 618 %integer m 6568 @ 36836: LINE 618 "regression-compile-tmp/pass1.imp" 6569 @ 36872: DEF M p1=V_00ef a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 619 m = n>>4 6570 @ 36885: LINE 619 "regression-compile-tmp/pass1.imp" 6571 @ 36921: PUSH M 6572 @ 36924: PUSH N 6573 @ 36927: PUSHI #0x00000004 6574 @ 36932: RSH 6575 @ 36933: ASSVAL 620 hexadecimal(m) %if m # 0 6576 @ 36934: LINE 620 "regression-compile-tmp/pass1.imp" 6577 @ 36970: PUSH M 6578 @ 36973: PUSHI #0x00000000 6579 @ 36978: JUMPIF = L_0004 6580 @ 36982: PUSH HEXADECIMAL 6581 @ 36985: PUSH M 6582 @ 36988: ASSPAR 6583 @ 36989: CALL 6584 @ 36990: LOCATE L_0004 621 %if n&15 > 9 %then add char( n&15+'A' ) %else add char( n&15+'0' ) 6585 @ 36993: LINE 621 "regression-compile-tmp/pass1.imp" 6586 @ 37029: PUSH N 6587 @ 37032: PUSHI #0x0000000f 6588 @ 37037: AND 6589 @ 37038: PUSHI #0x00000009 6590 @ 37043: JUMPIF <= L_0004 6591 @ 37047: PUSH ADDCHAR 6592 @ 37050: PUSH N 6593 @ 37053: PUSHI #0x0000000f 6594 @ 37058: AND 6595 @ 37059: PUSHI #0x00000041 6596 @ 37064: ADD 6597 @ 37065: ASSPAR 6598 @ 37066: CALL 6599 @ 37067: GOTO L_0003 6600 @ 37070: LOCATE L_0004 6601 @ 37073: PUSH ADDCHAR 6602 @ 37076: PUSH N 6603 @ 37079: PUSHI #0x0000000f 6604 @ 37084: AND 6605 @ 37085: PUSHI #0x00000030 6606 @ 37090: ADD 6607 @ 37091: ASSPAR 6608 @ 37092: CALL 6609 @ 37093: LOCATE L_0003 622 %end 623 6610 @ 37096: LINE 622 "regression-compile-tmp/pass1.imp" 6611 @ 37132: END _lev0id0_HEXADECIMAL {lev=2 --> 1} 624 %routine print ident(%integer p, mode) 625 6612 @ 37133: LINE 624 "regression-compile-tmp/pass1.imp" 6613 @ 37169: DEF PRINTIDENT (_lev0id0_PRINTIDENT) p1=V_00ee a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6614 @ 37191: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 6615 @ 37192: DEF P p1=V_00ef a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6616 @ 37205: DEF MODE p1=V_00f0 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6617 @ 37221: FINISH ) {lev=2} 626 %routine putit(%integer ch) 6618 @ 37222: LINE 626 "regression-compile-tmp/pass1.imp" 6619 @ 37258: DEF PUTIT (_lev0id0_PRINTIDENT_PUTIT) p1=V_00f1 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6620 @ 37275: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 6621 @ 37276: DEF CH p1=V_00f2 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6622 @ 37290: FINISH ) {lev=3} 627 %if mode = 0 %then %start 6623 @ 37291: LINE 627 "regression-compile-tmp/pass1.imp" 6624 @ 37327: PUSH MODE 6625 @ 37330: PUSHI #0x00000000 6626 @ 37335: JUMPIF # L_0004 628 printsymbol(ch) 6627 @ 37339: LINE 628 "regression-compile-tmp/pass1.imp" 6628 @ 37375: PUSH PRINTSYMBOL 6629 @ 37378: PUSH CH 6630 @ 37381: ASSPAR 6631 @ 37382: CALL 629 %else 6632 @ 37383: LINE 629 "regression-compile-tmp/pass1.imp" 6633 @ 37419: GOTO L_0003 6634 @ 37422: LOCATE L_0004 630 add char( ch ) 6635 @ 37425: LINE 630 "regression-compile-tmp/pass1.imp" 6636 @ 37461: PUSH ADDCHAR 6637 @ 37464: PUSH CH 6638 @ 37467: ASSPAR 6639 @ 37468: CALL 631 %finish 6640 @ 37469: LINE 631 "regression-compile-tmp/pass1.imp" 6641 @ 37505: LOCATE L_0003 632 %end 633 6642 @ 37508: LINE 632 "regression-compile-tmp/pass1.imp" 6643 @ 37544: END _lev0id0_PRINTIDENT_PUTIT {lev=3 --> 2} 634 %integer k, l 6644 @ 37545: LINE 634 "regression-compile-tmp/pass1.imp" 6645 @ 37581: DEF K p1=V_00f2 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6646 @ 37594: DEF L p1=V_00f3 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 635 p = tag(p)_text 6647 @ 37607: LINE 635 "regression-compile-tmp/pass1.imp" 6648 @ 37643: PUSH P 6649 @ 37646: PUSH TAG 6650 @ 37649: PUSH P 6651 @ 37652: ACCESS 6652 @ 37653: SELECT 5 6653 @ 37656: ASSVAL 636 %if p = 0 %start 6654 @ 37657: LINE 636 "regression-compile-tmp/pass1.imp" 6655 @ 37693: PUSH P 6656 @ 37696: PUSHI #0x00000000 6657 @ 37701: JUMPIF # L_0004 637 putit('?') 6658 @ 37705: LINE 637 "regression-compile-tmp/pass1.imp" 6659 @ 37741: PUSH PUTIT 6660 @ 37744: PUSHI #0x0000003f 6661 @ 37749: ASSPAR 6662 @ 37750: CALL 638 %return 6663 @ 37751: LINE 638 "regression-compile-tmp/pass1.imp" 6664 @ 37787: RETURN 639 %finish 6665 @ 37788: LINE 639 "regression-compile-tmp/pass1.imp" 6666 @ 37824: LOCATE L_0004 640 p = p+1; ! advance to name string 6667 @ 37827: LINE 640 "regression-compile-tmp/pass1.imp" 6668 @ 37863: PUSH P 6669 @ 37866: PUSH P 6670 @ 37869: PUSHI #0x00000001 6671 @ 37874: ADD 6672 @ 37875: ASSVAL 641 k = dict(p) 6673 @ 37876: LINE 641 "regression-compile-tmp/pass1.imp" 6674 @ 37912: PUSH K 6675 @ 37915: PUSH DICT 6676 @ 37918: PUSH P 6677 @ 37921: ACCESS 6678 @ 37922: ASSVAL 642 l = k & 255; ! length 6679 @ 37923: LINE 642 "regression-compile-tmp/pass1.imp" 6680 @ 37959: PUSH L 6681 @ 37962: PUSH K 6682 @ 37965: PUSHI #0x000000ff 6683 @ 37970: AND 6684 @ 37971: ASSVAL 643 %while l > 0 %cycle 6685 @ 37972: LINE 643 "regression-compile-tmp/pass1.imp" 6686 @ 38008: LOCATE L_0003 6687 @ 38011: PUSH L 6688 @ 38014: PUSHI #0x00000000 6689 @ 38019: JUMPIF <= L_0004 644 putit(k>>8) 6690 @ 38023: LINE 644 "regression-compile-tmp/pass1.imp" 6691 @ 38059: PUSH PUTIT 6692 @ 38062: PUSH K 6693 @ 38065: PUSHI #0x00000008 6694 @ 38070: RSH 6695 @ 38071: ASSPAR 6696 @ 38072: CALL 645 l = l-1 6697 @ 38073: LINE 645 "regression-compile-tmp/pass1.imp" 6698 @ 38109: PUSH L 6699 @ 38112: PUSH L 6700 @ 38115: PUSHI #0x00000001 6701 @ 38120: SUB 6702 @ 38121: ASSVAL 646 p = p+1 6703 @ 38122: LINE 646 "regression-compile-tmp/pass1.imp" 6704 @ 38158: PUSH P 6705 @ 38161: PUSH P 6706 @ 38164: PUSHI #0x00000001 6707 @ 38169: ADD 6708 @ 38170: ASSVAL 647 k = dict(p) 6709 @ 38171: LINE 647 "regression-compile-tmp/pass1.imp" 6710 @ 38207: PUSH K 6711 @ 38210: PUSH DICT 6712 @ 38213: PUSH P 6713 @ 38216: ACCESS 6714 @ 38217: ASSVAL 648 %exit %if l = 0 6715 @ 38218: LINE 648 "regression-compile-tmp/pass1.imp" 6716 @ 38254: PUSH L 6717 @ 38257: PUSHI #0x00000000 6718 @ 38262: JUMPIF # L_0007 6719 @ 38266: GOTO L_0004 6720 @ 38269: LOCATE L_0007 649 putit(k&255) 6721 @ 38272: LINE 649 "regression-compile-tmp/pass1.imp" 6722 @ 38308: PUSH PUTIT 6723 @ 38311: PUSH K 6724 @ 38314: PUSHI #0x000000ff 6725 @ 38319: AND 6726 @ 38320: ASSPAR 6727 @ 38321: CALL 650 l = l-1 6728 @ 38322: LINE 650 "regression-compile-tmp/pass1.imp" 6729 @ 38358: PUSH L 6730 @ 38361: PUSH L 6731 @ 38364: PUSHI #0x00000001 6732 @ 38369: SUB 6733 @ 38370: ASSVAL 651 %repeat 6734 @ 38371: LINE 651 "regression-compile-tmp/pass1.imp" 6735 @ 38407: REPEAT L_0003 6736 @ 38410: LOCATE L_0004 652 %end 653 6737 @ 38413: LINE 652 "regression-compile-tmp/pass1.imp" 6738 @ 38449: END _lev0id0_PRINTIDENT {lev=2 --> 1} 654 %routine abandon(%integer n) 6739 @ 38450: LINE 654 "regression-compile-tmp/pass1.imp" 6740 @ 38486: DEF ABANDON (_lev0id0_ABANDON) p1=V_00ef a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6741 @ 38505: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 6742 @ 38506: DEF N p1=V_00f0 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6743 @ 38519: FINISH ) {lev=2} 655 %switch reason(0:9) 6744 @ 38520: LINE 655 "regression-compile-tmp/pass1.imp" 6745 @ 38556: PUSHI #0x00000000 6746 @ 38561: PUSHI #0x00000009 6747 @ 38566: BOUNDS 6748 @ 38567: DEF REASON p1=V_00f1 a/tf=6 b/format=0 c/ostate=0 type=0 () form=6 (switch) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 656 %integer stream 6749 @ 38585: LINE 656 "regression-compile-tmp/pass1.imp" 6750 @ 38621: DEF STREAM p1=V_00f2 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 657 stream = listing 6751 @ 38639: LINE 657 "regression-compile-tmp/pass1.imp" 6752 @ 38675: PUSH STREAM 6753 @ 38678: PUSHI #0x00000002 6754 @ 38683: ASSVAL 658 %cycle 6755 @ 38684: LINE 658 "regression-compile-tmp/pass1.imp" 6756 @ 38720: LOCATE L_0003 659 newline %if sym # nl 6757 @ 38723: LINE 659 "regression-compile-tmp/pass1.imp" 6758 @ 38759: PUSH SYM 6759 @ 38762: PUSHI #0x0000000a 6760 @ 38767: JUMPIF = L_0007 6761 @ 38771: PUSH NEWLINE 6762 @ 38774: CALL 6763 @ 38775: LOCATE L_0007 660 printsymbol('*'); write(lines,4); space 6764 @ 38778: LINE 660 "regression-compile-tmp/pass1.imp" 6765 @ 38814: PUSH PRINTSYMBOL 6766 @ 38817: PUSHI #0x0000002a 6767 @ 38822: ASSPAR 6768 @ 38823: CALL 6769 @ 38824: LINE 660 "regression-compile-tmp/pass1.imp" 6770 @ 38860: PUSH WRITE 6771 @ 38863: PUSH LINES 6772 @ 38866: ASSPAR 6773 @ 38867: PUSHI #0x00000004 6774 @ 38872: ASSPAR 6775 @ 38873: CALL 6776 @ 38874: LINE 660 "regression-compile-tmp/pass1.imp" 6777 @ 38910: PUSH SPACE 6778 @ 38913: CALL 661 ->reason(n) 6779 @ 38914: LINE 661 "regression-compile-tmp/pass1.imp" 6780 @ 38950: PUSH N 6781 @ 38953: SJUMP 241 662 reason(0): printstring("compiler error!"); ->more 6782 @ 38956: LINE 662 "regression-compile-tmp/pass1.imp" 6783 @ 38992: PUSHI #0x00000000 6784 @ 38997: SLABEL 241 6785 @ 39000: LINE 662 "regression-compile-tmp/pass1.imp" 6786 @ 39036: PUSH PRINTSTRING 6787 @ 39039: PUSHS "compiler error!" 6788 @ 39056: ASSPAR 6789 @ 39057: CALL 6790 @ 39058: LINE 662 "regression-compile-tmp/pass1.imp" 6791 @ 39094: JUMP L_00f3 663 reason(1): printstring("switch vector too large"); ->more 6792 @ 39097: LINE 663 "regression-compile-tmp/pass1.imp" 6793 @ 39133: PUSHI #0x00000001 6794 @ 39138: SLABEL 241 6795 @ 39141: LINE 663 "regression-compile-tmp/pass1.imp" 6796 @ 39177: PUSH PRINTSTRING 6797 @ 39180: PUSHS "switch vector too large" 6798 @ 39205: ASSPAR 6799 @ 39206: CALL 6800 @ 39207: LINE 663 "regression-compile-tmp/pass1.imp" 6801 @ 39243: JUMP L_00f3 664 reason(2): printstring("too many names"); ->more 6802 @ 39246: LINE 664 "regression-compile-tmp/pass1.imp" 6803 @ 39282: PUSHI #0x00000002 6804 @ 39287: SLABEL 241 6805 @ 39290: LINE 664 "regression-compile-tmp/pass1.imp" 6806 @ 39326: PUSH PRINTSTRING 6807 @ 39329: PUSHS "too many names" 6808 @ 39345: ASSPAR 6809 @ 39346: CALL 6810 @ 39347: LINE 664 "regression-compile-tmp/pass1.imp" 6811 @ 39383: JUMP L_00f3 665 reason(3): printstring("program too complex"); ->more 6812 @ 39386: LINE 665 "regression-compile-tmp/pass1.imp" 6813 @ 39422: PUSHI #0x00000003 6814 @ 39427: SLABEL 241 6815 @ 39430: LINE 665 "regression-compile-tmp/pass1.imp" 6816 @ 39466: PUSH PRINTSTRING 6817 @ 39469: PUSHS "program too complex" 6818 @ 39490: ASSPAR 6819 @ 39491: CALL 6820 @ 39492: LINE 665 "regression-compile-tmp/pass1.imp" 6821 @ 39528: JUMP L_00f3 666 reason(4): printstring("feature not implemented"); ->more 6822 @ 39531: LINE 666 "regression-compile-tmp/pass1.imp" 6823 @ 39567: PUSHI #0x00000004 6824 @ 39572: SLABEL 241 6825 @ 39575: LINE 666 "regression-compile-tmp/pass1.imp" 6826 @ 39611: PUSH PRINTSTRING 6827 @ 39614: PUSHS "feature not implemented" 6828 @ 39639: ASSPAR 6829 @ 39640: CALL 6830 @ 39641: LINE 666 "regression-compile-tmp/pass1.imp" 6831 @ 39677: JUMP L_00f3 667 reason(5): printstring("input ended: ") 6832 @ 39680: LINE 667 "regression-compile-tmp/pass1.imp" 6833 @ 39716: PUSHI #0x00000005 6834 @ 39721: SLABEL 241 6835 @ 39724: LINE 667 "regression-compile-tmp/pass1.imp" 6836 @ 39760: PUSH PRINTSTRING 6837 @ 39763: PUSHS "input ended: " 6838 @ 39778: ASSPAR 6839 @ 39779: CALL 668 %if quote # 0 %start 6840 @ 39780: LINE 668 "regression-compile-tmp/pass1.imp" 6841 @ 39816: PUSH QUOTE 6842 @ 39819: PUSHI #0x00000000 6843 @ 39824: JUMPIF = L_0007 669 %if quote < 0 %then printsymbol(cquote) %else printsymbol(squote) 6844 @ 39828: LINE 669 "regression-compile-tmp/pass1.imp" 6845 @ 39864: PUSH QUOTE 6846 @ 39867: PUSHI #0x00000000 6847 @ 39872: JUMPIF >= L_000a 6848 @ 39876: PUSH PRINTSYMBOL 6849 @ 39879: PUSHI #0x00000027 6850 @ 39884: ASSPAR 6851 @ 39885: CALL 6852 @ 39886: GOTO L_0009 6853 @ 39889: LOCATE L_000a 6854 @ 39892: PUSH PRINTSYMBOL 6855 @ 39895: PUSHI #0x00000022 6856 @ 39900: ASSPAR 6857 @ 39901: CALL 6858 @ 39902: LOCATE L_0009 670 %else 6859 @ 39905: LINE 670 "regression-compile-tmp/pass1.imp" 6860 @ 39941: GOTO L_0006 6861 @ 39944: LOCATE L_0007 671 printstring("%endof") 6862 @ 39947: LINE 671 "regression-compile-tmp/pass1.imp" 6863 @ 39983: PUSH PRINTSTRING 6864 @ 39986: PUSHS "%endof" 6865 @ 39994: ASSPAR 6866 @ 39995: CALL 672 %if progmode >= 0 %then printstring("program") %else printstring("file") 6867 @ 39996: LINE 672 "regression-compile-tmp/pass1.imp" 6868 @ 40032: PUSH PROGMODE 6869 @ 40035: PUSHI #0x00000000 6870 @ 40040: JUMPIF < L_000a 6871 @ 40044: PUSH PRINTSTRING 6872 @ 40047: PUSHS "program" 6873 @ 40056: ASSPAR 6874 @ 40057: CALL 6875 @ 40058: GOTO L_0009 6876 @ 40061: LOCATE L_000a 6877 @ 40064: PUSH PRINTSTRING 6878 @ 40067: PUSHS "file" 6879 @ 40073: ASSPAR 6880 @ 40074: CALL 6881 @ 40075: LOCATE L_0009 673 %finish 6882 @ 40078: LINE 673 "regression-compile-tmp/pass1.imp" 6883 @ 40114: LOCATE L_0006 674 printstring(" missing?"); ->more 6884 @ 40117: LINE 674 "regression-compile-tmp/pass1.imp" 6885 @ 40153: PUSH PRINTSTRING 6886 @ 40156: PUSHS " missing?" 6887 @ 40167: ASSPAR 6888 @ 40168: CALL 6889 @ 40169: LINE 674 "regression-compile-tmp/pass1.imp" 6890 @ 40205: JUMP L_00f3 675 reason(6): printstring("too many faults!"); ->more 6891 @ 40208: LINE 675 "regression-compile-tmp/pass1.imp" 6892 @ 40244: PUSHI #0x00000006 6893 @ 40249: SLABEL 241 6894 @ 40252: LINE 675 "regression-compile-tmp/pass1.imp" 6895 @ 40288: PUSH PRINTSTRING 6896 @ 40291: PUSHS "too many faults!" 6897 @ 40309: ASSPAR 6898 @ 40310: CALL 6899 @ 40311: LINE 675 "regression-compile-tmp/pass1.imp" 6900 @ 40347: JUMP L_00f3 676 reason(7): printstring("string constant too long"); ->more 6901 @ 40350: LINE 676 "regression-compile-tmp/pass1.imp" 6902 @ 40386: PUSHI #0x00000007 6903 @ 40391: SLABEL 241 6904 @ 40394: LINE 676 "regression-compile-tmp/pass1.imp" 6905 @ 40430: PUSH PRINTSTRING 6906 @ 40433: PUSHS "string constant too long" 6907 @ 40459: ASSPAR 6908 @ 40460: CALL 6909 @ 40461: LINE 676 "regression-compile-tmp/pass1.imp" 6910 @ 40497: JUMP L_00f3 677 reason(8): printstring("dictionary full"); ->more 6911 @ 40500: LINE 677 "regression-compile-tmp/pass1.imp" 6912 @ 40536: PUSHI #0x00000008 6913 @ 40541: SLABEL 241 6914 @ 40544: LINE 677 "regression-compile-tmp/pass1.imp" 6915 @ 40580: PUSH PRINTSTRING 6916 @ 40583: PUSHS "dictionary full" 6917 @ 40600: ASSPAR 6918 @ 40601: CALL 6919 @ 40602: LINE 677 "regression-compile-tmp/pass1.imp" 6920 @ 40638: JUMP L_00f3 678 reason(9): printstring("Included file ".include file." does not exist") 679 6921 @ 40641: LINE 678 "regression-compile-tmp/pass1.imp" 6922 @ 40677: PUSHI #0x00000009 6923 @ 40682: SLABEL 241 6924 @ 40685: LINE 678 "regression-compile-tmp/pass1.imp" 6925 @ 40721: PUSH PRINTSTRING 6926 @ 40724: PUSHS "Included file " 6927 @ 40740: PUSH INCLUDEFILE 6928 @ 40743: CONCAT 6929 @ 40744: PUSHS " does not exist" 6930 @ 40761: CONCAT 6931 @ 40762: ASSPAR 6932 @ 40763: CALL 680 more: newline 6933 @ 40764: LINE 680 "regression-compile-tmp/pass1.imp" 6934 @ 40800: LABEL L_00f3 6935 @ 40803: LINE 680 "regression-compile-tmp/pass1.imp" 6936 @ 40839: PUSH NEWLINE 6937 @ 40842: CALL 681 printstring("*** compilation abandoned ***"); newline 6938 @ 40843: LINE 681 "regression-compile-tmp/pass1.imp" 6939 @ 40879: PUSH PRINTSTRING 6940 @ 40882: PUSHS "*** compilation abandoned ***" 6941 @ 40914: ASSPAR 6942 @ 40915: CALL 6943 @ 40916: LINE 681 "regression-compile-tmp/pass1.imp" 6944 @ 40952: PUSH NEWLINE 6945 @ 40955: CALL 682 %exit %if stream = report 6946 @ 40956: LINE 682 "regression-compile-tmp/pass1.imp" 6947 @ 40992: PUSH STREAM 6948 @ 40995: PUSHI #0x00000000 6949 @ 41000: JUMPIF # L_0007 6950 @ 41004: GOTO L_0004 6951 @ 41007: LOCATE L_0007 683 close output 6952 @ 41010: LINE 683 "regression-compile-tmp/pass1.imp" 6953 @ 41046: PUSH CLOSEOUTPUT 6954 @ 41049: CALL 684 stream = report 6955 @ 41050: LINE 684 "regression-compile-tmp/pass1.imp" 6956 @ 41086: PUSH STREAM 6957 @ 41089: PUSHI #0x00000000 6958 @ 41094: ASSVAL 685 select output(report) 6959 @ 41095: LINE 685 "regression-compile-tmp/pass1.imp" 6960 @ 41131: PUSH SELECTOUTPUT 6961 @ 41134: PUSHI #0x00000000 6962 @ 41139: ASSPAR 6963 @ 41140: CALL 686 %repeat 687 !%signal 15,15 %if diag&4096 # 0 6964 @ 41141: LINE 686 "regression-compile-tmp/pass1.imp" 6965 @ 41177: REPEAT L_0003 6966 @ 41180: LOCATE L_0004 688 %stop 6967 @ 41183: LINE 688 "regression-compile-tmp/pass1.imp" 6968 @ 41219: STOP 689 %end 690 6969 @ 41220: LINE 689 "regression-compile-tmp/pass1.imp" 6970 @ 41256: END _lev0id0_ABANDON {lev=2 --> 1} 691 %routine compile block(%integer level, block tag, dmin, tmax, id) 692 6971 @ 41257: LINE 691 "regression-compile-tmp/pass1.imp" 6972 @ 41293: DEF COMPILEBLOCK (_lev0id0_COMPILEBLOCK) p1=V_00f0 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6973 @ 41317: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 6974 @ 41318: DEF LEVEL p1=V_00f1 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6975 @ 41335: DEF BLOCKTAG p1=V_00f2 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6976 @ 41355: DEF DMIN p1=V_00f3 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6977 @ 41371: DEF TMAX p1=V_00f4 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6978 @ 41387: DEF ID p1=V_00f5 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6979 @ 41401: FINISH ) {lev=2} 693 %integerfnspec gapp 6980 @ 41402: LINE 693 "regression-compile-tmp/pass1.imp" 6981 @ 41438: DEF GAPP (_lev0id0_COMPILEBLOCK_GAPP) p1=V_00f6 a/tf=18 b/format=1 c/ostate=18 type=1 (integer) form=8 (function) special=0 () linkage=0 (auto) spec=1 indirect=1 unass=0 6982 @ 41454: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 6983 @ 41455: FINISH ) {lev=2} 694 %routinespec delete names(%integer quiet) 6984 @ 41456: LINE 694 "regression-compile-tmp/pass1.imp" 6985 @ 41492: DEF DELETENAMES (_lev0id0_COMPILEBLOCK_DELETENAMES) p1=V_00f7 a/tf=7 b/format=0 c/ostate=8 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=1 indirect=0 unass=0 6986 @ 41515: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 6987 @ 41516: DEF QUIET p1=V_00f8 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6988 @ 41533: FINISH ) {lev=2} 695 %routinespec analyse 6989 @ 41534: LINE 695 "regression-compile-tmp/pass1.imp" 6990 @ 41570: DEF ANALYSE (_lev0id0_COMPILEBLOCK_ANALYSE) p1=V_00f8 a/tf=7 b/format=0 c/ostate=8 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=1 indirect=0 unass=0 6991 @ 41589: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 6992 @ 41590: FINISH ) {lev=2} 696 %routinespec compile 697 6993 @ 41591: LINE 696 "regression-compile-tmp/pass1.imp" 6994 @ 41627: DEF COMPILE (_lev0id0_COMPILEBLOCK_COMPILE) p1=V_00f9 a/tf=7 b/format=0 c/ostate=8 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=1 indirect=0 unass=0 6995 @ 41646: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 6996 @ 41647: FINISH ) {lev=2} 698 %integer open; open = closed; !zero if can return from proc 6997 @ 41648: LINE 698 "regression-compile-tmp/pass1.imp" 6998 @ 41684: DEF OPEN p1=V_00fa a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6999 @ 41700: LINE 698 "regression-compile-tmp/pass1.imp" 7000 @ 41736: PUSH OPEN 7001 @ 41739: PUSHI #0x00004000 7002 @ 41744: ASSVAL 699 %integer dbase; dbase = dmax; !dictionary base 7003 @ 41745: LINE 699 "regression-compile-tmp/pass1.imp" 7004 @ 41781: DEF DBASE p1=V_00fb a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7005 @ 41798: LINE 699 "regression-compile-tmp/pass1.imp" 7006 @ 41834: PUSH DBASE 7007 @ 41837: PUSH DMAX 7008 @ 41840: ASSVAL 700 %integer tbase; tbase = tmax; !tag base 7009 @ 41841: LINE 700 "regression-compile-tmp/pass1.imp" 7010 @ 41877: DEF TBASE p1=V_00fc a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7011 @ 41894: LINE 700 "regression-compile-tmp/pass1.imp" 7012 @ 41930: PUSH TBASE 7013 @ 41933: PUSH TMAX 7014 @ 41936: ASSVAL 701 %integer tstart; tstart = tmax 7015 @ 41937: LINE 701 "regression-compile-tmp/pass1.imp" 7016 @ 41973: DEF TSTART p1=V_00fd a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7017 @ 41991: LINE 701 "regression-compile-tmp/pass1.imp" 7018 @ 42027: PUSH TSTART 7019 @ 42030: PUSH TMAX 7020 @ 42033: ASSVAL 702 %integer label; label = 4; !first internal label 7021 @ 42034: LINE 702 "regression-compile-tmp/pass1.imp" 7022 @ 42070: DEF LABEL p1=V_00fe a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7023 @ 42087: LINE 702 "regression-compile-tmp/pass1.imp" 7024 @ 42123: PUSH LABEL 7025 @ 42126: PUSHI #0x00000004 7026 @ 42131: ASSVAL 703 %integer access; access = 1; !non-zero if accessible 7027 @ 42132: LINE 703 "regression-compile-tmp/pass1.imp" 7028 @ 42168: DEF ACCESS p1=V_00ff a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7029 @ 42186: LINE 703 "regression-compile-tmp/pass1.imp" 7030 @ 42222: PUSH ACCESS 7031 @ 42225: PUSHI #0x00000001 7032 @ 42230: ASSVAL 704 %integer inhibit; inhibit = 0; !non-zero inhibits declaratons 705 7033 @ 42231: LINE 704 "regression-compile-tmp/pass1.imp" 7034 @ 42267: DEF INHIBIT p1=V_0100 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7035 @ 42286: LINE 704 "regression-compile-tmp/pass1.imp" 7036 @ 42322: PUSH INHIBIT 7037 @ 42325: PUSHI #0x00000000 7038 @ 42330: ASSVAL 706 %integername bflags; bflags == tag(block tag)_flags 7039 @ 42331: LINE 706 "regression-compile-tmp/pass1.imp" 7040 @ 42367: DEF BFLAGS p1=V_0101 a/tf=12 b/format=1 c/ostate=0 type=1 (integer) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7041 @ 42385: LINE 706 "regression-compile-tmp/pass1.imp" 7042 @ 42421: PUSH BFLAGS 7043 @ 42424: PUSH TAG 7044 @ 42427: PUSH BLOCKTAG 7045 @ 42430: ACCESS 7046 @ 42431: SELECT 3 7047 @ 42434: ASSREF 707 %integer block type; block type = bflags>>4&7 7048 @ 42435: LINE 707 "regression-compile-tmp/pass1.imp" 7049 @ 42471: DEF BLOCKTYPE p1=V_0102 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7050 @ 42492: LINE 707 "regression-compile-tmp/pass1.imp" 7051 @ 42528: PUSH BLOCKTYPE 7052 @ 42531: PUSH BFLAGS 7053 @ 42534: PUSHI #0x00000004 7054 @ 42539: RSH 7055 @ 42540: PUSHI #0x00000007 7056 @ 42545: AND 7057 @ 42546: ASSVAL 708 %integer block form; block form = bflags&15 7058 @ 42547: LINE 708 "regression-compile-tmp/pass1.imp" 7059 @ 42583: DEF BLOCKFORM p1=V_0103 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7060 @ 42604: LINE 708 "regression-compile-tmp/pass1.imp" 7061 @ 42640: PUSH BLOCKFORM 7062 @ 42643: PUSH BFLAGS 7063 @ 42646: PUSHI #0x0000000f 7064 @ 42651: AND 7065 @ 42652: ASSVAL 709 %integer block fm; block fm = tag(block tag)_format 7066 @ 42653: LINE 709 "regression-compile-tmp/pass1.imp" 7067 @ 42689: DEF BLOCKFM p1=V_0104 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7068 @ 42708: LINE 709 "regression-compile-tmp/pass1.imp" 7069 @ 42744: PUSH BLOCKFM 7070 @ 42747: PUSH TAG 7071 @ 42750: PUSH BLOCKTAG 7072 @ 42753: ACCESS 7073 @ 42754: SELECT 2 7074 @ 42757: ASSVAL 710 %integer block otype; block otype = otype 7075 @ 42758: LINE 710 "regression-compile-tmp/pass1.imp" 7076 @ 42794: DEF BLOCKOTYPE p1=V_0105 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7077 @ 42816: LINE 710 "regression-compile-tmp/pass1.imp" 7078 @ 42852: PUSH BLOCKOTYPE 7079 @ 42855: PUSH OTYPE 7080 @ 42858: ASSVAL 711 %integername block app; block app == tag(block tag)_app 712 7081 @ 42859: LINE 711 "regression-compile-tmp/pass1.imp" 7082 @ 42895: DEF BLOCKAPP p1=V_0106 a/tf=12 b/format=1 c/ostate=0 type=1 (integer) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7083 @ 42915: LINE 711 "regression-compile-tmp/pass1.imp" 7084 @ 42951: PUSH BLOCKAPP 7085 @ 42954: PUSH TAG 7086 @ 42957: PUSH BLOCKTAG 7087 @ 42960: ACCESS 7088 @ 42961: SELECT 1 7089 @ 42964: ASSREF 713 %integer l, new app 714 7090 @ 42965: LINE 713 "regression-compile-tmp/pass1.imp" 7091 @ 43001: DEF L p1=V_0107 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7092 @ 43014: DEF NEWAPP p1=V_0108 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 715 %routine fault(%integer n) 716 ! -5 : -1 - warnings 717 ! 1 : 22 - errors 718 7093 @ 43032: LINE 715 "regression-compile-tmp/pass1.imp" 7094 @ 43068: DEF FAULT (_lev0id0_COMPILEBLOCK_FAULT) p1=V_0109 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7095 @ 43085: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 7096 @ 43086: DEF N p1=V_010a a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7097 @ 43099: FINISH ) {lev=3} 719 %switch fm(-5:22) 7098 @ 43100: LINE 719 "regression-compile-tmp/pass1.imp" 7099 @ 43136: PUSHI #0xfffffffb 7100 @ 43141: PUSHI #0x00000016 7101 @ 43146: BOUNDS 7102 @ 43147: DEF FM p1=V_010b a/tf=6 b/format=0 c/ostate=0 type=0 () form=6 (switch) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 720 %integer st 721 7103 @ 43161: LINE 720 "regression-compile-tmp/pass1.imp" 7104 @ 43197: DEF ST p1=V_010c a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 722 %routine print ss 7105 @ 43211: LINE 722 "regression-compile-tmp/pass1.imp" 7106 @ 43247: DEF PRINTSS (_lev0id0_COMPILEBLOCK_FAULT_PRINTSS) p1=V_010d a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7107 @ 43266: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 7108 @ 43267: FINISH ) {lev=4} 723 %integer s, p 7109 @ 43268: LINE 723 "regression-compile-tmp/pass1.imp" 7110 @ 43304: DEF S p1=V_010e a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7111 @ 43317: DEF P p1=V_010f a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 724 %return %if pos = 0 7112 @ 43330: LINE 724 "regression-compile-tmp/pass1.imp" 7113 @ 43366: PUSH POS 7114 @ 43369: PUSHI #0x00000000 7115 @ 43374: JUMPIF # L_0004 7116 @ 43378: RETURN 7117 @ 43379: LOCATE L_0004 725 space 7118 @ 43382: LINE 725 "regression-compile-tmp/pass1.imp" 7119 @ 43418: PUSH SPACE 7120 @ 43421: CALL 726 p = 1 7121 @ 43422: LINE 726 "regression-compile-tmp/pass1.imp" 7122 @ 43458: PUSH P 7123 @ 43461: PUSHI #0x00000001 7124 @ 43466: ASSVAL 727 %cycle 7125 @ 43467: LINE 727 "regression-compile-tmp/pass1.imp" 7126 @ 43503: LOCATE L_0003 728 printsymbol(marker) %if p = pos1 7127 @ 43506: LINE 728 "regression-compile-tmp/pass1.imp" 7128 @ 43542: PUSH P 7129 @ 43545: PUSH POS1 7130 @ 43548: JUMPIF # L_0007 7131 @ 43552: PUSH PRINTSYMBOL 7132 @ 43555: PUSHI #0x0000005e 7133 @ 43560: ASSPAR 7134 @ 43561: CALL 7135 @ 43562: LOCATE L_0007 729 %exit %if p = pos 7136 @ 43565: LINE 729 "regression-compile-tmp/pass1.imp" 7137 @ 43601: PUSH P 7138 @ 43604: PUSH POS 7139 @ 43607: JUMPIF # L_0007 7140 @ 43611: GOTO L_0004 7141 @ 43614: LOCATE L_0007 730 s = char(p); p = p+1 7142 @ 43617: LINE 730 "regression-compile-tmp/pass1.imp" 7143 @ 43653: PUSH S 7144 @ 43656: PUSH CHAR 7145 @ 43659: PUSH P 7146 @ 43662: ACCESS 7147 @ 43663: ASSVAL 7148 @ 43664: LINE 730 "regression-compile-tmp/pass1.imp" 7149 @ 43700: PUSH P 7150 @ 43703: PUSH P 7151 @ 43706: PUSHI #0x00000001 7152 @ 43711: ADD 7153 @ 43712: ASSVAL 731 %exit %if s = nl %or (s='%' %and p = pos) 7154 @ 43713: LINE 731 "regression-compile-tmp/pass1.imp" 7155 @ 43749: PUSH S 7156 @ 43752: PUSHI #0x0000000a 7157 @ 43757: JUMPIF = L_0008 7158 @ 43761: PUSH S 7159 @ 43764: PUSHI #0x00000025 7160 @ 43769: JUMPIF # L_0007 7161 @ 43773: PUSH P 7162 @ 43776: PUSH POS 7163 @ 43779: JUMPIF # L_0007 7164 @ 43783: LOCATE L_0008 7165 @ 43786: GOTO L_0004 7166 @ 43789: LOCATE L_0007 732 %if s < ' ' %start; !beware of tabs 7167 @ 43792: LINE 732 "regression-compile-tmp/pass1.imp" 7168 @ 43828: PUSH S 7169 @ 43831: PUSHI #0x00000020 7170 @ 43836: JUMPIF >= L_0007 733 %if s = ff %then s = nl %else s = ' ' 7171 @ 43840: LINE 733 "regression-compile-tmp/pass1.imp" 7172 @ 43876: PUSH S 7173 @ 43879: PUSHI #0x0000000c 7174 @ 43884: JUMPIF # L_000a 7175 @ 43888: PUSH S 7176 @ 43891: PUSHI #0x0000000a 7177 @ 43896: ASSVAL 7178 @ 43897: GOTO L_0009 7179 @ 43900: LOCATE L_000a 7180 @ 43903: PUSH S 7181 @ 43906: PUSHI #0x00000020 7182 @ 43911: ASSVAL 7183 @ 43912: LOCATE L_0009 734 %finish 7184 @ 43915: LINE 734 "regression-compile-tmp/pass1.imp" 7185 @ 43951: LOCATE L_0007 735 printsymbol(s) 7186 @ 43954: LINE 735 "regression-compile-tmp/pass1.imp" 7187 @ 43990: PUSH PRINTSYMBOL 7188 @ 43993: PUSH S 7189 @ 43996: ASSPAR 7190 @ 43997: CALL 736 %repeat 7191 @ 43998: LINE 736 "regression-compile-tmp/pass1.imp" 7192 @ 44034: REPEAT L_0003 7193 @ 44037: LOCATE L_0004 737 pos = 0 %if list <= 0 7194 @ 44040: LINE 737 "regression-compile-tmp/pass1.imp" 7195 @ 44076: PUSH LIST 7196 @ 44079: PUSHI #0x00000000 7197 @ 44084: JUMPIF > L_0004 7198 @ 44088: PUSH POS 7199 @ 44091: PUSHI #0x00000000 7200 @ 44096: ASSVAL 7201 @ 44097: LOCATE L_0004 738 %end 739 7202 @ 44100: LINE 738 "regression-compile-tmp/pass1.imp" 7203 @ 44136: END _lev0id0_COMPILEBLOCK_FAULT_PRINTSS {lev=4 --> 3} 740 pos1 = pos2 %if pos2 > pos1 7204 @ 44137: LINE 740 "regression-compile-tmp/pass1.imp" 7205 @ 44173: PUSH POS2 7206 @ 44176: PUSH POS1 7207 @ 44179: JUMPIF <= L_0004 7208 @ 44183: PUSH POS1 7209 @ 44186: PUSH POS2 7210 @ 44189: ASSVAL 7211 @ 44190: LOCATE L_0004 741 newline %if sym # nl 7212 @ 44193: LINE 741 "regression-compile-tmp/pass1.imp" 7213 @ 44229: PUSH SYM 7214 @ 44232: PUSHI #0x0000000a 7215 @ 44237: JUMPIF = L_0004 7216 @ 44241: PUSH NEWLINE 7217 @ 44244: CALL 7218 @ 44245: LOCATE L_0004 742 st = report 7219 @ 44248: LINE 742 "regression-compile-tmp/pass1.imp" 7220 @ 44284: PUSH ST 7221 @ 44287: PUSHI #0x00000000 7222 @ 44292: ASSVAL 743 st = listing %if n = -3; !don't report unused on the console 7223 @ 44293: LINE 743 "regression-compile-tmp/pass1.imp" 7224 @ 44329: PUSH N 7225 @ 44332: PUSHI #0x00000003 7226 @ 44337: NEGATE 7227 @ 44338: JUMPIF # L_0004 7228 @ 44342: PUSH ST 7229 @ 44345: PUSHI #0x00000002 7230 @ 44350: ASSVAL 7231 @ 44351: LOCATE L_0004 744 %cycle 7232 @ 44354: LINE 744 "regression-compile-tmp/pass1.imp" 7233 @ 44390: LOCATE L_0003 745 select output(st) 7234 @ 44393: LINE 745 "regression-compile-tmp/pass1.imp" 7235 @ 44429: PUSH SELECTOUTPUT 7236 @ 44432: PUSH ST 7237 @ 44435: ASSPAR 7238 @ 44436: CALL 746 %if n < 0 %then printsymbol('?') %and pos1 = 0 %else printsymbol('*') 7239 @ 44437: LINE 746 "regression-compile-tmp/pass1.imp" 7240 @ 44473: PUSH N 7241 @ 44476: PUSHI #0x00000000 7242 @ 44481: JUMPIF >= L_0007 7243 @ 44485: PUSH PRINTSYMBOL 7244 @ 44488: PUSHI #0x0000003f 7245 @ 44493: ASSPAR 7246 @ 44494: CALL 7247 @ 44495: PUSH POS1 7248 @ 44498: PUSHI #0x00000000 7249 @ 44503: ASSVAL 7250 @ 44504: GOTO L_0006 7251 @ 44507: LOCATE L_0007 7252 @ 44510: PUSH PRINTSYMBOL 7253 @ 44513: PUSHI #0x0000002a 7254 @ 44518: ASSPAR 7255 @ 44519: CALL 7256 @ 44520: LOCATE L_0006 747 %if st # report %start 7257 @ 44523: LINE 747 "regression-compile-tmp/pass1.imp" 7258 @ 44559: PUSH ST 7259 @ 44562: PUSHI #0x00000000 7260 @ 44567: JUMPIF = L_0007 748 %if list <= 0 %and pos1 # 0 %start 7261 @ 44571: LINE 748 "regression-compile-tmp/pass1.imp" 7262 @ 44607: PUSH LIST 7263 @ 44610: PUSHI #0x00000000 7264 @ 44615: JUMPIF > L_000a 7265 @ 44619: PUSH POS1 7266 @ 44622: PUSHI #0x00000000 7267 @ 44627: JUMPIF = L_000a 749 spaces(pos1+margin); printstring(" ! ") 7268 @ 44631: LINE 749 "regression-compile-tmp/pass1.imp" 7269 @ 44667: PUSH SPACES 7270 @ 44670: PUSH POS1 7271 @ 44673: PUSH MARGIN 7272 @ 44676: ADD 7273 @ 44677: ASSPAR 7274 @ 44678: CALL 7275 @ 44679: LINE 749 "regression-compile-tmp/pass1.imp" 7276 @ 44715: PUSH PRINTSTRING 7277 @ 44718: PUSHS " ! " 7278 @ 44728: ASSPAR 7279 @ 44729: CALL 750 %finish 7280 @ 44730: LINE 750 "regression-compile-tmp/pass1.imp" 7281 @ 44766: LOCATE L_000a 751 %finish %else %start 7282 @ 44769: LINE 751 "regression-compile-tmp/pass1.imp" 7283 @ 44805: GOTO L_0006 7284 @ 44808: LOCATE L_0007 752 printstring(include file) %if include # 0 7285 @ 44811: LINE 752 "regression-compile-tmp/pass1.imp" 7286 @ 44847: PUSH INCLUDE 7287 @ 44850: PUSHI #0x00000000 7288 @ 44855: JUMPIF = L_000a 7289 @ 44859: PUSH PRINTSTRING 7290 @ 44862: PUSH INCLUDEFILE 7291 @ 44865: ASSPAR 7292 @ 44866: CALL 7293 @ 44867: LOCATE L_000a 753 write(lines, 4); printsymbol(csym); space 7294 @ 44870: LINE 753 "regression-compile-tmp/pass1.imp" 7295 @ 44906: PUSH WRITE 7296 @ 44909: PUSH LINES 7297 @ 44912: ASSPAR 7298 @ 44913: PUSHI #0x00000004 7299 @ 44918: ASSPAR 7300 @ 44919: CALL 7301 @ 44920: LINE 753 "regression-compile-tmp/pass1.imp" 7302 @ 44956: PUSH PRINTSYMBOL 7303 @ 44959: PUSH CSYM 7304 @ 44962: ASSPAR 7305 @ 44963: CALL 7306 @ 44964: LINE 753 "regression-compile-tmp/pass1.imp" 7307 @ 45000: PUSH SPACE 7308 @ 45003: CALL 754 %finish 7309 @ 45004: LINE 754 "regression-compile-tmp/pass1.imp" 7310 @ 45040: LOCATE L_0006 755 ->fm(n) %if -5 <= n %and n <= 22 7311 @ 45043: LINE 755 "regression-compile-tmp/pass1.imp" 7312 @ 45079: PUSHI #0x00000005 7313 @ 45084: NEGATE 7314 @ 45085: PUSH N 7315 @ 45088: JUMPIF > L_0007 7316 @ 45092: PUSH N 7317 @ 45095: PUSHI #0x00000016 7318 @ 45100: JUMPIF > L_0007 7319 @ 45104: PUSH N 7320 @ 45107: SJUMP 267 7321 @ 45110: LOCATE L_0007 756 printstring("fault"); write(n, 2); ->ps 757 7322 @ 45113: LINE 756 "regression-compile-tmp/pass1.imp" 7323 @ 45149: PUSH PRINTSTRING 7324 @ 45152: PUSHS "fault" 7325 @ 45159: ASSPAR 7326 @ 45160: CALL 7327 @ 45161: LINE 756 "regression-compile-tmp/pass1.imp" 7328 @ 45197: PUSH WRITE 7329 @ 45200: PUSH N 7330 @ 45203: ASSPAR 7331 @ 45204: PUSHI #0x00000002 7332 @ 45209: ASSPAR 7333 @ 45210: CALL 7334 @ 45211: LINE 756 "regression-compile-tmp/pass1.imp" 7335 @ 45247: JUMP L_010e 758 fm(-5): printstring("Dubious statement"); dubious = 0; ->psd 7336 @ 45250: LINE 758 "regression-compile-tmp/pass1.imp" 7337 @ 45286: PUSHI #0xfffffffb 7338 @ 45291: SLABEL 267 7339 @ 45294: LINE 758 "regression-compile-tmp/pass1.imp" 7340 @ 45330: PUSH PRINTSTRING 7341 @ 45333: PUSHS "Dubious statement" 7342 @ 45352: ASSPAR 7343 @ 45353: CALL 7344 @ 45354: LINE 758 "regression-compile-tmp/pass1.imp" 7345 @ 45390: PUSH DUBIOUS 7346 @ 45393: PUSHI #0x00000000 7347 @ 45398: ASSVAL 7348 @ 45399: LINE 758 "regression-compile-tmp/pass1.imp" 7349 @ 45435: JUMP L_010f 759 fm(-4): printstring("Non-local") 7350 @ 45438: LINE 759 "regression-compile-tmp/pass1.imp" 7351 @ 45474: PUSHI #0xfffffffc 7352 @ 45479: SLABEL 267 7353 @ 45482: LINE 759 "regression-compile-tmp/pass1.imp" 7354 @ 45518: PUSH PRINTSTRING 7355 @ 45521: PUSHS "Non-local" 7356 @ 45532: ASSPAR 7357 @ 45533: CALL 760 pos1 = for warn; for warn = 0; ->ps 7358 @ 45534: LINE 760 "regression-compile-tmp/pass1.imp" 7359 @ 45570: PUSH POS1 7360 @ 45573: PUSH FORWARN 7361 @ 45576: ASSVAL 7362 @ 45577: LINE 760 "regression-compile-tmp/pass1.imp" 7363 @ 45613: PUSH FORWARN 7364 @ 45616: PUSHI #0x00000000 7365 @ 45621: ASSVAL 7366 @ 45622: LINE 760 "regression-compile-tmp/pass1.imp" 7367 @ 45658: JUMP L_010e 761 fm(-3): print ident(x, 0); printstring(" unused"); ->nps 7368 @ 45661: LINE 761 "regression-compile-tmp/pass1.imp" 7369 @ 45697: PUSHI #0xfffffffd 7370 @ 45702: SLABEL 267 7371 @ 45705: LINE 761 "regression-compile-tmp/pass1.imp" 7372 @ 45741: PUSH PRINTIDENT 7373 @ 45744: PUSH X 7374 @ 45747: ASSPAR 7375 @ 45748: PUSHI #0x00000000 7376 @ 45753: ASSPAR 7377 @ 45754: CALL 7378 @ 45755: LINE 761 "regression-compile-tmp/pass1.imp" 7379 @ 45791: PUSH PRINTSTRING 7380 @ 45794: PUSHS " unused" 7381 @ 45803: ASSPAR 7382 @ 45804: CALL 7383 @ 45805: LINE 761 "regression-compile-tmp/pass1.imp" 7384 @ 45841: JUMP L_0110 762 fm(-2): printstring("""}"""); ->miss 7385 @ 45844: LINE 762 "regression-compile-tmp/pass1.imp" 7386 @ 45880: PUSHI #0xfffffffe 7387 @ 45885: SLABEL 267 7388 @ 45888: LINE 762 "regression-compile-tmp/pass1.imp" 7389 @ 45924: PUSH PRINTSTRING 7390 @ 45927: PUSHS "\"}\"" 7391 @ 45932: ASSPAR 7392 @ 45933: CALL 7393 @ 45934: LINE 762 "regression-compile-tmp/pass1.imp" 7394 @ 45970: JUMP L_0111 763 fm(-1): printstring("access"); ->psd 7395 @ 45973: LINE 763 "regression-compile-tmp/pass1.imp" 7396 @ 46009: PUSHI #0xffffffff 7397 @ 46014: SLABEL 267 7398 @ 46017: LINE 763 "regression-compile-tmp/pass1.imp" 7399 @ 46053: PUSH PRINTSTRING 7400 @ 46056: PUSHS "access" 7401 @ 46064: ASSPAR 7402 @ 46065: CALL 7403 @ 46066: LINE 763 "regression-compile-tmp/pass1.imp" 7404 @ 46102: JUMP L_010f 764 fm(0): printstring("form"); ->ps 7405 @ 46105: LINE 764 "regression-compile-tmp/pass1.imp" 7406 @ 46141: PUSHI #0x00000000 7407 @ 46146: SLABEL 267 7408 @ 46149: LINE 764 "regression-compile-tmp/pass1.imp" 7409 @ 46185: PUSH PRINTSTRING 7410 @ 46188: PUSHS "form" 7411 @ 46194: ASSPAR 7412 @ 46195: CALL 7413 @ 46196: LINE 764 "regression-compile-tmp/pass1.imp" 7414 @ 46232: JUMP L_010e 765 fm(1): printstring("atom"); ->ps 7415 @ 46235: LINE 765 "regression-compile-tmp/pass1.imp" 7416 @ 46271: PUSHI #0x00000001 7417 @ 46276: SLABEL 267 7418 @ 46279: LINE 765 "regression-compile-tmp/pass1.imp" 7419 @ 46315: PUSH PRINTSTRING 7420 @ 46318: PUSHS "atom" 7421 @ 46324: ASSPAR 7422 @ 46325: CALL 7423 @ 46326: LINE 765 "regression-compile-tmp/pass1.imp" 7424 @ 46362: JUMP L_010e 766 fm(2): printstring("not declared"); ->ps 7425 @ 46365: LINE 766 "regression-compile-tmp/pass1.imp" 7426 @ 46401: PUSHI #0x00000002 7427 @ 46406: SLABEL 267 7428 @ 46409: LINE 766 "regression-compile-tmp/pass1.imp" 7429 @ 46445: PUSH PRINTSTRING 7430 @ 46448: PUSHS "not declared" 7431 @ 46462: ASSPAR 7432 @ 46463: CALL 7433 @ 46464: LINE 766 "regression-compile-tmp/pass1.imp" 7434 @ 46500: JUMP L_010e 767 fm(3): printstring("too complex"); ->ps 7435 @ 46503: LINE 767 "regression-compile-tmp/pass1.imp" 7436 @ 46539: PUSHI #0x00000003 7437 @ 46544: SLABEL 267 7438 @ 46547: LINE 767 "regression-compile-tmp/pass1.imp" 7439 @ 46583: PUSH PRINTSTRING 7440 @ 46586: PUSHS "too complex" 7441 @ 46599: ASSPAR 7442 @ 46600: CALL 7443 @ 46601: LINE 767 "regression-compile-tmp/pass1.imp" 7444 @ 46637: JUMP L_010e 768 fm(4): printstring("duplicate "); Print Ident(x, 0); ->ps 7445 @ 46640: LINE 768 "regression-compile-tmp/pass1.imp" 7446 @ 46676: PUSHI #0x00000004 7447 @ 46681: SLABEL 267 7448 @ 46684: LINE 768 "regression-compile-tmp/pass1.imp" 7449 @ 46720: PUSH PRINTSTRING 7450 @ 46723: PUSHS "duplicate " 7451 @ 46735: ASSPAR 7452 @ 46736: CALL 7453 @ 46737: LINE 768 "regression-compile-tmp/pass1.imp" 7454 @ 46773: PUSH PRINTIDENT 7455 @ 46776: PUSH X 7456 @ 46779: ASSPAR 7457 @ 46780: PUSHI #0x00000000 7458 @ 46785: ASSPAR 7459 @ 46786: CALL 7460 @ 46787: LINE 768 "regression-compile-tmp/pass1.imp" 7461 @ 46823: JUMP L_010e 769 fm(5): printstring("type"); ->ps 7462 @ 46826: LINE 769 "regression-compile-tmp/pass1.imp" 7463 @ 46862: PUSHI #0x00000005 7464 @ 46867: SLABEL 267 7465 @ 46870: LINE 769 "regression-compile-tmp/pass1.imp" 7466 @ 46906: PUSH PRINTSTRING 7467 @ 46909: PUSHS "type" 7468 @ 46915: ASSPAR 7469 @ 46916: CALL 7470 @ 46917: LINE 769 "regression-compile-tmp/pass1.imp" 7471 @ 46953: JUMP L_010e 770 fm(6): printstring("match"); ->psd 7472 @ 46956: LINE 770 "regression-compile-tmp/pass1.imp" 7473 @ 46992: PUSHI #0x00000006 7474 @ 46997: SLABEL 267 7475 @ 47000: LINE 770 "regression-compile-tmp/pass1.imp" 7476 @ 47036: PUSH PRINTSTRING 7477 @ 47039: PUSHS "match" 7478 @ 47046: ASSPAR 7479 @ 47047: CALL 7480 @ 47048: LINE 770 "regression-compile-tmp/pass1.imp" 7481 @ 47084: JUMP L_010f 771 fm(7): printstring("context"); ->psd 7482 @ 47087: LINE 771 "regression-compile-tmp/pass1.imp" 7483 @ 47123: PUSHI #0x00000007 7484 @ 47128: SLABEL 267 7485 @ 47131: LINE 771 "regression-compile-tmp/pass1.imp" 7486 @ 47167: PUSH PRINTSTRING 7487 @ 47170: PUSHS "context" 7488 @ 47179: ASSPAR 7489 @ 47180: CALL 7490 @ 47181: LINE 771 "regression-compile-tmp/pass1.imp" 7491 @ 47217: JUMP L_010f 772 fm(8): printstring("%cycle"); ->miss 7492 @ 47220: LINE 772 "regression-compile-tmp/pass1.imp" 7493 @ 47256: PUSHI #0x00000008 7494 @ 47261: SLABEL 267 7495 @ 47264: LINE 772 "regression-compile-tmp/pass1.imp" 7496 @ 47300: PUSH PRINTSTRING 7497 @ 47303: PUSHS "%cycle" 7498 @ 47311: ASSPAR 7499 @ 47312: CALL 7500 @ 47313: LINE 772 "regression-compile-tmp/pass1.imp" 7501 @ 47349: JUMP L_0111 773 fm(9): printstring("%start"); ->miss 7502 @ 47352: LINE 773 "regression-compile-tmp/pass1.imp" 7503 @ 47388: PUSHI #0x00000009 7504 @ 47393: SLABEL 267 7505 @ 47396: LINE 773 "regression-compile-tmp/pass1.imp" 7506 @ 47432: PUSH PRINTSTRING 7507 @ 47435: PUSHS "%start" 7508 @ 47443: ASSPAR 7509 @ 47444: CALL 7510 @ 47445: LINE 773 "regression-compile-tmp/pass1.imp" 7511 @ 47481: JUMP L_0111 774 fm(10): printstring("size"); write(lit, 1) %if pos1 = 0; ->ps 7512 @ 47484: LINE 774 "regression-compile-tmp/pass1.imp" 7513 @ 47520: PUSHI #0x0000000a 7514 @ 47525: SLABEL 267 7515 @ 47528: LINE 774 "regression-compile-tmp/pass1.imp" 7516 @ 47564: PUSH PRINTSTRING 7517 @ 47567: PUSHS "size" 7518 @ 47573: ASSPAR 7519 @ 47574: CALL 7520 @ 47575: LINE 774 "regression-compile-tmp/pass1.imp" 7521 @ 47611: PUSH POS1 7522 @ 47614: PUSHI #0x00000000 7523 @ 47619: JUMPIF # L_0007 7524 @ 47623: PUSH WRITE 7525 @ 47626: PUSH LIT 7526 @ 47629: ASSPAR 7527 @ 47630: PUSHI #0x00000001 7528 @ 47635: ASSPAR 7529 @ 47636: CALL 7530 @ 47637: LOCATE L_0007 7531 @ 47640: LINE 774 "regression-compile-tmp/pass1.imp" 7532 @ 47676: JUMP L_010e 775 fm(11): printstring("bounds") 7533 @ 47679: LINE 775 "regression-compile-tmp/pass1.imp" 7534 @ 47715: PUSHI #0x0000000b 7535 @ 47720: SLABEL 267 7536 @ 47723: LINE 775 "regression-compile-tmp/pass1.imp" 7537 @ 47759: PUSH PRINTSTRING 7538 @ 47762: PUSHS "bounds" 7539 @ 47770: ASSPAR 7540 @ 47771: CALL 776 write(ocount, 1) %unless ocount < 0; ->ps 7541 @ 47772: LINE 776 "regression-compile-tmp/pass1.imp" 7542 @ 47808: PUSH OCOUNT 7543 @ 47811: PUSHI #0x00000000 7544 @ 47816: JUMPIF < L_0007 7545 @ 47820: PUSH WRITE 7546 @ 47823: PUSH OCOUNT 7547 @ 47826: ASSPAR 7548 @ 47827: PUSHI #0x00000001 7549 @ 47832: ASSPAR 7550 @ 47833: CALL 7551 @ 47834: LOCATE L_0007 7552 @ 47837: LINE 776 "regression-compile-tmp/pass1.imp" 7553 @ 47873: JUMP L_010e 777 fm(12): printstring("index"); ->ps 7554 @ 47876: LINE 777 "regression-compile-tmp/pass1.imp" 7555 @ 47912: PUSHI #0x0000000c 7556 @ 47917: SLABEL 267 7557 @ 47920: LINE 777 "regression-compile-tmp/pass1.imp" 7558 @ 47956: PUSH PRINTSTRING 7559 @ 47959: PUSHS "index" 7560 @ 47966: ASSPAR 7561 @ 47967: CALL 7562 @ 47968: LINE 777 "regression-compile-tmp/pass1.imp" 7563 @ 48004: JUMP L_010e 778 fm(13): printstring("order"); ->psd 7564 @ 48007: LINE 778 "regression-compile-tmp/pass1.imp" 7565 @ 48043: PUSHI #0x0000000d 7566 @ 48048: SLABEL 267 7567 @ 48051: LINE 778 "regression-compile-tmp/pass1.imp" 7568 @ 48087: PUSH PRINTSTRING 7569 @ 48090: PUSHS "order" 7570 @ 48097: ASSPAR 7571 @ 48098: CALL 7572 @ 48099: LINE 778 "regression-compile-tmp/pass1.imp" 7573 @ 48135: JUMP L_010f 779 fm(14): printstring("not a location"); ->ps 7574 @ 48138: LINE 779 "regression-compile-tmp/pass1.imp" 7575 @ 48174: PUSHI #0x0000000e 7576 @ 48179: SLABEL 267 7577 @ 48182: LINE 779 "regression-compile-tmp/pass1.imp" 7578 @ 48218: PUSH PRINTSTRING 7579 @ 48221: PUSHS "not a location" 7580 @ 48237: ASSPAR 7581 @ 48238: CALL 7582 @ 48239: LINE 779 "regression-compile-tmp/pass1.imp" 7583 @ 48275: JUMP L_010e 780 fm(15): printstring("%begin"); ->miss 7584 @ 48278: LINE 780 "regression-compile-tmp/pass1.imp" 7585 @ 48314: PUSHI #0x0000000f 7586 @ 48319: SLABEL 267 7587 @ 48322: LINE 780 "regression-compile-tmp/pass1.imp" 7588 @ 48358: PUSH PRINTSTRING 7589 @ 48361: PUSHS "%begin" 7590 @ 48369: ASSPAR 7591 @ 48370: CALL 7592 @ 48371: LINE 780 "regression-compile-tmp/pass1.imp" 7593 @ 48407: JUMP L_0111 781 fm(16): printstring("%end"); ->miss 7594 @ 48410: LINE 781 "regression-compile-tmp/pass1.imp" 7595 @ 48446: PUSHI #0x00000010 7596 @ 48451: SLABEL 267 7597 @ 48454: LINE 781 "regression-compile-tmp/pass1.imp" 7598 @ 48490: PUSH PRINTSTRING 7599 @ 48493: PUSHS "%end" 7600 @ 48499: ASSPAR 7601 @ 48500: CALL 7602 @ 48501: LINE 781 "regression-compile-tmp/pass1.imp" 7603 @ 48537: JUMP L_0111 782 fm(17): printstring("%repeat"); ->miss 7604 @ 48540: LINE 782 "regression-compile-tmp/pass1.imp" 7605 @ 48576: PUSHI #0x00000011 7606 @ 48581: SLABEL 267 7607 @ 48584: LINE 782 "regression-compile-tmp/pass1.imp" 7608 @ 48620: PUSH PRINTSTRING 7609 @ 48623: PUSHS "%repeat" 7610 @ 48632: ASSPAR 7611 @ 48633: CALL 7612 @ 48634: LINE 782 "regression-compile-tmp/pass1.imp" 7613 @ 48670: JUMP L_0111 783 fm(18): printstring("%finish"); ->miss 7614 @ 48673: LINE 783 "regression-compile-tmp/pass1.imp" 7615 @ 48709: PUSHI #0x00000012 7616 @ 48714: SLABEL 267 7617 @ 48717: LINE 783 "regression-compile-tmp/pass1.imp" 7618 @ 48753: PUSH PRINTSTRING 7619 @ 48756: PUSHS "%finish" 7620 @ 48765: ASSPAR 7621 @ 48766: CALL 7622 @ 48767: LINE 783 "regression-compile-tmp/pass1.imp" 7623 @ 48803: JUMP L_0111 784 fm(19): printstring("result"); ->miss 7624 @ 48806: LINE 784 "regression-compile-tmp/pass1.imp" 7625 @ 48842: PUSHI #0x00000013 7626 @ 48847: SLABEL 267 7627 @ 48850: LINE 784 "regression-compile-tmp/pass1.imp" 7628 @ 48886: PUSH PRINTSTRING 7629 @ 48889: PUSHS "result" 7630 @ 48897: ASSPAR 7631 @ 48898: CALL 7632 @ 48899: LINE 784 "regression-compile-tmp/pass1.imp" 7633 @ 48935: JUMP L_0111 785 fm(20): printsymbol('"'); print ident(x, 0); printsymbol('"'); ->miss 7634 @ 48938: LINE 785 "regression-compile-tmp/pass1.imp" 7635 @ 48974: PUSHI #0x00000014 7636 @ 48979: SLABEL 267 7637 @ 48982: LINE 785 "regression-compile-tmp/pass1.imp" 7638 @ 49018: PUSH PRINTSYMBOL 7639 @ 49021: PUSHI #0x00000022 7640 @ 49026: ASSPAR 7641 @ 49027: CALL 7642 @ 49028: LINE 785 "regression-compile-tmp/pass1.imp" 7643 @ 49064: PUSH PRINTIDENT 7644 @ 49067: PUSH X 7645 @ 49070: ASSPAR 7646 @ 49071: PUSHI #0x00000000 7647 @ 49076: ASSPAR 7648 @ 49077: CALL 7649 @ 49078: LINE 785 "regression-compile-tmp/pass1.imp" 7650 @ 49114: PUSH PRINTSYMBOL 7651 @ 49117: PUSHI #0x00000022 7652 @ 49122: ASSPAR 7653 @ 49123: CALL 7654 @ 49124: LINE 785 "regression-compile-tmp/pass1.imp" 7655 @ 49160: JUMP L_0111 786 fm(21): printstring("context "); print ident(this, 0); ->ps 7656 @ 49163: LINE 786 "regression-compile-tmp/pass1.imp" 7657 @ 49199: PUSHI #0x00000015 7658 @ 49204: SLABEL 267 7659 @ 49207: LINE 786 "regression-compile-tmp/pass1.imp" 7660 @ 49243: PUSH PRINTSTRING 7661 @ 49246: PUSHS "context " 7662 @ 49256: ASSPAR 7663 @ 49257: CALL 7664 @ 49258: LINE 786 "regression-compile-tmp/pass1.imp" 7665 @ 49294: PUSH PRINTIDENT 7666 @ 49297: PUSH THIS 7667 @ 49300: ASSPAR 7668 @ 49301: PUSHI #0x00000000 7669 @ 49306: ASSPAR 7670 @ 49307: CALL 7671 @ 49308: LINE 786 "regression-compile-tmp/pass1.imp" 7672 @ 49344: JUMP L_010e 787 fm(22): printstring("format"); ->ps 788 7673 @ 49347: LINE 787 "regression-compile-tmp/pass1.imp" 7674 @ 49383: PUSHI #0x00000016 7675 @ 49388: SLABEL 267 7676 @ 49391: LINE 787 "regression-compile-tmp/pass1.imp" 7677 @ 49427: PUSH PRINTSTRING 7678 @ 49430: PUSHS "format" 7679 @ 49438: ASSPAR 7680 @ 49439: CALL 7681 @ 49440: LINE 787 "regression-compile-tmp/pass1.imp" 7682 @ 49476: JUMP L_010e 789 miss: printstring(" missing"); ->nps 7683 @ 49479: LINE 789 "regression-compile-tmp/pass1.imp" 7684 @ 49515: LABEL L_0111 7685 @ 49518: LINE 789 "regression-compile-tmp/pass1.imp" 7686 @ 49554: PUSH PRINTSTRING 7687 @ 49557: PUSHS " missing" 7688 @ 49567: ASSPAR 7689 @ 49568: CALL 7690 @ 49569: LINE 789 "regression-compile-tmp/pass1.imp" 7691 @ 49605: JUMP L_0110 790 psd: pos1 = 0 7692 @ 49608: LINE 790 "regression-compile-tmp/pass1.imp" 7693 @ 49644: LABEL L_010f 7694 @ 49647: LINE 790 "regression-compile-tmp/pass1.imp" 7695 @ 49683: PUSH POS1 7696 @ 49686: PUSHI #0x00000000 7697 @ 49691: ASSVAL 791 ps: print ss 7698 @ 49692: LINE 791 "regression-compile-tmp/pass1.imp" 7699 @ 49728: LABEL L_010e 7700 @ 49731: LINE 791 "regression-compile-tmp/pass1.imp" 7701 @ 49767: PUSH PRINTSS 7702 @ 49770: CALL 792 nps: newline 7703 @ 49771: LINE 792 "regression-compile-tmp/pass1.imp" 7704 @ 49807: LABEL L_0110 7705 @ 49810: LINE 792 "regression-compile-tmp/pass1.imp" 7706 @ 49846: PUSH NEWLINE 7707 @ 49849: CALL 793 %exit %if st = listing 7708 @ 49850: LINE 793 "regression-compile-tmp/pass1.imp" 7709 @ 49886: PUSH ST 7710 @ 49889: PUSHI #0x00000002 7711 @ 49894: JUMPIF # L_0007 7712 @ 49898: GOTO L_0004 7713 @ 49901: LOCATE L_0007 794 st = listing 7714 @ 49904: LINE 794 "regression-compile-tmp/pass1.imp" 7715 @ 49940: PUSH ST 7716 @ 49943: PUSHI #0x00000002 7717 @ 49948: ASSVAL 795 %repeat 7718 @ 49949: LINE 795 "regression-compile-tmp/pass1.imp" 7719 @ 49985: REPEAT L_0003 7720 @ 49988: LOCATE L_0004 796 %if n >= 0 %start 797 !%signal 15,15 %if diag&4096 # 0 7721 @ 49991: LINE 796 "regression-compile-tmp/pass1.imp" 7722 @ 50027: PUSH N 7723 @ 50030: PUSHI #0x00000000 7724 @ 50035: JUMPIF < L_0004 798 %if n # 13 %start; !order is fairly safe 7725 @ 50039: LINE 798 "regression-compile-tmp/pass1.imp" 7726 @ 50075: PUSH N 7727 @ 50078: PUSHI #0x0000000d 7728 @ 50083: JUMPIF = L_0007 799 ocount = -1 7729 @ 50087: LINE 799 "regression-compile-tmp/pass1.imp" 7730 @ 50123: PUSH OCOUNT 7731 @ 50126: PUSHI #0x00000001 7732 @ 50131: NEGATE 7733 @ 50132: ASSVAL 800 gg = 0 7734 @ 50133: LINE 800 "regression-compile-tmp/pass1.imp" 7735 @ 50169: PUSH GG 7736 @ 50172: PUSHI #0x00000000 7737 @ 50177: ASSVAL 801 copy = 0; quote = 0 7738 @ 50178: LINE 801 "regression-compile-tmp/pass1.imp" 7739 @ 50214: PUSH COPY 7740 @ 50217: PUSHI #0x00000000 7741 @ 50222: ASSVAL 7742 @ 50223: LINE 801 "regression-compile-tmp/pass1.imp" 7743 @ 50259: PUSH QUOTE 7744 @ 50262: PUSHI #0x00000000 7745 @ 50267: ASSVAL 802 search base = 0; escape class = 0 7746 @ 50268: LINE 802 "regression-compile-tmp/pass1.imp" 7747 @ 50304: PUSH SEARCHBASE 7748 @ 50307: PUSHI #0x00000000 7749 @ 50312: ASSVAL 7750 @ 50313: LINE 802 "regression-compile-tmp/pass1.imp" 7751 @ 50349: PUSH ESCAPECLASS 7752 @ 50352: PUSHI #0x00000000 7753 @ 50357: ASSVAL 803 gg = 0 7754 @ 50358: LINE 803 "regression-compile-tmp/pass1.imp" 7755 @ 50394: PUSH GG 7756 @ 50397: PUSHI #0x00000000 7757 @ 50402: ASSVAL 804 %finish 7758 @ 50403: LINE 804 "regression-compile-tmp/pass1.imp" 7759 @ 50439: LOCATE L_0007 805 faulty = faulty+1 806 807 !check that there haven't been too many faults 808 7760 @ 50442: LINE 805 "regression-compile-tmp/pass1.imp" 7761 @ 50478: PUSH FAULTY 7762 @ 50481: PUSH FAULTY 7763 @ 50484: PUSHI #0x00000001 7764 @ 50489: ADD 7765 @ 50490: ASSVAL 809 fault rate = fault rate+3; abandon(6) %if fault rate > 30 7766 @ 50491: LINE 809 "regression-compile-tmp/pass1.imp" 7767 @ 50527: PUSH FAULTRATE 7768 @ 50530: PUSH FAULTRATE 7769 @ 50533: PUSHI #0x00000003 7770 @ 50538: ADD 7771 @ 50539: ASSVAL 7772 @ 50540: LINE 809 "regression-compile-tmp/pass1.imp" 7773 @ 50576: PUSH FAULTRATE 7774 @ 50579: PUSHI #0x0000001e 7775 @ 50584: JUMPIF <= L_0007 7776 @ 50588: PUSH ABANDON 7777 @ 50591: PUSHI #0x00000006 7778 @ 50596: ASSPAR 7779 @ 50597: CALL 7780 @ 50598: LOCATE L_0007 810 fault rate = 3 %if fault rate <= 0 7781 @ 50601: LINE 810 "regression-compile-tmp/pass1.imp" 7782 @ 50637: PUSH FAULTRATE 7783 @ 50640: PUSHI #0x00000000 7784 @ 50645: JUMPIF > L_0007 7785 @ 50649: PUSH FAULTRATE 7786 @ 50652: PUSHI #0x00000003 7787 @ 50657: ASSVAL 7788 @ 50658: LOCATE L_0007 811 %finish 7789 @ 50661: LINE 811 "regression-compile-tmp/pass1.imp" 7790 @ 50697: LOCATE L_0004 812 tbase = tstart 7791 @ 50700: LINE 812 "regression-compile-tmp/pass1.imp" 7792 @ 50736: PUSH TBASE 7793 @ 50739: PUSH TSTART 7794 @ 50742: ASSVAL 813 %if list <= 0 %and sym # nl %start 7795 @ 50743: LINE 813 "regression-compile-tmp/pass1.imp" 7796 @ 50779: PUSH LIST 7797 @ 50782: PUSHI #0x00000000 7798 @ 50787: JUMPIF > L_0004 7799 @ 50791: PUSH SYM 7800 @ 50794: PUSHI #0x0000000a 7801 @ 50799: JUMPIF = L_0004 814 error margin = column 7802 @ 50803: LINE 814 "regression-compile-tmp/pass1.imp" 7803 @ 50839: PUSH ERRORMARGIN 7804 @ 50842: PUSH COLUMN 7805 @ 50845: ASSVAL 815 error sym = sym; sym = nl 7806 @ 50846: LINE 815 "regression-compile-tmp/pass1.imp" 7807 @ 50882: PUSH ERRORSYM 7808 @ 50885: PUSH SYM 7809 @ 50888: ASSVAL 7810 @ 50889: LINE 815 "regression-compile-tmp/pass1.imp" 7811 @ 50925: PUSH SYM 7812 @ 50928: PUSHI #0x0000000a 7813 @ 50933: ASSVAL 816 %finish 7814 @ 50934: LINE 816 "regression-compile-tmp/pass1.imp" 7815 @ 50970: LOCATE L_0004 817 %end 818 7816 @ 50973: LINE 817 "regression-compile-tmp/pass1.imp" 7817 @ 51009: END _lev0id0_COMPILEBLOCK_FAULT {lev=3 --> 2} 819 dmin = dmin-1; dict(dmin) = -1; !end marker for starts & cycles 7818 @ 51010: LINE 819 "regression-compile-tmp/pass1.imp" 7819 @ 51046: PUSH DMIN 7820 @ 51049: PUSH DMIN 7821 @ 51052: PUSHI #0x00000001 7822 @ 51057: SUB 7823 @ 51058: ASSVAL 7824 @ 51059: LINE 819 "regression-compile-tmp/pass1.imp" 7825 @ 51095: PUSH DICT 7826 @ 51098: PUSH DMIN 7827 @ 51101: ACCESS 7828 @ 51102: PUSHI #0x00000001 7829 @ 51107: NEGATE 7830 @ 51108: ASSVAL 820 abandon(2) %if dmax = dmin 821 7831 @ 51109: LINE 820 "regression-compile-tmp/pass1.imp" 7832 @ 51145: PUSH DMAX 7833 @ 51148: PUSH DMIN 7834 @ 51151: JUMPIF # L_0004 7835 @ 51155: PUSH ABANDON 7836 @ 51158: PUSHI #0x00000002 7837 @ 51163: ASSPAR 7838 @ 51164: CALL 7839 @ 51165: LOCATE L_0004 822 %if list > 0 %and level > 0 %start 7840 @ 51168: LINE 822 "regression-compile-tmp/pass1.imp" 7841 @ 51204: PUSH LIST 7842 @ 51207: PUSHI #0x00000000 7843 @ 51212: JUMPIF <= L_0004 7844 @ 51216: PUSH LEVEL 7845 @ 51219: PUSHI #0x00000000 7846 @ 51224: JUMPIF <= L_0004 823 write(lines, 5); spaces(level*3-1) 7847 @ 51228: LINE 823 "regression-compile-tmp/pass1.imp" 7848 @ 51264: PUSH WRITE 7849 @ 51267: PUSH LINES 7850 @ 51270: ASSPAR 7851 @ 51271: PUSHI #0x00000005 7852 @ 51276: ASSPAR 7853 @ 51277: CALL 7854 @ 51278: LINE 823 "regression-compile-tmp/pass1.imp" 7855 @ 51314: PUSH SPACES 7856 @ 51317: PUSH LEVEL 7857 @ 51320: PUSHI #0x00000003 7858 @ 51325: MUL 7859 @ 51326: PUSHI #0x00000001 7860 @ 51331: SUB 7861 @ 51332: ASSPAR 7862 @ 51333: CALL 824 %if block tag = 0 %start 7863 @ 51334: LINE 824 "regression-compile-tmp/pass1.imp" 7864 @ 51370: PUSH BLOCKTAG 7865 @ 51373: PUSHI #0x00000000 7866 @ 51378: JUMPIF # L_0007 825 printstring("Begin") 7867 @ 51382: LINE 825 "regression-compile-tmp/pass1.imp" 7868 @ 51418: PUSH PRINTSTRING 7869 @ 51421: PUSHS "Begin" 7870 @ 51428: ASSPAR 7871 @ 51429: CALL 826 %finish %else %start 7872 @ 51430: LINE 826 "regression-compile-tmp/pass1.imp" 7873 @ 51466: GOTO L_0006 7874 @ 51469: LOCATE L_0007 827 printstring("Procedure "); print ident(block tag, 0) 7875 @ 51472: LINE 827 "regression-compile-tmp/pass1.imp" 7876 @ 51508: PUSH PRINTSTRING 7877 @ 51511: PUSHS "Procedure " 7878 @ 51523: ASSPAR 7879 @ 51524: CALL 7880 @ 51525: LINE 827 "regression-compile-tmp/pass1.imp" 7881 @ 51561: PUSH PRINTIDENT 7882 @ 51564: PUSH BLOCKTAG 7883 @ 51567: ASSPAR 7884 @ 51568: PUSHI #0x00000000 7885 @ 51573: ASSPAR 7886 @ 51574: CALL 828 %finish 7887 @ 51575: LINE 828 "regression-compile-tmp/pass1.imp" 7888 @ 51611: LOCATE L_0006 829 newline 7889 @ 51614: LINE 829 "regression-compile-tmp/pass1.imp" 7890 @ 51650: PUSH NEWLINE 7891 @ 51653: CALL 830 %finish 831 832 !deal with procedure definition (parameters) 7892 @ 51654: LINE 830 "regression-compile-tmp/pass1.imp" 7893 @ 51690: LOCATE L_0004 833 %if block tag # 0 %start; !proc 7894 @ 51693: LINE 833 "regression-compile-tmp/pass1.imp" 7895 @ 51729: PUSH BLOCKTAG 7896 @ 51732: PUSHI #0x00000000 7897 @ 51737: JUMPIF = L_0004 834 analyse; compile %if ss # 0 835 7898 @ 51741: LINE 834 "regression-compile-tmp/pass1.imp" 7899 @ 51777: PUSH ANALYSE 7900 @ 51780: CALL 7901 @ 51781: LINE 834 "regression-compile-tmp/pass1.imp" 7902 @ 51817: PUSH SS 7903 @ 51820: PUSHI #0x00000000 7904 @ 51825: JUMPIF = L_0007 7905 @ 51829: PUSH COMPILE 7906 @ 51832: CALL 7907 @ 51833: LOCATE L_0007 836 %if block otype # 0 %start; !external-ish 7908 @ 51836: LINE 836 "regression-compile-tmp/pass1.imp" 7909 @ 51872: PUSH BLOCKOTYPE 7910 @ 51875: PUSHI #0x00000000 7911 @ 51880: JUMPIF = L_0007 837 %if bflags&spec = 0 %start; !definition 7912 @ 51884: LINE 837 "regression-compile-tmp/pass1.imp" 7913 @ 51920: PUSH BFLAGS 7914 @ 51923: PUSHI #0x00000080 7915 @ 51928: AND 7916 @ 51929: PUSHI #0x00000000 7917 @ 51934: JUMPIF # L_000a 838 %if progmode <= 0 %and level = 1 %then progmode = -1 %else fault(7) 7918 @ 51938: LINE 838 "regression-compile-tmp/pass1.imp" 7919 @ 51974: PUSH PROGMODE 7920 @ 51977: PUSHI #0x00000000 7921 @ 51982: JUMPIF > L_000d 7922 @ 51986: PUSH LEVEL 7923 @ 51989: PUSHI #0x00000001 7924 @ 51994: JUMPIF # L_000d 7925 @ 51998: PUSH PROGMODE 7926 @ 52001: PUSHI #0x00000001 7927 @ 52006: NEGATE 7928 @ 52007: ASSVAL 7929 @ 52008: GOTO L_000c 7930 @ 52011: LOCATE L_000d 7931 @ 52014: PUSH FAULT 7932 @ 52017: PUSHI #0x00000007 7933 @ 52022: ASSPAR 7934 @ 52023: CALL 7935 @ 52024: LOCATE L_000c 839 %finish 7936 @ 52027: LINE 839 "regression-compile-tmp/pass1.imp" 7937 @ 52063: LOCATE L_000a 840 %finish 841 7938 @ 52066: LINE 840 "regression-compile-tmp/pass1.imp" 7939 @ 52102: LOCATE L_0007 842 new app = gapp; !generate app grammar 7940 @ 52105: LINE 842 "regression-compile-tmp/pass1.imp" 7941 @ 52141: PUSH NEWAPP 7942 @ 52144: PUSH GAPP 7943 @ 52147: CALL 7944 @ 52148: ASSVAL 843 %if spec given # 0 %start; !definition after spec 7945 @ 52149: LINE 843 "regression-compile-tmp/pass1.imp" 7946 @ 52185: PUSH SPECGIVEN 7947 @ 52188: PUSHI #0x00000000 7948 @ 52193: JUMPIF = L_0007 844 fault(6) %if new app # block app; !different from spec 7949 @ 52197: LINE 844 "regression-compile-tmp/pass1.imp" 7950 @ 52233: PUSH NEWAPP 7951 @ 52236: PUSH BLOCKAPP 7952 @ 52239: JUMPIF = L_000a 7953 @ 52243: PUSH FAULT 7954 @ 52246: PUSHI #0x00000006 7955 @ 52251: ASSPAR 7956 @ 52252: CALL 7957 @ 52253: LOCATE L_000a 845 %finish 7958 @ 52256: LINE 845 "regression-compile-tmp/pass1.imp" 7959 @ 52292: LOCATE L_0007 846 block app = new app; !use the latest 847 7960 @ 52295: LINE 846 "regression-compile-tmp/pass1.imp" 7961 @ 52331: PUSH BLOCKAPP 7962 @ 52334: PUSH NEWAPP 7963 @ 52337: ASSVAL 848 %if level < 0 %start; !not procedure definition 7964 @ 52338: LINE 848 "regression-compile-tmp/pass1.imp" 7965 @ 52374: PUSH LEVEL 7966 @ 52377: PUSHI #0x00000000 7967 @ 52382: JUMPIF >= L_0007 849 delete names(0) 7968 @ 52386: LINE 849 "regression-compile-tmp/pass1.imp" 7969 @ 52422: PUSH DELETENAMES 7970 @ 52425: PUSHI #0x00000000 7971 @ 52430: ASSPAR 7972 @ 52431: CALL 850 %return 7973 @ 52432: LINE 850 "regression-compile-tmp/pass1.imp" 7974 @ 52468: RETURN 851 %finish 7975 @ 52469: LINE 851 "regression-compile-tmp/pass1.imp" 7976 @ 52505: LOCATE L_0007 852 %finish %else %start 7977 @ 52508: LINE 852 "regression-compile-tmp/pass1.imp" 7978 @ 52544: GOTO L_0003 7979 @ 52547: LOCATE L_0004 853 open = 0; !can return from a block? 7980 @ 52550: LINE 853 "regression-compile-tmp/pass1.imp" 7981 @ 52586: PUSH OPEN 7982 @ 52589: PUSHI #0x00000000 7983 @ 52594: ASSVAL 854 %finish 855 7984 @ 52595: LINE 854 "regression-compile-tmp/pass1.imp" 7985 @ 52631: LOCATE L_0003 856 %cycle 7986 @ 52634: LINE 856 "regression-compile-tmp/pass1.imp" 7987 @ 52670: LOCATE L_0003 857 analyse 7988 @ 52673: LINE 857 "regression-compile-tmp/pass1.imp" 7989 @ 52709: PUSH ANALYSE 7990 @ 52712: CALL 858 %if ss # 0 %start 7991 @ 52713: LINE 858 "regression-compile-tmp/pass1.imp" 7992 @ 52749: PUSH SS 7993 @ 52752: PUSHI #0x00000000 7994 @ 52757: JUMPIF = L_0007 859 compile 7995 @ 52761: LINE 859 "regression-compile-tmp/pass1.imp" 7996 @ 52797: PUSH COMPILE 7997 @ 52800: CALL 860 fault(-5) %if dubious # 0 7998 @ 52801: LINE 860 "regression-compile-tmp/pass1.imp" 7999 @ 52837: PUSH DUBIOUS 8000 @ 52840: PUSHI #0x00000000 8001 @ 52845: JUMPIF = L_000a 8002 @ 52849: PUSH FAULT 8003 @ 52852: PUSHI #0x00000005 8004 @ 52857: NEGATE 8005 @ 52858: ASSPAR 8006 @ 52859: CALL 8007 @ 52860: LOCATE L_000a 861 flush buffer( 128 ) ;! flush if bp >= 128 8008 @ 52863: LINE 861 "regression-compile-tmp/pass1.imp" 8009 @ 52899: PUSH FLUSHBUFFER 8010 @ 52902: PUSHI #0x00000080 8011 @ 52907: ASSPAR 8012 @ 52908: CALL 862 %if sstype > 0 %start; !block in or out 8013 @ 52909: LINE 862 "regression-compile-tmp/pass1.imp" 8014 @ 52945: PUSH SSTYPE 8015 @ 52948: PUSHI #0x00000000 8016 @ 52953: JUMPIF <= L_000a 863 %exit %if sstype = 2; !out 8017 @ 52957: LINE 863 "regression-compile-tmp/pass1.imp" 8018 @ 52993: PUSH SSTYPE 8019 @ 52996: PUSHI #0x00000002 8020 @ 53001: JUMPIF # L_000d 8021 @ 53005: GOTO L_0004 8022 @ 53008: LOCATE L_000d 864 compile block(spec mode, block x, dmin, tmax, id) 8023 @ 53011: LINE 864 "regression-compile-tmp/pass1.imp" 8024 @ 53047: PUSH COMPILEBLOCK 8025 @ 53050: PUSH SPECMODE 8026 @ 53053: ASSPAR 8027 @ 53054: PUSH BLOCKX 8028 @ 53057: ASSPAR 8029 @ 53058: PUSH DMIN 8030 @ 53061: ASSPAR 8031 @ 53062: PUSH TMAX 8032 @ 53065: ASSPAR 8033 @ 53066: PUSH ID 8034 @ 53069: ASSPAR 8035 @ 53070: CALL 865 %exit %if ss < 0; !endofprogram 8036 @ 53071: LINE 865 "regression-compile-tmp/pass1.imp" 8037 @ 53107: PUSH SS 8038 @ 53110: PUSHI #0x00000000 8039 @ 53115: JUMPIF >= L_000d 8040 @ 53119: GOTO L_0004 8041 @ 53122: LOCATE L_000d 866 %finish 8042 @ 53125: LINE 866 "regression-compile-tmp/pass1.imp" 8043 @ 53161: LOCATE L_000a 867 %finish 8044 @ 53164: LINE 867 "regression-compile-tmp/pass1.imp" 8045 @ 53200: LOCATE L_0007 868 %repeat 8046 @ 53203: LINE 868 "regression-compile-tmp/pass1.imp" 8047 @ 53239: REPEAT L_0003 8048 @ 53242: LOCATE L_0004 869 %if list > 0 %and level > 0 %start 8049 @ 53245: LINE 869 "regression-compile-tmp/pass1.imp" 8050 @ 53281: PUSH LIST 8051 @ 53284: PUSHI #0x00000000 8052 @ 53289: JUMPIF <= L_0004 8053 @ 53293: PUSH LEVEL 8054 @ 53296: PUSHI #0x00000000 8055 @ 53301: JUMPIF <= L_0004 870 write(lines, 5); spaces(level*3-1) 8056 @ 53305: LINE 870 "regression-compile-tmp/pass1.imp" 8057 @ 53341: PUSH WRITE 8058 @ 53344: PUSH LINES 8059 @ 53347: ASSPAR 8060 @ 53348: PUSHI #0x00000005 8061 @ 53353: ASSPAR 8062 @ 53354: CALL 8063 @ 53355: LINE 870 "regression-compile-tmp/pass1.imp" 8064 @ 53391: PUSH SPACES 8065 @ 53394: PUSH LEVEL 8066 @ 53397: PUSHI #0x00000003 8067 @ 53402: MUL 8068 @ 53403: PUSHI #0x00000001 8069 @ 53408: SUB 8070 @ 53409: ASSPAR 8071 @ 53410: CALL 871 printstring("End") 8072 @ 53411: LINE 871 "regression-compile-tmp/pass1.imp" 8073 @ 53447: PUSH PRINTSTRING 8074 @ 53450: PUSHS "End" 8075 @ 53455: ASSPAR 8076 @ 53456: CALL 872 newline 8077 @ 53457: LINE 872 "regression-compile-tmp/pass1.imp" 8078 @ 53493: PUSH NEWLINE 8079 @ 53496: CALL 873 %finish 8080 @ 53497: LINE 873 "regression-compile-tmp/pass1.imp" 8081 @ 53533: LOCATE L_0004 874 delete names(0) 8082 @ 53536: LINE 874 "regression-compile-tmp/pass1.imp" 8083 @ 53572: PUSH DELETENAMES 8084 @ 53575: PUSHI #0x00000000 8085 @ 53580: ASSPAR 8086 @ 53581: CALL 875 %return 876 877 ! generate app grammar (backwards) 8087 @ 53582: LINE 875 "regression-compile-tmp/pass1.imp" 8088 @ 53618: RETURN 878 %integerfn gapp 8089 @ 53619: LINE 878 "regression-compile-tmp/pass1.imp" 8090 @ 53655: DEF GAPP (_lev0id0_COMPILEBLOCK_GAPP) p1=V_00f6 a/tf=18 b/format=1 c/ostate=10 type=1 (integer) form=8 (function) special=0 () linkage=0 (auto) spec=0 indirect=1 unass=0 8091 @ 53671: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 8092 @ 53672: FINISH ) {lev=3} 879 %constinteger comma = 140; !psep 8093 @ 53673: LINE 879 "regression-compile-tmp/pass1.imp" 880 %routinespec set cell(%integer g, tt) 8094 @ 53709: LINE 880 "regression-compile-tmp/pass1.imp" 8095 @ 53745: DEF SETCELL (_lev0id0_COMPILEBLOCK_GAPP_SETCELL) p1=V_010a a/tf=7 b/format=0 c/ostate=8 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=1 indirect=0 unass=0 8096 @ 53764: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 8097 @ 53765: DEF G p1=V_010b a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8098 @ 53778: DEF TT p1=V_010c a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8099 @ 53792: FINISH ) {lev=3} 881 %routinespec class(%record(tagfm)%name v) 8100 @ 53793: LINE 881 "regression-compile-tmp/pass1.imp" 8101 @ 53829: DEF CLASS (_lev0id0_COMPILEBLOCK_GAPP_CLASS) p1=V_010b a/tf=7 b/format=0 c/ostate=8 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=1 indirect=0 unass=0 8102 @ 53846: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 8103 @ 53847: DEF V p1=V_010c a/tf=42 b/format=84 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8104 @ 53860: FINISH ) {lev=3} 882 %record(tagfm)%name v 8105 @ 53861: LINE 882 "regression-compile-tmp/pass1.imp" 8106 @ 53897: DEF V p1=V_010c a/tf=42 b/format=84 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 883 %integer p, link, tp, c, ap, t 884 8107 @ 53910: LINE 883 "regression-compile-tmp/pass1.imp" 8108 @ 53946: DEF P p1=V_010d a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8109 @ 53959: DEF LINK p1=V_010e a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8110 @ 53975: DEF TP p1=V_010f a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8111 @ 53989: DEF C p1=V_0110 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8112 @ 54002: DEF AP p1=V_0111 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8113 @ 54016: DEF T p1=V_0112 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 885 %result = 0 %if tmax = local; !no app needed 886 8114 @ 54029: LINE 885 "regression-compile-tmp/pass1.imp" 8115 @ 54065: PUSH TMAX 8116 @ 54068: PUSH LOCAL 8117 @ 54071: JUMPIF # L_0004 8118 @ 54075: PUSHI #0x00000000 8119 @ 54080: RESULT 8120 @ 54081: LOCATE L_0004 887 p = gmax1; link = 0; t = tmax 888 8121 @ 54084: LINE 887 "regression-compile-tmp/pass1.imp" 8122 @ 54120: PUSH P 8123 @ 54123: PUSHI #0x000002cf 8124 @ 54128: ASSVAL 8125 @ 54129: LINE 887 "regression-compile-tmp/pass1.imp" 8126 @ 54165: PUSH LINK 8127 @ 54168: PUSHI #0x00000000 8128 @ 54173: ASSVAL 8129 @ 54174: LINE 887 "regression-compile-tmp/pass1.imp" 8130 @ 54210: PUSH T 8131 @ 54213: PUSH TMAX 8132 @ 54216: ASSVAL 889 %cycle 8133 @ 54217: LINE 889 "regression-compile-tmp/pass1.imp" 8134 @ 54253: LOCATE L_0003 890 v == tag(t); t = t-1 8135 @ 54256: LINE 890 "regression-compile-tmp/pass1.imp" 8136 @ 54292: PUSH V 8137 @ 54295: PUSH TAG 8138 @ 54298: PUSH T 8139 @ 54301: ACCESS 8140 @ 54302: ASSREF 8141 @ 54303: LINE 890 "regression-compile-tmp/pass1.imp" 8142 @ 54339: PUSH T 8143 @ 54342: PUSH T 8144 @ 54345: PUSHI #0x00000001 8145 @ 54350: SUB 8146 @ 54351: ASSVAL 891 class(v); ! deduce class from tag 8147 @ 54352: LINE 891 "regression-compile-tmp/pass1.imp" 8148 @ 54388: PUSH CLASS 8149 @ 54391: PUSH V 8150 @ 54394: ASSPAR 8151 @ 54395: CALL 892 %if c < 0 %start; ! insert %PARAM 8152 @ 54396: LINE 892 "regression-compile-tmp/pass1.imp" 8153 @ 54432: PUSH C 8154 @ 54435: PUSHI #0x00000000 8155 @ 54440: JUMPIF >= L_0007 893 c = -c 8156 @ 54444: LINE 893 "regression-compile-tmp/pass1.imp" 8157 @ 54480: PUSH C 8158 @ 54483: PUSH C 8159 @ 54486: NEGATE 8160 @ 54487: ASSVAL 894 set cell(196, tp) 8161 @ 54488: LINE 894 "regression-compile-tmp/pass1.imp" 8162 @ 54524: PUSH SETCELL 8163 @ 54527: PUSHI #0x000000c4 8164 @ 54532: ASSPAR 8165 @ 54533: PUSH TP 8166 @ 54536: ASSPAR 8167 @ 54537: CALL 895 tp = -1 8168 @ 54538: LINE 895 "regression-compile-tmp/pass1.imp" 8169 @ 54574: PUSH TP 8170 @ 54577: PUSHI #0x00000001 8171 @ 54582: NEGATE 8172 @ 54583: ASSVAL 896 %finish 8173 @ 54584: LINE 896 "regression-compile-tmp/pass1.imp" 8174 @ 54620: LOCATE L_0007 897 set cell(c, tp) 8175 @ 54623: LINE 897 "regression-compile-tmp/pass1.imp" 8176 @ 54659: PUSH SETCELL 8177 @ 54662: PUSH C 8178 @ 54665: ASSPAR 8179 @ 54666: PUSH TP 8180 @ 54669: ASSPAR 8181 @ 54670: CALL 898 %exit %if t = local; ! end of parameters 8182 @ 54671: LINE 898 "regression-compile-tmp/pass1.imp" 8183 @ 54707: PUSH T 8184 @ 54710: PUSH LOCAL 8185 @ 54713: JUMPIF # L_0007 8186 @ 54717: GOTO L_0004 8187 @ 54720: LOCATE L_0007 899 set cell(comma, -1); ! add the separating comma 8188 @ 54723: LINE 899 "regression-compile-tmp/pass1.imp" 8189 @ 54759: PUSH SETCELL 8190 @ 54762: PUSHI #0x0000008c 8191 @ 54767: ASSPAR 8192 @ 54768: PUSHI #0x00000001 8193 @ 54773: NEGATE 8194 @ 54774: ASSPAR 8195 @ 54775: CALL 900 %repeat 8196 @ 54776: LINE 900 "regression-compile-tmp/pass1.imp" 8197 @ 54812: REPEAT L_0003 8198 @ 54815: LOCATE L_0004 901 abandon(3) %if gmax > gmin 902 8199 @ 54818: LINE 901 "regression-compile-tmp/pass1.imp" 8200 @ 54854: PUSH GMAX 8201 @ 54857: PUSH GMIN 8202 @ 54860: JUMPIF <= L_0004 8203 @ 54864: PUSH ABANDON 8204 @ 54867: PUSHI #0x00000003 8205 @ 54872: ASSPAR 8206 @ 54873: CALL 8207 @ 54874: LOCATE L_0004 903 %result = link 904 8208 @ 54877: LINE 903 "regression-compile-tmp/pass1.imp" 8209 @ 54913: PUSH LINK 8210 @ 54916: RESULT 905 %routine set cell(%integer g, tt) 906 ! add the cell to the grammar, combining common tails 8211 @ 54917: LINE 905 "regression-compile-tmp/pass1.imp" 8212 @ 54953: DEF SETCELL (_lev0id0_COMPILEBLOCK_GAPP_SETCELL) p1=V_010a a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8213 @ 54972: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 8214 @ 54973: DEF G p1=V_0113 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8215 @ 54986: DEF TT p1=V_0114 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8216 @ 55000: FINISH ) {lev=4} 907 %while p # gmax %cycle 8217 @ 55001: LINE 907 "regression-compile-tmp/pass1.imp" 8218 @ 55037: LOCATE L_0003 8219 @ 55040: PUSH P 8220 @ 55043: PUSH GMAX 8221 @ 55046: JUMPIF = L_0004 908 p = p+1 8222 @ 55050: LINE 908 "regression-compile-tmp/pass1.imp" 8223 @ 55086: PUSH P 8224 @ 55089: PUSH P 8225 @ 55092: PUSHI #0x00000001 8226 @ 55097: ADD 8227 @ 55098: ASSVAL 909 %if glink(p) = link %and gram(p) = g %start 8228 @ 55099: LINE 909 "regression-compile-tmp/pass1.imp" 8229 @ 55135: PUSH GLINK 8230 @ 55138: PUSH P 8231 @ 55141: ACCESS 8232 @ 55142: PUSH LINK 8233 @ 55145: JUMPIF # L_0007 8234 @ 55149: PUSH GRAM 8235 @ 55152: PUSH P 8236 @ 55155: ACCESS 8237 @ 55156: PUSH G 8238 @ 55159: JUMPIF # L_0007 910 %if tt < 0 %or (gram(p+1) = tt %and glink(p+1)=ap) %start 8239 @ 55163: LINE 910 "regression-compile-tmp/pass1.imp" 8240 @ 55199: PUSH TT 8241 @ 55202: PUSHI #0x00000000 8242 @ 55207: JUMPIF < L_000b 8243 @ 55211: PUSH GRAM 8244 @ 55214: PUSH P 8245 @ 55217: PUSHI #0x00000001 8246 @ 55222: ADD 8247 @ 55223: ACCESS 8248 @ 55224: PUSH TT 8249 @ 55227: JUMPIF # L_000a 8250 @ 55231: PUSH GLINK 8251 @ 55234: PUSH P 8252 @ 55237: PUSHI #0x00000001 8253 @ 55242: ADD 8254 @ 55243: ACCESS 8255 @ 55244: PUSH AP 8256 @ 55247: JUMPIF # L_000a 8257 @ 55251: LOCATE L_000b 911 link = p; ! already there 8258 @ 55254: LINE 911 "regression-compile-tmp/pass1.imp" 8259 @ 55290: PUSH LINK 8260 @ 55293: PUSH P 8261 @ 55296: ASSVAL 912 %return 8262 @ 55297: LINE 912 "regression-compile-tmp/pass1.imp" 8263 @ 55333: RETURN 913 %finish 8264 @ 55334: LINE 913 "regression-compile-tmp/pass1.imp" 8265 @ 55370: LOCATE L_000a 914 %finish 8266 @ 55373: LINE 914 "regression-compile-tmp/pass1.imp" 8267 @ 55409: LOCATE L_0007 915 %repeat 916 917 !add a new cell 8268 @ 55412: LINE 915 "regression-compile-tmp/pass1.imp" 8269 @ 55448: REPEAT L_0003 8270 @ 55451: LOCATE L_0004 918 gmax = gmax+1 8271 @ 55454: LINE 918 "regression-compile-tmp/pass1.imp" 8272 @ 55490: PUSH GMAX 8273 @ 55493: PUSH GMAX 8274 @ 55496: PUSHI #0x00000001 8275 @ 55501: ADD 8276 @ 55502: ASSVAL 919 gram(gmax) = g 8277 @ 55503: LINE 919 "regression-compile-tmp/pass1.imp" 8278 @ 55539: PUSH GRAM 8279 @ 55542: PUSH GMAX 8280 @ 55545: ACCESS 8281 @ 55546: PUSH G 8282 @ 55549: ASSVAL 920 glink(gmax) = link 8283 @ 55550: LINE 920 "regression-compile-tmp/pass1.imp" 8284 @ 55586: PUSH GLINK 8285 @ 55589: PUSH GMAX 8286 @ 55592: ACCESS 8287 @ 55593: PUSH LINK 8288 @ 55596: ASSVAL 921 link = gmax 922 8289 @ 55597: LINE 921 "regression-compile-tmp/pass1.imp" 8290 @ 55633: PUSH LINK 8291 @ 55636: PUSH GMAX 8292 @ 55639: ASSVAL 923 %if tt >= 0 %start; ! set type cell 8293 @ 55640: LINE 923 "regression-compile-tmp/pass1.imp" 8294 @ 55676: PUSH TT 8295 @ 55679: PUSHI #0x00000000 8296 @ 55684: JUMPIF < L_0004 924 gmax = gmax+1 8297 @ 55688: LINE 924 "regression-compile-tmp/pass1.imp" 8298 @ 55724: PUSH GMAX 8299 @ 55727: PUSH GMAX 8300 @ 55730: PUSHI #0x00000001 8301 @ 55735: ADD 8302 @ 55736: ASSVAL 925 gram(gmax) = tt 8303 @ 55737: LINE 925 "regression-compile-tmp/pass1.imp" 8304 @ 55773: PUSH GRAM 8305 @ 55776: PUSH GMAX 8306 @ 55779: ACCESS 8307 @ 55780: PUSH TT 8308 @ 55783: ASSVAL 926 glink(gmax) = ap 8309 @ 55784: LINE 926 "regression-compile-tmp/pass1.imp" 8310 @ 55820: PUSH GLINK 8311 @ 55823: PUSH GMAX 8312 @ 55826: ACCESS 8313 @ 55827: PUSH AP 8314 @ 55830: ASSVAL 927 %finish 8315 @ 55831: LINE 927 "regression-compile-tmp/pass1.imp" 8316 @ 55867: LOCATE L_0004 928 p = gmax 929 8317 @ 55870: LINE 928 "regression-compile-tmp/pass1.imp" 8318 @ 55906: PUSH P 8319 @ 55909: PUSH GMAX 8320 @ 55912: ASSVAL 930 %end 931 8321 @ 55913: LINE 930 "regression-compile-tmp/pass1.imp" 8322 @ 55949: END _lev0id0_COMPILEBLOCK_GAPP_SETCELL {lev=4 --> 3} 932 %routine class(%record(tagfm)%name v) 8323 @ 55950: LINE 932 "regression-compile-tmp/pass1.imp" 8324 @ 55986: DEF CLASS (_lev0id0_COMPILEBLOCK_GAPP_CLASS) p1=V_010b a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8325 @ 56003: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 8326 @ 56004: DEF V p1=V_0113 a/tf=42 b/format=84 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8327 @ 56017: FINISH ) {lev=4} 933 %constinteger err = 89 8328 @ 56018: LINE 933 "regression-compile-tmp/pass1.imp" 934 %constinteger rtp = 100 8329 @ 56054: LINE 934 "regression-compile-tmp/pass1.imp" 935 %constinteger fnp = 101 8330 @ 56090: LINE 935 "regression-compile-tmp/pass1.imp" 936 %constinteger mapp = 102 8331 @ 56126: LINE 936 "regression-compile-tmp/pass1.imp" 937 %constinteger predp = 103 8332 @ 56162: LINE 937 "regression-compile-tmp/pass1.imp" 938 %constintegerarray class map(0:15) = %c 939 err,1764, 247, err(4), -rtp, -fnp, -mapp, -predp, err, 214, 940 ! err,1764, 247, err(4), -rtp, -fnp, -mapp, -predp, err, 214, 941 err, 229, err 942 ! err, 229, err 8333 @ 56198: LINE 938 "regression-compile-tmp/pass1.imp" 8334 @ 56234: PUSHI #0x00000000 8335 @ 56239: PUSHI #0x0000000f 8336 @ 56244: BOUNDS 8337 @ 56245: DEF CLASSMAP p1=V_0114 a/tf=1b b/format=1 c/ostate=112 type=1 (integer) form=11 (array) special=0 () linkage=2 (constant) spec=0 indirect=1 unass=0 8338 @ 56265: PUSHI #0x00000059 8339 @ 56270: INIT 1 8340 @ 56273: PUSHI #0x000006e4 8341 @ 56278: INIT 1 8342 @ 56281: PUSHI #0x000000f7 8343 @ 56286: INIT 1 8344 @ 56289: PUSHI #0x00000059 8345 @ 56294: INIT 4 8346 @ 56297: PUSHI #0xffffff9c 8347 @ 56302: INIT 1 8348 @ 56305: PUSHI #0xffffff9b 8349 @ 56310: INIT 1 8350 @ 56313: PUSHI #0xffffff9a 8351 @ 56318: INIT 1 8352 @ 56321: PUSHI #0xffffff99 8353 @ 56326: INIT 1 8354 @ 56329: PUSHI #0x00000059 8355 @ 56334: INIT 1 8356 @ 56337: PUSHI #0x000000d6 8357 @ 56342: INIT 1 8358 @ 56345: PUSHI #0x00000059 8359 @ 56350: INIT 1 8360 @ 56353: PUSHI #0x000000e5 8361 @ 56358: INIT 1 8362 @ 56361: PUSHI #0x00000059 8363 @ 56366: INIT 1 943 %integer tags, type, form 944 8364 @ 56369: LINE 943 "regression-compile-tmp/pass1.imp" 8365 @ 56405: DEF TAGS p1=V_0115 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8366 @ 56421: DEF TYPE p1=V_0116 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8367 @ 56437: DEF FORM p1=V_0117 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 945 ap = 0 8368 @ 56453: LINE 945 "regression-compile-tmp/pass1.imp" 8369 @ 56489: PUSH AP 8370 @ 56492: PUSHI #0x00000000 8371 @ 56497: ASSVAL 946 tags = v_flags 8372 @ 56498: LINE 946 "regression-compile-tmp/pass1.imp" 8373 @ 56534: PUSH TAGS 8374 @ 56537: PUSH V 8375 @ 56540: SELECT 3 8376 @ 56543: ASSVAL 947 type = tags>>4&7; form = tags&15 8377 @ 56544: LINE 947 "regression-compile-tmp/pass1.imp" 8378 @ 56580: PUSH TYPE 8379 @ 56583: PUSH TAGS 8380 @ 56586: PUSHI #0x00000004 8381 @ 56591: RSH 8382 @ 56592: PUSHI #0x00000007 8383 @ 56597: AND 8384 @ 56598: ASSVAL 8385 @ 56599: LINE 947 "regression-compile-tmp/pass1.imp" 8386 @ 56635: PUSH FORM 8387 @ 56638: PUSH TAGS 8388 @ 56641: PUSHI #0x0000000f 8389 @ 56646: AND 8390 @ 56647: ASSVAL 948 tp = v_format<<3!type 8391 @ 56648: LINE 948 "regression-compile-tmp/pass1.imp" 8392 @ 56684: PUSH TP 8393 @ 56687: PUSH V 8394 @ 56690: SELECT 2 8395 @ 56693: PUSHI #0x00000003 8396 @ 56698: LSH 8397 @ 56699: PUSH TYPE 8398 @ 56702: OR 8399 @ 56703: ASSVAL 949 c = class map(form) 8400 @ 56704: LINE 949 "regression-compile-tmp/pass1.imp" 8401 @ 56740: PUSH C 8402 @ 56743: PUSH CLASSMAP 8403 @ 56746: PUSH FORM 8404 @ 56749: ACCESS 8405 @ 56750: ASSVAL 950 c = 208 %and tp = 0 %if type = 0 %and form = 2; !%name 8406 @ 56751: LINE 950 "regression-compile-tmp/pass1.imp" 8407 @ 56787: PUSH TYPE 8408 @ 56790: PUSHI #0x00000000 8409 @ 56795: JUMPIF # L_0004 8410 @ 56799: PUSH FORM 8411 @ 56802: PUSHI #0x00000002 8412 @ 56807: JUMPIF # L_0004 8413 @ 56811: PUSH C 8414 @ 56814: PUSHI #0x000000d0 8415 @ 56819: ASSVAL 8416 @ 56820: PUSH TP 8417 @ 56823: PUSHI #0x00000000 8418 @ 56828: ASSVAL 8419 @ 56829: LOCATE L_0004 951 ap = v_app %if tags¶meters # 0 8420 @ 56832: LINE 951 "regression-compile-tmp/pass1.imp" 8421 @ 56868: PUSH TAGS 8422 @ 56871: PUSHI #0x00001000 8423 @ 56876: AND 8424 @ 56877: PUSHI #0x00000000 8425 @ 56882: JUMPIF = L_0004 8426 @ 56886: PUSH AP 8427 @ 56889: PUSH V 8428 @ 56892: SELECT 1 8429 @ 56895: ASSVAL 8430 @ 56896: LOCATE L_0004 952 %end 8431 @ 56899: LINE 952 "regression-compile-tmp/pass1.imp" 8432 @ 56935: END _lev0id0_COMPILEBLOCK_GAPP_CLASS {lev=4 --> 3} 953 %end 954 8433 @ 56936: LINE 953 "regression-compile-tmp/pass1.imp" 8434 @ 56972: END _lev0id0_COMPILEBLOCK_GAPP {lev=3 --> 2} 955 %routine delete names(%integer quiet) 8435 @ 56973: LINE 955 "regression-compile-tmp/pass1.imp" 8436 @ 57009: DEF DELETENAMES (_lev0id0_COMPILEBLOCK_DELETENAMES) p1=V_00f7 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8437 @ 57032: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 8438 @ 57033: DEF QUIET p1=V_010a a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8439 @ 57050: FINISH ) {lev=3} 956 %integer flags 8440 @ 57051: LINE 956 "regression-compile-tmp/pass1.imp" 8441 @ 57087: DEF FLAGS p1=V_010b a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 957 %record(tagfm)%name tx 958 8442 @ 57104: LINE 957 "regression-compile-tmp/pass1.imp" 8443 @ 57140: DEF TX p1=V_010c a/tf=42 b/format=84 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 959 %while tmax > tbase %cycle 8444 @ 57154: LINE 959 "regression-compile-tmp/pass1.imp" 8445 @ 57190: LOCATE L_0003 8446 @ 57193: PUSH TMAX 8447 @ 57196: PUSH TBASE 8448 @ 57199: JUMPIF <= L_0004 960 x = tmax; tmax = tmax-1 8449 @ 57203: LINE 960 "regression-compile-tmp/pass1.imp" 8450 @ 57239: PUSH X 8451 @ 57242: PUSH TMAX 8452 @ 57245: ASSVAL 8453 @ 57246: LINE 960 "regression-compile-tmp/pass1.imp" 8454 @ 57282: PUSH TMAX 8455 @ 57285: PUSH TMAX 8456 @ 57288: PUSHI #0x00000001 8457 @ 57293: SUB 8458 @ 57294: ASSVAL 961 tx == tag(x) 8459 @ 57295: LINE 961 "regression-compile-tmp/pass1.imp" 8460 @ 57331: PUSH TX 8461 @ 57334: PUSH TAG 8462 @ 57337: PUSH X 8463 @ 57340: ACCESS 8464 @ 57341: ASSREF 962 flags = tx_flags 8465 @ 57342: LINE 962 "regression-compile-tmp/pass1.imp" 8466 @ 57378: PUSH FLAGS 8467 @ 57381: PUSH TX 8468 @ 57384: SELECT 3 8469 @ 57387: ASSVAL 963 fault(20) %if flags&spec # 0 %and flags&own bit = 0 964 !{spec with no definition & not external} 8470 @ 57388: LINE 963 "regression-compile-tmp/pass1.imp" 8471 @ 57424: PUSH FLAGS 8472 @ 57427: PUSHI #0x00000080 8473 @ 57432: AND 8474 @ 57433: PUSHI #0x00000000 8475 @ 57438: JUMPIF = L_0007 8476 @ 57442: PUSH FLAGS 8477 @ 57445: PUSHI #0x00000200 8478 @ 57450: AND 8479 @ 57451: PUSHI #0x00000000 8480 @ 57456: JUMPIF # L_0007 8481 @ 57460: PUSH FAULT 8482 @ 57463: PUSHI #0x00000014 8483 @ 57468: ASSPAR 8484 @ 57469: CALL 8485 @ 57470: LOCATE L_0007 965 %if flags&used bit = 0 %and level >= 0 %and list <= 0 %start 8486 @ 57473: LINE 965 "regression-compile-tmp/pass1.imp" 8487 @ 57509: PUSH FLAGS 8488 @ 57512: PUSHI #0x00008000 8489 @ 57517: AND 8490 @ 57518: PUSHI #0x00000000 8491 @ 57523: JUMPIF # L_0007 8492 @ 57527: PUSH LEVEL 8493 @ 57530: PUSHI #0x00000000 8494 @ 57535: JUMPIF < L_0007 8495 @ 57539: PUSH LIST 8496 @ 57542: PUSHI #0x00000000 8497 @ 57547: JUMPIF > L_0007 966 fault(-3) %if quiet = 0; !unused 8498 @ 57551: LINE 966 "regression-compile-tmp/pass1.imp" 8499 @ 57587: PUSH QUIET 8500 @ 57590: PUSHI #0x00000000 8501 @ 57595: JUMPIF # L_000a 8502 @ 57599: PUSH FAULT 8503 @ 57602: PUSHI #0x00000003 8504 @ 57607: NEGATE 8505 @ 57608: ASSPAR 8506 @ 57609: CALL 8507 @ 57610: LOCATE L_000a 967 %finish 8508 @ 57613: LINE 967 "regression-compile-tmp/pass1.imp" 8509 @ 57649: LOCATE L_0007 968 dict(tx_text) = tx_link 8510 @ 57652: LINE 968 "regression-compile-tmp/pass1.imp" 8511 @ 57688: PUSH DICT 8512 @ 57691: PUSH TX 8513 @ 57694: SELECT 5 8514 @ 57697: ACCESS 8515 @ 57698: PUSH TX 8516 @ 57701: SELECT 6 8517 @ 57704: ASSVAL 969 %repeat 8518 @ 57705: LINE 969 "regression-compile-tmp/pass1.imp" 8519 @ 57741: REPEAT L_0003 8520 @ 57744: LOCATE L_0004 970 %end 971 8521 @ 57747: LINE 970 "regression-compile-tmp/pass1.imp" 8522 @ 57783: END _lev0id0_COMPILEBLOCK_DELETENAMES {lev=3 --> 2} 972 %routine analyse 8523 @ 57784: LINE 972 "regression-compile-tmp/pass1.imp" 8524 @ 57820: DEF ANALYSE (_lev0id0_COMPILEBLOCK_ANALYSE) p1=V_00f8 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8525 @ 57839: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 8526 @ 57840: FINISH ) {lev=3} 973 %constinteger order bits = 16_3000, order bit = 16_1000 8527 @ 57841: LINE 973 "regression-compile-tmp/pass1.imp" 974 %constinteger escape = 16_1000 8528 @ 57877: LINE 974 "regression-compile-tmp/pass1.imp" 975 %integer strp, mark, flags, prot err, k, s, c 8529 @ 57913: LINE 975 "regression-compile-tmp/pass1.imp" 8530 @ 57949: DEF STRP p1=V_010a a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8531 @ 57965: DEF MARK p1=V_010b a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8532 @ 57981: DEF FLAGS p1=V_010c a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8533 @ 57998: DEF PROTERR p1=V_010d a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8534 @ 58017: DEF K p1=V_010e a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8535 @ 58030: DEF S p1=V_010f a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8536 @ 58043: DEF C p1=V_0110 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 976 %owninteger key = 0 8537 @ 58056: LINE 976 "regression-compile-tmp/pass1.imp" 8538 @ 58092: PUSHI #0x00000000 8539 @ 58097: DEF KEY p1=V_0111 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 8540 @ 58112: INIT 1 977 %integer node 8541 @ 58115: LINE 977 "regression-compile-tmp/pass1.imp" 8542 @ 58151: DEF NODE p1=V_0112 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 978 %integername z 8543 @ 58167: LINE 978 "regression-compile-tmp/pass1.imp" 8544 @ 58203: DEF Z p1=V_0113 a/tf=12 b/format=1 c/ostate=0 type=1 (integer) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 979 %record(arfm)%name arp 8545 @ 58216: LINE 979 "regression-compile-tmp/pass1.imp" 8546 @ 58252: DEF ARP p1=V_0114 a/tf=42 b/format=83 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 980 %switch act(actions:phrasal), paction(0:15) 981 8547 @ 58267: LINE 980 "regression-compile-tmp/pass1.imp" 8548 @ 58303: PUSHI #0x000000b4 8549 @ 58308: PUSHI #0x000000c8 8550 @ 58313: BOUNDS 8551 @ 58314: DEF ACT p1=V_0115 a/tf=6 b/format=0 c/ostate=0 type=0 () form=6 (switch) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8552 @ 58329: PUSHI #0x00000000 8553 @ 58334: PUSHI #0x0000000f 8554 @ 58339: BOUNDS 8555 @ 58340: DEF PACTION p1=V_0116 a/tf=6 b/format=0 c/ostate=0 type=0 () form=6 (switch) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 982 %routine trace analysis 983 !diagnostic trace routine (diagnose&1 # 0) 8556 @ 58359: LINE 982 "regression-compile-tmp/pass1.imp" 8557 @ 58395: DEF TRACEANALYSIS (_lev0id0_COMPILEBLOCK_ANALYSE_TRACEANALYSIS) p1=V_0117 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8558 @ 58420: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 8559 @ 58421: FINISH ) {lev=4} 984 %integer a 985 8560 @ 58422: LINE 984 "regression-compile-tmp/pass1.imp" 8561 @ 58458: DEF A p1=V_0118 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 986 %routine show(%integer a) 8562 @ 58471: LINE 986 "regression-compile-tmp/pass1.imp" 8563 @ 58507: DEF SHOW (_lev0id0_COMPILEBLOCK_ANALYSE_TRACEANALYSIS_SHOW) p1=V_0119 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8564 @ 58523: START ( FORMAL PARAMETERS {lev=5 --> 6, nested=0 --> 1} 8565 @ 58524: DEF A p1=V_011a a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8566 @ 58537: FINISH ) {lev=5} 987 %if 0 < a %and a < 130 %start 8567 @ 58538: LINE 987 "regression-compile-tmp/pass1.imp" 8568 @ 58574: PUSHI #0x00000000 8569 @ 58579: PUSH A 8570 @ 58582: JUMPIF >= L_0004 8571 @ 58586: PUSH A 8572 @ 58589: PUSHI #0x00000082 8573 @ 58594: JUMPIF >= L_0004 988 space 8574 @ 58598: LINE 988 "regression-compile-tmp/pass1.imp" 8575 @ 58634: PUSH SPACE 8576 @ 58637: CALL 989 printstring(text(a)) 8577 @ 58638: LINE 989 "regression-compile-tmp/pass1.imp" 8578 @ 58674: PUSH PRINTSTRING 8579 @ 58677: PUSH TEXT 8580 @ 58680: PUSH A 8581 @ 58683: ACCESS 8582 @ 58684: ASSPAR 8583 @ 58685: CALL 990 %finish %else write(a, 3) 8584 @ 58686: LINE 990 "regression-compile-tmp/pass1.imp" 8585 @ 58722: GOTO L_0003 8586 @ 58725: LOCATE L_0004 8587 @ 58728: PUSH WRITE 8588 @ 58731: PUSH A 8589 @ 58734: ASSPAR 8590 @ 58735: PUSHI #0x00000003 8591 @ 58740: ASSPAR 8592 @ 58741: CALL 8593 @ 58742: LOCATE L_0003 991 %end 992 8594 @ 58745: LINE 991 "regression-compile-tmp/pass1.imp" 8595 @ 58781: END _lev0id0_COMPILEBLOCK_ANALYSE_TRACEANALYSIS_SHOW {lev=5 --> 4} 993 %owninteger la1=0, la2=0, lsa=0, lt=0 8596 @ 58782: LINE 993 "regression-compile-tmp/pass1.imp" 8597 @ 58818: PUSHI #0x00000000 8598 @ 58823: DEF LA1 p1=V_011a a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 8599 @ 58838: INIT 1 8600 @ 58841: PUSHI #0x00000000 8601 @ 58846: DEF LA2 p1=V_011b a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 8602 @ 58861: INIT 1 8603 @ 58864: PUSHI #0x00000000 8604 @ 58869: DEF LSA p1=V_011c a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 8605 @ 58884: INIT 1 8606 @ 58887: PUSHI #0x00000000 8607 @ 58892: DEF LT p1=V_011d a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 8608 @ 58906: INIT 1 994 newline %if mon pos # pos %and sym # nl 8609 @ 58909: LINE 994 "regression-compile-tmp/pass1.imp" 8610 @ 58945: PUSH MONPOS 8611 @ 58948: PUSH POS 8612 @ 58951: JUMPIF = L_0004 8613 @ 58955: PUSH SYM 8614 @ 58958: PUSHI #0x0000000a 8615 @ 58963: JUMPIF = L_0004 8616 @ 58967: PUSH NEWLINE 8617 @ 58970: CALL 8618 @ 58971: LOCATE L_0004 995 mon pos = pos 8619 @ 58974: LINE 995 "regression-compile-tmp/pass1.imp" 8620 @ 59010: PUSH MONPOS 8621 @ 59013: PUSH POS 8622 @ 59016: ASSVAL 996 write(g, 3) 8623 @ 59017: LINE 996 "regression-compile-tmp/pass1.imp" 8624 @ 59053: PUSH WRITE 8625 @ 59056: PUSH G 8626 @ 59059: ASSPAR 8627 @ 59060: PUSHI #0x00000003 8628 @ 59065: ASSPAR 8629 @ 59066: CALL 997 space 8630 @ 59067: LINE 997 "regression-compile-tmp/pass1.imp" 8631 @ 59103: PUSH SPACE 8632 @ 59106: CALL 998 printstring(text(class)) 8633 @ 59107: LINE 998 "regression-compile-tmp/pass1.imp" 8634 @ 59143: PUSH PRINTSTRING 8635 @ 59146: PUSH TEXT 8636 @ 59149: PUSH CLASS 8637 @ 59152: ACCESS 8638 @ 59153: ASSPAR 8639 @ 59154: CALL 999 printsymbol('"') %if gg&trans bit # 0 8640 @ 59155: LINE 999 "regression-compile-tmp/pass1.imp" 8641 @ 59191: PUSH GG 8642 @ 59194: PUSHI #0x00004000 8643 @ 59199: AND 8644 @ 59200: PUSHI #0x00000000 8645 @ 59205: JUMPIF = L_0004 8646 @ 59209: PUSH PRINTSYMBOL 8647 @ 59212: PUSHI #0x00000022 8648 @ 59217: ASSPAR 8649 @ 59218: CALL 8650 @ 59219: LOCATE L_0004 1000 a = gg>>8&15 8651 @ 59222: LINE 1000 "regression-compile-tmp/pass1.imp" 8652 @ 59258: PUSH A 8653 @ 59261: PUSH GG 8654 @ 59264: PUSHI #0x00000008 8655 @ 59269: RSH 8656 @ 59270: PUSHI #0x0000000f 8657 @ 59275: AND 8658 @ 59276: ASSVAL 1001 %if a # 0 %start 8659 @ 59277: LINE 1001 "regression-compile-tmp/pass1.imp" 8660 @ 59313: PUSH A 8661 @ 59316: PUSHI #0x00000000 8662 @ 59321: JUMPIF = L_0004 1002 printsymbol('{') 8663 @ 59325: LINE 1002 "regression-compile-tmp/pass1.imp" 8664 @ 59361: PUSH PRINTSYMBOL 8665 @ 59364: PUSHI #0x0000007b 8666 @ 59369: ASSPAR 8667 @ 59370: CALL 1003 write(a, 0) 8668 @ 59371: LINE 1003 "regression-compile-tmp/pass1.imp" 8669 @ 59407: PUSH WRITE 8670 @ 59410: PUSH A 8671 @ 59413: ASSPAR 8672 @ 59414: PUSHI #0x00000000 8673 @ 59419: ASSPAR 8674 @ 59420: CALL 1004 printsymbol('}') 8675 @ 59421: LINE 1004 "regression-compile-tmp/pass1.imp" 8676 @ 59457: PUSH PRINTSYMBOL 8677 @ 59460: PUSHI #0x0000007d 8678 @ 59465: ASSPAR 8679 @ 59466: CALL 1005 %finish 8680 @ 59467: LINE 1005 "regression-compile-tmp/pass1.imp" 8681 @ 59503: LOCATE L_0004 1006 %if atom1 # la1 %or atom2 # la2 %or lsa # subatom %or lt # type %start 8682 @ 59506: LINE 1006 "regression-compile-tmp/pass1.imp" 8683 @ 59542: PUSH ATOM1 8684 @ 59545: PUSH LA1 8685 @ 59548: JUMPIF # L_0005 8686 @ 59552: PUSH ATOM2 8687 @ 59555: PUSH LA2 8688 @ 59558: JUMPIF # L_0005 8689 @ 59562: PUSH LSA 8690 @ 59565: PUSH SUBATOM 8691 @ 59568: JUMPIF # L_0005 8692 @ 59572: PUSH LT 8693 @ 59575: PUSH TYPE 8694 @ 59578: JUMPIF = L_0004 8695 @ 59582: LOCATE L_0005 1007 printstring(" [") 8696 @ 59585: LINE 1007 "regression-compile-tmp/pass1.imp" 8697 @ 59621: PUSH PRINTSTRING 8698 @ 59624: PUSHS " [" 8699 @ 59628: ASSPAR 8700 @ 59629: CALL 1008 la1 = atom1 8701 @ 59630: LINE 1008 "regression-compile-tmp/pass1.imp" 8702 @ 59666: PUSH LA1 8703 @ 59669: PUSH ATOM1 8704 @ 59672: ASSVAL 1009 show(la1) 8705 @ 59673: LINE 1009 "regression-compile-tmp/pass1.imp" 8706 @ 59709: PUSH SHOW 8707 @ 59712: PUSH LA1 8708 @ 59715: ASSPAR 8709 @ 59716: CALL 1010 la2 = atom2 8710 @ 59717: LINE 1010 "regression-compile-tmp/pass1.imp" 8711 @ 59753: PUSH LA2 8712 @ 59756: PUSH ATOM2 8713 @ 59759: ASSVAL 1011 show(la2) 8714 @ 59760: LINE 1011 "regression-compile-tmp/pass1.imp" 8715 @ 59796: PUSH SHOW 8716 @ 59799: PUSH LA2 8717 @ 59802: ASSPAR 8718 @ 59803: CALL 1012 lsa = subatom 8719 @ 59804: LINE 1012 "regression-compile-tmp/pass1.imp" 8720 @ 59840: PUSH LSA 8721 @ 59843: PUSH SUBATOM 8722 @ 59846: ASSVAL 1013 write(lsa, 3) 8723 @ 59847: LINE 1013 "regression-compile-tmp/pass1.imp" 8724 @ 59883: PUSH WRITE 8725 @ 59886: PUSH LSA 8726 @ 59889: ASSPAR 8727 @ 59890: PUSHI #0x00000003 8728 @ 59895: ASSPAR 8729 @ 59896: CALL 1014 lt = type 8730 @ 59897: LINE 1014 "regression-compile-tmp/pass1.imp" 8731 @ 59933: PUSH LT 8732 @ 59936: PUSH TYPE 8733 @ 59939: ASSVAL 1015 write(lt, 5) 8734 @ 59940: LINE 1015 "regression-compile-tmp/pass1.imp" 8735 @ 59976: PUSH WRITE 8736 @ 59979: PUSH LT 8737 @ 59982: ASSPAR 8738 @ 59983: PUSHI #0x00000005 8739 @ 59988: ASSPAR 8740 @ 59989: CALL 1016 printsymbol(']') 8741 @ 59990: LINE 1016 "regression-compile-tmp/pass1.imp" 8742 @ 60026: PUSH PRINTSYMBOL 8743 @ 60029: PUSHI #0x0000005d 8744 @ 60034: ASSPAR 8745 @ 60035: CALL 1017 %finish 8746 @ 60036: LINE 1017 "regression-compile-tmp/pass1.imp" 8747 @ 60072: LOCATE L_0004 1018 newline 8748 @ 60075: LINE 1018 "regression-compile-tmp/pass1.imp" 8749 @ 60111: PUSH NEWLINE 8750 @ 60114: CALL 1019 %end 1020 8751 @ 60115: LINE 1019 "regression-compile-tmp/pass1.imp" 8752 @ 60151: END _lev0id0_COMPILEBLOCK_ANALYSE_TRACEANALYSIS {lev=4 --> 3} 1021 %routine get sym 8753 @ 60152: LINE 1021 "regression-compile-tmp/pass1.imp" 8754 @ 60188: DEF GETSYM (_lev0id0_COMPILEBLOCK_ANALYSE_GETSYM) p1=V_0118 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8755 @ 60206: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 8756 @ 60207: FINISH ) {lev=4} 1022 readsymbol(sym) 8757 @ 60208: LINE 1022 "regression-compile-tmp/pass1.imp" 8758 @ 60244: PUSH READSYMBOL 8759 @ 60247: PUSH SYM 8760 @ 60250: ASSPAR 8761 @ 60251: CALL 1023 abandon(5) %if sym < 0 8762 @ 60252: LINE 1023 "regression-compile-tmp/pass1.imp" 8763 @ 60288: PUSH SYM 8764 @ 60291: PUSHI #0x00000000 8765 @ 60296: JUMPIF >= L_0004 8766 @ 60300: PUSH ABANDON 8767 @ 60303: PUSHI #0x00000005 8768 @ 60308: ASSPAR 8769 @ 60309: CALL 8770 @ 60310: LOCATE L_0004 1024 pos = pos+1 %if pos # 133 8771 @ 60313: LINE 1024 "regression-compile-tmp/pass1.imp" 8772 @ 60349: PUSH POS 8773 @ 60352: PUSHI #0x00000085 8774 @ 60357: JUMPIF = L_0004 8775 @ 60361: PUSH POS 8776 @ 60364: PUSH POS 8777 @ 60367: PUSHI #0x00000001 8778 @ 60372: ADD 8779 @ 60373: ASSVAL 8780 @ 60374: LOCATE L_0004 1025 char(pos) = sym 8781 @ 60377: LINE 1025 "regression-compile-tmp/pass1.imp" 8782 @ 60413: PUSH CHAR 8783 @ 60416: PUSH POS 8784 @ 60419: ACCESS 8785 @ 60420: PUSH SYM 8786 @ 60423: ASSVAL 1026 printsymbol(sym) %if list <= 0 8787 @ 60424: LINE 1026 "regression-compile-tmp/pass1.imp" 8788 @ 60460: PUSH LIST 8789 @ 60463: PUSHI #0x00000000 8790 @ 60468: JUMPIF > L_0004 8791 @ 60472: PUSH PRINTSYMBOL 8792 @ 60475: PUSH SYM 8793 @ 60478: ASSPAR 8794 @ 60479: CALL 8795 @ 60480: LOCATE L_0004 1027 column = column+1 8796 @ 60483: LINE 1027 "regression-compile-tmp/pass1.imp" 8797 @ 60519: PUSH COLUMN 8798 @ 60522: PUSH COLUMN 8799 @ 60525: PUSHI #0x00000001 8800 @ 60530: ADD 8801 @ 60531: ASSVAL 1028 %end 1029 8802 @ 60532: LINE 1028 "regression-compile-tmp/pass1.imp" 8803 @ 60568: END _lev0id0_COMPILEBLOCK_ANALYSE_GETSYM {lev=4 --> 3} 1030 %routine read sym 8804 @ 60569: LINE 1030 "regression-compile-tmp/pass1.imp" 8805 @ 60605: DEF READSYM (_lev0id0_COMPILEBLOCK_ANALYSE_READSYM) p1=V_0119 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8806 @ 60624: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 8807 @ 60625: FINISH ) {lev=4} 1031 %owninteger Last = 0 8808 @ 60626: LINE 1031 "regression-compile-tmp/pass1.imp" 8809 @ 60662: PUSHI #0x00000000 8810 @ 60667: DEF LAST p1=V_011a a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 8811 @ 60683: INIT 1 1032 %constbyteintegerarray mapped(0:127) = %c 1033 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10, 0, 3, 0, 0, 0, 1034 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1035 0,'!','"','#', '$', 1,'&', 39, '(',')','*','+', ',','-','.','/', 1036 '0','1','2','3', '4','5','6','7', '8','9',':',';', '<','=','>','?', 1037 '@','A','B','C', 'D','E','F','G', 'H','I','J','K', 'L','M','N','O', 1038 'P','Q','R','S', 'T','U','V','W', 'X','Y','Z','[', '\',']','^','_', 1039 '`','A','B','C', 'D','E','F','G', 'H','I','J','K', 'L','M','N','O', 1040 'P','Q','R','S', 'T','U','V','W', 'X','Y','Z', 2 , '|','}','~', 0 1041 1042 !! 0 = space 1043 !! 1 = % 1044 !! 2 = { 1045 !! 3 = ff 1046 !! other values represent themselves 1047 8812 @ 60686: LINE 1032 "regression-compile-tmp/pass1.imp" 8813 @ 60722: PUSHI #0x00000000 8814 @ 60727: PUSHI #0x0000007f 8815 @ 60732: BOUNDS 8816 @ 60733: DEF MAPPED p1=V_011b 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 8817 @ 60751: PUSHI #0x00000000 8818 @ 60756: INIT 1 8819 @ 60759: PUSHI #0x00000000 8820 @ 60764: INIT 1 8821 @ 60767: PUSHI #0x00000000 8822 @ 60772: INIT 1 8823 @ 60775: PUSHI #0x00000000 8824 @ 60780: INIT 1 8825 @ 60783: PUSHI #0x00000000 8826 @ 60788: INIT 1 8827 @ 60791: PUSHI #0x00000000 8828 @ 60796: INIT 1 8829 @ 60799: PUSHI #0x00000000 8830 @ 60804: INIT 1 8831 @ 60807: PUSHI #0x00000000 8832 @ 60812: INIT 1 8833 @ 60815: PUSHI #0x00000000 8834 @ 60820: INIT 1 8835 @ 60823: PUSHI #0x00000000 8836 @ 60828: INIT 1 8837 @ 60831: PUSHI #0x0000000a 8838 @ 60836: INIT 1 8839 @ 60839: PUSHI #0x00000000 8840 @ 60844: INIT 1 8841 @ 60847: PUSHI #0x00000003 8842 @ 60852: INIT 1 8843 @ 60855: PUSHI #0x00000000 8844 @ 60860: INIT 1 8845 @ 60863: PUSHI #0x00000000 8846 @ 60868: INIT 1 8847 @ 60871: PUSHI #0x00000000 8848 @ 60876: INIT 1 8849 @ 60879: PUSHI #0x00000000 8850 @ 60884: INIT 1 8851 @ 60887: PUSHI #0x00000000 8852 @ 60892: INIT 1 8853 @ 60895: PUSHI #0x00000000 8854 @ 60900: INIT 1 8855 @ 60903: PUSHI #0x00000000 8856 @ 60908: INIT 1 8857 @ 60911: PUSHI #0x00000000 8858 @ 60916: INIT 1 8859 @ 60919: PUSHI #0x00000000 8860 @ 60924: INIT 1 8861 @ 60927: PUSHI #0x00000000 8862 @ 60932: INIT 1 8863 @ 60935: PUSHI #0x00000000 8864 @ 60940: INIT 1 8865 @ 60943: PUSHI #0x00000000 8866 @ 60948: INIT 1 8867 @ 60951: PUSHI #0x00000000 8868 @ 60956: INIT 1 8869 @ 60959: PUSHI #0x00000000 8870 @ 60964: INIT 1 8871 @ 60967: PUSHI #0x00000000 8872 @ 60972: INIT 1 8873 @ 60975: PUSHI #0x00000000 8874 @ 60980: INIT 1 8875 @ 60983: PUSHI #0x00000000 8876 @ 60988: INIT 1 8877 @ 60991: PUSHI #0x00000000 8878 @ 60996: INIT 1 8879 @ 60999: PUSHI #0x00000000 8880 @ 61004: INIT 1 8881 @ 61007: PUSHI #0x00000000 8882 @ 61012: INIT 1 8883 @ 61015: PUSHI #0x00000021 8884 @ 61020: INIT 1 8885 @ 61023: PUSHI #0x00000022 8886 @ 61028: INIT 1 8887 @ 61031: PUSHI #0x00000023 8888 @ 61036: INIT 1 8889 @ 61039: PUSHI #0x00000024 8890 @ 61044: INIT 1 8891 @ 61047: PUSHI #0x00000001 8892 @ 61052: INIT 1 8893 @ 61055: PUSHI #0x00000026 8894 @ 61060: INIT 1 8895 @ 61063: PUSHI #0x00000027 8896 @ 61068: INIT 1 8897 @ 61071: PUSHI #0x00000028 8898 @ 61076: INIT 1 8899 @ 61079: PUSHI #0x00000029 8900 @ 61084: INIT 1 8901 @ 61087: PUSHI #0x0000002a 8902 @ 61092: INIT 1 8903 @ 61095: PUSHI #0x0000002b 8904 @ 61100: INIT 1 8905 @ 61103: PUSHI #0x0000002c 8906 @ 61108: INIT 1 8907 @ 61111: PUSHI #0x0000002d 8908 @ 61116: INIT 1 8909 @ 61119: PUSHI #0x0000002e 8910 @ 61124: INIT 1 8911 @ 61127: PUSHI #0x0000002f 8912 @ 61132: INIT 1 8913 @ 61135: PUSHI #0x00000030 8914 @ 61140: INIT 1 8915 @ 61143: PUSHI #0x00000031 8916 @ 61148: INIT 1 8917 @ 61151: PUSHI #0x00000032 8918 @ 61156: INIT 1 8919 @ 61159: PUSHI #0x00000033 8920 @ 61164: INIT 1 8921 @ 61167: PUSHI #0x00000034 8922 @ 61172: INIT 1 8923 @ 61175: PUSHI #0x00000035 8924 @ 61180: INIT 1 8925 @ 61183: PUSHI #0x00000036 8926 @ 61188: INIT 1 8927 @ 61191: PUSHI #0x00000037 8928 @ 61196: INIT 1 8929 @ 61199: PUSHI #0x00000038 8930 @ 61204: INIT 1 8931 @ 61207: PUSHI #0x00000039 8932 @ 61212: INIT 1 8933 @ 61215: PUSHI #0x0000003a 8934 @ 61220: INIT 1 8935 @ 61223: PUSHI #0x0000003b 8936 @ 61228: INIT 1 8937 @ 61231: PUSHI #0x0000003c 8938 @ 61236: INIT 1 8939 @ 61239: PUSHI #0x0000003d 8940 @ 61244: INIT 1 8941 @ 61247: PUSHI #0x0000003e 8942 @ 61252: INIT 1 8943 @ 61255: PUSHI #0x0000003f 8944 @ 61260: INIT 1 8945 @ 61263: PUSHI #0x00000040 8946 @ 61268: INIT 1 8947 @ 61271: PUSHI #0x00000041 8948 @ 61276: INIT 1 8949 @ 61279: PUSHI #0x00000042 8950 @ 61284: INIT 1 8951 @ 61287: PUSHI #0x00000043 8952 @ 61292: INIT 1 8953 @ 61295: PUSHI #0x00000044 8954 @ 61300: INIT 1 8955 @ 61303: PUSHI #0x00000045 8956 @ 61308: INIT 1 8957 @ 61311: PUSHI #0x00000046 8958 @ 61316: INIT 1 8959 @ 61319: PUSHI #0x00000047 8960 @ 61324: INIT 1 8961 @ 61327: PUSHI #0x00000048 8962 @ 61332: INIT 1 8963 @ 61335: PUSHI #0x00000049 8964 @ 61340: INIT 1 8965 @ 61343: PUSHI #0x0000004a 8966 @ 61348: INIT 1 8967 @ 61351: PUSHI #0x0000004b 8968 @ 61356: INIT 1 8969 @ 61359: PUSHI #0x0000004c 8970 @ 61364: INIT 1 8971 @ 61367: PUSHI #0x0000004d 8972 @ 61372: INIT 1 8973 @ 61375: PUSHI #0x0000004e 8974 @ 61380: INIT 1 8975 @ 61383: PUSHI #0x0000004f 8976 @ 61388: INIT 1 8977 @ 61391: PUSHI #0x00000050 8978 @ 61396: INIT 1 8979 @ 61399: PUSHI #0x00000051 8980 @ 61404: INIT 1 8981 @ 61407: PUSHI #0x00000052 8982 @ 61412: INIT 1 8983 @ 61415: PUSHI #0x00000053 8984 @ 61420: INIT 1 8985 @ 61423: PUSHI #0x00000054 8986 @ 61428: INIT 1 8987 @ 61431: PUSHI #0x00000055 8988 @ 61436: INIT 1 8989 @ 61439: PUSHI #0x00000056 8990 @ 61444: INIT 1 8991 @ 61447: PUSHI #0x00000057 8992 @ 61452: INIT 1 8993 @ 61455: PUSHI #0x00000058 8994 @ 61460: INIT 1 8995 @ 61463: PUSHI #0x00000059 8996 @ 61468: INIT 1 8997 @ 61471: PUSHI #0x0000005a 8998 @ 61476: INIT 1 8999 @ 61479: PUSHI #0x0000005b 9000 @ 61484: INIT 1 9001 @ 61487: PUSHI #0x0000005c 9002 @ 61492: INIT 1 9003 @ 61495: PUSHI #0x0000005d 9004 @ 61500: INIT 1 9005 @ 61503: PUSHI #0x0000005e 9006 @ 61508: INIT 1 9007 @ 61511: PUSHI #0x0000005f 9008 @ 61516: INIT 1 9009 @ 61519: PUSHI #0x00000060 9010 @ 61524: INIT 1 9011 @ 61527: PUSHI #0x00000041 9012 @ 61532: INIT 1 9013 @ 61535: PUSHI #0x00000042 9014 @ 61540: INIT 1 9015 @ 61543: PUSHI #0x00000043 9016 @ 61548: INIT 1 9017 @ 61551: PUSHI #0x00000044 9018 @ 61556: INIT 1 9019 @ 61559: PUSHI #0x00000045 9020 @ 61564: INIT 1 9021 @ 61567: PUSHI #0x00000046 9022 @ 61572: INIT 1 9023 @ 61575: PUSHI #0x00000047 9024 @ 61580: INIT 1 9025 @ 61583: PUSHI #0x00000048 9026 @ 61588: INIT 1 9027 @ 61591: PUSHI #0x00000049 9028 @ 61596: INIT 1 9029 @ 61599: PUSHI #0x0000004a 9030 @ 61604: INIT 1 9031 @ 61607: PUSHI #0x0000004b 9032 @ 61612: INIT 1 9033 @ 61615: PUSHI #0x0000004c 9034 @ 61620: INIT 1 9035 @ 61623: PUSHI #0x0000004d 9036 @ 61628: INIT 1 9037 @ 61631: PUSHI #0x0000004e 9038 @ 61636: INIT 1 9039 @ 61639: PUSHI #0x0000004f 9040 @ 61644: INIT 1 9041 @ 61647: PUSHI #0x00000050 9042 @ 61652: INIT 1 9043 @ 61655: PUSHI #0x00000051 9044 @ 61660: INIT 1 9045 @ 61663: PUSHI #0x00000052 9046 @ 61668: INIT 1 9047 @ 61671: PUSHI #0x00000053 9048 @ 61676: INIT 1 9049 @ 61679: PUSHI #0x00000054 9050 @ 61684: INIT 1 9051 @ 61687: PUSHI #0x00000055 9052 @ 61692: INIT 1 9053 @ 61695: PUSHI #0x00000056 9054 @ 61700: INIT 1 9055 @ 61703: PUSHI #0x00000057 9056 @ 61708: INIT 1 9057 @ 61711: PUSHI #0x00000058 9058 @ 61716: INIT 1 9059 @ 61719: PUSHI #0x00000059 9060 @ 61724: INIT 1 9061 @ 61727: PUSHI #0x0000005a 9062 @ 61732: INIT 1 9063 @ 61735: PUSHI #0x00000002 9064 @ 61740: INIT 1 9065 @ 61743: PUSHI #0x0000007c 9066 @ 61748: INIT 1 9067 @ 61751: PUSHI #0x0000007d 9068 @ 61756: INIT 1 9069 @ 61759: PUSHI #0x0000007e 9070 @ 61764: INIT 1 9071 @ 61767: PUSHI #0x00000000 9072 @ 61772: INIT 1 1048 %if sym = nl %start 9073 @ 61775: LINE 1048 "regression-compile-tmp/pass1.imp" 9074 @ 61811: PUSH SYM 9075 @ 61814: PUSHI #0x0000000a 9076 @ 61819: JUMPIF # L_0004 1049 s1: lines = lines+1 9077 @ 61823: LINE 1049 "regression-compile-tmp/pass1.imp" 9078 @ 61859: LABEL L_011c 9079 @ 61862: LINE 1049 "regression-compile-tmp/pass1.imp" 9080 @ 61898: PUSH LINES 9081 @ 61901: PUSH LINES 9082 @ 61904: PUSHI #0x00000001 9083 @ 61909: ADD 9084 @ 61910: ASSVAL 1050 printsymbol(end mark) %if end mark # 0 9085 @ 61911: LINE 1050 "regression-compile-tmp/pass1.imp" 9086 @ 61947: PUSH ENDMARK 9087 @ 61950: PUSHI #0x00000000 9088 @ 61955: JUMPIF = L_0007 9089 @ 61959: PUSH PRINTSYMBOL 9090 @ 61962: PUSH ENDMARK 9091 @ 61965: ASSPAR 9092 @ 61966: CALL 9093 @ 61967: LOCATE L_0007 1051 s11: pos = 0; pos1 = 0; pos2 = 0; margin = 0; column = 0 9094 @ 61970: LINE 1051 "regression-compile-tmp/pass1.imp" 9095 @ 62006: LABEL L_011d 9096 @ 62009: LINE 1051 "regression-compile-tmp/pass1.imp" 9097 @ 62045: PUSH POS 9098 @ 62048: PUSHI #0x00000000 9099 @ 62053: ASSVAL 9100 @ 62054: LINE 1051 "regression-compile-tmp/pass1.imp" 9101 @ 62090: PUSH POS1 9102 @ 62093: PUSHI #0x00000000 9103 @ 62098: ASSVAL 9104 @ 62099: LINE 1051 "regression-compile-tmp/pass1.imp" 9105 @ 62135: PUSH POS2 9106 @ 62138: PUSHI #0x00000000 9107 @ 62143: ASSVAL 9108 @ 62144: LINE 1051 "regression-compile-tmp/pass1.imp" 9109 @ 62180: PUSH MARGIN 9110 @ 62183: PUSHI #0x00000000 9111 @ 62188: ASSVAL 9112 @ 62189: LINE 1051 "regression-compile-tmp/pass1.imp" 9113 @ 62225: PUSH COLUMN 9114 @ 62228: PUSHI #0x00000000 9115 @ 62233: ASSVAL 1052 Last = 0 9116 @ 62234: LINE 1052 "regression-compile-tmp/pass1.imp" 9117 @ 62270: PUSH LAST 9118 @ 62273: PUSHI #0x00000000 9119 @ 62278: ASSVAL 1053 end mark = 0 9120 @ 62279: LINE 1053 "regression-compile-tmp/pass1.imp" 9121 @ 62315: PUSH ENDMARK 9122 @ 62318: PUSHI #0x00000000 9123 @ 62323: ASSVAL 1054 %if list <= 0 %start 9124 @ 62324: LINE 1054 "regression-compile-tmp/pass1.imp" 9125 @ 62360: PUSH LIST 9126 @ 62363: PUSHI #0x00000000 9127 @ 62368: JUMPIF > L_0007 1055 %if include # 0 %start 9128 @ 62372: LINE 1055 "regression-compile-tmp/pass1.imp" 9129 @ 62408: PUSH INCLUDE 9130 @ 62411: PUSHI #0x00000000 9131 @ 62416: JUMPIF = L_000a 1056 printstring(" &"); write(lines, -4) 9132 @ 62420: LINE 1056 "regression-compile-tmp/pass1.imp" 9133 @ 62456: PUSH PRINTSTRING 9134 @ 62459: PUSHS " &" 9135 @ 62463: ASSPAR 9136 @ 62464: CALL 9137 @ 62465: LINE 1056 "regression-compile-tmp/pass1.imp" 9138 @ 62501: PUSH WRITE 9139 @ 62504: PUSH LINES 9140 @ 62507: ASSPAR 9141 @ 62508: PUSHI #0x00000004 9142 @ 62513: NEGATE 9143 @ 62514: ASSPAR 9144 @ 62515: CALL 1057 %finish %else write(lines, 5) 9145 @ 62516: LINE 1057 "regression-compile-tmp/pass1.imp" 9146 @ 62552: GOTO L_0009 9147 @ 62555: LOCATE L_000a 9148 @ 62558: PUSH WRITE 9149 @ 62561: PUSH LINES 9150 @ 62564: ASSPAR 9151 @ 62565: PUSHI #0x00000005 9152 @ 62570: ASSPAR 9153 @ 62571: CALL 9154 @ 62572: LOCATE L_0009 1058 csym = cont; printsymbol(csym) 9155 @ 62575: LINE 1058 "regression-compile-tmp/pass1.imp" 9156 @ 62611: PUSH CSYM 9157 @ 62614: PUSH CONT 9158 @ 62617: ASSVAL 9159 @ 62618: LINE 1058 "regression-compile-tmp/pass1.imp" 9160 @ 62654: PUSH PRINTSYMBOL 9161 @ 62657: PUSH CSYM 9162 @ 62660: ASSPAR 9163 @ 62661: CALL 1059 space 9164 @ 62662: LINE 1059 "regression-compile-tmp/pass1.imp" 9165 @ 62698: PUSH SPACE 9166 @ 62701: CALL 1060 %if error margin # 0 %start 9167 @ 62702: LINE 1060 "regression-compile-tmp/pass1.imp" 9168 @ 62738: PUSH ERRORMARGIN 9169 @ 62741: PUSHI #0x00000000 9170 @ 62746: JUMPIF = L_000a 1061 lines = lines-1 9171 @ 62750: LINE 1061 "regression-compile-tmp/pass1.imp" 9172 @ 62786: PUSH LINES 9173 @ 62789: PUSH LINES 9174 @ 62792: PUSHI #0x00000001 9175 @ 62797: SUB 9176 @ 62798: ASSVAL 1062 spaces(error margin) 9177 @ 62799: LINE 1062 "regression-compile-tmp/pass1.imp" 9178 @ 62835: PUSH SPACES 9179 @ 62838: PUSH ERRORMARGIN 9180 @ 62841: ASSPAR 9181 @ 62842: CALL 1063 error margin = 0 9182 @ 62843: LINE 1063 "regression-compile-tmp/pass1.imp" 9183 @ 62879: PUSH ERRORMARGIN 9184 @ 62882: PUSHI #0x00000000 9185 @ 62887: ASSVAL 1064 %if error sym # 0 %start 9186 @ 62888: LINE 1064 "regression-compile-tmp/pass1.imp" 9187 @ 62924: PUSH ERRORSYM 9188 @ 62927: PUSHI #0x00000000 9189 @ 62932: JUMPIF = L_000d 1065 printsymbol(error sym) 9190 @ 62936: LINE 1065 "regression-compile-tmp/pass1.imp" 9191 @ 62972: PUSH PRINTSYMBOL 9192 @ 62975: PUSH ERRORSYM 9193 @ 62978: ASSPAR 9194 @ 62979: CALL 1066 pos = 1; char(1) = error sym 9195 @ 62980: LINE 1066 "regression-compile-tmp/pass1.imp" 9196 @ 63016: PUSH POS 9197 @ 63019: PUSHI #0x00000001 9198 @ 63024: ASSVAL 9199 @ 63025: LINE 1066 "regression-compile-tmp/pass1.imp" 9200 @ 63061: PUSH CHAR 9201 @ 63064: PUSHI #0x00000001 9202 @ 63069: ACCESS 9203 @ 63070: PUSH ERRORSYM 9204 @ 63073: ASSVAL 1067 sym = error sym; error sym = 0 9205 @ 63074: LINE 1067 "regression-compile-tmp/pass1.imp" 9206 @ 63110: PUSH SYM 9207 @ 63113: PUSH ERRORSYM 9208 @ 63116: ASSVAL 9209 @ 63117: LINE 1067 "regression-compile-tmp/pass1.imp" 9210 @ 63153: PUSH ERRORSYM 9211 @ 63156: PUSHI #0x00000000 9212 @ 63161: ASSVAL 1068 ->s5 9213 @ 63162: LINE 1068 "regression-compile-tmp/pass1.imp" 9214 @ 63198: JUMP L_011e 1069 %finish 9215 @ 63201: LINE 1069 "regression-compile-tmp/pass1.imp" 9216 @ 63237: LOCATE L_000d 1070 %finish 9217 @ 63240: LINE 1070 "regression-compile-tmp/pass1.imp" 9218 @ 63276: LOCATE L_000a 1071 %finish 9219 @ 63279: LINE 1071 "regression-compile-tmp/pass1.imp" 9220 @ 63315: LOCATE L_0007 1072 s2: symtype = 1 9221 @ 63318: LINE 1072 "regression-compile-tmp/pass1.imp" 9222 @ 63354: LABEL L_011f 9223 @ 63357: LINE 1072 "regression-compile-tmp/pass1.imp" 9224 @ 63393: PUSH SYMTYPE 9225 @ 63396: PUSHI #0x00000001 9226 @ 63401: ASSVAL 1073 %finish 9227 @ 63402: LINE 1073 "regression-compile-tmp/pass1.imp" 9228 @ 63438: LOCATE L_0004 1074 s3: readsymbol(sym) 9229 @ 63441: LINE 1074 "regression-compile-tmp/pass1.imp" 9230 @ 63477: LABEL L_0120 9231 @ 63480: LINE 1074 "regression-compile-tmp/pass1.imp" 9232 @ 63516: PUSH READSYMBOL 9233 @ 63519: PUSH SYM 9234 @ 63522: ASSPAR 9235 @ 63523: CALL 1075 abandon(5) %if sym < 0 9236 @ 63524: LINE 1075 "regression-compile-tmp/pass1.imp" 9237 @ 63560: PUSH SYM 9238 @ 63563: PUSHI #0x00000000 9239 @ 63568: JUMPIF >= L_0004 9240 @ 63572: PUSH ABANDON 9241 @ 63575: PUSHI #0x00000005 9242 @ 63580: ASSPAR 9243 @ 63581: CALL 9244 @ 63582: LOCATE L_0004 1076 pos = pos+1 %if pos # 133 9245 @ 63585: LINE 1076 "regression-compile-tmp/pass1.imp" 9246 @ 63621: PUSH POS 9247 @ 63624: PUSHI #0x00000085 9248 @ 63629: JUMPIF = L_0004 9249 @ 63633: PUSH POS 9250 @ 63636: PUSH POS 9251 @ 63639: PUSHI #0x00000001 9252 @ 63644: ADD 9253 @ 63645: ASSVAL 9254 @ 63646: LOCATE L_0004 1077 char(pos) = sym 9255 @ 63649: LINE 1077 "regression-compile-tmp/pass1.imp" 9256 @ 63685: PUSH CHAR 9257 @ 63688: PUSH POS 9258 @ 63691: ACCESS 9259 @ 63692: PUSH SYM 9260 @ 63695: ASSVAL 1078 printsymbol(sym) %if list <= 0 9261 @ 63696: LINE 1078 "regression-compile-tmp/pass1.imp" 9262 @ 63732: PUSH LIST 9263 @ 63735: PUSHI #0x00000000 9264 @ 63740: JUMPIF > L_0004 9265 @ 63744: PUSH PRINTSYMBOL 9266 @ 63747: PUSH SYM 9267 @ 63750: ASSPAR 9268 @ 63751: CALL 9269 @ 63752: LOCATE L_0004 1079 column = column+1 9270 @ 63755: LINE 1079 "regression-compile-tmp/pass1.imp" 9271 @ 63791: PUSH COLUMN 9272 @ 63794: PUSH COLUMN 9273 @ 63797: PUSHI #0x00000001 9274 @ 63802: ADD 9275 @ 63803: ASSVAL 1080 s5: %if sym # nl %start 9276 @ 63804: LINE 1080 "regression-compile-tmp/pass1.imp" 9277 @ 63840: LABEL L_011e 9278 @ 63843: LINE 1080 "regression-compile-tmp/pass1.imp" 9279 @ 63879: PUSH SYM 9280 @ 63882: PUSHI #0x0000000a 9281 @ 63887: JUMPIF = L_0004 1081 Last = Sym 9282 @ 63891: LINE 1081 "regression-compile-tmp/pass1.imp" 9283 @ 63927: PUSH LAST 9284 @ 63930: PUSH SYM 9285 @ 63933: ASSVAL 1082 %return %if quote # 0; !dont alter strings 9286 @ 63934: LINE 1082 "regression-compile-tmp/pass1.imp" 9287 @ 63970: PUSH QUOTE 9288 @ 63973: PUSHI #0x00000000 9289 @ 63978: JUMPIF = L_0007 9290 @ 63982: RETURN 9291 @ 63983: LOCATE L_0007 1083 sym = mapped(sym&127) 9292 @ 63986: LINE 1083 "regression-compile-tmp/pass1.imp" 9293 @ 64022: PUSH SYM 9294 @ 64025: PUSH MAPPED 9295 @ 64028: PUSH SYM 9296 @ 64031: PUSHI #0x0000007f 9297 @ 64036: AND 9298 @ 64037: ACCESS 9299 @ 64038: ASSVAL 1084 %if sym <= 3 %start; !special symbol 9300 @ 64039: LINE 1084 "regression-compile-tmp/pass1.imp" 9301 @ 64075: PUSH SYM 9302 @ 64078: PUSHI #0x00000003 9303 @ 64083: JUMPIF > L_0007 1085 ->s2 %if sym = 0; !space (or dubious control) 9304 @ 64087: LINE 1085 "regression-compile-tmp/pass1.imp" 9305 @ 64123: PUSH SYM 9306 @ 64126: PUSHI #0x00000000 9307 @ 64131: JUMPIF # L_000a 9308 @ 64135: JUMP L_011f 9309 @ 64138: LOCATE L_000a 1086 symtype = 2 %and ->s3 %if sym = 1; !% 9310 @ 64141: LINE 1086 "regression-compile-tmp/pass1.imp" 9311 @ 64177: PUSH SYM 9312 @ 64180: PUSHI #0x00000001 9313 @ 64185: JUMPIF # L_000a 9314 @ 64189: PUSH SYMTYPE 9315 @ 64192: PUSHI #0x00000002 9316 @ 64197: ASSVAL 9317 @ 64198: JUMP L_0120 9318 @ 64201: LOCATE L_000a 1087 cont = '+' %and ->s11 %if sym = 3; !ff 1088 !must be { 9319 @ 64204: LINE 1087 "regression-compile-tmp/pass1.imp" 9320 @ 64240: PUSH SYM 9321 @ 64243: PUSHI #0x00000003 9322 @ 64248: JUMPIF # L_000a 9323 @ 64252: PUSH CONT 9324 @ 64255: PUSHI #0x0000002b 9325 @ 64260: ASSVAL 9326 @ 64261: JUMP L_011d 9327 @ 64264: LOCATE L_000a 1089 %cycle 9328 @ 64267: LINE 1089 "regression-compile-tmp/pass1.imp" 9329 @ 64303: LOCATE L_0009 1090 get sym 9330 @ 64306: LINE 1090 "regression-compile-tmp/pass1.imp" 9331 @ 64342: PUSH GETSYM 9332 @ 64345: CALL 1091 ->s3 %if sym = '}' 9333 @ 64346: LINE 1091 "regression-compile-tmp/pass1.imp" 9334 @ 64382: PUSH SYM 9335 @ 64385: PUSHI #0x0000007d 9336 @ 64390: JUMPIF # L_000d 9337 @ 64394: JUMP L_0120 9338 @ 64397: LOCATE L_000d 1092 ->s4 %if sym = nl 9339 @ 64400: LINE 1092 "regression-compile-tmp/pass1.imp" 9340 @ 64436: PUSH SYM 9341 @ 64439: PUSHI #0x0000000a 9342 @ 64444: JUMPIF # L_000d 9343 @ 64448: JUMP L_0121 9344 @ 64451: LOCATE L_000d 1093 %repeat 9345 @ 64454: LINE 1093 "regression-compile-tmp/pass1.imp" 9346 @ 64490: REPEAT L_0009 1094 %finish 9347 @ 64493: LINE 1094 "regression-compile-tmp/pass1.imp" 9348 @ 64529: LOCATE L_0007 1095 key = kdict(sym) 9349 @ 64532: LINE 1095 "regression-compile-tmp/pass1.imp" 9350 @ 64568: PUSH KEY 9351 @ 64571: PUSH KDICT 9352 @ 64574: PUSH SYM 9353 @ 64577: ACCESS 9354 @ 64578: ASSVAL 1096 %if key&3 = 0 %and symtype = 2 %start; !keyword 9355 @ 64579: LINE 1096 "regression-compile-tmp/pass1.imp" 9356 @ 64615: PUSH KEY 9357 @ 64618: PUSHI #0x00000003 9358 @ 64623: AND 9359 @ 64624: PUSHI #0x00000000 9360 @ 64629: JUMPIF # L_0007 9361 @ 64633: PUSH SYMTYPE 9362 @ 64636: PUSHI #0x00000002 9363 @ 64641: JUMPIF # L_0007 1097 %if sym = 'C' %and nextsymbol = nl %start; !%c... 9364 @ 64645: LINE 1097 "regression-compile-tmp/pass1.imp" 9365 @ 64681: PUSH SYM 9366 @ 64684: PUSHI #0x00000043 9367 @ 64689: JUMPIF # L_000a 9368 @ 64693: PUSH NEXTSYMBOL 9369 @ 64696: CALL 9370 @ 64697: PUSHI #0x0000000a 9371 @ 64702: JUMPIF # L_000a 1098 getsym; cont = '+'; ->s1 9372 @ 64706: LINE 1098 "regression-compile-tmp/pass1.imp" 9373 @ 64742: PUSH GETSYM 9374 @ 64745: CALL 9375 @ 64746: LINE 1098 "regression-compile-tmp/pass1.imp" 9376 @ 64782: PUSH CONT 9377 @ 64785: PUSHI #0x0000002b 9378 @ 64790: ASSVAL 9379 @ 64791: LINE 1098 "regression-compile-tmp/pass1.imp" 9380 @ 64827: JUMP L_011c 1099 %finish 9381 @ 64830: LINE 1099 "regression-compile-tmp/pass1.imp" 9382 @ 64866: LOCATE L_000a 1100 %else 9383 @ 64869: LINE 1100 "regression-compile-tmp/pass1.imp" 9384 @ 64905: GOTO L_0006 9385 @ 64908: LOCATE L_0007 1101 symtype = key&3-2 9386 @ 64911: LINE 1101 "regression-compile-tmp/pass1.imp" 9387 @ 64947: PUSH SYMTYPE 9388 @ 64950: PUSH KEY 9389 @ 64953: PUSHI #0x00000003 9390 @ 64958: AND 9391 @ 64959: PUSHI #0x00000002 9392 @ 64964: SUB 9393 @ 64965: ASSVAL 1102 %finish 9394 @ 64966: LINE 1102 "regression-compile-tmp/pass1.imp" 9395 @ 65002: LOCATE L_0006 1103 %return 9396 @ 65005: LINE 1103 "regression-compile-tmp/pass1.imp" 9397 @ 65041: RETURN 1104 %finish 9398 @ 65042: LINE 1104 "regression-compile-tmp/pass1.imp" 9399 @ 65078: LOCATE L_0004 1105 s4: symtype = quote 9400 @ 65081: LINE 1105 "regression-compile-tmp/pass1.imp" 9401 @ 65117: LABEL L_0121 9402 @ 65120: LINE 1105 "regression-compile-tmp/pass1.imp" 9403 @ 65156: PUSH SYMTYPE 9404 @ 65159: PUSH QUOTE 9405 @ 65162: ASSVAL 1106 ->S1 %if last = 0 %and Quote = 0 9406 @ 65163: LINE 1106 "regression-compile-tmp/pass1.imp" 9407 @ 65199: PUSH LAST 9408 @ 65202: PUSHI #0x00000000 9409 @ 65207: JUMPIF # L_0004 9410 @ 65211: PUSH QUOTE 9411 @ 65214: PUSHI #0x00000000 9412 @ 65219: JUMPIF # L_0004 9413 @ 65223: JUMP L_011c 9414 @ 65226: LOCATE L_0004 1107 Cont = '+' 9415 @ 65229: LINE 1107 "regression-compile-tmp/pass1.imp" 9416 @ 65265: PUSH CONT 9417 @ 65268: PUSHI #0x0000002b 9418 @ 65273: ASSVAL 1108 %end 1109 9419 @ 65274: LINE 1108 "regression-compile-tmp/pass1.imp" 9420 @ 65310: END _lev0id0_COMPILEBLOCK_ANALYSE_READSYM {lev=4 --> 3} 1110 %integerfn format selected 9421 @ 65311: LINE 1110 "regression-compile-tmp/pass1.imp" 9422 @ 65347: DEF FORMATSELECTED (_lev0id0_COMPILEBLOCK_ANALYSE_FORMATSELECTED) p1=V_011a a/tf=18 b/format=1 c/ostate=10 type=1 (integer) form=8 (function) special=0 () linkage=0 (auto) spec=0 indirect=1 unass=0 9423 @ 65373: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 9424 @ 65374: FINISH ) {lev=4} 1111 format list = tag(format)_app; !number of names 9425 @ 65375: LINE 1111 "regression-compile-tmp/pass1.imp" 9426 @ 65411: PUSH FORMATLIST 9427 @ 65414: PUSH TAG 9428 @ 65417: PUSH FORMAT 9429 @ 65420: ACCESS 9430 @ 65421: SELECT 1 9431 @ 65424: ASSVAL 1112 %if format list < 0 %start; !forward ref 9432 @ 65425: LINE 1112 "regression-compile-tmp/pass1.imp" 9433 @ 65461: PUSH FORMATLIST 9434 @ 65464: PUSHI #0x00000000 9435 @ 65469: JUMPIF >= L_0004 1113 atom1 = error+22 9436 @ 65473: LINE 1113 "regression-compile-tmp/pass1.imp" 9437 @ 65509: PUSH ATOM1 9438 @ 65512: PUSHI #0x00008000 9439 @ 65517: PUSHI #0x00000016 9440 @ 65522: ADD 9441 @ 65523: ASSVAL 1114 %result = 0 9442 @ 65524: LINE 1114 "regression-compile-tmp/pass1.imp" 9443 @ 65560: PUSHI #0x00000000 9444 @ 65565: RESULT 1115 %finish 9445 @ 65566: LINE 1115 "regression-compile-tmp/pass1.imp" 9446 @ 65602: LOCATE L_0004 1116 %if sym = '_' %start 9447 @ 65605: LINE 1116 "regression-compile-tmp/pass1.imp" 9448 @ 65641: PUSH SYM 9449 @ 65644: PUSHI #0x0000005f 9450 @ 65649: JUMPIF # L_0004 1117 escape class = esc rec 9451 @ 65653: LINE 1117 "regression-compile-tmp/pass1.imp" 9452 @ 65689: PUSH ESCAPECLASS 9453 @ 65692: PUSHI #0x000000ff 9454 @ 65697: ASSVAL 1118 search base = tag(format)_format 9455 @ 65698: LINE 1118 "regression-compile-tmp/pass1.imp" 9456 @ 65734: PUSH SEARCHBASE 9457 @ 65737: PUSH TAG 9458 @ 65740: PUSH FORMAT 9459 @ 65743: ACCESS 9460 @ 65744: SELECT 2 9461 @ 65747: ASSVAL 1119 %finish 9462 @ 65748: LINE 1119 "regression-compile-tmp/pass1.imp" 9463 @ 65784: LOCATE L_0004 1120 %result = 1 9464 @ 65787: LINE 1120 "regression-compile-tmp/pass1.imp" 9465 @ 65823: PUSHI #0x00000001 9466 @ 65828: RESULT 1121 %end 1122 9467 @ 65829: LINE 1121 "regression-compile-tmp/pass1.imp" 9468 @ 65865: END _lev0id0_COMPILEBLOCK_ANALYSE_FORMATSELECTED {lev=4 --> 3} 1123 %routine code atom(%integer target) 9469 @ 65866: LINE 1123 "regression-compile-tmp/pass1.imp" 9470 @ 65902: DEF CODEATOM (_lev0id0_COMPILEBLOCK_ANALYSE_CODEATOM) p1=V_011b a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9471 @ 65922: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 9472 @ 65923: DEF TARGET p1=V_011c a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9473 @ 65941: FINISH ) {lev=4} 1124 %integer dbase, da 9474 @ 65942: LINE 1124 "regression-compile-tmp/pass1.imp" 9475 @ 65978: DEF DBASE p1=V_011d a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9476 @ 65995: DEF DA p1=V_011e a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1125 %integer base, n, mul, pend quote 9477 @ 66009: LINE 1125 "regression-compile-tmp/pass1.imp" 9478 @ 66045: DEF BASE p1=V_011f a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9479 @ 66061: DEF N p1=V_0120 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9480 @ 66074: DEF MUL p1=V_0121 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9481 @ 66089: DEF PENDQUOTE p1=V_0122 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1126 %integer j,k,l, pt 1127 9482 @ 66110: LINE 1126 "regression-compile-tmp/pass1.imp" 9483 @ 66146: DEF J p1=V_0123 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9484 @ 66159: DEF K p1=V_0124 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9485 @ 66172: DEF L p1=V_0125 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9486 @ 66185: DEF PT p1=V_0126 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1128 %routine lookup(%integer d) 9487 @ 66199: LINE 1128 "regression-compile-tmp/pass1.imp" 9488 @ 66235: DEF LOOKUP (_lev0id0_COMPILEBLOCK_ANALYSE_CODEATOM_LOOKUP) p1=V_0127 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9489 @ 66253: START ( FORMAL PARAMETERS {lev=5 --> 6, nested=0 --> 1} 9490 @ 66254: DEF D p1=V_0128 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9491 @ 66267: FINISH ) {lev=5} 1129 %integer new name, vid, k1, k2, form 9492 @ 66268: LINE 1129 "regression-compile-tmp/pass1.imp" 9493 @ 66304: DEF NEWNAME p1=V_0129 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9494 @ 66323: DEF VID p1=V_012a a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9495 @ 66338: DEF K1 p1=V_012b a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9496 @ 66352: DEF K2 p1=V_012c a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9497 @ 66366: DEF FORM p1=V_012d a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1130 %record(tagfm)%name t 9498 @ 66382: LINE 1130 "regression-compile-tmp/pass1.imp" 9499 @ 66418: DEF T p1=V_012e a/tf=42 b/format=84 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1131 %integer new 1132 1133 ! twee little function because SKIMP86 can't do string compare properly 1134 ! returns 1 if the two names are the same, else zero 9500 @ 66431: LINE 1131 "regression-compile-tmp/pass1.imp" 9501 @ 66467: DEF NEW p1=V_012f a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1135 %integerfn dict match(%integer ptr1, ptr2) 9502 @ 66482: LINE 1135 "regression-compile-tmp/pass1.imp" 9503 @ 66518: DEF DICTMATCH (_lev0id0_COMPILEBLOCK_ANALYSE_CODEATOM_LOOKUP_DICTMATCH) p1=V_0130 a/tf=18 b/format=1 c/ostate=10 type=1 (integer) form=8 (function) special=0 () linkage=0 (auto) spec=0 indirect=1 unass=0 9504 @ 66539: START ( FORMAL PARAMETERS {lev=6 --> 7, nested=0 --> 1} 9505 @ 66540: DEF PTR1 p1=V_0131 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9506 @ 66556: DEF PTR2 p1=V_0132 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 9507 @ 66572: FINISH ) {lev=6} 1136 %integer len; 1137 ! start with a cheap check of the length and first character 9508 @ 66573: LINE 1136 "regression-compile-tmp/pass1.imp" 9509 @ 66609: DEF LEN p1=V_0133 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1138 %if dict(ptr1) # dict(ptr2) %then %result = 0 9510 @ 66624: LINE 1138 "regression-compile-tmp/pass1.imp" 9511 @ 66660: PUSH DICT 9512 @ 66663: PUSH PTR1 9513 @ 66666: ACCESS 9514 @ 66667: PUSH DICT 9515 @ 66670: PUSH PTR2 9516 @ 66673: ACCESS 9517 @ 66674: JUMPIF = L_0004 9518 @ 66678: PUSHI #0x00000000 9519 @ 66683: RESULT 9520 @ 66684: LOCATE L_0004 1139 len = dict(ptr1) & 255 9521 @ 66687: LINE 1139 "regression-compile-tmp/pass1.imp" 9522 @ 66723: PUSH LEN 9523 @ 66726: PUSH DICT 9524 @ 66729: PUSH PTR1 9525 @ 66732: ACCESS 9526 @ 66733: PUSHI #0x000000ff 9527 @ 66738: AND 9528 @ 66739: ASSVAL 1140 ptr1 = ptr1 + 1 9529 @ 66740: LINE 1140 "regression-compile-tmp/pass1.imp" 9530 @ 66776: PUSH PTR1 9531 @ 66779: PUSH PTR1 9532 @ 66782: PUSHI #0x00000001 9533 @ 66787: ADD 9534 @ 66788: ASSVAL 1141 ptr2 = ptr2 + 1 9535 @ 66789: LINE 1141 "regression-compile-tmp/pass1.imp" 9536 @ 66825: PUSH PTR2 9537 @ 66828: PUSH PTR2 9538 @ 66831: PUSHI #0x00000001 9539 @ 66836: ADD 9540 @ 66837: ASSVAL 1142 len = len - 1 9541 @ 66838: LINE 1142 "regression-compile-tmp/pass1.imp" 9542 @ 66874: PUSH LEN 9543 @ 66877: PUSH LEN 9544 @ 66880: PUSHI #0x00000001 9545 @ 66885: SUB 9546 @ 66886: ASSVAL 1143 %while len >= 2 %cycle 9547 @ 66887: LINE 1143 "regression-compile-tmp/pass1.imp" 9548 @ 66923: LOCATE L_0003 9549 @ 66926: PUSH LEN 9550 @ 66929: PUSHI #0x00000002 9551 @ 66934: JUMPIF < L_0004 1144 %if dict(ptr1) # dict(ptr2) %then %result = 0 9552 @ 66938: LINE 1144 "regression-compile-tmp/pass1.imp" 9553 @ 66974: PUSH DICT 9554 @ 66977: PUSH PTR1 9555 @ 66980: ACCESS 9556 @ 66981: PUSH DICT 9557 @ 66984: PUSH PTR2 9558 @ 66987: ACCESS 9559 @ 66988: JUMPIF = L_0007 9560 @ 66992: PUSHI #0x00000000 9561 @ 66997: RESULT 9562 @ 66998: LOCATE L_0007 1145 ptr1 = ptr1 + 1 9563 @ 67001: LINE 1145 "regression-compile-tmp/pass1.imp" 9564 @ 67037: PUSH PTR1 9565 @ 67040: PUSH PTR1 9566 @ 67043: PUSHI #0x00000001 9567 @ 67048: ADD 9568 @ 67049: ASSVAL 1146 ptr2 = ptr2 + 1 9569 @ 67050: LINE 1146 "regression-compile-tmp/pass1.imp" 9570 @ 67086: PUSH PTR2 9571 @ 67089: PUSH PTR2 9572 @ 67092: PUSHI #0x00000001 9573 @ 67097: ADD 9574 @ 67098: ASSVAL 1147 len = len - 2 9575 @ 67099: LINE 1147 "regression-compile-tmp/pass1.imp" 9576 @ 67135: PUSH LEN 9577 @ 67138: PUSH LEN 9578 @ 67141: PUSHI #0x00000002 9579 @ 67146: SUB 9580 @ 67147: ASSVAL 1148 %repeat 1149 ! if the string was odd length, we might need one last byte checked 9581 @ 67148: LINE 1148 "regression-compile-tmp/pass1.imp" 9582 @ 67184: REPEAT L_0003 9583 @ 67187: LOCATE L_0004 1150 %if len = 1 %start 9584 @ 67190: LINE 1150 "regression-compile-tmp/pass1.imp" 9585 @ 67226: PUSH LEN 9586 @ 67229: PUSHI #0x00000001 9587 @ 67234: JUMPIF # L_0004 1151 %if dict(ptr1)&255 # dict(ptr2)&255 %then %result = 0 9588 @ 67238: LINE 1151 "regression-compile-tmp/pass1.imp" 9589 @ 67274: PUSH DICT 9590 @ 67277: PUSH PTR1 9591 @ 67280: ACCESS 9592 @ 67281: PUSHI #0x000000ff 9593 @ 67286: AND 9594 @ 67287: PUSH DICT 9595 @ 67290: PUSH PTR2 9596 @ 67293: ACCESS 9597 @ 67294: PUSHI #0x000000ff 9598 @ 67299: AND 9599 @ 67300: JUMPIF = L_0007 9600 @ 67304: PUSHI #0x00000000 9601 @ 67309: RESULT 9602 @ 67310: LOCATE L_0007 1152 %finish 9603 @ 67313: LINE 1152 "regression-compile-tmp/pass1.imp" 9604 @ 67349: LOCATE L_0004 1153 %result = 1 9605 @ 67352: LINE 1153 "regression-compile-tmp/pass1.imp" 9606 @ 67388: PUSHI #0x00000001 9607 @ 67393: RESULT 1154 %end 1155 1156 !first locate the text of the name 9608 @ 67394: LINE 1154 "regression-compile-tmp/pass1.imp" 9609 @ 67430: END _lev0id0_COMPILEBLOCK_ANALYSE_CODEATOM_LOOKUP_DICTMATCH {lev=6 --> 5} 1157 new = dmax+1; ! points to text of string in dictionary 9610 @ 67431: LINE 1157 "regression-compile-tmp/pass1.imp" 9611 @ 67467: PUSH NEW 9612 @ 67470: PUSH DMAX 9613 @ 67473: PUSHI #0x00000001 9614 @ 67478: ADD 9615 @ 67479: ASSVAL 1158 k1 = hash value & max names; ! rather crude hash! 1159 9616 @ 67480: LINE 1158 "regression-compile-tmp/pass1.imp" 9617 @ 67516: PUSH K1 9618 @ 67519: PUSH HASHVALUE 9619 @ 67522: PUSHI #0x000007ff 9620 @ 67527: AND 9621 @ 67528: ASSVAL 1160 %cycle 9622 @ 67529: LINE 1160 "regression-compile-tmp/pass1.imp" 9623 @ 67565: LOCATE L_0003 1161 newname = hash(k1) 9624 @ 67568: LINE 1161 "regression-compile-tmp/pass1.imp" 9625 @ 67604: PUSH NEWNAME 9626 @ 67607: PUSH HASH 9627 @ 67610: PUSH K1 9628 @ 67613: ACCESS 9629 @ 67614: ASSVAL 1162 %exit %if newname = 0; !not in 9630 @ 67615: LINE 1162 "regression-compile-tmp/pass1.imp" 9631 @ 67651: PUSH NEWNAME 9632 @ 67654: PUSHI #0x00000000 9633 @ 67659: JUMPIF # L_0007 9634 @ 67663: GOTO L_0004 9635 @ 67666: LOCATE L_0007 1163 ->in %if dict match(newname+1, new) = 1 9636 @ 67669: LINE 1163 "regression-compile-tmp/pass1.imp" 9637 @ 67705: PUSH DICTMATCH 9638 @ 67708: PUSH NEWNAME 9639 @ 67711: PUSHI #0x00000001 9640 @ 67716: ADD 9641 @ 67717: ASSPAR 9642 @ 67718: PUSH NEW 9643 @ 67721: ASSPAR 9644 @ 67722: CALL 9645 @ 67723: PUSHI #0x00000001 9646 @ 67728: JUMPIF # L_0007 9647 @ 67732: JUMP L_0131 9648 @ 67735: LOCATE L_0007 1164 k1 = (k1+1)&max names 9649 @ 67738: LINE 1164 "regression-compile-tmp/pass1.imp" 9650 @ 67774: PUSH K1 9651 @ 67777: PUSH K1 9652 @ 67780: PUSHI #0x00000001 9653 @ 67785: ADD 9654 @ 67786: PUSHI #0x000007ff 9655 @ 67791: AND 9656 @ 67792: ASSVAL 1165 %repeat 1166 1167 ! not found 9657 @ 67793: LINE 1165 "regression-compile-tmp/pass1.imp" 9658 @ 67829: REPEAT L_0003 9659 @ 67832: LOCATE L_0004 1168 spare names = spare names-1 9660 @ 67835: LINE 1168 "regression-compile-tmp/pass1.imp" 9661 @ 67871: PUSH SPARENAMES 9662 @ 67874: PUSH SPARENAMES 9663 @ 67877: PUSHI #0x00000001 9664 @ 67882: SUB 9665 @ 67883: ASSVAL 1169 abandon(2) %if spare names <= 0 9666 @ 67884: LINE 1169 "regression-compile-tmp/pass1.imp" 9667 @ 67920: PUSH SPARENAMES 9668 @ 67923: PUSHI #0x00000000 9669 @ 67928: JUMPIF > L_0004 9670 @ 67932: PUSH ABANDON 9671 @ 67935: PUSHI #0x00000002 9672 @ 67940: ASSPAR 9673 @ 67941: CALL 9674 @ 67942: LOCATE L_0004 1170 hash(k1) = dmax; !put it in 9675 @ 67945: LINE 1170 "regression-compile-tmp/pass1.imp" 9676 @ 67981: PUSH HASH 9677 @ 67984: PUSH K1 9678 @ 67987: ACCESS 9679 @ 67988: PUSH DMAX 9680 @ 67991: ASSVAL 1171 dict(dmax) = -1 9681 @ 67992: LINE 1171 "regression-compile-tmp/pass1.imp" 9682 @ 68028: PUSH DICT 9683 @ 68031: PUSH DMAX 9684 @ 68034: ACCESS 9685 @ 68035: PUSHI #0x00000001 9686 @ 68040: NEGATE 9687 @ 68041: ASSVAL 1172 newname = dmax; dmax = dp; ->not in 1173 9688 @ 68042: LINE 1172 "regression-compile-tmp/pass1.imp" 9689 @ 68078: PUSH NEWNAME 9690 @ 68081: PUSH DMAX 9691 @ 68084: ASSVAL 9692 @ 68085: LINE 1172 "regression-compile-tmp/pass1.imp" 9693 @ 68121: PUSH DMAX 9694 @ 68124: PUSH DP 9695 @ 68127: ASSVAL 9696 @ 68128: LINE 1172 "regression-compile-tmp/pass1.imp" 9697 @ 68164: JUMP L_0132 1174 in: search base = rbase %if this >= 0 %and d # 0; !record elem defn 9698 @ 68167: LINE 1174 "regression-compile-tmp/pass1.imp" 9699 @ 68203: LABEL L_0131 9700 @ 68206: LINE 1174 "regression-compile-tmp/pass1.imp" 9701 @ 68242: PUSH THIS 9702 @ 68245: PUSHI #0x00000000 9703 @ 68250: JUMPIF < L_0004 9704 @ 68254: PUSH D 9705 @ 68257: PUSHI #0x00000000 9706 @ 68262: JUMPIF = L_0004 9707 @ 68266: PUSH SEARCHBASE 9708 @ 68269: PUSH RBASE 9709 @ 68272: ASSVAL 9710 @ 68273: LOCATE L_0004 1175 %if search base # 0 %start; !record subname 9711 @ 68276: LINE 1175 "regression-compile-tmp/pass1.imp" 9712 @ 68312: PUSH SEARCHBASE 9713 @ 68315: PUSHI #0x00000000 9714 @ 68320: JUMPIF = L_0004 1176 new = -1 9715 @ 68324: LINE 1176 "regression-compile-tmp/pass1.imp" 9716 @ 68360: PUSH NEW 9717 @ 68363: PUSHI #0x00000001 9718 @ 68368: NEGATE 9719 @ 68369: ASSVAL 1177 x = search base 9720 @ 68370: LINE 1177 "regression-compile-tmp/pass1.imp" 9721 @ 68406: PUSH X 9722 @ 68409: PUSH SEARCHBASE 9723 @ 68412: ASSVAL 1178 %cycle 9724 @ 68413: LINE 1178 "regression-compile-tmp/pass1.imp" 9725 @ 68449: LOCATE L_0006 1179 ->not in %if x < format list 9726 @ 68452: LINE 1179 "regression-compile-tmp/pass1.imp" 9727 @ 68488: PUSH X 9728 @ 68491: PUSH FORMATLIST 9729 @ 68494: JUMPIF >= L_000a 9730 @ 68498: JUMP L_0132 9731 @ 68501: LOCATE L_000a 1180 %exit %if tag(x)_text = new name 9732 @ 68504: LINE 1180 "regression-compile-tmp/pass1.imp" 9733 @ 68540: PUSH TAG 9734 @ 68543: PUSH X 9735 @ 68546: ACCESS 9736 @ 68547: SELECT 5 9737 @ 68550: PUSH NEWNAME 9738 @ 68553: JUMPIF # L_000a 9739 @ 68557: GOTO L_0007 9740 @ 68560: LOCATE L_000a 1181 x = x-1 9741 @ 68563: LINE 1181 "regression-compile-tmp/pass1.imp" 9742 @ 68599: PUSH X 9743 @ 68602: PUSH X 9744 @ 68605: PUSHI #0x00000001 9745 @ 68610: SUB 9746 @ 68611: ASSVAL 1182 %repeat 9747 @ 68612: LINE 1182 "regression-compile-tmp/pass1.imp" 9748 @ 68648: REPEAT L_0006 9749 @ 68651: LOCATE L_0007 1183 %finish %else %start; !hash in for normal names 9750 @ 68654: LINE 1183 "regression-compile-tmp/pass1.imp" 9751 @ 68690: GOTO L_0003 9752 @ 68693: LOCATE L_0004 1184 x = dict(newname) 9753 @ 68696: LINE 1184 "regression-compile-tmp/pass1.imp" 9754 @ 68732: PUSH X 9755 @ 68735: PUSH DICT 9756 @ 68738: PUSH NEWNAME 9757 @ 68741: ACCESS 9758 @ 68742: ASSVAL 1185 ->not in %if x <= limit; !wrong level 9759 @ 68743: LINE 1185 "regression-compile-tmp/pass1.imp" 9760 @ 68779: PUSH X 9761 @ 68782: PUSH LIMIT 9762 @ 68785: JUMPIF > L_0007 9763 @ 68789: JUMP L_0132 9764 @ 68792: LOCATE L_0007 1186 %finish 1187 9765 @ 68795: LINE 1186 "regression-compile-tmp/pass1.imp" 9766 @ 68831: LOCATE L_0003 1188 subatom = x; !name found, extract info 9767 @ 68834: LINE 1188 "regression-compile-tmp/pass1.imp" 9768 @ 68870: PUSH SUBATOM 9769 @ 68873: PUSH X 9770 @ 68876: ASSVAL 1189 t == tag(x) 9771 @ 68877: LINE 1189 "regression-compile-tmp/pass1.imp" 9772 @ 68913: PUSH T 9773 @ 68916: PUSH TAG 9774 @ 68919: PUSH X 9775 @ 68922: ACCESS 9776 @ 68923: ASSREF 1190 atom flags = t_flags 9777 @ 68924: LINE 1190 "regression-compile-tmp/pass1.imp" 9778 @ 68960: PUSH ATOMFLAGS 9779 @ 68963: PUSH T 9780 @ 68966: SELECT 3 9781 @ 68969: ASSVAL 1191 format = t_format; app = t_app 9782 @ 68970: LINE 1191 "regression-compile-tmp/pass1.imp" 9783 @ 69006: PUSH FORMAT 9784 @ 69009: PUSH T 9785 @ 69012: SELECT 2 9786 @ 69015: ASSVAL 9787 @ 69016: LINE 1191 "regression-compile-tmp/pass1.imp" 9788 @ 69052: PUSH APP 9789 @ 69055: PUSH T 9790 @ 69058: SELECT 1 9791 @ 69061: ASSVAL 1192 protection = atom flags&prot 9792 @ 69062: LINE 1192 "regression-compile-tmp/pass1.imp" 9793 @ 69098: PUSH PROTECTION 9794 @ 69101: PUSH ATOMFLAGS 9795 @ 69104: PUSHI #0x00000100 9796 @ 69109: AND 9797 @ 69110: ASSVAL 1193 type = atom flags>>4&7; atom1 = amap(atom flags&15) 1194 9798 @ 69111: LINE 1193 "regression-compile-tmp/pass1.imp" 9799 @ 69147: PUSH TYPE 9800 @ 69150: PUSH ATOMFLAGS 9801 @ 69153: PUSHI #0x00000004 9802 @ 69158: RSH 9803 @ 69159: PUSHI #0x00000007 9804 @ 69164: AND 9805 @ 69165: ASSVAL 9806 @ 69166: LINE 1193 "regression-compile-tmp/pass1.imp" 9807 @ 69202: PUSH ATOM1 9808 @ 69205: PUSH AMAP 9809 @ 69208: PUSH ATOMFLAGS 9810 @ 69211: PUSHI #0x0000000f 9811 @ 69216: AND 9812 @ 69217: ACCESS 9813 @ 69218: ASSVAL 1195 %if diag&8 # 0 %start 9814 @ 69219: LINE 1195 "regression-compile-tmp/pass1.imp" 9815 @ 69255: PUSH DIAG 9816 @ 69258: PUSHI #0x00000008 9817 @ 69263: AND 9818 @ 69264: PUSHI #0x00000000 9819 @ 69269: JUMPIF = L_0004 1196 printstring("lookup:") 9820 @ 69273: LINE 1196 "regression-compile-tmp/pass1.imp" 9821 @ 69309: PUSH PRINTSTRING 9822 @ 69312: PUSHS "lookup:" 9823 @ 69321: ASSPAR 9824 @ 69322: CALL 1197 write(atom1, 3) 9825 @ 69323: LINE 1197 "regression-compile-tmp/pass1.imp" 9826 @ 69359: PUSH WRITE 9827 @ 69362: PUSH ATOM1 9828 @ 69365: ASSPAR 9829 @ 69366: PUSHI #0x00000003 9830 @ 69371: ASSPAR 9831 @ 69372: CALL 1198 write(type, 1) 9832 @ 69373: LINE 1198 "regression-compile-tmp/pass1.imp" 9833 @ 69409: PUSH WRITE 9834 @ 69412: PUSH TYPE 9835 @ 69415: ASSPAR 9836 @ 69416: PUSHI #0x00000001 9837 @ 69421: ASSPAR 9838 @ 69422: CALL 1199 write(app, 3) 9839 @ 69423: LINE 1199 "regression-compile-tmp/pass1.imp" 9840 @ 69459: PUSH WRITE 9841 @ 69462: PUSH APP 9842 @ 69465: ASSPAR 9843 @ 69466: PUSHI #0x00000003 9844 @ 69471: ASSPAR 9845 @ 69472: CALL 1200 write(format, 5) 9846 @ 69473: LINE 1200 "regression-compile-tmp/pass1.imp" 9847 @ 69509: PUSH WRITE 9848 @ 69512: PUSH FORMAT 9849 @ 69515: ASSPAR 9850 @ 69516: PUSHI #0x00000005 9851 @ 69521: ASSPAR 9852 @ 69522: CALL 1201 write(atom flags, 3) 9853 @ 69523: LINE 1201 "regression-compile-tmp/pass1.imp" 9854 @ 69559: PUSH WRITE 9855 @ 69562: PUSH ATOMFLAGS 9856 @ 69565: ASSPAR 9857 @ 69566: PUSHI #0x00000003 9858 @ 69571: ASSPAR 9859 @ 69572: CALL 1202 newline 9860 @ 69573: LINE 1202 "regression-compile-tmp/pass1.imp" 9861 @ 69609: PUSH NEWLINE 9862 @ 69612: CALL 1203 %finish 1204 9863 @ 69613: LINE 1203 "regression-compile-tmp/pass1.imp" 9864 @ 69649: LOCATE L_0004 1205 %if d = 0 %start; !old name wanted 9865 @ 69652: LINE 1205 "regression-compile-tmp/pass1.imp" 9866 @ 69688: PUSH D 9867 @ 69691: PUSHI #0x00000000 9868 @ 69696: JUMPIF # L_0004 1206 t_flags = t_flags!used bit 9869 @ 69700: LINE 1206 "regression-compile-tmp/pass1.imp" 9870 @ 69736: PUSH T 9871 @ 69739: SELECT 3 9872 @ 69742: PUSH T 9873 @ 69745: SELECT 3 9874 @ 69748: PUSHI #0x00008000 9875 @ 69753: OR 9876 @ 69754: ASSVAL 1207 search base = 0 1208 9877 @ 69755: LINE 1207 "regression-compile-tmp/pass1.imp" 9878 @ 69791: PUSH SEARCHBASE 9879 @ 69794: PUSHI #0x00000000 9880 @ 69799: ASSVAL 1209 %if atom flags&subname # 0 %and format # 0 %start; !a record 9881 @ 69800: LINE 1209 "regression-compile-tmp/pass1.imp" 9882 @ 69836: PUSH ATOMFLAGS 9883 @ 69839: PUSHI #0x00000800 9884 @ 69844: AND 9885 @ 69845: PUSHI #0x00000000 9886 @ 69850: JUMPIF = L_0007 9887 @ 69854: PUSH FORMAT 9888 @ 69857: PUSHI #0x00000000 9889 @ 69862: JUMPIF = L_0007 1210 %return %if format selected = 0 9890 @ 69866: LINE 1210 "regression-compile-tmp/pass1.imp" 9891 @ 69902: PUSH FORMATSELECTED 9892 @ 69905: CALL 9893 @ 69906: PUSHI #0x00000000 9894 @ 69911: JUMPIF # L_000a 9895 @ 69915: RETURN 9896 @ 69916: LOCATE L_000a 1211 %finish 1212 9897 @ 69919: LINE 1211 "regression-compile-tmp/pass1.imp" 9898 @ 69955: LOCATE L_0007 1213 %if atom flags¶meters # 0 %start; !proc or array 9899 @ 69958: LINE 1213 "regression-compile-tmp/pass1.imp" 9900 @ 69994: PUSH ATOMFLAGS 9901 @ 69997: PUSHI #0x00001000 9902 @ 70002: AND 9903 @ 70003: PUSHI #0x00000000 9904 @ 70008: JUMPIF = L_0007 1214 %if app = 0 %start; !no parameters needed 9905 @ 70012: LINE 1214 "regression-compile-tmp/pass1.imp" 9906 @ 70048: PUSH APP 9907 @ 70051: PUSHI #0x00000000 9908 @ 70056: JUMPIF # L_000a 1215 atom2 = atom1 9909 @ 70060: LINE 1215 "regression-compile-tmp/pass1.imp" 9910 @ 70096: PUSH ATOM2 9911 @ 70099: PUSH ATOM1 9912 @ 70102: ASSVAL 1216 atom1 = atom1-4 9913 @ 70103: LINE 1216 "regression-compile-tmp/pass1.imp" 9914 @ 70139: PUSH ATOM1 9915 @ 70142: PUSH ATOM1 9916 @ 70145: PUSHI #0x00000004 9917 @ 70150: SUB 9918 @ 70151: ASSVAL 1217 %if 97 <= atom1 %and atom1 <= 98 %start 9919 @ 70152: LINE 1217 "regression-compile-tmp/pass1.imp" 9920 @ 70188: PUSHI #0x00000061 9921 @ 70193: PUSH ATOM1 9922 @ 70196: JUMPIF > L_000d 9923 @ 70200: PUSH ATOM1 9924 @ 70203: PUSHI #0x00000062 9925 @ 70208: JUMPIF > L_000d 1218 map gg = atom1; atom1 = var 9926 @ 70212: LINE 1218 "regression-compile-tmp/pass1.imp" 9927 @ 70248: PUSH MAPGG 9928 @ 70251: PUSH ATOM1 9929 @ 70254: ASSVAL 9930 @ 70255: LINE 1218 "regression-compile-tmp/pass1.imp" 9931 @ 70291: PUSH ATOM1 9932 @ 70294: PUSHI #0x0000005b 9933 @ 70299: ASSVAL 1219 %finish 9934 @ 70300: LINE 1219 "regression-compile-tmp/pass1.imp" 9935 @ 70336: LOCATE L_000d 1220 %finish %else %start 9936 @ 70339: LINE 1220 "regression-compile-tmp/pass1.imp" 9937 @ 70375: GOTO L_0009 9938 @ 70378: LOCATE L_000a 1221 %if sym = '(' %start 9939 @ 70381: LINE 1221 "regression-compile-tmp/pass1.imp" 9940 @ 70417: PUSH SYM 9941 @ 70420: PUSHI #0x00000028 9942 @ 70425: JUMPIF # L_000d 1222 search base = 0; !ignore format for now 9943 @ 70429: LINE 1222 "regression-compile-tmp/pass1.imp" 9944 @ 70465: PUSH SEARCHBASE 9945 @ 70468: PUSHI #0x00000000 9946 @ 70473: ASSVAL 1223 %if atom1 >= 106 %start; !arrays 9947 @ 70474: LINE 1223 "regression-compile-tmp/pass1.imp" 9948 @ 70510: PUSH ATOM1 9949 @ 70513: PUSHI #0x0000006a 9950 @ 70518: JUMPIF < L_0010 1224 app = phrase(app+200) 9951 @ 70522: LINE 1224 "regression-compile-tmp/pass1.imp" 9952 @ 70558: PUSH APP 9953 @ 70561: PUSH PHRASE 9954 @ 70564: PUSH APP 9955 @ 70567: PUSHI #0x000000c8 9956 @ 70572: ADD 9957 @ 70573: ACCESS 9958 @ 70574: ASSVAL 1225 escape class = esc array 9959 @ 70575: LINE 1225 "regression-compile-tmp/pass1.imp" 9960 @ 70611: PUSH ESCAPECLASS 9961 @ 70614: PUSHI #0x000000fe 9962 @ 70619: ASSVAL 1226 atom1 = (atom1-106)>>1+91; !a,an->v na,nan->n 9963 @ 70620: LINE 1226 "regression-compile-tmp/pass1.imp" 9964 @ 70656: PUSH ATOM1 9965 @ 70659: PUSH ATOM1 9966 @ 70662: PUSHI #0x0000006a 9967 @ 70667: SUB 9968 @ 70668: PUSHI #0x00000001 9969 @ 70673: RSH 9970 @ 70674: PUSHI #0x0000005b 9971 @ 70679: ADD 9972 @ 70680: ASSVAL 1227 %finish %else %start; !procedures 9973 @ 70681: LINE 1227 "regression-compile-tmp/pass1.imp" 9974 @ 70717: GOTO L_000f 9975 @ 70720: LOCATE L_0010 1228 escape class = esc proc 9976 @ 70723: LINE 1228 "regression-compile-tmp/pass1.imp" 9977 @ 70759: PUSH ESCAPECLASS 9978 @ 70762: PUSHI #0x000000fd 9979 @ 70767: ASSVAL 1229 atom1 = atom1-4 9980 @ 70768: LINE 1229 "regression-compile-tmp/pass1.imp" 9981 @ 70804: PUSH ATOM1 9982 @ 70807: PUSH ATOM1 9983 @ 70810: PUSHI #0x00000004 9984 @ 70815: SUB 9985 @ 70816: ASSVAL 1230 %finish 9986 @ 70817: LINE 1230 "regression-compile-tmp/pass1.imp" 9987 @ 70853: LOCATE L_000f 1231 phrase(200) = app 9988 @ 70856: LINE 1231 "regression-compile-tmp/pass1.imp" 9989 @ 70892: PUSH PHRASE 9990 @ 70895: PUSHI #0x000000c8 9991 @ 70900: ACCESS 9992 @ 70901: PUSH APP 9993 @ 70904: ASSVAL 1232 %finish 9994 @ 70905: LINE 1232 "regression-compile-tmp/pass1.imp" 9995 @ 70941: LOCATE L_000d 1233 %finish 9996 @ 70944: LINE 1233 "regression-compile-tmp/pass1.imp" 9997 @ 70980: LOCATE L_0009 1234 pos2 = pos; %return 9998 @ 70983: LINE 1234 "regression-compile-tmp/pass1.imp" 9999 @ 71019: PUSH POS2 10000 @ 71022: PUSH POS 10001 @ 71025: ASSVAL 10002 @ 71026: LINE 1234 "regression-compile-tmp/pass1.imp" 10003 @ 71062: RETURN 1235 %finish 1236 1237 !deal with constintegers etc 10004 @ 71063: LINE 1235 "regression-compile-tmp/pass1.imp" 10005 @ 71099: LOCATE L_0007 1238 %if atom flags&const bit # 0 %and atom1 = var %start 10006 @ 71102: LINE 1238 "regression-compile-tmp/pass1.imp" 10007 @ 71138: PUSH ATOMFLAGS 10008 @ 71141: PUSHI #0x00002000 10009 @ 71146: AND 10010 @ 71147: PUSHI #0x00000000 10011 @ 71152: JUMPIF = L_0007 10012 @ 71156: PUSH ATOM1 10013 @ 71159: PUSHI #0x0000005b 10014 @ 71164: JUMPIF # L_0007 1239 map gg = const; atom2 = const 10015 @ 71168: LINE 1239 "regression-compile-tmp/pass1.imp" 10016 @ 71204: PUSH MAPGG 10017 @ 71207: PUSHI #0x0000005d 10018 @ 71212: ASSVAL 10019 @ 71213: LINE 1239 "regression-compile-tmp/pass1.imp" 10020 @ 71249: PUSH ATOM2 10021 @ 71252: PUSHI #0x0000005d 10022 @ 71257: ASSVAL 1240 subatom = -subatom %if type = integer 10023 @ 71258: LINE 1240 "regression-compile-tmp/pass1.imp" 10024 @ 71294: PUSH TYPE 10025 @ 71297: PUSHI #0x00000001 10026 @ 71302: JUMPIF # L_000a 10027 @ 71306: PUSH SUBATOM 10028 @ 71309: PUSH SUBATOM 10029 @ 71312: NEGATE 10030 @ 71313: ASSVAL 10031 @ 71314: LOCATE L_000a 1241 %finish 10032 @ 71317: LINE 1241 "regression-compile-tmp/pass1.imp" 10033 @ 71353: LOCATE L_0007 1242 %return 10034 @ 71356: LINE 1242 "regression-compile-tmp/pass1.imp" 10035 @ 71392: RETURN 1243 %finish 1244 !new name wanted 10036 @ 71393: LINE 1243 "regression-compile-tmp/pass1.imp" 10037 @ 71429: LOCATE L_0004 1245 ->not in %if tbase # tstart; !don't fault proc parm-parm 10038 @ 71432: LINE 1245 "regression-compile-tmp/pass1.imp" 10039 @ 71468: PUSH TBASE 10040 @ 71471: PUSH TSTART 10041 @ 71474: JUMPIF = L_0004 10042 @ 71478: JUMP L_0132 10043 @ 71481: LOCATE L_0004 1246 %if d = lab+spec+used bit %start 10044 @ 71484: LINE 1246 "regression-compile-tmp/pass1.imp" 10045 @ 71520: PUSH D 10046 @ 71523: PUSHI #0x00000003 10047 @ 71528: PUSHI #0x00000080 10048 @ 71533: ADD 10049 @ 71534: PUSHI #0x00008000 10050 @ 71539: ADD 10051 @ 71540: JUMPIF # L_0004 1247 t_flags = t_flags!used bit 10052 @ 71544: LINE 1247 "regression-compile-tmp/pass1.imp" 10053 @ 71580: PUSH T 10054 @ 71583: SELECT 3 10055 @ 71586: PUSH T 10056 @ 71589: SELECT 3 10057 @ 71592: PUSHI #0x00008000 10058 @ 71597: OR 10059 @ 71598: ASSVAL 1248 %return 10060 @ 71599: LINE 1248 "regression-compile-tmp/pass1.imp" 10061 @ 71635: RETURN 1249 %finish 10062 @ 71636: LINE 1249 "regression-compile-tmp/pass1.imp" 10063 @ 71672: LOCATE L_0004 1250 %if atom flags&spec # 0 %start; !a spec has been given 10064 @ 71675: LINE 1250 "regression-compile-tmp/pass1.imp" 10065 @ 71711: PUSH ATOMFLAGS 10066 @ 71714: PUSHI #0x00000080 10067 @ 71719: AND 10068 @ 71720: PUSHI #0x00000000 10069 @ 71725: JUMPIF = L_0004 1251 %if d = lab %start; !define label 10070 @ 71729: LINE 1251 "regression-compile-tmp/pass1.imp" 10071 @ 71765: PUSH D 10072 @ 71768: PUSHI #0x00000003 10073 @ 71773: JUMPIF # L_0007 1252 t_flags = t_Flags-Spec 10074 @ 71777: LINE 1252 "regression-compile-tmp/pass1.imp" 10075 @ 71813: PUSH T 10076 @ 71816: SELECT 3 10077 @ 71819: PUSH T 10078 @ 71822: SELECT 3 10079 @ 71825: PUSHI #0x00000080 10080 @ 71830: SUB 10081 @ 71831: ASSVAL 1253 %return 10082 @ 71832: LINE 1253 "regression-compile-tmp/pass1.imp" 10083 @ 71868: RETURN 1254 %finish 10084 @ 71869: LINE 1254 "regression-compile-tmp/pass1.imp" 10085 @ 71905: LOCATE L_0007 1255 %if 7 <= decl&15 %and decl&15 <= 10 %and decl&spec = 0 %start 1256 !procedure definition after spec 10086 @ 71908: LINE 1255 "regression-compile-tmp/pass1.imp" 10087 @ 71944: PUSHI #0x00000007 10088 @ 71949: PUSH DECL 10089 @ 71952: PUSHI #0x0000000f 10090 @ 71957: AND 10091 @ 71958: JUMPIF > L_0007 10092 @ 71962: PUSH DECL 10093 @ 71965: PUSHI #0x0000000f 10094 @ 71970: AND 10095 @ 71971: PUSHI #0x0000000a 10096 @ 71976: JUMPIF > L_0007 10097 @ 71980: PUSH DECL 10098 @ 71983: PUSHI #0x00000080 10099 @ 71988: AND 10100 @ 71989: PUSHI #0x00000000 10101 @ 71994: JUMPIF # L_0007 1257 %if (decl!!atom flags)&2_1111111 = 0 %start; !correct type? 10102 @ 71998: LINE 1257 "regression-compile-tmp/pass1.imp" 10103 @ 72034: PUSH DECL 10104 @ 72037: PUSH ATOMFLAGS 10105 @ 72040: XOR 10106 @ 72041: PUSHI #0x0000007f 10107 @ 72046: AND 10108 @ 72047: PUSHI #0x00000000 10109 @ 72052: JUMPIF # L_000a 1258 t_flags = t_flags-spec 10110 @ 72056: LINE 1258 "regression-compile-tmp/pass1.imp" 10111 @ 72092: PUSH T 10112 @ 72095: SELECT 3 10113 @ 72098: PUSH T 10114 @ 72101: SELECT 3 10115 @ 72104: PUSHI #0x00000080 10116 @ 72109: SUB 10117 @ 72110: ASSVAL 1259 spec given = 1 10118 @ 72111: LINE 1259 "regression-compile-tmp/pass1.imp" 10119 @ 72147: PUSH SPECGIVEN 10120 @ 72150: PUSHI #0x00000001 10121 @ 72155: ASSVAL 1260 %return 10122 @ 72156: LINE 1260 "regression-compile-tmp/pass1.imp" 10123 @ 72192: RETURN 1261 %finish 1262 !note that an external procedure must be speced as a 1263 !non-external procedure. 10124 @ 72193: LINE 1261 "regression-compile-tmp/pass1.imp" 10125 @ 72229: LOCATE L_000a 1264 %finish 10126 @ 72232: LINE 1264 "regression-compile-tmp/pass1.imp" 10127 @ 72268: LOCATE L_0007 1265 %if decl&15 = recfm %start; !recordformat 10128 @ 72271: LINE 1265 "regression-compile-tmp/pass1.imp" 10129 @ 72307: PUSH DECL 10130 @ 72310: PUSHI #0x0000000f 10131 @ 72315: AND 10132 @ 72316: PUSHI #0x00000004 10133 @ 72321: JUMPIF # L_0007 1266 t_flags = record<<4+recfm 10134 @ 72325: LINE 1266 "regression-compile-tmp/pass1.imp" 10135 @ 72361: PUSH T 10136 @ 72364: SELECT 3 10137 @ 72367: PUSHI #0x00000004 10138 @ 72372: PUSHI #0x00000004 10139 @ 72377: LSH 10140 @ 72378: PUSHI #0x00000004 10141 @ 72383: ADD 10142 @ 72384: ASSVAL 1267 t_format = fdef 10143 @ 72385: LINE 1267 "regression-compile-tmp/pass1.imp" 10144 @ 72421: PUSH T 10145 @ 72424: SELECT 2 10146 @ 72427: PUSH FDEF 10147 @ 72430: ASSVAL 1268 %return 10148 @ 72431: LINE 1268 "regression-compile-tmp/pass1.imp" 10149 @ 72467: RETURN 1269 %finish 10150 @ 72468: LINE 1269 "regression-compile-tmp/pass1.imp" 10151 @ 72504: LOCATE L_0007 1270 %finish 10152 @ 72507: LINE 1270 "regression-compile-tmp/pass1.imp" 10153 @ 72543: LOCATE L_0004 1271 %return %if last1 = jump %and atom1 = swit 10154 @ 72546: LINE 1271 "regression-compile-tmp/pass1.imp" 10155 @ 72582: PUSH LAST1 10156 @ 72585: PUSHI #0x00000036 10157 @ 72590: JUMPIF # L_0004 10158 @ 72594: PUSH ATOM1 10159 @ 72597: PUSHI #0x00000069 10160 @ 72602: JUMPIF # L_0004 10161 @ 72606: RETURN 10162 @ 72607: LOCATE L_0004 1272 copy = x %if copy = 0 10163 @ 72610: LINE 1272 "regression-compile-tmp/pass1.imp" 10164 @ 72646: PUSH COPY 10165 @ 72649: PUSHI #0x00000000 10166 @ 72654: JUMPIF # L_0004 10167 @ 72658: PUSH COPY 10168 @ 72661: PUSH X 10169 @ 72664: ASSVAL 10170 @ 72665: LOCATE L_0004 1273 notin: app = 0; vid = 0 10171 @ 72668: LINE 1273 "regression-compile-tmp/pass1.imp" 10172 @ 72704: LABEL L_0132 10173 @ 72707: LINE 1273 "regression-compile-tmp/pass1.imp" 10174 @ 72743: PUSH APP 10175 @ 72746: PUSHI #0x00000000 10176 @ 72751: ASSVAL 10177 @ 72752: LINE 1273 "regression-compile-tmp/pass1.imp" 10178 @ 72788: PUSH VID 10179 @ 72791: PUSHI #0x00000000 10180 @ 72796: ASSVAL 1274 atom1 = error+2 1275 10181 @ 72797: LINE 1274 "regression-compile-tmp/pass1.imp" 10182 @ 72833: PUSH ATOM1 10183 @ 72836: PUSHI #0x00008000 10184 @ 72841: PUSHI #0x00000002 10185 @ 72846: ADD 10186 @ 72847: ASSVAL 1276 %return %if d = 0; !old name wanted 10187 @ 72848: LINE 1276 "regression-compile-tmp/pass1.imp" 10188 @ 72884: PUSH D 10189 @ 72887: PUSHI #0x00000000 10190 @ 72892: JUMPIF # L_0004 10191 @ 72896: RETURN 10192 @ 72897: LOCATE L_0004 1277 type = d>>4&7; form = d&15; atom1 = amap(form) 1278 10193 @ 72900: LINE 1277 "regression-compile-tmp/pass1.imp" 10194 @ 72936: PUSH TYPE 10195 @ 72939: PUSH D 10196 @ 72942: PUSHI #0x00000004 10197 @ 72947: RSH 10198 @ 72948: PUSHI #0x00000007 10199 @ 72953: AND 10200 @ 72954: ASSVAL 10201 @ 72955: LINE 1277 "regression-compile-tmp/pass1.imp" 10202 @ 72991: PUSH FORM 10203 @ 72994: PUSH D 10204 @ 72997: PUSHI #0x0000000f 10205 @ 73002: AND 10206 @ 73003: ASSVAL 10207 @ 73004: LINE 1277 "regression-compile-tmp/pass1.imp" 10208 @ 73040: PUSH ATOM1 10209 @ 73043: PUSH AMAP 10210 @ 73046: PUSH FORM 10211 @ 73049: ACCESS 10212 @ 73050: ASSVAL 1279 %if this < 0 %start; !normal scope 10213 @ 73051: LINE 1279 "regression-compile-tmp/pass1.imp" 10214 @ 73087: PUSH THIS 10215 @ 73090: PUSHI #0x00000000 10216 @ 73095: JUMPIF >= L_0004 1280 new = newname 10217 @ 73099: LINE 1280 "regression-compile-tmp/pass1.imp" 10218 @ 73135: PUSH NEW 10219 @ 73138: PUSH NEWNAME 10220 @ 73141: ASSVAL 1281 tmax = tmax+1; x = tmax 10221 @ 73142: LINE 1281 "regression-compile-tmp/pass1.imp" 10222 @ 73178: PUSH TMAX 10223 @ 73181: PUSH TMAX 10224 @ 73184: PUSHI #0x00000001 10225 @ 73189: ADD 10226 @ 73190: ASSVAL 10227 @ 73191: LINE 1281 "regression-compile-tmp/pass1.imp" 10228 @ 73227: PUSH X 10229 @ 73230: PUSH TMAX 10230 @ 73233: ASSVAL 1282 %finish %else %start; !recordformat scope 10231 @ 73234: LINE 1282 "regression-compile-tmp/pass1.imp" 10232 @ 73270: GOTO L_0003 10233 @ 73273: LOCATE L_0004 1283 new = -1 10234 @ 73276: LINE 1283 "regression-compile-tmp/pass1.imp" 10235 @ 73312: PUSH NEW 10236 @ 73315: PUSHI #0x00000001 10237 @ 73320: NEGATE 10238 @ 73321: ASSVAL 1284 recid = recid-1; vid = recid 10239 @ 73322: LINE 1284 "regression-compile-tmp/pass1.imp" 10240 @ 73358: PUSH RECID 10241 @ 73361: PUSH RECID 10242 @ 73364: PUSHI #0x00000001 10243 @ 73369: SUB 10244 @ 73370: ASSVAL 10245 @ 73371: LINE 1284 "regression-compile-tmp/pass1.imp" 10246 @ 73407: PUSH VID 10247 @ 73410: PUSH RECID 10248 @ 73413: ASSVAL 1285 tmin = tmin-1; x = tmin 10249 @ 73414: LINE 1285 "regression-compile-tmp/pass1.imp" 10250 @ 73450: PUSH TMIN 10251 @ 73453: PUSH TMIN 10252 @ 73456: PUSHI #0x00000001 10253 @ 73461: SUB 10254 @ 73462: ASSVAL 10255 @ 73463: LINE 1285 "regression-compile-tmp/pass1.imp" 10256 @ 73499: PUSH X 10257 @ 73502: PUSH TMIN 10258 @ 73505: ASSVAL 1286 format list = tmin 10259 @ 73506: LINE 1286 "regression-compile-tmp/pass1.imp" 10260 @ 73542: PUSH FORMATLIST 10261 @ 73545: PUSH TMIN 10262 @ 73548: ASSVAL 1287 %finish 1288 10263 @ 73549: LINE 1287 "regression-compile-tmp/pass1.imp" 10264 @ 73585: LOCATE L_0003 1289 %if 11 <= form %and form <= 14 %start; !arrays 10265 @ 73588: LINE 1289 "regression-compile-tmp/pass1.imp" 10266 @ 73624: PUSHI #0x0000000b 10267 @ 73629: PUSH FORM 10268 @ 73632: JUMPIF > L_0004 10269 @ 73636: PUSH FORM 10270 @ 73639: PUSHI #0x0000000e 10271 @ 73644: JUMPIF > L_0004 1290 dim = 1 %if dim = 0; !set dim for owns 10272 @ 73648: LINE 1290 "regression-compile-tmp/pass1.imp" 10273 @ 73684: PUSH DIM 10274 @ 73687: PUSHI #0x00000000 10275 @ 73692: JUMPIF # L_0007 10276 @ 73696: PUSH DIM 10277 @ 73699: PUSHI #0x00000001 10278 @ 73704: ASSVAL 10279 @ 73705: LOCATE L_0007 1291 app = dim 10280 @ 73708: LINE 1291 "regression-compile-tmp/pass1.imp" 10281 @ 73744: PUSH APP 10282 @ 73747: PUSH DIM 10283 @ 73750: ASSVAL 1292 %finish 1293 10284 @ 73751: LINE 1292 "regression-compile-tmp/pass1.imp" 10285 @ 73787: LOCATE L_0004 1294 d = d!used bit %if (otype > 2 %and d&spec = 0) %or perm # 0 %or Level = Include Level 1295 1296 !external definitions need not be used in the file in which 1297 !they are defined, so inhibit a useless unused warning. 1298 10286 @ 73790: LINE 1294 "regression-compile-tmp/pass1.imp" 10287 @ 73826: PUSH OTYPE 10288 @ 73829: PUSHI #0x00000002 10289 @ 73834: JUMPIF <= L_0006 10290 @ 73838: PUSH D 10291 @ 73841: PUSHI #0x00000080 10292 @ 73846: AND 10293 @ 73847: PUSHI #0x00000000 10294 @ 73852: JUMPIF = L_0005 10295 @ 73856: LOCATE L_0006 10296 @ 73859: PUSH PERM 10297 @ 73862: PUSHI #0x00000000 10298 @ 73867: JUMPIF # L_0005 10299 @ 73871: PUSH LEVEL 10300 @ 73874: PUSH INCLUDELEVEL 10301 @ 73877: JUMPIF # L_0004 10302 @ 73881: LOCATE L_0005 10303 @ 73884: PUSH D 10304 @ 73887: PUSH D 10305 @ 73890: PUSHI #0x00008000 10306 @ 73895: OR 10307 @ 73896: ASSVAL 10308 @ 73897: LOCATE L_0004 1299 t == tag(x) 10309 @ 73900: LINE 1299 "regression-compile-tmp/pass1.imp" 10310 @ 73936: PUSH T 10311 @ 73939: PUSH TAG 10312 @ 73942: PUSH X 10313 @ 73945: ACCESS 10314 @ 73946: ASSREF 1300 %if form = lab %start 10315 @ 73947: LINE 1300 "regression-compile-tmp/pass1.imp" 10316 @ 73983: PUSH FORM 10317 @ 73986: PUSHI #0x00000003 10318 @ 73991: JUMPIF # L_0004 1301 id = id+1; vid = id 10319 @ 73995: LINE 1301 "regression-compile-tmp/pass1.imp" 10320 @ 74031: PUSH ID 10321 @ 74034: PUSH ID 10322 @ 74037: PUSHI #0x00000001 10323 @ 74042: ADD 10324 @ 74043: ASSVAL 10325 @ 74044: LINE 1301 "regression-compile-tmp/pass1.imp" 10326 @ 74080: PUSH VID 10327 @ 74083: PUSH ID 10328 @ 74086: ASSVAL 1302 %finish 10329 @ 74087: LINE 1302 "regression-compile-tmp/pass1.imp" 10330 @ 74123: LOCATE L_0004 1303 t_index = vid 10331 @ 74126: LINE 1303 "regression-compile-tmp/pass1.imp" 10332 @ 74162: PUSH T 10333 @ 74165: SELECT 4 10334 @ 74168: PUSH VID 10335 @ 74171: ASSVAL 1304 t_text = new name 10336 @ 74172: LINE 1304 "regression-compile-tmp/pass1.imp" 10337 @ 74208: PUSH T 10338 @ 74211: SELECT 5 10339 @ 74214: PUSH NEWNAME 10340 @ 74217: ASSVAL 1305 t_flags = d 10341 @ 74218: LINE 1305 "regression-compile-tmp/pass1.imp" 10342 @ 74254: PUSH T 10343 @ 74257: SELECT 3 10344 @ 74260: PUSH D 10345 @ 74263: ASSVAL 1306 t_app = app 10346 @ 74264: LINE 1306 "regression-compile-tmp/pass1.imp" 10347 @ 74300: PUSH T 10348 @ 74303: SELECT 1 10349 @ 74306: PUSH APP 10350 @ 74309: ASSVAL 1307 t_format = fdef; format = fdef 10351 @ 74310: LINE 1307 "regression-compile-tmp/pass1.imp" 10352 @ 74346: PUSH T 10353 @ 74349: SELECT 2 10354 @ 74352: PUSH FDEF 10355 @ 74355: ASSVAL 10356 @ 74356: LINE 1307 "regression-compile-tmp/pass1.imp" 10357 @ 74392: PUSH FORMAT 10358 @ 74395: PUSH FDEF 10359 @ 74398: ASSVAL 1308 subatom = x 1309 10360 @ 74399: LINE 1308 "regression-compile-tmp/pass1.imp" 10361 @ 74435: PUSH SUBATOM 10362 @ 74438: PUSH X 10363 @ 74441: ASSVAL 1310 %if new >= 0 %start; !insert into hash table 10364 @ 74442: LINE 1310 "regression-compile-tmp/pass1.imp" 10365 @ 74478: PUSH NEW 10366 @ 74481: PUSHI #0x00000000 10367 @ 74486: JUMPIF < L_0004 1311 t_link = dict(new); dict(new) = x 10368 @ 74490: LINE 1311 "regression-compile-tmp/pass1.imp" 10369 @ 74526: PUSH T 10370 @ 74529: SELECT 6 10371 @ 74532: PUSH DICT 10372 @ 74535: PUSH NEW 10373 @ 74538: ACCESS 10374 @ 74539: ASSVAL 10375 @ 74540: LINE 1311 "regression-compile-tmp/pass1.imp" 10376 @ 74576: PUSH DICT 10377 @ 74579: PUSH NEW 10378 @ 74582: ACCESS 10379 @ 74583: PUSH X 10380 @ 74586: ASSVAL 1312 %if gmin = max grammar %start; !proc param params 10381 @ 74587: LINE 1312 "regression-compile-tmp/pass1.imp" 10382 @ 74623: PUSH GMIN 10383 @ 74626: PUSHI #0x000006b8 10384 @ 74631: JUMPIF # L_0007 1313 tmin = tmin-1; subatom = tmin 10385 @ 74635: LINE 1313 "regression-compile-tmp/pass1.imp" 10386 @ 74671: PUSH TMIN 10387 @ 74674: PUSH TMIN 10388 @ 74677: PUSHI #0x00000001 10389 @ 74682: SUB 10390 @ 74683: ASSVAL 10391 @ 74684: LINE 1313 "regression-compile-tmp/pass1.imp" 10392 @ 74720: PUSH SUBATOM 10393 @ 74723: PUSH TMIN 10394 @ 74726: ASSVAL 1314 tag(tmin) = t 10395 @ 74727: LINE 1314 "regression-compile-tmp/pass1.imp" 10396 @ 74763: PUSH TAG 10397 @ 74766: PUSH TMIN 10398 @ 74769: ACCESS 10399 @ 74770: PUSH T 10400 @ 74773: ASSVAL 1315 %finish 10401 @ 74774: LINE 1315 "regression-compile-tmp/pass1.imp" 10402 @ 74810: LOCATE L_0007 1316 %finish 10403 @ 74813: LINE 1316 "regression-compile-tmp/pass1.imp" 10404 @ 74849: LOCATE L_0004 1317 abandon(3) %if tmax >= tmin 10405 @ 74852: LINE 1317 "regression-compile-tmp/pass1.imp" 10406 @ 74888: PUSH TMAX 10407 @ 74891: PUSH TMIN 10408 @ 74894: JUMPIF < L_0004 10409 @ 74898: PUSH ABANDON 10410 @ 74901: PUSHI #0x00000003 10411 @ 74906: ASSPAR 10412 @ 74907: CALL 10413 @ 74908: LOCATE L_0004 1318 %end 1319 10414 @ 74911: LINE 1318 "regression-compile-tmp/pass1.imp" 10415 @ 74947: END _lev0id0_COMPILEBLOCK_ANALYSE_CODEATOM_LOOKUP {lev=5 --> 4} 1320 top: pos1 = pos 10416 @ 74948: LINE 1320 "regression-compile-tmp/pass1.imp" 10417 @ 74984: LABEL L_0128 10418 @ 74987: LINE 1320 "regression-compile-tmp/pass1.imp" 10419 @ 75023: PUSH POS1 10420 @ 75026: PUSH POS 10421 @ 75029: ASSVAL 1321 subatom = 0; pend quote = 0; atom flags = 0 1322 1323 !app and format must be left for assigning to papp & pformat 10422 @ 75030: LINE 1321 "regression-compile-tmp/pass1.imp" 10423 @ 75066: PUSH SUBATOM 10424 @ 75069: PUSHI #0x00000000 10425 @ 75074: ASSVAL 10426 @ 75075: LINE 1321 "regression-compile-tmp/pass1.imp" 10427 @ 75111: PUSH PENDQUOTE 10428 @ 75114: PUSHI #0x00000000 10429 @ 75119: ASSVAL 10430 @ 75120: LINE 1321 "regression-compile-tmp/pass1.imp" 10431 @ 75156: PUSH ATOMFLAGS 10432 @ 75159: PUSHI #0x00000000 10433 @ 75164: ASSVAL 1324 ->name %if symtype = -2; ! letter 10434 @ 75165: LINE 1324 "regression-compile-tmp/pass1.imp" 10435 @ 75201: PUSH SYMTYPE 10436 @ 75204: PUSHI #0x00000002 10437 @ 75209: NEGATE 10438 @ 75210: JUMPIF # L_0004 10439 @ 75214: JUMP L_0129 10440 @ 75217: LOCATE L_0004 1325 ->number %if symtype < 0; ! digit 10441 @ 75220: LINE 1325 "regression-compile-tmp/pass1.imp" 10442 @ 75256: PUSH SYMTYPE 10443 @ 75259: PUSHI #0x00000000 10444 @ 75264: JUMPIF >= L_0004 10445 @ 75268: JUMP L_012a 10446 @ 75271: LOCATE L_0004 1326 %if symtype = 0 %start 10447 @ 75274: LINE 1326 "regression-compile-tmp/pass1.imp" 10448 @ 75310: PUSH SYMTYPE 10449 @ 75313: PUSHI #0x00000000 10450 @ 75318: JUMPIF # L_0004 1327 atom1 = termin; atom2 = 0 10451 @ 75322: LINE 1327 "regression-compile-tmp/pass1.imp" 10452 @ 75358: PUSH ATOM1 10453 @ 75361: PUSHI #0x00000014 10454 @ 75366: ASSVAL 10455 @ 75367: LINE 1327 "regression-compile-tmp/pass1.imp" 10456 @ 75403: PUSH ATOM2 10457 @ 75406: PUSHI #0x00000000 10458 @ 75411: ASSVAL 1328 %return 10459 @ 75412: LINE 1328 "regression-compile-tmp/pass1.imp" 10460 @ 75448: RETURN 1329 %finish 10461 @ 75449: LINE 1329 "regression-compile-tmp/pass1.imp" 10462 @ 75485: LOCATE L_0004 1330 %if symtype # 2 %start; ! catch keywords here 10463 @ 75488: LINE 1330 "regression-compile-tmp/pass1.imp" 10464 @ 75524: PUSH SYMTYPE 10465 @ 75527: PUSHI #0x00000002 10466 @ 75532: JUMPIF = L_0004 1331 ->text %if quote # 0; ! completion of text 10467 @ 75536: LINE 1331 "regression-compile-tmp/pass1.imp" 10468 @ 75572: PUSH QUOTE 10469 @ 75575: PUSHI #0x00000000 10470 @ 75580: JUMPIF = L_0007 10471 @ 75584: JUMP L_012b 10472 @ 75587: LOCATE L_0007 1332 ->strings %if sym = squote; ! start of string 10473 @ 75590: LINE 1332 "regression-compile-tmp/pass1.imp" 10474 @ 75626: PUSH SYM 10475 @ 75629: PUSHI #0x00000022 10476 @ 75634: JUMPIF # L_0007 10477 @ 75638: JUMP L_012c 10478 @ 75641: LOCATE L_0007 1333 ->symbols %if sym = cquote; ! start of symbol 10479 @ 75644: LINE 1333 "regression-compile-tmp/pass1.imp" 10480 @ 75680: PUSH SYM 10481 @ 75683: PUSHI #0x00000027 10482 @ 75688: JUMPIF # L_0007 10483 @ 75692: JUMP L_012d 10484 @ 75695: LOCATE L_0007 1334 ->number %if sym = '.' %and '0' <= nextsymbol %and nextsymbol <= '9' 10485 @ 75698: LINE 1334 "regression-compile-tmp/pass1.imp" 10486 @ 75734: PUSH SYM 10487 @ 75737: PUSHI #0x0000002e 10488 @ 75742: JUMPIF # L_0007 10489 @ 75746: PUSHI #0x00000030 10490 @ 75751: PUSH NEXTSYMBOL 10491 @ 75754: CALL 10492 @ 75755: JUMPIF > L_0007 10493 @ 75759: PUSH NEXTSYMBOL 10494 @ 75762: CALL 10495 @ 75763: PUSHI #0x00000039 10496 @ 75768: JUMPIF > L_0007 10497 @ 75772: JUMP L_012a 10498 @ 75775: LOCATE L_0007 1335 %finish 1336 1337 ! locate atom in fixed dict 10499 @ 75778: LINE 1335 "regression-compile-tmp/pass1.imp" 10500 @ 75814: LOCATE L_0004 1338 k = key>>2; read sym 10501 @ 75817: LINE 1338 "regression-compile-tmp/pass1.imp" 10502 @ 75853: PUSH K 10503 @ 75856: PUSH KEY 10504 @ 75859: PUSHI #0x00000002 10505 @ 75864: RSH 10506 @ 75865: ASSVAL 10507 @ 75866: LINE 1338 "regression-compile-tmp/pass1.imp" 10508 @ 75902: PUSH READSYM 10509 @ 75905: CALL 1339 %cycle 10510 @ 75906: LINE 1339 "regression-compile-tmp/pass1.imp" 10511 @ 75942: LOCATE L_0003 1340 j = kdict(k) 10512 @ 75945: LINE 1340 "regression-compile-tmp/pass1.imp" 10513 @ 75981: PUSH J 10514 @ 75984: PUSH KDICT 10515 @ 75987: PUSH K 10516 @ 75990: ACCESS 10517 @ 75991: ASSVAL 1341 %exit %if j&16_4000 # 0 10518 @ 75992: LINE 1341 "regression-compile-tmp/pass1.imp" 10519 @ 76028: PUSH J 10520 @ 76031: PUSHI #0x00004000 10521 @ 76036: AND 10522 @ 76037: PUSHI #0x00000000 10523 @ 76042: JUMPIF = L_0007 10524 @ 76046: GOTO L_0004 10525 @ 76049: LOCATE L_0007 1342 %if j&127 # sym %or symtype < 0 %start 10526 @ 76052: LINE 1342 "regression-compile-tmp/pass1.imp" 10527 @ 76088: PUSH J 10528 @ 76091: PUSHI #0x0000007f 10529 @ 76096: AND 10530 @ 76097: PUSH SYM 10531 @ 76100: JUMPIF # L_0008 10532 @ 76104: PUSH SYMTYPE 10533 @ 76107: PUSHI #0x00000000 10534 @ 76112: JUMPIF >= L_0007 10535 @ 76116: LOCATE L_0008 1343 ->err %unless j < 0 10536 @ 76119: LINE 1343 "regression-compile-tmp/pass1.imp" 10537 @ 76155: PUSH J 10538 @ 76158: PUSHI #0x00000000 10539 @ 76163: JUMPIF < L_000a 10540 @ 76167: JUMP L_012e 10541 @ 76170: LOCATE L_000a 1344 k = k+1 10542 @ 76173: LINE 1344 "regression-compile-tmp/pass1.imp" 10543 @ 76209: PUSH K 10544 @ 76212: PUSH K 10545 @ 76215: PUSHI #0x00000001 10546 @ 76220: ADD 10547 @ 76221: ASSVAL 1345 %finish %else %start 10548 @ 76222: LINE 1345 "regression-compile-tmp/pass1.imp" 10549 @ 76258: GOTO L_0006 10550 @ 76261: LOCATE L_0007 1346 l = j>>7&127; read sym 10551 @ 76264: LINE 1346 "regression-compile-tmp/pass1.imp" 10552 @ 76300: PUSH L 10553 @ 76303: PUSH J 10554 @ 76306: PUSHI #0x00000007 10555 @ 76311: RSH 10556 @ 76312: PUSHI #0x0000007f 10557 @ 76317: AND 10558 @ 76318: ASSVAL 10559 @ 76319: LINE 1346 "regression-compile-tmp/pass1.imp" 10560 @ 76355: PUSH READSYM 10561 @ 76358: CALL 1347 %if j > 0 %start 10562 @ 76359: LINE 1347 "regression-compile-tmp/pass1.imp" 10563 @ 76395: PUSH J 10564 @ 76398: PUSHI #0x00000000 10565 @ 76403: JUMPIF <= L_000a 1348 %if l # 0 %start 10566 @ 76407: LINE 1348 "regression-compile-tmp/pass1.imp" 10567 @ 76443: PUSH L 10568 @ 76446: PUSHI #0x00000000 10569 @ 76451: JUMPIF = L_000d 1349 ->err %if l # sym %or symtype < 0 10570 @ 76455: LINE 1349 "regression-compile-tmp/pass1.imp" 10571 @ 76491: PUSH L 10572 @ 76494: PUSH SYM 10573 @ 76497: JUMPIF # L_0011 10574 @ 76501: PUSH SYMTYPE 10575 @ 76504: PUSHI #0x00000000 10576 @ 76509: JUMPIF >= L_0010 10577 @ 76513: LOCATE L_0011 10578 @ 76516: JUMP L_012e 10579 @ 76519: LOCATE L_0010 1350 read sym 10580 @ 76522: LINE 1350 "regression-compile-tmp/pass1.imp" 10581 @ 76558: PUSH READSYM 10582 @ 76561: CALL 1351 %finish 10583 @ 76562: LINE 1351 "regression-compile-tmp/pass1.imp" 10584 @ 76598: LOCATE L_000d 1352 l = 1 10585 @ 76601: LINE 1352 "regression-compile-tmp/pass1.imp" 10586 @ 76637: PUSH L 10587 @ 76640: PUSHI #0x00000001 10588 @ 76645: ASSVAL 1353 %finish 10589 @ 76646: LINE 1353 "regression-compile-tmp/pass1.imp" 10590 @ 76682: LOCATE L_000a 1354 k = k+l 10591 @ 76685: LINE 1354 "regression-compile-tmp/pass1.imp" 10592 @ 76721: PUSH K 10593 @ 76724: PUSH K 10594 @ 76727: PUSH L 10595 @ 76730: ADD 10596 @ 76731: ASSVAL 1355 %finish 10597 @ 76732: LINE 1355 "regression-compile-tmp/pass1.imp" 10598 @ 76768: LOCATE L_0006 1356 %repeat 10599 @ 76771: LINE 1356 "regression-compile-tmp/pass1.imp" 10600 @ 76807: REPEAT L_0003 10601 @ 76810: LOCATE L_0004 1357 atom1 = j&127 10602 @ 76813: LINE 1357 "regression-compile-tmp/pass1.imp" 10603 @ 76849: PUSH ATOM1 10604 @ 76852: PUSH J 10605 @ 76855: PUSHI #0x0000007f 10606 @ 76860: AND 10607 @ 76861: ASSVAL 1358 %if atom1 = 0 %start; ! comma 10608 @ 76862: LINE 1358 "regression-compile-tmp/pass1.imp" 10609 @ 76898: PUSH ATOM1 10610 @ 76901: PUSHI #0x00000000 10611 @ 76906: JUMPIF # L_0004 1359 atom1 = 19; subatom = 19; atom2 = 0 10612 @ 76910: LINE 1359 "regression-compile-tmp/pass1.imp" 10613 @ 76946: PUSH ATOM1 10614 @ 76949: PUSHI #0x00000013 10615 @ 76954: ASSVAL 10616 @ 76955: LINE 1359 "regression-compile-tmp/pass1.imp" 10617 @ 76991: PUSH SUBATOM 10618 @ 76994: PUSHI #0x00000013 10619 @ 76999: ASSVAL 10620 @ 77000: LINE 1359 "regression-compile-tmp/pass1.imp" 10621 @ 77036: PUSH ATOM2 10622 @ 77039: PUSHI #0x00000000 10623 @ 77044: ASSVAL 1360 %if sym = nl %start 10624 @ 77045: LINE 1360 "regression-compile-tmp/pass1.imp" 10625 @ 77081: PUSH SYM 10626 @ 77084: PUSHI #0x0000000a 10627 @ 77089: JUMPIF # L_0007 1361 %return %if ocount >= 0 1362 1363 ! special action needs to be taken with as 1364 ! const array lists can be enormous 10628 @ 77093: LINE 1361 "regression-compile-tmp/pass1.imp" 10629 @ 77129: PUSH OCOUNT 10630 @ 77132: PUSHI #0x00000000 10631 @ 77137: JUMPIF < L_000a 10632 @ 77141: RETURN 10633 @ 77142: LOCATE L_000a 1365 read sym 10634 @ 77145: LINE 1365 "regression-compile-tmp/pass1.imp" 10635 @ 77181: PUSH READSYM 10636 @ 77184: CALL 1366 %finish 10637 @ 77185: LINE 1366 "regression-compile-tmp/pass1.imp" 10638 @ 77221: LOCATE L_0007 1367 %return 10639 @ 77224: LINE 1367 "regression-compile-tmp/pass1.imp" 10640 @ 77260: RETURN 1368 %finish 10641 @ 77261: LINE 1368 "regression-compile-tmp/pass1.imp" 10642 @ 77297: LOCATE L_0004 1369 atom2 = j>>7&127 10643 @ 77300: LINE 1369 "regression-compile-tmp/pass1.imp" 10644 @ 77336: PUSH ATOM2 10645 @ 77339: PUSH J 10646 @ 77342: PUSHI #0x00000007 10647 @ 77347: RSH 10648 @ 77348: PUSHI #0x0000007f 10649 @ 77353: AND 10650 @ 77354: ASSVAL 1370 subatom = kdict(k+1)&16_3fff 1371 !!!!!cont = ' ' 10651 @ 77355: LINE 1370 "regression-compile-tmp/pass1.imp" 10652 @ 77391: PUSH SUBATOM 10653 @ 77394: PUSH KDICT 10654 @ 77397: PUSH K 10655 @ 77400: PUSHI #0x00000001 10656 @ 77405: ADD 10657 @ 77406: ACCESS 10658 @ 77407: PUSHI #0x00003fff 10659 @ 77412: AND 10660 @ 77413: ASSVAL 1372 %return 1373 1374 ! report an error. adjust the error marker (pos1) to point 1375 ! to the faulty character in an atom, but care needs to be taken 1376 ! to prevent misleading reports in cases like ...????? 1377 10661 @ 77414: LINE 1372 "regression-compile-tmp/pass1.imp" 10662 @ 77450: RETURN 1378 err: atom1 = error+1; atom2 = 0 10663 @ 77451: LINE 1378 "regression-compile-tmp/pass1.imp" 10664 @ 77487: LABEL L_012e 10665 @ 77490: LINE 1378 "regression-compile-tmp/pass1.imp" 10666 @ 77526: PUSH ATOM1 10667 @ 77529: PUSHI #0x00008000 10668 @ 77534: PUSHI #0x00000001 10669 @ 77539: ADD 10670 @ 77540: ASSVAL 10671 @ 77541: LINE 1378 "regression-compile-tmp/pass1.imp" 10672 @ 77577: PUSH ATOM2 10673 @ 77580: PUSHI #0x00000000 10674 @ 77585: ASSVAL 1379 pos1 = pos %if pos-pos1 > 2 10675 @ 77586: LINE 1379 "regression-compile-tmp/pass1.imp" 10676 @ 77622: PUSH POS 10677 @ 77625: PUSH POS1 10678 @ 77628: SUB 10679 @ 77629: PUSHI #0x00000002 10680 @ 77634: JUMPIF <= L_0004 10681 @ 77638: PUSH POS1 10682 @ 77641: PUSH POS 10683 @ 77644: ASSVAL 10684 @ 77645: LOCATE L_0004 1380 %return 1381 1382 ! take care with strings and symbol constants. 1383 ! make sure the constant is valid here before sucking it in 1384 ! (and potentially loosing many lines) 1385 10685 @ 77648: LINE 1380 "regression-compile-tmp/pass1.imp" 10686 @ 77684: RETURN 1386 symbols: atom1 = var; atom2 = const; type = integer 10687 @ 77685: LINE 1386 "regression-compile-tmp/pass1.imp" 10688 @ 77721: LABEL L_012d 10689 @ 77724: LINE 1386 "regression-compile-tmp/pass1.imp" 10690 @ 77760: PUSH ATOM1 10691 @ 77763: PUSHI #0x0000005b 10692 @ 77768: ASSVAL 10693 @ 77769: LINE 1386 "regression-compile-tmp/pass1.imp" 10694 @ 77805: PUSH ATOM2 10695 @ 77808: PUSHI #0x0000005d 10696 @ 77813: ASSVAL 10697 @ 77814: LINE 1386 "regression-compile-tmp/pass1.imp" 10698 @ 77850: PUSH TYPE 10699 @ 77853: PUSHI #0x00000001 10700 @ 77858: ASSVAL 1387 map gg = const; protection = prot 10701 @ 77859: LINE 1387 "regression-compile-tmp/pass1.imp" 10702 @ 77895: PUSH MAPGG 10703 @ 77898: PUSHI #0x0000005d 10704 @ 77903: ASSVAL 10705 @ 77904: LINE 1387 "regression-compile-tmp/pass1.imp" 10706 @ 77940: PUSH PROTECTION 10707 @ 77943: PUSHI #0x00000100 10708 @ 77948: ASSVAL 1388 subatom = lp; abandon(3) %if lp >= lit max 10709 @ 77949: LINE 1388 "regression-compile-tmp/pass1.imp" 10710 @ 77985: PUSH SUBATOM 10711 @ 77988: PUSH LP 10712 @ 77991: ASSVAL 10713 @ 77992: LINE 1388 "regression-compile-tmp/pass1.imp" 10714 @ 78028: PUSH LP 10715 @ 78031: PUSHI #0x00000032 10716 @ 78036: JUMPIF < L_0004 10717 @ 78040: PUSH ABANDON 10718 @ 78043: PUSHI #0x00000003 10719 @ 78048: ASSPAR 10720 @ 78049: CALL 10721 @ 78050: LOCATE L_0004 1389 quote = \pend quote 10722 @ 78053: LINE 1389 "regression-compile-tmp/pass1.imp" 10723 @ 78089: PUSH QUOTE 10724 @ 78092: PUSH PENDQUOTE 10725 @ 78095: NOT 10726 @ 78096: ASSVAL 1390 %return 1391 1392 ! an integer constant is acceptable so get it in and 1393 ! get the next atom 10727 @ 78097: LINE 1390 "regression-compile-tmp/pass1.imp" 10728 @ 78133: RETURN 1394 chars: n = 0; cont = cquote 10729 @ 78134: LINE 1394 "regression-compile-tmp/pass1.imp" 10730 @ 78170: LABEL L_012f 10731 @ 78173: LINE 1394 "regression-compile-tmp/pass1.imp" 10732 @ 78209: PUSH N 10733 @ 78212: PUSHI #0x00000000 10734 @ 78217: ASSVAL 10735 @ 78218: LINE 1394 "regression-compile-tmp/pass1.imp" 10736 @ 78254: PUSH CONT 10737 @ 78257: PUSHI #0x00000027 10738 @ 78262: ASSVAL 1395 %cycle 10739 @ 78263: LINE 1395 "regression-compile-tmp/pass1.imp" 10740 @ 78299: LOCATE L_0003 1396 read sym 10741 @ 78302: LINE 1396 "regression-compile-tmp/pass1.imp" 10742 @ 78338: PUSH READSYM 10743 @ 78341: CALL 1397 %if sym = cquote %start 10744 @ 78342: LINE 1397 "regression-compile-tmp/pass1.imp" 10745 @ 78378: PUSH SYM 10746 @ 78381: PUSHI #0x00000027 10747 @ 78386: JUMPIF # L_0007 1398 %exit %if nextsymbol # cquote 10748 @ 78390: LINE 1398 "regression-compile-tmp/pass1.imp" 10749 @ 78426: PUSH NEXTSYMBOL 10750 @ 78429: CALL 10751 @ 78430: PUSHI #0x00000027 10752 @ 78435: JUMPIF = L_000a 10753 @ 78439: GOTO L_0004 10754 @ 78442: LOCATE L_000a 1399 read sym 10755 @ 78445: LINE 1399 "regression-compile-tmp/pass1.imp" 10756 @ 78481: PUSH READSYM 10757 @ 78484: CALL 1400 %finish 10758 @ 78485: LINE 1400 "regression-compile-tmp/pass1.imp" 10759 @ 78521: LOCATE L_0007 1401 %if n&(\((-1)>>byte size)) # 0 %start; ! overflow 10760 @ 78524: LINE 1401 "regression-compile-tmp/pass1.imp" 10761 @ 78560: PUSH N 10762 @ 78563: PUSHI #0x00000001 10763 @ 78568: NEGATE 10764 @ 78569: PUSHI #0x00000008 10765 @ 78574: RSH 10766 @ 78575: NOT 10767 @ 78576: AND 10768 @ 78577: PUSHI #0x00000000 10769 @ 78582: JUMPIF = L_0007 1402 pos1 = pos; atom1 = error+10; %return 10770 @ 78586: LINE 1402 "regression-compile-tmp/pass1.imp" 10771 @ 78622: PUSH POS1 10772 @ 78625: PUSH POS 10773 @ 78628: ASSVAL 10774 @ 78629: LINE 1402 "regression-compile-tmp/pass1.imp" 10775 @ 78665: PUSH ATOM1 10776 @ 78668: PUSHI #0x00008000 10777 @ 78673: PUSHI #0x0000000a 10778 @ 78678: ADD 10779 @ 78679: ASSVAL 10780 @ 78680: LINE 1402 "regression-compile-tmp/pass1.imp" 10781 @ 78716: RETURN 1403 %finish 10782 @ 78717: LINE 1403 "regression-compile-tmp/pass1.imp" 10783 @ 78753: LOCATE L_0007 1404 ->err %if quote = 0 10784 @ 78756: LINE 1404 "regression-compile-tmp/pass1.imp" 10785 @ 78792: PUSH QUOTE 10786 @ 78795: PUSHI #0x00000000 10787 @ 78800: JUMPIF # L_0007 10788 @ 78804: JUMP L_012e 10789 @ 78807: LOCATE L_0007 1405 n = n<top 1412 1413 !sniff the grammar before getting the string 10834 @ 79195: LINE 1411 "regression-compile-tmp/pass1.imp" 10835 @ 79231: JUMP L_0128 1414 strings: atom1 = var; atom2 = const; type = stringv 10836 @ 79234: LINE 1414 "regression-compile-tmp/pass1.imp" 10837 @ 79270: LABEL L_012c 10838 @ 79273: LINE 1414 "regression-compile-tmp/pass1.imp" 10839 @ 79309: PUSH ATOM1 10840 @ 79312: PUSHI #0x0000005b 10841 @ 79317: ASSVAL 10842 @ 79318: LINE 1414 "regression-compile-tmp/pass1.imp" 10843 @ 79354: PUSH ATOM2 10844 @ 79357: PUSHI #0x0000005d 10845 @ 79362: ASSVAL 10846 @ 79363: LINE 1414 "regression-compile-tmp/pass1.imp" 10847 @ 79399: PUSH TYPE 10848 @ 79402: PUSHI #0x00000003 10849 @ 79407: ASSVAL 1415 subatom = strp!16_4000 10850 @ 79408: LINE 1415 "regression-compile-tmp/pass1.imp" 10851 @ 79444: PUSH SUBATOM 10852 @ 79447: PUSH STRP 10853 @ 79450: PUSHI #0x00004000 10854 @ 79455: OR 10855 @ 79456: ASSVAL 1416 map gg = const; protection = prot 10856 @ 79457: LINE 1416 "regression-compile-tmp/pass1.imp" 10857 @ 79493: PUSH MAPGG 10858 @ 79496: PUSHI #0x0000005d 10859 @ 79501: ASSVAL 10860 @ 79502: LINE 1416 "regression-compile-tmp/pass1.imp" 10861 @ 79538: PUSH PROTECTION 10862 @ 79541: PUSHI #0x00000100 10863 @ 79546: ASSVAL 1417 quote = subatom 10864 @ 79547: LINE 1417 "regression-compile-tmp/pass1.imp" 10865 @ 79583: PUSH QUOTE 10866 @ 79586: PUSH SUBATOM 10867 @ 79589: ASSVAL 1418 text line = lines; ! in case of errors 10868 @ 79590: LINE 1418 "regression-compile-tmp/pass1.imp" 10869 @ 79626: PUSH TEXTLINE 10870 @ 79629: PUSH LINES 10871 @ 79632: ASSVAL 1419 %return 1420 1421 ! a string constant is ok here, so pull it in and get 1422 ! the next atom 1423 ! ABD - temp variable to help pack bytes into words 10872 @ 79633: LINE 1419 "regression-compile-tmp/pass1.imp" 10873 @ 79669: RETURN 1424 %integer flipflop 1425 10874 @ 79670: LINE 1424 "regression-compile-tmp/pass1.imp" 10875 @ 79706: DEF FLIPFLOP p1=V_0130 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1426 text: ->chars %if quote < 0; ! character consts 10876 @ 79726: LINE 1426 "regression-compile-tmp/pass1.imp" 10877 @ 79762: LABEL L_012b 10878 @ 79765: LINE 1426 "regression-compile-tmp/pass1.imp" 10879 @ 79801: PUSH QUOTE 10880 @ 79804: PUSHI #0x00000000 10881 @ 79809: JUMPIF >= L_0004 10882 @ 79813: JUMP L_012f 10883 @ 79816: LOCATE L_0004 1427 l = strp; ! point to beginning 10884 @ 79819: LINE 1427 "regression-compile-tmp/pass1.imp" 10885 @ 79855: PUSH L 10886 @ 79858: PUSH STRP 10887 @ 79861: ASSVAL 1428 k = 0; ! length so far 10888 @ 79862: LINE 1428 "regression-compile-tmp/pass1.imp" 10889 @ 79898: PUSH K 10890 @ 79901: PUSHI #0x00000000 10891 @ 79906: ASSVAL 1429 flipflop = 0; ! space for the length is up the spout 1430 10892 @ 79907: LINE 1429 "regression-compile-tmp/pass1.imp" 10893 @ 79943: PUSH FLIPFLOP 10894 @ 79946: PUSHI #0x00000000 10895 @ 79951: ASSVAL 1431 %cycle 10896 @ 79952: LINE 1431 "regression-compile-tmp/pass1.imp" 10897 @ 79988: LOCATE L_0003 1432 cont = squote; quote = 1 10898 @ 79991: LINE 1432 "regression-compile-tmp/pass1.imp" 10899 @ 80027: PUSH CONT 10900 @ 80030: PUSHI #0x00000022 10901 @ 80035: ASSVAL 10902 @ 80036: LINE 1432 "regression-compile-tmp/pass1.imp" 10903 @ 80072: PUSH QUOTE 10904 @ 80075: PUSHI #0x00000001 10905 @ 80080: ASSVAL 1433 %cycle 10906 @ 80081: LINE 1433 "regression-compile-tmp/pass1.imp" 10907 @ 80117: LOCATE L_0006 1434 read sym 10908 @ 80120: LINE 1434 "regression-compile-tmp/pass1.imp" 10909 @ 80156: PUSH READSYM 10910 @ 80159: CALL 1435 %if sym = squote %start; ! terminator? 10911 @ 80160: LINE 1435 "regression-compile-tmp/pass1.imp" 10912 @ 80196: PUSH SYM 10913 @ 80199: PUSHI #0x00000022 10914 @ 80204: JUMPIF # L_000a 1436 %exit %if nextsymbol # squote; ! yes -> 10915 @ 80208: LINE 1436 "regression-compile-tmp/pass1.imp" 10916 @ 80244: PUSH NEXTSYMBOL 10917 @ 80247: CALL 10918 @ 80248: PUSHI #0x00000022 10919 @ 80253: JUMPIF = L_000d 10920 @ 80257: GOTO L_0007 10921 @ 80260: LOCATE L_000d 1437 read sym; ! skip quote 10922 @ 80263: LINE 1437 "regression-compile-tmp/pass1.imp" 10923 @ 80299: PUSH READSYM 10924 @ 80302: CALL 1438 %finish 10925 @ 80303: LINE 1438 "regression-compile-tmp/pass1.imp" 10926 @ 80339: LOCATE L_000a 1439 %if flipflop >= 0 %start 10927 @ 80342: LINE 1439 "regression-compile-tmp/pass1.imp" 10928 @ 80378: PUSH FLIPFLOP 10929 @ 80381: PUSHI #0x00000000 10930 @ 80386: JUMPIF < L_000a 1440 glink(strp) = sym<<8 + flipflop 10931 @ 80390: LINE 1440 "regression-compile-tmp/pass1.imp" 10932 @ 80426: PUSH GLINK 10933 @ 80429: PUSH STRP 10934 @ 80432: ACCESS 10935 @ 80433: PUSH SYM 10936 @ 80436: PUSHI #0x00000008 10937 @ 80441: LSH 10938 @ 80442: PUSH FLIPFLOP 10939 @ 80445: ADD 10940 @ 80446: ASSVAL 1441 strp = strp+1 10941 @ 80447: LINE 1441 "regression-compile-tmp/pass1.imp" 10942 @ 80483: PUSH STRP 10943 @ 80486: PUSH STRP 10944 @ 80489: PUSHI #0x00000001 10945 @ 80494: ADD 10946 @ 80495: ASSVAL 1442 flipflop = -1 10947 @ 80496: LINE 1442 "regression-compile-tmp/pass1.imp" 10948 @ 80532: PUSH FLIPFLOP 10949 @ 80535: PUSHI #0x00000001 10950 @ 80540: NEGATE 10951 @ 80541: ASSVAL 1443 %else 10952 @ 80542: LINE 1443 "regression-compile-tmp/pass1.imp" 10953 @ 80578: GOTO L_0009 10954 @ 80581: LOCATE L_000a 1444 flipflop = sym 10955 @ 80584: LINE 1444 "regression-compile-tmp/pass1.imp" 10956 @ 80620: PUSH FLIPFLOP 10957 @ 80623: PUSH SYM 10958 @ 80626: ASSVAL 1445 %finish 10959 @ 80627: LINE 1445 "regression-compile-tmp/pass1.imp" 10960 @ 80663: LOCATE L_0009 1446 k = k+1 10961 @ 80666: LINE 1446 "regression-compile-tmp/pass1.imp" 10962 @ 80702: PUSH K 10963 @ 80705: PUSH K 10964 @ 80708: PUSHI #0x00000001 10965 @ 80713: ADD 10966 @ 80714: ASSVAL 1447 lines = text line %and abandon(7) %if k > 255; ! too many chars 10967 @ 80715: LINE 1447 "regression-compile-tmp/pass1.imp" 10968 @ 80751: PUSH K 10969 @ 80754: PUSHI #0x000000ff 10970 @ 80759: JUMPIF <= L_000a 10971 @ 80763: PUSH LINES 10972 @ 80766: PUSH TEXTLINE 10973 @ 80769: ASSVAL 10974 @ 80770: PUSH ABANDON 10975 @ 80773: PUSHI #0x00000007 10976 @ 80778: ASSPAR 10977 @ 80779: CALL 10978 @ 80780: LOCATE L_000a 1448 %repeat 10979 @ 80783: LINE 1448 "regression-compile-tmp/pass1.imp" 10980 @ 80819: REPEAT L_0006 10981 @ 80822: LOCATE L_0007 1449 %if flipflop >=0 %start; ! tail-end charlie 10982 @ 80825: LINE 1449 "regression-compile-tmp/pass1.imp" 10983 @ 80861: PUSH FLIPFLOP 10984 @ 80864: PUSHI #0x00000000 10985 @ 80869: JUMPIF < L_0007 1450 glink(strp) = flipflop 10986 @ 80873: LINE 1450 "regression-compile-tmp/pass1.imp" 10987 @ 80909: PUSH GLINK 10988 @ 80912: PUSH STRP 10989 @ 80915: ACCESS 10990 @ 80916: PUSH FLIPFLOP 10991 @ 80919: ASSVAL 1451 strp = strp+1 10992 @ 80920: LINE 1451 "regression-compile-tmp/pass1.imp" 10993 @ 80956: PUSH STRP 10994 @ 80959: PUSH STRP 10995 @ 80962: PUSHI #0x00000001 10996 @ 80967: ADD 10997 @ 80968: ASSVAL 1452 %finish 10998 @ 80969: LINE 1452 "regression-compile-tmp/pass1.imp" 10999 @ 81005: LOCATE L_0007 1453 glink(l) = glink(l)!k; ! plug in length 1454 11000 @ 81008: LINE 1453 "regression-compile-tmp/pass1.imp" 11001 @ 81044: PUSH GLINK 11002 @ 81047: PUSH L 11003 @ 81050: ACCESS 11004 @ 81051: PUSH GLINK 11005 @ 81054: PUSH L 11006 @ 81057: ACCESS 11007 @ 81058: PUSH K 11008 @ 81061: OR 11009 @ 81062: ASSVAL 1455 quote = 0; cont = ' '; read sym 11010 @ 81063: LINE 1455 "regression-compile-tmp/pass1.imp" 11011 @ 81099: PUSH QUOTE 11012 @ 81102: PUSHI #0x00000000 11013 @ 81107: ASSVAL 11014 @ 81108: LINE 1455 "regression-compile-tmp/pass1.imp" 11015 @ 81144: PUSH CONT 11016 @ 81147: PUSHI #0x00000020 11017 @ 81152: ASSVAL 11018 @ 81153: LINE 1455 "regression-compile-tmp/pass1.imp" 11019 @ 81189: PUSH READSYM 11020 @ 81192: CALL 1456 code atom(target) 11021 @ 81193: LINE 1456 "regression-compile-tmp/pass1.imp" 11022 @ 81229: PUSH CODEATOM 11023 @ 81232: PUSH TARGET 11024 @ 81235: ASSPAR 11025 @ 81236: CALL 1457 %return %unless atom1 = 48 %and sym = squote; ! fold "???"."+++" 11026 @ 81237: LINE 1457 "regression-compile-tmp/pass1.imp" 11027 @ 81273: PUSH ATOM1 11028 @ 81276: PUSHI #0x00000030 11029 @ 81281: JUMPIF # L_0008 11030 @ 81285: PUSH SYM 11031 @ 81288: PUSHI #0x00000022 11032 @ 81293: JUMPIF = L_0007 11033 @ 81297: LOCATE L_0008 11034 @ 81300: RETURN 11035 @ 81301: LOCATE L_0007 1458 %repeat 1459 11036 @ 81304: LINE 1458 "regression-compile-tmp/pass1.imp" 11037 @ 81340: REPEAT L_0003 1460 %routine get(%integer limit) 11038 @ 81343: LINE 1460 "regression-compile-tmp/pass1.imp" 11039 @ 81379: DEF GET (_lev0id0_COMPILEBLOCK_ANALYSE_CODEATOM_GET) p1=V_0131 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 11040 @ 81394: START ( FORMAL PARAMETERS {lev=5 --> 6, nested=0 --> 1} 11041 @ 81395: DEF LIMIT p1=V_0132 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 11042 @ 81412: FINISH ) {lev=5} 1461 %integer s, shift 11043 @ 81413: LINE 1461 "regression-compile-tmp/pass1.imp" 11044 @ 81449: DEF S p1=V_0133 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 11045 @ 81462: DEF SHIFT p1=V_0134 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1462 shift = 0 11046 @ 81479: LINE 1462 "regression-compile-tmp/pass1.imp" 11047 @ 81515: PUSH SHIFT 11048 @ 81518: PUSHI #0x00000000 11049 @ 81523: ASSVAL 1463 %if base # 10 %start 11050 @ 81524: LINE 1463 "regression-compile-tmp/pass1.imp" 11051 @ 81560: PUSH BASE 11052 @ 81563: PUSHI #0x0000000a 11053 @ 81568: JUMPIF = L_0004 1464 %if base = 16 %start 11054 @ 81572: LINE 1464 "regression-compile-tmp/pass1.imp" 11055 @ 81608: PUSH BASE 11056 @ 81611: PUSHI #0x00000010 11057 @ 81616: JUMPIF # L_0007 1465 shift = 4 11058 @ 81620: LINE 1465 "regression-compile-tmp/pass1.imp" 11059 @ 81656: PUSH SHIFT 11060 @ 81659: PUSHI #0x00000004 11061 @ 81664: ASSVAL 1466 %finish %else %start 11062 @ 81665: LINE 1466 "regression-compile-tmp/pass1.imp" 11063 @ 81701: GOTO L_0006 11064 @ 81704: LOCATE L_0007 1467 %if base = 8 %start 11065 @ 81707: LINE 1467 "regression-compile-tmp/pass1.imp" 11066 @ 81743: PUSH BASE 11067 @ 81746: PUSHI #0x00000008 11068 @ 81751: JUMPIF # L_000a 1468 shift = 3 11069 @ 81755: LINE 1468 "regression-compile-tmp/pass1.imp" 11070 @ 81791: PUSH SHIFT 11071 @ 81794: PUSHI #0x00000003 11072 @ 81799: ASSVAL 1469 %finish %else %start 11073 @ 81800: LINE 1469 "regression-compile-tmp/pass1.imp" 11074 @ 81836: GOTO L_0009 11075 @ 81839: LOCATE L_000a 1470 %if base = 2 %start 11076 @ 81842: LINE 1470 "regression-compile-tmp/pass1.imp" 11077 @ 81878: PUSH BASE 11078 @ 81881: PUSHI #0x00000002 11079 @ 81886: JUMPIF # L_000d 1471 shift = 1 11080 @ 81890: LINE 1471 "regression-compile-tmp/pass1.imp" 11081 @ 81926: PUSH SHIFT 11082 @ 81929: PUSHI #0x00000001 11083 @ 81934: ASSVAL 1472 %finish 11084 @ 81935: LINE 1472 "regression-compile-tmp/pass1.imp" 11085 @ 81971: LOCATE L_000d 1473 %finish 11086 @ 81974: LINE 1473 "regression-compile-tmp/pass1.imp" 11087 @ 82010: LOCATE L_0009 1474 %finish 11088 @ 82013: LINE 1474 "regression-compile-tmp/pass1.imp" 11089 @ 82049: LOCATE L_0006 1475 %finish 11090 @ 82052: LINE 1475 "regression-compile-tmp/pass1.imp" 11091 @ 82088: LOCATE L_0004 1476 n = 0 11092 @ 82091: LINE 1476 "regression-compile-tmp/pass1.imp" 11093 @ 82127: PUSH N 11094 @ 82130: PUSHI #0x00000000 11095 @ 82135: ASSVAL 1477 %cycle 11096 @ 82136: LINE 1477 "regression-compile-tmp/pass1.imp" 11097 @ 82172: LOCATE L_0003 1478 %if symtype = -1 %start; ! digit 11098 @ 82175: LINE 1478 "regression-compile-tmp/pass1.imp" 11099 @ 82211: PUSH SYMTYPE 11100 @ 82214: PUSHI #0x00000001 11101 @ 82219: NEGATE 11102 @ 82220: JUMPIF # L_0007 1479 s = sym-'0' 11103 @ 82224: LINE 1479 "regression-compile-tmp/pass1.imp" 11104 @ 82260: PUSH S 11105 @ 82263: PUSH SYM 11106 @ 82266: PUSHI #0x00000030 11107 @ 82271: SUB 11108 @ 82272: ASSVAL 1480 %finish %else %start 11109 @ 82273: LINE 1480 "regression-compile-tmp/pass1.imp" 11110 @ 82309: GOTO L_0006 11111 @ 82312: LOCATE L_0007 1481 %if symtype < 0 %start; ! letter 11112 @ 82315: LINE 1481 "regression-compile-tmp/pass1.imp" 11113 @ 82351: PUSH SYMTYPE 11114 @ 82354: PUSHI #0x00000000 11115 @ 82359: JUMPIF >= L_000a 1482 s = sym-'A'+10 11116 @ 82363: LINE 1482 "regression-compile-tmp/pass1.imp" 11117 @ 82399: PUSH S 11118 @ 82402: PUSH SYM 11119 @ 82405: PUSHI #0x00000041 11120 @ 82410: SUB 11121 @ 82411: PUSHI #0x0000000a 11122 @ 82416: ADD 11123 @ 82417: ASSVAL 1483 %finish %else %start 11124 @ 82418: LINE 1483 "regression-compile-tmp/pass1.imp" 11125 @ 82454: GOTO L_0009 11126 @ 82457: LOCATE L_000a 1484 %return 11127 @ 82460: LINE 1484 "regression-compile-tmp/pass1.imp" 11128 @ 82496: RETURN 1485 %finish 11129 @ 82497: LINE 1485 "regression-compile-tmp/pass1.imp" 11130 @ 82533: LOCATE L_0009 1486 %finish 11131 @ 82536: LINE 1486 "regression-compile-tmp/pass1.imp" 11132 @ 82572: LOCATE L_0006 1487 %return %if s >= limit 11133 @ 82575: LINE 1487 "regression-compile-tmp/pass1.imp" 11134 @ 82611: PUSH S 11135 @ 82614: PUSH LIMIT 11136 @ 82617: JUMPIF < L_0007 11137 @ 82621: RETURN 11138 @ 82622: LOCATE L_0007 1488 pt = pt+1; glink(pt) = sym 11139 @ 82625: LINE 1488 "regression-compile-tmp/pass1.imp" 11140 @ 82661: PUSH PT 11141 @ 82664: PUSH PT 11142 @ 82667: PUSHI #0x00000001 11143 @ 82672: ADD 11144 @ 82673: ASSVAL 11145 @ 82674: LINE 1488 "regression-compile-tmp/pass1.imp" 11146 @ 82710: PUSH GLINK 11147 @ 82713: PUSH PT 11148 @ 82716: ACCESS 11149 @ 82717: PUSH SYM 11150 @ 82720: ASSVAL 1489 %if base = 10 %start; ! check overflow 11151 @ 82721: LINE 1489 "regression-compile-tmp/pass1.imp" 11152 @ 82757: PUSH BASE 11153 @ 82760: PUSHI #0x0000000a 11154 @ 82765: JUMPIF # L_0007 1490 %if n >= max int %and (s > max dig %or n > max int) %start 1491 !too big for an integer, 1492 !so call it a real 11155 @ 82769: LINE 1490 "regression-compile-tmp/pass1.imp" 11156 @ 82805: PUSH N 11157 @ 82808: PUSHI #0x0ccccccc 11158 @ 82813: JUMPIF < L_000a 11159 @ 82817: PUSH S 11160 @ 82820: PUSHI #0x00000007 11161 @ 82825: JUMPIF > L_000b 11162 @ 82829: PUSH N 11163 @ 82832: PUSHI #0x0ccccccc 11164 @ 82837: JUMPIF <= L_000a 11165 @ 82841: LOCATE L_000b 1493 base = 0; type = real; n = 0 11166 @ 82844: LINE 1493 "regression-compile-tmp/pass1.imp" 11167 @ 82880: PUSH BASE 11168 @ 82883: PUSHI #0x00000000 11169 @ 82888: ASSVAL 11170 @ 82889: LINE 1493 "regression-compile-tmp/pass1.imp" 11171 @ 82925: PUSH TYPE 11172 @ 82928: PUSHI #0x00000002 11173 @ 82933: ASSVAL 11174 @ 82934: LINE 1493 "regression-compile-tmp/pass1.imp" 11175 @ 82970: PUSH N 11176 @ 82973: PUSHI #0x00000000 11177 @ 82978: ASSVAL 1494 %finish 11178 @ 82979: LINE 1494 "regression-compile-tmp/pass1.imp" 11179 @ 83015: LOCATE L_000a 1495 %finish 11180 @ 83018: LINE 1495 "regression-compile-tmp/pass1.imp" 11181 @ 83054: LOCATE L_0007 1496 %if shift = 0 %start 11182 @ 83057: LINE 1496 "regression-compile-tmp/pass1.imp" 11183 @ 83093: PUSH SHIFT 11184 @ 83096: PUSHI #0x00000000 11185 @ 83101: JUMPIF # L_0007 1497 n = n*base+s 11186 @ 83105: LINE 1497 "regression-compile-tmp/pass1.imp" 11187 @ 83141: PUSH N 11188 @ 83144: PUSH N 11189 @ 83147: PUSH BASE 11190 @ 83150: MUL 11191 @ 83151: PUSH S 11192 @ 83154: ADD 11193 @ 83155: ASSVAL 1498 %finish %else %start 11194 @ 83156: LINE 1498 "regression-compile-tmp/pass1.imp" 11195 @ 83192: GOTO L_0006 11196 @ 83195: LOCATE L_0007 1499 n = n< 4} 1505 number: base = 10 11214 @ 83404: LINE 1505 "regression-compile-tmp/pass1.imp" 11215 @ 83440: LABEL L_012a 11216 @ 83443: LINE 1505 "regression-compile-tmp/pass1.imp" 11217 @ 83479: PUSH BASE 11218 @ 83482: PUSHI #0x0000000a 11219 @ 83487: ASSVAL 1506 bxk: atom1 = var; atom2 = const; type = integer; subatom = lp 11220 @ 83488: LINE 1506 "regression-compile-tmp/pass1.imp" 11221 @ 83524: LABEL L_0132 11222 @ 83527: LINE 1506 "regression-compile-tmp/pass1.imp" 11223 @ 83563: PUSH ATOM1 11224 @ 83566: PUSHI #0x0000005b 11225 @ 83571: ASSVAL 11226 @ 83572: LINE 1506 "regression-compile-tmp/pass1.imp" 11227 @ 83608: PUSH ATOM2 11228 @ 83611: PUSHI #0x0000005d 11229 @ 83616: ASSVAL 11230 @ 83617: LINE 1506 "regression-compile-tmp/pass1.imp" 11231 @ 83653: PUSH TYPE 11232 @ 83656: PUSHI #0x00000001 11233 @ 83661: ASSVAL 11234 @ 83662: LINE 1506 "regression-compile-tmp/pass1.imp" 11235 @ 83698: PUSH SUBATOM 11236 @ 83701: PUSH LP 11237 @ 83704: ASSVAL 1507 map gg = const; protection = prot 11238 @ 83705: LINE 1507 "regression-compile-tmp/pass1.imp" 11239 @ 83741: PUSH MAPGG 11240 @ 83744: PUSHI #0x0000005d 11241 @ 83749: ASSVAL 11242 @ 83750: LINE 1507 "regression-compile-tmp/pass1.imp" 11243 @ 83786: PUSH PROTECTION 11244 @ 83789: PUSHI #0x00000100 11245 @ 83794: ASSVAL 1508 abandon(3) %if lp >= lit max 11246 @ 83795: LINE 1508 "regression-compile-tmp/pass1.imp" 11247 @ 83831: PUSH LP 11248 @ 83834: PUSHI #0x00000032 11249 @ 83839: JUMPIF < L_0004 11250 @ 83843: PUSH ABANDON 11251 @ 83846: PUSHI #0x00000003 11252 @ 83851: ASSPAR 11253 @ 83852: CALL 11254 @ 83853: LOCATE L_0004 1509 pt = strp; mul = 0 11255 @ 83856: LINE 1509 "regression-compile-tmp/pass1.imp" 11256 @ 83892: PUSH PT 11257 @ 83895: PUSH STRP 11258 @ 83898: ASSVAL 11259 @ 83899: LINE 1509 "regression-compile-tmp/pass1.imp" 11260 @ 83935: PUSH MUL 11261 @ 83938: PUSHI #0x00000000 11262 @ 83943: ASSVAL 1510 %cycle 11263 @ 83944: LINE 1510 "regression-compile-tmp/pass1.imp" 11264 @ 83980: LOCATE L_0003 1511 get(base) 11265 @ 83983: LINE 1511 "regression-compile-tmp/pass1.imp" 11266 @ 84019: PUSH GET 11267 @ 84022: PUSH BASE 11268 @ 84025: ASSPAR 11269 @ 84026: CALL 1512 %exit %unless sym = '_' %and base # 0 %and pend quote = 0; ! change of base 11270 @ 84027: LINE 1512 "regression-compile-tmp/pass1.imp" 11271 @ 84063: PUSH SYM 11272 @ 84066: PUSHI #0x0000005f 11273 @ 84071: JUMPIF # L_0008 11274 @ 84075: PUSH BASE 11275 @ 84078: PUSHI #0x00000000 11276 @ 84083: JUMPIF = L_0008 11277 @ 84087: PUSH PENDQUOTE 11278 @ 84090: PUSHI #0x00000000 11279 @ 84095: JUMPIF = L_0007 11280 @ 84099: LOCATE L_0008 11281 @ 84102: GOTO L_0004 11282 @ 84105: LOCATE L_0007 1513 pt = pt+1; glink(pt) = '_' 11283 @ 84108: LINE 1513 "regression-compile-tmp/pass1.imp" 11284 @ 84144: PUSH PT 11285 @ 84147: PUSH PT 11286 @ 84150: PUSHI #0x00000001 11287 @ 84155: ADD 11288 @ 84156: ASSVAL 11289 @ 84157: LINE 1513 "regression-compile-tmp/pass1.imp" 11290 @ 84193: PUSH GLINK 11291 @ 84196: PUSH PT 11292 @ 84199: ACCESS 11293 @ 84200: PUSHI #0x0000005f 11294 @ 84205: ASSVAL 1514 read sym 11295 @ 84206: LINE 1514 "regression-compile-tmp/pass1.imp" 11296 @ 84242: PUSH READSYM 11297 @ 84245: CALL 1515 base = n 11298 @ 84246: LINE 1515 "regression-compile-tmp/pass1.imp" 11299 @ 84282: PUSH BASE 11300 @ 84285: PUSH N 11301 @ 84288: ASSVAL 1516 %repeat 1517 11302 @ 84289: LINE 1516 "regression-compile-tmp/pass1.imp" 11303 @ 84325: REPEAT L_0003 11304 @ 84328: LOCATE L_0004 1518 %if pend quote # 0 %start 11305 @ 84331: LINE 1518 "regression-compile-tmp/pass1.imp" 11306 @ 84367: PUSH PENDQUOTE 11307 @ 84370: PUSHI #0x00000000 11308 @ 84375: JUMPIF = L_0004 1519 ->err %if sym # cquote 11309 @ 84379: LINE 1519 "regression-compile-tmp/pass1.imp" 11310 @ 84415: PUSH SYM 11311 @ 84418: PUSHI #0x00000027 11312 @ 84423: JUMPIF = L_0007 11313 @ 84427: JUMP L_012e 11314 @ 84430: LOCATE L_0007 1520 readsym 11315 @ 84433: LINE 1520 "regression-compile-tmp/pass1.imp" 11316 @ 84469: PUSH READSYM 11317 @ 84472: CALL 1521 %finish 11318 @ 84473: LINE 1521 "regression-compile-tmp/pass1.imp" 11319 @ 84509: LOCATE L_0004 1522 %if sym = '.' %start; ! a real constant 11320 @ 84512: LINE 1522 "regression-compile-tmp/pass1.imp" 11321 @ 84548: PUSH SYM 11322 @ 84551: PUSHI #0x0000002e 11323 @ 84556: JUMPIF # L_0004 1523 pt = pt+1; glink(pt) = '.' 11324 @ 84560: LINE 1523 "regression-compile-tmp/pass1.imp" 11325 @ 84596: PUSH PT 11326 @ 84599: PUSH PT 11327 @ 84602: PUSHI #0x00000001 11328 @ 84607: ADD 11329 @ 84608: ASSVAL 11330 @ 84609: LINE 1523 "regression-compile-tmp/pass1.imp" 11331 @ 84645: PUSH GLINK 11332 @ 84648: PUSH PT 11333 @ 84651: ACCESS 11334 @ 84652: PUSHI #0x0000002e 11335 @ 84657: ASSVAL 1524 read sym 11336 @ 84658: LINE 1524 "regression-compile-tmp/pass1.imp" 11337 @ 84694: PUSH READSYM 11338 @ 84697: CALL 1525 type = real; n = base; base = 0; get(n) 11339 @ 84698: LINE 1525 "regression-compile-tmp/pass1.imp" 11340 @ 84734: PUSH TYPE 11341 @ 84737: PUSHI #0x00000002 11342 @ 84742: ASSVAL 11343 @ 84743: LINE 1525 "regression-compile-tmp/pass1.imp" 11344 @ 84779: PUSH N 11345 @ 84782: PUSH BASE 11346 @ 84785: ASSVAL 11347 @ 84786: LINE 1525 "regression-compile-tmp/pass1.imp" 11348 @ 84822: PUSH BASE 11349 @ 84825: PUSHI #0x00000000 11350 @ 84830: ASSVAL 11351 @ 84831: LINE 1525 "regression-compile-tmp/pass1.imp" 11352 @ 84867: PUSH GET 11353 @ 84870: PUSH N 11354 @ 84873: ASSPAR 11355 @ 84874: CALL 1526 %finish 1527 11356 @ 84875: LINE 1526 "regression-compile-tmp/pass1.imp" 11357 @ 84911: LOCATE L_0004 1528 %if sym = '@' %start; ! an exponent 11358 @ 84914: LINE 1528 "regression-compile-tmp/pass1.imp" 11359 @ 84950: PUSH SYM 11360 @ 84953: PUSHI #0x00000040 11361 @ 84958: JUMPIF # L_0004 1529 pt = pt+1; glink(pt) = '@'; k = pt 11362 @ 84962: LINE 1529 "regression-compile-tmp/pass1.imp" 11363 @ 84998: PUSH PT 11364 @ 85001: PUSH PT 11365 @ 85004: PUSHI #0x00000001 11366 @ 85009: ADD 11367 @ 85010: ASSVAL 11368 @ 85011: LINE 1529 "regression-compile-tmp/pass1.imp" 11369 @ 85047: PUSH GLINK 11370 @ 85050: PUSH PT 11371 @ 85053: ACCESS 11372 @ 85054: PUSHI #0x00000040 11373 @ 85059: ASSVAL 11374 @ 85060: LINE 1529 "regression-compile-tmp/pass1.imp" 11375 @ 85096: PUSH K 11376 @ 85099: PUSH PT 11377 @ 85102: ASSVAL 1530 readsym 11378 @ 85103: LINE 1530 "regression-compile-tmp/pass1.imp" 11379 @ 85139: PUSH READSYM 11380 @ 85142: CALL 1531 type = integer; base = 10 11381 @ 85143: LINE 1531 "regression-compile-tmp/pass1.imp" 11382 @ 85179: PUSH TYPE 11383 @ 85182: PUSHI #0x00000001 11384 @ 85187: ASSVAL 11385 @ 85188: LINE 1531 "regression-compile-tmp/pass1.imp" 11386 @ 85224: PUSH BASE 11387 @ 85227: PUSHI #0x0000000a 11388 @ 85232: ASSVAL 1532 %if sym = '-' %start 11389 @ 85233: LINE 1532 "regression-compile-tmp/pass1.imp" 11390 @ 85269: PUSH SYM 11391 @ 85272: PUSHI #0x0000002d 11392 @ 85277: JUMPIF # L_0007 1533 read sym; get(10); n = -n 11393 @ 85281: LINE 1533 "regression-compile-tmp/pass1.imp" 11394 @ 85317: PUSH READSYM 11395 @ 85320: CALL 11396 @ 85321: LINE 1533 "regression-compile-tmp/pass1.imp" 11397 @ 85357: PUSH GET 11398 @ 85360: PUSHI #0x0000000a 11399 @ 85365: ASSPAR 11400 @ 85366: CALL 11401 @ 85367: LINE 1533 "regression-compile-tmp/pass1.imp" 11402 @ 85403: PUSH N 11403 @ 85406: PUSH N 11404 @ 85409: NEGATE 11405 @ 85410: ASSVAL 1534 %finish %else %start 11406 @ 85411: LINE 1534 "regression-compile-tmp/pass1.imp" 11407 @ 85447: GOTO L_0006 11408 @ 85450: LOCATE L_0007 1535 get(10) 11409 @ 85453: LINE 1535 "regression-compile-tmp/pass1.imp" 11410 @ 85489: PUSH GET 11411 @ 85492: PUSHI #0x0000000a 11412 @ 85497: ASSPAR 11413 @ 85498: CALL 1536 %finish 11414 @ 85499: LINE 1536 "regression-compile-tmp/pass1.imp" 11415 @ 85535: LOCATE L_0006 1537 pt = k+1; glink(pt) = lp; litpool(lp) = n; lp = lp+1 11416 @ 85538: LINE 1537 "regression-compile-tmp/pass1.imp" 11417 @ 85574: PUSH PT 11418 @ 85577: PUSH K 11419 @ 85580: PUSHI #0x00000001 11420 @ 85585: ADD 11421 @ 85586: ASSVAL 11422 @ 85587: LINE 1537 "regression-compile-tmp/pass1.imp" 11423 @ 85623: PUSH GLINK 11424 @ 85626: PUSH PT 11425 @ 85629: ACCESS 11426 @ 85630: PUSH LP 11427 @ 85633: ASSVAL 11428 @ 85634: LINE 1537 "regression-compile-tmp/pass1.imp" 11429 @ 85670: PUSH LITPOOL 11430 @ 85673: PUSH LP 11431 @ 85676: ACCESS 11432 @ 85677: PUSH N 11433 @ 85680: ASSVAL 11434 @ 85681: LINE 1537 "regression-compile-tmp/pass1.imp" 11435 @ 85717: PUSH LP 11436 @ 85720: PUSH LP 11437 @ 85723: PUSHI #0x00000001 11438 @ 85728: ADD 11439 @ 85729: ASSVAL 1538 atom1 = error+10 %if base = 0 11440 @ 85730: LINE 1538 "regression-compile-tmp/pass1.imp" 11441 @ 85766: PUSH BASE 11442 @ 85769: PUSHI #0x00000000 11443 @ 85774: JUMPIF # L_0007 11444 @ 85778: PUSH ATOM1 11445 @ 85781: PUSHI #0x00008000 11446 @ 85786: PUSHI #0x0000000a 11447 @ 85791: ADD 11448 @ 85792: ASSVAL 11449 @ 85793: LOCATE L_0007 1539 type = real; ! exponents force the type 11450 @ 85796: LINE 1539 "regression-compile-tmp/pass1.imp" 11451 @ 85832: PUSH TYPE 11452 @ 85835: PUSHI #0x00000002 11453 @ 85840: ASSVAL 1540 %finish 1541 11454 @ 85841: LINE 1540 "regression-compile-tmp/pass1.imp" 11455 @ 85877: LOCATE L_0004 1542 %if type = real %start 11456 @ 85880: LINE 1542 "regression-compile-tmp/pass1.imp" 11457 @ 85916: PUSH TYPE 11458 @ 85919: PUSHI #0x00000002 11459 @ 85924: JUMPIF # L_0004 1543 glink(strp) = pt-strp; ! store the length (difference) 11460 @ 85928: LINE 1543 "regression-compile-tmp/pass1.imp" 11461 @ 85964: PUSH GLINK 11462 @ 85967: PUSH STRP 11463 @ 85970: ACCESS 11464 @ 85971: PUSH PT 11465 @ 85974: PUSH STRP 11466 @ 85977: SUB 11467 @ 85978: ASSVAL 1544 subatom = (strp)!16_2000; strp = pt+1 11468 @ 85979: LINE 1544 "regression-compile-tmp/pass1.imp" 11469 @ 86015: PUSH SUBATOM 11470 @ 86018: PUSH STRP 11471 @ 86021: PUSHI #0x00002000 11472 @ 86026: OR 11473 @ 86027: ASSVAL 11474 @ 86028: LINE 1544 "regression-compile-tmp/pass1.imp" 11475 @ 86064: PUSH STRP 11476 @ 86067: PUSH PT 11477 @ 86070: PUSHI #0x00000001 11478 @ 86075: ADD 11479 @ 86076: ASSVAL 1545 %finish %else %start 11480 @ 86077: LINE 1545 "regression-compile-tmp/pass1.imp" 11481 @ 86113: GOTO L_0003 11482 @ 86116: LOCATE L_0004 1546 litpool(lp) = n 11483 @ 86119: LINE 1546 "regression-compile-tmp/pass1.imp" 11484 @ 86155: PUSH LITPOOL 11485 @ 86158: PUSH LP 11486 @ 86161: ACCESS 11487 @ 86162: PUSH N 11488 @ 86165: ASSVAL 1547 lp = lp+1 11489 @ 86166: LINE 1547 "regression-compile-tmp/pass1.imp" 11490 @ 86202: PUSH LP 11491 @ 86205: PUSH LP 11492 @ 86208: PUSHI #0x00000001 11493 @ 86213: ADD 11494 @ 86214: ASSVAL 1548 %finish 11495 @ 86215: LINE 1548 "regression-compile-tmp/pass1.imp" 11496 @ 86251: LOCATE L_0003 1549 %return 1550 11497 @ 86254: LINE 1549 "regression-compile-tmp/pass1.imp" 11498 @ 86290: RETURN 1551 name: atom1 = 0 %and %return %if 27 <= target %and target <= 41 11499 @ 86291: LINE 1551 "regression-compile-tmp/pass1.imp" 11500 @ 86327: LABEL L_0129 11501 @ 86330: LINE 1551 "regression-compile-tmp/pass1.imp" 11502 @ 86366: PUSHI #0x0000001b 11503 @ 86371: PUSH TARGET 11504 @ 86374: JUMPIF > L_0004 11505 @ 86378: PUSH TARGET 11506 @ 86381: PUSHI #0x00000029 11507 @ 86386: JUMPIF > L_0004 11508 @ 86390: PUSH ATOM1 11509 @ 86393: PUSHI #0x00000000 11510 @ 86398: ASSVAL 11511 @ 86399: RETURN 11512 @ 86400: LOCATE L_0004 1552 hash value = 0 1553 1554 ! ABD changed to remove dependency on direct addressing 11513 @ 86403: LINE 1552 "regression-compile-tmp/pass1.imp" 11514 @ 86439: PUSH HASHVALUE 11515 @ 86442: PUSHI #0x00000000 11516 @ 86447: ASSVAL 1555 dp = dmax+1 11517 @ 86448: LINE 1555 "regression-compile-tmp/pass1.imp" 11518 @ 86484: PUSH DP 11519 @ 86487: PUSH DMAX 11520 @ 86490: PUSHI #0x00000001 11521 @ 86495: ADD 11522 @ 86496: ASSVAL 1556 dbase = dp 11523 @ 86497: LINE 1556 "regression-compile-tmp/pass1.imp" 11524 @ 86533: PUSH DBASE 11525 @ 86536: PUSH DP 11526 @ 86539: ASSVAL 1557 n = 0 11527 @ 86540: LINE 1557 "regression-compile-tmp/pass1.imp" 11528 @ 86576: PUSH N 11529 @ 86579: PUSHI #0x00000000 11530 @ 86584: ASSVAL 1558 dict(dp) = 0 11531 @ 86585: LINE 1558 "regression-compile-tmp/pass1.imp" 11532 @ 86621: PUSH DICT 11533 @ 86624: PUSH DP 11534 @ 86627: ACCESS 11535 @ 86628: PUSHI #0x00000000 11536 @ 86633: ASSVAL 1559 %cycle 11537 @ 86634: LINE 1559 "regression-compile-tmp/pass1.imp" 11538 @ 86670: LOCATE L_0003 1560 hash value = hash value+(hash value+sym); ! is this good enough? 11539 @ 86673: LINE 1560 "regression-compile-tmp/pass1.imp" 11540 @ 86709: PUSH HASHVALUE 11541 @ 86712: PUSH HASHVALUE 11542 @ 86715: PUSH HASHVALUE 11543 @ 86718: PUSH SYM 11544 @ 86721: ADD 11545 @ 86722: ADD 11546 @ 86723: ASSVAL 1561 dict(dp) = dict(dp) ! (sym << 8); 11547 @ 86724: LINE 1561 "regression-compile-tmp/pass1.imp" 11548 @ 86760: PUSH DICT 11549 @ 86763: PUSH DP 11550 @ 86766: ACCESS 11551 @ 86767: PUSH DICT 11552 @ 86770: PUSH DP 11553 @ 86773: ACCESS 11554 @ 86774: PUSH SYM 11555 @ 86777: PUSHI #0x00000008 11556 @ 86782: LSH 11557 @ 86783: OR 11558 @ 86784: ASSVAL 1562 n = n+1 11559 @ 86785: LINE 1562 "regression-compile-tmp/pass1.imp" 11560 @ 86821: PUSH N 11561 @ 86824: PUSH N 11562 @ 86827: PUSHI #0x00000001 11563 @ 86832: ADD 11564 @ 86833: ASSVAL 1563 dp = dp+1 11565 @ 86834: LINE 1563 "regression-compile-tmp/pass1.imp" 11566 @ 86870: PUSH DP 11567 @ 86873: PUSH DP 11568 @ 86876: PUSHI #0x00000001 11569 @ 86881: ADD 11570 @ 86882: ASSVAL 1564 read sym 11571 @ 86883: LINE 1564 "regression-compile-tmp/pass1.imp" 11572 @ 86919: PUSH READSYM 11573 @ 86922: CALL 1565 %exit %if symtype >= 0 11574 @ 86923: LINE 1565 "regression-compile-tmp/pass1.imp" 11575 @ 86959: PUSH SYMTYPE 11576 @ 86962: PUSHI #0x00000000 11577 @ 86967: JUMPIF < L_0007 11578 @ 86971: GOTO L_0004 11579 @ 86974: LOCATE L_0007 1566 dict(dp) = sym; 11580 @ 86977: LINE 1566 "regression-compile-tmp/pass1.imp" 11581 @ 87013: PUSH DICT 11582 @ 87016: PUSH DP 11583 @ 87019: ACCESS 11584 @ 87020: PUSH SYM 11585 @ 87023: ASSVAL 1567 n = n+1 11586 @ 87024: LINE 1567 "regression-compile-tmp/pass1.imp" 11587 @ 87060: PUSH N 11588 @ 87063: PUSH N 11589 @ 87066: PUSHI #0x00000001 11590 @ 87071: ADD 11591 @ 87072: ASSVAL 1568 read sym 11592 @ 87073: LINE 1568 "regression-compile-tmp/pass1.imp" 11593 @ 87109: PUSH READSYM 11594 @ 87112: CALL 1569 %exit %if symtype >= 0 11595 @ 87113: LINE 1569 "regression-compile-tmp/pass1.imp" 11596 @ 87149: PUSH SYMTYPE 11597 @ 87152: PUSHI #0x00000000 11598 @ 87157: JUMPIF < L_0007 11599 @ 87161: GOTO L_0004 11600 @ 87164: LOCATE L_0007 1570 %repeat 11601 @ 87167: LINE 1570 "regression-compile-tmp/pass1.imp" 11602 @ 87203: REPEAT L_0003 11603 @ 87206: LOCATE L_0004 1571 %if sym = cquote %start 11604 @ 87209: LINE 1571 "regression-compile-tmp/pass1.imp" 11605 @ 87245: PUSH SYM 11606 @ 87248: PUSHI #0x00000027 11607 @ 87253: JUMPIF # L_0004 1572 pend quote = 100 11608 @ 87257: LINE 1572 "regression-compile-tmp/pass1.imp" 11609 @ 87293: PUSH PENDQUOTE 11610 @ 87296: PUSHI #0x00000064 11611 @ 87301: ASSVAL 1573 ->symbols %if hash value = 'M' 11612 @ 87302: LINE 1573 "regression-compile-tmp/pass1.imp" 11613 @ 87338: PUSH HASHVALUE 11614 @ 87341: PUSHI #0x0000004d 11615 @ 87346: JUMPIF # L_0007 11616 @ 87350: JUMP L_012d 11617 @ 87353: LOCATE L_0007 1574 read sym 11618 @ 87356: LINE 1574 "regression-compile-tmp/pass1.imp" 11619 @ 87392: PUSH READSYM 11620 @ 87395: CALL 1575 %if hash value = 'X' %then base = 16 %and ->bxk 11621 @ 87396: LINE 1575 "regression-compile-tmp/pass1.imp" 11622 @ 87432: PUSH HASHVALUE 11623 @ 87435: PUSHI #0x00000058 11624 @ 87440: JUMPIF # L_0007 11625 @ 87444: PUSH BASE 11626 @ 87447: PUSHI #0x00000010 11627 @ 87452: ASSVAL 11628 @ 87453: JUMP L_0132 11629 @ 87456: LOCATE L_0007 1576 %if hash value = 'K' %or hash value = 'O' %then base = 8 %and ->bxk 11630 @ 87459: LINE 1576 "regression-compile-tmp/pass1.imp" 11631 @ 87495: PUSH HASHVALUE 11632 @ 87498: PUSHI #0x0000004b 11633 @ 87503: JUMPIF = L_0008 11634 @ 87507: PUSH HASHVALUE 11635 @ 87510: PUSHI #0x0000004f 11636 @ 87515: JUMPIF # L_0007 11637 @ 87519: LOCATE L_0008 11638 @ 87522: PUSH BASE 11639 @ 87525: PUSHI #0x00000008 11640 @ 87530: ASSVAL 11641 @ 87531: JUMP L_0132 11642 @ 87534: LOCATE L_0007 1577 %if hash value = 'B' %then base = 2 %and ->bxk 11643 @ 87537: LINE 1577 "regression-compile-tmp/pass1.imp" 11644 @ 87573: PUSH HASHVALUE 11645 @ 87576: PUSHI #0x00000042 11646 @ 87581: JUMPIF # L_0007 11647 @ 87585: PUSH BASE 11648 @ 87588: PUSHI #0x00000002 11649 @ 87593: ASSVAL 11650 @ 87594: JUMP L_0132 11651 @ 87597: LOCATE L_0007 1578 ->err 11652 @ 87600: LINE 1578 "regression-compile-tmp/pass1.imp" 11653 @ 87636: JUMP L_012e 1579 %finish 11654 @ 87639: LINE 1579 "regression-compile-tmp/pass1.imp" 11655 @ 87675: LOCATE L_0004 1580 dict(dbase) = dict(dbase)!n 11656 @ 87678: LINE 1580 "regression-compile-tmp/pass1.imp" 11657 @ 87714: PUSH DICT 11658 @ 87717: PUSH DBASE 11659 @ 87720: ACCESS 11660 @ 87721: PUSH DICT 11661 @ 87724: PUSH DBASE 11662 @ 87727: ACCESS 11663 @ 87728: PUSH N 11664 @ 87731: OR 11665 @ 87732: ASSVAL 1581 %if n&1 = 0 %then dp = dp+1 11666 @ 87733: LINE 1581 "regression-compile-tmp/pass1.imp" 11667 @ 87769: PUSH N 11668 @ 87772: PUSHI #0x00000001 11669 @ 87777: AND 11670 @ 87778: PUSHI #0x00000000 11671 @ 87783: JUMPIF # L_0004 11672 @ 87787: PUSH DP 11673 @ 87790: PUSH DP 11674 @ 87793: PUSHI #0x00000001 11675 @ 87798: ADD 11676 @ 87799: ASSVAL 11677 @ 87800: LOCATE L_0004 1582 abandon(8) %if dp >= dmin 1583 11678 @ 87803: LINE 1582 "regression-compile-tmp/pass1.imp" 11679 @ 87839: PUSH DP 11680 @ 87842: PUSH DMIN 11681 @ 87845: JUMPIF < L_0004 11682 @ 87849: PUSH ABANDON 11683 @ 87852: PUSHI #0x00000008 11684 @ 87857: ASSPAR 11685 @ 87858: CALL 11686 @ 87859: LOCATE L_0004 1584 atom2 = 90; ! ident 11687 @ 87862: LINE 1584 "regression-compile-tmp/pass1.imp" 11688 @ 87898: PUSH ATOM2 11689 @ 87901: PUSHI #0x0000005a 11690 @ 87906: ASSVAL 1585 %if last1 = 0 %and sym = ':' %start; ! label 11691 @ 87907: LINE 1585 "regression-compile-tmp/pass1.imp" 11692 @ 87943: PUSH LAST1 11693 @ 87946: PUSHI #0x00000000 11694 @ 87951: JUMPIF # L_0004 11695 @ 87955: PUSH SYM 11696 @ 87958: PUSHI #0x0000003a 11697 @ 87963: JUMPIF # L_0004 1586 limit = local; lookup(lab); %return 11698 @ 87967: LINE 1586 "regression-compile-tmp/pass1.imp" 11699 @ 88003: PUSH LIMIT 11700 @ 88006: PUSH LOCAL 11701 @ 88009: ASSVAL 11702 @ 88010: LINE 1586 "regression-compile-tmp/pass1.imp" 11703 @ 88046: PUSH LOOKUP 11704 @ 88049: PUSHI #0x00000003 11705 @ 88054: ASSPAR 11706 @ 88055: CALL 11707 @ 88056: LINE 1586 "regression-compile-tmp/pass1.imp" 11708 @ 88092: RETURN 1587 %finish 11709 @ 88093: LINE 1587 "regression-compile-tmp/pass1.imp" 11710 @ 88129: LOCATE L_0004 1588 %if last1 = jump %start; ! ->label 11711 @ 88132: LINE 1588 "regression-compile-tmp/pass1.imp" 11712 @ 88168: PUSH LAST1 11713 @ 88171: PUSHI #0x00000036 11714 @ 88176: JUMPIF # L_0004 1589 limit = local; lookup(lab+spec+used bit); %return 11715 @ 88180: LINE 1589 "regression-compile-tmp/pass1.imp" 11716 @ 88216: PUSH LIMIT 11717 @ 88219: PUSH LOCAL 11718 @ 88222: ASSVAL 11719 @ 88223: LINE 1589 "regression-compile-tmp/pass1.imp" 11720 @ 88259: PUSH LOOKUP 11721 @ 88262: PUSHI #0x00000003 11722 @ 88267: PUSHI #0x00000080 11723 @ 88272: ADD 11724 @ 88273: PUSHI #0x00008000 11725 @ 88278: ADD 11726 @ 88279: ASSPAR 11727 @ 88280: CALL 11728 @ 88281: LINE 1589 "regression-compile-tmp/pass1.imp" 11729 @ 88317: RETURN 1590 %finish 11730 @ 88318: LINE 1590 "regression-compile-tmp/pass1.imp" 11731 @ 88354: LOCATE L_0004 1591 %if decl # 0 %and target = 90 %start; ! identifier 11732 @ 88357: LINE 1591 "regression-compile-tmp/pass1.imp" 11733 @ 88393: PUSH DECL 11734 @ 88396: PUSHI #0x00000000 11735 @ 88401: JUMPIF = L_0004 11736 @ 88405: PUSH TARGET 11737 @ 88408: PUSHI #0x0000005a 11738 @ 88413: JUMPIF # L_0004 1592 search base = fm base 11739 @ 88417: LINE 1592 "regression-compile-tmp/pass1.imp" 11740 @ 88453: PUSH SEARCHBASE 11741 @ 88456: PUSH FMBASE 11742 @ 88459: ASSVAL 1593 limit = local; lookup(decl) 11743 @ 88460: LINE 1593 "regression-compile-tmp/pass1.imp" 11744 @ 88496: PUSH LIMIT 11745 @ 88499: PUSH LOCAL 11746 @ 88502: ASSVAL 11747 @ 88503: LINE 1593 "regression-compile-tmp/pass1.imp" 11748 @ 88539: PUSH LOOKUP 11749 @ 88542: PUSH DECL 11750 @ 88545: ASSPAR 11751 @ 88546: CALL 1594 search base = 0 11752 @ 88547: LINE 1594 "regression-compile-tmp/pass1.imp" 11753 @ 88583: PUSH SEARCHBASE 11754 @ 88586: PUSHI #0x00000000 11755 @ 88591: ASSVAL 1595 %finish %else %start 11756 @ 88592: LINE 1595 "regression-compile-tmp/pass1.imp" 11757 @ 88628: GOTO L_0003 11758 @ 88631: LOCATE L_0004 1596 limit = 0; lookup(0) 11759 @ 88634: LINE 1596 "regression-compile-tmp/pass1.imp" 11760 @ 88670: PUSH LIMIT 11761 @ 88673: PUSHI #0x00000000 11762 @ 88678: ASSVAL 11763 @ 88679: LINE 1596 "regression-compile-tmp/pass1.imp" 11764 @ 88715: PUSH LOOKUP 11765 @ 88718: PUSHI #0x00000000 11766 @ 88723: ASSPAR 11767 @ 88724: CALL 1597 %finish 11768 @ 88725: LINE 1597 "regression-compile-tmp/pass1.imp" 11769 @ 88761: LOCATE L_0003 1598 %end 1599 11770 @ 88764: LINE 1598 "regression-compile-tmp/pass1.imp" 11771 @ 88800: END _lev0id0_COMPILEBLOCK_ANALYSE_CODEATOM {lev=4 --> 3} 1600 %integerfn parsed machine code 1601 ! *opcode_?????????? 11772 @ 88801: LINE 1600 "regression-compile-tmp/pass1.imp" 11773 @ 88837: DEF PARSEDMACHINECODE (_lev0id0_COMPILEBLOCK_ANALYSE_PARSEDMACHINECODE) p1=V_011c a/tf=18 b/format=1 c/ostate=10 type=1 (integer) form=8 (function) special=0 () linkage=0 (auto) spec=0 indirect=1 unass=0 11774 @ 88866: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 11775 @ 88867: FINISH ) {lev=4} 1602 atom1 = error %and %result=0 %unless symtype = -2; ! starts with letter 11776 @ 88868: LINE 1602 "regression-compile-tmp/pass1.imp" 11777 @ 88904: PUSH SYMTYPE 11778 @ 88907: PUSHI #0x00000002 11779 @ 88912: NEGATE 11780 @ 88913: JUMPIF = L_0004 11781 @ 88917: PUSH ATOM1 11782 @ 88920: PUSHI #0x00008000 11783 @ 88925: ASSVAL 11784 @ 88926: PUSHI #0x00000000 11785 @ 88931: RESULT 11786 @ 88932: LOCATE L_0004 1603 flush buffer( 128 ); ! flush if bp >= 128 11787 @ 88935: LINE 1603 "regression-compile-tmp/pass1.imp" 11788 @ 88971: PUSH FLUSHBUFFER 11789 @ 88974: PUSHI #0x00000080 11790 @ 88979: ASSPAR 11791 @ 88980: CALL 1604 add char( 'w' ) 11792 @ 88981: LINE 1604 "regression-compile-tmp/pass1.imp" 11793 @ 89017: PUSH ADDCHAR 11794 @ 89020: PUSHI #0x00000077 11795 @ 89025: ASSPAR 11796 @ 89026: CALL 1605 %cycle 11797 @ 89027: LINE 1605 "regression-compile-tmp/pass1.imp" 11798 @ 89063: LOCATE L_0003 1606 add char( sym ); read sym 11799 @ 89066: LINE 1606 "regression-compile-tmp/pass1.imp" 11800 @ 89102: PUSH ADDCHAR 11801 @ 89105: PUSH SYM 11802 @ 89108: ASSPAR 11803 @ 89109: CALL 11804 @ 89110: LINE 1606 "regression-compile-tmp/pass1.imp" 11805 @ 89146: PUSH READSYM 11806 @ 89149: CALL 1607 %repeat %until Sym = '_' %or Symtype = 0; ! pull in letters and digits 11807 @ 89150: LINE 1607 "regression-compile-tmp/pass1.imp" 11808 @ 89186: PUSH SYM 11809 @ 89189: PUSHI #0x0000005f 11810 @ 89194: JUMPIF = L_0004 11811 @ 89198: PUSH SYMTYPE 11812 @ 89201: PUSHI #0x00000000 11813 @ 89206: JUMPIF = L_0004 11814 @ 89210: REPEAT L_0003 11815 @ 89213: LOCATE L_0004 1608 add char( '_' ) 11816 @ 89216: LINE 1608 "regression-compile-tmp/pass1.imp" 11817 @ 89252: PUSH ADDCHAR 11818 @ 89255: PUSHI #0x0000005f 11819 @ 89260: ASSPAR 11820 @ 89261: CALL 1609 %if symtype # 0 %start; ! not terminator 11821 @ 89262: LINE 1609 "regression-compile-tmp/pass1.imp" 11822 @ 89298: PUSH SYMTYPE 11823 @ 89301: PUSHI #0x00000000 11824 @ 89306: JUMPIF = L_0004 1610 read sym 11825 @ 89310: LINE 1610 "regression-compile-tmp/pass1.imp" 11826 @ 89346: PUSH READSYM 11827 @ 89349: CALL 1611 %while symtype # 0 %cycle 11828 @ 89350: LINE 1611 "regression-compile-tmp/pass1.imp" 11829 @ 89386: LOCATE L_0006 11830 @ 89389: PUSH SYMTYPE 11831 @ 89392: PUSHI #0x00000000 11832 @ 89397: JUMPIF = L_0007 1612 %if symtype < 0 %start; ! complex 11833 @ 89401: LINE 1612 "regression-compile-tmp/pass1.imp" 11834 @ 89437: PUSH SYMTYPE 11835 @ 89440: PUSHI #0x00000000 11836 @ 89445: JUMPIF >= L_000a 1613 code atom(0); %result=0 %if atom1&error # 0 11837 @ 89449: LINE 1613 "regression-compile-tmp/pass1.imp" 11838 @ 89485: PUSH CODEATOM 11839 @ 89488: PUSHI #0x00000000 11840 @ 89493: ASSPAR 11841 @ 89494: CALL 11842 @ 89495: LINE 1613 "regression-compile-tmp/pass1.imp" 11843 @ 89531: PUSH ATOM1 11844 @ 89534: PUSHI #0x00008000 11845 @ 89539: AND 11846 @ 89540: PUSHI #0x00000000 11847 @ 89545: JUMPIF = L_000d 11848 @ 89549: PUSHI #0x00000000 11849 @ 89554: RESULT 11850 @ 89555: LOCATE L_000d 1614 %if atom2 = const %and type = integer %start 11851 @ 89558: LINE 1614 "regression-compile-tmp/pass1.imp" 11852 @ 89594: PUSH ATOM2 11853 @ 89597: PUSHI #0x0000005d 11854 @ 89602: JUMPIF # L_000d 11855 @ 89606: PUSH TYPE 11856 @ 89609: PUSHI #0x00000001 11857 @ 89614: JUMPIF # L_000d 1615 %if subatom < 0 %then set const(tag(-subatom)_format) %else set const(litpool(subatom)) 11858 @ 89618: LINE 1615 "regression-compile-tmp/pass1.imp" 11859 @ 89654: PUSH SUBATOM 11860 @ 89657: PUSHI #0x00000000 11861 @ 89662: JUMPIF >= L_0010 11862 @ 89666: PUSH SETCONST 11863 @ 89669: PUSH TAG 11864 @ 89672: PUSH SUBATOM 11865 @ 89675: NEGATE 11866 @ 89676: ACCESS 11867 @ 89677: SELECT 2 11868 @ 89680: ASSPAR 11869 @ 89681: CALL 11870 @ 89682: GOTO L_000f 11871 @ 89685: LOCATE L_0010 11872 @ 89688: PUSH SETCONST 11873 @ 89691: PUSH LITPOOL 11874 @ 89694: PUSH SUBATOM 11875 @ 89697: ACCESS 11876 @ 89698: ASSPAR 11877 @ 89699: CALL 11878 @ 89700: LOCATE L_000f 1616 %finish %else %if 91 <= atom1 %and atom1 <= 109 %start 11879 @ 89703: LINE 1616 "regression-compile-tmp/pass1.imp" 11880 @ 89739: GOTO L_000c 11881 @ 89742: LOCATE L_000d 11882 @ 89745: PUSHI #0x0000005b 11883 @ 89750: PUSH ATOM1 11884 @ 89753: JUMPIF > L_000d 11885 @ 89757: PUSH ATOM1 11886 @ 89760: PUSHI #0x0000006d 11887 @ 89765: JUMPIF > L_000d 1617 %if atom1 = 104 %and Tag(Subatom)_Flags&Closed = 0 %start 11888 @ 89769: LINE 1617 "regression-compile-tmp/pass1.imp" 11889 @ 89805: PUSH ATOM1 11890 @ 89808: PUSHI #0x00000068 11891 @ 89813: JUMPIF # L_0010 11892 @ 89817: PUSH TAG 11893 @ 89820: PUSH SUBATOM 11894 @ 89823: ACCESS 11895 @ 89824: SELECT 3 11896 @ 89827: PUSHI #0x00004000 11897 @ 89832: AND 11898 @ 89833: PUSHI #0x00000000 11899 @ 89838: JUMPIF # L_0010 1618 This = Subatom; Atom1 = Error+21 11900 @ 89842: LINE 1618 "regression-compile-tmp/pass1.imp" 11901 @ 89878: PUSH THIS 11902 @ 89881: PUSH SUBATOM 11903 @ 89884: ASSVAL 11904 @ 89885: LINE 1618 "regression-compile-tmp/pass1.imp" 11905 @ 89921: PUSH ATOM1 11906 @ 89924: PUSHI #0x00008000 11907 @ 89929: PUSHI #0x00000015 11908 @ 89934: ADD 11909 @ 89935: ASSVAL 1619 %result = 0 11910 @ 89936: LINE 1619 "regression-compile-tmp/pass1.imp" 11911 @ 89972: PUSHI #0x00000000 11912 @ 89977: RESULT 1620 %finish 11913 @ 89978: LINE 1620 "regression-compile-tmp/pass1.imp" 11914 @ 90014: LOCATE L_0010 1621 op(' ', tag(subatom)_index) 11915 @ 90017: LINE 1621 "regression-compile-tmp/pass1.imp" 11916 @ 90053: PUSH OP 11917 @ 90056: PUSHI #0x00000020 11918 @ 90061: ASSPAR 11919 @ 90062: PUSH TAG 11920 @ 90065: PUSH SUBATOM 11921 @ 90068: ACCESS 11922 @ 90069: SELECT 4 11923 @ 90072: ASSPAR 11924 @ 90073: CALL 1622 %finish %else %start 11925 @ 90074: LINE 1622 "regression-compile-tmp/pass1.imp" 11926 @ 90110: GOTO L_000c 11927 @ 90113: LOCATE L_000d 1623 atom1 = error; %result=0 11928 @ 90116: LINE 1623 "regression-compile-tmp/pass1.imp" 11929 @ 90152: PUSH ATOM1 11930 @ 90155: PUSHI #0x00008000 11931 @ 90160: ASSVAL 11932 @ 90161: LINE 1623 "regression-compile-tmp/pass1.imp" 11933 @ 90197: PUSHI #0x00000000 11934 @ 90202: RESULT 1624 %finish 11935 @ 90203: LINE 1624 "regression-compile-tmp/pass1.imp" 11936 @ 90239: LOCATE L_000c 1625 %finish %else %start 11937 @ 90242: LINE 1625 "regression-compile-tmp/pass1.imp" 11938 @ 90278: GOTO L_0009 11939 @ 90281: LOCATE L_000a 1626 sym = sym!128 %if symtype = 2 {underline with %} 11940 @ 90284: LINE 1626 "regression-compile-tmp/pass1.imp" 11941 @ 90320: PUSH SYMTYPE 11942 @ 90323: PUSHI #0x00000002 11943 @ 90328: JUMPIF # L_000d 11944 @ 90332: PUSH SYM 11945 @ 90335: PUSH SYM 11946 @ 90338: PUSHI #0x00000080 11947 @ 90343: OR 11948 @ 90344: ASSVAL 11949 @ 90345: LOCATE L_000d 1627 add char( sym ); read sym 11950 @ 90348: LINE 1627 "regression-compile-tmp/pass1.imp" 11951 @ 90384: PUSH ADDCHAR 11952 @ 90387: PUSH SYM 11953 @ 90390: ASSPAR 11954 @ 90391: CALL 11955 @ 90392: LINE 1627 "regression-compile-tmp/pass1.imp" 11956 @ 90428: PUSH READSYM 11957 @ 90431: CALL 1628 %finish 11958 @ 90432: LINE 1628 "regression-compile-tmp/pass1.imp" 11959 @ 90468: LOCATE L_0009 1629 %repeat 11960 @ 90471: LINE 1629 "regression-compile-tmp/pass1.imp" 11961 @ 90507: REPEAT L_0006 11962 @ 90510: LOCATE L_0007 1630 %finish 11963 @ 90513: LINE 1630 "regression-compile-tmp/pass1.imp" 11964 @ 90549: LOCATE L_0004 1631 add char( ';' ) 11965 @ 90552: LINE 1631 "regression-compile-tmp/pass1.imp" 11966 @ 90588: PUSH ADDCHAR 11967 @ 90591: PUSHI #0x0000003b 11968 @ 90596: ASSPAR 11969 @ 90597: CALL 1632 %result=1 11970 @ 90598: LINE 1632 "regression-compile-tmp/pass1.imp" 11971 @ 90634: PUSHI #0x00000001 11972 @ 90639: RESULT 1633 %end 1634 11973 @ 90640: LINE 1633 "regression-compile-tmp/pass1.imp" 11974 @ 90676: END _lev0id0_COMPILEBLOCK_ANALYSE_PARSEDMACHINECODE {lev=4 --> 3} 1635 cont = ' ' %if gg = 0 11975 @ 90677: LINE 1635 "regression-compile-tmp/pass1.imp" 11976 @ 90713: PUSH GG 11977 @ 90716: PUSHI #0x00000000 11978 @ 90721: JUMPIF # L_0004 11979 @ 90725: PUSH CONT 11980 @ 90728: PUSHI #0x00000020 11981 @ 90733: ASSVAL 11982 @ 90734: LOCATE L_0004 1636 last1 = 0; mapgg = 0 11983 @ 90737: LINE 1636 "regression-compile-tmp/pass1.imp" 11984 @ 90773: PUSH LAST1 11985 @ 90776: PUSHI #0x00000000 11986 @ 90781: ASSVAL 11987 @ 90782: LINE 1636 "regression-compile-tmp/pass1.imp" 11988 @ 90818: PUSH MAPGG 11989 @ 90821: PUSHI #0x00000000 11990 @ 90826: ASSVAL 1637 s = 0; ss = 0; sstype = -1; fdef = 0 11991 @ 90827: LINE 1637 "regression-compile-tmp/pass1.imp" 11992 @ 90863: PUSH S 11993 @ 90866: PUSHI #0x00000000 11994 @ 90871: ASSVAL 11995 @ 90872: LINE 1637 "regression-compile-tmp/pass1.imp" 11996 @ 90908: PUSH SS 11997 @ 90911: PUSHI #0x00000000 11998 @ 90916: ASSVAL 11999 @ 90917: LINE 1637 "regression-compile-tmp/pass1.imp" 12000 @ 90953: PUSH SSTYPE 12001 @ 90956: PUSHI #0x00000001 12002 @ 90961: NEGATE 12003 @ 90962: ASSVAL 12004 @ 90963: LINE 1637 "regression-compile-tmp/pass1.imp" 12005 @ 90999: PUSH FDEF 12006 @ 91002: PUSHI #0x00000000 12007 @ 91007: ASSVAL 1638 fm base = 0 12008 @ 91008: LINE 1638 "regression-compile-tmp/pass1.imp" 12009 @ 91044: PUSH FMBASE 12010 @ 91047: PUSHI #0x00000000 12011 @ 91052: ASSVAL 1639 app = 0 1640 1641 ! deal with alignment following an error in one statement 1642 ! of several on a line 12012 @ 91053: LINE 1639 "regression-compile-tmp/pass1.imp" 12013 @ 91089: PUSH APP 12014 @ 91092: PUSHI #0x00000000 12015 @ 91097: ASSVAL 1643 margin = column; ! start of statement 12016 @ 91098: LINE 1643 "regression-compile-tmp/pass1.imp" 12017 @ 91134: PUSH MARGIN 12018 @ 91137: PUSH COLUMN 12019 @ 91140: ASSVAL 1644 pos = 0 12020 @ 91141: LINE 1644 "regression-compile-tmp/pass1.imp" 12021 @ 91177: PUSH POS 12022 @ 91180: PUSHI #0x00000000 12023 @ 91185: ASSVAL 1645 strp = gmax+1; lp = 0 12024 @ 91186: LINE 1645 "regression-compile-tmp/pass1.imp" 12025 @ 91222: PUSH STRP 12026 @ 91225: PUSH GMAX 12027 @ 91228: PUSHI #0x00000001 12028 @ 91233: ADD 12029 @ 91234: ASSVAL 12030 @ 91235: LINE 1645 "regression-compile-tmp/pass1.imp" 12031 @ 91271: PUSH LP 12032 @ 91274: PUSHI #0x00000000 12033 @ 91279: ASSVAL 1646 tbase = tstart; ! ?????????????? 12034 @ 91280: LINE 1646 "regression-compile-tmp/pass1.imp" 12035 @ 91316: PUSH TBASE 12036 @ 91319: PUSH TSTART 12037 @ 91322: ASSVAL 1647 local = tbase 1648 12038 @ 91323: LINE 1647 "regression-compile-tmp/pass1.imp" 12039 @ 91359: PUSH LOCAL 12040 @ 91362: PUSH TBASE 12041 @ 91365: ASSVAL 1649 %if gg = 0 %or ocount >= 0 %start; ! data or not continuation(z) 12042 @ 91366: LINE 1649 "regression-compile-tmp/pass1.imp" 12043 @ 91402: PUSH GG 12044 @ 91405: PUSHI #0x00000000 12045 @ 91410: JUMPIF = L_0005 12046 @ 91414: PUSH OCOUNT 12047 @ 91417: PUSHI #0x00000000 12048 @ 91422: JUMPIF < L_0004 12049 @ 91426: LOCATE L_0005 1650 again: %while sym type = 0 %cycle; ! skip redundant terminators 12050 @ 91429: LINE 1650 "regression-compile-tmp/pass1.imp" 12051 @ 91465: LABEL L_011d 12052 @ 91468: LINE 1650 "regression-compile-tmp/pass1.imp" 12053 @ 91504: LOCATE L_0006 12054 @ 91507: PUSH SYMTYPE 12055 @ 91510: PUSHI #0x00000000 12056 @ 91515: JUMPIF # L_0007 1651 c = cont 12057 @ 91519: LINE 1651 "regression-compile-tmp/pass1.imp" 12058 @ 91555: PUSH C 12059 @ 91558: PUSH CONT 12060 @ 91561: ASSVAL 1652 cont = ' '; cont = '+' %if ocount >= 0 12061 @ 91562: LINE 1652 "regression-compile-tmp/pass1.imp" 12062 @ 91598: PUSH CONT 12063 @ 91601: PUSHI #0x00000020 12064 @ 91606: ASSVAL 12065 @ 91607: LINE 1652 "regression-compile-tmp/pass1.imp" 12066 @ 91643: PUSH OCOUNT 12067 @ 91646: PUSHI #0x00000000 12068 @ 91651: JUMPIF < L_000a 12069 @ 91655: PUSH CONT 12070 @ 91658: PUSHI #0x0000002b 12071 @ 91663: ASSVAL 12072 @ 91664: LOCATE L_000a 1653 read sym 12073 @ 91667: LINE 1653 "regression-compile-tmp/pass1.imp" 12074 @ 91703: PUSH READSYM 12075 @ 91706: CALL 1654 cont = c 12076 @ 91707: LINE 1654 "regression-compile-tmp/pass1.imp" 12077 @ 91743: PUSH CONT 12078 @ 91746: PUSH C 12079 @ 91749: ASSVAL 1655 %repeat 12080 @ 91750: LINE 1655 "regression-compile-tmp/pass1.imp" 12081 @ 91786: REPEAT L_0006 12082 @ 91789: LOCATE L_0007 1656 ->skip %if sym = '!'; ! comment 12083 @ 91792: LINE 1656 "regression-compile-tmp/pass1.imp" 12084 @ 91828: PUSH SYM 12085 @ 91831: PUSHI #0x00000021 12086 @ 91836: JUMPIF # L_0007 12087 @ 91840: JUMP L_011e 12088 @ 91843: LOCATE L_0007 1657 this = -1 12089 @ 91846: LINE 1657 "regression-compile-tmp/pass1.imp" 12090 @ 91882: PUSH THIS 12091 @ 91885: PUSHI #0x00000001 12092 @ 91890: NEGATE 12093 @ 91891: ASSVAL 1658 code atom(0) 12094 @ 91892: LINE 1658 "regression-compile-tmp/pass1.imp" 12095 @ 91928: PUSH CODEATOM 12096 @ 91931: PUSHI #0x00000000 12097 @ 91936: ASSPAR 12098 @ 91937: CALL 1659 %if atom1 = comment %start 12099 @ 91938: LINE 1659 "regression-compile-tmp/pass1.imp" 12100 @ 91974: PUSH ATOM1 12101 @ 91977: PUSHI #0x00000016 12102 @ 91982: JUMPIF # L_0007 1660 skip: quote = 1 12103 @ 91986: LINE 1660 "regression-compile-tmp/pass1.imp" 12104 @ 92022: LABEL L_011e 12105 @ 92025: LINE 1660 "regression-compile-tmp/pass1.imp" 12106 @ 92061: PUSH QUOTE 12107 @ 92064: PUSHI #0x00000001 12108 @ 92069: ASSVAL 1661 c = cont 12109 @ 92070: LINE 1661 "regression-compile-tmp/pass1.imp" 12110 @ 92106: PUSH C 12111 @ 92109: PUSH CONT 12112 @ 92112: ASSVAL 1662 read sym %and cont = c %while sym # nl; ! skip to end of line 12113 @ 92113: LINE 1662 "regression-compile-tmp/pass1.imp" 12114 @ 92149: LOCATE L_0009 12115 @ 92152: PUSH SYM 12116 @ 92155: PUSHI #0x0000000a 12117 @ 92160: JUMPIF = L_000a 12118 @ 92164: PUSH READSYM 12119 @ 92167: CALL 12120 @ 92168: PUSH CONT 12121 @ 92171: PUSH C 12122 @ 92174: ASSVAL 12123 @ 92175: REPEAT L_0009 12124 @ 92178: LOCATE L_000a 1663 quote = 0; symtype = 0 12125 @ 92181: LINE 1663 "regression-compile-tmp/pass1.imp" 12126 @ 92217: PUSH QUOTE 12127 @ 92220: PUSHI #0x00000000 12128 @ 92225: ASSVAL 12129 @ 92226: LINE 1663 "regression-compile-tmp/pass1.imp" 12130 @ 92262: PUSH SYMTYPE 12131 @ 92265: PUSHI #0x00000000 12132 @ 92270: ASSVAL 1664 ->again 12133 @ 92271: LINE 1664 "regression-compile-tmp/pass1.imp" 12134 @ 92307: JUMP L_011d 1665 %finish 12135 @ 92310: LINE 1665 "regression-compile-tmp/pass1.imp" 12136 @ 92346: LOCATE L_0007 1666 %finish 12137 @ 92349: LINE 1666 "regression-compile-tmp/pass1.imp" 12138 @ 92385: LOCATE L_0004 1667 decl = 0; mark = 0 12139 @ 92388: LINE 1667 "regression-compile-tmp/pass1.imp" 12140 @ 92424: PUSH DECL 12141 @ 92427: PUSHI #0x00000000 12142 @ 92432: ASSVAL 12143 @ 92433: LINE 1667 "regression-compile-tmp/pass1.imp" 12144 @ 92469: PUSH MARK 12145 @ 92472: PUSHI #0x00000000 12146 @ 92477: ASSVAL 1668 gentype = 0; force = 0 12147 @ 92478: LINE 1668 "regression-compile-tmp/pass1.imp" 12148 @ 92514: PUSH GENTYPE 12149 @ 92517: PUSHI #0x00000000 12150 @ 92522: ASSVAL 12151 @ 92523: LINE 1668 "regression-compile-tmp/pass1.imp" 12152 @ 92559: PUSH FORCE 12153 @ 92562: PUSHI #0x00000000 12154 @ 92567: ASSVAL 1669 dim = 0; prot err = 0 12155 @ 92568: LINE 1669 "regression-compile-tmp/pass1.imp" 12156 @ 92604: PUSH DIM 12157 @ 92607: PUSHI #0x00000000 12158 @ 92612: ASSVAL 12159 @ 92613: LINE 1669 "regression-compile-tmp/pass1.imp" 12160 @ 92649: PUSH PROTERR 12161 @ 92652: PUSHI #0x00000000 12162 @ 92657: ASSVAL 1670 node = 0; nmax = 0; nmin = rec size+1 12163 @ 92658: LINE 1670 "regression-compile-tmp/pass1.imp" 12164 @ 92694: PUSH NODE 12165 @ 92697: PUSHI #0x00000000 12166 @ 92702: ASSVAL 12167 @ 92703: LINE 1670 "regression-compile-tmp/pass1.imp" 12168 @ 92739: PUSH NMAX 12169 @ 92742: PUSHI #0x00000000 12170 @ 92747: ASSVAL 12171 @ 92748: LINE 1670 "regression-compile-tmp/pass1.imp" 12172 @ 92784: PUSH NMIN 12173 @ 92787: PUSHI #0x00000208 12174 @ 92792: PUSHI #0x00000001 12175 @ 92797: ADD 12176 @ 92798: ASSVAL 1671 order = 1; gmin = max grammar+1 12177 @ 92799: LINE 1671 "regression-compile-tmp/pass1.imp" 12178 @ 92835: PUSH ORDER 12179 @ 92838: PUSHI #0x00000001 12180 @ 92843: ASSVAL 12181 @ 92844: LINE 1671 "regression-compile-tmp/pass1.imp" 12182 @ 92880: PUSH GMIN 12183 @ 92883: PUSHI #0x000006b8 12184 @ 92888: PUSHI #0x00000001 12185 @ 92893: ADD 12186 @ 92894: ASSVAL 1672 sstype = 0 %and ->more %if gg # 0; ! continuation 12187 @ 92895: LINE 1672 "regression-compile-tmp/pass1.imp" 12188 @ 92931: PUSH GG 12189 @ 92934: PUSHI #0x00000000 12190 @ 92939: JUMPIF = L_0004 12191 @ 92943: PUSH SSTYPE 12192 @ 92946: PUSHI #0x00000000 12193 @ 92951: ASSVAL 12194 @ 92952: JUMP L_011f 12195 @ 92955: LOCATE L_0004 1673 ptype = 0; spec given = 0 1674 12196 @ 92958: LINE 1673 "regression-compile-tmp/pass1.imp" 12197 @ 92994: PUSH PTYPE 12198 @ 92997: PUSHI #0x00000000 12199 @ 93002: ASSVAL 12200 @ 93003: LINE 1673 "regression-compile-tmp/pass1.imp" 12201 @ 93039: PUSH SPECGIVEN 12202 @ 93042: PUSHI #0x00000000 12203 @ 93047: ASSVAL 1675 stats = stats+1; op('O', lines) %if perm = 0 1676 12204 @ 93048: LINE 1675 "regression-compile-tmp/pass1.imp" 12205 @ 93084: PUSH STATS 12206 @ 93087: PUSH STATS 12207 @ 93090: PUSHI #0x00000001 12208 @ 93095: ADD 12209 @ 93096: ASSVAL 12210 @ 93097: LINE 1675 "regression-compile-tmp/pass1.imp" 12211 @ 93133: PUSH PERM 12212 @ 93136: PUSHI #0x00000000 12213 @ 93141: JUMPIF # L_0004 12214 @ 93145: PUSH OP 12215 @ 93148: PUSHI #0x0000004f 12216 @ 93153: ASSPAR 12217 @ 93154: PUSH LINES 12218 @ 93157: ASSPAR 12219 @ 93158: CALL 12220 @ 93159: LOCATE L_0004 1677 ->fail1 %if atom1&error # 0; ! first atom faulty 1678 12221 @ 93162: LINE 1677 "regression-compile-tmp/pass1.imp" 12222 @ 93198: PUSH ATOM1 12223 @ 93201: PUSHI #0x00008000 12224 @ 93206: AND 12225 @ 93207: PUSHI #0x00000000 12226 @ 93212: JUMPIF = L_0004 12227 @ 93216: JUMP L_0120 12228 @ 93219: LOCATE L_0004 1679 %if escape class # 0 %start; ! enter the hard way after 12229 @ 93222: LINE 1679 "regression-compile-tmp/pass1.imp" 12230 @ 93258: PUSH ESCAPECLASS 12231 @ 93261: PUSHI #0x00000000 12232 @ 93266: JUMPIF = L_0004 1680 g = imp phrase; sstype = -1; ->a3 12233 @ 93270: LINE 1680 "regression-compile-tmp/pass1.imp" 12234 @ 93306: PUSH G 12235 @ 93309: PUSHI #0x00000019 12236 @ 93314: ASSVAL 12237 @ 93315: LINE 1680 "regression-compile-tmp/pass1.imp" 12238 @ 93351: PUSH SSTYPE 12239 @ 93354: PUSHI #0x00000001 12240 @ 93359: NEGATE 12241 @ 93360: ASSVAL 12242 @ 93361: LINE 1680 "regression-compile-tmp/pass1.imp" 12243 @ 93397: JUMP L_0121 1681 %finish 1682 12244 @ 93400: LINE 1681 "regression-compile-tmp/pass1.imp" 12245 @ 93436: LOCATE L_0004 1683 g = initial(atom1); ! pick up entry point 12246 @ 93439: LINE 1683 "regression-compile-tmp/pass1.imp" 12247 @ 93475: PUSH G 12248 @ 93478: PUSH INITIAL 12249 @ 93481: PUSH ATOM1 12250 @ 93484: ACCESS 12251 @ 93485: ASSVAL 1684 %if g = 0 %start; ! invalid first atom 12252 @ 93486: LINE 1684 "regression-compile-tmp/pass1.imp" 12253 @ 93522: PUSH G 12254 @ 93525: PUSHI #0x00000000 12255 @ 93530: JUMPIF # L_0004 1685 g = initial(0); sstype = 0; ->a3; ! declarator? 12256 @ 93534: LINE 1685 "regression-compile-tmp/pass1.imp" 12257 @ 93570: PUSH G 12258 @ 93573: PUSH INITIAL 12259 @ 93576: PUSHI #0x00000000 12260 @ 93581: ACCESS 12261 @ 93582: ASSVAL 12262 @ 93583: LINE 1685 "regression-compile-tmp/pass1.imp" 12263 @ 93619: PUSH SSTYPE 12264 @ 93622: PUSHI #0x00000000 12265 @ 93627: ASSVAL 12266 @ 93628: LINE 1685 "regression-compile-tmp/pass1.imp" 12267 @ 93664: JUMP L_0121 1686 %finish 12268 @ 93667: LINE 1686 "regression-compile-tmp/pass1.imp" 12269 @ 93703: LOCATE L_0004 1687 %if g < 0 %start; ! phrase imp 12270 @ 93706: LINE 1687 "regression-compile-tmp/pass1.imp" 12271 @ 93742: PUSH G 12272 @ 93745: PUSHI #0x00000000 12273 @ 93750: JUMPIF >= L_0004 1688 g = g&255 12274 @ 93754: LINE 1688 "regression-compile-tmp/pass1.imp" 12275 @ 93790: PUSH G 12276 @ 93793: PUSH G 12277 @ 93796: PUSHI #0x000000ff 12278 @ 93801: AND 12279 @ 93802: ASSVAL 1689 nmax = 1 12280 @ 93803: LINE 1689 "regression-compile-tmp/pass1.imp" 12281 @ 93839: PUSH NMAX 12282 @ 93842: PUSHI #0x00000001 12283 @ 93847: ASSVAL 1690 ar(1)_class = 0; ar(1)_link = 0; ar(1)_sub = imp phrase 12284 @ 93848: LINE 1690 "regression-compile-tmp/pass1.imp" 12285 @ 93884: PUSH AR 12286 @ 93887: PUSHI #0x00000001 12287 @ 93892: ACCESS 12288 @ 93893: SELECT 1 12289 @ 93896: PUSHI #0x00000000 12290 @ 93901: ASSVAL 12291 @ 93902: LINE 1690 "regression-compile-tmp/pass1.imp" 12292 @ 93938: PUSH AR 12293 @ 93941: PUSHI #0x00000001 12294 @ 93946: ACCESS 12295 @ 93947: SELECT 3 12296 @ 93950: PUSHI #0x00000000 12297 @ 93955: ASSVAL 12298 @ 93956: LINE 1690 "regression-compile-tmp/pass1.imp" 12299 @ 93992: PUSH AR 12300 @ 93995: PUSHI #0x00000001 12301 @ 94000: ACCESS 12302 @ 94001: SELECT 2 12303 @ 94004: PUSHI #0x00000019 12304 @ 94009: ASSVAL 1691 %finish 1692 12305 @ 94010: LINE 1691 "regression-compile-tmp/pass1.imp" 12306 @ 94046: LOCATE L_0004 1693 gg = gram(g); class = gg&255; sstype = gg>>12&3-1 12307 @ 94049: LINE 1693 "regression-compile-tmp/pass1.imp" 12308 @ 94085: PUSH GG 12309 @ 94088: PUSH GRAM 12310 @ 94091: PUSH G 12311 @ 94094: ACCESS 12312 @ 94095: ASSVAL 12313 @ 94096: LINE 1693 "regression-compile-tmp/pass1.imp" 12314 @ 94132: PUSH CLASS 12315 @ 94135: PUSH GG 12316 @ 94138: PUSHI #0x000000ff 12317 @ 94143: AND 12318 @ 94144: ASSVAL 12319 @ 94145: LINE 1693 "regression-compile-tmp/pass1.imp" 12320 @ 94181: PUSH SSTYPE 12321 @ 94184: PUSH GG 12322 @ 94187: PUSHI #0x0000000c 12323 @ 94192: RSH 12324 @ 94193: PUSHI #0x00000003 12325 @ 94198: AND 12326 @ 94199: PUSHI #0x00000001 12327 @ 94204: SUB 12328 @ 94205: ASSVAL 1694 ->a1 1695 12329 @ 94206: LINE 1694 "regression-compile-tmp/pass1.imp" 12330 @ 94242: JUMP L_0122 1696 act(194): ptype = type; papp = app; pformat = format; ->more 12331 @ 94245: LINE 1696 "regression-compile-tmp/pass1.imp" 12332 @ 94281: PUSHI #0x000000c2 12333 @ 94286: SLABEL 277 12334 @ 94289: LINE 1696 "regression-compile-tmp/pass1.imp" 12335 @ 94325: PUSH PTYPE 12336 @ 94328: PUSH TYPE 12337 @ 94331: ASSVAL 12338 @ 94332: LINE 1696 "regression-compile-tmp/pass1.imp" 12339 @ 94368: PUSH PAPP 12340 @ 94371: PUSH APP 12341 @ 94374: ASSVAL 12342 @ 94375: LINE 1696 "regression-compile-tmp/pass1.imp" 12343 @ 94411: PUSH PFORMAT 12344 @ 94414: PUSH FORMAT 12345 @ 94417: ASSVAL 12346 @ 94418: LINE 1696 "regression-compile-tmp/pass1.imp" 12347 @ 94454: JUMP L_011f 1697 act(196): k =g+1; ->a610 12348 @ 94457: LINE 1697 "regression-compile-tmp/pass1.imp" 12349 @ 94493: PUSHI #0x000000c4 12350 @ 94498: SLABEL 277 12351 @ 94501: LINE 1697 "regression-compile-tmp/pass1.imp" 12352 @ 94537: PUSH K 12353 @ 94540: PUSH G 12354 @ 94543: PUSHI #0x00000001 12355 @ 94548: ADD 12356 @ 94549: ASSVAL 12357 @ 94550: LINE 1697 "regression-compile-tmp/pass1.imp" 12358 @ 94586: JUMP L_0123 1698 act(188): k = ar(nmax)_sub+1 12359 @ 94589: LINE 1698 "regression-compile-tmp/pass1.imp" 12360 @ 94625: PUSHI #0x000000bc 12361 @ 94630: SLABEL 277 12362 @ 94633: LINE 1698 "regression-compile-tmp/pass1.imp" 12363 @ 94669: PUSH K 12364 @ 94672: PUSH AR 12365 @ 94675: PUSH NMAX 12366 @ 94678: ACCESS 12367 @ 94679: SELECT 2 12368 @ 94682: PUSHI #0x00000001 12369 @ 94687: ADD 12370 @ 94688: ASSVAL 1699 a610: papp = glink(k) 12371 @ 94689: LINE 1699 "regression-compile-tmp/pass1.imp" 12372 @ 94725: LABEL L_0123 12373 @ 94728: LINE 1699 "regression-compile-tmp/pass1.imp" 12374 @ 94764: PUSH PAPP 12375 @ 94767: PUSH GLINK 12376 @ 94770: PUSH K 12377 @ 94773: ACCESS 12378 @ 94774: ASSVAL 1700 k = gram(k) 12379 @ 94775: LINE 1700 "regression-compile-tmp/pass1.imp" 12380 @ 94811: PUSH K 12381 @ 94814: PUSH GRAM 12382 @ 94817: PUSH K 12383 @ 94820: ACCESS 12384 @ 94821: ASSVAL 1701 ->more %if k = 0; ! %name 12385 @ 94822: LINE 1701 "regression-compile-tmp/pass1.imp" 12386 @ 94858: PUSH K 12387 @ 94861: PUSHI #0x00000000 12388 @ 94866: JUMPIF # L_0004 12389 @ 94870: JUMP L_011f 12390 @ 94873: LOCATE L_0004 1702 ptype = k&7; pformat = k>>3 12391 @ 94876: LINE 1702 "regression-compile-tmp/pass1.imp" 12392 @ 94912: PUSH PTYPE 12393 @ 94915: PUSH K 12394 @ 94918: PUSHI #0x00000007 12395 @ 94923: AND 12396 @ 94924: ASSVAL 12397 @ 94925: LINE 1702 "regression-compile-tmp/pass1.imp" 12398 @ 94961: PUSH PFORMAT 12399 @ 94964: PUSH K 12400 @ 94967: PUSHI #0x00000003 12401 @ 94972: RSH 12402 @ 94973: ASSVAL 1703 act(183): k = type; gentype = k %if gentype = 0 %or k = real 12403 @ 94974: LINE 1703 "regression-compile-tmp/pass1.imp" 12404 @ 95010: PUSHI #0x000000b7 12405 @ 95015: SLABEL 277 12406 @ 95018: LINE 1703 "regression-compile-tmp/pass1.imp" 12407 @ 95054: PUSH K 12408 @ 95057: PUSH TYPE 12409 @ 95060: ASSVAL 12410 @ 95061: LINE 1703 "regression-compile-tmp/pass1.imp" 12411 @ 95097: PUSH GENTYPE 12412 @ 95100: PUSHI #0x00000000 12413 @ 95105: JUMPIF = L_0005 12414 @ 95109: PUSH K 12415 @ 95112: PUSHI #0x00000002 12416 @ 95117: JUMPIF # L_0004 12417 @ 95121: LOCATE L_0005 12418 @ 95124: PUSH GENTYPE 12419 @ 95127: PUSH K 12420 @ 95130: ASSVAL 12421 @ 95131: LOCATE L_0004 1704 %if pformat < 0 %start; ! general type 12422 @ 95134: LINE 1704 "regression-compile-tmp/pass1.imp" 12423 @ 95170: PUSH PFORMAT 12424 @ 95173: PUSHI #0x00000000 12425 @ 95178: JUMPIF >= L_0004 1705 app = papp; format = pformat 12426 @ 95182: LINE 1705 "regression-compile-tmp/pass1.imp" 12427 @ 95218: PUSH APP 12428 @ 95221: PUSH PAPP 12429 @ 95224: ASSVAL 12430 @ 95225: LINE 1705 "regression-compile-tmp/pass1.imp" 12431 @ 95261: PUSH FORMAT 12432 @ 95264: PUSH PFORMAT 12433 @ 95267: ASSVAL 1706 k = real %if ptype = real %and type = integer 12434 @ 95268: LINE 1706 "regression-compile-tmp/pass1.imp" 12435 @ 95304: PUSH PTYPE 12436 @ 95307: PUSHI #0x00000002 12437 @ 95312: JUMPIF # L_0007 12438 @ 95316: PUSH TYPE 12439 @ 95319: PUSHI #0x00000001 12440 @ 95324: JUMPIF # L_0007 12441 @ 95328: PUSH K 12442 @ 95331: PUSHI #0x00000002 12443 @ 95336: ASSVAL 12444 @ 95337: LOCATE L_0007 1707 k = force %and force = 0 %if force # 0 12445 @ 95340: LINE 1707 "regression-compile-tmp/pass1.imp" 12446 @ 95376: PUSH FORCE 12447 @ 95379: PUSHI #0x00000000 12448 @ 95384: JUMPIF = L_0007 12449 @ 95388: PUSH K 12450 @ 95391: PUSH FORCE 12451 @ 95394: ASSVAL 12452 @ 95395: PUSH FORCE 12453 @ 95398: PUSHI #0x00000000 12454 @ 95403: ASSVAL 12455 @ 95404: LOCATE L_0007 1708 %finish 12456 @ 95407: LINE 1708 "regression-compile-tmp/pass1.imp" 12457 @ 95443: LOCATE L_0004 1709 ->fail2 %unless papp = app %and (ptype = k %or ptype = 0) 12458 @ 95446: LINE 1709 "regression-compile-tmp/pass1.imp" 12459 @ 95482: PUSH PAPP 12460 @ 95485: PUSH APP 12461 @ 95488: JUMPIF # L_0005 12462 @ 95492: PUSH PTYPE 12463 @ 95495: PUSH K 12464 @ 95498: JUMPIF = L_0004 12465 @ 95502: PUSH PTYPE 12466 @ 95505: PUSHI #0x00000000 12467 @ 95510: JUMPIF = L_0004 12468 @ 95514: LOCATE L_0005 12469 @ 95517: JUMP L_0124 12470 @ 95520: LOCATE L_0004 1710 ->more %if pformat=format %or pformat = 0 %or format = 0 12471 @ 95523: LINE 1710 "regression-compile-tmp/pass1.imp" 12472 @ 95559: PUSH PFORMAT 12473 @ 95562: PUSH FORMAT 12474 @ 95565: JUMPIF = L_0005 12475 @ 95569: PUSH PFORMAT 12476 @ 95572: PUSHI #0x00000000 12477 @ 95577: JUMPIF = L_0005 12478 @ 95581: PUSH FORMAT 12479 @ 95584: PUSHI #0x00000000 12480 @ 95589: JUMPIF # L_0004 12481 @ 95593: LOCATE L_0005 12482 @ 95596: JUMP L_011f 12483 @ 95599: LOCATE L_0004 1711 ->fail2 12484 @ 95602: LINE 1711 "regression-compile-tmp/pass1.imp" 12485 @ 95638: JUMP L_0124 1712 act(197): arp == ar(nmin) 12486 @ 95641: LINE 1712 "regression-compile-tmp/pass1.imp" 12487 @ 95677: PUSHI #0x000000c5 12488 @ 95682: SLABEL 277 12489 @ 95685: LINE 1712 "regression-compile-tmp/pass1.imp" 12490 @ 95721: PUSH ARP 12491 @ 95724: PUSH AR 12492 @ 95727: PUSH NMIN 12493 @ 95730: ACCESS 12494 @ 95731: ASSREF 1713 k = arp_sub 12495 @ 95732: LINE 1713 "regression-compile-tmp/pass1.imp" 12496 @ 95768: PUSH K 12497 @ 95771: PUSH ARP 12498 @ 95774: SELECT 2 12499 @ 95777: ASSVAL 1714 ->fail3 %unless block form = k&15 12500 @ 95778: LINE 1714 "regression-compile-tmp/pass1.imp" 12501 @ 95814: PUSH BLOCKFORM 12502 @ 95817: PUSH K 12503 @ 95820: PUSHI #0x0000000f 12504 @ 95825: AND 12505 @ 95826: JUMPIF = L_0004 12506 @ 95830: JUMP L_0125 12507 @ 95833: LOCATE L_0004 1715 arp_sub = k>>4 1716 12508 @ 95836: LINE 1715 "regression-compile-tmp/pass1.imp" 12509 @ 95872: PUSH ARP 12510 @ 95875: SELECT 2 12511 @ 95878: PUSH K 12512 @ 95881: PUSHI #0x00000004 12513 @ 95886: RSH 12514 @ 95887: ASSVAL 1717 type = block type 12515 @ 95888: LINE 1717 "regression-compile-tmp/pass1.imp" 12516 @ 95924: PUSH TYPE 12517 @ 95927: PUSH BLOCKTYPE 12518 @ 95930: ASSVAL 1718 ptype = block type; pformat = block fm; papp = app 12519 @ 95931: LINE 1718 "regression-compile-tmp/pass1.imp" 12520 @ 95967: PUSH PTYPE 12521 @ 95970: PUSH BLOCKTYPE 12522 @ 95973: ASSVAL 12523 @ 95974: LINE 1718 "regression-compile-tmp/pass1.imp" 12524 @ 96010: PUSH PFORMAT 12525 @ 96013: PUSH BLOCKFM 12526 @ 96016: ASSVAL 12527 @ 96017: LINE 1718 "regression-compile-tmp/pass1.imp" 12528 @ 96053: PUSH PAPP 12529 @ 96056: PUSH APP 12530 @ 96059: ASSVAL 1719 pformat = -1 %if ptype # record 12531 @ 96060: LINE 1719 "regression-compile-tmp/pass1.imp" 12532 @ 96096: PUSH PTYPE 12533 @ 96099: PUSHI #0x00000004 12534 @ 96104: JUMPIF = L_0004 12535 @ 96108: PUSH PFORMAT 12536 @ 96111: PUSHI #0x00000001 12537 @ 96116: NEGATE 12538 @ 96117: ASSVAL 12539 @ 96118: LOCATE L_0004 1720 ->more 12540 @ 96121: LINE 1720 "regression-compile-tmp/pass1.imp" 12541 @ 96157: JUMP L_011f 1721 act(195): ->Fail2 %if Type # 0 %and Type # Integer %and Type # Real 12542 @ 96160: LINE 1721 "regression-compile-tmp/pass1.imp" 12543 @ 96196: PUSHI #0x000000c3 12544 @ 96201: SLABEL 277 12545 @ 96204: LINE 1721 "regression-compile-tmp/pass1.imp" 12546 @ 96240: PUSH TYPE 12547 @ 96243: PUSHI #0x00000000 12548 @ 96248: JUMPIF = L_0004 12549 @ 96252: PUSH TYPE 12550 @ 96255: PUSHI #0x00000001 12551 @ 96260: JUMPIF = L_0004 12552 @ 96264: PUSH TYPE 12553 @ 96267: PUSHI #0x00000002 12554 @ 96272: JUMPIF = L_0004 12555 @ 96276: JUMP L_0124 12556 @ 96279: LOCATE L_0004 1722 arp == ar(nmin) 12557 @ 96282: LINE 1722 "regression-compile-tmp/pass1.imp" 12558 @ 96318: PUSH ARP 12559 @ 96321: PUSH AR 12560 @ 96324: PUSH NMIN 12561 @ 96327: ACCESS 12562 @ 96328: ASSREF 1723 k = arp_sub 12563 @ 96329: LINE 1723 "regression-compile-tmp/pass1.imp" 12564 @ 96365: PUSH K 12565 @ 96368: PUSH ARP 12566 @ 96371: SELECT 2 12567 @ 96374: ASSVAL 1724 arp_sub = k>>2 12568 @ 96375: LINE 1724 "regression-compile-tmp/pass1.imp" 12569 @ 96411: PUSH ARP 12570 @ 96414: SELECT 2 12571 @ 96417: PUSH K 12572 @ 96420: PUSHI #0x00000002 12573 @ 96425: RSH 12574 @ 96426: ASSVAL 1725 k = k&3 1726 ! 1 = check integer 1727 ! 2 = check real 1728 ! 3 = check real + int 12575 @ 96427: LINE 1725 "regression-compile-tmp/pass1.imp" 12576 @ 96463: PUSH K 12577 @ 96466: PUSH K 12578 @ 96469: PUSHI #0x00000003 12579 @ 96474: AND 12580 @ 96475: ASSVAL 1729 ->more %if k = 0; ! 0 = no action 12581 @ 96476: LINE 1729 "regression-compile-tmp/pass1.imp" 12582 @ 96512: PUSH K 12583 @ 96515: PUSHI #0x00000000 12584 @ 96520: JUMPIF # L_0004 12585 @ 96524: JUMP L_011f 12586 @ 96527: LOCATE L_0004 1730 %if k = 1 %start 12587 @ 96530: LINE 1730 "regression-compile-tmp/pass1.imp" 12588 @ 96566: PUSH K 12589 @ 96569: PUSHI #0x00000001 12590 @ 96574: JUMPIF # L_0004 1731 force = integer 12591 @ 96578: LINE 1731 "regression-compile-tmp/pass1.imp" 12592 @ 96614: PUSH FORCE 12593 @ 96617: PUSHI #0x00000001 12594 @ 96622: ASSVAL 1732 ->more %if type = integer %or type = 0 12595 @ 96623: LINE 1732 "regression-compile-tmp/pass1.imp" 12596 @ 96659: PUSH TYPE 12597 @ 96662: PUSHI #0x00000001 12598 @ 96667: JUMPIF = L_0008 12599 @ 96671: PUSH TYPE 12600 @ 96674: PUSHI #0x00000000 12601 @ 96679: JUMPIF # L_0007 12602 @ 96683: LOCATE L_0008 12603 @ 96686: JUMP L_011f 12604 @ 96689: LOCATE L_0007 1733 ->fail2 12605 @ 96692: LINE 1733 "regression-compile-tmp/pass1.imp" 12606 @ 96728: JUMP L_0124 1734 %finish 12607 @ 96731: LINE 1734 "regression-compile-tmp/pass1.imp" 12608 @ 96767: LOCATE L_0004 1735 ->fail2 %unless ptype = real %or ptype = 0; ! {or added?} 12609 @ 96770: LINE 1735 "regression-compile-tmp/pass1.imp" 12610 @ 96806: PUSH PTYPE 12611 @ 96809: PUSHI #0x00000002 12612 @ 96814: JUMPIF = L_0004 12613 @ 96818: PUSH PTYPE 12614 @ 96821: PUSHI #0x00000000 12615 @ 96826: JUMPIF = L_0004 12616 @ 96830: JUMP L_0124 12617 @ 96833: LOCATE L_0004 1736 force = integer %if k = 3 12618 @ 96836: LINE 1736 "regression-compile-tmp/pass1.imp" 12619 @ 96872: PUSH K 12620 @ 96875: PUSHI #0x00000003 12621 @ 96880: JUMPIF # L_0004 12622 @ 96884: PUSH FORCE 12623 @ 96887: PUSHI #0x00000001 12624 @ 96892: ASSVAL 12625 @ 96893: LOCATE L_0004 1737 ->more 12626 @ 96896: LINE 1737 "regression-compile-tmp/pass1.imp" 12627 @ 96932: JUMP L_011f 1738 act(198): ! %OTHER 12628 @ 96935: LINE 1738 "regression-compile-tmp/pass1.imp" 12629 @ 96971: PUSHI #0x000000c6 12630 @ 96976: SLABEL 277 1739 k = gg>>8&15 12631 @ 96979: LINE 1739 "regression-compile-tmp/pass1.imp" 12632 @ 97015: PUSH K 12633 @ 97018: PUSH GG 12634 @ 97021: PUSHI #0x00000008 12635 @ 97026: RSH 12636 @ 97027: PUSHI #0x0000000f 12637 @ 97032: AND 12638 @ 97033: ASSVAL 1740 %if k = 0 %start; ! restore atom 12639 @ 97034: LINE 1740 "regression-compile-tmp/pass1.imp" 12640 @ 97070: PUSH K 12641 @ 97073: PUSHI #0x00000000 12642 @ 97078: JUMPIF # L_0004 1741 atom1 = last1 12643 @ 97082: LINE 1741 "regression-compile-tmp/pass1.imp" 12644 @ 97118: PUSH ATOM1 12645 @ 97121: PUSH LAST1 12646 @ 97124: ASSVAL 1742 ->more 12647 @ 97125: LINE 1742 "regression-compile-tmp/pass1.imp" 12648 @ 97161: JUMP L_011f 1743 %finish 12649 @ 97164: LINE 1743 "regression-compile-tmp/pass1.imp" 12650 @ 97200: LOCATE L_0004 1744 %if k = 1 %start; ! test string 12651 @ 97203: LINE 1744 "regression-compile-tmp/pass1.imp" 12652 @ 97239: PUSH K 12653 @ 97242: PUSHI #0x00000001 12654 @ 97247: JUMPIF # L_0004 1745 ->fail2 %unless type = stringv 12655 @ 97251: LINE 1745 "regression-compile-tmp/pass1.imp" 12656 @ 97287: PUSH TYPE 12657 @ 97290: PUSHI #0x00000003 12658 @ 97295: JUMPIF = L_0007 12659 @ 97299: JUMP L_0124 12660 @ 97302: LOCATE L_0007 1746 ->more 12661 @ 97305: LINE 1746 "regression-compile-tmp/pass1.imp" 12662 @ 97341: JUMP L_011f 1747 %finish 12663 @ 97344: LINE 1747 "regression-compile-tmp/pass1.imp" 12664 @ 97380: LOCATE L_0004 1748 %if k = 2 %start; ! {fault record comparisons} 12665 @ 97383: LINE 1748 "regression-compile-tmp/pass1.imp" 12666 @ 97419: PUSH K 12667 @ 97422: PUSHI #0x00000002 12668 @ 97427: JUMPIF # L_0004 1749 ->fail2 %if type = record 12669 @ 97431: LINE 1749 "regression-compile-tmp/pass1.imp" 12670 @ 97467: PUSH TYPE 12671 @ 97470: PUSHI #0x00000004 12672 @ 97475: JUMPIF # L_0007 12673 @ 97479: JUMP L_0124 12674 @ 97482: LOCATE L_0007 1750 ->more 12675 @ 97485: LINE 1750 "regression-compile-tmp/pass1.imp" 12676 @ 97521: JUMP L_011f 1751 %finish 12677 @ 97524: LINE 1751 "regression-compile-tmp/pass1.imp" 12678 @ 97560: LOCATE L_0004 1752 %if k = 3 %start; ! check OWN variable coming 12679 @ 97563: LINE 1752 "regression-compile-tmp/pass1.imp" 12680 @ 97599: PUSH K 12681 @ 97602: PUSHI #0x00000003 12682 @ 97607: JUMPIF # L_0004 1753 code atom(0) 12683 @ 97611: LINE 1753 "regression-compile-tmp/pass1.imp" 12684 @ 97647: PUSH CODEATOM 12685 @ 97650: PUSHI #0x00000000 12686 @ 97655: ASSPAR 12687 @ 97656: CALL 1754 ->A7 %if atom flags&own bit = 0 12688 @ 97657: LINE 1754 "regression-compile-tmp/pass1.imp" 12689 @ 97693: PUSH ATOMFLAGS 12690 @ 97696: PUSHI #0x00000200 12691 @ 97701: AND 12692 @ 97702: PUSHI #0x00000000 12693 @ 97707: JUMPIF # L_0007 12694 @ 97711: JUMP L_0126 12695 @ 97714: LOCATE L_0007 1755 ->more 12696 @ 97717: LINE 1755 "regression-compile-tmp/pass1.imp" 12697 @ 97753: JUMP L_011f 1756 %finish 12698 @ 97756: LINE 1756 "regression-compile-tmp/pass1.imp" 12699 @ 97792: LOCATE L_0004 1757 for warn = pos1 %if x <= local; ! %for TEST 12700 @ 97795: LINE 1757 "regression-compile-tmp/pass1.imp" 12701 @ 97831: PUSH X 12702 @ 97834: PUSH LOCAL 12703 @ 97837: JUMPIF > L_0004 12704 @ 97841: PUSH FORWARN 12705 @ 97844: PUSH POS1 12706 @ 97847: ASSVAL 12707 @ 97848: LOCATE L_0004 1758 ->more 12708 @ 97851: LINE 1758 "regression-compile-tmp/pass1.imp" 12709 @ 97887: JUMP L_011f 1759 paction(1): %if type = record %then g = phrase(242) %else pformat = -1; ->a3 12710 @ 97890: LINE 1759 "regression-compile-tmp/pass1.imp" 12711 @ 97926: PUSHI #0x00000001 12712 @ 97931: SLABEL 278 12713 @ 97934: LINE 1759 "regression-compile-tmp/pass1.imp" 12714 @ 97970: PUSH TYPE 12715 @ 97973: PUSHI #0x00000004 12716 @ 97978: JUMPIF # L_0004 12717 @ 97982: PUSH G 12718 @ 97985: PUSH PHRASE 12719 @ 97988: PUSHI #0x000000f2 12720 @ 97993: ACCESS 12721 @ 97994: ASSVAL 12722 @ 97995: GOTO L_0003 12723 @ 97998: LOCATE L_0004 12724 @ 98001: PUSH PFORMAT 12725 @ 98004: PUSHI #0x00000001 12726 @ 98009: NEGATE 12727 @ 98010: ASSVAL 12728 @ 98011: LOCATE L_0003 12729 @ 98014: LINE 1759 "regression-compile-tmp/pass1.imp" 12730 @ 98050: JUMP L_0121 1760 paction(2): ptype = real; pformat = -1; ->a3 12731 @ 98053: LINE 1760 "regression-compile-tmp/pass1.imp" 12732 @ 98089: PUSHI #0x00000002 12733 @ 98094: SLABEL 278 12734 @ 98097: LINE 1760 "regression-compile-tmp/pass1.imp" 12735 @ 98133: PUSH PTYPE 12736 @ 98136: PUSHI #0x00000002 12737 @ 98141: ASSVAL 12738 @ 98142: LINE 1760 "regression-compile-tmp/pass1.imp" 12739 @ 98178: PUSH PFORMAT 12740 @ 98181: PUSHI #0x00000001 12741 @ 98186: NEGATE 12742 @ 98187: ASSVAL 12743 @ 98188: LINE 1760 "regression-compile-tmp/pass1.imp" 12744 @ 98224: JUMP L_0121 1761 paction(3): ptype = stringv; pformat = -1; ->a3 12745 @ 98227: LINE 1761 "regression-compile-tmp/pass1.imp" 12746 @ 98263: PUSHI #0x00000003 12747 @ 98268: SLABEL 278 12748 @ 98271: LINE 1761 "regression-compile-tmp/pass1.imp" 12749 @ 98307: PUSH PTYPE 12750 @ 98310: PUSHI #0x00000003 12751 @ 98315: ASSVAL 12752 @ 98316: LINE 1761 "regression-compile-tmp/pass1.imp" 12753 @ 98352: PUSH PFORMAT 12754 @ 98355: PUSHI #0x00000001 12755 @ 98360: NEGATE 12756 @ 98361: ASSVAL 12757 @ 98362: LINE 1761 "regression-compile-tmp/pass1.imp" 12758 @ 98398: JUMP L_0121 1762 paction(4): ptype = integer; pformat = -1; ->a3 12759 @ 98401: LINE 1762 "regression-compile-tmp/pass1.imp" 12760 @ 98437: PUSHI #0x00000004 12761 @ 98442: SLABEL 278 12762 @ 98445: LINE 1762 "regression-compile-tmp/pass1.imp" 12763 @ 98481: PUSH PTYPE 12764 @ 98484: PUSHI #0x00000001 12765 @ 98489: ASSVAL 12766 @ 98490: LINE 1762 "regression-compile-tmp/pass1.imp" 12767 @ 98526: PUSH PFORMAT 12768 @ 98529: PUSHI #0x00000001 12769 @ 98534: NEGATE 12770 @ 98535: ASSVAL 12771 @ 98536: LINE 1762 "regression-compile-tmp/pass1.imp" 12772 @ 98572: JUMP L_0121 1763 paction(5): ->a3 %if ptype = integer 12773 @ 98575: LINE 1763 "regression-compile-tmp/pass1.imp" 12774 @ 98611: PUSHI #0x00000005 12775 @ 98616: SLABEL 278 12776 @ 98619: LINE 1763 "regression-compile-tmp/pass1.imp" 12777 @ 98655: PUSH PTYPE 12778 @ 98658: PUSHI #0x00000001 12779 @ 98663: JUMPIF # L_0004 12780 @ 98667: JUMP L_0121 12781 @ 98670: LOCATE L_0004 1764 g = phrase(212) %and pformat=-1 %if ptype = real 12782 @ 98673: LINE 1764 "regression-compile-tmp/pass1.imp" 12783 @ 98709: PUSH PTYPE 12784 @ 98712: PUSHI #0x00000002 12785 @ 98717: JUMPIF # L_0004 12786 @ 98721: PUSH G 12787 @ 98724: PUSH PHRASE 12788 @ 98727: PUSHI #0x000000d4 12789 @ 98732: ACCESS 12790 @ 98733: ASSVAL 12791 @ 98734: PUSH PFORMAT 12792 @ 98737: PUSHI #0x00000001 12793 @ 98742: NEGATE 12794 @ 98743: ASSVAL 12795 @ 98744: LOCATE L_0004 1765 g = phrase(213) %if ptype = stringv 12796 @ 98747: LINE 1765 "regression-compile-tmp/pass1.imp" 12797 @ 98783: PUSH PTYPE 12798 @ 98786: PUSHI #0x00000003 12799 @ 98791: JUMPIF # L_0004 12800 @ 98795: PUSH G 12801 @ 98798: PUSH PHRASE 12802 @ 98801: PUSHI #0x000000d5 12803 @ 98806: ACCESS 12804 @ 98807: ASSVAL 12805 @ 98808: LOCATE L_0004 1766 ->a3 12806 @ 98811: LINE 1766 "regression-compile-tmp/pass1.imp" 12807 @ 98847: JUMP L_0121 1767 paction(6): ptype = gram(ar(nmax)_sub+1)&7; pformat = -1; ->a3 12808 @ 98850: LINE 1767 "regression-compile-tmp/pass1.imp" 12809 @ 98886: PUSHI #0x00000006 12810 @ 98891: SLABEL 278 12811 @ 98894: LINE 1767 "regression-compile-tmp/pass1.imp" 12812 @ 98930: PUSH PTYPE 12813 @ 98933: PUSH GRAM 12814 @ 98936: PUSH AR 12815 @ 98939: PUSH NMAX 12816 @ 98942: ACCESS 12817 @ 98943: SELECT 2 12818 @ 98946: PUSHI #0x00000001 12819 @ 98951: ADD 12820 @ 98952: ACCESS 12821 @ 98953: PUSHI #0x00000007 12822 @ 98958: AND 12823 @ 98959: ASSVAL 12824 @ 98960: LINE 1767 "regression-compile-tmp/pass1.imp" 12825 @ 98996: PUSH PFORMAT 12826 @ 98999: PUSHI #0x00000001 12827 @ 99004: NEGATE 12828 @ 99005: ASSVAL 12829 @ 99006: LINE 1767 "regression-compile-tmp/pass1.imp" 12830 @ 99042: JUMP L_0121 1768 paction(7): ptype=real %if ptype = integer; pformat = -1; ->a3 1769 12831 @ 99045: LINE 1768 "regression-compile-tmp/pass1.imp" 12832 @ 99081: PUSHI #0x00000007 12833 @ 99086: SLABEL 278 12834 @ 99089: LINE 1768 "regression-compile-tmp/pass1.imp" 12835 @ 99125: PUSH PTYPE 12836 @ 99128: PUSHI #0x00000001 12837 @ 99133: JUMPIF # L_0004 12838 @ 99137: PUSH PTYPE 12839 @ 99140: PUSHI #0x00000002 12840 @ 99145: ASSVAL 12841 @ 99146: LOCATE L_0004 12842 @ 99149: LINE 1768 "regression-compile-tmp/pass1.imp" 12843 @ 99185: PUSH PFORMAT 12844 @ 99188: PUSHI #0x00000001 12845 @ 99193: NEGATE 12846 @ 99194: ASSVAL 12847 @ 99195: LINE 1768 "regression-compile-tmp/pass1.imp" 12848 @ 99231: JUMP L_0121 1770 a1: last1 = class; atom1 = 0; s = subatom 12849 @ 99234: LINE 1770 "regression-compile-tmp/pass1.imp" 12850 @ 99270: LABEL L_0122 12851 @ 99273: LINE 1770 "regression-compile-tmp/pass1.imp" 12852 @ 99309: PUSH LAST1 12853 @ 99312: PUSH CLASS 12854 @ 99315: ASSVAL 12855 @ 99316: LINE 1770 "regression-compile-tmp/pass1.imp" 12856 @ 99352: PUSH ATOM1 12857 @ 99355: PUSHI #0x00000000 12858 @ 99360: ASSVAL 12859 @ 99361: LINE 1770 "regression-compile-tmp/pass1.imp" 12860 @ 99397: PUSH S 12861 @ 99400: PUSH SUBATOM 12862 @ 99403: ASSVAL 1771 a2: %if gg&trans bit = 0 %start; ! insert into analysis record 12863 @ 99404: LINE 1771 "regression-compile-tmp/pass1.imp" 12864 @ 99440: LABEL L_0127 12865 @ 99443: LINE 1771 "regression-compile-tmp/pass1.imp" 12866 @ 99479: PUSH GG 12867 @ 99482: PUSHI #0x00004000 12868 @ 99487: AND 12869 @ 99488: PUSHI #0x00000000 12870 @ 99493: JUMPIF # L_0004 1772 z == node 12871 @ 99497: LINE 1772 "regression-compile-tmp/pass1.imp" 12872 @ 99533: PUSH Z 12873 @ 99536: PUSH NODE 12874 @ 99539: ASSREF 1773 %cycle; ! insert cell in order 12875 @ 99540: LINE 1773 "regression-compile-tmp/pass1.imp" 12876 @ 99576: LOCATE L_0006 1774 k = z 12877 @ 99579: LINE 1774 "regression-compile-tmp/pass1.imp" 12878 @ 99615: PUSH K 12879 @ 99618: PUSH Z 12880 @ 99621: ASSVAL 1775 %exit %if gg&order bits = 0 %or k = 0 12881 @ 99622: LINE 1775 "regression-compile-tmp/pass1.imp" 12882 @ 99658: PUSH GG 12883 @ 99661: PUSHI #0x00003000 12884 @ 99666: AND 12885 @ 99667: PUSHI #0x00000000 12886 @ 99672: JUMPIF = L_000b 12887 @ 99676: PUSH K 12888 @ 99679: PUSHI #0x00000000 12889 @ 99684: JUMPIF # L_000a 12890 @ 99688: LOCATE L_000b 12891 @ 99691: GOTO L_0007 12892 @ 99694: LOCATE L_000a 1776 gg = gg-order bit; z == ar(k)_link 12893 @ 99697: LINE 1776 "regression-compile-tmp/pass1.imp" 12894 @ 99733: PUSH GG 12895 @ 99736: PUSH GG 12896 @ 99739: PUSHI #0x00001000 12897 @ 99744: SUB 12898 @ 99745: ASSVAL 12899 @ 99746: LINE 1776 "regression-compile-tmp/pass1.imp" 12900 @ 99782: PUSH Z 12901 @ 99785: PUSH AR 12902 @ 99788: PUSH K 12903 @ 99791: ACCESS 12904 @ 99792: SELECT 3 12905 @ 99795: ASSREF 1777 %repeat 12906 @ 99796: LINE 1777 "regression-compile-tmp/pass1.imp" 12907 @ 99832: REPEAT L_0006 12908 @ 99835: LOCATE L_0007 1778 gg = map gg %if map gg # 0 %and gg&255 = var 12909 @ 99838: LINE 1778 "regression-compile-tmp/pass1.imp" 12910 @ 99874: PUSH MAPGG 12911 @ 99877: PUSHI #0x00000000 12912 @ 99882: JUMPIF = L_0007 12913 @ 99886: PUSH GG 12914 @ 99889: PUSHI #0x000000ff 12915 @ 99894: AND 12916 @ 99895: PUSHI #0x0000005b 12917 @ 99900: JUMPIF # L_0007 12918 @ 99904: PUSH GG 12919 @ 99907: PUSH MAPGG 12920 @ 99910: ASSVAL 12921 @ 99911: LOCATE L_0007 1779 nmin = nmin-1; ->fail0 %if nmin = nmax 12922 @ 99914: LINE 1779 "regression-compile-tmp/pass1.imp" 12923 @ 99950: PUSH NMIN 12924 @ 99953: PUSH NMIN 12925 @ 99956: PUSHI #0x00000001 12926 @ 99961: SUB 12927 @ 99962: ASSVAL 12928 @ 99963: LINE 1779 "regression-compile-tmp/pass1.imp" 12929 @ 99999: PUSH NMIN 12930 @ 100002: PUSH NMAX 12931 @ 100005: JUMPIF # L_0007 12932 @ 100009: JUMP L_0128 12933 @ 100012: LOCATE L_0007 1780 z = nmin 12934 @ 100015: LINE 1780 "regression-compile-tmp/pass1.imp" 12935 @ 100051: PUSH Z 12936 @ 100054: PUSH NMIN 12937 @ 100057: ASSVAL 1781 arp == ar(nmin) 12938 @ 100058: LINE 1781 "regression-compile-tmp/pass1.imp" 12939 @ 100094: PUSH ARP 12940 @ 100097: PUSH AR 12941 @ 100100: PUSH NMIN 12942 @ 100103: ACCESS 12943 @ 100104: ASSREF 1782 arp_sub = s; arp_class = (gg&255)!mark 12944 @ 100105: LINE 1782 "regression-compile-tmp/pass1.imp" 12945 @ 100141: PUSH ARP 12946 @ 100144: SELECT 2 12947 @ 100147: PUSH S 12948 @ 100150: ASSVAL 12949 @ 100151: LINE 1782 "regression-compile-tmp/pass1.imp" 12950 @ 100187: PUSH ARP 12951 @ 100190: SELECT 1 12952 @ 100193: PUSH GG 12953 @ 100196: PUSHI #0x000000ff 12954 @ 100201: AND 12955 @ 100202: PUSH MARK 12956 @ 100205: OR 12957 @ 100206: ASSVAL 1783 arp_link = k 12958 @ 100207: LINE 1783 "regression-compile-tmp/pass1.imp" 12959 @ 100243: PUSH ARP 12960 @ 100246: SELECT 3 12961 @ 100249: PUSH K 12962 @ 100252: ASSVAL 1784 %finish 12963 @ 100253: LINE 1784 "regression-compile-tmp/pass1.imp" 12964 @ 100289: LOCATE L_0004 1785 mark = 0; map gg = 0 12965 @ 100292: LINE 1785 "regression-compile-tmp/pass1.imp" 12966 @ 100328: PUSH MARK 12967 @ 100331: PUSHI #0x00000000 12968 @ 100336: ASSVAL 12969 @ 100337: LINE 1785 "regression-compile-tmp/pass1.imp" 12970 @ 100373: PUSH MAPGG 12971 @ 100376: PUSHI #0x00000000 12972 @ 100381: ASSVAL 1786 more: g = glink(g); ! chain down the grammar 12973 @ 100382: LINE 1786 "regression-compile-tmp/pass1.imp" 12974 @ 100418: LABEL L_011f 12975 @ 100421: LINE 1786 "regression-compile-tmp/pass1.imp" 12976 @ 100457: PUSH G 12977 @ 100460: PUSH GLINK 12978 @ 100463: PUSH G 12979 @ 100466: ACCESS 12980 @ 100467: ASSVAL 1787 paction(0): 12981 @ 100468: LINE 1787 "regression-compile-tmp/pass1.imp" 12982 @ 100504: PUSHI #0x00000000 12983 @ 100509: SLABEL 278 1788 a3: gg = gram(g); class = gg&255 12984 @ 100512: LINE 1788 "regression-compile-tmp/pass1.imp" 12985 @ 100548: LABEL L_0121 12986 @ 100551: LINE 1788 "regression-compile-tmp/pass1.imp" 12987 @ 100587: PUSH GG 12988 @ 100590: PUSH GRAM 12989 @ 100593: PUSH G 12990 @ 100596: ACCESS 12991 @ 100597: ASSVAL 12992 @ 100598: LINE 1788 "regression-compile-tmp/pass1.imp" 12993 @ 100634: PUSH CLASS 12994 @ 100637: PUSH GG 12995 @ 100640: PUSHI #0x000000ff 12996 @ 100645: AND 12997 @ 100646: ASSVAL 1789 trace analysis %if diag&1 # 0 12998 @ 100647: LINE 1789 "regression-compile-tmp/pass1.imp" 12999 @ 100683: PUSH DIAG 13000 @ 100686: PUSHI #0x00000001 13001 @ 100691: AND 13002 @ 100692: PUSHI #0x00000000 13003 @ 100697: JUMPIF = L_0004 13004 @ 100701: PUSH TRACEANALYSIS 13005 @ 100704: CALL 13006 @ 100705: LOCATE L_0004 1790 ->a5 %if class = 0; ! end of phrase 1791 13007 @ 100708: LINE 1790 "regression-compile-tmp/pass1.imp" 13008 @ 100744: PUSH CLASS 13009 @ 100747: PUSHI #0x00000000 13010 @ 100752: JUMPIF # L_0004 13011 @ 100756: JUMP L_0129 13012 @ 100759: LOCATE L_0004 1792 %if class < actions %start; ! not a phrase or an action 13013 @ 100762: LINE 1792 "regression-compile-tmp/pass1.imp" 13014 @ 100798: PUSH CLASS 13015 @ 100801: PUSHI #0x000000b4 13016 @ 100806: JUMPIF >= L_0004 1793 class = atomic(class) %if class >= figurative 13017 @ 100810: LINE 1793 "regression-compile-tmp/pass1.imp" 13018 @ 100846: PUSH CLASS 13019 @ 100849: PUSHI #0x00000082 13020 @ 100854: JUMPIF < L_0007 13021 @ 100858: PUSH CLASS 13022 @ 100861: PUSH ATOMIC 13023 @ 100864: PUSH CLASS 13024 @ 100867: ACCESS 13025 @ 100868: ASSVAL 13026 @ 100869: LOCATE L_0007 1794 ->a2 %if class >= manifest 13027 @ 100872: LINE 1794 "regression-compile-tmp/pass1.imp" 13028 @ 100908: PUSH CLASS 13029 @ 100911: PUSHI #0x00000078 13030 @ 100916: JUMPIF < L_0007 13031 @ 100920: JUMP L_0127 13032 @ 100923: LOCATE L_0007 1795 code atom(class) %if atom1 = 0 13033 @ 100926: LINE 1795 "regression-compile-tmp/pass1.imp" 13034 @ 100962: PUSH ATOM1 13035 @ 100965: PUSHI #0x00000000 13036 @ 100970: JUMPIF # L_0007 13037 @ 100974: PUSH CODEATOM 13038 @ 100977: PUSH CLASS 13039 @ 100980: ASSPAR 13040 @ 100981: CALL 13041 @ 100982: LOCATE L_0007 1796 %if escape class # 0 %start; ! escape to new grammar 13042 @ 100985: LINE 1796 "regression-compile-tmp/pass1.imp" 13043 @ 101021: PUSH ESCAPECLASS 13044 @ 101024: PUSHI #0x00000000 13045 @ 101029: JUMPIF = L_0007 1797 class = escape class; escape class = 0 13046 @ 101033: LINE 1797 "regression-compile-tmp/pass1.imp" 13047 @ 101069: PUSH CLASS 13048 @ 101072: PUSH ESCAPECLASS 13049 @ 101075: ASSVAL 13050 @ 101076: LINE 1797 "regression-compile-tmp/pass1.imp" 13051 @ 101112: PUSH ESCAPECLASS 13052 @ 101115: PUSHI #0x00000000 13053 @ 101120: ASSVAL 1798 g = g+escape 1799 1800 ! note that following an escape the next item is 1801 ! forced to be transparent! 1802 13054 @ 101121: LINE 1798 "regression-compile-tmp/pass1.imp" 13055 @ 101157: PUSH G 13056 @ 101160: PUSH G 13057 @ 101163: PUSHI #0x00001000 13058 @ 101168: ADD 13059 @ 101169: ASSVAL 1803 esc: gg = 0 13060 @ 101170: LINE 1803 "regression-compile-tmp/pass1.imp" 13061 @ 101206: LABEL L_012a 13062 @ 101209: LINE 1803 "regression-compile-tmp/pass1.imp" 13063 @ 101245: PUSH GG 13064 @ 101248: PUSHI #0x00000000 13065 @ 101253: ASSVAL 1804 arp == ar(nmax+1) 13066 @ 101254: LINE 1804 "regression-compile-tmp/pass1.imp" 13067 @ 101290: PUSH ARP 13068 @ 101293: PUSH AR 13069 @ 101296: PUSH NMAX 13070 @ 101299: PUSHI #0x00000001 13071 @ 101304: ADD 13072 @ 101305: ACCESS 13073 @ 101306: ASSREF 1805 arp_papp = papp; arp_x = x; ->a4 13074 @ 101307: LINE 1805 "regression-compile-tmp/pass1.imp" 13075 @ 101343: PUSH ARP 13076 @ 101346: SELECT 5 13077 @ 101349: PUSH PAPP 13078 @ 101352: ASSVAL 13079 @ 101353: LINE 1805 "regression-compile-tmp/pass1.imp" 13080 @ 101389: PUSH ARP 13081 @ 101392: SELECT 7 13082 @ 101395: PUSH X 13083 @ 101398: ASSVAL 13084 @ 101399: LINE 1805 "regression-compile-tmp/pass1.imp" 13085 @ 101435: JUMP L_012b 1806 %finish 1807 13086 @ 101438: LINE 1806 "regression-compile-tmp/pass1.imp" 13087 @ 101474: LOCATE L_0007 1808 ->a1 %if class = atom1 %or class = atom2 1809 13088 @ 101477: LINE 1808 "regression-compile-tmp/pass1.imp" 13089 @ 101513: PUSH CLASS 13090 @ 101516: PUSH ATOM1 13091 @ 101519: JUMPIF = L_0008 13092 @ 101523: PUSH CLASS 13093 @ 101526: PUSH ATOM2 13094 @ 101529: JUMPIF # L_0007 13095 @ 101533: LOCATE L_0008 13096 @ 101536: JUMP L_0122 13097 @ 101539: LOCATE L_0007 1810 a7: ->fail1 %if gg >= 0; ! no alternative 13098 @ 101542: LINE 1810 "regression-compile-tmp/pass1.imp" 13099 @ 101578: LABEL L_0126 13100 @ 101581: LINE 1810 "regression-compile-tmp/pass1.imp" 13101 @ 101617: PUSH GG 13102 @ 101620: PUSHI #0x00000000 13103 @ 101625: JUMPIF < L_0007 13104 @ 101629: JUMP L_0120 13105 @ 101632: LOCATE L_0007 1811 g = g+1 13106 @ 101635: LINE 1811 "regression-compile-tmp/pass1.imp" 13107 @ 101671: PUSH G 13108 @ 101674: PUSH G 13109 @ 101677: PUSHI #0x00000001 13110 @ 101682: ADD 13111 @ 101683: ASSVAL 1812 ->a3 13112 @ 101684: LINE 1812 "regression-compile-tmp/pass1.imp" 13113 @ 101720: JUMP L_0121 1813 %finish 1814 13114 @ 101723: LINE 1813 "regression-compile-tmp/pass1.imp" 13115 @ 101759: LOCATE L_0004 1815 %if class >= phrasal %start; ! a phrase 13116 @ 101762: LINE 1815 "regression-compile-tmp/pass1.imp" 13117 @ 101798: PUSH CLASS 13118 @ 101801: PUSHI #0x000000c8 13119 @ 101806: JUMPIF < L_0004 1816 a4: nmax = nmax+1; ->fail0 %if nmax = nmin 13120 @ 101810: LINE 1816 "regression-compile-tmp/pass1.imp" 13121 @ 101846: LABEL L_012b 13122 @ 101849: LINE 1816 "regression-compile-tmp/pass1.imp" 13123 @ 101885: PUSH NMAX 13124 @ 101888: PUSH NMAX 13125 @ 101891: PUSHI #0x00000001 13126 @ 101896: ADD 13127 @ 101897: ASSVAL 13128 @ 101898: LINE 1816 "regression-compile-tmp/pass1.imp" 13129 @ 101934: PUSH NMAX 13130 @ 101937: PUSH NMIN 13131 @ 101940: JUMPIF # L_0007 13132 @ 101944: JUMP L_0128 13133 @ 101947: LOCATE L_0007 1817 arp == ar(nmax) 13134 @ 101950: LINE 1817 "regression-compile-tmp/pass1.imp" 13135 @ 101986: PUSH ARP 13136 @ 101989: PUSH AR 13137 @ 101992: PUSH NMAX 13138 @ 101995: ACCESS 13139 @ 101996: ASSREF 1818 arp_ptype = ptype 13140 @ 101997: LINE 1818 "regression-compile-tmp/pass1.imp" 13141 @ 102033: PUSH ARP 13142 @ 102036: SELECT 4 13143 @ 102039: PUSH PTYPE 13144 @ 102042: ASSVAL 1819 arp_pos = pos1 13145 @ 102043: LINE 1819 "regression-compile-tmp/pass1.imp" 13146 @ 102079: PUSH ARP 13147 @ 102082: SELECT 8 13148 @ 102085: PUSH POS1 13149 @ 102088: ASSVAL 1820 arp_pformat = pformat 13150 @ 102089: LINE 1820 "regression-compile-tmp/pass1.imp" 13151 @ 102125: PUSH ARP 13152 @ 102128: SELECT 6 13153 @ 102131: PUSH PFORMAT 13154 @ 102134: ASSVAL 1821 arp_link = gentype 13155 @ 102135: LINE 1821 "regression-compile-tmp/pass1.imp" 13156 @ 102171: PUSH ARP 13157 @ 102174: SELECT 3 13158 @ 102177: PUSH GENTYPE 13159 @ 102180: ASSVAL 1822 arp_class = node 13160 @ 102181: LINE 1822 "regression-compile-tmp/pass1.imp" 13161 @ 102217: PUSH ARP 13162 @ 102220: SELECT 1 13163 @ 102223: PUSH NODE 13164 @ 102226: ASSVAL 1823 arp_sub = g 13165 @ 102227: LINE 1823 "regression-compile-tmp/pass1.imp" 13166 @ 102263: PUSH ARP 13167 @ 102266: SELECT 2 13168 @ 102269: PUSH G 13169 @ 102272: ASSVAL 1824 node = 0 13170 @ 102273: LINE 1824 "regression-compile-tmp/pass1.imp" 13171 @ 102309: PUSH NODE 13172 @ 102312: PUSHI #0x00000000 13173 @ 102317: ASSVAL 1825 g = phrase(class) 13174 @ 102318: LINE 1825 "regression-compile-tmp/pass1.imp" 13175 @ 102354: PUSH G 13176 @ 102357: PUSH PHRASE 13177 @ 102360: PUSH CLASS 13178 @ 102363: ACCESS 13179 @ 102364: ASSVAL 1826 ptype = force %and force = 0 %if force # 0 13180 @ 102365: LINE 1826 "regression-compile-tmp/pass1.imp" 13181 @ 102401: PUSH FORCE 13182 @ 102404: PUSHI #0x00000000 13183 @ 102409: JUMPIF = L_0007 13184 @ 102413: PUSH PTYPE 13185 @ 102416: PUSH FORCE 13186 @ 102419: ASSVAL 13187 @ 102420: PUSH FORCE 13188 @ 102423: PUSHI #0x00000000 13189 @ 102428: ASSVAL 13190 @ 102429: LOCATE L_0007 1827 gentype = 0 13191 @ 102432: LINE 1827 "regression-compile-tmp/pass1.imp" 13192 @ 102468: PUSH GENTYPE 13193 @ 102471: PUSHI #0x00000000 13194 @ 102476: ASSVAL 1828 ->paction(gg>>8&15) 13195 @ 102477: LINE 1828 "regression-compile-tmp/pass1.imp" 13196 @ 102513: PUSH GG 13197 @ 102516: PUSHI #0x00000008 13198 @ 102521: RSH 13199 @ 102522: PUSHI #0x0000000f 13200 @ 102527: AND 13201 @ 102528: SJUMP 278 1829 %finish 13202 @ 102531: LINE 1829 "regression-compile-tmp/pass1.imp" 13203 @ 102567: LOCATE L_0004 1830 ->act(class); ! only actions left 1831 13204 @ 102570: LINE 1830 "regression-compile-tmp/pass1.imp" 13205 @ 102606: PUSH CLASS 13206 @ 102609: SJUMP 277 1832 a5: ;! reverse links 13207 @ 102612: LINE 1832 "regression-compile-tmp/pass1.imp" 13208 @ 102648: LABEL L_0129 1833 s = 0 13209 @ 102651: LINE 1833 "regression-compile-tmp/pass1.imp" 13210 @ 102687: PUSH S 13211 @ 102690: PUSHI #0x00000000 13212 @ 102695: ASSVAL 1834 %while node # 0 %cycle 13213 @ 102696: LINE 1834 "regression-compile-tmp/pass1.imp" 13214 @ 102732: LOCATE L_0003 13215 @ 102735: PUSH NODE 13216 @ 102738: PUSHI #0x00000000 13217 @ 102743: JUMPIF = L_0004 1835 z == ar(node)_link 13218 @ 102747: LINE 1835 "regression-compile-tmp/pass1.imp" 13219 @ 102783: PUSH Z 13220 @ 102786: PUSH AR 13221 @ 102789: PUSH NODE 13222 @ 102792: ACCESS 13223 @ 102793: SELECT 3 13224 @ 102796: ASSREF 1836 k = z; z = s; s = node; node = k 13225 @ 102797: LINE 1836 "regression-compile-tmp/pass1.imp" 13226 @ 102833: PUSH K 13227 @ 102836: PUSH Z 13228 @ 102839: ASSVAL 13229 @ 102840: LINE 1836 "regression-compile-tmp/pass1.imp" 13230 @ 102876: PUSH Z 13231 @ 102879: PUSH S 13232 @ 102882: ASSVAL 13233 @ 102883: LINE 1836 "regression-compile-tmp/pass1.imp" 13234 @ 102919: PUSH S 13235 @ 102922: PUSH NODE 13236 @ 102925: ASSVAL 13237 @ 102926: LINE 1836 "regression-compile-tmp/pass1.imp" 13238 @ 102962: PUSH NODE 13239 @ 102965: PUSH K 13240 @ 102968: ASSVAL 1837 %repeat 13241 @ 102969: LINE 1837 "regression-compile-tmp/pass1.imp" 13242 @ 103005: REPEAT L_0003 13243 @ 103008: LOCATE L_0004 1838 ss = s 13244 @ 103011: LINE 1838 "regression-compile-tmp/pass1.imp" 13245 @ 103047: PUSH SS 13246 @ 103050: PUSH S 13247 @ 103053: ASSVAL 1839 a6: %if nmax # 0 %start 13248 @ 103054: LINE 1839 "regression-compile-tmp/pass1.imp" 13249 @ 103090: LABEL L_012c 13250 @ 103093: LINE 1839 "regression-compile-tmp/pass1.imp" 13251 @ 103129: PUSH NMAX 13252 @ 103132: PUSHI #0x00000000 13253 @ 103137: JUMPIF = L_0004 1840 k = gentype; ! type of phrase 13254 @ 103141: LINE 1840 "regression-compile-tmp/pass1.imp" 13255 @ 103177: PUSH K 13256 @ 103180: PUSH GENTYPE 13257 @ 103183: ASSVAL 1841 arp == ar(nmax); nmax = nmax-1 13258 @ 103184: LINE 1841 "regression-compile-tmp/pass1.imp" 13259 @ 103220: PUSH ARP 13260 @ 103223: PUSH AR 13261 @ 103226: PUSH NMAX 13262 @ 103229: ACCESS 13263 @ 103230: ASSREF 13264 @ 103231: LINE 1841 "regression-compile-tmp/pass1.imp" 13265 @ 103267: PUSH NMAX 13266 @ 103270: PUSH NMAX 13267 @ 103273: PUSHI #0x00000001 13268 @ 103278: SUB 13269 @ 103279: ASSVAL 1842 node = arp_class 13270 @ 103280: LINE 1842 "regression-compile-tmp/pass1.imp" 13271 @ 103316: PUSH NODE 13272 @ 103319: PUSH ARP 13273 @ 103322: SELECT 1 13274 @ 103325: ASSVAL 1843 gentype = arp_link 13275 @ 103326: LINE 1843 "regression-compile-tmp/pass1.imp" 13276 @ 103362: PUSH GENTYPE 13277 @ 103365: PUSH ARP 13278 @ 103368: SELECT 3 13279 @ 103371: ASSVAL 1844 ptype = arp_ptype 13280 @ 103372: LINE 1844 "regression-compile-tmp/pass1.imp" 13281 @ 103408: PUSH PTYPE 13282 @ 103411: PUSH ARP 13283 @ 103414: SELECT 4 13284 @ 103417: ASSVAL 1845 pformat = arp_pformat 13285 @ 103418: LINE 1845 "regression-compile-tmp/pass1.imp" 13286 @ 103454: PUSH PFORMAT 13287 @ 103457: PUSH ARP 13288 @ 103460: SELECT 6 13289 @ 103463: ASSVAL 1846 g = arp_sub 13290 @ 103464: LINE 1846 "regression-compile-tmp/pass1.imp" 13291 @ 103500: PUSH G 13292 @ 103503: PUSH ARP 13293 @ 103506: SELECT 2 13294 @ 103509: ASSVAL 1847 %if g&escape # 0 %start 13295 @ 103510: LINE 1847 "regression-compile-tmp/pass1.imp" 13296 @ 103546: PUSH G 13297 @ 103549: PUSHI #0x00001000 13298 @ 103554: AND 13299 @ 103555: PUSHI #0x00000000 13300 @ 103560: JUMPIF = L_0007 1848 g = g-escape 13301 @ 103564: LINE 1848 "regression-compile-tmp/pass1.imp" 13302 @ 103600: PUSH G 13303 @ 103603: PUSH G 13304 @ 103606: PUSHI #0x00001000 13305 @ 103611: SUB 13306 @ 103612: ASSVAL 1849 papp = arp_papp 13307 @ 103613: LINE 1849 "regression-compile-tmp/pass1.imp" 13308 @ 103649: PUSH PAPP 13309 @ 103652: PUSH ARP 13310 @ 103655: SELECT 5 13311 @ 103658: ASSVAL 1850 mark = 255 13312 @ 103659: LINE 1850 "regression-compile-tmp/pass1.imp" 13313 @ 103695: PUSH MARK 13314 @ 103698: PUSHI #0x000000ff 13315 @ 103703: ASSVAL 1851 subatom = s 13316 @ 103704: LINE 1851 "regression-compile-tmp/pass1.imp" 13317 @ 103740: PUSH SUBATOM 13318 @ 103743: PUSH S 13319 @ 103746: ASSVAL 1852 ->a3 13320 @ 103747: LINE 1852 "regression-compile-tmp/pass1.imp" 13321 @ 103783: JUMP L_0121 1853 %finish 13322 @ 103786: LINE 1853 "regression-compile-tmp/pass1.imp" 13323 @ 103822: LOCATE L_0007 1854 gentype = k %if gentype = 0 %or k = real 13324 @ 103825: LINE 1854 "regression-compile-tmp/pass1.imp" 13325 @ 103861: PUSH GENTYPE 13326 @ 103864: PUSHI #0x00000000 13327 @ 103869: JUMPIF = L_0008 13328 @ 103873: PUSH K 13329 @ 103876: PUSHI #0x00000002 13330 @ 103881: JUMPIF # L_0007 13331 @ 103885: LOCATE L_0008 13332 @ 103888: PUSH GENTYPE 13333 @ 103891: PUSH K 13334 @ 103894: ASSVAL 13335 @ 103895: LOCATE L_0007 1855 type = gen type 1856 13336 @ 103898: LINE 1855 "regression-compile-tmp/pass1.imp" 13337 @ 103934: PUSH TYPE 13338 @ 103937: PUSH GENTYPE 13339 @ 103940: ASSVAL 1857 k = gg; ! exit-point code 13340 @ 103941: LINE 1857 "regression-compile-tmp/pass1.imp" 13341 @ 103977: PUSH K 13342 @ 103980: PUSH GG 13343 @ 103983: ASSVAL 1858 %cycle 13344 @ 103984: LINE 1858 "regression-compile-tmp/pass1.imp" 13345 @ 104020: LOCATE L_0006 1859 gg = gram(g) 13346 @ 104023: LINE 1859 "regression-compile-tmp/pass1.imp" 13347 @ 104059: PUSH GG 13348 @ 104062: PUSH GRAM 13349 @ 104065: PUSH G 13350 @ 104068: ACCESS 13351 @ 104069: ASSVAL 1860 ->a2 %if k = 0 13352 @ 104070: LINE 1860 "regression-compile-tmp/pass1.imp" 13353 @ 104106: PUSH K 13354 @ 104109: PUSHI #0x00000000 13355 @ 104114: JUMPIF # L_000a 13356 @ 104118: JUMP L_0127 13357 @ 104121: LOCATE L_000a 1861 ->fail1 %if gg >= 0; ! no alternative phrase 13358 @ 104124: LINE 1861 "regression-compile-tmp/pass1.imp" 13359 @ 104160: PUSH GG 13360 @ 104163: PUSHI #0x00000000 13361 @ 104168: JUMPIF < L_000a 13362 @ 104172: JUMP L_0120 13363 @ 104175: LOCATE L_000a 1862 k = k-order bit 13364 @ 104178: LINE 1862 "regression-compile-tmp/pass1.imp" 13365 @ 104214: PUSH K 13366 @ 104217: PUSH K 13367 @ 104220: PUSHI #0x00001000 13368 @ 104225: SUB 13369 @ 104226: ASSVAL 1863 g = g+1; ! sideways step 13370 @ 104227: LINE 1863 "regression-compile-tmp/pass1.imp" 13371 @ 104263: PUSH G 13372 @ 104266: PUSH G 13373 @ 104269: PUSHI #0x00000001 13374 @ 104274: ADD 13375 @ 104275: ASSVAL 1864 %repeat 13376 @ 104276: LINE 1864 "regression-compile-tmp/pass1.imp" 13377 @ 104312: REPEAT L_0006 1865 %finish 1866 13378 @ 104315: LINE 1865 "regression-compile-tmp/pass1.imp" 13379 @ 104351: LOCATE L_0004 1867 Fault(4) %if copy # 0 13380 @ 104354: LINE 1867 "regression-compile-tmp/pass1.imp" 13381 @ 104390: PUSH COPY 13382 @ 104393: PUSHI #0x00000000 13383 @ 104398: JUMPIF = L_0004 13384 @ 104402: PUSH FAULT 13385 @ 104405: PUSHI #0x00000004 13386 @ 104410: ASSPAR 13387 @ 104411: CALL 13388 @ 104412: LOCATE L_0004 1868 fault(13) %if order = 0 13389 @ 104415: LINE 1868 "regression-compile-tmp/pass1.imp" 13390 @ 104451: PUSH ORDER 13391 @ 104454: PUSHI #0x00000000 13392 @ 104459: JUMPIF # L_0004 13393 @ 104463: PUSH FAULT 13394 @ 104466: PUSHI #0x0000000d 13395 @ 104471: ASSPAR 13396 @ 104472: CALL 13397 @ 104473: LOCATE L_0004 1869 fault(-4) %if for warn # 0 13398 @ 104476: LINE 1869 "regression-compile-tmp/pass1.imp" 13399 @ 104512: PUSH FORWARN 13400 @ 104515: PUSHI #0x00000000 13401 @ 104520: JUMPIF = L_0004 13402 @ 104524: PUSH FAULT 13403 @ 104527: PUSHI #0x00000004 13404 @ 104532: NEGATE 13405 @ 104533: ASSPAR 13406 @ 104534: CALL 13407 @ 104535: LOCATE L_0004 1870 pos1 = 0 13408 @ 104538: LINE 1870 "regression-compile-tmp/pass1.imp" 13409 @ 104574: PUSH POS1 13410 @ 104577: PUSHI #0x00000000 13411 @ 104582: ASSVAL 1871 fault rate = fault rate-1 13412 @ 104583: LINE 1871 "regression-compile-tmp/pass1.imp" 13413 @ 104619: PUSH FAULTRATE 13414 @ 104622: PUSH FAULTRATE 13415 @ 104625: PUSHI #0x00000001 13416 @ 104630: SUB 13417 @ 104631: ASSVAL 1872 %return 1873 13418 @ 104632: LINE 1872 "regression-compile-tmp/pass1.imp" 13419 @ 104668: RETURN 1874 act(193): gg = 0 %and ->a5 %unless sym = '=' %or sym = '<'; ! cdummy 13420 @ 104669: LINE 1874 "regression-compile-tmp/pass1.imp" 13421 @ 104705: PUSHI #0x000000c1 13422 @ 104710: SLABEL 277 13423 @ 104713: LINE 1874 "regression-compile-tmp/pass1.imp" 13424 @ 104749: PUSH SYM 13425 @ 104752: PUSHI #0x0000003d 13426 @ 104757: JUMPIF = L_0004 13427 @ 104761: PUSH SYM 13428 @ 104764: PUSHI #0x0000003c 13429 @ 104769: JUMPIF = L_0004 13430 @ 104773: PUSH GG 13431 @ 104776: PUSHI #0x00000000 13432 @ 104781: ASSVAL 13433 @ 104782: JUMP L_0129 13434 @ 104785: LOCATE L_0004 1875 act(181): atom1 = amap(decl&15); ! dummy 13435 @ 104788: LINE 1875 "regression-compile-tmp/pass1.imp" 13436 @ 104824: PUSHI #0x000000b5 13437 @ 104829: SLABEL 277 13438 @ 104832: LINE 1875 "regression-compile-tmp/pass1.imp" 13439 @ 104868: PUSH ATOM1 13440 @ 104871: PUSH AMAP 13441 @ 104874: PUSH DECL 13442 @ 104877: PUSHI #0x0000000f 13443 @ 104882: AND 13444 @ 104883: ACCESS 13445 @ 104884: ASSVAL 1876 ->more 1877 13446 @ 104885: LINE 1876 "regression-compile-tmp/pass1.imp" 13447 @ 104921: JUMP L_011f 1878 act(182): class = escdec; g = glink(g)!escape; ! an example of ! as an operator 13448 @ 104924: LINE 1878 "regression-compile-tmp/pass1.imp" 13449 @ 104960: PUSHI #0x000000b6 13450 @ 104965: SLABEL 277 13451 @ 104968: LINE 1878 "regression-compile-tmp/pass1.imp" 13452 @ 105004: PUSH CLASS 13453 @ 105007: PUSHI #0x000000fc 13454 @ 105012: ASSVAL 13455 @ 105013: LINE 1878 "regression-compile-tmp/pass1.imp" 13456 @ 105049: PUSH G 13457 @ 105052: PUSH GLINK 13458 @ 105055: PUSH G 13459 @ 105058: ACCESS 13460 @ 105059: PUSHI #0x00001000 13461 @ 105064: OR 13462 @ 105065: ASSVAL 1879 decl = 0; otype = 0; ->esc; ! decl 1880 13463 @ 105066: LINE 1879 "regression-compile-tmp/pass1.imp" 13464 @ 105102: PUSH DECL 13465 @ 105105: PUSHI #0x00000000 13466 @ 105110: ASSVAL 13467 @ 105111: LINE 1879 "regression-compile-tmp/pass1.imp" 13468 @ 105147: PUSH OTYPE 13469 @ 105150: PUSHI #0x00000000 13470 @ 105155: ASSVAL 13471 @ 105156: LINE 1879 "regression-compile-tmp/pass1.imp" 13472 @ 105192: JUMP L_012a 1881 act(199): ; ! compile 13473 @ 105195: LINE 1881 "regression-compile-tmp/pass1.imp" 13474 @ 105231: PUSHI #0x000000c7 13475 @ 105236: SLABEL 277 1882 s = 0 13476 @ 105239: LINE 1882 "regression-compile-tmp/pass1.imp" 13477 @ 105275: PUSH S 13478 @ 105278: PUSHI #0x00000000 13479 @ 105283: ASSVAL 1883 %while node # 0 %cycle 13480 @ 105284: LINE 1883 "regression-compile-tmp/pass1.imp" 13481 @ 105320: LOCATE L_0003 13482 @ 105323: PUSH NODE 13483 @ 105326: PUSHI #0x00000000 13484 @ 105331: JUMPIF = L_0004 1884 z == ar(node)_link 13485 @ 105335: LINE 1884 "regression-compile-tmp/pass1.imp" 13486 @ 105371: PUSH Z 13487 @ 105374: PUSH AR 13488 @ 105377: PUSH NODE 13489 @ 105380: ACCESS 13490 @ 105381: SELECT 3 13491 @ 105384: ASSREF 1885 k = z; z = s; s = node; node = k 13492 @ 105385: LINE 1885 "regression-compile-tmp/pass1.imp" 13493 @ 105421: PUSH K 13494 @ 105424: PUSH Z 13495 @ 105427: ASSVAL 13496 @ 105428: LINE 1885 "regression-compile-tmp/pass1.imp" 13497 @ 105464: PUSH Z 13498 @ 105467: PUSH S 13499 @ 105470: ASSVAL 13500 @ 105471: LINE 1885 "regression-compile-tmp/pass1.imp" 13501 @ 105507: PUSH S 13502 @ 105510: PUSH NODE 13503 @ 105513: ASSVAL 13504 @ 105514: LINE 1885 "regression-compile-tmp/pass1.imp" 13505 @ 105550: PUSH NODE 13506 @ 105553: PUSH K 13507 @ 105556: ASSVAL 1886 %repeat 13508 @ 105557: LINE 1886 "regression-compile-tmp/pass1.imp" 13509 @ 105593: REPEAT L_0003 13510 @ 105596: LOCATE L_0004 1887 ss = s 1888 13511 @ 105599: LINE 1887 "regression-compile-tmp/pass1.imp" 13512 @ 105635: PUSH SS 13513 @ 105638: PUSH S 13514 @ 105641: ASSVAL 1889 code atom(28) %if quote # 0; ! expend 13515 @ 105642: LINE 1889 "regression-compile-tmp/pass1.imp" 13516 @ 105678: PUSH QUOTE 13517 @ 105681: PUSHI #0x00000000 13518 @ 105686: JUMPIF = L_0004 13519 @ 105690: PUSH CODEATOM 13520 @ 105693: PUSHI #0x0000001c 13521 @ 105698: ASSPAR 13522 @ 105699: CALL 13523 @ 105700: LOCATE L_0004 1890 compile; ->more %if atom1&error = 0 13524 @ 105703: LINE 1890 "regression-compile-tmp/pass1.imp" 13525 @ 105739: PUSH COMPILE 13526 @ 105742: CALL 13527 @ 105743: LINE 1890 "regression-compile-tmp/pass1.imp" 13528 @ 105779: PUSH ATOM1 13529 @ 105782: PUSHI #0x00008000 13530 @ 105787: AND 13531 @ 105788: PUSHI #0x00000000 13532 @ 105793: JUMPIF # L_0004 13533 @ 105797: JUMP L_011f 13534 @ 105800: LOCATE L_0004 1891 ->fail1 1892 13535 @ 105803: LINE 1891 "regression-compile-tmp/pass1.imp" 13536 @ 105839: JUMP L_0120 1893 act(184): ->fail4 %unless type = integer 13537 @ 105842: LINE 1893 "regression-compile-tmp/pass1.imp" 13538 @ 105878: PUSHI #0x000000b8 13539 @ 105883: SLABEL 277 13540 @ 105886: LINE 1893 "regression-compile-tmp/pass1.imp" 13541 @ 105922: PUSH TYPE 13542 @ 105925: PUSHI #0x00000001 13543 @ 105930: JUMPIF = L_0004 13544 @ 105934: JUMP L_012d 13545 @ 105937: LOCATE L_0004 1894 %if subatom < 0 %then lit = tag(-subatom)_format %else lit = lit pool(subatom) 13546 @ 105940: LINE 1894 "regression-compile-tmp/pass1.imp" 13547 @ 105976: PUSH SUBATOM 13548 @ 105979: PUSHI #0x00000000 13549 @ 105984: JUMPIF >= L_0004 13550 @ 105988: PUSH LIT 13551 @ 105991: PUSH TAG 13552 @ 105994: PUSH SUBATOM 13553 @ 105997: NEGATE 13554 @ 105998: ACCESS 13555 @ 105999: SELECT 2 13556 @ 106002: ASSVAL 13557 @ 106003: GOTO L_0003 13558 @ 106006: LOCATE L_0004 13559 @ 106009: PUSH LIT 13560 @ 106012: PUSH LITPOOL 13561 @ 106015: PUSH SUBATOM 13562 @ 106018: ACCESS 13563 @ 106019: ASSVAL 13564 @ 106020: LOCATE L_0003 1895 ->fail4 %if lit # 0 13565 @ 106023: LINE 1895 "regression-compile-tmp/pass1.imp" 13566 @ 106059: PUSH LIT 13567 @ 106062: PUSHI #0x00000000 13568 @ 106067: JUMPIF = L_0004 13569 @ 106071: JUMP L_012d 13570 @ 106074: LOCATE L_0004 1896 ->more 13571 @ 106077: LINE 1896 "regression-compile-tmp/pass1.imp" 13572 @ 106113: JUMP L_011f 1897 act(185): ; ! apply parameters 13573 @ 106116: LINE 1897 "regression-compile-tmp/pass1.imp" 13574 @ 106152: PUSHI #0x000000b9 13575 @ 106157: SLABEL 277 1898 s = 0 13576 @ 106160: LINE 1898 "regression-compile-tmp/pass1.imp" 13577 @ 106196: PUSH S 13578 @ 106199: PUSHI #0x00000000 13579 @ 106204: ASSVAL 1899 %while node # 0 %cycle 13580 @ 106205: LINE 1899 "regression-compile-tmp/pass1.imp" 13581 @ 106241: LOCATE L_0003 13582 @ 106244: PUSH NODE 13583 @ 106247: PUSHI #0x00000000 13584 @ 106252: JUMPIF = L_0004 1900 z == ar(node)_link 13585 @ 106256: LINE 1900 "regression-compile-tmp/pass1.imp" 13586 @ 106292: PUSH Z 13587 @ 106295: PUSH AR 13588 @ 106298: PUSH NODE 13589 @ 106301: ACCESS 13590 @ 106302: SELECT 3 13591 @ 106305: ASSREF 1901 k = z; z = s; s = node; node = k 13592 @ 106306: LINE 1901 "regression-compile-tmp/pass1.imp" 13593 @ 106342: PUSH K 13594 @ 106345: PUSH Z 13595 @ 106348: ASSVAL 13596 @ 106349: LINE 1901 "regression-compile-tmp/pass1.imp" 13597 @ 106385: PUSH Z 13598 @ 106388: PUSH S 13599 @ 106391: ASSVAL 13600 @ 106392: LINE 1901 "regression-compile-tmp/pass1.imp" 13601 @ 106428: PUSH S 13602 @ 106431: PUSH NODE 13603 @ 106434: ASSVAL 13604 @ 106435: LINE 1901 "regression-compile-tmp/pass1.imp" 13605 @ 106471: PUSH NODE 13606 @ 106474: PUSH K 13607 @ 106477: ASSVAL 1902 %repeat 13608 @ 106478: LINE 1902 "regression-compile-tmp/pass1.imp" 13609 @ 106514: REPEAT L_0003 13610 @ 106517: LOCATE L_0004 1903 ss = s 1904 13611 @ 106520: LINE 1903 "regression-compile-tmp/pass1.imp" 13612 @ 106556: PUSH SS 13613 @ 106559: PUSH S 13614 @ 106562: ASSVAL 1905 atom1 = ar(s)_class; atom2 = 0 13615 @ 106563: LINE 1905 "regression-compile-tmp/pass1.imp" 13616 @ 106599: PUSH ATOM1 13617 @ 106602: PUSH AR 13618 @ 106605: PUSH S 13619 @ 106608: ACCESS 13620 @ 106609: SELECT 1 13621 @ 106612: ASSVAL 13622 @ 106613: LINE 1905 "regression-compile-tmp/pass1.imp" 13623 @ 106649: PUSH ATOM2 13624 @ 106652: PUSHI #0x00000000 13625 @ 106657: ASSVAL 1906 atom1 = var %if atom1 = 97 %or atom1 = 98 13626 @ 106658: LINE 1906 "regression-compile-tmp/pass1.imp" 13627 @ 106694: PUSH ATOM1 13628 @ 106697: PUSHI #0x00000061 13629 @ 106702: JUMPIF = L_0005 13630 @ 106706: PUSH ATOM1 13631 @ 106709: PUSHI #0x00000062 13632 @ 106714: JUMPIF # L_0004 13633 @ 106718: LOCATE L_0005 13634 @ 106721: PUSH ATOM1 13635 @ 106724: PUSHI #0x0000005b 13636 @ 106729: ASSVAL 13637 @ 106730: LOCATE L_0004 1907 arp == ar(nmax) 13638 @ 106733: LINE 1907 "regression-compile-tmp/pass1.imp" 13639 @ 106769: PUSH ARP 13640 @ 106772: PUSH AR 13641 @ 106775: PUSH NMAX 13642 @ 106778: ACCESS 13643 @ 106779: ASSREF 1908 x = arp_x 13644 @ 106780: LINE 1908 "regression-compile-tmp/pass1.imp" 13645 @ 106816: PUSH X 13646 @ 106819: PUSH ARP 13647 @ 106822: SELECT 7 13648 @ 106825: ASSVAL 1909 pos1 = arp_pos 13649 @ 106826: LINE 1909 "regression-compile-tmp/pass1.imp" 13650 @ 106862: PUSH POS1 13651 @ 106865: PUSH ARP 13652 @ 106868: SELECT 8 13653 @ 106871: ASSVAL 1910 pos2 = 0 13654 @ 106872: LINE 1910 "regression-compile-tmp/pass1.imp" 13655 @ 106908: PUSH POS2 13656 @ 106911: PUSHI #0x00000000 13657 @ 106916: ASSVAL 1911 app = 0 13658 @ 106917: LINE 1911 "regression-compile-tmp/pass1.imp" 13659 @ 106953: PUSH APP 13660 @ 106956: PUSHI #0x00000000 13661 @ 106961: ASSVAL 1912 format = tag(x)_format 13662 @ 106962: LINE 1912 "regression-compile-tmp/pass1.imp" 13663 @ 106998: PUSH FORMAT 13664 @ 107001: PUSH TAG 13665 @ 107004: PUSH X 13666 @ 107007: ACCESS 13667 @ 107008: SELECT 2 13668 @ 107011: ASSVAL 1913 flags = tag(x)_flags 13669 @ 107012: LINE 1913 "regression-compile-tmp/pass1.imp" 13670 @ 107048: PUSH FLAGS 13671 @ 107051: PUSH TAG 13672 @ 107054: PUSH X 13673 @ 107057: ACCESS 13674 @ 107058: SELECT 3 13675 @ 107061: ASSVAL 1914 type = flags>>4&7 13676 @ 107062: LINE 1914 "regression-compile-tmp/pass1.imp" 13677 @ 107098: PUSH TYPE 13678 @ 107101: PUSH FLAGS 13679 @ 107104: PUSHI #0x00000004 13680 @ 107109: RSH 13681 @ 107110: PUSHI #0x00000007 13682 @ 107115: AND 13683 @ 107116: ASSVAL 1915 protection = flags&prot 13684 @ 107117: LINE 1915 "regression-compile-tmp/pass1.imp" 13685 @ 107153: PUSH PROTECTION 13686 @ 107156: PUSH FLAGS 13687 @ 107159: PUSHI #0x00000100 13688 @ 107164: AND 13689 @ 107165: ASSVAL 1916 protection = 0 %if flags&aname # 0 1917 13690 @ 107166: LINE 1916 "regression-compile-tmp/pass1.imp" 13691 @ 107202: PUSH FLAGS 13692 @ 107205: PUSHI #0x00000400 13693 @ 107210: AND 13694 @ 107211: PUSHI #0x00000000 13695 @ 107216: JUMPIF = L_0004 13696 @ 107220: PUSH PROTECTION 13697 @ 107223: PUSHI #0x00000000 13698 @ 107228: ASSVAL 13699 @ 107229: LOCATE L_0004 1918 %if flags&subname # 0 %and format # 0 %start 13700 @ 107232: LINE 1918 "regression-compile-tmp/pass1.imp" 13701 @ 107268: PUSH FLAGS 13702 @ 107271: PUSHI #0x00000800 13703 @ 107276: AND 13704 @ 107277: PUSHI #0x00000000 13705 @ 107282: JUMPIF = L_0004 13706 @ 107286: PUSH FORMAT 13707 @ 107289: PUSHI #0x00000000 13708 @ 107294: JUMPIF = L_0004 1919 ->fail1 %if format selected = 0 13709 @ 107298: LINE 1919 "regression-compile-tmp/pass1.imp" 13710 @ 107334: PUSH FORMATSELECTED 13711 @ 107337: CALL 13712 @ 107338: PUSHI #0x00000000 13713 @ 107343: JUMPIF # L_0007 13714 @ 107347: JUMP L_0120 13715 @ 107350: LOCATE L_0007 1920 %finish 1921 13716 @ 107353: LINE 1920 "regression-compile-tmp/pass1.imp" 13717 @ 107389: LOCATE L_0004 1922 ->a6 1923 13718 @ 107392: LINE 1922 "regression-compile-tmp/pass1.imp" 13719 @ 107428: JUMP L_012c 1924 act(187): protection = prot; ->more; ! %SETPROT 13720 @ 107431: LINE 1924 "regression-compile-tmp/pass1.imp" 13721 @ 107467: PUSHI #0x000000bb 13722 @ 107472: SLABEL 277 13723 @ 107475: LINE 1924 "regression-compile-tmp/pass1.imp" 13724 @ 107511: PUSH PROTECTION 13725 @ 107514: PUSHI #0x00000100 13726 @ 107519: ASSVAL 13727 @ 107520: LINE 1924 "regression-compile-tmp/pass1.imp" 13728 @ 107556: JUMP L_011f 1925 act(186): ->More %if protection&prot = 0 13729 @ 107559: LINE 1925 "regression-compile-tmp/pass1.imp" 13730 @ 107595: PUSHI #0x000000ba 13731 @ 107600: SLABEL 277 13732 @ 107603: LINE 1925 "regression-compile-tmp/pass1.imp" 13733 @ 107639: PUSH PROTECTION 13734 @ 107642: PUSHI #0x00000100 13735 @ 107647: AND 13736 @ 107648: PUSHI #0x00000000 13737 @ 107653: JUMPIF # L_0004 13738 @ 107657: JUMP L_011f 13739 @ 107660: LOCATE L_0004 1926 prot err = nmin 13740 @ 107663: LINE 1926 "regression-compile-tmp/pass1.imp" 13741 @ 107699: PUSH PROTERR 13742 @ 107702: PUSH NMIN 13743 @ 107705: ASSVAL 1927 ->A7 13744 @ 107706: LINE 1927 "regression-compile-tmp/pass1.imp" 13745 @ 107742: JUMP L_0126 1928 act(191): k = protection; ! %GUARD 13746 @ 107745: LINE 1928 "regression-compile-tmp/pass1.imp" 13747 @ 107781: PUSHI #0x000000bf 13748 @ 107786: SLABEL 277 13749 @ 107789: LINE 1928 "regression-compile-tmp/pass1.imp" 13750 @ 107825: PUSH K 13751 @ 107828: PUSH PROTECTION 13752 @ 107831: ASSVAL 1929 code atom(0) 13753 @ 107832: LINE 1929 "regression-compile-tmp/pass1.imp" 13754 @ 107868: PUSH CODEATOM 13755 @ 107871: PUSHI #0x00000000 13756 @ 107876: ASSPAR 13757 @ 107877: CALL 1930 protection = k %if atom flags&aname = 0 13758 @ 107878: LINE 1930 "regression-compile-tmp/pass1.imp" 13759 @ 107914: PUSH ATOMFLAGS 13760 @ 107917: PUSHI #0x00000400 13761 @ 107922: AND 13762 @ 107923: PUSHI #0x00000000 13763 @ 107928: JUMPIF # L_0004 13764 @ 107932: PUSH PROTECTION 13765 @ 107935: PUSH K 13766 @ 107938: ASSVAL 13767 @ 107939: LOCATE L_0004 1931 ->more 1932 13768 @ 107942: LINE 1931 "regression-compile-tmp/pass1.imp" 13769 @ 107978: JUMP L_011f 1933 act(192): ->fail1 %if parsed machine code=0 13770 @ 107981: LINE 1933 "regression-compile-tmp/pass1.imp" 13771 @ 108017: PUSHI #0x000000c0 13772 @ 108022: SLABEL 277 13773 @ 108025: LINE 1933 "regression-compile-tmp/pass1.imp" 13774 @ 108061: PUSH PARSEDMACHINECODE 13775 @ 108064: CALL 13776 @ 108065: PUSHI #0x00000000 13777 @ 108070: JUMPIF # L_0004 13778 @ 108074: JUMP L_0120 13779 @ 108077: LOCATE L_0004 1934 ->more 1935 13780 @ 108080: LINE 1934 "regression-compile-tmp/pass1.imp" 13781 @ 108116: JUMP L_011f 1936 act(189): k = gapp; ! %GAPP 13782 @ 108119: LINE 1936 "regression-compile-tmp/pass1.imp" 13783 @ 108155: PUSHI #0x000000bd 13784 @ 108160: SLABEL 277 13785 @ 108163: LINE 1936 "regression-compile-tmp/pass1.imp" 13786 @ 108199: PUSH K 13787 @ 108202: PUSH GAPP 13788 @ 108205: CALL 13789 @ 108206: ASSVAL 1937 delete names(1) 13790 @ 108207: LINE 1937 "regression-compile-tmp/pass1.imp" 13791 @ 108243: PUSH DELETENAMES 13792 @ 108246: PUSHI #0x00000001 13793 @ 108251: ASSPAR 13794 @ 108252: CALL 1938 tmax = tbase; tbase = gram (gmin); ! restore tmax 13795 @ 108253: LINE 1938 "regression-compile-tmp/pass1.imp" 13796 @ 108289: PUSH TMAX 13797 @ 108292: PUSH TBASE 13798 @ 108295: ASSVAL 13799 @ 108296: LINE 1938 "regression-compile-tmp/pass1.imp" 13800 @ 108332: PUSH TBASE 13801 @ 108335: PUSH GRAM 13802 @ 108338: PUSH GMIN 13803 @ 108341: ACCESS 13804 @ 108342: ASSVAL 1939 local= tbase 13805 @ 108343: LINE 1939 "regression-compile-tmp/pass1.imp" 13806 @ 108379: PUSH LOCAL 13807 @ 108382: PUSH TBASE 13808 @ 108385: ASSVAL 1940 gmin = gmin+1 1941 13809 @ 108386: LINE 1940 "regression-compile-tmp/pass1.imp" 13810 @ 108422: PUSH GMIN 13811 @ 108425: PUSH GMIN 13812 @ 108428: PUSHI #0x00000001 13813 @ 108433: ADD 13814 @ 108434: ASSVAL 1942 x = ar(ar(nmax)_class)_sub 13815 @ 108435: LINE 1942 "regression-compile-tmp/pass1.imp" 13816 @ 108471: PUSH X 13817 @ 108474: PUSH AR 13818 @ 108477: PUSH AR 13819 @ 108480: PUSH NMAX 13820 @ 108483: ACCESS 13821 @ 108484: SELECT 1 13822 @ 108487: ACCESS 13823 @ 108488: SELECT 2 13824 @ 108491: ASSVAL 1943 tag(x)_app = k; ! update app 13825 @ 108492: LINE 1943 "regression-compile-tmp/pass1.imp" 13826 @ 108528: PUSH TAG 13827 @ 108531: PUSH X 13828 @ 108534: ACCESS 13829 @ 108535: SELECT 1 13830 @ 108538: PUSH K 13831 @ 108541: ASSVAL 1944 ->more 1945 13832 @ 108542: LINE 1944 "regression-compile-tmp/pass1.imp" 13833 @ 108578: JUMP L_011f 1946 act(190): gmin = gmin-1; ! %LOCAL 13834 @ 108581: LINE 1946 "regression-compile-tmp/pass1.imp" 13835 @ 108617: PUSHI #0x000000be 13836 @ 108622: SLABEL 277 13837 @ 108625: LINE 1946 "regression-compile-tmp/pass1.imp" 13838 @ 108661: PUSH GMIN 13839 @ 108664: PUSH GMIN 13840 @ 108667: PUSHI #0x00000001 13841 @ 108672: SUB 13842 @ 108673: ASSVAL 1947 abandon(2) %if gmin <= gmax 13843 @ 108674: LINE 1947 "regression-compile-tmp/pass1.imp" 13844 @ 108710: PUSH GMIN 13845 @ 108713: PUSH GMAX 13846 @ 108716: JUMPIF > L_0004 13847 @ 108720: PUSH ABANDON 13848 @ 108723: PUSHI #0x00000002 13849 @ 108728: ASSPAR 13850 @ 108729: CALL 13851 @ 108730: LOCATE L_0004 1948 gram (gmin) = tbase; tbase = tmax 13852 @ 108733: LINE 1948 "regression-compile-tmp/pass1.imp" 13853 @ 108769: PUSH GRAM 13854 @ 108772: PUSH GMIN 13855 @ 108775: ACCESS 13856 @ 108776: PUSH TBASE 13857 @ 108779: ASSVAL 13858 @ 108780: LINE 1948 "regression-compile-tmp/pass1.imp" 13859 @ 108816: PUSH TBASE 13860 @ 108819: PUSH TMAX 13861 @ 108822: ASSVAL 1949 local = tbase 13862 @ 108823: LINE 1949 "regression-compile-tmp/pass1.imp" 13863 @ 108859: PUSH LOCAL 13864 @ 108862: PUSH TBASE 13865 @ 108865: ASSVAL 1950 ->more 1951 1952 ! errors 1953 13866 @ 108866: LINE 1950 "regression-compile-tmp/pass1.imp" 13867 @ 108902: JUMP L_011f 1954 fail4: k = error+10; ->failed; ! *size 13868 @ 108905: LINE 1954 "regression-compile-tmp/pass1.imp" 13869 @ 108941: LABEL L_012d 13870 @ 108944: LINE 1954 "regression-compile-tmp/pass1.imp" 13871 @ 108980: PUSH K 13872 @ 108983: PUSHI #0x00008000 13873 @ 108988: PUSHI #0x0000000a 13874 @ 108993: ADD 13875 @ 108994: ASSVAL 13876 @ 108995: LINE 1954 "regression-compile-tmp/pass1.imp" 13877 @ 109031: JUMP L_012e 1955 fail3: k = error+7; ->failed; ! *context 13878 @ 109034: LINE 1955 "regression-compile-tmp/pass1.imp" 13879 @ 109070: LABEL L_0125 13880 @ 109073: LINE 1955 "regression-compile-tmp/pass1.imp" 13881 @ 109109: PUSH K 13882 @ 109112: PUSHI #0x00008000 13883 @ 109117: PUSHI #0x00000007 13884 @ 109122: ADD 13885 @ 109123: ASSVAL 13886 @ 109124: LINE 1955 "regression-compile-tmp/pass1.imp" 13887 @ 109160: JUMP L_012e 1956 fail2: k = error+5; pos2 = 0; ->failed; ! *type 13888 @ 109163: LINE 1956 "regression-compile-tmp/pass1.imp" 13889 @ 109199: LABEL L_0124 13890 @ 109202: LINE 1956 "regression-compile-tmp/pass1.imp" 13891 @ 109238: PUSH K 13892 @ 109241: PUSHI #0x00008000 13893 @ 109246: PUSHI #0x00000005 13894 @ 109251: ADD 13895 @ 109252: ASSVAL 13896 @ 109253: LINE 1956 "regression-compile-tmp/pass1.imp" 13897 @ 109289: PUSH POS2 13898 @ 109292: PUSHI #0x00000000 13899 @ 109297: ASSVAL 13900 @ 109298: LINE 1956 "regression-compile-tmp/pass1.imp" 13901 @ 109334: JUMP L_012e 1957 fail0: k = error+3; ->failed; ! *too complex 13902 @ 109337: LINE 1957 "regression-compile-tmp/pass1.imp" 13903 @ 109373: LABEL L_0128 13904 @ 109376: LINE 1957 "regression-compile-tmp/pass1.imp" 13905 @ 109412: PUSH K 13906 @ 109415: PUSHI #0x00008000 13907 @ 109420: PUSHI #0x00000003 13908 @ 109425: ADD 13909 @ 109426: ASSVAL 13910 @ 109427: LINE 1957 "regression-compile-tmp/pass1.imp" 13911 @ 109463: JUMP L_012e 1958 fail1: k = atom1; pos2 = 0 13912 @ 109466: LINE 1958 "regression-compile-tmp/pass1.imp" 13913 @ 109502: LABEL L_0120 13914 @ 109505: LINE 1958 "regression-compile-tmp/pass1.imp" 13915 @ 109541: PUSH K 13916 @ 109544: PUSH ATOM1 13917 @ 109547: ASSVAL 13918 @ 109548: LINE 1958 "regression-compile-tmp/pass1.imp" 13919 @ 109584: PUSH POS2 13920 @ 109587: PUSHI #0x00000000 13921 @ 109592: ASSVAL 1959 failed: %if diag&32 # 0 %start 13922 @ 109593: LINE 1959 "regression-compile-tmp/pass1.imp" 13923 @ 109629: LABEL L_012e 13924 @ 109632: LINE 1959 "regression-compile-tmp/pass1.imp" 13925 @ 109668: PUSH DIAG 13926 @ 109671: PUSHI #0x00000020 13927 @ 109676: AND 13928 @ 109677: PUSHI #0x00000000 13929 @ 109682: JUMPIF = L_0004 1960 printstring("Atom1 ="); write(atom1, 3) 13930 @ 109686: LINE 1960 "regression-compile-tmp/pass1.imp" 13931 @ 109722: PUSH PRINTSTRING 13932 @ 109725: PUSHS "Atom1 =" 13933 @ 109734: ASSPAR 13934 @ 109735: CALL 13935 @ 109736: LINE 1960 "regression-compile-tmp/pass1.imp" 13936 @ 109772: PUSH WRITE 13937 @ 109775: PUSH ATOM1 13938 @ 109778: ASSPAR 13939 @ 109779: PUSHI #0x00000003 13940 @ 109784: ASSPAR 13941 @ 109785: CALL 1961 printstring(" Atom2 ="); write(atom2, 3) 13942 @ 109786: LINE 1961 "regression-compile-tmp/pass1.imp" 13943 @ 109822: PUSH PRINTSTRING 13944 @ 109825: PUSHS " Atom2 =" 13945 @ 109836: ASSPAR 13946 @ 109837: CALL 13947 @ 109838: LINE 1961 "regression-compile-tmp/pass1.imp" 13948 @ 109874: PUSH WRITE 13949 @ 109877: PUSH ATOM2 13950 @ 109880: ASSPAR 13951 @ 109881: PUSHI #0x00000003 13952 @ 109886: ASSPAR 13953 @ 109887: CALL 1962 printstring(" subatom ="); write(subatom, 3); newline 13954 @ 109888: LINE 1962 "regression-compile-tmp/pass1.imp" 13955 @ 109924: PUSH PRINTSTRING 13956 @ 109927: PUSHS " subatom =" 13957 @ 109940: ASSPAR 13958 @ 109941: CALL 13959 @ 109942: LINE 1962 "regression-compile-tmp/pass1.imp" 13960 @ 109978: PUSH WRITE 13961 @ 109981: PUSH SUBATOM 13962 @ 109984: ASSPAR 13963 @ 109985: PUSHI #0x00000003 13964 @ 109990: ASSPAR 13965 @ 109991: CALL 13966 @ 109992: LINE 1962 "regression-compile-tmp/pass1.imp" 13967 @ 110028: PUSH NEWLINE 13968 @ 110031: CALL 1963 printstring("Type ="); write(type, 1) 13969 @ 110032: LINE 1963 "regression-compile-tmp/pass1.imp" 13970 @ 110068: PUSH PRINTSTRING 13971 @ 110071: PUSHS "Type =" 13972 @ 110079: ASSPAR 13973 @ 110080: CALL 13974 @ 110081: LINE 1963 "regression-compile-tmp/pass1.imp" 13975 @ 110117: PUSH WRITE 13976 @ 110120: PUSH TYPE 13977 @ 110123: ASSPAR 13978 @ 110124: PUSHI #0x00000001 13979 @ 110129: ASSPAR 13980 @ 110130: CALL 1964 printstring(" Ptype ="); write(ptype, 1); newline 13981 @ 110131: LINE 1964 "regression-compile-tmp/pass1.imp" 13982 @ 110167: PUSH PRINTSTRING 13983 @ 110170: PUSHS " Ptype =" 13984 @ 110182: ASSPAR 13985 @ 110183: CALL 13986 @ 110184: LINE 1964 "regression-compile-tmp/pass1.imp" 13987 @ 110220: PUSH WRITE 13988 @ 110223: PUSH PTYPE 13989 @ 110226: ASSPAR 13990 @ 110227: PUSHI #0x00000001 13991 @ 110232: ASSPAR 13992 @ 110233: CALL 13993 @ 110234: LINE 1964 "regression-compile-tmp/pass1.imp" 13994 @ 110270: PUSH NEWLINE 13995 @ 110273: CALL 1965 printstring("App ="); write(app, 1) 13996 @ 110274: LINE 1965 "regression-compile-tmp/pass1.imp" 13997 @ 110310: PUSH PRINTSTRING 13998 @ 110313: PUSHS "App =" 13999 @ 110320: ASSPAR 14000 @ 110321: CALL 14001 @ 110322: LINE 1965 "regression-compile-tmp/pass1.imp" 14002 @ 110358: PUSH WRITE 14003 @ 110361: PUSH APP 14004 @ 110364: ASSPAR 14005 @ 110365: PUSHI #0x00000001 14006 @ 110370: ASSPAR 14007 @ 110371: CALL 1966 printstring(" Papp ="); write(papp, 1); newline 14008 @ 110372: LINE 1966 "regression-compile-tmp/pass1.imp" 14009 @ 110408: PUSH PRINTSTRING 14010 @ 110411: PUSHS " Papp =" 14011 @ 110422: ASSPAR 14012 @ 110423: CALL 14013 @ 110424: LINE 1966 "regression-compile-tmp/pass1.imp" 14014 @ 110460: PUSH WRITE 14015 @ 110463: PUSH PAPP 14016 @ 110466: ASSPAR 14017 @ 110467: PUSHI #0x00000001 14018 @ 110472: ASSPAR 14019 @ 110473: CALL 14020 @ 110474: LINE 1966 "regression-compile-tmp/pass1.imp" 14021 @ 110510: PUSH NEWLINE 14022 @ 110513: CALL 1967 printstring("Format ="); write(format, 1) 14023 @ 110514: LINE 1967 "regression-compile-tmp/pass1.imp" 14024 @ 110550: PUSH PRINTSTRING 14025 @ 110553: PUSHS "Format =" 14026 @ 110563: ASSPAR 14027 @ 110564: CALL 14028 @ 110565: LINE 1967 "regression-compile-tmp/pass1.imp" 14029 @ 110601: PUSH WRITE 14030 @ 110604: PUSH FORMAT 14031 @ 110607: ASSPAR 14032 @ 110608: PUSHI #0x00000001 14033 @ 110613: ASSPAR 14034 @ 110614: CALL 1968 printstring(" Pformat ="); write(pformat, 1); newline 1969 !%signal 13,15 14035 @ 110615: LINE 1968 "regression-compile-tmp/pass1.imp" 14036 @ 110651: PUSH PRINTSTRING 14037 @ 110654: PUSHS " Pformat =" 14038 @ 110668: ASSPAR 14039 @ 110669: CALL 14040 @ 110670: LINE 1968 "regression-compile-tmp/pass1.imp" 14041 @ 110706: PUSH WRITE 14042 @ 110709: PUSH PFORMAT 14043 @ 110712: ASSPAR 14044 @ 110713: PUSHI #0x00000001 14045 @ 110718: ASSPAR 14046 @ 110719: CALL 14047 @ 110720: LINE 1968 "regression-compile-tmp/pass1.imp" 14048 @ 110756: PUSH NEWLINE 14049 @ 110759: CALL 1970 %finish 1971 14050 @ 110760: LINE 1970 "regression-compile-tmp/pass1.imp" 14051 @ 110796: LOCATE L_0004 1972 quote = 0 %and readsym %while sym # nl %and sym # ';' 14052 @ 110799: LINE 1972 "regression-compile-tmp/pass1.imp" 14053 @ 110835: LOCATE L_0003 14054 @ 110838: PUSH SYM 14055 @ 110841: PUSHI #0x0000000a 14056 @ 110846: JUMPIF = L_0004 14057 @ 110850: PUSH SYM 14058 @ 110853: PUSHI #0x0000003b 14059 @ 110858: JUMPIF = L_0004 14060 @ 110862: PUSH QUOTE 14061 @ 110865: PUSHI #0x00000000 14062 @ 110870: ASSVAL 14063 @ 110871: PUSH READSYM 14064 @ 110874: CALL 14065 @ 110875: REPEAT L_0003 14066 @ 110878: LOCATE L_0004 1973 %if k&error # 0 %start 14067 @ 110881: LINE 1973 "regression-compile-tmp/pass1.imp" 14068 @ 110917: PUSH K 14069 @ 110920: PUSHI #0x00008000 14070 @ 110925: AND 14071 @ 110926: PUSHI #0x00000000 14072 @ 110931: JUMPIF = L_0004 1974 fault(k&255) 14073 @ 110935: LINE 1974 "regression-compile-tmp/pass1.imp" 14074 @ 110971: PUSH FAULT 14075 @ 110974: PUSH K 14076 @ 110977: PUSHI #0x000000ff 14077 @ 110982: AND 14078 @ 110983: ASSPAR 14079 @ 110984: CALL 1975 %finish %else %start 14080 @ 110985: LINE 1975 "regression-compile-tmp/pass1.imp" 14081 @ 111021: GOTO L_0003 14082 @ 111024: LOCATE L_0004 1976 %if prot err = nmin %then fault(14) %else fault(0) 14083 @ 111027: LINE 1976 "regression-compile-tmp/pass1.imp" 14084 @ 111063: PUSH PROTERR 14085 @ 111066: PUSH NMIN 14086 @ 111069: JUMPIF # L_0007 14087 @ 111073: PUSH FAULT 14088 @ 111076: PUSHI #0x0000000e 14089 @ 111081: ASSPAR 14090 @ 111082: CALL 14091 @ 111083: GOTO L_0006 14092 @ 111086: LOCATE L_0007 14093 @ 111089: PUSH FAULT 14094 @ 111092: PUSHI #0x00000000 14095 @ 111097: ASSPAR 14096 @ 111098: CALL 14097 @ 111099: LOCATE L_0006 1977 %finish 14098 @ 111102: LINE 1977 "regression-compile-tmp/pass1.imp" 14099 @ 111138: LOCATE L_0003 1978 gg = 0; ss = 0; symtype = 0 14100 @ 111141: LINE 1978 "regression-compile-tmp/pass1.imp" 14101 @ 111177: PUSH GG 14102 @ 111180: PUSHI #0x00000000 14103 @ 111185: ASSVAL 14104 @ 111186: LINE 1978 "regression-compile-tmp/pass1.imp" 14105 @ 111222: PUSH SS 14106 @ 111225: PUSHI #0x00000000 14107 @ 111230: ASSVAL 14108 @ 111231: LINE 1978 "regression-compile-tmp/pass1.imp" 14109 @ 111267: PUSH SYMTYPE 14110 @ 111270: PUSHI #0x00000000 14111 @ 111275: ASSVAL 1979 %end; ! of analyse 1980 14112 @ 111276: LINE 1979 "regression-compile-tmp/pass1.imp" 14113 @ 111312: END _lev0id0_COMPILEBLOCK_ANALYSE {lev=3 --> 2} 1981 %routine compile 14114 @ 111313: LINE 1981 "regression-compile-tmp/pass1.imp" 14115 @ 111349: DEF COMPILE (_lev0id0_COMPILEBLOCK_COMPILE) p1=V_00f9 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14116 @ 111368: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 14117 @ 111369: FINISH ) {lev=3} 1982 %constinteger then = 4, else = 8, loop = 16 1983 14118 @ 111370: LINE 1982 "regression-compile-tmp/pass1.imp" 1984 %switch c(0:actions), litop(1:12) 1985 14119 @ 111406: LINE 1984 "regression-compile-tmp/pass1.imp" 14120 @ 111442: PUSHI #0x00000000 14121 @ 111447: PUSHI #0x000000b4 14122 @ 111452: BOUNDS 14123 @ 111453: DEF C p1=V_010a a/tf=6 b/format=0 c/ostate=0 type=0 () form=6 (switch) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14124 @ 111466: PUSHI #0x00000001 14125 @ 111471: PUSHI #0x0000000c 14126 @ 111476: BOUNDS 14127 @ 111477: DEF LITOP p1=V_010b a/tf=6 b/format=0 c/ostate=0 type=0 () form=6 (switch) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1986 %constbyteintegerarray operator(1:14) = '[', ']', 'X', '/', '&', '!', '%', '+', '-', '*', 'Q', 'x', '.', 'v' 14128 @ 111494: LINE 1986 "regression-compile-tmp/pass1.imp" 14129 @ 111530: PUSHI #0x00000001 14130 @ 111535: PUSHI #0x0000000e 14131 @ 111540: BOUNDS 14132 @ 111541: DEF OPERATOR p1=V_010c 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 14133 @ 111561: PUSHI #0x0000005b 14134 @ 111566: INIT 1 14135 @ 111569: PUSHI #0x0000005d 14136 @ 111574: INIT 1 14137 @ 111577: PUSHI #0x00000058 14138 @ 111582: INIT 1 14139 @ 111585: PUSHI #0x0000002f 14140 @ 111590: INIT 1 14141 @ 111593: PUSHI #0x00000026 14142 @ 111598: INIT 1 14143 @ 111601: PUSHI #0x00000021 14144 @ 111606: INIT 1 14145 @ 111609: PUSHI #0x00000025 14146 @ 111614: INIT 1 14147 @ 111617: PUSHI #0x0000002b 14148 @ 111622: INIT 1 14149 @ 111625: PUSHI #0x0000002d 14150 @ 111630: INIT 1 14151 @ 111633: PUSHI #0x0000002a 14152 @ 111638: INIT 1 14153 @ 111641: PUSHI #0x00000051 14154 @ 111646: INIT 1 14155 @ 111649: PUSHI #0x00000078 14156 @ 111654: INIT 1 14157 @ 111657: PUSHI #0x0000002e 14158 @ 111662: INIT 1 14159 @ 111665: PUSHI #0x00000076 14160 @ 111670: INIT 1 1987 %constbyteintegerarray cc(0 : 7) = '#','=',')','<','(','>', 'k','t' 14161 @ 111673: LINE 1987 "regression-compile-tmp/pass1.imp" 14162 @ 111709: PUSHI #0x00000000 14163 @ 111714: PUSHI #0x00000007 14164 @ 111719: BOUNDS 14165 @ 111720: DEF CC p1=V_010d 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 14166 @ 111734: PUSHI #0x00000023 14167 @ 111739: INIT 1 14168 @ 111742: PUSHI #0x0000003d 14169 @ 111747: INIT 1 14170 @ 111750: PUSHI #0x00000029 14171 @ 111755: INIT 1 14172 @ 111758: PUSHI #0x0000003c 14173 @ 111763: INIT 1 14174 @ 111766: PUSHI #0x00000028 14175 @ 111771: INIT 1 14176 @ 111774: PUSHI #0x0000003e 14177 @ 111779: INIT 1 14178 @ 111782: PUSHI #0x0000006b 14179 @ 111787: INIT 1 14180 @ 111790: PUSHI #0x00000074 14181 @ 111795: INIT 1 1988 %constbyteintegerarray anyform(0:15) = 1,0,1,1,1,1,1,1,0,1,1,0,1,1,1,1 1989 14182 @ 111798: LINE 1988 "regression-compile-tmp/pass1.imp" 14183 @ 111834: PUSHI #0x00000000 14184 @ 111839: PUSHI #0x0000000f 14185 @ 111844: BOUNDS 14186 @ 111845: DEF ANYFORM p1=V_010e 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 14187 @ 111864: PUSHI #0x00000001 14188 @ 111869: INIT 1 14189 @ 111872: PUSHI #0x00000000 14190 @ 111877: INIT 1 14191 @ 111880: PUSHI #0x00000001 14192 @ 111885: INIT 1 14193 @ 111888: PUSHI #0x00000001 14194 @ 111893: INIT 1 14195 @ 111896: PUSHI #0x00000001 14196 @ 111901: INIT 1 14197 @ 111904: PUSHI #0x00000001 14198 @ 111909: INIT 1 14199 @ 111912: PUSHI #0x00000001 14200 @ 111917: INIT 1 14201 @ 111920: PUSHI #0x00000001 14202 @ 111925: INIT 1 14203 @ 111928: PUSHI #0x00000000 14204 @ 111933: INIT 1 14205 @ 111936: PUSHI #0x00000001 14206 @ 111941: INIT 1 14207 @ 111944: PUSHI #0x00000001 14208 @ 111949: INIT 1 14209 @ 111952: PUSHI #0x00000000 14210 @ 111957: INIT 1 14211 @ 111960: PUSHI #0x00000001 14212 @ 111965: INIT 1 14213 @ 111968: PUSHI #0x00000001 14214 @ 111973: INIT 1 14215 @ 111976: PUSHI #0x00000001 14216 @ 111981: INIT 1 14217 @ 111984: PUSHI #0x00000001 14218 @ 111989: INIT 1 1990 %constintegerarray decmap(0:15) = %c 1991 1, 2, 1992 16_100B, 16_100D, 16_140C, 16_140E, 1993 3, 4, 1994 16_1007, 16_1008, 16_1009, 16_100A, 1995 6, 0, 0, 0 14219 @ 111992: LINE 1990 "regression-compile-tmp/pass1.imp" 14220 @ 112028: PUSHI #0x00000000 14221 @ 112033: PUSHI #0x0000000f 14222 @ 112038: BOUNDS 14223 @ 112039: DEF DECMAP p1=V_010f a/tf=1b b/format=1 c/ostate=112 type=1 (integer) form=11 (array) special=0 () linkage=2 (constant) spec=0 indirect=1 unass=0 14224 @ 112057: PUSHI #0x00000001 14225 @ 112062: INIT 1 14226 @ 112065: PUSHI #0x00000002 14227 @ 112070: INIT 1 14228 @ 112073: PUSHI #0x0000100b 14229 @ 112078: INIT 1 14230 @ 112081: PUSHI #0x0000100d 14231 @ 112086: INIT 1 14232 @ 112089: PUSHI #0x0000140c 14233 @ 112094: INIT 1 14234 @ 112097: PUSHI #0x0000140e 14235 @ 112102: INIT 1 14236 @ 112105: PUSHI #0x00000003 14237 @ 112110: INIT 1 14238 @ 112113: PUSHI #0x00000004 14239 @ 112118: INIT 1 14240 @ 112121: PUSHI #0x00001007 14241 @ 112126: INIT 1 14242 @ 112129: PUSHI #0x00001008 14243 @ 112134: INIT 1 14244 @ 112137: PUSHI #0x00001009 14245 @ 112142: INIT 1 14246 @ 112145: PUSHI #0x0000100a 14247 @ 112150: INIT 1 14248 @ 112153: PUSHI #0x00000006 14249 @ 112158: INIT 1 14250 @ 112161: PUSHI #0x00000000 14251 @ 112166: INIT 1 14252 @ 112169: PUSHI #0x00000000 14253 @ 112174: INIT 1 14254 @ 112177: PUSHI #0x00000000 14255 @ 112182: INIT 1 1996 %ownbyteintegerarray cnest(0:15) 14256 @ 112185: LINE 1996 "regression-compile-tmp/pass1.imp" 14257 @ 112221: PUSHI #0x00000000 14258 @ 112226: PUSHI #0x0000000f 14259 @ 112231: BOUNDS 14260 @ 112232: DEF CNEST p1=V_0110 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 14261 @ 112249: INIT 16 1997 %integer lmode, clab, dupid 14262 @ 112252: LINE 1997 "regression-compile-tmp/pass1.imp" 14263 @ 112288: DEF LMODE p1=V_0111 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14264 @ 112305: DEF CLAB p1=V_0112 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14265 @ 112321: DEF DUPID p1=V_0113 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1998 %integer resln 14266 @ 112338: LINE 1998 "regression-compile-tmp/pass1.imp" 14267 @ 112374: DEF RESLN p1=V_0114 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1999 %owninteger last def = 0 14268 @ 112391: LINE 1999 "regression-compile-tmp/pass1.imp" 14269 @ 112427: PUSHI #0x00000000 14270 @ 112432: DEF LASTDEF p1=V_0115 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 14271 @ 112451: INIT 1 2000 %owninteger lb, ub 14272 @ 112454: LINE 2000 "regression-compile-tmp/pass1.imp" 14273 @ 112490: DEF LB p1=V_0116 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 14274 @ 112504: INIT 1 14275 @ 112507: DEF UB p1=V_0117 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 14276 @ 112521: INIT 1 2001 %integer cp, ord 14277 @ 112524: LINE 2001 "regression-compile-tmp/pass1.imp" 14278 @ 112560: DEF CP p1=V_0118 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14279 @ 112574: DEF ORD p1=V_0119 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2002 %integer next, link, j, k, n, done 14280 @ 112589: LINE 2002 "regression-compile-tmp/pass1.imp" 14281 @ 112625: DEF NEXT p1=V_011a a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14282 @ 112641: DEF LINK p1=V_011b a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14283 @ 112657: DEF J p1=V_011c a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14284 @ 112670: DEF K p1=V_011d a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14285 @ 112683: DEF N p1=V_011e a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14286 @ 112696: DEF DONE p1=V_011f a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2003 %integer class 14287 @ 112712: LINE 2003 "regression-compile-tmp/pass1.imp" 14288 @ 112748: DEF CLASS p1=V_0120 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2004 %integer lit2, defs, decs, cident 14289 @ 112765: LINE 2004 "regression-compile-tmp/pass1.imp" 14290 @ 112801: DEF LIT2 p1=V_0121 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14291 @ 112817: DEF DEFS p1=V_0122 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14292 @ 112833: DEF DECS p1=V_0123 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14293 @ 112849: DEF CIDENT p1=V_0124 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2005 %integer pending; %ownintegerarray pstack(1:40) 14294 @ 112867: LINE 2005 "regression-compile-tmp/pass1.imp" 14295 @ 112903: DEF PENDING p1=V_0125 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14296 @ 112922: LINE 2005 "regression-compile-tmp/pass1.imp" 14297 @ 112958: PUSHI #0x00000001 14298 @ 112963: PUSHI #0x00000028 14299 @ 112968: BOUNDS 14300 @ 112969: DEF PSTACK p1=V_0126 a/tf=1b b/format=1 c/ostate=121 type=1 (integer) form=11 (array) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 14301 @ 112987: INIT 40 2006 %ownstring(8) name = "" 14302 @ 112990: LINE 2006 "regression-compile-tmp/pass1.imp" 14303 @ 113026: PUSHS "" 14304 @ 113028: DEF NAME p1=V_0127 a/tf=31 b/format=8 c/ostate=21 type=3 (string) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 14305 @ 113044: INIT 1 2007 %owninteger count = 0 2008 14306 @ 113047: LINE 2007 "regression-compile-tmp/pass1.imp" 14307 @ 113083: PUSHI #0x00000000 14308 @ 113088: DEF COUNT p1=V_0128 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 14309 @ 113105: INIT 1 2009 %routine def lab(%integer l) 14310 @ 113108: LINE 2009 "regression-compile-tmp/pass1.imp" 14311 @ 113144: DEF DEFLAB (_lev0id0_COMPILEBLOCK_COMPILE_DEFLAB) p1=V_0129 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14312 @ 113162: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 14313 @ 113163: DEF L p1=V_012a a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14314 @ 113176: FINISH ) {lev=4} 2010 op(':', l) 14315 @ 113177: LINE 2010 "regression-compile-tmp/pass1.imp" 14316 @ 113213: PUSH OP 14317 @ 113216: PUSHI #0x0000003a 14318 @ 113221: ASSPAR 14319 @ 113222: PUSH L 14320 @ 113225: ASSPAR 14321 @ 113226: CALL 2011 access = 1 14322 @ 113227: LINE 2011 "regression-compile-tmp/pass1.imp" 14323 @ 113263: PUSH ACCESS 14324 @ 113266: PUSHI #0x00000001 14325 @ 113271: ASSVAL 2012 %end 2013 14326 @ 113272: LINE 2012 "regression-compile-tmp/pass1.imp" 14327 @ 113308: END _lev0id0_COMPILEBLOCK_COMPILE_DEFLAB {lev=4 --> 3} 2014 %routine get next 14328 @ 113309: LINE 2014 "regression-compile-tmp/pass1.imp" 14329 @ 113345: DEF GETNEXT (_lev0id0_COMPILEBLOCK_COMPILE_GETNEXT) p1=V_012a a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14330 @ 113364: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 14331 @ 113365: FINISH ) {lev=4} 2015 %record(arfm)%name p 14332 @ 113366: LINE 2015 "regression-compile-tmp/pass1.imp" 14333 @ 113402: DEF P p1=V_012b a/tf=42 b/format=83 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2016 gn: %if next = 0 %start; ! end of phrase 14334 @ 113415: LINE 2016 "regression-compile-tmp/pass1.imp" 14335 @ 113451: LABEL L_012c 14336 @ 113454: LINE 2016 "regression-compile-tmp/pass1.imp" 14337 @ 113490: PUSH NEXT 14338 @ 113493: PUSHI #0x00000000 14339 @ 113498: JUMPIF # L_0004 2017 class = 0 %and %return %if link = 0; ! end of statement 14340 @ 113502: LINE 2017 "regression-compile-tmp/pass1.imp" 14341 @ 113538: PUSH LINK 14342 @ 113541: PUSHI #0x00000000 14343 @ 113546: JUMPIF # L_0007 14344 @ 113550: PUSH CLASS 14345 @ 113553: PUSHI #0x00000000 14346 @ 113558: ASSVAL 14347 @ 113559: RETURN 14348 @ 113560: LOCATE L_0007 2018 p == ar(link) 14349 @ 113563: LINE 2018 "regression-compile-tmp/pass1.imp" 14350 @ 113599: PUSH P 14351 @ 113602: PUSH AR 14352 @ 113605: PUSH LINK 14353 @ 113608: ACCESS 14354 @ 113609: ASSREF 2019 next = p_link 14355 @ 113610: LINE 2019 "regression-compile-tmp/pass1.imp" 14356 @ 113646: PUSH NEXT 14357 @ 113649: PUSH P 14358 @ 113652: SELECT 3 14359 @ 113655: ASSVAL 2020 link = p_sub 14360 @ 113656: LINE 2020 "regression-compile-tmp/pass1.imp" 14361 @ 113692: PUSH LINK 14362 @ 113695: PUSH P 14363 @ 113698: SELECT 2 14364 @ 113701: ASSVAL 2021 %finish 14365 @ 113702: LINE 2021 "regression-compile-tmp/pass1.imp" 14366 @ 113738: LOCATE L_0004 2022 %cycle 14367 @ 113741: LINE 2022 "regression-compile-tmp/pass1.imp" 14368 @ 113777: LOCATE L_0003 2023 p == ar(next) 14369 @ 113780: LINE 2023 "regression-compile-tmp/pass1.imp" 14370 @ 113816: PUSH P 14371 @ 113819: PUSH AR 14372 @ 113822: PUSH NEXT 14373 @ 113825: ACCESS 14374 @ 113826: ASSREF 2024 x = p_sub 14375 @ 113827: LINE 2024 "regression-compile-tmp/pass1.imp" 14376 @ 113863: PUSH X 14377 @ 113866: PUSH P 14378 @ 113869: SELECT 2 14379 @ 113872: ASSVAL 2025 class = p_class 14380 @ 113873: LINE 2025 "regression-compile-tmp/pass1.imp" 14381 @ 113909: PUSH CLASS 14382 @ 113912: PUSH P 14383 @ 113915: SELECT 1 14384 @ 113918: ASSVAL 2026 %exit %if class < actions; ! an atom 14385 @ 113919: LINE 2026 "regression-compile-tmp/pass1.imp" 14386 @ 113955: PUSH CLASS 14387 @ 113958: PUSHI #0x000000b4 14388 @ 113963: JUMPIF >= L_0007 14389 @ 113967: GOTO L_0004 14390 @ 113970: LOCATE L_0007 2027 %if x = 0 %start; ! null phrase 14391 @ 113973: LINE 2027 "regression-compile-tmp/pass1.imp" 14392 @ 114009: PUSH X 14393 @ 114012: PUSHI #0x00000000 14394 @ 114017: JUMPIF # L_0007 2028 next = p_link; ->gn 14395 @ 114021: LINE 2028 "regression-compile-tmp/pass1.imp" 14396 @ 114057: PUSH NEXT 14397 @ 114060: PUSH P 14398 @ 114063: SELECT 3 14399 @ 114066: ASSVAL 14400 @ 114067: LINE 2028 "regression-compile-tmp/pass1.imp" 14401 @ 114103: JUMP L_012c 2029 %finish 14402 @ 114106: LINE 2029 "regression-compile-tmp/pass1.imp" 14403 @ 114142: LOCATE L_0007 2030 %if p_link # 0 %start; ! follow a phrase 14404 @ 114145: LINE 2030 "regression-compile-tmp/pass1.imp" 14405 @ 114181: PUSH P 14406 @ 114184: SELECT 3 14407 @ 114187: PUSHI #0x00000000 14408 @ 114192: JUMPIF = L_0007 2031 p_sub = link; link = next 14409 @ 114196: LINE 2031 "regression-compile-tmp/pass1.imp" 14410 @ 114232: PUSH P 14411 @ 114235: SELECT 2 14412 @ 114238: PUSH LINK 14413 @ 114241: ASSVAL 14414 @ 114242: LINE 2031 "regression-compile-tmp/pass1.imp" 14415 @ 114278: PUSH LINK 14416 @ 114281: PUSH NEXT 14417 @ 114284: ASSVAL 2032 %finish 14418 @ 114285: LINE 2032 "regression-compile-tmp/pass1.imp" 14419 @ 114321: LOCATE L_0007 2033 next = x 14420 @ 114324: LINE 2033 "regression-compile-tmp/pass1.imp" 14421 @ 114360: PUSH NEXT 14422 @ 114363: PUSH X 14423 @ 114366: ASSVAL 2034 %repeat 14424 @ 114367: LINE 2034 "regression-compile-tmp/pass1.imp" 14425 @ 114403: REPEAT L_0003 14426 @ 114406: LOCATE L_0004 2035 next = p_link 14427 @ 114409: LINE 2035 "regression-compile-tmp/pass1.imp" 14428 @ 114445: PUSH NEXT 14429 @ 114448: PUSH P 14430 @ 114451: SELECT 3 14431 @ 114454: ASSVAL 2036 %if diag&2 # 0 %start 14432 @ 114455: LINE 2036 "regression-compile-tmp/pass1.imp" 14433 @ 114491: PUSH DIAG 14434 @ 114494: PUSHI #0x00000002 14435 @ 114499: AND 14436 @ 114500: PUSHI #0x00000000 14437 @ 114505: JUMPIF = L_0004 2037 spaces(8-length(name)) %unless length(name) = 0 14438 @ 114509: LINE 2037 "regression-compile-tmp/pass1.imp" 14439 @ 114545: PUSH LENGTH 14440 @ 114548: PUSH NAME 14441 @ 114551: ASSPAR 14442 @ 114552: CALL 14443 @ 114553: PUSHI #0x00000000 14444 @ 114558: JUMPIF = L_0007 14445 @ 114562: PUSH SPACES 14446 @ 114565: PUSHI #0x00000008 14447 @ 114570: PUSH LENGTH 14448 @ 114573: PUSH NAME 14449 @ 114576: ASSPAR 14450 @ 114577: CALL 14451 @ 114578: SUB 14452 @ 114579: ASSPAR 14453 @ 114580: CALL 14454 @ 114581: LOCATE L_0007 2038 name = text(class) 14455 @ 114584: LINE 2038 "regression-compile-tmp/pass1.imp" 14456 @ 114620: PUSH NAME 14457 @ 114623: PUSH TEXT 14458 @ 114626: PUSH CLASS 14459 @ 114629: ACCESS 14460 @ 114630: ASSVAL 2039 write(x, 2) 14461 @ 114631: LINE 2039 "regression-compile-tmp/pass1.imp" 14462 @ 114667: PUSH WRITE 14463 @ 114670: PUSH X 14464 @ 114673: ASSPAR 14465 @ 114674: PUSHI #0x00000002 14466 @ 114679: ASSPAR 14467 @ 114680: CALL 2040 space 14468 @ 114681: LINE 2040 "regression-compile-tmp/pass1.imp" 14469 @ 114717: PUSH SPACE 14470 @ 114720: CALL 2041 printstring(name) 14471 @ 114721: LINE 2041 "regression-compile-tmp/pass1.imp" 14472 @ 114757: PUSH PRINTSTRING 14473 @ 114760: PUSH NAME 14474 @ 114763: ASSPAR 14475 @ 114764: CALL 2042 space 14476 @ 114765: LINE 2042 "regression-compile-tmp/pass1.imp" 14477 @ 114801: PUSH SPACE 14478 @ 114804: CALL 2043 count = count-1 14479 @ 114805: LINE 2043 "regression-compile-tmp/pass1.imp" 14480 @ 114841: PUSH COUNT 14481 @ 114844: PUSH COUNT 14482 @ 114847: PUSHI #0x00000001 14483 @ 114852: SUB 14484 @ 114853: ASSVAL 2044 %if count <= 0 %start 14485 @ 114854: LINE 2044 "regression-compile-tmp/pass1.imp" 14486 @ 114890: PUSH COUNT 14487 @ 114893: PUSHI #0x00000000 14488 @ 114898: JUMPIF > L_0007 2045 count = 5 14489 @ 114902: LINE 2045 "regression-compile-tmp/pass1.imp" 14490 @ 114938: PUSH COUNT 14491 @ 114941: PUSHI #0x00000005 14492 @ 114946: ASSVAL 2046 name = "" 14493 @ 114947: LINE 2046 "regression-compile-tmp/pass1.imp" 14494 @ 114983: PUSH NAME 14495 @ 114986: PUSHS "" 14496 @ 114988: ASSVAL 2047 newline 14497 @ 114989: LINE 2047 "regression-compile-tmp/pass1.imp" 14498 @ 115025: PUSH NEWLINE 14499 @ 115028: CALL 2048 %finish 14500 @ 115029: LINE 2048 "regression-compile-tmp/pass1.imp" 14501 @ 115065: LOCATE L_0007 2049 %finish 14502 @ 115068: LINE 2049 "regression-compile-tmp/pass1.imp" 14503 @ 115104: LOCATE L_0004 2050 %end 2051 14504 @ 115107: LINE 2050 "regression-compile-tmp/pass1.imp" 14505 @ 115143: END _lev0id0_COMPILEBLOCK_COMPILE_GETNEXT {lev=4 --> 3} 2052 %routine set subs(%integer n) 2053 !update the app field in n array descriptors 14506 @ 115144: LINE 2052 "regression-compile-tmp/pass1.imp" 14507 @ 115180: DEF SETSUBS (_lev0id0_COMPILEBLOCK_COMPILE_SETSUBS) p1=V_012b a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14508 @ 115199: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 14509 @ 115200: DEF N p1=V_012c a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14510 @ 115213: FINISH ) {lev=4} 2054 %integer p 14511 @ 115214: LINE 2054 "regression-compile-tmp/pass1.imp" 14512 @ 115250: DEF P p1=V_012d a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2055 p = tmax 14513 @ 115263: LINE 2055 "regression-compile-tmp/pass1.imp" 14514 @ 115299: PUSH P 14515 @ 115302: PUSH TMAX 14516 @ 115305: ASSVAL 2056 %while n > 0 %cycle 2057 !%signal 15,15 %if p < tbase 14517 @ 115306: LINE 2056 "regression-compile-tmp/pass1.imp" 14518 @ 115342: LOCATE L_0003 14519 @ 115345: PUSH N 14520 @ 115348: PUSHI #0x00000000 14521 @ 115353: JUMPIF <= L_0004 2058 tag(p)_app = dimension 14522 @ 115357: LINE 2058 "regression-compile-tmp/pass1.imp" 14523 @ 115393: PUSH TAG 14524 @ 115396: PUSH P 14525 @ 115399: ACCESS 14526 @ 115400: SELECT 1 14527 @ 115403: PUSH DIMENSION 14528 @ 115406: ASSVAL 2059 p = p-1; n = n-1 14529 @ 115407: LINE 2059 "regression-compile-tmp/pass1.imp" 14530 @ 115443: PUSH P 14531 @ 115446: PUSH P 14532 @ 115449: PUSHI #0x00000001 14533 @ 115454: SUB 14534 @ 115455: ASSVAL 14535 @ 115456: LINE 2059 "regression-compile-tmp/pass1.imp" 14536 @ 115492: PUSH N 14537 @ 115495: PUSH N 14538 @ 115498: PUSHI #0x00000001 14539 @ 115503: SUB 14540 @ 115504: ASSVAL 2060 %repeat 14541 @ 115505: LINE 2060 "regression-compile-tmp/pass1.imp" 14542 @ 115541: REPEAT L_0003 14543 @ 115544: LOCATE L_0004 2061 %end 2062 14544 @ 115547: LINE 2061 "regression-compile-tmp/pass1.imp" 14545 @ 115583: END _lev0id0_COMPILEBLOCK_COMPILE_SETSUBS {lev=4 --> 3} 2063 %routine set bp 2064 !define a constant bound pair from the last stacked constants 14546 @ 115584: LINE 2063 "regression-compile-tmp/pass1.imp" 14547 @ 115620: DEF SETBP (_lev0id0_COMPILEBLOCK_COMPILE_SETBP) p1=V_012c a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14548 @ 115637: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 14549 @ 115638: FINISH ) {lev=4} 2065 pending = pending-2 14550 @ 115639: LINE 2065 "regression-compile-tmp/pass1.imp" 14551 @ 115675: PUSH PENDING 14552 @ 115678: PUSH PENDING 14553 @ 115681: PUSHI #0x00000002 14554 @ 115686: SUB 14555 @ 115687: ASSVAL 2066 lb = pstack(pending+1); ub = pstack(pending+2) 14556 @ 115688: LINE 2066 "regression-compile-tmp/pass1.imp" 14557 @ 115724: PUSH LB 14558 @ 115727: PUSH PSTACK 14559 @ 115730: PUSH PENDING 14560 @ 115733: PUSHI #0x00000001 14561 @ 115738: ADD 14562 @ 115739: ACCESS 14563 @ 115740: ASSVAL 14564 @ 115741: LINE 2066 "regression-compile-tmp/pass1.imp" 14565 @ 115777: PUSH UB 14566 @ 115780: PUSH PSTACK 14567 @ 115783: PUSH PENDING 14568 @ 115786: PUSHI #0x00000002 14569 @ 115791: ADD 14570 @ 115792: ACCESS 14571 @ 115793: ASSVAL 2067 %if ub-lb+1 < 0 %start 14572 @ 115794: LINE 2067 "regression-compile-tmp/pass1.imp" 14573 @ 115830: PUSH UB 14574 @ 115833: PUSH LB 14575 @ 115836: SUB 14576 @ 115837: PUSHI #0x00000001 14577 @ 115842: ADD 14578 @ 115843: PUSHI #0x00000000 14579 @ 115848: JUMPIF >= L_0004 2068 pos1 = 0; next = link; fault(11) 14580 @ 115852: LINE 2068 "regression-compile-tmp/pass1.imp" 14581 @ 115888: PUSH POS1 14582 @ 115891: PUSHI #0x00000000 14583 @ 115896: ASSVAL 14584 @ 115897: LINE 2068 "regression-compile-tmp/pass1.imp" 14585 @ 115933: PUSH NEXT 14586 @ 115936: PUSH LINK 14587 @ 115939: ASSVAL 14588 @ 115940: LINE 2068 "regression-compile-tmp/pass1.imp" 14589 @ 115976: PUSH FAULT 14590 @ 115979: PUSHI #0x0000000b 14591 @ 115984: ASSPAR 14592 @ 115985: CALL 2069 ub = lb 14593 @ 115986: LINE 2069 "regression-compile-tmp/pass1.imp" 14594 @ 116022: PUSH UB 14595 @ 116025: PUSH LB 14596 @ 116028: ASSVAL 2070 %finish 14597 @ 116029: LINE 2070 "regression-compile-tmp/pass1.imp" 14598 @ 116065: LOCATE L_0004 2071 set const(lb); set const(ub) 14599 @ 116068: LINE 2071 "regression-compile-tmp/pass1.imp" 14600 @ 116104: PUSH SETCONST 14601 @ 116107: PUSH LB 14602 @ 116110: ASSPAR 14603 @ 116111: CALL 14604 @ 116112: LINE 2071 "regression-compile-tmp/pass1.imp" 14605 @ 116148: PUSH SETCONST 14606 @ 116151: PUSH UB 14607 @ 116154: ASSPAR 14608 @ 116155: CALL 2072 add char( 'b' ) %unless class = 146 14609 @ 116156: LINE 2072 "regression-compile-tmp/pass1.imp" 14610 @ 116192: PUSH CLASS 14611 @ 116195: PUSHI #0x00000092 14612 @ 116200: JUMPIF = L_0004 14613 @ 116204: PUSH ADDCHAR 14614 @ 116207: PUSHI #0x00000062 14615 @ 116212: ASSPAR 14616 @ 116213: CALL 14617 @ 116214: LOCATE L_0004 2073 %end 2074 14618 @ 116217: LINE 2073 "regression-compile-tmp/pass1.imp" 14619 @ 116253: END _lev0id0_COMPILEBLOCK_COMPILE_SETBP {lev=4 --> 3} 2075 %routine compile end(%integer type) 2076 ! type = 0:eof, 1:eop, 2:end 14620 @ 116254: LINE 2075 "regression-compile-tmp/pass1.imp" 14621 @ 116290: DEF COMPILEEND (_lev0id0_COMPILEBLOCK_COMPILE_COMPILEEND) p1=V_012d a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14622 @ 116312: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 14623 @ 116313: DEF TYPE p1=V_012e a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14624 @ 116329: FINISH ) {lev=4} 2077 %if access # 0 %start 14625 @ 116330: LINE 2077 "regression-compile-tmp/pass1.imp" 14626 @ 116366: PUSH ACCESS 14627 @ 116369: PUSHI #0x00000000 14628 @ 116374: JUMPIF = L_0004 2078 open = 0 14629 @ 116378: LINE 2078 "regression-compile-tmp/pass1.imp" 14630 @ 116414: PUSH OPEN 14631 @ 116417: PUSHI #0x00000000 14632 @ 116422: ASSVAL 2079 fault(19) %if block form > proc; ! can reach end 14633 @ 116423: LINE 2079 "regression-compile-tmp/pass1.imp" 14634 @ 116459: PUSH BLOCKFORM 14635 @ 116462: PUSHI #0x00000007 14636 @ 116467: JUMPIF <= L_0007 14637 @ 116471: PUSH FAULT 14638 @ 116474: PUSHI #0x00000013 14639 @ 116479: ASSPAR 14640 @ 116480: CALL 14641 @ 116481: LOCATE L_0007 2080 %finish 2081 14642 @ 116484: LINE 2080 "regression-compile-tmp/pass1.imp" 14643 @ 116520: LOCATE L_0004 2082 %while dict(dmin) >= 0 %cycle; ! finishes & repeats 14644 @ 116523: LINE 2082 "regression-compile-tmp/pass1.imp" 14645 @ 116559: LOCATE L_0003 14646 @ 116562: PUSH DICT 14647 @ 116565: PUSH DMIN 14648 @ 116568: ACCESS 14649 @ 116569: PUSHI #0x00000000 14650 @ 116574: JUMPIF < L_0004 2083 fault(17+dict(dmin)&1) 14651 @ 116578: LINE 2083 "regression-compile-tmp/pass1.imp" 14652 @ 116614: PUSH FAULT 14653 @ 116617: PUSHI #0x00000011 14654 @ 116622: PUSH DICT 14655 @ 116625: PUSH DMIN 14656 @ 116628: ACCESS 14657 @ 116629: PUSHI #0x00000001 14658 @ 116634: AND 14659 @ 116635: ADD 14660 @ 116636: ASSPAR 14661 @ 116637: CALL 2084 dmin = dmin+1 14662 @ 116638: LINE 2084 "regression-compile-tmp/pass1.imp" 14663 @ 116674: PUSH DMIN 14664 @ 116677: PUSH DMIN 14665 @ 116680: PUSHI #0x00000001 14666 @ 116685: ADD 14667 @ 116686: ASSVAL 2085 %repeat 2086 !{delete names(0)} 14668 @ 116687: LINE 2085 "regression-compile-tmp/pass1.imp" 14669 @ 116723: REPEAT L_0003 14670 @ 116726: LOCATE L_0004 2087 add char( ';' ) 14671 @ 116729: LINE 2087 "regression-compile-tmp/pass1.imp" 14672 @ 116765: PUSH ADDCHAR 14673 @ 116768: PUSHI #0x0000003b 14674 @ 116773: ASSPAR 14675 @ 116774: CALL 2088 add char( ';' ) %if type = 1; ! endofprogram 2089 14676 @ 116775: LINE 2088 "regression-compile-tmp/pass1.imp" 14677 @ 116811: PUSH TYPE 14678 @ 116814: PUSHI #0x00000001 14679 @ 116819: JUMPIF # L_0004 14680 @ 116823: PUSH ADDCHAR 14681 @ 116826: PUSHI #0x0000003b 14682 @ 116831: ASSPAR 14683 @ 116832: CALL 14684 @ 116833: LOCATE L_0004 2090 bflags = bflags!open; ! show if it returns 2091 14685 @ 116836: LINE 2090 "regression-compile-tmp/pass1.imp" 14686 @ 116872: PUSH BFLAGS 14687 @ 116875: PUSH BFLAGS 14688 @ 116878: PUSH OPEN 14689 @ 116881: OR 14690 @ 116882: ASSVAL 2092 def lab(0) %if block tag # 0 %and level # 1; ! for jump around 14691 @ 116883: LINE 2092 "regression-compile-tmp/pass1.imp" 14692 @ 116919: PUSH BLOCKTAG 14693 @ 116922: PUSHI #0x00000000 14694 @ 116927: JUMPIF = L_0004 14695 @ 116931: PUSH LEVEL 14696 @ 116934: PUSHI #0x00000001 14697 @ 116939: JUMPIF = L_0004 14698 @ 116943: PUSH DEFLAB 14699 @ 116946: PUSHI #0x00000000 14700 @ 116951: ASSPAR 14701 @ 116952: CALL 14702 @ 116953: LOCATE L_0004 2093 %if type # 2 %start; ! eop, eof 14703 @ 116956: LINE 2093 "regression-compile-tmp/pass1.imp" 14704 @ 116992: PUSH TYPE 14705 @ 116995: PUSHI #0x00000002 14706 @ 117000: JUMPIF = L_0004 2094 fault(16) %if level # type; ! end missing 14707 @ 117004: LINE 2094 "regression-compile-tmp/pass1.imp" 14708 @ 117040: PUSH LEVEL 14709 @ 117043: PUSH TYPE 14710 @ 117046: JUMPIF = L_0007 14711 @ 117050: PUSH FAULT 14712 @ 117053: PUSHI #0x00000010 14713 @ 117058: ASSPAR 14714 @ 117059: CALL 14715 @ 117060: LOCATE L_0007 2095 %finish %else %start 14716 @ 117063: LINE 2095 "regression-compile-tmp/pass1.imp" 14717 @ 117099: GOTO L_0003 14718 @ 117102: LOCATE L_0004 2096 %if level = 0 %start 14719 @ 117105: LINE 2096 "regression-compile-tmp/pass1.imp" 14720 @ 117141: PUSH LEVEL 14721 @ 117144: PUSHI #0x00000000 14722 @ 117149: JUMPIF # L_0007 2097 fault(15); ! spurious end 14723 @ 117153: LINE 2097 "regression-compile-tmp/pass1.imp" 14724 @ 117189: PUSH FAULT 14725 @ 117192: PUSHI #0x0000000f 14726 @ 117197: ASSPAR 14727 @ 117198: CALL 2098 %finish 14728 @ 117199: LINE 2098 "regression-compile-tmp/pass1.imp" 14729 @ 117235: LOCATE L_0007 2099 %finish 2100 14730 @ 117238: LINE 2099 "regression-compile-tmp/pass1.imp" 14731 @ 117274: LOCATE L_0003 2101 end mark = 11; !******Mouses specific****** 14732 @ 117277: LINE 2101 "regression-compile-tmp/pass1.imp" 14733 @ 117313: PUSH ENDMARK 14734 @ 117316: PUSHI #0x0000000b 14735 @ 117321: ASSVAL 2102 %end 2103 14736 @ 117322: LINE 2102 "regression-compile-tmp/pass1.imp" 14737 @ 117358: END _lev0id0_COMPILEBLOCK_COMPILE_COMPILEEND {lev=4 --> 3} 2104 %routine def(%integer p) 2105 !dump a descriptor 14738 @ 117359: LINE 2104 "regression-compile-tmp/pass1.imp" 14739 @ 117395: DEF DEF (_lev0id0_COMPILEBLOCK_COMPILE_DEF) p1=V_012e a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14740 @ 117410: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 14741 @ 117411: DEF P p1=V_012f a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14742 @ 117424: FINISH ) {lev=4} 2106 %integer t, f, type 14743 @ 117425: LINE 2106 "regression-compile-tmp/pass1.imp" 14744 @ 117461: DEF T p1=V_0130 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14745 @ 117474: DEF F p1=V_0131 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 14746 @ 117487: DEF TYPE p1=V_0132 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2107 %record(tagfm)%name v 14747 @ 117503: LINE 2107 "regression-compile-tmp/pass1.imp" 14748 @ 117539: DEF V p1=V_0133 a/tf=42 b/format=84 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2108 flush buffer( 1 ); ! flush if bp > 0 14749 @ 117552: LINE 2108 "regression-compile-tmp/pass1.imp" 14750 @ 117588: PUSH FLUSHBUFFER 14751 @ 117591: PUSHI #0x00000001 14752 @ 117596: ASSPAR 14753 @ 117597: CALL 2109 defs = defs+1 14754 @ 117598: LINE 2109 "regression-compile-tmp/pass1.imp" 14755 @ 117634: PUSH DEFS 14756 @ 117637: PUSH DEFS 14757 @ 117640: PUSHI #0x00000001 14758 @ 117645: ADD 14759 @ 117646: ASSVAL 2110 v == tag(p) 14760 @ 117647: LINE 2110 "regression-compile-tmp/pass1.imp" 14761 @ 117683: PUSH V 14762 @ 117686: PUSH TAG 14763 @ 117689: PUSH P 14764 @ 117692: ACCESS 14765 @ 117693: ASSREF 2111 t = 0 14766 @ 117694: LINE 2111 "regression-compile-tmp/pass1.imp" 14767 @ 117730: PUSH T 14768 @ 117733: PUSHI #0x00000000 14769 @ 117738: ASSVAL 2112 %unless v_index < 0 %start; ! no index for subnames 14770 @ 117739: LINE 2112 "regression-compile-tmp/pass1.imp" 14771 @ 117775: PUSH V 14772 @ 117778: SELECT 4 14773 @ 117781: PUSHI #0x00000000 14774 @ 117786: JUMPIF < L_0004 2113 id = id+1 %and v_index = id %if v_index = 0 14775 @ 117790: LINE 2113 "regression-compile-tmp/pass1.imp" 14776 @ 117826: PUSH V 14777 @ 117829: SELECT 4 14778 @ 117832: PUSHI #0x00000000 14779 @ 117837: JUMPIF # L_0007 14780 @ 117841: PUSH ID 14781 @ 117844: PUSH ID 14782 @ 117847: PUSHI #0x00000001 14783 @ 117852: ADD 14784 @ 117853: ASSVAL 14785 @ 117854: PUSH V 14786 @ 117857: SELECT 4 14787 @ 117860: PUSH ID 14788 @ 117863: ASSVAL 14789 @ 117864: LOCATE L_0007 2114 last def = v_index 14790 @ 117867: LINE 2114 "regression-compile-tmp/pass1.imp" 14791 @ 117903: PUSH LASTDEF 14792 @ 117906: PUSH V 14793 @ 117909: SELECT 4 14794 @ 117912: ASSVAL 2115 t = last def 14795 @ 117913: LINE 2115 "regression-compile-tmp/pass1.imp" 14796 @ 117949: PUSH T 14797 @ 117952: PUSH LASTDEF 14798 @ 117955: ASSVAL 2116 %finish 14799 @ 117956: LINE 2116 "regression-compile-tmp/pass1.imp" 14800 @ 117992: LOCATE L_0004 2117 op('$', t) 14801 @ 117995: LINE 2117 "regression-compile-tmp/pass1.imp" 14802 @ 118031: PUSH OP 14803 @ 118034: PUSHI #0x00000024 14804 @ 118039: ASSPAR 14805 @ 118040: PUSH T 14806 @ 118043: ASSPAR 14807 @ 118044: CALL 2118 print ident(p, 1); ! output the name 14808 @ 118045: LINE 2118 "regression-compile-tmp/pass1.imp" 14809 @ 118081: PUSH PRINTIDENT 14810 @ 118084: PUSH P 14811 @ 118087: ASSPAR 14812 @ 118088: PUSHI #0x00000001 14813 @ 118093: ASSPAR 14814 @ 118094: CALL 2119 t = v_flags 14815 @ 118095: LINE 2119 "regression-compile-tmp/pass1.imp" 14816 @ 118131: PUSH T 14817 @ 118134: PUSH V 14818 @ 118137: SELECT 3 14819 @ 118140: ASSVAL 2120 type = t 14820 @ 118141: LINE 2120 "regression-compile-tmp/pass1.imp" 14821 @ 118177: PUSH TYPE 14822 @ 118180: PUSH T 14823 @ 118183: ASSVAL 2121 type = type&(\(7<<4)) %if type&(7<<4) >= 6<<4;!routine & pred 14824 @ 118184: LINE 2121 "regression-compile-tmp/pass1.imp" 14825 @ 118220: PUSH TYPE 14826 @ 118223: PUSHI #0x00000007 14827 @ 118228: PUSHI #0x00000004 14828 @ 118233: LSH 14829 @ 118234: AND 14830 @ 118235: PUSHI #0x00000006 14831 @ 118240: PUSHI #0x00000004 14832 @ 118245: LSH 14833 @ 118246: JUMPIF < L_0004 14834 @ 118250: PUSH TYPE 14835 @ 118253: PUSH TYPE 14836 @ 118256: PUSHI #0x00000007 14837 @ 118261: PUSHI #0x00000004 14838 @ 118266: LSH 14839 @ 118267: NOT 14840 @ 118268: AND 14841 @ 118269: ASSVAL 14842 @ 118270: LOCATE L_0004 2122 op(',', type&2_1111111); ! type & form 14843 @ 118273: LINE 2122 "regression-compile-tmp/pass1.imp" 14844 @ 118309: PUSH OP 14845 @ 118312: PUSHI #0x0000002c 14846 @ 118317: ASSPAR 14847 @ 118318: PUSH TYPE 14848 @ 118321: PUSHI #0x0000007f 14849 @ 118326: AND 14850 @ 118327: ASSPAR 14851 @ 118328: CALL 2123 f = v_format 14852 @ 118329: LINE 2123 "regression-compile-tmp/pass1.imp" 14853 @ 118365: PUSH F 14854 @ 118368: PUSH V 14855 @ 118371: SELECT 2 14856 @ 118374: ASSVAL 2124 f = tag(f)_index %if t&16_70 = record<<4 14857 @ 118375: LINE 2124 "regression-compile-tmp/pass1.imp" 14858 @ 118411: PUSH T 14859 @ 118414: PUSHI #0x00000070 14860 @ 118419: AND 14861 @ 118420: PUSHI #0x00000004 14862 @ 118425: PUSHI #0x00000004 14863 @ 118430: LSH 14864 @ 118431: JUMPIF # L_0004 14865 @ 118435: PUSH F 14866 @ 118438: PUSH TAG 14867 @ 118441: PUSH F 14868 @ 118444: ACCESS 14869 @ 118445: SELECT 4 14870 @ 118448: ASSVAL 14871 @ 118449: LOCATE L_0004 2125 f = v_index %if f < 0 14872 @ 118452: LINE 2125 "regression-compile-tmp/pass1.imp" 14873 @ 118488: PUSH F 14874 @ 118491: PUSHI #0x00000000 14875 @ 118496: JUMPIF >= L_0004 14876 @ 118500: PUSH F 14877 @ 118503: PUSH V 14878 @ 118506: SELECT 4 14879 @ 118509: ASSVAL 14880 @ 118510: LOCATE L_0004 2126 op(',', f); ! format 14881 @ 118513: LINE 2126 "regression-compile-tmp/pass1.imp" 14882 @ 118549: PUSH OP 14883 @ 118552: PUSHI #0x0000002c 14884 @ 118557: ASSPAR 14885 @ 118558: PUSH F 14886 @ 118561: ASSPAR 14887 @ 118562: CALL 2127 f = otype+t>>4&2_1111000 14888 @ 118563: LINE 2127 "regression-compile-tmp/pass1.imp" 14889 @ 118599: PUSH F 14890 @ 118602: PUSH OTYPE 14891 @ 118605: PUSH T 14892 @ 118608: PUSHI #0x00000004 14893 @ 118613: RSH 14894 @ 118614: PUSHI #0x00000078 14895 @ 118619: AND 14896 @ 118620: ADD 14897 @ 118621: ASSVAL 2128 f = f!8 %if class = 125; ! add spec from %DUP 14898 @ 118622: LINE 2128 "regression-compile-tmp/pass1.imp" 14899 @ 118658: PUSH CLASS 14900 @ 118661: PUSHI #0x0000007d 14901 @ 118666: JUMPIF # L_0004 14902 @ 118670: PUSH F 14903 @ 118673: PUSH F 14904 @ 118676: PUSHI #0x00000008 14905 @ 118681: OR 14906 @ 118682: ASSVAL 14907 @ 118683: LOCATE L_0004 2129 dim = v_app; ! dimension 14908 @ 118686: LINE 2129 "regression-compile-tmp/pass1.imp" 14909 @ 118722: PUSH DIM 14910 @ 118725: PUSH V 14911 @ 118728: SELECT 1 14912 @ 118731: ASSVAL 2130 dim = 0 %unless 0 < dim %and dim <= dim limit 14913 @ 118732: LINE 2130 "regression-compile-tmp/pass1.imp" 14914 @ 118768: PUSHI #0x00000000 14915 @ 118773: PUSH DIM 14916 @ 118776: JUMPIF >= L_0005 14917 @ 118780: PUSH DIM 14918 @ 118783: PUSHI #0x00000006 14919 @ 118788: JUMPIF <= L_0004 14920 @ 118792: LOCATE L_0005 14921 @ 118795: PUSH DIM 14922 @ 118798: PUSHI #0x00000000 14923 @ 118803: ASSVAL 14924 @ 118804: LOCATE L_0004 2131 op(',', f+dim<<8); ! otype & spec & prot 14925 @ 118807: LINE 2131 "regression-compile-tmp/pass1.imp" 14926 @ 118843: PUSH OP 14927 @ 118846: PUSHI #0x0000002c 14928 @ 118851: ASSPAR 14929 @ 118852: PUSH F 14930 @ 118855: PUSH DIM 14931 @ 118858: PUSHI #0x00000008 14932 @ 118863: LSH 14933 @ 118864: ADD 14934 @ 118865: ASSPAR 14935 @ 118866: CALL 2132 defs = 0 %if t¶meters = 0 14936 @ 118867: LINE 2132 "regression-compile-tmp/pass1.imp" 14937 @ 118903: PUSH T 14938 @ 118906: PUSHI #0x00001000 14939 @ 118911: AND 14940 @ 118912: PUSHI #0x00000000 14941 @ 118917: JUMPIF # L_0004 14942 @ 118921: PUSH DEFS 14943 @ 118924: PUSHI #0x00000000 14944 @ 118929: ASSVAL 14945 @ 118930: LOCATE L_0004 2133 f = t&15 14946 @ 118933: LINE 2133 "regression-compile-tmp/pass1.imp" 14947 @ 118969: PUSH F 14948 @ 118972: PUSH T 14949 @ 118975: PUSHI #0x0000000f 14950 @ 118980: AND 14951 @ 118981: ASSVAL 2134 %if v_flags&spec # 0 %start 14952 @ 118982: LINE 2134 "regression-compile-tmp/pass1.imp" 14953 @ 119018: PUSH V 14954 @ 119021: SELECT 3 14955 @ 119024: PUSHI #0x00000080 14956 @ 119029: AND 14957 @ 119030: PUSHI #0x00000000 14958 @ 119035: JUMPIF = L_0004 2135 v_flags = v_flags&(\spec) %unless 3 <= f %and f <= 10 14959 @ 119039: LINE 2135 "regression-compile-tmp/pass1.imp" 14960 @ 119075: PUSHI #0x00000003 14961 @ 119080: PUSH F 14962 @ 119083: JUMPIF > L_0008 14963 @ 119087: PUSH F 14964 @ 119090: PUSHI #0x0000000a 14965 @ 119095: JUMPIF <= L_0007 14966 @ 119099: LOCATE L_0008 14967 @ 119102: PUSH V 14968 @ 119105: SELECT 3 14969 @ 119108: PUSH V 14970 @ 119111: SELECT 3 14971 @ 119114: PUSHI #0x00000080 14972 @ 119119: NOT 14973 @ 119120: AND 14974 @ 119121: ASSVAL 14975 @ 119122: LOCATE L_0007 2136 ocount = -1; ! external specs have no constants 14976 @ 119125: LINE 2136 "regression-compile-tmp/pass1.imp" 14977 @ 119161: PUSH OCOUNT 14978 @ 119164: PUSHI #0x00000001 14979 @ 119169: NEGATE 14980 @ 119170: ASSVAL 2137 %finish 14981 @ 119171: LINE 2137 "regression-compile-tmp/pass1.imp" 14982 @ 119207: LOCATE L_0004 2138 dimension = 0 14983 @ 119210: LINE 2138 "regression-compile-tmp/pass1.imp" 14984 @ 119246: PUSH DIMENSION 14985 @ 119249: PUSHI #0x00000000 14986 @ 119254: ASSVAL 2139 %if otype = 2 %and (f=2 %or f=12 %or f=14) %start 14987 @ 119255: LINE 2139 "regression-compile-tmp/pass1.imp" 14988 @ 119291: PUSH OTYPE 14989 @ 119294: PUSHI #0x00000002 14990 @ 119299: JUMPIF # L_0004 14991 @ 119303: PUSH F 14992 @ 119306: PUSHI #0x00000002 14993 @ 119311: JUMPIF = L_0005 14994 @ 119315: PUSH F 14995 @ 119318: PUSHI #0x0000000c 14996 @ 119323: JUMPIF = L_0005 14997 @ 119327: PUSH F 14998 @ 119330: PUSHI #0x0000000e 14999 @ 119335: JUMPIF # L_0004 15000 @ 119339: LOCATE L_0005 2140 v_flags = v_flags-1; ! convert to simple 15001 @ 119342: LINE 2140 "regression-compile-tmp/pass1.imp" 15002 @ 119378: PUSH V 15003 @ 119381: SELECT 3 15004 @ 119384: PUSH V 15005 @ 119387: SELECT 3 15006 @ 119390: PUSHI #0x00000001 15007 @ 119395: SUB 15008 @ 119396: ASSVAL 2141 %finish 15009 @ 119397: LINE 2141 "regression-compile-tmp/pass1.imp" 15010 @ 119433: LOCATE L_0004 2142 %end 2143 15011 @ 119436: LINE 2142 "regression-compile-tmp/pass1.imp" 15012 @ 119472: END _lev0id0_COMPILEBLOCK_COMPILE_DEF {lev=4 --> 3} 2144 %routine def s lab(%integer n) 2145 ! define a switch label, x defines the switch tag 15013 @ 119473: LINE 2144 "regression-compile-tmp/pass1.imp" 15014 @ 119509: DEF DEFSLAB (_lev0id0_COMPILEBLOCK_COMPILE_DEFSLAB) p1=V_012f a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15015 @ 119528: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 15016 @ 119529: DEF N p1=V_0130 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15017 @ 119542: FINISH ) {lev=4} 2146 %integer p, l, b, w, bit 15018 @ 119543: LINE 2146 "regression-compile-tmp/pass1.imp" 15019 @ 119579: DEF P p1=V_0131 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15020 @ 119592: DEF L p1=V_0132 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15021 @ 119605: DEF B p1=V_0133 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15022 @ 119618: DEF W p1=V_0134 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15023 @ 119631: DEF BIT p1=V_0135 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2147 p = tag(x)_format; ! pointer to table 15024 @ 119646: LINE 2147 "regression-compile-tmp/pass1.imp" 15025 @ 119682: PUSH P 15026 @ 119685: PUSH TAG 15027 @ 119688: PUSH X 15028 @ 119691: ACCESS 15029 @ 119692: SELECT 2 15030 @ 119695: ASSVAL 2148 l = dict(p); ! lower bound 15031 @ 119696: LINE 2148 "regression-compile-tmp/pass1.imp" 15032 @ 119732: PUSH L 15033 @ 119735: PUSH DICT 15034 @ 119738: PUSH P 15035 @ 119741: ACCESS 15036 @ 119742: ASSVAL 2149 %if l <= n %and n <= dict(p+1) %start 15037 @ 119743: LINE 2149 "regression-compile-tmp/pass1.imp" 15038 @ 119779: PUSH L 15039 @ 119782: PUSH N 15040 @ 119785: JUMPIF > L_0004 15041 @ 119789: PUSH N 15042 @ 119792: PUSH DICT 15043 @ 119795: PUSH P 15044 @ 119798: PUSHI #0x00000001 15045 @ 119803: ADD 15046 @ 119804: ACCESS 15047 @ 119805: JUMPIF > L_0004 2150 b = n-l 15048 @ 119809: LINE 2150 "regression-compile-tmp/pass1.imp" 15049 @ 119845: PUSH B 15050 @ 119848: PUSH N 15051 @ 119851: PUSH L 15052 @ 119854: SUB 15053 @ 119855: ASSVAL 2151 w = b>>4+p 15054 @ 119856: LINE 2151 "regression-compile-tmp/pass1.imp" 15055 @ 119892: PUSH W 15056 @ 119895: PUSH B 15057 @ 119898: PUSHI #0x00000004 15058 @ 119903: RSH 15059 @ 119904: PUSH P 15060 @ 119907: ADD 15061 @ 119908: ASSVAL 2152 bit = 1<<(b&15) 15062 @ 119909: LINE 2152 "regression-compile-tmp/pass1.imp" 15063 @ 119945: PUSH BIT 15064 @ 119948: PUSHI #0x00000001 15065 @ 119953: PUSH B 15066 @ 119956: PUSHI #0x0000000f 15067 @ 119961: AND 15068 @ 119962: LSH 15069 @ 119963: ASSVAL 2153 %if dict(w+2)&bit # 0 %start; ! already set 15070 @ 119964: LINE 2153 "regression-compile-tmp/pass1.imp" 15071 @ 120000: PUSH DICT 15072 @ 120003: PUSH W 15073 @ 120006: PUSHI #0x00000002 15074 @ 120011: ADD 15075 @ 120012: ACCESS 15076 @ 120013: PUSH BIT 15077 @ 120016: AND 15078 @ 120017: PUSHI #0x00000000 15079 @ 120022: JUMPIF = L_0007 2154 fault(4) %if pending # 0 15080 @ 120026: LINE 2154 "regression-compile-tmp/pass1.imp" 15081 @ 120062: PUSH PENDING 15082 @ 120065: PUSHI #0x00000000 15083 @ 120070: JUMPIF = L_000a 15084 @ 120074: PUSH FAULT 15085 @ 120077: PUSHI #0x00000004 15086 @ 120082: ASSPAR 15087 @ 120083: CALL 15088 @ 120084: LOCATE L_000a 2155 %return 15089 @ 120087: LINE 2155 "regression-compile-tmp/pass1.imp" 15090 @ 120123: RETURN 2156 %finish 15091 @ 120124: LINE 2156 "regression-compile-tmp/pass1.imp" 15092 @ 120160: LOCATE L_0007 2157 dict(w+2) = dict(w+2)!bit %if pending # 0 15093 @ 120163: LINE 2157 "regression-compile-tmp/pass1.imp" 15094 @ 120199: PUSH PENDING 15095 @ 120202: PUSHI #0x00000000 15096 @ 120207: JUMPIF = L_0007 15097 @ 120211: PUSH DICT 15098 @ 120214: PUSH W 15099 @ 120217: PUSHI #0x00000002 15100 @ 120222: ADD 15101 @ 120223: ACCESS 15102 @ 120224: PUSH DICT 15103 @ 120227: PUSH W 15104 @ 120230: PUSHI #0x00000002 15105 @ 120235: ADD 15106 @ 120236: ACCESS 15107 @ 120237: PUSH BIT 15108 @ 120240: OR 15109 @ 120241: ASSVAL 15110 @ 120242: LOCATE L_0007 2158 set const(n) 15111 @ 120245: LINE 2158 "regression-compile-tmp/pass1.imp" 15112 @ 120281: PUSH SETCONST 15113 @ 120284: PUSH N 15114 @ 120287: ASSPAR 15115 @ 120288: CALL 2159 op('_', tag(x)_index) 15116 @ 120289: LINE 2159 "regression-compile-tmp/pass1.imp" 15117 @ 120325: PUSH OP 15118 @ 120328: PUSHI #0x0000005f 15119 @ 120333: ASSPAR 15120 @ 120334: PUSH TAG 15121 @ 120337: PUSH X 15122 @ 120340: ACCESS 15123 @ 120341: SELECT 4 15124 @ 120344: ASSPAR 15125 @ 120345: CALL 2160 %finish %else %start 15126 @ 120346: LINE 2160 "regression-compile-tmp/pass1.imp" 15127 @ 120382: GOTO L_0003 15128 @ 120385: LOCATE L_0004 2161 fault(12) 15129 @ 120388: LINE 2161 "regression-compile-tmp/pass1.imp" 15130 @ 120424: PUSH FAULT 15131 @ 120427: PUSHI #0x0000000c 15132 @ 120432: ASSPAR 15133 @ 120433: CALL 2162 %finish 15134 @ 120434: LINE 2162 "regression-compile-tmp/pass1.imp" 15135 @ 120470: LOCATE L_0003 2163 access = 1 15136 @ 120473: LINE 2163 "regression-compile-tmp/pass1.imp" 15137 @ 120509: PUSH ACCESS 15138 @ 120512: PUSHI #0x00000001 15139 @ 120517: ASSVAL 2164 %end 2165 15140 @ 120518: LINE 2164 "regression-compile-tmp/pass1.imp" 15141 @ 120554: END _lev0id0_COMPILEBLOCK_COMPILE_DEFSLAB {lev=4 --> 3} 2166 %routine call 15142 @ 120555: LINE 2166 "regression-compile-tmp/pass1.imp" 15143 @ 120591: DEF CALL (_lev0id0_COMPILEBLOCK_COMPILE_CALL) p1=V_0130 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15144 @ 120607: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 15145 @ 120608: FINISH ) {lev=4} 2167 %record(tagfm)%name T 15146 @ 120609: LINE 2167 "regression-compile-tmp/pass1.imp" 15147 @ 120645: DEF T p1=V_0131 a/tf=42 b/format=84 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2168 t == tag(x) 15148 @ 120658: LINE 2168 "regression-compile-tmp/pass1.imp" 15149 @ 120694: PUSH T 15150 @ 120697: PUSH TAG 15151 @ 120700: PUSH X 15152 @ 120703: ACCESS 15153 @ 120704: ASSREF 2169 op('@', t_index) 15154 @ 120705: LINE 2169 "regression-compile-tmp/pass1.imp" 15155 @ 120741: PUSH OP 15156 @ 120744: PUSHI #0x00000040 15157 @ 120749: ASSPAR 15158 @ 120750: PUSH T 15159 @ 120753: SELECT 4 15160 @ 120756: ASSPAR 15161 @ 120757: CALL 2170 access = 0 %if t_flags&closed # 0; ! never comes back 15162 @ 120758: LINE 2170 "regression-compile-tmp/pass1.imp" 15163 @ 120794: PUSH T 15164 @ 120797: SELECT 3 15165 @ 120800: PUSHI #0x00004000 15166 @ 120805: AND 15167 @ 120806: PUSHI #0x00000000 15168 @ 120811: JUMPIF = L_0004 15169 @ 120815: PUSH ACCESS 15170 @ 120818: PUSHI #0x00000000 15171 @ 120823: ASSVAL 15172 @ 120824: LOCATE L_0004 2171 add char( 'E' ) %if t_app = 0; ! no parameters 15173 @ 120827: LINE 2171 "regression-compile-tmp/pass1.imp" 15174 @ 120863: PUSH T 15175 @ 120866: SELECT 1 15176 @ 120869: PUSHI #0x00000000 15177 @ 120874: JUMPIF # L_0004 15178 @ 120878: PUSH ADDCHAR 15179 @ 120881: PUSHI #0x00000045 15180 @ 120886: ASSPAR 15181 @ 120887: CALL 15182 @ 120888: LOCATE L_0004 2172 %end 2173 15183 @ 120891: LINE 2172 "regression-compile-tmp/pass1.imp" 15184 @ 120927: END _lev0id0_COMPILEBLOCK_COMPILE_CALL {lev=4 --> 3} 2174 %routine pop def 15185 @ 120928: LINE 2174 "regression-compile-tmp/pass1.imp" 15186 @ 120964: DEF POPDEF (_lev0id0_COMPILEBLOCK_COMPILE_POPDEF) p1=V_0131 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15187 @ 120982: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 15188 @ 120983: FINISH ) {lev=4} 2175 set const(pstack(pending)); pending = pending-1 15189 @ 120984: LINE 2175 "regression-compile-tmp/pass1.imp" 15190 @ 121020: PUSH SETCONST 15191 @ 121023: PUSH PSTACK 15192 @ 121026: PUSH PENDING 15193 @ 121029: ACCESS 15194 @ 121030: ASSPAR 15195 @ 121031: CALL 15196 @ 121032: LINE 2175 "regression-compile-tmp/pass1.imp" 15197 @ 121068: PUSH PENDING 15198 @ 121071: PUSH PENDING 15199 @ 121074: PUSHI #0x00000001 15200 @ 121079: SUB 15201 @ 121080: ASSVAL 2176 %end 2177 15202 @ 121081: LINE 2176 "regression-compile-tmp/pass1.imp" 15203 @ 121117: END _lev0id0_COMPILEBLOCK_COMPILE_POPDEF {lev=4 --> 3} 2178 %routine pop lit 15204 @ 121118: LINE 2178 "regression-compile-tmp/pass1.imp" 15205 @ 121154: DEF POPLIT (_lev0id0_COMPILEBLOCK_COMPILE_POPLIT) p1=V_0132 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15206 @ 121172: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 15207 @ 121173: FINISH ) {lev=4} 2179 %if pending = 0 %then lit = 0 %else %start 15208 @ 121174: LINE 2179 "regression-compile-tmp/pass1.imp" 15209 @ 121210: PUSH PENDING 15210 @ 121213: PUSHI #0x00000000 15211 @ 121218: JUMPIF # L_0004 15212 @ 121222: PUSH LIT 15213 @ 121225: PUSHI #0x00000000 15214 @ 121230: ASSVAL 15215 @ 121231: GOTO L_0003 15216 @ 121234: LOCATE L_0004 2180 lit = pstack(pending); pending = pending-1 15217 @ 121237: LINE 2180 "regression-compile-tmp/pass1.imp" 15218 @ 121273: PUSH LIT 15219 @ 121276: PUSH PSTACK 15220 @ 121279: PUSH PENDING 15221 @ 121282: ACCESS 15222 @ 121283: ASSVAL 15223 @ 121284: LINE 2180 "regression-compile-tmp/pass1.imp" 15224 @ 121320: PUSH PENDING 15225 @ 121323: PUSH PENDING 15226 @ 121326: PUSHI #0x00000001 15227 @ 121331: SUB 15228 @ 121332: ASSVAL 2181 %finish 15229 @ 121333: LINE 2181 "regression-compile-tmp/pass1.imp" 15230 @ 121369: LOCATE L_0003 2182 %end 2183 2184 !conditions & jumps 15231 @ 121372: LINE 2182 "regression-compile-tmp/pass1.imp" 15232 @ 121408: END _lev0id0_COMPILEBLOCK_COMPILE_POPLIT {lev=4 --> 3} 2185 %routine push(%integer x) 15233 @ 121409: LINE 2185 "regression-compile-tmp/pass1.imp" 15234 @ 121445: DEF PUSH (_lev0id0_COMPILEBLOCK_COMPILE_PUSH) p1=V_0133 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15235 @ 121461: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 15236 @ 121462: DEF X p1=V_0134 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15237 @ 121475: FINISH ) {lev=4} 2186 %if cnest(cp)&2 # x %start 15238 @ 121476: LINE 2186 "regression-compile-tmp/pass1.imp" 15239 @ 121512: PUSH CNEST 15240 @ 121515: PUSH CP 15241 @ 121518: ACCESS 15242 @ 121519: PUSHI #0x00000002 15243 @ 121524: AND 15244 @ 121525: PUSH X 15245 @ 121528: JUMPIF = L_0004 2187 cnest(cp) = cnest(cp)!1; x = x+4 15246 @ 121532: LINE 2187 "regression-compile-tmp/pass1.imp" 15247 @ 121568: PUSH CNEST 15248 @ 121571: PUSH CP 15249 @ 121574: ACCESS 15250 @ 121575: PUSH CNEST 15251 @ 121578: PUSH CP 15252 @ 121581: ACCESS 15253 @ 121582: PUSHI #0x00000001 15254 @ 121587: OR 15255 @ 121588: ASSVAL 15256 @ 121589: LINE 2187 "regression-compile-tmp/pass1.imp" 15257 @ 121625: PUSH X 15258 @ 121628: PUSH X 15259 @ 121631: PUSHI #0x00000004 15260 @ 121636: ADD 15261 @ 121637: ASSVAL 2188 %finish 15262 @ 121638: LINE 2188 "regression-compile-tmp/pass1.imp" 15263 @ 121674: LOCATE L_0004 2189 clab = clab+1 %if cnest(cp)&1 # 0 15264 @ 121677: LINE 2189 "regression-compile-tmp/pass1.imp" 15265 @ 121713: PUSH CNEST 15266 @ 121716: PUSH CP 15267 @ 121719: ACCESS 15268 @ 121720: PUSHI #0x00000001 15269 @ 121725: AND 15270 @ 121726: PUSHI #0x00000000 15271 @ 121731: JUMPIF = L_0004 15272 @ 121735: PUSH CLAB 15273 @ 121738: PUSH CLAB 15274 @ 121741: PUSHI #0x00000001 15275 @ 121746: ADD 15276 @ 121747: ASSVAL 15277 @ 121748: LOCATE L_0004 2190 cnest(cp+1) = x; cp = cp+1 15278 @ 121751: LINE 2190 "regression-compile-tmp/pass1.imp" 15279 @ 121787: PUSH CNEST 15280 @ 121790: PUSH CP 15281 @ 121793: PUSHI #0x00000001 15282 @ 121798: ADD 15283 @ 121799: ACCESS 15284 @ 121800: PUSH X 15285 @ 121803: ASSVAL 15286 @ 121804: LINE 2190 "regression-compile-tmp/pass1.imp" 15287 @ 121840: PUSH CP 15288 @ 121843: PUSH CP 15289 @ 121846: PUSHI #0x00000001 15290 @ 121851: ADD 15291 @ 121852: ASSVAL 2191 %end 2192 15292 @ 121853: LINE 2191 "regression-compile-tmp/pass1.imp" 15293 @ 121889: END _lev0id0_COMPILEBLOCK_COMPILE_PUSH {lev=4 --> 3} 2193 %routine pop label(%integer mode) 15294 @ 121890: LINE 2193 "regression-compile-tmp/pass1.imp" 15295 @ 121926: DEF POPLABEL (_lev0id0_COMPILEBLOCK_COMPILE_POPLABEL) p1=V_0134 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15296 @ 121946: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 15297 @ 121947: DEF MODE p1=V_0135 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15298 @ 121963: FINISH ) {lev=4} 2194 lmode = dict(dmin) 15299 @ 121964: LINE 2194 "regression-compile-tmp/pass1.imp" 15300 @ 122000: PUSH LMODE 15301 @ 122003: PUSH DICT 15302 @ 122006: PUSH DMIN 15303 @ 122009: ACCESS 15304 @ 122010: ASSVAL 2195 %if lmode < 0 %or lmode&1 # mode %start 15305 @ 122011: LINE 2195 "regression-compile-tmp/pass1.imp" 15306 @ 122047: PUSH LMODE 15307 @ 122050: PUSHI #0x00000000 15308 @ 122055: JUMPIF < L_0005 15309 @ 122059: PUSH LMODE 15310 @ 122062: PUSHI #0x00000001 15311 @ 122067: AND 15312 @ 122068: PUSH MODE 15313 @ 122071: JUMPIF = L_0004 15314 @ 122075: LOCATE L_0005 2196 fault(mode+8) 15315 @ 122078: LINE 2196 "regression-compile-tmp/pass1.imp" 15316 @ 122114: PUSH FAULT 15317 @ 122117: PUSH MODE 15318 @ 122120: PUSHI #0x00000008 15319 @ 122125: ADD 15320 @ 122126: ASSPAR 15321 @ 122127: CALL 2197 %finish %else %start 15322 @ 122128: LINE 2197 "regression-compile-tmp/pass1.imp" 15323 @ 122164: GOTO L_0003 15324 @ 122167: LOCATE L_0004 2198 dmin = dmin+1; label = label-3 15325 @ 122170: LINE 2198 "regression-compile-tmp/pass1.imp" 15326 @ 122206: PUSH DMIN 15327 @ 122209: PUSH DMIN 15328 @ 122212: PUSHI #0x00000001 15329 @ 122217: ADD 15330 @ 122218: ASSVAL 15331 @ 122219: LINE 2198 "regression-compile-tmp/pass1.imp" 15332 @ 122255: PUSH LABEL 15333 @ 122258: PUSH LABEL 15334 @ 122261: PUSHI #0x00000003 15335 @ 122266: SUB 15336 @ 122267: ASSVAL 2199 %finish 15337 @ 122268: LINE 2199 "regression-compile-tmp/pass1.imp" 15338 @ 122304: LOCATE L_0003 2200 %end 2201 15339 @ 122307: LINE 2200 "regression-compile-tmp/pass1.imp" 15340 @ 122343: END _lev0id0_COMPILEBLOCK_COMPILE_POPLABEL {lev=4 --> 3} 2202 %if sstype < 0 %start; ! executable statement 15341 @ 122344: LINE 2202 "regression-compile-tmp/pass1.imp" 15342 @ 122380: PUSH SSTYPE 15343 @ 122383: PUSHI #0x00000000 15344 @ 122388: JUMPIF >= L_0004 2203 %if level = 0 %start; ! outermost level 15345 @ 122392: LINE 2203 "regression-compile-tmp/pass1.imp" 15346 @ 122428: PUSH LEVEL 15347 @ 122431: PUSHI #0x00000000 15348 @ 122436: JUMPIF # L_0007 2204 fault(13); ! *order 15349 @ 122440: LINE 2204 "regression-compile-tmp/pass1.imp" 15350 @ 122476: PUSH FAULT 15351 @ 122479: PUSHI #0x0000000d 15352 @ 122484: ASSPAR 15353 @ 122485: CALL 2205 %finish %else %start 15354 @ 122486: LINE 2205 "regression-compile-tmp/pass1.imp" 15355 @ 122522: GOTO L_0006 15356 @ 122525: LOCATE L_0007 2206 %if access = 0 %start 15357 @ 122528: LINE 2206 "regression-compile-tmp/pass1.imp" 15358 @ 122564: PUSH ACCESS 15359 @ 122567: PUSHI #0x00000000 15360 @ 122572: JUMPIF # L_000a 2207 access = 1; fault(-1); ! only a warning 15361 @ 122576: LINE 2207 "regression-compile-tmp/pass1.imp" 15362 @ 122612: PUSH ACCESS 15363 @ 122615: PUSHI #0x00000001 15364 @ 122620: ASSVAL 15365 @ 122621: LINE 2207 "regression-compile-tmp/pass1.imp" 15366 @ 122657: PUSH FAULT 15367 @ 122660: PUSHI #0x00000001 15368 @ 122665: NEGATE 15369 @ 122666: ASSPAR 15370 @ 122667: CALL 2208 %finish 15371 @ 122668: LINE 2208 "regression-compile-tmp/pass1.imp" 15372 @ 122704: LOCATE L_000a 2209 %finish 15373 @ 122707: LINE 2209 "regression-compile-tmp/pass1.imp" 15374 @ 122743: LOCATE L_0006 2210 %finish 2211 15375 @ 122746: LINE 2210 "regression-compile-tmp/pass1.imp" 15376 @ 122782: LOCATE L_0004 2212 %if diag&2 # 0 %start 15377 @ 122785: LINE 2212 "regression-compile-tmp/pass1.imp" 15378 @ 122821: PUSH DIAG 15379 @ 122824: PUSHI #0x00000002 15380 @ 122829: AND 15381 @ 122830: PUSHI #0x00000000 15382 @ 122835: JUMPIF = L_0004 2213 newline %if sym # nl 15383 @ 122839: LINE 2213 "regression-compile-tmp/pass1.imp" 15384 @ 122875: PUSH SYM 15385 @ 122878: PUSHI #0x0000000a 15386 @ 122883: JUMPIF = L_0007 15387 @ 122887: PUSH NEWLINE 15388 @ 122890: CALL 15389 @ 122891: LOCATE L_0007 2214 printstring("ss =") 15390 @ 122894: LINE 2214 "regression-compile-tmp/pass1.imp" 15391 @ 122930: PUSH PRINTSTRING 15392 @ 122933: PUSHS "ss =" 15393 @ 122939: ASSPAR 15394 @ 122940: CALL 2215 write(ss, 1) 15395 @ 122941: LINE 2215 "regression-compile-tmp/pass1.imp" 15396 @ 122977: PUSH WRITE 15397 @ 122980: PUSH SS 15398 @ 122983: ASSPAR 15399 @ 122984: PUSHI #0x00000001 15400 @ 122989: ASSPAR 15401 @ 122990: CALL 2216 newline 15402 @ 122991: LINE 2216 "regression-compile-tmp/pass1.imp" 15403 @ 123027: PUSH NEWLINE 15404 @ 123030: CALL 2217 count = 5 15405 @ 123031: LINE 2217 "regression-compile-tmp/pass1.imp" 15406 @ 123067: PUSH COUNT 15407 @ 123070: PUSHI #0x00000005 15408 @ 123075: ASSVAL 2218 name = "" 15409 @ 123076: LINE 2218 "regression-compile-tmp/pass1.imp" 15410 @ 123112: PUSH NAME 15411 @ 123115: PUSHS "" 15412 @ 123117: ASSVAL 2219 %finish 2220 15413 @ 123118: LINE 2219 "regression-compile-tmp/pass1.imp" 15414 @ 123154: LOCATE L_0004 2221 next = ss 15415 @ 123157: LINE 2221 "regression-compile-tmp/pass1.imp" 15416 @ 123193: PUSH NEXT 15417 @ 123196: PUSH SS 15418 @ 123199: ASSVAL 2222 pending = 0; lmode = 0 15419 @ 123200: LINE 2222 "regression-compile-tmp/pass1.imp" 15420 @ 123236: PUSH PENDING 15421 @ 123239: PUSHI #0x00000000 15422 @ 123244: ASSVAL 15423 @ 123245: LINE 2222 "regression-compile-tmp/pass1.imp" 15424 @ 123281: PUSH LMODE 15425 @ 123284: PUSHI #0x00000000 15426 @ 123289: ASSVAL 2223 link = 0; decs = 0 15427 @ 123290: LINE 2223 "regression-compile-tmp/pass1.imp" 15428 @ 123326: PUSH LINK 15429 @ 123329: PUSHI #0x00000000 15430 @ 123334: ASSVAL 15431 @ 123335: LINE 2223 "regression-compile-tmp/pass1.imp" 15432 @ 123371: PUSH DECS 15433 @ 123374: PUSHI #0x00000000 15434 @ 123379: ASSVAL 2224 defs = 0; resln = 0; done = 0 15435 @ 123380: LINE 2224 "regression-compile-tmp/pass1.imp" 15436 @ 123416: PUSH DEFS 15437 @ 123419: PUSHI #0x00000000 15438 @ 123424: ASSVAL 15439 @ 123425: LINE 2224 "regression-compile-tmp/pass1.imp" 15440 @ 123461: PUSH RESLN 15441 @ 123464: PUSHI #0x00000000 15442 @ 123469: ASSVAL 15443 @ 123470: LINE 2224 "regression-compile-tmp/pass1.imp" 15444 @ 123506: PUSH DONE 15445 @ 123509: PUSHI #0x00000000 15446 @ 123514: ASSVAL 2225 ord = level 15447 @ 123515: LINE 2225 "regression-compile-tmp/pass1.imp" 15448 @ 123551: PUSH ORD 15449 @ 123554: PUSH LEVEL 15450 @ 123557: ASSVAL 2226 ord = 1 %if this >= 0; ! recordformat declarations 15451 @ 123558: LINE 2226 "regression-compile-tmp/pass1.imp" 15452 @ 123594: PUSH THIS 15453 @ 123597: PUSHI #0x00000000 15454 @ 123602: JUMPIF < L_0004 15455 @ 123606: PUSH ORD 15456 @ 123609: PUSHI #0x00000001 15457 @ 123614: ASSVAL 15458 @ 123615: LOCATE L_0004 2227 c(0): 15459 @ 123618: LINE 2227 "regression-compile-tmp/pass1.imp" 15460 @ 123654: PUSHI #0x00000000 15461 @ 123659: SLABEL 266 2228 top: %if next # link %start 15462 @ 123662: LINE 2228 "regression-compile-tmp/pass1.imp" 15463 @ 123698: LABEL L_0135 15464 @ 123701: LINE 2228 "regression-compile-tmp/pass1.imp" 15465 @ 123737: PUSH NEXT 15466 @ 123740: PUSH LINK 15467 @ 123743: JUMPIF = L_0004 2229 get next; ->c(class) 15468 @ 123747: LINE 2229 "regression-compile-tmp/pass1.imp" 15469 @ 123783: PUSH GETNEXT 15470 @ 123786: CALL 15471 @ 123787: LINE 2229 "regression-compile-tmp/pass1.imp" 15472 @ 123823: PUSH CLASS 15473 @ 123826: SJUMP 266 2230 %finish 2231 2232 !all done, tidy up declarations and jumps 15474 @ 123829: LINE 2230 "regression-compile-tmp/pass1.imp" 15475 @ 123865: LOCATE L_0004 2233 newline %if diag&2 # 0 %and count # 5 2234 15476 @ 123868: LINE 2233 "regression-compile-tmp/pass1.imp" 15477 @ 123904: PUSH DIAG 15478 @ 123907: PUSHI #0x00000002 15479 @ 123912: AND 15480 @ 123913: PUSHI #0x00000000 15481 @ 123918: JUMPIF = L_0004 15482 @ 123922: PUSH COUNT 15483 @ 123925: PUSHI #0x00000005 15484 @ 123930: JUMPIF = L_0004 15485 @ 123934: PUSH NEWLINE 15486 @ 123937: CALL 15487 @ 123938: LOCATE L_0004 2235 %if lmode&(loop!then!else) # 0 %start; ! pending labels and jumps 15488 @ 123941: LINE 2235 "regression-compile-tmp/pass1.imp" 15489 @ 123977: PUSH LMODE 15490 @ 123980: PUSHI #0x00000010 15491 @ 123985: PUSHI #0x00000004 15492 @ 123990: OR 15493 @ 123991: PUSHI #0x00000008 15494 @ 123996: OR 15495 @ 123997: AND 15496 @ 123998: PUSHI #0x00000000 15497 @ 124003: JUMPIF = L_0004 2236 op('B', label-1) %if lmode&loop # 0; ! repeat 15498 @ 124007: LINE 2236 "regression-compile-tmp/pass1.imp" 15499 @ 124043: PUSH LMODE 15500 @ 124046: PUSHI #0x00000010 15501 @ 124051: AND 15502 @ 124052: PUSHI #0x00000000 15503 @ 124057: JUMPIF = L_0007 15504 @ 124061: PUSH OP 15505 @ 124064: PUSHI #0x00000042 15506 @ 124069: ASSPAR 15507 @ 124070: PUSH LABEL 15508 @ 124073: PUSHI #0x00000001 15509 @ 124078: SUB 15510 @ 124079: ASSPAR 15511 @ 124080: CALL 15512 @ 124081: LOCATE L_0007 2237 def lab(label) %if lmode&then # 0; ! entry from then 15513 @ 124084: LINE 2237 "regression-compile-tmp/pass1.imp" 15514 @ 124120: PUSH LMODE 15515 @ 124123: PUSHI #0x00000004 15516 @ 124128: AND 15517 @ 124129: PUSHI #0x00000000 15518 @ 124134: JUMPIF = L_0007 15519 @ 124138: PUSH DEFLAB 15520 @ 124141: PUSH LABEL 15521 @ 124144: ASSPAR 15522 @ 124145: CALL 15523 @ 124146: LOCATE L_0007 2238 def lab(label-1) %if lmode&else # 0; ! entry from else 15524 @ 124149: LINE 2238 "regression-compile-tmp/pass1.imp" 15525 @ 124185: PUSH LMODE 15526 @ 124188: PUSHI #0x00000008 15527 @ 124193: AND 15528 @ 124194: PUSHI #0x00000000 15529 @ 124199: JUMPIF = L_0007 15530 @ 124203: PUSH DEFLAB 15531 @ 124206: PUSH LABEL 15532 @ 124209: PUSHI #0x00000001 15533 @ 124214: SUB 15534 @ 124215: ASSPAR 15535 @ 124216: CALL 15536 @ 124217: LOCATE L_0007 2239 %finish 2240 15537 @ 124220: LINE 2239 "regression-compile-tmp/pass1.imp" 15538 @ 124256: LOCATE L_0004 2241 %return %if decs = 0 15539 @ 124259: LINE 2241 "regression-compile-tmp/pass1.imp" 15540 @ 124295: PUSH DECS 15541 @ 124298: PUSHI #0x00000000 15542 @ 124303: JUMPIF # L_0004 15543 @ 124307: RETURN 15544 @ 124308: LOCATE L_0004 2242 atom1 = error %and %return %if atom1 # 0; ! %integerroutine 15545 @ 124311: LINE 2242 "regression-compile-tmp/pass1.imp" 15546 @ 124347: PUSH ATOM1 15547 @ 124350: PUSHI #0x00000000 15548 @ 124355: JUMPIF = L_0004 15549 @ 124359: PUSH ATOM1 15550 @ 124362: PUSHI #0x00008000 15551 @ 124367: ASSVAL 15552 @ 124368: RETURN 15553 @ 124369: LOCATE L_0004 2243 order = ord 15554 @ 124372: LINE 2243 "regression-compile-tmp/pass1.imp" 15555 @ 124408: PUSH ORDER 15556 @ 124411: PUSH ORD 15557 @ 124414: ASSVAL 2244 decl = decl&(\15)+decmap(decl&15); ! construct declarator flags 15558 @ 124415: LINE 2244 "regression-compile-tmp/pass1.imp" 15559 @ 124451: PUSH DECL 15560 @ 124454: PUSH DECL 15561 @ 124457: PUSHI #0x0000000f 15562 @ 124462: NOT 15563 @ 124463: AND 15564 @ 124464: PUSH DECMAP 15565 @ 124467: PUSH DECL 15566 @ 124470: PUSHI #0x0000000f 15567 @ 124475: AND 15568 @ 124476: ACCESS 15569 @ 124477: ADD 15570 @ 124478: ASSVAL 2245 atom1 = atoms(decl&15); ! generate class 15571 @ 124479: LINE 2245 "regression-compile-tmp/pass1.imp" 15572 @ 124515: PUSH ATOM1 15573 @ 124518: PUSH ATOMS 15574 @ 124521: PUSH DECL 15575 @ 124524: PUSHI #0x0000000f 15576 @ 124529: AND 15577 @ 124530: ACCESS 15578 @ 124531: ASSVAL 2246 %if otype # 0 %start; ! own, const etc. 15579 @ 124532: LINE 2246 "regression-compile-tmp/pass1.imp" 15580 @ 124568: PUSH OTYPE 15581 @ 124571: PUSHI #0x00000000 15582 @ 124576: JUMPIF = L_0004 2247 atom1 = atom1+1 %if atom1 # proc 15583 @ 124580: LINE 2247 "regression-compile-tmp/pass1.imp" 15584 @ 124616: PUSH ATOM1 15585 @ 124619: PUSHI #0x00000007 15586 @ 124624: JUMPIF = L_0007 15587 @ 124628: PUSH ATOM1 15588 @ 124631: PUSH ATOM1 15589 @ 124634: PUSHI #0x00000001 15590 @ 124639: ADD 15591 @ 124640: ASSVAL 15592 @ 124641: LOCATE L_0007 2248 %if otype = 2 %start; ! const 15593 @ 124644: LINE 2248 "regression-compile-tmp/pass1.imp" 15594 @ 124680: PUSH OTYPE 15595 @ 124683: PUSHI #0x00000002 15596 @ 124688: JUMPIF # L_0007 2249 n = decl&15 15597 @ 124692: LINE 2249 "regression-compile-tmp/pass1.imp" 15598 @ 124728: PUSH N 15599 @ 124731: PUSH DECL 15600 @ 124734: PUSHI #0x0000000f 15601 @ 124739: AND 15602 @ 124740: ASSVAL 2250 %if n&1 # 0 %start 15603 @ 124741: LINE 2250 "regression-compile-tmp/pass1.imp" 15604 @ 124777: PUSH N 15605 @ 124780: PUSHI #0x00000001 15606 @ 124785: AND 15607 @ 124786: PUSHI #0x00000000 15608 @ 124791: JUMPIF = L_000a 2251 decl = decl!prot 15609 @ 124795: LINE 2251 "regression-compile-tmp/pass1.imp" 15610 @ 124831: PUSH DECL 15611 @ 124834: PUSH DECL 15612 @ 124837: PUSHI #0x00000100 15613 @ 124842: OR 15614 @ 124843: ASSVAL 2252 decl = decl!const bit %if decl&2_1111111 = iform 15615 @ 124844: LINE 2252 "regression-compile-tmp/pass1.imp" 15616 @ 124880: PUSH DECL 15617 @ 124883: PUSHI #0x0000007f 15618 @ 124888: AND 15619 @ 124889: PUSHI #0x00000011 15620 @ 124894: JUMPIF # L_000d 15621 @ 124898: PUSH DECL 15622 @ 124901: PUSH DECL 15623 @ 124904: PUSHI #0x00002000 15624 @ 124909: OR 15625 @ 124910: ASSVAL 15626 @ 124911: LOCATE L_000d 2253 %finish 15627 @ 124914: LINE 2253 "regression-compile-tmp/pass1.imp" 15628 @ 124950: LOCATE L_000a 2254 %else 15629 @ 124953: LINE 2254 "regression-compile-tmp/pass1.imp" 15630 @ 124989: GOTO L_0006 15631 @ 124992: LOCATE L_0007 2255 decl = decl!own bit 15632 @ 124995: LINE 2255 "regression-compile-tmp/pass1.imp" 15633 @ 125031: PUSH DECL 15634 @ 125034: PUSH DECL 15635 @ 125037: PUSHI #0x00000200 15636 @ 125042: OR 15637 @ 125043: ASSVAL 2256 %finish 15638 @ 125044: LINE 2256 "regression-compile-tmp/pass1.imp" 15639 @ 125080: LOCATE L_0006 2257 %finish 15640 @ 125083: LINE 2257 "regression-compile-tmp/pass1.imp" 15641 @ 125119: LOCATE L_0004 2258 sstype = 1 %if sstype = 0 %and atom1 = proc 15642 @ 125122: LINE 2258 "regression-compile-tmp/pass1.imp" 15643 @ 125158: PUSH SSTYPE 15644 @ 125161: PUSHI #0x00000000 15645 @ 125166: JUMPIF # L_0004 15646 @ 125170: PUSH ATOM1 15647 @ 125173: PUSHI #0x00000007 15648 @ 125178: JUMPIF # L_0004 15649 @ 125182: PUSH SSTYPE 15650 @ 125185: PUSHI #0x00000001 15651 @ 125190: ASSVAL 15652 @ 125191: LOCATE L_0004 2259 atom1 = atom1+1 %if decl&spec # 0; ! onto spec variant 15653 @ 125194: LINE 2259 "regression-compile-tmp/pass1.imp" 15654 @ 125230: PUSH DECL 15655 @ 125233: PUSHI #0x00000080 15656 @ 125238: AND 15657 @ 125239: PUSHI #0x00000000 15658 @ 125244: JUMPIF = L_0004 15659 @ 125248: PUSH ATOM1 15660 @ 125251: PUSH ATOM1 15661 @ 125254: PUSHI #0x00000001 15662 @ 125259: ADD 15663 @ 125260: ASSVAL 15664 @ 125261: LOCATE L_0004 2260 ocount = 0 %and cont = '+' %if atom1 = 5; ! own array 15665 @ 125264: LINE 2260 "regression-compile-tmp/pass1.imp" 15666 @ 125300: PUSH ATOM1 15667 @ 125303: PUSHI #0x00000005 15668 @ 125308: JUMPIF # L_0004 15669 @ 125312: PUSH OCOUNT 15670 @ 125315: PUSHI #0x00000000 15671 @ 125320: ASSVAL 15672 @ 125321: PUSH CONT 15673 @ 125324: PUSHI #0x0000002b 15674 @ 125329: ASSVAL 15675 @ 125330: LOCATE L_0004 2261 %if anyform(decl&15) = 0 %start; ! check meaningful 15676 @ 125333: LINE 2261 "regression-compile-tmp/pass1.imp" 15677 @ 125369: PUSH ANYFORM 15678 @ 125372: PUSH DECL 15679 @ 125375: PUSHI #0x0000000f 15680 @ 125380: AND 15681 @ 125381: ACCESS 15682 @ 125382: PUSHI #0x00000000 15683 @ 125387: JUMPIF # L_0004 2262 %if decl>>4&7 = record %start 15684 @ 125391: LINE 2262 "regression-compile-tmp/pass1.imp" 15685 @ 125427: PUSH DECL 15686 @ 125430: PUSHI #0x00000004 15687 @ 125435: RSH 15688 @ 125436: PUSHI #0x00000007 15689 @ 125441: AND 15690 @ 125442: PUSHI #0x00000004 15691 @ 125447: JUMPIF # L_0007 2263 this = fdef %if tag(fdef)_flags&spec # 0 15692 @ 125451: LINE 2263 "regression-compile-tmp/pass1.imp" 15693 @ 125487: PUSH TAG 15694 @ 125490: PUSH FDEF 15695 @ 125493: ACCESS 15696 @ 125494: SELECT 3 15697 @ 125497: PUSHI #0x00000080 15698 @ 125502: AND 15699 @ 125503: PUSHI #0x00000000 15700 @ 125508: JUMPIF = L_000a 15701 @ 125512: PUSH THIS 15702 @ 125515: PUSH FDEF 15703 @ 125518: ASSVAL 15704 @ 125519: LOCATE L_000a 2264 atom1 = error+21 %if fdef = this; ! *context for format 15705 @ 125522: LINE 2264 "regression-compile-tmp/pass1.imp" 15706 @ 125558: PUSH FDEF 15707 @ 125561: PUSH THIS 15708 @ 125564: JUMPIF # L_000a 15709 @ 125568: PUSH ATOM1 15710 @ 125571: PUSHI #0x00008000 15711 @ 125576: PUSHI #0x00000015 15712 @ 125581: ADD 15713 @ 125582: ASSVAL 15714 @ 125583: LOCATE L_000a 2265 %finish 15715 @ 125586: LINE 2265 "regression-compile-tmp/pass1.imp" 15716 @ 125622: LOCATE L_0007 2266 atom1 = error+10 %if fdef = 0; ! *size 15717 @ 125625: LINE 2266 "regression-compile-tmp/pass1.imp" 15718 @ 125661: PUSH FDEF 15719 @ 125664: PUSHI #0x00000000 15720 @ 125669: JUMPIF # L_0007 15721 @ 125673: PUSH ATOM1 15722 @ 125676: PUSHI #0x00008000 15723 @ 125681: PUSHI #0x0000000a 15724 @ 125686: ADD 15725 @ 125687: ASSVAL 15726 @ 125688: LOCATE L_0007 2267 %finish 15727 @ 125691: LINE 2267 "regression-compile-tmp/pass1.imp" 15728 @ 125727: LOCATE L_0004 2268 %return 2269 15729 @ 125730: LINE 2268 "regression-compile-tmp/pass1.imp" 15730 @ 125766: RETURN 2270 atop: access = 0; ->top 2271 ! declarators 15731 @ 125767: LINE 2270 "regression-compile-tmp/pass1.imp" 15732 @ 125803: LABEL L_0136 15733 @ 125806: LINE 2270 "regression-compile-tmp/pass1.imp" 15734 @ 125842: PUSH ACCESS 15735 @ 125845: PUSHI #0x00000000 15736 @ 125850: ASSVAL 15737 @ 125851: LINE 2270 "regression-compile-tmp/pass1.imp" 15738 @ 125887: JUMP L_0135 2272 c(88): ; ! rtype 15739 @ 125890: LINE 2272 "regression-compile-tmp/pass1.imp" 15740 @ 125926: PUSHI #0x00000058 15741 @ 125931: SLABEL 266 2273 c(28): decl = x&(\7); ! stype 15742 @ 125934: LINE 2273 "regression-compile-tmp/pass1.imp" 15743 @ 125970: PUSHI #0x0000001c 15744 @ 125975: SLABEL 266 15745 @ 125978: LINE 2273 "regression-compile-tmp/pass1.imp" 15746 @ 126014: PUSH DECL 15747 @ 126017: PUSH X 15748 @ 126020: PUSHI #0x00000007 15749 @ 126025: NOT 15750 @ 126026: AND 15751 @ 126027: ASSVAL 2274 fdef = x&7; ! precision 15752 @ 126028: LINE 2274 "regression-compile-tmp/pass1.imp" 15753 @ 126064: PUSH FDEF 15754 @ 126067: PUSH X 15755 @ 126070: PUSHI #0x00000007 15756 @ 126075: AND 15757 @ 126076: ASSVAL 2275 fdef = reals ln %if x&2_1110001 = real<<4+1; ! convert to long 15758 @ 126077: LINE 2275 "regression-compile-tmp/pass1.imp" 15759 @ 126113: PUSH X 15760 @ 126116: PUSHI #0x00000071 15761 @ 126121: AND 15762 @ 126122: PUSHI #0x00000002 15763 @ 126127: PUSHI #0x00000004 15764 @ 126132: LSH 15765 @ 126133: PUSHI #0x00000001 15766 @ 126138: ADD 15767 @ 126139: JUMPIF # L_0004 15768 @ 126143: PUSH FDEF 15769 @ 126146: PUSH REALSLN 15770 @ 126149: ASSVAL 15771 @ 126150: LOCATE L_0004 2276 decs = 1; ->top 15772 @ 126153: LINE 2276 "regression-compile-tmp/pass1.imp" 15773 @ 126189: PUSH DECS 15774 @ 126192: PUSHI #0x00000001 15775 @ 126197: ASSVAL 15776 @ 126198: LINE 2276 "regression-compile-tmp/pass1.imp" 15777 @ 126234: JUMP L_0135 2277 c(34): ; ! own 15778 @ 126237: LINE 2277 "regression-compile-tmp/pass1.imp" 15779 @ 126273: PUSHI #0x00000022 15780 @ 126278: SLABEL 266 2278 c(35): otype = x; ord = 1; ->top; ! external 15781 @ 126281: LINE 2278 "regression-compile-tmp/pass1.imp" 15782 @ 126317: PUSHI #0x00000023 15783 @ 126322: SLABEL 266 15784 @ 126325: LINE 2278 "regression-compile-tmp/pass1.imp" 15785 @ 126361: PUSH OTYPE 15786 @ 126364: PUSH X 15787 @ 126367: ASSVAL 15788 @ 126368: LINE 2278 "regression-compile-tmp/pass1.imp" 15789 @ 126404: PUSH ORD 15790 @ 126407: PUSHI #0x00000001 15791 @ 126412: ASSVAL 15792 @ 126413: LINE 2278 "regression-compile-tmp/pass1.imp" 15793 @ 126449: JUMP L_0135 2279 c(152): decl = decl+x<<1; ->top; ! xname 15794 @ 126452: LINE 2279 "regression-compile-tmp/pass1.imp" 15795 @ 126488: PUSHI #0x00000098 15796 @ 126493: SLABEL 266 15797 @ 126496: LINE 2279 "regression-compile-tmp/pass1.imp" 15798 @ 126532: PUSH DECL 15799 @ 126535: PUSH DECL 15800 @ 126538: PUSH X 15801 @ 126541: PUSHI #0x00000001 15802 @ 126546: LSH 15803 @ 126547: ADD 15804 @ 126548: ASSVAL 15805 @ 126549: LINE 2279 "regression-compile-tmp/pass1.imp" 15806 @ 126585: JUMP L_0135 2280 c(31): ; ! proc 15807 @ 126588: LINE 2280 "regression-compile-tmp/pass1.imp" 15808 @ 126624: PUSHI #0x0000001f 15809 @ 126629: SLABEL 266 2281 c(32): spec mode = level+1; ! fn/map 15810 @ 126632: LINE 2281 "regression-compile-tmp/pass1.imp" 15811 @ 126668: PUSHI #0x00000020 15812 @ 126673: SLABEL 266 15813 @ 126676: LINE 2281 "regression-compile-tmp/pass1.imp" 15814 @ 126712: PUSH SPECMODE 15815 @ 126715: PUSH LEVEL 15816 @ 126718: PUSHI #0x00000001 15817 @ 126723: ADD 15818 @ 126724: ASSVAL 2282 decl = decl!prot %if x = 9; ! function 15819 @ 126725: LINE 2282 "regression-compile-tmp/pass1.imp" 15820 @ 126761: PUSH X 15821 @ 126764: PUSHI #0x00000009 15822 @ 126769: JUMPIF # L_0004 15823 @ 126773: PUSH DECL 15824 @ 126776: PUSH DECL 15825 @ 126779: PUSHI #0x00000100 15826 @ 126784: OR 15827 @ 126785: ASSVAL 15828 @ 126786: LOCATE L_0004 2283 c(29): ord = 1; ! array 15829 @ 126789: LINE 2283 "regression-compile-tmp/pass1.imp" 15830 @ 126825: PUSHI #0x0000001d 15831 @ 126830: SLABEL 266 15832 @ 126833: LINE 2283 "regression-compile-tmp/pass1.imp" 15833 @ 126869: PUSH ORD 15834 @ 126872: PUSHI #0x00000001 15835 @ 126877: ASSVAL 2284 dim = 0 15836 @ 126878: LINE 2284 "regression-compile-tmp/pass1.imp" 15837 @ 126914: PUSH DIM 15838 @ 126917: PUSHI #0x00000000 15839 @ 126922: ASSVAL 2285 c(30): decl = decl+x; ! name 15840 @ 126923: LINE 2285 "regression-compile-tmp/pass1.imp" 15841 @ 126959: PUSHI #0x0000001e 15842 @ 126964: SLABEL 266 15843 @ 126967: LINE 2285 "regression-compile-tmp/pass1.imp" 15844 @ 127003: PUSH DECL 15845 @ 127006: PUSH DECL 15846 @ 127009: PUSH X 15847 @ 127012: ADD 15848 @ 127013: ASSVAL 2286 decs = 1 15849 @ 127014: LINE 2286 "regression-compile-tmp/pass1.imp" 15850 @ 127050: PUSH DECS 15851 @ 127053: PUSHI #0x00000001 15852 @ 127058: ASSVAL 2287 ->top 15853 @ 127059: LINE 2287 "regression-compile-tmp/pass1.imp" 15854 @ 127095: JUMP L_0135 2288 c(27): lit = 0; ! arrayd 15855 @ 127098: LINE 2288 "regression-compile-tmp/pass1.imp" 15856 @ 127134: PUSHI #0x0000001b 15857 @ 127139: SLABEL 266 15858 @ 127142: LINE 2288 "regression-compile-tmp/pass1.imp" 15859 @ 127178: PUSH LIT 15860 @ 127181: PUSHI #0x00000000 15861 @ 127186: ASSVAL 2289 %if pending # 0 %start 15862 @ 127187: LINE 2289 "regression-compile-tmp/pass1.imp" 15863 @ 127223: PUSH PENDING 15864 @ 127226: PUSHI #0x00000000 15865 @ 127231: JUMPIF = L_0004 2290 pop lit 15866 @ 127235: LINE 2290 "regression-compile-tmp/pass1.imp" 15867 @ 127271: PUSH POPLIT 15868 @ 127274: CALL 2291 %unless 0= L_0008 15873 @ 127323: PUSH LIT 15874 @ 127326: PUSHI #0x00000006 15875 @ 127331: JUMPIF <= L_0007 15876 @ 127335: LOCATE L_0008 2292 atom1 = error + 11; %return 15877 @ 127338: LINE 2292 "regression-compile-tmp/pass1.imp" 15878 @ 127374: PUSH ATOM1 15879 @ 127377: PUSHI #0x00008000 15880 @ 127382: PUSHI #0x0000000b 15881 @ 127387: ADD 15882 @ 127388: ASSVAL 15883 @ 127389: LINE 2292 "regression-compile-tmp/pass1.imp" 15884 @ 127425: RETURN 2293 %finish 15885 @ 127426: LINE 2293 "regression-compile-tmp/pass1.imp" 15886 @ 127462: LOCATE L_0007 2294 %finish 15887 @ 127465: LINE 2294 "regression-compile-tmp/pass1.imp" 15888 @ 127501: LOCATE L_0004 2295 dim = lit 15889 @ 127504: LINE 2295 "regression-compile-tmp/pass1.imp" 15890 @ 127540: PUSH DIM 15891 @ 127543: PUSH LIT 15892 @ 127546: ASSVAL 2296 decl = decl + x; decs = 1 15893 @ 127547: LINE 2296 "regression-compile-tmp/pass1.imp" 15894 @ 127583: PUSH DECL 15895 @ 127586: PUSH DECL 15896 @ 127589: PUSH X 15897 @ 127592: ADD 15898 @ 127593: ASSVAL 15899 @ 127594: LINE 2296 "regression-compile-tmp/pass1.imp" 15900 @ 127630: PUSH DECS 15901 @ 127633: PUSHI #0x00000001 15902 @ 127638: ASSVAL 2297 -> top 15903 @ 127639: LINE 2297 "regression-compile-tmp/pass1.imp" 15904 @ 127675: JUMP L_0135 2298 c(37): x = x!subname; ! record 15905 @ 127678: LINE 2298 "regression-compile-tmp/pass1.imp" 15906 @ 127714: PUSHI #0x00000025 15907 @ 127719: SLABEL 266 15908 @ 127722: LINE 2298 "regression-compile-tmp/pass1.imp" 15909 @ 127758: PUSH X 15910 @ 127761: PUSH X 15911 @ 127764: PUSHI #0x00000800 15912 @ 127769: OR 15913 @ 127770: ASSVAL 2299 c(36): lit = 0; ! string 15914 @ 127771: LINE 2299 "regression-compile-tmp/pass1.imp" 15915 @ 127807: PUSHI #0x00000024 15916 @ 127812: SLABEL 266 15917 @ 127815: LINE 2299 "regression-compile-tmp/pass1.imp" 15918 @ 127851: PUSH LIT 15919 @ 127854: PUSHI #0x00000000 15920 @ 127859: ASSVAL 2300 %if pending # 0 %start 15921 @ 127860: LINE 2300 "regression-compile-tmp/pass1.imp" 15922 @ 127896: PUSH PENDING 15923 @ 127899: PUSHI #0x00000000 15924 @ 127904: JUMPIF = L_0004 2301 pop lit 15925 @ 127908: LINE 2301 "regression-compile-tmp/pass1.imp" 15926 @ 127944: PUSH POPLIT 15927 @ 127947: CALL 2302 %unless 0 < lit %and lit <= 255 %start; ! max length wrong 15928 @ 127948: LINE 2302 "regression-compile-tmp/pass1.imp" 15929 @ 127984: PUSHI #0x00000000 15930 @ 127989: PUSH LIT 15931 @ 127992: JUMPIF >= L_0008 15932 @ 127996: PUSH LIT 15933 @ 127999: PUSHI #0x000000ff 15934 @ 128004: JUMPIF <= L_0007 15935 @ 128008: LOCATE L_0008 2303 atom1 = error+10; %return 15936 @ 128011: LINE 2303 "regression-compile-tmp/pass1.imp" 15937 @ 128047: PUSH ATOM1 15938 @ 128050: PUSHI #0x00008000 15939 @ 128055: PUSHI #0x0000000a 15940 @ 128060: ADD 15941 @ 128061: ASSVAL 15942 @ 128062: LINE 2303 "regression-compile-tmp/pass1.imp" 15943 @ 128098: RETURN 2304 %finish 15944 @ 128099: LINE 2304 "regression-compile-tmp/pass1.imp" 15945 @ 128135: LOCATE L_0007 2305 %finish 15946 @ 128138: LINE 2305 "regression-compile-tmp/pass1.imp" 15947 @ 128174: LOCATE L_0004 2306 fdef = lit; ! format or length 15948 @ 128177: LINE 2306 "regression-compile-tmp/pass1.imp" 15949 @ 128213: PUSH FDEF 15950 @ 128216: PUSH LIT 15951 @ 128219: ASSVAL 2307 c(33): decl = x; ! switch 15952 @ 128220: LINE 2307 "regression-compile-tmp/pass1.imp" 15953 @ 128256: PUSHI #0x00000021 15954 @ 128261: SLABEL 266 15955 @ 128264: LINE 2307 "regression-compile-tmp/pass1.imp" 15956 @ 128300: PUSH DECL 15957 @ 128303: PUSH X 15958 @ 128306: ASSVAL 2308 decs = 1 15959 @ 128307: LINE 2308 "regression-compile-tmp/pass1.imp" 15960 @ 128343: PUSH DECS 15961 @ 128346: PUSHI #0x00000001 15962 @ 128351: ASSVAL 2309 ->top 15963 @ 128352: LINE 2309 "regression-compile-tmp/pass1.imp" 15964 @ 128388: JUMP L_0135 2310 c(39): decl = decl!spec; ! spec 15965 @ 128391: LINE 2310 "regression-compile-tmp/pass1.imp" 15966 @ 128427: PUSHI #0x00000027 15967 @ 128432: SLABEL 266 15968 @ 128435: LINE 2310 "regression-compile-tmp/pass1.imp" 15969 @ 128471: PUSH DECL 15970 @ 128474: PUSH DECL 15971 @ 128477: PUSHI #0x00000080 15972 @ 128482: OR 15973 @ 128483: ASSVAL 2311 ocount = -1; ! no initialisation 15974 @ 128484: LINE 2311 "regression-compile-tmp/pass1.imp" 15975 @ 128520: PUSH OCOUNT 15976 @ 128523: PUSHI #0x00000001 15977 @ 128528: NEGATE 15978 @ 128529: ASSVAL 2312 spec mode = -1 15979 @ 128530: LINE 2312 "regression-compile-tmp/pass1.imp" 15980 @ 128566: PUSH SPECMODE 15981 @ 128569: PUSHI #0x00000001 15982 @ 128574: NEGATE 15983 @ 128575: ASSVAL 2313 ->top 15984 @ 128576: LINE 2313 "regression-compile-tmp/pass1.imp" 15985 @ 128612: JUMP L_0135 2314 c(38): decl = 64+4; ! recordformat (spec) 15986 @ 128615: LINE 2314 "regression-compile-tmp/pass1.imp" 15987 @ 128651: PUSHI #0x00000026 15988 @ 128656: SLABEL 266 15989 @ 128659: LINE 2314 "regression-compile-tmp/pass1.imp" 15990 @ 128695: PUSH DECL 15991 @ 128698: PUSHI #0x00000040 15992 @ 128703: PUSHI #0x00000004 15993 @ 128708: ADD 15994 @ 128709: ASSVAL 2315 order = 1 15995 @ 128710: LINE 2315 "regression-compile-tmp/pass1.imp" 15996 @ 128746: PUSH ORDER 15997 @ 128749: PUSHI #0x00000001 15998 @ 128754: ASSVAL 2316 atom1 = x 15999 @ 128755: LINE 2316 "regression-compile-tmp/pass1.imp" 16000 @ 128791: PUSH ATOM1 16001 @ 128794: PUSH X 16002 @ 128797: ASSVAL 2317 decl = decl!spec %if atom1 = 12; ! formatspec 16003 @ 128798: LINE 2317 "regression-compile-tmp/pass1.imp" 16004 @ 128834: PUSH ATOM1 16005 @ 128837: PUSHI #0x0000000c 16006 @ 128842: JUMPIF # L_0004 16007 @ 128846: PUSH DECL 16008 @ 128849: PUSH DECL 16009 @ 128852: PUSHI #0x00000080 16010 @ 128857: OR 16011 @ 128858: ASSVAL 16012 @ 128859: LOCATE L_0004 2318 fdef = tmax+1; ! format tag 16013 @ 128862: LINE 2318 "regression-compile-tmp/pass1.imp" 16014 @ 128898: PUSH FDEF 16015 @ 128901: PUSH TMAX 16016 @ 128904: PUSHI #0x00000001 16017 @ 128909: ADD 16018 @ 128910: ASSVAL 2319 %return 16019 @ 128911: LINE 2319 "regression-compile-tmp/pass1.imp" 16020 @ 128947: RETURN 2320 c(175): id = id+1; tag(x)_index = id; %return; ! FSID 16021 @ 128948: LINE 2320 "regression-compile-tmp/pass1.imp" 16022 @ 128984: PUSHI #0x000000af 16023 @ 128989: SLABEL 266 16024 @ 128992: LINE 2320 "regression-compile-tmp/pass1.imp" 16025 @ 129028: PUSH ID 16026 @ 129031: PUSH ID 16027 @ 129034: PUSHI #0x00000001 16028 @ 129039: ADD 16029 @ 129040: ASSVAL 16030 @ 129041: LINE 2320 "regression-compile-tmp/pass1.imp" 16031 @ 129077: PUSH TAG 16032 @ 129080: PUSH X 16033 @ 129083: ACCESS 16034 @ 129084: SELECT 4 16035 @ 129087: PUSH ID 16036 @ 129090: ASSVAL 16037 @ 129091: LINE 2320 "regression-compile-tmp/pass1.imp" 16038 @ 129127: RETURN 2321 c(41): decs = 1; decl = x!spec!closed; ->top; ! label 16039 @ 129128: LINE 2321 "regression-compile-tmp/pass1.imp" 16040 @ 129164: PUSHI #0x00000029 16041 @ 129169: SLABEL 266 16042 @ 129172: LINE 2321 "regression-compile-tmp/pass1.imp" 16043 @ 129208: PUSH DECS 16044 @ 129211: PUSHI #0x00000001 16045 @ 129216: ASSVAL 16046 @ 129217: LINE 2321 "regression-compile-tmp/pass1.imp" 16047 @ 129253: PUSH DECL 16048 @ 129256: PUSH X 16049 @ 129259: PUSHI #0x00000080 16050 @ 129264: OR 16051 @ 129265: PUSHI #0x00004000 16052 @ 129270: OR 16053 @ 129271: ASSVAL 16054 @ 129272: LINE 2321 "regression-compile-tmp/pass1.imp" 16055 @ 129308: JUMP L_0135 2322 c(133): recid = 0; rbase = tmin-1; ! fname 16056 @ 129311: LINE 2322 "regression-compile-tmp/pass1.imp" 16057 @ 129347: PUSHI #0x00000085 16058 @ 129352: SLABEL 266 16059 @ 129355: LINE 2322 "regression-compile-tmp/pass1.imp" 16060 @ 129391: PUSH RECID 16061 @ 129394: PUSHI #0x00000000 16062 @ 129399: ASSVAL 16063 @ 129400: LINE 2322 "regression-compile-tmp/pass1.imp" 16064 @ 129436: PUSH RBASE 16065 @ 129439: PUSH TMIN 16066 @ 129442: PUSHI #0x00000001 16067 @ 129447: SUB 16068 @ 129448: ASSVAL 2323 this = x 16069 @ 129449: LINE 2323 "regression-compile-tmp/pass1.imp" 16070 @ 129485: PUSH THIS 16071 @ 129488: PUSH X 16072 @ 129491: ASSVAL 2324 fm base = fdef; format list = tmin 16073 @ 129492: LINE 2324 "regression-compile-tmp/pass1.imp" 16074 @ 129528: PUSH FMBASE 16075 @ 129531: PUSH FDEF 16076 @ 129534: ASSVAL 16077 @ 129535: LINE 2324 "regression-compile-tmp/pass1.imp" 16078 @ 129571: PUSH FORMATLIST 16079 @ 129574: PUSH TMIN 16080 @ 129577: ASSVAL 2325 def(this); ->top 16081 @ 129578: LINE 2325 "regression-compile-tmp/pass1.imp" 16082 @ 129614: PUSH DEF 16083 @ 129617: PUSH THIS 16084 @ 129620: ASSPAR 16085 @ 129621: CALL 16086 @ 129622: LINE 2325 "regression-compile-tmp/pass1.imp" 16087 @ 129658: JUMP L_0135 2326 c(148): fdef = 0 %and ->top %if next = 0; ! reclb 16088 @ 129661: LINE 2326 "regression-compile-tmp/pass1.imp" 16089 @ 129697: PUSHI #0x00000094 16090 @ 129702: SLABEL 266 16091 @ 129705: LINE 2326 "regression-compile-tmp/pass1.imp" 16092 @ 129741: PUSH NEXT 16093 @ 129744: PUSHI #0x00000000 16094 @ 129749: JUMPIF # L_0004 16095 @ 129753: PUSH FDEF 16096 @ 129756: PUSHI #0x00000000 16097 @ 129761: ASSVAL 16098 @ 129762: JUMP L_0135 16099 @ 129765: LOCATE L_0004 2327 get next; ! skip name 16100 @ 129768: LINE 2327 "regression-compile-tmp/pass1.imp" 16101 @ 129804: PUSH GETNEXT 16102 @ 129807: CALL 2328 fdef = x 16103 @ 129808: LINE 2328 "regression-compile-tmp/pass1.imp" 16104 @ 129844: PUSH FDEF 16105 @ 129847: PUSH X 16106 @ 129850: ASSVAL 2329 ->top 2330 16107 @ 129851: LINE 2329 "regression-compile-tmp/pass1.imp" 16108 @ 129887: JUMP L_0135 2331 c(127): add char( '}' ); ->top; ! %POUT 16109 @ 129890: LINE 2331 "regression-compile-tmp/pass1.imp" 16110 @ 129926: PUSHI #0x0000007f 16111 @ 129931: SLABEL 266 16112 @ 129934: LINE 2331 "regression-compile-tmp/pass1.imp" 16113 @ 129970: PUSH ADDCHAR 16114 @ 129973: PUSHI #0x0000007d 16115 @ 129978: ASSPAR 16116 @ 129979: CALL 16117 @ 129980: LINE 2331 "regression-compile-tmp/pass1.imp" 16118 @ 130016: JUMP L_0135 2332 c(126): add char( '{' ); ->top; ! %PIN 16119 @ 130019: LINE 2332 "regression-compile-tmp/pass1.imp" 16120 @ 130055: PUSHI #0x0000007e 16121 @ 130060: SLABEL 266 16122 @ 130063: LINE 2332 "regression-compile-tmp/pass1.imp" 16123 @ 130099: PUSH ADDCHAR 16124 @ 130102: PUSHI #0x0000007b 16125 @ 130107: ASSPAR 16126 @ 130108: CALL 16127 @ 130109: LINE 2332 "regression-compile-tmp/pass1.imp" 16128 @ 130145: JUMP L_0135 2333 c(174): set bp; ! rangerb 16129 @ 130148: LINE 2333 "regression-compile-tmp/pass1.imp" 16130 @ 130184: PUSHI #0x000000ae 16131 @ 130189: SLABEL 266 16132 @ 130192: LINE 2333 "regression-compile-tmp/pass1.imp" 16133 @ 130228: PUSH SETBP 16134 @ 130231: CALL 2334 c(171): ; ! fmlb 16135 @ 130232: LINE 2334 "regression-compile-tmp/pass1.imp" 16136 @ 130268: PUSHI #0x000000ab 16137 @ 130273: SLABEL 266 2335 c(172): ; ! fmrb 16138 @ 130276: LINE 2335 "regression-compile-tmp/pass1.imp" 16139 @ 130312: PUSHI #0x000000ac 16140 @ 130317: SLABEL 266 2336 c(173): add char( '~' ) 16141 @ 130320: LINE 2336 "regression-compile-tmp/pass1.imp" 16142 @ 130356: PUSHI #0x000000ad 16143 @ 130361: SLABEL 266 16144 @ 130364: LINE 2336 "regression-compile-tmp/pass1.imp" 16145 @ 130400: PUSH ADDCHAR 16146 @ 130403: PUSHI #0x0000007e 16147 @ 130408: ASSPAR 16148 @ 130409: CALL 2337 add char( class-171+'A' ); ->top; ! fmor 16149 @ 130410: LINE 2337 "regression-compile-tmp/pass1.imp" 16150 @ 130446: PUSH ADDCHAR 16151 @ 130449: PUSH CLASS 16152 @ 130452: PUSHI #0x000000ab 16153 @ 130457: SUB 16154 @ 130458: PUSHI #0x00000041 16155 @ 130463: ADD 16156 @ 130464: ASSPAR 16157 @ 130465: CALL 16158 @ 130466: LINE 2337 "regression-compile-tmp/pass1.imp" 16159 @ 130502: JUMP L_0135 2338 c(168): rbase = -rbase; ! orrb 16160 @ 130505: LINE 2338 "regression-compile-tmp/pass1.imp" 16161 @ 130541: PUSHI #0x000000a8 16162 @ 130546: SLABEL 266 16163 @ 130549: LINE 2338 "regression-compile-tmp/pass1.imp" 16164 @ 130585: PUSH RBASE 16165 @ 130588: PUSH RBASE 16166 @ 130591: NEGATE 16167 @ 130592: ASSVAL 2339 sstype = 0; spec mode = 0 2340 16168 @ 130593: LINE 2339 "regression-compile-tmp/pass1.imp" 16169 @ 130629: PUSH SSTYPE 16170 @ 130632: PUSHI #0x00000000 16171 @ 130637: ASSVAL 16172 @ 130638: LINE 2339 "regression-compile-tmp/pass1.imp" 16173 @ 130674: PUSH SPECMODE 16174 @ 130677: PUSHI #0x00000000 16175 @ 130682: ASSVAL 2341 c(147): search base = 0; ! recrb 16176 @ 130683: LINE 2341 "regression-compile-tmp/pass1.imp" 16177 @ 130719: PUSHI #0x00000093 16178 @ 130724: SLABEL 266 16179 @ 130727: LINE 2341 "regression-compile-tmp/pass1.imp" 16180 @ 130763: PUSH SEARCHBASE 16181 @ 130766: PUSHI #0x00000000 16182 @ 130771: ASSVAL 2342 tag(this)_app = tmin 16183 @ 130772: LINE 2342 "regression-compile-tmp/pass1.imp" 16184 @ 130808: PUSH TAG 16185 @ 130811: PUSH THIS 16186 @ 130814: ACCESS 16187 @ 130815: SELECT 1 16188 @ 130818: PUSH TMIN 16189 @ 130821: ASSVAL 2343 tag(this)_format = rbase 16190 @ 130822: LINE 2343 "regression-compile-tmp/pass1.imp" 16191 @ 130858: PUSH TAG 16192 @ 130861: PUSH THIS 16193 @ 130864: ACCESS 16194 @ 130865: SELECT 2 16195 @ 130868: PUSH RBASE 16196 @ 130871: ASSVAL 2344 ->top 2345 16197 @ 130872: LINE 2344 "regression-compile-tmp/pass1.imp" 16198 @ 130908: JUMP L_0135 2346 c(45): add char( 'U' ) %if x = 36; ->top; ! sign 16199 @ 130911: LINE 2346 "regression-compile-tmp/pass1.imp" 16200 @ 130947: PUSHI #0x0000002d 16201 @ 130952: SLABEL 266 16202 @ 130955: LINE 2346 "regression-compile-tmp/pass1.imp" 16203 @ 130991: PUSH X 16204 @ 130994: PUSHI #0x00000024 16205 @ 130999: JUMPIF # L_0004 16206 @ 131003: PUSH ADDCHAR 16207 @ 131006: PUSHI #0x00000055 16208 @ 131011: ASSPAR 16209 @ 131012: CALL 16210 @ 131013: LOCATE L_0004 16211 @ 131016: LINE 2346 "regression-compile-tmp/pass1.imp" 16212 @ 131052: JUMP L_0135 2347 c(46): add char( '\' ); ->top; ! uop 16213 @ 131055: LINE 2347 "regression-compile-tmp/pass1.imp" 16214 @ 131091: PUSHI #0x0000002e 16215 @ 131096: SLABEL 266 16216 @ 131099: LINE 2347 "regression-compile-tmp/pass1.imp" 16217 @ 131135: PUSH ADDCHAR 16218 @ 131138: PUSHI #0x0000005c 16219 @ 131143: ASSPAR 16220 @ 131144: CALL 16221 @ 131145: LINE 2347 "regression-compile-tmp/pass1.imp" 16222 @ 131181: JUMP L_0135 2348 c(47):; ! mod 16223 @ 131184: LINE 2348 "regression-compile-tmp/pass1.imp" 16224 @ 131220: PUSHI #0x0000002f 16225 @ 131225: SLABEL 266 2349 c(48):; ! dot 16226 @ 131228: LINE 2349 "regression-compile-tmp/pass1.imp" 16227 @ 131264: PUSHI #0x00000030 16228 @ 131269: SLABEL 266 2350 c(42):; ! op1 16229 @ 131272: LINE 2350 "regression-compile-tmp/pass1.imp" 16230 @ 131308: PUSHI #0x0000002a 16231 @ 131313: SLABEL 266 2351 c(43):; ! op2 16232 @ 131316: LINE 2351 "regression-compile-tmp/pass1.imp" 16233 @ 131352: PUSHI #0x0000002b 16234 @ 131357: SLABEL 266 2352 c(44): add char( operator(x) ); ->top; ! op3 16235 @ 131360: LINE 2352 "regression-compile-tmp/pass1.imp" 16236 @ 131396: PUSHI #0x0000002c 16237 @ 131401: SLABEL 266 16238 @ 131404: LINE 2352 "regression-compile-tmp/pass1.imp" 16239 @ 131440: PUSH ADDCHAR 16240 @ 131443: PUSH OPERATOR 16241 @ 131446: PUSH X 16242 @ 131449: ACCESS 16243 @ 131450: ASSPAR 16244 @ 131451: CALL 16245 @ 131452: LINE 2352 "regression-compile-tmp/pass1.imp" 16246 @ 131488: JUMP L_0135 2353 c(56): ; ! and 16247 @ 131491: LINE 2353 "regression-compile-tmp/pass1.imp" 16248 @ 131527: PUSHI #0x00000038 16249 @ 131532: SLABEL 266 2354 c(57): push(x); ->top; ! or 16250 @ 131535: LINE 2354 "regression-compile-tmp/pass1.imp" 16251 @ 131571: PUSHI #0x00000039 16252 @ 131576: SLABEL 266 16253 @ 131579: LINE 2354 "regression-compile-tmp/pass1.imp" 16254 @ 131615: PUSH PUSH 16255 @ 131618: PUSH X 16256 @ 131621: ASSPAR 16257 @ 131622: CALL 16258 @ 131623: LINE 2354 "regression-compile-tmp/pass1.imp" 16259 @ 131659: JUMP L_0135 2355 c(58): cnest(cp) = cnest(cp)!!2; ->top; ! not 16260 @ 131662: LINE 2355 "regression-compile-tmp/pass1.imp" 16261 @ 131698: PUSHI #0x0000003a 16262 @ 131703: SLABEL 266 16263 @ 131706: LINE 2355 "regression-compile-tmp/pass1.imp" 16264 @ 131742: PUSH CNEST 16265 @ 131745: PUSH CP 16266 @ 131748: ACCESS 16267 @ 131749: PUSH CNEST 16268 @ 131752: PUSH CP 16269 @ 131755: ACCESS 16270 @ 131756: PUSHI #0x00000002 16271 @ 131761: XOR 16272 @ 131762: ASSVAL 16273 @ 131763: LINE 2355 "regression-compile-tmp/pass1.imp" 16274 @ 131799: JUMP L_0135 2356 c(138): x = 128+32+16+4; ! csep: treat like %while 16275 @ 131802: LINE 2356 "regression-compile-tmp/pass1.imp" 16276 @ 131838: PUSHI #0x0000008a 16277 @ 131843: SLABEL 266 16278 @ 131846: LINE 2356 "regression-compile-tmp/pass1.imp" 16279 @ 131882: PUSH X 16280 @ 131885: PUSHI #0x00000080 16281 @ 131890: PUSHI #0x00000020 16282 @ 131895: ADD 16283 @ 131896: PUSHI #0x00000010 16284 @ 131901: ADD 16285 @ 131902: PUSHI #0x00000004 16286 @ 131907: ADD 16287 @ 131908: ASSVAL 2357 c(59): ; ! while 16288 @ 131909: LINE 2357 "regression-compile-tmp/pass1.imp" 16289 @ 131945: PUSHI #0x0000003b 16290 @ 131950: SLABEL 266 2358 c(60): %if class = 138 %then op('f', label-1) %else def lab(label-1); ! until 16291 @ 131953: LINE 2358 "regression-compile-tmp/pass1.imp" 16292 @ 131989: PUSHI #0x0000003c 16293 @ 131994: SLABEL 266 16294 @ 131997: LINE 2358 "regression-compile-tmp/pass1.imp" 16295 @ 132033: PUSH CLASS 16296 @ 132036: PUSHI #0x0000008a 16297 @ 132041: JUMPIF # L_0004 16298 @ 132045: PUSH OP 16299 @ 132048: PUSHI #0x00000066 16300 @ 132053: ASSPAR 16301 @ 132054: PUSH LABEL 16302 @ 132057: PUSHI #0x00000001 16303 @ 132062: SUB 16304 @ 132063: ASSPAR 16305 @ 132064: CALL 16306 @ 132065: GOTO L_0003 16307 @ 132068: LOCATE L_0004 16308 @ 132071: PUSH DEFLAB 16309 @ 132074: PUSH LABEL 16310 @ 132077: PUSHI #0x00000001 16311 @ 132082: SUB 16312 @ 132083: ASSPAR 16313 @ 132084: CALL 16314 @ 132085: LOCATE L_0003 2359 c(166): ; ! runtil 16315 @ 132088: LINE 2359 "regression-compile-tmp/pass1.imp" 16316 @ 132124: PUSHI #0x000000a6 16317 @ 132129: SLABEL 266 2360 c(62): lmode = (lmode&(else!loop)) !(x>>3); ! cword 16318 @ 132132: LINE 2360 "regression-compile-tmp/pass1.imp" 16319 @ 132168: PUSHI #0x0000003e 16320 @ 132173: SLABEL 266 16321 @ 132176: LINE 2360 "regression-compile-tmp/pass1.imp" 16322 @ 132212: PUSH LMODE 16323 @ 132215: PUSH LMODE 16324 @ 132218: PUSHI #0x00000008 16325 @ 132223: PUSHI #0x00000010 16326 @ 132228: OR 16327 @ 132229: AND 16328 @ 132230: PUSH X 16329 @ 132233: PUSHI #0x00000003 16330 @ 132238: RSH 16331 @ 132239: OR 16332 @ 132240: ASSVAL 2361 clab = label; cp = 1; cnest(1) = x&7 16333 @ 132241: LINE 2361 "regression-compile-tmp/pass1.imp" 16334 @ 132277: PUSH CLAB 16335 @ 132280: PUSH LABEL 16336 @ 132283: ASSVAL 16337 @ 132284: LINE 2361 "regression-compile-tmp/pass1.imp" 16338 @ 132320: PUSH CP 16339 @ 132323: PUSHI #0x00000001 16340 @ 132328: ASSVAL 16341 @ 132329: LINE 2361 "regression-compile-tmp/pass1.imp" 16342 @ 132365: PUSH CNEST 16343 @ 132368: PUSHI #0x00000001 16344 @ 132373: ACCESS 16345 @ 132374: PUSH X 16346 @ 132377: PUSHI #0x00000007 16347 @ 132382: AND 16348 @ 132383: ASSVAL 2362 ->top 16349 @ 132384: LINE 2362 "regression-compile-tmp/pass1.imp" 16350 @ 132420: JUMP L_0135 2363 c(72): pop label(0); ! repeat 16351 @ 132423: LINE 2363 "regression-compile-tmp/pass1.imp" 16352 @ 132459: PUSHI #0x00000048 16353 @ 132464: SLABEL 266 16354 @ 132467: LINE 2363 "regression-compile-tmp/pass1.imp" 16355 @ 132503: PUSH POPLABEL 16356 @ 132506: PUSHI #0x00000000 16357 @ 132511: ASSPAR 16358 @ 132512: CALL 2364 def lab(label+1) %if lmode&32 # 0; ->atop 16359 @ 132513: LINE 2364 "regression-compile-tmp/pass1.imp" 16360 @ 132549: PUSH LMODE 16361 @ 132552: PUSHI #0x00000020 16362 @ 132557: AND 16363 @ 132558: PUSHI #0x00000000 16364 @ 132563: JUMPIF = L_0004 16365 @ 132567: PUSH DEFLAB 16366 @ 132570: PUSH LABEL 16367 @ 132573: PUSHI #0x00000001 16368 @ 132578: ADD 16369 @ 132579: ASSPAR 16370 @ 132580: CALL 16371 @ 132581: LOCATE L_0004 16372 @ 132584: LINE 2364 "regression-compile-tmp/pass1.imp" 16373 @ 132620: JUMP L_0136 2365 c(69): pop label(1); ->top; ! finish 16374 @ 132623: LINE 2365 "regression-compile-tmp/pass1.imp" 16375 @ 132659: PUSHI #0x00000045 16376 @ 132664: SLABEL 266 16377 @ 132667: LINE 2365 "regression-compile-tmp/pass1.imp" 16378 @ 132703: PUSH POPLABEL 16379 @ 132706: PUSHI #0x00000001 16380 @ 132711: ASSPAR 16381 @ 132712: CALL 16382 @ 132713: LINE 2365 "regression-compile-tmp/pass1.imp" 16383 @ 132749: JUMP L_0135 2366 c(163): ; ! xelse 16384 @ 132752: LINE 2366 "regression-compile-tmp/pass1.imp" 16385 @ 132788: PUSHI #0x000000a3 16386 @ 132793: SLABEL 266 2367 c(70): pop label(1); ! finish else ... 16387 @ 132796: LINE 2367 "regression-compile-tmp/pass1.imp" 16388 @ 132832: PUSHI #0x00000046 16389 @ 132837: SLABEL 266 16390 @ 132840: LINE 2367 "regression-compile-tmp/pass1.imp" 16391 @ 132876: PUSH POPLABEL 16392 @ 132879: PUSHI #0x00000001 16393 @ 132884: ASSPAR 16394 @ 132885: CALL 2368 fault(7) %if lmode&3 = 3; ! dangling else 16395 @ 132886: LINE 2368 "regression-compile-tmp/pass1.imp" 16396 @ 132922: PUSH LMODE 16397 @ 132925: PUSHI #0x00000003 16398 @ 132930: AND 16399 @ 132931: PUSHI #0x00000003 16400 @ 132936: JUMPIF # L_0004 16401 @ 132940: PUSH FAULT 16402 @ 132943: PUSHI #0x00000007 16403 @ 132948: ASSPAR 16404 @ 132949: CALL 16405 @ 132950: LOCATE L_0004 2369 c(68): lmode = (lmode&else)!3; ! ...else... 16406 @ 132953: LINE 2369 "regression-compile-tmp/pass1.imp" 16407 @ 132989: PUSHI #0x00000044 16408 @ 132994: SLABEL 266 16409 @ 132997: LINE 2369 "regression-compile-tmp/pass1.imp" 16410 @ 133033: PUSH LMODE 16411 @ 133036: PUSH LMODE 16412 @ 133039: PUSHI #0x00000008 16413 @ 133044: AND 16414 @ 133045: PUSHI #0x00000003 16415 @ 133050: OR 16416 @ 133051: ASSVAL 2370 %if access # 0 %start 16417 @ 133052: LINE 2370 "regression-compile-tmp/pass1.imp" 16418 @ 133088: PUSH ACCESS 16419 @ 133091: PUSHI #0x00000000 16420 @ 133096: JUMPIF = L_0004 2371 op('F', label-1); lmode = else!3 16421 @ 133100: LINE 2371 "regression-compile-tmp/pass1.imp" 16422 @ 133136: PUSH OP 16423 @ 133139: PUSHI #0x00000046 16424 @ 133144: ASSPAR 16425 @ 133145: PUSH LABEL 16426 @ 133148: PUSHI #0x00000001 16427 @ 133153: SUB 16428 @ 133154: ASSPAR 16429 @ 133155: CALL 16430 @ 133156: LINE 2371 "regression-compile-tmp/pass1.imp" 16431 @ 133192: PUSH LMODE 16432 @ 133195: PUSHI #0x00000008 16433 @ 133200: PUSHI #0x00000003 16434 @ 133205: OR 16435 @ 133206: ASSVAL 2372 %finish 16436 @ 133207: LINE 2372 "regression-compile-tmp/pass1.imp" 16437 @ 133243: LOCATE L_0004 2373 def lab(label) 16438 @ 133246: LINE 2373 "regression-compile-tmp/pass1.imp" 16439 @ 133282: PUSH DEFLAB 16440 @ 133285: PUSH LABEL 16441 @ 133288: ASSPAR 16442 @ 133289: CALL 2374 ->top %if next # 0 16443 @ 133290: LINE 2374 "regression-compile-tmp/pass1.imp" 16444 @ 133326: PUSH NEXT 16445 @ 133329: PUSHI #0x00000000 16446 @ 133334: JUMPIF = L_0004 16447 @ 133338: JUMP L_0135 16448 @ 133341: LOCATE L_0004 2375 c(120): ; ! %MSTART 16449 @ 133344: LINE 2375 "regression-compile-tmp/pass1.imp" 16450 @ 133380: PUSHI #0x00000078 16451 @ 133385: SLABEL 266 2376 c(67): ; ! start 16452 @ 133388: LINE 2376 "regression-compile-tmp/pass1.imp" 16453 @ 133424: PUSHI #0x00000043 16454 @ 133429: SLABEL 266 2377 c(71): ; ! cycle 16455 @ 133432: LINE 2377 "regression-compile-tmp/pass1.imp" 16456 @ 133468: PUSHI #0x00000047 16457 @ 133473: SLABEL 266 2378 stcy: def lab(label-1) %and lmode = loop %if lmode = 0; ! cycle 16458 @ 133476: LINE 2378 "regression-compile-tmp/pass1.imp" 16459 @ 133512: LABEL L_0137 16460 @ 133515: LINE 2378 "regression-compile-tmp/pass1.imp" 16461 @ 133551: PUSH LMODE 16462 @ 133554: PUSHI #0x00000000 16463 @ 133559: JUMPIF # L_0004 16464 @ 133563: PUSH DEFLAB 16465 @ 133566: PUSH LABEL 16466 @ 133569: PUSHI #0x00000001 16467 @ 133574: SUB 16468 @ 133575: ASSPAR 16469 @ 133576: CALL 16470 @ 133577: PUSH LMODE 16471 @ 133580: PUSHI #0x00000010 16472 @ 133585: ASSVAL 16473 @ 133586: LOCATE L_0004 2379 dmin = dmin-1; abandon(3) %if dmin <= dmax 16474 @ 133589: LINE 2379 "regression-compile-tmp/pass1.imp" 16475 @ 133625: PUSH DMIN 16476 @ 133628: PUSH DMIN 16477 @ 133631: PUSHI #0x00000001 16478 @ 133636: SUB 16479 @ 133637: ASSVAL 16480 @ 133638: LINE 2379 "regression-compile-tmp/pass1.imp" 16481 @ 133674: PUSH DMIN 16482 @ 133677: PUSH DMAX 16483 @ 133680: JUMPIF > L_0004 16484 @ 133684: PUSH ABANDON 16485 @ 133687: PUSHI #0x00000003 16486 @ 133692: ASSPAR 16487 @ 133693: CALL 16488 @ 133694: LOCATE L_0004 2380 dict(dmin) = lmode 16489 @ 133697: LINE 2380 "regression-compile-tmp/pass1.imp" 16490 @ 133733: PUSH DICT 16491 @ 133736: PUSH DMIN 16492 @ 133739: ACCESS 16493 @ 133740: PUSH LMODE 16494 @ 133743: ASSVAL 2381 label = label+3 16495 @ 133744: LINE 2381 "regression-compile-tmp/pass1.imp" 16496 @ 133780: PUSH LABEL 16497 @ 133783: PUSH LABEL 16498 @ 133786: PUSHI #0x00000003 16499 @ 133791: ADD 16500 @ 133792: ASSVAL 2382 %return 2383 16501 @ 133793: LINE 2382 "regression-compile-tmp/pass1.imp" 16502 @ 133829: RETURN 2384 c(64): fault(13) %if dict(dmin) >= 0 %or inhibit # 0; ! on event 16503 @ 133830: LINE 2384 "regression-compile-tmp/pass1.imp" 16504 @ 133866: PUSHI #0x00000040 16505 @ 133871: SLABEL 266 16506 @ 133874: LINE 2384 "regression-compile-tmp/pass1.imp" 16507 @ 133910: PUSH DICT 16508 @ 133913: PUSH DMIN 16509 @ 133916: ACCESS 16510 @ 133917: PUSHI #0x00000000 16511 @ 133922: JUMPIF >= L_0005 16512 @ 133926: PUSH INHIBIT 16513 @ 133929: PUSHI #0x00000000 16514 @ 133934: JUMPIF = L_0004 16515 @ 133938: LOCATE L_0005 16516 @ 133941: PUSH FAULT 16517 @ 133944: PUSHI #0x0000000d 16518 @ 133949: ASSPAR 16519 @ 133950: CALL 16520 @ 133951: LOCATE L_0004 2385 inhibit = 1 16521 @ 133954: LINE 2385 "regression-compile-tmp/pass1.imp" 16522 @ 133990: PUSH INHIBIT 16523 @ 133993: PUSHI #0x00000001 16524 @ 133998: ASSVAL 2386 n = 0 16525 @ 133999: LINE 2386 "regression-compile-tmp/pass1.imp" 16526 @ 134035: PUSH N 16527 @ 134038: PUSHI #0x00000000 16528 @ 134043: ASSVAL 2387 n = 16_FFFF %if pending = 0; ! * = all events 16529 @ 134044: LINE 2387 "regression-compile-tmp/pass1.imp" 16530 @ 134080: PUSH PENDING 16531 @ 134083: PUSHI #0x00000000 16532 @ 134088: JUMPIF # L_0004 16533 @ 134092: PUSH N 16534 @ 134095: PUSHI #0x0000ffff 16535 @ 134100: ASSVAL 16536 @ 134101: LOCATE L_0004 2388 %while pending > 0 %cycle 16537 @ 134104: LINE 2388 "regression-compile-tmp/pass1.imp" 16538 @ 134140: LOCATE L_0003 16539 @ 134143: PUSH PENDING 16540 @ 134146: PUSHI #0x00000000 16541 @ 134151: JUMPIF <= L_0004 2389 pop lit; fault(10) %if lit&(\15) # 0; ! too big 16542 @ 134155: LINE 2389 "regression-compile-tmp/pass1.imp" 16543 @ 134191: PUSH POPLIT 16544 @ 134194: CALL 16545 @ 134195: LINE 2389 "regression-compile-tmp/pass1.imp" 16546 @ 134231: PUSH LIT 16547 @ 134234: PUSHI #0x0000000f 16548 @ 134239: NOT 16549 @ 134240: AND 16550 @ 134241: PUSHI #0x00000000 16551 @ 134246: JUMPIF = L_0007 16552 @ 134250: PUSH FAULT 16553 @ 134253: PUSHI #0x0000000a 16554 @ 134258: ASSPAR 16555 @ 134259: CALL 16556 @ 134260: LOCATE L_0007 2390 j = 1<stcy 2396 16596 @ 134565: LINE 2395 "regression-compile-tmp/pass1.imp" 16597 @ 134601: PUSH LMODE 16598 @ 134604: PUSHI #0x00000004 16599 @ 134609: PUSHI #0x00000001 16600 @ 134614: OR 16601 @ 134615: ASSVAL 16602 @ 134616: LINE 2395 "regression-compile-tmp/pass1.imp" 16603 @ 134652: JUMP L_0137 2397 c(104): op('J', tag(x)_index); ! l 16604 @ 134655: LINE 2397 "regression-compile-tmp/pass1.imp" 16605 @ 134691: PUSHI #0x00000068 16606 @ 134696: SLABEL 266 16607 @ 134699: LINE 2397 "regression-compile-tmp/pass1.imp" 16608 @ 134735: PUSH OP 16609 @ 134738: PUSHI #0x0000004a 16610 @ 134743: ASSPAR 16611 @ 134744: PUSH TAG 16612 @ 134747: PUSH X 16613 @ 134750: ACCESS 16614 @ 134751: SELECT 4 16615 @ 134754: ASSPAR 16616 @ 134755: CALL 2398 inhibit = 1; ->atop 16617 @ 134756: LINE 2398 "regression-compile-tmp/pass1.imp" 16618 @ 134792: PUSH INHIBIT 16619 @ 134795: PUSHI #0x00000001 16620 @ 134800: ASSVAL 16621 @ 134801: LINE 2398 "regression-compile-tmp/pass1.imp" 16622 @ 134837: JUMP L_0136 2399 c(149): stats = stats-1; ! lab 16623 @ 134840: LINE 2399 "regression-compile-tmp/pass1.imp" 16624 @ 134876: PUSHI #0x00000095 16625 @ 134881: SLABEL 266 16626 @ 134884: LINE 2399 "regression-compile-tmp/pass1.imp" 16627 @ 134920: PUSH STATS 16628 @ 134923: PUSH STATS 16629 @ 134926: PUSHI #0x00000001 16630 @ 134931: SUB 16631 @ 134932: ASSVAL 2400 access = 1; inhibit = 1 16632 @ 134933: LINE 2400 "regression-compile-tmp/pass1.imp" 16633 @ 134969: PUSH ACCESS 16634 @ 134972: PUSHI #0x00000001 16635 @ 134977: ASSVAL 16636 @ 134978: LINE 2400 "regression-compile-tmp/pass1.imp" 16637 @ 135014: PUSH INHIBIT 16638 @ 135017: PUSHI #0x00000001 16639 @ 135022: ASSVAL 2401 op('L', tag(x)_index); ->top 2402 16640 @ 135023: LINE 2401 "regression-compile-tmp/pass1.imp" 16641 @ 135059: PUSH OP 16642 @ 135062: PUSHI #0x0000004c 16643 @ 135067: ASSPAR 16644 @ 135068: PUSH TAG 16645 @ 135071: PUSH X 16646 @ 135074: ACCESS 16647 @ 135075: SELECT 4 16648 @ 135078: ASSPAR 16649 @ 135079: CALL 16650 @ 135080: LINE 2401 "regression-compile-tmp/pass1.imp" 16651 @ 135116: JUMP L_0135 2403 c(63): j = dmin; l = label-3; ! exit, continue 16652 @ 135119: LINE 2403 "regression-compile-tmp/pass1.imp" 16653 @ 135155: PUSHI #0x0000003f 16654 @ 135160: SLABEL 266 16655 @ 135163: LINE 2403 "regression-compile-tmp/pass1.imp" 16656 @ 135199: PUSH J 16657 @ 135202: PUSH DMIN 16658 @ 135205: ASSVAL 16659 @ 135206: LINE 2403 "regression-compile-tmp/pass1.imp" 16660 @ 135242: PUSH L 16661 @ 135245: PUSH LABEL 16662 @ 135248: PUSHI #0x00000003 16663 @ 135253: SUB 16664 @ 135254: ASSVAL 2404 %cycle 16665 @ 135255: LINE 2404 "regression-compile-tmp/pass1.imp" 16666 @ 135291: LOCATE L_0003 2405 fault(7) %and ->top %if dict(j) < 0 16667 @ 135294: LINE 2405 "regression-compile-tmp/pass1.imp" 16668 @ 135330: PUSH DICT 16669 @ 135333: PUSH J 16670 @ 135336: ACCESS 16671 @ 135337: PUSHI #0x00000000 16672 @ 135342: JUMPIF >= L_0007 16673 @ 135346: PUSH FAULT 16674 @ 135349: PUSHI #0x00000007 16675 @ 135354: ASSPAR 16676 @ 135355: CALL 16677 @ 135356: JUMP L_0135 16678 @ 135359: LOCATE L_0007 2406 %exit %if dict(j)&1 = 0 16679 @ 135362: LINE 2406 "regression-compile-tmp/pass1.imp" 16680 @ 135398: PUSH DICT 16681 @ 135401: PUSH J 16682 @ 135404: ACCESS 16683 @ 135405: PUSHI #0x00000001 16684 @ 135410: AND 16685 @ 135411: PUSHI #0x00000000 16686 @ 135416: JUMPIF # L_0007 16687 @ 135420: GOTO L_0004 16688 @ 135423: LOCATE L_0007 2407 j = j+1; l = l-3 16689 @ 135426: LINE 2407 "regression-compile-tmp/pass1.imp" 16690 @ 135462: PUSH J 16691 @ 135465: PUSH J 16692 @ 135468: PUSHI #0x00000001 16693 @ 135473: ADD 16694 @ 135474: ASSVAL 16695 @ 135475: LINE 2407 "regression-compile-tmp/pass1.imp" 16696 @ 135511: PUSH L 16697 @ 135514: PUSH L 16698 @ 135517: PUSHI #0x00000003 16699 @ 135522: SUB 16700 @ 135523: ASSVAL 2408 %repeat 16701 @ 135524: LINE 2408 "regression-compile-tmp/pass1.imp" 16702 @ 135560: REPEAT L_0003 16703 @ 135563: LOCATE L_0004 2409 l = l+1 %if x = 32; ! continue 16704 @ 135566: LINE 2409 "regression-compile-tmp/pass1.imp" 16705 @ 135602: PUSH X 16706 @ 135605: PUSHI #0x00000020 16707 @ 135610: JUMPIF # L_0004 16708 @ 135614: PUSH L 16709 @ 135617: PUSH L 16710 @ 135620: PUSHI #0x00000001 16711 @ 135625: ADD 16712 @ 135626: ASSVAL 16713 @ 135627: LOCATE L_0004 2410 op('F', l) 16714 @ 135630: LINE 2410 "regression-compile-tmp/pass1.imp" 16715 @ 135666: PUSH OP 16716 @ 135669: PUSHI #0x00000046 16717 @ 135674: ASSPAR 16718 @ 135675: PUSH L 16719 @ 135678: ASSPAR 16720 @ 135679: CALL 2411 dict(j) = dict(j)!x; ! show given 16721 @ 135680: LINE 2411 "regression-compile-tmp/pass1.imp" 16722 @ 135716: PUSH DICT 16723 @ 135719: PUSH J 16724 @ 135722: ACCESS 16725 @ 135723: PUSH DICT 16726 @ 135726: PUSH J 16727 @ 135729: ACCESS 16728 @ 135730: PUSH X 16729 @ 135733: OR 16730 @ 135734: ASSVAL 2412 ->atop 2413 16731 @ 135735: LINE 2412 "regression-compile-tmp/pass1.imp" 16732 @ 135771: JUMP L_0136 2414 c(50): add char( 'C' ); ->cop; ! acomp 16733 @ 135774: LINE 2414 "regression-compile-tmp/pass1.imp" 16734 @ 135810: PUSHI #0x00000032 16735 @ 135815: SLABEL 266 16736 @ 135818: LINE 2414 "regression-compile-tmp/pass1.imp" 16737 @ 135854: PUSH ADDCHAR 16738 @ 135857: PUSHI #0x00000043 16739 @ 135862: ASSPAR 16740 @ 135863: CALL 16741 @ 135864: LINE 2414 "regression-compile-tmp/pass1.imp" 16742 @ 135900: JUMP L_0138 2415 c(49): 16743 @ 135903: LINE 2415 "regression-compile-tmp/pass1.imp" 16744 @ 135939: PUSHI #0x00000031 16745 @ 135944: SLABEL 266 2416 %if next # 0 %start; ! comparator 16746 @ 135947: LINE 2416 "regression-compile-tmp/pass1.imp" 16747 @ 135983: PUSH NEXT 16748 @ 135986: PUSHI #0x00000000 16749 @ 135991: JUMPIF = L_0004 2417 add char( '"' ) 16750 @ 135995: LINE 2417 "regression-compile-tmp/pass1.imp" 16751 @ 136031: PUSH ADDCHAR 16752 @ 136034: PUSHI #0x00000022 16753 @ 136039: ASSPAR 16754 @ 136040: CALL 2418 push(0); ! double sided 16755 @ 136041: LINE 2418 "regression-compile-tmp/pass1.imp" 16756 @ 136077: PUSH PUSH 16757 @ 136080: PUSHI #0x00000000 16758 @ 136085: ASSPAR 16759 @ 136086: CALL 2419 %finish %else %start 16760 @ 136087: LINE 2419 "regression-compile-tmp/pass1.imp" 16761 @ 136123: GOTO L_0003 16762 @ 136126: LOCATE L_0004 2420 add char( '?' ) 16763 @ 136129: LINE 2420 "regression-compile-tmp/pass1.imp" 16764 @ 136165: PUSH ADDCHAR 16765 @ 136168: PUSHI #0x0000003f 16766 @ 136173: ASSPAR 16767 @ 136174: CALL 2421 %finish 2422 16768 @ 136175: LINE 2421 "regression-compile-tmp/pass1.imp" 16769 @ 136211: LOCATE L_0003 2423 cop: x = x!!1 %if cnest(cp)&2 # 0; ! invert the condition 16770 @ 136214: LINE 2423 "regression-compile-tmp/pass1.imp" 16771 @ 136250: LABEL L_0138 16772 @ 136253: LINE 2423 "regression-compile-tmp/pass1.imp" 16773 @ 136289: PUSH CNEST 16774 @ 136292: PUSH CP 16775 @ 136295: ACCESS 16776 @ 136296: PUSHI #0x00000002 16777 @ 136301: AND 16778 @ 136302: PUSHI #0x00000000 16779 @ 136307: JUMPIF = L_0004 16780 @ 136311: PUSH X 16781 @ 136314: PUSH X 16782 @ 136317: PUSHI #0x00000001 16783 @ 136322: XOR 16784 @ 136323: ASSVAL 16785 @ 136324: LOCATE L_0004 2424 j = cp; l = clab 16786 @ 136327: LINE 2424 "regression-compile-tmp/pass1.imp" 16787 @ 136363: PUSH J 16788 @ 136366: PUSH CP 16789 @ 136369: ASSVAL 16790 @ 136370: LINE 2424 "regression-compile-tmp/pass1.imp" 16791 @ 136406: PUSH L 16792 @ 136409: PUSH CLAB 16793 @ 136412: ASSVAL 2425 %while cnest(j)&4 = 0 %cycle 16794 @ 136413: LINE 2425 "regression-compile-tmp/pass1.imp" 16795 @ 136449: LOCATE L_0003 16796 @ 136452: PUSH CNEST 16797 @ 136455: PUSH J 16798 @ 136458: ACCESS 16799 @ 136459: PUSHI #0x00000004 16800 @ 136464: AND 16801 @ 136465: PUSHI #0x00000000 16802 @ 136470: JUMPIF # L_0004 2426 j = j-1; l = l-cnest(j)&1 16803 @ 136474: LINE 2426 "regression-compile-tmp/pass1.imp" 16804 @ 136510: PUSH J 16805 @ 136513: PUSH J 16806 @ 136516: PUSHI #0x00000001 16807 @ 136521: SUB 16808 @ 136522: ASSVAL 16809 @ 136523: LINE 2426 "regression-compile-tmp/pass1.imp" 16810 @ 136559: PUSH L 16811 @ 136562: PUSH L 16812 @ 136565: PUSH CNEST 16813 @ 136568: PUSH J 16814 @ 136571: ACCESS 16815 @ 136572: PUSHI #0x00000001 16816 @ 136577: AND 16817 @ 136578: SUB 16818 @ 136579: ASSVAL 2427 %repeat 16819 @ 136580: LINE 2427 "regression-compile-tmp/pass1.imp" 16820 @ 136616: REPEAT L_0003 16821 @ 136619: LOCATE L_0004 2428 op(cc(x), l) 16822 @ 136622: LINE 2428 "regression-compile-tmp/pass1.imp" 16823 @ 136658: PUSH OP 16824 @ 136661: PUSH CC 16825 @ 136664: PUSH X 16826 @ 136667: ACCESS 16827 @ 136668: ASSPAR 16828 @ 136669: PUSH L 16829 @ 136672: ASSPAR 16830 @ 136673: CALL 2429 def lab(clab+1) %if cnest(cp)&1 # 0 16831 @ 136674: LINE 2429 "regression-compile-tmp/pass1.imp" 16832 @ 136710: PUSH CNEST 16833 @ 136713: PUSH CP 16834 @ 136716: ACCESS 16835 @ 136717: PUSHI #0x00000001 16836 @ 136722: AND 16837 @ 136723: PUSHI #0x00000000 16838 @ 136728: JUMPIF = L_0004 16839 @ 136732: PUSH DEFLAB 16840 @ 136735: PUSH CLAB 16841 @ 136738: PUSHI #0x00000001 16842 @ 136743: ADD 16843 @ 136744: ASSPAR 16844 @ 136745: CALL 16845 @ 136746: LOCATE L_0004 2430 cp = cp-1 16846 @ 136749: LINE 2430 "regression-compile-tmp/pass1.imp" 16847 @ 136785: PUSH CP 16848 @ 136788: PUSH CP 16849 @ 136791: PUSHI #0x00000001 16850 @ 136796: SUB 16851 @ 136797: ASSVAL 2431 clab = clab-cnest(cp)&1 16852 @ 136798: LINE 2431 "regression-compile-tmp/pass1.imp" 16853 @ 136834: PUSH CLAB 16854 @ 136837: PUSH CLAB 16855 @ 136840: PUSH CNEST 16856 @ 136843: PUSH CP 16857 @ 136846: ACCESS 16858 @ 136847: PUSHI #0x00000001 16859 @ 136852: AND 16860 @ 136853: SUB 16861 @ 136854: ASSVAL 2432 ->top 2433 16862 @ 136855: LINE 2432 "regression-compile-tmp/pass1.imp" 16863 @ 136891: JUMP L_0135 2434 c(78): ; ! fresult 16864 @ 136894: LINE 2434 "regression-compile-tmp/pass1.imp" 16865 @ 136930: PUSHI #0x0000004e 16866 @ 136935: SLABEL 266 2435 c(79): ; ! mresult 16867 @ 136938: LINE 2435 "regression-compile-tmp/pass1.imp" 16868 @ 136974: PUSHI #0x0000004f 16869 @ 136979: SLABEL 266 2436 c(80): open = 0; ! return, true, false 16870 @ 136982: LINE 2436 "regression-compile-tmp/pass1.imp" 16871 @ 137018: PUSHI #0x00000050 16872 @ 137023: SLABEL 266 16873 @ 137026: LINE 2436 "regression-compile-tmp/pass1.imp" 16874 @ 137062: PUSH OPEN 16875 @ 137065: PUSHI #0x00000000 16876 @ 137070: ASSVAL 2437 c(82): access = 0; ! stop 16877 @ 137071: LINE 2437 "regression-compile-tmp/pass1.imp" 16878 @ 137107: PUSHI #0x00000052 16879 @ 137112: SLABEL 266 16880 @ 137115: LINE 2437 "regression-compile-tmp/pass1.imp" 16881 @ 137151: PUSH ACCESS 16882 @ 137154: PUSHI #0x00000000 16883 @ 137159: ASSVAL 2438 c(89): ; ! addop 16884 @ 137160: LINE 2438 "regression-compile-tmp/pass1.imp" 16885 @ 137196: PUSHI #0x00000059 16886 @ 137201: SLABEL 266 2439 c(81): add char( x ); ->top; ! monitor 16887 @ 137204: LINE 2439 "regression-compile-tmp/pass1.imp" 16888 @ 137240: PUSHI #0x00000051 16889 @ 137245: SLABEL 266 16890 @ 137248: LINE 2439 "regression-compile-tmp/pass1.imp" 16891 @ 137284: PUSH ADDCHAR 16892 @ 137287: PUSH X 16893 @ 137290: ASSPAR 16894 @ 137291: CALL 16895 @ 137292: LINE 2439 "regression-compile-tmp/pass1.imp" 16896 @ 137328: JUMP L_0135 2440 c(65): pop lit; op('e', lit); ->atop; ! signal 16897 @ 137331: LINE 2440 "regression-compile-tmp/pass1.imp" 16898 @ 137367: PUSHI #0x00000041 16899 @ 137372: SLABEL 266 16900 @ 137375: LINE 2440 "regression-compile-tmp/pass1.imp" 16901 @ 137411: PUSH POPLIT 16902 @ 137414: CALL 16903 @ 137415: LINE 2440 "regression-compile-tmp/pass1.imp" 16904 @ 137451: PUSH OP 16905 @ 137454: PUSHI #0x00000065 16906 @ 137459: ASSPAR 16907 @ 137460: PUSH LIT 16908 @ 137463: ASSPAR 16909 @ 137464: CALL 16910 @ 137465: LINE 2440 "regression-compile-tmp/pass1.imp" 16911 @ 137501: JUMP L_0136 2441 c(51): add char( 'S' ); ->top; ! eq 16912 @ 137504: LINE 2441 "regression-compile-tmp/pass1.imp" 16913 @ 137540: PUSHI #0x00000033 16914 @ 137545: SLABEL 266 16915 @ 137548: LINE 2441 "regression-compile-tmp/pass1.imp" 16916 @ 137584: PUSH ADDCHAR 16917 @ 137587: PUSHI #0x00000053 16918 @ 137592: ASSPAR 16919 @ 137593: CALL 16920 @ 137594: LINE 2441 "regression-compile-tmp/pass1.imp" 16921 @ 137630: JUMP L_0135 2442 c(53): add char( 'j' ); ->top; ! jam transfer 16922 @ 137633: LINE 2442 "regression-compile-tmp/pass1.imp" 16923 @ 137669: PUSHI #0x00000035 16924 @ 137674: SLABEL 266 16925 @ 137677: LINE 2442 "regression-compile-tmp/pass1.imp" 16926 @ 137713: PUSH ADDCHAR 16927 @ 137716: PUSHI #0x0000006a 16928 @ 137721: ASSPAR 16929 @ 137722: CALL 16930 @ 137723: LINE 2442 "regression-compile-tmp/pass1.imp" 16931 @ 137759: JUMP L_0135 2443 c(52): add char( 'Z' ); ->top; ! eqeq 16932 @ 137762: LINE 2443 "regression-compile-tmp/pass1.imp" 16933 @ 137798: PUSHI #0x00000034 16934 @ 137803: SLABEL 266 16935 @ 137806: LINE 2443 "regression-compile-tmp/pass1.imp" 16936 @ 137842: PUSH ADDCHAR 16937 @ 137845: PUSHI #0x0000005a 16938 @ 137850: ASSPAR 16939 @ 137851: CALL 16940 @ 137852: LINE 2443 "regression-compile-tmp/pass1.imp" 16941 @ 137888: JUMP L_0135 2444 c(74): %if level = 0 %start; ! begin 16942 @ 137891: LINE 2444 "regression-compile-tmp/pass1.imp" 16943 @ 137927: PUSHI #0x0000004a 16944 @ 137932: SLABEL 266 16945 @ 137935: LINE 2444 "regression-compile-tmp/pass1.imp" 16946 @ 137971: PUSH LEVEL 16947 @ 137974: PUSHI #0x00000000 16948 @ 137979: JUMPIF # L_0004 2445 %if progmode <= 0 %then progmode = 1 %else fault(7) 2446 !{Permit BEGIN after external defs} 16949 @ 137983: LINE 2445 "regression-compile-tmp/pass1.imp" 16950 @ 138019: PUSH PROGMODE 16951 @ 138022: PUSHI #0x00000000 16952 @ 138027: JUMPIF > L_0007 16953 @ 138031: PUSH PROGMODE 16954 @ 138034: PUSHI #0x00000001 16955 @ 138039: ASSVAL 16956 @ 138040: GOTO L_0006 16957 @ 138043: LOCATE L_0007 16958 @ 138046: PUSH FAULT 16959 @ 138049: PUSHI #0x00000007 16960 @ 138054: ASSPAR 16961 @ 138055: CALL 16962 @ 138056: LOCATE L_0006 2447 %finish 16963 @ 138059: LINE 2447 "regression-compile-tmp/pass1.imp" 16964 @ 138095: LOCATE L_0004 2448 spec mode = level+1 16965 @ 138098: LINE 2448 "regression-compile-tmp/pass1.imp" 16966 @ 138134: PUSH SPECMODE 16967 @ 138137: PUSH LEVEL 16968 @ 138140: PUSHI #0x00000001 16969 @ 138145: ADD 16970 @ 138146: ASSVAL 2449 block x = 0 16971 @ 138147: LINE 2449 "regression-compile-tmp/pass1.imp" 16972 @ 138183: PUSH BLOCKX 16973 @ 138186: PUSHI #0x00000000 16974 @ 138191: ASSVAL 2450 add char( 'H' ) 16975 @ 138192: LINE 2450 "regression-compile-tmp/pass1.imp" 16976 @ 138228: PUSH ADDCHAR 16977 @ 138231: PUSHI #0x00000048 16978 @ 138236: ASSPAR 16979 @ 138237: CALL 2451 %return 16980 @ 138238: LINE 2451 "regression-compile-tmp/pass1.imp" 16981 @ 138274: RETURN 2452 c(77): perm = 0; lines = 0; stats = 0; ! endofperm 16982 @ 138275: LINE 2452 "regression-compile-tmp/pass1.imp" 16983 @ 138311: PUSHI #0x0000004d 16984 @ 138316: SLABEL 266 16985 @ 138319: LINE 2452 "regression-compile-tmp/pass1.imp" 16986 @ 138355: PUSH PERM 16987 @ 138358: PUSHI #0x00000000 16988 @ 138363: ASSVAL 16989 @ 138364: LINE 2452 "regression-compile-tmp/pass1.imp" 16990 @ 138400: PUSH LINES 16991 @ 138403: PUSHI #0x00000000 16992 @ 138408: ASSVAL 16993 @ 138409: LINE 2452 "regression-compile-tmp/pass1.imp" 16994 @ 138445: PUSH STATS 16995 @ 138448: PUSHI #0x00000000 16996 @ 138453: ASSVAL 2453 close input 16997 @ 138454: LINE 2453 "regression-compile-tmp/pass1.imp" 16998 @ 138490: PUSH CLOSEINPUT 16999 @ 138493: CALL 2454 select input(source) 17000 @ 138494: LINE 2454 "regression-compile-tmp/pass1.imp" 17001 @ 138530: PUSH SELECTINPUT 17002 @ 138533: PUSHI #0x00000001 17003 @ 138538: ASSPAR 17004 @ 138539: CALL 2455 list = list-1 17005 @ 138540: LINE 2455 "regression-compile-tmp/pass1.imp" 17006 @ 138576: PUSH LIST 17007 @ 138579: PUSH LIST 17008 @ 138582: PUSHI #0x00000001 17009 @ 138587: SUB 17010 @ 138588: ASSVAL 2456 tbase = tmax; tstart = tmax 17011 @ 138589: LINE 2456 "regression-compile-tmp/pass1.imp" 17012 @ 138625: PUSH TBASE 17013 @ 138628: PUSH TMAX 17014 @ 138631: ASSVAL 17015 @ 138632: LINE 2456 "regression-compile-tmp/pass1.imp" 17016 @ 138668: PUSH TSTART 17017 @ 138671: PUSH TMAX 17018 @ 138674: ASSVAL 2457 %return 17019 @ 138675: LINE 2457 "regression-compile-tmp/pass1.imp" 17020 @ 138711: RETURN 2458 c(76): %if include # 0 %and x = 0 %start; ! end of ... 17021 @ 138712: LINE 2458 "regression-compile-tmp/pass1.imp" 17022 @ 138748: PUSHI #0x0000004c 17023 @ 138753: SLABEL 266 17024 @ 138756: LINE 2458 "regression-compile-tmp/pass1.imp" 17025 @ 138792: PUSH INCLUDE 17026 @ 138795: PUSHI #0x00000000 17027 @ 138800: JUMPIF = L_0004 17028 @ 138804: PUSH X 17029 @ 138807: PUSHI #0x00000000 17030 @ 138812: JUMPIF # L_0004 2459 lines = include; sstype = 0; ! include 17031 @ 138816: LINE 2459 "regression-compile-tmp/pass1.imp" 17032 @ 138852: PUSH LINES 17033 @ 138855: PUSH INCLUDE 17034 @ 138858: ASSVAL 17035 @ 138859: LINE 2459 "regression-compile-tmp/pass1.imp" 17036 @ 138895: PUSH SSTYPE 17037 @ 138898: PUSHI #0x00000000 17038 @ 138903: ASSVAL 2460 close input 17039 @ 138904: LINE 2460 "regression-compile-tmp/pass1.imp" 17040 @ 138940: PUSH CLOSEINPUT 17041 @ 138943: CALL 2461 list = include list 17042 @ 138944: LINE 2461 "regression-compile-tmp/pass1.imp" 17043 @ 138980: PUSH LIST 17044 @ 138983: PUSH INCLUDELIST 17045 @ 138986: ASSVAL 2462 include level = 0 17046 @ 138987: LINE 2462 "regression-compile-tmp/pass1.imp" 17047 @ 139023: PUSH INCLUDELEVEL 17048 @ 139026: PUSHI #0x00000000 17049 @ 139031: ASSVAL 2463 include = 0; select input(source); %return 17050 @ 139032: LINE 2463 "regression-compile-tmp/pass1.imp" 17051 @ 139068: PUSH INCLUDE 17052 @ 139071: PUSHI #0x00000000 17053 @ 139076: ASSVAL 17054 @ 139077: LINE 2463 "regression-compile-tmp/pass1.imp" 17055 @ 139113: PUSH SELECTINPUT 17056 @ 139116: PUSHI #0x00000001 17057 @ 139121: ASSPAR 17058 @ 139122: CALL 17059 @ 139123: LINE 2463 "regression-compile-tmp/pass1.imp" 17060 @ 139159: RETURN 2464 %finish 17061 @ 139160: LINE 2464 "regression-compile-tmp/pass1.imp" 17062 @ 139196: LOCATE L_0004 2465 ss = -1; ! prog/file 17063 @ 139199: LINE 2465 "regression-compile-tmp/pass1.imp" 17064 @ 139235: PUSH SS 17065 @ 139238: PUSHI #0x00000001 17066 @ 139243: NEGATE 17067 @ 139244: ASSVAL 2466 c(75): compile end(x); %return; ! %end 2467 17068 @ 139245: LINE 2466 "regression-compile-tmp/pass1.imp" 17069 @ 139281: PUSHI #0x0000004b 17070 @ 139286: SLABEL 266 17071 @ 139289: LINE 2466 "regression-compile-tmp/pass1.imp" 17072 @ 139325: PUSH COMPILEEND 17073 @ 139328: PUSH X 17074 @ 139331: ASSPAR 17075 @ 139332: CALL 17076 @ 139333: LINE 2466 "regression-compile-tmp/pass1.imp" 17077 @ 139369: RETURN 2468 c(85): %if x=0 %then control=lit %else %start; ! control 17078 @ 139370: LINE 2468 "regression-compile-tmp/pass1.imp" 17079 @ 139406: PUSHI #0x00000055 17080 @ 139411: SLABEL 266 17081 @ 139414: LINE 2468 "regression-compile-tmp/pass1.imp" 17082 @ 139450: PUSH X 17083 @ 139453: PUSHI #0x00000000 17084 @ 139458: JUMPIF # L_0004 17085 @ 139462: PUSH CONTROL 17086 @ 139465: PUSH LIT 17087 @ 139468: ASSVAL 17088 @ 139469: GOTO L_0003 17089 @ 139472: LOCATE L_0004 2469 diag = lit&16_3FFF %if lit>>14&3 = 1 17090 @ 139475: LINE 2469 "regression-compile-tmp/pass1.imp" 17091 @ 139511: PUSH LIT 17092 @ 139514: PUSHI #0x0000000e 17093 @ 139519: RSH 17094 @ 139520: PUSHI #0x00000003 17095 @ 139525: AND 17096 @ 139526: PUSHI #0x00000001 17097 @ 139531: JUMPIF # L_0007 17098 @ 139535: PUSH DIAG 17099 @ 139538: PUSH LIT 17100 @ 139541: PUSHI #0x00003fff 17101 @ 139546: AND 17102 @ 139547: ASSVAL 17103 @ 139548: LOCATE L_0007 2470 %finish 17104 @ 139551: LINE 2470 "regression-compile-tmp/pass1.imp" 17105 @ 139587: LOCATE L_0003 2471 op('z'-x, lit) 17106 @ 139590: LINE 2471 "regression-compile-tmp/pass1.imp" 17107 @ 139626: PUSH OP 17108 @ 139629: PUSHI #0x0000007a 17109 @ 139634: PUSH X 17110 @ 139637: SUB 17111 @ 139638: ASSPAR 17112 @ 139639: PUSH LIT 17113 @ 139642: ASSPAR 17114 @ 139643: CALL 2472 ->top 17115 @ 139644: LINE 2472 "regression-compile-tmp/pass1.imp" 17116 @ 139680: JUMP L_0135 2473 c(83): list = list+x-2; ->top; ! %LIST/%endoflist 17117 @ 139683: LINE 2473 "regression-compile-tmp/pass1.imp" 17118 @ 139719: PUSHI #0x00000053 17119 @ 139724: SLABEL 266 17120 @ 139727: LINE 2473 "regression-compile-tmp/pass1.imp" 17121 @ 139763: PUSH LIST 17122 @ 139766: PUSH LIST 17123 @ 139769: PUSH X 17124 @ 139772: ADD 17125 @ 139773: PUSHI #0x00000002 17126 @ 139778: SUB 17127 @ 139779: ASSVAL 17128 @ 139780: LINE 2473 "regression-compile-tmp/pass1.imp" 17129 @ 139816: JUMP L_0135 2474 c(84): reals ln = x; ->top; ! %REALS long/normal 17130 @ 139819: LINE 2474 "regression-compile-tmp/pass1.imp" 17131 @ 139855: PUSHI #0x00000054 17132 @ 139860: SLABEL 266 17133 @ 139863: LINE 2474 "regression-compile-tmp/pass1.imp" 17134 @ 139899: PUSH REALSLN 17135 @ 139902: PUSH X 17136 @ 139905: ASSVAL 17137 @ 139906: LINE 2474 "regression-compile-tmp/pass1.imp" 17138 @ 139942: JUMP L_0135 2475 c(86): %if include # 0 %start; ! include "file" 17139 @ 139945: LINE 2475 "regression-compile-tmp/pass1.imp" 17140 @ 139981: PUSHI #0x00000056 17141 @ 139986: SLABEL 266 17142 @ 139989: LINE 2475 "regression-compile-tmp/pass1.imp" 17143 @ 140025: PUSH INCLUDE 17144 @ 140028: PUSHI #0x00000000 17145 @ 140033: JUMPIF = L_0004 2476 fault(7); %return 17146 @ 140037: LINE 2476 "regression-compile-tmp/pass1.imp" 17147 @ 140073: PUSH FAULT 17148 @ 140076: PUSHI #0x00000007 17149 @ 140081: ASSPAR 17150 @ 140082: CALL 17151 @ 140083: LINE 2476 "regression-compile-tmp/pass1.imp" 17152 @ 140119: RETURN 2477 %finish 17153 @ 140120: LINE 2477 "regression-compile-tmp/pass1.imp" 17154 @ 140156: LOCATE L_0004 2478 get next; ! sconst 17155 @ 140159: LINE 2478 "regression-compile-tmp/pass1.imp" 17156 @ 140195: PUSH GETNEXT 17157 @ 140198: CALL 2479 x = x-16_4000 17158 @ 140199: LINE 2479 "regression-compile-tmp/pass1.imp" 17159 @ 140235: PUSH X 17160 @ 140238: PUSH X 17161 @ 140241: PUSHI #0x00004000 17162 @ 140246: SUB 17163 @ 140247: ASSVAL 2480 j = glink(x) 17164 @ 140248: LINE 2480 "regression-compile-tmp/pass1.imp" 17165 @ 140284: PUSH J 17166 @ 140287: PUSH GLINK 17167 @ 140290: PUSH X 17168 @ 140293: ACCESS 17169 @ 140294: ASSVAL 2481 k = j&255 2482 !ABD - another little copy loop because SKIMP can't do the string map 17170 @ 140295: LINE 2481 "regression-compile-tmp/pass1.imp" 17171 @ 140331: PUSH K 17172 @ 140334: PUSH J 17173 @ 140337: PUSHI #0x000000ff 17174 @ 140342: AND 17175 @ 140343: ASSVAL 2483 include file = "" 17176 @ 140344: LINE 2483 "regression-compile-tmp/pass1.imp" 17177 @ 140380: PUSH INCLUDEFILE 17178 @ 140383: PUSHS "" 17179 @ 140385: ASSVAL 2484 %cycle 17180 @ 140386: LINE 2484 "regression-compile-tmp/pass1.imp" 17181 @ 140422: LOCATE L_0003 2485 k = k-1; %exit %if k < 0 17182 @ 140425: LINE 2485 "regression-compile-tmp/pass1.imp" 17183 @ 140461: PUSH K 17184 @ 140464: PUSH K 17185 @ 140467: PUSHI #0x00000001 17186 @ 140472: SUB 17187 @ 140473: ASSVAL 17188 @ 140474: LINE 2485 "regression-compile-tmp/pass1.imp" 17189 @ 140510: PUSH K 17190 @ 140513: PUSHI #0x00000000 17191 @ 140518: JUMPIF >= L_0007 17192 @ 140522: GOTO L_0004 17193 @ 140525: LOCATE L_0007 2486 include file = include file.tostring(j>>8) 17194 @ 140528: LINE 2486 "regression-compile-tmp/pass1.imp" 17195 @ 140564: PUSH INCLUDEFILE 17196 @ 140567: PUSH INCLUDEFILE 17197 @ 140570: PUSH TOSTRING 17198 @ 140573: PUSH J 17199 @ 140576: PUSHI #0x00000008 17200 @ 140581: RSH 17201 @ 140582: ASSPAR 17202 @ 140583: CALL 17203 @ 140584: CONCAT 17204 @ 140585: ASSVAL 2487 x = x+1 17205 @ 140586: LINE 2487 "regression-compile-tmp/pass1.imp" 17206 @ 140622: PUSH X 17207 @ 140625: PUSH X 17208 @ 140628: PUSHI #0x00000001 17209 @ 140633: ADD 17210 @ 140634: ASSVAL 2488 j = glink(x) 17211 @ 140635: LINE 2488 "regression-compile-tmp/pass1.imp" 17212 @ 140671: PUSH J 17213 @ 140674: PUSH GLINK 17214 @ 140677: PUSH X 17215 @ 140680: ACCESS 17216 @ 140681: ASSVAL 2489 k = k-1; %exit %if k < 0 17217 @ 140682: LINE 2489 "regression-compile-tmp/pass1.imp" 17218 @ 140718: PUSH K 17219 @ 140721: PUSH K 17220 @ 140724: PUSHI #0x00000001 17221 @ 140729: SUB 17222 @ 140730: ASSVAL 17223 @ 140731: LINE 2489 "regression-compile-tmp/pass1.imp" 17224 @ 140767: PUSH K 17225 @ 140770: PUSHI #0x00000000 17226 @ 140775: JUMPIF >= L_0007 17227 @ 140779: GOTO L_0004 17228 @ 140782: LOCATE L_0007 2490 include file = include file.tostring(j&255) 17229 @ 140785: LINE 2490 "regression-compile-tmp/pass1.imp" 17230 @ 140821: PUSH INCLUDEFILE 17231 @ 140824: PUSH INCLUDEFILE 17232 @ 140827: PUSH TOSTRING 17233 @ 140830: PUSH J 17234 @ 140833: PUSHI #0x000000ff 17235 @ 140838: AND 17236 @ 140839: ASSPAR 17237 @ 140840: CALL 17238 @ 140841: CONCAT 17239 @ 140842: ASSVAL 2491 %repeat 2492 ! include file = string(x-16_4000+stbase) 2493 ! remove this event block for SKIMP or pre-event IMP versions 17240 @ 140843: LINE 2491 "regression-compile-tmp/pass1.imp" 17241 @ 140879: REPEAT L_0003 17242 @ 140882: LOCATE L_0004 2494 %begin 17243 @ 140885: LINE 2494 "regression-compile-tmp/pass1.imp" 17244 @ 140921: BEGIN _lev0id0_COMPILEBLOCK_COMPILE_lev3id1 {lev=3 --> 4} 2495 %on 9 %start; Abandon(9); %finish 17245 @ 140922: LINE 2495 "regression-compile-tmp/pass1.imp" 17246 @ 140958: ON MASK=0200 L_0004 17247 @ 140964: LINE 2495 "regression-compile-tmp/pass1.imp" 17248 @ 141000: PUSH ABANDON 17249 @ 141003: PUSHI #0x00000009 17250 @ 141008: ASSPAR 17251 @ 141009: CALL 17252 @ 141010: LINE 2495 "regression-compile-tmp/pass1.imp" 17253 @ 141046: LOCATE L_0004 2496 open input(3, include file) 17254 @ 141049: LINE 2496 "regression-compile-tmp/pass1.imp" 17255 @ 141085: PUSH OPENINPUT 17256 @ 141088: PUSHI #0x00000003 17257 @ 141093: ASSPAR 17258 @ 141094: PUSH INCLUDEFILE 17259 @ 141097: ASSPAR 17260 @ 141098: CALL 2497 %end 17261 @ 141099: LINE 2497 "regression-compile-tmp/pass1.imp" 17262 @ 141135: END _lev0id0_COMPILEBLOCK_COMPILE_lev3id1 {lev=4 --> 3} 2498 include = lines; lines = 0 17263 @ 141136: LINE 2498 "regression-compile-tmp/pass1.imp" 17264 @ 141172: PUSH INCLUDE 17265 @ 141175: PUSH LINES 17266 @ 141178: ASSVAL 17267 @ 141179: LINE 2498 "regression-compile-tmp/pass1.imp" 17268 @ 141215: PUSH LINES 17269 @ 141218: PUSHI #0x00000000 17270 @ 141223: ASSVAL 2499 include list = list; include level = level 17271 @ 141224: LINE 2499 "regression-compile-tmp/pass1.imp" 17272 @ 141260: PUSH INCLUDELIST 17273 @ 141263: PUSH LIST 17274 @ 141266: ASSVAL 17275 @ 141267: LINE 2499 "regression-compile-tmp/pass1.imp" 17276 @ 141303: PUSH INCLUDELEVEL 17277 @ 141306: PUSH LEVEL 17278 @ 141309: ASSVAL 2500 select input(3) 17279 @ 141310: LINE 2500 "regression-compile-tmp/pass1.imp" 17280 @ 141346: PUSH SELECTINPUT 17281 @ 141349: PUSHI #0x00000003 17282 @ 141354: ASSPAR 17283 @ 141355: CALL 2501 ->top 2502 17284 @ 141356: LINE 2501 "regression-compile-tmp/pass1.imp" 17285 @ 141392: JUMP L_0135 2503 c(154): dimension = dimension+1; ! dbsep 17286 @ 141395: LINE 2503 "regression-compile-tmp/pass1.imp" 17287 @ 141431: PUSHI #0x0000009a 17288 @ 141436: SLABEL 266 17289 @ 141439: LINE 2503 "regression-compile-tmp/pass1.imp" 17290 @ 141475: PUSH DIMENSION 17291 @ 141478: PUSH DIMENSION 17292 @ 141481: PUSHI #0x00000001 17293 @ 141486: ADD 17294 @ 141487: ASSVAL 2504 fault(11) %if dimension = dim limit+1 17295 @ 141488: LINE 2504 "regression-compile-tmp/pass1.imp" 17296 @ 141524: PUSH DIMENSION 17297 @ 141527: PUSHI #0x00000006 17298 @ 141532: PUSHI #0x00000001 17299 @ 141537: ADD 17300 @ 141538: JUMPIF # L_0004 17301 @ 141542: PUSH FAULT 17302 @ 141545: PUSHI #0x0000000b 17303 @ 141550: ASSPAR 17304 @ 141551: CALL 17305 @ 141552: LOCATE L_0004 2505 ->top 17306 @ 141555: LINE 2505 "regression-compile-tmp/pass1.imp" 17307 @ 141591: JUMP L_0135 2506 c(145): set bp; ->top; ! crb 17308 @ 141594: LINE 2506 "regression-compile-tmp/pass1.imp" 17309 @ 141630: PUSHI #0x00000091 17310 @ 141635: SLABEL 266 17311 @ 141638: LINE 2506 "regression-compile-tmp/pass1.imp" 17312 @ 141674: PUSH SETBP 17313 @ 141677: CALL 17314 @ 141678: LINE 2506 "regression-compile-tmp/pass1.imp" 17315 @ 141714: JUMP L_0135 2507 c(146): set bp; ! rcrb 17316 @ 141717: LINE 2507 "regression-compile-tmp/pass1.imp" 17317 @ 141753: PUSHI #0x00000092 17318 @ 141758: SLABEL 266 17319 @ 141761: LINE 2507 "regression-compile-tmp/pass1.imp" 17320 @ 141797: PUSH SETBP 17321 @ 141800: CALL 2508 c(142): ; ! bplrb 17322 @ 141801: LINE 2508 "regression-compile-tmp/pass1.imp" 17323 @ 141837: PUSHI #0x0000008e 17324 @ 141842: SLABEL 266 2509 dimension = 1 %if dimension = 0 17325 @ 141845: LINE 2509 "regression-compile-tmp/pass1.imp" 17326 @ 141881: PUSH DIMENSION 17327 @ 141884: PUSHI #0x00000000 17328 @ 141889: JUMPIF # L_0004 17329 @ 141893: PUSH DIMENSION 17330 @ 141896: PUSHI #0x00000001 17331 @ 141901: ASSVAL 17332 @ 141902: LOCATE L_0004 2510 op('d', dimension); op(',', defs) 17333 @ 141905: LINE 2510 "regression-compile-tmp/pass1.imp" 17334 @ 141941: PUSH OP 17335 @ 141944: PUSHI #0x00000064 17336 @ 141949: ASSPAR 17337 @ 141950: PUSH DIMENSION 17338 @ 141953: ASSPAR 17339 @ 141954: CALL 17340 @ 141955: LINE 2510 "regression-compile-tmp/pass1.imp" 17341 @ 141991: PUSH OP 17342 @ 141994: PUSHI #0x0000002c 17343 @ 141999: ASSPAR 17344 @ 142000: PUSH DEFS 17345 @ 142003: ASSPAR 17346 @ 142004: CALL 2511 %if class # 146 %start 17347 @ 142005: LINE 2511 "regression-compile-tmp/pass1.imp" 17348 @ 142041: PUSH CLASS 17349 @ 142044: PUSHI #0x00000092 17350 @ 142049: JUMPIF = L_0004 2512 set subs(defs) 17351 @ 142053: LINE 2512 "regression-compile-tmp/pass1.imp" 17352 @ 142089: PUSH SETSUBS 17353 @ 142092: PUSH DEFS 17354 @ 142095: ASSPAR 17355 @ 142096: CALL 2513 fault(13) %if dict(dmin) >= 0 %or inhibit # 0 %or level=0 17356 @ 142097: LINE 2513 "regression-compile-tmp/pass1.imp" 17357 @ 142133: PUSH DICT 17358 @ 142136: PUSH DMIN 17359 @ 142139: ACCESS 17360 @ 142140: PUSHI #0x00000000 17361 @ 142145: JUMPIF >= L_0008 17362 @ 142149: PUSH INHIBIT 17363 @ 142152: PUSHI #0x00000000 17364 @ 142157: JUMPIF # L_0008 17365 @ 142161: PUSH LEVEL 17366 @ 142164: PUSHI #0x00000000 17367 @ 142169: JUMPIF # L_0007 17368 @ 142173: LOCATE L_0008 17369 @ 142176: PUSH FAULT 17370 @ 142179: PUSHI #0x0000000d 17371 @ 142184: ASSPAR 17372 @ 142185: CALL 17373 @ 142186: LOCATE L_0007 2514 %finish 17374 @ 142189: LINE 2514 "regression-compile-tmp/pass1.imp" 17375 @ 142225: LOCATE L_0004 2515 dimension = 0; defs = 0 17376 @ 142228: LINE 2515 "regression-compile-tmp/pass1.imp" 17377 @ 142264: PUSH DIMENSION 17378 @ 142267: PUSHI #0x00000000 17379 @ 142272: ASSVAL 17380 @ 142273: LINE 2515 "regression-compile-tmp/pass1.imp" 17381 @ 142309: PUSH DEFS 17382 @ 142312: PUSHI #0x00000000 17383 @ 142317: ASSVAL 2516 ->top 17384 @ 142318: LINE 2516 "regression-compile-tmp/pass1.imp" 17385 @ 142354: JUMP L_0135 2517 c(128): id = dupid; ->top; ! EDUP 17386 @ 142357: LINE 2517 "regression-compile-tmp/pass1.imp" 17387 @ 142393: PUSHI #0x00000080 17388 @ 142398: SLABEL 266 17389 @ 142401: LINE 2517 "regression-compile-tmp/pass1.imp" 17390 @ 142437: PUSH ID 17391 @ 142440: PUSH DUPID 17392 @ 142443: ASSVAL 17393 @ 142444: LINE 2517 "regression-compile-tmp/pass1.imp" 17394 @ 142480: JUMP L_0135 2518 c(130): block x = x 17395 @ 142483: LINE 2518 "regression-compile-tmp/pass1.imp" 17396 @ 142519: PUSHI #0x00000082 17397 @ 142524: SLABEL 266 17398 @ 142527: LINE 2518 "regression-compile-tmp/pass1.imp" 17399 @ 142563: PUSH BLOCKX 17400 @ 142566: PUSH X 17401 @ 142569: ASSVAL 2519 op('F', 0) %if decl&spec = 0 %and level # 0; ! jump round proc 17402 @ 142570: LINE 2519 "regression-compile-tmp/pass1.imp" 17403 @ 142606: PUSH DECL 17404 @ 142609: PUSHI #0x00000080 17405 @ 142614: AND 17406 @ 142615: PUSHI #0x00000000 17407 @ 142620: JUMPIF # L_0004 17408 @ 142624: PUSH LEVEL 17409 @ 142627: PUSHI #0x00000000 17410 @ 142632: JUMPIF = L_0004 17411 @ 142636: PUSH OP 17412 @ 142639: PUSHI #0x00000046 17413 @ 142644: ASSPAR 17414 @ 142645: PUSHI #0x00000000 17415 @ 142650: ASSPAR 17416 @ 142651: CALL 17417 @ 142652: LOCATE L_0004 2520 c(125): dupid = id; ! %DUP 17418 @ 142655: LINE 2520 "regression-compile-tmp/pass1.imp" 17419 @ 142691: PUSHI #0x0000007d 17420 @ 142696: SLABEL 266 17421 @ 142699: LINE 2520 "regression-compile-tmp/pass1.imp" 17422 @ 142735: PUSH DUPID 17423 @ 142738: PUSH ID 17424 @ 142741: ASSVAL 2521 %return %if Level < 0; ! {spec about} 17425 @ 142742: LINE 2521 "regression-compile-tmp/pass1.imp" 17426 @ 142778: PUSH LEVEL 17427 @ 142781: PUSHI #0x00000000 17428 @ 142786: JUMPIF >= L_0004 17429 @ 142790: RETURN 17430 @ 142791: LOCATE L_0004 2522 c(90): def(x); ->top; ! ident 17431 @ 142794: LINE 2522 "regression-compile-tmp/pass1.imp" 17432 @ 142830: PUSHI #0x0000005a 17433 @ 142835: SLABEL 266 17434 @ 142838: LINE 2522 "regression-compile-tmp/pass1.imp" 17435 @ 142874: PUSH DEF 17436 @ 142877: PUSH X 17437 @ 142880: ASSPAR 17438 @ 142881: CALL 17439 @ 142882: LINE 2522 "regression-compile-tmp/pass1.imp" 17440 @ 142918: JUMP L_0135 2523 c(131): ; ! cident 17441 @ 142921: LINE 2523 "regression-compile-tmp/pass1.imp" 17442 @ 142957: PUSHI #0x00000083 17443 @ 142962: SLABEL 266 2524 %if tag(x)_flags&(2_1111111+const bit) = iform+const bit %start 17444 @ 142965: LINE 2524 "regression-compile-tmp/pass1.imp" 17445 @ 143001: PUSH TAG 17446 @ 143004: PUSH X 17447 @ 143007: ACCESS 17448 @ 143008: SELECT 3 17449 @ 143011: PUSHI #0x0000007f 17450 @ 143016: PUSHI #0x00002000 17451 @ 143021: ADD 17452 @ 143022: AND 17453 @ 143023: PUSHI #0x00000011 17454 @ 143028: PUSHI #0x00002000 17455 @ 143033: ADD 17456 @ 143034: JUMPIF # L_0004 2525 tag(x)_format = lit 17457 @ 143038: LINE 2525 "regression-compile-tmp/pass1.imp" 17458 @ 143074: PUSH TAG 17459 @ 143077: PUSH X 17460 @ 143080: ACCESS 17461 @ 143081: SELECT 2 17462 @ 143084: PUSH LIT 17463 @ 143087: ASSVAL 2526 %finish %else %start 17464 @ 143088: LINE 2526 "regression-compile-tmp/pass1.imp" 17465 @ 143124: GOTO L_0003 17466 @ 143127: LOCATE L_0004 2527 set const(lit) %if pending # 0 17467 @ 143130: LINE 2527 "regression-compile-tmp/pass1.imp" 17468 @ 143166: PUSH PENDING 17469 @ 143169: PUSHI #0x00000000 17470 @ 143174: JUMPIF = L_0007 17471 @ 143178: PUSH SETCONST 17472 @ 143181: PUSH LIT 17473 @ 143184: ASSPAR 17474 @ 143185: CALL 17475 @ 143186: LOCATE L_0007 2528 def(x) 17476 @ 143189: LINE 2528 "regression-compile-tmp/pass1.imp" 17477 @ 143225: PUSH DEF 17478 @ 143228: PUSH X 17479 @ 143231: ASSPAR 17480 @ 143232: CALL 2529 op('A', 1) 17481 @ 143233: LINE 2529 "regression-compile-tmp/pass1.imp" 17482 @ 143269: PUSH OP 17483 @ 143272: PUSHI #0x00000041 17484 @ 143277: ASSPAR 17485 @ 143278: PUSHI #0x00000001 17486 @ 143283: ASSPAR 17487 @ 143284: CALL 2530 %finish 17488 @ 143285: LINE 2530 "regression-compile-tmp/pass1.imp" 17489 @ 143321: LOCATE L_0003 2531 cident = x 17490 @ 143324: LINE 2531 "regression-compile-tmp/pass1.imp" 17491 @ 143360: PUSH CIDENT 17492 @ 143363: PUSH X 17493 @ 143366: ASSVAL 2532 ->top 17494 @ 143367: LINE 2532 "regression-compile-tmp/pass1.imp" 17495 @ 143403: JUMP L_0135 2533 c(124): dubious = 1 %if tag(cident)_flags&prot # 0; ! %DUBIOUS 17496 @ 143406: LINE 2533 "regression-compile-tmp/pass1.imp" 17497 @ 143442: PUSHI #0x0000007c 17498 @ 143447: SLABEL 266 17499 @ 143450: LINE 2533 "regression-compile-tmp/pass1.imp" 17500 @ 143486: PUSH TAG 17501 @ 143489: PUSH CIDENT 17502 @ 143492: ACCESS 17503 @ 143493: SELECT 3 17504 @ 143496: PUSHI #0x00000100 17505 @ 143501: AND 17506 @ 143502: PUSHI #0x00000000 17507 @ 143507: JUMPIF = L_0004 17508 @ 143511: PUSH DUBIOUS 17509 @ 143514: PUSHI #0x00000001 17510 @ 143519: ASSVAL 17511 @ 143520: LOCATE L_0004 2534 ->top 17512 @ 143523: LINE 2534 "regression-compile-tmp/pass1.imp" 17513 @ 143559: JUMP L_0135 2535 c(97): ; ! f 17514 @ 143562: LINE 2535 "regression-compile-tmp/pass1.imp" 17515 @ 143598: PUSHI #0x00000061 17516 @ 143603: SLABEL 266 2536 c(98): ; ! m 17517 @ 143606: LINE 2536 "regression-compile-tmp/pass1.imp" 17518 @ 143642: PUSHI #0x00000062 17519 @ 143647: SLABEL 266 2537 c(99): ; ! p 17520 @ 143650: LINE 2537 "regression-compile-tmp/pass1.imp" 17521 @ 143686: PUSHI #0x00000063 17522 @ 143691: SLABEL 266 2538 c(96): call; ->top; ! r 17523 @ 143694: LINE 2538 "regression-compile-tmp/pass1.imp" 17524 @ 143730: PUSHI #0x00000060 17525 @ 143735: SLABEL 266 17526 @ 143738: LINE 2538 "regression-compile-tmp/pass1.imp" 17527 @ 143774: PUSH CALL 17528 @ 143777: CALL 17529 @ 143778: LINE 2538 "regression-compile-tmp/pass1.imp" 17530 @ 143814: JUMP L_0135 2539 c(165): ; ! nlab 17531 @ 143817: LINE 2539 "regression-compile-tmp/pass1.imp" 17532 @ 143853: PUSHI #0x000000a5 17533 @ 143858: SLABEL 266 2540 c(100): ; ! rp 17534 @ 143861: LINE 2540 "regression-compile-tmp/pass1.imp" 17535 @ 143897: PUSHI #0x00000064 17536 @ 143902: SLABEL 266 2541 c(101): ; ! fp 17537 @ 143905: LINE 2541 "regression-compile-tmp/pass1.imp" 17538 @ 143941: PUSHI #0x00000065 17539 @ 143946: SLABEL 266 2542 c(102): ; ! mp 17540 @ 143949: LINE 2542 "regression-compile-tmp/pass1.imp" 17541 @ 143985: PUSHI #0x00000066 17542 @ 143990: SLABEL 266 2543 c(103): ; ! pp 17543 @ 143993: LINE 2543 "regression-compile-tmp/pass1.imp" 17544 @ 144029: PUSHI #0x00000067 17545 @ 144034: SLABEL 266 2544 c(91): ; ! v 17546 @ 144037: LINE 2544 "regression-compile-tmp/pass1.imp" 17547 @ 144073: PUSHI #0x0000005b 17548 @ 144078: SLABEL 266 2545 c(92): ; ! n 17549 @ 144081: LINE 2545 "regression-compile-tmp/pass1.imp" 17550 @ 144117: PUSHI #0x0000005c 17551 @ 144122: SLABEL 266 2546 c(106): ; ! a 17552 @ 144125: LINE 2546 "regression-compile-tmp/pass1.imp" 17553 @ 144161: PUSHI #0x0000006a 17554 @ 144166: SLABEL 266 2547 c(107): ; ! an 17555 @ 144169: LINE 2547 "regression-compile-tmp/pass1.imp" 17556 @ 144205: PUSHI #0x0000006b 17557 @ 144210: SLABEL 266 2548 c(108): ; ! na 17558 @ 144213: LINE 2548 "regression-compile-tmp/pass1.imp" 17559 @ 144249: PUSHI #0x0000006c 17560 @ 144254: SLABEL 266 2549 c(109): ; ! nan 17561 @ 144257: LINE 2549 "regression-compile-tmp/pass1.imp" 17562 @ 144293: PUSHI #0x0000006d 17563 @ 144298: SLABEL 266 2550 k = tag(x)_index 17564 @ 144301: LINE 2550 "regression-compile-tmp/pass1.imp" 17565 @ 144337: PUSH K 17566 @ 144340: PUSH TAG 17567 @ 144343: PUSH X 17568 @ 144346: ACCESS 17569 @ 144347: SELECT 4 17570 @ 144350: ASSVAL 2551 %if k < 0 %then op('n', -k) %else op('@', k) 17571 @ 144351: LINE 2551 "regression-compile-tmp/pass1.imp" 17572 @ 144387: PUSH K 17573 @ 144390: PUSHI #0x00000000 17574 @ 144395: JUMPIF >= L_0004 17575 @ 144399: PUSH OP 17576 @ 144402: PUSHI #0x0000006e 17577 @ 144407: ASSPAR 17578 @ 144408: PUSH K 17579 @ 144411: NEGATE 17580 @ 144412: ASSPAR 17581 @ 144413: CALL 17582 @ 144414: GOTO L_0003 17583 @ 144417: LOCATE L_0004 17584 @ 144420: PUSH OP 17585 @ 144423: PUSHI #0x00000040 17586 @ 144428: ASSPAR 17587 @ 144429: PUSH K 17588 @ 144432: ASSPAR 17589 @ 144433: CALL 17590 @ 144434: LOCATE L_0003 2552 ->top 17591 @ 144437: LINE 2552 "regression-compile-tmp/pass1.imp" 17592 @ 144473: JUMP L_0135 2553 c(121): set const(0); ->top; ! special for zero 17593 @ 144476: LINE 2553 "regression-compile-tmp/pass1.imp" 17594 @ 144512: PUSHI #0x00000079 17595 @ 144517: SLABEL 266 17596 @ 144520: LINE 2553 "regression-compile-tmp/pass1.imp" 17597 @ 144556: PUSH SETCONST 17598 @ 144559: PUSHI #0x00000000 17599 @ 144564: ASSPAR 17600 @ 144565: CALL 17601 @ 144566: LINE 2553 "regression-compile-tmp/pass1.imp" 17602 @ 144602: JUMP L_0135 2554 c(167): add char( 'G' ); ->pstr; ! aconst (alias) 17603 @ 144605: LINE 2554 "regression-compile-tmp/pass1.imp" 17604 @ 144641: PUSHI #0x000000a7 17605 @ 144646: SLABEL 266 17606 @ 144649: LINE 2554 "regression-compile-tmp/pass1.imp" 17607 @ 144685: PUSH ADDCHAR 17608 @ 144688: PUSHI #0x00000047 17609 @ 144693: ASSPAR 17610 @ 144694: CALL 17611 @ 144695: LINE 2554 "regression-compile-tmp/pass1.imp" 17612 @ 144731: JUMP L_0139 2555 c(const): ; ! const 17613 @ 144734: LINE 2555 "regression-compile-tmp/pass1.imp" 17614 @ 144770: PUSHI #0x0000005d 17615 @ 144775: SLABEL 266 2556 %if x < 0 %start; ! constinteger 17616 @ 144778: LINE 2556 "regression-compile-tmp/pass1.imp" 17617 @ 144814: PUSH X 17618 @ 144817: PUSHI #0x00000000 17619 @ 144822: JUMPIF >= L_0004 2557 set const(tag(-x)_format); ->top 17620 @ 144826: LINE 2557 "regression-compile-tmp/pass1.imp" 17621 @ 144862: PUSH SETCONST 17622 @ 144865: PUSH TAG 17623 @ 144868: PUSH X 17624 @ 144871: NEGATE 17625 @ 144872: ACCESS 17626 @ 144873: SELECT 2 17627 @ 144876: ASSPAR 17628 @ 144877: CALL 17629 @ 144878: LINE 2557 "regression-compile-tmp/pass1.imp" 17630 @ 144914: JUMP L_0135 2558 %finish 17631 @ 144917: LINE 2558 "regression-compile-tmp/pass1.imp" 17632 @ 144953: LOCATE L_0004 2559 %if x&16_4000 # 0 %start; ! strings 17633 @ 144956: LINE 2559 "regression-compile-tmp/pass1.imp" 17634 @ 144992: PUSH X 17635 @ 144995: PUSHI #0x00004000 17636 @ 145000: AND 17637 @ 145001: PUSHI #0x00000000 17638 @ 145006: JUMPIF = L_0004 2560 add char( '''' ) 17639 @ 145010: LINE 2560 "regression-compile-tmp/pass1.imp" 17640 @ 145046: PUSH ADDCHAR 17641 @ 145049: PUSHI #0x00000027 17642 @ 145054: ASSPAR 17643 @ 145055: CALL 2561 pstr: x = x-16_4000 17644 @ 145056: LINE 2561 "regression-compile-tmp/pass1.imp" 17645 @ 145092: LABEL L_0139 17646 @ 145095: LINE 2561 "regression-compile-tmp/pass1.imp" 17647 @ 145131: PUSH X 17648 @ 145134: PUSH X 17649 @ 145137: PUSHI #0x00004000 17650 @ 145142: SUB 17651 @ 145143: ASSVAL 2562 j = glink(x) 17652 @ 145144: LINE 2562 "regression-compile-tmp/pass1.imp" 17653 @ 145180: PUSH J 17654 @ 145183: PUSH GLINK 17655 @ 145186: PUSH X 17656 @ 145189: ACCESS 17657 @ 145190: ASSVAL 2563 k = j&255 17658 @ 145191: LINE 2563 "regression-compile-tmp/pass1.imp" 17659 @ 145227: PUSH K 17660 @ 145230: PUSH J 17661 @ 145233: PUSHI #0x000000ff 17662 @ 145238: AND 17663 @ 145239: ASSVAL 2564 add char( k ) 17664 @ 145240: LINE 2564 "regression-compile-tmp/pass1.imp" 17665 @ 145276: PUSH ADDCHAR 17666 @ 145279: PUSH K 17667 @ 145282: ASSPAR 17668 @ 145283: CALL 2565 %cycle 17669 @ 145284: LINE 2565 "regression-compile-tmp/pass1.imp" 17670 @ 145320: LOCATE L_0006 2566 k = k-1; ->top %if k < 0 17671 @ 145323: LINE 2566 "regression-compile-tmp/pass1.imp" 17672 @ 145359: PUSH K 17673 @ 145362: PUSH K 17674 @ 145365: PUSHI #0x00000001 17675 @ 145370: SUB 17676 @ 145371: ASSVAL 17677 @ 145372: LINE 2566 "regression-compile-tmp/pass1.imp" 17678 @ 145408: PUSH K 17679 @ 145411: PUSHI #0x00000000 17680 @ 145416: JUMPIF >= L_000a 17681 @ 145420: JUMP L_0135 17682 @ 145423: LOCATE L_000a 2567 add char( j>>8 ); 17683 @ 145426: LINE 2567 "regression-compile-tmp/pass1.imp" 17684 @ 145462: PUSH ADDCHAR 17685 @ 145465: PUSH J 17686 @ 145468: PUSHI #0x00000008 17687 @ 145473: RSH 17688 @ 145474: ASSPAR 17689 @ 145475: CALL 2568 x = x+1 17690 @ 145476: LINE 2568 "regression-compile-tmp/pass1.imp" 17691 @ 145512: PUSH X 17692 @ 145515: PUSH X 17693 @ 145518: PUSHI #0x00000001 17694 @ 145523: ADD 17695 @ 145524: ASSVAL 2569 j = glink(x) 17696 @ 145525: LINE 2569 "regression-compile-tmp/pass1.imp" 17697 @ 145561: PUSH J 17698 @ 145564: PUSH GLINK 17699 @ 145567: PUSH X 17700 @ 145570: ACCESS 17701 @ 145571: ASSVAL 2570 k = k-1; ->top %if k < 0 17702 @ 145572: LINE 2570 "regression-compile-tmp/pass1.imp" 17703 @ 145608: PUSH K 17704 @ 145611: PUSH K 17705 @ 145614: PUSHI #0x00000001 17706 @ 145619: SUB 17707 @ 145620: ASSVAL 17708 @ 145621: LINE 2570 "regression-compile-tmp/pass1.imp" 17709 @ 145657: PUSH K 17710 @ 145660: PUSHI #0x00000000 17711 @ 145665: JUMPIF >= L_000a 17712 @ 145669: JUMP L_0135 17713 @ 145672: LOCATE L_000a 2571 add char( j&255 ) 17714 @ 145675: LINE 2571 "regression-compile-tmp/pass1.imp" 17715 @ 145711: PUSH ADDCHAR 17716 @ 145714: PUSH J 17717 @ 145717: PUSHI #0x000000ff 17718 @ 145722: AND 17719 @ 145723: ASSPAR 17720 @ 145724: CALL 2572 %repeat 17721 @ 145725: LINE 2572 "regression-compile-tmp/pass1.imp" 17722 @ 145761: REPEAT L_0006 2573 %finish 17723 @ 145764: LINE 2573 "regression-compile-tmp/pass1.imp" 17724 @ 145800: LOCATE L_0004 2574 %if x&16_2000 # 0 %start; ! real - ABD also string-like, but NOT packed 17725 @ 145803: LINE 2574 "regression-compile-tmp/pass1.imp" 17726 @ 145839: PUSH X 17727 @ 145842: PUSHI #0x00002000 17728 @ 145847: AND 17729 @ 145848: PUSHI #0x00000000 17730 @ 145853: JUMPIF = L_0004 2575 x = x-16_2000 17731 @ 145857: LINE 2575 "regression-compile-tmp/pass1.imp" 17732 @ 145893: PUSH X 17733 @ 145896: PUSH X 17734 @ 145899: PUSHI #0x00002000 17735 @ 145904: SUB 17736 @ 145905: ASSVAL 2576 k = glink(x) 17737 @ 145906: LINE 2576 "regression-compile-tmp/pass1.imp" 17738 @ 145942: PUSH K 17739 @ 145945: PUSH GLINK 17740 @ 145948: PUSH X 17741 @ 145951: ACCESS 17742 @ 145952: ASSVAL 2577 op('D', k); add char( ',' ) 17743 @ 145953: LINE 2577 "regression-compile-tmp/pass1.imp" 17744 @ 145989: PUSH OP 17745 @ 145992: PUSHI #0x00000044 17746 @ 145997: ASSPAR 17747 @ 145998: PUSH K 17748 @ 146001: ASSPAR 17749 @ 146002: CALL 17750 @ 146003: LINE 2577 "regression-compile-tmp/pass1.imp" 17751 @ 146039: PUSH ADDCHAR 17752 @ 146042: PUSHI #0x0000002c 17753 @ 146047: ASSPAR 17754 @ 146048: CALL 2578 %cycle 17755 @ 146049: LINE 2578 "regression-compile-tmp/pass1.imp" 17756 @ 146085: LOCATE L_0006 2579 ->top %if k = 0 17757 @ 146088: LINE 2579 "regression-compile-tmp/pass1.imp" 17758 @ 146124: PUSH K 17759 @ 146127: PUSHI #0x00000000 17760 @ 146132: JUMPIF # L_000a 17761 @ 146136: JUMP L_0135 17762 @ 146139: LOCATE L_000a 2580 k = k-1 17763 @ 146142: LINE 2580 "regression-compile-tmp/pass1.imp" 17764 @ 146178: PUSH K 17765 @ 146181: PUSH K 17766 @ 146184: PUSHI #0x00000001 17767 @ 146189: SUB 17768 @ 146190: ASSVAL 2581 x = x+1; j = glink(x) 17769 @ 146191: LINE 2581 "regression-compile-tmp/pass1.imp" 17770 @ 146227: PUSH X 17771 @ 146230: PUSH X 17772 @ 146233: PUSHI #0x00000001 17773 @ 146238: ADD 17774 @ 146239: ASSVAL 17775 @ 146240: LINE 2581 "regression-compile-tmp/pass1.imp" 17776 @ 146276: PUSH J 17777 @ 146279: PUSH GLINK 17778 @ 146282: PUSH X 17779 @ 146285: ACCESS 17780 @ 146286: ASSVAL 2582 %if j = '@' %start 17781 @ 146287: LINE 2582 "regression-compile-tmp/pass1.imp" 17782 @ 146323: PUSH J 17783 @ 146326: PUSHI #0x00000040 17784 @ 146331: JUMPIF # L_000a 2583 op('@', litpool(glink(x+1))); ->top 17785 @ 146335: LINE 2583 "regression-compile-tmp/pass1.imp" 17786 @ 146371: PUSH OP 17787 @ 146374: PUSHI #0x00000040 17788 @ 146379: ASSPAR 17789 @ 146380: PUSH LITPOOL 17790 @ 146383: PUSH GLINK 17791 @ 146386: PUSH X 17792 @ 146389: PUSHI #0x00000001 17793 @ 146394: ADD 17794 @ 146395: ACCESS 17795 @ 146396: ACCESS 17796 @ 146397: ASSPAR 17797 @ 146398: CALL 17798 @ 146399: LINE 2583 "regression-compile-tmp/pass1.imp" 17799 @ 146435: JUMP L_0135 2584 %finish 17800 @ 146438: LINE 2584 "regression-compile-tmp/pass1.imp" 17801 @ 146474: LOCATE L_000a 2585 add char( j ) 17802 @ 146477: LINE 2585 "regression-compile-tmp/pass1.imp" 17803 @ 146513: PUSH ADDCHAR 17804 @ 146516: PUSH J 17805 @ 146519: ASSPAR 17806 @ 146520: CALL 2586 %repeat 17807 @ 146521: LINE 2586 "regression-compile-tmp/pass1.imp" 17808 @ 146557: REPEAT L_0006 2587 %finish 17809 @ 146560: LINE 2587 "regression-compile-tmp/pass1.imp" 17810 @ 146596: LOCATE L_0004 2588 set const(lit pool(x)) 17811 @ 146599: LINE 2588 "regression-compile-tmp/pass1.imp" 17812 @ 146635: PUSH SETCONST 17813 @ 146638: PUSH LITPOOL 17814 @ 146641: PUSH X 17815 @ 146644: ACCESS 17816 @ 146645: ASSPAR 17817 @ 146646: CALL 2589 ->top 2590 17818 @ 146647: LINE 2589 "regression-compile-tmp/pass1.imp" 17819 @ 146683: JUMP L_0135 2591 c(137): add char( 'i' ); ->top; ! asep 17820 @ 146686: LINE 2591 "regression-compile-tmp/pass1.imp" 17821 @ 146722: PUSHI #0x00000089 17822 @ 146727: SLABEL 266 17823 @ 146730: LINE 2591 "regression-compile-tmp/pass1.imp" 17824 @ 146766: PUSH ADDCHAR 17825 @ 146769: PUSHI #0x00000069 17826 @ 146774: ASSPAR 17827 @ 146775: CALL 17828 @ 146776: LINE 2591 "regression-compile-tmp/pass1.imp" 17829 @ 146812: JUMP L_0135 2592 c(141): add char( 'a' ); ->top; ! arb 2593 2594 !own arrays 17830 @ 146815: LINE 2592 "regression-compile-tmp/pass1.imp" 17831 @ 146851: PUSHI #0x0000008d 17832 @ 146856: SLABEL 266 17833 @ 146859: LINE 2592 "regression-compile-tmp/pass1.imp" 17834 @ 146895: PUSH ADDCHAR 17835 @ 146898: PUSHI #0x00000061 17836 @ 146903: ASSPAR 17837 @ 146904: CALL 17838 @ 146905: LINE 2592 "regression-compile-tmp/pass1.imp" 17839 @ 146941: JUMP L_0135 2595 c(132): ocount = ub-lb+1 17840 @ 146944: LINE 2595 "regression-compile-tmp/pass1.imp" 17841 @ 146980: PUSHI #0x00000084 17842 @ 146985: SLABEL 266 17843 @ 146988: LINE 2595 "regression-compile-tmp/pass1.imp" 17844 @ 147024: PUSH OCOUNT 17845 @ 147027: PUSH UB 17846 @ 147030: PUSH LB 17847 @ 147033: SUB 17848 @ 147034: PUSHI #0x00000001 17849 @ 147039: ADD 17850 @ 147040: ASSVAL 2596 def(x); ! oident 17851 @ 147041: LINE 2596 "regression-compile-tmp/pass1.imp" 17852 @ 147077: PUSH DEF 17853 @ 147080: PUSH X 17854 @ 147083: ASSPAR 17855 @ 147084: CALL 2597 dimension = 1; set subs(1) 17856 @ 147085: LINE 2597 "regression-compile-tmp/pass1.imp" 17857 @ 147121: PUSH DIMENSION 17858 @ 147124: PUSHI #0x00000001 17859 @ 147129: ASSVAL 17860 @ 147130: LINE 2597 "regression-compile-tmp/pass1.imp" 17861 @ 147166: PUSH SETSUBS 17862 @ 147169: PUSHI #0x00000001 17863 @ 147174: ASSPAR 17864 @ 147175: CALL 2598 %if next = 0 %start; ! no initialisation 17865 @ 147176: LINE 2598 "regression-compile-tmp/pass1.imp" 17866 @ 147212: PUSH NEXT 17867 @ 147215: PUSHI #0x00000000 17868 @ 147220: JUMPIF # L_0004 2599 op('A', ocount) %if ocount > 0 17869 @ 147224: LINE 2599 "regression-compile-tmp/pass1.imp" 17870 @ 147260: PUSH OCOUNT 17871 @ 147263: PUSHI #0x00000000 17872 @ 147268: JUMPIF <= L_0007 17873 @ 147272: PUSH OP 17874 @ 147275: PUSHI #0x00000041 17875 @ 147280: ASSPAR 17876 @ 147281: PUSH OCOUNT 17877 @ 147284: ASSPAR 17878 @ 147285: CALL 17879 @ 147286: LOCATE L_0007 2600 ocount = -1 17880 @ 147289: LINE 2600 "regression-compile-tmp/pass1.imp" 17881 @ 147325: PUSH OCOUNT 17882 @ 147328: PUSHI #0x00000001 17883 @ 147333: NEGATE 17884 @ 147334: ASSVAL 2601 %finish %else %start; ! initialisation given 17885 @ 147335: LINE 2601 "regression-compile-tmp/pass1.imp" 17886 @ 147371: GOTO L_0003 17887 @ 147374: LOCATE L_0004 2602 get next 17888 @ 147377: LINE 2602 "regression-compile-tmp/pass1.imp" 17889 @ 147413: PUSH GETNEXT 17890 @ 147416: CALL 2603 %finish 17891 @ 147417: LINE 2603 "regression-compile-tmp/pass1.imp" 17892 @ 147453: LOCATE L_0003 2604 ->top 17893 @ 147456: LINE 2604 "regression-compile-tmp/pass1.imp" 17894 @ 147492: JUMP L_0135 2605 c(162): lit = ocount; ->ins; ! indef 17895 @ 147495: LINE 2605 "regression-compile-tmp/pass1.imp" 17896 @ 147531: PUSHI #0x000000a2 17897 @ 147536: SLABEL 266 17898 @ 147539: LINE 2605 "regression-compile-tmp/pass1.imp" 17899 @ 147575: PUSH LIT 17900 @ 147578: PUSH OCOUNT 17901 @ 147581: ASSVAL 17902 @ 147582: LINE 2605 "regression-compile-tmp/pass1.imp" 17903 @ 147618: JUMP L_013a 2606 c(143): pop lit; ! orb 17904 @ 147621: LINE 2606 "regression-compile-tmp/pass1.imp" 17905 @ 147657: PUSHI #0x0000008f 17906 @ 147662: SLABEL 266 17907 @ 147665: LINE 2606 "regression-compile-tmp/pass1.imp" 17908 @ 147701: PUSH POPLIT 17909 @ 147704: CALL 2607 ins: fault(10) %and lit = 0 %if lit < 0 17910 @ 147705: LINE 2607 "regression-compile-tmp/pass1.imp" 17911 @ 147741: LABEL L_013a 17912 @ 147744: LINE 2607 "regression-compile-tmp/pass1.imp" 17913 @ 147780: PUSH LIT 17914 @ 147783: PUSHI #0x00000000 17915 @ 147788: JUMPIF >= L_0004 17916 @ 147792: PUSH FAULT 17917 @ 147795: PUSHI #0x0000000a 17918 @ 147800: ASSPAR 17919 @ 147801: CALL 17920 @ 147802: PUSH LIT 17921 @ 147805: PUSHI #0x00000000 17922 @ 147810: ASSVAL 17923 @ 147811: LOCATE L_0004 2608 get next 17924 @ 147814: LINE 2608 "regression-compile-tmp/pass1.imp" 17925 @ 147850: PUSH GETNEXT 17926 @ 147853: CALL 2609 ->inst 17927 @ 147854: LINE 2609 "regression-compile-tmp/pass1.imp" 17928 @ 147890: JUMP L_013b 2610 c(139): ; ! osep (x=19) 17929 @ 147893: LINE 2610 "regression-compile-tmp/pass1.imp" 17930 @ 147929: PUSHI #0x0000008b 17931 @ 147934: SLABEL 266 2611 c(153): lit = 1 17932 @ 147937: LINE 2611 "regression-compile-tmp/pass1.imp" 17933 @ 147973: PUSHI #0x00000099 17934 @ 147978: SLABEL 266 17935 @ 147981: LINE 2611 "regression-compile-tmp/pass1.imp" 17936 @ 148017: PUSH LIT 17937 @ 148020: PUSHI #0x00000001 17938 @ 148025: ASSVAL 2612 inst: pop def %if pending # 0; ! ownt (x=0) 17939 @ 148026: LINE 2612 "regression-compile-tmp/pass1.imp" 17940 @ 148062: LABEL L_013b 17941 @ 148065: LINE 2612 "regression-compile-tmp/pass1.imp" 17942 @ 148101: PUSH PENDING 17943 @ 148104: PUSHI #0x00000000 17944 @ 148109: JUMPIF = L_0004 17945 @ 148113: PUSH POPDEF 17946 @ 148116: CALL 17947 @ 148117: LOCATE L_0004 2613 op('A', lit) 17948 @ 148120: LINE 2613 "regression-compile-tmp/pass1.imp" 17949 @ 148156: PUSH OP 17950 @ 148159: PUSHI #0x00000041 17951 @ 148164: ASSPAR 17952 @ 148165: PUSH LIT 17953 @ 148168: ASSPAR 17954 @ 148169: CALL 2614 ocount = ocount-lit 17955 @ 148170: LINE 2614 "regression-compile-tmp/pass1.imp" 17956 @ 148206: PUSH OCOUNT 17957 @ 148209: PUSH OCOUNT 17958 @ 148212: PUSH LIT 17959 @ 148215: SUB 17960 @ 148216: ASSVAL 2615 %if ocount >= 0 %start 17961 @ 148217: LINE 2615 "regression-compile-tmp/pass1.imp" 17962 @ 148253: PUSH OCOUNT 17963 @ 148256: PUSHI #0x00000000 17964 @ 148261: JUMPIF < L_0004 2616 ->top %if x # 0; ! more coming 17965 @ 148265: LINE 2616 "regression-compile-tmp/pass1.imp" 17966 @ 148301: PUSH X 17967 @ 148304: PUSHI #0x00000000 17968 @ 148309: JUMPIF = L_0007 17969 @ 148313: JUMP L_0135 17970 @ 148316: LOCATE L_0007 2617 ocount = -1 %and %return %if ocount = 0; ! all done 17971 @ 148319: LINE 2617 "regression-compile-tmp/pass1.imp" 17972 @ 148355: PUSH OCOUNT 17973 @ 148358: PUSHI #0x00000000 17974 @ 148363: JUMPIF # L_0007 17975 @ 148367: PUSH OCOUNT 17976 @ 148370: PUSHI #0x00000001 17977 @ 148375: NEGATE 17978 @ 148376: ASSVAL 17979 @ 148377: RETURN 17980 @ 148378: LOCATE L_0007 2618 %finish 17981 @ 148381: LINE 2618 "regression-compile-tmp/pass1.imp" 17982 @ 148417: LOCATE L_0004 2619 fault(11); %return 2620 17983 @ 148420: LINE 2619 "regression-compile-tmp/pass1.imp" 17984 @ 148456: PUSH FAULT 17985 @ 148459: PUSHI #0x0000000b 17986 @ 148464: ASSPAR 17987 @ 148465: CALL 17988 @ 148466: LINE 2619 "regression-compile-tmp/pass1.imp" 17989 @ 148502: RETURN 2621 c(swit): op('W', tag(x)_index); inhibit = 1; ->atop 17990 @ 148503: LINE 2621 "regression-compile-tmp/pass1.imp" 17991 @ 148539: PUSHI #0x00000069 17992 @ 148544: SLABEL 266 17993 @ 148547: LINE 2621 "regression-compile-tmp/pass1.imp" 17994 @ 148583: PUSH OP 17995 @ 148586: PUSHI #0x00000057 17996 @ 148591: ASSPAR 17997 @ 148592: PUSH TAG 17998 @ 148595: PUSH X 17999 @ 148598: ACCESS 18000 @ 148599: SELECT 4 18001 @ 148602: ASSPAR 18002 @ 148603: CALL 18003 @ 148604: LINE 2621 "regression-compile-tmp/pass1.imp" 18004 @ 148640: PUSH INHIBIT 18005 @ 148643: PUSHI #0x00000001 18006 @ 148648: ASSVAL 18007 @ 148649: LINE 2621 "regression-compile-tmp/pass1.imp" 18008 @ 148685: JUMP L_0136 2622 c(134): def(x); ! swid 18009 @ 148688: LINE 2622 "regression-compile-tmp/pass1.imp" 18010 @ 148724: PUSHI #0x00000086 18011 @ 148729: SLABEL 266 18012 @ 148732: LINE 2622 "regression-compile-tmp/pass1.imp" 18013 @ 148768: PUSH DEF 18014 @ 148771: PUSH X 18015 @ 148774: ASSPAR 18016 @ 148775: CALL 2623 n = ub-lb+1 18017 @ 148776: LINE 2623 "regression-compile-tmp/pass1.imp" 18018 @ 148812: PUSH N 18019 @ 148815: PUSH UB 18020 @ 148818: PUSH LB 18021 @ 148821: SUB 18022 @ 148822: PUSHI #0x00000001 18023 @ 148827: ADD 18024 @ 148828: ASSVAL 2624 n = (n+15)>>4; ! slots needed (includes zero) 18025 @ 148829: LINE 2624 "regression-compile-tmp/pass1.imp" 18026 @ 148865: PUSH N 18027 @ 148868: PUSH N 18028 @ 148871: PUSHI #0x0000000f 18029 @ 148876: ADD 18030 @ 148877: PUSHI #0x00000004 18031 @ 148882: RSH 18032 @ 148883: ASSVAL 2625 j = dmax; dmax = dmax+n+2 18033 @ 148884: LINE 2625 "regression-compile-tmp/pass1.imp" 18034 @ 148920: PUSH J 18035 @ 148923: PUSH DMAX 18036 @ 148926: ASSVAL 18037 @ 148927: LINE 2625 "regression-compile-tmp/pass1.imp" 18038 @ 148963: PUSH DMAX 18039 @ 148966: PUSH DMAX 18040 @ 148969: PUSH N 18041 @ 148972: ADD 18042 @ 148973: PUSHI #0x00000002 18043 @ 148978: ADD 18044 @ 148979: ASSVAL 2626 abandon(1) %if dmax >= dmin 18045 @ 148980: LINE 2626 "regression-compile-tmp/pass1.imp" 18046 @ 149016: PUSH DMAX 18047 @ 149019: PUSH DMIN 18048 @ 149022: JUMPIF < L_0004 18049 @ 149026: PUSH ABANDON 18050 @ 149029: PUSHI #0x00000001 18051 @ 149034: ASSPAR 18052 @ 149035: CALL 18053 @ 149036: LOCATE L_0004 2627 tag(x)_format = j 18054 @ 149039: LINE 2627 "regression-compile-tmp/pass1.imp" 18055 @ 149075: PUSH TAG 18056 @ 149078: PUSH X 18057 @ 149081: ACCESS 18058 @ 149082: SELECT 2 18059 @ 149085: PUSH J 18060 @ 149088: ASSVAL 2628 dict(j) = lb; dict(j+1) = ub 18061 @ 149089: LINE 2628 "regression-compile-tmp/pass1.imp" 18062 @ 149125: PUSH DICT 18063 @ 149128: PUSH J 18064 @ 149131: ACCESS 18065 @ 149132: PUSH LB 18066 @ 149135: ASSVAL 18067 @ 149136: LINE 2628 "regression-compile-tmp/pass1.imp" 18068 @ 149172: PUSH DICT 18069 @ 149175: PUSH J 18070 @ 149178: PUSHI #0x00000001 18071 @ 149183: ADD 18072 @ 149184: ACCESS 18073 @ 149185: PUSH UB 18074 @ 149188: ASSVAL 2629 %cycle 18075 @ 149189: LINE 2629 "regression-compile-tmp/pass1.imp" 18076 @ 149225: LOCATE L_0003 2630 n = n-1 18077 @ 149228: LINE 2630 "regression-compile-tmp/pass1.imp" 18078 @ 149264: PUSH N 18079 @ 149267: PUSH N 18080 @ 149270: PUSHI #0x00000001 18081 @ 149275: SUB 18082 @ 149276: ASSVAL 2631 ->top %if n < 0 18083 @ 149277: LINE 2631 "regression-compile-tmp/pass1.imp" 18084 @ 149313: PUSH N 18085 @ 149316: PUSHI #0x00000000 18086 @ 149321: JUMPIF >= L_0007 18087 @ 149325: JUMP L_0135 18088 @ 149328: LOCATE L_0007 2632 j = j+1; dict(j+1) = 0 18089 @ 149331: LINE 2632 "regression-compile-tmp/pass1.imp" 18090 @ 149367: PUSH J 18091 @ 149370: PUSH J 18092 @ 149373: PUSHI #0x00000001 18093 @ 149378: ADD 18094 @ 149379: ASSVAL 18095 @ 149380: LINE 2632 "regression-compile-tmp/pass1.imp" 18096 @ 149416: PUSH DICT 18097 @ 149419: PUSH J 18098 @ 149422: PUSHI #0x00000001 18099 @ 149427: ADD 18100 @ 149428: ACCESS 18101 @ 149429: PUSHI #0x00000000 18102 @ 149434: ASSVAL 2633 %repeat 18103 @ 149435: LINE 2633 "regression-compile-tmp/pass1.imp" 18104 @ 149471: REPEAT L_0003 2634 c(151): stats = stats-1; ! slab 18105 @ 149474: LINE 2634 "regression-compile-tmp/pass1.imp" 18106 @ 149510: PUSHI #0x00000097 18107 @ 149515: SLABEL 266 18108 @ 149518: LINE 2634 "regression-compile-tmp/pass1.imp" 18109 @ 149554: PUSH STATS 18110 @ 149557: PUSH STATS 18111 @ 149560: PUSHI #0x00000001 18112 @ 149565: SUB 18113 @ 149566: ASSVAL 2635 fault(7) %and %return %if x < tbase 18114 @ 149567: LINE 2635 "regression-compile-tmp/pass1.imp" 18115 @ 149603: PUSH X 18116 @ 149606: PUSH TBASE 18117 @ 149609: JUMPIF >= L_0004 18118 @ 149613: PUSH FAULT 18119 @ 149616: PUSHI #0x00000007 18120 @ 149621: ASSPAR 18121 @ 149622: CALL 18122 @ 149623: RETURN 18123 @ 149624: LOCATE L_0004 2636 %if pending # 0 %start; ! explicit label 18124 @ 149627: LINE 2636 "regression-compile-tmp/pass1.imp" 18125 @ 149663: PUSH PENDING 18126 @ 149666: PUSHI #0x00000000 18127 @ 149671: JUMPIF = L_0004 2637 def s lab(pstack(1)) 18128 @ 149675: LINE 2637 "regression-compile-tmp/pass1.imp" 18129 @ 149711: PUSH DEFSLAB 18130 @ 149714: PUSH PSTACK 18131 @ 149717: PUSHI #0x00000001 18132 @ 149722: ACCESS 18133 @ 149723: ASSPAR 18134 @ 149724: CALL 2638 %finish %else %start 18135 @ 149725: LINE 2638 "regression-compile-tmp/pass1.imp" 18136 @ 149761: GOTO L_0003 18137 @ 149764: LOCATE L_0004 2639 fault(4) %and %return %if tag(x)_app # 0 18138 @ 149767: LINE 2639 "regression-compile-tmp/pass1.imp" 18139 @ 149803: PUSH TAG 18140 @ 149806: PUSH X 18141 @ 149809: ACCESS 18142 @ 149810: SELECT 1 18143 @ 149813: PUSHI #0x00000000 18144 @ 149818: JUMPIF = L_0007 18145 @ 149822: PUSH FAULT 18146 @ 149825: PUSHI #0x00000004 18147 @ 149830: ASSPAR 18148 @ 149831: CALL 18149 @ 149832: RETURN 18150 @ 149833: LOCATE L_0007 2640 tag(x)_app = 1 18151 @ 149836: LINE 2640 "regression-compile-tmp/pass1.imp" 18152 @ 149872: PUSH TAG 18153 @ 149875: PUSH X 18154 @ 149878: ACCESS 18155 @ 149879: SELECT 1 18156 @ 149882: PUSHI #0x00000001 18157 @ 149887: ASSVAL 2641 n = tag(x)_format 18158 @ 149888: LINE 2641 "regression-compile-tmp/pass1.imp" 18159 @ 149924: PUSH N 18160 @ 149927: PUSH TAG 18161 @ 149930: PUSH X 18162 @ 149933: ACCESS 18163 @ 149934: SELECT 2 18164 @ 149937: ASSVAL 2642 %for j = dict(n), 1, dict(n+1) %cycle 18165 @ 149938: LINE 2642 "regression-compile-tmp/pass1.imp" 18166 @ 149974: PUSH J 18167 @ 149977: PUSHI #0x00000001 18168 @ 149982: PUSH DICT 18169 @ 149985: PUSH N 18170 @ 149988: PUSHI #0x00000001 18171 @ 149993: ADD 18172 @ 149994: ACCESS 18173 @ 149995: PUSH DICT 18174 @ 149998: PUSH N 18175 @ 150001: ACCESS 18176 @ 150002: FOR L_0006 2643 def s lab(j) 18177 @ 150005: LINE 2643 "regression-compile-tmp/pass1.imp" 18178 @ 150041: PUSH DEFSLAB 18179 @ 150044: PUSH J 18180 @ 150047: ASSPAR 18181 @ 150048: CALL 2644 flush buffer( 128 ); ! flush if bp >= 128 18182 @ 150049: LINE 2644 "regression-compile-tmp/pass1.imp" 18183 @ 150085: PUSH FLUSHBUFFER 18184 @ 150088: PUSHI #0x00000080 18185 @ 150093: ASSPAR 18186 @ 150094: CALL 2645 %repeat 18187 @ 150095: LINE 2645 "regression-compile-tmp/pass1.imp" 18188 @ 150131: REPEAT L_0006 18189 @ 150134: LOCATE L_0007 2646 %finish 18190 @ 150137: LINE 2646 "regression-compile-tmp/pass1.imp" 18191 @ 150173: LOCATE L_0003 2647 inhibit = 1 18192 @ 150176: LINE 2647 "regression-compile-tmp/pass1.imp" 18193 @ 150212: PUSH INHIBIT 18194 @ 150215: PUSHI #0x00000001 18195 @ 150220: ASSVAL 2648 %return 2649 18196 @ 150221: LINE 2648 "regression-compile-tmp/pass1.imp" 18197 @ 150257: RETURN 2650 c(140): add char( 'p' ); ->top; ! psep 18198 @ 150258: LINE 2650 "regression-compile-tmp/pass1.imp" 18199 @ 150294: PUSHI #0x0000008c 18200 @ 150299: SLABEL 266 18201 @ 150302: LINE 2650 "regression-compile-tmp/pass1.imp" 18202 @ 150338: PUSH ADDCHAR 18203 @ 150341: PUSHI #0x00000070 18204 @ 150346: ASSPAR 18205 @ 150347: CALL 18206 @ 150348: LINE 2650 "regression-compile-tmp/pass1.imp" 18207 @ 150384: JUMP L_0135 2651 c(144): ; ! prb 18208 @ 150387: LINE 2651 "regression-compile-tmp/pass1.imp" 18209 @ 150423: PUSHI #0x00000090 18210 @ 150428: SLABEL 266 2652 add char( 'p' ); 18211 @ 150431: LINE 2652 "regression-compile-tmp/pass1.imp" 18212 @ 150467: PUSH ADDCHAR 18213 @ 150470: PUSHI #0x00000070 18214 @ 150475: ASSPAR 18215 @ 150476: CALL 2653 add char( 'E' ); ->top 2654 2655 !constant expressions 18216 @ 150477: LINE 2653 "regression-compile-tmp/pass1.imp" 18217 @ 150513: PUSH ADDCHAR 18218 @ 150516: PUSHI #0x00000045 18219 @ 150521: ASSPAR 18220 @ 150522: CALL 18221 @ 150523: LINE 2653 "regression-compile-tmp/pass1.imp" 18222 @ 150559: JUMP L_0135 2656 c(155): ; ! pconst 18223 @ 150562: LINE 2656 "regression-compile-tmp/pass1.imp" 18224 @ 150598: PUSHI #0x0000009b 18225 @ 150603: SLABEL 266 2657 %if x < 0 %then lit = tag(-x)_format %else lit = lit pool(x) 18226 @ 150606: LINE 2657 "regression-compile-tmp/pass1.imp" 18227 @ 150642: PUSH X 18228 @ 150645: PUSHI #0x00000000 18229 @ 150650: JUMPIF >= L_0004 18230 @ 150654: PUSH LIT 18231 @ 150657: PUSH TAG 18232 @ 150660: PUSH X 18233 @ 150663: NEGATE 18234 @ 150664: ACCESS 18235 @ 150665: SELECT 2 18236 @ 150668: ASSVAL 18237 @ 150669: GOTO L_0003 18238 @ 150672: LOCATE L_0004 18239 @ 150675: PUSH LIT 18240 @ 150678: PUSH LITPOOL 18241 @ 150681: PUSH X 18242 @ 150684: ACCESS 18243 @ 150685: ASSVAL 18244 @ 150686: LOCATE L_0003 2658 pending = pending+1; pstack(pending) = lit; ->top 18245 @ 150689: LINE 2658 "regression-compile-tmp/pass1.imp" 18246 @ 150725: PUSH PENDING 18247 @ 150728: PUSH PENDING 18248 @ 150731: PUSHI #0x00000001 18249 @ 150736: ADD 18250 @ 150737: ASSVAL 18251 @ 150738: LINE 2658 "regression-compile-tmp/pass1.imp" 18252 @ 150774: PUSH PSTACK 18253 @ 150777: PUSH PENDING 18254 @ 150780: ACCESS 18255 @ 150781: PUSH LIT 18256 @ 150784: ASSVAL 18257 @ 150785: LINE 2658 "regression-compile-tmp/pass1.imp" 18258 @ 150821: JUMP L_0135 2659 c(156): lit = pstack(pending); lit = -lit %if lit < 0 18259 @ 150824: LINE 2659 "regression-compile-tmp/pass1.imp" 18260 @ 150860: PUSHI #0x0000009c 18261 @ 150865: SLABEL 266 18262 @ 150868: LINE 2659 "regression-compile-tmp/pass1.imp" 18263 @ 150904: PUSH LIT 18264 @ 150907: PUSH PSTACK 18265 @ 150910: PUSH PENDING 18266 @ 150913: ACCESS 18267 @ 150914: ASSVAL 18268 @ 150915: LINE 2659 "regression-compile-tmp/pass1.imp" 18269 @ 150951: PUSH LIT 18270 @ 150954: PUSHI #0x00000000 18271 @ 150959: JUMPIF >= L_0004 18272 @ 150963: PUSH LIT 18273 @ 150966: PUSH LIT 18274 @ 150969: NEGATE 18275 @ 150970: ASSVAL 18276 @ 150971: LOCATE L_0004 2660 pstack(pending) = lit; ->top; !cmod 18277 @ 150974: LINE 2660 "regression-compile-tmp/pass1.imp" 18278 @ 151010: PUSH PSTACK 18279 @ 151013: PUSH PENDING 18280 @ 151016: ACCESS 18281 @ 151017: PUSH LIT 18282 @ 151020: ASSVAL 18283 @ 151021: LINE 2660 "regression-compile-tmp/pass1.imp" 18284 @ 151057: JUMP L_0135 2661 c(157): lit = -pstack(pending); pstack(pending) = lit; ->top; ! csign 18285 @ 151060: LINE 2661 "regression-compile-tmp/pass1.imp" 18286 @ 151096: PUSHI #0x0000009d 18287 @ 151101: SLABEL 266 18288 @ 151104: LINE 2661 "regression-compile-tmp/pass1.imp" 18289 @ 151140: PUSH LIT 18290 @ 151143: PUSH PSTACK 18291 @ 151146: PUSH PENDING 18292 @ 151149: ACCESS 18293 @ 151150: NEGATE 18294 @ 151151: ASSVAL 18295 @ 151152: LINE 2661 "regression-compile-tmp/pass1.imp" 18296 @ 151188: PUSH PSTACK 18297 @ 151191: PUSH PENDING 18298 @ 151194: ACCESS 18299 @ 151195: PUSH LIT 18300 @ 151198: ASSVAL 18301 @ 151199: LINE 2661 "regression-compile-tmp/pass1.imp" 18302 @ 151235: JUMP L_0135 2662 c(158): lit = \pstack(pending); pstack(pending) = lit; ->top; ! cuop 18303 @ 151238: LINE 2662 "regression-compile-tmp/pass1.imp" 18304 @ 151274: PUSHI #0x0000009e 18305 @ 151279: SLABEL 266 18306 @ 151282: LINE 2662 "regression-compile-tmp/pass1.imp" 18307 @ 151318: PUSH LIT 18308 @ 151321: PUSH PSTACK 18309 @ 151324: PUSH PENDING 18310 @ 151327: ACCESS 18311 @ 151328: NOT 18312 @ 151329: ASSVAL 18313 @ 151330: LINE 2662 "regression-compile-tmp/pass1.imp" 18314 @ 151366: PUSH PSTACK 18315 @ 151369: PUSH PENDING 18316 @ 151372: ACCESS 18317 @ 151373: PUSH LIT 18318 @ 151376: ASSVAL 18319 @ 151377: LINE 2662 "regression-compile-tmp/pass1.imp" 18320 @ 151413: JUMP L_0135 2663 c(159): ; ! cop1 18321 @ 151416: LINE 2663 "regression-compile-tmp/pass1.imp" 18322 @ 151452: PUSHI #0x0000009f 18323 @ 151457: SLABEL 266 2664 c(160): ; ! cop2 18324 @ 151460: LINE 2664 "regression-compile-tmp/pass1.imp" 18325 @ 151496: PUSHI #0x000000a0 18326 @ 151501: SLABEL 266 2665 c(161): pending = pending-1; ! cop3 18327 @ 151504: LINE 2665 "regression-compile-tmp/pass1.imp" 18328 @ 151540: PUSHI #0x000000a1 18329 @ 151545: SLABEL 266 18330 @ 151548: LINE 2665 "regression-compile-tmp/pass1.imp" 18331 @ 151584: PUSH PENDING 18332 @ 151587: PUSH PENDING 18333 @ 151590: PUSHI #0x00000001 18334 @ 151595: SUB 18335 @ 151596: ASSVAL 2666 lit2 = pstack(pending+1); lit = pstack(pending) 18336 @ 151597: LINE 2666 "regression-compile-tmp/pass1.imp" 18337 @ 151633: PUSH LIT2 18338 @ 151636: PUSH PSTACK 18339 @ 151639: PUSH PENDING 18340 @ 151642: PUSHI #0x00000001 18341 @ 151647: ADD 18342 @ 151648: ACCESS 18343 @ 151649: ASSVAL 18344 @ 151650: LINE 2666 "regression-compile-tmp/pass1.imp" 18345 @ 151686: PUSH LIT 18346 @ 151689: PUSH PSTACK 18347 @ 151692: PUSH PENDING 18348 @ 151695: ACCESS 18349 @ 151696: ASSVAL 2667 ->litop(x>>2) 2668 18350 @ 151697: LINE 2667 "regression-compile-tmp/pass1.imp" 18351 @ 151733: PUSH X 18352 @ 151736: PUSHI #0x00000002 18353 @ 151741: RSH 18354 @ 151742: SJUMP 267 2669 litop(1): lit = lit<setl 18355 @ 151745: LINE 2669 "regression-compile-tmp/pass1.imp" 18356 @ 151781: PUSHI #0x00000001 18357 @ 151786: SLABEL 267 18358 @ 151789: LINE 2669 "regression-compile-tmp/pass1.imp" 18359 @ 151825: PUSH LIT 18360 @ 151828: PUSH LIT 18361 @ 151831: PUSH LIT2 18362 @ 151834: LSH 18363 @ 151835: ASSVAL 18364 @ 151836: LINE 2669 "regression-compile-tmp/pass1.imp" 18365 @ 151872: JUMP L_013c 2670 litop(2): lit = lit>>lit2; ->setl 18366 @ 151875: LINE 2670 "regression-compile-tmp/pass1.imp" 18367 @ 151911: PUSHI #0x00000002 18368 @ 151916: SLABEL 267 18369 @ 151919: LINE 2670 "regression-compile-tmp/pass1.imp" 18370 @ 151955: PUSH LIT 18371 @ 151958: PUSH LIT 18372 @ 151961: PUSH LIT2 18373 @ 151964: RSH 18374 @ 151965: ASSVAL 18375 @ 151966: LINE 2670 "regression-compile-tmp/pass1.imp" 18376 @ 152002: JUMP L_013c 2671 litop(3): n = 1; ! lit = lit\\lit2 18377 @ 152005: LINE 2671 "regression-compile-tmp/pass1.imp" 18378 @ 152041: PUSHI #0x00000003 18379 @ 152046: SLABEL 267 18380 @ 152049: LINE 2671 "regression-compile-tmp/pass1.imp" 18381 @ 152085: PUSH N 18382 @ 152088: PUSHI #0x00000001 18383 @ 152093: ASSVAL 2672 fault(10) %if lit2 < 0 18384 @ 152094: LINE 2672 "regression-compile-tmp/pass1.imp" 18385 @ 152130: PUSH LIT2 18386 @ 152133: PUSHI #0x00000000 18387 @ 152138: JUMPIF >= L_0004 18388 @ 152142: PUSH FAULT 18389 @ 152145: PUSHI #0x0000000a 18390 @ 152150: ASSPAR 18391 @ 152151: CALL 18392 @ 152152: LOCATE L_0004 2673 %while lit2 > 0 %cycle 18393 @ 152155: LINE 2673 "regression-compile-tmp/pass1.imp" 18394 @ 152191: LOCATE L_0003 18395 @ 152194: PUSH LIT2 18396 @ 152197: PUSHI #0x00000000 18397 @ 152202: JUMPIF <= L_0004 2674 lit2 = lit2-1 18398 @ 152206: LINE 2674 "regression-compile-tmp/pass1.imp" 18399 @ 152242: PUSH LIT2 18400 @ 152245: PUSH LIT2 18401 @ 152248: PUSHI #0x00000001 18402 @ 152253: SUB 18403 @ 152254: ASSVAL 2675 n = n*lit 18404 @ 152255: LINE 2675 "regression-compile-tmp/pass1.imp" 18405 @ 152291: PUSH N 18406 @ 152294: PUSH N 18407 @ 152297: PUSH LIT 18408 @ 152300: MUL 18409 @ 152301: ASSVAL 2676 %repeat 18410 @ 152302: LINE 2676 "regression-compile-tmp/pass1.imp" 18411 @ 152338: REPEAT L_0003 18412 @ 152341: LOCATE L_0004 2677 lit = n; ->setl 18413 @ 152344: LINE 2677 "regression-compile-tmp/pass1.imp" 18414 @ 152380: PUSH LIT 18415 @ 152383: PUSH N 18416 @ 152386: ASSVAL 18417 @ 152387: LINE 2677 "regression-compile-tmp/pass1.imp" 18418 @ 152423: JUMP L_013c 2678 litop(4): %if lit2 = 0 %then fault(10) %else lit = lit//lit2 18419 @ 152426: LINE 2678 "regression-compile-tmp/pass1.imp" 18420 @ 152462: PUSHI #0x00000004 18421 @ 152467: SLABEL 267 18422 @ 152470: LINE 2678 "regression-compile-tmp/pass1.imp" 18423 @ 152506: PUSH LIT2 18424 @ 152509: PUSHI #0x00000000 18425 @ 152514: JUMPIF # L_0004 18426 @ 152518: PUSH FAULT 18427 @ 152521: PUSHI #0x0000000a 18428 @ 152526: ASSPAR 18429 @ 152527: CALL 18430 @ 152528: GOTO L_0003 18431 @ 152531: LOCATE L_0004 18432 @ 152534: PUSH LIT 18433 @ 152537: PUSH LIT 18434 @ 152540: PUSH LIT2 18435 @ 152543: QUOT 18436 @ 152544: ASSVAL 18437 @ 152545: LOCATE L_0003 2679 ->setl 18438 @ 152548: LINE 2679 "regression-compile-tmp/pass1.imp" 18439 @ 152584: JUMP L_013c 2680 litop(5): lit = lit&lit2; ->setl 18440 @ 152587: LINE 2680 "regression-compile-tmp/pass1.imp" 18441 @ 152623: PUSHI #0x00000005 18442 @ 152628: SLABEL 267 18443 @ 152631: LINE 2680 "regression-compile-tmp/pass1.imp" 18444 @ 152667: PUSH LIT 18445 @ 152670: PUSH LIT 18446 @ 152673: PUSH LIT2 18447 @ 152676: AND 18448 @ 152677: ASSVAL 18449 @ 152678: LINE 2680 "regression-compile-tmp/pass1.imp" 18450 @ 152714: JUMP L_013c 2681 litop(6): lit = lit!lit2; ->setl 18451 @ 152717: LINE 2681 "regression-compile-tmp/pass1.imp" 18452 @ 152753: PUSHI #0x00000006 18453 @ 152758: SLABEL 267 18454 @ 152761: LINE 2681 "regression-compile-tmp/pass1.imp" 18455 @ 152797: PUSH LIT 18456 @ 152800: PUSH LIT 18457 @ 152803: PUSH LIT2 18458 @ 152806: OR 18459 @ 152807: ASSVAL 18460 @ 152808: LINE 2681 "regression-compile-tmp/pass1.imp" 18461 @ 152844: JUMP L_013c 2682 litop(7): lit = lit!!lit2; ->setl 18462 @ 152847: LINE 2682 "regression-compile-tmp/pass1.imp" 18463 @ 152883: PUSHI #0x00000007 18464 @ 152888: SLABEL 267 18465 @ 152891: LINE 2682 "regression-compile-tmp/pass1.imp" 18466 @ 152927: PUSH LIT 18467 @ 152930: PUSH LIT 18468 @ 152933: PUSH LIT2 18469 @ 152936: XOR 18470 @ 152937: ASSVAL 18471 @ 152938: LINE 2682 "regression-compile-tmp/pass1.imp" 18472 @ 152974: JUMP L_013c 2683 litop(8): lit = lit+lit2; ->setl 18473 @ 152977: LINE 2683 "regression-compile-tmp/pass1.imp" 18474 @ 153013: PUSHI #0x00000008 18475 @ 153018: SLABEL 267 18476 @ 153021: LINE 2683 "regression-compile-tmp/pass1.imp" 18477 @ 153057: PUSH LIT 18478 @ 153060: PUSH LIT 18479 @ 153063: PUSH LIT2 18480 @ 153066: ADD 18481 @ 153067: ASSVAL 18482 @ 153068: LINE 2683 "regression-compile-tmp/pass1.imp" 18483 @ 153104: JUMP L_013c 2684 litop(9): lit = lit-lit2; ->setl 18484 @ 153107: LINE 2684 "regression-compile-tmp/pass1.imp" 18485 @ 153143: PUSHI #0x00000009 18486 @ 153148: SLABEL 267 18487 @ 153151: LINE 2684 "regression-compile-tmp/pass1.imp" 18488 @ 153187: PUSH LIT 18489 @ 153190: PUSH LIT 18490 @ 153193: PUSH LIT2 18491 @ 153196: SUB 18492 @ 153197: ASSVAL 18493 @ 153198: LINE 2684 "regression-compile-tmp/pass1.imp" 18494 @ 153234: JUMP L_013c 2685 litop(10): lit = lit*lit2; ->setl 18495 @ 153237: LINE 2685 "regression-compile-tmp/pass1.imp" 18496 @ 153273: PUSHI #0x0000000a 18497 @ 153278: SLABEL 267 18498 @ 153281: LINE 2685 "regression-compile-tmp/pass1.imp" 18499 @ 153317: PUSH LIT 18500 @ 153320: PUSH LIT 18501 @ 153323: PUSH LIT2 18502 @ 153326: MUL 18503 @ 153327: ASSVAL 18504 @ 153328: LINE 2685 "regression-compile-tmp/pass1.imp" 18505 @ 153364: JUMP L_013c 2686 litop(11): lit = lit+lit2; ->setl 18506 @ 153367: LINE 2686 "regression-compile-tmp/pass1.imp" 18507 @ 153403: PUSHI #0x0000000b 18508 @ 153408: SLABEL 267 18509 @ 153411: LINE 2686 "regression-compile-tmp/pass1.imp" 18510 @ 153447: PUSH LIT 18511 @ 153450: PUSH LIT 18512 @ 153453: PUSH LIT2 18513 @ 153456: ADD 18514 @ 153457: ASSVAL 18515 @ 153458: LINE 2686 "regression-compile-tmp/pass1.imp" 18516 @ 153494: JUMP L_013c 2687 litop(12): n = 1; ! lit = lit\\lit2 18517 @ 153497: LINE 2687 "regression-compile-tmp/pass1.imp" 18518 @ 153533: PUSHI #0x0000000c 18519 @ 153538: SLABEL 267 18520 @ 153541: LINE 2687 "regression-compile-tmp/pass1.imp" 18521 @ 153577: PUSH N 18522 @ 153580: PUSHI #0x00000001 18523 @ 153585: ASSVAL 2688 fault(10) %if lit2 < 0 18524 @ 153586: LINE 2688 "regression-compile-tmp/pass1.imp" 18525 @ 153622: PUSH LIT2 18526 @ 153625: PUSHI #0x00000000 18527 @ 153630: JUMPIF >= L_0004 18528 @ 153634: PUSH FAULT 18529 @ 153637: PUSHI #0x0000000a 18530 @ 153642: ASSPAR 18531 @ 153643: CALL 18532 @ 153644: LOCATE L_0004 2689 %while lit2 > 0 %cycle 18533 @ 153647: LINE 2689 "regression-compile-tmp/pass1.imp" 18534 @ 153683: LOCATE L_0003 18535 @ 153686: PUSH LIT2 18536 @ 153689: PUSHI #0x00000000 18537 @ 153694: JUMPIF <= L_0004 2690 lit2 = lit2-1 18538 @ 153698: LINE 2690 "regression-compile-tmp/pass1.imp" 18539 @ 153734: PUSH LIT2 18540 @ 153737: PUSH LIT2 18541 @ 153740: PUSHI #0x00000001 18542 @ 153745: SUB 18543 @ 153746: ASSVAL 2691 n = n*lit 18544 @ 153747: LINE 2691 "regression-compile-tmp/pass1.imp" 18545 @ 153783: PUSH N 18546 @ 153786: PUSH N 18547 @ 153789: PUSH LIT 18548 @ 153792: MUL 18549 @ 153793: ASSVAL 2692 %repeat 18550 @ 153794: LINE 2692 "regression-compile-tmp/pass1.imp" 18551 @ 153830: REPEAT L_0003 18552 @ 153833: LOCATE L_0004 2693 lit = n; ->setl 18553 @ 153836: LINE 2693 "regression-compile-tmp/pass1.imp" 18554 @ 153872: PUSH LIT 18555 @ 153875: PUSH N 18556 @ 153878: ASSVAL 18557 @ 153879: LINE 2693 "regression-compile-tmp/pass1.imp" 18558 @ 153915: JUMP L_013c 2694 setl: pstack(pending) = lit; ->top 2695 18559 @ 153918: LINE 2694 "regression-compile-tmp/pass1.imp" 18560 @ 153954: LABEL L_013c 18561 @ 153957: LINE 2694 "regression-compile-tmp/pass1.imp" 18562 @ 153993: PUSH PSTACK 18563 @ 153996: PUSH PENDING 18564 @ 153999: ACCESS 18565 @ 154000: PUSH LIT 18566 @ 154003: ASSVAL 18567 @ 154004: LINE 2694 "regression-compile-tmp/pass1.imp" 18568 @ 154040: JUMP L_0135 2696 c(170): ; 2697 !Fault(4) %if IMPCOM_Option # "" 2698 !IMPCOM_Option = String(x-x'4000'+Stbase); ! Option string 18569 @ 154043: LINE 2696 "regression-compile-tmp/pass1.imp" 18570 @ 154079: PUSHI #0x000000aa 18571 @ 154084: SLABEL 266 2699 ->Top 2700 2701 !string resolution 18572 @ 154087: LINE 2699 "regression-compile-tmp/pass1.imp" 18573 @ 154123: JUMP L_0135 2702 c(135): resln = 2; ->top; ! dotl 18574 @ 154126: LINE 2702 "regression-compile-tmp/pass1.imp" 18575 @ 154162: PUSHI #0x00000087 18576 @ 154167: SLABEL 266 18577 @ 154170: LINE 2702 "regression-compile-tmp/pass1.imp" 18578 @ 154206: PUSH RESLN 18579 @ 154209: PUSHI #0x00000002 18580 @ 154214: ASSVAL 18581 @ 154215: LINE 2702 "regression-compile-tmp/pass1.imp" 18582 @ 154251: JUMP L_0135 2703 c(136): resln = resln+1; ->top; ! dotr 18583 @ 154254: LINE 2703 "regression-compile-tmp/pass1.imp" 18584 @ 154290: PUSHI #0x00000088 18585 @ 154295: SLABEL 266 18586 @ 154298: LINE 2703 "regression-compile-tmp/pass1.imp" 18587 @ 154334: PUSH RESLN 18588 @ 154337: PUSH RESLN 18589 @ 154340: PUSHI #0x00000001 18590 @ 154345: ADD 18591 @ 154346: ASSVAL 18592 @ 154347: LINE 2703 "regression-compile-tmp/pass1.imp" 18593 @ 154383: JUMP L_0135 2704 c(55): op('r', resln); resln = 0; ->top; ! resop 18594 @ 154386: LINE 2704 "regression-compile-tmp/pass1.imp" 18595 @ 154422: PUSHI #0x00000037 18596 @ 154427: SLABEL 266 18597 @ 154430: LINE 2704 "regression-compile-tmp/pass1.imp" 18598 @ 154466: PUSH OP 18599 @ 154469: PUSHI #0x00000072 18600 @ 154474: ASSPAR 18601 @ 154475: PUSH RESLN 18602 @ 154478: ASSPAR 18603 @ 154479: CALL 18604 @ 154480: LINE 2704 "regression-compile-tmp/pass1.imp" 18605 @ 154516: PUSH RESLN 18606 @ 154519: PUSHI #0x00000000 18607 @ 154524: ASSVAL 18608 @ 154525: LINE 2704 "regression-compile-tmp/pass1.imp" 18609 @ 154561: JUMP L_0135 2705 c(164): op('r', resln+4); resln = 0; ! cresop 18610 @ 154564: LINE 2705 "regression-compile-tmp/pass1.imp" 18611 @ 154600: PUSHI #0x000000a4 18612 @ 154605: SLABEL 266 18613 @ 154608: LINE 2705 "regression-compile-tmp/pass1.imp" 18614 @ 154644: PUSH OP 18615 @ 154647: PUSHI #0x00000072 18616 @ 154652: ASSPAR 18617 @ 154653: PUSH RESLN 18618 @ 154656: PUSHI #0x00000004 18619 @ 154661: ADD 18620 @ 154662: ASSPAR 18621 @ 154663: CALL 18622 @ 154664: LINE 2705 "regression-compile-tmp/pass1.imp" 18623 @ 154700: PUSH RESLN 18624 @ 154703: PUSHI #0x00000000 18625 @ 154708: ASSVAL 2706 c(122): x = 6; ->cop; ! %PRED 18626 @ 154709: LINE 2706 "regression-compile-tmp/pass1.imp" 18627 @ 154745: PUSHI #0x0000007a 18628 @ 154750: SLABEL 266 18629 @ 154753: LINE 2706 "regression-compile-tmp/pass1.imp" 18630 @ 154789: PUSH X 18631 @ 154792: PUSHI #0x00000006 18632 @ 154797: ASSVAL 18633 @ 154798: LINE 2706 "regression-compile-tmp/pass1.imp" 18634 @ 154834: JUMP L_0138 2707 c(87): set const(pstack(1)); ! mass 18635 @ 154837: LINE 2707 "regression-compile-tmp/pass1.imp" 18636 @ 154873: PUSHI #0x00000057 18637 @ 154878: SLABEL 266 18638 @ 154881: LINE 2707 "regression-compile-tmp/pass1.imp" 18639 @ 154917: PUSH SETCONST 18640 @ 154920: PUSH PSTACK 18641 @ 154923: PUSHI #0x00000001 18642 @ 154928: ACCESS 18643 @ 154929: ASSPAR 18644 @ 154930: CALL 2708 bp=bp+1 %and buff(bp)='P'; ->top 18645 @ 154931: LINE 2708 "regression-compile-tmp/pass1.imp" 18646 @ 154967: PUSH BP 18647 @ 154970: PUSH BP 18648 @ 154973: PUSHI #0x00000001 18649 @ 154978: ADD 18650 @ 154979: ASSVAL 18651 @ 154980: PUSH BUFF 18652 @ 154983: PUSH BP 18653 @ 154986: ACCESS 18654 @ 154987: PUSHI #0x00000050 18655 @ 154992: ASSVAL 18656 @ 154993: LINE 2708 "regression-compile-tmp/pass1.imp" 18657 @ 155029: JUMP L_0135 2709 %end 2710 18658 @ 155032: LINE 2709 "regression-compile-tmp/pass1.imp" 18659 @ 155068: END _lev0id0_COMPILEBLOCK_COMPILE {lev=3 --> 2} 2711 %end; ! of compile block 2712 18660 @ 155069: LINE 2711 "regression-compile-tmp/pass1.imp" 18661 @ 155105: END _lev0id0_COMPILEBLOCK {lev=2 --> 1} 2713 %on 9 %start 18662 @ 155106: LINE 2713 "regression-compile-tmp/pass1.imp" 18663 @ 155142: ON MASK=0200 L_0004 2714 abandon(5) 18664 @ 155148: LINE 2714 "regression-compile-tmp/pass1.imp" 18665 @ 155184: PUSH ABANDON 18666 @ 155187: PUSHI #0x00000005 18667 @ 155192: ASSPAR 18668 @ 155193: CALL 2715 %finish 2716 18669 @ 155194: LINE 2715 "regression-compile-tmp/pass1.imp" 18670 @ 155230: LOCATE L_0004 2717 selectinput(2); selectoutput(listing) 18671 @ 155233: LINE 2717 "regression-compile-tmp/pass1.imp" 18672 @ 155269: PUSH SELECTINPUT 18673 @ 155272: PUSHI #0x00000002 18674 @ 155277: ASSPAR 18675 @ 155278: CALL 18676 @ 155279: LINE 2717 "regression-compile-tmp/pass1.imp" 18677 @ 155315: PUSH SELECTOUTPUT 18678 @ 155318: PUSHI #0x00000002 18679 @ 155323: ASSPAR 18680 @ 155324: CALL 2718 tag(max tag) = 0; ! %begin defn 18681 @ 155325: LINE 2718 "regression-compile-tmp/pass1.imp" 18682 @ 155361: PUSH TAG 18683 @ 155364: PUSHI #0x00000320 18684 @ 155369: ACCESS 18685 @ 155370: PUSHI #0x00000000 18686 @ 155375: ASSVAL 2719 tag(0) = 0; tag(0)_flags = 7; ! %begin tag! 18687 @ 155376: LINE 2719 "regression-compile-tmp/pass1.imp" 18688 @ 155412: PUSH TAG 18689 @ 155415: PUSHI #0x00000000 18690 @ 155420: ACCESS 18691 @ 155421: PUSHI #0x00000000 18692 @ 155426: ASSVAL 18693 @ 155427: LINE 2719 "regression-compile-tmp/pass1.imp" 18694 @ 155463: PUSH TAG 18695 @ 155466: PUSHI #0x00000000 18696 @ 155471: ACCESS 18697 @ 155472: SELECT 3 18698 @ 155475: PUSHI #0x00000007 18699 @ 155480: ASSVAL 2720 Hash(x) = 0 %for x = 0, 1, max names 18700 @ 155481: LINE 2720 "regression-compile-tmp/pass1.imp" 18701 @ 155517: PUSH X 18702 @ 155520: PUSHI #0x00000001 18703 @ 155525: PUSHI #0x000007ff 18704 @ 155530: PUSHI #0x00000000 18705 @ 155535: FOR L_0003 18706 @ 155538: PUSH HASH 18707 @ 155541: PUSH X 18708 @ 155544: ACCESS 18709 @ 155545: PUSHI #0x00000000 18710 @ 155550: ASSVAL 18711 @ 155551: REPEAT L_0003 18712 @ 155554: LOCATE L_0004 2721 printstring(" Edinburgh IMP77 Compiler - Version ") 2722 ! printstring(" Preston IMP2020 Compiler - Version ") 18713 @ 155557: LINE 2721 "regression-compile-tmp/pass1.imp" 18714 @ 155593: PUSH PRINTSTRING 18715 @ 155596: PUSHS " Edinburgh IMP77 Compiler - Version " 18716 @ 155642: ASSPAR 18717 @ 155643: CALL 2723 printstring(version); newlines(2) 18718 @ 155644: LINE 2723 "regression-compile-tmp/pass1.imp" 18719 @ 155680: PUSH PRINTSTRING 18720 @ 155683: PUSH VERSION 18721 @ 155686: ASSPAR 18722 @ 155687: CALL 18723 @ 155688: LINE 2723 "regression-compile-tmp/pass1.imp" 18724 @ 155724: PUSH NEWLINES 18725 @ 155727: PUSHI #0x00000002 18726 @ 155732: ASSPAR 18727 @ 155733: CALL 2724 op('l', 0) 18728 @ 155734: LINE 2724 "regression-compile-tmp/pass1.imp" 18729 @ 155770: PUSH OP 18730 @ 155773: PUSHI #0x0000006c 18731 @ 155778: ASSPAR 18732 @ 155779: PUSHI #0x00000000 18733 @ 155784: ASSPAR 18734 @ 155785: CALL 2725 compile block(0, 0, max dict, 0, 0) 18735 @ 155786: LINE 2725 "regression-compile-tmp/pass1.imp" 18736 @ 155822: PUSH COMPILEBLOCK 18737 @ 155825: PUSHI #0x00000000 18738 @ 155830: ASSPAR 18739 @ 155831: PUSHI #0x00000000 18740 @ 155836: ASSPAR 18741 @ 155837: PUSHI #0x00001770 18742 @ 155842: ASSPAR 18743 @ 155843: PUSHI #0x00000000 18744 @ 155848: ASSPAR 18745 @ 155849: PUSHI #0x00000000 18746 @ 155854: ASSPAR 18747 @ 155855: CALL 2726 add char( nl ); ! {for bouncing off} 18748 @ 155856: LINE 2726 "regression-compile-tmp/pass1.imp" 18749 @ 155892: PUSH ADDCHAR 18750 @ 155895: PUSHI #0x0000000a 18751 @ 155900: ASSPAR 18752 @ 155901: CALL 2727 flush buffer( 0 ); ! flush if bp >= 0 2728 18753 @ 155902: LINE 2727 "regression-compile-tmp/pass1.imp" 18754 @ 155938: PUSH FLUSHBUFFER 18755 @ 155941: PUSHI #0x00000000 18756 @ 155946: ASSPAR 18757 @ 155947: CALL 2729 x = listing 18758 @ 155948: LINE 2729 "regression-compile-tmp/pass1.imp" 18759 @ 155984: PUSH X 18760 @ 155987: PUSHI #0x00000002 18761 @ 155992: ASSVAL 2730 newline 18762 @ 155993: LINE 2730 "regression-compile-tmp/pass1.imp" 18763 @ 156029: PUSH NEWLINE 18764 @ 156032: CALL 2731 %cycle 18765 @ 156033: LINE 2731 "regression-compile-tmp/pass1.imp" 18766 @ 156069: LOCATE L_0003 2732 %if faulty = 0 %start 18767 @ 156072: LINE 2732 "regression-compile-tmp/pass1.imp" 18768 @ 156108: PUSH FAULTY 18769 @ 156111: PUSHI #0x00000000 18770 @ 156116: JUMPIF # L_0007 2733 write(stats, 5) 18771 @ 156120: LINE 2733 "regression-compile-tmp/pass1.imp" 18772 @ 156156: PUSH WRITE 18773 @ 156159: PUSH STATS 18774 @ 156162: ASSPAR 18775 @ 156163: PUSHI #0x00000005 18776 @ 156168: ASSPAR 18777 @ 156169: CALL 2734 printstring(" Statements compiled") 18778 @ 156170: LINE 2734 "regression-compile-tmp/pass1.imp" 18779 @ 156206: PUSH PRINTSTRING 18780 @ 156209: PUSHS " Statements compiled" 18781 @ 156231: ASSPAR 18782 @ 156232: CALL 2735 %else 18783 @ 156233: LINE 2735 "regression-compile-tmp/pass1.imp" 18784 @ 156269: GOTO L_0006 18785 @ 156272: LOCATE L_0007 2736 printstring(" Program contains ") 18786 @ 156275: LINE 2736 "regression-compile-tmp/pass1.imp" 18787 @ 156311: PUSH PRINTSTRING 18788 @ 156314: PUSHS " Program contains " 18789 @ 156334: ASSPAR 18790 @ 156335: CALL 2737 write(faulty, 1) 18791 @ 156336: LINE 2737 "regression-compile-tmp/pass1.imp" 18792 @ 156372: PUSH WRITE 18793 @ 156375: PUSH FAULTY 18794 @ 156378: ASSPAR 18795 @ 156379: PUSHI #0x00000001 18796 @ 156384: ASSPAR 18797 @ 156385: CALL 2738 printstring(" fault") 18798 @ 156386: LINE 2738 "regression-compile-tmp/pass1.imp" 18799 @ 156422: PUSH PRINTSTRING 18800 @ 156425: PUSHS " fault" 18801 @ 156433: ASSPAR 18802 @ 156434: CALL 2739 printsymbol('s') %unless faulty = 1 18803 @ 156435: LINE 2739 "regression-compile-tmp/pass1.imp" 18804 @ 156471: PUSH FAULTY 18805 @ 156474: PUSHI #0x00000001 18806 @ 156479: JUMPIF = L_000a 18807 @ 156483: PUSH PRINTSYMBOL 18808 @ 156486: PUSHI #0x00000073 18809 @ 156491: ASSPAR 18810 @ 156492: CALL 18811 @ 156493: LOCATE L_000a 2740 %finish 18812 @ 156496: LINE 2740 "regression-compile-tmp/pass1.imp" 18813 @ 156532: LOCATE L_0006 2741 newline 18814 @ 156535: LINE 2741 "regression-compile-tmp/pass1.imp" 18815 @ 156571: PUSH NEWLINE 18816 @ 156574: CALL 2742 %exit %if x = report 18817 @ 156575: LINE 2742 "regression-compile-tmp/pass1.imp" 18818 @ 156611: PUSH X 18819 @ 156614: PUSHI #0x00000000 18820 @ 156619: JUMPIF # L_0007 18821 @ 156623: GOTO L_0004 18822 @ 156626: LOCATE L_0007 2743 x = report 18823 @ 156629: LINE 2743 "regression-compile-tmp/pass1.imp" 18824 @ 156665: PUSH X 18825 @ 156668: PUSHI #0x00000000 18826 @ 156673: ASSVAL 2744 selectoutput(report) 18827 @ 156674: LINE 2744 "regression-compile-tmp/pass1.imp" 18828 @ 156710: PUSH SELECTOUTPUT 18829 @ 156713: PUSHI #0x00000000 18830 @ 156718: ASSPAR 18831 @ 156719: CALL 2745 %repeat 2746 18832 @ 156720: LINE 2745 "regression-compile-tmp/pass1.imp" 18833 @ 156756: REPEAT L_0003 18834 @ 156759: LOCATE L_0004 2747 %if faulty # 0 %then %stop; ! try to flag to shell that we failed 2748 18835 @ 156762: LINE 2747 "regression-compile-tmp/pass1.imp" 18836 @ 156798: PUSH FAULTY 18837 @ 156801: PUSHI #0x00000000 18838 @ 156806: JUMPIF = L_0004 18839 @ 156810: STOP 18840 @ 156811: LOCATE L_0004 2749 %endofprogram 18841 @ 156814: LINE 2749 "regression-compile-tmp/pass1.imp" 18842 @ 156850: END _lev0id0 {lev=1 --> 0} 18843 @ 156851: END {lev=0 --> -1} 18844 @ 156852: