1 !! %option stack=40 2 !!!!!! 19-Feb-82!!!! 26/6/78 - IMPASEMS412 3 {Modified to run on new subsystem so that old supervisor can be supported} 4 5 %own %integer FREE SPACE = 65536 6 503 @ 4405: LINE 5 "regression-compile-tmp/asems412.imp" 504 @ 4444: PUSHI #0x00010000 505 @ 4449: DEF FREESPACE p1=V_0081 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 506 @ 4470: INIT 1 7 %OWNSTRING(4) P2VERSION = "4.13" 8 9 10 !!!!!!%CONTROL 3; ! CHECK SWITCHES AND STACK LIMIT 507 @ 4473: LINE 7 "regression-compile-tmp/asems412.imp" 508 @ 4512: PUSHS "4.13" 509 @ 4518: DEF P2VERSION p1=V_0082 a/tf=31 b/format=4 c/ostate=21 type=3 (string) form=1 (simple) special=3 (long-real) linkage=1 (own) spec=0 indirect=0 unass=1 510 @ 4539: INIT 1 11 %BEGIN; ! INTERDATA 7/32 IMP ASSEMBLER ! 12 13 ! SIZE CONSTANTS 14 511 @ 4542: LINE 11 "regression-compile-tmp/asems412.imp" 512 @ 4581: BEGIN _lev0id0 {lev=0 --> 1} 15 %CONSTINTEGER MAX ENVIRS = 13 16 ! %CONSTINTEGER MAX VARS = 490 513 @ 4582: LINE 15 "regression-compile-tmp/asems412.imp" 17 %CONSTINTEGER MAX LABELS = 80 514 @ 4621: LINE 17 "regression-compile-tmp/asems412.imp" 18 %CONSTINTEGER MAX DEPTH = 16 515 @ 4660: LINE 18 "regression-compile-tmp/asems412.imp" 19 %CONSTINTEGER MAX STACK = 31 516 @ 4699: LINE 19 "regression-compile-tmp/asems412.imp" 20 %CONSTINTEGER INIT GLA = 32; ! **USED LOCALLY AND IN PASS 3** 517 @ 4738: LINE 20 "regression-compile-tmp/asems412.imp" 21 %CONSTINTEGER LAST PERM = -24; ! MUST MATCH PERM TABLE IN PASS 3 22 23 ! STATIC GLA LAYOUT 24 ! 25 ! 0: STACK LIMIT 26 ! 4: @diag tables (zero if missing) 27 ! 8: IOCP switch base 28 ! 12: IOCP gla base 29 ! 16: IOCP code base 30 ! 20: IOCP base level locals 31 ! 24: -spare- 32 ! 28: -spare- 33 ! 34 35 518 @ 4777: LINE 21 "regression-compile-tmp/asems412.imp" 36 %CONSTINTEGER INITIAL FREE = 5120; ! INITIAL FREE STACK(BYTES) 519 @ 4816: LINE 36 "regression-compile-tmp/asems412.imp" 37 %CONSTINTEGER MIN FREE = 600; ! LOWER LIMIT ON FREE STACK SPACE 38 39 ! ON THE 32-BIT SERIES, EFFICIENT(RX1) BASE+DISPLACEMENT ADDRESSING 40 ! IS ONLY AVAILABLE FOR VALUES OF DISPLACEMENT < 16*1024. 41 ! ARRAYS WITH FIXED BOUNDS ARE PUT INTO THE STATIC STACK FRAME 42 ! UNTIL THE FRAME SIZE > 'MAX STATIC' LEAVING [16*1024 - MAX STATIC] 43 ! BYTES AVAILABLE FOR SCALARS. THERE MAY STILL BE PROBLEMS WITH 44 ! LARGE RECORDS (WHICH CAN CONTAIN ARRAYS). 45 520 @ 4855: LINE 37 "regression-compile-tmp/asems412.imp" 46 %CONSTINTEGER MAX STATIC = 13000 47 48 49 50 ! WORDLENGTH DEPENDENT VALUES: 51 521 @ 4894: LINE 46 "regression-compile-tmp/asems412.imp" 52 %CONSTINTEGER REGLEN=4; ! REGISTER LENGTH(IN 8-BIT BYTES) 53 54 55 56 ! COMPILER CONTROL OPTIONS (DEFAULT MARKED *) 522 @ 4933: LINE 52 "regression-compile-tmp/asems412.imp" 57 %CONSTINTEGER TEST SWITCH = 1; !* CHECK SWITCH JUMPS 523 @ 4972: LINE 57 "regression-compile-tmp/asems412.imp" 58 %CONSTINTEGER STKDIAG = 2; !* CHECK EXTENT OF STACK 524 @ 5011: LINE 58 "regression-compile-tmp/asems412.imp" 59 %CONSTINTEGER ARRAY DIAG = 4; !* CHECK ARRAY BOUNDS 525 @ 5050: LINE 59 "regression-compile-tmp/asems412.imp" 60 %CONSTINTEGER FORDIAG = 8; !* VALIDATE %FOR PARAMETERS 526 @ 5089: LINE 60 "regression-compile-tmp/asems412.imp" 61 %CONSTINTEGER ASS DIAG =16; !* TEST FOR TRUNCATION 527 @ 5128: LINE 61 "regression-compile-tmp/asems412.imp" 62 %CONSTINTEGER UNASS DIAG =32; !* CHECK FOR UNASSIGNED VARIABLES 63 ! 528 @ 5167: LINE 62 "regression-compile-tmp/asems412.imp" 64 %CONSTINTEGER TRUSTED =4096; ! ENABLE DIRTY OPTIMISATIONS 65 66 ! %CONTROL 0 GIVES TIGHTEST CODE (NO CHECKING AT ALL!) 67 68 69 70 71 ! COMPILER ERROR CODES 72 ! -------------------- 73 ! CODE ROUTINE MEANING 74 ! ---- ------- ------- 75 ! 1 RELEASE TOO MANY CALLS ON 'RELEASE' 76 ! 2 CHECK RELEASED TOO FEW CALLS ON 'RELEASE' 77 ! 3 HAZARD FAULTY PARAM. SUPPLIED TO HAZARD?? 78 ! 4 "" "" ???? 79 ! 5 RX, RI2, RI3 ILLEGAL ADDRESS FIELD GENERATE 80 ! 6 LOOKUP UNDEFINED NAME IN INTERMEDIATE COD 81 ! 7 STACK, SSTACK ETC DESCRIPTOR STACK OVERFLO 82 ! 8 SET BOTH, POP LHS, ASSIGN DESCRIPTOR STACK UNDERFLO 83 ! 9 AMAP FAULTY PARAM. SUPPLIED TO 'AMAP' 84 ! 10 LOAD 'REAL' AS ADDRESS? 85 ! 11 LOAD FLOATING REG. REQ'D 86 ! 12 " " 87 ! 13 COP FAULTY PARAM. SUPPLIED TO 'COP' 88 ! 14 ASSEMBLE DESCRIPTOR STACK NON-EMPTY AT 'O 89 ! 15 ASSIGN FAULTY PARAM. SUPPLIED TO 'ASSIGN' 90 ! 16 LOAD 'REAL', INTEGER REQ''D 91 ! 17 DESCRIPTOR NO FREE DESCRIPTORS 92 ! 18 DROP DESCRIPTOR NOT IN USE 93 ! 19 ASSEMBLE DANGLING DESCRIPTOR 94 95 ! REGISTERS 96 529 @ 5206: LINE 64 "regression-compile-tmp/asems412.imp" 97 %CONSTINTEGER R0 = 1 530 @ 5245: LINE 97 "regression-compile-tmp/asems412.imp" 98 %CONSTINTEGER R1 = 2 531 @ 5284: LINE 98 "regression-compile-tmp/asems412.imp" 99 %CONSTINTEGER R2 = 3 532 @ 5323: LINE 99 "regression-compile-tmp/asems412.imp" 100 %CONSTINTEGER R3 = 4 533 @ 5362: LINE 100 "regression-compile-tmp/asems412.imp" 101 %CONSTINTEGER R4 = 5 534 @ 5401: LINE 101 "regression-compile-tmp/asems412.imp" 102 %CONSTINTEGER P2 = 6 535 @ 5440: LINE 102 "regression-compile-tmp/asems412.imp" 103 %CONSTINTEGER P1 = 7 536 @ 5479: LINE 103 "regression-compile-tmp/asems412.imp" 104 %CONSTINTEGER R9 = 8 537 @ 5518: LINE 104 "regression-compile-tmp/asems412.imp" 105 %CONSTINTEGER R10 = 9 538 @ 5557: LINE 105 "regression-compile-tmp/asems412.imp" 106 %CONSTINTEGER R11 = 10 539 @ 5596: LINE 106 "regression-compile-tmp/asems412.imp" 107 %CONSTINTEGER R12 = 11 540 @ 5635: LINE 107 "regression-compile-tmp/asems412.imp" 108 %CONSTINTEGER LINK = 12 541 @ 5674: LINE 108 "regression-compile-tmp/asems412.imp" 109 %CONSTINTEGER FPR0 = 13 542 @ 5713: LINE 109 "regression-compile-tmp/asems412.imp" 110 %CONSTINTEGER FPR2 = 14 111 ! FPR4 = 15 112 ! FPR6 = 16 113 ! FPR8 = 17 114 ! FPR10= 18 115 ! FPR12= 19 543 @ 5752: LINE 110 "regression-compile-tmp/asems412.imp" 116 %CONSTINTEGER FPR14= 20 117 118 ! 21 - 40 ARE STORE EQUIVALENTS OF ABOVE 119 544 @ 5791: LINE 116 "regression-compile-tmp/asems412.imp" 120 %CONSTINTEGER R15 = 41 545 @ 5830: LINE 120 "regression-compile-tmp/asems412.imp" 121 %CONSTINTEGER GLA = 42 546 @ 5869: LINE 121 "regression-compile-tmp/asems412.imp" 122 %CONSTINTEGER WSP = 43 547 @ 5908: LINE 122 "regression-compile-tmp/asems412.imp" 123 %CONSTINTEGER CODE = 44 124 548 @ 5947: LINE 123 "regression-compile-tmp/asems412.imp" 125 %CONSTINTEGER ANY = 45 549 @ 5986: LINE 125 "regression-compile-tmp/asems412.imp" 126 %CONSTINTEGER ANY0 = 46 550 @ 6025: LINE 126 "regression-compile-tmp/asems412.imp" 127 %CONSTINTEGER ANYF = 47 551 @ 6064: LINE 127 "regression-compile-tmp/asems412.imp" 128 %CONSTINTEGER PARAM= 48 129 552 @ 6103: LINE 128 "regression-compile-tmp/asems412.imp" 130 %CONSTINTEGER STORE= 20 131 553 @ 6142: LINE 130 "regression-compile-tmp/asems412.imp" 132 %CONSTBYTEINTEGERARRAY BASE REG(0:5) = R0, R15, R9, R10, R11, R12 554 @ 6181: LINE 132 "regression-compile-tmp/asems412.imp" 555 @ 6220: PUSHI #0x00000000 556 @ 6225: PUSHI #0x00000005 557 @ 6230: BOUNDS 558 @ 6231: DEF BASEREG p1=V_0083 a/tf=1b b/format=2 c/ostate=112 type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0 559 @ 6250: PUSHI #0x00000001 560 @ 6255: INIT 1 561 @ 6258: PUSHI #0x00000029 562 @ 6263: INIT 1 563 @ 6266: PUSHI #0x00000008 564 @ 6271: INIT 1 565 @ 6274: PUSHI #0x00000009 566 @ 6279: INIT 1 567 @ 6282: PUSHI #0x0000000a 568 @ 6287: INIT 1 569 @ 6290: PUSHI #0x0000000b 570 @ 6295: INIT 1 133 %CONSTBYTEINTEGERARRAY ACTUAL(0:44) = 0, 134 0, 1, 2, 3, 4, 5, 6, 9, 135 10,11,12, 8, 136 0, 2, 4, 6, 8,10,12,14, 137 0(20), 15, 13, 7, 14 138 139 140 ! DATA FORMS 141 142 ! EXTERNAL 143 571 @ 6298: LINE 133 "regression-compile-tmp/asems412.imp" 572 @ 6337: PUSHI #0x00000000 573 @ 6342: PUSHI #0x0000002c 574 @ 6347: BOUNDS 575 @ 6348: DEF ACTUAL p1=V_0084 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 576 @ 6366: PUSHI #0x00000000 577 @ 6371: INIT 1 578 @ 6374: PUSHI #0x00000000 579 @ 6379: INIT 1 580 @ 6382: PUSHI #0x00000001 581 @ 6387: INIT 1 582 @ 6390: PUSHI #0x00000002 583 @ 6395: INIT 1 584 @ 6398: PUSHI #0x00000003 585 @ 6403: INIT 1 586 @ 6406: PUSHI #0x00000004 587 @ 6411: INIT 1 588 @ 6414: PUSHI #0x00000005 589 @ 6419: INIT 1 590 @ 6422: PUSHI #0x00000006 591 @ 6427: INIT 1 592 @ 6430: PUSHI #0x00000009 593 @ 6435: INIT 1 594 @ 6438: PUSHI #0x0000000a 595 @ 6443: INIT 1 596 @ 6446: PUSHI #0x0000000b 597 @ 6451: INIT 1 598 @ 6454: PUSHI #0x0000000c 599 @ 6459: INIT 1 600 @ 6462: PUSHI #0x00000008 601 @ 6467: INIT 1 602 @ 6470: PUSHI #0x00000000 603 @ 6475: INIT 1 604 @ 6478: PUSHI #0x00000002 605 @ 6483: INIT 1 606 @ 6486: PUSHI #0x00000004 607 @ 6491: INIT 1 608 @ 6494: PUSHI #0x00000006 609 @ 6499: INIT 1 610 @ 6502: PUSHI #0x00000008 611 @ 6507: INIT 1 612 @ 6510: PUSHI #0x0000000a 613 @ 6515: INIT 1 614 @ 6518: PUSHI #0x0000000c 615 @ 6523: INIT 1 616 @ 6526: PUSHI #0x0000000e 617 @ 6531: INIT 1 618 @ 6534: PUSHI #0x00000000 619 @ 6539: INIT 20 620 @ 6542: PUSHI #0x0000000f 621 @ 6547: INIT 1 622 @ 6550: PUSHI #0x0000000d 623 @ 6555: INIT 1 624 @ 6558: PUSHI #0x00000007 625 @ 6563: INIT 1 626 @ 6566: PUSHI #0x0000000e 627 @ 6571: INIT 1 144 %CONSTINTEGER SWITCH = 6 628 @ 6574: LINE 144 "regression-compile-tmp/asems412.imp" 145 %CONSTINTEGER ARRAY = 11 629 @ 6613: LINE 145 "regression-compile-tmp/asems412.imp" 146 %CONSTINTEGER ARRAYNAME = 12 147 148 ! INTERNAL 149 630 @ 6652: LINE 146 "regression-compile-tmp/asems412.imp" 150 %CONSTINTEGER CONSTANT = 0 631 @ 6691: LINE 150 "regression-compile-tmp/asems412.imp" 151 %CONSTINTEGER V IN R = 1 632 @ 6730: LINE 151 "regression-compile-tmp/asems412.imp" 152 %CONSTINTEGER A IN S = 2 633 @ 6769: LINE 152 "regression-compile-tmp/asems412.imp" 153 %CONSTINTEGER V IN S = 3 634 @ 6808: LINE 153 "regression-compile-tmp/asems412.imp" 154 %CONSTINTEGER A IN REC = 4 635 @ 6847: LINE 154 "regression-compile-tmp/asems412.imp" 155 %CONSTINTEGER V IN REC = 5 636 @ 6886: LINE 155 "regression-compile-tmp/asems412.imp" 156 %CONSTINTEGER AV IN S = 6 637 @ 6925: LINE 156 "regression-compile-tmp/asems412.imp" 157 %CONSTINTEGER AV IN REC= 7 158 159 ! LABEL CONSTANTS 160 638 @ 6964: LINE 157 "regression-compile-tmp/asems412.imp" 161 %CONSTINTEGER DEFINE = 0 639 @ 7003: LINE 161 "regression-compile-tmp/asems412.imp" 162 %CONSTINTEGER REDEFINE = 1 163 164 ! DATA TYPES 165 640 @ 7042: LINE 162 "regression-compile-tmp/asems412.imp" 166 %CONSTINTEGER INTEGER = 1 641 @ 7081: LINE 166 "regression-compile-tmp/asems412.imp" 167 %CONSTINTEGER BYTE = 2 642 @ 7120: LINE 167 "regression-compile-tmp/asems412.imp" 168 %CONSTINTEGER SHORT = 3 643 @ 7159: LINE 168 "regression-compile-tmp/asems412.imp" 169 %CONSTINTEGER STRING = 4 644 @ 7198: LINE 169 "regression-compile-tmp/asems412.imp" 170 %CONSTINTEGER RECORD = 5 645 @ 7237: LINE 170 "regression-compile-tmp/asems412.imp" 171 %CONSTINTEGER REALS = 6 646 @ 7276: LINE 171 "regression-compile-tmp/asems412.imp" 172 %CONSTINTEGER LONG = 7 173 647 @ 7315: LINE 172 "regression-compile-tmp/asems412.imp" 174 %CONSTINTEGER UNSIGNED HALFWORD = 255; ! INTERNAL TO PASS 2 175 176 ! OWN INFO 177 178 ! %CONSTINTEGER OWN = 1 648 @ 7354: LINE 174 "regression-compile-tmp/asems412.imp" 179 %CONSTINTEGER CON = 2 649 @ 7393: LINE 179 "regression-compile-tmp/asems412.imp" 180 %CONSTINTEGER PERMRT = 7 181 182 ! PROC INFO 183 650 @ 7432: LINE 180 "regression-compile-tmp/asems412.imp" 184 %CONSTINTEGER FORMATS = '2' 651 @ 7471: LINE 184 "regression-compile-tmp/asems412.imp" 185 %CONSTINTEGER PROCEDURE = '1' 652 @ 7510: LINE 185 "regression-compile-tmp/asems412.imp" 186 %CONSTINTEGER SPEC = '0' 187 188 ! OBJECT FILE DIRECTIVES 189 653 @ 7549: LINE 186 "regression-compile-tmp/asems412.imp" 190 %CONSTINTEGER START = 1 654 @ 7588: LINE 190 "regression-compile-tmp/asems412.imp" 191 %CONSTINTEGER LOAD CODE = 2 655 @ 7627: LINE 191 "regression-compile-tmp/asems412.imp" 192 %CONSTINTEGER LOAD GLA = 3 656 @ 7666: LINE 192 "regression-compile-tmp/asems412.imp" 193 %CONSTINTEGER LINE FLAG = 4 657 @ 7705: LINE 193 "regression-compile-tmp/asems412.imp" 194 %CONSTINTEGER C END = 5 195 ! %CONSTINTEGER L DATA = 6 658 @ 7744: LINE 194 "regression-compile-tmp/asems412.imp" 196 %CONSTINTEGER DLINE = 10 659 @ 7783: LINE 196 "regression-compile-tmp/asems412.imp" 197 %CONSTINTEGER DIAGS = 11 198 199 ! DIRECTIVE FILE COMMANDS 200 660 @ 7822: LINE 197 "regression-compile-tmp/asems412.imp" 201 %CONSTINTEGER TAG DEF = 1 661 @ 7861: LINE 201 "regression-compile-tmp/asems412.imp" 202 %CONSTINTEGER C REF = 2; ! CONDITIONAL JUMP REF. 662 @ 7900: LINE 202 "regression-compile-tmp/asems412.imp" 203 %CONSTINTEGER J REF = 3; ! UNCONDITIONAL JUMP REF. 663 @ 7939: LINE 203 "regression-compile-tmp/asems412.imp" 204 %CONSTINTEGER R REF = 4; ! ROUTINE REF. (UNCONDITIONAL) 664 @ 7978: LINE 204 "regression-compile-tmp/asems412.imp" 205 %CONSTINTEGER P REF = 5; ! PERM REF. (UNCONDITIONAL) 665 @ 8017: LINE 205 "regression-compile-tmp/asems412.imp" 206 %CONSTINTEGER PATCH GLA = 6 666 @ 8056: LINE 206 "regression-compile-tmp/asems412.imp" 207 %CONSTINTEGER PATCHCODE = 7 667 @ 8095: LINE 207 "regression-compile-tmp/asems412.imp" 208 %CONSTINTEGER D END = 8; ! END OF DIRECTIVES FILE 209 210 ! FILE DEFINITION 211 668 @ 8134: LINE 208 "regression-compile-tmp/asems412.imp" 212 %CONSTINTEGER INSTREAM = 2 669 @ 8173: LINE 212 "regression-compile-tmp/asems412.imp" 213 %CONSTINTEGER REPORT = 0; ! ...ERROR MESSAGE STREAM 670 @ 8212: LINE 213 "regression-compile-tmp/asems412.imp" 214 %CONSTINTEGER LIST = 1 671 @ 8251: LINE 214 "regression-compile-tmp/asems412.imp" 215 %CONSTINTEGER OBJECT = 2 672 @ 8290: LINE 215 "regression-compile-tmp/asems412.imp" 216 %CONSTINTEGER DIRECT = 3 217 218 219 ! SYMBOLS 220 673 @ 8329: LINE 216 "regression-compile-tmp/asems412.imp" 221 %CONSTINTEGER COMMA = ',' 674 @ 8368: LINE 221 "regression-compile-tmp/asems412.imp" 222 %CONSTINTEGER MINUS = '-' 223 224 ! PERM ROUTINES (FPR4, FPR2,P1,P2,R4, R3,R2,R1,R0) 225 675 @ 8407: LINE 222 "regression-compile-tmp/asems412.imp" 226 %CONSTINTEGER MONITOR = X'1EF01' 676 @ 8446: LINE 226 "regression-compile-tmp/asems412.imp" 227 %CONSTINTEGER R COPY = X'00902' 677 @ 8485: LINE 227 "regression-compile-tmp/asems412.imp" 228 %CONSTINTEGER R CLEAR = X'00903' 678 @ 8524: LINE 228 "regression-compile-tmp/asems412.imp" 229 %CONSTINTEGER SWJUMP = X'1EF04' 679 @ 8563: LINE 229 "regression-compile-tmp/asems412.imp" 230 %CONSTINTEGER ASET = X'06F05' 680 @ 8602: LINE 230 "regression-compile-tmp/asems412.imp" 231 %CONSTINTEGER IEXP = X'00B07' 681 @ 8641: LINE 231 "regression-compile-tmp/asems412.imp" 232 %CONSTINTEGER REXP = X'18108' 682 @ 8680: LINE 232 "regression-compile-tmp/asems412.imp" 233 %CONSTINTEGER ALLOC = X'02E09' 683 @ 8719: LINE 233 "regression-compile-tmp/asems412.imp" 234 %CONSTINTEGER SMOVE = X'0090B', CONC1 = X'0090B' 684 @ 8758: LINE 234 "regression-compile-tmp/asems412.imp" 235 %CONSTINTEGER CONC2 = X'0630C' 685 @ 8797: LINE 235 "regression-compile-tmp/asems412.imp" 236 %CONSTINTEGER SCOMP = X'06B0D' 686 @ 8836: LINE 236 "regression-compile-tmp/asems412.imp" 237 %CONSTINTEGER RSYM = X'1EF0E' 238 ! PERM ITEMS TO PERFORM VARIOUS RUN-TIME CHECKS 687 @ 8875: LINE 237 "regression-compile-tmp/asems412.imp" 239 %CONSTINTEGER EXBUNASS = X'01112' 688 @ 8914: LINE 239 "regression-compile-tmp/asems412.imp" 240 %CONSTINTEGER EXB = X'00113' 689 @ 8953: LINE 240 "regression-compile-tmp/asems412.imp" 241 %CONSTINTEGER A REF = X'00314' 690 @ 8992: LINE 241 "regression-compile-tmp/asems412.imp" 242 %CONSTINTEGER STRINGASS = X'00015'; ! ASSIGN TEST FOR STRINGS 691 @ 9031: LINE 242 "regression-compile-tmp/asems412.imp" 243 %CONSTINTEGER ASSTH = X'00016'; ! ASSIGN TEST FOR SHORTS 692 @ 9070: LINE 243 "regression-compile-tmp/asems412.imp" 244 %CONSTINTEGER ASSTB = X'00017'; ! ASSIGN TEST FOR BYTES 693 @ 9109: LINE 244 "regression-compile-tmp/asems412.imp" 245 %CONSTINTEGER FORTEST = X'1EF18' 246 247 ! FIXED GLA WORDS 248 249 ! (WORD 0 IS STACK LIMIT POINTER) 694 @ 9148: LINE 245 "regression-compile-tmp/asems412.imp" 250 %CONSTINTEGER SIGNAL EP = 4; ! ADDRESS OF %SIGNAL 251 252 253 ! NOTEWORTHY CODE BLOCK DISPLACEMENTS 254 695 @ 9187: LINE 250 "regression-compile-tmp/asems412.imp" 255 %CONSTINTEGER UNASS PAT = 16; ! UNASSIGNED VARIABLE PATTERN (80808080) 256 257 ! OPERATIONS 258 696 @ 9226: LINE 255 "regression-compile-tmp/asems412.imp" 259 %CONSTINTEGER NOT = 1 697 @ 9265: LINE 259 "regression-compile-tmp/asems412.imp" 260 %CONSTINTEGER NEG = 2 698 @ 9304: LINE 260 "regression-compile-tmp/asems412.imp" 261 %CONSTINTEGER ADD = 3 699 @ 9343: LINE 261 "regression-compile-tmp/asems412.imp" 262 %CONSTINTEGER SUB = 4 700 @ 9382: LINE 262 "regression-compile-tmp/asems412.imp" 263 %CONSTINTEGER MUL = 6 701 @ 9421: LINE 263 "regression-compile-tmp/asems412.imp" 264 %CONSTINTEGER DIV = 7 702 @ 9460: LINE 264 "regression-compile-tmp/asems412.imp" 265 %CONSTINTEGER AND = 8 703 @ 9499: LINE 265 "regression-compile-tmp/asems412.imp" 266 %CONSTINTEGER IOR = 9 704 @ 9538: LINE 266 "regression-compile-tmp/asems412.imp" 267 %CONSTINTEGER XOR = 10 705 @ 9577: LINE 267 "regression-compile-tmp/asems412.imp" 268 %CONSTINTEGER LSH = 11 706 @ 9616: LINE 268 "regression-compile-tmp/asems412.imp" 269 %CONSTINTEGER RSH = 12 707 @ 9655: LINE 269 "regression-compile-tmp/asems412.imp" 270 %CONSTINTEGER EXP = 13 708 @ 9694: LINE 270 "regression-compile-tmp/asems412.imp" 271 %CONSTINTEGER CONC= 14 709 @ 9733: LINE 271 "regression-compile-tmp/asems412.imp" 272 %CONSTINTEGER SADD= 15; ! SPECIAL ADD (V=V+??) 710 @ 9772: LINE 272 "regression-compile-tmp/asems412.imp" 273 %CONSTINTEGER RDIV= 16 711 @ 9811: LINE 273 "regression-compile-tmp/asems412.imp" 274 %CONSTINTEGER REM = 17 275 276 ! OPCODES 277 712 @ 9850: LINE 274 "regression-compile-tmp/asems412.imp" 278 %CONSTINTEGER LIS = X'2400', LCS = X'2500' 713 @ 9889: LINE 278 "regression-compile-tmp/asems412.imp" 279 %CONSTINTEGER LR = X'0800' 714 @ 9928: LINE 279 "regression-compile-tmp/asems412.imp" 280 %CONSTINTEGER LH = X'4800', STH = X'4000' 715 @ 9967: LINE 280 "regression-compile-tmp/asems412.imp" 281 %CONSTINTEGER LHI = X'C800' 716 @ 10006: LINE 281 "regression-compile-tmp/asems412.imp" 282 %CONSTINTEGER LM = X'D100', STM = X'D000' 717 @ 10045: LINE 282 "regression-compile-tmp/asems412.imp" 283 %CONSTINTEGER LHL = X'7300' 284 285 718 @ 10084: LINE 283 "regression-compile-tmp/asems412.imp" 286 %CONSTINTEGER AIS=X'2600', AHI=X'CA00', AH=X'4A00', AR=X'0A00' 719 @ 10123: LINE 286 "regression-compile-tmp/asems412.imp" 287 %CONSTINTEGER SIS=X'2700', SHI=X'CB00', SH=X'4B00', SR=X'0B00' 720 @ 10162: LINE 287 "regression-compile-tmp/asems412.imp" 288 %CONSTINTEGER AM = X'5100' 721 @ 10201: LINE 288 "regression-compile-tmp/asems412.imp" 289 %CONSTINTEGER AHM = X'6100' 290 722 @ 10240: LINE 289 "regression-compile-tmp/asems412.imp" 291 %CONSTINTEGER C = X'5900', CH =X'4900', CI =X'F900', CR =X'0900' 723 @ 10279: LINE 291 "regression-compile-tmp/asems412.imp" 292 %CONSTINTEGER CL = X'5500', CLH=X'4500', CLI=X'F500', CLR=X'0500' 724 @ 10318: LINE 292 "regression-compile-tmp/asems412.imp" 293 %CONSTINTEGER CHI=X'C900' 725 @ 10357: LINE 293 "regression-compile-tmp/asems412.imp" 294 %CONSTINTEGER CLHI=X'C500' 726 @ 10396: LINE 294 "regression-compile-tmp/asems412.imp" 295 %CONSTINTEGER CHVR = X'1200' 296 297 298 299 727 @ 10435: LINE 295 "regression-compile-tmp/asems412.imp" 300 %CONSTINTEGER TI = X'F300', THI = X'C300' 301 728 @ 10474: LINE 300 "regression-compile-tmp/asems412.imp" 302 %CONSTINTEGER LBR = X'9300', LB = X'D300', STB = X'D200' 729 @ 10513: LINE 302 "regression-compile-tmp/asems412.imp" 303 %CONSTINTEGER CLB = X'D400' 304 730 @ 10552: LINE 303 "regression-compile-tmp/asems412.imp" 305 %CONSTINTEGER SRA = X'EE00' 306 731 @ 10591: LINE 305 "regression-compile-tmp/asems412.imp" 307 %CONSTINTEGER BAL = X'4100' 732 @ 10630: LINE 307 "regression-compile-tmp/asems412.imp" 308 %CONSTINTEGER JUMP= 12 733 @ 10669: LINE 308 "regression-compile-tmp/asems412.imp" 309 %CONSTINTEGER BFCR= X'0300' 310 734 @ 10708: LINE 309 "regression-compile-tmp/asems412.imp" 311 %CONSTINTEGER SVC = X'E100' 735 @ 10747: LINE 311 "regression-compile-tmp/asems412.imp" 312 %CONSTINTEGER LME = X'7200', STME= X'7100' 736 @ 10786: LINE 312 "regression-compile-tmp/asems412.imp" 313 %CONSTINTEGER LER = X'2800' 737 @ 10825: LINE 313 "regression-compile-tmp/asems412.imp" 314 %CONSTINTEGER LE = X'6800', STE = X'6000' 738 @ 10864: LINE 314 "regression-compile-tmp/asems412.imp" 315 %CONSTINTEGER CER = X'2900' 739 @ 10903: LINE 315 "regression-compile-tmp/asems412.imp" 316 %CONSTINTEGER CE = X'6900' 740 @ 10942: LINE 316 "regression-compile-tmp/asems412.imp" 317 %CONSTINTEGER AER=X'2A00', SER=X'2B00', MER=X'2C00', DER=X'2D00' 741 @ 10981: LINE 317 "regression-compile-tmp/asems412.imp" 318 %CONSTINTEGER AE =X'6A00', SE =X'6B00', ME =X'6C00', DE =X'6D00' 742 @ 11020: LINE 318 "regression-compile-tmp/asems412.imp" 319 %CONSTINTEGER FXR = X'2E00', FLR = X'2F00' 320 321 ! FULLWORD OPCODES 743 @ 11059: LINE 319 "regression-compile-tmp/asems412.imp" 322 %CONSTINTEGER LW = X'5800', ST = X'5000' 744 @ 11098: LINE 322 "regression-compile-tmp/asems412.imp" 323 %CONSTINTEGER LI = X'F800' 745 @ 11137: LINE 323 "regression-compile-tmp/asems412.imp" 324 %CONSTINTEGER LA = X'E600' 325 746 @ 11176: LINE 324 "regression-compile-tmp/asems412.imp" 326 %CONSTINTEGER SLLS= X'1100' 747 @ 11215: LINE 326 "regression-compile-tmp/asems412.imp" 327 %CONSTINTEGER SRLS= X'1000' 748 @ 11254: LINE 327 "regression-compile-tmp/asems412.imp" 328 %CONSTINTEGER SLL = X'ED00' 749 @ 11293: LINE 328 "regression-compile-tmp/asems412.imp" 329 %CONSTINTEGER SRL = X'EC00' 330 750 @ 11332: LINE 329 "regression-compile-tmp/asems412.imp" 331 %CONSTINTEGER AW = X'5A00' 751 @ 11371: LINE 331 "regression-compile-tmp/asems412.imp" 332 %CONSTINTEGER SW = X'5B00' 752 @ 11410: LINE 332 "regression-compile-tmp/asems412.imp" 333 %CONSTINTEGER AI = X'FA00' 753 @ 11449: LINE 333 "regression-compile-tmp/asems412.imp" 334 %CONSTINTEGER SI = X'FB00' 335 754 @ 11488: LINE 334 "regression-compile-tmp/asems412.imp" 336 %CONSTINTEGER MW = X'5C00' 755 @ 11527: LINE 336 "regression-compile-tmp/asems412.imp" 337 %CONSTINTEGER MR = X'1C00' 756 @ 11566: LINE 337 "regression-compile-tmp/asems412.imp" 338 %CONSTINTEGER DW = X'5D00' 757 @ 11605: LINE 338 "regression-compile-tmp/asems412.imp" 339 %CONSTINTEGER DR = X'1D00' 340 758 @ 11644: LINE 339 "regression-compile-tmp/asems412.imp" 341 %CONSTINTEGER OR=X'0600', OW=X'5600', OH=X'4600', OI=X'F600' 759 @ 11683: LINE 341 "regression-compile-tmp/asems412.imp" 342 %CONSTINTEGER XR=X'0700', XW=X'5700', XH=X'4700', XI=X'F700' 760 @ 11722: LINE 342 "regression-compile-tmp/asems412.imp" 343 %CONSTINTEGER NR=X'0400', NW=X'5400', NH=X'4400', NI=X'F400' 761 @ 11761: LINE 343 "regression-compile-tmp/asems412.imp" 344 %CONSTINTEGER OHI = X'C600', XHI = X'C700', NHI = X'C400' 345 346 762 @ 11800: LINE 344 "regression-compile-tmp/asems412.imp" 347 %RECORDFORMAT VARFM(%INTEGER DISP, %SHORTINTEGER FORMAT, EXTRA, %C 348 ID, LENGTH, %BYTEINTEGER BASE, TYPE, FORM, SIZE) 763 @ 11839: LINE 347 "regression-compile-tmp/asems412.imp" 764 @ 11878: DEF VARFM p1=V_0085 a/tf=44 b/format=85 c/ostate=0 type=4 (record) form=4 (record-format) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 765 @ 11895: START ( RECORDFORMAT 766 @ 11896: DEF DISP 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 767 @ 11912: DEF FORMAT p1=V_0000 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 768 @ 11930: DEF EXTRA p1=V_0000 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 769 @ 11947: DEF ID p1=V_0000 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 770 @ 11961: DEF LENGTH p1=V_0000 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 771 @ 11979: DEF BASE p1=V_0000 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 772 @ 11995: DEF TYPE p1=V_0000 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 773 @ 12011: DEF FORM p1=V_0000 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 774 @ 12027: DEF SIZE p1=V_0000 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 775 @ 12043: FINISH ) 349 %RECORDFORMAT STACKFM(%INTEGER DISP, FORMAT, EXTRA, LENGTH, DV, %C 350 %SHORTINTEGER BASE, LOP,TYPE, FORM, %C 351 %RECORD(STACKFM)%NAME LINK) 776 @ 12044: LINE 349 "regression-compile-tmp/asems412.imp" 777 @ 12083: DEF STACKFM p1=V_0086 a/tf=44 b/format=86 c/ostate=0 type=4 (record) form=4 (record-format) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 778 @ 12102: START ( RECORDFORMAT 779 @ 12103: DEF DISP 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 780 @ 12119: 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 781 @ 12137: DEF EXTRA 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 782 @ 12154: DEF LENGTH 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 783 @ 12172: DEF DV 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 784 @ 12186: DEF BASE p1=V_0000 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 785 @ 12202: DEF LOP p1=V_0000 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 786 @ 12217: DEF TYPE p1=V_0000 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 787 @ 12233: DEF FORM p1=V_0000 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 788 @ 12249: DEF LINK p1=V_0000 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 789 @ 12265: FINISH ) 352 %RECORDFORMAT SPTFM(%RECORD(STACKFM)%NAME V) 790 @ 12266: LINE 352 "regression-compile-tmp/asems412.imp" 791 @ 12305: DEF SPTFM p1=V_0087 a/tf=44 b/format=87 c/ostate=0 type=4 (record) form=4 (record-format) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 792 @ 12322: START ( RECORDFORMAT 793 @ 12323: DEF V p1=V_0000 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 794 @ 12336: FINISH ) 353 %RECORDFORMAT LABELFM(%SHORTINTEGER ID, TAG, %C 354 %BYTEINTEGER REG, BASE, %C 355 %INTEGER LIMIT, DISP) 795 @ 12337: LINE 353 "regression-compile-tmp/asems412.imp" 796 @ 12376: DEF LABELFM p1=V_0088 a/tf=44 b/format=88 c/ostate=0 type=4 (record) form=4 (record-format) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 797 @ 12395: START ( RECORDFORMAT 798 @ 12396: DEF ID p1=V_0000 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 799 @ 12410: DEF TAG p1=V_0000 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 800 @ 12425: DEF REG p1=V_0000 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 801 @ 12440: DEF BASE p1=V_0000 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 802 @ 12456: DEF LIMIT 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 803 @ 12473: DEF DISP 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 804 @ 12489: FINISH ) 356 %RECORDFORMAT USEFM(%INTEGER DISP, CA, %C 357 %SHORTINTEGER BASE, %C 358 %BYTEINTEGER TYPE,FORM) 805 @ 12490: LINE 356 "regression-compile-tmp/asems412.imp" 806 @ 12529: DEF USEFM p1=V_0089 a/tf=44 b/format=89 c/ostate=0 type=4 (record) form=4 (record-format) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 807 @ 12546: START ( RECORDFORMAT 808 @ 12547: DEF DISP 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 809 @ 12563: DEF CA 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 810 @ 12577: DEF BASE p1=V_0000 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 811 @ 12593: DEF TYPE p1=V_0000 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 812 @ 12609: DEF FORM p1=V_0000 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 813 @ 12625: FINISH ) 359 %RECORDFORMAT ENVFM(%INTEGER LABEL, LIMEN, %C 360 %RECORD(USEFM)%ARRAY E(1:40)) 361 362 ! DATA ARRAYS 363 814 @ 12626: LINE 359 "regression-compile-tmp/asems412.imp" 815 @ 12665: DEF ENVFM p1=V_008a a/tf=44 b/format=8a c/ostate=0 type=4 (record) form=4 (record-format) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 816 @ 12682: START ( RECORDFORMAT 817 @ 12683: DEF LABEL 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 818 @ 12700: DEF LIMEN 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 819 @ 12717: DEF E p1=V_0000 a/tf=4b b/format=89 c/ostate=100 type=4 (record) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 820 @ 12730: PUSHI #0x00000001 821 @ 12735: PUSHI #0x00000028 822 @ 12740: DIM 0001 0001 823 @ 12746: FINISH ) 364 %RECORD(USEFM)%ARRAY USE(1 : 44);! REGISTER USAGE 824 @ 12747: LINE 364 "regression-compile-tmp/asems412.imp" 825 @ 12786: DEF USE p1=V_008b a/tf=4b b/format=89 c/ostate=100 type=4 (record) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 826 @ 12801: PUSHI #0x00000001 827 @ 12806: PUSHI #0x0000002c 828 @ 12811: DIM 0001 0001 365 %RECORD(USEFM) KNOWN 829 @ 12817: LINE 365 "regression-compile-tmp/asems412.imp" 830 @ 12856: DEF KNOWN p1=V_008c a/tf=41 b/format=89 c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 366 %INTEGERARRAY ACTIVITY(0 : 44);! REGISTER ACTIVITY 831 @ 12873: LINE 366 "regression-compile-tmp/asems412.imp" 832 @ 12912: DEF ACTIVITY p1=V_008d 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 833 @ 12932: PUSHI #0x00000000 834 @ 12937: PUSHI #0x0000002c 835 @ 12942: DIM 0001 0001 367 %RECORD(LABELFM)%ARRAY LABELS(1 : MAX LABELS) 836 @ 12948: LINE 367 "regression-compile-tmp/asems412.imp" 837 @ 12987: DEF LABELS p1=V_008e a/tf=4b b/format=88 c/ostate=100 type=4 (record) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 838 @ 13005: PUSHI #0x00000001 839 @ 13010: PUSHI #0x00000050 840 @ 13015: DIM 0001 0001 368 %RECORD(SPTFM)%ARRAY STACKED(1 : MAX DEPTH);! MAIN STACK 841 @ 13021: LINE 368 "regression-compile-tmp/asems412.imp" 842 @ 13060: DEF STACKED p1=V_008f a/tf=4b b/format=87 c/ostate=100 type=4 (record) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 843 @ 13079: PUSHI #0x00000001 844 @ 13084: PUSHI #0x00000010 845 @ 13089: DIM 0001 0001 369 %RECORD(STACKFM)%ARRAY STAK(0 : MAX STACK); ! STACK ELEMENTS 846 @ 13095: LINE 369 "regression-compile-tmp/asems412.imp" 847 @ 13134: DEF STAK p1=V_0090 a/tf=4b b/format=86 c/ostate=100 type=4 (record) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 848 @ 13150: PUSHI #0x00000000 849 @ 13155: PUSHI #0x0000001f 850 @ 13160: DIM 0001 0001 370 %INTEGERARRAY USED(0:20) 851 @ 13166: LINE 370 "regression-compile-tmp/asems412.imp" 852 @ 13205: DEF USED p1=V_0091 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 853 @ 13221: PUSHI #0x00000000 854 @ 13226: PUSHI #0x00000014 855 @ 13231: DIM 0001 0001 371 %RECORDFORMAT DFM(%RECORD(STACKFM)%NAME D, %RECORD(DFM)%NAME LINK) 856 @ 13237: LINE 371 "regression-compile-tmp/asems412.imp" 857 @ 13276: DEF DFM p1=V_0092 a/tf=44 b/format=92 c/ostate=0 type=4 (record) form=4 (record-format) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 858 @ 13291: START ( RECORDFORMAT 859 @ 13292: DEF D p1=V_0000 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 860 @ 13305: DEF LINK p1=V_0000 a/tf=42 b/format=92 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 861 @ 13321: FINISH ) 372 %RECORD(STACKFM)%NAME DESC ASL 862 @ 13322: LINE 372 "regression-compile-tmp/asems412.imp" 863 @ 13361: DEF DESCASL p1=V_0093 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 373 %RECORD(DFM)%ARRAY DLIST(0:MAX STACK) 864 @ 13380: LINE 373 "regression-compile-tmp/asems412.imp" 865 @ 13419: DEF DLIST p1=V_0094 a/tf=4b b/format=92 c/ostate=100 type=4 (record) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 866 @ 13436: PUSHI #0x00000000 867 @ 13441: PUSHI #0x0000001f 868 @ 13446: DIM 0001 0001 374 %RECORD(DFM)%NAME DASL 869 @ 13452: LINE 374 "regression-compile-tmp/asems412.imp" 870 @ 13491: DEF DASL p1=V_0095 a/tf=42 b/format=92 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 375 %RECORD(DFM) USING 376 871 @ 13507: LINE 375 "regression-compile-tmp/asems412.imp" 872 @ 13546: DEF USING p1=V_0096 a/tf=41 b/format=92 c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 377 %OWNBYTEINTEGERARRAY VBUF(1:10) 873 @ 13563: LINE 377 "regression-compile-tmp/asems412.imp" 874 @ 13602: PUSHI #0x00000001 875 @ 13607: PUSHI #0x0000000a 876 @ 13612: BOUNDS 877 @ 13613: DEF VBUF p1=V_0097 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 878 @ 13629: INIT 10 378 %OWNINTEGER VP = 0 879 @ 13632: LINE 378 "regression-compile-tmp/asems412.imp" 880 @ 13671: PUSHI #0x00000000 881 @ 13676: DEF VP 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 882 @ 13690: INIT 1 379 %OWNINTEGER XLEVEL = 0 883 @ 13693: LINE 379 "regression-compile-tmp/asems412.imp" 884 @ 13732: PUSHI #0x00000000 885 @ 13737: DEF XLEVEL 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 886 @ 13755: INIT 1 380 %INTEGER BLOCK WORD 887 @ 13758: LINE 380 "regression-compile-tmp/asems412.imp" 888 @ 13797: DEF BLOCKWORD p1=V_009a 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 381 %OWNRECORD(VARFM) BEGIN 889 @ 13818: LINE 381 "regression-compile-tmp/asems412.imp" 890 @ 13857: DEF BEGIN p1=V_009b a/tf=41 b/format=85 c/ostate=21 type=4 (record) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 891 @ 13874: INIT 1 382 %RECORD(ENVFM) NULL ENV 383 { %constrecord(*)%name null == (0) { %OWNRECORD(STACKFM) NULL } 892 @ 13877: LINE 382 "regression-compile-tmp/asems412.imp" 893 @ 13916: DEF NULLENV p1=V_009c a/tf=41 b/format=8a c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 384 %ownrecord(*)%name null == 0 894 @ 13935: LINE 384 "regression-compile-tmp/asems412.imp" 895 @ 13974: PUSHI #0x00000000 896 @ 13979: DEF NULL p1=V_009d a/tf=42 b/format=0 c/ostate=21 type=4 (record) form=2 (name) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 897 @ 13995: INIT 1 385 %RECORD(VARFM)%NAME DECVAR 386 898 @ 13998: LINE 385 "regression-compile-tmp/asems412.imp" 899 @ 14037: DEF DECVAR p1=V_009e a/tf=42 b/format=85 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 387 %OWNINTEGER CONTROL = B'11111111'; ! ALL CHECKS ENABLED INITIALLY 900 @ 14055: LINE 387 "regression-compile-tmp/asems412.imp" 901 @ 14094: PUSHI #0x000000ff 902 @ 14099: DEF CONTROL 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 903 @ 14118: INIT 1 388 %OWNINTEGER PERMS = LAST PERM 904 @ 14121: LINE 388 "regression-compile-tmp/asems412.imp" 905 @ 14160: PUSHI #0xffffffe8 906 @ 14165: DEF PERMS 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 907 @ 14182: INIT 1 389 %INTEGER DYNAMIC, DOPE 908 @ 14185: LINE 389 "regression-compile-tmp/asems412.imp" 909 @ 14224: DEF DYNAMIC p1=V_00a1 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 910 @ 14243: DEF DOPE p1=V_00a2 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 390 %SHORTINTEGER HALF 911 @ 14259: LINE 390 "regression-compile-tmp/asems412.imp" 912 @ 14298: DEF HALF p1=V_00a3 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 391 %INTEGER J 913 @ 14314: LINE 391 "regression-compile-tmp/asems412.imp" 914 @ 14353: DEF J p1=V_00a4 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 392 %INTEGER CA; ! CODE ADDRESS 915 @ 14366: LINE 392 "regression-compile-tmp/asems412.imp" 916 @ 14405: DEF CA p1=V_00a5 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 393 %INTEGER GA, DIAG GLA; ! GLA ADDRESS 917 @ 14419: LINE 393 "regression-compile-tmp/asems412.imp" 918 @ 14458: DEF GA p1=V_00a6 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 919 @ 14472: DEF DIAGGLA p1=V_00a7 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 394 %INTEGER DA 920 @ 14491: LINE 394 "regression-compile-tmp/asems412.imp" 921 @ 14530: DEF DA p1=V_00a8 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 395 %INTEGER LINE SIZE 922 @ 14544: LINE 395 "regression-compile-tmp/asems412.imp" 923 @ 14583: DEF LINESIZE p1=V_00a9 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 396 %OWNINTEGER REALGA; ! FRIG FOR OWNREALARRAY 924 @ 14603: LINE 396 "regression-compile-tmp/asems412.imp" 925 @ 14642: DEF REALGA 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 926 @ 14660: INIT 1 397 %INTEGER LIMEN; ! BACKWARD EXTENT OF KNOWLEDGE 927 @ 14663: LINE 397 "regression-compile-tmp/asems412.imp" 928 @ 14702: DEF LIMEN p1=V_00ab 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 398 %INTEGER CURRENT LINE 929 @ 14719: LINE 398 "regression-compile-tmp/asems412.imp" 930 @ 14758: DEF CURRENTLINE p1=V_00ac 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 399 %INTEGER ENVP; ! LAST ENVIRONMENT USED (CIRCULAR) 931 @ 14781: LINE 399 "regression-compile-tmp/asems412.imp" 932 @ 14820: DEF ENVP p1=V_00ad 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 400 %INTEGER STP; ! STACK POINTER 933 @ 14836: LINE 400 "regression-compile-tmp/asems412.imp" 934 @ 14875: DEF STP p1=V_00ae 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 401 %INTEGER STACK ASL; ! STACK DESCRIPTOR POINTER 935 @ 14890: LINE 401 "regression-compile-tmp/asems412.imp" 936 @ 14929: DEF STACKASL p1=V_00af 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 402 %ownINTEGER FRAME = 0; ! LOCAL STACK FRAME EXTENT 937 @ 14949: LINE 402 "regression-compile-tmp/asems412.imp" 938 @ 14988: PUSHI #0x00000000 939 @ 14993: DEF FRAME 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 940 @ 15010: INIT 1 403 %OWNINTEGER MIN TEMP = 0 941 @ 15013: LINE 403 "regression-compile-tmp/asems412.imp" 942 @ 15052: PUSHI #0x00000000 943 @ 15057: DEF MINTEMP 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 944 @ 15076: INIT 1 404 %INTEGER PARMS; ! START OF PARAMETER STACK 945 @ 15079: LINE 404 "regression-compile-tmp/asems412.imp" 946 @ 15118: DEF PARMS p1=V_00b2 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 405 %INTEGER LOCAL 947 @ 15135: LINE 405 "regression-compile-tmp/asems412.imp" 948 @ 15174: DEF LOCAL p1=V_00b3 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 406 %INTEGER INVERT,SWOPPED;! CONDITION INVERSION FLAG 949 @ 15191: LINE 406 "regression-compile-tmp/asems412.imp" 950 @ 15230: DEF INVERT p1=V_00b4 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 951 @ 15248: DEF SWOPPED p1=V_00b5 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 407 %INTEGER UNCOND JUMP; ! ADDRESS OF CODE HOLE 952 @ 15267: LINE 407 "regression-compile-tmp/asems412.imp" 953 @ 15306: DEF UNCONDJUMP p1=V_00b6 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 408 %RECORD(LABELFM)%NAME FLAB; ! %FOR LABEL 954 @ 15328: LINE 408 "regression-compile-tmp/asems412.imp" 955 @ 15367: DEF FLAB p1=V_00b7 a/tf=42 b/format=88 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 409 %INTEGER GTYPE,GMODE; ! PARAMETER FLIP-FLOP 956 @ 15383: LINE 409 "regression-compile-tmp/asems412.imp" 957 @ 15422: DEF GTYPE p1=V_00b8 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 958 @ 15439: DEF GMODE p1=V_00b9 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 410 %INTEGER OTYPE=0, OWNTYPE, OWNFORM, OWNVAL 959 @ 15456: LINE 410 "regression-compile-tmp/asems412.imp" 960 @ 15495: DEF OTYPE p1=V_00ba 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 961 @ 15512: PUSH OTYPE 962 @ 15515: PUSHI #0x00000000 963 @ 15520: ASSVAL 964 @ 15521: DEF OWNTYPE p1=V_00bb 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 965 @ 15540: DEF OWNFORM p1=V_00bc 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 966 @ 15559: DEF OWNVAL p1=V_00bd 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 411 %INTEGER FAULTY, ENTER UNASS 412 967 @ 15577: LINE 411 "regression-compile-tmp/asems412.imp" 968 @ 15616: DEF FAULTY p1=V_00be 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 969 @ 15634: DEF ENTERUNASS p1=V_00bf 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 413 %RECORD(STACKFM) ST WORK 970 @ 15656: LINE 413 "regression-compile-tmp/asems412.imp" 971 @ 15695: DEF STWORK p1=V_00c0 a/tf=41 b/format=86 c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 414 %RECORD(STACKFM) CCV 972 @ 15713: LINE 414 "regression-compile-tmp/asems412.imp" 973 @ 15752: DEF CCV p1=V_00c1 a/tf=41 b/format=86 c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 415 %INTEGER CCREG, CCCA=-1; ! CONDITION-CODE INFO 416 974 @ 15767: LINE 415 "regression-compile-tmp/asems412.imp" 975 @ 15806: DEF CCREG p1=V_00c2 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 @ 15823: DEF CCCA p1=V_00c3 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 977 @ 15839: PUSH CCCA 978 @ 15842: PUSHI #0x00000001 979 @ 15847: NEGATE 980 @ 15848: ASSVAL 417 %RECORD(STACKFM)%NAME ACTIVE STRING 981 @ 15849: LINE 417 "regression-compile-tmp/asems412.imp" 982 @ 15888: DEF ACTIVESTRING p1=V_00c4 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 418 %BYTEINTEGERNAME CSLEN 983 @ 15912: LINE 418 "regression-compile-tmp/asems412.imp" 984 @ 15951: DEF CSLEN p1=V_00c5 a/tf=12 b/format=2 c/ostate=0 type=1 (integer) form=2 (name) special=1 (byte-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 419 %BYTEINTEGERARRAY CURRENT STRING(0 : 255) 420 985 @ 15968: LINE 419 "regression-compile-tmp/asems412.imp" 986 @ 16007: DEF CURRENTSTRING p1=V_00c6 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 987 @ 16032: PUSHI #0x00000000 988 @ 16037: PUSHI #0x000000ff 989 @ 16042: DIM 0001 0001 421 %RECORD(ENVFM)%ARRAY ENVIR(0:MAX ENVIRS);! WELL AWAY FROM ALL 422 990 @ 16048: LINE 421 "regression-compile-tmp/asems412.imp" 991 @ 16087: DEF ENVIR p1=V_00c7 a/tf=4b b/format=8a c/ostate=100 type=4 (record) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 992 @ 16104: PUSHI #0x00000000 993 @ 16109: PUSHI #0x0000000d 994 @ 16114: DIM 0001 0001 423 %INTEGER MAX VARS; MAX VARS = FREE SPACE - INITIAL FREE 995 @ 16120: LINE 423 "regression-compile-tmp/asems412.imp" 996 @ 16159: DEF MAXVARS p1=V_00c8 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 997 @ 16178: LINE 423 "regression-compile-tmp/asems412.imp" 998 @ 16217: PUSH MAXVARS 999 @ 16220: PUSH FREESPACE 1000 @ 16223: PUSHI #0x00001400 1001 @ 16228: SUB 1002 @ 16229: ASSVAL 424 %BEGIN 1003 @ 16230: LINE 424 "regression-compile-tmp/asems412.imp" 1004 @ 16269: BEGIN _lev0id0_lev1id1 {lev=1 --> 2} 425 MAX VARS = MAX VARS + INITIAL FREE//4 %IF MAX VARS <= 0 1005 @ 16270: LINE 425 "regression-compile-tmp/asems412.imp" 1006 @ 16309: PUSH MAXVARS 1007 @ 16312: PUSHI #0x00000000 1008 @ 16317: JUMPIF > L_0004 1009 @ 16321: PUSH MAXVARS 1010 @ 16324: PUSH MAXVARS 1011 @ 16327: PUSHI #0x00001400 1012 @ 16332: PUSHI #0x00000004 1013 @ 16337: QUOT 1014 @ 16338: ADD 1015 @ 16339: ASSVAL 1016 @ 16340: LOCATE L_0004 426 MAX VARS = 16 %IF MAX VARS <= 0 1017 @ 16343: LINE 426 "regression-compile-tmp/asems412.imp" 1018 @ 16382: PUSH MAXVARS 1019 @ 16385: PUSHI #0x00000000 1020 @ 16390: JUMPIF > L_0004 1021 @ 16394: PUSH MAXVARS 1022 @ 16397: PUSHI #0x00000010 1023 @ 16402: ASSVAL 1024 @ 16403: LOCATE L_0004 427 MAX VARS = MAX VARS>>4; ! BYTE LENGTH OF 'VARFM' 428 ! SELECT OUTPUT(LIST) 429 ! PRINTSTRING("PASS 2 VERSION ");! PRINTSTRING(P2VERSION) 430 ! WRITE(MAX VARS, 1);! PRINTSTRING(" VARS");! NEWLINE 1025 @ 16406: LINE 427 "regression-compile-tmp/asems412.imp" 1026 @ 16445: PUSH MAXVARS 1027 @ 16448: PUSH MAXVARS 1028 @ 16451: PUSHI #0x00000004 1029 @ 16456: RSH 1030 @ 16457: ASSVAL 431 %END 432 1031 @ 16458: LINE 431 "regression-compile-tmp/asems412.imp" 1032 @ 16497: END _lev0id0_lev1id1 {lev=2 --> 1} 433 %RECORD(VARFM)%ARRAY VAR(1:MAX VARS) 434 435 1033 @ 16498: LINE 433 "regression-compile-tmp/asems412.imp" 1034 @ 16537: DEF VAR p1=V_00c9 a/tf=4b b/format=85 c/ostate=100 type=4 (record) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1035 @ 16552: PUSHI #0x00000001 1036 @ 16557: PUSH MAXVARS 1037 @ 16560: DIM 0001 0001 436 %ROUTINESPEC RX(%INTEGER OP, R, X, D) 437 438 1038 @ 16566: LINE 436 "regression-compile-tmp/asems412.imp" 1039 @ 16605: DEF RX (_lev0id0_RX) p1=V_00ca 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 1040 @ 16619: START ( FORMAL PARAMETERS {lev=1 --> 2, nested=0 --> 1} 1041 @ 16620: DEF OP p1=V_00cb 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 1042 @ 16634: DEF R p1=V_00cc 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 1043 @ 16647: DEF X p1=V_00cd 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 1044 @ 16660: DEF D p1=V_00ce 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 1045 @ 16673: FINISH ) {lev=1} 439 %ROUTINE PHEX(%INTEGER N) 1046 @ 16674: LINE 439 "regression-compile-tmp/asems412.imp" 1047 @ 16713: DEF PHEX (_lev0id0_PHEX) p1=V_00cb 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 1048 @ 16729: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 1049 @ 16730: DEF N p1=V_00cc 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 1050 @ 16743: FINISH ) {lev=2} 440 %INTEGER J,K 1051 @ 16744: LINE 440 "regression-compile-tmp/asems412.imp" 1052 @ 16783: DEF J p1=V_00cd 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 1053 @ 16796: DEF K p1=V_00ce 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 441 %CYCLE J = 1,1,4 1054 @ 16809: LINE 441 "regression-compile-tmp/asems412.imp" 1055 @ 16848: PUSH J 1056 @ 16851: PUSHI #0x00000001 1057 @ 16856: PUSHI #0x00000004 1058 @ 16861: PUSHI #0x00000001 1059 @ 16866: FOR L_0003 442 K = (N>>12)&15; N = N<<4 1060 @ 16869: LINE 442 "regression-compile-tmp/asems412.imp" 1061 @ 16908: PUSH K 1062 @ 16911: PUSH N 1063 @ 16914: PUSHI #0x0000000c 1064 @ 16919: RSH 1065 @ 16920: PUSHI #0x0000000f 1066 @ 16925: AND 1067 @ 16926: ASSVAL 1068 @ 16927: LINE 442 "regression-compile-tmp/asems412.imp" 1069 @ 16966: PUSH N 1070 @ 16969: PUSH N 1071 @ 16972: PUSHI #0x00000004 1072 @ 16977: LSH 1073 @ 16978: ASSVAL 443 %IF K > 9 %THEN K = K-10+'A' %ELSE K = K+'0' 1074 @ 16979: LINE 443 "regression-compile-tmp/asems412.imp" 1075 @ 17018: PUSH K 1076 @ 17021: PUSHI #0x00000009 1077 @ 17026: JUMPIF <= L_0007 1078 @ 17030: PUSH K 1079 @ 17033: PUSH K 1080 @ 17036: PUSHI #0x0000000a 1081 @ 17041: SUB 1082 @ 17042: PUSHI #0x00000041 1083 @ 17047: ADD 1084 @ 17048: ASSVAL 1085 @ 17049: GOTO L_0006 1086 @ 17052: LOCATE L_0007 1087 @ 17055: PUSH K 1088 @ 17058: PUSH K 1089 @ 17061: PUSHI #0x00000030 1090 @ 17066: ADD 1091 @ 17067: ASSVAL 1092 @ 17068: LOCATE L_0006 444 PRINTSYMBOL(K) 1093 @ 17071: LINE 444 "regression-compile-tmp/asems412.imp" 1094 @ 17110: PUSH PRINTSYMBOL 1095 @ 17113: PUSH K 1096 @ 17116: ASSPAR 1097 @ 17117: CALL 445 %REPEAT 1098 @ 17118: LINE 445 "regression-compile-tmp/asems412.imp" 1099 @ 17157: REPEAT L_0003 1100 @ 17160: LOCATE L_0004 446 %END 447 1101 @ 17163: LINE 446 "regression-compile-tmp/asems412.imp" 1102 @ 17202: END _lev0id0_PHEX {lev=2 --> 1} 448 %ROUTINE DECODE(%INTEGER WORD) 1103 @ 17203: LINE 448 "regression-compile-tmp/asems412.imp" 1104 @ 17242: DEF DECODE (_lev0id0_DECODE) p1=V_00cc 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 1105 @ 17260: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 1106 @ 17261: DEF WORD p1=V_00cd 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 1107 @ 17277: FINISH ) {lev=2} 449 %OWNINTEGER LAST,N 1108 @ 17278: LINE 449 "regression-compile-tmp/asems412.imp" 1109 @ 17317: DEF LAST 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 1110 @ 17333: INIT 1 1111 @ 17336: DEF N p1=V_00cf 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 1112 @ 17349: INIT 1 450 SELECTOUTPUT(LIST) 1113 @ 17352: LINE 450 "regression-compile-tmp/asems412.imp" 1114 @ 17391: PUSH SELECTOUTPUT 1115 @ 17394: PUSHI #0x00000001 1116 @ 17399: ASSPAR 1117 @ 17400: CALL 451 %IF LAST # CURRENT LINE %START 1118 @ 17401: LINE 451 "regression-compile-tmp/asems412.imp" 1119 @ 17440: PUSH LAST 1120 @ 17443: PUSH CURRENTLINE 1121 @ 17446: JUMPIF = L_0004 452 LAST = CURRENT LINE 1122 @ 17450: LINE 452 "regression-compile-tmp/asems412.imp" 1123 @ 17489: PUSH LAST 1124 @ 17492: PUSH CURRENTLINE 1125 @ 17495: ASSVAL 453 NEWLINE %UNLESS N = 0 1126 @ 17496: LINE 453 "regression-compile-tmp/asems412.imp" 1127 @ 17535: PUSH N 1128 @ 17538: PUSHI #0x00000000 1129 @ 17543: JUMPIF = L_0007 1130 @ 17547: PUSH NEWLINE 1131 @ 17550: CALL 1132 @ 17551: LOCATE L_0007 454 N = 16 1133 @ 17554: LINE 454 "regression-compile-tmp/asems412.imp" 1134 @ 17593: PUSH N 1135 @ 17596: PUSHI #0x00000010 1136 @ 17601: ASSVAL 455 WRITE(CURRENT LINE, 4); SPACE 1137 @ 17602: LINE 455 "regression-compile-tmp/asems412.imp" 1138 @ 17641: PUSH WRITE 1139 @ 17644: PUSH CURRENTLINE 1140 @ 17647: ASSPAR 1141 @ 17648: PUSHI #0x00000004 1142 @ 17653: ASSPAR 1143 @ 17654: CALL 1144 @ 17655: LINE 455 "regression-compile-tmp/asems412.imp" 1145 @ 17694: PUSH SPACE 1146 @ 17697: CALL 456 PHEX(CA); PRINTSYMBOL(':') 1147 @ 17698: LINE 456 "regression-compile-tmp/asems412.imp" 1148 @ 17737: PUSH PHEX 1149 @ 17740: PUSH CA 1150 @ 17743: ASSPAR 1151 @ 17744: CALL 1152 @ 17745: LINE 456 "regression-compile-tmp/asems412.imp" 1153 @ 17784: PUSH PRINTSYMBOL 1154 @ 17787: PUSHI #0x0000003a 1155 @ 17792: ASSPAR 1156 @ 17793: CALL 457 %ELSE 1157 @ 17794: LINE 457 "regression-compile-tmp/asems412.imp" 1158 @ 17833: GOTO L_0003 1159 @ 17836: LOCATE L_0004 458 SPACES(11) %IF N = 16 1160 @ 17839: LINE 458 "regression-compile-tmp/asems412.imp" 1161 @ 17878: PUSH N 1162 @ 17881: PUSHI #0x00000010 1163 @ 17886: JUMPIF # L_0007 1164 @ 17890: PUSH SPACES 1165 @ 17893: PUSHI #0x0000000b 1166 @ 17898: ASSPAR 1167 @ 17899: CALL 1168 @ 17900: LOCATE L_0007 459 %FINISH 1169 @ 17903: LINE 459 "regression-compile-tmp/asems412.imp" 1170 @ 17942: LOCATE L_0003 460 SPACES(2); PHEX(WORD) 1171 @ 17945: LINE 460 "regression-compile-tmp/asems412.imp" 1172 @ 17984: PUSH SPACES 1173 @ 17987: PUSHI #0x00000002 1174 @ 17992: ASSPAR 1175 @ 17993: CALL 1176 @ 17994: LINE 460 "regression-compile-tmp/asems412.imp" 1177 @ 18033: PUSH PHEX 1178 @ 18036: PUSH WORD 1179 @ 18039: ASSPAR 1180 @ 18040: CALL 461 N = N-1 1181 @ 18041: LINE 461 "regression-compile-tmp/asems412.imp" 1182 @ 18080: PUSH N 1183 @ 18083: PUSH N 1184 @ 18086: PUSHI #0x00000001 1185 @ 18091: SUB 1186 @ 18092: ASSVAL 462 N = 16 %AND NEWLINE %IF N <= 0 1187 @ 18093: LINE 462 "regression-compile-tmp/asems412.imp" 1188 @ 18132: PUSH N 1189 @ 18135: PUSHI #0x00000000 1190 @ 18140: JUMPIF > L_0004 1191 @ 18144: PUSH N 1192 @ 18147: PUSHI #0x00000010 1193 @ 18152: ASSVAL 1194 @ 18153: PUSH NEWLINE 1195 @ 18156: CALL 1196 @ 18157: LOCATE L_0004 463 SELECTOUTPUT(OBJECT) 1197 @ 18160: LINE 463 "regression-compile-tmp/asems412.imp" 1198 @ 18199: PUSH SELECTOUTPUT 1199 @ 18202: PUSHI #0x00000002 1200 @ 18207: ASSPAR 1201 @ 18208: CALL 464 %END 1202 @ 18209: LINE 464 "regression-compile-tmp/asems412.imp" 1203 @ 18248: END _lev0id0_DECODE {lev=2 --> 1} 465 %ROUTINE SHOW(%RECORD(STACKFM)%NAME V) 1204 @ 18249: LINE 465 "regression-compile-tmp/asems412.imp" 1205 @ 18288: DEF SHOW (_lev0id0_SHOW) p1=V_00cd 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 1206 @ 18304: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 1207 @ 18305: DEF V p1=V_00ce a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1208 @ 18318: FINISH ) {lev=2} 466 SELECTOUTPUT(REPORT) %IF CONTROL < 0 1209 @ 18319: LINE 466 "regression-compile-tmp/asems412.imp" 1210 @ 18358: PUSH CONTROL 1211 @ 18361: PUSHI #0x00000000 1212 @ 18366: JUMPIF >= L_0004 1213 @ 18370: PUSH SELECTOUTPUT 1214 @ 18373: PUSHI #0x00000000 1215 @ 18378: ASSPAR 1216 @ 18379: CALL 1217 @ 18380: LOCATE L_0004 467 WRITE(V_TYPE, 1); WRITE(V_FORM, 2) 1218 @ 18383: LINE 467 "regression-compile-tmp/asems412.imp" 1219 @ 18422: PUSH WRITE 1220 @ 18425: PUSH V 1221 @ 18428: SELECT 8 1222 @ 18431: ASSPAR 1223 @ 18432: PUSHI #0x00000001 1224 @ 18437: ASSPAR 1225 @ 18438: CALL 1226 @ 18439: LINE 467 "regression-compile-tmp/asems412.imp" 1227 @ 18478: PUSH WRITE 1228 @ 18481: PUSH V 1229 @ 18484: SELECT 9 1230 @ 18487: ASSPAR 1231 @ 18488: PUSHI #0x00000002 1232 @ 18493: ASSPAR 1233 @ 18494: CALL 468 WRITE(V_BASE, 2); WRITE(V_DISP, 5) 1234 @ 18495: LINE 468 "regression-compile-tmp/asems412.imp" 1235 @ 18534: PUSH WRITE 1236 @ 18537: PUSH V 1237 @ 18540: SELECT 6 1238 @ 18543: ASSPAR 1239 @ 18544: PUSHI #0x00000002 1240 @ 18549: ASSPAR 1241 @ 18550: CALL 1242 @ 18551: LINE 468 "regression-compile-tmp/asems412.imp" 1243 @ 18590: PUSH WRITE 1244 @ 18593: PUSH V 1245 @ 18596: SELECT 1 1246 @ 18599: ASSPAR 1247 @ 18600: PUSHI #0x00000005 1248 @ 18605: ASSPAR 1249 @ 18606: CALL 469 WRITE(V_EXTRA, 5); WRITE(V_LENGTH, 5) 1250 @ 18607: LINE 469 "regression-compile-tmp/asems412.imp" 1251 @ 18646: PUSH WRITE 1252 @ 18649: PUSH V 1253 @ 18652: SELECT 3 1254 @ 18655: ASSPAR 1255 @ 18656: PUSHI #0x00000005 1256 @ 18661: ASSPAR 1257 @ 18662: CALL 1258 @ 18663: LINE 469 "regression-compile-tmp/asems412.imp" 1259 @ 18702: PUSH WRITE 1260 @ 18705: PUSH V 1261 @ 18708: SELECT 4 1262 @ 18711: ASSPAR 1263 @ 18712: PUSHI #0x00000005 1264 @ 18717: ASSPAR 1265 @ 18718: CALL 470 %IF V_LOP # 0 %START 1266 @ 18719: LINE 470 "regression-compile-tmp/asems412.imp" 1267 @ 18758: PUSH V 1268 @ 18761: SELECT 7 1269 @ 18764: PUSHI #0x00000000 1270 @ 18769: JUMPIF = L_0004 471 WRITE(V_LOP, 2); PRINTSYMBOL(':') 1271 @ 18773: LINE 471 "regression-compile-tmp/asems412.imp" 1272 @ 18812: PUSH WRITE 1273 @ 18815: PUSH V 1274 @ 18818: SELECT 7 1275 @ 18821: ASSPAR 1276 @ 18822: PUSHI #0x00000002 1277 @ 18827: ASSPAR 1278 @ 18828: CALL 1279 @ 18829: LINE 471 "regression-compile-tmp/asems412.imp" 1280 @ 18868: PUSH PRINTSYMBOL 1281 @ 18871: PUSHI #0x0000003a 1282 @ 18876: ASSPAR 1283 @ 18877: CALL 472 SHOW(V_LINK) 1284 @ 18878: LINE 472 "regression-compile-tmp/asems412.imp" 1285 @ 18917: PUSH SHOW 1286 @ 18920: PUSH V 1287 @ 18923: SELECT 10 1288 @ 18926: ASSPAR 1289 @ 18927: CALL 473 %ELSE 1290 @ 18928: LINE 473 "regression-compile-tmp/asems412.imp" 1291 @ 18967: GOTO L_0003 1292 @ 18970: LOCATE L_0004 474 NEWLINE 1293 @ 18973: LINE 474 "regression-compile-tmp/asems412.imp" 1294 @ 19012: PUSH NEWLINE 1295 @ 19015: CALL 475 %FINISH 1296 @ 19016: LINE 475 "regression-compile-tmp/asems412.imp" 1297 @ 19055: LOCATE L_0003 476 SELECTOUTPUT(OBJECT) %IF CONTROL < 0 1298 @ 19058: LINE 476 "regression-compile-tmp/asems412.imp" 1299 @ 19097: PUSH CONTROL 1300 @ 19100: PUSHI #0x00000000 1301 @ 19105: JUMPIF >= L_0004 1302 @ 19109: PUSH SELECTOUTPUT 1303 @ 19112: PUSHI #0x00000002 1304 @ 19117: ASSPAR 1305 @ 19118: CALL 1306 @ 19119: LOCATE L_0004 477 %END 1307 @ 19122: LINE 477 "regression-compile-tmp/asems412.imp" 1308 @ 19161: END _lev0id0_SHOW {lev=2 --> 1} 478 %ROUTINE ABORT(%INTEGER CODE) 1309 @ 19162: LINE 478 "regression-compile-tmp/asems412.imp" 1310 @ 19201: DEF ABORT (_lev0id0_ABORT) p1=V_00ce 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 1311 @ 19218: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 1312 @ 19219: DEF CODE 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 1313 @ 19235: FINISH ) {lev=2} 479 %INTEGER I,J,L,FATAL 1314 @ 19236: LINE 479 "regression-compile-tmp/asems412.imp" 1315 @ 19275: DEF I p1=V_00d0 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 1316 @ 19288: DEF J p1=V_00d1 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 1317 @ 19301: DEF L p1=V_00d2 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 1318 @ 19314: DEF FATAL p1=V_00d3 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 480 %SWITCH SW(-15:0) 1319 @ 19331: LINE 480 "regression-compile-tmp/asems412.imp" 1320 @ 19370: PUSHI #0xfffffff1 1321 @ 19375: PUSHI #0x00000000 1322 @ 19380: BOUNDS 1323 @ 19381: DEF SW p1=V_00d4 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 481 %RECORD(DFM)%NAME DD 1324 @ 19395: LINE 481 "regression-compile-tmp/asems412.imp" 1325 @ 19434: DEF DD p1=V_00d5 a/tf=42 b/format=92 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 482 I = REPORT; FATAL = 1 1326 @ 19448: LINE 482 "regression-compile-tmp/asems412.imp" 1327 @ 19487: PUSH I 1328 @ 19490: PUSHI #0x00000000 1329 @ 19495: ASSVAL 1330 @ 19496: LINE 482 "regression-compile-tmp/asems412.imp" 1331 @ 19535: PUSH FATAL 1332 @ 19538: PUSHI #0x00000001 1333 @ 19543: ASSVAL 483 CONTROL = 0 1334 @ 19544: LINE 483 "regression-compile-tmp/asems412.imp" 1335 @ 19583: PUSH CONTROL 1336 @ 19586: PUSHI #0x00000000 1337 @ 19591: ASSVAL 484 %CYCLE 1338 @ 19592: LINE 484 "regression-compile-tmp/asems412.imp" 1339 @ 19631: LOCATE L_0003 485 SELECT OUTPUT(I) 1340 @ 19634: LINE 485 "regression-compile-tmp/asems412.imp" 1341 @ 19673: PUSH SELECTOUTPUT 1342 @ 19676: PUSH I 1343 @ 19679: ASSPAR 1344 @ 19680: CALL 486 %IF CODE > 0 %START; ! ... IT'S A COMPILER FAULT 1345 @ 19681: LINE 486 "regression-compile-tmp/asems412.imp" 1346 @ 19720: PUSH CODE 1347 @ 19723: PUSHI #0x00000000 1348 @ 19728: JUMPIF <= L_0007 487 PRINT STRING("*COMPILER ERROR"); WRITE(CODE,1) 1349 @ 19732: LINE 487 "regression-compile-tmp/asems412.imp" 1350 @ 19771: PUSH PRINTSTRING 1351 @ 19774: PUSHS "*COMPILER ERROR" 1352 @ 19791: ASSPAR 1353 @ 19792: CALL 1354 @ 19793: LINE 487 "regression-compile-tmp/asems412.imp" 1355 @ 19832: PUSH WRITE 1356 @ 19835: PUSH CODE 1357 @ 19838: ASSPAR 1358 @ 19839: PUSHI #0x00000001 1359 @ 19844: ASSPAR 1360 @ 19845: CALL 488 PRINT STRING(" AT LINE"); WRITE(CURRENT LINE,1) 1361 @ 19846: LINE 488 "regression-compile-tmp/asems412.imp" 1362 @ 19885: PUSH PRINTSTRING 1363 @ 19888: PUSHS " AT LINE" 1364 @ 19898: ASSPAR 1365 @ 19899: CALL 1366 @ 19900: LINE 488 "regression-compile-tmp/asems412.imp" 1367 @ 19939: PUSH WRITE 1368 @ 19942: PUSH CURRENTLINE 1369 @ 19945: ASSPAR 1370 @ 19946: PUSHI #0x00000001 1371 @ 19951: ASSPAR 1372 @ 19952: CALL 489 NEWLINE 1373 @ 19953: LINE 489 "regression-compile-tmp/asems412.imp" 1374 @ 19992: PUSH NEWLINE 1375 @ 19995: CALL 490 %IF STP > 0 %START 1376 @ 19996: LINE 490 "regression-compile-tmp/asems412.imp" 1377 @ 20035: PUSH STP 1378 @ 20038: PUSHI #0x00000000 1379 @ 20043: JUMPIF <= L_000a 491 PRINT STRING("STACK"); NEWLINE 1380 @ 20047: LINE 491 "regression-compile-tmp/asems412.imp" 1381 @ 20086: PUSH PRINTSTRING 1382 @ 20089: PUSHS "STACK" 1383 @ 20096: ASSPAR 1384 @ 20097: CALL 1385 @ 20098: LINE 491 "regression-compile-tmp/asems412.imp" 1386 @ 20137: PUSH NEWLINE 1387 @ 20140: CALL 492 SHOW(STACKED(J)_V) %FOR J = 1,1,STP 1388 @ 20141: LINE 492 "regression-compile-tmp/asems412.imp" 1389 @ 20180: PUSH J 1390 @ 20183: PUSHI #0x00000001 1391 @ 20188: PUSH STP 1392 @ 20191: PUSHI #0x00000001 1393 @ 20196: FOR L_000c 1394 @ 20199: PUSH SHOW 1395 @ 20202: PUSH STACKED 1396 @ 20205: PUSH J 1397 @ 20208: ACCESS 1398 @ 20209: SELECT 1 1399 @ 20212: ASSPAR 1400 @ 20213: CALL 1401 @ 20214: REPEAT L_000c 1402 @ 20217: LOCATE L_000d 493 %FINISH 1403 @ 20220: LINE 493 "regression-compile-tmp/asems412.imp" 1404 @ 20259: LOCATE L_000a 494 %UNLESS USING_LINK == NULL %START 1405 @ 20262: LINE 494 "regression-compile-tmp/asems412.imp" 1406 @ 20301: PUSH USING 1407 @ 20304: SELECT 2 1408 @ 20307: PUSH NULL 1409 @ 20310: JUMPIFA = L_000a 495 PRINTSTRING("USING:"); NEWLINE 1410 @ 20314: LINE 495 "regression-compile-tmp/asems412.imp" 1411 @ 20353: PUSH PRINTSTRING 1412 @ 20356: PUSHS "USING:" 1413 @ 20364: ASSPAR 1414 @ 20365: CALL 1415 @ 20366: LINE 495 "regression-compile-tmp/asems412.imp" 1416 @ 20405: PUSH NEWLINE 1417 @ 20408: CALL 496 DD == USING_LINK 1418 @ 20409: LINE 496 "regression-compile-tmp/asems412.imp" 1419 @ 20448: PUSH DD 1420 @ 20451: PUSH USING 1421 @ 20454: SELECT 2 1422 @ 20457: ASSREF 497 %CYCLE 1423 @ 20458: LINE 497 "regression-compile-tmp/asems412.imp" 1424 @ 20497: LOCATE L_000c 498 SHOW(DD_D); DD == DD_LINK 1425 @ 20500: LINE 498 "regression-compile-tmp/asems412.imp" 1426 @ 20539: PUSH SHOW 1427 @ 20542: PUSH DD 1428 @ 20545: SELECT 1 1429 @ 20548: ASSPAR 1430 @ 20549: CALL 1431 @ 20550: LINE 498 "regression-compile-tmp/asems412.imp" 1432 @ 20589: PUSH DD 1433 @ 20592: PUSH DD 1434 @ 20595: SELECT 2 1435 @ 20598: ASSREF 499 %EXIT %IF DD == NULL 1436 @ 20599: LINE 499 "regression-compile-tmp/asems412.imp" 1437 @ 20638: PUSH DD 1438 @ 20641: PUSH NULL 1439 @ 20644: JUMPIFA # L_0010 1440 @ 20648: GOTO L_000d 1441 @ 20651: LOCATE L_0010 500 %REPEAT 1442 @ 20654: LINE 500 "regression-compile-tmp/asems412.imp" 1443 @ 20693: REPEAT L_000c 1444 @ 20696: LOCATE L_000d 501 %FINISH 1445 @ 20699: LINE 501 "regression-compile-tmp/asems412.imp" 1446 @ 20738: LOCATE L_000a 502 ->CONT %IF I = REPORT 1447 @ 20741: LINE 502 "regression-compile-tmp/asems412.imp" 1448 @ 20780: PUSH I 1449 @ 20783: PUSHI #0x00000000 1450 @ 20788: JUMPIF # L_000a 1451 @ 20792: JUMP L_00d6 1452 @ 20795: LOCATE L_000a 503 %SIGNAL 15,1; ! ... SIGNAL COMPILER FAULT 1453 @ 20798: LINE 503 "regression-compile-tmp/asems412.imp" 1454 @ 20837: PUSHI #0x00000001 1455 @ 20842: EVENT 000f 504 %FINISH 1456 @ 20845: LINE 504 "regression-compile-tmp/asems412.imp" 1457 @ 20884: LOCATE L_0007 505 PRINT SYMBOL('*'); WRITE(CURRENT LINE,1); PRINT STRING(": ") 1458 @ 20887: LINE 505 "regression-compile-tmp/asems412.imp" 1459 @ 20926: PUSH PRINTSYMBOL 1460 @ 20929: PUSHI #0x0000002a 1461 @ 20934: ASSPAR 1462 @ 20935: CALL 1463 @ 20936: LINE 505 "regression-compile-tmp/asems412.imp" 1464 @ 20975: PUSH WRITE 1465 @ 20978: PUSH CURRENTLINE 1466 @ 20981: ASSPAR 1467 @ 20982: PUSHI #0x00000001 1468 @ 20987: ASSPAR 1469 @ 20988: CALL 1470 @ 20989: LINE 505 "regression-compile-tmp/asems412.imp" 1471 @ 21028: PUSH PRINTSTRING 1472 @ 21031: PUSHS ": " 1473 @ 21035: ASSPAR 1474 @ 21036: CALL 506 -> SW(CODE) 507 1475 @ 21037: LINE 506 "regression-compile-tmp/asems412.imp" 1476 @ 21076: PUSH CODE 1477 @ 21079: SJUMP 212 508 SW(0): 1478 @ 21082: LINE 508 "regression-compile-tmp/asems412.imp" 1479 @ 21121: PUSHI #0x00000000 1480 @ 21126: SLABEL 212 509 PRINT STRING("MORE STORE PLEASE!!"); -> CONT 1481 @ 21129: LINE 509 "regression-compile-tmp/asems412.imp" 1482 @ 21168: PUSH PRINTSTRING 1483 @ 21171: PUSHS "MORE STORE PLEASE!!" 1484 @ 21192: ASSPAR 1485 @ 21193: CALL 1486 @ 21194: LINE 509 "regression-compile-tmp/asems412.imp" 1487 @ 21233: JUMP L_00d6 510 SW(-1): 1488 @ 21236: LINE 510 "regression-compile-tmp/asems412.imp" 1489 @ 21275: PUSHI #0xffffffff 1490 @ 21280: SLABEL 212 511 SW(-2): 1491 @ 21283: LINE 511 "regression-compile-tmp/asems412.imp" 1492 @ 21322: PUSHI #0xfffffffe 1493 @ 21327: SLABEL 212 512 PRINT STRING("MORE STORE REQ'D FOR THIS COMPILATION"); -> CONT 1494 @ 21330: LINE 512 "regression-compile-tmp/asems412.imp" 1495 @ 21369: PUSH PRINTSTRING 1496 @ 21372: PUSHS "MORE STORE REQ'D FOR THIS COMPILATION" 1497 @ 21411: ASSPAR 1498 @ 21412: CALL 1499 @ 21413: LINE 512 "regression-compile-tmp/asems412.imp" 1500 @ 21452: JUMP L_00d6 513 SW(-3): 1501 @ 21455: LINE 513 "regression-compile-tmp/asems412.imp" 1502 @ 21494: PUSHI #0xfffffffd 1503 @ 21499: SLABEL 212 514 PRINT STRING("BLOCKS TOO DEEPLY NESTED"); -> CONT 1504 @ 21502: LINE 514 "regression-compile-tmp/asems412.imp" 1505 @ 21541: PUSH PRINTSTRING 1506 @ 21544: PUSHS "BLOCKS TOO DEEPLY NESTED" 1507 @ 21570: ASSPAR 1508 @ 21571: CALL 1509 @ 21572: LINE 514 "regression-compile-tmp/asems412.imp" 1510 @ 21611: JUMP L_00d6 515 SW(-4): 1511 @ 21614: LINE 515 "regression-compile-tmp/asems412.imp" 1512 @ 21653: PUSHI #0xfffffffc 1513 @ 21658: SLABEL 212 516 PRINT STRING("TOO MANY NAMES"); -> CONT 1514 @ 21661: LINE 516 "regression-compile-tmp/asems412.imp" 1515 @ 21700: PUSH PRINTSTRING 1516 @ 21703: PUSHS "TOO MANY NAMES" 1517 @ 21719: ASSPAR 1518 @ 21720: CALL 1519 @ 21721: LINE 516 "regression-compile-tmp/asems412.imp" 1520 @ 21760: JUMP L_00d6 517 SW(-5): 1521 @ 21763: LINE 517 "regression-compile-tmp/asems412.imp" 1522 @ 21802: PUSHI #0xfffffffb 1523 @ 21807: SLABEL 212 518 PRINT STRING("TOO MANY LABELS"); -> CONT 1524 @ 21810: LINE 518 "regression-compile-tmp/asems412.imp" 1525 @ 21849: PUSH PRINTSTRING 1526 @ 21852: PUSHS "TOO MANY LABELS" 1527 @ 21869: ASSPAR 1528 @ 21870: CALL 1529 @ 21871: LINE 518 "regression-compile-tmp/asems412.imp" 1530 @ 21910: JUMP L_00d6 519 SW(-6): 1531 @ 21913: LINE 519 "regression-compile-tmp/asems412.imp" 1532 @ 21952: PUSHI #0xfffffffa 1533 @ 21957: SLABEL 212 520 PRINT STRING("DIVISION BY ZERO"); -> NON FATAL 1534 @ 21960: LINE 520 "regression-compile-tmp/asems412.imp" 1535 @ 21999: PUSH PRINTSTRING 1536 @ 22002: PUSHS "DIVISION BY ZERO" 1537 @ 22020: ASSPAR 1538 @ 22021: CALL 1539 @ 22022: LINE 520 "regression-compile-tmp/asems412.imp" 1540 @ 22061: JUMP L_00d7 521 SW(-7): 1541 @ 22064: LINE 521 "regression-compile-tmp/asems412.imp" 1542 @ 22103: PUSHI #0xfffffff9 1543 @ 22108: SLABEL 212 522 SW(-8): 1544 @ 22111: LINE 522 "regression-compile-tmp/asems412.imp" 1545 @ 22150: PUSHI #0xfffffff8 1546 @ 22155: SLABEL 212 523 PRINT STRING("ARRAY INSIDE OUT"); -> NON FATAL 1547 @ 22158: LINE 523 "regression-compile-tmp/asems412.imp" 1548 @ 22197: PUSH PRINTSTRING 1549 @ 22200: PUSHS "ARRAY INSIDE OUT" 1550 @ 22218: ASSPAR 1551 @ 22219: CALL 1552 @ 22220: LINE 523 "regression-compile-tmp/asems412.imp" 1553 @ 22259: JUMP L_00d7 524 SW(-9): 1554 @ 22262: LINE 524 "regression-compile-tmp/asems412.imp" 1555 @ 22301: PUSHI #0xfffffff7 1556 @ 22306: SLABEL 212 525 PRINT STRING("DECLARATION OUT OF CONTEXT"); -> NON FATAL 1557 @ 22309: LINE 525 "regression-compile-tmp/asems412.imp" 1558 @ 22348: PUSH PRINTSTRING 1559 @ 22351: PUSHS "DECLARATION OUT OF CONTEXT" 1560 @ 22379: ASSPAR 1561 @ 22380: CALL 1562 @ 22381: LINE 525 "regression-compile-tmp/asems412.imp" 1563 @ 22420: JUMP L_00d7 526 SW(-10): 1564 @ 22423: LINE 526 "regression-compile-tmp/asems412.imp" 1565 @ 22462: PUSHI #0xfffffff6 1566 @ 22467: SLABEL 212 527 PRINT STRING("FAULTY SWITCH DECLARATION"); -> NON FATAL 1567 @ 22470: LINE 527 "regression-compile-tmp/asems412.imp" 1568 @ 22509: PUSH PRINTSTRING 1569 @ 22512: PUSHS "FAULTY SWITCH DECLARATION" 1570 @ 22539: ASSPAR 1571 @ 22540: CALL 1572 @ 22541: LINE 527 "regression-compile-tmp/asems412.imp" 1573 @ 22580: JUMP L_00d7 528 SW(-11): 1574 @ 22583: LINE 528 "regression-compile-tmp/asems412.imp" 1575 @ 22622: PUSHI #0xfffffff5 1576 @ 22627: SLABEL 212 529 PRINT STRING("%RESULT UNSPECIFIED"); -> NON FATAL 1577 @ 22630: LINE 529 "regression-compile-tmp/asems412.imp" 1578 @ 22669: PUSH PRINTSTRING 1579 @ 22672: PUSHS "%RESULT UNSPECIFIED" 1580 @ 22693: ASSPAR 1581 @ 22694: CALL 1582 @ 22695: LINE 529 "regression-compile-tmp/asems412.imp" 1583 @ 22734: JUMP L_00d7 530 SW(-12): 1584 @ 22737: LINE 530 "regression-compile-tmp/asems412.imp" 1585 @ 22776: PUSHI #0xfffffff4 1586 @ 22781: SLABEL 212 531 PRINT STRING("ILLEGAL %FOR PARAMETERS"); ->WARNING 1587 @ 22784: LINE 531 "regression-compile-tmp/asems412.imp" 1588 @ 22823: PUSH PRINTSTRING 1589 @ 22826: PUSHS "ILLEGAL %FOR PARAMETERS" 1590 @ 22851: ASSPAR 1591 @ 22852: CALL 1592 @ 22853: LINE 531 "regression-compile-tmp/asems412.imp" 1593 @ 22892: JUMP L_00d8 532 SW(-13): 1594 @ 22895: LINE 532 "regression-compile-tmp/asems412.imp" 1595 @ 22934: PUSHI #0xfffffff3 1596 @ 22939: SLABEL 212 533 PRINTSTRING("STRING CONSTANT TOO LONG"); ->WARNING 1597 @ 22942: LINE 533 "regression-compile-tmp/asems412.imp" 1598 @ 22981: PUSH PRINTSTRING 1599 @ 22984: PUSHS "STRING CONSTANT TOO LONG" 1600 @ 23010: ASSPAR 1601 @ 23011: CALL 1602 @ 23012: LINE 533 "regression-compile-tmp/asems412.imp" 1603 @ 23051: JUMP L_00d8 534 SW(-14): 1604 @ 23054: LINE 534 "regression-compile-tmp/asems412.imp" 1605 @ 23093: PUSHI #0xfffffff2 1606 @ 23098: SLABEL 212 535 PRINTSTRING("UNASSIGNED CHECK INHIBITED") 1607 @ 23101: LINE 535 "regression-compile-tmp/asems412.imp" 1608 @ 23140: PUSH PRINTSTRING 1609 @ 23143: PUSHS "UNASSIGNED CHECK INHIBITED" 1610 @ 23171: ASSPAR 1611 @ 23172: CALL 536 CONTROL = CONTROL&(\UNASS DIAG); ->WARNING 1612 @ 23173: LINE 536 "regression-compile-tmp/asems412.imp" 1613 @ 23212: PUSH CONTROL 1614 @ 23215: PUSH CONTROL 1615 @ 23218: PUSHI #0x00000020 1616 @ 23223: NOT 1617 @ 23224: AND 1618 @ 23225: ASSVAL 1619 @ 23226: LINE 536 "regression-compile-tmp/asems412.imp" 1620 @ 23265: JUMP L_00d8 537 SW(-15): 1621 @ 23268: LINE 537 "regression-compile-tmp/asems412.imp" 1622 @ 23307: PUSHI #0xfffffff1 1623 @ 23312: SLABEL 212 538 PRINTSTRING("LOCALS > 16K ???") 539 1624 @ 23315: LINE 538 "regression-compile-tmp/asems412.imp" 1625 @ 23354: PUSH PRINTSTRING 1626 @ 23357: PUSHS "LOCALS > 16K ???" 1627 @ 23375: ASSPAR 1628 @ 23376: CALL 540 WARNING: 1629 @ 23377: LINE 540 "regression-compile-tmp/asems412.imp" 1630 @ 23416: LABEL L_00d8 541 L = 0 542 1631 @ 23419: LINE 541 "regression-compile-tmp/asems412.imp" 1632 @ 23458: PUSH L 1633 @ 23461: PUSHI #0x00000000 1634 @ 23466: ASSVAL 543 NON FATAL: 1635 @ 23467: LINE 543 "regression-compile-tmp/asems412.imp" 1636 @ 23506: LABEL L_00d7 544 FATAL = 0 1637 @ 23509: LINE 544 "regression-compile-tmp/asems412.imp" 1638 @ 23548: PUSH FATAL 1639 @ 23551: PUSHI #0x00000000 1640 @ 23556: ASSVAL 545 CONT: 1641 @ 23557: LINE 545 "regression-compile-tmp/asems412.imp" 1642 @ 23596: LABEL L_00d6 546 NEWLINE 1643 @ 23599: LINE 546 "regression-compile-tmp/asems412.imp" 1644 @ 23638: PUSH NEWLINE 1645 @ 23641: CALL 547 %IF I = LIST %START 1646 @ 23642: LINE 547 "regression-compile-tmp/asems412.imp" 1647 @ 23681: PUSH I 1648 @ 23684: PUSHI #0x00000001 1649 @ 23689: JUMPIF # L_0007 548 %SIGNAL 15,2 %IF FATAL # 0 1650 @ 23693: LINE 548 "regression-compile-tmp/asems412.imp" 1651 @ 23732: PUSH FATAL 1652 @ 23735: PUSHI #0x00000000 1653 @ 23740: JUMPIF = L_000a 1654 @ 23744: PUSHI #0x00000002 1655 @ 23749: EVENT 000f 1656 @ 23752: LOCATE L_000a 549 FAULTY = FAULTY+L; SELECT OUTPUT(OBJECT); %RETURN 1657 @ 23755: LINE 549 "regression-compile-tmp/asems412.imp" 1658 @ 23794: PUSH FAULTY 1659 @ 23797: PUSH FAULTY 1660 @ 23800: PUSH L 1661 @ 23803: ADD 1662 @ 23804: ASSVAL 1663 @ 23805: LINE 549 "regression-compile-tmp/asems412.imp" 1664 @ 23844: PUSH SELECTOUTPUT 1665 @ 23847: PUSHI #0x00000002 1666 @ 23852: ASSPAR 1667 @ 23853: CALL 1668 @ 23854: LINE 549 "regression-compile-tmp/asems412.imp" 1669 @ 23893: RETURN 550 %FINISH 1670 @ 23894: LINE 550 "regression-compile-tmp/asems412.imp" 1671 @ 23933: LOCATE L_0007 551 I = LIST 552 1672 @ 23936: LINE 551 "regression-compile-tmp/asems412.imp" 1673 @ 23975: PUSH I 1674 @ 23978: PUSHI #0x00000001 1675 @ 23983: ASSVAL 553 %REPEAT 1676 @ 23984: LINE 553 "regression-compile-tmp/asems412.imp" 1677 @ 24023: REPEAT L_0003 554 %END 1678 @ 24026: LINE 554 "regression-compile-tmp/asems412.imp" 1679 @ 24065: END _lev0id0_ABORT {lev=2 --> 1} 555 %ROUTINE DISPLAY VAR(%RECORD(VARFM)%NAME V) 1680 @ 24066: LINE 555 "regression-compile-tmp/asems412.imp" 1681 @ 24105: DEF DISPLAYVAR (_lev0id0_DISPLAYVAR) p1=V_00cf 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 1682 @ 24127: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 1683 @ 24128: DEF V p1=V_00d0 a/tf=42 b/format=85 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1684 @ 24141: FINISH ) {lev=2} 556 SELECTOUTPUT(LIST) 1685 @ 24142: LINE 556 "regression-compile-tmp/asems412.imp" 1686 @ 24181: PUSH SELECTOUTPUT 1687 @ 24184: PUSHI #0x00000001 1688 @ 24189: ASSPAR 1689 @ 24190: CALL 557 WRITE(V_ID, 3); PRINTSYMBOL(':') 1690 @ 24191: LINE 557 "regression-compile-tmp/asems412.imp" 1691 @ 24230: PUSH WRITE 1692 @ 24233: PUSH V 1693 @ 24236: SELECT 4 1694 @ 24239: ASSPAR 1695 @ 24240: PUSHI #0x00000003 1696 @ 24245: ASSPAR 1697 @ 24246: CALL 1698 @ 24247: LINE 557 "regression-compile-tmp/asems412.imp" 1699 @ 24286: PUSH PRINTSYMBOL 1700 @ 24289: PUSHI #0x0000003a 1701 @ 24294: ASSPAR 1702 @ 24295: CALL 558 WRITE(V_TYPE, 2); WRITE(V_FORM, 2) 1703 @ 24296: LINE 558 "regression-compile-tmp/asems412.imp" 1704 @ 24335: PUSH WRITE 1705 @ 24338: PUSH V 1706 @ 24341: SELECT 7 1707 @ 24344: ASSPAR 1708 @ 24345: PUSHI #0x00000002 1709 @ 24350: ASSPAR 1710 @ 24351: CALL 1711 @ 24352: LINE 558 "regression-compile-tmp/asems412.imp" 1712 @ 24391: PUSH WRITE 1713 @ 24394: PUSH V 1714 @ 24397: SELECT 8 1715 @ 24400: ASSPAR 1716 @ 24401: PUSHI #0x00000002 1717 @ 24406: ASSPAR 1718 @ 24407: CALL 559 WRITE(V_BASE, 3); WRITE(V_DISP, 4) 1719 @ 24408: LINE 559 "regression-compile-tmp/asems412.imp" 1720 @ 24447: PUSH WRITE 1721 @ 24450: PUSH V 1722 @ 24453: SELECT 6 1723 @ 24456: ASSPAR 1724 @ 24457: PUSHI #0x00000003 1725 @ 24462: ASSPAR 1726 @ 24463: CALL 1727 @ 24464: LINE 559 "regression-compile-tmp/asems412.imp" 1728 @ 24503: PUSH WRITE 1729 @ 24506: PUSH V 1730 @ 24509: SELECT 1 1731 @ 24512: ASSPAR 1732 @ 24513: PUSHI #0x00000004 1733 @ 24518: ASSPAR 1734 @ 24519: CALL 560 WRITE(V_EXTRA, 4); WRITE(V_FORMAT, 4) 1735 @ 24520: LINE 560 "regression-compile-tmp/asems412.imp" 1736 @ 24559: PUSH WRITE 1737 @ 24562: PUSH V 1738 @ 24565: SELECT 3 1739 @ 24568: ASSPAR 1740 @ 24569: PUSHI #0x00000004 1741 @ 24574: ASSPAR 1742 @ 24575: CALL 1743 @ 24576: LINE 560 "regression-compile-tmp/asems412.imp" 1744 @ 24615: PUSH WRITE 1745 @ 24618: PUSH V 1746 @ 24621: SELECT 2 1747 @ 24624: ASSPAR 1748 @ 24625: PUSHI #0x00000004 1749 @ 24630: ASSPAR 1750 @ 24631: CALL 561 NEWLINE 1751 @ 24632: LINE 561 "regression-compile-tmp/asems412.imp" 1752 @ 24671: PUSH NEWLINE 1753 @ 24674: CALL 562 SELECTOUTPUT(OBJECT) 1754 @ 24675: LINE 562 "regression-compile-tmp/asems412.imp" 1755 @ 24714: PUSH SELECTOUTPUT 1756 @ 24717: PUSHI #0x00000002 1757 @ 24722: ASSPAR 1758 @ 24723: CALL 563 %END 1759 @ 24724: LINE 563 "regression-compile-tmp/asems412.imp" 1760 @ 24763: END _lev0id0_DISPLAYVAR {lev=2 --> 1} 564 %ROUTINE REAL ERROR(%INTEGER N) 1761 @ 24764: LINE 564 "regression-compile-tmp/asems412.imp" 1762 @ 24803: DEF REALERROR (_lev0id0_REALERROR) p1=V_00d0 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 1763 @ 24824: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 1764 @ 24825: DEF N p1=V_00d1 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 1765 @ 24838: FINISH ) {lev=2} 565 %INTEGER I 1766 @ 24839: LINE 565 "regression-compile-tmp/asems412.imp" 1767 @ 24878: DEF I p1=V_00d2 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 %CONSTSHORTINTEGERARRAY SYM(1:14) = '\', '?', '?', '?', '@', 567 '?', '?', '&', '!',-'!', 568 -'<', -'>', '?', '.' 1768 @ 24891: LINE 566 "regression-compile-tmp/asems412.imp" 1769 @ 24930: PUSHI #0x00000001 1770 @ 24935: PUSHI #0x0000000e 1771 @ 24940: BOUNDS 1772 @ 24941: DEF SYM p1=V_00d3 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 1773 @ 24956: PUSHI #0x0000005c 1774 @ 24961: INIT 1 1775 @ 24964: PUSHI #0x0000003f 1776 @ 24969: INIT 1 1777 @ 24972: PUSHI #0x0000003f 1778 @ 24977: INIT 1 1779 @ 24980: PUSHI #0x0000003f 1780 @ 24985: INIT 1 1781 @ 24988: PUSHI #0x00000040 1782 @ 24993: INIT 1 1783 @ 24996: PUSHI #0x0000003f 1784 @ 25001: INIT 1 1785 @ 25004: PUSHI #0x0000003f 1786 @ 25009: INIT 1 1787 @ 25012: PUSHI #0x00000026 1788 @ 25017: INIT 1 1789 @ 25020: PUSHI #0x00000021 1790 @ 25025: INIT 1 1791 @ 25028: PUSHI #0xffffffdf 1792 @ 25033: INIT 1 1793 @ 25036: PUSHI #0xffffffc4 1794 @ 25041: INIT 1 1795 @ 25044: PUSHI #0xffffffc2 1796 @ 25049: INIT 1 1797 @ 25052: PUSHI #0x0000003f 1798 @ 25057: INIT 1 1799 @ 25060: PUSHI #0x0000002e 1800 @ 25065: INIT 1 569 I = REPORT 1801 @ 25068: LINE 569 "regression-compile-tmp/asems412.imp" 1802 @ 25107: PUSH I 1803 @ 25110: PUSHI #0x00000000 1804 @ 25115: ASSVAL 570 %CYCLE 1805 @ 25116: LINE 570 "regression-compile-tmp/asems412.imp" 1806 @ 25155: LOCATE L_0003 571 SELECT OUTPUT(I) 1807 @ 25158: LINE 571 "regression-compile-tmp/asems412.imp" 1808 @ 25197: PUSH SELECTOUTPUT 1809 @ 25200: PUSH I 1810 @ 25203: ASSPAR 1811 @ 25204: CALL 572 PRINTSYMBOL('*'); WRITE(CURRENT LINE, 4) 1812 @ 25205: LINE 572 "regression-compile-tmp/asems412.imp" 1813 @ 25244: PUSH PRINTSYMBOL 1814 @ 25247: PUSHI #0x0000002a 1815 @ 25252: ASSPAR 1816 @ 25253: CALL 1817 @ 25254: LINE 572 "regression-compile-tmp/asems412.imp" 1818 @ 25293: PUSH WRITE 1819 @ 25296: PUSH CURRENTLINE 1820 @ 25299: ASSPAR 1821 @ 25300: PUSHI #0x00000004 1822 @ 25305: ASSPAR 1823 @ 25306: CALL 573 PRINTSTRING(" ILLEGAL REAL OPERATION '") 1824 @ 25307: LINE 573 "regression-compile-tmp/asems412.imp" 1825 @ 25346: PUSH PRINTSTRING 1826 @ 25349: PUSHS " ILLEGAL REAL OPERATION '" 1827 @ 25376: ASSPAR 1828 @ 25377: CALL 574 N = SYM(N) 1829 @ 25378: LINE 574 "regression-compile-tmp/asems412.imp" 1830 @ 25417: PUSH N 1831 @ 25420: PUSH SYM 1832 @ 25423: PUSH N 1833 @ 25426: ACCESS 1834 @ 25427: ASSVAL 575 PRINTSYMBOL(-N) %IF N < 0 1835 @ 25428: LINE 575 "regression-compile-tmp/asems412.imp" 1836 @ 25467: PUSH N 1837 @ 25470: PUSHI #0x00000000 1838 @ 25475: JUMPIF >= L_0007 1839 @ 25479: PUSH PRINTSYMBOL 1840 @ 25482: PUSH N 1841 @ 25485: NEGATE 1842 @ 25486: ASSPAR 1843 @ 25487: CALL 1844 @ 25488: LOCATE L_0007 576 PRINTSYMBOL(|N|); PRINTSYMBOL(''''); NEWLINE 1845 @ 25491: LINE 576 "regression-compile-tmp/asems412.imp" 1846 @ 25530: PUSH PRINTSYMBOL 1847 @ 25533: PUSH N 1848 @ 25536: MOD 1849 @ 25537: ASSPAR 1850 @ 25538: CALL 1851 @ 25539: LINE 576 "regression-compile-tmp/asems412.imp" 1852 @ 25578: PUSH PRINTSYMBOL 1853 @ 25581: PUSHI #0x00000027 1854 @ 25586: ASSPAR 1855 @ 25587: CALL 1856 @ 25588: LINE 576 "regression-compile-tmp/asems412.imp" 1857 @ 25627: PUSH NEWLINE 1858 @ 25630: CALL 577 %EXIT %IF I = LIST 1859 @ 25631: LINE 577 "regression-compile-tmp/asems412.imp" 1860 @ 25670: PUSH I 1861 @ 25673: PUSHI #0x00000001 1862 @ 25678: JUMPIF # L_0007 1863 @ 25682: GOTO L_0004 1864 @ 25685: LOCATE L_0007 578 I = LIST 1865 @ 25688: LINE 578 "regression-compile-tmp/asems412.imp" 1866 @ 25727: PUSH I 1867 @ 25730: PUSHI #0x00000001 1868 @ 25735: ASSVAL 579 %REPEAT 1869 @ 25736: LINE 579 "regression-compile-tmp/asems412.imp" 1870 @ 25775: REPEAT L_0003 1871 @ 25778: LOCATE L_0004 580 FAULTY = FAULTY+1 1872 @ 25781: LINE 580 "regression-compile-tmp/asems412.imp" 1873 @ 25820: PUSH FAULTY 1874 @ 25823: PUSH FAULTY 1875 @ 25826: PUSHI #0x00000001 1876 @ 25831: ADD 1877 @ 25832: ASSVAL 581 SELECTOUTPUT(OBJECT) 1878 @ 25833: LINE 581 "regression-compile-tmp/asems412.imp" 1879 @ 25872: PUSH SELECTOUTPUT 1880 @ 25875: PUSHI #0x00000002 1881 @ 25880: ASSPAR 1882 @ 25881: CALL 582 %END 1883 @ 25882: LINE 582 "regression-compile-tmp/asems412.imp" 1884 @ 25921: END _lev0id0_REALERROR {lev=2 --> 1} 583 %PREDICATE FLOATING(%RECORD(STACKFM)%NAME V) 1885 @ 25922: LINE 583 "regression-compile-tmp/asems412.imp" 1886 @ 25961: DEF FLOATING (_lev0id0_FLOATING) p1=V_00d1 a/tf=a b/format=0 c/ostate=0 type=0 () form=10 (predicate) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1887 @ 25981: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 1888 @ 25982: DEF V p1=V_00d2 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1889 @ 25995: FINISH ) {lev=2} 584 %TRUE %IF V_TYPE = REALS %OR (V_LOP # 0 %C 585 %AND (V_LOP = RDIV %OR (v_link ## NULL %and V_LINK_TYPE = REALS))) 1890 @ 25996: LINE 584 "regression-compile-tmp/asems412.imp" 1891 @ 26035: PUSH V 1892 @ 26038: SELECT 8 1893 @ 26041: PUSHI #0x00000006 1894 @ 26046: JUMPIF = L_0005 1895 @ 26050: PUSH V 1896 @ 26053: SELECT 7 1897 @ 26056: PUSHI #0x00000000 1898 @ 26061: JUMPIF = L_0004 1899 @ 26065: PUSH V 1900 @ 26068: SELECT 7 1901 @ 26071: PUSHI #0x00000010 1902 @ 26076: JUMPIF = L_0005 1903 @ 26080: PUSH V 1904 @ 26083: SELECT 10 1905 @ 26086: PUSH NULL 1906 @ 26089: JUMPIFA = L_0004 1907 @ 26093: PUSH V 1908 @ 26096: SELECT 10 1909 @ 26099: SELECT 8 1910 @ 26102: PUSHI #0x00000006 1911 @ 26107: JUMPIF # L_0004 1912 @ 26111: LOCATE L_0005 1913 @ 26114: TRUE 1914 @ 26115: LOCATE L_0004 586 %FALSE 1915 @ 26118: LINE 586 "regression-compile-tmp/asems412.imp" 1916 @ 26157: FALSE 587 %END 1917 @ 26158: LINE 587 "regression-compile-tmp/asems412.imp" 1918 @ 26197: END _lev0id0_FLOATING {lev=2 --> 1} 588 %PREDICATE SAME(%RECORD(STACKFM)%NAME L, R) 1919 @ 26198: LINE 588 "regression-compile-tmp/asems412.imp" 1920 @ 26237: DEF SAME (_lev0id0_SAME) p1=V_00d2 a/tf=a b/format=0 c/ostate=0 type=0 () form=10 (predicate) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1921 @ 26253: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 1922 @ 26254: DEF L p1=V_00d3 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1923 @ 26267: DEF R p1=V_00d4 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1924 @ 26280: FINISH ) {lev=2} 589 %FALSE %IF L_BASE # R_BASE %OR L_DISP # R_DISP 1925 @ 26281: LINE 589 "regression-compile-tmp/asems412.imp" 1926 @ 26320: PUSH L 1927 @ 26323: SELECT 6 1928 @ 26326: PUSH R 1929 @ 26329: SELECT 6 1930 @ 26332: JUMPIF # L_0005 1931 @ 26336: PUSH L 1932 @ 26339: SELECT 1 1933 @ 26342: PUSH R 1934 @ 26345: SELECT 1 1935 @ 26348: JUMPIF = L_0004 1936 @ 26352: LOCATE L_0005 1937 @ 26355: FALSE 1938 @ 26356: LOCATE L_0004 590 %FALSE %IF L_TYPE # R_TYPE %OR L_FORM # R_FORM 1939 @ 26359: LINE 590 "regression-compile-tmp/asems412.imp" 1940 @ 26398: PUSH L 1941 @ 26401: SELECT 8 1942 @ 26404: PUSH R 1943 @ 26407: SELECT 8 1944 @ 26410: JUMPIF # L_0005 1945 @ 26414: PUSH L 1946 @ 26417: SELECT 9 1947 @ 26420: PUSH R 1948 @ 26423: SELECT 9 1949 @ 26426: JUMPIF = L_0004 1950 @ 26430: LOCATE L_0005 1951 @ 26433: FALSE 1952 @ 26434: LOCATE L_0004 591 %FALSE %IF L_EXTRA # R_EXTRA 1953 @ 26437: LINE 591 "regression-compile-tmp/asems412.imp" 1954 @ 26476: PUSH L 1955 @ 26479: SELECT 3 1956 @ 26482: PUSH R 1957 @ 26485: SELECT 3 1958 @ 26488: JUMPIF = L_0004 1959 @ 26492: FALSE 1960 @ 26493: LOCATE L_0004 592 %TRUE 1961 @ 26496: LINE 592 "regression-compile-tmp/asems412.imp" 1962 @ 26535: TRUE 593 %END 1963 @ 26536: LINE 593 "regression-compile-tmp/asems412.imp" 1964 @ 26575: END _lev0id0_SAME {lev=2 --> 1} 594 %PREDICATE ZERO(%RECORD(STACKFM)%NAME V) 1965 @ 26576: LINE 594 "regression-compile-tmp/asems412.imp" 1966 @ 26615: DEF ZERO (_lev0id0_ZERO) p1=V_00d3 a/tf=a b/format=0 c/ostate=0 type=0 () form=10 (predicate) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1967 @ 26631: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 1968 @ 26632: DEF V p1=V_00d4 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1969 @ 26645: FINISH ) {lev=2} 595 %FALSE %IF V_DISP # 0 %OR V_BASE # 0 %OR V_FORM # CONSTANT 1970 @ 26646: LINE 595 "regression-compile-tmp/asems412.imp" 1971 @ 26685: PUSH V 1972 @ 26688: SELECT 1 1973 @ 26691: PUSHI #0x00000000 1974 @ 26696: JUMPIF # L_0005 1975 @ 26700: PUSH V 1976 @ 26703: SELECT 6 1977 @ 26706: PUSHI #0x00000000 1978 @ 26711: JUMPIF # L_0005 1979 @ 26715: PUSH V 1980 @ 26718: SELECT 9 1981 @ 26721: PUSHI #0x00000000 1982 @ 26726: JUMPIF = L_0004 1983 @ 26730: LOCATE L_0005 1984 @ 26733: FALSE 1985 @ 26734: LOCATE L_0004 596 %FALSE %IF V_LOP # 0 1986 @ 26737: LINE 596 "regression-compile-tmp/asems412.imp" 1987 @ 26776: PUSH V 1988 @ 26779: SELECT 7 1989 @ 26782: PUSHI #0x00000000 1990 @ 26787: JUMPIF = L_0004 1991 @ 26791: FALSE 1992 @ 26792: LOCATE L_0004 597 %TRUE 1993 @ 26795: LINE 597 "regression-compile-tmp/asems412.imp" 1994 @ 26834: TRUE 598 %END 1995 @ 26835: LINE 598 "regression-compile-tmp/asems412.imp" 1996 @ 26874: END _lev0id0_ZERO {lev=2 --> 1} 599 %PREDICATE CONST(%RECORD(STACKFM)%NAME V) 1997 @ 26875: LINE 599 "regression-compile-tmp/asems412.imp" 1998 @ 26914: DEF CONST (_lev0id0_CONST) p1=V_00d4 a/tf=a b/format=0 c/ostate=0 type=0 () form=10 (predicate) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1999 @ 26931: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2000 @ 26932: DEF V p1=V_00d5 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2001 @ 26945: FINISH ) {lev=2} 600 %FALSE %UNLESS V_FORM = CONSTANT %AND V_LOP = 0 2002 @ 26946: LINE 600 "regression-compile-tmp/asems412.imp" 2003 @ 26985: PUSH V 2004 @ 26988: SELECT 9 2005 @ 26991: PUSHI #0x00000000 2006 @ 26996: JUMPIF # L_0005 2007 @ 27000: PUSH V 2008 @ 27003: SELECT 7 2009 @ 27006: PUSHI #0x00000000 2010 @ 27011: JUMPIF = L_0004 2011 @ 27015: LOCATE L_0005 2012 @ 27018: FALSE 2013 @ 27019: LOCATE L_0004 601 %FALSE %IF V_TYPE > SHORT 2014 @ 27022: LINE 601 "regression-compile-tmp/asems412.imp" 2015 @ 27061: PUSH V 2016 @ 27064: SELECT 8 2017 @ 27067: PUSHI #0x00000003 2018 @ 27072: JUMPIF <= L_0004 2019 @ 27076: FALSE 2020 @ 27077: LOCATE L_0004 602 %TRUE 2021 @ 27080: LINE 602 "regression-compile-tmp/asems412.imp" 2022 @ 27119: TRUE 603 %END 2023 @ 27120: LINE 603 "regression-compile-tmp/asems412.imp" 2024 @ 27159: END _lev0id0_CONST {lev=2 --> 1} 604 %INTEGERFN POWER(%INTEGER N) 2025 @ 27160: LINE 604 "regression-compile-tmp/asems412.imp" 2026 @ 27199: DEF POWER (_lev0id0_POWER) p1=V_00d5 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 2027 @ 27216: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2028 @ 27217: DEF N p1=V_00d6 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 2029 @ 27230: FINISH ) {lev=2} 605 %INTEGER MASK, J 2030 @ 27231: LINE 605 "regression-compile-tmp/asems412.imp" 2031 @ 27270: DEF MASK p1=V_00d7 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 2032 @ 27286: DEF J p1=V_00d8 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 606 MASK = 1 2033 @ 27299: LINE 606 "regression-compile-tmp/asems412.imp" 2034 @ 27338: PUSH MASK 2035 @ 27341: PUSHI #0x00000001 2036 @ 27346: ASSVAL 607 %FOR J = 0, 1, 14 %CYCLE 2037 @ 27347: LINE 607 "regression-compile-tmp/asems412.imp" 2038 @ 27386: PUSH J 2039 @ 27389: PUSHI #0x00000001 2040 @ 27394: PUSHI #0x0000000e 2041 @ 27399: PUSHI #0x00000000 2042 @ 27404: FOR L_0003 608 %RESULT = J %IF N = MASK 2043 @ 27407: LINE 608 "regression-compile-tmp/asems412.imp" 2044 @ 27446: PUSH N 2045 @ 27449: PUSH MASK 2046 @ 27452: JUMPIF # L_0007 2047 @ 27456: PUSH J 2048 @ 27459: RESULT 2049 @ 27460: LOCATE L_0007 609 MASK = MASK<<1 2050 @ 27463: LINE 609 "regression-compile-tmp/asems412.imp" 2051 @ 27502: PUSH MASK 2052 @ 27505: PUSH MASK 2053 @ 27508: PUSHI #0x00000001 2054 @ 27513: LSH 2055 @ 27514: ASSVAL 610 %REPEAT 2056 @ 27515: LINE 610 "regression-compile-tmp/asems412.imp" 2057 @ 27554: REPEAT L_0003 2058 @ 27557: LOCATE L_0004 611 %RESULT = -1 2059 @ 27560: LINE 611 "regression-compile-tmp/asems412.imp" 2060 @ 27599: PUSHI #0x00000001 2061 @ 27604: NEGATE 2062 @ 27605: RESULT 612 %END 2063 @ 27606: LINE 612 "regression-compile-tmp/asems412.imp" 2064 @ 27645: END _lev0id0_POWER {lev=2 --> 1} 613 %INTEGERFN TEMP 2065 @ 27646: LINE 613 "regression-compile-tmp/asems412.imp" 2066 @ 27685: DEF TEMP (_lev0id0_TEMP) p1=V_00d6 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 2067 @ 27701: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2068 @ 27702: FINISH ) {lev=2} 614 %INTEGER T 2069 @ 27703: LINE 614 "regression-compile-tmp/asems412.imp" 2070 @ 27742: DEF T p1=V_00d7 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 615 T = (FRAME+(REGLEN-1))&(\(REGLEN-1)) 2071 @ 27755: LINE 615 "regression-compile-tmp/asems412.imp" 2072 @ 27794: PUSH T 2073 @ 27797: PUSH FRAME 2074 @ 27800: PUSHI #0x00000004 2075 @ 27805: PUSHI #0x00000001 2076 @ 27810: SUB 2077 @ 27811: ADD 2078 @ 27812: PUSHI #0x00000004 2079 @ 27817: PUSHI #0x00000001 2080 @ 27822: SUB 2081 @ 27823: NOT 2082 @ 27824: AND 2083 @ 27825: ASSVAL 616 FRAME = T+REGLEN 2084 @ 27826: LINE 616 "regression-compile-tmp/asems412.imp" 2085 @ 27865: PUSH FRAME 2086 @ 27868: PUSH T 2087 @ 27871: PUSHI #0x00000004 2088 @ 27876: ADD 2089 @ 27877: ASSVAL 617 %RESULT = T 2090 @ 27878: LINE 617 "regression-compile-tmp/asems412.imp" 2091 @ 27917: PUSH T 2092 @ 27920: RESULT 618 %END 2093 @ 27921: LINE 618 "regression-compile-tmp/asems412.imp" 2094 @ 27960: END _lev0id0_TEMP {lev=2 --> 1} 619 %INTEGERFN TAG 2095 @ 27961: LINE 619 "regression-compile-tmp/asems412.imp" 2096 @ 28000: DEF TAG (_lev0id0_TAG) p1=V_00d7 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 2097 @ 28015: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2098 @ 28016: FINISH ) {lev=2} 620 %INTEGER N, S 2099 @ 28017: LINE 620 "regression-compile-tmp/asems412.imp" 2100 @ 28056: DEF N p1=V_00d8 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 2101 @ 28069: DEF S p1=V_00d9 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 621 N = 0 2102 @ 28082: LINE 621 "regression-compile-tmp/asems412.imp" 2103 @ 28121: PUSH N 2104 @ 28124: PUSHI #0x00000000 2105 @ 28129: ASSVAL 622 %CYCLE 2106 @ 28130: LINE 622 "regression-compile-tmp/asems412.imp" 2107 @ 28169: LOCATE L_0003 623 S = NEXTSYMBOL 2108 @ 28172: LINE 623 "regression-compile-tmp/asems412.imp" 2109 @ 28211: PUSH S 2110 @ 28214: PUSH NEXTSYMBOL 2111 @ 28217: CALL 2112 @ 28218: ASSVAL 624 %RESULT = N %UNLESS '0' <= S <= '9' 2113 @ 28219: LINE 624 "regression-compile-tmp/asems412.imp" 2114 @ 28258: PUSHI #0x00000030 2115 @ 28263: PUSH S 2116 @ 28266: JUMPIFD > L_0008 2117 @ 28270: PUSHI #0x00000039 2118 @ 28275: JUMPIF <= L_0007 2119 @ 28279: LOCATE L_0008 2120 @ 28282: PUSH N 2121 @ 28285: RESULT 2122 @ 28286: LOCATE L_0007 625 N = N*10+S-'0' 2123 @ 28289: LINE 625 "regression-compile-tmp/asems412.imp" 2124 @ 28328: PUSH N 2125 @ 28331: PUSH N 2126 @ 28334: PUSHI #0x0000000a 2127 @ 28339: MUL 2128 @ 28340: PUSH S 2129 @ 28343: ADD 2130 @ 28344: PUSHI #0x00000030 2131 @ 28349: SUB 2132 @ 28350: ASSVAL 626 SKIPSYMBOL 2133 @ 28351: LINE 626 "regression-compile-tmp/asems412.imp" 2134 @ 28390: PUSH SKIPSYMBOL 2135 @ 28393: CALL 627 %REPEAT 2136 @ 28394: LINE 627 "regression-compile-tmp/asems412.imp" 2137 @ 28433: REPEAT L_0003 628 %END 2138 @ 28436: LINE 628 "regression-compile-tmp/asems412.imp" 2139 @ 28475: END _lev0id0_TAG {lev=2 --> 1} 629 %INTEGERFN EVAL(%INTEGER L) 2140 @ 28476: LINE 629 "regression-compile-tmp/asems412.imp" 2141 @ 28515: DEF EVAL (_lev0id0_EVAL) p1=V_00d8 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 2142 @ 28531: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2143 @ 28532: DEF L p1=V_00d9 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 2144 @ 28545: FINISH ) {lev=2} 630 %INTEGER J, N, B, S, MOD 2145 @ 28546: LINE 630 "regression-compile-tmp/asems412.imp" 2146 @ 28585: DEF J p1=V_00da 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 @ 28598: DEF N p1=V_00db 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 2148 @ 28611: DEF B p1=V_00dc 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 2149 @ 28624: DEF S p1=V_00dd 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 2150 @ 28637: DEF MOD p1=V_00de 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 631 %CONSTBYTEINTEGERARRAY BASIS('V' : 'Z') = 3, 1, 8, 4, 0 2151 @ 28652: LINE 631 "regression-compile-tmp/asems412.imp" 2152 @ 28691: PUSHI #0x00000056 2153 @ 28696: PUSHI #0x0000005a 2154 @ 28701: BOUNDS 2155 @ 28702: DEF BASIS 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 2156 @ 28719: PUSHI #0x00000003 2157 @ 28724: INIT 1 2158 @ 28727: PUSHI #0x00000001 2159 @ 28732: INIT 1 2160 @ 28735: PUSHI #0x00000008 2161 @ 28740: INIT 1 2162 @ 28743: PUSHI #0x00000004 2163 @ 28748: INIT 1 2164 @ 28751: PUSHI #0x00000000 2165 @ 28756: INIT 1 632 %RESULT = 0 %IF L < 2 2166 @ 28759: LINE 632 "regression-compile-tmp/asems412.imp" 2167 @ 28798: PUSH L 2168 @ 28801: PUSHI #0x00000002 2169 @ 28806: JUMPIF >= L_0004 2170 @ 28810: PUSHI #0x00000000 2171 @ 28815: RESULT 2172 @ 28816: LOCATE L_0004 633 READSYMBOL(B); B = BASIS(B) 2173 @ 28819: LINE 633 "regression-compile-tmp/asems412.imp" 2174 @ 28858: PUSH READSYMBOL 2175 @ 28861: PUSH B 2176 @ 28864: ASSPAR 2177 @ 28865: CALL 2178 @ 28866: LINE 633 "regression-compile-tmp/asems412.imp" 2179 @ 28905: PUSH B 2180 @ 28908: PUSH BASIS 2181 @ 28911: PUSH B 2182 @ 28914: ACCESS 2183 @ 28915: ASSVAL 634 N = 0 2184 @ 28916: LINE 634 "regression-compile-tmp/asems412.imp" 2185 @ 28955: PUSH N 2186 @ 28958: PUSHI #0x00000000 2187 @ 28963: ASSVAL 635 %IF B = 0 %START 2188 @ 28964: LINE 635 "regression-compile-tmp/asems412.imp" 2189 @ 29003: PUSH B 2190 @ 29006: PUSHI #0x00000000 2191 @ 29011: JUMPIF # L_0004 636 %FOR J = 2,1,L %CYCLE 2192 @ 29015: LINE 636 "regression-compile-tmp/asems412.imp" 2193 @ 29054: PUSH J 2194 @ 29057: PUSHI #0x00000001 2195 @ 29062: PUSH L 2196 @ 29065: PUSHI #0x00000002 2197 @ 29070: FOR L_0006 637 READ SYMBOL(S) 2198 @ 29073: LINE 637 "regression-compile-tmp/asems412.imp" 2199 @ 29112: PUSH READSYMBOL 2200 @ 29115: PUSH S 2201 @ 29118: ASSPAR 2202 @ 29119: CALL 638 N = (N*4+N)*2 + S-'A' 2203 @ 29120: LINE 638 "regression-compile-tmp/asems412.imp" 2204 @ 29159: PUSH N 2205 @ 29162: PUSH N 2206 @ 29165: PUSHI #0x00000004 2207 @ 29170: MUL 2208 @ 29171: PUSH N 2209 @ 29174: ADD 2210 @ 29175: PUSHI #0x00000002 2211 @ 29180: MUL 2212 @ 29181: PUSH S 2213 @ 29184: ADD 2214 @ 29185: PUSHI #0x00000041 2215 @ 29190: SUB 2216 @ 29191: ASSVAL 639 %REPEAT 2217 @ 29192: LINE 639 "regression-compile-tmp/asems412.imp" 2218 @ 29231: REPEAT L_0006 2219 @ 29234: LOCATE L_0007 640 %ELSE 2220 @ 29237: LINE 640 "regression-compile-tmp/asems412.imp" 2221 @ 29276: GOTO L_0003 2222 @ 29279: LOCATE L_0004 641 MOD = 'A'; MOD = 0 %IF B = 8 2223 @ 29282: LINE 641 "regression-compile-tmp/asems412.imp" 2224 @ 29321: PUSH MOD 2225 @ 29324: PUSHI #0x00000041 2226 @ 29329: ASSVAL 2227 @ 29330: LINE 641 "regression-compile-tmp/asems412.imp" 2228 @ 29369: PUSH B 2229 @ 29372: PUSHI #0x00000008 2230 @ 29377: JUMPIF # L_0007 2231 @ 29381: PUSH MOD 2232 @ 29384: PUSHI #0x00000000 2233 @ 29389: ASSVAL 2234 @ 29390: LOCATE L_0007 642 %FOR J = 2,1,L %CYCLE 2235 @ 29393: LINE 642 "regression-compile-tmp/asems412.imp" 2236 @ 29432: PUSH J 2237 @ 29435: PUSHI #0x00000001 2238 @ 29440: PUSH L 2239 @ 29443: PUSHI #0x00000002 2240 @ 29448: FOR L_0006 643 READ SYMBOL(S) 2241 @ 29451: LINE 643 "regression-compile-tmp/asems412.imp" 2242 @ 29490: PUSH READSYMBOL 2243 @ 29493: PUSH S 2244 @ 29496: ASSPAR 2245 @ 29497: CALL 644 N = N< 1} 649 %REALFN REAL CONSTANT 2266 @ 29726: LINE 649 "regression-compile-tmp/asems412.imp" 2267 @ 29765: DEF REALCONSTANT (_lev0id0_REALCONSTANT) p1=V_00d9 a/tf=28 b/format=1 c/ostate=10 type=2 (real) form=8 (function) special=0 () linkage=0 (auto) spec=0 indirect=1 unass=0 2268 @ 29789: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2269 @ 29790: FINISH ) {lev=2} 650 %INTEGER I,L,S,J,M 2270 @ 29791: LINE 650 "regression-compile-tmp/asems412.imp" 2271 @ 29830: DEF I p1=V_00da 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 2272 @ 29843: DEF L p1=V_00db 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 2273 @ 29856: DEF S p1=V_00dc 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 2274 @ 29869: DEF J p1=V_00dd 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 2275 @ 29882: DEF M p1=V_00de 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 651 %REAL N,FACTOR,TEN,ONE 2276 @ 29895: LINE 651 "regression-compile-tmp/asems412.imp" 2277 @ 29934: DEF N p1=V_00df a/tf=21 b/format=1 c/ostate=0 type=2 (real) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2278 @ 29947: DEF FACTOR p1=V_00e0 a/tf=21 b/format=1 c/ostate=0 type=2 (real) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2279 @ 29965: DEF TEN p1=V_00e1 a/tf=21 b/format=1 c/ostate=0 type=2 (real) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2280 @ 29980: DEF ONE p1=V_00e2 a/tf=21 b/format=1 c/ostate=0 type=2 (real) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 652 I = 10; TEN = I; ! ...TO PREVENT COMPILE-TIME FLOATING 2281 @ 29995: LINE 652 "regression-compile-tmp/asems412.imp" 2282 @ 30034: PUSH I 2283 @ 30037: PUSHI #0x0000000a 2284 @ 30042: ASSVAL 2285 @ 30043: LINE 652 "regression-compile-tmp/asems412.imp" 2286 @ 30082: PUSH TEN 2287 @ 30085: PUSH I 2288 @ 30088: ASSVAL 653 I = 1; ONE = I; ! ... AND AGAIN 2289 @ 30089: LINE 653 "regression-compile-tmp/asems412.imp" 2290 @ 30128: PUSH I 2291 @ 30131: PUSHI #0x00000001 2292 @ 30136: ASSVAL 2293 @ 30137: LINE 653 "regression-compile-tmp/asems412.imp" 2294 @ 30176: PUSH ONE 2295 @ 30179: PUSH I 2296 @ 30182: ASSVAL 654 M = 0; N = 0; L = TAG; SKIP SYMBOL 2297 @ 30183: LINE 654 "regression-compile-tmp/asems412.imp" 2298 @ 30222: PUSH M 2299 @ 30225: PUSHI #0x00000000 2300 @ 30230: ASSVAL 2301 @ 30231: LINE 654 "regression-compile-tmp/asems412.imp" 2302 @ 30270: PUSH N 2303 @ 30273: PUSHI #0x00000000 2304 @ 30278: ASSVAL 2305 @ 30279: LINE 654 "regression-compile-tmp/asems412.imp" 2306 @ 30318: PUSH L 2307 @ 30321: PUSH TAG 2308 @ 30324: CALL 2309 @ 30325: ASSVAL 2310 @ 30326: LINE 654 "regression-compile-tmp/asems412.imp" 2311 @ 30365: PUSH SKIPSYMBOL 2312 @ 30368: CALL 655 %CYCLE J = 1,1,L 2313 @ 30369: LINE 655 "regression-compile-tmp/asems412.imp" 2314 @ 30408: PUSH J 2315 @ 30411: PUSHI #0x00000001 2316 @ 30416: PUSH L 2317 @ 30419: PUSHI #0x00000001 2318 @ 30424: FOR L_0003 656 READ SYMBOL(S) 2319 @ 30427: LINE 656 "regression-compile-tmp/asems412.imp" 2320 @ 30466: PUSH READSYMBOL 2321 @ 30469: PUSH S 2322 @ 30472: ASSPAR 2323 @ 30473: CALL 657 %IF S = '.' %START 2324 @ 30474: LINE 657 "regression-compile-tmp/asems412.imp" 2325 @ 30513: PUSH S 2326 @ 30516: PUSHI #0x0000002e 2327 @ 30521: JUMPIF # L_0007 658 FACTOR = 1; M = 1 2328 @ 30525: LINE 658 "regression-compile-tmp/asems412.imp" 2329 @ 30564: PUSH FACTOR 2330 @ 30567: PUSHI #0x00000001 2331 @ 30572: ASSVAL 2332 @ 30573: LINE 658 "regression-compile-tmp/asems412.imp" 2333 @ 30612: PUSH M 2334 @ 30615: PUSHI #0x00000001 2335 @ 30620: ASSVAL 659 %ELSE 2336 @ 30621: LINE 659 "regression-compile-tmp/asems412.imp" 2337 @ 30660: GOTO L_0006 2338 @ 30663: LOCATE L_0007 660 I = S-'A' 2339 @ 30666: LINE 660 "regression-compile-tmp/asems412.imp" 2340 @ 30705: PUSH I 2341 @ 30708: PUSH S 2342 @ 30711: PUSHI #0x00000041 2343 @ 30716: SUB 2344 @ 30717: ASSVAL 661 %IF M = 0 %START 2345 @ 30718: LINE 661 "regression-compile-tmp/asems412.imp" 2346 @ 30757: PUSH M 2347 @ 30760: PUSHI #0x00000000 2348 @ 30765: JUMPIF # L_000a 662 N = N*TEN + I 2349 @ 30769: LINE 662 "regression-compile-tmp/asems412.imp" 2350 @ 30808: PUSH N 2351 @ 30811: PUSH N 2352 @ 30814: PUSH TEN 2353 @ 30817: MUL 2354 @ 30818: PUSH I 2355 @ 30821: ADD 2356 @ 30822: ASSVAL 663 %ELSE 2357 @ 30823: LINE 663 "regression-compile-tmp/asems412.imp" 2358 @ 30862: GOTO L_0009 2359 @ 30865: LOCATE L_000a 664 FACTOR = FACTOR/TEN 2360 @ 30868: LINE 664 "regression-compile-tmp/asems412.imp" 2361 @ 30907: PUSH FACTOR 2362 @ 30910: PUSH FACTOR 2363 @ 30913: PUSH TEN 2364 @ 30916: DIVIDE 2365 @ 30917: ASSVAL 665 N = N + I*FACTOR 2366 @ 30918: LINE 665 "regression-compile-tmp/asems412.imp" 2367 @ 30957: PUSH N 2368 @ 30960: PUSH N 2369 @ 30963: PUSH I 2370 @ 30966: PUSH FACTOR 2371 @ 30969: MUL 2372 @ 30970: ADD 2373 @ 30971: ASSVAL 666 %FINISH 2374 @ 30972: LINE 666 "regression-compile-tmp/asems412.imp" 2375 @ 31011: LOCATE L_0009 667 %FINISH 2376 @ 31014: LINE 667 "regression-compile-tmp/asems412.imp" 2377 @ 31053: LOCATE L_0006 668 %REPEAT 2378 @ 31056: LINE 668 "regression-compile-tmp/asems412.imp" 2379 @ 31095: REPEAT L_0003 2380 @ 31098: LOCATE L_0004 669 %RESULT = N 2381 @ 31101: LINE 669 "regression-compile-tmp/asems412.imp" 2382 @ 31140: PUSH N 2383 @ 31143: RESULT 670 %END 2384 @ 31144: LINE 670 "regression-compile-tmp/asems412.imp" 2385 @ 31183: END _lev0id0_REALCONSTANT {lev=2 --> 1} 671 %ROUTINE RELEASE(%INTEGER REG) 2386 @ 31184: LINE 671 "regression-compile-tmp/asems412.imp" 2387 @ 31223: DEF RELEASE (_lev0id0_RELEASE) p1=V_00da 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 2388 @ 31242: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2389 @ 31243: DEF REG p1=V_00db 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 2390 @ 31258: FINISH ) {lev=2} 672 %RETURN %IF REG = 0 %OR ACTIVITY(REG) < 0;! LOCKED 2391 @ 31259: LINE 672 "regression-compile-tmp/asems412.imp" 2392 @ 31298: PUSH REG 2393 @ 31301: PUSHI #0x00000000 2394 @ 31306: JUMPIF = L_0005 2395 @ 31310: PUSH ACTIVITY 2396 @ 31313: PUSH REG 2397 @ 31316: ACCESS 2398 @ 31317: PUSHI #0x00000000 2399 @ 31322: JUMPIF >= L_0004 2400 @ 31326: LOCATE L_0005 2401 @ 31329: RETURN 2402 @ 31330: LOCATE L_0004 673 ACTIVITY(REG) = ACTIVITY(REG)-1 2403 @ 31333: LINE 673 "regression-compile-tmp/asems412.imp" 2404 @ 31372: PUSH ACTIVITY 2405 @ 31375: PUSH REG 2406 @ 31378: ACCESS 2407 @ 31379: PUSH ACTIVITY 2408 @ 31382: PUSH REG 2409 @ 31385: ACCESS 2410 @ 31386: PUSHI #0x00000001 2411 @ 31391: SUB 2412 @ 31392: ASSVAL 674 ABORT(1) %IF ACTIVITY(REG) < 0 2413 @ 31393: LINE 674 "regression-compile-tmp/asems412.imp" 2414 @ 31432: PUSH ACTIVITY 2415 @ 31435: PUSH REG 2416 @ 31438: ACCESS 2417 @ 31439: PUSHI #0x00000000 2418 @ 31444: JUMPIF >= L_0004 2419 @ 31448: PUSH ABORT 2420 @ 31451: PUSHI #0x00000001 2421 @ 31456: ASSPAR 2422 @ 31457: CALL 2423 @ 31458: LOCATE L_0004 675 %END 2424 @ 31461: LINE 675 "regression-compile-tmp/asems412.imp" 2425 @ 31500: END _lev0id0_RELEASE {lev=2 --> 1} 676 %ROUTINE CLAIM(%INTEGER REG) 2426 @ 31501: LINE 676 "regression-compile-tmp/asems412.imp" 2427 @ 31540: DEF CLAIM (_lev0id0_CLAIM) p1=V_00db 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 2428 @ 31557: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2429 @ 31558: DEF REG p1=V_00dc 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 2430 @ 31573: FINISH ) {lev=2} 677 %RETURN %IF REG = 0 %OR ACTIVITY(REG) < 0 2431 @ 31574: LINE 677 "regression-compile-tmp/asems412.imp" 2432 @ 31613: PUSH REG 2433 @ 31616: PUSHI #0x00000000 2434 @ 31621: JUMPIF = L_0005 2435 @ 31625: PUSH ACTIVITY 2436 @ 31628: PUSH REG 2437 @ 31631: ACCESS 2438 @ 31632: PUSHI #0x00000000 2439 @ 31637: JUMPIF >= L_0004 2440 @ 31641: LOCATE L_0005 2441 @ 31644: RETURN 2442 @ 31645: LOCATE L_0004 678 USED(REG) = CA 2443 @ 31648: LINE 678 "regression-compile-tmp/asems412.imp" 2444 @ 31687: PUSH USED 2445 @ 31690: PUSH REG 2446 @ 31693: ACCESS 2447 @ 31694: PUSH CA 2448 @ 31697: ASSVAL 679 ACTIVITY(REG) = ACTIVITY(REG)+1 2449 @ 31698: LINE 679 "regression-compile-tmp/asems412.imp" 2450 @ 31737: PUSH ACTIVITY 2451 @ 31740: PUSH REG 2452 @ 31743: ACCESS 2453 @ 31744: PUSH ACTIVITY 2454 @ 31747: PUSH REG 2455 @ 31750: ACCESS 2456 @ 31751: PUSHI #0x00000001 2457 @ 31756: ADD 2458 @ 31757: ASSVAL 680 %END 2459 @ 31758: LINE 680 "regression-compile-tmp/asems412.imp" 2460 @ 31797: END _lev0id0_CLAIM {lev=2 --> 1} 681 %ROUTINE FORGET(%INTEGER REG) 2461 @ 31798: LINE 681 "regression-compile-tmp/asems412.imp" 2462 @ 31837: DEF FORGET (_lev0id0_FORGET) p1=V_00dc 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 2463 @ 31855: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2464 @ 31856: DEF REG p1=V_00dd 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 2465 @ 31871: FINISH ) {lev=2} 682 USE(REG)_CA = LIMEN; USE(REG+STORE)_CA = LIMEN 2466 @ 31872: LINE 682 "regression-compile-tmp/asems412.imp" 2467 @ 31911: PUSH USE 2468 @ 31914: PUSH REG 2469 @ 31917: ACCESS 2470 @ 31918: SELECT 2 2471 @ 31921: PUSH LIMEN 2472 @ 31924: ASSVAL 2473 @ 31925: LINE 682 "regression-compile-tmp/asems412.imp" 2474 @ 31964: PUSH USE 2475 @ 31967: PUSH REG 2476 @ 31970: PUSHI #0x00000014 2477 @ 31975: ADD 2478 @ 31976: ACCESS 2479 @ 31977: SELECT 2 2480 @ 31980: PUSH LIMEN 2481 @ 31983: ASSVAL 683 %END 2482 @ 31984: LINE 683 "regression-compile-tmp/asems412.imp" 2483 @ 32023: END _lev0id0_FORGET {lev=2 --> 1} 684 %ROUTINE FORGET DEST(%RECORD(STACKFM)%NAME V) 2484 @ 32024: LINE 684 "regression-compile-tmp/asems412.imp" 2485 @ 32063: DEF FORGETDEST (_lev0id0_FORGETDEST) p1=V_00dd 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 2486 @ 32085: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2487 @ 32086: DEF V p1=V_00de a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2488 @ 32099: FINISH ) {lev=2} 685 %CONSTBYTEINTEGERARRAY BITS(0:7) = 15,15,8,12,12,12,15,15 2489 @ 32100: LINE 685 "regression-compile-tmp/asems412.imp" 2490 @ 32139: PUSHI #0x00000000 2491 @ 32144: PUSHI #0x00000007 2492 @ 32149: BOUNDS 2493 @ 32150: DEF BITS 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 2494 @ 32166: PUSHI #0x0000000f 2495 @ 32171: INIT 1 2496 @ 32174: PUSHI #0x0000000f 2497 @ 32179: INIT 1 2498 @ 32182: PUSHI #0x00000008 2499 @ 32187: INIT 1 2500 @ 32190: PUSHI #0x0000000c 2501 @ 32195: INIT 1 2502 @ 32198: PUSHI #0x0000000c 2503 @ 32203: INIT 1 2504 @ 32206: PUSHI #0x0000000c 2505 @ 32211: INIT 1 2506 @ 32214: PUSHI #0x0000000f 2507 @ 32219: INIT 1 2508 @ 32222: PUSHI #0x0000000f 2509 @ 32227: INIT 1 686 %INTEGER R, MASK, ADDR, TYPE 2510 @ 32230: LINE 686 "regression-compile-tmp/asems412.imp" 2511 @ 32269: DEF R p1=V_00e0 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 2512 @ 32282: DEF MASK p1=V_00e1 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 2513 @ 32298: DEF ADDR p1=V_00e2 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 2514 @ 32314: DEF TYPE p1=V_00e3 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 687 %RECORD(USEFM)%NAME U 688 2515 @ 32330: LINE 687 "regression-compile-tmp/asems412.imp" 2516 @ 32369: DEF U p1=V_00e4 a/tf=42 b/format=89 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 689 ADDR = V_DISP!3; MASK = BITS(V_TYPE)>>(V_DISP&3) 690 2517 @ 32382: LINE 689 "regression-compile-tmp/asems412.imp" 2518 @ 32421: PUSH ADDR 2519 @ 32424: PUSH V 2520 @ 32427: SELECT 1 2521 @ 32430: PUSHI #0x00000003 2522 @ 32435: OR 2523 @ 32436: ASSVAL 2524 @ 32437: LINE 689 "regression-compile-tmp/asems412.imp" 2525 @ 32476: PUSH MASK 2526 @ 32479: PUSH BITS 2527 @ 32482: PUSH V 2528 @ 32485: SELECT 8 2529 @ 32488: ACCESS 2530 @ 32489: PUSH V 2531 @ 32492: SELECT 1 2532 @ 32495: PUSHI #0x00000003 2533 @ 32500: AND 2534 @ 32501: RSH 2535 @ 32502: ASSVAL 691 %FOR R = 1, 1, 40 %CYCLE 2536 @ 32503: LINE 691 "regression-compile-tmp/asems412.imp" 2537 @ 32542: PUSH R 2538 @ 32545: PUSHI #0x00000001 2539 @ 32550: PUSHI #0x00000028 2540 @ 32555: PUSHI #0x00000001 2541 @ 32560: FOR L_0003 692 U == USE(R) 2542 @ 32563: LINE 692 "regression-compile-tmp/asems412.imp" 2543 @ 32602: PUSH U 2544 @ 32605: PUSH USE 2545 @ 32608: PUSH R 2546 @ 32611: ACCESS 2547 @ 32612: ASSREF 693 %IF U_CA > LIMEN %START 2548 @ 32613: LINE 693 "regression-compile-tmp/asems412.imp" 2549 @ 32652: PUSH U 2550 @ 32655: SELECT 2 2551 @ 32658: PUSH LIMEN 2552 @ 32661: JUMPIF <= L_0007 694 %IF U_BASE&255 = V_BASE %AND U_FORM # A V IN S %START 2553 @ 32665: LINE 694 "regression-compile-tmp/asems412.imp" 2554 @ 32704: PUSH U 2555 @ 32707: SELECT 3 2556 @ 32710: PUSHI #0x000000ff 2557 @ 32715: AND 2558 @ 32716: PUSH V 2559 @ 32719: SELECT 6 2560 @ 32722: JUMPIF # L_000a 2561 @ 32726: PUSH U 2562 @ 32729: SELECT 5 2563 @ 32732: PUSHI #0x00000006 2564 @ 32737: JUMPIF = L_000a 695 %IF U_DISP!3 = ADDR %START 2565 @ 32741: LINE 695 "regression-compile-tmp/asems412.imp" 2566 @ 32780: PUSH U 2567 @ 32783: SELECT 1 2568 @ 32786: PUSHI #0x00000003 2569 @ 32791: OR 2570 @ 32792: PUSH ADDR 2571 @ 32795: JUMPIF # L_000d 696 TYPE = U_TYPE 2572 @ 32799: LINE 696 "regression-compile-tmp/asems412.imp" 2573 @ 32838: PUSH TYPE 2574 @ 32841: PUSH U 2575 @ 32844: SELECT 4 2576 @ 32847: ASSVAL 697 TYPE = 7 %IF U_FORM&128 # 0 2577 @ 32848: LINE 697 "regression-compile-tmp/asems412.imp" 2578 @ 32887: PUSH U 2579 @ 32890: SELECT 5 2580 @ 32893: PUSHI #0x00000080 2581 @ 32898: AND 2582 @ 32899: PUSHI #0x00000000 2583 @ 32904: JUMPIF = L_0010 2584 @ 32908: PUSH TYPE 2585 @ 32911: PUSHI #0x00000007 2586 @ 32916: ASSVAL 2587 @ 32917: LOCATE L_0010 698 type = 0 %if type = 255 {unsigned halfword} 2588 @ 32920: LINE 698 "regression-compile-tmp/asems412.imp" 2589 @ 32959: PUSH TYPE 2590 @ 32962: PUSHI #0x000000ff 2591 @ 32967: JUMPIF # L_0010 2592 @ 32971: PUSH TYPE 2593 @ 32974: PUSHI #0x00000000 2594 @ 32979: ASSVAL 2595 @ 32980: LOCATE L_0010 699 %IF BITS(TYPE)>>(U_DISP&3) & MASK # 0 %START 2596 @ 32983: LINE 699 "regression-compile-tmp/asems412.imp" 2597 @ 33022: PUSH BITS 2598 @ 33025: PUSH TYPE 2599 @ 33028: ACCESS 2600 @ 33029: PUSH U 2601 @ 33032: SELECT 1 2602 @ 33035: PUSHI #0x00000003 2603 @ 33040: AND 2604 @ 33041: RSH 2605 @ 33042: PUSH MASK 2606 @ 33045: AND 2607 @ 33046: PUSHI #0x00000000 2608 @ 33051: JUMPIF = L_0010 700 U_CA = LIMEN; ! FORGET IT 2609 @ 33055: LINE 700 "regression-compile-tmp/asems412.imp" 2610 @ 33094: PUSH U 2611 @ 33097: SELECT 2 2612 @ 33100: PUSH LIMEN 2613 @ 33103: ASSVAL 701 %FINISH 2614 @ 33104: LINE 701 "regression-compile-tmp/asems412.imp" 2615 @ 33143: LOCATE L_0010 702 %FINISH 2616 @ 33146: LINE 702 "regression-compile-tmp/asems412.imp" 2617 @ 33185: LOCATE L_000d 703 %FINISH 2618 @ 33188: LINE 703 "regression-compile-tmp/asems412.imp" 2619 @ 33227: LOCATE L_000a 704 %FINISH 2620 @ 33230: LINE 704 "regression-compile-tmp/asems412.imp" 2621 @ 33269: LOCATE L_0007 705 %REPEAT 2622 @ 33272: LINE 705 "regression-compile-tmp/asems412.imp" 2623 @ 33311: REPEAT L_0003 2624 @ 33314: LOCATE L_0004 706 %END 2625 @ 33317: LINE 706 "regression-compile-tmp/asems412.imp" 2626 @ 33356: END _lev0id0_FORGETDEST {lev=2 --> 1} 707 %ROUTINE HAZARD(%INTEGER REG) 2627 @ 33357: LINE 707 "regression-compile-tmp/asems412.imp" 2628 @ 33396: DEF HAZARD (_lev0id0_HAZARD) p1=V_00de 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 2629 @ 33414: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2630 @ 33415: DEF REG p1=V_00df 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 2631 @ 33430: FINISH ) {lev=2} 708 %RECORD(DFM)%NAME P 2632 @ 33431: LINE 708 "regression-compile-tmp/asems412.imp" 2633 @ 33470: DEF P p1=V_00e0 a/tf=42 b/format=92 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 709 %INTEGER N, T, OP 2634 @ 33483: LINE 709 "regression-compile-tmp/asems412.imp" 2635 @ 33522: DEF N p1=V_00e1 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 2636 @ 33535: DEF T p1=V_00e2 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 2637 @ 33548: DEF OP p1=V_00e3 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 710 %ROUTINE MOD(%RECORD(STACKFM)%NAME V) 2638 @ 33562: LINE 710 "regression-compile-tmp/asems412.imp" 2639 @ 33601: DEF MOD (_lev0id0_HAZARD_MOD) p1=V_00e4 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 2640 @ 33616: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 2641 @ 33617: DEF V p1=V_00e5 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2642 @ 33630: FINISH ) {lev=3} 711 %SWITCH S(0:7) 2643 @ 33631: LINE 711 "regression-compile-tmp/asems412.imp" 2644 @ 33670: PUSHI #0x00000000 2645 @ 33675: PUSHI #0x00000007 2646 @ 33680: BOUNDS 2647 @ 33681: DEF S p1=V_00e6 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 712 N = N-1 2648 @ 33694: LINE 712 "regression-compile-tmp/asems412.imp" 2649 @ 33733: PUSH N 2650 @ 33736: PUSH N 2651 @ 33739: PUSHI #0x00000001 2652 @ 33744: SUB 2653 @ 33745: ASSVAL 713 ->S(V_FORM) 2654 @ 33746: LINE 713 "regression-compile-tmp/asems412.imp" 2655 @ 33785: PUSH V 2656 @ 33788: SELECT 9 2657 @ 33791: SJUMP 230 714 S(CONSTANT): 2658 @ 33794: LINE 714 "regression-compile-tmp/asems412.imp" 2659 @ 33833: PUSHI #0x00000000 2660 @ 33838: SLABEL 230 715 S(A IN REC): 2661 @ 33841: LINE 715 "regression-compile-tmp/asems412.imp" 2662 @ 33880: PUSHI #0x00000004 2663 @ 33885: SLABEL 230 716 S(V IN REC): 2664 @ 33888: LINE 716 "regression-compile-tmp/asems412.imp" 2665 @ 33927: PUSHI #0x00000005 2666 @ 33932: SLABEL 230 717 S(AV IN REC): ABORT(3) 2667 @ 33935: LINE 717 "regression-compile-tmp/asems412.imp" 2668 @ 33974: PUSHI #0x00000007 2669 @ 33979: SLABEL 230 2670 @ 33982: LINE 717 "regression-compile-tmp/asems412.imp" 2671 @ 34021: PUSH ABORT 2672 @ 34024: PUSHI #0x00000003 2673 @ 34029: ASSPAR 2674 @ 34030: CALL 718 S(A IN S): V_FORM = A IN REC; V_EXTRA = T; ->DONE 2675 @ 34031: LINE 718 "regression-compile-tmp/asems412.imp" 2676 @ 34070: PUSHI #0x00000002 2677 @ 34075: SLABEL 230 2678 @ 34078: LINE 718 "regression-compile-tmp/asems412.imp" 2679 @ 34117: PUSH V 2680 @ 34120: SELECT 9 2681 @ 34123: PUSHI #0x00000004 2682 @ 34128: ASSVAL 2683 @ 34129: LINE 718 "regression-compile-tmp/asems412.imp" 2684 @ 34168: PUSH V 2685 @ 34171: SELECT 3 2686 @ 34174: PUSH T 2687 @ 34177: ASSVAL 2688 @ 34178: LINE 718 "regression-compile-tmp/asems412.imp" 2689 @ 34217: JUMP L_00e7 719 S(AV IN S): V_FORM = AV IN REC; V_EXTRA = T; ->DONE 2690 @ 34220: LINE 719 "regression-compile-tmp/asems412.imp" 2691 @ 34259: PUSHI #0x00000006 2692 @ 34264: SLABEL 230 2693 @ 34267: LINE 719 "regression-compile-tmp/asems412.imp" 2694 @ 34306: PUSH V 2695 @ 34309: SELECT 9 2696 @ 34312: PUSHI #0x00000007 2697 @ 34317: ASSVAL 2698 @ 34318: LINE 719 "regression-compile-tmp/asems412.imp" 2699 @ 34357: PUSH V 2700 @ 34360: SELECT 3 2701 @ 34363: PUSH T 2702 @ 34366: ASSVAL 2703 @ 34367: LINE 719 "regression-compile-tmp/asems412.imp" 2704 @ 34406: JUMP L_00e7 720 S(V IN S): V_FORM = V IN REC; V_EXTRA = T; ->DONE 2705 @ 34409: LINE 720 "regression-compile-tmp/asems412.imp" 2706 @ 34448: PUSHI #0x00000003 2707 @ 34453: SLABEL 230 2708 @ 34456: LINE 720 "regression-compile-tmp/asems412.imp" 2709 @ 34495: PUSH V 2710 @ 34498: SELECT 9 2711 @ 34501: PUSHI #0x00000005 2712 @ 34506: ASSVAL 2713 @ 34507: LINE 720 "regression-compile-tmp/asems412.imp" 2714 @ 34546: PUSH V 2715 @ 34549: SELECT 3 2716 @ 34552: PUSH T 2717 @ 34555: ASSVAL 2718 @ 34556: LINE 720 "regression-compile-tmp/asems412.imp" 2719 @ 34595: JUMP L_00e7 721 S(V IN R): V_FORM = V IN S; V_DISP = T 2720 @ 34598: LINE 721 "regression-compile-tmp/asems412.imp" 2721 @ 34637: PUSHI #0x00000001 2722 @ 34642: SLABEL 230 2723 @ 34645: LINE 721 "regression-compile-tmp/asems412.imp" 2724 @ 34684: PUSH V 2725 @ 34687: SELECT 9 2726 @ 34690: PUSHI #0x00000003 2727 @ 34695: ASSVAL 2728 @ 34696: LINE 721 "regression-compile-tmp/asems412.imp" 2729 @ 34735: PUSH V 2730 @ 34738: SELECT 1 2731 @ 34741: PUSH T 2732 @ 34744: ASSVAL 722 DONE: V_BASE = LOCAL 2733 @ 34745: LINE 722 "regression-compile-tmp/asems412.imp" 2734 @ 34784: LABEL L_00e7 2735 @ 34787: LINE 722 "regression-compile-tmp/asems412.imp" 2736 @ 34826: PUSH V 2737 @ 34829: SELECT 6 2738 @ 34832: PUSH LOCAL 2739 @ 34835: ASSVAL 723 %END 2740 @ 34836: LINE 723 "regression-compile-tmp/asems412.imp" 2741 @ 34875: END _lev0id0_HAZARD_MOD {lev=3 --> 2} 724 N = ACTIVITY(REG) 2742 @ 34876: LINE 724 "regression-compile-tmp/asems412.imp" 2743 @ 34915: PUSH N 2744 @ 34918: PUSH ACTIVITY 2745 @ 34921: PUSH REG 2746 @ 34924: ACCESS 2747 @ 34925: ASSVAL 725 %RETURN %IF N <= 0 2748 @ 34926: LINE 725 "regression-compile-tmp/asems412.imp" 2749 @ 34965: PUSH N 2750 @ 34968: PUSHI #0x00000000 2751 @ 34973: JUMPIF > L_0004 2752 @ 34977: RETURN 2753 @ 34978: LOCATE L_0004 726 ACTIVITY(REG) = 0 2754 @ 34981: LINE 726 "regression-compile-tmp/asems412.imp" 2755 @ 35020: PUSH ACTIVITY 2756 @ 35023: PUSH REG 2757 @ 35026: ACCESS 2758 @ 35027: PUSHI #0x00000000 2759 @ 35032: ASSVAL 727 T = TEMP 2760 @ 35033: LINE 727 "regression-compile-tmp/asems412.imp" 2761 @ 35072: PUSH T 2762 @ 35075: PUSH TEMP 2763 @ 35078: CALL 2764 @ 35079: ASSVAL 728 %IF FPR0 <= REG <= FPR14 %THEN OP = STE %ELSE OP = ST 2765 @ 35080: LINE 728 "regression-compile-tmp/asems412.imp" 2766 @ 35119: PUSHI #0x0000000d 2767 @ 35124: PUSH REG 2768 @ 35127: JUMPIFD > L_0004 2769 @ 35131: PUSHI #0x00000014 2770 @ 35136: JUMPIF > L_0004 2771 @ 35140: PUSH OP 2772 @ 35143: PUSHI #0x00006000 2773 @ 35148: ASSVAL 2774 @ 35149: GOTO L_0003 2775 @ 35152: LOCATE L_0004 2776 @ 35155: PUSH OP 2777 @ 35158: PUSHI #0x00005000 2778 @ 35163: ASSVAL 2779 @ 35164: LOCATE L_0003 729 RX(OP, REG, LOCAL, T) 2780 @ 35167: LINE 729 "regression-compile-tmp/asems412.imp" 2781 @ 35206: PUSH RX 2782 @ 35209: PUSH OP 2783 @ 35212: ASSPAR 2784 @ 35213: PUSH REG 2785 @ 35216: ASSPAR 2786 @ 35217: PUSH LOCAL 2787 @ 35220: ASSPAR 2788 @ 35221: PUSH T 2789 @ 35224: ASSPAR 2790 @ 35225: CALL 730 P == USING_LINK 2791 @ 35226: LINE 730 "regression-compile-tmp/asems412.imp" 2792 @ 35265: PUSH P 2793 @ 35268: PUSH USING 2794 @ 35271: SELECT 2 2795 @ 35274: ASSREF 731 %CYCLE 2796 @ 35275: LINE 731 "regression-compile-tmp/asems412.imp" 2797 @ 35314: LOCATE L_0003 732 %EXIT %IF P == NULL 2798 @ 35317: LINE 732 "regression-compile-tmp/asems412.imp" 2799 @ 35356: PUSH P 2800 @ 35359: PUSH NULL 2801 @ 35362: JUMPIFA # L_0007 2802 @ 35366: GOTO L_0004 2803 @ 35369: LOCATE L_0007 733 MOD(P_D) %IF P_D_BASE = REG 2804 @ 35372: LINE 733 "regression-compile-tmp/asems412.imp" 2805 @ 35411: PUSH P 2806 @ 35414: SELECT 1 2807 @ 35417: SELECT 6 2808 @ 35420: PUSH REG 2809 @ 35423: JUMPIF # L_0007 2810 @ 35427: PUSH MOD 2811 @ 35430: PUSH P 2812 @ 35433: SELECT 1 2813 @ 35436: ASSPAR 2814 @ 35437: CALL 2815 @ 35438: LOCATE L_0007 734 P == P_LINK 2816 @ 35441: LINE 734 "regression-compile-tmp/asems412.imp" 2817 @ 35480: PUSH P 2818 @ 35483: PUSH P 2819 @ 35486: SELECT 2 2820 @ 35489: ASSREF 735 %REPEAT 2821 @ 35490: LINE 735 "regression-compile-tmp/asems412.imp" 2822 @ 35529: REPEAT L_0003 2823 @ 35532: LOCATE L_0004 736 ABORT(4) %IF N # 0 2824 @ 35535: LINE 736 "regression-compile-tmp/asems412.imp" 2825 @ 35574: PUSH N 2826 @ 35577: PUSHI #0x00000000 2827 @ 35582: JUMPIF = L_0004 2828 @ 35586: PUSH ABORT 2829 @ 35589: PUSHI #0x00000004 2830 @ 35594: ASSPAR 2831 @ 35595: CALL 2832 @ 35596: LOCATE L_0004 737 %END 2833 @ 35599: LINE 737 "regression-compile-tmp/asems412.imp" 2834 @ 35638: END _lev0id0_HAZARD {lev=2 --> 1} 738 %ROUTINE HAZARD ALL 2835 @ 35639: LINE 738 "regression-compile-tmp/asems412.imp" 2836 @ 35678: DEF HAZARDALL (_lev0id0_HAZARDALL) p1=V_00df 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 2837 @ 35699: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2838 @ 35700: FINISH ) {lev=2} 739 %INTEGER J 2839 @ 35701: LINE 739 "regression-compile-tmp/asems412.imp" 2840 @ 35740: DEF J p1=V_00e0 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 740 HAZARD(J) %FOR J = 1, 1, 20 2841 @ 35753: LINE 740 "regression-compile-tmp/asems412.imp" 2842 @ 35792: PUSH J 2843 @ 35795: PUSHI #0x00000001 2844 @ 35800: PUSHI #0x00000014 2845 @ 35805: PUSHI #0x00000001 2846 @ 35810: FOR L_0003 2847 @ 35813: PUSH HAZARD 2848 @ 35816: PUSH J 2849 @ 35819: ASSPAR 2850 @ 35820: CALL 2851 @ 35821: REPEAT L_0003 2852 @ 35824: LOCATE L_0004 741 %END 2853 @ 35827: LINE 741 "regression-compile-tmp/asems412.imp" 2854 @ 35866: END _lev0id0_HAZARDALL {lev=2 --> 1} 742 %ROUTINE REMEMBER(%INTEGER REG, %RECORD(STACKFM)%NAME V) 2855 @ 35867: LINE 742 "regression-compile-tmp/asems412.imp" 2856 @ 35906: DEF REMEMBER (_lev0id0_REMEMBER) p1=V_00e0 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 2857 @ 35926: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2858 @ 35927: DEF REG p1=V_00e1 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 2859 @ 35942: DEF V p1=V_00e2 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2860 @ 35955: FINISH ) {lev=2} 743 %RECORD(USEFM)%NAME U 2861 @ 35956: LINE 743 "regression-compile-tmp/asems412.imp" 2862 @ 35995: DEF U p1=V_00e3 a/tf=42 b/format=89 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 744 REMEMBER(REG+STORE,V) %IF REG <= STORE 2863 @ 36008: LINE 744 "regression-compile-tmp/asems412.imp" 2864 @ 36047: PUSH REG 2865 @ 36050: PUSHI #0x00000014 2866 @ 36055: JUMPIF > L_0004 2867 @ 36059: PUSH REMEMBER 2868 @ 36062: PUSH REG 2869 @ 36065: PUSHI #0x00000014 2870 @ 36070: ADD 2871 @ 36071: ASSPAR 2872 @ 36072: PUSH V 2873 @ 36075: ASSPAR 2874 @ 36076: CALL 2875 @ 36077: LOCATE L_0004 745 U == USE(REG) 2876 @ 36080: LINE 745 "regression-compile-tmp/asems412.imp" 2877 @ 36119: PUSH U 2878 @ 36122: PUSH USE 2879 @ 36125: PUSH REG 2880 @ 36128: ACCESS 2881 @ 36129: ASSREF 746 U_BASE = V_BASE 2882 @ 36130: LINE 746 "regression-compile-tmp/asems412.imp" 2883 @ 36169: PUSH U 2884 @ 36172: SELECT 3 2885 @ 36175: PUSH V 2886 @ 36178: SELECT 6 2887 @ 36181: ASSVAL 747 U_DISP = V_DISP 2888 @ 36182: LINE 747 "regression-compile-tmp/asems412.imp" 2889 @ 36221: PUSH U 2890 @ 36224: SELECT 1 2891 @ 36227: PUSH V 2892 @ 36230: SELECT 1 2893 @ 36233: ASSVAL 748 U_TYPE = V_TYPE 2894 @ 36234: LINE 748 "regression-compile-tmp/asems412.imp" 2895 @ 36273: PUSH U 2896 @ 36276: SELECT 4 2897 @ 36279: PUSH V 2898 @ 36282: SELECT 8 2899 @ 36285: ASSVAL 749 U_FORM = V_FORM 2900 @ 36286: LINE 749 "regression-compile-tmp/asems412.imp" 2901 @ 36325: PUSH U 2902 @ 36328: SELECT 5 2903 @ 36331: PUSH V 2904 @ 36334: SELECT 9 2905 @ 36337: ASSVAL 750 U_CA = CA 2906 @ 36338: LINE 750 "regression-compile-tmp/asems412.imp" 2907 @ 36377: PUSH U 2908 @ 36380: SELECT 2 2909 @ 36383: PUSH CA 2910 @ 36386: ASSVAL 751 %IF CONTROL < 0 %START 2911 @ 36387: LINE 751 "regression-compile-tmp/asems412.imp" 2912 @ 36426: PUSH CONTROL 2913 @ 36429: PUSHI #0x00000000 2914 @ 36434: JUMPIF >= L_0004 752 SELECTOUTPUT(LIST) 2915 @ 36438: LINE 752 "regression-compile-tmp/asems412.imp" 2916 @ 36477: PUSH SELECTOUTPUT 2917 @ 36480: PUSHI #0x00000001 2918 @ 36485: ASSPAR 2919 @ 36486: CALL 753 PRINTSTRING(" REMEMBER:") 2920 @ 36487: LINE 753 "regression-compile-tmp/asems412.imp" 2921 @ 36526: PUSH PRINTSTRING 2922 @ 36529: PUSHS " REMEMBER:" 2923 @ 36541: ASSPAR 2924 @ 36542: CALL 754 WRITE(U_TYPE, 1); WRITE(U_FORM, 1); WRITE(U_BASE, 3) 2925 @ 36543: LINE 754 "regression-compile-tmp/asems412.imp" 2926 @ 36582: PUSH WRITE 2927 @ 36585: PUSH U 2928 @ 36588: SELECT 4 2929 @ 36591: ASSPAR 2930 @ 36592: PUSHI #0x00000001 2931 @ 36597: ASSPAR 2932 @ 36598: CALL 2933 @ 36599: LINE 754 "regression-compile-tmp/asems412.imp" 2934 @ 36638: PUSH WRITE 2935 @ 36641: PUSH U 2936 @ 36644: SELECT 5 2937 @ 36647: ASSPAR 2938 @ 36648: PUSHI #0x00000001 2939 @ 36653: ASSPAR 2940 @ 36654: CALL 2941 @ 36655: LINE 754 "regression-compile-tmp/asems412.imp" 2942 @ 36694: PUSH WRITE 2943 @ 36697: PUSH U 2944 @ 36700: SELECT 3 2945 @ 36703: ASSPAR 2946 @ 36704: PUSHI #0x00000003 2947 @ 36709: ASSPAR 2948 @ 36710: CALL 755 WRITE(U_DISP,5) 2949 @ 36711: LINE 755 "regression-compile-tmp/asems412.imp" 2950 @ 36750: PUSH WRITE 2951 @ 36753: PUSH U 2952 @ 36756: SELECT 1 2953 @ 36759: ASSPAR 2954 @ 36760: PUSHI #0x00000005 2955 @ 36765: ASSPAR 2956 @ 36766: CALL 756 NEWLINE 2957 @ 36767: LINE 756 "regression-compile-tmp/asems412.imp" 2958 @ 36806: PUSH NEWLINE 2959 @ 36809: CALL 757 SELECTOUTPUT(OBJECT) 2960 @ 36810: LINE 757 "regression-compile-tmp/asems412.imp" 2961 @ 36849: PUSH SELECTOUTPUT 2962 @ 36852: PUSHI #0x00000002 2963 @ 36857: ASSPAR 2964 @ 36858: CALL 758 %FINISH 2965 @ 36859: LINE 758 "regression-compile-tmp/asems412.imp" 2966 @ 36898: LOCATE L_0004 759 %END 2967 @ 36901: LINE 759 "regression-compile-tmp/asems412.imp" 2968 @ 36940: END _lev0id0_REMEMBER {lev=2 --> 1} 760 %INTEGERFN FIND USE(%INTEGER TYPE, FORM, BASE, DISP) 2969 @ 36941: LINE 760 "regression-compile-tmp/asems412.imp" 2970 @ 36980: DEF FINDUSE (_lev0id0_FINDUSE) p1=V_00e1 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 2971 @ 36999: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 2972 @ 37000: DEF TYPE p1=V_00e2 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 2973 @ 37016: DEF FORM p1=V_00e3 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 2974 @ 37032: DEF BASE p1=V_00e4 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 2975 @ 37048: DEF DISP p1=V_00e5 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 2976 @ 37064: FINISH ) {lev=2} 761 %RECORD(USEFM)%NAME U 2977 @ 37065: LINE 761 "regression-compile-tmp/asems412.imp" 2978 @ 37104: DEF U p1=V_00e6 a/tf=42 b/format=89 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 762 %INTEGER J, B, BB, BCA, BBCA 2979 @ 37117: LINE 762 "regression-compile-tmp/asems412.imp" 2980 @ 37156: DEF J p1=V_00e7 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 2981 @ 37169: DEF B p1=V_00e8 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 2982 @ 37182: DEF BB 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 2983 @ 37196: DEF BCA 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 2984 @ 37211: DEF BBCA 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 763 B = BASE&255; BB = BASE>>8 2985 @ 37227: LINE 763 "regression-compile-tmp/asems412.imp" 2986 @ 37266: PUSH B 2987 @ 37269: PUSH BASE 2988 @ 37272: PUSHI #0x000000ff 2989 @ 37277: AND 2990 @ 37278: ASSVAL 2991 @ 37279: LINE 763 "regression-compile-tmp/asems412.imp" 2992 @ 37318: PUSH BB 2993 @ 37321: PUSH BASE 2994 @ 37324: PUSHI #0x00000008 2995 @ 37329: RSH 2996 @ 37330: ASSVAL 764 %IF ACTIVITY(B) < 0 %THEN BCA = LIMEN+1 %ELSE BCA = USE(B)_CA 2997 @ 37331: LINE 764 "regression-compile-tmp/asems412.imp" 2998 @ 37370: PUSH ACTIVITY 2999 @ 37373: PUSH B 3000 @ 37376: ACCESS 3001 @ 37377: PUSHI #0x00000000 3002 @ 37382: JUMPIF >= L_0004 3003 @ 37386: PUSH BCA 3004 @ 37389: PUSH LIMEN 3005 @ 37392: PUSHI #0x00000001 3006 @ 37397: ADD 3007 @ 37398: ASSVAL 3008 @ 37399: GOTO L_0003 3009 @ 37402: LOCATE L_0004 3010 @ 37405: PUSH BCA 3011 @ 37408: PUSH USE 3012 @ 37411: PUSH B 3013 @ 37414: ACCESS 3014 @ 37415: SELECT 2 3015 @ 37418: ASSVAL 3016 @ 37419: LOCATE L_0003 765 %IF ACTIVITY(BB)< 0 %THEN BBCA= LIMEN+1 %ELSE BBCA= USE(BB)_CA 3017 @ 37422: LINE 765 "regression-compile-tmp/asems412.imp" 3018 @ 37461: PUSH ACTIVITY 3019 @ 37464: PUSH BB 3020 @ 37467: ACCESS 3021 @ 37468: PUSHI #0x00000000 3022 @ 37473: JUMPIF >= L_0004 3023 @ 37477: PUSH BBCA 3024 @ 37480: PUSH LIMEN 3025 @ 37483: PUSHI #0x00000001 3026 @ 37488: ADD 3027 @ 37489: ASSVAL 3028 @ 37490: GOTO L_0003 3029 @ 37493: LOCATE L_0004 3030 @ 37496: PUSH BBCA 3031 @ 37499: PUSH USE 3032 @ 37502: PUSH BB 3033 @ 37505: ACCESS 3034 @ 37506: SELECT 2 3035 @ 37509: ASSVAL 3036 @ 37510: LOCATE L_0003 766 %RESULT = 0 %IF BCA <= LIMEN %OR BBCA <= LIMEN 3037 @ 37513: LINE 766 "regression-compile-tmp/asems412.imp" 3038 @ 37552: PUSH BCA 3039 @ 37555: PUSH LIMEN 3040 @ 37558: JUMPIF <= L_0005 3041 @ 37562: PUSH BBCA 3042 @ 37565: PUSH LIMEN 3043 @ 37568: JUMPIF > L_0004 3044 @ 37572: LOCATE L_0005 3045 @ 37575: PUSHI #0x00000000 3046 @ 37580: RESULT 3047 @ 37581: LOCATE L_0004 767 %FOR J = 1, 1, 40 %CYCLE 3048 @ 37584: LINE 767 "regression-compile-tmp/asems412.imp" 3049 @ 37623: PUSH J 3050 @ 37626: PUSHI #0x00000001 3051 @ 37631: PUSHI #0x00000028 3052 @ 37636: PUSHI #0x00000001 3053 @ 37641: FOR L_0003 768 U == USE(J) 3054 @ 37644: LINE 768 "regression-compile-tmp/asems412.imp" 3055 @ 37683: PUSH U 3056 @ 37686: PUSH USE 3057 @ 37689: PUSH J 3058 @ 37692: ACCESS 3059 @ 37693: ASSREF 769 %IF BCA < U_CA %AND BBCA < U_CA %START 3060 @ 37694: LINE 769 "regression-compile-tmp/asems412.imp" 3061 @ 37733: PUSH BCA 3062 @ 37736: PUSH U 3063 @ 37739: SELECT 2 3064 @ 37742: JUMPIF >= L_0007 3065 @ 37746: PUSH BBCA 3066 @ 37749: PUSH U 3067 @ 37752: SELECT 2 3068 @ 37755: JUMPIF >= L_0007 770 %IF U_BASE = BASE %AND U_DISP = DISP %START 3069 @ 37759: LINE 770 "regression-compile-tmp/asems412.imp" 3070 @ 37798: PUSH U 3071 @ 37801: SELECT 3 3072 @ 37804: PUSH BASE 3073 @ 37807: JUMPIF # L_000a 3074 @ 37811: PUSH U 3075 @ 37814: SELECT 1 3076 @ 37817: PUSH DISP 3077 @ 37820: JUMPIF # L_000a 771 %IF U_TYPE = TYPE %AND U_FORM = FORM %START 3078 @ 37824: LINE 771 "regression-compile-tmp/asems412.imp" 3079 @ 37863: PUSH U 3080 @ 37866: SELECT 4 3081 @ 37869: PUSH TYPE 3082 @ 37872: JUMPIF # L_000d 3083 @ 37876: PUSH U 3084 @ 37879: SELECT 5 3085 @ 37882: PUSH FORM 3086 @ 37885: JUMPIF # L_000d 772 %IF J > STORE %START 3087 @ 37889: LINE 772 "regression-compile-tmp/asems412.imp" 3088 @ 37928: PUSH J 3089 @ 37931: PUSHI #0x00000014 3090 @ 37936: JUMPIF <= L_0010 773 J = J-STORE 3091 @ 37940: LINE 773 "regression-compile-tmp/asems412.imp" 3092 @ 37979: PUSH J 3093 @ 37982: PUSH J 3094 @ 37985: PUSHI #0x00000014 3095 @ 37990: SUB 3096 @ 37991: ASSVAL 774 USE(J) = U %IF USE(J)_CA <= LIMEN 3097 @ 37992: LINE 774 "regression-compile-tmp/asems412.imp" 3098 @ 38031: PUSH USE 3099 @ 38034: PUSH J 3100 @ 38037: ACCESS 3101 @ 38038: SELECT 2 3102 @ 38041: PUSH LIMEN 3103 @ 38044: JUMPIF > L_0013 3104 @ 38048: PUSH USE 3105 @ 38051: PUSH J 3106 @ 38054: ACCESS 3107 @ 38055: PUSH U 3108 @ 38058: ASSVAL 3109 @ 38059: LOCATE L_0013 775 %FINISH 3110 @ 38062: LINE 775 "regression-compile-tmp/asems412.imp" 3111 @ 38101: LOCATE L_0010 776 CLAIM(J) 3112 @ 38104: LINE 776 "regression-compile-tmp/asems412.imp" 3113 @ 38143: PUSH CLAIM 3114 @ 38146: PUSH J 3115 @ 38149: ASSPAR 3116 @ 38150: CALL 777 RELEASE(B); RELEASE(BB) 3117 @ 38151: LINE 777 "regression-compile-tmp/asems412.imp" 3118 @ 38190: PUSH RELEASE 3119 @ 38193: PUSH B 3120 @ 38196: ASSPAR 3121 @ 38197: CALL 3122 @ 38198: LINE 777 "regression-compile-tmp/asems412.imp" 3123 @ 38237: PUSH RELEASE 3124 @ 38240: PUSH BB 3125 @ 38243: ASSPAR 3126 @ 38244: CALL 778 %RESULT = J 3127 @ 38245: LINE 778 "regression-compile-tmp/asems412.imp" 3128 @ 38284: PUSH J 3129 @ 38287: RESULT 779 %FINISH 3130 @ 38288: LINE 779 "regression-compile-tmp/asems412.imp" 3131 @ 38327: LOCATE L_000d 780 %FINISH 3132 @ 38330: LINE 780 "regression-compile-tmp/asems412.imp" 3133 @ 38369: LOCATE L_000a 781 %FINISH 3134 @ 38372: LINE 781 "regression-compile-tmp/asems412.imp" 3135 @ 38411: LOCATE L_0007 782 %REPEAT 3136 @ 38414: LINE 782 "regression-compile-tmp/asems412.imp" 3137 @ 38453: REPEAT L_0003 3138 @ 38456: LOCATE L_0004 783 %RESULT = 0 3139 @ 38459: LINE 783 "regression-compile-tmp/asems412.imp" 3140 @ 38498: PUSHI #0x00000000 3141 @ 38503: RESULT 784 %END 3142 @ 38504: LINE 784 "regression-compile-tmp/asems412.imp" 3143 @ 38543: END _lev0id0_FINDUSE {lev=2 --> 1} 785 %INTEGERFN GPR(%INTEGER ADDR) 3144 @ 38544: LINE 785 "regression-compile-tmp/asems412.imp" 3145 @ 38583: DEF GPR (_lev0id0_GPR) p1=V_00e2 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 3146 @ 38598: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3147 @ 38599: DEF ADDR p1=V_00e3 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 3148 @ 38615: FINISH ) {lev=2} 786 %RECORD(USEFM)%NAME UR, US 3149 @ 38616: LINE 786 "regression-compile-tmp/asems412.imp" 3150 @ 38655: DEF UR p1=V_00e4 a/tf=42 b/format=89 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 3151 @ 38669: DEF US p1=V_00e5 a/tf=42 b/format=89 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 787 %INTEGER R, BESTR, BESTCA, BOOTR, BOOTCA, REG, MAXCA 3152 @ 38683: LINE 787 "regression-compile-tmp/asems412.imp" 3153 @ 38722: DEF R p1=V_00e6 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 3154 @ 38735: DEF BESTR p1=V_00e7 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 3155 @ 38752: DEF BESTCA p1=V_00e8 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 3156 @ 38770: DEF BOOTR 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 3157 @ 38787: DEF BOOTCA 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 3158 @ 38805: DEF REG 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 3159 @ 38820: DEF MAXCA 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 788 %CONSTBYTEINTEGERARRAY PREF(0:11) = 789 P1, R11, R9, P2, 790 R10, R12, R4, R3, R1, R2, LINK, R0 791 3160 @ 38837: LINE 788 "regression-compile-tmp/asems412.imp" 3161 @ 38876: PUSHI #0x00000000 3162 @ 38881: PUSHI #0x0000000b 3163 @ 38886: BOUNDS 3164 @ 38887: DEF PREF p1=V_00ed 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 3165 @ 38903: PUSHI #0x00000007 3166 @ 38908: INIT 1 3167 @ 38911: PUSHI #0x0000000a 3168 @ 38916: INIT 1 3169 @ 38919: PUSHI #0x00000008 3170 @ 38924: INIT 1 3171 @ 38927: PUSHI #0x00000006 3172 @ 38932: INIT 1 3173 @ 38935: PUSHI #0x00000009 3174 @ 38940: INIT 1 3175 @ 38943: PUSHI #0x0000000b 3176 @ 38948: INIT 1 3177 @ 38951: PUSHI #0x00000005 3178 @ 38956: INIT 1 3179 @ 38959: PUSHI #0x00000004 3180 @ 38964: INIT 1 3181 @ 38967: PUSHI #0x00000002 3182 @ 38972: INIT 1 3183 @ 38975: PUSHI #0x00000003 3184 @ 38980: INIT 1 3185 @ 38983: PUSHI #0x0000000c 3186 @ 38988: INIT 1 3187 @ 38991: PUSHI #0x00000001 3188 @ 38996: INIT 1 792 BESTR = -1; BOOTR = -1 3189 @ 38999: LINE 792 "regression-compile-tmp/asems412.imp" 3190 @ 39038: PUSH BESTR 3191 @ 39041: PUSHI #0x00000001 3192 @ 39046: NEGATE 3193 @ 39047: ASSVAL 3194 @ 39048: LINE 792 "regression-compile-tmp/asems412.imp" 3195 @ 39087: PUSH BOOTR 3196 @ 39090: PUSHI #0x00000001 3197 @ 39095: NEGATE 3198 @ 39096: ASSVAL 793 BESTCA = CA; BOOTCA = CA 794 3199 @ 39097: LINE 793 "regression-compile-tmp/asems412.imp" 3200 @ 39136: PUSH BESTCA 3201 @ 39139: PUSH CA 3202 @ 39142: ASSVAL 3203 @ 39143: LINE 793 "regression-compile-tmp/asems412.imp" 3204 @ 39182: PUSH BOOTCA 3205 @ 39185: PUSH CA 3206 @ 39188: ASSVAL 795 %CYCLE R = 0, 1, 11-ADDR 3207 @ 39189: LINE 795 "regression-compile-tmp/asems412.imp" 3208 @ 39228: PUSH R 3209 @ 39231: PUSHI #0x00000001 3210 @ 39236: PUSHI #0x0000000b 3211 @ 39241: PUSH ADDR 3212 @ 39244: SUB 3213 @ 39245: PUSHI #0x00000000 3214 @ 39250: FOR L_0003 796 REG = PREF(R) 3215 @ 39253: LINE 796 "regression-compile-tmp/asems412.imp" 3216 @ 39292: PUSH REG 3217 @ 39295: PUSH PREF 3218 @ 39298: PUSH R 3219 @ 39301: ACCESS 3220 @ 39302: ASSVAL 797 %IF ACTIVITY(REG) = 0 %START;! FREE 3221 @ 39303: LINE 797 "regression-compile-tmp/asems412.imp" 3222 @ 39342: PUSH ACTIVITY 3223 @ 39345: PUSH REG 3224 @ 39348: ACCESS 3225 @ 39349: PUSHI #0x00000000 3226 @ 39354: JUMPIF # L_0007 798 UR == USE(REG); US == USE(REG+STORE) 3227 @ 39358: LINE 798 "regression-compile-tmp/asems412.imp" 3228 @ 39397: PUSH UR 3229 @ 39400: PUSH USE 3230 @ 39403: PUSH REG 3231 @ 39406: ACCESS 3232 @ 39407: ASSREF 3233 @ 39408: LINE 798 "regression-compile-tmp/asems412.imp" 3234 @ 39447: PUSH US 3235 @ 39450: PUSH USE 3236 @ 39453: PUSH REG 3237 @ 39456: PUSHI #0x00000014 3238 @ 39461: ADD 3239 @ 39462: ACCESS 3240 @ 39463: ASSREF 799 MAXCA = UR_CA 3241 @ 39464: LINE 799 "regression-compile-tmp/asems412.imp" 3242 @ 39503: PUSH MAXCA 3243 @ 39506: PUSH UR 3244 @ 39509: SELECT 2 3245 @ 39512: ASSVAL 800 MAXCA = US_CA %IF US_CA > MAXCA 3246 @ 39513: LINE 800 "regression-compile-tmp/asems412.imp" 3247 @ 39552: PUSH US 3248 @ 39555: SELECT 2 3249 @ 39558: PUSH MAXCA 3250 @ 39561: JUMPIF <= L_000a 3251 @ 39565: PUSH MAXCA 3252 @ 39568: PUSH US 3253 @ 39571: SELECT 2 3254 @ 39574: ASSVAL 3255 @ 39575: LOCATE L_000a 801 %RESULT = REG %IF MAXCA <= LIMEN;! NOT KNOWN 3256 @ 39578: LINE 801 "regression-compile-tmp/asems412.imp" 3257 @ 39617: PUSH MAXCA 3258 @ 39620: PUSH LIMEN 3259 @ 39623: JUMPIF > L_000a 3260 @ 39627: PUSH REG 3261 @ 39630: RESULT 3262 @ 39631: LOCATE L_000a 802 %IF MAXCA < BESTCA %START 3263 @ 39634: LINE 802 "regression-compile-tmp/asems412.imp" 3264 @ 39673: PUSH MAXCA 3265 @ 39676: PUSH BESTCA 3266 @ 39679: JUMPIF >= L_000a 803 BESTCA = MAXCA; BESTR = REG 3267 @ 39683: LINE 803 "regression-compile-tmp/asems412.imp" 3268 @ 39722: PUSH BESTCA 3269 @ 39725: PUSH MAXCA 3270 @ 39728: ASSVAL 3271 @ 39729: LINE 803 "regression-compile-tmp/asems412.imp" 3272 @ 39768: PUSH BESTR 3273 @ 39771: PUSH REG 3274 @ 39774: ASSVAL 804 %FINISH 3275 @ 39775: LINE 804 "regression-compile-tmp/asems412.imp" 3276 @ 39814: LOCATE L_000a 805 %ELSE %IF 0 < ACTIVITY(REG) < 2 %AND USED(REG) < BOOTCA 3277 @ 39817: LINE 805 "regression-compile-tmp/asems412.imp" 3278 @ 39856: GOTO L_0006 3279 @ 39859: LOCATE L_0007 3280 @ 39862: PUSHI #0x00000000 3281 @ 39867: PUSH ACTIVITY 3282 @ 39870: PUSH REG 3283 @ 39873: ACCESS 3284 @ 39874: JUMPIFD >= L_0007 3285 @ 39878: PUSHI #0x00000002 3286 @ 39883: JUMPIF >= L_0007 3287 @ 39887: PUSH USED 3288 @ 39890: PUSH REG 3289 @ 39893: ACCESS 3290 @ 39894: PUSH BOOTCA 3291 @ 39897: JUMPIF >= L_0007 806 BOOTR = REG; BOOTCA = USED(REG) 3292 @ 39901: LINE 806 "regression-compile-tmp/asems412.imp" 3293 @ 39940: PUSH BOOTR 3294 @ 39943: PUSH REG 3295 @ 39946: ASSVAL 3296 @ 39947: LINE 806 "regression-compile-tmp/asems412.imp" 3297 @ 39986: PUSH BOOTCA 3298 @ 39989: PUSH USED 3299 @ 39992: PUSH REG 3300 @ 39995: ACCESS 3301 @ 39996: ASSVAL 807 %FINISH 3302 @ 39997: LINE 807 "regression-compile-tmp/asems412.imp" 3303 @ 40036: LOCATE L_0007 3304 @ 40039: LOCATE L_0006 808 %REPEAT 3305 @ 40042: LINE 808 "regression-compile-tmp/asems412.imp" 3306 @ 40081: REPEAT L_0003 3307 @ 40084: LOCATE L_0004 809 %RESULT = BESTR %IF BESTR >= 0 810 ! NONE FREE SO BOOT ONE OUT 3308 @ 40087: LINE 809 "regression-compile-tmp/asems412.imp" 3309 @ 40126: PUSH BESTR 3310 @ 40129: PUSHI #0x00000000 3311 @ 40134: JUMPIF < L_0004 3312 @ 40138: PUSH BESTR 3313 @ 40141: RESULT 3314 @ 40142: LOCATE L_0004 811 BOOTR = R1 %IF BOOTR < 0;! NONE BETTER 3315 @ 40145: LINE 811 "regression-compile-tmp/asems412.imp" 3316 @ 40184: PUSH BOOTR 3317 @ 40187: PUSHI #0x00000000 3318 @ 40192: JUMPIF >= L_0004 3319 @ 40196: PUSH BOOTR 3320 @ 40199: PUSHI #0x00000002 3321 @ 40204: ASSVAL 3322 @ 40205: LOCATE L_0004 812 HAZARD(BOOTR); USED(BOOTR) = CA 3323 @ 40208: LINE 812 "regression-compile-tmp/asems412.imp" 3324 @ 40247: PUSH HAZARD 3325 @ 40250: PUSH BOOTR 3326 @ 40253: ASSPAR 3327 @ 40254: CALL 3328 @ 40255: LINE 812 "regression-compile-tmp/asems412.imp" 3329 @ 40294: PUSH USED 3330 @ 40297: PUSH BOOTR 3331 @ 40300: ACCESS 3332 @ 40301: PUSH CA 3333 @ 40304: ASSVAL 813 %RESULT = BOOTR 3334 @ 40305: LINE 813 "regression-compile-tmp/asems412.imp" 3335 @ 40344: PUSH BOOTR 3336 @ 40347: RESULT 814 %END 3337 @ 40348: LINE 814 "regression-compile-tmp/asems412.imp" 3338 @ 40387: END _lev0id0_GPR {lev=2 --> 1} 815 %INTEGERFN EVEN ODD PAIR 3339 @ 40388: LINE 815 "regression-compile-tmp/asems412.imp" 3340 @ 40427: DEF EVENODDPAIR (_lev0id0_EVENODDPAIR) p1=V_00e3 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 3341 @ 40450: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3342 @ 40451: FINISH ) {lev=2} 816 %CONSTBYTEINTEGERARRAY PAIRS(1:5) = R0, R10, R2, R4, LINK 3343 @ 40452: LINE 816 "regression-compile-tmp/asems412.imp" 3344 @ 40491: PUSHI #0x00000001 3345 @ 40496: PUSHI #0x00000005 3346 @ 40501: BOUNDS 3347 @ 40502: DEF PAIRS p1=V_00e4 a/tf=1b b/format=2 c/ostate=112 type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0 3348 @ 40519: PUSHI #0x00000001 3349 @ 40524: INIT 1 3350 @ 40527: PUSHI #0x00000009 3351 @ 40532: INIT 1 3352 @ 40535: PUSHI #0x00000003 3353 @ 40540: INIT 1 3354 @ 40543: PUSHI #0x00000005 3355 @ 40548: INIT 1 3356 @ 40551: PUSHI #0x0000000c 3357 @ 40556: INIT 1 817 %CONSTBYTEINTEGERARRAY NEXT(1:5) = R1, R11, R3, P2, R9 3358 @ 40559: LINE 817 "regression-compile-tmp/asems412.imp" 3359 @ 40598: PUSHI #0x00000001 3360 @ 40603: PUSHI #0x00000005 3361 @ 40608: BOUNDS 3362 @ 40609: DEF NEXT p1=V_00e5 a/tf=1b b/format=2 c/ostate=112 type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0 3363 @ 40625: PUSHI #0x00000002 3364 @ 40630: INIT 1 3365 @ 40633: PUSHI #0x0000000a 3366 @ 40638: INIT 1 3367 @ 40641: PUSHI #0x00000004 3368 @ 40646: INIT 1 3369 @ 40649: PUSHI #0x00000006 3370 @ 40654: INIT 1 3371 @ 40657: PUSHI #0x00000008 3372 @ 40662: INIT 1 818 %INTEGER J, BEST, BESTCA, MAX, HELP, REG, NREG 3373 @ 40665: LINE 818 "regression-compile-tmp/asems412.imp" 3374 @ 40704: DEF J p1=V_00e6 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 3375 @ 40717: DEF BEST p1=V_00e7 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 3376 @ 40733: DEF BESTCA p1=V_00e8 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 3377 @ 40751: DEF MAX 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 3378 @ 40766: DEF HELP 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 3379 @ 40782: DEF REG 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 3380 @ 40797: DEF NREG 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 819 %RECORD(USEFM)%NAME U1, U2 3381 @ 40813: LINE 819 "regression-compile-tmp/asems412.imp" 3382 @ 40852: DEF U1 p1=V_00ed a/tf=42 b/format=89 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 3383 @ 40866: DEF U2 p1=V_00ee a/tf=42 b/format=89 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 820 BEST = 0; BESTCA = CA; HELP = 0 3384 @ 40880: LINE 820 "regression-compile-tmp/asems412.imp" 3385 @ 40919: PUSH BEST 3386 @ 40922: PUSHI #0x00000000 3387 @ 40927: ASSVAL 3388 @ 40928: LINE 820 "regression-compile-tmp/asems412.imp" 3389 @ 40967: PUSH BESTCA 3390 @ 40970: PUSH CA 3391 @ 40973: ASSVAL 3392 @ 40974: LINE 820 "regression-compile-tmp/asems412.imp" 3393 @ 41013: PUSH HELP 3394 @ 41016: PUSHI #0x00000000 3395 @ 41021: ASSVAL 821 %CYCLE J = 1, 1, 5 3396 @ 41022: LINE 821 "regression-compile-tmp/asems412.imp" 3397 @ 41061: PUSH J 3398 @ 41064: PUSHI #0x00000001 3399 @ 41069: PUSHI #0x00000005 3400 @ 41074: PUSHI #0x00000001 3401 @ 41079: FOR L_0003 822 REG = PAIRS(J); NREG = NEXT(J) 3402 @ 41082: LINE 822 "regression-compile-tmp/asems412.imp" 3403 @ 41121: PUSH REG 3404 @ 41124: PUSH PAIRS 3405 @ 41127: PUSH J 3406 @ 41130: ACCESS 3407 @ 41131: ASSVAL 3408 @ 41132: LINE 822 "regression-compile-tmp/asems412.imp" 3409 @ 41171: PUSH NREG 3410 @ 41174: PUSH NEXT 3411 @ 41177: PUSH J 3412 @ 41180: ACCESS 3413 @ 41181: ASSVAL 823 U1 == USE(REG); U2 == USE(NREG) 3414 @ 41182: LINE 823 "regression-compile-tmp/asems412.imp" 3415 @ 41221: PUSH U1 3416 @ 41224: PUSH USE 3417 @ 41227: PUSH REG 3418 @ 41230: ACCESS 3419 @ 41231: ASSREF 3420 @ 41232: LINE 823 "regression-compile-tmp/asems412.imp" 3421 @ 41271: PUSH U2 3422 @ 41274: PUSH USE 3423 @ 41277: PUSH NREG 3424 @ 41280: ACCESS 3425 @ 41281: ASSREF 824 %IF ACTIVITY(REG) = 0 %START 3426 @ 41282: LINE 824 "regression-compile-tmp/asems412.imp" 3427 @ 41321: PUSH ACTIVITY 3428 @ 41324: PUSH REG 3429 @ 41327: ACCESS 3430 @ 41328: PUSHI #0x00000000 3431 @ 41333: JUMPIF # L_0007 825 %IF ACTIVITY(NREG) = 0 %START 3432 @ 41337: LINE 825 "regression-compile-tmp/asems412.imp" 3433 @ 41376: PUSH ACTIVITY 3434 @ 41379: PUSH NREG 3435 @ 41382: ACCESS 3436 @ 41383: PUSHI #0x00000000 3437 @ 41388: JUMPIF # L_000a 826 MAX = U1_CA 3438 @ 41392: LINE 826 "regression-compile-tmp/asems412.imp" 3439 @ 41431: PUSH MAX 3440 @ 41434: PUSH U1 3441 @ 41437: SELECT 2 3442 @ 41440: ASSVAL 827 MAX = U2_CA %IF U2_CA > MAX 3443 @ 41441: LINE 827 "regression-compile-tmp/asems412.imp" 3444 @ 41480: PUSH U2 3445 @ 41483: SELECT 2 3446 @ 41486: PUSH MAX 3447 @ 41489: JUMPIF <= L_000d 3448 @ 41493: PUSH MAX 3449 @ 41496: PUSH U2 3450 @ 41499: SELECT 2 3451 @ 41502: ASSVAL 3452 @ 41503: LOCATE L_000d 828 %IF MAX < BESTCA %START 3453 @ 41506: LINE 828 "regression-compile-tmp/asems412.imp" 3454 @ 41545: PUSH MAX 3455 @ 41548: PUSH BESTCA 3456 @ 41551: JUMPIF >= L_000d 829 BESTCA = MAX; BEST = J 3457 @ 41555: LINE 829 "regression-compile-tmp/asems412.imp" 3458 @ 41594: PUSH BESTCA 3459 @ 41597: PUSH MAX 3460 @ 41600: ASSVAL 3461 @ 41601: LINE 829 "regression-compile-tmp/asems412.imp" 3462 @ 41640: PUSH BEST 3463 @ 41643: PUSH J 3464 @ 41646: ASSVAL 830 %FINISH 3465 @ 41647: LINE 830 "regression-compile-tmp/asems412.imp" 3466 @ 41686: LOCATE L_000d 831 %ELSE 3467 @ 41689: LINE 831 "regression-compile-tmp/asems412.imp" 3468 @ 41728: GOTO L_0009 3469 @ 41731: LOCATE L_000a 832 HELP = J 3470 @ 41734: LINE 832 "regression-compile-tmp/asems412.imp" 3471 @ 41773: PUSH HELP 3472 @ 41776: PUSH J 3473 @ 41779: ASSVAL 833 %FINISH 3474 @ 41780: LINE 833 "regression-compile-tmp/asems412.imp" 3475 @ 41819: LOCATE L_0009 834 %ELSE 3476 @ 41822: LINE 834 "regression-compile-tmp/asems412.imp" 3477 @ 41861: GOTO L_0006 3478 @ 41864: LOCATE L_0007 835 HELP = J %IF ACTIVITY(NREG) = 0 3479 @ 41867: LINE 835 "regression-compile-tmp/asems412.imp" 3480 @ 41906: PUSH ACTIVITY 3481 @ 41909: PUSH NREG 3482 @ 41912: ACCESS 3483 @ 41913: PUSHI #0x00000000 3484 @ 41918: JUMPIF # L_000a 3485 @ 41922: PUSH HELP 3486 @ 41925: PUSH J 3487 @ 41928: ASSVAL 3488 @ 41929: LOCATE L_000a 836 %FINISH 3489 @ 41932: LINE 836 "regression-compile-tmp/asems412.imp" 3490 @ 41971: LOCATE L_0006 837 %REPEAT 3491 @ 41974: LINE 837 "regression-compile-tmp/asems412.imp" 3492 @ 42013: REPEAT L_0003 3493 @ 42016: LOCATE L_0004 838 %RESULT = NEXT(BEST) %IF BEST # 0 3494 @ 42019: LINE 838 "regression-compile-tmp/asems412.imp" 3495 @ 42058: PUSH BEST 3496 @ 42061: PUSHI #0x00000000 3497 @ 42066: JUMPIF = L_0004 3498 @ 42070: PUSH NEXT 3499 @ 42073: PUSH BEST 3500 @ 42076: ACCESS 3501 @ 42077: RESULT 3502 @ 42078: LOCATE L_0004 839 HELP = 2 %IF HELP = 0 3503 @ 42081: LINE 839 "regression-compile-tmp/asems412.imp" 3504 @ 42120: PUSH HELP 3505 @ 42123: PUSHI #0x00000000 3506 @ 42128: JUMPIF # L_0004 3507 @ 42132: PUSH HELP 3508 @ 42135: PUSHI #0x00000002 3509 @ 42140: ASSVAL 3510 @ 42141: LOCATE L_0004 840 REG = PAIRS(HELP); NREG = NEXT(HELP) 3511 @ 42144: LINE 840 "regression-compile-tmp/asems412.imp" 3512 @ 42183: PUSH REG 3513 @ 42186: PUSH PAIRS 3514 @ 42189: PUSH HELP 3515 @ 42192: ACCESS 3516 @ 42193: ASSVAL 3517 @ 42194: LINE 840 "regression-compile-tmp/asems412.imp" 3518 @ 42233: PUSH NREG 3519 @ 42236: PUSH NEXT 3520 @ 42239: PUSH HELP 3521 @ 42242: ACCESS 3522 @ 42243: ASSVAL 841 HAZARD(REG); HAZARD(NREG) 3523 @ 42244: LINE 841 "regression-compile-tmp/asems412.imp" 3524 @ 42283: PUSH HAZARD 3525 @ 42286: PUSH REG 3526 @ 42289: ASSPAR 3527 @ 42290: CALL 3528 @ 42291: LINE 841 "regression-compile-tmp/asems412.imp" 3529 @ 42330: PUSH HAZARD 3530 @ 42333: PUSH NREG 3531 @ 42336: ASSPAR 3532 @ 42337: CALL 842 %RESULT = NREG 3533 @ 42338: LINE 842 "regression-compile-tmp/asems412.imp" 3534 @ 42377: PUSH NREG 3535 @ 42380: RESULT 843 %END 3536 @ 42381: LINE 843 "regression-compile-tmp/asems412.imp" 3537 @ 42420: END _lev0id0_EVENODDPAIR {lev=2 --> 1} 844 %INTEGERFN FPR 3538 @ 42421: LINE 844 "regression-compile-tmp/asems412.imp" 3539 @ 42460: DEF FPR (_lev0id0_FPR) p1=V_00e4 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 3540 @ 42475: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3541 @ 42476: FINISH ) {lev=2} 845 %RECORD(USEFM)%NAME UR, US 3542 @ 42477: LINE 845 "regression-compile-tmp/asems412.imp" 3543 @ 42516: DEF UR p1=V_00e5 a/tf=42 b/format=89 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 3544 @ 42530: DEF US p1=V_00e6 a/tf=42 b/format=89 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 846 %INTEGER R, BESTR, BESTCA, BOOTR, BOOTCA, MAXCA, BOOTA 3545 @ 42544: LINE 846 "regression-compile-tmp/asems412.imp" 3546 @ 42583: DEF R p1=V_00e7 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 3547 @ 42596: DEF BESTR p1=V_00e8 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 3548 @ 42613: DEF BESTCA 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 3549 @ 42631: DEF BOOTR 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 3550 @ 42648: DEF BOOTCA 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 3551 @ 42666: DEF MAXCA 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 3552 @ 42683: DEF BOOTA 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 847 BESTR = -1; BESTCA = CA 3553 @ 42700: LINE 847 "regression-compile-tmp/asems412.imp" 3554 @ 42739: PUSH BESTR 3555 @ 42742: PUSHI #0x00000001 3556 @ 42747: NEGATE 3557 @ 42748: ASSVAL 3558 @ 42749: LINE 847 "regression-compile-tmp/asems412.imp" 3559 @ 42788: PUSH BESTCA 3560 @ 42791: PUSH CA 3561 @ 42794: ASSVAL 848 BOOTR = -1; BOOTCA = CA; BOOTA = CA 3562 @ 42795: LINE 848 "regression-compile-tmp/asems412.imp" 3563 @ 42834: PUSH BOOTR 3564 @ 42837: PUSHI #0x00000001 3565 @ 42842: NEGATE 3566 @ 42843: ASSVAL 3567 @ 42844: LINE 848 "regression-compile-tmp/asems412.imp" 3568 @ 42883: PUSH BOOTCA 3569 @ 42886: PUSH CA 3570 @ 42889: ASSVAL 3571 @ 42890: LINE 848 "regression-compile-tmp/asems412.imp" 3572 @ 42929: PUSH BOOTA 3573 @ 42932: PUSH CA 3574 @ 42935: ASSVAL 849 %CYCLE R = FPR0, 1, FPR14 3575 @ 42936: LINE 849 "regression-compile-tmp/asems412.imp" 3576 @ 42975: PUSH R 3577 @ 42978: PUSHI #0x00000001 3578 @ 42983: PUSHI #0x00000014 3579 @ 42988: PUSHI #0x0000000d 3580 @ 42993: FOR L_0003 850 UR == USE(R); US == USE(R+STORE) 3581 @ 42996: LINE 850 "regression-compile-tmp/asems412.imp" 3582 @ 43035: PUSH UR 3583 @ 43038: PUSH USE 3584 @ 43041: PUSH R 3585 @ 43044: ACCESS 3586 @ 43045: ASSREF 3587 @ 43046: LINE 850 "regression-compile-tmp/asems412.imp" 3588 @ 43085: PUSH US 3589 @ 43088: PUSH USE 3590 @ 43091: PUSH R 3591 @ 43094: PUSHI #0x00000014 3592 @ 43099: ADD 3593 @ 43100: ACCESS 3594 @ 43101: ASSREF 851 %IF ACTIVITY(R) = 0 %START 3595 @ 43102: LINE 851 "regression-compile-tmp/asems412.imp" 3596 @ 43141: PUSH ACTIVITY 3597 @ 43144: PUSH R 3598 @ 43147: ACCESS 3599 @ 43148: PUSHI #0x00000000 3600 @ 43153: JUMPIF # L_0007 852 MAXCA = UR_CA; MAXCA = US_CA %IF US_CA > MAXCA 3601 @ 43157: LINE 852 "regression-compile-tmp/asems412.imp" 3602 @ 43196: PUSH MAXCA 3603 @ 43199: PUSH UR 3604 @ 43202: SELECT 2 3605 @ 43205: ASSVAL 3606 @ 43206: LINE 852 "regression-compile-tmp/asems412.imp" 3607 @ 43245: PUSH US 3608 @ 43248: SELECT 2 3609 @ 43251: PUSH MAXCA 3610 @ 43254: JUMPIF <= L_000a 3611 @ 43258: PUSH MAXCA 3612 @ 43261: PUSH US 3613 @ 43264: SELECT 2 3614 @ 43267: ASSVAL 3615 @ 43268: LOCATE L_000a 853 %RESULT = R %IF MAXCA <= LIMEN 3616 @ 43271: LINE 853 "regression-compile-tmp/asems412.imp" 3617 @ 43310: PUSH MAXCA 3618 @ 43313: PUSH LIMEN 3619 @ 43316: JUMPIF > L_000a 3620 @ 43320: PUSH R 3621 @ 43323: RESULT 3622 @ 43324: LOCATE L_000a 854 %IF MAXCA < BESTCA %START 3623 @ 43327: LINE 854 "regression-compile-tmp/asems412.imp" 3624 @ 43366: PUSH MAXCA 3625 @ 43369: PUSH BESTCA 3626 @ 43372: JUMPIF >= L_000a 855 BESTR = R; BESTCA = MAXCA 3627 @ 43376: LINE 855 "regression-compile-tmp/asems412.imp" 3628 @ 43415: PUSH BESTR 3629 @ 43418: PUSH R 3630 @ 43421: ASSVAL 3631 @ 43422: LINE 855 "regression-compile-tmp/asems412.imp" 3632 @ 43461: PUSH BESTCA 3633 @ 43464: PUSH MAXCA 3634 @ 43467: ASSVAL 856 %FINISH 3635 @ 43468: LINE 856 "regression-compile-tmp/asems412.imp" 3636 @ 43507: LOCATE L_000a 857 %ELSE %IF 0 < ACTIVITY(R) < 2 %AND USED(R) < BOOTCA 3637 @ 43510: LINE 857 "regression-compile-tmp/asems412.imp" 3638 @ 43549: GOTO L_0006 3639 @ 43552: LOCATE L_0007 3640 @ 43555: PUSHI #0x00000000 3641 @ 43560: PUSH ACTIVITY 3642 @ 43563: PUSH R 3643 @ 43566: ACCESS 3644 @ 43567: JUMPIFD >= L_0007 3645 @ 43571: PUSHI #0x00000002 3646 @ 43576: JUMPIF >= L_0007 3647 @ 43580: PUSH USED 3648 @ 43583: PUSH R 3649 @ 43586: ACCESS 3650 @ 43587: PUSH BOOTCA 3651 @ 43590: JUMPIF >= L_0007 858 BOOTCA = USED(R); BOOTR = R 3652 @ 43594: LINE 858 "regression-compile-tmp/asems412.imp" 3653 @ 43633: PUSH BOOTCA 3654 @ 43636: PUSH USED 3655 @ 43639: PUSH R 3656 @ 43642: ACCESS 3657 @ 43643: ASSVAL 3658 @ 43644: LINE 858 "regression-compile-tmp/asems412.imp" 3659 @ 43683: PUSH BOOTR 3660 @ 43686: PUSH R 3661 @ 43689: ASSVAL 859 %FINISH 3662 @ 43690: LINE 859 "regression-compile-tmp/asems412.imp" 3663 @ 43729: LOCATE L_0007 3664 @ 43732: LOCATE L_0006 860 %REPEAT 3665 @ 43735: LINE 860 "regression-compile-tmp/asems412.imp" 3666 @ 43774: REPEAT L_0003 3667 @ 43777: LOCATE L_0004 861 %RESULT = BESTR %UNLESS BESTR < 0 3668 @ 43780: LINE 861 "regression-compile-tmp/asems412.imp" 3669 @ 43819: PUSH BESTR 3670 @ 43822: PUSHI #0x00000000 3671 @ 43827: JUMPIF < L_0004 3672 @ 43831: PUSH BESTR 3673 @ 43834: RESULT 3674 @ 43835: LOCATE L_0004 862 BOOTR = FPR0 %IF BOOTR < 0 3675 @ 43838: LINE 862 "regression-compile-tmp/asems412.imp" 3676 @ 43877: PUSH BOOTR 3677 @ 43880: PUSHI #0x00000000 3678 @ 43885: JUMPIF >= L_0004 3679 @ 43889: PUSH BOOTR 3680 @ 43892: PUSHI #0x0000000d 3681 @ 43897: ASSVAL 3682 @ 43898: LOCATE L_0004 863 HAZARD(BOOTR) 3683 @ 43901: LINE 863 "regression-compile-tmp/asems412.imp" 3684 @ 43940: PUSH HAZARD 3685 @ 43943: PUSH BOOTR 3686 @ 43946: ASSPAR 3687 @ 43947: CALL 864 %RESULT = BOOTR 3688 @ 43948: LINE 864 "regression-compile-tmp/asems412.imp" 3689 @ 43987: PUSH BOOTR 3690 @ 43990: RESULT 865 %END 3691 @ 43991: LINE 865 "regression-compile-tmp/asems412.imp" 3692 @ 44030: END _lev0id0_FPR {lev=2 --> 1} 866 %ROUTINE CHECK RELEASED 3693 @ 44031: LINE 866 "regression-compile-tmp/asems412.imp" 3694 @ 44070: DEF CHECKRELEASED (_lev0id0_CHECKRELEASED) p1=V_00e5 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 3695 @ 44095: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3696 @ 44096: FINISH ) {lev=2} 867 %INTEGER J 3697 @ 44097: LINE 867 "regression-compile-tmp/asems412.imp" 3698 @ 44136: DEF J p1=V_00e6 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 868 %FOR J = 1, 1, 20 %CYCLE 3699 @ 44149: LINE 868 "regression-compile-tmp/asems412.imp" 3700 @ 44188: PUSH J 3701 @ 44191: PUSHI #0x00000001 3702 @ 44196: PUSHI #0x00000014 3703 @ 44201: PUSHI #0x00000001 3704 @ 44206: FOR L_0003 869 ABORT(2) %IF ACTIVITY(J) > 0 3705 @ 44209: LINE 869 "regression-compile-tmp/asems412.imp" 3706 @ 44248: PUSH ACTIVITY 3707 @ 44251: PUSH J 3708 @ 44254: ACCESS 3709 @ 44255: PUSHI #0x00000000 3710 @ 44260: JUMPIF <= L_0007 3711 @ 44264: PUSH ABORT 3712 @ 44267: PUSHI #0x00000002 3713 @ 44272: ASSPAR 3714 @ 44273: CALL 3715 @ 44274: LOCATE L_0007 870 %REPEAT 3716 @ 44277: LINE 870 "regression-compile-tmp/asems412.imp" 3717 @ 44316: REPEAT L_0003 3718 @ 44319: LOCATE L_0004 871 %END 872 873 874 ! OBJECT FILE HANDLING ROUTINES 875 3719 @ 44322: LINE 871 "regression-compile-tmp/asems412.imp" 3720 @ 44361: END _lev0id0_CHECKRELEASED {lev=2 --> 1} 876 %ROUTINE COUNT DIAGS 3721 @ 44362: LINE 876 "regression-compile-tmp/asems412.imp" 3722 @ 44401: DEF COUNTDIAGS (_lev0id0_COUNTDIAGS) p1=V_00e6 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 3723 @ 44423: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3724 @ 44424: FINISH ) {lev=2} 877 %OWNINTEGER HERE = 0 3725 @ 44425: LINE 877 "regression-compile-tmp/asems412.imp" 3726 @ 44464: PUSHI #0x00000000 3727 @ 44469: DEF HERE p1=V_00e7 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 3728 @ 44485: INIT 1 878 LINE SIZE = LINE SIZE+4 %IF HERE # CURRENT LINE 3729 @ 44488: LINE 878 "regression-compile-tmp/asems412.imp" 3730 @ 44527: PUSH HERE 3731 @ 44530: PUSH CURRENTLINE 3732 @ 44533: JUMPIF = L_0004 3733 @ 44537: PUSH LINESIZE 3734 @ 44540: PUSH LINESIZE 3735 @ 44543: PUSHI #0x00000004 3736 @ 44548: ADD 3737 @ 44549: ASSVAL 3738 @ 44550: LOCATE L_0004 879 HERE = CURRENT LINE 3739 @ 44553: LINE 879 "regression-compile-tmp/asems412.imp" 3740 @ 44592: PUSH HERE 3741 @ 44595: PUSH CURRENTLINE 3742 @ 44598: ASSVAL 880 %END 881 3743 @ 44599: LINE 880 "regression-compile-tmp/asems412.imp" 3744 @ 44638: END _lev0id0_COUNTDIAGS {lev=2 --> 1} 882 %ROUTINE PUT(%SHORTINTEGER N) 3745 @ 44639: LINE 882 "regression-compile-tmp/asems412.imp" 3746 @ 44678: DEF PUT (_lev0id0_PUT) p1=V_00e7 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 3747 @ 44693: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3748 @ 44694: DEF N p1=V_00e8 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 3749 @ 44707: FINISH ) {lev=2} 883 PRINT SYMBOL(N>>8); PRINT SYMBOL(N&255) 3750 @ 44708: LINE 883 "regression-compile-tmp/asems412.imp" 3751 @ 44747: PUSH PRINTSYMBOL 3752 @ 44750: PUSH N 3753 @ 44753: PUSHI #0x00000008 3754 @ 44758: RSH 3755 @ 44759: ASSPAR 3756 @ 44760: CALL 3757 @ 44761: LINE 883 "regression-compile-tmp/asems412.imp" 3758 @ 44800: PUSH PRINTSYMBOL 3759 @ 44803: PUSH N 3760 @ 44806: PUSHI #0x000000ff 3761 @ 44811: AND 3762 @ 44812: ASSPAR 3763 @ 44813: CALL 884 %END 3764 @ 44814: LINE 884 "regression-compile-tmp/asems412.imp" 3765 @ 44853: END _lev0id0_PUT {lev=2 --> 1} 885 %ROUTINE DUMP(%SHORTINTEGER N) 3766 @ 44854: LINE 885 "regression-compile-tmp/asems412.imp" 3767 @ 44893: DEF DUMP (_lev0id0_DUMP) 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 3768 @ 44909: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3769 @ 44910: DEF N p1=V_00e9 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 3770 @ 44923: FINISH ) {lev=2} 886 PRINT SYMBOL(LOAD CODE); PUT(N) 3771 @ 44924: LINE 886 "regression-compile-tmp/asems412.imp" 3772 @ 44963: PUSH PRINTSYMBOL 3773 @ 44966: PUSHI #0x00000002 3774 @ 44971: ASSPAR 3775 @ 44972: CALL 3776 @ 44973: LINE 886 "regression-compile-tmp/asems412.imp" 3777 @ 45012: PUSH PUT 3778 @ 45015: PUSH N 3779 @ 45018: ASSPAR 3780 @ 45019: CALL 887 DECODE(N) %IF CONTROL < 0 3781 @ 45020: LINE 887 "regression-compile-tmp/asems412.imp" 3782 @ 45059: PUSH CONTROL 3783 @ 45062: PUSHI #0x00000000 3784 @ 45067: JUMPIF >= L_0004 3785 @ 45071: PUSH DECODE 3786 @ 45074: PUSH N 3787 @ 45077: ASSPAR 3788 @ 45078: CALL 3789 @ 45079: LOCATE L_0004 888 CA = CA+2 3790 @ 45082: LINE 888 "regression-compile-tmp/asems412.imp" 3791 @ 45121: PUSH CA 3792 @ 45124: PUSH CA 3793 @ 45127: PUSHI #0x00000002 3794 @ 45132: ADD 3795 @ 45133: ASSVAL 889 %END 3796 @ 45134: LINE 889 "regression-compile-tmp/asems412.imp" 3797 @ 45173: END _lev0id0_DUMP {lev=2 --> 1} 890 %ROUTINE GHALF(%SHORTINTEGER N) 3798 @ 45174: LINE 890 "regression-compile-tmp/asems412.imp" 3799 @ 45213: DEF GHALF (_lev0id0_GHALF) 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 3800 @ 45230: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3801 @ 45231: DEF N p1=V_00ea a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 3802 @ 45244: FINISH ) {lev=2} 891 PRINT SYMBOL(LOAD GLA); PUT(N) 3803 @ 45245: LINE 891 "regression-compile-tmp/asems412.imp" 3804 @ 45284: PUSH PRINTSYMBOL 3805 @ 45287: PUSHI #0x00000003 3806 @ 45292: ASSPAR 3807 @ 45293: CALL 3808 @ 45294: LINE 891 "regression-compile-tmp/asems412.imp" 3809 @ 45333: PUSH PUT 3810 @ 45336: PUSH N 3811 @ 45339: ASSPAR 3812 @ 45340: CALL 892 GA = GA+2 3813 @ 45341: LINE 892 "regression-compile-tmp/asems412.imp" 3814 @ 45380: PUSH GA 3815 @ 45383: PUSH GA 3816 @ 45386: PUSHI #0x00000002 3817 @ 45391: ADD 3818 @ 45392: ASSVAL 893 %END 3819 @ 45393: LINE 893 "regression-compile-tmp/asems412.imp" 3820 @ 45432: END _lev0id0_GHALF {lev=2 --> 1} 894 %ROUTINE GWORD(%INTEGER N) 3821 @ 45433: LINE 894 "regression-compile-tmp/asems412.imp" 3822 @ 45472: DEF GWORD (_lev0id0_GWORD) 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 3823 @ 45489: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3824 @ 45490: DEF N 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 3825 @ 45503: FINISH ) {lev=2} 895 GHALF(N>>16); GHALF(N&X'FFFF') 3826 @ 45504: LINE 895 "regression-compile-tmp/asems412.imp" 3827 @ 45543: PUSH GHALF 3828 @ 45546: PUSH N 3829 @ 45549: PUSHI #0x00000010 3830 @ 45554: RSH 3831 @ 45555: ASSPAR 3832 @ 45556: CALL 3833 @ 45557: LINE 895 "regression-compile-tmp/asems412.imp" 3834 @ 45596: PUSH GHALF 3835 @ 45599: PUSH N 3836 @ 45602: PUSHI #0x0000ffff 3837 @ 45607: AND 3838 @ 45608: ASSPAR 3839 @ 45609: CALL 896 %END 3840 @ 45610: LINE 896 "regression-compile-tmp/asems412.imp" 3841 @ 45649: END _lev0id0_GWORD {lev=2 --> 1} 897 %ROUTINE GBYTE(%SHORTINTEGER N) 3842 @ 45650: LINE 897 "regression-compile-tmp/asems412.imp" 3843 @ 45689: DEF GBYTE (_lev0id0_GBYTE) 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 3844 @ 45706: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3845 @ 45707: DEF N p1=V_00ec a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 3846 @ 45720: FINISH ) {lev=2} 898 %OWNINTEGER V=0, F=0 3847 @ 45721: LINE 898 "regression-compile-tmp/asems412.imp" 3848 @ 45760: PUSHI #0x00000000 3849 @ 45765: DEF V p1=V_00ed 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 3850 @ 45778: INIT 1 3851 @ 45781: PUSHI #0x00000000 3852 @ 45786: DEF F p1=V_00ee 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 3853 @ 45799: INIT 1 899 F = \F 3854 @ 45802: LINE 899 "regression-compile-tmp/asems412.imp" 3855 @ 45841: PUSH F 3856 @ 45844: PUSH F 3857 @ 45847: NOT 3858 @ 45848: ASSVAL 900 %IF F=0 %START 3859 @ 45849: LINE 900 "regression-compile-tmp/asems412.imp" 3860 @ 45888: PUSH F 3861 @ 45891: PUSHI #0x00000000 3862 @ 45896: JUMPIF # L_0004 901 PRINT SYMBOL(LOAD GLA); PUT(V<<8+N) 3863 @ 45900: LINE 901 "regression-compile-tmp/asems412.imp" 3864 @ 45939: PUSH PRINTSYMBOL 3865 @ 45942: PUSHI #0x00000003 3866 @ 45947: ASSPAR 3867 @ 45948: CALL 3868 @ 45949: LINE 901 "regression-compile-tmp/asems412.imp" 3869 @ 45988: PUSH PUT 3870 @ 45991: PUSH V 3871 @ 45994: PUSHI #0x00000008 3872 @ 45999: LSH 3873 @ 46000: PUSH N 3874 @ 46003: ADD 3875 @ 46004: ASSPAR 3876 @ 46005: CALL 902 %ELSE 3877 @ 46006: LINE 902 "regression-compile-tmp/asems412.imp" 3878 @ 46045: GOTO L_0003 3879 @ 46048: LOCATE L_0004 903 V = N 3880 @ 46051: LINE 903 "regression-compile-tmp/asems412.imp" 3881 @ 46090: PUSH V 3882 @ 46093: PUSH N 3883 @ 46096: ASSVAL 904 %finish 3884 @ 46097: LINE 904 "regression-compile-tmp/asems412.imp" 3885 @ 46136: LOCATE L_0003 905 GA = GA+1 3886 @ 46139: LINE 905 "regression-compile-tmp/asems412.imp" 3887 @ 46178: PUSH GA 3888 @ 46181: PUSH GA 3889 @ 46184: PUSHI #0x00000001 3890 @ 46189: ADD 3891 @ 46190: ASSVAL 906 %END 3892 @ 46191: LINE 906 "regression-compile-tmp/asems412.imp" 3893 @ 46230: END _lev0id0_GBYTE {lev=2 --> 1} 907 %ROUTINE PATCH(%INTEGER WHAT, WHERE) 3894 @ 46231: LINE 907 "regression-compile-tmp/asems412.imp" 3895 @ 46270: DEF PATCH (_lev0id0_PATCH) 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 3896 @ 46287: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3897 @ 46288: DEF WHAT 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 3898 @ 46304: DEF WHERE 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 3899 @ 46321: FINISH ) {lev=2} 908 SELECT OUTPUT(DIRECT) 3900 @ 46322: LINE 908 "regression-compile-tmp/asems412.imp" 3901 @ 46361: PUSH SELECTOUTPUT 3902 @ 46364: PUSHI #0x00000003 3903 @ 46369: ASSPAR 3904 @ 46370: CALL 909 PRINT SYMBOL(PATCH CODE); PUT(WHAT); PUT(WHERE) 3905 @ 46371: LINE 909 "regression-compile-tmp/asems412.imp" 3906 @ 46410: PUSH PRINTSYMBOL 3907 @ 46413: PUSHI #0x00000007 3908 @ 46418: ASSPAR 3909 @ 46419: CALL 3910 @ 46420: LINE 909 "regression-compile-tmp/asems412.imp" 3911 @ 46459: PUSH PUT 3912 @ 46462: PUSH WHAT 3913 @ 46465: ASSPAR 3914 @ 46466: CALL 3915 @ 46467: LINE 909 "regression-compile-tmp/asems412.imp" 3916 @ 46506: PUSH PUT 3917 @ 46509: PUSH WHERE 3918 @ 46512: ASSPAR 3919 @ 46513: CALL 910 SELECT OUTPUT(OBJECT) 3920 @ 46514: LINE 910 "regression-compile-tmp/asems412.imp" 3921 @ 46553: PUSH SELECTOUTPUT 3922 @ 46556: PUSHI #0x00000002 3923 @ 46561: ASSPAR 3924 @ 46562: CALL 911 %END 3925 @ 46563: LINE 911 "regression-compile-tmp/asems412.imp" 3926 @ 46602: END _lev0id0_PATCH {lev=2 --> 1} 912 %ROUTINE GPATCH(%INTEGER WHAT, WHERE) 3927 @ 46603: LINE 912 "regression-compile-tmp/asems412.imp" 3928 @ 46642: DEF GPATCH (_lev0id0_GPATCH) 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 3929 @ 46660: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3930 @ 46661: DEF WHAT 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 3931 @ 46677: DEF WHERE 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 3932 @ 46694: FINISH ) {lev=2} 913 SELECT OUTPUT(DIRECT) 3933 @ 46695: LINE 913 "regression-compile-tmp/asems412.imp" 3934 @ 46734: PUSH SELECTOUTPUT 3935 @ 46737: PUSHI #0x00000003 3936 @ 46742: ASSPAR 3937 @ 46743: CALL 914 PRINT SYMBOL(PATCH GLA); PUT(WHAT); PUT(WHERE) 3938 @ 46744: LINE 914 "regression-compile-tmp/asems412.imp" 3939 @ 46783: PUSH PRINTSYMBOL 3940 @ 46786: PUSHI #0x00000006 3941 @ 46791: ASSPAR 3942 @ 46792: CALL 3943 @ 46793: LINE 914 "regression-compile-tmp/asems412.imp" 3944 @ 46832: PUSH PUT 3945 @ 46835: PUSH WHAT 3946 @ 46838: ASSPAR 3947 @ 46839: CALL 3948 @ 46840: LINE 914 "regression-compile-tmp/asems412.imp" 3949 @ 46879: PUSH PUT 3950 @ 46882: PUSH WHERE 3951 @ 46885: ASSPAR 3952 @ 46886: CALL 915 SELECT OUTPUT(OBJECT) 3953 @ 46887: LINE 915 "regression-compile-tmp/asems412.imp" 3954 @ 46926: PUSH SELECTOUTPUT 3955 @ 46929: PUSHI #0x00000002 3956 @ 46934: ASSPAR 3957 @ 46935: CALL 916 %END 3958 @ 46936: LINE 916 "regression-compile-tmp/asems412.imp" 3959 @ 46975: END _lev0id0_GPATCH {lev=2 --> 1} 917 %ROUTINE GFIX(%INTEGER ALIGNMENT) 3960 @ 46976: LINE 917 "regression-compile-tmp/asems412.imp" 3961 @ 47015: DEF GFIX (_lev0id0_GFIX) 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 3962 @ 47031: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3963 @ 47032: DEF ALIGNMENT 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 3964 @ 47053: FINISH ) {lev=2} 918 GBYTE(0) %WHILE GA&(ALIGNMENT-1) # 0 3965 @ 47054: LINE 918 "regression-compile-tmp/asems412.imp" 3966 @ 47093: LOCATE L_0003 3967 @ 47096: PUSH GA 3968 @ 47099: PUSH ALIGNMENT 3969 @ 47102: PUSHI #0x00000001 3970 @ 47107: SUB 3971 @ 47108: AND 3972 @ 47109: PUSHI #0x00000000 3973 @ 47114: JUMPIF = L_0004 3974 @ 47118: PUSH GBYTE 3975 @ 47121: PUSHI #0x00000000 3976 @ 47126: ASSPAR 3977 @ 47127: CALL 3978 @ 47128: REPEAT L_0003 3979 @ 47131: LOCATE L_0004 919 %END 3980 @ 47134: LINE 919 "regression-compile-tmp/asems412.imp" 3981 @ 47173: END _lev0id0_GFIX {lev=2 --> 1} 920 %ROUTINE SF(%SHORTINTEGER OP, R, L) 3982 @ 47174: LINE 920 "regression-compile-tmp/asems412.imp" 3983 @ 47213: DEF SF (_lev0id0_SF) 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 3984 @ 47227: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 3985 @ 47228: DEF OP p1=V_00f0 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 3986 @ 47242: DEF R p1=V_00f1 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 3987 @ 47255: DEF L p1=V_00f2 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 3988 @ 47268: FINISH ) {lev=2} 921 DUMP(OP + ACTUAL(R)<<4 + L) 3989 @ 47269: LINE 921 "regression-compile-tmp/asems412.imp" 3990 @ 47308: PUSH DUMP 3991 @ 47311: PUSH OP 3992 @ 47314: PUSH ACTUAL 3993 @ 47317: PUSH R 3994 @ 47320: ACCESS 3995 @ 47321: PUSHI #0x00000004 3996 @ 47326: LSH 3997 @ 47327: ADD 3998 @ 47328: PUSH L 3999 @ 47331: ADD 4000 @ 47332: ASSPAR 4001 @ 47333: CALL 922 %END 4002 @ 47334: LINE 922 "regression-compile-tmp/asems412.imp" 4003 @ 47373: END _lev0id0_SF {lev=2 --> 1} 923 %ROUTINE RR(%SHORTINTEGER OP, R1, R2) 4004 @ 47374: LINE 923 "regression-compile-tmp/asems412.imp" 4005 @ 47413: DEF RR (_lev0id0_RR) 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 4006 @ 47427: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4007 @ 47428: DEF OP p1=V_00f1 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 4008 @ 47442: DEF R1 p1=V_00f2 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 4009 @ 47456: DEF R2 p1=V_00f3 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 4010 @ 47470: FINISH ) {lev=2} 924 DUMP(OP + ACTUAL(R1)<<4 + ACTUAL(R2)) 4011 @ 47471: LINE 924 "regression-compile-tmp/asems412.imp" 4012 @ 47510: PUSH DUMP 4013 @ 47513: PUSH OP 4014 @ 47516: PUSH ACTUAL 4015 @ 47519: PUSH R1 4016 @ 47522: ACCESS 4017 @ 47523: PUSHI #0x00000004 4018 @ 47528: LSH 4019 @ 47529: ADD 4020 @ 47530: PUSH ACTUAL 4021 @ 47533: PUSH R2 4022 @ 47536: ACCESS 4023 @ 47537: ADD 4024 @ 47538: ASSPAR 4025 @ 47539: CALL 925 RELEASE(R2) 4026 @ 47540: LINE 925 "regression-compile-tmp/asems412.imp" 4027 @ 47579: PUSH RELEASE 4028 @ 47582: PUSH R2 4029 @ 47585: ASSPAR 4030 @ 47586: CALL 926 %END 4031 @ 47587: LINE 926 "regression-compile-tmp/asems412.imp" 4032 @ 47626: END _lev0id0_RR {lev=2 --> 1} 927 %ROUTINE RX(%INTEGER OP, R, X, D) 4033 @ 47627: LINE 927 "regression-compile-tmp/asems412.imp" 4034 @ 47666: DEF RX (_lev0id0_RX) p1=V_00ca 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 4035 @ 47680: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4036 @ 47681: DEF OP 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 4037 @ 47695: DEF R 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 4038 @ 47708: DEF X 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 4039 @ 47721: DEF D 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 4040 @ 47734: FINISH ) {lev=2} 928 ABORT(5) %IF X=R0 %OR D<0 %OR D>X'3FFF' 4041 @ 47735: LINE 928 "regression-compile-tmp/asems412.imp" 4042 @ 47774: PUSH X 4043 @ 47777: PUSHI #0x00000001 4044 @ 47782: JUMPIF = L_0005 4045 @ 47786: PUSH D 4046 @ 47789: PUSHI #0x00000000 4047 @ 47794: JUMPIF < L_0005 4048 @ 47798: PUSH D 4049 @ 47801: PUSHI #0x00003fff 4050 @ 47806: JUMPIF <= L_0004 4051 @ 47810: LOCATE L_0005 4052 @ 47813: PUSH ABORT 4053 @ 47816: PUSHI #0x00000005 4054 @ 47821: ASSPAR 4055 @ 47822: CALL 4056 @ 47823: LOCATE L_0004 929 RELEASE(X) 4057 @ 47826: LINE 929 "regression-compile-tmp/asems412.imp" 4058 @ 47865: PUSH RELEASE 4059 @ 47868: PUSH X 4060 @ 47871: ASSPAR 4061 @ 47872: CALL 930 DUMP(OP + ACTUAL(R)<<4 + ACTUAL(X)); DUMP(D) 4062 @ 47873: LINE 930 "regression-compile-tmp/asems412.imp" 4063 @ 47912: PUSH DUMP 4064 @ 47915: PUSH OP 4065 @ 47918: PUSH ACTUAL 4066 @ 47921: PUSH R 4067 @ 47924: ACCESS 4068 @ 47925: PUSHI #0x00000004 4069 @ 47930: LSH 4070 @ 47931: ADD 4071 @ 47932: PUSH ACTUAL 4072 @ 47935: PUSH X 4073 @ 47938: ACCESS 4074 @ 47939: ADD 4075 @ 47940: ASSPAR 4076 @ 47941: CALL 4077 @ 47942: LINE 930 "regression-compile-tmp/asems412.imp" 4078 @ 47981: PUSH DUMP 4079 @ 47984: PUSH D 4080 @ 47987: ASSPAR 4081 @ 47988: CALL 931 COUNT DIAGS %IF OP = BAL 4082 @ 47989: LINE 931 "regression-compile-tmp/asems412.imp" 4083 @ 48028: PUSH OP 4084 @ 48031: PUSHI #0x00004100 4085 @ 48036: JUMPIF # L_0004 4086 @ 48040: PUSH COUNTDIAGS 4087 @ 48043: CALL 4088 @ 48044: LOCATE L_0004 932 %IF CONTROL&UNASS DIAG # 0 %START 4089 @ 48047: LINE 932 "regression-compile-tmp/asems412.imp" 4090 @ 48086: PUSH CONTROL 4091 @ 48089: PUSHI #0x00000020 4092 @ 48094: AND 4093 @ 48095: PUSHI #0x00000000 4094 @ 48100: JUMPIF = L_0004 933 %RETURN %IF OP # LW %AND OP # LE 4095 @ 48104: LINE 933 "regression-compile-tmp/asems412.imp" 4096 @ 48143: PUSH OP 4097 @ 48146: PUSHI #0x00005800 4098 @ 48151: JUMPIF = L_0007 4099 @ 48155: PUSH OP 4100 @ 48158: PUSHI #0x00006800 4101 @ 48163: JUMPIF = L_0007 4102 @ 48167: RETURN 4103 @ 48168: LOCATE L_0007 934 %RETURN %IF X = LOCAL %AND D >= MIN TEMP 4104 @ 48171: LINE 934 "regression-compile-tmp/asems412.imp" 4105 @ 48210: PUSH X 4106 @ 48213: PUSH LOCAL 4107 @ 48216: JUMPIF # L_0007 4108 @ 48220: PUSH D 4109 @ 48223: PUSH MINTEMP 4110 @ 48226: JUMPIF < L_0007 4111 @ 48230: RETURN 4112 @ 48231: LOCATE L_0007 935 %IF OP = LW %THEN OP = CL %ELSE OP = CE 4113 @ 48234: LINE 935 "regression-compile-tmp/asems412.imp" 4114 @ 48273: PUSH OP 4115 @ 48276: PUSHI #0x00005800 4116 @ 48281: JUMPIF # L_0007 4117 @ 48285: PUSH OP 4118 @ 48288: PUSHI #0x00005500 4119 @ 48293: ASSVAL 4120 @ 48294: GOTO L_0006 4121 @ 48297: LOCATE L_0007 4122 @ 48300: PUSH OP 4123 @ 48303: PUSHI #0x00006900 4124 @ 48308: ASSVAL 4125 @ 48309: LOCATE L_0006 936 DUMP(OP+ACTUAL(R)<<4+ACTUAL(CODE)) 4126 @ 48312: LINE 936 "regression-compile-tmp/asems412.imp" 4127 @ 48351: PUSH DUMP 4128 @ 48354: PUSH OP 4129 @ 48357: PUSH ACTUAL 4130 @ 48360: PUSH R 4131 @ 48363: ACCESS 4132 @ 48364: PUSHI #0x00000004 4133 @ 48369: LSH 4134 @ 48370: ADD 4135 @ 48371: PUSH ACTUAL 4136 @ 48374: PUSHI #0x0000002c 4137 @ 48379: ACCESS 4138 @ 48380: ADD 4139 @ 48381: ASSPAR 4140 @ 48382: CALL 937 DUMP(UNASS PAT) 4141 @ 48383: LINE 937 "regression-compile-tmp/asems412.imp" 4142 @ 48422: PUSH DUMP 4143 @ 48425: PUSHI #0x00000010 4144 @ 48430: ASSPAR 4145 @ 48431: CALL 938 PRINTSYMBOL(DLINE); ! INFORM DIAGS OF 'BALR' 4146 @ 48432: LINE 938 "regression-compile-tmp/asems412.imp" 4147 @ 48471: PUSH PRINTSYMBOL 4148 @ 48474: PUSHI #0x0000000a 4149 @ 48479: ASSPAR 4150 @ 48480: CALL 939 DUMP(ENTER UNASS) 4151 @ 48481: LINE 939 "regression-compile-tmp/asems412.imp" 4152 @ 48520: PUSH DUMP 4153 @ 48523: PUSH ENTERUNASS 4154 @ 48526: ASSPAR 4155 @ 48527: CALL 940 COUNT DIAGS 4156 @ 48528: LINE 940 "regression-compile-tmp/asems412.imp" 4157 @ 48567: PUSH COUNTDIAGS 4158 @ 48570: CALL 941 %FINISH 4159 @ 48571: LINE 941 "regression-compile-tmp/asems412.imp" 4160 @ 48610: LOCATE L_0004 942 %END 4161 @ 48613: LINE 942 "regression-compile-tmp/asems412.imp" 4162 @ 48652: END _lev0id0_RX {lev=2 --> 1} 943 %ROUTINE RI2(%INTEGER OP, R, X, D) 4163 @ 48653: LINE 943 "regression-compile-tmp/asems412.imp" 4164 @ 48692: DEF RI2 (_lev0id0_RI2) 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 4165 @ 48707: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4166 @ 48708: DEF OP 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 4167 @ 48722: DEF R 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 4168 @ 48735: DEF X 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 4169 @ 48748: DEF D 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 4170 @ 48761: FINISH ) {lev=2} 944 ABORT(5) %IF X=R0 4171 @ 48762: LINE 944 "regression-compile-tmp/asems412.imp" 4172 @ 48801: PUSH X 4173 @ 48804: PUSHI #0x00000001 4174 @ 48809: JUMPIF # L_0004 4175 @ 48813: PUSH ABORT 4176 @ 48816: PUSHI #0x00000005 4177 @ 48821: ASSPAR 4178 @ 48822: CALL 4179 @ 48823: LOCATE L_0004 945 RELEASE(X) 4180 @ 48826: LINE 945 "regression-compile-tmp/asems412.imp" 4181 @ 48865: PUSH RELEASE 4182 @ 48868: PUSH X 4183 @ 48871: ASSPAR 4184 @ 48872: CALL 946 DUMP(OP + ACTUAL(R)<<4 + ACTUAL(X)); DUMP(D) 4185 @ 48873: LINE 946 "regression-compile-tmp/asems412.imp" 4186 @ 48912: PUSH DUMP 4187 @ 48915: PUSH OP 4188 @ 48918: PUSH ACTUAL 4189 @ 48921: PUSH R 4190 @ 48924: ACCESS 4191 @ 48925: PUSHI #0x00000004 4192 @ 48930: LSH 4193 @ 48931: ADD 4194 @ 48932: PUSH ACTUAL 4195 @ 48935: PUSH X 4196 @ 48938: ACCESS 4197 @ 48939: ADD 4198 @ 48940: ASSPAR 4199 @ 48941: CALL 4200 @ 48942: LINE 946 "regression-compile-tmp/asems412.imp" 4201 @ 48981: PUSH DUMP 4202 @ 48984: PUSH D 4203 @ 48987: ASSPAR 4204 @ 48988: CALL 947 COUNT DIAGS %IF OP = BAL; ! IF PERM REFERENCE 4205 @ 48989: LINE 947 "regression-compile-tmp/asems412.imp" 4206 @ 49028: PUSH OP 4207 @ 49031: PUSHI #0x00004100 4208 @ 49036: JUMPIF # L_0004 4209 @ 49040: PUSH COUNTDIAGS 4210 @ 49043: CALL 4211 @ 49044: LOCATE L_0004 948 %END 4212 @ 49047: LINE 948 "regression-compile-tmp/asems412.imp" 4213 @ 49086: END _lev0id0_RI2 {lev=2 --> 1} 949 %ROUTINE RI3(%INTEGER OP, R, X, D) 4214 @ 49087: LINE 949 "regression-compile-tmp/asems412.imp" 4215 @ 49126: DEF RI3 (_lev0id0_RI3) p1=V_00f2 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 4216 @ 49141: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4217 @ 49142: DEF OP 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 4218 @ 49156: DEF R 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 4219 @ 49169: DEF X 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 4220 @ 49182: DEF D p1=V_00f6 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 4221 @ 49195: FINISH ) {lev=2} 950 ABORT(5) %IF X=R0 4222 @ 49196: LINE 950 "regression-compile-tmp/asems412.imp" 4223 @ 49235: PUSH X 4224 @ 49238: PUSHI #0x00000001 4225 @ 49243: JUMPIF # L_0004 4226 @ 49247: PUSH ABORT 4227 @ 49250: PUSHI #0x00000005 4228 @ 49255: ASSPAR 4229 @ 49256: CALL 4230 @ 49257: LOCATE L_0004 951 RELEASE(X) 4231 @ 49260: LINE 951 "regression-compile-tmp/asems412.imp" 4232 @ 49299: PUSH RELEASE 4233 @ 49302: PUSH X 4234 @ 49305: ASSPAR 4235 @ 49306: CALL 952 DUMP(OP + ACTUAL(R)<<4 + ACTUAL(X)); DUMP(D>>16); DUMP(D&X'FFFF') 4236 @ 49307: LINE 952 "regression-compile-tmp/asems412.imp" 4237 @ 49346: PUSH DUMP 4238 @ 49349: PUSH OP 4239 @ 49352: PUSH ACTUAL 4240 @ 49355: PUSH R 4241 @ 49358: ACCESS 4242 @ 49359: PUSHI #0x00000004 4243 @ 49364: LSH 4244 @ 49365: ADD 4245 @ 49366: PUSH ACTUAL 4246 @ 49369: PUSH X 4247 @ 49372: ACCESS 4248 @ 49373: ADD 4249 @ 49374: ASSPAR 4250 @ 49375: CALL 4251 @ 49376: LINE 952 "regression-compile-tmp/asems412.imp" 4252 @ 49415: PUSH DUMP 4253 @ 49418: PUSH D 4254 @ 49421: PUSHI #0x00000010 4255 @ 49426: RSH 4256 @ 49427: ASSPAR 4257 @ 49428: CALL 4258 @ 49429: LINE 952 "regression-compile-tmp/asems412.imp" 4259 @ 49468: PUSH DUMP 4260 @ 49471: PUSH D 4261 @ 49474: PUSHI #0x0000ffff 4262 @ 49479: AND 4263 @ 49480: ASSPAR 4264 @ 49481: CALL 953 %END 4265 @ 49482: LINE 953 "regression-compile-tmp/asems412.imp" 4266 @ 49521: END _lev0id0_RI3 {lev=2 --> 1} 954 %ROUTINE DEFINE TAG(%SHORTINTEGER REF) 4267 @ 49522: LINE 954 "regression-compile-tmp/asems412.imp" 4268 @ 49561: DEF DEFINETAG (_lev0id0_DEFINETAG) p1=V_00f3 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 4269 @ 49582: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4270 @ 49583: DEF REF p1=V_00f4 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 4271 @ 49598: FINISH ) {lev=2} 955 SELECT OUTPUT(DIRECT) 4272 @ 49599: LINE 955 "regression-compile-tmp/asems412.imp" 4273 @ 49638: PUSH SELECTOUTPUT 4274 @ 49641: PUSHI #0x00000003 4275 @ 49646: ASSPAR 4276 @ 49647: CALL 956 PRINT SYMBOL(TAG DEF); PUT(REF); PUT(CA) 4277 @ 49648: LINE 956 "regression-compile-tmp/asems412.imp" 4278 @ 49687: PUSH PRINTSYMBOL 4279 @ 49690: PUSHI #0x00000001 4280 @ 49695: ASSPAR 4281 @ 49696: CALL 4282 @ 49697: LINE 956 "regression-compile-tmp/asems412.imp" 4283 @ 49736: PUSH PUT 4284 @ 49739: PUSH REF 4285 @ 49742: ASSPAR 4286 @ 49743: CALL 4287 @ 49744: LINE 956 "regression-compile-tmp/asems412.imp" 4288 @ 49783: PUSH PUT 4289 @ 49786: PUSH CA 4290 @ 49789: ASSPAR 4291 @ 49790: CALL 957 SELECT OUTPUT(OBJECT) 4292 @ 49791: LINE 957 "regression-compile-tmp/asems412.imp" 4293 @ 49830: PUSH SELECTOUTPUT 4294 @ 49833: PUSHI #0x00000002 4295 @ 49838: ASSPAR 4296 @ 49839: CALL 958 %END 4297 @ 49840: LINE 958 "regression-compile-tmp/asems412.imp" 4298 @ 49879: END _lev0id0_DEFINETAG {lev=2 --> 1} 959 %ROUTINE DEFINE REFERENCE(%INTEGER REF, TYPE) 4299 @ 49880: LINE 959 "regression-compile-tmp/asems412.imp" 4300 @ 49919: DEF DEFINEREFERENCE (_lev0id0_DEFINEREFERENCE) p1=V_00f4 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 4301 @ 49946: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4302 @ 49947: DEF REF 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 4303 @ 49962: DEF TYPE p1=V_00f6 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 4304 @ 49978: FINISH ) {lev=2} 960 SELECT OUTPUT(DIRECT) 4305 @ 49979: LINE 960 "regression-compile-tmp/asems412.imp" 4306 @ 50018: PUSH SELECTOUTPUT 4307 @ 50021: PUSHI #0x00000003 4308 @ 50026: ASSPAR 4309 @ 50027: CALL 961 PRINT SYMBOL(TYPE); PUT(REF); PUT(CA) 4310 @ 50028: LINE 961 "regression-compile-tmp/asems412.imp" 4311 @ 50067: PUSH PRINTSYMBOL 4312 @ 50070: PUSH TYPE 4313 @ 50073: ASSPAR 4314 @ 50074: CALL 4315 @ 50075: LINE 961 "regression-compile-tmp/asems412.imp" 4316 @ 50114: PUSH PUT 4317 @ 50117: PUSH REF 4318 @ 50120: ASSPAR 4319 @ 50121: CALL 4320 @ 50122: LINE 961 "regression-compile-tmp/asems412.imp" 4321 @ 50161: PUSH PUT 4322 @ 50164: PUSH CA 4323 @ 50167: ASSPAR 4324 @ 50168: CALL 962 SELECT OUTPUT(OBJECT) 4325 @ 50169: LINE 962 "regression-compile-tmp/asems412.imp" 4326 @ 50208: PUSH SELECTOUTPUT 4327 @ 50211: PUSHI #0x00000002 4328 @ 50216: ASSPAR 4329 @ 50217: CALL 963 %END 4330 @ 50218: LINE 963 "regression-compile-tmp/asems412.imp" 4331 @ 50257: END _lev0id0_DEFINEREFERENCE {lev=2 --> 1} 964 %ROUTINE SET LINE 4332 @ 50258: LINE 964 "regression-compile-tmp/asems412.imp" 4333 @ 50297: DEF SETLINE (_lev0id0_SETLINE) p1=V_00f5 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 4334 @ 50316: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4335 @ 50317: FINISH ) {lev=2} 965 %OWNINTEGER HERE = 0 4336 @ 50318: LINE 965 "regression-compile-tmp/asems412.imp" 4337 @ 50357: PUSHI #0x00000000 4338 @ 50362: DEF HERE p1=V_00f6 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 4339 @ 50378: INIT 1 966 CURRENT LINE = TAG 4340 @ 50381: LINE 966 "regression-compile-tmp/asems412.imp" 4341 @ 50420: PUSH CURRENTLINE 4342 @ 50423: PUSH TAG 4343 @ 50426: CALL 4344 @ 50427: ASSVAL 967 %WHILE CURRENT LINE > HERE %CYCLE 4345 @ 50428: LINE 967 "regression-compile-tmp/asems412.imp" 4346 @ 50467: LOCATE L_0003 4347 @ 50470: PUSH CURRENTLINE 4348 @ 50473: PUSH HERE 4349 @ 50476: JUMPIF <= L_0004 968 HERE = HERE+1; PRINT SYMBOL(LINE FLAG) 4350 @ 50480: LINE 968 "regression-compile-tmp/asems412.imp" 4351 @ 50519: PUSH HERE 4352 @ 50522: PUSH HERE 4353 @ 50525: PUSHI #0x00000001 4354 @ 50530: ADD 4355 @ 50531: ASSVAL 4356 @ 50532: LINE 968 "regression-compile-tmp/asems412.imp" 4357 @ 50571: PUSH PRINTSYMBOL 4358 @ 50574: PUSHI #0x00000004 4359 @ 50579: ASSPAR 4360 @ 50580: CALL 969 %REPEAT 4361 @ 50581: LINE 969 "regression-compile-tmp/asems412.imp" 4362 @ 50620: REPEAT L_0003 4363 @ 50623: LOCATE L_0004 970 %END 971 972 ! ENVIRONMENT CONTROL 973 4364 @ 50626: LINE 970 "regression-compile-tmp/asems412.imp" 4365 @ 50665: END _lev0id0_SETLINE {lev=2 --> 1} 974 %RECORD(ENVFM)%MAP ENVIRONMENT(%SHORTINTEGER LABEL) 4366 @ 50666: LINE 974 "regression-compile-tmp/asems412.imp" 4367 @ 50705: DEF ENVIRONMENT (_lev0id0_ENVIRONMENT) p1=V_00f6 a/tf=49 b/format=8a c/ostate=0 type=4 (record) form=9 (map) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 4368 @ 50728: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4369 @ 50729: DEF LABEL p1=V_00f7 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 4370 @ 50746: FINISH ) {lev=2} 975 %INTEGER J 4371 @ 50747: LINE 975 "regression-compile-tmp/asems412.imp" 4372 @ 50786: DEF J 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 976 %RECORD(ENVFM)%NAME E 4373 @ 50799: LINE 976 "regression-compile-tmp/asems412.imp" 4374 @ 50838: DEF E p1=V_00f9 a/tf=42 b/format=8a c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 977 %RESULT == NULL ENV %IF LABEL <= 0 4375 @ 50851: LINE 977 "regression-compile-tmp/asems412.imp" 4376 @ 50890: PUSH LABEL 4377 @ 50893: PUSHI #0x00000000 4378 @ 50898: JUMPIF > L_0004 4379 @ 50902: PUSH NULLENV 4380 @ 50905: MAP 4381 @ 50906: LOCATE L_0004 978 %FOR J = MAX ENVIRS, -1, 0 %CYCLE 4382 @ 50909: LINE 978 "regression-compile-tmp/asems412.imp" 4383 @ 50948: PUSH J 4384 @ 50951: PUSHI #0x00000001 4385 @ 50956: NEGATE 4386 @ 50957: PUSHI #0x00000000 4387 @ 50962: PUSHI #0x0000000d 4388 @ 50967: FOR L_0003 979 E == ENVIR(J) 4389 @ 50970: LINE 979 "regression-compile-tmp/asems412.imp" 4390 @ 51009: PUSH E 4391 @ 51012: PUSH ENVIR 4392 @ 51015: PUSH J 4393 @ 51018: ACCESS 4394 @ 51019: ASSREF 980 %RESULT == E %IF E_LABEL = LABEL 4395 @ 51020: LINE 980 "regression-compile-tmp/asems412.imp" 4396 @ 51059: PUSH E 4397 @ 51062: SELECT 1 4398 @ 51065: PUSH LABEL 4399 @ 51068: JUMPIF # L_0007 4400 @ 51072: PUSH E 4401 @ 51075: MAP 4402 @ 51076: LOCATE L_0007 981 %REPEAT 4403 @ 51079: LINE 981 "regression-compile-tmp/asems412.imp" 4404 @ 51118: REPEAT L_0003 4405 @ 51121: LOCATE L_0004 982 %RESULT == NULL ENV 4406 @ 51124: LINE 982 "regression-compile-tmp/asems412.imp" 4407 @ 51163: PUSH NULLENV 4408 @ 51166: MAP 983 %END 4409 @ 51167: LINE 983 "regression-compile-tmp/asems412.imp" 4410 @ 51206: END _lev0id0_ENVIRONMENT {lev=2 --> 1} 984 %ROUTINE REMEMBER ENVIRONMENT(%SHORTINTEGER LABEL) 4411 @ 51207: LINE 984 "regression-compile-tmp/asems412.imp" 4412 @ 51246: DEF REMEMBERENVIRONMENT (_lev0id0_REMEMBERENVIRONMENT) 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 4413 @ 51277: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4414 @ 51278: DEF LABEL p1=V_00f8 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 4415 @ 51295: FINISH ) {lev=2} 985 %INTEGER K 4416 @ 51296: LINE 985 "regression-compile-tmp/asems412.imp" 4417 @ 51335: DEF K p1=V_00f9 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 %RECORD(ENVFM)%NAME E 4418 @ 51348: LINE 986 "regression-compile-tmp/asems412.imp" 4419 @ 51387: DEF E p1=V_00fa a/tf=42 b/format=8a c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 987 %RETURN %IF LABEL <= 0 4420 @ 51400: LINE 987 "regression-compile-tmp/asems412.imp" 4421 @ 51439: PUSH LABEL 4422 @ 51442: PUSHI #0x00000000 4423 @ 51447: JUMPIF > L_0004 4424 @ 51451: RETURN 4425 @ 51452: LOCATE L_0004 988 E == ENVIRONMENT(LABEL) 4426 @ 51455: LINE 988 "regression-compile-tmp/asems412.imp" 4427 @ 51494: PUSH E 4428 @ 51497: PUSH ENVIRONMENT 4429 @ 51500: PUSH LABEL 4430 @ 51503: ASSPAR 4431 @ 51504: CALL 4432 @ 51505: ASSREF 989 E_LABEL = 0 4433 @ 51506: LINE 989 "regression-compile-tmp/asems412.imp" 4434 @ 51545: PUSH E 4435 @ 51548: SELECT 1 4436 @ 51551: PUSHI #0x00000000 4437 @ 51556: ASSVAL 990 ENVP = ENVP+1; ENVP = 0 %IF ENVP > MAX ENVIRS 4438 @ 51557: LINE 990 "regression-compile-tmp/asems412.imp" 4439 @ 51596: PUSH ENVP 4440 @ 51599: PUSH ENVP 4441 @ 51602: PUSHI #0x00000001 4442 @ 51607: ADD 4443 @ 51608: ASSVAL 4444 @ 51609: LINE 990 "regression-compile-tmp/asems412.imp" 4445 @ 51648: PUSH ENVP 4446 @ 51651: PUSHI #0x0000000d 4447 @ 51656: JUMPIF <= L_0004 4448 @ 51660: PUSH ENVP 4449 @ 51663: PUSHI #0x00000000 4450 @ 51668: ASSVAL 4451 @ 51669: LOCATE L_0004 991 E == ENVIR(ENVP) 4452 @ 51672: LINE 991 "regression-compile-tmp/asems412.imp" 4453 @ 51711: PUSH E 4454 @ 51714: PUSH ENVIR 4455 @ 51717: PUSH ENVP 4456 @ 51720: ACCESS 4457 @ 51721: ASSREF 992 E_LABEL = LABEL 4458 @ 51722: LINE 992 "regression-compile-tmp/asems412.imp" 4459 @ 51761: PUSH E 4460 @ 51764: SELECT 1 4461 @ 51767: PUSH LABEL 4462 @ 51770: ASSVAL 993 E_LIMEN = LIMEN 4463 @ 51771: LINE 993 "regression-compile-tmp/asems412.imp" 4464 @ 51810: PUSH E 4465 @ 51813: SELECT 2 4466 @ 51816: PUSH LIMEN 4467 @ 51819: ASSVAL 994 E_E(K) = USE(K) %FOR K = 1, 1, 40 4468 @ 51820: LINE 994 "regression-compile-tmp/asems412.imp" 4469 @ 51859: PUSH K 4470 @ 51862: PUSHI #0x00000001 4471 @ 51867: PUSHI #0x00000028 4472 @ 51872: PUSHI #0x00000001 4473 @ 51877: FOR L_0003 4474 @ 51880: PUSH E 4475 @ 51883: SELECT 3 4476 @ 51886: PUSH K 4477 @ 51889: ACCESS 4478 @ 51890: PUSH USE 4479 @ 51893: PUSH K 4480 @ 51896: ACCESS 4481 @ 51897: ASSVAL 4482 @ 51898: REPEAT L_0003 4483 @ 51901: LOCATE L_0004 995 %END 4484 @ 51904: LINE 995 "regression-compile-tmp/asems412.imp" 4485 @ 51943: END _lev0id0_REMEMBERENVIRONMENT {lev=2 --> 1} 996 %ROUTINE MERGE ENVIRONMENT(%SHORTINTEGER LABEL) 4486 @ 51944: LINE 996 "regression-compile-tmp/asems412.imp" 4487 @ 51983: DEF MERGEENVIRONMENT (_lev0id0_MERGEENVIRONMENT) 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 4488 @ 52011: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4489 @ 52012: DEF LABEL p1=V_00f9 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 4490 @ 52029: FINISH ) {lev=2} 997 %INTEGER J 4491 @ 52030: LINE 997 "regression-compile-tmp/asems412.imp" 4492 @ 52069: DEF J 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 998 %RECORD(ENVFM)%NAME E 4493 @ 52082: LINE 998 "regression-compile-tmp/asems412.imp" 4494 @ 52121: DEF E p1=V_00fb a/tf=42 b/format=8a c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 999 %RECORD(USEFM)%NAME U, V 4495 @ 52134: LINE 999 "regression-compile-tmp/asems412.imp" 4496 @ 52173: DEF U p1=V_00fc a/tf=42 b/format=89 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 4497 @ 52186: DEF V p1=V_00fd a/tf=42 b/format=89 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1000 E == ENVIRONMENT(LABEL) 4498 @ 52199: LINE 1000 "regression-compile-tmp/asems412.imp" 4499 @ 52238: PUSH E 4500 @ 52241: PUSH ENVIRONMENT 4501 @ 52244: PUSH LABEL 4502 @ 52247: ASSPAR 4503 @ 52248: CALL 4504 @ 52249: ASSREF 1001 %UNLESS E == NULL ENV %START 4505 @ 52250: LINE 1001 "regression-compile-tmp/asems412.imp" 4506 @ 52289: PUSH E 4507 @ 52292: PUSH NULLENV 4508 @ 52295: JUMPIFA = L_0004 1002 %FOR J = 1, 1, 40 %CYCLE 4509 @ 52299: LINE 1002 "regression-compile-tmp/asems412.imp" 4510 @ 52338: PUSH J 4511 @ 52341: PUSHI #0x00000001 4512 @ 52346: PUSHI #0x00000028 4513 @ 52351: PUSHI #0x00000001 4514 @ 52356: FOR L_0006 1003 U == USE(J) 4515 @ 52359: LINE 1003 "regression-compile-tmp/asems412.imp" 4516 @ 52398: PUSH U 4517 @ 52401: PUSH USE 4518 @ 52404: PUSH J 4519 @ 52407: ACCESS 4520 @ 52408: ASSREF 1004 V == E_E(J) 4521 @ 52409: LINE 1004 "regression-compile-tmp/asems412.imp" 4522 @ 52448: PUSH V 4523 @ 52451: PUSH E 4524 @ 52454: SELECT 3 4525 @ 52457: PUSH J 4526 @ 52460: ACCESS 4527 @ 52461: ASSREF 1005 V_CA = E_LIMEN %UNLESS U_BASE = V_BASE %C 1006 %AND U_DISP = V_DISP %C 1007 %AND U_FORM = V_FORM %C 1008 %AND U_TYPE = V_TYPE %C 1009 %AND U_CA > LIMEN 4528 @ 52462: LINE 1005 "regression-compile-tmp/asems412.imp" 4529 @ 52501: PUSH U 4530 @ 52504: SELECT 3 4531 @ 52507: PUSH V 4532 @ 52510: SELECT 3 4533 @ 52513: JUMPIF # L_000b 4534 @ 52517: PUSH U 4535 @ 52520: SELECT 1 4536 @ 52523: PUSH V 4537 @ 52526: SELECT 1 4538 @ 52529: JUMPIF # L_000b 4539 @ 52533: PUSH U 4540 @ 52536: SELECT 5 4541 @ 52539: PUSH V 4542 @ 52542: SELECT 5 4543 @ 52545: JUMPIF # L_000b 4544 @ 52549: PUSH U 4545 @ 52552: SELECT 4 4546 @ 52555: PUSH V 4547 @ 52558: SELECT 4 4548 @ 52561: JUMPIF # L_000b 4549 @ 52565: PUSH U 4550 @ 52568: SELECT 2 4551 @ 52571: PUSH LIMEN 4552 @ 52574: JUMPIF > L_000a 4553 @ 52578: LOCATE L_000b 4554 @ 52581: PUSH V 4555 @ 52584: SELECT 2 4556 @ 52587: PUSH E 4557 @ 52590: SELECT 2 4558 @ 52593: ASSVAL 4559 @ 52594: LOCATE L_000a 1010 %REPEAT 4560 @ 52597: LINE 1010 "regression-compile-tmp/asems412.imp" 4561 @ 52636: REPEAT L_0006 4562 @ 52639: LOCATE L_0007 1011 %FINISH 4563 @ 52642: LINE 1011 "regression-compile-tmp/asems412.imp" 4564 @ 52681: LOCATE L_0004 1012 %END 4565 @ 52684: LINE 1012 "regression-compile-tmp/asems412.imp" 4566 @ 52723: END _lev0id0_MERGEENVIRONMENT {lev=2 --> 1} 1013 %ROUTINE RESTORE ENVIRONMENT(%SHORTINTEGER LABEL) 4567 @ 52724: LINE 1013 "regression-compile-tmp/asems412.imp" 4568 @ 52763: DEF RESTOREENVIRONMENT (_lev0id0_RESTOREENVIRONMENT) 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 4569 @ 52793: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4570 @ 52794: DEF LABEL p1=V_00fa a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 4571 @ 52811: FINISH ) {lev=2} 1014 %INTEGER J 4572 @ 52812: LINE 1014 "regression-compile-tmp/asems412.imp" 4573 @ 52851: DEF J 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 1015 %RECORD(ENVFM)%NAME E 4574 @ 52864: LINE 1015 "regression-compile-tmp/asems412.imp" 4575 @ 52903: DEF E p1=V_00fc a/tf=42 b/format=8a c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1016 E == ENVIRONMENT(LABEL) 4576 @ 52916: LINE 1016 "regression-compile-tmp/asems412.imp" 4577 @ 52955: PUSH E 4578 @ 52958: PUSH ENVIRONMENT 4579 @ 52961: PUSH LABEL 4580 @ 52964: ASSPAR 4581 @ 52965: CALL 4582 @ 52966: ASSREF 1017 %IF E == NULL ENV %START 4583 @ 52967: LINE 1017 "regression-compile-tmp/asems412.imp" 4584 @ 53006: PUSH E 4585 @ 53009: PUSH NULLENV 4586 @ 53012: JUMPIFA # L_0004 1018 LIMEN = CA 4587 @ 53016: LINE 1018 "regression-compile-tmp/asems412.imp" 4588 @ 53055: PUSH LIMEN 4589 @ 53058: PUSH CA 4590 @ 53061: ASSVAL 1019 %ELSE 4591 @ 53062: LINE 1019 "regression-compile-tmp/asems412.imp" 4592 @ 53101: GOTO L_0003 4593 @ 53104: LOCATE L_0004 1020 E_LABEL = 0 4594 @ 53107: LINE 1020 "regression-compile-tmp/asems412.imp" 4595 @ 53146: PUSH E 4596 @ 53149: SELECT 1 4597 @ 53152: PUSHI #0x00000000 4598 @ 53157: ASSVAL 1021 LIMEN = E_LIMEN 4599 @ 53158: LINE 1021 "regression-compile-tmp/asems412.imp" 4600 @ 53197: PUSH LIMEN 4601 @ 53200: PUSH E 4602 @ 53203: SELECT 2 4603 @ 53206: ASSVAL 1022 USE(J) = E_E(J) %FOR J = 1, 1, 40 4604 @ 53207: LINE 1022 "regression-compile-tmp/asems412.imp" 4605 @ 53246: PUSH J 4606 @ 53249: PUSHI #0x00000001 4607 @ 53254: PUSHI #0x00000028 4608 @ 53259: PUSHI #0x00000001 4609 @ 53264: FOR L_0006 4610 @ 53267: PUSH USE 4611 @ 53270: PUSH J 4612 @ 53273: ACCESS 4613 @ 53274: PUSH E 4614 @ 53277: SELECT 3 4615 @ 53280: PUSH J 4616 @ 53283: ACCESS 4617 @ 53284: ASSVAL 4618 @ 53285: REPEAT L_0006 4619 @ 53288: LOCATE L_0007 1023 %FINISH 4620 @ 53291: LINE 1023 "regression-compile-tmp/asems412.imp" 4621 @ 53330: LOCATE L_0003 1024 %END 1025 4622 @ 53333: LINE 1024 "regression-compile-tmp/asems412.imp" 4623 @ 53372: END _lev0id0_RESTOREENVIRONMENT {lev=2 --> 1} 1026 %ROUTINE PERM(%INTEGER N) 4624 @ 53373: LINE 1026 "regression-compile-tmp/asems412.imp" 4625 @ 53412: DEF PERM (_lev0id0_PERM) p1=V_00fa 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 4626 @ 53428: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4627 @ 53429: DEF N 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 4628 @ 53442: FINISH ) {lev=2} 1027 %INTEGER MASK, J, R 4629 @ 53443: LINE 1027 "regression-compile-tmp/asems412.imp" 4630 @ 53482: DEF MASK 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 4631 @ 53498: DEF J 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 4632 @ 53511: DEF R 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 1028 %CONSTBYTEINTEGERARRAY REG(1:15) = 1029 R0, R1, R2, R3, R4, P2, P1, FPR0, FPR2,15,16,17,18,19,20 4633 @ 53524: LINE 1028 "regression-compile-tmp/asems412.imp" 4634 @ 53563: PUSHI #0x00000001 4635 @ 53568: PUSHI #0x0000000f 4636 @ 53573: BOUNDS 4637 @ 53574: DEF REG p1=V_00ff a/tf=1b b/format=2 c/ostate=112 type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0 4638 @ 53589: PUSHI #0x00000001 4639 @ 53594: INIT 1 4640 @ 53597: PUSHI #0x00000002 4641 @ 53602: INIT 1 4642 @ 53605: PUSHI #0x00000003 4643 @ 53610: INIT 1 4644 @ 53613: PUSHI #0x00000004 4645 @ 53618: INIT 1 4646 @ 53621: PUSHI #0x00000005 4647 @ 53626: INIT 1 4648 @ 53629: PUSHI #0x00000006 4649 @ 53634: INIT 1 4650 @ 53637: PUSHI #0x00000007 4651 @ 53642: INIT 1 4652 @ 53645: PUSHI #0x0000000d 4653 @ 53650: INIT 1 4654 @ 53653: PUSHI #0x0000000e 4655 @ 53658: INIT 1 4656 @ 53661: PUSHI #0x0000000f 4657 @ 53666: INIT 1 4658 @ 53669: PUSHI #0x00000010 4659 @ 53674: INIT 1 4660 @ 53677: PUSHI #0x00000011 4661 @ 53682: INIT 1 4662 @ 53685: PUSHI #0x00000012 4663 @ 53690: INIT 1 4664 @ 53693: PUSHI #0x00000013 4665 @ 53698: INIT 1 4666 @ 53701: PUSHI #0x00000014 4667 @ 53706: INIT 1 1030 MASK = X'80' 4668 @ 53709: LINE 1030 "regression-compile-tmp/asems412.imp" 4669 @ 53748: PUSH MASK 4670 @ 53751: PUSHI #0x00000080 4671 @ 53756: ASSVAL 1031 N = N!X'FFFF0000' 4672 @ 53757: LINE 1031 "regression-compile-tmp/asems412.imp" 4673 @ 53796: PUSH N 4674 @ 53799: PUSH N 4675 @ 53802: PUSHI #0xffff0000 4676 @ 53807: OR 4677 @ 53808: ASSVAL 1032 %CYCLE J = 1, 1, 15 4678 @ 53809: LINE 1032 "regression-compile-tmp/asems412.imp" 4679 @ 53848: PUSH J 4680 @ 53851: PUSHI #0x00000001 4681 @ 53856: PUSHI #0x0000000f 4682 @ 53861: PUSHI #0x00000001 4683 @ 53866: FOR L_0003 1033 MASK = MASK<<1 4684 @ 53869: LINE 1033 "regression-compile-tmp/asems412.imp" 4685 @ 53908: PUSH MASK 4686 @ 53911: PUSH MASK 4687 @ 53914: PUSHI #0x00000001 4688 @ 53919: LSH 4689 @ 53920: ASSVAL 1034 %IF N&MASK # 0 %START 4690 @ 53921: LINE 1034 "regression-compile-tmp/asems412.imp" 4691 @ 53960: PUSH N 4692 @ 53963: PUSH MASK 4693 @ 53966: AND 4694 @ 53967: PUSHI #0x00000000 4695 @ 53972: JUMPIF = L_0007 1035 R = REG(J) 4696 @ 53976: LINE 1035 "regression-compile-tmp/asems412.imp" 4697 @ 54015: PUSH R 4698 @ 54018: PUSH REG 4699 @ 54021: PUSH J 4700 @ 54024: ACCESS 4701 @ 54025: ASSVAL 1036 HAZARD(R); FORGET(R) 4702 @ 54026: LINE 1036 "regression-compile-tmp/asems412.imp" 4703 @ 54065: PUSH HAZARD 4704 @ 54068: PUSH R 4705 @ 54071: ASSPAR 4706 @ 54072: CALL 4707 @ 54073: LINE 1036 "regression-compile-tmp/asems412.imp" 4708 @ 54112: PUSH FORGET 4709 @ 54115: PUSH R 4710 @ 54118: ASSPAR 4711 @ 54119: CALL 1037 %FINISH 4712 @ 54120: LINE 1037 "regression-compile-tmp/asems412.imp" 4713 @ 54159: LOCATE L_0007 1038 %REPEAT 4714 @ 54162: LINE 1038 "regression-compile-tmp/asems412.imp" 4715 @ 54201: REPEAT L_0003 4716 @ 54204: LOCATE L_0004 1039 HAZARD(LINK); FORGET(LINK) 4717 @ 54207: LINE 1039 "regression-compile-tmp/asems412.imp" 4718 @ 54246: PUSH HAZARD 4719 @ 54249: PUSHI #0x0000000c 4720 @ 54254: ASSPAR 4721 @ 54255: CALL 4722 @ 54256: LINE 1039 "regression-compile-tmp/asems412.imp" 4723 @ 54295: PUSH FORGET 4724 @ 54298: PUSHI #0x0000000c 4725 @ 54303: ASSPAR 4726 @ 54304: CALL 1040 DEFINE REFERENCE(N&255, P REF) 4727 @ 54305: LINE 1040 "regression-compile-tmp/asems412.imp" 4728 @ 54344: PUSH DEFINEREFERENCE 4729 @ 54347: PUSH N 4730 @ 54350: PUSHI #0x000000ff 4731 @ 54355: AND 4732 @ 54356: ASSPAR 4733 @ 54357: PUSHI #0x00000005 4734 @ 54362: ASSPAR 4735 @ 54363: CALL 1041 RI2(BAL, LINK, CODE, N&255) 4736 @ 54364: LINE 1041 "regression-compile-tmp/asems412.imp" 4737 @ 54403: PUSH RI2 4738 @ 54406: PUSHI #0x00004100 4739 @ 54411: ASSPAR 4740 @ 54412: PUSHI #0x0000000c 4741 @ 54417: ASSPAR 4742 @ 54418: PUSHI #0x0000002c 4743 @ 54423: ASSPAR 4744 @ 54424: PUSH N 4745 @ 54427: PUSHI #0x000000ff 4746 @ 54432: AND 4747 @ 54433: ASSPAR 4748 @ 54434: CALL 1042 %END 4749 @ 54435: LINE 1042 "regression-compile-tmp/asems412.imp" 4750 @ 54474: END _lev0id0_PERM {lev=2 --> 1} 1043 %ROUTINE SET DIAG(%INTEGER BASE, DISP, TYPE, FORM) 1044 !! PROC<1><1>LEVEL<3>NAME<1>BASE<3>TYPE<3>DISP<20> 4751 @ 54475: LINE 1043 "regression-compile-tmp/asems412.imp" 4752 @ 54514: DEF SETDIAG (_lev0id0_SETDIAG) p1=V_00fb 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 4753 @ 54533: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4754 @ 54534: DEF BASE 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 4755 @ 54550: DEF DISP 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 4756 @ 54566: DEF TYPE 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 4757 @ 54582: DEF FORM 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 4758 @ 54598: FINISH ) {lev=2} 1045 %INTEGER V1, V2, P, MARK 4759 @ 54599: LINE 1045 "regression-compile-tmp/asems412.imp" 4760 @ 54638: DEF V1 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 4761 @ 54652: DEF V2 p1=V_0101 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 4762 @ 54666: DEF P 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 4763 @ 54679: DEF MARK 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 1046 %ROUTINE FILL(%INTEGERNAME V) 4764 @ 54695: LINE 1046 "regression-compile-tmp/asems412.imp" 4765 @ 54734: DEF FILL (_lev0id0_SETDIAG_FILL) p1=V_0104 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 4766 @ 54750: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 4767 @ 54751: DEF V p1=V_0105 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 4768 @ 54764: FINISH ) {lev=3} 1047 %INTEGER SHIFT 4769 @ 54765: LINE 1047 "regression-compile-tmp/asems412.imp" 4770 @ 54804: DEF SHIFT p1=V_0106 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 1048 SHIFT = 0; V = 0 4771 @ 54821: LINE 1048 "regression-compile-tmp/asems412.imp" 4772 @ 54860: PUSH SHIFT 4773 @ 54863: PUSHI #0x00000000 4774 @ 54868: ASSVAL 4775 @ 54869: LINE 1048 "regression-compile-tmp/asems412.imp" 4776 @ 54908: PUSH V 4777 @ 54911: PUSHI #0x00000000 4778 @ 54916: ASSVAL 1049 %CYCLE 4779 @ 54917: LINE 1049 "regression-compile-tmp/asems412.imp" 4780 @ 54956: LOCATE L_0003 1050 %RETURN %IF P = VP %OR SHIFT = 30 4781 @ 54959: LINE 1050 "regression-compile-tmp/asems412.imp" 4782 @ 54998: PUSH P 4783 @ 55001: PUSH VP 4784 @ 55004: JUMPIF = L_0008 4785 @ 55008: PUSH SHIFT 4786 @ 55011: PUSHI #0x0000001e 4787 @ 55016: JUMPIF # L_0007 4788 @ 55020: LOCATE L_0008 4789 @ 55023: RETURN 4790 @ 55024: LOCATE L_0007 1051 P = P+1 4791 @ 55027: LINE 1051 "regression-compile-tmp/asems412.imp" 4792 @ 55066: PUSH P 4793 @ 55069: PUSH P 4794 @ 55072: PUSHI #0x00000001 4795 @ 55077: ADD 4796 @ 55078: ASSVAL 1052 V = V+(VBUF(P)-32)< 2} 1056 P = 0; MARK = 0 4819 @ 55277: LINE 1056 "regression-compile-tmp/asems412.imp" 4820 @ 55316: PUSH P 4821 @ 55319: PUSHI #0x00000000 4822 @ 55324: ASSVAL 4823 @ 55325: LINE 1056 "regression-compile-tmp/asems412.imp" 4824 @ 55364: PUSH MARK 4825 @ 55367: PUSHI #0x00000000 4826 @ 55372: ASSVAL 1057 FILL(V1); FILL(V2) 4827 @ 55373: LINE 1057 "regression-compile-tmp/asems412.imp" 4828 @ 55412: PUSH FILL 4829 @ 55415: PUSH V1 4830 @ 55418: ASSPAR 4831 @ 55419: CALL 4832 @ 55420: LINE 1057 "regression-compile-tmp/asems412.imp" 4833 @ 55459: PUSH FILL 4834 @ 55462: PUSH V2 4835 @ 55465: ASSPAR 4836 @ 55466: CALL 1058 %IF FORM = 0 %START; ! NON-VARIABLE 4837 @ 55467: LINE 1058 "regression-compile-tmp/asems412.imp" 4838 @ 55506: PUSH FORM 4839 @ 55509: PUSHI #0x00000000 4840 @ 55514: JUMPIF # L_0004 1059 PRINT SYMBOL(DLINE) 4841 @ 55518: LINE 1059 "regression-compile-tmp/asems412.imp" 4842 @ 55557: PUSH PRINTSYMBOL 4843 @ 55560: PUSHI #0x0000000a 4844 @ 55565: ASSPAR 4845 @ 55566: CALL 1060 MARK = 16; FORM = 1 4846 @ 55567: LINE 1060 "regression-compile-tmp/asems412.imp" 4847 @ 55606: PUSH MARK 4848 @ 55609: PUSHI #0x00000010 4849 @ 55614: ASSVAL 4850 @ 55615: LINE 1060 "regression-compile-tmp/asems412.imp" 4851 @ 55654: PUSH FORM 4852 @ 55657: PUSHI #0x00000001 4853 @ 55662: ASSVAL 1061 %IF BASE = 0 %START; ! %BEGIN 4854 @ 55663: LINE 1061 "regression-compile-tmp/asems412.imp" 4855 @ 55702: PUSH BASE 4856 @ 55705: PUSHI #0x00000000 4857 @ 55710: JUMPIF # L_0007 1062 V2 = 0; V1 = BLOCK WORD;! 'BLOCK' 4858 @ 55714: LINE 1062 "regression-compile-tmp/asems412.imp" 4859 @ 55753: PUSH V2 4860 @ 55756: PUSHI #0x00000000 4861 @ 55761: ASSVAL 4862 @ 55762: LINE 1062 "regression-compile-tmp/asems412.imp" 4863 @ 55801: PUSH V1 4864 @ 55804: PUSH BLOCKWORD 4865 @ 55807: ASSVAL 1063 %FINISH 4866 @ 55808: LINE 1063 "regression-compile-tmp/asems412.imp" 4867 @ 55847: LOCATE L_0007 1064 %FINISH 4868 @ 55850: LINE 1064 "regression-compile-tmp/asems412.imp" 4869 @ 55889: LOCATE L_0004 1065 BASE = ACTUAL(BASE) 4870 @ 55892: LINE 1065 "regression-compile-tmp/asems412.imp" 4871 @ 55931: PUSH BASE 4872 @ 55934: PUSH ACTUAL 4873 @ 55937: PUSH BASE 4874 @ 55940: ACCESS 4875 @ 55941: ASSVAL 1066 BASE = BASE-8 %IF BASE >= 8 4876 @ 55942: LINE 1066 "regression-compile-tmp/asems412.imp" 4877 @ 55981: PUSH BASE 4878 @ 55984: PUSHI #0x00000008 4879 @ 55989: JUMPIF < L_0004 4880 @ 55993: PUSH BASE 4881 @ 55996: PUSH BASE 4882 @ 55999: PUSHI #0x00000008 4883 @ 56004: SUB 4884 @ 56005: ASSVAL 4885 @ 56006: LOCATE L_0004 1067 PRINTSYMBOL(DIAGS) 4886 @ 56009: LINE 1067 "regression-compile-tmp/asems412.imp" 4887 @ 56048: PUSH PRINTSYMBOL 4888 @ 56051: PUSHI #0x0000000b 4889 @ 56056: ASSPAR 4890 @ 56057: CALL 1068 %IF FORM = -1 %START; ! END OF BLOCK 4891 @ 56058: LINE 1068 "regression-compile-tmp/asems412.imp" 4892 @ 56097: PUSH FORM 4893 @ 56100: PUSHI #0x00000001 4894 @ 56105: NEGATE 4895 @ 56106: JUMPIF # L_0004 1069 PUT(-1); PUT(-1); DA = DA+4; %RETURN 4896 @ 56110: LINE 1069 "regression-compile-tmp/asems412.imp" 4897 @ 56149: PUSH PUT 4898 @ 56152: PUSHI #0x00000001 4899 @ 56157: NEGATE 4900 @ 56158: ASSPAR 4901 @ 56159: CALL 4902 @ 56160: LINE 1069 "regression-compile-tmp/asems412.imp" 4903 @ 56199: PUSH PUT 4904 @ 56202: PUSHI #0x00000001 4905 @ 56207: NEGATE 4906 @ 56208: ASSPAR 4907 @ 56209: CALL 4908 @ 56210: LINE 1069 "regression-compile-tmp/asems412.imp" 4909 @ 56249: PUSH DA 4910 @ 56252: PUSH DA 4911 @ 56255: PUSHI #0x00000004 4912 @ 56260: ADD 4913 @ 56261: ASSVAL 4914 @ 56262: LINE 1069 "regression-compile-tmp/asems412.imp" 4915 @ 56301: RETURN 1070 %FINISH 4916 @ 56302: LINE 1070 "regression-compile-tmp/asems412.imp" 4917 @ 56341: LOCATE L_0004 1071 PUT(((((MARK+XLEVEL)<<1+FORM-1)<<3+BASE)<<3+TYPE)<<4) 4918 @ 56344: LINE 1071 "regression-compile-tmp/asems412.imp" 4919 @ 56383: PUSH PUT 4920 @ 56386: PUSH MARK 4921 @ 56389: PUSH XLEVEL 4922 @ 56392: ADD 4923 @ 56393: PUSHI #0x00000001 4924 @ 56398: LSH 4925 @ 56399: PUSH FORM 4926 @ 56402: ADD 4927 @ 56403: PUSHI #0x00000001 4928 @ 56408: SUB 4929 @ 56409: PUSHI #0x00000003 4930 @ 56414: LSH 4931 @ 56415: PUSH BASE 4932 @ 56418: ADD 4933 @ 56419: PUSHI #0x00000003 4934 @ 56424: LSH 4935 @ 56425: PUSH TYPE 4936 @ 56428: ADD 4937 @ 56429: PUSHI #0x00000004 4938 @ 56434: LSH 4939 @ 56435: ASSPAR 4940 @ 56436: CALL 1072 PUT(DISP) 4941 @ 56437: LINE 1072 "regression-compile-tmp/asems412.imp" 4942 @ 56476: PUSH PUT 4943 @ 56479: PUSH DISP 4944 @ 56482: ASSPAR 4945 @ 56483: CALL 1073 PUT(V1>>16); PUT(V1&X'FFFF') 4946 @ 56484: LINE 1073 "regression-compile-tmp/asems412.imp" 4947 @ 56523: PUSH PUT 4948 @ 56526: PUSH V1 4949 @ 56529: PUSHI #0x00000010 4950 @ 56534: RSH 4951 @ 56535: ASSPAR 4952 @ 56536: CALL 4953 @ 56537: LINE 1073 "regression-compile-tmp/asems412.imp" 4954 @ 56576: PUSH PUT 4955 @ 56579: PUSH V1 4956 @ 56582: PUSHI #0x0000ffff 4957 @ 56587: AND 4958 @ 56588: ASSPAR 4959 @ 56589: CALL 1074 PUT(V2>>16); PUT(V2&X'FFFF') 4960 @ 56590: LINE 1074 "regression-compile-tmp/asems412.imp" 4961 @ 56629: PUSH PUT 4962 @ 56632: PUSH V2 4963 @ 56635: PUSHI #0x00000010 4964 @ 56640: RSH 4965 @ 56641: ASSPAR 4966 @ 56642: CALL 4967 @ 56643: LINE 1074 "regression-compile-tmp/asems412.imp" 4968 @ 56682: PUSH PUT 4969 @ 56685: PUSH V2 4970 @ 56688: PUSHI #0x0000ffff 4971 @ 56693: AND 4972 @ 56694: ASSPAR 4973 @ 56695: CALL 1075 DA = DA+12 4974 @ 56696: LINE 1075 "regression-compile-tmp/asems412.imp" 4975 @ 56735: PUSH DA 4976 @ 56738: PUSH DA 4977 @ 56741: PUSHI #0x0000000c 4978 @ 56746: ADD 4979 @ 56747: ASSVAL 1076 %END 4980 @ 56748: LINE 1076 "regression-compile-tmp/asems412.imp" 4981 @ 56787: END _lev0id0_SETDIAG {lev=2 --> 1} 1077 %ROUTINE ASSEMBLE(%SHORTINTEGER AMODE, LABS, NAMES) 4982 @ 56788: LINE 1077 "regression-compile-tmp/asems412.imp" 4983 @ 56827: DEF ASSEMBLE (_lev0id0_ASSEMBLE) p1=V_00fc 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 4984 @ 56847: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 4985 @ 56848: DEF AMODE p1=V_00fd a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 4986 @ 56865: DEF LABS p1=V_00fe a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 4987 @ 56881: DEF NAMES p1=V_00ff a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 4988 @ 56898: FINISH ) {lev=2} 1078 %OWNINTEGER ASS LEVEL = 0 4989 @ 56899: LINE 1078 "regression-compile-tmp/asems412.imp" 4990 @ 56938: PUSHI #0x00000000 4991 @ 56943: DEF ASSLEVEL p1=V_0100 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 4992 @ 56963: INIT 1 1079 %SWITCH Z(33:126) 4993 @ 56966: LINE 1079 "regression-compile-tmp/asems412.imp" 4994 @ 57005: PUSHI #0x00000021 4995 @ 57010: PUSHI #0x0000007e 4996 @ 57015: BOUNDS 4997 @ 57016: DEF Z p1=V_0101 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 1080 %RECORD(VARFM)%NAME V, GVAR, FP, AP 4998 @ 57029: LINE 1080 "regression-compile-tmp/asems412.imp" 4999 @ 57068: DEF V p1=V_0102 a/tf=42 b/format=85 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 5000 @ 57081: DEF GVAR p1=V_0103 a/tf=42 b/format=85 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 5001 @ 57097: DEF FP p1=V_0104 a/tf=42 b/format=85 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 5002 @ 57111: DEF AP p1=V_0105 a/tf=42 b/format=85 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1081 %RECORD(STACKFM)%NAME LHS, RHS, X 5003 @ 57125: LINE 1081 "regression-compile-tmp/asems412.imp" 5004 @ 57164: DEF LHS p1=V_0106 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 5005 @ 57179: DEF RHS p1=V_0107 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 5006 @ 57194: DEF X p1=V_0108 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1082 %INTEGER SYM; ! CURRENT CODE ITEM 5007 @ 57207: LINE 1082 "regression-compile-tmp/asems412.imp" 5008 @ 57246: DEF SYM p1=V_0109 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 1083 %INTEGER VLB, VUB 5009 @ 57261: LINE 1083 "regression-compile-tmp/asems412.imp" 5010 @ 57300: DEF VLB 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 5011 @ 57315: DEF VUB 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 1084 %INTEGER DATA SIZE, OLD FRAME, GSTART, WDISP, NEW DISP, SDISP 5012 @ 57330: LINE 1084 "regression-compile-tmp/asems412.imp" 5013 @ 57369: DEF DATASIZE 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 5014 @ 57389: DEF OLDFRAME 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 5015 @ 57409: DEF GSTART 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 5016 @ 57427: DEF WDISP 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 5017 @ 57444: DEF NEWDISP 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 5018 @ 57463: DEF SDISP 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 1085 %INTEGER OPR, N 5019 @ 57480: LINE 1085 "regression-compile-tmp/asems412.imp" 5020 @ 57519: DEF OPR 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 5021 @ 57534: DEF N 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 1086 %INTEGER SIZE PATCH, WARNING 5022 @ 57547: LINE 1086 "regression-compile-tmp/asems412.imp" 5023 @ 57586: DEF SIZEPATCH 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 5024 @ 57607: DEF WARNING 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 1087 %OWNINTEGER GG = 0 5025 @ 57626: LINE 1087 "regression-compile-tmp/asems412.imp" 5026 @ 57665: PUSHI #0x00000000 5027 @ 57670: DEF GG 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 5028 @ 57684: INIT 1 1088 %INTEGER J,K, LEN, VAL, APARM, SPS 5029 @ 57687: LINE 1088 "regression-compile-tmp/asems412.imp" 5030 @ 57726: DEF J 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 5031 @ 57739: DEF K 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 5032 @ 57752: DEF LEN 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 5033 @ 57767: DEF VAL 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 5034 @ 57782: DEF APARM 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 5035 @ 57799: DEF SPS 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 1089 %INTEGER LABEL START;! FIRST LABEL FOR THIS LEVEL 5036 @ 57814: LINE 1089 "regression-compile-tmp/asems412.imp" 5037 @ 57853: DEF LABELSTART 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 1090 %INTEGER RT LAB; ! ROUTINE JUMP ADDRESS 1091 5038 @ 57875: LINE 1090 "regression-compile-tmp/asems412.imp" 5039 @ 57914: DEF RTLAB 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 1092 %CONSTBYTEINTEGERARRAY COMM(1:17)= 0, 0, 1, 0, 1, 1, 0, 1093 1, 1, 1, 0, 0, 0, 0, 1, 0, 0 1094 5040 @ 57931: LINE 1092 "regression-compile-tmp/asems412.imp" 5041 @ 57970: PUSHI #0x00000001 5042 @ 57975: PUSHI #0x00000011 5043 @ 57980: BOUNDS 5044 @ 57981: DEF COMM p1=V_011f 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 5045 @ 57997: PUSHI #0x00000000 5046 @ 58002: INIT 1 5047 @ 58005: PUSHI #0x00000000 5048 @ 58010: INIT 1 5049 @ 58013: PUSHI #0x00000001 5050 @ 58018: INIT 1 5051 @ 58021: PUSHI #0x00000000 5052 @ 58026: INIT 1 5053 @ 58029: PUSHI #0x00000001 5054 @ 58034: INIT 1 5055 @ 58037: PUSHI #0x00000001 5056 @ 58042: INIT 1 5057 @ 58045: PUSHI #0x00000000 5058 @ 58050: INIT 1 5059 @ 58053: PUSHI #0x00000001 5060 @ 58058: INIT 1 5061 @ 58061: PUSHI #0x00000001 5062 @ 58066: INIT 1 5063 @ 58069: PUSHI #0x00000001 5064 @ 58074: INIT 1 5065 @ 58077: PUSHI #0x00000000 5066 @ 58082: INIT 1 5067 @ 58085: PUSHI #0x00000000 5068 @ 58090: INIT 1 5069 @ 58093: PUSHI #0x00000000 5070 @ 58098: INIT 1 5071 @ 58101: PUSHI #0x00000000 5072 @ 58106: INIT 1 5073 @ 58109: PUSHI #0x00000001 5074 @ 58114: INIT 1 5075 @ 58117: PUSHI #0x00000000 5076 @ 58122: INIT 1 5077 @ 58125: PUSHI #0x00000000 5078 @ 58130: INIT 1 1095 %ROUTINESPEC AMAP(%RECORD(STACKFM)%NAME V) 5079 @ 58133: LINE 1095 "regression-compile-tmp/asems412.imp" 5080 @ 58172: DEF AMAP (_lev0id0_ASSEMBLE_AMAP) p1=V_0120 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 5081 @ 58188: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 5082 @ 58189: DEF V p1=V_0121 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 5083 @ 58202: FINISH ) {lev=2} 1096 %ROUTINESPEC LOAD(%RECORD(STACKFM)%NAME V, %INTEGER REG) 5084 @ 58203: LINE 1096 "regression-compile-tmp/asems412.imp" 5085 @ 58242: DEF LOAD (_lev0id0_ASSEMBLE_LOAD) p1=V_0121 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 5086 @ 58258: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 5087 @ 58259: DEF V p1=V_0122 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 5088 @ 58272: DEF REG 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 5089 @ 58287: FINISH ) {lev=2} 1097 %INTEGERFNSPEC NEW TAG 5090 @ 58288: LINE 1097 "regression-compile-tmp/asems412.imp" 5091 @ 58327: DEF NEWTAG (_lev0id0_ASSEMBLE_NEWTAG) p1=V_0122 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 5092 @ 58345: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 5093 @ 58346: FINISH ) {lev=2} 1098 %ROUTINESPEC JOIN(%RECORD(STACKFM)%NAME W) 5094 @ 58347: LINE 1098 "regression-compile-tmp/asems412.imp" 5095 @ 58386: DEF JOIN (_lev0id0_ASSEMBLE_JOIN) p1=V_0123 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 5096 @ 58402: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 5097 @ 58403: DEF W p1=V_0124 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 5098 @ 58416: FINISH ) {lev=2} 1099 %ROUTINESPEC OPERATE(%INTEGER N) 5099 @ 58417: LINE 1099 "regression-compile-tmp/asems412.imp" 5100 @ 58456: DEF OPERATE (_lev0id0_ASSEMBLE_OPERATE) p1=V_0124 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 5101 @ 58475: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 5102 @ 58476: DEF N 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 5103 @ 58489: FINISH ) {lev=2} 1100 %ROUTINESPEC COMPARE(%RECORD(STACKFM)%NAME L, R) 5104 @ 58490: LINE 1100 "regression-compile-tmp/asems412.imp" 5105 @ 58529: DEF COMPARE (_lev0id0_ASSEMBLE_COMPARE) p1=V_0125 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 5106 @ 58548: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 5107 @ 58549: DEF L p1=V_0126 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 5108 @ 58562: DEF R p1=V_0127 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 5109 @ 58575: FINISH ) {lev=2} 1101 %ROUTINESPEC HEADER(%RECORD(VARFM)%NAME V) 1102 5110 @ 58576: LINE 1101 "regression-compile-tmp/asems412.imp" 5111 @ 58615: DEF HEADER (_lev0id0_ASSEMBLE_HEADER) p1=V_0126 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 5112 @ 58633: START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} 5113 @ 58634: DEF V p1=V_0127 a/tf=42 b/format=85 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 5114 @ 58647: FINISH ) {lev=2} 1103 ABORT(-1) %IF FREE SPACE < MIN FREE; ! ...STACK OVERFLOW? 1104 5115 @ 58648: LINE 1103 "regression-compile-tmp/asems412.imp" 5116 @ 58687: PUSH FREESPACE 5117 @ 58690: PUSHI #0x00000258 5118 @ 58695: JUMPIF >= L_0004 5119 @ 58699: PUSH ABORT 5120 @ 58702: PUSHI #0x00000001 5121 @ 58707: NEGATE 5122 @ 58708: ASSPAR 5123 @ 58709: CALL 5124 @ 58710: LOCATE L_0004 1105 XLEVEL = XLEVEL+1 5125 @ 58713: LINE 1105 "regression-compile-tmp/asems412.imp" 5126 @ 58752: PUSH XLEVEL 5127 @ 58755: PUSH XLEVEL 5128 @ 58758: PUSHI #0x00000001 5129 @ 58763: ADD 5130 @ 58764: ASSVAL 1106 RT LAB = 0; LABEL START = LABS; OLD FRAME = FRAME 5131 @ 58765: LINE 1106 "regression-compile-tmp/asems412.imp" 5132 @ 58804: PUSH RTLAB 5133 @ 58807: PUSHI #0x00000000 5134 @ 58812: ASSVAL 5135 @ 58813: LINE 1106 "regression-compile-tmp/asems412.imp" 5136 @ 58852: PUSH LABELSTART 5137 @ 58855: PUSH LABS 5138 @ 58858: ASSVAL 5139 @ 58859: LINE 1106 "regression-compile-tmp/asems412.imp" 5140 @ 58898: PUSH OLDFRAME 5141 @ 58901: PUSH FRAME 5142 @ 58904: ASSVAL 1107 WDISP = 0; WARNING = 0 5143 @ 58905: LINE 1107 "regression-compile-tmp/asems412.imp" 5144 @ 58944: PUSH WDISP 5145 @ 58947: PUSHI #0x00000000 5146 @ 58952: ASSVAL 5147 @ 58953: LINE 1107 "regression-compile-tmp/asems412.imp" 5148 @ 58992: PUSH WARNING 5149 @ 58995: PUSHI #0x00000000 5150 @ 59000: ASSVAL 1108 GVAR == DECVAR; GSTART = NAMES 5151 @ 59001: LINE 1108 "regression-compile-tmp/asems412.imp" 5152 @ 59040: PUSH GVAR 5153 @ 59043: PUSH DECVAR 5154 @ 59046: ASSREF 5155 @ 59047: LINE 1108 "regression-compile-tmp/asems412.imp" 5156 @ 59086: PUSH GSTART 5157 @ 59089: PUSH NAMES 5158 @ 59092: ASSVAL 1109 %IF AMODE > 0 %START 5159 @ 59093: LINE 1109 "regression-compile-tmp/asems412.imp" 5160 @ 59132: PUSH AMODE 5161 @ 59135: PUSHI #0x00000000 5162 @ 59140: JUMPIF <= L_0004 1110 %IF AMODE = 1 %THEN FRAME = REGLEN %ELSE FRAME = 11*REGLEN 5163 @ 59144: LINE 1110 "regression-compile-tmp/asems412.imp" 5164 @ 59183: PUSH AMODE 5165 @ 59186: PUSHI #0x00000001 5166 @ 59191: JUMPIF # L_0007 5167 @ 59195: PUSH FRAME 5168 @ 59198: PUSHI #0x00000004 5169 @ 59203: ASSVAL 5170 @ 59204: GOTO L_0006 5171 @ 59207: LOCATE L_0007 5172 @ 59210: PUSH FRAME 5173 @ 59213: PUSHI #0x0000000b 5174 @ 59218: PUSHI #0x00000004 5175 @ 59223: MUL 5176 @ 59224: ASSVAL 5177 @ 59225: LOCATE L_0006 1111 ABORT(-3) %IF ASS LEVEL = 5 5178 @ 59228: LINE 1111 "regression-compile-tmp/asems412.imp" 5179 @ 59267: PUSH ASSLEVEL 5180 @ 59270: PUSHI #0x00000005 5181 @ 59275: JUMPIF # L_0007 5182 @ 59279: PUSH ABORT 5183 @ 59282: PUSHI #0x00000003 5184 @ 59287: NEGATE 5185 @ 59288: ASSPAR 5186 @ 59289: CALL 5187 @ 59290: LOCATE L_0007 1112 ASS LEVEL = ASS LEVEL+1; LOCAL = BASE REG(ASS LEVEL) 5188 @ 59293: LINE 1112 "regression-compile-tmp/asems412.imp" 5189 @ 59332: PUSH ASSLEVEL 5190 @ 59335: PUSH ASSLEVEL 5191 @ 59338: PUSHI #0x00000001 5192 @ 59343: ADD 5193 @ 59344: ASSVAL 5194 @ 59345: LINE 1112 "regression-compile-tmp/asems412.imp" 5195 @ 59384: PUSH LOCAL 5196 @ 59387: PUSH BASEREG 5197 @ 59390: PUSH ASSLEVEL 5198 @ 59393: ACCESS 5199 @ 59394: ASSVAL 1113 ACTIVITY(LOCAL) = -1 5200 @ 59395: LINE 1113 "regression-compile-tmp/asems412.imp" 5201 @ 59434: PUSH ACTIVITY 5202 @ 59437: PUSH LOCAL 5203 @ 59440: ACCESS 5204 @ 59441: PUSHI #0x00000001 5205 @ 59446: NEGATE 5206 @ 59447: ASSVAL 1114 %IF AMODE = 2 %START 5207 @ 59448: LINE 1114 "regression-compile-tmp/asems412.imp" 5208 @ 59487: PUSH AMODE 5209 @ 59490: PUSHI #0x00000002 5210 @ 59495: JUMPIF # L_0007 1115 SET DIAG(R15, 0, 0, 0) 5211 @ 59499: LINE 1115 "regression-compile-tmp/asems412.imp" 5212 @ 59538: PUSH SETDIAG 5213 @ 59541: PUSHI #0x00000029 5214 @ 59546: ASSPAR 5215 @ 59547: PUSHI #0x00000000 5216 @ 59552: ASSPAR 5217 @ 59553: PUSHI #0x00000000 5218 @ 59558: ASSPAR 5219 @ 59559: PUSHI #0x00000000 5220 @ 59564: ASSPAR 5221 @ 59565: CALL 1116 %FINISH 5222 @ 59566: LINE 1116 "regression-compile-tmp/asems412.imp" 5223 @ 59605: LOCATE L_0007 1117 %IF OTYPE = PERMRT %START 5224 @ 59608: LINE 1117 "regression-compile-tmp/asems412.imp" 5225 @ 59647: PUSH OTYPE 5226 @ 59650: PUSHI #0x00000007 5227 @ 59655: JUMPIF # L_0007 1118 PERMS = PERMS-1; GVAR_DISP = PERMS 5228 @ 59659: LINE 1118 "regression-compile-tmp/asems412.imp" 5229 @ 59698: PUSH PERMS 5230 @ 59701: PUSH PERMS 5231 @ 59704: PUSHI #0x00000001 5232 @ 59709: SUB 5233 @ 59710: ASSVAL 5234 @ 59711: LINE 1118 "regression-compile-tmp/asems412.imp" 5235 @ 59750: PUSH GVAR 5236 @ 59753: SELECT 1 5237 @ 59756: PUSH PERMS 5238 @ 59759: ASSVAL 1119 %FINISH 5239 @ 59760: LINE 1119 "regression-compile-tmp/asems412.imp" 5240 @ 59799: LOCATE L_0007 1120 SET DIAG(LOCAL, 0, 0, 0) %IF GG = PROCEDURE 5241 @ 59802: LINE 1120 "regression-compile-tmp/asems412.imp" 5242 @ 59841: PUSH GG 5243 @ 59844: PUSHI #0x00000031 5244 @ 59849: JUMPIF # L_0007 5245 @ 59853: PUSH SETDIAG 5246 @ 59856: PUSH LOCAL 5247 @ 59859: ASSPAR 5248 @ 59860: PUSHI #0x00000000 5249 @ 59865: ASSPAR 5250 @ 59866: PUSHI #0x00000000 5251 @ 59871: ASSPAR 5252 @ 59872: PUSHI #0x00000000 5253 @ 59877: ASSPAR 5254 @ 59878: CALL 5255 @ 59879: LOCATE L_0007 1121 %ELSE %IF AMODE < 0 5256 @ 59882: LINE 1121 "regression-compile-tmp/asems412.imp" 5257 @ 59921: GOTO L_0003 5258 @ 59924: LOCATE L_0004 5259 @ 59927: PUSH AMODE 5260 @ 59930: PUSHI #0x00000000 5261 @ 59935: JUMPIF >= L_0004 1122 FRAME = 0 5262 @ 59939: LINE 1122 "regression-compile-tmp/asems412.imp" 5263 @ 59978: PUSH FRAME 5264 @ 59981: PUSHI #0x00000000 5265 @ 59986: ASSVAL 1123 %ELSE 5266 @ 59987: LINE 1123 "regression-compile-tmp/asems412.imp" 5267 @ 60026: GOTO L_0003 5268 @ 60029: LOCATE L_0004 1124 SET DIAG(0, 0, 0 ,0); ! BLOCK 5269 @ 60032: LINE 1124 "regression-compile-tmp/asems412.imp" 5270 @ 60071: PUSH SETDIAG 5271 @ 60074: PUSHI #0x00000000 5272 @ 60079: ASSPAR 5273 @ 60080: PUSHI #0x00000000 5274 @ 60085: ASSPAR 5275 @ 60086: PUSHI #0x00000000 5276 @ 60091: ASSPAR 5277 @ 60092: PUSHI #0x00000000 5278 @ 60097: ASSPAR 5279 @ 60098: CALL 1125 %FINISH 1126 1127 ! DESCRIPTOR PROCESSING 1128 5280 @ 60099: LINE 1125 "regression-compile-tmp/asems412.imp" 5281 @ 60138: LOCATE L_0003 1129 %INTEGERFN LOOKUP(%INTEGER NAME) 5282 @ 60141: LINE 1129 "regression-compile-tmp/asems412.imp" 5283 @ 60180: DEF LOOKUP (_lev0id0_ASSEMBLE_LOOKUP) p1=V_0127 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 5284 @ 60198: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 5285 @ 60199: DEF NAME 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 5286 @ 60215: FINISH ) {lev=3} 1130 %INTEGER P, P1, P2 5287 @ 60216: LINE 1130 "regression-compile-tmp/asems412.imp" 5288 @ 60255: DEF P 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 5289 @ 60268: DEF P1 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 5290 @ 60282: DEF P2 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 1131 %RECORD(VARFM)%NAME V 5291 @ 60296: LINE 1131 "regression-compile-tmp/asems412.imp" 5292 @ 60335: DEF V p1=V_012c a/tf=42 b/format=85 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1132 P1 = 1; P2 = NAMES 5293 @ 60348: LINE 1132 "regression-compile-tmp/asems412.imp" 5294 @ 60387: PUSH P1 5295 @ 60390: PUSHI #0x00000001 5296 @ 60395: ASSVAL 5297 @ 60396: LINE 1132 "regression-compile-tmp/asems412.imp" 5298 @ 60435: PUSH P2 5299 @ 60438: PUSH NAMES 5300 @ 60441: ASSVAL 1133 %WHILE P2 >= P1 %CYCLE 5301 @ 60442: LINE 1133 "regression-compile-tmp/asems412.imp" 5302 @ 60481: LOCATE L_0003 5303 @ 60484: PUSH P2 5304 @ 60487: PUSH P1 5305 @ 60490: JUMPIF < L_0004 1134 P = (P1+P2)>>1 5306 @ 60494: LINE 1134 "regression-compile-tmp/asems412.imp" 5307 @ 60533: PUSH P 5308 @ 60536: PUSH P1 5309 @ 60539: PUSH P2 5310 @ 60542: ADD 5311 @ 60543: PUSHI #0x00000001 5312 @ 60548: RSH 5313 @ 60549: ASSVAL 1135 V == VAR(P) 5314 @ 60550: LINE 1135 "regression-compile-tmp/asems412.imp" 5315 @ 60589: PUSH V 5316 @ 60592: PUSH VAR 5317 @ 60595: PUSH P 5318 @ 60598: ACCESS 5319 @ 60599: ASSREF 1136 %RESULT = P %IF V_ID = NAME 5320 @ 60600: LINE 1136 "regression-compile-tmp/asems412.imp" 5321 @ 60639: PUSH V 5322 @ 60642: SELECT 4 5323 @ 60645: PUSH NAME 5324 @ 60648: JUMPIF # L_0007 5325 @ 60652: PUSH P 5326 @ 60655: RESULT 5327 @ 60656: LOCATE L_0007 1137 %IF V_ID > NAME %THEN P2 = P-1 %ELSE P1 = P+1 5328 @ 60659: LINE 1137 "regression-compile-tmp/asems412.imp" 5329 @ 60698: PUSH V 5330 @ 60701: SELECT 4 5331 @ 60704: PUSH NAME 5332 @ 60707: JUMPIF <= L_0007 5333 @ 60711: PUSH P2 5334 @ 60714: PUSH P 5335 @ 60717: PUSHI #0x00000001 5336 @ 60722: SUB 5337 @ 60723: ASSVAL 5338 @ 60724: GOTO L_0006 5339 @ 60727: LOCATE L_0007 5340 @ 60730: PUSH P1 5341 @ 60733: PUSH P 5342 @ 60736: PUSHI #0x00000001 5343 @ 60741: ADD 5344 @ 60742: ASSVAL 5345 @ 60743: LOCATE L_0006 1138 %REPEAT 5346 @ 60746: LINE 1138 "regression-compile-tmp/asems412.imp" 5347 @ 60785: REPEAT L_0003 5348 @ 60788: LOCATE L_0004 1139 ABORT(6) 5349 @ 60791: LINE 1139 "regression-compile-tmp/asems412.imp" 5350 @ 60830: PUSH ABORT 5351 @ 60833: PUSHI #0x00000006 5352 @ 60838: ASSPAR 5353 @ 60839: CALL 1140 %STOP 5354 @ 60840: LINE 1140 "regression-compile-tmp/asems412.imp" 5355 @ 60879: STOP 1141 %END 5356 @ 60880: LINE 1141 "regression-compile-tmp/asems412.imp" 5357 @ 60919: END _lev0id0_ASSEMBLE_LOOKUP {lev=3 --> 2} 1142 %ROUTINE DEFINE VAR 5358 @ 60920: LINE 1142 "regression-compile-tmp/asems412.imp" 5359 @ 60959: DEF DEFINEVAR (_lev0id0_ASSEMBLE_DEFINEVAR) p1=V_0128 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 5360 @ 60980: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 5361 @ 60981: FINISH ) {lev=3} 1143 %CONSTBYTEINTEGERARRAY VSIZE(0:7) = 0, 4, 1, 2, 0, 4, 4, 0 5362 @ 60982: LINE 1143 "regression-compile-tmp/asems412.imp" 5363 @ 61021: PUSHI #0x00000000 5364 @ 61026: PUSHI #0x00000007 5365 @ 61031: BOUNDS 5366 @ 61032: DEF VSIZE p1=V_0129 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 5367 @ 61049: PUSHI #0x00000000 5368 @ 61054: INIT 1 5369 @ 61057: PUSHI #0x00000004 5370 @ 61062: INIT 1 5371 @ 61065: PUSHI #0x00000001 5372 @ 61070: INIT 1 5373 @ 61073: PUSHI #0x00000002 5374 @ 61078: INIT 1 5375 @ 61081: PUSHI #0x00000000 5376 @ 61086: INIT 1 5377 @ 61089: PUSHI #0x00000004 5378 @ 61094: INIT 1 5379 @ 61097: PUSHI #0x00000004 5380 @ 61102: INIT 1 5381 @ 61105: PUSHI #0x00000000 5382 @ 61110: INIT 1 1144 %CONSTBYTEINTEGERARRAY ROUND(0:7) = 3,3,0,1,1,3,3,3 5383 @ 61113: LINE 1144 "regression-compile-tmp/asems412.imp" 5384 @ 61152: PUSHI #0x00000000 5385 @ 61157: PUSHI #0x00000007 5386 @ 61162: BOUNDS 5387 @ 61163: DEF ROUND p1=V_012a 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 5388 @ 61180: PUSHI #0x00000003 5389 @ 61185: INIT 1 5390 @ 61188: PUSHI #0x00000003 5391 @ 61193: INIT 1 5392 @ 61196: PUSHI #0x00000000 5393 @ 61201: INIT 1 5394 @ 61204: PUSHI #0x00000001 5395 @ 61209: INIT 1 5396 @ 61212: PUSHI #0x00000001 5397 @ 61217: INIT 1 5398 @ 61220: PUSHI #0x00000003 5399 @ 61225: INIT 1 5400 @ 61228: PUSHI #0x00000003 5401 @ 61233: INIT 1 5402 @ 61236: PUSHI #0x00000003 5403 @ 61241: INIT 1 1145 %INTEGER TYPE, FORM, TF, F, SIZE, FORMAT, S 5404 @ 61244: LINE 1145 "regression-compile-tmp/asems412.imp" 5405 @ 61283: DEF TYPE 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 5406 @ 61299: DEF FORM 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 5407 @ 61315: DEF TF 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 5408 @ 61329: DEF F 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 5409 @ 61342: DEF SIZE 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 5410 @ 61358: DEF FORMAT 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 5411 @ 61376: DEF S 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 1146 %OWNINTEGER PERM NO = -1 1147 5412 @ 61389: LINE 1146 "regression-compile-tmp/asems412.imp" 5413 @ 61428: PUSHI #0xffffffff 5414 @ 61433: DEF PERMNO p1=V_0132 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 5415 @ 61451: INIT 1 1148 NAMES = NAMES+1; ABORT(-4) %IF NAMES >= PARMS 5416 @ 61454: LINE 1148 "regression-compile-tmp/asems412.imp" 5417 @ 61493: PUSH NAMES 5418 @ 61496: PUSH NAMES 5419 @ 61499: PUSHI #0x00000001 5420 @ 61504: ADD 5421 @ 61505: ASSVAL 5422 @ 61506: LINE 1148 "regression-compile-tmp/asems412.imp" 5423 @ 61545: PUSH NAMES 5424 @ 61548: PUSH PARMS 5425 @ 61551: JUMPIF < L_0004 5426 @ 61555: PUSH ABORT 5427 @ 61558: PUSHI #0x00000004 5428 @ 61563: NEGATE 5429 @ 61564: ASSPAR 5430 @ 61565: CALL 5431 @ 61566: LOCATE L_0004 1149 DECVAR == VAR(NAMES); DECVAR = 0 5432 @ 61569: LINE 1149 "regression-compile-tmp/asems412.imp" 5433 @ 61608: PUSH DECVAR 5434 @ 61611: PUSH VAR 5435 @ 61614: PUSH NAMES 5436 @ 61617: ACCESS 5437 @ 61618: ASSREF 5438 @ 61619: LINE 1149 "regression-compile-tmp/asems412.imp" 5439 @ 61658: PUSH DECVAR 5440 @ 61661: PUSHI #0x00000000 5441 @ 61666: ASSVAL 1150 DECVAR_ID = TAG 5442 @ 61667: LINE 1150 "regression-compile-tmp/asems412.imp" 5443 @ 61706: PUSH DECVAR 5444 @ 61709: SELECT 4 5445 @ 61712: PUSH TAG 5446 @ 61715: CALL 5447 @ 61716: ASSVAL 1151 VP = 0 5448 @ 61717: LINE 1151 "regression-compile-tmp/asems412.imp" 5449 @ 61756: PUSH VP 5450 @ 61759: PUSHI #0x00000000 5451 @ 61764: ASSVAL 1152 %CYCLE 5452 @ 61765: LINE 1152 "regression-compile-tmp/asems412.imp" 5453 @ 61804: LOCATE L_0003 1153 READSYMBOL(S); %EXIT %IF S = COMMA 5454 @ 61807: LINE 1153 "regression-compile-tmp/asems412.imp" 5455 @ 61846: PUSH READSYMBOL 5456 @ 61849: PUSH S 5457 @ 61852: ASSPAR 5458 @ 61853: CALL 5459 @ 61854: LINE 1153 "regression-compile-tmp/asems412.imp" 5460 @ 61893: PUSH S 5461 @ 61896: PUSHI #0x0000002c 5462 @ 61901: JUMPIF # L_0007 5463 @ 61905: GOTO L_0004 5464 @ 61908: LOCATE L_0007 1154 %IF VP # 10 %START 5465 @ 61911: LINE 1154 "regression-compile-tmp/asems412.imp" 5466 @ 61950: PUSH VP 5467 @ 61953: PUSHI #0x0000000a 5468 @ 61958: JUMPIF = L_0007 1155 VP = VP+1; VBUF(VP) = S 5469 @ 61962: LINE 1155 "regression-compile-tmp/asems412.imp" 5470 @ 62001: PUSH VP 5471 @ 62004: PUSH VP 5472 @ 62007: PUSHI #0x00000001 5473 @ 62012: ADD 5474 @ 62013: ASSVAL 5475 @ 62014: LINE 1155 "regression-compile-tmp/asems412.imp" 5476 @ 62053: PUSH VBUF 5477 @ 62056: PUSH VP 5478 @ 62059: ACCESS 5479 @ 62060: PUSH S 5480 @ 62063: ASSVAL 1156 %FINISH 5481 @ 62064: LINE 1156 "regression-compile-tmp/asems412.imp" 5482 @ 62103: LOCATE L_0007 1157 %REPEAT 1158 5483 @ 62106: LINE 1157 "regression-compile-tmp/asems412.imp" 5484 @ 62145: REPEAT L_0003 5485 @ 62148: LOCATE L_0004 1159 TF = TAG; TYPE = TF>>4; FORM = TF&15; SKIPSYMBOL 5486 @ 62151: LINE 1159 "regression-compile-tmp/asems412.imp" 5487 @ 62190: PUSH TF 5488 @ 62193: PUSH TAG 5489 @ 62196: CALL 5490 @ 62197: ASSVAL 5491 @ 62198: LINE 1159 "regression-compile-tmp/asems412.imp" 5492 @ 62237: PUSH TYPE 5493 @ 62240: PUSH TF 5494 @ 62243: PUSHI #0x00000004 5495 @ 62248: RSH 5496 @ 62249: ASSVAL 5497 @ 62250: LINE 1159 "regression-compile-tmp/asems412.imp" 5498 @ 62289: PUSH FORM 5499 @ 62292: PUSH TF 5500 @ 62295: PUSHI #0x0000000f 5501 @ 62300: AND 5502 @ 62301: ASSVAL 5503 @ 62302: LINE 1159 "regression-compile-tmp/asems412.imp" 5504 @ 62341: PUSH SKIPSYMBOL 5505 @ 62344: CALL 1160 %IF TYPE = LONG %START 5506 @ 62345: LINE 1160 "regression-compile-tmp/asems412.imp" 5507 @ 62384: PUSH TYPE 5508 @ 62387: PUSHI #0x00000007 5509 @ 62392: JUMPIF # L_0004 1161 TYPE = REALS 5510 @ 62396: LINE 1161 "regression-compile-tmp/asems412.imp" 5511 @ 62435: PUSH TYPE 5512 @ 62438: PUSHI #0x00000006 5513 @ 62443: ASSVAL 1162 %FINISH 5514 @ 62444: LINE 1162 "regression-compile-tmp/asems412.imp" 5515 @ 62483: LOCATE L_0004 1163 SIZE = TAG 5516 @ 62486: LINE 1163 "regression-compile-tmp/asems412.imp" 5517 @ 62525: PUSH SIZE 5518 @ 62528: PUSH TAG 5519 @ 62531: CALL 5520 @ 62532: ASSVAL 1164 DECVAR_TYPE = TYPE 5521 @ 62533: LINE 1164 "regression-compile-tmp/asems412.imp" 5522 @ 62572: PUSH DECVAR 5523 @ 62575: SELECT 7 5524 @ 62578: PUSH TYPE 5525 @ 62581: ASSVAL 1165 DECVAR_FORM = FORM 5526 @ 62582: LINE 1165 "regression-compile-tmp/asems412.imp" 5527 @ 62621: PUSH DECVAR 5528 @ 62624: SELECT 8 5529 @ 62627: PUSH FORM 5530 @ 62630: ASSVAL 1166 SKIPSYMBOL 5531 @ 62631: LINE 1166 "regression-compile-tmp/asems412.imp" 5532 @ 62670: PUSH SKIPSYMBOL 5533 @ 62673: CALL 1167 OTYPE = TAG 5534 @ 62674: LINE 1167 "regression-compile-tmp/asems412.imp" 5535 @ 62713: PUSH OTYPE 5536 @ 62716: PUSH TAG 5537 @ 62719: CALL 5538 @ 62720: ASSVAL 1168 %IF NEXTSYMBOL = COMMA %START 5539 @ 62721: LINE 1168 "regression-compile-tmp/asems412.imp" 5540 @ 62760: PUSH NEXTSYMBOL 5541 @ 62763: CALL 5542 @ 62764: PUSHI #0x0000002c 5543 @ 62769: JUMPIF # L_0004 1169 SKIPSYMBOL 5544 @ 62773: LINE 1169 "regression-compile-tmp/asems412.imp" 5545 @ 62812: PUSH SKIPSYMBOL 5546 @ 62815: CALL 1170 FORMAT = TAG; F = LOOKUP(FORMAT) 5547 @ 62816: LINE 1170 "regression-compile-tmp/asems412.imp" 5548 @ 62855: PUSH FORMAT 5549 @ 62858: PUSH TAG 5550 @ 62861: CALL 5551 @ 62862: ASSVAL 5552 @ 62863: LINE 1170 "regression-compile-tmp/asems412.imp" 5553 @ 62902: PUSH F 5554 @ 62905: PUSH LOOKUP 5555 @ 62908: PUSH FORMAT 5556 @ 62911: ASSPAR 5557 @ 62912: CALL 5558 @ 62913: ASSVAL 1171 DECVAR_FORMAT = F; SIZE = VAR(F)_LENGTH;! IN BYTES 5559 @ 62914: LINE 1171 "regression-compile-tmp/asems412.imp" 5560 @ 62953: PUSH DECVAR 5561 @ 62956: SELECT 2 5562 @ 62959: PUSH F 5563 @ 62962: ASSVAL 5564 @ 62963: LINE 1171 "regression-compile-tmp/asems412.imp" 5565 @ 63002: PUSH SIZE 5566 @ 63005: PUSH VAR 5567 @ 63008: PUSH F 5568 @ 63011: ACCESS 5569 @ 63012: SELECT 5 5570 @ 63015: ASSVAL 1172 DECVAR_LENGTH = SIZE 5571 @ 63016: LINE 1172 "regression-compile-tmp/asems412.imp" 5572 @ 63055: PUSH DECVAR 5573 @ 63058: SELECT 5 5574 @ 63061: PUSH SIZE 5575 @ 63064: ASSVAL 1173 %ELSE %IF TYPE = STRING 5576 @ 63065: LINE 1173 "regression-compile-tmp/asems412.imp" 5577 @ 63104: GOTO L_0003 5578 @ 63107: LOCATE L_0004 5579 @ 63110: PUSH TYPE 5580 @ 63113: PUSHI #0x00000004 5581 @ 63118: JUMPIF # L_0004 1174 DECVAR_SIZE = SIZE 5582 @ 63122: LINE 1174 "regression-compile-tmp/asems412.imp" 5583 @ 63161: PUSH DECVAR 5584 @ 63164: SELECT 9 5585 @ 63167: PUSH SIZE 5586 @ 63170: ASSVAL 1175 SIZE = SIZE+1 5587 @ 63171: LINE 1175 "regression-compile-tmp/asems412.imp" 5588 @ 63210: PUSH SIZE 5589 @ 63213: PUSH SIZE 5590 @ 63216: PUSHI #0x00000001 5591 @ 63221: ADD 5592 @ 63222: ASSVAL 1176 SIZE = (SIZE+1)&(\1) %IF FORM = ARRAY 5593 @ 63223: LINE 1176 "regression-compile-tmp/asems412.imp" 5594 @ 63262: PUSH FORM 5595 @ 63265: PUSHI #0x0000000b 5596 @ 63270: JUMPIF # L_0007 5597 @ 63274: PUSH SIZE 5598 @ 63277: PUSH SIZE 5599 @ 63280: PUSHI #0x00000001 5600 @ 63285: ADD 5601 @ 63286: PUSHI #0x00000001 5602 @ 63291: NOT 5603 @ 63292: AND 5604 @ 63293: ASSVAL 5605 @ 63294: LOCATE L_0007 1177 %ELSE 5606 @ 63297: LINE 1177 "regression-compile-tmp/asems412.imp" 5607 @ 63336: GOTO L_0003 5608 @ 63339: LOCATE L_0004 1178 SIZE = VSIZE(TYPE) 5609 @ 63342: LINE 1178 "regression-compile-tmp/asems412.imp" 5610 @ 63381: PUSH SIZE 5611 @ 63384: PUSH VSIZE 5612 @ 63387: PUSH TYPE 5613 @ 63390: ACCESS 5614 @ 63391: ASSVAL 1179 %FINISH 5615 @ 63392: LINE 1179 "regression-compile-tmp/asems412.imp" 5616 @ 63431: LOCATE L_0003 1180 %IF 7 <= FORM <= 10 %START;! PROCEDURE 5617 @ 63434: LINE 1180 "regression-compile-tmp/asems412.imp" 5618 @ 63473: PUSHI #0x00000007 5619 @ 63478: PUSH FORM 5620 @ 63481: JUMPIFD > L_0004 5621 @ 63485: PUSHI #0x0000000a 5622 @ 63490: JUMPIF > L_0004 1181 GTYPE = 1 5623 @ 63494: LINE 1181 "regression-compile-tmp/asems412.imp" 5624 @ 63533: PUSH GTYPE 5625 @ 63536: PUSHI #0x00000001 5626 @ 63541: ASSVAL 1182 F = LOOKUP(DECVAR_ID) 5627 @ 63542: LINE 1182 "regression-compile-tmp/asems412.imp" 5628 @ 63581: PUSH F 5629 @ 63584: PUSH LOOKUP 5630 @ 63587: PUSH DECVAR 5631 @ 63590: SELECT 4 5632 @ 63593: ASSPAR 5633 @ 63594: CALL 5634 @ 63595: ASSVAL 1183 %IF F # NAMES %START;! SPEC GIVEN 5635 @ 63596: LINE 1183 "regression-compile-tmp/asems412.imp" 5636 @ 63635: PUSH F 5637 @ 63638: PUSH NAMES 5638 @ 63641: JUMPIF = L_0007 1184 NAMES = NAMES-1; DECVAR == VAR(F); %RETURN 5639 @ 63645: LINE 1184 "regression-compile-tmp/asems412.imp" 5640 @ 63684: PUSH NAMES 5641 @ 63687: PUSH NAMES 5642 @ 63690: PUSHI #0x00000001 5643 @ 63695: SUB 5644 @ 63696: ASSVAL 5645 @ 63697: LINE 1184 "regression-compile-tmp/asems412.imp" 5646 @ 63736: PUSH DECVAR 5647 @ 63739: PUSH VAR 5648 @ 63742: PUSH F 5649 @ 63745: ACCESS 5650 @ 63746: ASSREF 5651 @ 63747: LINE 1184 "regression-compile-tmp/asems412.imp" 5652 @ 63786: RETURN 1185 %FINISH 5653 @ 63787: LINE 1185 "regression-compile-tmp/asems412.imp" 5654 @ 63826: LOCATE L_0007 1186 %IF OTYPE # 0 %AND OTYPE # 7 %START;! TREAT AS INTRINSIC 5655 @ 63829: LINE 1186 "regression-compile-tmp/asems412.imp" 5656 @ 63868: PUSH OTYPE 5657 @ 63871: PUSHI #0x00000000 5658 @ 63876: JUMPIF = L_0007 5659 @ 63880: PUSH OTYPE 5660 @ 63883: PUSHI #0x00000007 5661 @ 63888: JUMPIF = L_0007 1187 PERMNO = PERMNO+1 5662 @ 63892: LINE 1187 "regression-compile-tmp/asems412.imp" 5663 @ 63931: PUSH PERMNO 5664 @ 63934: PUSH PERMNO 5665 @ 63937: PUSHI #0x00000001 5666 @ 63942: ADD 5667 @ 63943: ASSVAL 1188 DECVAR_DISP = PERMNO; DECVAR_BASE = LINK 5668 @ 63944: LINE 1188 "regression-compile-tmp/asems412.imp" 5669 @ 63983: PUSH DECVAR 5670 @ 63986: SELECT 1 5671 @ 63989: PUSH PERMNO 5672 @ 63992: ASSVAL 5673 @ 63993: LINE 1188 "regression-compile-tmp/asems412.imp" 5674 @ 64032: PUSH DECVAR 5675 @ 64035: SELECT 6 5676 @ 64038: PUSHI #0x0000000c 5677 @ 64043: ASSVAL 1189 %RETURN 5678 @ 64044: LINE 1189 "regression-compile-tmp/asems412.imp" 5679 @ 64083: RETURN 1190 %FINISH 5680 @ 64084: LINE 1190 "regression-compile-tmp/asems412.imp" 5681 @ 64123: LOCATE L_0007 1191 DECVAR_DISP = NEW TAG!X'4000' 5682 @ 64126: LINE 1191 "regression-compile-tmp/asems412.imp" 5683 @ 64165: PUSH DECVAR 5684 @ 64168: SELECT 1 5685 @ 64171: PUSH NEWTAG 5686 @ 64174: CALL 5687 @ 64175: PUSHI #0x00004000 5688 @ 64180: OR 5689 @ 64181: ASSVAL 1192 DECVAR_BASE = CODE 5690 @ 64182: LINE 1192 "regression-compile-tmp/asems412.imp" 5691 @ 64221: PUSH DECVAR 5692 @ 64224: SELECT 6 5693 @ 64227: PUSHI #0x0000002c 5694 @ 64232: ASSVAL 1193 DECVAR_TYPE=INTEGER %IF FORM=8 %AND (TYPE=BYTE %OR TYPE=SHORT) 5695 @ 64233: LINE 1193 "regression-compile-tmp/asems412.imp" 5696 @ 64272: PUSH FORM 5697 @ 64275: PUSHI #0x00000008 5698 @ 64280: JUMPIF # L_0007 5699 @ 64284: PUSH TYPE 5700 @ 64287: PUSHI #0x00000002 5701 @ 64292: JUMPIF = L_0008 5702 @ 64296: PUSH TYPE 5703 @ 64299: PUSHI #0x00000003 5704 @ 64304: JUMPIF # L_0007 5705 @ 64308: LOCATE L_0008 5706 @ 64311: PUSH DECVAR 5707 @ 64314: SELECT 7 5708 @ 64317: PUSHI #0x00000001 5709 @ 64322: ASSVAL 5710 @ 64323: LOCATE L_0007 1194 %RETURN %UNLESS AMODE = 1 %AND GMODE # 0;! PARAMETER 5711 @ 64326: LINE 1194 "regression-compile-tmp/asems412.imp" 5712 @ 64365: PUSH AMODE 5713 @ 64368: PUSHI #0x00000001 5714 @ 64373: JUMPIF # L_0008 5715 @ 64377: PUSH GMODE 5716 @ 64380: PUSHI #0x00000000 5717 @ 64385: JUMPIF # L_0007 5718 @ 64389: LOCATE L_0008 5719 @ 64392: RETURN 5720 @ 64393: LOCATE L_0007 1195 OTYPE = 0; TYPE = 0; FORM = 1; SIZE = 2*REGLEN 5721 @ 64396: LINE 1195 "regression-compile-tmp/asems412.imp" 5722 @ 64435: PUSH OTYPE 5723 @ 64438: PUSHI #0x00000000 5724 @ 64443: ASSVAL 5725 @ 64444: LINE 1195 "regression-compile-tmp/asems412.imp" 5726 @ 64483: PUSH TYPE 5727 @ 64486: PUSHI #0x00000000 5728 @ 64491: ASSVAL 5729 @ 64492: LINE 1195 "regression-compile-tmp/asems412.imp" 5730 @ 64531: PUSH FORM 5731 @ 64534: PUSHI #0x00000001 5732 @ 64539: ASSVAL 5733 @ 64540: LINE 1195 "regression-compile-tmp/asems412.imp" 5734 @ 64579: PUSH SIZE 5735 @ 64582: PUSHI #0x00000002 5736 @ 64587: PUSHI #0x00000004 5737 @ 64592: MUL 5738 @ 64593: ASSVAL 1196 %FINISH 1197 5739 @ 64594: LINE 1196 "regression-compile-tmp/asems412.imp" 5740 @ 64633: LOCATE L_0004 1198 DATA SIZE = SIZE 5741 @ 64636: LINE 1198 "regression-compile-tmp/asems412.imp" 5742 @ 64675: PUSH DATASIZE 5743 @ 64678: PUSH SIZE 5744 @ 64681: ASSVAL 1199 DECVAR_LENGTH = DATA SIZE 1200 5745 @ 64682: LINE 1199 "regression-compile-tmp/asems412.imp" 5746 @ 64721: PUSH DECVAR 5747 @ 64724: SELECT 5 5748 @ 64727: PUSH DATASIZE 5749 @ 64730: ASSVAL 1201 %IF FORM # 1 %START 5750 @ 64731: LINE 1201 "regression-compile-tmp/asems412.imp" 5751 @ 64770: PUSH FORM 5752 @ 64773: PUSHI #0x00000001 5753 @ 64778: JUMPIF = L_0004 1202 %IF TYPE = 0 %START 5754 @ 64782: LINE 1202 "regression-compile-tmp/asems412.imp" 5755 @ 64821: PUSH TYPE 5756 @ 64824: PUSHI #0x00000000 5757 @ 64829: JUMPIF # L_0007 1203 TYPE = 10; SIZE = 2*REGLEN; DECVAR_TYPE = 10 5758 @ 64833: LINE 1203 "regression-compile-tmp/asems412.imp" 5759 @ 64872: PUSH TYPE 5760 @ 64875: PUSHI #0x0000000a 5761 @ 64880: ASSVAL 5762 @ 64881: LINE 1203 "regression-compile-tmp/asems412.imp" 5763 @ 64920: PUSH SIZE 5764 @ 64923: PUSHI #0x00000002 5765 @ 64928: PUSHI #0x00000004 5766 @ 64933: MUL 5767 @ 64934: ASSVAL 5768 @ 64935: LINE 1203 "regression-compile-tmp/asems412.imp" 5769 @ 64974: PUSH DECVAR 5770 @ 64977: SELECT 7 5771 @ 64980: PUSHI #0x0000000a 5772 @ 64985: ASSVAL 1204 %ELSE %IF FORM = ARRAYNAME 5773 @ 64986: LINE 1204 "regression-compile-tmp/asems412.imp" 5774 @ 65025: GOTO L_0006 5775 @ 65028: LOCATE L_0007 5776 @ 65031: PUSH FORM 5777 @ 65034: PUSHI #0x0000000c 5778 @ 65039: JUMPIF # L_0007 1205 SIZE = 2*REGLEN; DECVAR_EXTRA = -1 5779 @ 65043: LINE 1205 "regression-compile-tmp/asems412.imp" 5780 @ 65082: PUSH SIZE 5781 @ 65085: PUSHI #0x00000002 5782 @ 65090: PUSHI #0x00000004 5783 @ 65095: MUL 5784 @ 65096: ASSVAL 5785 @ 65097: LINE 1205 "regression-compile-tmp/asems412.imp" 5786 @ 65136: PUSH DECVAR 5787 @ 65139: SELECT 3 5788 @ 65142: PUSHI #0x00000001 5789 @ 65147: NEGATE 5790 @ 65148: ASSVAL 1206 %ELSE %IF FORM = ARRAY 5791 @ 65149: LINE 1206 "regression-compile-tmp/asems412.imp" 5792 @ 65188: GOTO L_0006 5793 @ 65191: LOCATE L_0007 5794 @ 65194: PUSH FORM 5795 @ 65197: PUSHI #0x0000000b 5796 @ 65202: JUMPIF # L_0007 1207 SIZE = 0 5797 @ 65206: LINE 1207 "regression-compile-tmp/asems412.imp" 5798 @ 65245: PUSH SIZE 5799 @ 65248: PUSHI #0x00000000 5800 @ 65253: ASSVAL 1208 %ELSE 5801 @ 65254: LINE 1208 "regression-compile-tmp/asems412.imp" 5802 @ 65293: GOTO L_0006 5803 @ 65296: LOCATE L_0007 1209 SIZE = REGLEN 5804 @ 65299: LINE 1209 "regression-compile-tmp/asems412.imp" 5805 @ 65338: PUSH SIZE 5806 @ 65341: PUSHI #0x00000004 5807 @ 65346: ASSVAL 1210 %FINISH 5808 @ 65347: LINE 1210 "regression-compile-tmp/asems412.imp" 5809 @ 65386: LOCATE L_0006 1211 %FINISH 5810 @ 65389: LINE 1211 "regression-compile-tmp/asems412.imp" 5811 @ 65428: LOCATE L_0004 1212 %IF OTYPE # 0 %START;! OWN DATA 5812 @ 65431: LINE 1212 "regression-compile-tmp/asems412.imp" 5813 @ 65470: PUSH OTYPE 5814 @ 65473: PUSHI #0x00000000 5815 @ 65478: JUMPIF = L_0004 1213 %IF OTYPE = CON %START;! CONSTINTEGER ETC. 5816 @ 65482: LINE 1213 "regression-compile-tmp/asems412.imp" 5817 @ 65521: PUSH OTYPE 5818 @ 65524: PUSHI #0x00000002 5819 @ 65529: JUMPIF # L_0007 1214 DATA SIZE = 0 %IF TF = X'41';! CONSTSTRING 5820 @ 65533: LINE 1214 "regression-compile-tmp/asems412.imp" 5821 @ 65572: PUSH TF 5822 @ 65575: PUSHI #0x00000041 5823 @ 65580: JUMPIF # L_000a 5824 @ 65584: PUSH DATASIZE 5825 @ 65587: PUSHI #0x00000000 5826 @ 65592: ASSVAL 5827 @ 65593: LOCATE L_000a 1215 OTYPE = 0 %IF (TYPE<=SHORT %AND (FORM<=2 %OR FORM = 5)) %C 1216 %OR TF = X'52' %OR FORM = ARRAYNAME 5828 @ 65596: LINE 1215 "regression-compile-tmp/asems412.imp" 5829 @ 65635: PUSH TYPE 5830 @ 65638: PUSHI #0x00000003 5831 @ 65643: JUMPIF > L_000c 5832 @ 65647: PUSH FORM 5833 @ 65650: PUSHI #0x00000002 5834 @ 65655: JUMPIF <= L_000b 5835 @ 65659: PUSH FORM 5836 @ 65662: PUSHI #0x00000005 5837 @ 65667: JUMPIF = L_000b 5838 @ 65671: LOCATE L_000c 5839 @ 65674: PUSH TF 5840 @ 65677: PUSHI #0x00000052 5841 @ 65682: JUMPIF = L_000b 5842 @ 65686: PUSH FORM 5843 @ 65689: PUSHI #0x0000000c 5844 @ 65694: JUMPIF # L_000a 5845 @ 65698: LOCATE L_000b 5846 @ 65701: PUSH OTYPE 5847 @ 65704: PUSHI #0x00000000 5848 @ 65709: ASSVAL 5849 @ 65710: LOCATE L_000a 1217 %FINISH 5850 @ 65713: LINE 1217 "regression-compile-tmp/asems412.imp" 5851 @ 65752: LOCATE L_0007 1218 OWNTYPE = TYPE; OWNFORM = FORM 5852 @ 65755: LINE 1218 "regression-compile-tmp/asems412.imp" 5853 @ 65794: PUSH OWNTYPE 5854 @ 65797: PUSH TYPE 5855 @ 65800: ASSVAL 5856 @ 65801: LINE 1218 "regression-compile-tmp/asems412.imp" 5857 @ 65840: PUSH OWNFORM 5858 @ 65843: PUSH FORM 5859 @ 65846: ASSVAL 1219 %IF FORM = ARRAY %START 5860 @ 65847: LINE 1219 "regression-compile-tmp/asems412.imp" 5861 @ 65886: PUSH FORM 5862 @ 65889: PUSHI #0x0000000b 5863 @ 65894: JUMPIF # L_0007 1220 GFIX(4) 5864 @ 65898: LINE 1220 "regression-compile-tmp/asems412.imp" 5865 @ 65937: PUSH GFIX 5866 @ 65940: PUSHI #0x00000004 5867 @ 65945: ASSPAR 5868 @ 65946: CALL 1221 DECVAR_EXTRA=GA; GWORD(VLB); GWORD(VUB); GWORD(DATASIZE) 5869 @ 65947: LINE 1221 "regression-compile-tmp/asems412.imp" 5870 @ 65986: PUSH DECVAR 5871 @ 65989: SELECT 3 5872 @ 65992: PUSH GA 5873 @ 65995: ASSVAL 5874 @ 65996: LINE 1221 "regression-compile-tmp/asems412.imp" 5875 @ 66035: PUSH GWORD 5876 @ 66038: PUSH VLB 5877 @ 66041: ASSPAR 5878 @ 66042: CALL 5879 @ 66043: LINE 1221 "regression-compile-tmp/asems412.imp" 5880 @ 66082: PUSH GWORD 5881 @ 66085: PUSH VUB 5882 @ 66088: ASSPAR 5883 @ 66089: CALL 5884 @ 66090: LINE 1221 "regression-compile-tmp/asems412.imp" 5885 @ 66129: PUSH GWORD 5886 @ 66132: PUSH DATASIZE 5887 @ 66135: ASSPAR 5888 @ 66136: CALL 1222 DECVAR_BASE = GLA; DECVAR_DISP = GA-VLB*DATASIZE 5889 @ 66137: LINE 1222 "regression-compile-tmp/asems412.imp" 5890 @ 66176: PUSH DECVAR 5891 @ 66179: SELECT 6 5892 @ 66182: PUSHI #0x0000002a 5893 @ 66187: ASSVAL 5894 @ 66188: LINE 1222 "regression-compile-tmp/asems412.imp" 5895 @ 66227: PUSH DECVAR 5896 @ 66230: SELECT 1 5897 @ 66233: PUSH GA 5898 @ 66236: PUSH VLB 5899 @ 66239: PUSH DATASIZE 5900 @ 66242: MUL 5901 @ 66243: SUB 5902 @ 66244: ASSVAL 1223 %ELSE 5903 @ 66245: LINE 1223 "regression-compile-tmp/asems412.imp" 5904 @ 66284: GOTO L_0006 5905 @ 66287: LOCATE L_0007 1224 OWNTYPE = INTEGER %AND DATA SIZE = REGLEN %IF FORM # 1 5906 @ 66290: LINE 1224 "regression-compile-tmp/asems412.imp" 5907 @ 66329: PUSH FORM 5908 @ 66332: PUSHI #0x00000001 5909 @ 66337: JUMPIF = L_000a 5910 @ 66341: PUSH OWNTYPE 5911 @ 66344: PUSHI #0x00000001 5912 @ 66349: ASSVAL 5913 @ 66350: PUSH DATASIZE 5914 @ 66353: PUSHI #0x00000004 5915 @ 66358: ASSVAL 5916 @ 66359: LOCATE L_000a 1225 %IF OTYPE # 0 %START 5917 @ 66362: LINE 1225 "regression-compile-tmp/asems412.imp" 5918 @ 66401: PUSH OTYPE 5919 @ 66404: PUSHI #0x00000000 5920 @ 66409: JUMPIF = L_000a 1226 %IF TF # X'21' %START 5921 @ 66413: LINE 1226 "regression-compile-tmp/asems412.imp" 5922 @ 66452: PUSH TF 5923 @ 66455: PUSHI #0x00000021 5924 @ 66460: JUMPIF = L_000d 1227 %IF TF = X'31' %OR TF = X'41' %THEN GFIX(2) %C 1228 %ELSE GFIX(4) 5925 @ 66464: LINE 1227 "regression-compile-tmp/asems412.imp" 5926 @ 66503: PUSH TF 5927 @ 66506: PUSHI #0x00000031 5928 @ 66511: JUMPIF = L_0011 5929 @ 66515: PUSH TF 5930 @ 66518: PUSHI #0x00000041 5931 @ 66523: JUMPIF # L_0010 5932 @ 66527: LOCATE L_0011 5933 @ 66530: PUSH GFIX 5934 @ 66533: PUSHI #0x00000002 5935 @ 66538: ASSPAR 5936 @ 66539: CALL 5937 @ 66540: GOTO L_000f 5938 @ 66543: LOCATE L_0010 5939 @ 66546: PUSH GFIX 5940 @ 66549: PUSHI #0x00000004 5941 @ 66554: ASSPAR 5942 @ 66555: CALL 5943 @ 66556: LOCATE L_000f 1229 %FINISH 5944 @ 66559: LINE 1229 "regression-compile-tmp/asems412.imp" 5945 @ 66598: LOCATE L_000d 1230 %IF OWNFORM <= 2 %AND TYPE # RECORD %START 5946 @ 66601: LINE 1230 "regression-compile-tmp/asems412.imp" 5947 @ 66640: PUSH OWNFORM 5948 @ 66643: PUSHI #0x00000002 5949 @ 66648: JUMPIF > L_000d 5950 @ 66652: PUSH TYPE 5951 @ 66655: PUSHI #0x00000005 5952 @ 66660: JUMPIF = L_000d 1231 SET DIAG(GLA, GA+DIAG GLA, TYPE, FORM) 5953 @ 66664: LINE 1231 "regression-compile-tmp/asems412.imp" 5954 @ 66703: PUSH SETDIAG 5955 @ 66706: PUSHI #0x0000002a 5956 @ 66711: ASSPAR 5957 @ 66712: PUSH GA 5958 @ 66715: PUSH DIAGGLA 5959 @ 66718: ADD 5960 @ 66719: ASSPAR 5961 @ 66720: PUSH TYPE 5962 @ 66723: ASSPAR 5963 @ 66724: PUSH FORM 5964 @ 66727: ASSPAR 5965 @ 66728: CALL 1232 DIAG GLA = DIAG GLA+DATA SIZE 5966 @ 66729: LINE 1232 "regression-compile-tmp/asems412.imp" 5967 @ 66768: PUSH DIAGGLA 5968 @ 66771: PUSH DIAGGLA 5969 @ 66774: PUSH DATASIZE 5970 @ 66777: ADD 5971 @ 66778: ASSVAL 1233 %FINISH 5972 @ 66779: LINE 1233 "regression-compile-tmp/asems412.imp" 5973 @ 66818: LOCATE L_000d 1234 %FINISH 5974 @ 66821: LINE 1234 "regression-compile-tmp/asems412.imp" 5975 @ 66860: LOCATE L_000a 1235 %FINISH 5976 @ 66863: LINE 1235 "regression-compile-tmp/asems412.imp" 5977 @ 66902: LOCATE L_0006 1236 %RETURN 5978 @ 66905: LINE 1236 "regression-compile-tmp/asems412.imp" 5979 @ 66944: RETURN 1237 %FINISH 1238 5980 @ 66945: LINE 1237 "regression-compile-tmp/asems412.imp" 5981 @ 66984: LOCATE L_0004 1239 %IF FORM = SWITCH %START 5982 @ 66987: LINE 1239 "regression-compile-tmp/asems412.imp" 5983 @ 67026: PUSH FORM 5984 @ 67029: PUSHI #0x00000006 5985 @ 67034: JUMPIF # L_0004 1240 GFIX(2) 5986 @ 67038: LINE 1240 "regression-compile-tmp/asems412.imp" 5987 @ 67077: PUSH GFIX 5988 @ 67080: PUSHI #0x00000002 5989 @ 67085: ASSPAR 5990 @ 67086: CALL 1241 DECVAR_BASE = GLA; DECVAR_DISP = GA 5991 @ 67087: LINE 1241 "regression-compile-tmp/asems412.imp" 5992 @ 67126: PUSH DECVAR 5993 @ 67129: SELECT 6 5994 @ 67132: PUSHI #0x0000002a 5995 @ 67137: ASSVAL 5996 @ 67138: LINE 1241 "regression-compile-tmp/asems412.imp" 5997 @ 67177: PUSH DECVAR 5998 @ 67180: SELECT 1 5999 @ 67183: PUSH GA 6000 @ 67186: ASSVAL 1242 GHALF(VLB); GHALF(VUB) 6001 @ 67187: LINE 1242 "regression-compile-tmp/asems412.imp" 6002 @ 67226: PUSH GHALF 6003 @ 67229: PUSH VLB 6004 @ 67232: ASSPAR 6005 @ 67233: CALL 6006 @ 67234: LINE 1242 "regression-compile-tmp/asems412.imp" 6007 @ 67273: PUSH GHALF 6008 @ 67276: PUSH VUB 6009 @ 67279: ASSPAR 6010 @ 67280: CALL 1243 DECVAR_EXTRA = GA-VLB*2 6011 @ 67281: LINE 1243 "regression-compile-tmp/asems412.imp" 6012 @ 67320: PUSH DECVAR 6013 @ 67323: SELECT 3 6014 @ 67326: PUSH GA 6015 @ 67329: PUSH VLB 6016 @ 67332: PUSHI #0x00000002 6017 @ 67337: MUL 6018 @ 67338: SUB 6019 @ 67339: ASSVAL 1244 GHALF(0) %FOR F = VLB, 1, VUB 6020 @ 67340: LINE 1244 "regression-compile-tmp/asems412.imp" 6021 @ 67379: PUSH F 6022 @ 67382: PUSHI #0x00000001 6023 @ 67387: PUSH VUB 6024 @ 67390: PUSH VLB 6025 @ 67393: FOR L_0006 6026 @ 67396: PUSH GHALF 6027 @ 67399: PUSHI #0x00000000 6028 @ 67404: ASSPAR 6029 @ 67405: CALL 6030 @ 67406: REPEAT L_0006 6031 @ 67409: LOCATE L_0007 1245 %RETURN 6032 @ 67412: LINE 1245 "regression-compile-tmp/asems412.imp" 6033 @ 67451: RETURN 1246 %FINISH 1247 6034 @ 67452: LINE 1246 "regression-compile-tmp/asems412.imp" 6035 @ 67491: LOCATE L_0004 1248 %IF FORM = 4 %START 6036 @ 67494: LINE 1248 "regression-compile-tmp/asems412.imp" 6037 @ 67533: PUSH FORM 6038 @ 67536: PUSHI #0x00000004 6039 @ 67541: JUMPIF # L_0004 1249 GTYPE = -1; %RETURN 6040 @ 67545: LINE 1249 "regression-compile-tmp/asems412.imp" 6041 @ 67584: PUSH GTYPE 6042 @ 67587: PUSHI #0x00000001 6043 @ 67592: NEGATE 6044 @ 67593: ASSVAL 6045 @ 67594: LINE 1249 "regression-compile-tmp/asems412.imp" 6046 @ 67633: RETURN 1250 %FINISH 1251 6047 @ 67634: LINE 1250 "regression-compile-tmp/asems412.imp" 6048 @ 67673: LOCATE L_0004 1252 %IF FORM = 1 %THEN F = ROUND(TYPE) %ELSE F = REGLEN-1 6049 @ 67676: LINE 1252 "regression-compile-tmp/asems412.imp" 6050 @ 67715: PUSH FORM 6051 @ 67718: PUSHI #0x00000001 6052 @ 67723: JUMPIF # L_0004 6053 @ 67727: PUSH F 6054 @ 67730: PUSH ROUND 6055 @ 67733: PUSH TYPE 6056 @ 67736: ACCESS 6057 @ 67737: ASSVAL 6058 @ 67738: GOTO L_0003 6059 @ 67741: LOCATE L_0004 6060 @ 67744: PUSH F 6061 @ 67747: PUSHI #0x00000004 6062 @ 67752: PUSHI #0x00000001 6063 @ 67757: SUB 6064 @ 67758: ASSVAL 6065 @ 67759: LOCATE L_0003 1253 FRAME = (FRAME+F)&(\F) 6066 @ 67762: LINE 1253 "regression-compile-tmp/asems412.imp" 6067 @ 67801: PUSH FRAME 6068 @ 67804: PUSH FRAME 6069 @ 67807: PUSH F 6070 @ 67810: ADD 6071 @ 67811: PUSH F 6072 @ 67814: NOT 6073 @ 67815: AND 6074 @ 67816: ASSVAL 1254 %IF FRAME <= REGLEN %START;! SPECIAL PARAMETER ? 6075 @ 67817: LINE 1254 "regression-compile-tmp/asems412.imp" 6076 @ 67856: PUSH FRAME 6077 @ 67859: PUSHI #0x00000004 6078 @ 67864: JUMPIF > L_0004 1255 %IF AMODE = 1 %AND GMODE # 0 %START;! IN FP LIST 6079 @ 67868: LINE 1255 "regression-compile-tmp/asems412.imp" 6080 @ 67907: PUSH AMODE 6081 @ 67910: PUSHI #0x00000001 6082 @ 67915: JUMPIF # L_0007 6083 @ 67919: PUSH GMODE 6084 @ 67922: PUSHI #0x00000000 6085 @ 67927: JUMPIF = L_0007 1256 %IF (FORM = 2 %AND TYPE # 10) %OR TF = X'11' %C 1257 %OR TF = X'31' %START;! TO A REG 6086 @ 67931: LINE 1256 "regression-compile-tmp/asems412.imp" 6087 @ 67970: PUSH FORM 6088 @ 67973: PUSHI #0x00000002 6089 @ 67978: JUMPIF # L_000c 6090 @ 67982: PUSH TYPE 6091 @ 67985: PUSHI #0x0000000a 6092 @ 67990: JUMPIF # L_000b 6093 @ 67994: LOCATE L_000c 6094 @ 67997: PUSH TF 6095 @ 68000: PUSHI #0x00000011 6096 @ 68005: JUMPIF = L_000b 6097 @ 68009: PUSH TF 6098 @ 68012: PUSHI #0x00000031 6099 @ 68017: JUMPIF # L_000a 6100 @ 68021: LOCATE L_000b 1258 DECVAR_BASE = PARAM; DECVAR_DISP = FRAME 6101 @ 68024: LINE 1258 "regression-compile-tmp/asems412.imp" 6102 @ 68063: PUSH DECVAR 6103 @ 68066: SELECT 6 6104 @ 68069: PUSHI #0x00000030 6105 @ 68074: ASSVAL 6106 @ 68075: LINE 1258 "regression-compile-tmp/asems412.imp" 6107 @ 68114: PUSH DECVAR 6108 @ 68117: SELECT 1 6109 @ 68120: PUSH FRAME 6110 @ 68123: ASSVAL 1259 DECVAR_DISP = DECVAR_DISP+(REGLEN-2) %IF TF = X'31' 6111 @ 68124: LINE 1259 "regression-compile-tmp/asems412.imp" 6112 @ 68163: PUSH TF 6113 @ 68166: PUSHI #0x00000031 6114 @ 68171: JUMPIF # L_000d 6115 @ 68175: PUSH DECVAR 6116 @ 68178: SELECT 1 6117 @ 68181: PUSH DECVAR 6118 @ 68184: SELECT 1 6119 @ 68187: PUSHI #0x00000004 6120 @ 68192: PUSHI #0x00000002 6121 @ 68197: SUB 6122 @ 68198: ADD 6123 @ 68199: ASSVAL 6124 @ 68200: LOCATE L_000d 1260 FRAME = FRAME-REGLEN; FRAME = 11*REGLEN %IF FRAME < 0 6125 @ 68203: LINE 1260 "regression-compile-tmp/asems412.imp" 6126 @ 68242: PUSH FRAME 6127 @ 68245: PUSH FRAME 6128 @ 68248: PUSHI #0x00000004 6129 @ 68253: SUB 6130 @ 68254: ASSVAL 6131 @ 68255: LINE 1260 "regression-compile-tmp/asems412.imp" 6132 @ 68294: PUSH FRAME 6133 @ 68297: PUSHI #0x00000000 6134 @ 68302: JUMPIF >= L_000d 6135 @ 68306: PUSH FRAME 6136 @ 68309: PUSHI #0x0000000b 6137 @ 68314: PUSHI #0x00000004 6138 @ 68319: MUL 6139 @ 68320: ASSVAL 6140 @ 68321: LOCATE L_000d 1261 -> DECD; ! ...GO DUMP DIAG. ENTRY 6141 @ 68324: LINE 1261 "regression-compile-tmp/asems412.imp" 6142 @ 68363: JUMP L_0133 1262 %FINISH 6143 @ 68366: LINE 1262 "regression-compile-tmp/asems412.imp" 6144 @ 68405: LOCATE L_000a 1263 %FINISH 6145 @ 68408: LINE 1263 "regression-compile-tmp/asems412.imp" 6146 @ 68447: LOCATE L_0007 1264 FRAME = 11*REGLEN %IF AMODE >= 0 6147 @ 68450: LINE 1264 "regression-compile-tmp/asems412.imp" 6148 @ 68489: PUSH AMODE 6149 @ 68492: PUSHI #0x00000000 6150 @ 68497: JUMPIF < L_0007 6151 @ 68501: PUSH FRAME 6152 @ 68504: PUSHI #0x0000000b 6153 @ 68509: PUSHI #0x00000004 6154 @ 68514: MUL 6155 @ 68515: ASSVAL 6156 @ 68516: LOCATE L_0007 1265 %FINISH 6157 @ 68519: LINE 1265 "regression-compile-tmp/asems412.imp" 6158 @ 68558: LOCATE L_0004 1266 DECVAR_BASE = LOCAL; DECVAR_DISP = FRAME 6159 @ 68561: LINE 1266 "regression-compile-tmp/asems412.imp" 6160 @ 68600: PUSH DECVAR 6161 @ 68603: SELECT 6 6162 @ 68606: PUSH LOCAL 6163 @ 68609: ASSVAL 6164 @ 68610: LINE 1266 "regression-compile-tmp/asems412.imp" 6165 @ 68649: PUSH DECVAR 6166 @ 68652: SELECT 1 6167 @ 68655: PUSH FRAME 6168 @ 68658: ASSVAL 1267 FRAME = FRAME+SIZE 6169 @ 68659: LINE 1267 "regression-compile-tmp/asems412.imp" 6170 @ 68698: PUSH FRAME 6171 @ 68701: PUSH FRAME 6172 @ 68704: PUSH SIZE 6173 @ 68707: ADD 6174 @ 68708: ASSVAL 1268 DECD: %IF AMODE = 0 %OR (AMODE = 1 %AND GG # SPEC) %START 6175 @ 68709: LINE 1268 "regression-compile-tmp/asems412.imp" 6176 @ 68748: LABEL L_0133 6177 @ 68751: LINE 1268 "regression-compile-tmp/asems412.imp" 6178 @ 68790: PUSH AMODE 6179 @ 68793: PUSHI #0x00000000 6180 @ 68798: JUMPIF = L_0005 6181 @ 68802: PUSH AMODE 6182 @ 68805: PUSHI #0x00000001 6183 @ 68810: JUMPIF # L_0004 6184 @ 68814: PUSH GG 6185 @ 68817: PUSHI #0x00000030 6186 @ 68822: JUMPIF = L_0004 6187 @ 68826: LOCATE L_0005 1269 %IF TYPE # RECORD %AND TYPE # 10 %START 6188 @ 68829: LINE 1269 "regression-compile-tmp/asems412.imp" 6189 @ 68868: PUSH TYPE 6190 @ 68871: PUSHI #0x00000005 6191 @ 68876: JUMPIF = L_0007 6192 @ 68880: PUSH TYPE 6193 @ 68883: PUSHI #0x0000000a 6194 @ 68888: JUMPIF = L_0007 1270 %IF FORM = 1 %OR FORM = 2 %START 6195 @ 68892: LINE 1270 "regression-compile-tmp/asems412.imp" 6196 @ 68931: PUSH FORM 6197 @ 68934: PUSHI #0x00000001 6198 @ 68939: JUMPIF = L_000b 6199 @ 68943: PUSH FORM 6200 @ 68946: PUSHI #0x00000002 6201 @ 68951: JUMPIF # L_000a 6202 @ 68955: LOCATE L_000b 1271 SET DIAG(LOCAL, DECVAR_DISP, TYPE, FORM) 6203 @ 68958: LINE 1271 "regression-compile-tmp/asems412.imp" 6204 @ 68997: PUSH SETDIAG 6205 @ 69000: PUSH LOCAL 6206 @ 69003: ASSPAR 6207 @ 69004: PUSH DECVAR 6208 @ 69007: SELECT 1 6209 @ 69010: ASSPAR 6210 @ 69011: PUSH TYPE 6211 @ 69014: ASSPAR 6212 @ 69015: PUSH FORM 6213 @ 69018: ASSPAR 6214 @ 69019: CALL 1272 %FINISH 6215 @ 69020: LINE 1272 "regression-compile-tmp/asems412.imp" 6216 @ 69059: LOCATE L_000a 1273 %FINISH 6217 @ 69062: LINE 1273 "regression-compile-tmp/asems412.imp" 6218 @ 69101: LOCATE L_0007 1274 %FINISH 6219 @ 69104: LINE 1274 "regression-compile-tmp/asems412.imp" 6220 @ 69143: LOCATE L_0004 1275 %END 6221 @ 69146: LINE 1275 "regression-compile-tmp/asems412.imp" 6222 @ 69185: END _lev0id0_ASSEMBLE_DEFINEVAR {lev=3 --> 2} 1276 %RECORD(STACKFM)%MAP DESCRIPTOR 6223 @ 69186: LINE 1276 "regression-compile-tmp/asems412.imp" 6224 @ 69225: DEF DESCRIPTOR (_lev0id0_ASSEMBLE_DESCRIPTOR) p1=V_0129 a/tf=49 b/format=86 c/ostate=0 type=4 (record) form=9 (map) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6225 @ 69247: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 6226 @ 69248: FINISH ) {lev=3} 1277 %RECORD(STACKFM)%NAME V; %RECORD(DFM)%NAME D 6227 @ 69249: LINE 1277 "regression-compile-tmp/asems412.imp" 6228 @ 69288: DEF V p1=V_012a a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6229 @ 69301: LINE 1277 "regression-compile-tmp/asems412.imp" 6230 @ 69340: DEF D p1=V_012b a/tf=42 b/format=92 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1278 V == DESC ASL; ABORT(17) %IF V == NULL 6231 @ 69353: LINE 1278 "regression-compile-tmp/asems412.imp" 6232 @ 69392: PUSH V 6233 @ 69395: PUSH DESCASL 6234 @ 69398: ASSREF 6235 @ 69399: LINE 1278 "regression-compile-tmp/asems412.imp" 6236 @ 69438: PUSH V 6237 @ 69441: PUSH NULL 6238 @ 69444: JUMPIFA # L_0004 6239 @ 69448: PUSH ABORT 6240 @ 69451: PUSHI #0x00000011 6241 @ 69456: ASSPAR 6242 @ 69457: CALL 6243 @ 69458: LOCATE L_0004 1279 D == DASL; ABORT(17) %IF D == NULL 6244 @ 69461: LINE 1279 "regression-compile-tmp/asems412.imp" 6245 @ 69500: PUSH D 6246 @ 69503: PUSH DASL 6247 @ 69506: ASSREF 6248 @ 69507: LINE 1279 "regression-compile-tmp/asems412.imp" 6249 @ 69546: PUSH D 6250 @ 69549: PUSH NULL 6251 @ 69552: JUMPIFA # L_0004 6252 @ 69556: PUSH ABORT 6253 @ 69559: PUSHI #0x00000011 6254 @ 69564: ASSPAR 6255 @ 69565: CALL 6256 @ 69566: LOCATE L_0004 1280 DESC ASL == V_LINK; V = 0 6257 @ 69569: LINE 1280 "regression-compile-tmp/asems412.imp" 6258 @ 69608: PUSH DESCASL 6259 @ 69611: PUSH V 6260 @ 69614: SELECT 10 6261 @ 69617: ASSREF 6262 @ 69618: LINE 1280 "regression-compile-tmp/asems412.imp" 6263 @ 69657: PUSH V 6264 @ 69660: PUSHI #0x00000000 6265 @ 69665: ASSVAL 1281 DASL == D_LINK; D_LINK == USING_LINK; USING_LINK == D 6266 @ 69666: LINE 1281 "regression-compile-tmp/asems412.imp" 6267 @ 69705: PUSH DASL 6268 @ 69708: PUSH D 6269 @ 69711: SELECT 2 6270 @ 69714: ASSREF 6271 @ 69715: LINE 1281 "regression-compile-tmp/asems412.imp" 6272 @ 69754: PUSH D 6273 @ 69757: SELECT 2 6274 @ 69760: PUSH USING 6275 @ 69763: SELECT 2 6276 @ 69766: ASSREF 6277 @ 69767: LINE 1281 "regression-compile-tmp/asems412.imp" 6278 @ 69806: PUSH USING 6279 @ 69809: SELECT 2 6280 @ 69812: PUSH D 6281 @ 69815: ASSREF 1282 D_D == V 6282 @ 69816: LINE 1282 "regression-compile-tmp/asems412.imp" 6283 @ 69855: PUSH D 6284 @ 69858: SELECT 1 6285 @ 69861: PUSH V 6286 @ 69864: ASSREF 1283 V_LINK ==NULL 6287 @ 69865: LINE 1283 "regression-compile-tmp/asems412.imp" 6288 @ 69904: PUSH V 6289 @ 69907: SELECT 10 6290 @ 69910: PUSH NULL 6291 @ 69913: ASSREF 1284 %RESULT == V 6292 @ 69914: LINE 1284 "regression-compile-tmp/asems412.imp" 6293 @ 69953: PUSH V 6294 @ 69956: MAP 1285 %END 6295 @ 69957: LINE 1285 "regression-compile-tmp/asems412.imp" 6296 @ 69996: END _lev0id0_ASSEMBLE_DESCRIPTOR {lev=3 --> 2} 1286 %ROUTINE DROP(%RECORD(STACKFM)%NAME D) 6297 @ 69997: LINE 1286 "regression-compile-tmp/asems412.imp" 6298 @ 70036: DEF DROP (_lev0id0_ASSEMBLE_DROP) 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 6299 @ 70052: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 6300 @ 70053: DEF D p1=V_012b a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6301 @ 70066: FINISH ) {lev=3} 1287 %RECORD(DFM)%NAME P, Q 6302 @ 70067: LINE 1287 "regression-compile-tmp/asems412.imp" 6303 @ 70106: DEF P p1=V_012c a/tf=42 b/format=92 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6304 @ 70119: DEF Q p1=V_012d a/tf=42 b/format=92 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1288 P == USING 6305 @ 70132: LINE 1288 "regression-compile-tmp/asems412.imp" 6306 @ 70171: PUSH P 6307 @ 70174: PUSH USING 6308 @ 70177: ASSREF 1289 %CYCLE 6309 @ 70178: LINE 1289 "regression-compile-tmp/asems412.imp" 6310 @ 70217: LOCATE L_0003 1290 Q == P_LINK 6311 @ 70220: LINE 1290 "regression-compile-tmp/asems412.imp" 6312 @ 70259: PUSH Q 6313 @ 70262: PUSH P 6314 @ 70265: SELECT 2 6315 @ 70268: ASSREF 1291 ABORT(18) %IF Q == NULL 6316 @ 70269: LINE 1291 "regression-compile-tmp/asems412.imp" 6317 @ 70308: PUSH Q 6318 @ 70311: PUSH NULL 6319 @ 70314: JUMPIFA # L_0007 6320 @ 70318: PUSH ABORT 6321 @ 70321: PUSHI #0x00000012 6322 @ 70326: ASSPAR 6323 @ 70327: CALL 6324 @ 70328: LOCATE L_0007 1292 %EXIT %IF Q_D == D 6325 @ 70331: LINE 1292 "regression-compile-tmp/asems412.imp" 6326 @ 70370: PUSH Q 6327 @ 70373: SELECT 1 6328 @ 70376: PUSH D 6329 @ 70379: JUMPIFA # L_0007 6330 @ 70383: GOTO L_0004 6331 @ 70386: LOCATE L_0007 1293 P == Q 6332 @ 70389: LINE 1293 "regression-compile-tmp/asems412.imp" 6333 @ 70428: PUSH P 6334 @ 70431: PUSH Q 6335 @ 70434: ASSREF 1294 %REPEAT 6336 @ 70435: LINE 1294 "regression-compile-tmp/asems412.imp" 6337 @ 70474: REPEAT L_0003 6338 @ 70477: LOCATE L_0004 1295 P_LINK == Q_LINK 6339 @ 70480: LINE 1295 "regression-compile-tmp/asems412.imp" 6340 @ 70519: PUSH P 6341 @ 70522: SELECT 2 6342 @ 70525: PUSH Q 6343 @ 70528: SELECT 2 6344 @ 70531: ASSREF 1296 Q_LINK == DASL; DASL == Q 6345 @ 70532: LINE 1296 "regression-compile-tmp/asems412.imp" 6346 @ 70571: PUSH Q 6347 @ 70574: SELECT 2 6348 @ 70577: PUSH DASL 6349 @ 70580: ASSREF 6350 @ 70581: LINE 1296 "regression-compile-tmp/asems412.imp" 6351 @ 70620: PUSH DASL 6352 @ 70623: PUSH Q 6353 @ 70626: ASSREF 1297 D_LINK == DESC ASL; DESC ASL == D 6354 @ 70627: LINE 1297 "regression-compile-tmp/asems412.imp" 6355 @ 70666: PUSH D 6356 @ 70669: SELECT 10 6357 @ 70672: PUSH DESCASL 6358 @ 70675: ASSREF 6359 @ 70676: LINE 1297 "regression-compile-tmp/asems412.imp" 6360 @ 70715: PUSH DESCASL 6361 @ 70718: PUSH D 6362 @ 70721: ASSREF 1298 %END 6363 @ 70722: LINE 1298 "regression-compile-tmp/asems412.imp" 6364 @ 70761: END _lev0id0_ASSEMBLE_DROP {lev=3 --> 2} 1299 %ROUTINE STACK(%INTEGER DISP, BASE, TYPE, FORM, FORMAT, EXTRA, LENGTH) 6365 @ 70762: LINE 1299 "regression-compile-tmp/asems412.imp" 6366 @ 70801: DEF STACK (_lev0id0_ASSEMBLE_STACK) 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 6367 @ 70818: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 6368 @ 70819: DEF DISP 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 6369 @ 70835: DEF BASE 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 6370 @ 70851: 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 6371 @ 70867: DEF FORM 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 6372 @ 70883: DEF FORMAT 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 6373 @ 70901: DEF EXTRA 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 6374 @ 70918: DEF LENGTH 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 6375 @ 70936: FINISH ) {lev=3} 1300 %CONSTBYTEINTEGERARRAY FMAP(0:15) = CONSTANT, V IN S, A IN S,0(4), 1301 16,17,19,19, 1302 !0, V IN R, V IN S, V IN S, 1303 V IN S, A IN S, 1304 0(3) 6376 @ 70937: LINE 1300 "regression-compile-tmp/asems412.imp" 6377 @ 70976: PUSHI #0x00000000 6378 @ 70981: PUSHI #0x0000000f 6379 @ 70986: BOUNDS 6380 @ 70987: DEF FMAP p1=V_0133 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 6381 @ 71003: PUSHI #0x00000000 6382 @ 71008: INIT 1 6383 @ 71011: PUSHI #0x00000003 6384 @ 71016: INIT 1 6385 @ 71019: PUSHI #0x00000002 6386 @ 71024: INIT 1 6387 @ 71027: PUSHI #0x00000000 6388 @ 71032: INIT 4 6389 @ 71035: PUSHI #0x00000010 6390 @ 71040: INIT 1 6391 @ 71043: PUSHI #0x00000011 6392 @ 71048: INIT 1 6393 @ 71051: PUSHI #0x00000013 6394 @ 71056: INIT 1 6395 @ 71059: PUSHI #0x00000013 6396 @ 71064: INIT 1 6397 @ 71067: PUSHI #0x00000003 6398 @ 71072: INIT 1 6399 @ 71075: PUSHI #0x00000002 6400 @ 71080: INIT 1 6401 @ 71083: PUSHI #0x00000000 6402 @ 71088: INIT 3 1305 %RECORD(STACKFM)%NAME V 6403 @ 71091: LINE 1305 "regression-compile-tmp/asems412.imp" 6404 @ 71130: DEF V p1=V_0134 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1306 STP = STP+1; ABORT(7) %IF STP > MAX DEPTH 6405 @ 71143: LINE 1306 "regression-compile-tmp/asems412.imp" 6406 @ 71182: PUSH STP 6407 @ 71185: PUSH STP 6408 @ 71188: PUSHI #0x00000001 6409 @ 71193: ADD 6410 @ 71194: ASSVAL 6411 @ 71195: LINE 1306 "regression-compile-tmp/asems412.imp" 6412 @ 71234: PUSH STP 6413 @ 71237: PUSHI #0x00000010 6414 @ 71242: JUMPIF <= L_0004 6415 @ 71246: PUSH ABORT 6416 @ 71249: PUSHI #0x00000007 6417 @ 71254: ASSPAR 6418 @ 71255: CALL 6419 @ 71256: LOCATE L_0004 1307 V == DESCRIPTOR 6420 @ 71259: LINE 1307 "regression-compile-tmp/asems412.imp" 6421 @ 71298: PUSH V 6422 @ 71301: PUSH DESCRIPTOR 6423 @ 71304: CALL 6424 @ 71305: ASSREF 1308 V_BASE = BASE 6425 @ 71306: LINE 1308 "regression-compile-tmp/asems412.imp" 6426 @ 71345: PUSH V 6427 @ 71348: SELECT 6 6428 @ 71351: PUSH BASE 6429 @ 71354: ASSVAL 1309 V_DISP = DISP 6430 @ 71355: LINE 1309 "regression-compile-tmp/asems412.imp" 6431 @ 71394: PUSH V 6432 @ 71397: SELECT 1 6433 @ 71400: PUSH DISP 6434 @ 71403: ASSVAL 1310 V_FORMAT = FORMAT 6435 @ 71404: LINE 1310 "regression-compile-tmp/asems412.imp" 6436 @ 71443: PUSH V 6437 @ 71446: SELECT 2 6438 @ 71449: PUSH FORMAT 6439 @ 71452: ASSVAL 1311 V_EXTRA = EXTRA; V_DV = EXTRA 6440 @ 71453: LINE 1311 "regression-compile-tmp/asems412.imp" 6441 @ 71492: PUSH V 6442 @ 71495: SELECT 3 6443 @ 71498: PUSH EXTRA 6444 @ 71501: ASSVAL 6445 @ 71502: LINE 1311 "regression-compile-tmp/asems412.imp" 6446 @ 71541: PUSH V 6447 @ 71544: SELECT 5 6448 @ 71547: PUSH EXTRA 6449 @ 71550: ASSVAL 1312 V_TYPE = TYPE 6450 @ 71551: LINE 1312 "regression-compile-tmp/asems412.imp" 6451 @ 71590: PUSH V 6452 @ 71593: SELECT 8 6453 @ 71596: PUSH TYPE 6454 @ 71599: ASSVAL 1313 V_LENGTH = LENGTH 6455 @ 71600: LINE 1313 "regression-compile-tmp/asems412.imp" 6456 @ 71639: PUSH V 6457 @ 71642: SELECT 4 6458 @ 71645: PUSH LENGTH 6459 @ 71648: ASSVAL 1314 V_FORM = FMAP(FORM) 6460 @ 71649: LINE 1314 "regression-compile-tmp/asems412.imp" 6461 @ 71688: PUSH V 6462 @ 71691: SELECT 9 6463 @ 71694: PUSH FMAP 6464 @ 71697: PUSH FORM 6465 @ 71700: ACCESS 6466 @ 71701: ASSVAL 1315 STACKED(STP)_V == V 6467 @ 71702: LINE 1315 "regression-compile-tmp/asems412.imp" 6468 @ 71741: PUSH STACKED 6469 @ 71744: PUSH STP 6470 @ 71747: ACCESS 6471 @ 71748: SELECT 1 6472 @ 71751: PUSH V 6473 @ 71754: ASSREF 1316 LHS == V 6474 @ 71755: LINE 1316 "regression-compile-tmp/asems412.imp" 6475 @ 71794: PUSH LHS 6476 @ 71797: PUSH V 6477 @ 71800: ASSREF 1317 SHOW(V) %IF CONTROL < 0 6478 @ 71801: LINE 1317 "regression-compile-tmp/asems412.imp" 6479 @ 71840: PUSH CONTROL 6480 @ 71843: PUSHI #0x00000000 6481 @ 71848: JUMPIF >= L_0004 6482 @ 71852: PUSH SHOW 6483 @ 71855: PUSH V 6484 @ 71858: ASSPAR 6485 @ 71859: CALL 6486 @ 71860: LOCATE L_0004 1318 %END 6487 @ 71863: LINE 1318 "regression-compile-tmp/asems412.imp" 6488 @ 71902: END _lev0id0_ASSEMBLE_STACK {lev=3 --> 2} 1319 %ROUTINE VSTACK(%RECORD(VARFM)%NAME V) 6489 @ 71903: LINE 1319 "regression-compile-tmp/asems412.imp" 6490 @ 71942: DEF VSTACK (_lev0id0_ASSEMBLE_VSTACK) 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 6491 @ 71960: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 6492 @ 71961: DEF V p1=V_012d a/tf=42 b/format=85 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6493 @ 71974: FINISH ) {lev=3} 1320 STACK(V_DISP, V_BASE, V_TYPE, V_FORM, V_FORMAT, V_EXTRA, V_LENGTH) 6494 @ 71975: LINE 1320 "regression-compile-tmp/asems412.imp" 6495 @ 72014: PUSH STACK 6496 @ 72017: PUSH V 6497 @ 72020: SELECT 1 6498 @ 72023: ASSPAR 6499 @ 72024: PUSH V 6500 @ 72027: SELECT 6 6501 @ 72030: ASSPAR 6502 @ 72031: PUSH V 6503 @ 72034: SELECT 7 6504 @ 72037: ASSPAR 6505 @ 72038: PUSH V 6506 @ 72041: SELECT 8 6507 @ 72044: ASSPAR 6508 @ 72045: PUSH V 6509 @ 72048: SELECT 2 6510 @ 72051: ASSPAR 6511 @ 72052: PUSH V 6512 @ 72055: SELECT 3 6513 @ 72058: ASSPAR 6514 @ 72059: PUSH V 6515 @ 72062: SELECT 5 6516 @ 72065: ASSPAR 6517 @ 72066: CALL 1321 %END 6518 @ 72067: LINE 1321 "regression-compile-tmp/asems412.imp" 6519 @ 72106: END _lev0id0_ASSEMBLE_VSTACK {lev=3 --> 2} 1322 %ROUTINE SSTACK(%RECORD(STACKFM)%NAME V) 6520 @ 72107: LINE 1322 "regression-compile-tmp/asems412.imp" 6521 @ 72146: DEF SSTACK (_lev0id0_ASSEMBLE_SSTACK) 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 6522 @ 72164: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 6523 @ 72165: DEF V p1=V_012e a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6524 @ 72178: FINISH ) {lev=3} 1323 %RECORD(STACKFM)%NAME T 6525 @ 72179: LINE 1323 "regression-compile-tmp/asems412.imp" 6526 @ 72218: DEF T p1=V_012f a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1324 STP = STP+1; ABORT(7) %IF STP > MAX DEPTH 6527 @ 72231: LINE 1324 "regression-compile-tmp/asems412.imp" 6528 @ 72270: PUSH STP 6529 @ 72273: PUSH STP 6530 @ 72276: PUSHI #0x00000001 6531 @ 72281: ADD 6532 @ 72282: ASSVAL 6533 @ 72283: LINE 1324 "regression-compile-tmp/asems412.imp" 6534 @ 72322: PUSH STP 6535 @ 72325: PUSHI #0x00000010 6536 @ 72330: JUMPIF <= L_0004 6537 @ 72334: PUSH ABORT 6538 @ 72337: PUSHI #0x00000007 6539 @ 72342: ASSPAR 6540 @ 72343: CALL 6541 @ 72344: LOCATE L_0004 1325 T == DESCRIPTOR; T = V 6542 @ 72347: LINE 1325 "regression-compile-tmp/asems412.imp" 6543 @ 72386: PUSH T 6544 @ 72389: PUSH DESCRIPTOR 6545 @ 72392: CALL 6546 @ 72393: ASSREF 6547 @ 72394: LINE 1325 "regression-compile-tmp/asems412.imp" 6548 @ 72433: PUSH T 6549 @ 72436: PUSH V 6550 @ 72439: ASSVAL 1326 STACKED(STP)_V == T; CLAIM(T_BASE) 6551 @ 72440: LINE 1326 "regression-compile-tmp/asems412.imp" 6552 @ 72479: PUSH STACKED 6553 @ 72482: PUSH STP 6554 @ 72485: ACCESS 6555 @ 72486: SELECT 1 6556 @ 72489: PUSH T 6557 @ 72492: ASSREF 6558 @ 72493: LINE 1326 "regression-compile-tmp/asems412.imp" 6559 @ 72532: PUSH CLAIM 6560 @ 72535: PUSH T 6561 @ 72538: SELECT 6 6562 @ 72541: ASSPAR 6563 @ 72542: CALL 1327 SHOW(T) %IF CONTROL < 0 6564 @ 72543: LINE 1327 "regression-compile-tmp/asems412.imp" 6565 @ 72582: PUSH CONTROL 6566 @ 72585: PUSHI #0x00000000 6567 @ 72590: JUMPIF >= L_0004 6568 @ 72594: PUSH SHOW 6569 @ 72597: PUSH T 6570 @ 72600: ASSPAR 6571 @ 72601: CALL 6572 @ 72602: LOCATE L_0004 1328 %END 6573 @ 72605: LINE 1328 "regression-compile-tmp/asems412.imp" 6574 @ 72644: END _lev0id0_ASSEMBLE_SSTACK {lev=3 --> 2} 1329 %ROUTINE C STACK(%INTEGER N) 6575 @ 72645: LINE 1329 "regression-compile-tmp/asems412.imp" 6576 @ 72684: DEF CSTACK (_lev0id0_ASSEMBLE_CSTACK) 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 6577 @ 72702: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 6578 @ 72703: DEF N 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 6579 @ 72716: FINISH ) {lev=3} 1330 RHS == DESCRIPTOR 6580 @ 72717: LINE 1330 "regression-compile-tmp/asems412.imp" 6581 @ 72756: PUSH RHS 6582 @ 72759: PUSH DESCRIPTOR 6583 @ 72762: CALL 6584 @ 72763: ASSREF 1331 RHS_BASE = 0 6585 @ 72764: LINE 1331 "regression-compile-tmp/asems412.imp" 6586 @ 72803: PUSH RHS 6587 @ 72806: SELECT 6 6588 @ 72809: PUSHI #0x00000000 6589 @ 72814: ASSVAL 1332 RHS_DISP = N 6590 @ 72815: LINE 1332 "regression-compile-tmp/asems412.imp" 6591 @ 72854: PUSH RHS 6592 @ 72857: SELECT 1 6593 @ 72860: PUSH N 6594 @ 72863: ASSVAL 1333 RHS_TYPE = INTEGER 6595 @ 72864: LINE 1333 "regression-compile-tmp/asems412.imp" 6596 @ 72903: PUSH RHS 6597 @ 72906: SELECT 8 6598 @ 72909: PUSHI #0x00000001 6599 @ 72914: ASSVAL 1334 RHS_FORM = CONSTANT 6600 @ 72915: LINE 1334 "regression-compile-tmp/asems412.imp" 6601 @ 72954: PUSH RHS 6602 @ 72957: SELECT 9 6603 @ 72960: PUSHI #0x00000000 6604 @ 72965: ASSVAL 1335 STP = STP+1; ABORT(7) %IF STP > MAX DEPTH 6605 @ 72966: LINE 1335 "regression-compile-tmp/asems412.imp" 6606 @ 73005: PUSH STP 6607 @ 73008: PUSH STP 6608 @ 73011: PUSHI #0x00000001 6609 @ 73016: ADD 6610 @ 73017: ASSVAL 6611 @ 73018: LINE 1335 "regression-compile-tmp/asems412.imp" 6612 @ 73057: PUSH STP 6613 @ 73060: PUSHI #0x00000010 6614 @ 73065: JUMPIF <= L_0004 6615 @ 73069: PUSH ABORT 6616 @ 73072: PUSHI #0x00000007 6617 @ 73077: ASSPAR 6618 @ 73078: CALL 6619 @ 73079: LOCATE L_0004 1336 STACKED(STP)_V == RHS 6620 @ 73082: LINE 1336 "regression-compile-tmp/asems412.imp" 6621 @ 73121: PUSH STACKED 6622 @ 73124: PUSH STP 6623 @ 73127: ACCESS 6624 @ 73128: SELECT 1 6625 @ 73131: PUSH RHS 6626 @ 73134: ASSREF 1337 SHOW(RHS) %IF CONTROL < 0 6627 @ 73135: LINE 1337 "regression-compile-tmp/asems412.imp" 6628 @ 73174: PUSH CONTROL 6629 @ 73177: PUSHI #0x00000000 6630 @ 73182: JUMPIF >= L_0004 6631 @ 73186: PUSH SHOW 6632 @ 73189: PUSH RHS 6633 @ 73192: ASSPAR 6634 @ 73193: CALL 6635 @ 73194: LOCATE L_0004 1338 %END 6636 @ 73197: LINE 1338 "regression-compile-tmp/asems412.imp" 6637 @ 73236: END _lev0id0_ASSEMBLE_CSTACK {lev=3 --> 2} 1339 %ROUTINE FP CSTACK(%REAL X, %RECORD(STACK FM)%NAME R) 6638 @ 73237: LINE 1339 "regression-compile-tmp/asems412.imp" 6639 @ 73276: DEF FPCSTACK (_lev0id0_ASSEMBLE_FPCSTACK) 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 6640 @ 73296: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 6641 @ 73297: DEF X p1=V_0130 a/tf=21 b/format=1 c/ostate=0 type=2 (real) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6642 @ 73310: DEF R p1=V_0131 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6643 @ 73323: FINISH ) {lev=3} 1340 %RECORDFORMAT F(%INTEGER VAL, GDISP) 6644 @ 73324: LINE 1340 "regression-compile-tmp/asems412.imp" 6645 @ 73363: DEF F p1=V_0132 a/tf=44 b/format=132 c/ostate=0 type=4 (record) form=4 (record-format) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6646 @ 73376: START ( RECORDFORMAT 6647 @ 73377: DEF VAL 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 6648 @ 73392: DEF GDISP 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 6649 @ 73409: FINISH ) 1341 %CONSTINTEGER L=31; ! ... MUST BE 2\\N - 1 6650 @ 73410: LINE 1341 "regression-compile-tmp/asems412.imp" 1342 %OWNRECORD(F)%ARRAY CONST LIST(0:L) 6651 @ 73449: LINE 1342 "regression-compile-tmp/asems412.imp" 6652 @ 73488: PUSHI #0x00000000 6653 @ 73493: PUSHI #0x0000001f 6654 @ 73498: BOUNDS 6655 @ 73499: DEF CONSTLIST p1=V_0133 a/tf=4b b/format=132 c/ostate=121 type=4 (record) form=11 (array) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 6656 @ 73520: INIT 32 1343 %OWNSHORTINTEGER LAST PNTR = 0, NEXT PNTR = 0 6657 @ 73523: LINE 1343 "regression-compile-tmp/asems412.imp" 6658 @ 73562: PUSHI #0x00000000 6659 @ 73567: DEF LASTPNTR p1=V_0134 a/tf=11 b/format=3 c/ostate=21 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=1 (own) spec=0 indirect=0 unass=1 6660 @ 73587: INIT 1 6661 @ 73590: PUSHI #0x00000000 6662 @ 73595: DEF NEXTPNTR p1=V_0135 a/tf=11 b/format=3 c/ostate=21 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=1 (own) spec=0 indirect=0 unass=1 6663 @ 73615: INIT 1 1344 %INTEGER N; %SHORTINTEGER I 1345 !!! %RECORDFORMAT FI(%INTEGER X) 1346 !!! %RECORDFORMAT FR(%REAL X) 1347 !!! %RECORD(FR) RV; %RECORD(FI)%NAME IV 1348 !!! RV_X = X; IV == RV; N = IV_X 1349 6664 @ 73618: LINE 1344 "regression-compile-tmp/asems412.imp" 6665 @ 73657: DEF N p1=V_0136 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 6666 @ 73670: LINE 1344 "regression-compile-tmp/asems412.imp" 6667 @ 73709: DEF I p1=V_0137 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 1350 %recordformat convfm(%integer n %or %real x) 6668 @ 73722: LINE 1350 "regression-compile-tmp/asems412.imp" 6669 @ 73761: DEF CONVFM p1=V_0138 a/tf=44 b/format=138 c/ostate=0 type=4 (record) form=4 (record-format) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6670 @ 73779: START ( RECORDFORMAT 6671 @ 73780: DEF N 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 6672 @ 73793: ALTALT ~C ALT 6673 @ 73795: DEF X p1=V_0000 a/tf=21 b/format=1 c/ostate=0 type=2 (real) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6674 @ 73808: FINISH ) 1351 %record(convfm) conv 6675 @ 73809: LINE 1351 "regression-compile-tmp/asems412.imp" 6676 @ 73848: DEF CONV p1=V_0139 a/tf=41 b/format=138 c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1352 conv_x = x; n = conv_n 1353 6677 @ 73864: LINE 1352 "regression-compile-tmp/asems412.imp" 6678 @ 73903: PUSH CONV 6679 @ 73906: SELECT 2 6680 @ 73909: PUSH X 6681 @ 73912: ASSVAL 6682 @ 73913: LINE 1352 "regression-compile-tmp/asems412.imp" 6683 @ 73952: PUSH N 6684 @ 73955: PUSH CONV 6685 @ 73958: SELECT 1 6686 @ 73961: ASSVAL 1354 OWNVAL = N; REALGA = GA 1355 ! 6687 @ 73962: LINE 1354 "regression-compile-tmp/asems412.imp" 6688 @ 74001: PUSH OWNVAL 6689 @ 74004: PUSH N 6690 @ 74007: ASSVAL 6691 @ 74008: LINE 1354 "regression-compile-tmp/asems412.imp" 6692 @ 74047: PUSH REALGA 6693 @ 74050: PUSH GA 6694 @ 74053: ASSVAL 1356 I = NEXT PNTR 6695 @ 74054: LINE 1356 "regression-compile-tmp/asems412.imp" 6696 @ 74093: PUSH I 6697 @ 74096: PUSH NEXTPNTR 6698 @ 74099: ASSVAL 1357 %WHILE I # LAST PNTR %CYCLE 6699 @ 74100: LINE 1357 "regression-compile-tmp/asems412.imp" 6700 @ 74139: LOCATE L_0003 6701 @ 74142: PUSH I 6702 @ 74145: PUSH LASTPNTR 6703 @ 74148: JUMPIF = L_0004 1358 I = (I-1)&L 6704 @ 74152: LINE 1358 "regression-compile-tmp/asems412.imp" 6705 @ 74191: PUSH I 6706 @ 74194: PUSH I 6707 @ 74197: PUSHI #0x00000001 6708 @ 74202: SUB 6709 @ 74203: PUSHI #0x0000001f 6710 @ 74208: AND 6711 @ 74209: ASSVAL 1359 -> FOUND IT %IF CONST LIST(I)_VAL = N 6712 @ 74210: LINE 1359 "regression-compile-tmp/asems412.imp" 6713 @ 74249: PUSH CONSTLIST 6714 @ 74252: PUSH I 6715 @ 74255: ACCESS 6716 @ 74256: SELECT 1 6717 @ 74259: PUSH N 6718 @ 74262: JUMPIF # L_0007 6719 @ 74266: JUMP L_013a 6720 @ 74269: LOCATE L_0007 1360 %REPEAT 6721 @ 74272: LINE 1360 "regression-compile-tmp/asems412.imp" 6722 @ 74311: REPEAT L_0003 6723 @ 74314: LOCATE L_0004 1361 GFIX(4); I = GA; ! FULLWORD ALIGN AND REMEMBER ADDR. 6724 @ 74317: LINE 1361 "regression-compile-tmp/asems412.imp" 6725 @ 74356: PUSH GFIX 6726 @ 74359: PUSHI #0x00000004 6727 @ 74364: ASSPAR 6728 @ 74365: CALL 6729 @ 74366: LINE 1361 "regression-compile-tmp/asems412.imp" 6730 @ 74405: PUSH I 6731 @ 74408: PUSH GA 6732 @ 74411: ASSVAL 1362 GWORD(N) 6733 @ 74412: LINE 1362 "regression-compile-tmp/asems412.imp" 6734 @ 74451: PUSH GWORD 6735 @ 74454: PUSH N 6736 @ 74457: ASSPAR 6737 @ 74458: CALL 1363 CONST LIST(NEXT PNTR)_VAL = N 6738 @ 74459: LINE 1363 "regression-compile-tmp/asems412.imp" 6739 @ 74498: PUSH CONSTLIST 6740 @ 74501: PUSH NEXTPNTR 6741 @ 74504: ACCESS 6742 @ 74505: SELECT 1 6743 @ 74508: PUSH N 6744 @ 74511: ASSVAL 1364 CONST LIST(NEXT PNTR)_GDISP = I 6745 @ 74512: LINE 1364 "regression-compile-tmp/asems412.imp" 6746 @ 74551: PUSH CONSTLIST 6747 @ 74554: PUSH NEXTPNTR 6748 @ 74557: ACCESS 6749 @ 74558: SELECT 2 6750 @ 74561: PUSH I 6751 @ 74564: ASSVAL 1365 I = NEXT PNTR; ! ...FOR USE AT 'FOUND IT:' 6752 @ 74565: LINE 1365 "regression-compile-tmp/asems412.imp" 6753 @ 74604: PUSH I 6754 @ 74607: PUSH NEXTPNTR 6755 @ 74610: ASSVAL 1366 NEXT PNTR = (NEXT PNTR+1)&L 6756 @ 74611: LINE 1366 "regression-compile-tmp/asems412.imp" 6757 @ 74650: PUSH NEXTPNTR 6758 @ 74653: PUSH NEXTPNTR 6759 @ 74656: PUSHI #0x00000001 6760 @ 74661: ADD 6761 @ 74662: PUSHI #0x0000001f 6762 @ 74667: AND 6763 @ 74668: ASSVAL 1367 LAST PNTR = (LAST PNTR+1)&L %IF LAST PNTR = NEXT PNTR 6764 @ 74669: LINE 1367 "regression-compile-tmp/asems412.imp" 6765 @ 74708: PUSH LASTPNTR 6766 @ 74711: PUSH NEXTPNTR 6767 @ 74714: JUMPIF # L_0004 6768 @ 74718: PUSH LASTPNTR 6769 @ 74721: PUSH LASTPNTR 6770 @ 74724: PUSHI #0x00000001 6771 @ 74729: ADD 6772 @ 74730: PUSHI #0x0000001f 6773 @ 74735: AND 6774 @ 74736: ASSVAL 6775 @ 74737: LOCATE L_0004 1368 FOUND IT: 6776 @ 74740: LINE 1368 "regression-compile-tmp/asems412.imp" 6777 @ 74779: LABEL L_013a 1369 R_BASE = GLA 6778 @ 74782: LINE 1369 "regression-compile-tmp/asems412.imp" 6779 @ 74821: PUSH R 6780 @ 74824: SELECT 6 6781 @ 74827: PUSHI #0x0000002a 6782 @ 74832: ASSVAL 1370 R_DISP = CONST LIST(I)_GDISP 6783 @ 74833: LINE 1370 "regression-compile-tmp/asems412.imp" 6784 @ 74872: PUSH R 6785 @ 74875: SELECT 1 6786 @ 74878: PUSH CONSTLIST 6787 @ 74881: PUSH I 6788 @ 74884: ACCESS 6789 @ 74885: SELECT 2 6790 @ 74888: ASSVAL 1371 R_TYPE = REALS 6791 @ 74889: LINE 1371 "regression-compile-tmp/asems412.imp" 6792 @ 74928: PUSH R 6793 @ 74931: SELECT 8 6794 @ 74934: PUSHI #0x00000006 6795 @ 74939: ASSVAL 1372 R_FORM = V IN S 6796 @ 74940: LINE 1372 "regression-compile-tmp/asems412.imp" 6797 @ 74979: PUSH R 6798 @ 74982: SELECT 9 6799 @ 74985: PUSHI #0x00000003 6800 @ 74990: ASSVAL 1373 STP = STP+1; ABORT(7) %IF STP > MAX DEPTH 6801 @ 74991: LINE 1373 "regression-compile-tmp/asems412.imp" 6802 @ 75030: PUSH STP 6803 @ 75033: PUSH STP 6804 @ 75036: PUSHI #0x00000001 6805 @ 75041: ADD 6806 @ 75042: ASSVAL 6807 @ 75043: LINE 1373 "regression-compile-tmp/asems412.imp" 6808 @ 75082: PUSH STP 6809 @ 75085: PUSHI #0x00000010 6810 @ 75090: JUMPIF <= L_0004 6811 @ 75094: PUSH ABORT 6812 @ 75097: PUSHI #0x00000007 6813 @ 75102: ASSPAR 6814 @ 75103: CALL 6815 @ 75104: LOCATE L_0004 1374 STACKED(STP)_V == R 6816 @ 75107: LINE 1374 "regression-compile-tmp/asems412.imp" 6817 @ 75146: PUSH STACKED 6818 @ 75149: PUSH STP 6819 @ 75152: ACCESS 6820 @ 75153: SELECT 1 6821 @ 75156: PUSH R 6822 @ 75159: ASSREF 1375 %END 6823 @ 75160: LINE 1375 "regression-compile-tmp/asems412.imp" 6824 @ 75199: END _lev0id0_ASSEMBLE_FPCSTACK {lev=3 --> 2} 1376 %ROUTINE SSET(%INTEGER BASE, DISP, FORM, EXTRA) 6825 @ 75200: LINE 1376 "regression-compile-tmp/asems412.imp" 6826 @ 75239: DEF SSET (_lev0id0_ASSEMBLE_SSET) 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 6827 @ 75255: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 6828 @ 75256: DEF BASE 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 6829 @ 75272: DEF DISP 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 6830 @ 75288: DEF FORM 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 6831 @ 75304: DEF EXTRA 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 6832 @ 75321: FINISH ) {lev=3} 1377 RHS == DESCRIPTOR 6833 @ 75322: LINE 1377 "regression-compile-tmp/asems412.imp" 6834 @ 75361: PUSH RHS 6835 @ 75364: PUSH DESCRIPTOR 6836 @ 75367: CALL 6837 @ 75368: ASSREF 1378 RHS_BASE = BASE 6838 @ 75369: LINE 1378 "regression-compile-tmp/asems412.imp" 6839 @ 75408: PUSH RHS 6840 @ 75411: SELECT 6 6841 @ 75414: PUSH BASE 6842 @ 75417: ASSVAL 1379 RHS_DISP = DISP 6843 @ 75418: LINE 1379 "regression-compile-tmp/asems412.imp" 6844 @ 75457: PUSH RHS 6845 @ 75460: SELECT 1 6846 @ 75463: PUSH DISP 6847 @ 75466: ASSVAL 1380 RHS_TYPE = INTEGER 6848 @ 75467: LINE 1380 "regression-compile-tmp/asems412.imp" 6849 @ 75506: PUSH RHS 6850 @ 75509: SELECT 8 6851 @ 75512: PUSHI #0x00000001 6852 @ 75517: ASSVAL 1381 RHS_FORM = FORM 6853 @ 75518: LINE 1381 "regression-compile-tmp/asems412.imp" 6854 @ 75557: PUSH RHS 6855 @ 75560: SELECT 9 6856 @ 75563: PUSH FORM 6857 @ 75566: ASSVAL 1382 RHS_EXTRA = EXTRA 6858 @ 75567: LINE 1382 "regression-compile-tmp/asems412.imp" 6859 @ 75606: PUSH RHS 6860 @ 75609: SELECT 3 6861 @ 75612: PUSH EXTRA 6862 @ 75615: ASSVAL 1383 STP = STP+1; ABORT(7) %IF STP > MAX DEPTH 6863 @ 75616: LINE 1383 "regression-compile-tmp/asems412.imp" 6864 @ 75655: PUSH STP 6865 @ 75658: PUSH STP 6866 @ 75661: PUSHI #0x00000001 6867 @ 75666: ADD 6868 @ 75667: ASSVAL 6869 @ 75668: LINE 1383 "regression-compile-tmp/asems412.imp" 6870 @ 75707: PUSH STP 6871 @ 75710: PUSHI #0x00000010 6872 @ 75715: JUMPIF <= L_0004 6873 @ 75719: PUSH ABORT 6874 @ 75722: PUSHI #0x00000007 6875 @ 75727: ASSPAR 6876 @ 75728: CALL 6877 @ 75729: LOCATE L_0004 1384 STACKED(STP)_V == RHS 6878 @ 75732: LINE 1384 "regression-compile-tmp/asems412.imp" 6879 @ 75771: PUSH STACKED 6880 @ 75774: PUSH STP 6881 @ 75777: ACCESS 6882 @ 75778: SELECT 1 6883 @ 75781: PUSH RHS 6884 @ 75784: ASSREF 1385 %END 6885 @ 75785: LINE 1385 "regression-compile-tmp/asems412.imp" 6886 @ 75824: END _lev0id0_ASSEMBLE_SSET {lev=3 --> 2} 1386 %ROUTINE SET LHS 6887 @ 75825: LINE 1386 "regression-compile-tmp/asems412.imp" 6888 @ 75864: DEF SETLHS (_lev0id0_ASSEMBLE_SETLHS) 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 6889 @ 75882: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 6890 @ 75883: FINISH ) {lev=3} 1387 LHS == STACKED(STP)_V 6891 @ 75884: LINE 1387 "regression-compile-tmp/asems412.imp" 6892 @ 75923: PUSH LHS 6893 @ 75926: PUSH STACKED 6894 @ 75929: PUSH STP 6895 @ 75932: ACCESS 6896 @ 75933: SELECT 1 6897 @ 75936: ASSREF 1388 %END 6898 @ 75937: LINE 1388 "regression-compile-tmp/asems412.imp" 6899 @ 75976: END _lev0id0_ASSEMBLE_SETLHS {lev=3 --> 2} 1389 %ROUTINE SET BOTH 6900 @ 75977: LINE 1389 "regression-compile-tmp/asems412.imp" 6901 @ 76016: DEF SETBOTH (_lev0id0_ASSEMBLE_SETBOTH) 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 6902 @ 76035: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 6903 @ 76036: FINISH ) {lev=3} 1390 ABORT(8) %IF STP <= 1 6904 @ 76037: LINE 1390 "regression-compile-tmp/asems412.imp" 6905 @ 76076: PUSH STP 6906 @ 76079: PUSHI #0x00000001 6907 @ 76084: JUMPIF > L_0004 6908 @ 76088: PUSH ABORT 6909 @ 76091: PUSHI #0x00000008 6910 @ 76096: ASSPAR 6911 @ 76097: CALL 6912 @ 76098: LOCATE L_0004 1391 LHS == STACKED(STP-1)_V 6913 @ 76101: LINE 1391 "regression-compile-tmp/asems412.imp" 6914 @ 76140: PUSH LHS 6915 @ 76143: PUSH STACKED 6916 @ 76146: PUSH STP 6917 @ 76149: PUSHI #0x00000001 6918 @ 76154: SUB 6919 @ 76155: ACCESS 6920 @ 76156: SELECT 1 6921 @ 76159: ASSREF 1392 RHS == STACKED(STP)_V 6922 @ 76160: LINE 1392 "regression-compile-tmp/asems412.imp" 6923 @ 76199: PUSH RHS 6924 @ 76202: PUSH STACKED 6925 @ 76205: PUSH STP 6926 @ 76208: ACCESS 6927 @ 76209: SELECT 1 6928 @ 76212: ASSREF 1393 %END 6929 @ 76213: LINE 1393 "regression-compile-tmp/asems412.imp" 6930 @ 76252: END _lev0id0_ASSEMBLE_SETBOTH {lev=3 --> 2} 1394 %ROUTINE POP LHS 6931 @ 76253: LINE 1394 "regression-compile-tmp/asems412.imp" 6932 @ 76292: DEF POPLHS (_lev0id0_ASSEMBLE_POPLHS) 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 6933 @ 76310: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 6934 @ 76311: FINISH ) {lev=3} 1395 ABORT(8) %IF STP <= 0 6935 @ 76312: LINE 1395 "regression-compile-tmp/asems412.imp" 6936 @ 76351: PUSH STP 6937 @ 76354: PUSHI #0x00000000 6938 @ 76359: JUMPIF > L_0004 6939 @ 76363: PUSH ABORT 6940 @ 76366: PUSHI #0x00000008 6941 @ 76371: ASSPAR 6942 @ 76372: CALL 6943 @ 76373: LOCATE L_0004 1396 LHS == STACKED(STP)_V 6944 @ 76376: LINE 1396 "regression-compile-tmp/asems412.imp" 6945 @ 76415: PUSH LHS 6946 @ 76418: PUSH STACKED 6947 @ 76421: PUSH STP 6948 @ 76424: ACCESS 6949 @ 76425: SELECT 1 6950 @ 76428: ASSREF 1397 STP = STP-1 6951 @ 76429: LINE 1397 "regression-compile-tmp/asems412.imp" 6952 @ 76468: PUSH STP 6953 @ 76471: PUSH STP 6954 @ 76474: PUSHI #0x00000001 6955 @ 76479: SUB 6956 @ 76480: ASSVAL 1398 %END 1399 1400 ! STRING PROCESSING 1401 6957 @ 76481: LINE 1398 "regression-compile-tmp/asems412.imp" 6958 @ 76520: END _lev0id0_ASSEMBLE_POPLHS {lev=3 --> 2} 1402 %ROUTINE DUMP STRING(%INTEGER MAX) 6959 @ 76521: LINE 1402 "regression-compile-tmp/asems412.imp" 6960 @ 76560: DEF DUMPSTRING (_lev0id0_ASSEMBLE_DUMPSTRING) 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 6961 @ 76582: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 6962 @ 76583: DEF MAX 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 6963 @ 76598: FINISH ) {lev=3} 1403 %INTEGER J 6964 @ 76599: LINE 1403 "regression-compile-tmp/asems412.imp" 6965 @ 76638: DEF J p1=V_0136 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 1404 GFIX(2) 6966 @ 76651: LINE 1404 "regression-compile-tmp/asems412.imp" 6967 @ 76690: PUSH GFIX 6968 @ 76693: PUSHI #0x00000002 6969 @ 76698: ASSPAR 6970 @ 76699: CALL 1405 %IF MAX <= 0 %START 6971 @ 76700: LINE 1405 "regression-compile-tmp/asems412.imp" 6972 @ 76739: PUSH MAX 6973 @ 76742: PUSHI #0x00000000 6974 @ 76747: JUMPIF > L_0004 1406 ->OUT %IF ACTIVE STRING == NULL %OR (MAX < 0 %AND CSLEN = 0) 6975 @ 76751: LINE 1406 "regression-compile-tmp/asems412.imp" 6976 @ 76790: PUSH ACTIVESTRING 6977 @ 76793: PUSH NULL 6978 @ 76796: JUMPIFA = L_0008 6979 @ 76800: PUSH MAX 6980 @ 76803: PUSHI #0x00000000 6981 @ 76808: JUMPIF >= L_0007 6982 @ 76812: PUSH CSLEN 6983 @ 76815: PUSHI #0x00000000 6984 @ 76820: JUMPIF # L_0007 6985 @ 76824: LOCATE L_0008 6986 @ 76827: JUMP L_0137 6987 @ 76830: LOCATE L_0007 1407 ACTIVE STRING_BASE = GLA; ACTIVE STRING_DISP = GA 6988 @ 76833: LINE 1407 "regression-compile-tmp/asems412.imp" 6989 @ 76872: PUSH ACTIVESTRING 6990 @ 76875: SELECT 6 6991 @ 76878: PUSHI #0x0000002a 6992 @ 76883: ASSVAL 6993 @ 76884: LINE 1407 "regression-compile-tmp/asems412.imp" 6994 @ 76923: PUSH ACTIVESTRING 6995 @ 76926: SELECT 1 6996 @ 76929: PUSH GA 6997 @ 76932: ASSVAL 1408 ACTIVE STRING_FORM = V IN S 6998 @ 76933: LINE 1408 "regression-compile-tmp/asems412.imp" 6999 @ 76972: PUSH ACTIVESTRING 7000 @ 76975: SELECT 9 7001 @ 76978: PUSHI #0x00000003 7002 @ 76983: ASSVAL 1409 MAX = CSLEN 7003 @ 76984: LINE 1409 "regression-compile-tmp/asems412.imp" 7004 @ 77023: PUSH MAX 7005 @ 77026: PUSH CSLEN 7006 @ 77029: ASSVAL 1410 %ELSE 7007 @ 77030: LINE 1410 "regression-compile-tmp/asems412.imp" 7008 @ 77069: GOTO L_0003 7009 @ 77072: LOCATE L_0004 1411 MAX = MAX-1 7010 @ 77075: LINE 1411 "regression-compile-tmp/asems412.imp" 7011 @ 77114: PUSH MAX 7012 @ 77117: PUSH MAX 7013 @ 77120: PUSHI #0x00000001 7014 @ 77125: SUB 7015 @ 77126: ASSVAL 1412 ABORT(-13) %IF MAX < CSLEN 7016 @ 77127: LINE 1412 "regression-compile-tmp/asems412.imp" 7017 @ 77166: PUSH MAX 7018 @ 77169: PUSH CSLEN 7019 @ 77172: JUMPIF >= L_0007 7020 @ 77176: PUSH ABORT 7021 @ 77179: PUSHI #0x0000000d 7022 @ 77184: NEGATE 7023 @ 77185: ASSPAR 7024 @ 77186: CALL 7025 @ 77187: LOCATE L_0007 1413 %FINISH 7026 @ 77190: LINE 1413 "regression-compile-tmp/asems412.imp" 7027 @ 77229: LOCATE L_0003 1414 GBYTE(CURRENT STRING(J)) %FOR J = 0, 1, MAX 7028 @ 77232: LINE 1414 "regression-compile-tmp/asems412.imp" 7029 @ 77271: PUSH J 7030 @ 77274: PUSHI #0x00000001 7031 @ 77279: PUSH MAX 7032 @ 77282: PUSHI #0x00000000 7033 @ 77287: FOR L_0003 7034 @ 77290: PUSH GBYTE 7035 @ 77293: PUSH CURRENTSTRING 7036 @ 77296: PUSH J 7037 @ 77299: ACCESS 7038 @ 77300: ASSPAR 7039 @ 77301: CALL 7040 @ 77302: REPEAT L_0003 7041 @ 77305: LOCATE L_0004 1415 CSLEN = 0 7042 @ 77308: LINE 1415 "regression-compile-tmp/asems412.imp" 7043 @ 77347: PUSH CSLEN 7044 @ 77350: PUSHI #0x00000000 7045 @ 77355: ASSVAL 1416 OUT: ACTIVE STRING == NULL 7046 @ 77356: LINE 1416 "regression-compile-tmp/asems412.imp" 7047 @ 77395: LABEL L_0137 7048 @ 77398: LINE 1416 "regression-compile-tmp/asems412.imp" 7049 @ 77437: PUSH ACTIVESTRING 7050 @ 77440: PUSH NULL 7051 @ 77443: ASSREF 1417 %END 7052 @ 77444: LINE 1417 "regression-compile-tmp/asems412.imp" 7053 @ 77483: END _lev0id0_ASSEMBLE_DUMPSTRING {lev=3 --> 2} 1418 %ROUTINE GET STRING 7054 @ 77484: LINE 1418 "regression-compile-tmp/asems412.imp" 7055 @ 77523: DEF GETSTRING (_lev0id0_ASSEMBLE_GETSTRING) p1=V_0135 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 7056 @ 77544: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 7057 @ 77545: FINISH ) {lev=3} 1419 %INTEGER L, S 7058 @ 77546: LINE 1419 "regression-compile-tmp/asems412.imp" 7059 @ 77585: DEF L p1=V_0136 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 @ 77598: DEF S p1=V_0137 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 1420 DUMP STRING(0) %UNLESS ACTIVE STRING == NULL 7061 @ 77611: LINE 1420 "regression-compile-tmp/asems412.imp" 7062 @ 77650: PUSH ACTIVESTRING 7063 @ 77653: PUSH NULL 7064 @ 77656: JUMPIFA = L_0004 7065 @ 77660: PUSH DUMPSTRING 7066 @ 77663: PUSHI #0x00000000 7067 @ 77668: ASSPAR 7068 @ 77669: CALL 7069 @ 77670: LOCATE L_0004 1421 L = TAG; SKIPSYMBOL %IF L # 0 7070 @ 77673: LINE 1421 "regression-compile-tmp/asems412.imp" 7071 @ 77712: PUSH L 7072 @ 77715: PUSH TAG 7073 @ 77718: CALL 7074 @ 77719: ASSVAL 7075 @ 77720: LINE 1421 "regression-compile-tmp/asems412.imp" 7076 @ 77759: PUSH L 7077 @ 77762: PUSHI #0x00000000 7078 @ 77767: JUMPIF = L_0004 7079 @ 77771: PUSH SKIPSYMBOL 7080 @ 77774: CALL 7081 @ 77775: LOCATE L_0004 1422 CSLEN = 0 7082 @ 77778: LINE 1422 "regression-compile-tmp/asems412.imp" 7083 @ 77817: PUSH CSLEN 7084 @ 77820: PUSHI #0x00000000 7085 @ 77825: ASSVAL 1423 %WHILE L > 0 %CYCLE 7086 @ 77826: LINE 1423 "regression-compile-tmp/asems412.imp" 7087 @ 77865: LOCATE L_0003 7088 @ 77868: PUSH L 7089 @ 77871: PUSHI #0x00000000 7090 @ 77876: JUMPIF <= L_0004 1424 L = L-1 7091 @ 77880: LINE 1424 "regression-compile-tmp/asems412.imp" 7092 @ 77919: PUSH L 7093 @ 77922: PUSH L 7094 @ 77925: PUSHI #0x00000001 7095 @ 77930: SUB 7096 @ 77931: ASSVAL 1425 READSYMBOL(S) 7097 @ 77932: LINE 1425 "regression-compile-tmp/asems412.imp" 7098 @ 77971: PUSH READSYMBOL 7099 @ 77974: PUSH S 7100 @ 77977: ASSPAR 7101 @ 77978: CALL 1426 CSLEN = CSLEN+1; CURRENT STRING(CSLEN) = S 7102 @ 77979: LINE 1426 "regression-compile-tmp/asems412.imp" 7103 @ 78018: PUSH CSLEN 7104 @ 78021: PUSH CSLEN 7105 @ 78024: PUSHI #0x00000001 7106 @ 78029: ADD 7107 @ 78030: ASSVAL 7108 @ 78031: LINE 1426 "regression-compile-tmp/asems412.imp" 7109 @ 78070: PUSH CURRENTSTRING 7110 @ 78073: PUSH CSLEN 7111 @ 78076: ACCESS 7112 @ 78077: PUSH S 7113 @ 78080: ASSVAL 1427 %REPEAT 7114 @ 78081: LINE 1427 "regression-compile-tmp/asems412.imp" 7115 @ 78120: REPEAT L_0003 7116 @ 78123: LOCATE L_0004 1428 STACK(0, 0, STRING, 0, 0, 0, 0) 7117 @ 78126: LINE 1428 "regression-compile-tmp/asems412.imp" 7118 @ 78165: PUSH STACK 7119 @ 78168: PUSHI #0x00000000 7120 @ 78173: ASSPAR 7121 @ 78174: PUSHI #0x00000000 7122 @ 78179: ASSPAR 7123 @ 78180: PUSHI #0x00000004 7124 @ 78185: ASSPAR 7125 @ 78186: PUSHI #0x00000000 7126 @ 78191: ASSPAR 7127 @ 78192: PUSHI #0x00000000 7128 @ 78197: ASSPAR 7129 @ 78198: PUSHI #0x00000000 7130 @ 78203: ASSPAR 7131 @ 78204: PUSHI #0x00000000 7132 @ 78209: ASSPAR 7133 @ 78210: CALL 1429 ACTIVE STRING == STACKED(STP)_V 7134 @ 78211: LINE 1429 "regression-compile-tmp/asems412.imp" 7135 @ 78250: PUSH ACTIVESTRING 7136 @ 78253: PUSH STACKED 7137 @ 78256: PUSH STP 7138 @ 78259: ACCESS 7139 @ 78260: SELECT 1 7140 @ 78263: ASSREF 1430 %END 1431 1432 ! LABEL PROCESSING 1433 7141 @ 78264: LINE 1430 "regression-compile-tmp/asems412.imp" 7142 @ 78303: END _lev0id0_ASSEMBLE_GETSTRING {lev=3 --> 2} 1434 %INTEGERFN NEW TAG 7143 @ 78304: LINE 1434 "regression-compile-tmp/asems412.imp" 7144 @ 78343: DEF NEWTAG (_lev0id0_ASSEMBLE_NEWTAG) p1=V_0122 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 7145 @ 78361: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 7146 @ 78362: FINISH ) {lev=3} 1435 %OWNINTEGER TAG = 0 7147 @ 78363: LINE 1435 "regression-compile-tmp/asems412.imp" 7148 @ 78402: PUSHI #0x00000000 7149 @ 78407: DEF TAG p1=V_0136 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 7150 @ 78422: INIT 1 1436 TAG = TAG+1 7151 @ 78425: LINE 1436 "regression-compile-tmp/asems412.imp" 7152 @ 78464: PUSH TAG 7153 @ 78467: PUSH TAG 7154 @ 78470: PUSHI #0x00000001 7155 @ 78475: ADD 7156 @ 78476: ASSVAL 1437 %RESULT = TAG 7157 @ 78477: LINE 1437 "regression-compile-tmp/asems412.imp" 7158 @ 78516: PUSH TAG 7159 @ 78519: RESULT 1438 %END 7160 @ 78520: LINE 1438 "regression-compile-tmp/asems412.imp" 7161 @ 78559: END _lev0id0_ASSEMBLE_NEWTAG {lev=3 --> 2} 1439 %RECORD(LABELFM)%MAP NEW LABEL 7162 @ 78560: LINE 1439 "regression-compile-tmp/asems412.imp" 7163 @ 78599: DEF NEWLABEL (_lev0id0_ASSEMBLE_NEWLABEL) p1=V_0136 a/tf=49 b/format=88 c/ostate=0 type=4 (record) form=9 (map) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7164 @ 78619: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 7165 @ 78620: FINISH ) {lev=3} 1440 LABS = LABS+1; ABORT(-5) %IF LABS > MAX LABELS 7166 @ 78621: LINE 1440 "regression-compile-tmp/asems412.imp" 7167 @ 78660: PUSH LABS 7168 @ 78663: PUSH LABS 7169 @ 78666: PUSHI #0x00000001 7170 @ 78671: ADD 7171 @ 78672: ASSVAL 7172 @ 78673: LINE 1440 "regression-compile-tmp/asems412.imp" 7173 @ 78712: PUSH LABS 7174 @ 78715: PUSHI #0x00000050 7175 @ 78720: JUMPIF <= L_0004 7176 @ 78724: PUSH ABORT 7177 @ 78727: PUSHI #0x00000005 7178 @ 78732: NEGATE 7179 @ 78733: ASSPAR 7180 @ 78734: CALL 7181 @ 78735: LOCATE L_0004 1441 FLAB == LABELS(LABS) 7182 @ 78738: LINE 1441 "regression-compile-tmp/asems412.imp" 7183 @ 78777: PUSH FLAB 7184 @ 78780: PUSH LABELS 7185 @ 78783: PUSH LABS 7186 @ 78786: ACCESS 7187 @ 78787: ASSREF 1442 %RESULT == FLAB 7188 @ 78788: LINE 1442 "regression-compile-tmp/asems412.imp" 7189 @ 78827: PUSH FLAB 7190 @ 78830: MAP 1443 %END 7191 @ 78831: LINE 1443 "regression-compile-tmp/asems412.imp" 7192 @ 78870: END _lev0id0_ASSEMBLE_NEWLABEL {lev=3 --> 2} 1444 %RECORD(LABELFM)%MAP FIND(%INTEGER LABEL) 7193 @ 78871: LINE 1444 "regression-compile-tmp/asems412.imp" 7194 @ 78910: DEF FIND (_lev0id0_ASSEMBLE_FIND) p1=V_0137 a/tf=49 b/format=88 c/ostate=0 type=4 (record) form=9 (map) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7195 @ 78926: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 7196 @ 78927: DEF LABEL p1=V_0138 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 7197 @ 78944: FINISH ) {lev=3} 1445 %INTEGER LP 7198 @ 78945: LINE 1445 "regression-compile-tmp/asems412.imp" 7199 @ 78984: DEF LP p1=V_0139 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 1446 LP = LABS 7200 @ 78998: LINE 1446 "regression-compile-tmp/asems412.imp" 7201 @ 79037: PUSH LP 7202 @ 79040: PUSH LABS 7203 @ 79043: ASSVAL 1447 %WHILE LP # LABEL START %CYCLE 7204 @ 79044: LINE 1447 "regression-compile-tmp/asems412.imp" 7205 @ 79083: LOCATE L_0003 7206 @ 79086: PUSH LP 7207 @ 79089: PUSH LABELSTART 7208 @ 79092: JUMPIF = L_0004 1448 FLAB == LABELS(LP) 7209 @ 79096: LINE 1448 "regression-compile-tmp/asems412.imp" 7210 @ 79135: PUSH FLAB 7211 @ 79138: PUSH LABELS 7212 @ 79141: PUSH LP 7213 @ 79144: ACCESS 7214 @ 79145: ASSREF 1449 %RESULT == FLAB %IF FLAB_ID = LABEL 7215 @ 79146: LINE 1449 "regression-compile-tmp/asems412.imp" 7216 @ 79185: PUSH FLAB 7217 @ 79188: SELECT 1 7218 @ 79191: PUSH LABEL 7219 @ 79194: JUMPIF # L_0007 7220 @ 79198: PUSH FLAB 7221 @ 79201: MAP 7222 @ 79202: LOCATE L_0007 1450 LP = LP-1 7223 @ 79205: LINE 1450 "regression-compile-tmp/asems412.imp" 7224 @ 79244: PUSH LP 7225 @ 79247: PUSH LP 7226 @ 79250: PUSHI #0x00000001 7227 @ 79255: SUB 7228 @ 79256: ASSVAL 1451 %REPEAT 7229 @ 79257: LINE 1451 "regression-compile-tmp/asems412.imp" 7230 @ 79296: REPEAT L_0003 7231 @ 79299: LOCATE L_0004 1452 %RESULT == NULL 7232 @ 79302: LINE 1452 "regression-compile-tmp/asems412.imp" 7233 @ 79341: PUSH NULL 7234 @ 79344: MAP 1453 %END 7235 @ 79345: LINE 1453 "regression-compile-tmp/asems412.imp" 7236 @ 79384: END _lev0id0_ASSEMBLE_FIND {lev=3 --> 2} 1454 %ROUTINE DEFINE LABEL(%INTEGER LABEL) 7237 @ 79385: LINE 1454 "regression-compile-tmp/asems412.imp" 7238 @ 79424: DEF DEFINELABEL (_lev0id0_ASSEMBLE_DEFINELABEL) p1=V_0138 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 7239 @ 79447: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 7240 @ 79448: DEF LABEL p1=V_0139 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 7241 @ 79465: FINISH ) {lev=3} 1455 %RECORD(ENVFM)%NAME E 7242 @ 79466: LINE 1455 "regression-compile-tmp/asems412.imp" 7243 @ 79505: DEF E p1=V_013a a/tf=42 b/format=8a c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1456 %RECORD(LABELFM)%NAME L 7244 @ 79518: LINE 1456 "regression-compile-tmp/asems412.imp" 7245 @ 79557: DEF L p1=V_013b a/tf=42 b/format=88 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1457 L == FIND(LABEL) 7246 @ 79570: LINE 1457 "regression-compile-tmp/asems412.imp" 7247 @ 79609: PUSH L 7248 @ 79612: PUSH FIND 7249 @ 79615: PUSH LABEL 7250 @ 79618: ASSPAR 7251 @ 79619: CALL 7252 @ 79620: ASSREF 1458 %IF L == NULL %START 7253 @ 79621: LINE 1458 "regression-compile-tmp/asems412.imp" 7254 @ 79660: PUSH L 7255 @ 79663: PUSH NULL 7256 @ 79666: JUMPIFA # L_0004 1459 %IF CONTROL < 0 %START 7257 @ 79670: LINE 1459 "regression-compile-tmp/asems412.imp" 7258 @ 79709: PUSH CONTROL 7259 @ 79712: PUSHI #0x00000000 7260 @ 79717: JUMPIF >= L_0007 1460 SELECTOUTPUT(REPORT) 7261 @ 79721: LINE 1460 "regression-compile-tmp/asems412.imp" 7262 @ 79760: PUSH SELECTOUTPUT 7263 @ 79763: PUSHI #0x00000000 7264 @ 79768: ASSPAR 7265 @ 79769: CALL 1461 PRINTSTRING(" DEF:"); WRITE(LABEL, 2) 7266 @ 79770: LINE 1461 "regression-compile-tmp/asems412.imp" 7267 @ 79809: PUSH PRINTSTRING 7268 @ 79812: PUSHS " DEF:" 7269 @ 79819: ASSPAR 7270 @ 79820: CALL 7271 @ 79821: LINE 1461 "regression-compile-tmp/asems412.imp" 7272 @ 79860: PUSH WRITE 7273 @ 79863: PUSH LABEL 7274 @ 79866: ASSPAR 7275 @ 79867: PUSHI #0x00000002 7276 @ 79872: ASSPAR 7277 @ 79873: CALL 1462 PRINTSTRING(" LABS ="); WRITE(LABS, 2); NEWLINE 7278 @ 79874: LINE 1462 "regression-compile-tmp/asems412.imp" 7279 @ 79913: PUSH PRINTSTRING 7280 @ 79916: PUSHS " LABS =" 7281 @ 79926: ASSPAR 7282 @ 79927: CALL 7283 @ 79928: LINE 1462 "regression-compile-tmp/asems412.imp" 7284 @ 79967: PUSH WRITE 7285 @ 79970: PUSH LABS 7286 @ 79973: ASSPAR 7287 @ 79974: PUSHI #0x00000002 7288 @ 79979: ASSPAR 7289 @ 79980: CALL 7290 @ 79981: LINE 1462 "regression-compile-tmp/asems412.imp" 7291 @ 80020: PUSH NEWLINE 7292 @ 80023: CALL 1463 SELECTOUTPUT(OBJECT) 7293 @ 80024: LINE 1463 "regression-compile-tmp/asems412.imp" 7294 @ 80063: PUSH SELECTOUTPUT 7295 @ 80066: PUSHI #0x00000002 7296 @ 80071: ASSPAR 7297 @ 80072: CALL 1464 %FINISH 7298 @ 80073: LINE 1464 "regression-compile-tmp/asems412.imp" 7299 @ 80112: LOCATE L_0007 1465 L == NEW LABEL 7300 @ 80115: LINE 1465 "regression-compile-tmp/asems412.imp" 7301 @ 80154: PUSH L 7302 @ 80157: PUSH NEWLABEL 7303 @ 80160: CALL 7304 @ 80161: ASSREF 1466 L_ID = LABEL; L_TAG = NEW TAG; L_REG = 0 7305 @ 80162: LINE 1466 "regression-compile-tmp/asems412.imp" 7306 @ 80201: PUSH L 7307 @ 80204: SELECT 1 7308 @ 80207: PUSH LABEL 7309 @ 80210: ASSVAL 7310 @ 80211: LINE 1466 "regression-compile-tmp/asems412.imp" 7311 @ 80250: PUSH L 7312 @ 80253: SELECT 2 7313 @ 80256: PUSH NEWTAG 7314 @ 80259: CALL 7315 @ 80260: ASSVAL 7316 @ 80261: LINE 1466 "regression-compile-tmp/asems412.imp" 7317 @ 80300: PUSH L 7318 @ 80303: SELECT 3 7319 @ 80306: PUSHI #0x00000000 7320 @ 80311: ASSVAL 1467 LIMEN = CA 7321 @ 80312: LINE 1467 "regression-compile-tmp/asems412.imp" 7322 @ 80351: PUSH LIMEN 7323 @ 80354: PUSH CA 7324 @ 80357: ASSVAL 1468 E == ENVIRONMENT(LABEL); E_LABEL = 0 7325 @ 80358: LINE 1468 "regression-compile-tmp/asems412.imp" 7326 @ 80397: PUSH E 7327 @ 80400: PUSH ENVIRONMENT 7328 @ 80403: PUSH LABEL 7329 @ 80406: ASSPAR 7330 @ 80407: CALL 7331 @ 80408: ASSREF 7332 @ 80409: LINE 1468 "regression-compile-tmp/asems412.imp" 7333 @ 80448: PUSH E 7334 @ 80451: SELECT 1 7335 @ 80454: PUSHI #0x00000000 7336 @ 80459: ASSVAL 1469 %ELSE %IF L_TAG < 0 %AND LABEL >= 0 7337 @ 80460: LINE 1469 "regression-compile-tmp/asems412.imp" 7338 @ 80499: GOTO L_0003 7339 @ 80502: LOCATE L_0004 7340 @ 80505: PUSH L 7341 @ 80508: SELECT 2 7342 @ 80511: PUSHI #0x00000000 7343 @ 80516: JUMPIF >= L_0004 7344 @ 80520: PUSH LABEL 7345 @ 80523: PUSHI #0x00000000 7346 @ 80528: JUMPIF < L_0004 1470 L_TAG = NEW TAG; L_REG = 0 7347 @ 80532: LINE 1470 "regression-compile-tmp/asems412.imp" 7348 @ 80571: PUSH L 7349 @ 80574: SELECT 2 7350 @ 80577: PUSH NEWTAG 7351 @ 80580: CALL 7352 @ 80581: ASSVAL 7353 @ 80582: LINE 1470 "regression-compile-tmp/asems412.imp" 7354 @ 80621: PUSH L 7355 @ 80624: SELECT 3 7356 @ 80627: PUSHI #0x00000000 7357 @ 80632: ASSVAL 1471 E == ENVIRONMENT(LABEL); E_LABEL = 0 7358 @ 80633: LINE 1471 "regression-compile-tmp/asems412.imp" 7359 @ 80672: PUSH E 7360 @ 80675: PUSH ENVIRONMENT 7361 @ 80678: PUSH LABEL 7362 @ 80681: ASSPAR 7363 @ 80682: CALL 7364 @ 80683: ASSREF 7365 @ 80684: LINE 1471 "regression-compile-tmp/asems412.imp" 7366 @ 80723: PUSH E 7367 @ 80726: SELECT 1 7368 @ 80729: PUSHI #0x00000000 7369 @ 80734: ASSVAL 1472 %FINISH 7370 @ 80735: LINE 1472 "regression-compile-tmp/asems412.imp" 7371 @ 80774: LOCATE L_0004 7372 @ 80777: LOCATE L_0003 1473 L_TAG = L_TAG!X'8000' 7373 @ 80780: LINE 1473 "regression-compile-tmp/asems412.imp" 7374 @ 80819: PUSH L 7375 @ 80822: SELECT 2 7376 @ 80825: PUSH L 7377 @ 80828: SELECT 2 7378 @ 80831: PUSHI #0x00008000 7379 @ 80836: OR 7380 @ 80837: ASSVAL 1474 DEFINE TAG(L_TAG&X'7FFF') 7381 @ 80838: LINE 1474 "regression-compile-tmp/asems412.imp" 7382 @ 80877: PUSH DEFINETAG 7383 @ 80880: PUSH L 7384 @ 80883: SELECT 2 7385 @ 80886: PUSHI #0x00007fff 7386 @ 80891: AND 7387 @ 80892: ASSPAR 7388 @ 80893: CALL 1475 MERGE ENVIRONMENT(LABEL) %IF UNCOND JUMP # CA 7389 @ 80894: LINE 1475 "regression-compile-tmp/asems412.imp" 7390 @ 80933: PUSH UNCONDJUMP 7391 @ 80936: PUSH CA 7392 @ 80939: JUMPIF = L_0004 7393 @ 80943: PUSH MERGEENVIRONMENT 7394 @ 80946: PUSH LABEL 7395 @ 80949: ASSPAR 7396 @ 80950: CALL 7397 @ 80951: LOCATE L_0004 1476 RESTORE ENVIRONMENT(LABEL) 7398 @ 80954: LINE 1476 "regression-compile-tmp/asems412.imp" 7399 @ 80993: PUSH RESTOREENVIRONMENT 7400 @ 80996: PUSH LABEL 7401 @ 80999: ASSPAR 7402 @ 81000: CALL 1477 RT LAB = CA %IF LABEL = 0 7403 @ 81001: LINE 1477 "regression-compile-tmp/asems412.imp" 7404 @ 81040: PUSH LABEL 7405 @ 81043: PUSHI #0x00000000 7406 @ 81048: JUMPIF # L_0004 7407 @ 81052: PUSH RTLAB 7408 @ 81055: PUSH CA 7409 @ 81058: ASSVAL 7410 @ 81059: LOCATE L_0004 1478 CCCA = 0 7411 @ 81062: LINE 1478 "regression-compile-tmp/asems412.imp" 7412 @ 81101: PUSH CCCA 7413 @ 81104: PUSHI #0x00000000 7414 @ 81109: ASSVAL 1479 UNCOND JUMP = 0;! YOU CAN GET HERE! 7415 @ 81110: LINE 1479 "regression-compile-tmp/asems412.imp" 7416 @ 81149: PUSH UNCONDJUMP 7417 @ 81152: PUSHI #0x00000000 7418 @ 81157: ASSVAL 1480 %END 7419 @ 81158: LINE 1480 "regression-compile-tmp/asems412.imp" 7420 @ 81197: END _lev0id0_ASSEMBLE_DEFINELABEL {lev=3 --> 2} 1481 %ROUTINE JUMP TO(%INTEGER LABEL, COND, DEF) 7421 @ 81198: LINE 1481 "regression-compile-tmp/asems412.imp" 7422 @ 81237: DEF JUMPTO (_lev0id0_ASSEMBLE_JUMPTO) p1=V_0139 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 7423 @ 81255: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 7424 @ 81256: DEF LABEL p1=V_013a 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 7425 @ 81273: DEF COND p1=V_013b 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 7426 @ 81289: DEF DEF p1=V_013c 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 7427 @ 81304: FINISH ) {lev=3} 1482 %INTEGER REF, LTAG 7428 @ 81305: LINE 1482 "regression-compile-tmp/asems412.imp" 7429 @ 81344: DEF REF p1=V_013d 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 7430 @ 81359: DEF LTAG p1=V_013e 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 1483 %RECORD(LABELFM)%NAME LAB 7431 @ 81375: LINE 1483 "regression-compile-tmp/asems412.imp" 7432 @ 81414: DEF LAB p1=V_013f a/tf=42 b/format=88 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1484 %RECORD(USEFM)%NAME U 7433 @ 81429: LINE 1484 "regression-compile-tmp/asems412.imp" 7434 @ 81468: DEF U p1=V_0140 a/tf=42 b/format=89 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1485 INVERT = 0;! EXPEND CONDITION INVERSION 7435 @ 81481: LINE 1485 "regression-compile-tmp/asems412.imp" 7436 @ 81520: PUSH INVERT 7437 @ 81523: PUSHI #0x00000000 7438 @ 81528: ASSVAL 1486 LAB == FIND(LABEL) 7439 @ 81529: LINE 1486 "regression-compile-tmp/asems412.imp" 7440 @ 81568: PUSH LAB 7441 @ 81571: PUSH FIND 7442 @ 81574: PUSH LABEL 7443 @ 81577: ASSPAR 7444 @ 81578: CALL 7445 @ 81579: ASSREF 1487 %IF LABEL = 0 %AND RT LAB = CA %START;! JUMP ROUND ROUTINE 7446 @ 81580: LINE 1487 "regression-compile-tmp/asems412.imp" 7447 @ 81619: PUSH LABEL 7448 @ 81622: PUSHI #0x00000000 7449 @ 81627: JUMPIF # L_0004 7450 @ 81631: PUSH RTLAB 7451 @ 81634: PUSH CA 7452 @ 81637: JUMPIF # L_0004 1488 LAB_TAG = LAB_TAG&X'7FFF'; %RETURN 7453 @ 81641: LINE 1488 "regression-compile-tmp/asems412.imp" 7454 @ 81680: PUSH LAB 7455 @ 81683: SELECT 2 7456 @ 81686: PUSH LAB 7457 @ 81689: SELECT 2 7458 @ 81692: PUSHI #0x00007fff 7459 @ 81697: AND 7460 @ 81698: ASSVAL 7461 @ 81699: LINE 1488 "regression-compile-tmp/asems412.imp" 7462 @ 81738: RETURN 1489 %FINISH 7463 @ 81739: LINE 1489 "regression-compile-tmp/asems412.imp" 7464 @ 81778: LOCATE L_0004 1490 %IF LAB == NULL %START 7465 @ 81781: LINE 1490 "regression-compile-tmp/asems412.imp" 7466 @ 81820: PUSH LAB 7467 @ 81823: PUSH NULL 7468 @ 81826: JUMPIFA # L_0004 1491 LAB == NEW LABEL 7469 @ 81830: LINE 1491 "regression-compile-tmp/asems412.imp" 7470 @ 81869: PUSH LAB 7471 @ 81872: PUSH NEWLABEL 7472 @ 81875: CALL 7473 @ 81876: ASSREF 1492 LAB_ID = LABEL; LAB_REG = 0 7474 @ 81877: LINE 1492 "regression-compile-tmp/asems412.imp" 7475 @ 81916: PUSH LAB 7476 @ 81919: SELECT 1 7477 @ 81922: PUSH LABEL 7478 @ 81925: ASSVAL 7479 @ 81926: LINE 1492 "regression-compile-tmp/asems412.imp" 7480 @ 81965: PUSH LAB 7481 @ 81968: SELECT 3 7482 @ 81971: PUSHI #0x00000000 7483 @ 81976: ASSVAL 1493 LAB_TAG = NEW TAG 7484 @ 81977: LINE 1493 "regression-compile-tmp/asems412.imp" 7485 @ 82016: PUSH LAB 7486 @ 82019: SELECT 2 7487 @ 82022: PUSH NEWTAG 7488 @ 82025: CALL 7489 @ 82026: ASSVAL 1494 REMEMBER ENVIRONMENT(LABEL) 7490 @ 82027: LINE 1494 "regression-compile-tmp/asems412.imp" 7491 @ 82066: PUSH REMEMBERENVIRONMENT 7492 @ 82069: PUSH LABEL 7493 @ 82072: ASSPAR 7494 @ 82073: CALL 1495 %ELSE %IF LAB_REG # 0 %AND SYM # 'B' 7495 @ 82074: LINE 1495 "regression-compile-tmp/asems412.imp" 7496 @ 82113: GOTO L_0003 7497 @ 82116: LOCATE L_0004 7498 @ 82119: PUSH LAB 7499 @ 82122: SELECT 3 7500 @ 82125: PUSHI #0x00000000 7501 @ 82130: JUMPIF = L_0004 7502 @ 82134: PUSH SYM 7503 @ 82137: PUSHI #0x00000042 7504 @ 82142: JUMPIF = L_0004 1496 LAB_BASE = LAB_BASE!128 7505 @ 82146: LINE 1496 "regression-compile-tmp/asems412.imp" 7506 @ 82185: PUSH LAB 7507 @ 82188: SELECT 4 7508 @ 82191: PUSH LAB 7509 @ 82194: SELECT 4 7510 @ 82197: PUSHI #0x00000080 7511 @ 82202: OR 7512 @ 82203: ASSVAL 1497 JUMP TO(LABEL+3, COND, DEF) 7513 @ 82204: LINE 1497 "regression-compile-tmp/asems412.imp" 7514 @ 82243: PUSH JUMPTO 7515 @ 82246: PUSH LABEL 7516 @ 82249: PUSHI #0x00000003 7517 @ 82254: ADD 7518 @ 82255: ASSPAR 7519 @ 82256: PUSH COND 7520 @ 82259: ASSPAR 7521 @ 82260: PUSH DEF 7522 @ 82263: ASSPAR 7523 @ 82264: CALL 1498 %RETURN 7524 @ 82265: LINE 1498 "regression-compile-tmp/asems412.imp" 7525 @ 82304: RETURN 1499 %ELSE %IF LAB_TAG < 0 %AND DEF = REDEFINE 7526 @ 82305: LINE 1499 "regression-compile-tmp/asems412.imp" 7527 @ 82344: LOCATE L_0004 7528 @ 82347: PUSH LAB 7529 @ 82350: SELECT 2 7530 @ 82353: PUSHI #0x00000000 7531 @ 82358: JUMPIF >= L_0004 7532 @ 82362: PUSH DEF 7533 @ 82365: PUSHI #0x00000001 7534 @ 82370: JUMPIF # L_0004 1500 LAB_REG = 0; LAB_TAG = NEW TAG 7535 @ 82374: LINE 1500 "regression-compile-tmp/asems412.imp" 7536 @ 82413: PUSH LAB 7537 @ 82416: SELECT 3 7538 @ 82419: PUSHI #0x00000000 7539 @ 82424: ASSVAL 7540 @ 82425: LINE 1500 "regression-compile-tmp/asems412.imp" 7541 @ 82464: PUSH LAB 7542 @ 82467: SELECT 2 7543 @ 82470: PUSH NEWTAG 7544 @ 82473: CALL 7545 @ 82474: ASSVAL 1501 REMEMBER ENVIRONMENT(LABEL) 7546 @ 82475: LINE 1501 "regression-compile-tmp/asems412.imp" 7547 @ 82514: PUSH REMEMBERENVIRONMENT 7548 @ 82517: PUSH LABEL 7549 @ 82520: ASSPAR 7550 @ 82521: CALL 1502 %ELSE 7551 @ 82522: LINE 1502 "regression-compile-tmp/asems412.imp" 7552 @ 82561: GOTO L_0003 7553 @ 82564: LOCATE L_0004 1503 MERGE ENVIRONMENT(LABEL) %IF LAB_TAG >= 0 7554 @ 82567: LINE 1503 "regression-compile-tmp/asems412.imp" 7555 @ 82606: PUSH LAB 7556 @ 82609: SELECT 2 7557 @ 82612: PUSHI #0x00000000 7558 @ 82617: JUMPIF < L_0007 7559 @ 82621: PUSH MERGEENVIRONMENT 7560 @ 82624: PUSH LABEL 7561 @ 82627: ASSPAR 7562 @ 82628: CALL 7563 @ 82629: LOCATE L_0007 1504 %FINISH 7564 @ 82632: LINE 1504 "regression-compile-tmp/asems412.imp" 7565 @ 82671: LOCATE L_0003 1505 LTAG = LAB_TAG&X'7FFF' 7566 @ 82674: LINE 1505 "regression-compile-tmp/asems412.imp" 7567 @ 82713: PUSH LTAG 7568 @ 82716: PUSH LAB 7569 @ 82719: SELECT 2 7570 @ 82722: PUSHI #0x00007fff 7571 @ 82727: AND 7572 @ 82728: ASSVAL 1506 %IF LAB_REG # 0 %START 7573 @ 82729: LINE 1506 "regression-compile-tmp/asems412.imp" 7574 @ 82768: PUSH LAB 7575 @ 82771: SELECT 3 7576 @ 82774: PUSHI #0x00000000 7577 @ 82779: JUMPIF = L_0004 1507 DEFINE LABEL(LABEL+3) %IF LAB_BASE&128 # 0 7578 @ 82783: LINE 1507 "regression-compile-tmp/asems412.imp" 7579 @ 82822: PUSH LAB 7580 @ 82825: SELECT 4 7581 @ 82828: PUSHI #0x00000080 7582 @ 82833: AND 7583 @ 82834: PUSHI #0x00000000 7584 @ 82839: JUMPIF = L_0007 7585 @ 82843: PUSH DEFINELABEL 7586 @ 82846: PUSH LABEL 7587 @ 82849: PUSHI #0x00000003 7588 @ 82854: ADD 7589 @ 82855: ASSPAR 7590 @ 82856: CALL 7591 @ 82857: LOCATE L_0007 1508 SSET(LAB_BASE&127, LAB_DISP, V IN S, 0) 7592 @ 82860: LINE 1508 "regression-compile-tmp/asems412.imp" 7593 @ 82899: PUSH SSET 7594 @ 82902: PUSH LAB 7595 @ 82905: SELECT 4 7596 @ 82908: PUSHI #0x0000007f 7597 @ 82913: AND 7598 @ 82914: ASSPAR 7599 @ 82915: PUSH LAB 7600 @ 82918: SELECT 6 7601 @ 82921: ASSPAR 7602 @ 82922: PUSHI #0x00000003 7603 @ 82927: ASSPAR 7604 @ 82928: PUSHI #0x00000000 7605 @ 82933: ASSPAR 7606 @ 82934: CALL 1509 LHS == RHS; LOAD(LHS, LAB_REG) 7607 @ 82935: LINE 1509 "regression-compile-tmp/asems412.imp" 7608 @ 82974: PUSH LHS 7609 @ 82977: PUSH RHS 7610 @ 82980: ASSREF 7611 @ 82981: LINE 1509 "regression-compile-tmp/asems412.imp" 7612 @ 83020: PUSH LOAD 7613 @ 83023: PUSH LHS 7614 @ 83026: ASSPAR 7615 @ 83027: PUSH LAB 7616 @ 83030: SELECT 3 7617 @ 83033: ASSPAR 7618 @ 83034: CALL 1510 SSET(0, LAB_LIMIT, CONSTANT, 0) 7619 @ 83035: LINE 1510 "regression-compile-tmp/asems412.imp" 7620 @ 83074: PUSH SSET 7621 @ 83077: PUSHI #0x00000000 7622 @ 83082: ASSPAR 7623 @ 83083: PUSH LAB 7624 @ 83086: SELECT 5 7625 @ 83089: ASSPAR 7626 @ 83090: PUSHI #0x00000000 7627 @ 83095: ASSPAR 7628 @ 83096: PUSHI #0x00000000 7629 @ 83101: ASSPAR 7630 @ 83102: CALL 1511 COMPARE(LHS, RHS); COND = 1 7631 @ 83103: LINE 1511 "regression-compile-tmp/asems412.imp" 7632 @ 83142: PUSH COMPARE 7633 @ 83145: PUSH LHS 7634 @ 83148: ASSPAR 7635 @ 83149: PUSH RHS 7636 @ 83152: ASSPAR 7637 @ 83153: CALL 7638 @ 83154: LINE 1511 "regression-compile-tmp/asems412.imp" 7639 @ 83193: PUSH COND 7640 @ 83196: PUSHI #0x00000001 7641 @ 83201: ASSVAL 1512 STP = STP-2; DROP(LHS); DROP(RHS) 7642 @ 83202: LINE 1512 "regression-compile-tmp/asems412.imp" 7643 @ 83241: PUSH STP 7644 @ 83244: PUSH STP 7645 @ 83247: PUSHI #0x00000002 7646 @ 83252: SUB 7647 @ 83253: ASSVAL 7648 @ 83254: LINE 1512 "regression-compile-tmp/asems412.imp" 7649 @ 83293: PUSH DROP 7650 @ 83296: PUSH LHS 7651 @ 83299: ASSPAR 7652 @ 83300: CALL 7653 @ 83301: LINE 1512 "regression-compile-tmp/asems412.imp" 7654 @ 83340: PUSH DROP 7655 @ 83343: PUSH RHS 7656 @ 83346: ASSPAR 7657 @ 83347: CALL 1513 %FINISH 7658 @ 83348: LINE 1513 "regression-compile-tmp/asems412.imp" 7659 @ 83387: LOCATE L_0004 1514 %IF COND = JUMP %THEN REF = J REF %ELSE REF = C REF 7660 @ 83390: LINE 1514 "regression-compile-tmp/asems412.imp" 7661 @ 83429: PUSH COND 7662 @ 83432: PUSHI #0x0000000c 7663 @ 83437: JUMPIF # L_0004 7664 @ 83441: PUSH REF 7665 @ 83444: PUSHI #0x00000003 7666 @ 83449: ASSVAL 7667 @ 83450: GOTO L_0003 7668 @ 83453: LOCATE L_0004 7669 @ 83456: PUSH REF 7670 @ 83459: PUSHI #0x00000002 7671 @ 83464: ASSVAL 7672 @ 83465: LOCATE L_0003 1515 DEFINE REFERENCE(LTAG, REF) 7673 @ 83468: LINE 1515 "regression-compile-tmp/asems412.imp" 7674 @ 83507: PUSH DEFINEREFERENCE 7675 @ 83510: PUSH LTAG 7676 @ 83513: ASSPAR 7677 @ 83514: PUSH REF 7678 @ 83517: ASSPAR 7679 @ 83518: CALL 1516 DUMP(COND+X'8000'); CCCA = CCCA+2 7680 @ 83519: LINE 1516 "regression-compile-tmp/asems412.imp" 7681 @ 83558: PUSH DUMP 7682 @ 83561: PUSH COND 7683 @ 83564: PUSHI #0x00008000 7684 @ 83569: ADD 7685 @ 83570: ASSPAR 7686 @ 83571: CALL 7687 @ 83572: LINE 1516 "regression-compile-tmp/asems412.imp" 7688 @ 83611: PUSH CCCA 7689 @ 83614: PUSH CCCA 7690 @ 83617: PUSHI #0x00000002 7691 @ 83622: ADD 7692 @ 83623: ASSVAL 1517 UNCOND JUMP = CA %IF COND = JUMP;! NO WAY PAST HERE 7693 @ 83624: LINE 1517 "regression-compile-tmp/asems412.imp" 7694 @ 83663: PUSH COND 7695 @ 83666: PUSHI #0x0000000c 7696 @ 83671: JUMPIF # L_0004 7697 @ 83675: PUSH UNCONDJUMP 7698 @ 83678: PUSH CA 7699 @ 83681: ASSVAL 7700 @ 83682: LOCATE L_0004 1518 %IF KNOWN_CA = 0 %START;! SOMETHING TO LEARN 7701 @ 83685: LINE 1518 "regression-compile-tmp/asems412.imp" 7702 @ 83724: PUSH KNOWN 7703 @ 83727: SELECT 2 7704 @ 83730: PUSHI #0x00000000 7705 @ 83735: JUMPIF # L_0004 1519 KNOWN_CA = 1 7706 @ 83739: LINE 1519 "regression-compile-tmp/asems412.imp" 7707 @ 83778: PUSH KNOWN 7708 @ 83781: SELECT 2 7709 @ 83784: PUSHI #0x00000001 7710 @ 83789: ASSVAL 1520 U == USE(KNOWN_BASE) 7711 @ 83790: LINE 1520 "regression-compile-tmp/asems412.imp" 7712 @ 83829: PUSH U 7713 @ 83832: PUSH USE 7714 @ 83835: PUSH KNOWN 7715 @ 83838: SELECT 3 7716 @ 83841: ACCESS 7717 @ 83842: ASSREF 1521 U_TYPE = KNOWN_TYPE; U_FORM = CONSTANT 7718 @ 83843: LINE 1521 "regression-compile-tmp/asems412.imp" 7719 @ 83882: PUSH U 7720 @ 83885: SELECT 4 7721 @ 83888: PUSH KNOWN 7722 @ 83891: SELECT 4 7723 @ 83894: ASSVAL 7724 @ 83895: LINE 1521 "regression-compile-tmp/asems412.imp" 7725 @ 83934: PUSH U 7726 @ 83937: SELECT 5 7727 @ 83940: PUSHI #0x00000000 7728 @ 83945: ASSVAL 1522 U_BASE = 0; U_DISP = KNOWN_DISP 7729 @ 83946: LINE 1522 "regression-compile-tmp/asems412.imp" 7730 @ 83985: PUSH U 7731 @ 83988: SELECT 3 7732 @ 83991: PUSHI #0x00000000 7733 @ 83996: ASSVAL 7734 @ 83997: LINE 1522 "regression-compile-tmp/asems412.imp" 7735 @ 84036: PUSH U 7736 @ 84039: SELECT 1 7737 @ 84042: PUSH KNOWN 7738 @ 84045: SELECT 1 7739 @ 84048: ASSVAL 1523 U_CA = CA 7740 @ 84049: LINE 1523 "regression-compile-tmp/asems412.imp" 7741 @ 84088: PUSH U 7742 @ 84091: SELECT 2 7743 @ 84094: PUSH CA 7744 @ 84097: ASSVAL 1524 %FINISH 7745 @ 84098: LINE 1524 "regression-compile-tmp/asems412.imp" 7746 @ 84137: LOCATE L_0004 1525 %END 7747 @ 84140: LINE 1525 "regression-compile-tmp/asems412.imp" 7748 @ 84179: END _lev0id0_ASSEMBLE_JUMPTO {lev=3 --> 2} 1526 %ROUTINE FLOAT(%RECORD(STACKFM)%NAME V, %INTEGER REG) 7749 @ 84180: LINE 1526 "regression-compile-tmp/asems412.imp" 7750 @ 84219: DEF FLOAT (_lev0id0_ASSEMBLE_FLOAT) p1=V_013a 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 7751 @ 84236: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 7752 @ 84237: DEF V p1=V_013b a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7753 @ 84250: DEF REG p1=V_013c 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 7754 @ 84265: FINISH ) {lev=3} 1527 %INTEGER D 7755 @ 84266: LINE 1527 "regression-compile-tmp/asems412.imp" 7756 @ 84305: DEF D p1=V_013d 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 1528 %IF V_FORM = CONSTANT %START 1529 ! FLOAT CONSTANTS AT COMPILE-TIME 7757 @ 84318: LINE 1528 "regression-compile-tmp/asems412.imp" 7758 @ 84357: PUSH V 7759 @ 84360: SELECT 9 7760 @ 84363: PUSHI #0x00000000 7761 @ 84368: JUMPIF # L_0004 1530 D = V_DISP 7762 @ 84372: LINE 1530 "regression-compile-tmp/asems412.imp" 7763 @ 84411: PUSH D 7764 @ 84414: PUSH V 7765 @ 84417: SELECT 1 7766 @ 84420: ASSVAL 1531 %IF D = 0 %START 7767 @ 84421: LINE 1531 "regression-compile-tmp/asems412.imp" 7768 @ 84460: PUSH D 7769 @ 84463: PUSHI #0x00000000 7770 @ 84468: JUMPIF # L_0007 1532 REG = FPR %IF REG = ANYF 7771 @ 84472: LINE 1532 "regression-compile-tmp/asems412.imp" 7772 @ 84511: PUSH REG 7773 @ 84514: PUSHI #0x0000002f 7774 @ 84519: JUMPIF # L_000a 7775 @ 84523: PUSH REG 7776 @ 84526: PUSH FPR 7777 @ 84529: CALL 7778 @ 84530: ASSVAL 7779 @ 84531: LOCATE L_000a 1533 CLAIM(REG) 7780 @ 84534: LINE 1533 "regression-compile-tmp/asems412.imp" 7781 @ 84573: PUSH CLAIM 7782 @ 84576: PUSH REG 7783 @ 84579: ASSPAR 7784 @ 84580: CALL 1534 RR(SER, REG, REG); CLAIM (REG) 7785 @ 84581: LINE 1534 "regression-compile-tmp/asems412.imp" 7786 @ 84620: PUSH RR 7787 @ 84623: PUSHI #0x00002b00 7788 @ 84628: ASSPAR 7789 @ 84629: PUSH REG 7790 @ 84632: ASSPAR 7791 @ 84633: PUSH REG 7792 @ 84636: ASSPAR 7793 @ 84637: CALL 7794 @ 84638: LINE 1534 "regression-compile-tmp/asems412.imp" 7795 @ 84677: PUSH CLAIM 7796 @ 84680: PUSH REG 7797 @ 84683: ASSPAR 7798 @ 84684: CALL 1535 V_BASE = REG; V_DISP = 0; V_TYPE = REALS; V_FORM = V IN R 7799 @ 84685: LINE 1535 "regression-compile-tmp/asems412.imp" 7800 @ 84724: PUSH V 7801 @ 84727: SELECT 6 7802 @ 84730: PUSH REG 7803 @ 84733: ASSVAL 7804 @ 84734: LINE 1535 "regression-compile-tmp/asems412.imp" 7805 @ 84773: PUSH V 7806 @ 84776: SELECT 1 7807 @ 84779: PUSHI #0x00000000 7808 @ 84784: ASSVAL 7809 @ 84785: LINE 1535 "regression-compile-tmp/asems412.imp" 7810 @ 84824: PUSH V 7811 @ 84827: SELECT 8 7812 @ 84830: PUSHI #0x00000006 7813 @ 84835: ASSVAL 7814 @ 84836: LINE 1535 "regression-compile-tmp/asems412.imp" 7815 @ 84875: PUSH V 7816 @ 84878: SELECT 9 7817 @ 84881: PUSHI #0x00000001 7818 @ 84886: ASSVAL 1536 %ELSE 7819 @ 84887: LINE 1536 "regression-compile-tmp/asems412.imp" 7820 @ 84926: GOTO L_0006 7821 @ 84929: LOCATE L_0007 1537 FP CSTACK(D,V); ! ...N.B. 'D' FLOATED BY PARAMETER PASSING 7822 @ 84932: LINE 1537 "regression-compile-tmp/asems412.imp" 7823 @ 84971: PUSH FPCSTACK 7824 @ 84974: PUSH D 7825 @ 84977: ASSPAR 7826 @ 84978: PUSH V 7827 @ 84981: ASSPAR 7828 @ 84982: CALL 1538 STP = STP-1; ! ...WE DON'T WANT A NEW STACK ITEM 7829 @ 84983: LINE 1538 "regression-compile-tmp/asems412.imp" 7830 @ 85022: PUSH STP 7831 @ 85025: PUSH STP 7832 @ 85028: PUSHI #0x00000001 7833 @ 85033: SUB 7834 @ 85034: ASSVAL 1539 %FINISH 7835 @ 85035: LINE 1539 "regression-compile-tmp/asems412.imp" 7836 @ 85074: LOCATE L_0006 1540 %RETURN 7837 @ 85077: LINE 1540 "regression-compile-tmp/asems412.imp" 7838 @ 85116: RETURN 1541 %FINISH 7839 @ 85117: LINE 1541 "regression-compile-tmp/asems412.imp" 7840 @ 85156: LOCATE L_0004 1542 LOAD(V, REG) %AND %RETURN %IF V_LOP # 0 7841 @ 85159: LINE 1542 "regression-compile-tmp/asems412.imp" 7842 @ 85198: PUSH V 7843 @ 85201: SELECT 7 7844 @ 85204: PUSHI #0x00000000 7845 @ 85209: JUMPIF = L_0004 7846 @ 85213: PUSH LOAD 7847 @ 85216: PUSH V 7848 @ 85219: ASSPAR 7849 @ 85220: PUSH REG 7850 @ 85223: ASSPAR 7851 @ 85224: CALL 7852 @ 85225: RETURN 7853 @ 85226: LOCATE L_0004 1543 LOAD(V, ANY) 7854 @ 85229: LINE 1543 "regression-compile-tmp/asems412.imp" 7855 @ 85268: PUSH LOAD 7856 @ 85271: PUSH V 7857 @ 85274: ASSPAR 7858 @ 85275: PUSHI #0x0000002d 7859 @ 85280: ASSPAR 7860 @ 85281: CALL 1544 REG = FPR %IF REG = ANYF 7861 @ 85282: LINE 1544 "regression-compile-tmp/asems412.imp" 7862 @ 85321: PUSH REG 7863 @ 85324: PUSHI #0x0000002f 7864 @ 85329: JUMPIF # L_0004 7865 @ 85333: PUSH REG 7866 @ 85336: PUSH FPR 7867 @ 85339: CALL 7868 @ 85340: ASSVAL 7869 @ 85341: LOCATE L_0004 1545 RR(FLR, REG, V_BASE) 7870 @ 85344: LINE 1545 "regression-compile-tmp/asems412.imp" 7871 @ 85383: PUSH RR 7872 @ 85386: PUSHI #0x00002f00 7873 @ 85391: ASSPAR 7874 @ 85392: PUSH REG 7875 @ 85395: ASSPAR 7876 @ 85396: PUSH V 7877 @ 85399: SELECT 6 7878 @ 85402: ASSPAR 7879 @ 85403: CALL 1546 CLAIM(REG) 7880 @ 85404: LINE 1546 "regression-compile-tmp/asems412.imp" 7881 @ 85443: PUSH CLAIM 7882 @ 85446: PUSH REG 7883 @ 85449: ASSPAR 7884 @ 85450: CALL 1547 V_TYPE = REALS; V_FORM = V IN R 7885 @ 85451: LINE 1547 "regression-compile-tmp/asems412.imp" 7886 @ 85490: PUSH V 7887 @ 85493: SELECT 8 7888 @ 85496: PUSHI #0x00000006 7889 @ 85501: ASSVAL 7890 @ 85502: LINE 1547 "regression-compile-tmp/asems412.imp" 7891 @ 85541: PUSH V 7892 @ 85544: SELECT 9 7893 @ 85547: PUSHI #0x00000001 7894 @ 85552: ASSVAL 1548 V_BASE = REG; V_DISP = 0 7895 @ 85553: LINE 1548 "regression-compile-tmp/asems412.imp" 7896 @ 85592: PUSH V 7897 @ 85595: SELECT 6 7898 @ 85598: PUSH REG 7899 @ 85601: ASSVAL 7900 @ 85602: LINE 1548 "regression-compile-tmp/asems412.imp" 7901 @ 85641: PUSH V 7902 @ 85644: SELECT 1 7903 @ 85647: PUSHI #0x00000000 7904 @ 85652: ASSVAL 1549 %END 7905 @ 85653: LINE 1549 "regression-compile-tmp/asems412.imp" 7906 @ 85692: END _lev0id0_ASSEMBLE_FLOAT {lev=3 --> 2} 1550 %ROUTINE LRD(%RECORD(STACKFM)%NAME V, %INTEGER REG) 7907 @ 85693: LINE 1550 "regression-compile-tmp/asems412.imp" 7908 @ 85732: DEF LRD (_lev0id0_ASSEMBLE_LRD) p1=V_013b 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 7909 @ 85747: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 7910 @ 85748: DEF V p1=V_013c a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7911 @ 85761: DEF REG p1=V_013d 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 7912 @ 85776: FINISH ) {lev=3} 1551 LOAD(V, REG) 7913 @ 85777: LINE 1551 "regression-compile-tmp/asems412.imp" 7914 @ 85816: PUSH LOAD 7915 @ 85819: PUSH V 7916 @ 85822: ASSPAR 7917 @ 85823: PUSH REG 7918 @ 85826: ASSPAR 7919 @ 85827: CALL 1552 RELEASE(V_BASE) 7920 @ 85828: LINE 1552 "regression-compile-tmp/asems412.imp" 7921 @ 85867: PUSH RELEASE 7922 @ 85870: PUSH V 7923 @ 85873: SELECT 6 7924 @ 85876: ASSPAR 7925 @ 85877: CALL 1553 DROP(V) 7926 @ 85878: LINE 1553 "regression-compile-tmp/asems412.imp" 7927 @ 85917: PUSH DROP 7928 @ 85920: PUSH V 7929 @ 85923: ASSPAR 7930 @ 85924: CALL 1554 %END 7931 @ 85925: LINE 1554 "regression-compile-tmp/asems412.imp" 7932 @ 85964: END _lev0id0_ASSEMBLE_LRD {lev=3 --> 2} 1555 %ROUTINE REDUCE(%RECORD(STACKFM)%NAME V) 7933 @ 85965: LINE 1555 "regression-compile-tmp/asems412.imp" 7934 @ 86004: DEF REDUCE (_lev0id0_ASSEMBLE_REDUCE) p1=V_013c 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 7935 @ 86022: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 7936 @ 86023: DEF V p1=V_013d a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 7937 @ 86036: FINISH ) {lev=3} 1556 %INTEGER TYPE, FORM, DISP 7938 @ 86037: LINE 1556 "regression-compile-tmp/asems412.imp" 7939 @ 86076: DEF TYPE p1=V_013e 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 7940 @ 86092: DEF FORM p1=V_013f 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 7941 @ 86108: DEF DISP p1=V_0140 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 1557 TYPE = V_TYPE; FORM = V_FORM - 2 7942 @ 86124: LINE 1557 "regression-compile-tmp/asems412.imp" 7943 @ 86163: PUSH TYPE 7944 @ 86166: PUSH V 7945 @ 86169: SELECT 8 7946 @ 86172: ASSVAL 7947 @ 86173: LINE 1557 "regression-compile-tmp/asems412.imp" 7948 @ 86212: PUSH FORM 7949 @ 86215: PUSH V 7950 @ 86218: SELECT 9 7951 @ 86221: PUSHI #0x00000002 7952 @ 86226: SUB 7953 @ 86227: ASSVAL 1558 FORM = AV IN S %IF FORM = AV IN REC-2 7954 @ 86228: LINE 1558 "regression-compile-tmp/asems412.imp" 7955 @ 86267: PUSH FORM 7956 @ 86270: PUSHI #0x00000007 7957 @ 86275: PUSHI #0x00000002 7958 @ 86280: SUB 7959 @ 86281: JUMPIF # L_0004 7960 @ 86285: PUSH FORM 7961 @ 86288: PUSHI #0x00000006 7962 @ 86293: ASSVAL 7963 @ 86294: LOCATE L_0004 1559 DISP = V_DISP 7964 @ 86297: LINE 1559 "regression-compile-tmp/asems412.imp" 7965 @ 86336: PUSH DISP 7966 @ 86339: PUSH V 7967 @ 86342: SELECT 1 7968 @ 86345: ASSVAL 1560 V_DISP = V_EXTRA; V_TYPE = INTEGER; V_FORM = V IN S 7969 @ 86346: LINE 1560 "regression-compile-tmp/asems412.imp" 7970 @ 86385: PUSH V 7971 @ 86388: SELECT 1 7972 @ 86391: PUSH V 7973 @ 86394: SELECT 3 7974 @ 86397: ASSVAL 7975 @ 86398: LINE 1560 "regression-compile-tmp/asems412.imp" 7976 @ 86437: PUSH V 7977 @ 86440: SELECT 8 7978 @ 86443: PUSHI #0x00000001 7979 @ 86448: ASSVAL 7980 @ 86449: LINE 1560 "regression-compile-tmp/asems412.imp" 7981 @ 86488: PUSH V 7982 @ 86491: SELECT 9 7983 @ 86494: PUSHI #0x00000003 7984 @ 86499: ASSVAL 1561 LOAD(V, ANY0) 7985 @ 86500: LINE 1561 "regression-compile-tmp/asems412.imp" 7986 @ 86539: PUSH LOAD 7987 @ 86542: PUSH V 7988 @ 86545: ASSPAR 7989 @ 86546: PUSHI #0x0000002e 7990 @ 86551: ASSPAR 7991 @ 86552: CALL 1562 V_TYPE = TYPE; V_FORM = FORM 7992 @ 86553: LINE 1562 "regression-compile-tmp/asems412.imp" 7993 @ 86592: PUSH V 7994 @ 86595: SELECT 8 7995 @ 86598: PUSH TYPE 7996 @ 86601: ASSVAL 7997 @ 86602: LINE 1562 "regression-compile-tmp/asems412.imp" 7998 @ 86641: PUSH V 7999 @ 86644: SELECT 9 8000 @ 86647: PUSH FORM 8001 @ 86650: ASSVAL 1563 V_DISP = DISP 8002 @ 86651: LINE 1563 "regression-compile-tmp/asems412.imp" 8003 @ 86690: PUSH V 8004 @ 86693: SELECT 1 8005 @ 86696: PUSH DISP 8006 @ 86699: ASSVAL 1564 %END 8007 @ 86700: LINE 1564 "regression-compile-tmp/asems412.imp" 8008 @ 86739: END _lev0id0_ASSEMBLE_REDUCE {lev=3 --> 2} 1565 %ROUTINE VMAP(%RECORD(STACKFM)%NAME V) 8009 @ 86740: LINE 1565 "regression-compile-tmp/asems412.imp" 8010 @ 86779: DEF VMAP (_lev0id0_ASSEMBLE_VMAP) p1=V_013d 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 8011 @ 86795: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 8012 @ 86796: DEF V p1=V_013e a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8013 @ 86809: FINISH ) {lev=3} 1566 %INTEGER N 8014 @ 86810: LINE 1566 "regression-compile-tmp/asems412.imp" 8015 @ 86849: DEF N p1=V_013f 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 1567 %CONSTBYTEINTEGERARRAY MAP(0:15) = 1568 V IN S, V IN S, V IN S, A IN S, V IN S, 1569 A IN REC, V IN S, V IN REC, 0(8) 8016 @ 86862: LINE 1567 "regression-compile-tmp/asems412.imp" 8017 @ 86901: PUSHI #0x00000000 8018 @ 86906: PUSHI #0x0000000f 8019 @ 86911: BOUNDS 8020 @ 86912: DEF MAP p1=V_0140 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 8021 @ 86927: PUSHI #0x00000003 8022 @ 86932: INIT 1 8023 @ 86935: PUSHI #0x00000003 8024 @ 86940: INIT 1 8025 @ 86943: PUSHI #0x00000003 8026 @ 86948: INIT 1 8027 @ 86951: PUSHI #0x00000002 8028 @ 86956: INIT 1 8029 @ 86959: PUSHI #0x00000003 8030 @ 86964: INIT 1 8031 @ 86967: PUSHI #0x00000004 8032 @ 86972: INIT 1 8033 @ 86975: PUSHI #0x00000003 8034 @ 86980: INIT 1 8035 @ 86983: PUSHI #0x00000005 8036 @ 86988: INIT 1 8037 @ 86991: PUSHI #0x00000000 8038 @ 86996: INIT 8 1570 LOAD(V, ANY0) %IF V_FORM = AINS %OR V_FORM = AINREC 8039 @ 86999: LINE 1570 "regression-compile-tmp/asems412.imp" 8040 @ 87038: PUSH V 8041 @ 87041: SELECT 9 8042 @ 87044: PUSHI #0x00000002 8043 @ 87049: JUMPIF = L_0005 8044 @ 87053: PUSH V 8045 @ 87056: SELECT 9 8046 @ 87059: PUSHI #0x00000004 8047 @ 87064: JUMPIF # L_0004 8048 @ 87068: LOCATE L_0005 8049 @ 87071: PUSH LOAD 8050 @ 87074: PUSH V 8051 @ 87077: ASSPAR 8052 @ 87078: PUSHI #0x0000002e 8053 @ 87083: ASSPAR 8054 @ 87084: CALL 8055 @ 87085: LOCATE L_0004 1571 %IF V_LOP # 0 %START 8056 @ 87088: LINE 1571 "regression-compile-tmp/asems412.imp" 8057 @ 87127: PUSH V 8058 @ 87130: SELECT 7 8059 @ 87133: PUSHI #0x00000000 8060 @ 87138: JUMPIF = L_0004 1572 %IF V_LOP = ADD %AND CONST(V_LINK) %START 8061 @ 87142: LINE 1572 "regression-compile-tmp/asems412.imp" 8062 @ 87181: PUSH V 8063 @ 87184: SELECT 7 8064 @ 87187: PUSHI #0x00000003 8065 @ 87192: JUMPIF # L_0007 8066 @ 87196: PUSH CONST 8067 @ 87199: PUSH V 8068 @ 87202: SELECT 10 8069 @ 87205: ASSPAR 8070 @ 87206: CALL 8071 @ 87207: bf L_0007 1573 N = V_LINK_DISP 8072 @ 87210: LINE 1573 "regression-compile-tmp/asems412.imp" 8073 @ 87249: PUSH N 8074 @ 87252: PUSH V 8075 @ 87255: SELECT 10 8076 @ 87258: SELECT 1 8077 @ 87261: ASSVAL 1574 V_LOP = 0; DROP(V_LINK) 8078 @ 87262: LINE 1574 "regression-compile-tmp/asems412.imp" 8079 @ 87301: PUSH V 8080 @ 87304: SELECT 7 8081 @ 87307: PUSHI #0x00000000 8082 @ 87312: ASSVAL 8083 @ 87313: LINE 1574 "regression-compile-tmp/asems412.imp" 8084 @ 87352: PUSH DROP 8085 @ 87355: PUSH V 8086 @ 87358: SELECT 10 8087 @ 87361: ASSPAR 8088 @ 87362: CALL 1575 %IF V_FORM = AVINS %OR V_FORM = AVINREC %START 8089 @ 87363: LINE 1575 "regression-compile-tmp/asems412.imp" 8090 @ 87402: PUSH V 8091 @ 87405: SELECT 9 8092 @ 87408: PUSHI #0x00000006 8093 @ 87413: JUMPIF = L_000b 8094 @ 87417: PUSH V 8095 @ 87420: SELECT 9 8096 @ 87423: PUSHI #0x00000007 8097 @ 87428: JUMPIF # L_000a 8098 @ 87432: LOCATE L_000b 1576 V_DISP = V_DISP+N 8099 @ 87435: LINE 1576 "regression-compile-tmp/asems412.imp" 8100 @ 87474: PUSH V 8101 @ 87477: SELECT 1 8102 @ 87480: PUSH V 8103 @ 87483: SELECT 1 8104 @ 87486: PUSH N 8105 @ 87489: ADD 8106 @ 87490: ASSVAL 1577 %ELSE 8107 @ 87491: LINE 1577 "regression-compile-tmp/asems412.imp" 8108 @ 87530: GOTO L_0009 8109 @ 87533: LOCATE L_000a 1578 LOAD(V, ANY0); V_DISP = N 8110 @ 87536: LINE 1578 "regression-compile-tmp/asems412.imp" 8111 @ 87575: PUSH LOAD 8112 @ 87578: PUSH V 8113 @ 87581: ASSPAR 8114 @ 87582: PUSHI #0x0000002e 8115 @ 87587: ASSPAR 8116 @ 87588: CALL 8117 @ 87589: LINE 1578 "regression-compile-tmp/asems412.imp" 8118 @ 87628: PUSH V 8119 @ 87631: SELECT 1 8120 @ 87634: PUSH N 8121 @ 87637: ASSVAL 1579 %FINISH 8122 @ 87638: LINE 1579 "regression-compile-tmp/asems412.imp" 8123 @ 87677: LOCATE L_0009 1580 %ELSE 8124 @ 87680: LINE 1580 "regression-compile-tmp/asems412.imp" 8125 @ 87719: GOTO L_0006 8126 @ 87722: LOCATE L_0007 1581 LOAD(V, ANY0) 8127 @ 87725: LINE 1581 "regression-compile-tmp/asems412.imp" 8128 @ 87764: PUSH LOAD 8129 @ 87767: PUSH V 8130 @ 87770: ASSPAR 8131 @ 87771: PUSHI #0x0000002e 8132 @ 87776: ASSPAR 8133 @ 87777: CALL 1582 %FINISH 8134 @ 87778: LINE 1582 "regression-compile-tmp/asems412.imp" 8135 @ 87817: LOCATE L_0006 1583 %FINISH 8136 @ 87820: LINE 1583 "regression-compile-tmp/asems412.imp" 8137 @ 87859: LOCATE L_0004 1584 V_FORM = MAP(V_FORM) 8138 @ 87862: LINE 1584 "regression-compile-tmp/asems412.imp" 8139 @ 87901: PUSH V 8140 @ 87904: SELECT 9 8141 @ 87907: PUSH MAP 8142 @ 87910: PUSH V 8143 @ 87913: SELECT 9 8144 @ 87916: ACCESS 8145 @ 87917: ASSVAL 1585 %END 8146 @ 87918: LINE 1585 "regression-compile-tmp/asems412.imp" 8147 @ 87957: END _lev0id0_ASSEMBLE_VMAP {lev=3 --> 2} 1586 %ROUTINE AMAP(%RECORD(STACKFM)%NAME V) 8148 @ 87958: LINE 1586 "regression-compile-tmp/asems412.imp" 8149 @ 87997: DEF AMAP (_lev0id0_ASSEMBLE_AMAP) p1=V_0120 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 8150 @ 88013: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 8151 @ 88014: DEF V p1=V_013e a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8152 @ 88027: FINISH ) {lev=3} 1587 %CONSTSHORTINTEGERARRAY MAP(0:7) = 1588 -1, -1, V IN S, AV IN S, V IN REC, AV IN REC, -1, -1 8153 @ 88028: LINE 1587 "regression-compile-tmp/asems412.imp" 8154 @ 88067: PUSHI #0x00000000 8155 @ 88072: PUSHI #0x00000007 8156 @ 88077: BOUNDS 8157 @ 88078: DEF MAP p1=V_013f 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 8158 @ 88093: PUSHI #0xffffffff 8159 @ 88098: INIT 1 8160 @ 88101: PUSHI #0xffffffff 8161 @ 88106: INIT 1 8162 @ 88109: PUSHI #0x00000003 8163 @ 88114: INIT 1 8164 @ 88117: PUSHI #0x00000006 8165 @ 88122: INIT 1 8166 @ 88125: PUSHI #0x00000005 8167 @ 88130: INIT 1 8168 @ 88133: PUSHI #0x00000007 8169 @ 88138: INIT 1 8170 @ 88141: PUSHI #0xffffffff 8171 @ 88146: INIT 1 8172 @ 88149: PUSHI #0xffffffff 8173 @ 88154: INIT 1 1589 V_FORM = MAP(V_FORM) 8174 @ 88157: LINE 1589 "regression-compile-tmp/asems412.imp" 8175 @ 88196: PUSH V 8176 @ 88199: SELECT 9 8177 @ 88202: PUSH MAP 8178 @ 88205: PUSH V 8179 @ 88208: SELECT 9 8180 @ 88211: ACCESS 8181 @ 88212: ASSVAL 1590 %IF V_FORM = AV IN S %START 8182 @ 88213: LINE 1590 "regression-compile-tmp/asems412.imp" 8183 @ 88252: PUSH V 8184 @ 88255: SELECT 9 8185 @ 88258: PUSHI #0x00000006 8186 @ 88263: JUMPIF # L_0004 1591 %IF V_BASE = 0 %THEN V_FORM = CONSTANT %ELSE %START 8187 @ 88267: LINE 1591 "regression-compile-tmp/asems412.imp" 8188 @ 88306: PUSH V 8189 @ 88309: SELECT 6 8190 @ 88312: PUSHI #0x00000000 8191 @ 88317: JUMPIF # L_0007 8192 @ 88321: PUSH V 8193 @ 88324: SELECT 9 8194 @ 88327: PUSHI #0x00000000 8195 @ 88332: ASSVAL 8196 @ 88333: GOTO L_0006 8197 @ 88336: LOCATE L_0007 1592 V_FORM = V IN R %IF V_DISP = 0 8198 @ 88339: LINE 1592 "regression-compile-tmp/asems412.imp" 8199 @ 88378: PUSH V 8200 @ 88381: SELECT 1 8201 @ 88384: PUSHI #0x00000000 8202 @ 88389: JUMPIF # L_000a 8203 @ 88393: PUSH V 8204 @ 88396: SELECT 9 8205 @ 88399: PUSHI #0x00000001 8206 @ 88404: ASSVAL 8207 @ 88405: LOCATE L_000a 1593 %FINISH 8208 @ 88408: LINE 1593 "regression-compile-tmp/asems412.imp" 8209 @ 88447: LOCATE L_0006 1594 %FINISH 8210 @ 88450: LINE 1594 "regression-compile-tmp/asems412.imp" 8211 @ 88489: LOCATE L_0004 1595 ABORT(9) %IF V_FORM < 0 8212 @ 88492: LINE 1595 "regression-compile-tmp/asems412.imp" 8213 @ 88531: PUSH V 8214 @ 88534: SELECT 9 8215 @ 88537: PUSHI #0x00000000 8216 @ 88542: JUMPIF >= L_0004 8217 @ 88546: PUSH ABORT 8218 @ 88549: PUSHI #0x00000009 8219 @ 88554: ASSPAR 8220 @ 88555: CALL 8221 @ 88556: LOCATE L_0004 1596 V_TYPE = INTEGER 8222 @ 88559: LINE 1596 "regression-compile-tmp/asems412.imp" 8223 @ 88598: PUSH V 8224 @ 88601: SELECT 8 8225 @ 88604: PUSHI #0x00000001 8226 @ 88609: ASSVAL 1597 %END 8227 @ 88610: LINE 1597 "regression-compile-tmp/asems412.imp" 8228 @ 88649: END _lev0id0_ASSEMBLE_AMAP {lev=3 --> 2} 1598 %ROUTINE OPTIMISE(%RECORD(STACKFM)%NAME V) 8229 @ 88650: LINE 1598 "regression-compile-tmp/asems412.imp" 8230 @ 88689: DEF OPTIMISE (_lev0id0_ASSEMBLE_OPTIMISE) p1=V_013e 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 8231 @ 88709: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 8232 @ 88710: DEF V p1=V_013f a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8233 @ 88723: FINISH ) {lev=3} 1599 %INTEGER R 8234 @ 88724: LINE 1599 "regression-compile-tmp/asems412.imp" 8235 @ 88763: DEF R p1=V_0140 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 1600 %RETURN %IF V_FORM = V IN R %OR V_LOP # 0 8236 @ 88776: LINE 1600 "regression-compile-tmp/asems412.imp" 8237 @ 88815: PUSH V 8238 @ 88818: SELECT 9 8239 @ 88821: PUSHI #0x00000001 8240 @ 88826: JUMPIF = L_0005 8241 @ 88830: PUSH V 8242 @ 88833: SELECT 7 8243 @ 88836: PUSHI #0x00000000 8244 @ 88841: JUMPIF = L_0004 8245 @ 88845: LOCATE L_0005 8246 @ 88848: RETURN 8247 @ 88849: LOCATE L_0004 1601 REDUCE(V) %IF V_FORM >= A IN REC %AND V_FORM # AV IN S 8248 @ 88852: LINE 1601 "regression-compile-tmp/asems412.imp" 8249 @ 88891: PUSH V 8250 @ 88894: SELECT 9 8251 @ 88897: PUSHI #0x00000004 8252 @ 88902: JUMPIF < L_0004 8253 @ 88906: PUSH V 8254 @ 88909: SELECT 9 8255 @ 88912: PUSHI #0x00000006 8256 @ 88917: JUMPIF = L_0004 8257 @ 88921: PUSH REDUCE 8258 @ 88924: PUSH V 8259 @ 88927: ASSPAR 8260 @ 88928: CALL 8261 @ 88929: LOCATE L_0004 1602 R = FIND USE(V_TYPE, V_FORM, V_BASE, V_DISP) 8262 @ 88932: LINE 1602 "regression-compile-tmp/asems412.imp" 8263 @ 88971: PUSH R 8264 @ 88974: PUSH FINDUSE 8265 @ 88977: PUSH V 8266 @ 88980: SELECT 8 8267 @ 88983: ASSPAR 8268 @ 88984: PUSH V 8269 @ 88987: SELECT 9 8270 @ 88990: ASSPAR 8271 @ 88991: PUSH V 8272 @ 88994: SELECT 6 8273 @ 88997: ASSPAR 8274 @ 88998: PUSH V 8275 @ 89001: SELECT 1 8276 @ 89004: ASSPAR 8277 @ 89005: CALL 8278 @ 89006: ASSVAL 1603 %IF R # 0 %START 8279 @ 89007: LINE 1603 "regression-compile-tmp/asems412.imp" 8280 @ 89046: PUSH R 8281 @ 89049: PUSHI #0x00000000 8282 @ 89054: JUMPIF = L_0004 1604 V_BASE = R; V_DISP = 0; V_FORM = V IN R 8283 @ 89058: LINE 1604 "regression-compile-tmp/asems412.imp" 8284 @ 89097: PUSH V 8285 @ 89100: SELECT 6 8286 @ 89103: PUSH R 8287 @ 89106: ASSVAL 8288 @ 89107: LINE 1604 "regression-compile-tmp/asems412.imp" 8289 @ 89146: PUSH V 8290 @ 89149: SELECT 1 8291 @ 89152: PUSHI #0x00000000 8292 @ 89157: ASSVAL 8293 @ 89158: LINE 1604 "regression-compile-tmp/asems412.imp" 8294 @ 89197: PUSH V 8295 @ 89200: SELECT 9 8296 @ 89203: PUSHI #0x00000001 8297 @ 89208: ASSVAL 1605 %ELSE %IF V_FORM = A IN S 8298 @ 89209: LINE 1605 "regression-compile-tmp/asems412.imp" 8299 @ 89248: GOTO L_0003 8300 @ 89251: LOCATE L_0004 8301 @ 89254: PUSH V 8302 @ 89257: SELECT 9 8303 @ 89260: PUSHI #0x00000002 8304 @ 89265: JUMPIF # L_0004 1606 R = FIND USE(INTEGER, V IN S, V_BASE, V_DISP) 8305 @ 89269: LINE 1606 "regression-compile-tmp/asems412.imp" 8306 @ 89308: PUSH R 8307 @ 89311: PUSH FINDUSE 8308 @ 89314: PUSHI #0x00000001 8309 @ 89319: ASSPAR 8310 @ 89320: PUSHI #0x00000003 8311 @ 89325: ASSPAR 8312 @ 89326: PUSH V 8313 @ 89329: SELECT 6 8314 @ 89332: ASSPAR 8315 @ 89333: PUSH V 8316 @ 89336: SELECT 1 8317 @ 89339: ASSPAR 8318 @ 89340: CALL 8319 @ 89341: ASSVAL 1607 %RETURN %IF R = 0 8320 @ 89342: LINE 1607 "regression-compile-tmp/asems412.imp" 8321 @ 89381: PUSH R 8322 @ 89384: PUSHI #0x00000000 8323 @ 89389: JUMPIF # L_0007 8324 @ 89393: RETURN 8325 @ 89394: LOCATE L_0007 1608 V_BASE = R; V_DISP = 0; V_FORM = V IN S 8326 @ 89397: LINE 1608 "regression-compile-tmp/asems412.imp" 8327 @ 89436: PUSH V 8328 @ 89439: SELECT 6 8329 @ 89442: PUSH R 8330 @ 89445: ASSVAL 8331 @ 89446: LINE 1608 "regression-compile-tmp/asems412.imp" 8332 @ 89485: PUSH V 8333 @ 89488: SELECT 1 8334 @ 89491: PUSHI #0x00000000 8335 @ 89496: ASSVAL 8336 @ 89497: LINE 1608 "regression-compile-tmp/asems412.imp" 8337 @ 89536: PUSH V 8338 @ 89539: SELECT 9 8339 @ 89542: PUSHI #0x00000003 8340 @ 89547: ASSVAL 1609 OPTIMISE(V) 8341 @ 89548: LINE 1609 "regression-compile-tmp/asems412.imp" 8342 @ 89587: PUSH OPTIMISE 8343 @ 89590: PUSH V 8344 @ 89593: ASSPAR 8345 @ 89594: CALL 1610 %FINISH 8346 @ 89595: LINE 1610 "regression-compile-tmp/asems412.imp" 8347 @ 89634: LOCATE L_0004 8348 @ 89637: LOCATE L_0003 1611 %END 8349 @ 89640: LINE 1611 "regression-compile-tmp/asems412.imp" 8350 @ 89679: END _lev0id0_ASSEMBLE_OPTIMISE {lev=3 --> 2} 1612 %ROUTINE RANGE(%SHORTINTEGERNAME BASE, %INTEGERNAME DISP) 8351 @ 89680: LINE 1612 "regression-compile-tmp/asems412.imp" 8352 @ 89719: DEF RANGE (_lev0id0_ASSEMBLE_RANGE) p1=V_013f 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 8353 @ 89736: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 8354 @ 89737: DEF BASE p1=V_0140 a/tf=12 b/format=3 c/ostate=0 type=1 (integer) form=2 (name) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 8355 @ 89753: DEF DISP p1=V_0141 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 8356 @ 89769: FINISH ) {lev=3} 1613 %RECORD(STACKFM) V 8357 @ 89770: LINE 1613 "regression-compile-tmp/asems412.imp" 8358 @ 89809: DEF V p1=V_0142 a/tf=41 b/format=86 c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1614 %RETURN %IF 0 <= DISP <= X'3FFF' 8359 @ 89822: LINE 1614 "regression-compile-tmp/asems412.imp" 8360 @ 89861: PUSHI #0x00000000 8361 @ 89866: PUSH DISP 8362 @ 89869: JUMPIFD > L_0004 8363 @ 89873: PUSHI #0x00003fff 8364 @ 89878: JUMPIF > L_0004 8365 @ 89882: RETURN 8366 @ 89883: LOCATE L_0004 1615 V_TYPE = INTEGER; V_FORM = AV IN S 8367 @ 89886: LINE 1615 "regression-compile-tmp/asems412.imp" 8368 @ 89925: PUSH V 8369 @ 89928: SELECT 8 8370 @ 89931: PUSHI #0x00000001 8371 @ 89936: ASSVAL 8372 @ 89937: LINE 1615 "regression-compile-tmp/asems412.imp" 8373 @ 89976: PUSH V 8374 @ 89979: SELECT 9 8375 @ 89982: PUSHI #0x00000006 8376 @ 89987: ASSVAL 1616 V_BASE = BASE; V_DISP = DISP&(\X'3FFF') 8377 @ 89988: LINE 1616 "regression-compile-tmp/asems412.imp" 8378 @ 90027: PUSH V 8379 @ 90030: SELECT 6 8380 @ 90033: PUSH BASE 8381 @ 90036: ASSVAL 8382 @ 90037: LINE 1616 "regression-compile-tmp/asems412.imp" 8383 @ 90076: PUSH V 8384 @ 90079: SELECT 1 8385 @ 90082: PUSH DISP 8386 @ 90085: PUSHI #0x00003fff 8387 @ 90090: NOT 8388 @ 90091: AND 8389 @ 90092: ASSVAL 1617 DISP = DISP-V_DISP 8390 @ 90093: LINE 1617 "regression-compile-tmp/asems412.imp" 8391 @ 90132: PUSH DISP 8392 @ 90135: PUSH DISP 8393 @ 90138: PUSH V 8394 @ 90141: SELECT 1 8395 @ 90144: SUB 8396 @ 90145: ASSVAL 1618 V_LOP = 0 8397 @ 90146: LINE 1618 "regression-compile-tmp/asems412.imp" 8398 @ 90185: PUSH V 8399 @ 90188: SELECT 7 8400 @ 90191: PUSHI #0x00000000 8401 @ 90196: ASSVAL 1619 LOAD(V, ANY0) 8402 @ 90197: LINE 1619 "regression-compile-tmp/asems412.imp" 8403 @ 90236: PUSH LOAD 8404 @ 90239: PUSH V 8405 @ 90242: ASSPAR 8406 @ 90243: PUSHI #0x0000002e 8407 @ 90248: ASSPAR 8408 @ 90249: CALL 1620 BASE = V_BASE 8409 @ 90250: LINE 1620 "regression-compile-tmp/asems412.imp" 8410 @ 90289: PUSH BASE 8411 @ 90292: PUSH V 8412 @ 90295: SELECT 6 8413 @ 90298: ASSVAL 1621 %END 8414 @ 90299: LINE 1621 "regression-compile-tmp/asems412.imp" 8415 @ 90338: END _lev0id0_ASSEMBLE_RANGE {lev=3 --> 2} 1622 %ROUTINE ADDRESS(%RECORD(STACKFM)%NAME V) 8416 @ 90339: LINE 1622 "regression-compile-tmp/asems412.imp" 8417 @ 90378: DEF ADDRESS (_lev0id0_ASSEMBLE_ADDRESS) p1=V_0140 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 8418 @ 90397: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 8419 @ 90398: DEF V p1=V_0141 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8420 @ 90411: FINISH ) {lev=3} 1623 %INTEGER TYPE, FORM 8421 @ 90412: LINE 1623 "regression-compile-tmp/asems412.imp" 8422 @ 90451: DEF TYPE p1=V_0142 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 8423 @ 90467: DEF FORM p1=V_0143 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 1624 FORM = V_FORM; TYPE = V_TYPE 8424 @ 90483: LINE 1624 "regression-compile-tmp/asems412.imp" 8425 @ 90522: PUSH FORM 8426 @ 90525: PUSH V 8427 @ 90528: SELECT 9 8428 @ 90531: ASSVAL 8429 @ 90532: LINE 1624 "regression-compile-tmp/asems412.imp" 8430 @ 90571: PUSH TYPE 8431 @ 90574: PUSH V 8432 @ 90577: SELECT 8 8433 @ 90580: ASSVAL 1625 %IF FORM = V IN REC %OR FORM = A IN REC %START 8434 @ 90581: LINE 1625 "regression-compile-tmp/asems412.imp" 8435 @ 90620: PUSH FORM 8436 @ 90623: PUSHI #0x00000005 8437 @ 90628: JUMPIF = L_0005 8438 @ 90632: PUSH FORM 8439 @ 90635: PUSHI #0x00000004 8440 @ 90640: JUMPIF # L_0004 8441 @ 90644: LOCATE L_0005 1626 REDUCE(V); FORM = V_FORM 8442 @ 90647: LINE 1626 "regression-compile-tmp/asems412.imp" 8443 @ 90686: PUSH REDUCE 8444 @ 90689: PUSH V 8445 @ 90692: ASSPAR 8446 @ 90693: CALL 8447 @ 90694: LINE 1626 "regression-compile-tmp/asems412.imp" 8448 @ 90733: PUSH FORM 8449 @ 90736: PUSH V 8450 @ 90739: SELECT 9 8451 @ 90742: ASSVAL 1627 %FINISH 8452 @ 90743: LINE 1627 "regression-compile-tmp/asems412.imp" 8453 @ 90782: LOCATE L_0004 1628 %UNLESS FORM = V IN S %OR FORM = V IN R %START 8454 @ 90785: LINE 1628 "regression-compile-tmp/asems412.imp" 8455 @ 90824: PUSH FORM 8456 @ 90827: PUSHI #0x00000003 8457 @ 90832: JUMPIF = L_0004 8458 @ 90836: PUSH FORM 8459 @ 90839: PUSHI #0x00000001 8460 @ 90844: JUMPIF = L_0004 1629 %IF FORM = A IN S %START 8461 @ 90848: LINE 1629 "regression-compile-tmp/asems412.imp" 8462 @ 90887: PUSH FORM 8463 @ 90890: PUSHI #0x00000002 8464 @ 90895: JUMPIF # L_0007 1630 FORM = V IN S; V_FORM = FORM 8465 @ 90899: LINE 1630 "regression-compile-tmp/asems412.imp" 8466 @ 90938: PUSH FORM 8467 @ 90941: PUSHI #0x00000003 8468 @ 90946: ASSVAL 8469 @ 90947: LINE 1630 "regression-compile-tmp/asems412.imp" 8470 @ 90986: PUSH V 8471 @ 90989: SELECT 9 8472 @ 90992: PUSH FORM 8473 @ 90995: ASSVAL 1631 V_TYPE = INTEGER 8474 @ 90996: LINE 1631 "regression-compile-tmp/asems412.imp" 8475 @ 91035: PUSH V 8476 @ 91038: SELECT 8 8477 @ 91041: PUSHI #0x00000001 8478 @ 91046: ASSVAL 1632 LOAD(V, ANY0) 8479 @ 91047: LINE 1632 "regression-compile-tmp/asems412.imp" 8480 @ 91086: PUSH LOAD 8481 @ 91089: PUSH V 8482 @ 91092: ASSPAR 8483 @ 91093: PUSHI #0x0000002e 8484 @ 91098: ASSPAR 8485 @ 91099: CALL 1633 %ELSE 8486 @ 91100: LINE 1633 "regression-compile-tmp/asems412.imp" 8487 @ 91139: GOTO L_0006 8488 @ 91142: LOCATE L_0007 1634 LOAD(V, ANY) 8489 @ 91145: LINE 1634 "regression-compile-tmp/asems412.imp" 8490 @ 91184: PUSH LOAD 8491 @ 91187: PUSH V 8492 @ 91190: ASSPAR 8493 @ 91191: PUSHI #0x0000002d 8494 @ 91196: ASSPAR 8495 @ 91197: CALL 1635 FORM = V IN R; TYPE = INTEGER 8496 @ 91198: LINE 1635 "regression-compile-tmp/asems412.imp" 8497 @ 91237: PUSH FORM 8498 @ 91240: PUSHI #0x00000001 8499 @ 91245: ASSVAL 8500 @ 91246: LINE 1635 "regression-compile-tmp/asems412.imp" 8501 @ 91285: PUSH TYPE 8502 @ 91288: PUSHI #0x00000001 8503 @ 91293: ASSVAL 1636 %FINISH 8504 @ 91294: LINE 1636 "regression-compile-tmp/asems412.imp" 8505 @ 91333: LOCATE L_0006 1637 %FINISH 8506 @ 91336: LINE 1637 "regression-compile-tmp/asems412.imp" 8507 @ 91375: LOCATE L_0004 1638 RANGE(V_BASE, V_DISP) 8508 @ 91378: LINE 1638 "regression-compile-tmp/asems412.imp" 8509 @ 91417: PUSH RANGE 8510 @ 91420: PUSH V 8511 @ 91423: SELECT 6 8512 @ 91426: ASSPAR 8513 @ 91427: PUSH V 8514 @ 91430: SELECT 1 8515 @ 91433: ASSPAR 8516 @ 91434: CALL 1639 V_TYPE = TYPE; V_FORM = FORM 8517 @ 91435: LINE 1639 "regression-compile-tmp/asems412.imp" 8518 @ 91474: PUSH V 8519 @ 91477: SELECT 8 8520 @ 91480: PUSH TYPE 8521 @ 91483: ASSVAL 8522 @ 91484: LINE 1639 "regression-compile-tmp/asems412.imp" 8523 @ 91523: PUSH V 8524 @ 91526: SELECT 9 8525 @ 91529: PUSH FORM 8526 @ 91532: ASSVAL 1640 %END 8527 @ 91533: LINE 1640 "regression-compile-tmp/asems412.imp" 8528 @ 91572: END _lev0id0_ASSEMBLE_ADDRESS {lev=3 --> 2} 1641 %ROUTINE LOAD(%RECORD(STACKFM)%NAME V, %INTEGER R) 8529 @ 91573: LINE 1641 "regression-compile-tmp/asems412.imp" 8530 @ 91612: DEF LOAD (_lev0id0_ASSEMBLE_LOAD) p1=V_0121 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 8531 @ 91628: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 8532 @ 91629: DEF V p1=V_0141 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 8533 @ 91642: DEF R p1=V_0142 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 @ 91655: FINISH ) {lev=3} 1642 %RECORD(STACKFM) H 8535 @ 91656: LINE 1642 "regression-compile-tmp/asems412.imp" 8536 @ 91695: DEF H p1=V_0143 a/tf=41 b/format=86 c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1643 %CONSTSHORTINTEGERARRAY OP KEY(1:17) = -1, 0, 0, 6, 4, 2, 0, 1644 0, 5,10, 0, 2, 0, 0, 0,0 ,0 8537 @ 91708: LINE 1643 "regression-compile-tmp/asems412.imp" 8538 @ 91747: PUSHI #0x00000001 8539 @ 91752: PUSHI #0x00000011 8540 @ 91757: BOUNDS 8541 @ 91758: DEF OPKEY p1=V_0144 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 8542 @ 91775: PUSHI #0xffffffff 8543 @ 91780: INIT 1 8544 @ 91783: PUSHI #0x00000000 8545 @ 91788: INIT 1 8546 @ 91791: PUSHI #0x00000000 8547 @ 91796: INIT 1 8548 @ 91799: PUSHI #0x00000006 8549 @ 91804: INIT 1 8550 @ 91807: PUSHI #0x00000004 8551 @ 91812: INIT 1 8552 @ 91815: PUSHI #0x00000002 8553 @ 91820: INIT 1 8554 @ 91823: PUSHI #0x00000000 8555 @ 91828: INIT 1 8556 @ 91831: PUSHI #0x00000000 8557 @ 91836: INIT 1 8558 @ 91839: PUSHI #0x00000005 8559 @ 91844: INIT 1 8560 @ 91847: PUSHI #0x0000000a 8561 @ 91852: INIT 1 8562 @ 91855: PUSHI #0x00000000 8563 @ 91860: INIT 1 8564 @ 91863: PUSHI #0x00000002 8565 @ 91868: INIT 1 8566 @ 91871: PUSHI #0x00000000 8567 @ 91876: INIT 1 8568 @ 91879: PUSHI #0x00000000 8569 @ 91884: INIT 1 8570 @ 91887: PUSHI #0x00000000 8571 @ 91892: INIT 1 8572 @ 91895: PUSHI #0x00000000 8573 @ 91900: INIT 1 8574 @ 91903: PUSHI #0x00000000 8575 @ 91908: INIT 1 1645 %CONSTSHORTINTEGERARRAY PM(0:11) = 1646 AR, AIS, AHI, AW, AH, AI, 1647 SR, SIS, SHI, SW, SH, SI 8576 @ 91911: LINE 1645 "regression-compile-tmp/asems412.imp" 8577 @ 91950: PUSHI #0x00000000 8578 @ 91955: PUSHI #0x0000000b 8579 @ 91960: BOUNDS 8580 @ 91961: DEF PM p1=V_0145 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 8581 @ 91975: PUSHI #0x00000a00 8582 @ 91980: INIT 1 8583 @ 91983: PUSHI #0x00002600 8584 @ 91988: INIT 1 8585 @ 91991: PUSHI #0x0000ca00 8586 @ 91996: INIT 1 8587 @ 91999: PUSHI #0x00005a00 8588 @ 92004: INIT 1 8589 @ 92007: PUSHI #0x00004a00 8590 @ 92012: INIT 1 8591 @ 92015: PUSHI #0x0000fa00 8592 @ 92020: INIT 1 8593 @ 92023: PUSHI #0x00000b00 8594 @ 92028: INIT 1 8595 @ 92031: PUSHI #0x00002700 8596 @ 92036: INIT 1 8597 @ 92039: PUSHI #0x0000cb00 8598 @ 92044: INIT 1 8599 @ 92047: PUSHI #0x00005b00 8600 @ 92052: INIT 1 8601 @ 92055: PUSHI #0x00004b00 8602 @ 92060: INIT 1 8603 @ 92063: PUSHI #0x0000fb00 8604 @ 92068: INIT 1 1648 %CONSTSHORTINTEGERARRAY MULDIV(0:5) = DR, DW, 1649 MR, MW, 1650 MR, MW 8605 @ 92071: LINE 1648 "regression-compile-tmp/asems412.imp" 8606 @ 92110: PUSHI #0x00000000 8607 @ 92115: PUSHI #0x00000005 8608 @ 92120: BOUNDS 8609 @ 92121: DEF MULDIV p1=V_0146 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 8610 @ 92139: PUSHI #0x00001d00 8611 @ 92144: INIT 1 8612 @ 92147: PUSHI #0x00005d00 8613 @ 92152: INIT 1 8614 @ 92155: PUSHI #0x00001c00 8615 @ 92160: INIT 1 8616 @ 92163: PUSHI #0x00005c00 8617 @ 92168: INIT 1 8618 @ 92171: PUSHI #0x00001c00 8619 @ 92176: INIT 1 8620 @ 92179: PUSHI #0x00005c00 8621 @ 92184: INIT 1 1651 %CONSTSHORTINTEGERARRAY LOGICAL(0:14) = 1652 NR, NHI, NW, NH, NI, 1653 OR, OHI, OW, OH, OI, 1654 XR, XHI, XW, XH, XI 1655 8622 @ 92187: LINE 1651 "regression-compile-tmp/asems412.imp" 8623 @ 92226: PUSHI #0x00000000 8624 @ 92231: PUSHI #0x0000000e 8625 @ 92236: BOUNDS 8626 @ 92237: DEF LOGICAL p1=V_0147 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 8627 @ 92256: PUSHI #0x00000400 8628 @ 92261: INIT 1 8629 @ 92264: PUSHI #0x0000c400 8630 @ 92269: INIT 1 8631 @ 92272: PUSHI #0x00005400 8632 @ 92277: INIT 1 8633 @ 92280: PUSHI #0x00004400 8634 @ 92285: INIT 1 8635 @ 92288: PUSHI #0x0000f400 8636 @ 92293: INIT 1 8637 @ 92296: PUSHI #0x00000600 8638 @ 92301: INIT 1 8639 @ 92304: PUSHI #0x0000c600 8640 @ 92309: INIT 1 8641 @ 92312: PUSHI #0x00005600 8642 @ 92317: INIT 1 8643 @ 92320: PUSHI #0x00004600 8644 @ 92325: INIT 1 8645 @ 92328: PUSHI #0x0000f600 8646 @ 92333: INIT 1 8647 @ 92336: PUSHI #0x00000700 8648 @ 92341: INIT 1 8649 @ 92344: PUSHI #0x0000c700 8650 @ 92349: INIT 1 8651 @ 92352: PUSHI #0x00005700 8652 @ 92357: INIT 1 8653 @ 92360: PUSHI #0x00004700 8654 @ 92365: INIT 1 8655 @ 92368: PUSHI #0x0000f700 8656 @ 92373: INIT 1 1656 %CONSTSHORTINTEGERARRAY SHIFT(0:3) = SLLS, SLL, SRLS, SRL 1657 8657 @ 92376: LINE 1656 "regression-compile-tmp/asems412.imp" 8658 @ 92415: PUSHI #0x00000000 8659 @ 92420: PUSHI #0x00000003 8660 @ 92425: BOUNDS 8661 @ 92426: DEF SHIFT p1=V_0148 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 8662 @ 92443: PUSHI #0x00001100 8663 @ 92448: INIT 1 8664 @ 92451: PUSHI #0x0000ed00 8665 @ 92456: INIT 1 8666 @ 92459: PUSHI #0x00001000 8667 @ 92464: INIT 1 8668 @ 92467: PUSHI #0x0000ec00 8669 @ 92472: INIT 1 1658 %CONSTSHORTINTEGERARRAY REAL OP(3:14) = AER, SER, 0, 1659 MER, DER, 0, 0, 1660 AE, SE, 0, 1661 ME, DE 8670 @ 92475: LINE 1658 "regression-compile-tmp/asems412.imp" 8671 @ 92514: PUSHI #0x00000003 8672 @ 92519: PUSHI #0x0000000e 8673 @ 92524: BOUNDS 8674 @ 92525: DEF REALOP p1=V_0149 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 8675 @ 92543: PUSHI #0x00002a00 8676 @ 92548: INIT 1 8677 @ 92551: PUSHI #0x00002b00 8678 @ 92556: INIT 1 8679 @ 92559: PUSHI #0x00000000 8680 @ 92564: INIT 1 8681 @ 92567: PUSHI #0x00002c00 8682 @ 92572: INIT 1 8683 @ 92575: PUSHI #0x00002d00 8684 @ 92580: INIT 1 8685 @ 92583: PUSHI #0x00000000 8686 @ 92588: INIT 1 8687 @ 92591: PUSHI #0x00000000 8688 @ 92596: INIT 1 8689 @ 92599: PUSHI #0x00006a00 8690 @ 92604: INIT 1 8691 @ 92607: PUSHI #0x00006b00 8692 @ 92612: INIT 1 8693 @ 92615: PUSHI #0x00000000 8694 @ 92620: INIT 1 8695 @ 92623: PUSHI #0x00006c00 8696 @ 92628: INIT 1 8697 @ 92631: PUSHI #0x00006d00 8698 @ 92636: INIT 1 1662 %INTEGERFN PRED(%INTEGER R) 8699 @ 92639: LINE 1662 "regression-compile-tmp/asems412.imp" 8700 @ 92678: DEF PRED (_lev0id0_ASSEMBLE_LOAD_PRED) p1=V_014a 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 8701 @ 92694: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 8702 @ 92695: DEF R p1=V_014b 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 8703 @ 92708: FINISH ) {lev=4} 1663 %CONSTBYTEINTEGERARRAY INV(0:15) = R0, R1, R2, R3, 1664 R4, P2, P1, WSP, 1665 LINK, R9, R10, R11, 1666 R12, GLA, CODE, R15 8704 @ 92709: LINE 1663 "regression-compile-tmp/asems412.imp" 8705 @ 92748: PUSHI #0x00000000 8706 @ 92753: PUSHI #0x0000000f 8707 @ 92758: BOUNDS 8708 @ 92759: DEF INV p1=V_014c 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 8709 @ 92774: PUSHI #0x00000001 8710 @ 92779: INIT 1 8711 @ 92782: PUSHI #0x00000002 8712 @ 92787: INIT 1 8713 @ 92790: PUSHI #0x00000003 8714 @ 92795: INIT 1 8715 @ 92798: PUSHI #0x00000004 8716 @ 92803: INIT 1 8717 @ 92806: PUSHI #0x00000005 8718 @ 92811: INIT 1 8719 @ 92814: PUSHI #0x00000006 8720 @ 92819: INIT 1 8721 @ 92822: PUSHI #0x00000007 8722 @ 92827: INIT 1 8723 @ 92830: PUSHI #0x0000002b 8724 @ 92835: INIT 1 8725 @ 92838: PUSHI #0x0000000c 8726 @ 92843: INIT 1 8727 @ 92846: PUSHI #0x00000008 8728 @ 92851: INIT 1 8729 @ 92854: PUSHI #0x00000009 8730 @ 92859: INIT 1 8731 @ 92862: PUSHI #0x0000000a 8732 @ 92867: INIT 1 8733 @ 92870: PUSHI #0x0000000b 8734 @ 92875: INIT 1 8735 @ 92878: PUSHI #0x0000002a 8736 @ 92883: INIT 1 8737 @ 92886: PUSHI #0x0000002c 8738 @ 92891: INIT 1 8739 @ 92894: PUSHI #0x00000029 8740 @ 92899: INIT 1 1667 %RESULT = INV(ACTUAL(R)!!1) 8741 @ 92902: LINE 1667 "regression-compile-tmp/asems412.imp" 8742 @ 92941: PUSH INV 8743 @ 92944: PUSH ACTUAL 8744 @ 92947: PUSH R 8745 @ 92950: ACCESS 8746 @ 92951: PUSHI #0x00000001 8747 @ 92956: XOR 8748 @ 92957: ACCESS 8749 @ 92958: RESULT 1668 %END 8750 @ 92959: LINE 1668 "regression-compile-tmp/asems412.imp" 8751 @ 92998: END _lev0id0_ASSEMBLE_LOAD_PRED {lev=4 --> 3} 1669 %RECORD(STACKFM)%NAME W 8752 @ 92999: LINE 1669 "regression-compile-tmp/asems412.imp" 8753 @ 93038: DEF W p1=V_014b a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1670 %SWITCH F(0:8), IOP(1:17), ROP(1:17) 8754 @ 93051: LINE 1670 "regression-compile-tmp/asems412.imp" 8755 @ 93090: PUSHI #0x00000000 8756 @ 93095: PUSHI #0x00000008 8757 @ 93100: BOUNDS 8758 @ 93101: DEF F p1=V_014c 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 8759 @ 93114: PUSHI #0x00000001 8760 @ 93119: PUSHI #0x00000011 8761 @ 93124: BOUNDS 8762 @ 93125: DEF IOP p1=V_014d 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 8763 @ 93140: PUSHI #0x00000001 8764 @ 93145: PUSHI #0x00000011 8765 @ 93150: BOUNDS 8766 @ 93151: DEF ROP p1=V_014e 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 1671 %INTEGER OP, T, D, TYPE, FORM, KEY, TEMP, N 8767 @ 93166: LINE 1671 "regression-compile-tmp/asems412.imp" 8768 @ 93205: DEF OP p1=V_014f 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 8769 @ 93219: DEF T p1=V_0150 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 8770 @ 93232: DEF D p1=V_0151 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 8771 @ 93245: DEF TYPE p1=V_0152 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 8772 @ 93261: DEF FORM p1=V_0153 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 8773 @ 93277: DEF KEY p1=V_0154 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 8774 @ 93292: DEF TEMP p1=V_0155 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 8775 @ 93308: DEF N p1=V_0156 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 1672 %OWNINTEGER ADDXCA=0, ADDXD=0, ADDXS=0, ADDXKEY=0 1673 8776 @ 93321: LINE 1672 "regression-compile-tmp/asems412.imp" 8777 @ 93360: PUSHI #0x00000000 8778 @ 93365: DEF ADDXCA p1=V_0157 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 8779 @ 93383: INIT 1 8780 @ 93386: PUSHI #0x00000000 8781 @ 93391: DEF ADDXD p1=V_0158 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 8782 @ 93408: INIT 1 8783 @ 93411: PUSHI #0x00000000 8784 @ 93416: DEF ADDXS p1=V_0159 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 8785 @ 93433: INIT 1 8786 @ 93436: PUSHI #0x00000000 8787 @ 93441: DEF ADDXKEY p1=V_015a 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 8788 @ 93460: INIT 1 1674 ABORT(-2) %IF FREE SPACE < MIN FREE; ! ...STACK OVERFLOW? 8789 @ 93463: LINE 1674 "regression-compile-tmp/asems412.imp" 8790 @ 93502: PUSH FREESPACE 8791 @ 93505: PUSHI #0x00000258 8792 @ 93510: JUMPIF >= L_0004 8793 @ 93514: PUSH ABORT 8794 @ 93517: PUSHI #0x00000002 8795 @ 93522: NEGATE 8796 @ 93523: ASSPAR 8797 @ 93524: CALL 8798 @ 93525: LOCATE L_0004 1675 ->REALZ %IF FLOATING(V) %OR FPR0 <= R <= FPR14 %OR R = ANYF 8799 @ 93528: LINE 1675 "regression-compile-tmp/asems412.imp" 8800 @ 93567: PUSH FLOATING 8801 @ 93570: PUSH V 8802 @ 93573: ASSPAR 8803 @ 93574: CALL 8804 @ 93575: bt L_0005 8805 @ 93578: PUSHI #0x0000000d 8806 @ 93583: PUSH R 8807 @ 93586: JUMPIFD > L_0006 8808 @ 93590: PUSHI #0x00000014 8809 @ 93595: JUMPIF <= L_0005 8810 @ 93599: LOCATE L_0006 8811 @ 93602: PUSH R 8812 @ 93605: PUSHI #0x0000002f 8813 @ 93610: JUMPIF # L_0004 8814 @ 93614: LOCATE L_0005 8815 @ 93617: JUMP L_015b 8816 @ 93620: LOCATE L_0004 1676 OP = V_LOP; V_LOP = 0 8817 @ 93623: LINE 1676 "regression-compile-tmp/asems412.imp" 8818 @ 93662: PUSH OP 8819 @ 93665: PUSH V 8820 @ 93668: SELECT 7 8821 @ 93671: ASSVAL 8822 @ 93672: LINE 1676 "regression-compile-tmp/asems412.imp" 8823 @ 93711: PUSH V 8824 @ 93714: SELECT 7 8825 @ 93717: PUSHI #0x00000000 8826 @ 93722: ASSVAL 1677 %IF OP # 0 %START 8827 @ 93723: LINE 1677 "regression-compile-tmp/asems412.imp" 8828 @ 93762: PUSH OP 8829 @ 93765: PUSHI #0x00000000 8830 @ 93770: JUMPIF = L_0004 1678 W == V_LINK 8831 @ 93774: LINE 1678 "regression-compile-tmp/asems412.imp" 8832 @ 93813: PUSH W 8833 @ 93816: PUSH V 8834 @ 93819: SELECT 10 8835 @ 93822: ASSREF 1679 OPTIMISE(V); OPTIMISE(W) %UNLESS W == NULL 8836 @ 93823: LINE 1679 "regression-compile-tmp/asems412.imp" 8837 @ 93862: PUSH OPTIMISE 8838 @ 93865: PUSH V 8839 @ 93868: ASSPAR 8840 @ 93869: CALL 8841 @ 93870: LINE 1679 "regression-compile-tmp/asems412.imp" 8842 @ 93909: PUSH W 8843 @ 93912: PUSH NULL 8844 @ 93915: JUMPIFA = L_0007 8845 @ 93919: PUSH OPTIMISE 8846 @ 93922: PUSH W 8847 @ 93925: ASSPAR 8848 @ 93926: CALL 8849 @ 93927: LOCATE L_0007 1680 %IF OP = SUB %AND W_FORM = CONSTANT %START 8850 @ 93930: LINE 1680 "regression-compile-tmp/asems412.imp" 8851 @ 93969: PUSH OP 8852 @ 93972: PUSHI #0x00000004 8853 @ 93977: JUMPIF # L_0007 8854 @ 93981: PUSH W 8855 @ 93984: SELECT 9 8856 @ 93987: PUSHI #0x00000000 8857 @ 93992: JUMPIF # L_0007 1681 OP = ADD; W_DISP = -W_DISP 8858 @ 93996: LINE 1681 "regression-compile-tmp/asems412.imp" 8859 @ 94035: PUSH OP 8860 @ 94038: PUSHI #0x00000003 8861 @ 94043: ASSVAL 8862 @ 94044: LINE 1681 "regression-compile-tmp/asems412.imp" 8863 @ 94083: PUSH W 8864 @ 94086: SELECT 1 8865 @ 94089: PUSH W 8866 @ 94092: SELECT 1 8867 @ 94095: NEGATE 8868 @ 94096: ASSVAL 1682 %FINISH 8869 @ 94097: LINE 1682 "regression-compile-tmp/asems412.imp" 8870 @ 94136: LOCATE L_0007 1683 %IF COMM(OP) # 0 %START;! SWOP OPERANDS ? 8871 @ 94139: LINE 1683 "regression-compile-tmp/asems412.imp" 8872 @ 94178: PUSH COMM 8873 @ 94181: PUSH OP 8874 @ 94184: ACCESS 8875 @ 94185: PUSHI #0x00000000 8876 @ 94190: JUMPIF = L_0007 1684 T = 0 8877 @ 94194: LINE 1684 "regression-compile-tmp/asems412.imp" 8878 @ 94233: PUSH T 8879 @ 94236: PUSHI #0x00000000 8880 @ 94241: ASSVAL 1685 T = 1 %IF W_BASE = R %OR (W_FORM = V IN R %AND V_FORM # V IN R) 8881 @ 94242: LINE 1685 "regression-compile-tmp/asems412.imp" 8882 @ 94281: PUSH W 8883 @ 94284: SELECT 6 8884 @ 94287: PUSH R 8885 @ 94290: JUMPIF = L_000b 8886 @ 94294: PUSH W 8887 @ 94297: SELECT 9 8888 @ 94300: PUSHI #0x00000001 8889 @ 94305: JUMPIF # L_000a 8890 @ 94309: PUSH V 8891 @ 94312: SELECT 9 8892 @ 94315: PUSHI #0x00000001 8893 @ 94320: JUMPIF = L_000a 8894 @ 94324: LOCATE L_000b 8895 @ 94327: PUSH T 8896 @ 94330: PUSHI #0x00000001 8897 @ 94335: ASSVAL 8898 @ 94336: LOCATE L_000a 1686 T = 1 %IF V_TYPE # BYTE %AND W_TYPE = BYTE %AND V_BASE # R 8899 @ 94339: LINE 1686 "regression-compile-tmp/asems412.imp" 8900 @ 94378: PUSH V 8901 @ 94381: SELECT 8 8902 @ 94384: PUSHI #0x00000002 8903 @ 94389: JUMPIF = L_000a 8904 @ 94393: PUSH W 8905 @ 94396: SELECT 8 8906 @ 94399: PUSHI #0x00000002 8907 @ 94404: JUMPIF # L_000a 8908 @ 94408: PUSH V 8909 @ 94411: SELECT 6 8910 @ 94414: PUSH R 8911 @ 94417: JUMPIF = L_000a 8912 @ 94421: PUSH T 8913 @ 94424: PUSHI #0x00000001 8914 @ 94429: ASSVAL 8915 @ 94430: LOCATE L_000a 1687 T = 1 %IF W_FORM = CONSTANT %AND R < ANY %AND R # V_BASE %C 1688 %AND V_TYPE # BYTE 8916 @ 94433: LINE 1687 "regression-compile-tmp/asems412.imp" 8917 @ 94472: PUSH W 8918 @ 94475: SELECT 9 8919 @ 94478: PUSHI #0x00000000 8920 @ 94483: JUMPIF # L_000a 8921 @ 94487: PUSH R 8922 @ 94490: PUSHI #0x0000002d 8923 @ 94495: JUMPIF >= L_000a 8924 @ 94499: PUSH R 8925 @ 94502: PUSH V 8926 @ 94505: SELECT 6 8927 @ 94508: JUMPIF = L_000a 8928 @ 94512: PUSH V 8929 @ 94515: SELECT 8 8930 @ 94518: PUSHI #0x00000002 8931 @ 94523: JUMPIF = L_000a 8932 @ 94527: PUSH T 8933 @ 94530: PUSHI #0x00000001 8934 @ 94535: ASSVAL 8935 @ 94536: LOCATE L_000a 1689 T = 0 %IF V_BASE = R %C 1690 %OR (W_FORM = V IN R %AND ACTIVITY(W_BASE) < 0) 8936 @ 94539: LINE 1689 "regression-compile-tmp/asems412.imp" 8937 @ 94578: PUSH V 8938 @ 94581: SELECT 6 8939 @ 94584: PUSH R 8940 @ 94587: JUMPIF = L_000b 8941 @ 94591: PUSH W 8942 @ 94594: SELECT 9 8943 @ 94597: PUSHI #0x00000001 8944 @ 94602: JUMPIF # L_000a 8945 @ 94606: PUSH ACTIVITY 8946 @ 94609: PUSH W 8947 @ 94612: SELECT 6 8948 @ 94615: ACCESS 8949 @ 94616: PUSHI #0x00000000 8950 @ 94621: JUMPIF >= L_000a 8951 @ 94625: LOCATE L_000b 8952 @ 94628: PUSH T 8953 @ 94631: PUSHI #0x00000000 8954 @ 94636: ASSVAL 8955 @ 94637: LOCATE L_000a 1691 %IF T # 0 %START 8956 @ 94640: LINE 1691 "regression-compile-tmp/asems412.imp" 8957 @ 94679: PUSH T 8958 @ 94682: PUSHI #0x00000000 8959 @ 94687: JUMPIF = L_000a 1692 H = W; W = V; V = H 8960 @ 94691: LINE 1692 "regression-compile-tmp/asems412.imp" 8961 @ 94730: PUSH H 8962 @ 94733: PUSH W 8963 @ 94736: ASSVAL 8964 @ 94737: LINE 1692 "regression-compile-tmp/asems412.imp" 8965 @ 94776: PUSH W 8966 @ 94779: PUSH V 8967 @ 94782: ASSVAL 8968 @ 94783: LINE 1692 "regression-compile-tmp/asems412.imp" 8969 @ 94822: PUSH V 8970 @ 94825: PUSH H 8971 @ 94828: ASSVAL 1693 %FINISH 8972 @ 94829: LINE 1693 "regression-compile-tmp/asems412.imp" 8973 @ 94868: LOCATE L_000a 1694 %FINISH 8974 @ 94871: LINE 1694 "regression-compile-tmp/asems412.imp" 8975 @ 94910: LOCATE L_0007 1695 %IF CONTROL&UNASS DIAG # 0 %START 8976 @ 94913: LINE 1695 "regression-compile-tmp/asems412.imp" 8977 @ 94952: PUSH CONTROL 8978 @ 94955: PUSHI #0x00000020 8979 @ 94960: AND 8980 @ 94961: PUSHI #0x00000000 8981 @ 94966: JUMPIF = L_0007 1696 LOAD(W, ANY0) %UNLESS W_FORM = CONSTANT %C 1697 %OR (W_TYPE # INTEGER %AND W_TYPE # REALS) 8982 @ 94970: LINE 1696 "regression-compile-tmp/asems412.imp" 8983 @ 95009: PUSH W 8984 @ 95012: SELECT 9 8985 @ 95015: PUSHI #0x00000000 8986 @ 95020: JUMPIF = L_000a 8987 @ 95024: PUSH W 8988 @ 95027: SELECT 8 8989 @ 95030: PUSHI #0x00000001 8990 @ 95035: JUMPIF = L_000b 8991 @ 95039: PUSH W 8992 @ 95042: SELECT 8 8993 @ 95045: PUSHI #0x00000006 8994 @ 95050: JUMPIF # L_000a 8995 @ 95054: LOCATE L_000b 8996 @ 95057: PUSH LOAD 8997 @ 95060: PUSH W 8998 @ 95063: ASSPAR 8999 @ 95064: PUSHI #0x0000002e 9000 @ 95069: ASSPAR 9001 @ 95070: CALL 9002 @ 95071: LOCATE L_000a 1698 %FINISH 9003 @ 95074: LINE 1698 "regression-compile-tmp/asems412.imp" 9004 @ 95113: LOCATE L_0007 1699 KEY = OP KEY(OP) 9005 @ 95116: LINE 1699 "regression-compile-tmp/asems412.imp" 9006 @ 95155: PUSH KEY 9007 @ 95158: PUSH OPKEY 9008 @ 95161: PUSH OP 9009 @ 95164: ACCESS 9010 @ 95165: ASSVAL 1700 ->IOP(OP) 9011 @ 95166: LINE 1700 "regression-compile-tmp/asems412.imp" 9012 @ 95205: PUSH OP 9013 @ 95208: SJUMP 333 1701 %FINISH 9014 @ 95211: LINE 1701 "regression-compile-tmp/asems412.imp" 9015 @ 95250: LOCATE L_0004 1702 %IF V_TYPE = STRING %OR V_TYPE = 0 %START 9016 @ 95253: LINE 1702 "regression-compile-tmp/asems412.imp" 9017 @ 95292: PUSH V 9018 @ 95295: SELECT 8 9019 @ 95298: PUSHI #0x00000004 9020 @ 95303: JUMPIF = L_0005 9021 @ 95307: PUSH V 9022 @ 95310: SELECT 8 9023 @ 95313: PUSHI #0x00000000 9024 @ 95318: JUMPIF # L_0004 9025 @ 95322: LOCATE L_0005 1703 AMAP(V) 9026 @ 95325: LINE 1703 "regression-compile-tmp/asems412.imp" 9027 @ 95364: PUSH AMAP 9028 @ 95367: PUSH V 9029 @ 95370: ASSPAR 9030 @ 95371: CALL 1704 %FINISH 9031 @ 95372: LINE 1704 "regression-compile-tmp/asems412.imp" 9032 @ 95411: LOCATE L_0004 1705 %IF V_FORM > V IN S %AND V_FORM # AV IN S %THEN REDUCE(V) 9033 @ 95414: LINE 1705 "regression-compile-tmp/asems412.imp" 9034 @ 95453: PUSH V 9035 @ 95456: SELECT 9 9036 @ 95459: PUSHI #0x00000003 9037 @ 95464: JUMPIF <= L_0004 9038 @ 95468: PUSH V 9039 @ 95471: SELECT 9 9040 @ 95474: PUSHI #0x00000006 9041 @ 95479: JUMPIF = L_0004 9042 @ 95483: PUSH REDUCE 9043 @ 95486: PUSH V 9044 @ 95489: ASSPAR 9045 @ 95490: CALL 9046 @ 95491: LOCATE L_0004 1706 OPTIMISE(V) 9047 @ 95494: LINE 1706 "regression-compile-tmp/asems412.imp" 9048 @ 95533: PUSH OPTIMISE 9049 @ 95536: PUSH V 9050 @ 95539: ASSPAR 9051 @ 95540: CALL 1707 %IF R >= ANY %START 9052 @ 95541: LINE 1707 "regression-compile-tmp/asems412.imp" 9053 @ 95580: PUSH R 9054 @ 95583: PUSHI #0x0000002d 9055 @ 95588: JUMPIF < L_0004 1708 %RETURN %IF V_FORM = V IN R %AND (R = ANY %OR V_BASE # R0) %C 1709 %AND ACTIVITY(V_BASE) >= 0 9056 @ 95592: LINE 1708 "regression-compile-tmp/asems412.imp" 9057 @ 95631: PUSH V 9058 @ 95634: SELECT 9 9059 @ 95637: PUSHI #0x00000001 9060 @ 95642: JUMPIF # L_0007 9061 @ 95646: PUSH R 9062 @ 95649: PUSHI #0x0000002d 9063 @ 95654: JUMPIF = L_0008 9064 @ 95658: PUSH V 9065 @ 95661: SELECT 6 9066 @ 95664: PUSHI #0x00000001 9067 @ 95669: JUMPIF = L_0007 9068 @ 95673: LOCATE L_0008 9069 @ 95676: PUSH ACTIVITY 9070 @ 95679: PUSH V 9071 @ 95682: SELECT 6 9072 @ 95685: ACCESS 9073 @ 95686: PUSHI #0x00000000 9074 @ 95691: JUMPIF < L_0007 9075 @ 95695: RETURN 9076 @ 95696: LOCATE L_0007 1710 R = GPR(R-ANY) 9077 @ 95699: LINE 1710 "regression-compile-tmp/asems412.imp" 9078 @ 95738: PUSH R 9079 @ 95741: PUSH GPR 9080 @ 95744: PUSH R 9081 @ 95747: PUSHI #0x0000002d 9082 @ 95752: SUB 9083 @ 95753: ASSPAR 9084 @ 95754: CALL 9085 @ 95755: ASSVAL 1711 %ELSE 9086 @ 95756: LINE 1711 "regression-compile-tmp/asems412.imp" 9087 @ 95795: GOTO L_0003 9088 @ 95798: LOCATE L_0004 1712 HAZARD(R) %UNLESS V_BASE = R %AND ACTIVITY(R) = 1 9089 @ 95801: LINE 1712 "regression-compile-tmp/asems412.imp" 9090 @ 95840: PUSH V 9091 @ 95843: SELECT 6 9092 @ 95846: PUSH R 9093 @ 95849: JUMPIF # L_0008 9094 @ 95853: PUSH ACTIVITY 9095 @ 95856: PUSH R 9096 @ 95859: ACCESS 9097 @ 95860: PUSHI #0x00000001 9098 @ 95865: JUMPIF = L_0007 9099 @ 95869: LOCATE L_0008 9100 @ 95872: PUSH HAZARD 9101 @ 95875: PUSH R 9102 @ 95878: ASSPAR 9103 @ 95879: CALL 9104 @ 95880: LOCATE L_0007 1713 %FINISH 9105 @ 95883: LINE 1713 "regression-compile-tmp/asems412.imp" 9106 @ 95922: LOCATE L_0003 1714 ->F(V_FORM) 9107 @ 95925: LINE 1714 "regression-compile-tmp/asems412.imp" 9108 @ 95964: PUSH V 9109 @ 95967: SELECT 9 9110 @ 95970: SJUMP 332 1715 F(AV IN REC): 9111 @ 95973: LINE 1715 "regression-compile-tmp/asems412.imp" 9112 @ 96012: PUSHI #0x00000007 9113 @ 96017: SLABEL 332 1716 F(A IN REC): 9114 @ 96020: LINE 1716 "regression-compile-tmp/asems412.imp" 9115 @ 96059: PUSHI #0x00000004 9116 @ 96064: SLABEL 332 1717 F(V IN REC): 9117 @ 96067: LINE 1717 "regression-compile-tmp/asems412.imp" 9118 @ 96106: PUSHI #0x00000005 9119 @ 96111: SLABEL 332 1718 CLAIM(R); REDUCE(V); RELEASE(R) 9120 @ 96114: LINE 1718 "regression-compile-tmp/asems412.imp" 9121 @ 96153: PUSH CLAIM 9122 @ 96156: PUSH R 9123 @ 96159: ASSPAR 9124 @ 96160: CALL 9125 @ 96161: LINE 1718 "regression-compile-tmp/asems412.imp" 9126 @ 96200: PUSH REDUCE 9127 @ 96203: PUSH V 9128 @ 96206: ASSPAR 9129 @ 96207: CALL 9130 @ 96208: LINE 1718 "regression-compile-tmp/asems412.imp" 9131 @ 96247: PUSH RELEASE 9132 @ 96250: PUSH R 9133 @ 96253: ASSPAR 9134 @ 96254: CALL 1719 ->F(V_FORM) 9135 @ 96255: LINE 1719 "regression-compile-tmp/asems412.imp" 9136 @ 96294: PUSH V 9137 @ 96297: SELECT 9 9138 @ 96300: SJUMP 332 1720 F(AV IN S): 9139 @ 96303: LINE 1720 "regression-compile-tmp/asems412.imp" 9140 @ 96342: PUSHI #0x00000006 9141 @ 96347: SLABEL 332 1721 ABORT(10) %IF V_TYPE = REALS 9142 @ 96350: LINE 1721 "regression-compile-tmp/asems412.imp" 9143 @ 96389: PUSH V 9144 @ 96392: SELECT 8 9145 @ 96395: PUSHI #0x00000006 9146 @ 96400: JUMPIF # L_0004 9147 @ 96404: PUSH ABORT 9148 @ 96407: PUSHI #0x0000000a 9149 @ 96412: ASSPAR 9150 @ 96413: CALL 9151 @ 96414: LOCATE L_0004 1722 %IF V_BASE # R0 %START 9152 @ 96417: LINE 1722 "regression-compile-tmp/asems412.imp" 9153 @ 96456: PUSH V 9154 @ 96459: SELECT 6 9155 @ 96462: PUSHI #0x00000001 9156 @ 96467: JUMPIF = L_0004 1723 %IF -X'8000' <= V_DISP <= X'7FFF' %START 9157 @ 96471: LINE 1723 "regression-compile-tmp/asems412.imp" 9158 @ 96510: PUSHI #0x00008000 9159 @ 96515: NEGATE 9160 @ 96516: PUSH V 9161 @ 96519: SELECT 1 9162 @ 96522: JUMPIFD > L_0007 9163 @ 96526: PUSHI #0x00007fff 9164 @ 96531: JUMPIF > L_0007 1724 %IF V_DISP # 0 %START 9165 @ 96535: LINE 1724 "regression-compile-tmp/asems412.imp" 9166 @ 96574: PUSH V 9167 @ 96577: SELECT 1 9168 @ 96580: PUSHI #0x00000000 9169 @ 96585: JUMPIF = L_000a 1725 RI2(LHI, R, V_BASE, V_DISP) 9170 @ 96589: LINE 1725 "regression-compile-tmp/asems412.imp" 9171 @ 96628: PUSH RI2 9172 @ 96631: PUSHI #0x0000c800 9173 @ 96636: ASSPAR 9174 @ 96637: PUSH R 9175 @ 96640: ASSPAR 9176 @ 96641: PUSH V 9177 @ 96644: SELECT 6 9178 @ 96647: ASSPAR 9179 @ 96648: PUSH V 9180 @ 96651: SELECT 1 9181 @ 96654: ASSPAR 9182 @ 96655: CALL 1726 %ELSE 9183 @ 96656: LINE 1726 "regression-compile-tmp/asems412.imp" 9184 @ 96695: GOTO L_0009 9185 @ 96698: LOCATE L_000a 1727 RR(LR,R,V_BASE) 9186 @ 96701: LINE 1727 "regression-compile-tmp/asems412.imp" 9187 @ 96740: PUSH RR 9188 @ 96743: PUSHI #0x00000800 9189 @ 96748: ASSPAR 9190 @ 96749: PUSH R 9191 @ 96752: ASSPAR 9192 @ 96753: PUSH V 9193 @ 96756: SELECT 6 9194 @ 96759: ASSPAR 9195 @ 96760: CALL 1728 %FINISH 9196 @ 96761: LINE 1728 "regression-compile-tmp/asems412.imp" 9197 @ 96800: LOCATE L_0009 1729 %ELSE 9198 @ 96803: LINE 1729 "regression-compile-tmp/asems412.imp" 9199 @ 96842: GOTO L_0006 9200 @ 96845: LOCATE L_0007 1730 RI3(LI, R, V_BASE, V_DISP) 9201 @ 96848: LINE 1730 "regression-compile-tmp/asems412.imp" 9202 @ 96887: PUSH RI3 9203 @ 96890: PUSHI #0x0000f800 9204 @ 96895: ASSPAR 9205 @ 96896: PUSH R 9206 @ 96899: ASSPAR 9207 @ 96900: PUSH V 9208 @ 96903: SELECT 6 9209 @ 96906: ASSPAR 9210 @ 96907: PUSH V 9211 @ 96910: SELECT 1 9212 @ 96913: ASSPAR 9213 @ 96914: CALL 1731 %FINISH 9214 @ 96915: LINE 1731 "regression-compile-tmp/asems412.imp" 9215 @ 96954: LOCATE L_0006 1732 CLAIM(R) 9216 @ 96957: LINE 1732 "regression-compile-tmp/asems412.imp" 9217 @ 96996: PUSH CLAIM 9218 @ 96999: PUSH R 9219 @ 97002: ASSPAR 9220 @ 97003: CALL 1733 REMEMBER(R, V) 9221 @ 97004: LINE 1733 "regression-compile-tmp/asems412.imp" 9222 @ 97043: PUSH REMEMBER 9223 @ 97046: PUSH R 9224 @ 97049: ASSPAR 9225 @ 97050: PUSH V 9226 @ 97053: ASSPAR 9227 @ 97054: CALL 1734 V_BASE = R; V_DISP = 0 9228 @ 97055: LINE 1734 "regression-compile-tmp/asems412.imp" 9229 @ 97094: PUSH V 9230 @ 97097: SELECT 6 9231 @ 97100: PUSH R 9232 @ 97103: ASSVAL 9233 @ 97104: LINE 1734 "regression-compile-tmp/asems412.imp" 9234 @ 97143: PUSH V 9235 @ 97146: SELECT 1 9236 @ 97149: PUSHI #0x00000000 9237 @ 97154: ASSVAL 1735 V_TYPE = INTEGER; V_FORM = V IN R 9238 @ 97155: LINE 1735 "regression-compile-tmp/asems412.imp" 9239 @ 97194: PUSH V 9240 @ 97197: SELECT 8 9241 @ 97200: PUSHI #0x00000001 9242 @ 97205: ASSVAL 9243 @ 97206: LINE 1735 "regression-compile-tmp/asems412.imp" 9244 @ 97245: PUSH V 9245 @ 97248: SELECT 9 9246 @ 97251: PUSHI #0x00000001 9247 @ 97256: ASSVAL 1736 %RETURN 9248 @ 97257: LINE 1736 "regression-compile-tmp/asems412.imp" 9249 @ 97296: RETURN 1737 %FINISH 9250 @ 97297: LINE 1737 "regression-compile-tmp/asems412.imp" 9251 @ 97336: LOCATE L_0004 1738 F(CONSTANT): 9252 @ 97339: LINE 1738 "regression-compile-tmp/asems412.imp" 9253 @ 97378: PUSHI #0x00000000 9254 @ 97383: SLABEL 332 1739 ABORT(16) %IF V_TYPE = REALS 9255 @ 97386: LINE 1739 "regression-compile-tmp/asems412.imp" 9256 @ 97425: PUSH V 9257 @ 97428: SELECT 8 9258 @ 97431: PUSHI #0x00000006 9259 @ 97436: JUMPIF # L_0004 9260 @ 97440: PUSH ABORT 9261 @ 97443: PUSHI #0x00000010 9262 @ 97448: ASSPAR 9263 @ 97449: CALL 9264 @ 97450: LOCATE L_0004 1740 D = V_DISP 9265 @ 97453: LINE 1740 "regression-compile-tmp/asems412.imp" 9266 @ 97492: PUSH D 9267 @ 97495: PUSH V 9268 @ 97498: SELECT 1 9269 @ 97501: ASSVAL 1741 %IF -15 <= D <= 15 %START 9270 @ 97502: LINE 1741 "regression-compile-tmp/asems412.imp" 9271 @ 97541: PUSHI #0x0000000f 9272 @ 97546: NEGATE 9273 @ 97547: PUSH D 9274 @ 97550: JUMPIFD > L_0004 9275 @ 97554: PUSHI #0x0000000f 9276 @ 97559: JUMPIF > L_0004 1742 %IF D >= 0 %START 9277 @ 97563: LINE 1742 "regression-compile-tmp/asems412.imp" 9278 @ 97602: PUSH D 9279 @ 97605: PUSHI #0x00000000 9280 @ 97610: JUMPIF < L_0007 1743 SF(LIS, R, D) 9281 @ 97614: LINE 1743 "regression-compile-tmp/asems412.imp" 9282 @ 97653: PUSH SF 9283 @ 97656: PUSHI #0x00002400 9284 @ 97661: ASSPAR 9285 @ 97662: PUSH R 9286 @ 97665: ASSPAR 9287 @ 97666: PUSH D 9288 @ 97669: ASSPAR 9289 @ 97670: CALL 1744 %ELSE 9290 @ 97671: LINE 1744 "regression-compile-tmp/asems412.imp" 9291 @ 97710: GOTO L_0006 9292 @ 97713: LOCATE L_0007 1745 SF(LCS, R, -D) 9293 @ 97716: LINE 1745 "regression-compile-tmp/asems412.imp" 9294 @ 97755: PUSH SF 9295 @ 97758: PUSHI #0x00002500 9296 @ 97763: ASSPAR 9297 @ 97764: PUSH R 9298 @ 97767: ASSPAR 9299 @ 97768: PUSH D 9300 @ 97771: NEGATE 9301 @ 97772: ASSPAR 9302 @ 97773: CALL 1746 %FINISH 9303 @ 97774: LINE 1746 "regression-compile-tmp/asems412.imp" 9304 @ 97813: LOCATE L_0006 1747 %ELSE 9305 @ 97816: LINE 1747 "regression-compile-tmp/asems412.imp" 9306 @ 97855: GOTO L_0003 9307 @ 97858: LOCATE L_0004 1748 %IF -X'8000' <= D <= X'7FFF' %START 9308 @ 97861: LINE 1748 "regression-compile-tmp/asems412.imp" 9309 @ 97900: PUSHI #0x00008000 9310 @ 97905: NEGATE 9311 @ 97906: PUSH D 9312 @ 97909: JUMPIFD > L_0007 9313 @ 97913: PUSHI #0x00007fff 9314 @ 97918: JUMPIF > L_0007 1749 RI2(LHI, R, 0, D) 9315 @ 97922: LINE 1749 "regression-compile-tmp/asems412.imp" 9316 @ 97961: PUSH RI2 9317 @ 97964: PUSHI #0x0000c800 9318 @ 97969: ASSPAR 9319 @ 97970: PUSH R 9320 @ 97973: ASSPAR 9321 @ 97974: PUSHI #0x00000000 9322 @ 97979: ASSPAR 9323 @ 97980: PUSH D 9324 @ 97983: ASSPAR 9325 @ 97984: CALL 1750 %ELSE 9326 @ 97985: LINE 1750 "regression-compile-tmp/asems412.imp" 9327 @ 98024: GOTO L_0006 9328 @ 98027: LOCATE L_0007 1751 RI3(LI, R, 0, D) 9329 @ 98030: LINE 1751 "regression-compile-tmp/asems412.imp" 9330 @ 98069: PUSH RI3 9331 @ 98072: PUSHI #0x0000f800 9332 @ 98077: ASSPAR 9333 @ 98078: PUSH R 9334 @ 98081: ASSPAR 9335 @ 98082: PUSHI #0x00000000 9336 @ 98087: ASSPAR 9337 @ 98088: PUSH D 9338 @ 98091: ASSPAR 9339 @ 98092: CALL 1752 %FINISH 9340 @ 98093: LINE 1752 "regression-compile-tmp/asems412.imp" 9341 @ 98132: LOCATE L_0006 1753 %FINISH 9342 @ 98135: LINE 1753 "regression-compile-tmp/asems412.imp" 9343 @ 98174: LOCATE L_0003 1754 CLAIM(R); REMEMBER(R, V) 9344 @ 98177: LINE 1754 "regression-compile-tmp/asems412.imp" 9345 @ 98216: PUSH CLAIM 9346 @ 98219: PUSH R 9347 @ 98222: ASSPAR 9348 @ 98223: CALL 9349 @ 98224: LINE 1754 "regression-compile-tmp/asems412.imp" 9350 @ 98263: PUSH REMEMBER 9351 @ 98266: PUSH R 9352 @ 98269: ASSPAR 9353 @ 98270: PUSH V 9354 @ 98273: ASSPAR 9355 @ 98274: CALL 1755 V_BASE = R; V_DISP = 0 9356 @ 98275: LINE 1755 "regression-compile-tmp/asems412.imp" 9357 @ 98314: PUSH V 9358 @ 98317: SELECT 6 9359 @ 98320: PUSH R 9360 @ 98323: ASSVAL 9361 @ 98324: LINE 1755 "regression-compile-tmp/asems412.imp" 9362 @ 98363: PUSH V 9363 @ 98366: SELECT 1 9364 @ 98369: PUSHI #0x00000000 9365 @ 98374: ASSVAL 1756 V_TYPE = INTEGER; V_FORM = V IN R 9366 @ 98375: LINE 1756 "regression-compile-tmp/asems412.imp" 9367 @ 98414: PUSH V 9368 @ 98417: SELECT 8 9369 @ 98420: PUSHI #0x00000001 9370 @ 98425: ASSVAL 9371 @ 98426: LINE 1756 "regression-compile-tmp/asems412.imp" 9372 @ 98465: PUSH V 9373 @ 98468: SELECT 9 9374 @ 98471: PUSHI #0x00000001 9375 @ 98476: ASSVAL 1757 %RETURN 9376 @ 98477: LINE 1757 "regression-compile-tmp/asems412.imp" 9377 @ 98516: RETURN 1758 F(V IN R): 9378 @ 98517: LINE 1758 "regression-compile-tmp/asems412.imp" 9379 @ 98556: PUSHI #0x00000001 9380 @ 98561: SLABEL 332 1759 OP = LR 9381 @ 98564: LINE 1759 "regression-compile-tmp/asems412.imp" 9382 @ 98603: PUSH OP 9383 @ 98606: PUSHI #0x00000800 9384 @ 98611: ASSVAL 1760 %RETURN %IF V_BASE = R 9385 @ 98612: LINE 1760 "regression-compile-tmp/asems412.imp" 9386 @ 98651: PUSH V 9387 @ 98654: SELECT 6 9388 @ 98657: PUSH R 9389 @ 98660: JUMPIF # L_0004 9390 @ 98664: RETURN 9391 @ 98665: LOCATE L_0004 1761 OP = LER %IF V_TYPE = REALS 9392 @ 98668: LINE 1761 "regression-compile-tmp/asems412.imp" 9393 @ 98707: PUSH V 9394 @ 98710: SELECT 8 9395 @ 98713: PUSHI #0x00000006 9396 @ 98718: JUMPIF # L_0004 9397 @ 98722: PUSH OP 9398 @ 98725: PUSHI #0x00002800 9399 @ 98730: ASSVAL 9400 @ 98731: LOCATE L_0004 1762 RR(OP, R, V_BASE); CLAIM(R) 9401 @ 98734: LINE 1762 "regression-compile-tmp/asems412.imp" 9402 @ 98773: PUSH RR 9403 @ 98776: PUSH OP 9404 @ 98779: ASSPAR 9405 @ 98780: PUSH R 9406 @ 98783: ASSPAR 9407 @ 98784: PUSH V 9408 @ 98787: SELECT 6 9409 @ 98790: ASSPAR 9410 @ 98791: CALL 9411 @ 98792: LINE 1762 "regression-compile-tmp/asems412.imp" 9412 @ 98831: PUSH CLAIM 9413 @ 98834: PUSH R 9414 @ 98837: ASSPAR 9415 @ 98838: CALL 1763 CCREG = R; CCCA = CA 9416 @ 98839: LINE 1763 "regression-compile-tmp/asems412.imp" 9417 @ 98878: PUSH CCREG 9418 @ 98881: PUSH R 9419 @ 98884: ASSVAL 9420 @ 98885: LINE 1763 "regression-compile-tmp/asems412.imp" 9421 @ 98924: PUSH CCCA 9422 @ 98927: PUSH CA 9423 @ 98930: ASSVAL 1764 FORGET(R) 9424 @ 98931: LINE 1764 "regression-compile-tmp/asems412.imp" 9425 @ 98970: PUSH FORGET 9426 @ 98973: PUSH R 9427 @ 98976: ASSPAR 9428 @ 98977: CALL 1765 USE(R) = USE(V_BASE) 9429 @ 98978: LINE 1765 "regression-compile-tmp/asems412.imp" 9430 @ 99017: PUSH USE 9431 @ 99020: PUSH R 9432 @ 99023: ACCESS 9433 @ 99024: PUSH USE 9434 @ 99027: PUSH V 9435 @ 99030: SELECT 6 9436 @ 99033: ACCESS 9437 @ 99034: ASSVAL 1766 V_BASE = R 9438 @ 99035: LINE 1766 "regression-compile-tmp/asems412.imp" 9439 @ 99074: PUSH V 9440 @ 99077: SELECT 6 9441 @ 99080: PUSH R 9442 @ 99083: ASSVAL 1767 %RETURN 9443 @ 99084: LINE 1767 "regression-compile-tmp/asems412.imp" 9444 @ 99123: RETURN 1768 F(A IN S): 9445 @ 99124: LINE 1768 "regression-compile-tmp/asems412.imp" 9446 @ 99163: PUSHI #0x00000002 9447 @ 99168: SLABEL 332 1769 TYPE = V_TYPE 9448 @ 99171: LINE 1769 "regression-compile-tmp/asems412.imp" 9449 @ 99210: PUSH TYPE 9450 @ 99213: PUSH V 9451 @ 99216: SELECT 8 9452 @ 99219: ASSVAL 1770 V_TYPE = INTEGER; V_FORM = V IN S 9453 @ 99220: LINE 1770 "regression-compile-tmp/asems412.imp" 9454 @ 99259: PUSH V 9455 @ 99262: SELECT 8 9456 @ 99265: PUSHI #0x00000001 9457 @ 99270: ASSVAL 9458 @ 99271: LINE 1770 "regression-compile-tmp/asems412.imp" 9459 @ 99310: PUSH V 9460 @ 99313: SELECT 9 9461 @ 99316: PUSHI #0x00000003 9462 @ 99321: ASSVAL 1771 CLAIM(R); LOAD(V, ANY0); RELEASE(R) 9463 @ 99322: LINE 1771 "regression-compile-tmp/asems412.imp" 9464 @ 99361: PUSH CLAIM 9465 @ 99364: PUSH R 9466 @ 99367: ASSPAR 9467 @ 99368: CALL 9468 @ 99369: LINE 1771 "regression-compile-tmp/asems412.imp" 9469 @ 99408: PUSH LOAD 9470 @ 99411: PUSH V 9471 @ 99414: ASSPAR 9472 @ 99415: PUSHI #0x0000002e 9473 @ 99420: ASSPAR 9474 @ 99421: CALL 9475 @ 99422: LINE 1771 "regression-compile-tmp/asems412.imp" 9476 @ 99461: PUSH RELEASE 9477 @ 99464: PUSH R 9478 @ 99467: ASSPAR 9479 @ 99468: CALL 1772 V_TYPE = TYPE; V_FORM = V IN S 9480 @ 99469: LINE 1772 "regression-compile-tmp/asems412.imp" 9481 @ 99508: PUSH V 9482 @ 99511: SELECT 8 9483 @ 99514: PUSH TYPE 9484 @ 99517: ASSVAL 9485 @ 99518: LINE 1772 "regression-compile-tmp/asems412.imp" 9486 @ 99557: PUSH V 9487 @ 99560: SELECT 9 9488 @ 99563: PUSHI #0x00000003 9489 @ 99568: ASSVAL 1773 F(V IN S): 9490 @ 99569: LINE 1773 "regression-compile-tmp/asems412.imp" 9491 @ 99608: PUSHI #0x00000003 9492 @ 99613: SLABEL 332 1774 RANGE(V_BASE, V_DISP) 9493 @ 99616: LINE 1774 "regression-compile-tmp/asems412.imp" 9494 @ 99655: PUSH RANGE 9495 @ 99658: PUSH V 9496 @ 99661: SELECT 6 9497 @ 99664: ASSPAR 9498 @ 99665: PUSH V 9499 @ 99668: SELECT 1 9500 @ 99671: ASSPAR 9501 @ 99672: CALL 1775 CCREG = R; CCCA = CA+4 9502 @ 99673: LINE 1775 "regression-compile-tmp/asems412.imp" 9503 @ 99712: PUSH CCREG 9504 @ 99715: PUSH R 9505 @ 99718: ASSVAL 9506 @ 99719: LINE 1775 "regression-compile-tmp/asems412.imp" 9507 @ 99758: PUSH CCCA 9508 @ 99761: PUSH CA 9509 @ 99764: PUSHI #0x00000004 9510 @ 99769: ADD 9511 @ 99770: ASSVAL 1776 %IF V_TYPE = INTEGER %START 9512 @ 99771: LINE 1776 "regression-compile-tmp/asems412.imp" 9513 @ 99810: PUSH V 9514 @ 99813: SELECT 8 9515 @ 99816: PUSHI #0x00000001 9516 @ 99821: JUMPIF # L_0004 1777 OP = LW 9517 @ 99825: LINE 1777 "regression-compile-tmp/asems412.imp" 9518 @ 99864: PUSH OP 9519 @ 99867: PUSHI #0x00005800 9520 @ 99872: ASSVAL 1778 %ELSE %IF V_TYPE = SHORT 9521 @ 99873: LINE 1778 "regression-compile-tmp/asems412.imp" 9522 @ 99912: GOTO L_0003 9523 @ 99915: LOCATE L_0004 9524 @ 99918: PUSH V 9525 @ 99921: SELECT 8 9526 @ 99924: PUSHI #0x00000003 9527 @ 99929: JUMPIF # L_0004 1779 OP = LH 9528 @ 99933: LINE 1779 "regression-compile-tmp/asems412.imp" 9529 @ 99972: PUSH OP 9530 @ 99975: PUSHI #0x00004800 9531 @ 99980: ASSVAL 1780 %ELSE %IF V_TYPE = BYTE 9532 @ 99981: LINE 1780 "regression-compile-tmp/asems412.imp" 9533 @ 100020: GOTO L_0003 9534 @ 100023: LOCATE L_0004 9535 @ 100026: PUSH V 9536 @ 100029: SELECT 8 9537 @ 100032: PUSHI #0x00000002 9538 @ 100037: JUMPIF # L_0004 1781 OP = LB; CCCA = 0 9539 @ 100041: LINE 1781 "regression-compile-tmp/asems412.imp" 9540 @ 100080: PUSH OP 9541 @ 100083: PUSHI #0x0000d300 9542 @ 100088: ASSVAL 9543 @ 100089: LINE 1781 "regression-compile-tmp/asems412.imp" 9544 @ 100128: PUSH CCCA 9545 @ 100131: PUSHI #0x00000000 9546 @ 100136: ASSVAL 1782 %ELSE %IF V_TYPE = REALS 9547 @ 100137: LINE 1782 "regression-compile-tmp/asems412.imp" 9548 @ 100176: GOTO L_0003 9549 @ 100179: LOCATE L_0004 9550 @ 100182: PUSH V 9551 @ 100185: SELECT 8 9552 @ 100188: PUSHI #0x00000006 9553 @ 100193: JUMPIF # L_0004 1783 OP = LE 9554 @ 100197: LINE 1783 "regression-compile-tmp/asems412.imp" 9555 @ 100236: PUSH OP 9556 @ 100239: PUSHI #0x00006800 9557 @ 100244: ASSVAL 1784 %ELSE 9558 @ 100245: LINE 1784 "regression-compile-tmp/asems412.imp" 9559 @ 100284: GOTO L_0003 9560 @ 100287: LOCATE L_0004 1785 OP = LHL; ! INTERNALLY GENERATED 'UNSIGNED HALFWORD' 9561 @ 100290: LINE 1785 "regression-compile-tmp/asems412.imp" 9562 @ 100329: PUSH OP 9563 @ 100332: PUSHI #0x00007300 9564 @ 100337: ASSVAL 1786 %FINISH 9565 @ 100338: LINE 1786 "regression-compile-tmp/asems412.imp" 9566 @ 100377: LOCATE L_0003 1787 RX(OP, R, V_BASE, V_DISP) 9567 @ 100380: LINE 1787 "regression-compile-tmp/asems412.imp" 9568 @ 100419: PUSH RX 9569 @ 100422: PUSH OP 9570 @ 100425: ASSPAR 9571 @ 100426: PUSH R 9572 @ 100429: ASSPAR 9573 @ 100430: PUSH V 9574 @ 100433: SELECT 6 9575 @ 100436: ASSPAR 9576 @ 100437: PUSH V 9577 @ 100440: SELECT 1 9578 @ 100443: ASSPAR 9579 @ 100444: CALL 1788 CLAIM(R); REMEMBER(R, V) 9580 @ 100445: LINE 1788 "regression-compile-tmp/asems412.imp" 9581 @ 100484: PUSH CLAIM 9582 @ 100487: PUSH R 9583 @ 100490: ASSPAR 9584 @ 100491: CALL 9585 @ 100492: LINE 1788 "regression-compile-tmp/asems412.imp" 9586 @ 100531: PUSH REMEMBER 9587 @ 100534: PUSH R 9588 @ 100537: ASSPAR 9589 @ 100538: PUSH V 9590 @ 100541: ASSPAR 9591 @ 100542: CALL 1789 V_BASE = R; V_DISP = 0 9592 @ 100543: LINE 1789 "regression-compile-tmp/asems412.imp" 9593 @ 100582: PUSH V 9594 @ 100585: SELECT 6 9595 @ 100588: PUSH R 9596 @ 100591: ASSVAL 9597 @ 100592: LINE 1789 "regression-compile-tmp/asems412.imp" 9598 @ 100631: PUSH V 9599 @ 100634: SELECT 1 9600 @ 100637: PUSHI #0x00000000 9601 @ 100642: ASSVAL 1790 V_FORM = V IN R 9602 @ 100643: LINE 1790 "regression-compile-tmp/asems412.imp" 9603 @ 100682: PUSH V 9604 @ 100685: SELECT 9 9605 @ 100688: PUSHI #0x00000001 9606 @ 100693: ASSVAL 1791 %RETURN 9607 @ 100694: LINE 1791 "regression-compile-tmp/asems412.imp" 9608 @ 100733: RETURN 1792 IOP(ADD): 9609 @ 100734: LINE 1792 "regression-compile-tmp/asems412.imp" 9610 @ 100773: PUSHI #0x00000003 9611 @ 100778: SLABEL 333 1793 %IF W_FORM = V IN R %AND W_BASE # R %AND V_FORM = CONSTANT %START 9612 @ 100781: LINE 1793 "regression-compile-tmp/asems412.imp" 9613 @ 100820: PUSH W 9614 @ 100823: SELECT 9 9615 @ 100826: PUSHI #0x00000001 9616 @ 100831: JUMPIF # L_0004 9617 @ 100835: PUSH W 9618 @ 100838: SELECT 6 9619 @ 100841: PUSH R 9620 @ 100844: JUMPIF = L_0004 9621 @ 100848: PUSH V 9622 @ 100851: SELECT 9 9623 @ 100854: PUSHI #0x00000000 9624 @ 100859: JUMPIF # L_0004 1794 D = V_DISP 9625 @ 100863: LINE 1794 "regression-compile-tmp/asems412.imp" 9626 @ 100902: PUSH D 9627 @ 100905: PUSH V 9628 @ 100908: SELECT 1 9629 @ 100911: ASSVAL 1795 %IF (USE(W_BASE)_CA > LIMEN %OR USE(W_BASE+STORE)_CA > LIMEN %C 1796 %OR D < -15 %OR D > 15) %AND CA # ADDXCA %START 9630 @ 100912: LINE 1795 "regression-compile-tmp/asems412.imp" 9631 @ 100951: PUSH USE 9632 @ 100954: PUSH W 9633 @ 100957: SELECT 6 9634 @ 100960: ACCESS 9635 @ 100961: SELECT 2 9636 @ 100964: PUSH LIMEN 9637 @ 100967: JUMPIF > L_0008 9638 @ 100971: PUSH USE 9639 @ 100974: PUSH W 9640 @ 100977: SELECT 6 9641 @ 100980: PUSHI #0x00000014 9642 @ 100985: ADD 9643 @ 100986: ACCESS 9644 @ 100987: SELECT 2 9645 @ 100990: PUSH LIMEN 9646 @ 100993: JUMPIF > L_0008 9647 @ 100997: PUSH D 9648 @ 101000: PUSHI #0x0000000f 9649 @ 101005: NEGATE 9650 @ 101006: JUMPIF < L_0008 9651 @ 101010: PUSH D 9652 @ 101013: PUSHI #0x0000000f 9653 @ 101018: JUMPIF <= L_0007 9654 @ 101022: LOCATE L_0008 9655 @ 101025: PUSH CA 9656 @ 101028: PUSH ADDXCA 9657 @ 101031: JUMPIF = L_0007 1797 %IF R >= ANY %START 9658 @ 101035: LINE 1797 "regression-compile-tmp/asems412.imp" 9659 @ 101074: PUSH R 9660 @ 101077: PUSHI #0x0000002d 9661 @ 101082: JUMPIF < L_000a 1798 R = GPR(R-ANY) 9662 @ 101086: LINE 1798 "regression-compile-tmp/asems412.imp" 9663 @ 101125: PUSH R 9664 @ 101128: PUSH GPR 9665 @ 101131: PUSH R 9666 @ 101134: PUSHI #0x0000002d 9667 @ 101139: SUB 9668 @ 101140: ASSPAR 9669 @ 101141: CALL 9670 @ 101142: ASSVAL 1799 %ELSE %IF W_BASE # R %OR ACTIVITY(R) # 1 9671 @ 101143: LINE 1799 "regression-compile-tmp/asems412.imp" 9672 @ 101182: GOTO L_0009 9673 @ 101185: LOCATE L_000a 9674 @ 101188: PUSH W 9675 @ 101191: SELECT 6 9676 @ 101194: PUSH R 9677 @ 101197: JUMPIF # L_000b 9678 @ 101201: PUSH ACTIVITY 9679 @ 101204: PUSH R 9680 @ 101207: ACCESS 9681 @ 101208: PUSHI #0x00000001 9682 @ 101213: JUMPIF = L_000a 9683 @ 101217: LOCATE L_000b 1800 HAZARD(R) 9684 @ 101220: LINE 1800 "regression-compile-tmp/asems412.imp" 9685 @ 101259: PUSH HAZARD 9686 @ 101262: PUSH R 9687 @ 101265: ASSPAR 9688 @ 101266: CALL 1801 %FINISH 9689 @ 101267: LINE 1801 "regression-compile-tmp/asems412.imp" 9690 @ 101306: LOCATE L_000a 9691 @ 101309: LOCATE L_0009 1802 %IF -X'8000'<=D<=X'7FFF' %THEN RI2(LHI,R,W_BASE,D) %C 1803 %ELSE RI3(LI,R,W_BASE,D) 9692 @ 101312: LINE 1802 "regression-compile-tmp/asems412.imp" 9693 @ 101351: PUSHI #0x00008000 9694 @ 101356: NEGATE 9695 @ 101357: PUSH D 9696 @ 101360: JUMPIFD > L_000a 9697 @ 101364: PUSHI #0x00007fff 9698 @ 101369: JUMPIF > L_000a 9699 @ 101373: PUSH RI2 9700 @ 101376: PUSHI #0x0000c800 9701 @ 101381: ASSPAR 9702 @ 101382: PUSH R 9703 @ 101385: ASSPAR 9704 @ 101386: PUSH W 9705 @ 101389: SELECT 6 9706 @ 101392: ASSPAR 9707 @ 101393: PUSH D 9708 @ 101396: ASSPAR 9709 @ 101397: CALL 9710 @ 101398: GOTO L_0009 9711 @ 101401: LOCATE L_000a 9712 @ 101404: PUSH RI3 9713 @ 101407: PUSHI #0x0000f800 9714 @ 101412: ASSPAR 9715 @ 101413: PUSH R 9716 @ 101416: ASSPAR 9717 @ 101417: PUSH W 9718 @ 101420: SELECT 6 9719 @ 101423: ASSPAR 9720 @ 101424: PUSH D 9721 @ 101427: ASSPAR 9722 @ 101428: CALL 9723 @ 101429: LOCATE L_0009 1804 CCREG = R; CCCA = CA 9724 @ 101432: LINE 1804 "regression-compile-tmp/asems412.imp" 9725 @ 101471: PUSH CCREG 9726 @ 101474: PUSH R 9727 @ 101477: ASSVAL 9728 @ 101478: LINE 1804 "regression-compile-tmp/asems412.imp" 9729 @ 101517: PUSH CCCA 9730 @ 101520: PUSH CA 9731 @ 101523: ASSVAL 1805 V_DISP = 0; V_FORM = V IN R 9732 @ 101524: LINE 1805 "regression-compile-tmp/asems412.imp" 9733 @ 101563: PUSH V 9734 @ 101566: SELECT 1 9735 @ 101569: PUSHI #0x00000000 9736 @ 101574: ASSVAL 9737 @ 101575: LINE 1805 "regression-compile-tmp/asems412.imp" 9738 @ 101614: PUSH V 9739 @ 101617: SELECT 9 9740 @ 101620: PUSHI #0x00000001 9741 @ 101625: ASSVAL 1806 V_BASE = R; CLAIM(R) 9742 @ 101626: LINE 1806 "regression-compile-tmp/asems412.imp" 9743 @ 101665: PUSH V 9744 @ 101668: SELECT 6 9745 @ 101671: PUSH R 9746 @ 101674: ASSVAL 9747 @ 101675: LINE 1806 "regression-compile-tmp/asems412.imp" 9748 @ 101714: PUSH CLAIM 9749 @ 101717: PUSH R 9750 @ 101720: ASSPAR 9751 @ 101721: CALL 1807 ->END OP 9752 @ 101722: LINE 1807 "regression-compile-tmp/asems412.imp" 9753 @ 101761: JUMP L_015c 1808 %FINISH 9754 @ 101764: LINE 1808 "regression-compile-tmp/asems412.imp" 9755 @ 101803: LOCATE L_0007 1809 %FINISH 9756 @ 101806: LINE 1809 "regression-compile-tmp/asems412.imp" 9757 @ 101845: LOCATE L_0004 1810 IOP(SADD): 9758 @ 101848: LINE 1810 "regression-compile-tmp/asems412.imp" 9759 @ 101887: PUSHI #0x0000000f 9760 @ 101892: SLABEL 333 1811 IOP(SUB): 9761 @ 101895: LINE 1811 "regression-compile-tmp/asems412.imp" 9762 @ 101934: PUSHI #0x00000004 9763 @ 101939: SLABEL 333 1812 LOAD(V, R); R = V_BASE 9764 @ 101942: LINE 1812 "regression-compile-tmp/asems412.imp" 9765 @ 101981: PUSH LOAD 9766 @ 101984: PUSH V 9767 @ 101987: ASSPAR 9768 @ 101988: PUSH R 9769 @ 101991: ASSPAR 9770 @ 101992: CALL 9771 @ 101993: LINE 1812 "regression-compile-tmp/asems412.imp" 9772 @ 102032: PUSH R 9773 @ 102035: PUSH V 9774 @ 102038: SELECT 6 9775 @ 102041: ASSVAL 1813 LOAD(W, ANY) %IF W_TYPE = BYTE %OR W_TYPE = UNSIGNED HALFWORD 9776 @ 102042: LINE 1813 "regression-compile-tmp/asems412.imp" 9777 @ 102081: PUSH W 9778 @ 102084: SELECT 8 9779 @ 102087: PUSHI #0x00000002 9780 @ 102092: JUMPIF = L_0005 9781 @ 102096: PUSH W 9782 @ 102099: SELECT 8 9783 @ 102102: PUSHI #0x000000ff 9784 @ 102107: JUMPIF # L_0004 9785 @ 102111: LOCATE L_0005 9786 @ 102114: PUSH LOAD 9787 @ 102117: PUSH W 9788 @ 102120: ASSPAR 9789 @ 102121: PUSHI #0x0000002d 9790 @ 102126: ASSPAR 9791 @ 102127: CALL 9792 @ 102128: LOCATE L_0004 1814 %IF W_FORM = CONSTANT %START 9793 @ 102131: LINE 1814 "regression-compile-tmp/asems412.imp" 9794 @ 102170: PUSH W 9795 @ 102173: SELECT 9 9796 @ 102176: PUSHI #0x00000000 9797 @ 102181: JUMPIF # L_0004 1815 D = W_DISP 9798 @ 102185: LINE 1815 "regression-compile-tmp/asems412.imp" 9799 @ 102224: PUSH D 9800 @ 102227: PUSH W 9801 @ 102230: SELECT 1 9802 @ 102233: ASSVAL 1816 %IF -15 <= D <= 15 %START 9803 @ 102234: LINE 1816 "regression-compile-tmp/asems412.imp" 9804 @ 102273: PUSHI #0x0000000f 9805 @ 102278: NEGATE 9806 @ 102279: PUSH D 9807 @ 102282: JUMPIFD > L_0007 9808 @ 102286: PUSHI #0x0000000f 9809 @ 102291: JUMPIF > L_0007 1817 D = -D %AND KEY = 6-KEY %IF D < 0 9810 @ 102295: LINE 1817 "regression-compile-tmp/asems412.imp" 9811 @ 102334: PUSH D 9812 @ 102337: PUSHI #0x00000000 9813 @ 102342: JUMPIF >= L_000a 9814 @ 102346: PUSH D 9815 @ 102349: PUSH D 9816 @ 102352: NEGATE 9817 @ 102353: ASSVAL 9818 @ 102354: PUSH KEY 9819 @ 102357: PUSHI #0x00000006 9820 @ 102362: PUSH KEY 9821 @ 102365: SUB 9822 @ 102366: ASSVAL 9823 @ 102367: LOCATE L_000a 1818 SF(PM(KEY+1), R, D) 9824 @ 102370: LINE 1818 "regression-compile-tmp/asems412.imp" 9825 @ 102409: PUSH SF 9826 @ 102412: PUSH PM 9827 @ 102415: PUSH KEY 9828 @ 102418: PUSHI #0x00000001 9829 @ 102423: ADD 9830 @ 102424: ACCESS 9831 @ 102425: ASSPAR 9832 @ 102426: PUSH R 9833 @ 102429: ASSPAR 9834 @ 102430: PUSH D 9835 @ 102433: ASSPAR 9836 @ 102434: CALL 1819 %ELSE 9837 @ 102435: LINE 1819 "regression-compile-tmp/asems412.imp" 9838 @ 102474: GOTO L_0006 9839 @ 102477: LOCATE L_0007 1820 %IF -X'8000' <= D <= X'7FFF' %START 9840 @ 102480: LINE 1820 "regression-compile-tmp/asems412.imp" 9841 @ 102519: PUSHI #0x00008000 9842 @ 102524: NEGATE 9843 @ 102525: PUSH D 9844 @ 102528: JUMPIFD > L_000a 9845 @ 102532: PUSHI #0x00007fff 9846 @ 102537: JUMPIF > L_000a 1821 %IF CA = ADDXCA %AND R = ADDXD %START 9847 @ 102541: LINE 1821 "regression-compile-tmp/asems412.imp" 9848 @ 102580: PUSH CA 9849 @ 102583: PUSH ADDXCA 9850 @ 102586: JUMPIF # L_000d 9851 @ 102590: PUSH R 9852 @ 102593: PUSH ADDXD 9853 @ 102596: JUMPIF # L_000d 1822 D = -D %IF ADDXKEY # KEY 9854 @ 102600: LINE 1822 "regression-compile-tmp/asems412.imp" 9855 @ 102639: PUSH ADDXKEY 9856 @ 102642: PUSH KEY 9857 @ 102645: JUMPIF = L_0010 9858 @ 102649: PUSH D 9859 @ 102652: PUSH D 9860 @ 102655: NEGATE 9861 @ 102656: ASSVAL 9862 @ 102657: LOCATE L_0010 1823 DUMP(D) 9863 @ 102660: LINE 1823 "regression-compile-tmp/asems412.imp" 9864 @ 102699: PUSH DUMP 9865 @ 102702: PUSH D 9866 @ 102705: ASSPAR 9867 @ 102706: CALL 1824 PATCH(PM(ADDXKEY+2)+ACTUAL(R)<<4+ACTUAL(ADDXS), %C 1825 ADDXCA-2) 9868 @ 102707: LINE 1824 "regression-compile-tmp/asems412.imp" 9869 @ 102746: PUSH PATCH 9870 @ 102749: PUSH PM 9871 @ 102752: PUSH ADDXKEY 9872 @ 102755: PUSHI #0x00000002 9873 @ 102760: ADD 9874 @ 102761: ACCESS 9875 @ 102762: PUSH ACTUAL 9876 @ 102765: PUSH R 9877 @ 102768: ACCESS 9878 @ 102769: PUSHI #0x00000004 9879 @ 102774: LSH 9880 @ 102775: ADD 9881 @ 102776: PUSH ACTUAL 9882 @ 102779: PUSH ADDXS 9883 @ 102782: ACCESS 9884 @ 102783: ADD 9885 @ 102784: ASSPAR 9886 @ 102785: PUSH ADDXCA 9887 @ 102788: PUSHI #0x00000002 9888 @ 102793: SUB 9889 @ 102794: ASSPAR 9890 @ 102795: CALL 1826 %FINISH %ELSE RI2(PM(KEY+2), R, 0, D) 9891 @ 102796: LINE 1826 "regression-compile-tmp/asems412.imp" 9892 @ 102835: GOTO L_000c 9893 @ 102838: LOCATE L_000d 9894 @ 102841: PUSH RI2 9895 @ 102844: PUSH PM 9896 @ 102847: PUSH KEY 9897 @ 102850: PUSHI #0x00000002 9898 @ 102855: ADD 9899 @ 102856: ACCESS 9900 @ 102857: ASSPAR 9901 @ 102858: PUSH R 9902 @ 102861: ASSPAR 9903 @ 102862: PUSHI #0x00000000 9904 @ 102867: ASSPAR 9905 @ 102868: PUSH D 9906 @ 102871: ASSPAR 9907 @ 102872: CALL 9908 @ 102873: LOCATE L_000c 1827 %ELSE 9909 @ 102876: LINE 1827 "regression-compile-tmp/asems412.imp" 9910 @ 102915: GOTO L_0009 9911 @ 102918: LOCATE L_000a 1828 RI3(PM(KEY+5), R, 0, D) 9912 @ 102921: LINE 1828 "regression-compile-tmp/asems412.imp" 9913 @ 102960: PUSH RI3 9914 @ 102963: PUSH PM 9915 @ 102966: PUSH KEY 9916 @ 102969: PUSHI #0x00000005 9917 @ 102974: ADD 9918 @ 102975: ACCESS 9919 @ 102976: ASSPAR 9920 @ 102977: PUSH R 9921 @ 102980: ASSPAR 9922 @ 102981: PUSHI #0x00000000 9923 @ 102986: ASSPAR 9924 @ 102987: PUSH D 9925 @ 102990: ASSPAR 9926 @ 102991: CALL 1829 %FINISH 9927 @ 102992: LINE 1829 "regression-compile-tmp/asems412.imp" 9928 @ 103031: LOCATE L_0009 1830 %FINISH 9929 @ 103034: LINE 1830 "regression-compile-tmp/asems412.imp" 9930 @ 103073: LOCATE L_0006 1831 %ELSE %IF W_FORM = V IN R 9931 @ 103076: LINE 1831 "regression-compile-tmp/asems412.imp" 9932 @ 103115: GOTO L_0003 9933 @ 103118: LOCATE L_0004 9934 @ 103121: PUSH W 9935 @ 103124: SELECT 9 9936 @ 103127: PUSHI #0x00000001 9937 @ 103132: JUMPIF # L_0004 1832 RR(PM(KEY), R, W_BASE) 9938 @ 103136: LINE 1832 "regression-compile-tmp/asems412.imp" 9939 @ 103175: PUSH RR 9940 @ 103178: PUSH PM 9941 @ 103181: PUSH KEY 9942 @ 103184: ACCESS 9943 @ 103185: ASSPAR 9944 @ 103186: PUSH R 9945 @ 103189: ASSPAR 9946 @ 103190: PUSH W 9947 @ 103193: SELECT 6 9948 @ 103196: ASSPAR 9949 @ 103197: CALL 1833 ADDXCA = CA; ADDXD = R; ADDXKEY = KEY; ADDXS = W_BASE 9950 @ 103198: LINE 1833 "regression-compile-tmp/asems412.imp" 9951 @ 103237: PUSH ADDXCA 9952 @ 103240: PUSH CA 9953 @ 103243: ASSVAL 9954 @ 103244: LINE 1833 "regression-compile-tmp/asems412.imp" 9955 @ 103283: PUSH ADDXD 9956 @ 103286: PUSH R 9957 @ 103289: ASSVAL 9958 @ 103290: LINE 1833 "regression-compile-tmp/asems412.imp" 9959 @ 103329: PUSH ADDXKEY 9960 @ 103332: PUSH KEY 9961 @ 103335: ASSVAL 9962 @ 103336: LINE 1833 "regression-compile-tmp/asems412.imp" 9963 @ 103375: PUSH ADDXS 9964 @ 103378: PUSH W 9965 @ 103381: SELECT 6 9966 @ 103384: ASSVAL 1834 %ELSE %IF W_FORM = AV IN S 9967 @ 103385: LINE 1834 "regression-compile-tmp/asems412.imp" 9968 @ 103424: GOTO L_0003 9969 @ 103427: LOCATE L_0004 9970 @ 103430: PUSH W 9971 @ 103433: SELECT 9 9972 @ 103436: PUSHI #0x00000006 9973 @ 103441: JUMPIF # L_0004 1835 RI2(PM(KEY+2), R, W_BASE, W_DISP) 9974 @ 103445: LINE 1835 "regression-compile-tmp/asems412.imp" 9975 @ 103484: PUSH RI2 9976 @ 103487: PUSH PM 9977 @ 103490: PUSH KEY 9978 @ 103493: PUSHI #0x00000002 9979 @ 103498: ADD 9980 @ 103499: ACCESS 9981 @ 103500: ASSPAR 9982 @ 103501: PUSH R 9983 @ 103504: ASSPAR 9984 @ 103505: PUSH W 9985 @ 103508: SELECT 6 9986 @ 103511: ASSPAR 9987 @ 103512: PUSH W 9988 @ 103515: SELECT 1 9989 @ 103518: ASSPAR 9990 @ 103519: CALL 1836 %ELSE 9991 @ 103520: LINE 1836 "regression-compile-tmp/asems412.imp" 9992 @ 103559: GOTO L_0003 9993 @ 103562: LOCATE L_0004 1837 ADDRESS(W) 9994 @ 103565: LINE 1837 "regression-compile-tmp/asems412.imp" 9995 @ 103604: PUSH ADDRESS 9996 @ 103607: PUSH W 9997 @ 103610: ASSPAR 9998 @ 103611: CALL 1838 KEY = KEY-1 %IF W_FORM = V IN R 9999 @ 103612: LINE 1838 "regression-compile-tmp/asems412.imp" 10000 @ 103651: PUSH W 10001 @ 103654: SELECT 9 10002 @ 103657: PUSHI #0x00000001 10003 @ 103662: JUMPIF # L_0007 10004 @ 103666: PUSH KEY 10005 @ 103669: PUSH KEY 10006 @ 103672: PUSHI #0x00000001 10007 @ 103677: SUB 10008 @ 103678: ASSVAL 10009 @ 103679: LOCATE L_0007 1839 KEY = KEY+1 %IF W_TYPE = SHORT 10010 @ 103682: LINE 1839 "regression-compile-tmp/asems412.imp" 10011 @ 103721: PUSH W 10012 @ 103724: SELECT 8 10013 @ 103727: PUSHI #0x00000003 10014 @ 103732: JUMPIF # L_0007 10015 @ 103736: PUSH KEY 10016 @ 103739: PUSH KEY 10017 @ 103742: PUSHI #0x00000001 10018 @ 103747: ADD 10019 @ 103748: ASSVAL 10020 @ 103749: LOCATE L_0007 1840 RX(PM(KEY+3), R, W_BASE, W_DISP) 10021 @ 103752: LINE 1840 "regression-compile-tmp/asems412.imp" 10022 @ 103791: PUSH RX 10023 @ 103794: PUSH PM 10024 @ 103797: PUSH KEY 10025 @ 103800: PUSHI #0x00000003 10026 @ 103805: ADD 10027 @ 103806: ACCESS 10028 @ 103807: ASSPAR 10029 @ 103808: PUSH R 10030 @ 103811: ASSPAR 10031 @ 103812: PUSH W 10032 @ 103815: SELECT 6 10033 @ 103818: ASSPAR 10034 @ 103819: PUSH W 10035 @ 103822: SELECT 1 10036 @ 103825: ASSPAR 10037 @ 103826: CALL 1841 %FINISH 10038 @ 103827: LINE 1841 "regression-compile-tmp/asems412.imp" 10039 @ 103866: LOCATE L_0003 1842 ->SET CC 10040 @ 103869: LINE 1842 "regression-compile-tmp/asems412.imp" 10041 @ 103908: JUMP L_015d 1843 IOP(MUL): 10042 @ 103911: LINE 1843 "regression-compile-tmp/asems412.imp" 10043 @ 103950: PUSHI #0x00000006 10044 @ 103955: SLABEL 333 1844 IOP(DIV): 10045 @ 103958: LINE 1844 "regression-compile-tmp/asems412.imp" 10046 @ 103997: PUSHI #0x00000007 10047 @ 104002: SLABEL 333 1845 IOP(REM): 10048 @ 104005: LINE 1845 "regression-compile-tmp/asems412.imp" 10049 @ 104044: PUSHI #0x00000011 10050 @ 104049: SLABEL 333 1846 %IF R >= ANY %START 10051 @ 104052: LINE 1846 "regression-compile-tmp/asems412.imp" 10052 @ 104091: PUSH R 10053 @ 104094: PUSHI #0x0000002d 10054 @ 104099: JUMPIF < L_0004 1847 %IF KEY = 0 %THEN N = 0 %ELSE N = 1 10055 @ 104103: LINE 1847 "regression-compile-tmp/asems412.imp" 10056 @ 104142: PUSH KEY 10057 @ 104145: PUSHI #0x00000000 10058 @ 104150: JUMPIF # L_0007 10059 @ 104154: PUSH N 10060 @ 104157: PUSHI #0x00000000 10061 @ 104162: ASSVAL 10062 @ 104163: GOTO L_0006 10063 @ 104166: LOCATE L_0007 10064 @ 104169: PUSH N 10065 @ 104172: PUSHI #0x00000001 10066 @ 104177: ASSVAL 10067 @ 104178: LOCATE L_0006 1848 %IF V_FORM = V IN R %AND ACTUAL(V_BASE)&1 = N %C 1849 %AND ACTIVITY(PRED(V_BASE)) = 0 %START 10068 @ 104181: LINE 1848 "regression-compile-tmp/asems412.imp" 10069 @ 104220: PUSH V 10070 @ 104223: SELECT 9 10071 @ 104226: PUSHI #0x00000001 10072 @ 104231: JUMPIF # L_0007 10073 @ 104235: PUSH ACTUAL 10074 @ 104238: PUSH V 10075 @ 104241: SELECT 6 10076 @ 104244: ACCESS 10077 @ 104245: PUSHI #0x00000001 10078 @ 104250: AND 10079 @ 104251: PUSH N 10080 @ 104254: JUMPIF # L_0007 10081 @ 104258: PUSH ACTIVITY 10082 @ 104261: PUSH PRED 10083 @ 104264: PUSH V 10084 @ 104267: SELECT 6 10085 @ 104270: ASSPAR 10086 @ 104271: CALL 10087 @ 104272: ACCESS 10088 @ 104273: PUSHI #0x00000000 10089 @ 104278: JUMPIF # L_0007 1850 TEMP = V_BASE 10090 @ 104282: LINE 1850 "regression-compile-tmp/asems412.imp" 10091 @ 104321: PUSH TEMP 10092 @ 104324: PUSH V 10093 @ 104327: SELECT 6 10094 @ 104330: ASSVAL 1851 TEMP = PRED(TEMP) %IF KEY = 0 10095 @ 104331: LINE 1851 "regression-compile-tmp/asems412.imp" 10096 @ 104370: PUSH KEY 10097 @ 104373: PUSHI #0x00000000 10098 @ 104378: JUMPIF # L_000a 10099 @ 104382: PUSH TEMP 10100 @ 104385: PUSH PRED 10101 @ 104388: PUSH TEMP 10102 @ 104391: ASSPAR 10103 @ 104392: CALL 10104 @ 104393: ASSVAL 10105 @ 104394: LOCATE L_000a 1852 %ELSE 10106 @ 104397: LINE 1852 "regression-compile-tmp/asems412.imp" 10107 @ 104436: GOTO L_0006 10108 @ 104439: LOCATE L_0007 1853 TEMP = EVEN ODD PAIR 10109 @ 104442: LINE 1853 "regression-compile-tmp/asems412.imp" 10110 @ 104481: PUSH TEMP 10111 @ 104484: PUSH EVENODDPAIR 10112 @ 104487: CALL 10113 @ 104488: ASSVAL 1854 %FINISH 10114 @ 104489: LINE 1854 "regression-compile-tmp/asems412.imp" 10115 @ 104528: LOCATE L_0006 1855 %ELSE %IF ACTUAL(R)&1 = 0 %OR ACTIVITY(PRED(R)) # 0 10116 @ 104531: LINE 1855 "regression-compile-tmp/asems412.imp" 10117 @ 104570: GOTO L_0003 10118 @ 104573: LOCATE L_0004 10119 @ 104576: PUSH ACTUAL 10120 @ 104579: PUSH R 10121 @ 104582: ACCESS 10122 @ 104583: PUSHI #0x00000001 10123 @ 104588: AND 10124 @ 104589: PUSHI #0x00000000 10125 @ 104594: JUMPIF = L_0005 10126 @ 104598: PUSH ACTIVITY 10127 @ 104601: PUSH PRED 10128 @ 104604: PUSH R 10129 @ 104607: ASSPAR 10130 @ 104608: CALL 10131 @ 104609: ACCESS 10132 @ 104610: PUSHI #0x00000000 10133 @ 104615: JUMPIF = L_0004 10134 @ 104619: LOCATE L_0005 1856 TEMP = EVEN ODD PAIR 10135 @ 104622: LINE 1856 "regression-compile-tmp/asems412.imp" 10136 @ 104661: PUSH TEMP 10137 @ 104664: PUSH EVENODDPAIR 10138 @ 104667: CALL 10139 @ 104668: ASSVAL 1857 %ELSE 10140 @ 104669: LINE 1857 "regression-compile-tmp/asems412.imp" 10141 @ 104708: GOTO L_0003 10142 @ 104711: LOCATE L_0004 1858 TEMP = R 10143 @ 104714: LINE 1858 "regression-compile-tmp/asems412.imp" 10144 @ 104753: PUSH TEMP 10145 @ 104756: PUSH R 10146 @ 104759: ASSVAL 1859 %FINISH 10147 @ 104760: LINE 1859 "regression-compile-tmp/asems412.imp" 10148 @ 104799: LOCATE L_0003 1860 N = PRED(TEMP); HAZARD(N) 10149 @ 104802: LINE 1860 "regression-compile-tmp/asems412.imp" 10150 @ 104841: PUSH N 10151 @ 104844: PUSH PRED 10152 @ 104847: PUSH TEMP 10153 @ 104850: ASSPAR 10154 @ 104851: CALL 10155 @ 104852: ASSVAL 10156 @ 104853: LINE 1860 "regression-compile-tmp/asems412.imp" 10157 @ 104892: PUSH HAZARD 10158 @ 104895: PUSH N 10159 @ 104898: ASSPAR 10160 @ 104899: CALL 1861 %IF KEY # 0 %START 10161 @ 104900: LINE 1861 "regression-compile-tmp/asems412.imp" 10162 @ 104939: PUSH KEY 10163 @ 104942: PUSHI #0x00000000 10164 @ 104947: JUMPIF = L_0004 1862 CLAIM(N); LOAD(V, TEMP) 10165 @ 104951: LINE 1862 "regression-compile-tmp/asems412.imp" 10166 @ 104990: PUSH CLAIM 10167 @ 104993: PUSH N 10168 @ 104996: ASSPAR 10169 @ 104997: CALL 10170 @ 104998: LINE 1862 "regression-compile-tmp/asems412.imp" 10171 @ 105037: PUSH LOAD 10172 @ 105040: PUSH V 10173 @ 105043: ASSPAR 10174 @ 105044: PUSH TEMP 10175 @ 105047: ASSPAR 10176 @ 105048: CALL 1863 %ELSE 10177 @ 105049: LINE 1863 "regression-compile-tmp/asems412.imp" 10178 @ 105088: GOTO L_0003 10179 @ 105091: LOCATE L_0004 1864 CLAIM(TEMP); LOAD(V, N) 10180 @ 105094: LINE 1864 "regression-compile-tmp/asems412.imp" 10181 @ 105133: PUSH CLAIM 10182 @ 105136: PUSH TEMP 10183 @ 105139: ASSPAR 10184 @ 105140: CALL 10185 @ 105141: LINE 1864 "regression-compile-tmp/asems412.imp" 10186 @ 105180: PUSH LOAD 10187 @ 105183: PUSH V 10188 @ 105186: ASSPAR 10189 @ 105187: PUSH N 10190 @ 105190: ASSPAR 10191 @ 105191: CALL 1865 RR(LR, TEMP, N) 10192 @ 105192: LINE 1865 "regression-compile-tmp/asems412.imp" 10193 @ 105231: PUSH RR 10194 @ 105234: PUSHI #0x00000800 10195 @ 105239: ASSPAR 10196 @ 105240: PUSH TEMP 10197 @ 105243: ASSPAR 10198 @ 105244: PUSH N 10199 @ 105247: ASSPAR 10200 @ 105248: CALL 1866 USE(TEMP) = USE(N); USE(TEMP+STORE) = USE(N) 10201 @ 105249: LINE 1866 "regression-compile-tmp/asems412.imp" 10202 @ 105288: PUSH USE 10203 @ 105291: PUSH TEMP 10204 @ 105294: ACCESS 10205 @ 105295: PUSH USE 10206 @ 105298: PUSH N 10207 @ 105301: ACCESS 10208 @ 105302: ASSVAL 10209 @ 105303: LINE 1866 "regression-compile-tmp/asems412.imp" 10210 @ 105342: PUSH USE 10211 @ 105345: PUSH TEMP 10212 @ 105348: PUSHI #0x00000014 10213 @ 105353: ADD 10214 @ 105354: ACCESS 10215 @ 105355: PUSH USE 10216 @ 105358: PUSH N 10217 @ 105361: ACCESS 10218 @ 105362: ASSVAL 1867 CLAIM(N) 10219 @ 105363: LINE 1867 "regression-compile-tmp/asems412.imp" 10220 @ 105402: PUSH CLAIM 10221 @ 105405: PUSH N 10222 @ 105408: ASSPAR 10223 @ 105409: CALL 1868 RX(SRA, N, 0, 31); FORGET(N) 10224 @ 105410: LINE 1868 "regression-compile-tmp/asems412.imp" 10225 @ 105449: PUSH RX 10226 @ 105452: PUSHI #0x0000ee00 10227 @ 105457: ASSPAR 10228 @ 105458: PUSH N 10229 @ 105461: ASSPAR 10230 @ 105462: PUSHI #0x00000000 10231 @ 105467: ASSPAR 10232 @ 105468: PUSHI #0x0000001f 10233 @ 105473: ASSPAR 10234 @ 105474: CALL 10235 @ 105475: LINE 1868 "regression-compile-tmp/asems412.imp" 10236 @ 105514: PUSH FORGET 10237 @ 105517: PUSH N 10238 @ 105520: ASSPAR 10239 @ 105521: CALL 1869 %FINISH 10240 @ 105522: LINE 1869 "regression-compile-tmp/asems412.imp" 10241 @ 105561: LOCATE L_0003 1870 LOAD(W,ANY) %IF W_FORM = CONSTANT %OR W_TYPE # INTEGER 10242 @ 105564: LINE 1870 "regression-compile-tmp/asems412.imp" 10243 @ 105603: PUSH W 10244 @ 105606: SELECT 9 10245 @ 105609: PUSHI #0x00000000 10246 @ 105614: JUMPIF = L_0005 10247 @ 105618: PUSH W 10248 @ 105621: SELECT 8 10249 @ 105624: PUSHI #0x00000001 10250 @ 105629: JUMPIF = L_0004 10251 @ 105633: LOCATE L_0005 10252 @ 105636: PUSH LOAD 10253 @ 105639: PUSH W 10254 @ 105642: ASSPAR 10255 @ 105643: PUSHI #0x0000002d 10256 @ 105648: ASSPAR 10257 @ 105649: CALL 10258 @ 105650: LOCATE L_0004 1871 ADDRESS(W) 10259 @ 105653: LINE 1871 "regression-compile-tmp/asems412.imp" 10260 @ 105692: PUSH ADDRESS 10261 @ 105695: PUSH W 10262 @ 105698: ASSPAR 10263 @ 105699: CALL 1872 %IF W_FORM = V IN R %START 10264 @ 105700: LINE 1872 "regression-compile-tmp/asems412.imp" 10265 @ 105739: PUSH W 10266 @ 105742: SELECT 9 10267 @ 105745: PUSHI #0x00000001 10268 @ 105750: JUMPIF # L_0004 1873 RR(MULDIV(KEY), N, W_BASE) 10269 @ 105754: LINE 1873 "regression-compile-tmp/asems412.imp" 10270 @ 105793: PUSH RR 10271 @ 105796: PUSH MULDIV 10272 @ 105799: PUSH KEY 10273 @ 105802: ACCESS 10274 @ 105803: ASSPAR 10275 @ 105804: PUSH N 10276 @ 105807: ASSPAR 10277 @ 105808: PUSH W 10278 @ 105811: SELECT 6 10279 @ 105814: ASSPAR 10280 @ 105815: CALL 1874 %ELSE 10281 @ 105816: LINE 1874 "regression-compile-tmp/asems412.imp" 10282 @ 105855: GOTO L_0003 10283 @ 105858: LOCATE L_0004 1875 RX(MULDIV(KEY+1), N, W_BASE, W_DISP) 10284 @ 105861: LINE 1875 "regression-compile-tmp/asems412.imp" 10285 @ 105900: PUSH RX 10286 @ 105903: PUSH MULDIV 10287 @ 105906: PUSH KEY 10288 @ 105909: PUSHI #0x00000001 10289 @ 105914: ADD 10290 @ 105915: ACCESS 10291 @ 105916: ASSPAR 10292 @ 105917: PUSH N 10293 @ 105920: ASSPAR 10294 @ 105921: PUSH W 10295 @ 105924: SELECT 6 10296 @ 105927: ASSPAR 10297 @ 105928: PUSH W 10298 @ 105931: SELECT 1 10299 @ 105934: ASSPAR 10300 @ 105935: CALL 1876 %FINISH 10301 @ 105936: LINE 1876 "regression-compile-tmp/asems412.imp" 10302 @ 105975: LOCATE L_0003 1877 %IF OP = REM %START 10303 @ 105978: LINE 1877 "regression-compile-tmp/asems412.imp" 10304 @ 106017: PUSH OP 10305 @ 106020: PUSHI #0x00000011 10306 @ 106025: JUMPIF # L_0004 1878 D = TEMP; TEMP = N; N = D 10307 @ 106029: LINE 1878 "regression-compile-tmp/asems412.imp" 10308 @ 106068: PUSH D 10309 @ 106071: PUSH TEMP 10310 @ 106074: ASSVAL 10311 @ 106075: LINE 1878 "regression-compile-tmp/asems412.imp" 10312 @ 106114: PUSH TEMP 10313 @ 106117: PUSH N 10314 @ 106120: ASSVAL 10315 @ 106121: LINE 1878 "regression-compile-tmp/asems412.imp" 10316 @ 106160: PUSH N 10317 @ 106163: PUSH D 10318 @ 106166: ASSVAL 1879 %FINISH 10319 @ 106167: LINE 1879 "regression-compile-tmp/asems412.imp" 10320 @ 106206: LOCATE L_0004 1880 RELEASE(N) 10321 @ 106209: LINE 1880 "regression-compile-tmp/asems412.imp" 10322 @ 106248: PUSH RELEASE 10323 @ 106251: PUSH N 10324 @ 106254: ASSPAR 10325 @ 106255: CALL 1881 FORGET(N); FORGET(TEMP) 10326 @ 106256: LINE 1881 "regression-compile-tmp/asems412.imp" 10327 @ 106295: PUSH FORGET 10328 @ 106298: PUSH N 10329 @ 106301: ASSPAR 10330 @ 106302: CALL 10331 @ 106303: LINE 1881 "regression-compile-tmp/asems412.imp" 10332 @ 106342: PUSH FORGET 10333 @ 106345: PUSH TEMP 10334 @ 106348: ASSPAR 10335 @ 106349: CALL 1882 V_BASE = TEMP; V_DISP = 0; V_FORM = V IN R 10336 @ 106350: LINE 1882 "regression-compile-tmp/asems412.imp" 10337 @ 106389: PUSH V 10338 @ 106392: SELECT 6 10339 @ 106395: PUSH TEMP 10340 @ 106398: ASSVAL 10341 @ 106399: LINE 1882 "regression-compile-tmp/asems412.imp" 10342 @ 106438: PUSH V 10343 @ 106441: SELECT 1 10344 @ 106444: PUSHI #0x00000000 10345 @ 106449: ASSVAL 10346 @ 106450: LINE 1882 "regression-compile-tmp/asems412.imp" 10347 @ 106489: PUSH V 10348 @ 106492: SELECT 9 10349 @ 106495: PUSHI #0x00000001 10350 @ 106500: ASSVAL 1883 LOAD(V, R) %IF TEMP # R 10351 @ 106501: LINE 1883 "regression-compile-tmp/asems412.imp" 10352 @ 106540: PUSH TEMP 10353 @ 106543: PUSH R 10354 @ 106546: JUMPIF = L_0004 10355 @ 106550: PUSH LOAD 10356 @ 106553: PUSH V 10357 @ 106556: ASSPAR 10358 @ 106557: PUSH R 10359 @ 106560: ASSPAR 10360 @ 106561: CALL 10361 @ 106562: LOCATE L_0004 1884 ->END OP 10362 @ 106565: LINE 1884 "regression-compile-tmp/asems412.imp" 10363 @ 106604: JUMP L_015c 1885 IOP(AND): 10364 @ 106607: LINE 1885 "regression-compile-tmp/asems412.imp" 10365 @ 106646: PUSHI #0x00000008 10366 @ 106651: SLABEL 333 1886 %IF V_FORM = CONSTANT %AND V_DISP = 255 %START 10367 @ 106654: LINE 1886 "regression-compile-tmp/asems412.imp" 10368 @ 106693: PUSH V 10369 @ 106696: SELECT 9 10370 @ 106699: PUSHI #0x00000000 10371 @ 106704: JUMPIF # L_0004 10372 @ 106708: PUSH V 10373 @ 106711: SELECT 1 10374 @ 106714: PUSHI #0x000000ff 10375 @ 106719: JUMPIF # L_0004 1887 %IF W_FORM = V IN R %START 10376 @ 106723: LINE 1887 "regression-compile-tmp/asems412.imp" 10377 @ 106762: PUSH W 10378 @ 106765: SELECT 9 10379 @ 106768: PUSHI #0x00000001 10380 @ 106773: JUMPIF # L_0007 1888 %IF R >= ANY %START 10381 @ 106777: LINE 1888 "regression-compile-tmp/asems412.imp" 10382 @ 106816: PUSH R 10383 @ 106819: PUSHI #0x0000002d 10384 @ 106824: JUMPIF < L_000a 1889 %IF ACTIVITY(W_BASE) = 1 %THEN R = W_BASE %C 1890 %ELSE R = GPR(R-ANY) 10385 @ 106828: LINE 1889 "regression-compile-tmp/asems412.imp" 10386 @ 106867: PUSH ACTIVITY 10387 @ 106870: PUSH W 10388 @ 106873: SELECT 6 10389 @ 106876: ACCESS 10390 @ 106877: PUSHI #0x00000001 10391 @ 106882: JUMPIF # L_000d 10392 @ 106886: PUSH R 10393 @ 106889: PUSH W 10394 @ 106892: SELECT 6 10395 @ 106895: ASSVAL 10396 @ 106896: GOTO L_000c 10397 @ 106899: LOCATE L_000d 10398 @ 106902: PUSH R 10399 @ 106905: PUSH GPR 10400 @ 106908: PUSH R 10401 @ 106911: PUSHI #0x0000002d 10402 @ 106916: SUB 10403 @ 106917: ASSPAR 10404 @ 106918: CALL 10405 @ 106919: ASSVAL 10406 @ 106920: LOCATE L_000c 1891 %ELSE %IF R # W_BASE %OR ACTIVITY(R) # 1 10407 @ 106923: LINE 1891 "regression-compile-tmp/asems412.imp" 10408 @ 106962: GOTO L_0009 10409 @ 106965: LOCATE L_000a 10410 @ 106968: PUSH R 10411 @ 106971: PUSH W 10412 @ 106974: SELECT 6 10413 @ 106977: JUMPIF # L_000b 10414 @ 106981: PUSH ACTIVITY 10415 @ 106984: PUSH R 10416 @ 106987: ACCESS 10417 @ 106988: PUSHI #0x00000001 10418 @ 106993: JUMPIF = L_000a 10419 @ 106997: LOCATE L_000b 1892 HAZARD(R) 10420 @ 107000: LINE 1892 "regression-compile-tmp/asems412.imp" 10421 @ 107039: PUSH HAZARD 10422 @ 107042: PUSH R 10423 @ 107045: ASSPAR 10424 @ 107046: CALL 1893 %FINISH 10425 @ 107047: LINE 1893 "regression-compile-tmp/asems412.imp" 10426 @ 107086: LOCATE L_000a 10427 @ 107089: LOCATE L_0009 1894 %ELSE 10428 @ 107092: LINE 1894 "regression-compile-tmp/asems412.imp" 10429 @ 107131: GOTO L_0006 10430 @ 107134: LOCATE L_0007 1895 LOAD(W,R); R = W_BASE 10431 @ 107137: LINE 1895 "regression-compile-tmp/asems412.imp" 10432 @ 107176: PUSH LOAD 10433 @ 107179: PUSH W 10434 @ 107182: ASSPAR 10435 @ 107183: PUSH R 10436 @ 107186: ASSPAR 10437 @ 107187: CALL 10438 @ 107188: LINE 1895 "regression-compile-tmp/asems412.imp" 10439 @ 107227: PUSH R 10440 @ 107230: PUSH W 10441 @ 107233: SELECT 6 10442 @ 107236: ASSVAL 1896 %FINISH 10443 @ 107237: LINE 1896 "regression-compile-tmp/asems412.imp" 10444 @ 107276: LOCATE L_0006 1897 CLAIM(R) 10445 @ 107279: LINE 1897 "regression-compile-tmp/asems412.imp" 10446 @ 107318: PUSH CLAIM 10447 @ 107321: PUSH R 10448 @ 107324: ASSPAR 10449 @ 107325: CALL 1898 RR(LBR,R,W_BASE) 10450 @ 107326: LINE 1898 "regression-compile-tmp/asems412.imp" 10451 @ 107365: PUSH RR 10452 @ 107368: PUSHI #0x00009300 10453 @ 107373: ASSPAR 10454 @ 107374: PUSH R 10455 @ 107377: ASSPAR 10456 @ 107378: PUSH W 10457 @ 107381: SELECT 6 10458 @ 107384: ASSPAR 10459 @ 107385: CALL 1899 V_BASE = R; V_DISP = 0; V_FORM = V IN R 10460 @ 107386: LINE 1899 "regression-compile-tmp/asems412.imp" 10461 @ 107425: PUSH V 10462 @ 107428: SELECT 6 10463 @ 107431: PUSH R 10464 @ 107434: ASSVAL 10465 @ 107435: LINE 1899 "regression-compile-tmp/asems412.imp" 10466 @ 107474: PUSH V 10467 @ 107477: SELECT 1 10468 @ 107480: PUSHI #0x00000000 10469 @ 107485: ASSVAL 10470 @ 107486: LINE 1899 "regression-compile-tmp/asems412.imp" 10471 @ 107525: PUSH V 10472 @ 107528: SELECT 9 10473 @ 107531: PUSHI #0x00000001 10474 @ 107536: ASSVAL 1900 -> FEND 10475 @ 107537: LINE 1900 "regression-compile-tmp/asems412.imp" 10476 @ 107576: JUMP L_015e 1901 %FINISH 10477 @ 107579: LINE 1901 "regression-compile-tmp/asems412.imp" 10478 @ 107618: LOCATE L_0004 1902 IOP(IOR): 10479 @ 107621: LINE 1902 "regression-compile-tmp/asems412.imp" 10480 @ 107660: PUSHI #0x00000009 10481 @ 107665: SLABEL 333 1903 IOP(XOR): 10482 @ 107668: LINE 1903 "regression-compile-tmp/asems412.imp" 10483 @ 107707: PUSHI #0x0000000a 10484 @ 107712: SLABEL 333 1904 %IF W_FORM = CONSTANT %AND -15 <= W_DISP <= 15 %START 10485 @ 107715: LINE 1904 "regression-compile-tmp/asems412.imp" 10486 @ 107754: PUSH W 10487 @ 107757: SELECT 9 10488 @ 107760: PUSHI #0x00000000 10489 @ 107765: JUMPIF # L_0004 10490 @ 107769: PUSHI #0x0000000f 10491 @ 107774: NEGATE 10492 @ 107775: PUSH W 10493 @ 107778: SELECT 1 10494 @ 107781: JUMPIFD > L_0004 10495 @ 107785: PUSHI #0x0000000f 10496 @ 107790: JUMPIF > L_0004 1905 %IF V_FORM # V IN R %OR (R < ANY %AND V_BASE # R) %START 10497 @ 107794: LINE 1905 "regression-compile-tmp/asems412.imp" 10498 @ 107833: PUSH V 10499 @ 107836: SELECT 9 10500 @ 107839: PUSHI #0x00000001 10501 @ 107844: JUMPIF # L_0008 10502 @ 107848: PUSH R 10503 @ 107851: PUSHI #0x0000002d 10504 @ 107856: JUMPIF >= L_0007 10505 @ 107860: PUSH V 10506 @ 107863: SELECT 6 10507 @ 107866: PUSH R 10508 @ 107869: JUMPIF = L_0007 10509 @ 107873: LOCATE L_0008 1906 H = W; W = V; V = H 10510 @ 107876: LINE 1906 "regression-compile-tmp/asems412.imp" 10511 @ 107915: PUSH H 10512 @ 107918: PUSH W 10513 @ 107921: ASSVAL 10514 @ 107922: LINE 1906 "regression-compile-tmp/asems412.imp" 10515 @ 107961: PUSH W 10516 @ 107964: PUSH V 10517 @ 107967: ASSVAL 10518 @ 107968: LINE 1906 "regression-compile-tmp/asems412.imp" 10519 @ 108007: PUSH V 10520 @ 108010: PUSH H 10521 @ 108013: ASSVAL 1907 %FINISH 10522 @ 108014: LINE 1907 "regression-compile-tmp/asems412.imp" 10523 @ 108053: LOCATE L_0007 1908 %FINISH 10524 @ 108056: LINE 1908 "regression-compile-tmp/asems412.imp" 10525 @ 108095: LOCATE L_0004 1909 LOAD(V, R); R = V_BASE 10526 @ 108098: LINE 1909 "regression-compile-tmp/asems412.imp" 10527 @ 108137: PUSH LOAD 10528 @ 108140: PUSH V 10529 @ 108143: ASSPAR 10530 @ 108144: PUSH R 10531 @ 108147: ASSPAR 10532 @ 108148: CALL 10533 @ 108149: LINE 1909 "regression-compile-tmp/asems412.imp" 10534 @ 108188: PUSH R 10535 @ 108191: PUSH V 10536 @ 108194: SELECT 6 10537 @ 108197: ASSVAL 1910 LOAD(W, ANY) %IF W_TYPE = BYTE 10538 @ 108198: LINE 1910 "regression-compile-tmp/asems412.imp" 10539 @ 108237: PUSH W 10540 @ 108240: SELECT 8 10541 @ 108243: PUSHI #0x00000002 10542 @ 108248: JUMPIF # L_0004 10543 @ 108252: PUSH LOAD 10544 @ 108255: PUSH W 10545 @ 108258: ASSPAR 10546 @ 108259: PUSHI #0x0000002d 10547 @ 108264: ASSPAR 10548 @ 108265: CALL 10549 @ 108266: LOCATE L_0004 1911 %IF W_FORM = CONSTANT %START 10550 @ 108269: LINE 1911 "regression-compile-tmp/asems412.imp" 10551 @ 108308: PUSH W 10552 @ 108311: SELECT 9 10553 @ 108314: PUSHI #0x00000000 10554 @ 108319: JUMPIF # L_0004 1912 %IF KEY = 0 %AND W_DISP = 255 %START;! N&255 10555 @ 108323: LINE 1912 "regression-compile-tmp/asems412.imp" 10556 @ 108362: PUSH KEY 10557 @ 108365: PUSHI #0x00000000 10558 @ 108370: JUMPIF # L_0007 10559 @ 108374: PUSH W 10560 @ 108377: SELECT 1 10561 @ 108380: PUSHI #0x000000ff 10562 @ 108385: JUMPIF # L_0007 1913 CLAIM(R) 10563 @ 108389: LINE 1913 "regression-compile-tmp/asems412.imp" 10564 @ 108428: PUSH CLAIM 10565 @ 108431: PUSH R 10566 @ 108434: ASSPAR 10567 @ 108435: CALL 1914 RR(LBR, R, R); -> FEND 10568 @ 108436: LINE 1914 "regression-compile-tmp/asems412.imp" 10569 @ 108475: PUSH RR 10570 @ 108478: PUSHI #0x00009300 10571 @ 108483: ASSPAR 10572 @ 108484: PUSH R 10573 @ 108487: ASSPAR 10574 @ 108488: PUSH R 10575 @ 108491: ASSPAR 10576 @ 108492: CALL 10577 @ 108493: LINE 1914 "regression-compile-tmp/asems412.imp" 10578 @ 108532: JUMP L_015e 1915 %FINISH 10579 @ 108535: LINE 1915 "regression-compile-tmp/asems412.imp" 10580 @ 108574: LOCATE L_0007 1916 %IF -X'8000' <= W_DISP <= X'7FFF' %START 10581 @ 108577: LINE 1916 "regression-compile-tmp/asems412.imp" 10582 @ 108616: PUSHI #0x00008000 10583 @ 108621: NEGATE 10584 @ 108622: PUSH W 10585 @ 108625: SELECT 1 10586 @ 108628: JUMPIFD > L_0007 10587 @ 108632: PUSHI #0x00007fff 10588 @ 108637: JUMPIF > L_0007 1917 RI2(LOGICAL(KEY+1), R, 0, W_DISP) 10589 @ 108641: LINE 1917 "regression-compile-tmp/asems412.imp" 10590 @ 108680: PUSH RI2 10591 @ 108683: PUSH LOGICAL 10592 @ 108686: PUSH KEY 10593 @ 108689: PUSHI #0x00000001 10594 @ 108694: ADD 10595 @ 108695: ACCESS 10596 @ 108696: ASSPAR 10597 @ 108697: PUSH R 10598 @ 108700: ASSPAR 10599 @ 108701: PUSHI #0x00000000 10600 @ 108706: ASSPAR 10601 @ 108707: PUSH W 10602 @ 108710: SELECT 1 10603 @ 108713: ASSPAR 10604 @ 108714: CALL 1918 %ELSE 10605 @ 108715: LINE 1918 "regression-compile-tmp/asems412.imp" 10606 @ 108754: GOTO L_0006 10607 @ 108757: LOCATE L_0007 1919 RI3(LOGICAL(KEY+4), R, 0, W_DISP) 10608 @ 108760: LINE 1919 "regression-compile-tmp/asems412.imp" 10609 @ 108799: PUSH RI3 10610 @ 108802: PUSH LOGICAL 10611 @ 108805: PUSH KEY 10612 @ 108808: PUSHI #0x00000004 10613 @ 108813: ADD 10614 @ 108814: ACCESS 10615 @ 108815: ASSPAR 10616 @ 108816: PUSH R 10617 @ 108819: ASSPAR 10618 @ 108820: PUSHI #0x00000000 10619 @ 108825: ASSPAR 10620 @ 108826: PUSH W 10621 @ 108829: SELECT 1 10622 @ 108832: ASSPAR 10623 @ 108833: CALL 1920 %FINISH 10624 @ 108834: LINE 1920 "regression-compile-tmp/asems412.imp" 10625 @ 108873: LOCATE L_0006 1921 %ELSE %IF W_FORM = V IN R 10626 @ 108876: LINE 1921 "regression-compile-tmp/asems412.imp" 10627 @ 108915: GOTO L_0003 10628 @ 108918: LOCATE L_0004 10629 @ 108921: PUSH W 10630 @ 108924: SELECT 9 10631 @ 108927: PUSHI #0x00000001 10632 @ 108932: JUMPIF # L_0004 1922 RR(LOGICAL(KEY), R, W_BASE) 10633 @ 108936: LINE 1922 "regression-compile-tmp/asems412.imp" 10634 @ 108975: PUSH RR 10635 @ 108978: PUSH LOGICAL 10636 @ 108981: PUSH KEY 10637 @ 108984: ACCESS 10638 @ 108985: ASSPAR 10639 @ 108986: PUSH R 10640 @ 108989: ASSPAR 10641 @ 108990: PUSH W 10642 @ 108993: SELECT 6 10643 @ 108996: ASSPAR 10644 @ 108997: CALL 1923 %ELSE 10645 @ 108998: LINE 1923 "regression-compile-tmp/asems412.imp" 10646 @ 109037: GOTO L_0003 10647 @ 109040: LOCATE L_0004 1924 ADDRESS(W) 10648 @ 109043: LINE 1924 "regression-compile-tmp/asems412.imp" 10649 @ 109082: PUSH ADDRESS 10650 @ 109085: PUSH W 10651 @ 109088: ASSPAR 10652 @ 109089: CALL 1925 KEY = KEY+1 %IF W_TYPE = SHORT %OR W_TYPE = UNSIGNED HALFWORD 10653 @ 109090: LINE 1925 "regression-compile-tmp/asems412.imp" 10654 @ 109129: PUSH W 10655 @ 109132: SELECT 8 10656 @ 109135: PUSHI #0x00000003 10657 @ 109140: JUMPIF = L_0008 10658 @ 109144: PUSH W 10659 @ 109147: SELECT 8 10660 @ 109150: PUSHI #0x000000ff 10661 @ 109155: JUMPIF # L_0007 10662 @ 109159: LOCATE L_0008 10663 @ 109162: PUSH KEY 10664 @ 109165: PUSH KEY 10665 @ 109168: PUSHI #0x00000001 10666 @ 109173: ADD 10667 @ 109174: ASSVAL 10668 @ 109175: LOCATE L_0007 1926 RX(LOGICAL(KEY+2), R, W_BASE, W_DISP) 10669 @ 109178: LINE 1926 "regression-compile-tmp/asems412.imp" 10670 @ 109217: PUSH RX 10671 @ 109220: PUSH LOGICAL 10672 @ 109223: PUSH KEY 10673 @ 109226: PUSHI #0x00000002 10674 @ 109231: ADD 10675 @ 109232: ACCESS 10676 @ 109233: ASSPAR 10677 @ 109234: PUSH R 10678 @ 109237: ASSPAR 10679 @ 109238: PUSH W 10680 @ 109241: SELECT 6 10681 @ 109244: ASSPAR 10682 @ 109245: PUSH W 10683 @ 109248: SELECT 1 10684 @ 109251: ASSPAR 10685 @ 109252: CALL 1927 %FINISH 10686 @ 109253: LINE 1927 "regression-compile-tmp/asems412.imp" 10687 @ 109292: LOCATE L_0003 1928 ->SET CC 10688 @ 109295: LINE 1928 "regression-compile-tmp/asems412.imp" 10689 @ 109334: JUMP L_015d 1929 IOP(RSH): 10690 @ 109337: LINE 1929 "regression-compile-tmp/asems412.imp" 10691 @ 109376: PUSHI #0x0000000c 10692 @ 109381: SLABEL 333 1930 IOP(LSH): 10693 @ 109384: LINE 1930 "regression-compile-tmp/asems412.imp" 10694 @ 109423: PUSHI #0x0000000b 10695 @ 109428: SLABEL 333 1931 LOAD(V, R); R = V_BASE 1932 ! IGNORE ANY VALUE IN A REGISTER WHICH HAPPENS TO BE THE 1933 ! SAME AS A CONSTANT SHIFT COUNT <=15 AS OTHERWISE THE LONG FORM 1934 ! OF SHIFT INSTRUCTION WILL BE GENERATED NEEDLESSLY. 10696 @ 109431: LINE 1931 "regression-compile-tmp/asems412.imp" 10697 @ 109470: PUSH LOAD 10698 @ 109473: PUSH V 10699 @ 109476: ASSPAR 10700 @ 109477: PUSH R 10701 @ 109480: ASSPAR 10702 @ 109481: CALL 10703 @ 109482: LINE 1931 "regression-compile-tmp/asems412.imp" 10704 @ 109521: PUSH R 10705 @ 109524: PUSH V 10706 @ 109527: SELECT 6 10707 @ 109530: ASSVAL 1935 %IF W_FORM = V IN R %AND USE(W_BASE)_CA > LIMEN %C 1936 %AND USE(W_BASE)_FORM = CONSTANT %C 1937 %AND 0 <= USE(W_BASE)_DISP <= 15 %START 10708 @ 109531: LINE 1935 "regression-compile-tmp/asems412.imp" 10709 @ 109570: PUSH W 10710 @ 109573: SELECT 9 10711 @ 109576: PUSHI #0x00000001 10712 @ 109581: JUMPIF # L_0004 10713 @ 109585: PUSH USE 10714 @ 109588: PUSH W 10715 @ 109591: SELECT 6 10716 @ 109594: ACCESS 10717 @ 109595: SELECT 2 10718 @ 109598: PUSH LIMEN 10719 @ 109601: JUMPIF <= L_0004 10720 @ 109605: PUSH USE 10721 @ 109608: PUSH W 10722 @ 109611: SELECT 6 10723 @ 109614: ACCESS 10724 @ 109615: SELECT 5 10725 @ 109618: PUSHI #0x00000000 10726 @ 109623: JUMPIF # L_0004 10727 @ 109627: PUSHI #0x00000000 10728 @ 109632: PUSH USE 10729 @ 109635: PUSH W 10730 @ 109638: SELECT 6 10731 @ 109641: ACCESS 10732 @ 109642: SELECT 1 10733 @ 109645: JUMPIFD > L_0004 10734 @ 109649: PUSHI #0x0000000f 10735 @ 109654: JUMPIF > L_0004 1938 W_DISP = USE(W_BASE)_DISP 10736 @ 109658: LINE 1938 "regression-compile-tmp/asems412.imp" 10737 @ 109697: PUSH W 10738 @ 109700: SELECT 1 10739 @ 109703: PUSH USE 10740 @ 109706: PUSH W 10741 @ 109709: SELECT 6 10742 @ 109712: ACCESS 10743 @ 109713: SELECT 1 10744 @ 109716: ASSVAL 1939 W_FORM = CONSTANT 10745 @ 109717: LINE 1939 "regression-compile-tmp/asems412.imp" 10746 @ 109756: PUSH W 10747 @ 109759: SELECT 9 10748 @ 109762: PUSHI #0x00000000 10749 @ 109767: ASSVAL 1940 RELEASE(W_BASE) 10750 @ 109768: LINE 1940 "regression-compile-tmp/asems412.imp" 10751 @ 109807: PUSH RELEASE 10752 @ 109810: PUSH W 10753 @ 109813: SELECT 6 10754 @ 109816: ASSPAR 10755 @ 109817: CALL 1941 %FINISH 10756 @ 109818: LINE 1941 "regression-compile-tmp/asems412.imp" 10757 @ 109857: LOCATE L_0004 1942 %IF W_FORM = CONSTANT %START 10758 @ 109860: LINE 1942 "regression-compile-tmp/asems412.imp" 10759 @ 109899: PUSH W 10760 @ 109902: SELECT 9 10761 @ 109905: PUSHI #0x00000000 10762 @ 109910: JUMPIF # L_0004 1943 %IF KEY = 0 %AND W_DISP = 1 %START 10763 @ 109914: LINE 1943 "regression-compile-tmp/asems412.imp" 10764 @ 109953: PUSH KEY 10765 @ 109956: PUSHI #0x00000000 10766 @ 109961: JUMPIF # L_0007 10767 @ 109965: PUSH W 10768 @ 109968: SELECT 1 10769 @ 109971: PUSHI #0x00000001 10770 @ 109976: JUMPIF # L_0007 1944 CLAIM(R) 10771 @ 109980: LINE 1944 "regression-compile-tmp/asems412.imp" 10772 @ 110019: PUSH CLAIM 10773 @ 110022: PUSH R 10774 @ 110025: ASSPAR 10775 @ 110026: CALL 1945 RR(AR, R, R) 10776 @ 110027: LINE 1945 "regression-compile-tmp/asems412.imp" 10777 @ 110066: PUSH RR 10778 @ 110069: PUSHI #0x00000a00 10779 @ 110074: ASSPAR 10780 @ 110075: PUSH R 10781 @ 110078: ASSPAR 10782 @ 110079: PUSH R 10783 @ 110082: ASSPAR 10784 @ 110083: CALL 1946 %ELSE %IF W_DISP > 15 10785 @ 110084: LINE 1946 "regression-compile-tmp/asems412.imp" 10786 @ 110123: GOTO L_0006 10787 @ 110126: LOCATE L_0007 10788 @ 110129: PUSH W 10789 @ 110132: SELECT 1 10790 @ 110135: PUSHI #0x0000000f 10791 @ 110140: JUMPIF <= L_0007 1947 RX(SHIFT(KEY+1), R, 0, W_DISP) 10792 @ 110144: LINE 1947 "regression-compile-tmp/asems412.imp" 10793 @ 110183: PUSH RX 10794 @ 110186: PUSH SHIFT 10795 @ 110189: PUSH KEY 10796 @ 110192: PUSHI #0x00000001 10797 @ 110197: ADD 10798 @ 110198: ACCESS 10799 @ 110199: ASSPAR 10800 @ 110200: PUSH R 10801 @ 110203: ASSPAR 10802 @ 110204: PUSHI #0x00000000 10803 @ 110209: ASSPAR 10804 @ 110210: PUSH W 10805 @ 110213: SELECT 1 10806 @ 110216: ASSPAR 10807 @ 110217: CALL 1948 %ELSE 10808 @ 110218: LINE 1948 "regression-compile-tmp/asems412.imp" 10809 @ 110257: GOTO L_0006 10810 @ 110260: LOCATE L_0007 1949 SF(SHIFT(KEY), R, W_DISP&15) 10811 @ 110263: LINE 1949 "regression-compile-tmp/asems412.imp" 10812 @ 110302: PUSH SF 10813 @ 110305: PUSH SHIFT 10814 @ 110308: PUSH KEY 10815 @ 110311: ACCESS 10816 @ 110312: ASSPAR 10817 @ 110313: PUSH R 10818 @ 110316: ASSPAR 10819 @ 110317: PUSH W 10820 @ 110320: SELECT 1 10821 @ 110323: PUSHI #0x0000000f 10822 @ 110328: AND 10823 @ 110329: ASSPAR 10824 @ 110330: CALL 1950 %FINISH 10825 @ 110331: LINE 1950 "regression-compile-tmp/asems412.imp" 10826 @ 110370: LOCATE L_0006 1951 %ELSE 10827 @ 110373: LINE 1951 "regression-compile-tmp/asems412.imp" 10828 @ 110412: GOTO L_0003 10829 @ 110415: LOCATE L_0004 1952 LOAD(W, ANY0) 10830 @ 110418: LINE 1952 "regression-compile-tmp/asems412.imp" 10831 @ 110457: PUSH LOAD 10832 @ 110460: PUSH W 10833 @ 110463: ASSPAR 10834 @ 110464: PUSHI #0x0000002e 10835 @ 110469: ASSPAR 10836 @ 110470: CALL 1953 RX(SHIFT(KEY+1), R, W_BASE, 0) 10837 @ 110471: LINE 1953 "regression-compile-tmp/asems412.imp" 10838 @ 110510: PUSH RX 10839 @ 110513: PUSH SHIFT 10840 @ 110516: PUSH KEY 10841 @ 110519: PUSHI #0x00000001 10842 @ 110524: ADD 10843 @ 110525: ACCESS 10844 @ 110526: ASSPAR 10845 @ 110527: PUSH R 10846 @ 110530: ASSPAR 10847 @ 110531: PUSH W 10848 @ 110534: SELECT 6 10849 @ 110537: ASSPAR 10850 @ 110538: PUSHI #0x00000000 10851 @ 110543: ASSPAR 10852 @ 110544: CALL 1954 %FINISH 10853 @ 110545: LINE 1954 "regression-compile-tmp/asems412.imp" 10854 @ 110584: LOCATE L_0003 1955 ->SET CC 10855 @ 110587: LINE 1955 "regression-compile-tmp/asems412.imp" 10856 @ 110626: JUMP L_015d 1956 IOP(NEG): 10857 @ 110629: LINE 1956 "regression-compile-tmp/asems412.imp" 10858 @ 110668: PUSHI #0x00000002 10859 @ 110673: SLABEL 333 1957 IOP(NOT): 10860 @ 110676: LINE 1957 "regression-compile-tmp/asems412.imp" 10861 @ 110715: PUSHI #0x00000001 10862 @ 110720: SLABEL 333 1958 %IF V_BASE = R %START 10863 @ 110723: LINE 1958 "regression-compile-tmp/asems412.imp" 10864 @ 110762: PUSH V 10865 @ 110765: SELECT 6 10866 @ 110768: PUSH R 10867 @ 110771: JUMPIF # L_0004 1959 LOAD(V, R) 10868 @ 110775: LINE 1959 "regression-compile-tmp/asems412.imp" 10869 @ 110814: PUSH LOAD 10870 @ 110817: PUSH V 10871 @ 110820: ASSPAR 10872 @ 110821: PUSH R 10873 @ 110824: ASSPAR 10874 @ 110825: CALL 1960 RI2(XHI, V_BASE, 0, -1) 10875 @ 110826: LINE 1960 "regression-compile-tmp/asems412.imp" 10876 @ 110865: PUSH RI2 10877 @ 110868: PUSHI #0x0000c700 10878 @ 110873: ASSPAR 10879 @ 110874: PUSH V 10880 @ 110877: SELECT 6 10881 @ 110880: ASSPAR 10882 @ 110881: PUSHI #0x00000000 10883 @ 110886: ASSPAR 10884 @ 110887: PUSHI #0x00000001 10885 @ 110892: NEGATE 10886 @ 110893: ASSPAR 10887 @ 110894: CALL 1961 SF(AIS, V_BASE, 1) %IF KEY = 0 10888 @ 110895: LINE 1961 "regression-compile-tmp/asems412.imp" 10889 @ 110934: PUSH KEY 10890 @ 110937: PUSHI #0x00000000 10891 @ 110942: JUMPIF # L_0007 10892 @ 110946: PUSH SF 10893 @ 110949: PUSHI #0x00002600 10894 @ 110954: ASSPAR 10895 @ 110955: PUSH V 10896 @ 110958: SELECT 6 10897 @ 110961: ASSPAR 10898 @ 110962: PUSHI #0x00000001 10899 @ 110967: ASSPAR 10900 @ 110968: CALL 10901 @ 110969: LOCATE L_0007 1962 %ELSE 10902 @ 110972: LINE 1962 "regression-compile-tmp/asems412.imp" 10903 @ 111011: GOTO L_0003 10904 @ 111014: LOCATE L_0004 1963 W == RHS; CSTACK(KEY); RHS == W 10905 @ 111017: LINE 1963 "regression-compile-tmp/asems412.imp" 10906 @ 111056: PUSH W 10907 @ 111059: PUSH RHS 10908 @ 111062: ASSREF 10909 @ 111063: LINE 1963 "regression-compile-tmp/asems412.imp" 10910 @ 111102: PUSH CSTACK 10911 @ 111105: PUSH KEY 10912 @ 111108: ASSPAR 10913 @ 111109: CALL 10914 @ 111110: LINE 1963 "regression-compile-tmp/asems412.imp" 10915 @ 111149: PUSH RHS 10916 @ 111152: PUSH W 10917 @ 111155: ASSREF 1964 SSTACK(V); RELEASE(V_BASE); V_BASE = 0 10918 @ 111156: LINE 1964 "regression-compile-tmp/asems412.imp" 10919 @ 111195: PUSH SSTACK 10920 @ 111198: PUSH V 10921 @ 111201: ASSPAR 10922 @ 111202: CALL 10923 @ 111203: LINE 1964 "regression-compile-tmp/asems412.imp" 10924 @ 111242: PUSH RELEASE 10925 @ 111245: PUSH V 10926 @ 111248: SELECT 6 10927 @ 111251: ASSPAR 10928 @ 111252: CALL 10929 @ 111253: LINE 1964 "regression-compile-tmp/asems412.imp" 10930 @ 111292: PUSH V 10931 @ 111295: SELECT 6 10932 @ 111298: PUSHI #0x00000000 10933 @ 111303: ASSVAL 1965 OPERATE(SUB); STP = STP-1 10934 @ 111304: LINE 1965 "regression-compile-tmp/asems412.imp" 10935 @ 111343: PUSH OPERATE 10936 @ 111346: PUSHI #0x00000004 10937 @ 111351: ASSPAR 10938 @ 111352: CALL 10939 @ 111353: LINE 1965 "regression-compile-tmp/asems412.imp" 10940 @ 111392: PUSH STP 10941 @ 111395: PUSH STP 10942 @ 111398: PUSHI #0x00000001 10943 @ 111403: SUB 10944 @ 111404: ASSVAL 1966 V = STACKED(STP+1)_V; DROP(STACKED(STP+1)_V) 10945 @ 111405: LINE 1966 "regression-compile-tmp/asems412.imp" 10946 @ 111444: PUSH V 10947 @ 111447: PUSH STACKED 10948 @ 111450: PUSH STP 10949 @ 111453: PUSHI #0x00000001 10950 @ 111458: ADD 10951 @ 111459: ACCESS 10952 @ 111460: SELECT 1 10953 @ 111463: ASSVAL 10954 @ 111464: LINE 1966 "regression-compile-tmp/asems412.imp" 10955 @ 111503: PUSH DROP 10956 @ 111506: PUSH STACKED 10957 @ 111509: PUSH STP 10958 @ 111512: PUSHI #0x00000001 10959 @ 111517: ADD 10960 @ 111518: ACCESS 10961 @ 111519: SELECT 1 10962 @ 111522: ASSPAR 10963 @ 111523: CALL 1967 LOAD(V, R) 10964 @ 111524: LINE 1967 "regression-compile-tmp/asems412.imp" 10965 @ 111563: PUSH LOAD 10966 @ 111566: PUSH V 10967 @ 111569: ASSPAR 10968 @ 111570: PUSH R 10969 @ 111573: ASSPAR 10970 @ 111574: CALL 1968 %FINISH 10971 @ 111575: LINE 1968 "regression-compile-tmp/asems412.imp" 10972 @ 111614: LOCATE L_0003 1969 FORGET(V_BASE) 10973 @ 111617: LINE 1969 "regression-compile-tmp/asems412.imp" 10974 @ 111656: PUSH FORGET 10975 @ 111659: PUSH V 10976 @ 111662: SELECT 6 10977 @ 111665: ASSPAR 10978 @ 111666: CALL 1970 CCREG = V_BASE; CCCA = CA 10979 @ 111667: LINE 1970 "regression-compile-tmp/asems412.imp" 10980 @ 111706: PUSH CCREG 10981 @ 111709: PUSH V 10982 @ 111712: SELECT 6 10983 @ 111715: ASSVAL 10984 @ 111716: LINE 1970 "regression-compile-tmp/asems412.imp" 10985 @ 111755: PUSH CCCA 10986 @ 111758: PUSH CA 10987 @ 111761: ASSVAL 1971 %RETURN 10988 @ 111762: LINE 1971 "regression-compile-tmp/asems412.imp" 10989 @ 111801: RETURN 1972 IOP(EXP): 10990 @ 111802: LINE 1972 "regression-compile-tmp/asems412.imp" 10991 @ 111841: PUSHI #0x0000000d 10992 @ 111846: SLABEL 333 1973 LOAD(V, R2); LOAD(W, R3) 10993 @ 111849: LINE 1973 "regression-compile-tmp/asems412.imp" 10994 @ 111888: PUSH LOAD 10995 @ 111891: PUSH V 10996 @ 111894: ASSPAR 10997 @ 111895: PUSHI #0x00000003 10998 @ 111900: ASSPAR 10999 @ 111901: CALL 11000 @ 111902: LINE 1973 "regression-compile-tmp/asems412.imp" 11001 @ 111941: PUSH LOAD 11002 @ 111944: PUSH W 11003 @ 111947: ASSPAR 11004 @ 111948: PUSHI #0x00000004 11005 @ 111953: ASSPAR 11006 @ 111954: CALL 1974 RELEASE(R2); RELEASE(R3) 11007 @ 111955: LINE 1974 "regression-compile-tmp/asems412.imp" 11008 @ 111994: PUSH RELEASE 11009 @ 111997: PUSHI #0x00000003 11010 @ 112002: ASSPAR 11011 @ 112003: CALL 11012 @ 112004: LINE 1974 "regression-compile-tmp/asems412.imp" 11013 @ 112043: PUSH RELEASE 11014 @ 112046: PUSHI #0x00000004 11015 @ 112051: ASSPAR 11016 @ 112052: CALL 1975 PERM(IEXP) 11017 @ 112053: LINE 1975 "regression-compile-tmp/asems412.imp" 11018 @ 112092: PUSH PERM 11019 @ 112095: PUSHI #0x00000b07 11020 @ 112100: ASSPAR 11021 @ 112101: CALL 1976 CLAIM(R1); V_BASE = R1 11022 @ 112102: LINE 1976 "regression-compile-tmp/asems412.imp" 11023 @ 112141: PUSH CLAIM 11024 @ 112144: PUSHI #0x00000002 11025 @ 112149: ASSPAR 11026 @ 112150: CALL 11027 @ 112151: LINE 1976 "regression-compile-tmp/asems412.imp" 11028 @ 112190: PUSH V 11029 @ 112193: SELECT 6 11030 @ 112196: PUSHI #0x00000002 11031 @ 112201: ASSVAL 1977 ->END OP 11032 @ 112202: LINE 1977 "regression-compile-tmp/asems412.imp" 11033 @ 112241: JUMP L_015c 1978 IOP(CONC): 11034 @ 112244: LINE 1978 "regression-compile-tmp/asems412.imp" 11035 @ 112283: PUSHI #0x0000000e 11036 @ 112288: SLABEL 333 1979 %IF V_TYPE # 0 %START 11037 @ 112291: LINE 1979 "regression-compile-tmp/asems412.imp" 11038 @ 112330: PUSH V 11039 @ 112333: SELECT 8 11040 @ 112336: PUSHI #0x00000000 11041 @ 112341: JUMPIF = L_0004 1980 LOAD(V, R1); RELEASE(R1) 11042 @ 112345: LINE 1980 "regression-compile-tmp/asems412.imp" 11043 @ 112384: PUSH LOAD 11044 @ 112387: PUSH V 11045 @ 112390: ASSPAR 11046 @ 112391: PUSHI #0x00000002 11047 @ 112396: ASSPAR 11048 @ 112397: CALL 11049 @ 112398: LINE 1980 "regression-compile-tmp/asems412.imp" 11050 @ 112437: PUSH RELEASE 11051 @ 112440: PUSHI #0x00000002 11052 @ 112445: ASSPAR 11053 @ 112446: CALL 1981 HAZARD(R2) 11054 @ 112447: LINE 1981 "regression-compile-tmp/asems412.imp" 11055 @ 112486: PUSH HAZARD 11056 @ 112489: PUSHI #0x00000003 11057 @ 112494: ASSPAR 11058 @ 112495: CALL 1982 %IF WDISP = 0 %START 11059 @ 112496: LINE 1982 "regression-compile-tmp/asems412.imp" 11060 @ 112535: PUSH WDISP 11061 @ 112538: PUSHI #0x00000000 11062 @ 112543: JUMPIF # L_0007 1983 RR(LR , R2, WSP) 11063 @ 112547: LINE 1983 "regression-compile-tmp/asems412.imp" 11064 @ 112586: PUSH RR 11065 @ 112589: PUSHI #0x00000800 11066 @ 112594: ASSPAR 11067 @ 112595: PUSHI #0x00000003 11068 @ 112600: ASSPAR 11069 @ 112601: PUSHI #0x0000002b 11070 @ 112606: ASSPAR 11071 @ 112607: CALL 1984 %ELSE 11072 @ 112608: LINE 1984 "regression-compile-tmp/asems412.imp" 11073 @ 112647: GOTO L_0006 11074 @ 112650: LOCATE L_0007 1985 RI2(LHI, R2, WSP, WDISP) 11075 @ 112653: LINE 1985 "regression-compile-tmp/asems412.imp" 11076 @ 112692: PUSH RI2 11077 @ 112695: PUSHI #0x0000c800 11078 @ 112700: ASSPAR 11079 @ 112701: PUSHI #0x00000003 11080 @ 112706: ASSPAR 11081 @ 112707: PUSHI #0x0000002b 11082 @ 112712: ASSPAR 11083 @ 112713: PUSH WDISP 11084 @ 112716: ASSPAR 11085 @ 112717: CALL 1986 %FINISH 11086 @ 112718: LINE 1986 "regression-compile-tmp/asems412.imp" 11087 @ 112757: LOCATE L_0006 1987 FORGET(R2) 11088 @ 112760: LINE 1987 "regression-compile-tmp/asems412.imp" 11089 @ 112799: PUSH FORGET 11090 @ 112802: PUSHI #0x00000003 11091 @ 112807: ASSPAR 11092 @ 112808: CALL 1988 WDISP = WDISP+256 11093 @ 112809: LINE 1988 "regression-compile-tmp/asems412.imp" 11094 @ 112848: PUSH WDISP 11095 @ 112851: PUSH WDISP 11096 @ 112854: PUSHI #0x00000100 11097 @ 112859: ADD 11098 @ 112860: ASSVAL 1989 PERM(CONC1) 11099 @ 112861: LINE 1989 "regression-compile-tmp/asems412.imp" 11100 @ 112900: PUSH PERM 11101 @ 112903: PUSHI #0x0000090b 11102 @ 112908: ASSPAR 11103 @ 112909: CALL 1990 %ELSE 11104 @ 112910: LINE 1990 "regression-compile-tmp/asems412.imp" 11105 @ 112949: GOTO L_0003 11106 @ 112952: LOCATE L_0004 1991 LOAD(V, R2); RELEASE(R2) 11107 @ 112955: LINE 1991 "regression-compile-tmp/asems412.imp" 11108 @ 112994: PUSH LOAD 11109 @ 112997: PUSH V 11110 @ 113000: ASSPAR 11111 @ 113001: PUSHI #0x00000003 11112 @ 113006: ASSPAR 11113 @ 113007: CALL 11114 @ 113008: LINE 1991 "regression-compile-tmp/asems412.imp" 11115 @ 113047: PUSH RELEASE 11116 @ 113050: PUSHI #0x00000003 11117 @ 113055: ASSPAR 11118 @ 113056: CALL 1992 %FINISH 11119 @ 113057: LINE 1992 "regression-compile-tmp/asems412.imp" 11120 @ 113096: LOCATE L_0003 1993 JOIN(W) 11121 @ 113099: LINE 1993 "regression-compile-tmp/asems412.imp" 11122 @ 113138: PUSH JOIN 11123 @ 113141: PUSH W 11124 @ 113144: ASSPAR 11125 @ 113145: CALL 1994 CLAIM(R2) 11126 @ 113146: LINE 1994 "regression-compile-tmp/asems412.imp" 11127 @ 113185: PUSH CLAIM 11128 @ 113188: PUSHI #0x00000003 11129 @ 113193: ASSPAR 11130 @ 113194: CALL 1995 V_TYPE = 0; V_FORM = V IN S 11131 @ 113195: LINE 1995 "regression-compile-tmp/asems412.imp" 11132 @ 113234: PUSH V 11133 @ 113237: SELECT 8 11134 @ 113240: PUSHI #0x00000000 11135 @ 113245: ASSVAL 11136 @ 113246: LINE 1995 "regression-compile-tmp/asems412.imp" 11137 @ 113285: PUSH V 11138 @ 113288: SELECT 9 11139 @ 113291: PUSHI #0x00000003 11140 @ 113296: ASSVAL 1996 V_BASE = R2; V_DISP = 0 11141 @ 113297: LINE 1996 "regression-compile-tmp/asems412.imp" 11142 @ 113336: PUSH V 11143 @ 113339: SELECT 6 11144 @ 113342: PUSHI #0x00000003 11145 @ 113347: ASSVAL 11146 @ 113348: LINE 1996 "regression-compile-tmp/asems412.imp" 11147 @ 113387: PUSH V 11148 @ 113390: SELECT 1 11149 @ 113393: PUSHI #0x00000000 11150 @ 113398: ASSVAL 1997 %IF R # ANY %START;! NOT FROM OPERATE 11151 @ 113399: LINE 1997 "regression-compile-tmp/asems412.imp" 11152 @ 113438: PUSH R 11153 @ 113441: PUSHI #0x0000002d 11154 @ 113446: JUMPIF = L_0004 1998 LOAD(V, R); V_TYPE = 0; V_FORM = V IN S 11155 @ 113450: LINE 1998 "regression-compile-tmp/asems412.imp" 11156 @ 113489: PUSH LOAD 11157 @ 113492: PUSH V 11158 @ 113495: ASSPAR 11159 @ 113496: PUSH R 11160 @ 113499: ASSPAR 11161 @ 113500: CALL 11162 @ 113501: LINE 1998 "regression-compile-tmp/asems412.imp" 11163 @ 113540: PUSH V 11164 @ 113543: SELECT 8 11165 @ 113546: PUSHI #0x00000000 11166 @ 113551: ASSVAL 11167 @ 113552: LINE 1998 "regression-compile-tmp/asems412.imp" 11168 @ 113591: PUSH V 11169 @ 113594: SELECT 9 11170 @ 113597: PUSHI #0x00000003 11171 @ 113602: ASSVAL 1999 %FINISH 11172 @ 113603: LINE 1999 "regression-compile-tmp/asems412.imp" 11173 @ 113642: LOCATE L_0004 2000 %RETURN 11174 @ 113645: LINE 2000 "regression-compile-tmp/asems412.imp" 11175 @ 113684: RETURN 2001 REALZ:ABORT(11) %IF R = ANY; ! ...SHOULD BE FLOATING REGISTER!!! 11176 @ 113685: LINE 2001 "regression-compile-tmp/asems412.imp" 11177 @ 113724: LABEL L_015b 11178 @ 113727: LINE 2001 "regression-compile-tmp/asems412.imp" 11179 @ 113766: PUSH R 11180 @ 113769: PUSHI #0x0000002d 11181 @ 113774: JUMPIF # L_0004 11182 @ 113778: PUSH ABORT 11183 @ 113781: PUSHI #0x0000000b 11184 @ 113786: ASSPAR 11185 @ 113787: CALL 11186 @ 113788: LOCATE L_0004 2002 OP = V_LOP; V_LOP = 0 11187 @ 113791: LINE 2002 "regression-compile-tmp/asems412.imp" 11188 @ 113830: PUSH OP 11189 @ 113833: PUSH V 11190 @ 113836: SELECT 7 11191 @ 113839: ASSVAL 11192 @ 113840: LINE 2002 "regression-compile-tmp/asems412.imp" 11193 @ 113879: PUSH V 11194 @ 113882: SELECT 7 11195 @ 113885: PUSHI #0x00000000 11196 @ 113890: ASSVAL 2003 %IF OP # 0 %START 11197 @ 113891: LINE 2003 "regression-compile-tmp/asems412.imp" 11198 @ 113930: PUSH OP 11199 @ 113933: PUSHI #0x00000000 11200 @ 113938: JUMPIF = L_0004 2004 -> ROP NEG %IF OP = NEG 11201 @ 113942: LINE 2004 "regression-compile-tmp/asems412.imp" 11202 @ 113981: PUSH OP 11203 @ 113984: PUSHI #0x00000002 11204 @ 113989: JUMPIF # L_0007 11205 @ 113993: JUMP L_015f 11206 @ 113996: LOCATE L_0007 2005 W == V_LINK 11207 @ 113999: LINE 2005 "regression-compile-tmp/asems412.imp" 11208 @ 114038: PUSH W 11209 @ 114041: PUSH V 11210 @ 114044: SELECT 10 11211 @ 114047: ASSREF 2006 IOP(RDIV): 11212 @ 114048: LINE 2006 "regression-compile-tmp/asems412.imp" 11213 @ 114087: PUSHI #0x00000010 11214 @ 114092: SLABEL 333 2007 FLOAT(W, ANYF) %IF W_TYPE # REALS %AND OP # EXP 11215 @ 114095: LINE 2007 "regression-compile-tmp/asems412.imp" 11216 @ 114134: PUSH W 11217 @ 114137: SELECT 8 11218 @ 114140: PUSHI #0x00000006 11219 @ 114145: JUMPIF = L_0007 11220 @ 114149: PUSH OP 11221 @ 114152: PUSHI #0x0000000d 11222 @ 114157: JUMPIF = L_0007 11223 @ 114161: PUSH FLOAT 11224 @ 114164: PUSH W 11225 @ 114167: ASSPAR 11226 @ 114168: PUSHI #0x0000002f 11227 @ 114173: ASSPAR 11228 @ 114174: CALL 11229 @ 114175: LOCATE L_0007 2008 FLOAT(V, R) %IF V_TYPE # REALS 11230 @ 114178: LINE 2008 "regression-compile-tmp/asems412.imp" 11231 @ 114217: PUSH V 11232 @ 114220: SELECT 8 11233 @ 114223: PUSHI #0x00000006 11234 @ 114228: JUMPIF = L_0007 11235 @ 114232: PUSH FLOAT 11236 @ 114235: PUSH V 11237 @ 114238: ASSPAR 11238 @ 114239: PUSH R 11239 @ 114242: ASSPAR 11240 @ 114243: CALL 11241 @ 114244: LOCATE L_0007 2009 %IF OP = ADD %OR OP = MUL %START 11242 @ 114247: LINE 2009 "regression-compile-tmp/asems412.imp" 11243 @ 114286: PUSH OP 11244 @ 114289: PUSHI #0x00000003 11245 @ 114294: JUMPIF = L_0008 11246 @ 114298: PUSH OP 11247 @ 114301: PUSHI #0x00000006 11248 @ 114306: JUMPIF # L_0007 11249 @ 114310: LOCATE L_0008 2010 OPTIMISE(V); OPTIMISE(W) %UNLESS W == NULL 11250 @ 114313: LINE 2010 "regression-compile-tmp/asems412.imp" 11251 @ 114352: PUSH OPTIMISE 11252 @ 114355: PUSH V 11253 @ 114358: ASSPAR 11254 @ 114359: CALL 11255 @ 114360: LINE 2010 "regression-compile-tmp/asems412.imp" 11256 @ 114399: PUSH W 11257 @ 114402: PUSH NULL 11258 @ 114405: JUMPIFA = L_000a 11259 @ 114409: PUSH OPTIMISE 11260 @ 114412: PUSH W 11261 @ 114415: ASSPAR 11262 @ 114416: CALL 11263 @ 114417: LOCATE L_000a 2011 %IF W_BASE=R %OR (V_FORM # V IN R %AND W_FORM = V IN R) %START 11264 @ 114420: LINE 2011 "regression-compile-tmp/asems412.imp" 11265 @ 114459: PUSH W 11266 @ 114462: SELECT 6 11267 @ 114465: PUSH R 11268 @ 114468: JUMPIF = L_000b 11269 @ 114472: PUSH V 11270 @ 114475: SELECT 9 11271 @ 114478: PUSHI #0x00000001 11272 @ 114483: JUMPIF = L_000a 11273 @ 114487: PUSH W 11274 @ 114490: SELECT 9 11275 @ 114493: PUSHI #0x00000001 11276 @ 114498: JUMPIF # L_000a 11277 @ 114502: LOCATE L_000b 2012 H = W; W = V; V = H 11278 @ 114505: LINE 2012 "regression-compile-tmp/asems412.imp" 11279 @ 114544: PUSH H 11280 @ 114547: PUSH W 11281 @ 114550: ASSVAL 11282 @ 114551: LINE 2012 "regression-compile-tmp/asems412.imp" 11283 @ 114590: PUSH W 11284 @ 114593: PUSH V 11285 @ 114596: ASSVAL 11286 @ 114597: LINE 2012 "regression-compile-tmp/asems412.imp" 11287 @ 114636: PUSH V 11288 @ 114639: PUSH H 11289 @ 114642: ASSVAL 2013 %FINISH 11290 @ 114643: LINE 2013 "regression-compile-tmp/asems412.imp" 11291 @ 114682: LOCATE L_000a 2014 %FINISH 11292 @ 114685: LINE 2014 "regression-compile-tmp/asems412.imp" 11293 @ 114724: LOCATE L_0007 2015 ADDRESS(W) %UNLESS W == NULL 11294 @ 114727: LINE 2015 "regression-compile-tmp/asems412.imp" 11295 @ 114766: PUSH W 11296 @ 114769: PUSH NULL 11297 @ 114772: JUMPIFA = L_0007 11298 @ 114776: PUSH ADDRESS 11299 @ 114779: PUSH W 11300 @ 114782: ASSPAR 11301 @ 114783: CALL 11302 @ 114784: LOCATE L_0007 2016 ->ROP(OP) 11303 @ 114787: LINE 2016 "regression-compile-tmp/asems412.imp" 11304 @ 114826: PUSH OP 11305 @ 114829: SJUMP 334 2017 ROP(NOT):ROP(LSH): ROP(RSH): 11306 @ 114832: LINE 2017 "regression-compile-tmp/asems412.imp" 11307 @ 114871: PUSHI #0x00000001 11308 @ 114876: SLABEL 334 11309 @ 114879: LINE 2017 "regression-compile-tmp/asems412.imp" 11310 @ 114918: PUSHI #0x0000000b 11311 @ 114923: SLABEL 334 11312 @ 114926: LINE 2017 "regression-compile-tmp/asems412.imp" 11313 @ 114965: PUSHI #0x0000000c 11314 @ 114970: SLABEL 334 2018 ROP(AND):ROP(IOR): ROP(XOR): 11315 @ 114973: LINE 2018 "regression-compile-tmp/asems412.imp" 11316 @ 115012: PUSHI #0x00000008 11317 @ 115017: SLABEL 334 11318 @ 115020: LINE 2018 "regression-compile-tmp/asems412.imp" 11319 @ 115059: PUSHI #0x00000009 11320 @ 115064: SLABEL 334 11321 @ 115067: LINE 2018 "regression-compile-tmp/asems412.imp" 11322 @ 115106: PUSHI #0x0000000a 11323 @ 115111: SLABEL 334 2019 REAL ERROR(OP) 11324 @ 115114: LINE 2019 "regression-compile-tmp/asems412.imp" 11325 @ 115153: PUSH REALERROR 11326 @ 115156: PUSH OP 11327 @ 115159: ASSPAR 11328 @ 115160: CALL 2020 ROP(RDIV):OP = DIV 11329 @ 115161: LINE 2020 "regression-compile-tmp/asems412.imp" 11330 @ 115200: PUSHI #0x00000010 11331 @ 115205: SLABEL 334 11332 @ 115208: LINE 2020 "regression-compile-tmp/asems412.imp" 11333 @ 115247: PUSH OP 11334 @ 115250: PUSHI #0x00000007 11335 @ 115255: ASSVAL 2021 ROP(ADD): 11336 @ 115256: LINE 2021 "regression-compile-tmp/asems412.imp" 11337 @ 115295: PUSHI #0x00000003 11338 @ 115300: SLABEL 334 2022 ROP(SUB): 11339 @ 115303: LINE 2022 "regression-compile-tmp/asems412.imp" 11340 @ 115342: PUSHI #0x00000004 11341 @ 115347: SLABEL 334 2023 ROP(MUL): 11342 @ 115350: LINE 2023 "regression-compile-tmp/asems412.imp" 11343 @ 115389: PUSHI #0x00000006 11344 @ 115394: SLABEL 334 2024 LOAD(V, R); R = V_BASE 11345 @ 115397: LINE 2024 "regression-compile-tmp/asems412.imp" 11346 @ 115436: PUSH LOAD 11347 @ 115439: PUSH V 11348 @ 115442: ASSPAR 11349 @ 115443: PUSH R 11350 @ 115446: ASSPAR 11351 @ 115447: CALL 11352 @ 115448: LINE 2024 "regression-compile-tmp/asems412.imp" 11353 @ 115487: PUSH R 11354 @ 115490: PUSH V 11355 @ 115493: SELECT 6 11356 @ 115496: ASSVAL 2025 %IF W_FORM = V IN R %START 11357 @ 115497: LINE 2025 "regression-compile-tmp/asems412.imp" 11358 @ 115536: PUSH W 11359 @ 115539: SELECT 9 11360 @ 115542: PUSHI #0x00000001 11361 @ 115547: JUMPIF # L_0007 2026 RR(REALOP(OP), R, W_BASE) 11362 @ 115551: LINE 2026 "regression-compile-tmp/asems412.imp" 11363 @ 115590: PUSH RR 11364 @ 115593: PUSH REALOP 11365 @ 115596: PUSH OP 11366 @ 115599: ACCESS 11367 @ 115600: ASSPAR 11368 @ 115601: PUSH R 11369 @ 115604: ASSPAR 11370 @ 115605: PUSH W 11371 @ 115608: SELECT 6 11372 @ 115611: ASSPAR 11373 @ 115612: CALL 2027 %ELSE 11374 @ 115613: LINE 2027 "regression-compile-tmp/asems412.imp" 11375 @ 115652: GOTO L_0006 11376 @ 115655: LOCATE L_0007 2028 RX(REALOP(OP+7), R, W_BASE, W_DISP) 11377 @ 115658: LINE 2028 "regression-compile-tmp/asems412.imp" 11378 @ 115697: PUSH RX 11379 @ 115700: PUSH REALOP 11380 @ 115703: PUSH OP 11381 @ 115706: PUSHI #0x00000007 11382 @ 115711: ADD 11383 @ 115712: ACCESS 11384 @ 115713: ASSPAR 11385 @ 115714: PUSH R 11386 @ 115717: ASSPAR 11387 @ 115718: PUSH W 11388 @ 115721: SELECT 6 11389 @ 115724: ASSPAR 11390 @ 115725: PUSH W 11391 @ 115728: SELECT 1 11392 @ 115731: ASSPAR 11393 @ 115732: CALL 2029 %FINISH 11394 @ 115733: LINE 2029 "regression-compile-tmp/asems412.imp" 11395 @ 115772: LOCATE L_0006 2030 ->SET CC 11396 @ 115775: LINE 2030 "regression-compile-tmp/asems412.imp" 11397 @ 115814: JUMP L_015d 2031 ROP NEG: 11398 @ 115817: LINE 2031 "regression-compile-tmp/asems412.imp" 11399 @ 115856: LABEL L_015f 2032 ROP(NEG):LOAD(V, ANYF) %IF V_BASE = R 11400 @ 115859: LINE 2032 "regression-compile-tmp/asems412.imp" 11401 @ 115898: PUSHI #0x00000002 11402 @ 115903: SLABEL 334 11403 @ 115906: LINE 2032 "regression-compile-tmp/asems412.imp" 11404 @ 115945: PUSH V 11405 @ 115948: SELECT 6 11406 @ 115951: PUSH R 11407 @ 115954: JUMPIF # L_0007 11408 @ 115958: PUSH LOAD 11409 @ 115961: PUSH V 11410 @ 115964: ASSPAR 11411 @ 115965: PUSHI #0x0000002f 11412 @ 115970: ASSPAR 11413 @ 115971: CALL 11414 @ 115972: LOCATE L_0007 2033 R = FPR %IF R = ANYF 11415 @ 115975: LINE 2033 "regression-compile-tmp/asems412.imp" 11416 @ 116014: PUSH R 11417 @ 116017: PUSHI #0x0000002f 11418 @ 116022: JUMPIF # L_0007 11419 @ 116026: PUSH R 11420 @ 116029: PUSH FPR 11421 @ 116032: CALL 11422 @ 116033: ASSVAL 11423 @ 116034: LOCATE L_0007 2034 HAZARD(R) 11424 @ 116037: LINE 2034 "regression-compile-tmp/asems412.imp" 11425 @ 116076: PUSH HAZARD 11426 @ 116079: PUSH R 11427 @ 116082: ASSPAR 11428 @ 116083: CALL 2035 CLAIM(R); RR(SER, R, R); CLAIM(R) 11429 @ 116084: LINE 2035 "regression-compile-tmp/asems412.imp" 11430 @ 116123: PUSH CLAIM 11431 @ 116126: PUSH R 11432 @ 116129: ASSPAR 11433 @ 116130: CALL 11434 @ 116131: LINE 2035 "regression-compile-tmp/asems412.imp" 11435 @ 116170: PUSH RR 11436 @ 116173: PUSHI #0x00002b00 11437 @ 116178: ASSPAR 11438 @ 116179: PUSH R 11439 @ 116182: ASSPAR 11440 @ 116183: PUSH R 11441 @ 116186: ASSPAR 11442 @ 116187: CALL 11443 @ 116188: LINE 2035 "regression-compile-tmp/asems412.imp" 11444 @ 116227: PUSH CLAIM 11445 @ 116230: PUSH R 11446 @ 116233: ASSPAR 11447 @ 116234: CALL 2036 ADDRESS(V) 11448 @ 116235: LINE 2036 "regression-compile-tmp/asems412.imp" 11449 @ 116274: PUSH ADDRESS 11450 @ 116277: PUSH V 11451 @ 116280: ASSPAR 11452 @ 116281: CALL 2037 %IF V_FORM = V IN R %START 11453 @ 116282: LINE 2037 "regression-compile-tmp/asems412.imp" 11454 @ 116321: PUSH V 11455 @ 116324: SELECT 9 11456 @ 116327: PUSHI #0x00000001 11457 @ 116332: JUMPIF # L_0007 2038 RR(SER, R, V_BASE) 11458 @ 116336: LINE 2038 "regression-compile-tmp/asems412.imp" 11459 @ 116375: PUSH RR 11460 @ 116378: PUSHI #0x00002b00 11461 @ 116383: ASSPAR 11462 @ 116384: PUSH R 11463 @ 116387: ASSPAR 11464 @ 116388: PUSH V 11465 @ 116391: SELECT 6 11466 @ 116394: ASSPAR 11467 @ 116395: CALL 2039 %ELSE 11468 @ 116396: LINE 2039 "regression-compile-tmp/asems412.imp" 11469 @ 116435: GOTO L_0006 11470 @ 116438: LOCATE L_0007 2040 RX(SE, R, V_BASE, V_DISP) 11471 @ 116441: LINE 2040 "regression-compile-tmp/asems412.imp" 11472 @ 116480: PUSH RX 11473 @ 116483: PUSHI #0x00006b00 11474 @ 116488: ASSPAR 11475 @ 116489: PUSH R 11476 @ 116492: ASSPAR 11477 @ 116493: PUSH V 11478 @ 116496: SELECT 6 11479 @ 116499: ASSPAR 11480 @ 116500: PUSH V 11481 @ 116503: SELECT 1 11482 @ 116506: ASSPAR 11483 @ 116507: CALL 2041 %FINISH 11484 @ 116508: LINE 2041 "regression-compile-tmp/asems412.imp" 11485 @ 116547: LOCATE L_0006 2042 CCREG = R; CCCA = CA 11486 @ 116550: LINE 2042 "regression-compile-tmp/asems412.imp" 11487 @ 116589: PUSH CCREG 11488 @ 116592: PUSH R 11489 @ 116595: ASSVAL 11490 @ 116596: LINE 2042 "regression-compile-tmp/asems412.imp" 11491 @ 116635: PUSH CCCA 11492 @ 116638: PUSH CA 11493 @ 116641: ASSVAL 2043 FORGET(R) 11494 @ 116642: LINE 2043 "regression-compile-tmp/asems412.imp" 11495 @ 116681: PUSH FORGET 11496 @ 116684: PUSH R 11497 @ 116687: ASSPAR 11498 @ 116688: CALL 2044 V_BASE = R; V_DISP = 0 11499 @ 116689: LINE 2044 "regression-compile-tmp/asems412.imp" 11500 @ 116728: PUSH V 11501 @ 116731: SELECT 6 11502 @ 116734: PUSH R 11503 @ 116737: ASSVAL 11504 @ 116738: LINE 2044 "regression-compile-tmp/asems412.imp" 11505 @ 116777: PUSH V 11506 @ 116780: SELECT 1 11507 @ 116783: PUSHI #0x00000000 11508 @ 116788: ASSVAL 2045 V_FORM = V IN R 11509 @ 116789: LINE 2045 "regression-compile-tmp/asems412.imp" 11510 @ 116828: PUSH V 11511 @ 116831: SELECT 9 11512 @ 116834: PUSHI #0x00000001 11513 @ 116839: ASSVAL 2046 %RETURN 11514 @ 116840: LINE 2046 "regression-compile-tmp/asems412.imp" 11515 @ 116879: RETURN 2047 %FINISH 11516 @ 116880: LINE 2047 "regression-compile-tmp/asems412.imp" 11517 @ 116919: LOCATE L_0004 2048 FLOAT(V, R) %IF V_TYPE # REALS 11518 @ 116922: LINE 2048 "regression-compile-tmp/asems412.imp" 11519 @ 116961: PUSH V 11520 @ 116964: SELECT 8 11521 @ 116967: PUSHI #0x00000006 11522 @ 116972: JUMPIF = L_0004 11523 @ 116976: PUSH FLOAT 11524 @ 116979: PUSH V 11525 @ 116982: ASSPAR 11526 @ 116983: PUSH R 11527 @ 116986: ASSPAR 11528 @ 116987: CALL 11529 @ 116988: LOCATE L_0004 2049 OPTIMISE(V) 11530 @ 116991: LINE 2049 "regression-compile-tmp/asems412.imp" 11531 @ 117030: PUSH OPTIMISE 11532 @ 117033: PUSH V 11533 @ 117036: ASSPAR 11534 @ 117037: CALL 2050 %IF V_FORM = V IN R %START 11535 @ 117038: LINE 2050 "regression-compile-tmp/asems412.imp" 11536 @ 117077: PUSH V 11537 @ 117080: SELECT 9 11538 @ 117083: PUSHI #0x00000001 11539 @ 117088: JUMPIF # L_0004 2051 %RETURN %IF R = ANYF %OR V_BASE = R 11540 @ 117092: LINE 2051 "regression-compile-tmp/asems412.imp" 11541 @ 117131: PUSH R 11542 @ 117134: PUSHI #0x0000002f 11543 @ 117139: JUMPIF = L_0008 11544 @ 117143: PUSH V 11545 @ 117146: SELECT 6 11546 @ 117149: PUSH R 11547 @ 117152: JUMPIF # L_0007 11548 @ 117156: LOCATE L_0008 11549 @ 117159: RETURN 11550 @ 117160: LOCATE L_0007 2052 RR(LER, R, V_BASE); USE(R) = USE(V_BASE) 11551 @ 117163: LINE 2052 "regression-compile-tmp/asems412.imp" 11552 @ 117202: PUSH RR 11553 @ 117205: PUSHI #0x00002800 11554 @ 117210: ASSPAR 11555 @ 117211: PUSH R 11556 @ 117214: ASSPAR 11557 @ 117215: PUSH V 11558 @ 117218: SELECT 6 11559 @ 117221: ASSPAR 11560 @ 117222: CALL 11561 @ 117223: LINE 2052 "regression-compile-tmp/asems412.imp" 11562 @ 117262: PUSH USE 11563 @ 117265: PUSH R 11564 @ 117268: ACCESS 11565 @ 117269: PUSH USE 11566 @ 117272: PUSH V 11567 @ 117275: SELECT 6 11568 @ 117278: ACCESS 11569 @ 117279: ASSVAL 2053 V_BASE = R; CLAIM(V_BASE) 11570 @ 117280: LINE 2053 "regression-compile-tmp/asems412.imp" 11571 @ 117319: PUSH V 11572 @ 117322: SELECT 6 11573 @ 117325: PUSH R 11574 @ 117328: ASSVAL 11575 @ 117329: LINE 2053 "regression-compile-tmp/asems412.imp" 11576 @ 117368: PUSH CLAIM 11577 @ 117371: PUSH V 11578 @ 117374: SELECT 6 11579 @ 117377: ASSPAR 11580 @ 117378: CALL 2054 CCREG = R; CCCA = CA 11581 @ 117379: LINE 2054 "regression-compile-tmp/asems412.imp" 11582 @ 117418: PUSH CCREG 11583 @ 117421: PUSH R 11584 @ 117424: ASSVAL 11585 @ 117425: LINE 2054 "regression-compile-tmp/asems412.imp" 11586 @ 117464: PUSH CCCA 11587 @ 117467: PUSH CA 11588 @ 117470: ASSVAL 2055 %RETURN 11589 @ 117471: LINE 2055 "regression-compile-tmp/asems412.imp" 11590 @ 117510: RETURN 2056 %FINISH 11591 @ 117511: LINE 2056 "regression-compile-tmp/asems412.imp" 11592 @ 117550: LOCATE L_0004 2057 R = FPR %IF R = ANYF 11593 @ 117553: LINE 2057 "regression-compile-tmp/asems412.imp" 11594 @ 117592: PUSH R 11595 @ 117595: PUSHI #0x0000002f 11596 @ 117600: JUMPIF # L_0004 11597 @ 117604: PUSH R 11598 @ 117607: PUSH FPR 11599 @ 117610: CALL 11600 @ 117611: ASSVAL 11601 @ 117612: LOCATE L_0004 2058 ABORT(12) %UNLESS FPR0 <= R <= FPR14 11602 @ 117615: LINE 2058 "regression-compile-tmp/asems412.imp" 11603 @ 117654: PUSHI #0x0000000d 11604 @ 117659: PUSH R 11605 @ 117662: JUMPIFD > L_0005 11606 @ 117666: PUSHI #0x00000014 11607 @ 117671: JUMPIF <= L_0004 11608 @ 117675: LOCATE L_0005 11609 @ 117678: PUSH ABORT 11610 @ 117681: PUSHI #0x0000000c 11611 @ 117686: ASSPAR 11612 @ 117687: CALL 11613 @ 117688: LOCATE L_0004 2059 ->F(V_FORM) 11614 @ 117691: LINE 2059 "regression-compile-tmp/asems412.imp" 11615 @ 117730: PUSH V 11616 @ 117733: SELECT 9 11617 @ 117736: SJUMP 332 2060 ROP(EXP): 11618 @ 117739: LINE 2060 "regression-compile-tmp/asems412.imp" 11619 @ 117778: PUSHI #0x0000000d 11620 @ 117783: SLABEL 334 2061 REAL ERROR(1) %AND W_TYPE = INTEGER %IF W_TYPE = REALS 11621 @ 117786: LINE 2061 "regression-compile-tmp/asems412.imp" 11622 @ 117825: PUSH W 11623 @ 117828: SELECT 8 11624 @ 117831: PUSHI #0x00000006 11625 @ 117836: JUMPIF # L_0004 11626 @ 117840: PUSH REALERROR 11627 @ 117843: PUSHI #0x00000001 11628 @ 117848: ASSPAR 11629 @ 117849: CALL 11630 @ 117850: PUSH W 11631 @ 117853: SELECT 8 11632 @ 117856: PUSHI #0x00000001 11633 @ 117861: ASSVAL 11634 @ 117862: LOCATE L_0004 2062 LOAD(V, FPR2); LOAD(W, R1) 11635 @ 117865: LINE 2062 "regression-compile-tmp/asems412.imp" 11636 @ 117904: PUSH LOAD 11637 @ 117907: PUSH V 11638 @ 117910: ASSPAR 11639 @ 117911: PUSHI #0x0000000e 11640 @ 117916: ASSPAR 11641 @ 117917: CALL 11642 @ 117918: LINE 2062 "regression-compile-tmp/asems412.imp" 11643 @ 117957: PUSH LOAD 11644 @ 117960: PUSH W 11645 @ 117963: ASSPAR 11646 @ 117964: PUSHI #0x00000002 11647 @ 117969: ASSPAR 11648 @ 117970: CALL 2063 RELEASE(FPR2); RELEASE(R1) 11649 @ 117971: LINE 2063 "regression-compile-tmp/asems412.imp" 11650 @ 118010: PUSH RELEASE 11651 @ 118013: PUSHI #0x0000000e 11652 @ 118018: ASSPAR 11653 @ 118019: CALL 11654 @ 118020: LINE 2063 "regression-compile-tmp/asems412.imp" 11655 @ 118059: PUSH RELEASE 11656 @ 118062: PUSHI #0x00000002 11657 @ 118067: ASSPAR 11658 @ 118068: CALL 2064 PERM(REXP) 11659 @ 118069: LINE 2064 "regression-compile-tmp/asems412.imp" 11660 @ 118108: PUSH PERM 11661 @ 118111: PUSHI #0x00018108 11662 @ 118116: ASSPAR 11663 @ 118117: CALL 2065 CLAIM(FPR0); V_BASE = FPR0 11664 @ 118118: LINE 2065 "regression-compile-tmp/asems412.imp" 11665 @ 118157: PUSH CLAIM 11666 @ 118160: PUSHI #0x0000000d 11667 @ 118165: ASSPAR 11668 @ 118166: CALL 11669 @ 118167: LINE 2065 "regression-compile-tmp/asems412.imp" 11670 @ 118206: PUSH V 11671 @ 118209: SELECT 6 11672 @ 118212: PUSHI #0x0000000d 11673 @ 118217: ASSVAL 2066 ->ENDOP 11674 @ 118218: LINE 2066 "regression-compile-tmp/asems412.imp" 11675 @ 118257: JUMP L_015c 2067 SET CC: 11676 @ 118260: LINE 2067 "regression-compile-tmp/asems412.imp" 11677 @ 118299: LABEL L_015d 2068 CCCA = CA; CCREG = R 11678 @ 118302: LINE 2068 "regression-compile-tmp/asems412.imp" 11679 @ 118341: PUSH CCCA 11680 @ 118344: PUSH CA 11681 @ 118347: ASSVAL 11682 @ 118348: LINE 2068 "regression-compile-tmp/asems412.imp" 11683 @ 118387: PUSH CCREG 11684 @ 118390: PUSH R 11685 @ 118393: ASSVAL 2069 FEND: FORGET(R) 11686 @ 118394: LINE 2069 "regression-compile-tmp/asems412.imp" 11687 @ 118433: LABEL L_015e 11688 @ 118436: LINE 2069 "regression-compile-tmp/asems412.imp" 11689 @ 118475: PUSH FORGET 11690 @ 118478: PUSH R 11691 @ 118481: ASSPAR 11692 @ 118482: CALL 2070 END OP:DROP(W) 11693 @ 118483: LINE 2070 "regression-compile-tmp/asems412.imp" 11694 @ 118522: LABEL L_015c 11695 @ 118525: LINE 2070 "regression-compile-tmp/asems412.imp" 11696 @ 118564: PUSH DROP 11697 @ 118567: PUSH W 11698 @ 118570: ASSPAR 11699 @ 118571: CALL 2071 %END 11700 @ 118572: LINE 2071 "regression-compile-tmp/asems412.imp" 11701 @ 118611: END _lev0id0_ASSEMBLE_LOAD {lev=3 --> 2} 2072 %ROUTINE COP(%INTEGER OP, %INTEGERNAME L, %INTEGER R) 11702 @ 118612: LINE 2072 "regression-compile-tmp/asems412.imp" 11703 @ 118651: DEF COP (_lev0id0_ASSEMBLE_COP) p1=V_0141 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 11704 @ 118666: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 11705 @ 118667: DEF OP p1=V_0142 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 11706 @ 118681: DEF L p1=V_0143 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 11707 @ 118694: DEF R p1=V_0144 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 11708 @ 118707: FINISH ) {lev=3} 2073 %SWITCH S(1:17) 11709 @ 118708: LINE 2073 "regression-compile-tmp/asems412.imp" 11710 @ 118747: PUSHI #0x00000001 11711 @ 118752: PUSHI #0x00000011 11712 @ 118757: BOUNDS 11713 @ 118758: DEF S p1=V_0145 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 2074 ->S(OP) 11714 @ 118771: LINE 2074 "regression-compile-tmp/asems412.imp" 11715 @ 118810: PUSH OP 11716 @ 118813: SJUMP 325 2075 S(SADD): 11717 @ 118816: LINE 2075 "regression-compile-tmp/asems412.imp" 11718 @ 118855: PUSHI #0x0000000f 11719 @ 118860: SLABEL 325 2076 S(RDIV): 11720 @ 118863: LINE 2076 "regression-compile-tmp/asems412.imp" 11721 @ 118902: PUSHI #0x00000010 11722 @ 118907: SLABEL 325 2077 S(NEG): 11723 @ 118910: LINE 2077 "regression-compile-tmp/asems412.imp" 11724 @ 118949: PUSHI #0x00000002 11725 @ 118954: SLABEL 325 2078 S(NOT): 11726 @ 118957: LINE 2078 "regression-compile-tmp/asems412.imp" 11727 @ 118996: PUSHI #0x00000001 11728 @ 119001: SLABEL 325 2079 S(CONC): ABORT(13) 11729 @ 119004: LINE 2079 "regression-compile-tmp/asems412.imp" 11730 @ 119043: PUSHI #0x0000000e 11731 @ 119048: SLABEL 325 11732 @ 119051: LINE 2079 "regression-compile-tmp/asems412.imp" 11733 @ 119090: PUSH ABORT 11734 @ 119093: PUSHI #0x0000000d 11735 @ 119098: ASSPAR 11736 @ 119099: CALL 2080 S(ADD): L = L+R; %RETURN 11737 @ 119100: LINE 2080 "regression-compile-tmp/asems412.imp" 11738 @ 119139: PUSHI #0x00000003 11739 @ 119144: SLABEL 325 11740 @ 119147: LINE 2080 "regression-compile-tmp/asems412.imp" 11741 @ 119186: PUSH L 11742 @ 119189: PUSH L 11743 @ 119192: PUSH R 11744 @ 119195: ADD 11745 @ 119196: ASSVAL 11746 @ 119197: LINE 2080 "regression-compile-tmp/asems412.imp" 11747 @ 119236: RETURN 2081 S(SUB): L = L-R; %RETURN 11748 @ 119237: LINE 2081 "regression-compile-tmp/asems412.imp" 11749 @ 119276: PUSHI #0x00000004 11750 @ 119281: SLABEL 325 11751 @ 119284: LINE 2081 "regression-compile-tmp/asems412.imp" 11752 @ 119323: PUSH L 11753 @ 119326: PUSH L 11754 @ 119329: PUSH R 11755 @ 119332: SUB 11756 @ 119333: ASSVAL 11757 @ 119334: LINE 2081 "regression-compile-tmp/asems412.imp" 11758 @ 119373: RETURN 2082 S(IOR): L = L!R; %RETURN 11759 @ 119374: LINE 2082 "regression-compile-tmp/asems412.imp" 11760 @ 119413: PUSHI #0x00000009 11761 @ 119418: SLABEL 325 11762 @ 119421: LINE 2082 "regression-compile-tmp/asems412.imp" 11763 @ 119460: PUSH L 11764 @ 119463: PUSH L 11765 @ 119466: PUSH R 11766 @ 119469: OR 11767 @ 119470: ASSVAL 11768 @ 119471: LINE 2082 "regression-compile-tmp/asems412.imp" 11769 @ 119510: RETURN 2083 S(AND): L = L&R; %RETURN 11770 @ 119511: LINE 2083 "regression-compile-tmp/asems412.imp" 11771 @ 119550: PUSHI #0x00000008 11772 @ 119555: SLABEL 325 11773 @ 119558: LINE 2083 "regression-compile-tmp/asems412.imp" 11774 @ 119597: PUSH L 11775 @ 119600: PUSH L 11776 @ 119603: PUSH R 11777 @ 119606: AND 11778 @ 119607: ASSVAL 11779 @ 119608: LINE 2083 "regression-compile-tmp/asems412.imp" 11780 @ 119647: RETURN 2084 S(XOR): L = L!!R; %RETURN 11781 @ 119648: LINE 2084 "regression-compile-tmp/asems412.imp" 11782 @ 119687: PUSHI #0x0000000a 11783 @ 119692: SLABEL 325 11784 @ 119695: LINE 2084 "regression-compile-tmp/asems412.imp" 11785 @ 119734: PUSH L 11786 @ 119737: PUSH L 11787 @ 119740: PUSH R 11788 @ 119743: XOR 11789 @ 119744: ASSVAL 11790 @ 119745: LINE 2084 "regression-compile-tmp/asems412.imp" 11791 @ 119784: RETURN 2085 S(LSH): L = L<>R; %RETURN 11814 @ 120059: LINE 2087 "regression-compile-tmp/asems412.imp" 11815 @ 120098: PUSHI #0x0000000c 11816 @ 120103: SLABEL 325 11817 @ 120106: LINE 2087 "regression-compile-tmp/asems412.imp" 11818 @ 120145: PUSH L 11819 @ 120148: PUSH L 11820 @ 120151: PUSH R 11821 @ 120154: RSH 11822 @ 120155: ASSVAL 11823 @ 120156: LINE 2087 "regression-compile-tmp/asems412.imp" 11824 @ 120195: RETURN 2088 S(EXP): L = L\\R; %RETURN 11825 @ 120196: LINE 2088 "regression-compile-tmp/asems412.imp" 11826 @ 120235: PUSHI #0x0000000d 11827 @ 120240: SLABEL 325 11828 @ 120243: LINE 2088 "regression-compile-tmp/asems412.imp" 11829 @ 120282: PUSH L 11830 @ 120285: PUSH L 11831 @ 120288: PUSH R 11832 @ 120291: IEXP 11833 @ 120292: ASSVAL 11834 @ 120293: LINE 2088 "regression-compile-tmp/asems412.imp" 11835 @ 120332: RETURN 2089 S(DIV): ABORT(-6) %AND R = 1 %IF R = 0 11836 @ 120333: LINE 2089 "regression-compile-tmp/asems412.imp" 11837 @ 120372: PUSHI #0x00000007 11838 @ 120377: SLABEL 325 11839 @ 120380: LINE 2089 "regression-compile-tmp/asems412.imp" 11840 @ 120419: PUSH R 11841 @ 120422: PUSHI #0x00000000 11842 @ 120427: JUMPIF # L_0004 11843 @ 120431: PUSH ABORT 11844 @ 120434: PUSHI #0x00000006 11845 @ 120439: NEGATE 11846 @ 120440: ASSPAR 11847 @ 120441: CALL 11848 @ 120442: PUSH R 11849 @ 120445: PUSHI #0x00000001 11850 @ 120450: ASSVAL 11851 @ 120451: LOCATE L_0004 2090 L = L//R; %RETURN 11852 @ 120454: LINE 2090 "regression-compile-tmp/asems412.imp" 11853 @ 120493: PUSH L 11854 @ 120496: PUSH L 11855 @ 120499: PUSH R 11856 @ 120502: QUOT 11857 @ 120503: ASSVAL 11858 @ 120504: LINE 2090 "regression-compile-tmp/asems412.imp" 11859 @ 120543: RETURN 2091 S(REM): ABORT(-6) %AND R = 1 %IF R = 0 11860 @ 120544: LINE 2091 "regression-compile-tmp/asems412.imp" 11861 @ 120583: PUSHI #0x00000011 11862 @ 120588: SLABEL 325 11863 @ 120591: LINE 2091 "regression-compile-tmp/asems412.imp" 11864 @ 120630: PUSH R 11865 @ 120633: PUSHI #0x00000000 11866 @ 120638: JUMPIF # L_0004 11867 @ 120642: PUSH ABORT 11868 @ 120645: PUSHI #0x00000006 11869 @ 120650: NEGATE 11870 @ 120651: ASSPAR 11871 @ 120652: CALL 11872 @ 120653: PUSH R 11873 @ 120656: PUSHI #0x00000001 11874 @ 120661: ASSVAL 11875 @ 120662: LOCATE L_0004 2092 L = L-L//R*R 11876 @ 120665: LINE 2092 "regression-compile-tmp/asems412.imp" 11877 @ 120704: PUSH L 11878 @ 120707: PUSH L 11879 @ 120710: PUSH L 11880 @ 120713: PUSH R 11881 @ 120716: QUOT 11882 @ 120717: PUSH R 11883 @ 120720: MUL 11884 @ 120721: SUB 11885 @ 120722: ASSVAL 2093 %END 11886 @ 120723: LINE 2093 "regression-compile-tmp/asems412.imp" 11887 @ 120762: END _lev0id0_ASSEMBLE_COP {lev=3 --> 2} 2094 %ROUTINE JOIN(%RECORD(STACKFM)%NAME W) 11888 @ 120763: LINE 2094 "regression-compile-tmp/asems412.imp" 11889 @ 120802: DEF JOIN (_lev0id0_ASSEMBLE_JOIN) p1=V_0123 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 11890 @ 120818: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 11891 @ 120819: DEF W p1=V_0142 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 11892 @ 120832: FINISH ) {lev=3} 2095 %RECORD(STACKFM)%NAME QW 11893 @ 120833: LINE 2095 "regression-compile-tmp/asems412.imp" 11894 @ 120872: DEF QW p1=V_0143 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2096 %CYCLE 11895 @ 120886: LINE 2096 "regression-compile-tmp/asems412.imp" 11896 @ 120925: LOCATE L_0003 2097 QW == W_LINK; W_LOP = 0 11897 @ 120928: LINE 2097 "regression-compile-tmp/asems412.imp" 11898 @ 120967: PUSH QW 11899 @ 120970: PUSH W 11900 @ 120973: SELECT 10 11901 @ 120976: ASSREF 11902 @ 120977: LINE 2097 "regression-compile-tmp/asems412.imp" 11903 @ 121016: PUSH W 11904 @ 121019: SELECT 7 11905 @ 121022: PUSHI #0x00000000 11906 @ 121027: ASSVAL 2098 LRD(W, R1); PERM(CONC2) 11907 @ 121028: LINE 2098 "regression-compile-tmp/asems412.imp" 11908 @ 121067: PUSH LRD 11909 @ 121070: PUSH W 11910 @ 121073: ASSPAR 11911 @ 121074: PUSHI #0x00000002 11912 @ 121079: ASSPAR 11913 @ 121080: CALL 11914 @ 121081: LINE 2098 "regression-compile-tmp/asems412.imp" 11915 @ 121120: PUSH PERM 11916 @ 121123: PUSHI #0x0000630c 11917 @ 121128: ASSPAR 11918 @ 121129: CALL 2099 %EXIT %IF QW == NULL 11919 @ 121130: LINE 2099 "regression-compile-tmp/asems412.imp" 11920 @ 121169: PUSH QW 11921 @ 121172: PUSH NULL 11922 @ 121175: JUMPIFA # L_0007 11923 @ 121179: GOTO L_0004 11924 @ 121182: LOCATE L_0007 2100 W == QW 11925 @ 121185: LINE 2100 "regression-compile-tmp/asems412.imp" 11926 @ 121224: PUSH W 11927 @ 121227: PUSH QW 11928 @ 121230: ASSREF 2101 %REPEAT 11929 @ 121231: LINE 2101 "regression-compile-tmp/asems412.imp" 11930 @ 121270: REPEAT L_0003 11931 @ 121273: LOCATE L_0004 2102 %END 11932 @ 121276: LINE 2102 "regression-compile-tmp/asems412.imp" 11933 @ 121315: END _lev0id0_ASSEMBLE_JOIN {lev=3 --> 2} 2103 %ROUTINE OPERATE(%INTEGER OPER) 11934 @ 121316: LINE 2103 "regression-compile-tmp/asems412.imp" 11935 @ 121355: DEF OPERATE (_lev0id0_ASSEMBLE_OPERATE) p1=V_0124 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 11936 @ 121374: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 11937 @ 121375: DEF OPER p1=V_0142 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 11938 @ 121391: FINISH ) {lev=3} 2104 %CONSTINTEGERARRAY NULL OP(3:17) = 0,0,1,1,1,-1,0(4),1,0,0,1,1 11939 @ 121392: LINE 2104 "regression-compile-tmp/asems412.imp" 11940 @ 121431: PUSHI #0x00000003 11941 @ 121436: PUSHI #0x00000011 11942 @ 121441: BOUNDS 11943 @ 121442: DEF NULLOP p1=V_0143 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 11944 @ 121460: PUSHI #0x00000000 11945 @ 121465: INIT 1 11946 @ 121468: PUSHI #0x00000000 11947 @ 121473: INIT 1 11948 @ 121476: PUSHI #0x00000001 11949 @ 121481: INIT 1 11950 @ 121484: PUSHI #0x00000001 11951 @ 121489: INIT 1 11952 @ 121492: PUSHI #0x00000001 11953 @ 121497: INIT 1 11954 @ 121500: PUSHI #0xffffffff 11955 @ 121505: INIT 1 11956 @ 121508: PUSHI #0x00000000 11957 @ 121513: INIT 4 11958 @ 121516: PUSHI #0x00000001 11959 @ 121521: INIT 1 11960 @ 121524: PUSHI #0x00000000 11961 @ 121529: INIT 1 11962 @ 121532: PUSHI #0x00000000 11963 @ 121537: INIT 1 11964 @ 121540: PUSHI #0x00000001 11965 @ 121545: INIT 1 11966 @ 121548: PUSHI #0x00000001 11967 @ 121553: INIT 1 2105 %INTEGER RCON, LCON, WCON, LOP 11968 @ 121556: LINE 2105 "regression-compile-tmp/asems412.imp" 11969 @ 121595: DEF RCON p1=V_0144 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 11970 @ 121611: DEF LCON p1=V_0145 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 11971 @ 121627: DEF WCON p1=V_0146 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 11972 @ 121643: DEF LOP p1=V_0147 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 2106 %INTEGER KEY, D, S 11973 @ 121658: LINE 2106 "regression-compile-tmp/asems412.imp" 11974 @ 121697: DEF KEY p1=V_0148 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 11975 @ 121712: DEF D p1=V_0149 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 11976 @ 121725: DEF S p1=V_014a 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(STACKFM)%NAME WITH, LH, RH 11977 @ 121738: LINE 2107 "regression-compile-tmp/asems412.imp" 11978 @ 121777: DEF WITH p1=V_014b a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 11979 @ 121793: DEF LH p1=V_014c a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 11980 @ 121807: DEF RH p1=V_014d a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2108 %CONSTBYTEINTEGERARRAY TRANS(1:17) = 2,2,0,0,1(6),2(4),0,15,15 2109 11981 @ 121821: LINE 2108 "regression-compile-tmp/asems412.imp" 11982 @ 121860: PUSHI #0x00000001 11983 @ 121865: PUSHI #0x00000011 11984 @ 121870: BOUNDS 11985 @ 121871: DEF TRANS p1=V_014e 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 11986 @ 121888: PUSHI #0x00000002 11987 @ 121893: INIT 1 11988 @ 121896: PUSHI #0x00000002 11989 @ 121901: INIT 1 11990 @ 121904: PUSHI #0x00000000 11991 @ 121909: INIT 1 11992 @ 121912: PUSHI #0x00000000 11993 @ 121917: INIT 1 11994 @ 121920: PUSHI #0x00000001 11995 @ 121925: INIT 6 11996 @ 121928: PUSHI #0x00000002 11997 @ 121933: INIT 4 11998 @ 121936: PUSHI #0x00000000 11999 @ 121941: INIT 1 12000 @ 121944: PUSHI #0x0000000f 12001 @ 121949: INIT 1 12002 @ 121952: PUSHI #0x0000000f 12003 @ 121957: INIT 1 2110 %ROUTINE SWOP 12004 @ 121960: LINE 2110 "regression-compile-tmp/asems412.imp" 12005 @ 121999: DEF SWOP (_lev0id0_ASSEMBLE_OPERATE_SWOP) p1=V_014f 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 12006 @ 122015: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 12007 @ 122016: FINISH ) {lev=4} 2111 WCON = LCON; LCON = RCON; RCON = WCON 12008 @ 122017: LINE 2111 "regression-compile-tmp/asems412.imp" 12009 @ 122056: PUSH WCON 12010 @ 122059: PUSH LCON 12011 @ 122062: ASSVAL 12012 @ 122063: LINE 2111 "regression-compile-tmp/asems412.imp" 12013 @ 122102: PUSH LCON 12014 @ 122105: PUSH RCON 12015 @ 122108: ASSVAL 12016 @ 122109: LINE 2111 "regression-compile-tmp/asems412.imp" 12017 @ 122148: PUSH RCON 12018 @ 122151: PUSH WCON 12019 @ 122154: ASSVAL 2112 WITH == LH; LH == RH; RH == WITH 12020 @ 122155: LINE 2112 "regression-compile-tmp/asems412.imp" 12021 @ 122194: PUSH WITH 12022 @ 122197: PUSH LH 12023 @ 122200: ASSREF 12024 @ 122201: LINE 2112 "regression-compile-tmp/asems412.imp" 12025 @ 122240: PUSH LH 12026 @ 122243: PUSH RH 12027 @ 122246: ASSREF 12028 @ 122247: LINE 2112 "regression-compile-tmp/asems412.imp" 12029 @ 122286: PUSH RH 12030 @ 122289: PUSH WITH 12031 @ 122292: ASSREF 2113 STACKED(STP)_V == LH 12032 @ 122293: LINE 2113 "regression-compile-tmp/asems412.imp" 12033 @ 122332: PUSH STACKED 12034 @ 122335: PUSH STP 12035 @ 122338: ACCESS 12036 @ 122339: SELECT 1 12037 @ 122342: PUSH LH 12038 @ 122345: ASSREF 2114 %END 12039 @ 122346: LINE 2114 "regression-compile-tmp/asems412.imp" 12040 @ 122385: END _lev0id0_ASSEMBLE_OPERATE_SWOP {lev=4 --> 3} 2115 %ROUTINE PICKUP(%RECORD(STACKFM)%NAME V) 12041 @ 122386: LINE 2115 "regression-compile-tmp/asems412.imp" 12042 @ 122425: DEF PICKUP (_lev0id0_ASSEMBLE_OPERATE_PICKUP) p1=V_0150 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 12043 @ 122443: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 12044 @ 122444: DEF V p1=V_0151 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 12045 @ 122457: FINISH ) {lev=4} 2116 %IF FLOATING(V) %THEN LOAD(V,ANYF) %ELSE LOAD(V,ANY) 12046 @ 122458: LINE 2116 "regression-compile-tmp/asems412.imp" 12047 @ 122497: PUSH FLOATING 12048 @ 122500: PUSH V 12049 @ 122503: ASSPAR 12050 @ 122504: CALL 12051 @ 122505: bf L_0004 12052 @ 122508: PUSH LOAD 12053 @ 122511: PUSH V 12054 @ 122514: ASSPAR 12055 @ 122515: PUSHI #0x0000002f 12056 @ 122520: ASSPAR 12057 @ 122521: CALL 12058 @ 122522: GOTO L_0003 12059 @ 122525: LOCATE L_0004 12060 @ 122528: PUSH LOAD 12061 @ 122531: PUSH V 12062 @ 122534: ASSPAR 12063 @ 122535: PUSHI #0x0000002d 12064 @ 122540: ASSPAR 12065 @ 122541: CALL 12066 @ 122542: LOCATE L_0003 2117 %END 2118 12067 @ 122545: LINE 2117 "regression-compile-tmp/asems412.imp" 12068 @ 122584: END _lev0id0_ASSEMBLE_OPERATE_PICKUP {lev=4 --> 3} 2119 %IF OPER <= NEG %START;! UNARY 12069 @ 122585: LINE 2119 "regression-compile-tmp/asems412.imp" 12070 @ 122624: PUSH OPER 12071 @ 122627: PUSHI #0x00000002 12072 @ 122632: JUMPIF > L_0004 2120 LH == STACKED(STP)_V 12073 @ 122636: LINE 2120 "regression-compile-tmp/asems412.imp" 12074 @ 122675: PUSH LH 12075 @ 122678: PUSH STACKED 12076 @ 122681: PUSH STP 12077 @ 122684: ACCESS 12078 @ 122685: SELECT 1 12079 @ 122688: ASSREF 2121 %IF CONST(LH) %START 12080 @ 122689: LINE 2121 "regression-compile-tmp/asems412.imp" 12081 @ 122728: PUSH CONST 12082 @ 122731: PUSH LH 12083 @ 122734: ASSPAR 12084 @ 122735: CALL 12085 @ 122736: bf L_0007 2122 LH_DISP = \LH_DISP+OPER-1 12086 @ 122739: LINE 2122 "regression-compile-tmp/asems412.imp" 12087 @ 122778: PUSH LH 12088 @ 122781: SELECT 1 12089 @ 122784: PUSH LH 12090 @ 122787: SELECT 1 12091 @ 122790: NOT 12092 @ 122791: PUSH OPER 12093 @ 122794: ADD 12094 @ 122795: PUSHI #0x00000001 12095 @ 122800: SUB 12096 @ 122801: ASSVAL 2123 %ELSE 12097 @ 122802: LINE 2123 "regression-compile-tmp/asems412.imp" 12098 @ 122841: GOTO L_0006 12099 @ 122844: LOCATE L_0007 2124 PICKUP(LH) %IF LH_LOP # 0 12100 @ 122847: LINE 2124 "regression-compile-tmp/asems412.imp" 12101 @ 122886: PUSH LH 12102 @ 122889: SELECT 7 12103 @ 122892: PUSHI #0x00000000 12104 @ 122897: JUMPIF = L_000a 12105 @ 122901: PUSH PICKUP 12106 @ 122904: PUSH LH 12107 @ 122907: ASSPAR 12108 @ 122908: CALL 12109 @ 122909: LOCATE L_000a 2125 LH_LOP = OPER; LH_LINK == NULL 12110 @ 122912: LINE 2125 "regression-compile-tmp/asems412.imp" 12111 @ 122951: PUSH LH 12112 @ 122954: SELECT 7 12113 @ 122957: PUSH OPER 12114 @ 122960: ASSVAL 12115 @ 122961: LINE 2125 "regression-compile-tmp/asems412.imp" 12116 @ 123000: PUSH LH 12117 @ 123003: SELECT 10 12118 @ 123006: PUSH NULL 12119 @ 123009: ASSREF 2126 %FINISH 12120 @ 123010: LINE 2126 "regression-compile-tmp/asems412.imp" 12121 @ 123049: LOCATE L_0006 2127 %RETURN 12122 @ 123052: LINE 2127 "regression-compile-tmp/asems412.imp" 12123 @ 123091: RETURN 2128 %FINISH 12124 @ 123092: LINE 2128 "regression-compile-tmp/asems412.imp" 12125 @ 123131: LOCATE L_0004 2129 STP = STP-1 12126 @ 123134: LINE 2129 "regression-compile-tmp/asems412.imp" 12127 @ 123173: PUSH STP 12128 @ 123176: PUSH STP 12129 @ 123179: PUSHI #0x00000001 12130 @ 123184: SUB 12131 @ 123185: ASSVAL 2130 LCON = 0; RCON = 0; WCON = 0 12132 @ 123186: LINE 2130 "regression-compile-tmp/asems412.imp" 12133 @ 123225: PUSH LCON 12134 @ 123228: PUSHI #0x00000000 12135 @ 123233: ASSVAL 12136 @ 123234: LINE 2130 "regression-compile-tmp/asems412.imp" 12137 @ 123273: PUSH RCON 12138 @ 123276: PUSHI #0x00000000 12139 @ 123281: ASSVAL 12140 @ 123282: LINE 2130 "regression-compile-tmp/asems412.imp" 12141 @ 123321: PUSH WCON 12142 @ 123324: PUSHI #0x00000000 12143 @ 123329: ASSVAL 2131 LH == STACKED(STP)_V 12144 @ 123330: LINE 2131 "regression-compile-tmp/asems412.imp" 12145 @ 123369: PUSH LH 12146 @ 123372: PUSH STACKED 12147 @ 123375: PUSH STP 12148 @ 123378: ACCESS 12149 @ 123379: SELECT 1 12150 @ 123382: ASSREF 2132 RH == STACKED(STP+1)_V 12151 @ 123383: LINE 2132 "regression-compile-tmp/asems412.imp" 12152 @ 123422: PUSH RH 12153 @ 123425: PUSH STACKED 12154 @ 123428: PUSH STP 12155 @ 123431: PUSHI #0x00000001 12156 @ 123436: ADD 12157 @ 123437: ACCESS 12158 @ 123438: SELECT 1 12159 @ 123441: ASSREF 2133 LCON = 1 %IF CONST(LH) 12160 @ 123442: LINE 2133 "regression-compile-tmp/asems412.imp" 12161 @ 123481: PUSH CONST 12162 @ 123484: PUSH LH 12163 @ 123487: ASSPAR 12164 @ 123488: CALL 12165 @ 123489: bf L_0004 12166 @ 123492: PUSH LCON 12167 @ 123495: PUSHI #0x00000001 12168 @ 123500: ASSVAL 12169 @ 123501: LOCATE L_0004 2134 RCON = 1 %IF CONST(RH) 12170 @ 123504: LINE 2134 "regression-compile-tmp/asems412.imp" 12171 @ 123543: PUSH CONST 12172 @ 123546: PUSH RH 12173 @ 123549: ASSPAR 12174 @ 123550: CALL 12175 @ 123551: bf L_0004 12176 @ 123554: PUSH RCON 12177 @ 123557: PUSHI #0x00000001 12178 @ 123562: ASSVAL 12179 @ 123563: LOCATE L_0004 2135 %IF OPER = SUB %AND RCON # 0 %START 12180 @ 123566: LINE 2135 "regression-compile-tmp/asems412.imp" 12181 @ 123605: PUSH OPER 12182 @ 123608: PUSHI #0x00000004 12183 @ 123613: JUMPIF # L_0004 12184 @ 123617: PUSH RCON 12185 @ 123620: PUSHI #0x00000000 12186 @ 123625: JUMPIF = L_0004 2136 OPER = ADD; RH_DISP = -RH_DISP 12187 @ 123629: LINE 2136 "regression-compile-tmp/asems412.imp" 12188 @ 123668: PUSH OPER 12189 @ 123671: PUSHI #0x00000003 12190 @ 123676: ASSVAL 12191 @ 123677: LINE 2136 "regression-compile-tmp/asems412.imp" 12192 @ 123716: PUSH RH 12193 @ 123719: SELECT 1 12194 @ 123722: PUSH RH 12195 @ 123725: SELECT 1 12196 @ 123728: NEGATE 12197 @ 123729: ASSVAL 2137 %FINISH 12198 @ 123730: LINE 2137 "regression-compile-tmp/asems412.imp" 12199 @ 123769: LOCATE L_0004 2138 %IF LH_LOP # 0 %START 12200 @ 123772: LINE 2138 "regression-compile-tmp/asems412.imp" 12201 @ 123811: PUSH LH 12202 @ 123814: SELECT 7 12203 @ 123817: PUSHI #0x00000000 12204 @ 123822: JUMPIF = L_0004 2139 LOP = LH_LOP 12205 @ 123826: LINE 2139 "regression-compile-tmp/asems412.imp" 12206 @ 123865: PUSH LOP 12207 @ 123868: PUSH LH 12208 @ 123871: SELECT 7 12209 @ 123874: ASSVAL 2140 %IF OPER = CONC %START 12210 @ 123875: LINE 2140 "regression-compile-tmp/asems412.imp" 12211 @ 123914: PUSH OPER 12212 @ 123917: PUSHI #0x0000000e 12213 @ 123922: JUMPIF # L_0007 2141 WITH == LH 12214 @ 123926: LINE 2141 "regression-compile-tmp/asems412.imp" 12215 @ 123965: PUSH WITH 12216 @ 123968: PUSH LH 12217 @ 123971: ASSREF 2142 WITH == WITH_LINK %WHILE WITH_LOP # 0 12218 @ 123972: LINE 2142 "regression-compile-tmp/asems412.imp" 12219 @ 124011: LOCATE L_0009 12220 @ 124014: PUSH WITH 12221 @ 124017: SELECT 7 12222 @ 124020: PUSHI #0x00000000 12223 @ 124025: JUMPIF = L_000a 12224 @ 124029: PUSH WITH 12225 @ 124032: PUSH WITH 12226 @ 124035: SELECT 10 12227 @ 124038: ASSREF 12228 @ 124039: REPEAT L_0009 12229 @ 124042: LOCATE L_000a 2143 WITH_LINK == RH 12230 @ 124045: LINE 2143 "regression-compile-tmp/asems412.imp" 12231 @ 124084: PUSH WITH 12232 @ 124087: SELECT 10 12233 @ 124090: PUSH RH 12234 @ 124093: ASSREF 2144 WITH_LOP = CONC 12235 @ 124094: LINE 2144 "regression-compile-tmp/asems412.imp" 12236 @ 124133: PUSH WITH 12237 @ 124136: SELECT 7 12238 @ 124139: PUSHI #0x0000000e 12239 @ 124144: ASSVAL 2145 %RETURN 12240 @ 124145: LINE 2145 "regression-compile-tmp/asems412.imp" 12241 @ 124184: RETURN 2146 %FINISH 12242 @ 124185: LINE 2146 "regression-compile-tmp/asems412.imp" 12243 @ 124224: LOCATE L_0007 2147 WITH == LH_LINK 12244 @ 124227: LINE 2147 "regression-compile-tmp/asems412.imp" 12245 @ 124266: PUSH WITH 12246 @ 124269: PUSH LH 12247 @ 124272: SELECT 10 12248 @ 124275: ASSREF 2148 WCON = 1 %IF OPER > NEG %AND CONST(WITH) 12249 @ 124276: LINE 2148 "regression-compile-tmp/asems412.imp" 12250 @ 124315: PUSH OPER 12251 @ 124318: PUSHI #0x00000002 12252 @ 124323: JUMPIF <= L_0007 12253 @ 124327: PUSH CONST 12254 @ 124330: PUSH WITH 12255 @ 124333: ASSPAR 12256 @ 124334: CALL 12257 @ 124335: bf L_0007 12258 @ 124338: PUSH WCON 12259 @ 124341: PUSHI #0x00000001 12260 @ 124346: ASSVAL 12261 @ 124347: LOCATE L_0007 2149 %IF LOP = NEG %AND OPER = ADD %START 12262 @ 124350: LINE 2149 "regression-compile-tmp/asems412.imp" 12263 @ 124389: PUSH LOP 12264 @ 124392: PUSHI #0x00000002 12265 @ 124397: JUMPIF # L_0007 12266 @ 124401: PUSH OPER 12267 @ 124404: PUSHI #0x00000003 12268 @ 124409: JUMPIF # L_0007 2150 RH_LOP = SUB; RH_LINK == LH 12269 @ 124413: LINE 2150 "regression-compile-tmp/asems412.imp" 12270 @ 124452: PUSH RH 12271 @ 124455: SELECT 7 12272 @ 124458: PUSHI #0x00000004 12273 @ 124463: ASSVAL 12274 @ 124464: LINE 2150 "regression-compile-tmp/asems412.imp" 12275 @ 124503: PUSH RH 12276 @ 124506: SELECT 10 12277 @ 124509: PUSH LH 12278 @ 124512: ASSREF 2151 LH_LOP = 0 12279 @ 124513: LINE 2151 "regression-compile-tmp/asems412.imp" 12280 @ 124552: PUSH LH 12281 @ 124555: SELECT 7 12282 @ 124558: PUSHI #0x00000000 12283 @ 124563: ASSVAL 2152 STACKED(STP)_V == RH 12284 @ 124564: LINE 2152 "regression-compile-tmp/asems412.imp" 12285 @ 124603: PUSH STACKED 12286 @ 124606: PUSH STP 12287 @ 124609: ACCESS 12288 @ 124610: SELECT 1 12289 @ 124613: PUSH RH 12290 @ 124616: ASSREF 2153 %RETURN 12291 @ 124617: LINE 2153 "regression-compile-tmp/asems412.imp" 12292 @ 124656: RETURN 2154 %FINISH 12293 @ 124657: LINE 2154 "regression-compile-tmp/asems412.imp" 12294 @ 124696: LOCATE L_0007 2155 DUMP STRING(0) %IF WITH_TYPE = STRING 12295 @ 124699: LINE 2155 "regression-compile-tmp/asems412.imp" 12296 @ 124738: PUSH WITH 12297 @ 124741: SELECT 8 12298 @ 124744: PUSHI #0x00000004 12299 @ 124749: JUMPIF # L_0007 12300 @ 124753: PUSH DUMPSTRING 12301 @ 124756: PUSHI #0x00000000 12302 @ 124761: ASSPAR 12303 @ 124762: CALL 12304 @ 124763: LOCATE L_0007 2156 %IF WCON&RCON # 0 %START 12305 @ 124766: LINE 2156 "regression-compile-tmp/asems412.imp" 12306 @ 124805: PUSH WCON 12307 @ 124808: PUSH RCON 12308 @ 124811: AND 12309 @ 124812: PUSHI #0x00000000 12310 @ 124817: JUMPIF = L_0007 2157 KEY = TRANS(OPER)!TRANS(LOP) 12311 @ 124821: LINE 2157 "regression-compile-tmp/asems412.imp" 12312 @ 124860: PUSH KEY 12313 @ 124863: PUSH TRANS 12314 @ 124866: PUSH OPER 12315 @ 124869: ACCESS 12316 @ 124870: PUSH TRANS 12317 @ 124873: PUSH LOP 12318 @ 124876: ACCESS 12319 @ 124877: OR 12320 @ 124878: ASSVAL 2158 %IF KEY = 0 %OR (KEY = 1 %AND OPER = LOP) %START 12321 @ 124879: LINE 2158 "regression-compile-tmp/asems412.imp" 12322 @ 124918: PUSH KEY 12323 @ 124921: PUSHI #0x00000000 12324 @ 124926: JUMPIF = L_000b 12325 @ 124930: PUSH KEY 12326 @ 124933: PUSHI #0x00000001 12327 @ 124938: JUMPIF # L_000a 12328 @ 124942: PUSH OPER 12329 @ 124945: PUSH LOP 12330 @ 124948: JUMPIF # L_000a 12331 @ 124952: LOCATE L_000b 2159 COP(OPER, WITH_DISP, RH_DISP); DROP(RH) 12332 @ 124955: LINE 2159 "regression-compile-tmp/asems412.imp" 12333 @ 124994: PUSH COP 12334 @ 124997: PUSH OPER 12335 @ 125000: ASSPAR 12336 @ 125001: PUSH WITH 12337 @ 125004: SELECT 1 12338 @ 125007: ASSPAR 12339 @ 125008: PUSH RH 12340 @ 125011: SELECT 1 12341 @ 125014: ASSPAR 12342 @ 125015: CALL 12343 @ 125016: LINE 2159 "regression-compile-tmp/asems412.imp" 12344 @ 125055: PUSH DROP 12345 @ 125058: PUSH RH 12346 @ 125061: ASSPAR 12347 @ 125062: CALL 2160 %IF WITH_DISP = NULL OP(OPER) %START 12348 @ 125063: LINE 2160 "regression-compile-tmp/asems412.imp" 12349 @ 125102: PUSH WITH 12350 @ 125105: SELECT 1 12351 @ 125108: PUSH NULLOP 12352 @ 125111: PUSH OPER 12353 @ 125114: ACCESS 12354 @ 125115: JUMPIF # L_000d 2161 LH_LOP = 0; DROP(WITH) 12355 @ 125119: LINE 2161 "regression-compile-tmp/asems412.imp" 12356 @ 125158: PUSH LH 12357 @ 125161: SELECT 7 12358 @ 125164: PUSHI #0x00000000 12359 @ 125169: ASSVAL 12360 @ 125170: LINE 2161 "regression-compile-tmp/asems412.imp" 12361 @ 125209: PUSH DROP 12362 @ 125212: PUSH WITH 12363 @ 125215: ASSPAR 12364 @ 125216: CALL 2162 %FINISH 12365 @ 125217: LINE 2162 "regression-compile-tmp/asems412.imp" 12366 @ 125256: LOCATE L_000d 2163 %RETURN 12367 @ 125259: LINE 2163 "regression-compile-tmp/asems412.imp" 12368 @ 125298: RETURN 2164 %FINISH 12369 @ 125299: LINE 2164 "regression-compile-tmp/asems412.imp" 12370 @ 125338: LOCATE L_000a 2165 %FINISH 12371 @ 125341: LINE 2165 "regression-compile-tmp/asems412.imp" 12372 @ 125380: LOCATE L_0007 2166 PICKUP(LH) 12373 @ 125383: LINE 2166 "regression-compile-tmp/asems412.imp" 12374 @ 125422: PUSH PICKUP 12375 @ 125425: PUSH LH 12376 @ 125428: ASSPAR 12377 @ 125429: CALL 2167 %FINISH 12378 @ 125430: LINE 2167 "regression-compile-tmp/asems412.imp" 12379 @ 125469: LOCATE L_0004 2168 %IF LCON&RCON # 0 %AND OPER # RDIV %START 12380 @ 125472: LINE 2168 "regression-compile-tmp/asems412.imp" 12381 @ 125511: PUSH LCON 12382 @ 125514: PUSH RCON 12383 @ 125517: AND 12384 @ 125518: PUSHI #0x00000000 12385 @ 125523: JUMPIF = L_0004 12386 @ 125527: PUSH OPER 12387 @ 125530: PUSHI #0x00000010 12388 @ 125535: JUMPIF = L_0004 2169 COP(OPER, LH_DISP, RH_DISP); DROP(RH); %RETURN 12389 @ 125539: LINE 2169 "regression-compile-tmp/asems412.imp" 12390 @ 125578: PUSH COP 12391 @ 125581: PUSH OPER 12392 @ 125584: ASSPAR 12393 @ 125585: PUSH LH 12394 @ 125588: SELECT 1 12395 @ 125591: ASSPAR 12396 @ 125592: PUSH RH 12397 @ 125595: SELECT 1 12398 @ 125598: ASSPAR 12399 @ 125599: CALL 12400 @ 125600: LINE 2169 "regression-compile-tmp/asems412.imp" 12401 @ 125639: PUSH DROP 12402 @ 125642: PUSH RH 12403 @ 125645: ASSPAR 12404 @ 125646: CALL 12405 @ 125647: LINE 2169 "regression-compile-tmp/asems412.imp" 12406 @ 125686: RETURN 2170 %FINISH 12407 @ 125687: LINE 2170 "regression-compile-tmp/asems412.imp" 12408 @ 125726: LOCATE L_0004 2171 %IF LCON # 0 %AND COMM(OPER) # 0 %START 12409 @ 125729: LINE 2171 "regression-compile-tmp/asems412.imp" 12410 @ 125768: PUSH LCON 12411 @ 125771: PUSHI #0x00000000 12412 @ 125776: JUMPIF = L_0004 12413 @ 125780: PUSH COMM 12414 @ 125783: PUSH OPER 12415 @ 125786: ACCESS 12416 @ 125787: PUSHI #0x00000000 12417 @ 125792: JUMPIF = L_0004 2172 SWOP 12418 @ 125796: LINE 2172 "regression-compile-tmp/asems412.imp" 12419 @ 125835: PUSH SWOP 12420 @ 125838: CALL 2173 PICKUP(LH) %IF LH_LOP # 0 12421 @ 125839: LINE 2173 "regression-compile-tmp/asems412.imp" 12422 @ 125878: PUSH LH 12423 @ 125881: SELECT 7 12424 @ 125884: PUSHI #0x00000000 12425 @ 125889: JUMPIF = L_0007 12426 @ 125893: PUSH PICKUP 12427 @ 125896: PUSH LH 12428 @ 125899: ASSPAR 12429 @ 125900: CALL 12430 @ 125901: LOCATE L_0007 2174 %FINISH 12431 @ 125904: LINE 2174 "regression-compile-tmp/asems412.imp" 12432 @ 125943: LOCATE L_0004 2175 %IF RCON # 0 %AND (OPER = AND %OR OPER = RSH) %C 2176 %AND (CONTROL&UNASS DIAG = 0 %OR LH_TYPE = SHORT) %START 12433 @ 125946: LINE 2175 "regression-compile-tmp/asems412.imp" 12434 @ 125985: PUSH RCON 12435 @ 125988: PUSHI #0x00000000 12436 @ 125993: JUMPIF = L_0004 12437 @ 125997: PUSH OPER 12438 @ 126000: PUSHI #0x00000008 12439 @ 126005: JUMPIF = L_0005 12440 @ 126009: PUSH OPER 12441 @ 126012: PUSHI #0x0000000c 12442 @ 126017: JUMPIF # L_0004 12443 @ 126021: LOCATE L_0005 12444 @ 126024: PUSH CONTROL 12445 @ 126027: PUSHI #0x00000020 12446 @ 126032: AND 12447 @ 126033: PUSHI #0x00000000 12448 @ 126038: JUMPIF = L_0005 12449 @ 126042: PUSH LH 12450 @ 126045: SELECT 8 12451 @ 126048: PUSHI #0x00000003 12452 @ 126053: JUMPIF # L_0004 12453 @ 126057: LOCATE L_0005 2177 OPTIMISE(LH) 12454 @ 126060: LINE 2177 "regression-compile-tmp/asems412.imp" 12455 @ 126099: PUSH OPTIMISE 12456 @ 126102: PUSH LH 12457 @ 126105: ASSPAR 12458 @ 126106: CALL 2178 %IF LH_FORM # V IN R %AND (LH_TYPE = INTEGER %OR %C 2179 LH_TYPE = SHORT) %START 12459 @ 126107: LINE 2178 "regression-compile-tmp/asems412.imp" 12460 @ 126146: PUSH LH 12461 @ 126149: SELECT 9 12462 @ 126152: PUSHI #0x00000001 12463 @ 126157: JUMPIF = L_0007 12464 @ 126161: PUSH LH 12465 @ 126164: SELECT 8 12466 @ 126167: PUSHI #0x00000001 12467 @ 126172: JUMPIF = L_0008 12468 @ 126176: PUSH LH 12469 @ 126179: SELECT 8 12470 @ 126182: PUSHI #0x00000003 12471 @ 126187: JUMPIF # L_0007 12472 @ 126191: LOCATE L_0008 2180 ADDRESS(LH) 12473 @ 126194: LINE 2180 "regression-compile-tmp/asems412.imp" 12474 @ 126233: PUSH ADDRESS 12475 @ 126236: PUSH LH 12476 @ 126239: ASSPAR 12477 @ 126240: CALL 2181 %IF OPER = AND %START 12478 @ 126241: LINE 2181 "regression-compile-tmp/asems412.imp" 12479 @ 126280: PUSH OPER 12480 @ 126283: PUSHI #0x00000008 12481 @ 126288: JUMPIF # L_000a 2182 S = LH_TYPE; D = 0 12482 @ 126292: LINE 2182 "regression-compile-tmp/asems412.imp" 12483 @ 126331: PUSH S 12484 @ 126334: PUSH LH 12485 @ 126337: SELECT 8 12486 @ 126340: ASSVAL 12487 @ 126341: LINE 2182 "regression-compile-tmp/asems412.imp" 12488 @ 126380: PUSH D 12489 @ 126383: PUSHI #0x00000000 12490 @ 126388: ASSVAL 2183 D = REGLEN//2 %IF LH_TYPE = INTEGER 12491 @ 126389: LINE 2183 "regression-compile-tmp/asems412.imp" 12492 @ 126428: PUSH LH 12493 @ 126431: SELECT 8 12494 @ 126434: PUSHI #0x00000001 12495 @ 126439: JUMPIF # L_000d 12496 @ 126443: PUSH D 12497 @ 126446: PUSHI #0x00000004 12498 @ 126451: PUSHI #0x00000002 12499 @ 126456: QUOT 12500 @ 126457: ASSVAL 12501 @ 126458: LOCATE L_000d 2184 %IF RH_DISP = 255 %START 12502 @ 126461: LINE 2184 "regression-compile-tmp/asems412.imp" 12503 @ 126500: PUSH RH 12504 @ 126503: SELECT 1 12505 @ 126506: PUSHI #0x000000ff 12506 @ 126511: JUMPIF # L_000d 2185 S = BYTE; D = D + REGLEN//4 12507 @ 126515: LINE 2185 "regression-compile-tmp/asems412.imp" 12508 @ 126554: PUSH S 12509 @ 126557: PUSHI #0x00000002 12510 @ 126562: ASSVAL 12511 @ 126563: LINE 2185 "regression-compile-tmp/asems412.imp" 12512 @ 126602: PUSH D 12513 @ 126605: PUSH D 12514 @ 126608: PUSHI #0x00000004 12515 @ 126613: PUSHI #0x00000004 12516 @ 126618: QUOT 12517 @ 126619: ADD 12518 @ 126620: ASSVAL 2186 %ELSE %IF RH_DISP>>16 = 0 12519 @ 126621: LINE 2186 "regression-compile-tmp/asems412.imp" 12520 @ 126660: GOTO L_000c 12521 @ 126663: LOCATE L_000d 12522 @ 126666: PUSH RH 12523 @ 126669: SELECT 1 12524 @ 126672: PUSHI #0x00000010 12525 @ 126677: RSH 12526 @ 126678: PUSHI #0x00000000 12527 @ 126683: JUMPIF # L_000d 2187 RH_DISP = RH_DISP!X'FFFF0000' %IF RH_DISP>>15#0 12528 @ 126687: LINE 2187 "regression-compile-tmp/asems412.imp" 12529 @ 126726: PUSH RH 12530 @ 126729: SELECT 1 12531 @ 126732: PUSHI #0x0000000f 12532 @ 126737: RSH 12533 @ 126738: PUSHI #0x00000000 12534 @ 126743: JUMPIF = L_0010 12535 @ 126747: PUSH RH 12536 @ 126750: SELECT 1 12537 @ 126753: PUSH RH 12538 @ 126756: SELECT 1 12539 @ 126759: PUSHI #0xffff0000 12540 @ 126764: OR 12541 @ 126765: ASSVAL 12542 @ 126766: LOCATE L_0010 2188 LH_TYPE = UNSIGNED HALFWORD 12543 @ 126769: LINE 2188 "regression-compile-tmp/asems412.imp" 12544 @ 126808: PUSH LH 12545 @ 126811: SELECT 8 12546 @ 126814: PUSHI #0x000000ff 12547 @ 126819: ASSVAL 2189 LH_DISP = LH_DISP+D 12548 @ 126820: LINE 2189 "regression-compile-tmp/asems412.imp" 12549 @ 126859: PUSH LH 12550 @ 126862: SELECT 1 12551 @ 126865: PUSH LH 12552 @ 126868: SELECT 1 12553 @ 126871: PUSH D 12554 @ 126874: ADD 12555 @ 126875: ASSVAL 2190 D = -1 12556 @ 126876: LINE 2190 "regression-compile-tmp/asems412.imp" 12557 @ 126915: PUSH D 12558 @ 126918: PUSHI #0x00000001 12559 @ 126923: NEGATE 12560 @ 126924: ASSVAL 2191 %ELSE 12561 @ 126925: LINE 2191 "regression-compile-tmp/asems412.imp" 12562 @ 126964: GOTO L_000c 12563 @ 126967: LOCATE L_000d 2192 D = -1 12564 @ 126970: LINE 2192 "regression-compile-tmp/asems412.imp" 12565 @ 127009: PUSH D 12566 @ 127012: PUSHI #0x00000001 12567 @ 127017: NEGATE 12568 @ 127018: ASSVAL 2193 %finish 12569 @ 127019: LINE 2193 "regression-compile-tmp/asems412.imp" 12570 @ 127058: LOCATE L_000c 2194 %IF D >= 0 %START 12571 @ 127061: LINE 2194 "regression-compile-tmp/asems412.imp" 12572 @ 127100: PUSH D 12573 @ 127103: PUSHI #0x00000000 12574 @ 127108: JUMPIF < L_000d 2195 LH_TYPE = S; LH_DISP = LH_DISP + D 12575 @ 127112: LINE 2195 "regression-compile-tmp/asems412.imp" 12576 @ 127151: PUSH LH 12577 @ 127154: SELECT 8 12578 @ 127157: PUSH S 12579 @ 127160: ASSVAL 12580 @ 127161: LINE 2195 "regression-compile-tmp/asems412.imp" 12581 @ 127200: PUSH LH 12582 @ 127203: SELECT 1 12583 @ 127206: PUSH LH 12584 @ 127209: SELECT 1 12585 @ 127212: PUSH D 12586 @ 127215: ADD 12587 @ 127216: ASSVAL 2196 DROP(RH); %RETURN 12588 @ 127217: LINE 2196 "regression-compile-tmp/asems412.imp" 12589 @ 127256: PUSH DROP 12590 @ 127259: PUSH RH 12591 @ 127262: ASSPAR 12592 @ 127263: CALL 12593 @ 127264: LINE 2196 "regression-compile-tmp/asems412.imp" 12594 @ 127303: RETURN 2197 %FINISH 12595 @ 127304: LINE 2197 "regression-compile-tmp/asems412.imp" 12596 @ 127343: LOCATE L_000d 2198 %ELSE; !...'OPER' MUST BE RSH 12597 @ 127346: LINE 2198 "regression-compile-tmp/asems412.imp" 12598 @ 127385: GOTO L_0009 12599 @ 127388: LOCATE L_000a 2199 %IF RH_DISP = (8*REGLEN)//2 %C 2200 %AND LH_TYPE # SHORT %START 12600 @ 127391: LINE 2199 "regression-compile-tmp/asems412.imp" 12601 @ 127430: PUSH RH 12602 @ 127433: SELECT 1 12603 @ 127436: PUSHI #0x00000008 12604 @ 127441: PUSHI #0x00000004 12605 @ 127446: MUL 12606 @ 127447: PUSHI #0x00000002 12607 @ 127452: QUOT 12608 @ 127453: JUMPIF # L_000d 12609 @ 127457: PUSH LH 12610 @ 127460: SELECT 8 12611 @ 127463: PUSHI #0x00000003 12612 @ 127468: JUMPIF = L_000d 2201 S = UNSIGNED HALFWORD 12613 @ 127472: LINE 2201 "regression-compile-tmp/asems412.imp" 12614 @ 127511: PUSH S 12615 @ 127514: PUSHI #0x000000ff 12616 @ 127519: ASSVAL 2202 %ELSE %IF RH_DISP = 8*(REGLEN-1) 12617 @ 127520: LINE 2202 "regression-compile-tmp/asems412.imp" 12618 @ 127559: GOTO L_000c 12619 @ 127562: LOCATE L_000d 12620 @ 127565: PUSH RH 12621 @ 127568: SELECT 1 12622 @ 127571: PUSHI #0x00000008 12623 @ 127576: PUSHI #0x00000004 12624 @ 127581: PUSHI #0x00000001 12625 @ 127586: SUB 12626 @ 127587: MUL 12627 @ 127588: JUMPIF # L_000d 2203 S = BYTE 12628 @ 127592: LINE 2203 "regression-compile-tmp/asems412.imp" 12629 @ 127631: PUSH S 12630 @ 127634: PUSHI #0x00000002 12631 @ 127639: ASSVAL 2204 %ELSE 12632 @ 127640: LINE 2204 "regression-compile-tmp/asems412.imp" 12633 @ 127679: GOTO L_000c 12634 @ 127682: LOCATE L_000d 2205 S = -1 12635 @ 127685: LINE 2205 "regression-compile-tmp/asems412.imp" 12636 @ 127724: PUSH S 12637 @ 127727: PUSHI #0x00000001 12638 @ 127732: NEGATE 12639 @ 127733: ASSVAL 2206 %finish 12640 @ 127734: LINE 2206 "regression-compile-tmp/asems412.imp" 12641 @ 127773: LOCATE L_000c 2207 %IF S >= 0 %START 12642 @ 127776: LINE 2207 "regression-compile-tmp/asems412.imp" 12643 @ 127815: PUSH S 12644 @ 127818: PUSHI #0x00000000 12645 @ 127823: JUMPIF < L_000d 2208 LH_TYPE = S; DROP(RH); %RETURN 12646 @ 127827: LINE 2208 "regression-compile-tmp/asems412.imp" 12647 @ 127866: PUSH LH 12648 @ 127869: SELECT 8 12649 @ 127872: PUSH S 12650 @ 127875: ASSVAL 12651 @ 127876: LINE 2208 "regression-compile-tmp/asems412.imp" 12652 @ 127915: PUSH DROP 12653 @ 127918: PUSH RH 12654 @ 127921: ASSPAR 12655 @ 127922: CALL 12656 @ 127923: LINE 2208 "regression-compile-tmp/asems412.imp" 12657 @ 127962: RETURN 2209 %FINISH 12658 @ 127963: LINE 2209 "regression-compile-tmp/asems412.imp" 12659 @ 128002: LOCATE L_000d 2210 %FINISH 12660 @ 128005: LINE 2210 "regression-compile-tmp/asems412.imp" 12661 @ 128044: LOCATE L_0009 2211 %FINISH 12662 @ 128047: LINE 2211 "regression-compile-tmp/asems412.imp" 12663 @ 128086: LOCATE L_0007 2212 %FINISH 12664 @ 128089: LINE 2212 "regression-compile-tmp/asems412.imp" 12665 @ 128128: LOCATE L_0004 2213 PICKUP(RH) %IF RH_LOP # 0 12666 @ 128131: LINE 2213 "regression-compile-tmp/asems412.imp" 12667 @ 128170: PUSH RH 12668 @ 128173: SELECT 7 12669 @ 128176: PUSHI #0x00000000 12670 @ 128181: JUMPIF = L_0004 12671 @ 128185: PUSH PICKUP 12672 @ 128188: PUSH RH 12673 @ 128191: ASSPAR 12674 @ 128192: CALL 12675 @ 128193: LOCATE L_0004 2214 %IF LCON!RCON # 0 %AND OPER = MUL %START 12676 @ 128196: LINE 2214 "regression-compile-tmp/asems412.imp" 12677 @ 128235: PUSH LCON 12678 @ 128238: PUSH RCON 12679 @ 128241: OR 12680 @ 128242: PUSHI #0x00000000 12681 @ 128247: JUMPIF = L_0004 12682 @ 128251: PUSH OPER 12683 @ 128254: PUSHI #0x00000006 12684 @ 128259: JUMPIF # L_0004 2215 SWOP %IF LCON # 0 12685 @ 128263: LINE 2215 "regression-compile-tmp/asems412.imp" 12686 @ 128302: PUSH LCON 12687 @ 128305: PUSHI #0x00000000 12688 @ 128310: JUMPIF = L_0007 12689 @ 128314: PUSH SWOP 12690 @ 128317: CALL 12691 @ 128318: LOCATE L_0007 2216 %IF FLOATING(LH) %THEN KEY = -1 %C 2217 %ELSE KEY = POWER(RH_DISP) 12692 @ 128321: LINE 2216 "regression-compile-tmp/asems412.imp" 12693 @ 128360: PUSH FLOATING 12694 @ 128363: PUSH LH 12695 @ 128366: ASSPAR 12696 @ 128367: CALL 12697 @ 128368: bf L_0007 12698 @ 128371: PUSH KEY 12699 @ 128374: PUSHI #0x00000001 12700 @ 128379: NEGATE 12701 @ 128380: ASSVAL 12702 @ 128381: GOTO L_0006 12703 @ 128384: LOCATE L_0007 12704 @ 128387: PUSH KEY 12705 @ 128390: PUSH POWER 12706 @ 128393: PUSH RH 12707 @ 128396: SELECT 1 12708 @ 128399: ASSPAR 12709 @ 128400: CALL 12710 @ 128401: ASSVAL 12711 @ 128402: LOCATE L_0006 2218 %IF KEY >= 0 %START 12712 @ 128405: LINE 2218 "regression-compile-tmp/asems412.imp" 12713 @ 128444: PUSH KEY 12714 @ 128447: PUSHI #0x00000000 12715 @ 128452: JUMPIF < L_0007 2219 RH_DISP = KEY; OPER = LSH 12716 @ 128456: LINE 2219 "regression-compile-tmp/asems412.imp" 12717 @ 128495: PUSH RH 12718 @ 128498: SELECT 1 12719 @ 128501: PUSH KEY 12720 @ 128504: ASSVAL 12721 @ 128505: LINE 2219 "regression-compile-tmp/asems412.imp" 12722 @ 128544: PUSH OPER 12723 @ 128547: PUSHI #0x0000000b 12724 @ 128552: ASSVAL 2220 %ELSE 12725 @ 128553: LINE 2220 "regression-compile-tmp/asems412.imp" 12726 @ 128592: GOTO L_0006 12727 @ 128595: LOCATE L_0007 2221 SWOP 12728 @ 128598: LINE 2221 "regression-compile-tmp/asems412.imp" 12729 @ 128637: PUSH SWOP 12730 @ 128640: CALL 2222 %FINISH 12731 @ 128641: LINE 2222 "regression-compile-tmp/asems412.imp" 12732 @ 128680: LOCATE L_0006 2223 %FINISH 12733 @ 128683: LINE 2223 "regression-compile-tmp/asems412.imp" 12734 @ 128722: LOCATE L_0004 2224 DROP(RH) %AND %RETURN %IF RCON # 0 %AND RH_DISP = NULL OP(OPER) 12735 @ 128725: LINE 2224 "regression-compile-tmp/asems412.imp" 12736 @ 128764: PUSH RCON 12737 @ 128767: PUSHI #0x00000000 12738 @ 128772: JUMPIF = L_0004 12739 @ 128776: PUSH RH 12740 @ 128779: SELECT 1 12741 @ 128782: PUSH NULLOP 12742 @ 128785: PUSH OPER 12743 @ 128788: ACCESS 12744 @ 128789: JUMPIF # L_0004 12745 @ 128793: PUSH DROP 12746 @ 128796: PUSH RH 12747 @ 128799: ASSPAR 12748 @ 128800: CALL 12749 @ 128801: RETURN 12750 @ 128802: LOCATE L_0004 2225 LH_LOP = OPER; LH_LINK == RH 12751 @ 128805: LINE 2225 "regression-compile-tmp/asems412.imp" 12752 @ 128844: PUSH LH 12753 @ 128847: SELECT 7 12754 @ 128850: PUSH OPER 12755 @ 128853: ASSVAL 12756 @ 128854: LINE 2225 "regression-compile-tmp/asems412.imp" 12757 @ 128893: PUSH LH 12758 @ 128896: SELECT 10 12759 @ 128899: PUSH RH 12760 @ 128902: ASSREF 2226 %END 12761 @ 128903: LINE 2226 "regression-compile-tmp/asems412.imp" 12762 @ 128942: END _lev0id0_ASSEMBLE_OPERATE {lev=3 --> 2} 2227 %PREDICATE DIFFERENT(%RECORD(STACKFM)%NAME A, B) 12763 @ 128943: LINE 2227 "regression-compile-tmp/asems412.imp" 12764 @ 128982: DEF DIFFERENT (_lev0id0_ASSEMBLE_DIFFERENT) p1=V_0142 a/tf=a b/format=0 c/ostate=0 type=0 () form=10 (predicate) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 12765 @ 129003: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 12766 @ 129004: DEF A p1=V_0143 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 12767 @ 129017: DEF B p1=V_0144 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 12768 @ 129030: FINISH ) {lev=3} 2228 %WHILE %NOT B == NULL %CYCLE 12769 @ 129031: LINE 2228 "regression-compile-tmp/asems412.imp" 12770 @ 129070: LOCATE L_0003 12771 @ 129073: PUSH B 12772 @ 129076: PUSH NULL 12773 @ 129079: JUMPIFA = L_0004 2229 %FALSE %IF SAME(A, B) 12774 @ 129083: LINE 2229 "regression-compile-tmp/asems412.imp" 12775 @ 129122: PUSH SAME 12776 @ 129125: PUSH A 12777 @ 129128: ASSPAR 12778 @ 129129: PUSH B 12779 @ 129132: ASSPAR 12780 @ 129133: CALL 12781 @ 129134: bf L_0007 12782 @ 129137: FALSE 12783 @ 129138: LOCATE L_0007 2230 B == B_LINK 12784 @ 129141: LINE 2230 "regression-compile-tmp/asems412.imp" 12785 @ 129180: PUSH B 12786 @ 129183: PUSH B 12787 @ 129186: SELECT 10 12788 @ 129189: ASSREF 2231 %REPEAT 12789 @ 129190: LINE 2231 "regression-compile-tmp/asems412.imp" 12790 @ 129229: REPEAT L_0003 12791 @ 129232: LOCATE L_0004 2232 %TRUE 12792 @ 129235: LINE 2232 "regression-compile-tmp/asems412.imp" 12793 @ 129274: TRUE 2233 %END 12794 @ 129275: LINE 2233 "regression-compile-tmp/asems412.imp" 12795 @ 129314: END _lev0id0_ASSEMBLE_DIFFERENT {lev=3 --> 2} 2234 %ROUTINE ASSIGN(%INTEGER ASSOP) 12796 @ 129315: LINE 2234 "regression-compile-tmp/asems412.imp" 12797 @ 129354: DEF ASSIGN (_lev0id0_ASSEMBLE_ASSIGN) p1=V_0143 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 12798 @ 129372: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 12799 @ 129373: DEF ASSOP p1=V_0144 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 12800 @ 129390: FINISH ) {lev=3} 2235 %RECORD(STACKFM)%NAME LHS, RHS, W 12801 @ 129391: LINE 2235 "regression-compile-tmp/asems412.imp" 12802 @ 129430: DEF LHS p1=V_0145 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 12803 @ 129445: DEF RHS p1=V_0146 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 12804 @ 129460: DEF W p1=V_0147 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2236 %RECORD(STACKFM) TEMP, HOLD 12805 @ 129473: LINE 2236 "regression-compile-tmp/asems412.imp" 12806 @ 129512: DEF TEMP p1=V_0148 a/tf=41 b/format=86 c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 12807 @ 129528: DEF HOLD p1=V_0149 a/tf=41 b/format=86 c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2237 %INTEGER N, P, T, OP, VAL, SIZE 12808 @ 129544: LINE 2237 "regression-compile-tmp/asems412.imp" 12809 @ 129583: DEF N p1=V_014a 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 12810 @ 129596: DEF P p1=V_014b 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 12811 @ 129609: DEF T p1=V_014c 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 12812 @ 129622: DEF OP p1=V_014d 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 12813 @ 129636: DEF VAL p1=V_014e 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 12814 @ 129651: DEF SIZE p1=V_014f 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 2238 ABORT(8) %IF STP < 2 12815 @ 129667: LINE 2238 "regression-compile-tmp/asems412.imp" 12816 @ 129706: PUSH STP 12817 @ 129709: PUSHI #0x00000002 12818 @ 129714: JUMPIF >= L_0004 12819 @ 129718: PUSH ABORT 12820 @ 129721: PUSHI #0x00000008 12821 @ 129726: ASSPAR 12822 @ 129727: CALL 12823 @ 129728: LOCATE L_0004 2239 RHS == STACKED(STP)_V 12824 @ 129731: LINE 2239 "regression-compile-tmp/asems412.imp" 12825 @ 129770: PUSH RHS 12826 @ 129773: PUSH STACKED 12827 @ 129776: PUSH STP 12828 @ 129779: ACCESS 12829 @ 129780: SELECT 1 12830 @ 129783: ASSREF 2240 LHS == STACKED(STP-1)_V 12831 @ 129784: LINE 2240 "regression-compile-tmp/asems412.imp" 12832 @ 129823: PUSH LHS 12833 @ 129826: PUSH STACKED 12834 @ 129829: PUSH STP 12835 @ 129832: PUSHI #0x00000001 12836 @ 129837: SUB 12837 @ 129838: ACCESS 12838 @ 129839: SELECT 1 12839 @ 129842: ASSREF 2241 %IF ASSOP < 0 %START 12840 @ 129843: LINE 2241 "regression-compile-tmp/asems412.imp" 12841 @ 129882: PUSH ASSOP 12842 @ 129885: PUSHI #0x00000000 12843 @ 129890: JUMPIF >= L_0004 2242 %IF LHS_BASE = LINK %START;! INTRINSIC 12844 @ 129894: LINE 2242 "regression-compile-tmp/asems412.imp" 12845 @ 129933: PUSH LHS 12846 @ 129936: SELECT 6 12847 @ 129939: PUSHI #0x0000000c 12848 @ 129944: JUMPIF # L_0007 2243 TEMP = LHS; LHS = RHS; RHS = TEMP 12849 @ 129948: LINE 2243 "regression-compile-tmp/asems412.imp" 12850 @ 129987: PUSH TEMP 12851 @ 129990: PUSH LHS 12852 @ 129993: ASSVAL 12853 @ 129994: LINE 2243 "regression-compile-tmp/asems412.imp" 12854 @ 130033: PUSH LHS 12855 @ 130036: PUSH RHS 12856 @ 130039: ASSVAL 12857 @ 130040: LINE 2243 "regression-compile-tmp/asems412.imp" 12858 @ 130079: PUSH RHS 12859 @ 130082: PUSH TEMP 12860 @ 130085: ASSVAL 2244 NEW DISP = 0 12861 @ 130086: LINE 2244 "regression-compile-tmp/asems412.imp" 12862 @ 130125: PUSH NEWDISP 12863 @ 130128: PUSHI #0x00000000 12864 @ 130133: ASSVAL 2245 %RETURN 12865 @ 130134: LINE 2245 "regression-compile-tmp/asems412.imp" 12866 @ 130173: RETURN 2246 %FINISH 12867 @ 130174: LINE 2246 "regression-compile-tmp/asems412.imp" 12868 @ 130213: LOCATE L_0007 2247 LHS_EXTRA = LHS_EXTRA-1 12869 @ 130216: LINE 2247 "regression-compile-tmp/asems412.imp" 12870 @ 130255: PUSH LHS 12871 @ 130258: SELECT 3 12872 @ 130261: PUSH LHS 12873 @ 130264: SELECT 3 12874 @ 130267: PUSHI #0x00000001 12875 @ 130272: SUB 12876 @ 130273: ASSVAL 2248 V == VAR(LHS_EXTRA) 12877 @ 130274: LINE 2248 "regression-compile-tmp/asems412.imp" 12878 @ 130313: PUSH V 12879 @ 130316: PUSH VAR 12880 @ 130319: PUSH LHS 12881 @ 130322: SELECT 3 12882 @ 130325: ACCESS 12883 @ 130326: ASSREF 2249 DISPLAY VAR(V) %IF CONTROL < 0 12884 @ 130327: LINE 2249 "regression-compile-tmp/asems412.imp" 12885 @ 130366: PUSH CONTROL 12886 @ 130369: PUSHI #0x00000000 12887 @ 130374: JUMPIF >= L_0007 12888 @ 130378: PUSH DISPLAYVAR 12889 @ 130381: PUSH V 12890 @ 130384: ASSPAR 12891 @ 130385: CALL 12892 @ 130386: LOCATE L_0007 2250 VSTACK(V); LHS == STACKED(STP)_V 12893 @ 130389: LINE 2250 "regression-compile-tmp/asems412.imp" 12894 @ 130428: PUSH VSTACK 12895 @ 130431: PUSH V 12896 @ 130434: ASSPAR 12897 @ 130435: CALL 12898 @ 130436: LINE 2250 "regression-compile-tmp/asems412.imp" 12899 @ 130475: PUSH LHS 12900 @ 130478: PUSH STACKED 12901 @ 130481: PUSH STP 12902 @ 130484: ACCESS 12903 @ 130485: SELECT 1 12904 @ 130488: ASSREF 2251 ASSOP = 0 %IF V_FORM > 1 12905 @ 130489: LINE 2251 "regression-compile-tmp/asems412.imp" 12906 @ 130528: PUSH V 12907 @ 130531: SELECT 8 12908 @ 130534: PUSHI #0x00000001 12909 @ 130539: JUMPIF <= L_0007 12910 @ 130543: PUSH ASSOP 12911 @ 130546: PUSHI #0x00000000 12912 @ 130551: ASSVAL 12913 @ 130552: LOCATE L_0007 2252 NEW DISP = LHS_DISP+LHS_LENGTH 12914 @ 130555: LINE 2252 "regression-compile-tmp/asems412.imp" 12915 @ 130594: PUSH NEWDISP 12916 @ 130597: PUSH LHS 12917 @ 130600: SELECT 1 12918 @ 130603: PUSH LHS 12919 @ 130606: SELECT 4 12920 @ 130609: ADD 12921 @ 130610: ASSVAL 2253 %IF LHS_FORM&16 # 0 %START;! PROCEDURE PARAMETER 12922 @ 130611: LINE 2253 "regression-compile-tmp/asems412.imp" 12923 @ 130650: PUSH LHS 12924 @ 130653: SELECT 9 12925 @ 130656: PUSHI #0x00000010 12926 @ 130661: AND 12927 @ 130662: PUSHI #0x00000000 12928 @ 130667: JUMPIF = L_0007 2254 FORGET(LINK); HAZARD(R0) 12929 @ 130671: LINE 2254 "regression-compile-tmp/asems412.imp" 12930 @ 130710: PUSH FORGET 12931 @ 130713: PUSHI #0x0000000c 12932 @ 130718: ASSPAR 12933 @ 130719: CALL 12934 @ 130720: LINE 2254 "regression-compile-tmp/asems412.imp" 12935 @ 130759: PUSH HAZARD 12936 @ 130762: PUSHI #0x00000001 12937 @ 130767: ASSPAR 12938 @ 130768: CALL 2255 NEW DISP = LHS_DISP+2*REGLEN 12939 @ 130769: LINE 2255 "regression-compile-tmp/asems412.imp" 12940 @ 130808: PUSH NEWDISP 12941 @ 130811: PUSH LHS 12942 @ 130814: SELECT 1 12943 @ 130817: PUSHI #0x00000002 12944 @ 130822: PUSHI #0x00000004 12945 @ 130827: MUL 12946 @ 130828: ADD 12947 @ 130829: ASSVAL 2256 %IF RHS_DISP&X'4000' # 0 %START 12948 @ 130830: LINE 2256 "regression-compile-tmp/asems412.imp" 12949 @ 130869: PUSH RHS 12950 @ 130872: SELECT 1 12951 @ 130875: PUSHI #0x00004000 12952 @ 130880: AND 12953 @ 130881: PUSHI #0x00000000 12954 @ 130886: JUMPIF = L_000a 2257 RX(ST, WSP, WSP, LHS_DISP);! ENVIRONMENT REF 12955 @ 130890: LINE 2257 "regression-compile-tmp/asems412.imp" 12956 @ 130929: PUSH RX 12957 @ 130932: PUSHI #0x00005000 12958 @ 130937: ASSPAR 12959 @ 130938: PUSHI #0x0000002b 12960 @ 130943: ASSPAR 12961 @ 130944: PUSHI #0x0000002b 12962 @ 130949: ASSPAR 12963 @ 130950: PUSH LHS 12964 @ 130953: SELECT 1 12965 @ 130956: ASSPAR 12966 @ 130957: CALL 2258 DEFINE REFERENCE(RHS_DISP&X'FFF', R REF) 12967 @ 130958: LINE 2258 "regression-compile-tmp/asems412.imp" 12968 @ 130997: PUSH DEFINEREFERENCE 12969 @ 131000: PUSH RHS 12970 @ 131003: SELECT 1 12971 @ 131006: PUSHI #0x00000fff 12972 @ 131011: AND 12973 @ 131012: ASSPAR 12974 @ 131013: PUSHI #0x00000004 12975 @ 131018: ASSPAR 12976 @ 131019: CALL 2259 RX(LA, LINK, CODE, 0); ! ADDRESS OF ROUTINE 12977 @ 131020: LINE 2259 "regression-compile-tmp/asems412.imp" 12978 @ 131059: PUSH RX 12979 @ 131062: PUSHI #0x0000e600 12980 @ 131067: ASSPAR 12981 @ 131068: PUSHI #0x0000000c 12982 @ 131073: ASSPAR 12983 @ 131074: PUSHI #0x0000002c 12984 @ 131079: ASSPAR 12985 @ 131080: PUSHI #0x00000000 12986 @ 131085: ASSPAR 12987 @ 131086: CALL 2260 RX(ST, LINK, WSP, LHS_DISP+REGLEN); ! ENVIRONMENT 12988 @ 131087: LINE 2260 "regression-compile-tmp/asems412.imp" 12989 @ 131126: PUSH RX 12990 @ 131129: PUSHI #0x00005000 12991 @ 131134: ASSPAR 12992 @ 131135: PUSHI #0x0000000c 12993 @ 131140: ASSPAR 12994 @ 131141: PUSHI #0x0000002b 12995 @ 131146: ASSPAR 12996 @ 131147: PUSH LHS 12997 @ 131150: SELECT 1 12998 @ 131153: PUSHI #0x00000004 12999 @ 131158: ADD 13000 @ 131159: ASSPAR 13001 @ 131160: CALL 2261 %ELSE 13002 @ 131161: LINE 2261 "regression-compile-tmp/asems412.imp" 13003 @ 131200: GOTO L_0009 13004 @ 131203: LOCATE L_000a 2262 RX(LW, LINK, RHS_BASE, RHS_DISP) 13005 @ 131206: LINE 2262 "regression-compile-tmp/asems412.imp" 13006 @ 131245: PUSH RX 13007 @ 131248: PUSHI #0x00005800 13008 @ 131253: ASSPAR 13009 @ 131254: PUSHI #0x0000000c 13010 @ 131259: ASSPAR 13011 @ 131260: PUSH RHS 13012 @ 131263: SELECT 6 13013 @ 131266: ASSPAR 13014 @ 131267: PUSH RHS 13015 @ 131270: SELECT 1 13016 @ 131273: ASSPAR 13017 @ 131274: CALL 2263 RX(ST, LINK, WSP, LHS_DISP) 13018 @ 131275: LINE 2263 "regression-compile-tmp/asems412.imp" 13019 @ 131314: PUSH RX 13020 @ 131317: PUSHI #0x00005000 13021 @ 131322: ASSPAR 13022 @ 131323: PUSHI #0x0000000c 13023 @ 131328: ASSPAR 13024 @ 131329: PUSHI #0x0000002b 13025 @ 131334: ASSPAR 13026 @ 131335: PUSH LHS 13027 @ 131338: SELECT 1 13028 @ 131341: ASSPAR 13029 @ 131342: CALL 2264 RX(LW, LINK, RHS_BASE, RHS_BASE+REGLEN) 13030 @ 131343: LINE 2264 "regression-compile-tmp/asems412.imp" 13031 @ 131382: PUSH RX 13032 @ 131385: PUSHI #0x00005800 13033 @ 131390: ASSPAR 13034 @ 131391: PUSHI #0x0000000c 13035 @ 131396: ASSPAR 13036 @ 131397: PUSH RHS 13037 @ 131400: SELECT 6 13038 @ 131403: ASSPAR 13039 @ 131404: PUSH RHS 13040 @ 131407: SELECT 6 13041 @ 131410: PUSHI #0x00000004 13042 @ 131415: ADD 13043 @ 131416: ASSPAR 13044 @ 131417: CALL 2265 RX(ST, LINK, WSP, LHS_DISP+REGLEN) 13045 @ 131418: LINE 2265 "regression-compile-tmp/asems412.imp" 13046 @ 131457: PUSH RX 13047 @ 131460: PUSHI #0x00005000 13048 @ 131465: ASSPAR 13049 @ 131466: PUSHI #0x0000000c 13050 @ 131471: ASSPAR 13051 @ 131472: PUSHI #0x0000002b 13052 @ 131477: ASSPAR 13053 @ 131478: PUSH LHS 13054 @ 131481: SELECT 1 13055 @ 131484: PUSHI #0x00000004 13056 @ 131489: ADD 13057 @ 131490: ASSPAR 13058 @ 131491: CALL 2266 %FINISH 13059 @ 131492: LINE 2266 "regression-compile-tmp/asems412.imp" 13060 @ 131531: LOCATE L_0009 2267 DROP(RHS); DROP(LHS) 13061 @ 131534: LINE 2267 "regression-compile-tmp/asems412.imp" 13062 @ 131573: PUSH DROP 13063 @ 131576: PUSH RHS 13064 @ 131579: ASSPAR 13065 @ 131580: CALL 13066 @ 131581: LINE 2267 "regression-compile-tmp/asems412.imp" 13067 @ 131620: PUSH DROP 13068 @ 131623: PUSH LHS 13069 @ 131626: ASSPAR 13070 @ 131627: CALL 2268 STP = STP-2 13071 @ 131628: LINE 2268 "regression-compile-tmp/asems412.imp" 13072 @ 131667: PUSH STP 13073 @ 131670: PUSH STP 13074 @ 131673: PUSHI #0x00000002 13075 @ 131678: SUB 13076 @ 131679: ASSVAL 2269 %RETURN 13077 @ 131680: LINE 2269 "regression-compile-tmp/asems412.imp" 13078 @ 131719: RETURN 2270 %FINISH 13079 @ 131720: LINE 2270 "regression-compile-tmp/asems412.imp" 13080 @ 131759: LOCATE L_0007 2271 %FINISH 13081 @ 131762: LINE 2271 "regression-compile-tmp/asems412.imp" 13082 @ 131801: LOCATE L_0004 2272 %IF LHS_DV < 0 %AND CONTROL&ARRAYDIAG # 0 %START;! ARRAYNAME 13083 @ 131804: LINE 2272 "regression-compile-tmp/asems412.imp" 13084 @ 131843: PUSH LHS 13085 @ 131846: SELECT 5 13086 @ 131849: PUSHI #0x00000000 13087 @ 131854: JUMPIF >= L_0004 13088 @ 131858: PUSH CONTROL 13089 @ 131861: PUSHI #0x00000004 13090 @ 131866: AND 13091 @ 131867: PUSHI #0x00000000 13092 @ 131872: JUMPIF = L_0004 2273 LHS_DV = 0 13093 @ 131876: LINE 2273 "regression-compile-tmp/asems412.imp" 13094 @ 131915: PUSH LHS 13095 @ 131918: SELECT 5 13096 @ 131921: PUSHI #0x00000000 13097 @ 131926: ASSVAL 2274 HOLD = LHS; TEMP = RHS 13098 @ 131927: LINE 2274 "regression-compile-tmp/asems412.imp" 13099 @ 131966: PUSH HOLD 13100 @ 131969: PUSH LHS 13101 @ 131972: ASSVAL 13102 @ 131973: LINE 2274 "regression-compile-tmp/asems412.imp" 13103 @ 132012: PUSH TEMP 13104 @ 132015: PUSH RHS 13105 @ 132018: ASSVAL 2275 HOLD_DISP = HOLD_DISP+4 13106 @ 132019: LINE 2275 "regression-compile-tmp/asems412.imp" 13107 @ 132058: PUSH HOLD 13108 @ 132061: SELECT 1 13109 @ 132064: PUSH HOLD 13110 @ 132067: SELECT 1 13111 @ 132070: PUSHI #0x00000004 13112 @ 132075: ADD 13113 @ 132076: ASSVAL 2276 %IF TEMP_DV < 0 %START 13114 @ 132077: LINE 2276 "regression-compile-tmp/asems412.imp" 13115 @ 132116: PUSH TEMP 13116 @ 132119: SELECT 5 13117 @ 132122: PUSHI #0x00000000 13118 @ 132127: JUMPIF >= L_0007 2277 TEMP_DISP = TEMP_DISP+4; TEMP_FORM = A IN S 13119 @ 132131: LINE 2277 "regression-compile-tmp/asems412.imp" 13120 @ 132170: PUSH TEMP 13121 @ 132173: SELECT 1 13122 @ 132176: PUSH TEMP 13123 @ 132179: SELECT 1 13124 @ 132182: PUSHI #0x00000004 13125 @ 132187: ADD 13126 @ 132188: ASSVAL 13127 @ 132189: LINE 2277 "regression-compile-tmp/asems412.imp" 13128 @ 132228: PUSH TEMP 13129 @ 132231: SELECT 9 13130 @ 132234: PUSHI #0x00000002 13131 @ 132239: ASSVAL 2278 %ELSE 13132 @ 132240: LINE 2278 "regression-compile-tmp/asems412.imp" 13133 @ 132279: GOTO L_0006 13134 @ 132282: LOCATE L_0007 2279 TEMP_BASE = GLA; TEMP_DISP = TEMP_DV 13135 @ 132285: LINE 2279 "regression-compile-tmp/asems412.imp" 13136 @ 132324: PUSH TEMP 13137 @ 132327: SELECT 6 13138 @ 132330: PUSHI #0x0000002a 13139 @ 132335: ASSVAL 13140 @ 132336: LINE 2279 "regression-compile-tmp/asems412.imp" 13141 @ 132375: PUSH TEMP 13142 @ 132378: SELECT 1 13143 @ 132381: PUSH TEMP 13144 @ 132384: SELECT 5 13145 @ 132387: ASSVAL 2280 TEMP_FORM = V IN S 13146 @ 132388: LINE 2280 "regression-compile-tmp/asems412.imp" 13147 @ 132427: PUSH TEMP 13148 @ 132430: SELECT 9 13149 @ 132433: PUSHI #0x00000003 13150 @ 132438: ASSVAL 2281 %FINISH 13151 @ 132439: LINE 2281 "regression-compile-tmp/asems412.imp" 13152 @ 132478: LOCATE L_0006 2282 SSTACK(HOLD); SSTACK(TEMP) 13153 @ 132481: LINE 2282 "regression-compile-tmp/asems412.imp" 13154 @ 132520: PUSH SSTACK 13155 @ 132523: PUSH HOLD 13156 @ 132526: ASSPAR 13157 @ 132527: CALL 13158 @ 132528: LINE 2282 "regression-compile-tmp/asems412.imp" 13159 @ 132567: PUSH SSTACK 13160 @ 132570: PUSH TEMP 13161 @ 132573: ASSPAR 13162 @ 132574: CALL 2283 ASSIGN(0) 13163 @ 132575: LINE 2283 "regression-compile-tmp/asems412.imp" 13164 @ 132614: PUSH ASSIGN 13165 @ 132617: PUSHI #0x00000000 13166 @ 132622: ASSPAR 13167 @ 132623: CALL 2284 %FINISH 13168 @ 132624: LINE 2284 "regression-compile-tmp/asems412.imp" 13169 @ 132663: LOCATE L_0004 2285 STP = STP-2 13170 @ 132666: LINE 2285 "regression-compile-tmp/asems412.imp" 13171 @ 132705: PUSH STP 13172 @ 132708: PUSH STP 13173 @ 132711: PUSHI #0x00000002 13174 @ 132716: SUB 13175 @ 132717: ASSVAL 2286 %IF LHS_TYPE = 10 %START;! NAME PARAMETER 13176 @ 132718: LINE 2286 "regression-compile-tmp/asems412.imp" 13177 @ 132757: PUSH LHS 13178 @ 132760: SELECT 8 13179 @ 132763: PUSHI #0x0000000a 13180 @ 132768: JUMPIF # L_0004 2287 ABORT(15) %UNLESS ASSOP = 0 13181 @ 132772: LINE 2287 "regression-compile-tmp/asems412.imp" 13182 @ 132811: PUSH ASSOP 13183 @ 132814: PUSHI #0x00000000 13184 @ 132819: JUMPIF = L_0007 13185 @ 132823: PUSH ABORT 13186 @ 132826: PUSHI #0x0000000f 13187 @ 132831: ASSPAR 13188 @ 132832: CALL 13189 @ 132833: LOCATE L_0007 2288 T = RHS_TYPE<<13!(RHS_LENGTH&X'1FFF') 13190 @ 132836: LINE 2288 "regression-compile-tmp/asems412.imp" 13191 @ 132875: PUSH T 13192 @ 132878: PUSH RHS 13193 @ 132881: SELECT 8 13194 @ 132884: PUSHI #0x0000000d 13195 @ 132889: LSH 13196 @ 132890: PUSH RHS 13197 @ 132893: SELECT 4 13198 @ 132896: PUSHI #0x00001fff 13199 @ 132901: AND 13200 @ 132902: OR 13201 @ 132903: ASSVAL 2289 AMAP(RHS); LRD(RHS, ANY) 13202 @ 132904: LINE 2289 "regression-compile-tmp/asems412.imp" 13203 @ 132943: PUSH AMAP 13204 @ 132946: PUSH RHS 13205 @ 132949: ASSPAR 13206 @ 132950: CALL 13207 @ 132951: LINE 2289 "regression-compile-tmp/asems412.imp" 13208 @ 132990: PUSH LRD 13209 @ 132993: PUSH RHS 13210 @ 132996: ASSPAR 13211 @ 132997: PUSHI #0x0000002d 13212 @ 133002: ASSPAR 13213 @ 133003: CALL 2290 RX(ST, RHS_BASE, LHS_BASE, LHS_DISP) 13214 @ 133004: LINE 2290 "regression-compile-tmp/asems412.imp" 13215 @ 133043: PUSH RX 13216 @ 133046: PUSHI #0x00005000 13217 @ 133051: ASSPAR 13218 @ 133052: PUSH RHS 13219 @ 133055: SELECT 6 13220 @ 133058: ASSPAR 13221 @ 133059: PUSH LHS 13222 @ 133062: SELECT 6 13223 @ 133065: ASSPAR 13224 @ 133066: PUSH LHS 13225 @ 133069: SELECT 1 13226 @ 133072: ASSPAR 13227 @ 133073: CALL 2291 RI2(LHI, RHS_BASE, 0, T) 13228 @ 133074: LINE 2291 "regression-compile-tmp/asems412.imp" 13229 @ 133113: PUSH RI2 13230 @ 133116: PUSHI #0x0000c800 13231 @ 133121: ASSPAR 13232 @ 133122: PUSH RHS 13233 @ 133125: SELECT 6 13234 @ 133128: ASSPAR 13235 @ 133129: PUSHI #0x00000000 13236 @ 133134: ASSPAR 13237 @ 133135: PUSH T 13238 @ 133138: ASSPAR 13239 @ 133139: CALL 2292 CLAIM(LHS_BASE); RX(ST, RHS_BASE, LHS_BASE, LHS_DISP+REGLEN) 13240 @ 133140: LINE 2292 "regression-compile-tmp/asems412.imp" 13241 @ 133179: PUSH CLAIM 13242 @ 133182: PUSH LHS 13243 @ 133185: SELECT 6 13244 @ 133188: ASSPAR 13245 @ 133189: CALL 13246 @ 133190: LINE 2292 "regression-compile-tmp/asems412.imp" 13247 @ 133229: PUSH RX 13248 @ 133232: PUSHI #0x00005000 13249 @ 133237: ASSPAR 13250 @ 133238: PUSH RHS 13251 @ 133241: SELECT 6 13252 @ 133244: ASSPAR 13253 @ 133245: PUSH LHS 13254 @ 133248: SELECT 6 13255 @ 133251: ASSPAR 13256 @ 133252: PUSH LHS 13257 @ 133255: SELECT 1 13258 @ 133258: PUSHI #0x00000004 13259 @ 133263: ADD 13260 @ 133264: ASSPAR 13261 @ 133265: CALL 2293 FORGET(RHS_BASE) 13262 @ 133266: LINE 2293 "regression-compile-tmp/asems412.imp" 13263 @ 133305: PUSH FORGET 13264 @ 133308: PUSH RHS 13265 @ 133311: SELECT 6 13266 @ 133314: ASSPAR 13267 @ 133315: CALL 2294 DROP(LHS) 13268 @ 133316: LINE 2294 "regression-compile-tmp/asems412.imp" 13269 @ 133355: PUSH DROP 13270 @ 133358: PUSH LHS 13271 @ 133361: ASSPAR 13272 @ 133362: CALL 2295 %RETURN 13273 @ 133363: LINE 2295 "regression-compile-tmp/asems412.imp" 13274 @ 133402: RETURN 2296 %FINISH 13275 @ 133403: LINE 2296 "regression-compile-tmp/asems412.imp" 13276 @ 133442: LOCATE L_0004 2297 %IF ASSOP = 0 %START 13277 @ 133445: LINE 2297 "regression-compile-tmp/asems412.imp" 13278 @ 133484: PUSH ASSOP 13279 @ 133487: PUSHI #0x00000000 13280 @ 133492: JUMPIF # L_0004 2298 DUMP STRING(0) %IF RHS_TYPE = STRING %AND RHS_FORM = CONSTANT 13281 @ 133496: LINE 2298 "regression-compile-tmp/asems412.imp" 13282 @ 133535: PUSH RHS 13283 @ 133538: SELECT 8 13284 @ 133541: PUSHI #0x00000004 13285 @ 133546: JUMPIF # L_0007 13286 @ 133550: PUSH RHS 13287 @ 133553: SELECT 9 13288 @ 133556: PUSHI #0x00000000 13289 @ 133561: JUMPIF # L_0007 13290 @ 133565: PUSH DUMPSTRING 13291 @ 133568: PUSHI #0x00000000 13292 @ 133573: ASSPAR 13293 @ 133574: CALL 13294 @ 133575: LOCATE L_0007 2299 AMAP(LHS); AMAP(RHS) 13295 @ 133578: LINE 2299 "regression-compile-tmp/asems412.imp" 13296 @ 133617: PUSH AMAP 13297 @ 133620: PUSH LHS 13298 @ 133623: ASSPAR 13299 @ 133624: CALL 13300 @ 133625: LINE 2299 "regression-compile-tmp/asems412.imp" 13301 @ 133664: PUSH AMAP 13302 @ 133667: PUSH RHS 13303 @ 133670: ASSPAR 13304 @ 133671: CALL 2300 %FINISH 13305 @ 133672: LINE 2300 "regression-compile-tmp/asems412.imp" 13306 @ 133711: LOCATE L_0004 2301 %IF LHS_TYPE = RECORD %START 13307 @ 133714: LINE 2301 "regression-compile-tmp/asems412.imp" 13308 @ 133753: PUSH LHS 13309 @ 133756: SELECT 8 13310 @ 133759: PUSHI #0x00000005 13311 @ 133764: JUMPIF # L_0004 2302 AMAP(LHS); LOAD(LHS, R2) 13312 @ 133768: LINE 2302 "regression-compile-tmp/asems412.imp" 13313 @ 133807: PUSH AMAP 13314 @ 133810: PUSH LHS 13315 @ 133813: ASSPAR 13316 @ 133814: CALL 13317 @ 133815: LINE 2302 "regression-compile-tmp/asems412.imp" 13318 @ 133854: PUSH LOAD 13319 @ 133857: PUSH LHS 13320 @ 133860: ASSPAR 13321 @ 133861: PUSHI #0x00000003 13322 @ 133866: ASSPAR 13323 @ 133867: CALL 2303 N = LHS_LENGTH>>1 13324 @ 133868: LINE 2303 "regression-compile-tmp/asems412.imp" 13325 @ 133907: PUSH N 13326 @ 133910: PUSH LHS 13327 @ 133913: SELECT 4 13328 @ 133916: PUSHI #0x00000001 13329 @ 133921: RSH 13330 @ 133922: ASSVAL 2304 %IF RHS_TYPE = RECORD %START 13331 @ 133923: LINE 2304 "regression-compile-tmp/asems412.imp" 13332 @ 133962: PUSH RHS 13333 @ 133965: SELECT 8 13334 @ 133968: PUSHI #0x00000005 13335 @ 133973: JUMPIF # L_0007 2305 AMAP(RHS); LOAD(RHS, R1); RELEASE(R1) 13336 @ 133977: LINE 2305 "regression-compile-tmp/asems412.imp" 13337 @ 134016: PUSH AMAP 13338 @ 134019: PUSH RHS 13339 @ 134022: ASSPAR 13340 @ 134023: CALL 13341 @ 134024: LINE 2305 "regression-compile-tmp/asems412.imp" 13342 @ 134063: PUSH LOAD 13343 @ 134066: PUSH RHS 13344 @ 134069: ASSPAR 13345 @ 134070: PUSHI #0x00000002 13346 @ 134075: ASSPAR 13347 @ 134076: CALL 13348 @ 134077: LINE 2305 "regression-compile-tmp/asems412.imp" 13349 @ 134116: PUSH RELEASE 13350 @ 134119: PUSHI #0x00000002 13351 @ 134124: ASSPAR 13352 @ 134125: CALL 2306 P = R COPY 13353 @ 134126: LINE 2306 "regression-compile-tmp/asems412.imp" 13354 @ 134165: PUSH P 13355 @ 134168: PUSHI #0x00000902 13356 @ 134173: ASSVAL 2307 %ELSE 13357 @ 134174: LINE 2307 "regression-compile-tmp/asems412.imp" 13358 @ 134213: GOTO L_0006 13359 @ 134216: LOCATE L_0007 2308 P = R CLEAR 13360 @ 134219: LINE 2308 "regression-compile-tmp/asems412.imp" 13361 @ 134258: PUSH P 13362 @ 134261: PUSHI #0x00000903 13363 @ 134266: ASSVAL 2309 %FINISH 13364 @ 134267: LINE 2309 "regression-compile-tmp/asems412.imp" 13365 @ 134306: LOCATE L_0006 2310 DROP(RHS); DROP(LHS) 13366 @ 134309: LINE 2310 "regression-compile-tmp/asems412.imp" 13367 @ 134348: PUSH DROP 13368 @ 134351: PUSH RHS 13369 @ 134354: ASSPAR 13370 @ 134355: CALL 13371 @ 134356: LINE 2310 "regression-compile-tmp/asems412.imp" 13372 @ 134395: PUSH DROP 13373 @ 134398: PUSH LHS 13374 @ 134401: ASSPAR 13375 @ 134402: CALL 2311 CSTACK(N); STP = STP-1; LRD(STACKED(STP+1)_V, R0) 13376 @ 134403: LINE 2311 "regression-compile-tmp/asems412.imp" 13377 @ 134442: PUSH CSTACK 13378 @ 134445: PUSH N 13379 @ 134448: ASSPAR 13380 @ 134449: CALL 13381 @ 134450: LINE 2311 "regression-compile-tmp/asems412.imp" 13382 @ 134489: PUSH STP 13383 @ 134492: PUSH STP 13384 @ 134495: PUSHI #0x00000001 13385 @ 134500: SUB 13386 @ 134501: ASSVAL 13387 @ 134502: LINE 2311 "regression-compile-tmp/asems412.imp" 13388 @ 134541: PUSH LRD 13389 @ 134544: PUSH STACKED 13390 @ 134547: PUSH STP 13391 @ 134550: PUSHI #0x00000001 13392 @ 134555: ADD 13393 @ 134556: ACCESS 13394 @ 134557: SELECT 1 13395 @ 134560: ASSPAR 13396 @ 134561: PUSHI #0x00000001 13397 @ 134566: ASSPAR 13398 @ 134567: CALL 2312 RELEASE(R2) 13399 @ 134568: LINE 2312 "regression-compile-tmp/asems412.imp" 13400 @ 134607: PUSH RELEASE 13401 @ 134610: PUSHI #0x00000003 13402 @ 134615: ASSPAR 13403 @ 134616: CALL 2313 PERM(P) 13404 @ 134617: LINE 2313 "regression-compile-tmp/asems412.imp" 13405 @ 134656: PUSH PERM 13406 @ 134659: PUSH P 13407 @ 134662: ASSPAR 13408 @ 134663: CALL 2314 %RETURN 13409 @ 134664: LINE 2314 "regression-compile-tmp/asems412.imp" 13410 @ 134703: RETURN 2315 %FINISH 13411 @ 134704: LINE 2315 "regression-compile-tmp/asems412.imp" 13412 @ 134743: LOCATE L_0004 2316 %IF LHS_TYPE = 15 %START; ! STRING PARAM (FINAL) 13413 @ 134746: LINE 2316 "regression-compile-tmp/asems412.imp" 13414 @ 134785: PUSH LHS 13415 @ 134788: SELECT 8 13416 @ 134791: PUSHI #0x0000000f 13417 @ 134796: JUMPIF # L_0004 2317 %IF RHS == ACTIVE STRING %START 13418 @ 134800: LINE 2317 "regression-compile-tmp/asems412.imp" 13419 @ 134839: PUSH RHS 13420 @ 134842: PUSH ACTIVESTRING 13421 @ 134845: JUMPIFA # L_0007 2318 HAZARD(R1) 13422 @ 134849: LINE 2318 "regression-compile-tmp/asems412.imp" 13423 @ 134888: PUSH HAZARD 13424 @ 134891: PUSHI #0x00000002 13425 @ 134896: ASSPAR 13426 @ 134897: CALL 2319 RHS_BASE = 17; REMEMBER(R1, RHS); ! DISCRIMINATE 13427 @ 134898: LINE 2319 "regression-compile-tmp/asems412.imp" 13428 @ 134937: PUSH RHS 13429 @ 134940: SELECT 6 13430 @ 134943: PUSHI #0x00000011 13431 @ 134948: ASSVAL 13432 @ 134949: LINE 2319 "regression-compile-tmp/asems412.imp" 13433 @ 134988: PUSH REMEMBER 13434 @ 134991: PUSHI #0x00000002 13435 @ 134996: ASSPAR 13436 @ 134997: PUSH RHS 13437 @ 135000: ASSPAR 13438 @ 135001: CALL 2320 ACTIVE STRING == NULL 13439 @ 135002: LINE 2320 "regression-compile-tmp/asems412.imp" 13440 @ 135041: PUSH ACTIVESTRING 13441 @ 135044: PUSH NULL 13442 @ 135047: ASSREF 2321 T = NEW TAG; DEFINE REFERENCE(T, R REF) 13443 @ 135048: LINE 2321 "regression-compile-tmp/asems412.imp" 13444 @ 135087: PUSH T 13445 @ 135090: PUSH NEWTAG 13446 @ 135093: CALL 13447 @ 135094: ASSVAL 13448 @ 135095: LINE 2321 "regression-compile-tmp/asems412.imp" 13449 @ 135134: PUSH DEFINEREFERENCE 13450 @ 135137: PUSH T 13451 @ 135140: ASSPAR 13452 @ 135141: PUSHI #0x00000004 13453 @ 135146: ASSPAR 13454 @ 135147: CALL 2322 RX(BAL, R1, CODE, T) 13455 @ 135148: LINE 2322 "regression-compile-tmp/asems412.imp" 13456 @ 135187: PUSH RX 13457 @ 135190: PUSHI #0x00004100 13458 @ 135195: ASSPAR 13459 @ 135196: PUSHI #0x00000002 13460 @ 135201: ASSPAR 13461 @ 135202: PUSHI #0x0000002c 13462 @ 135207: ASSPAR 13463 @ 135208: PUSH T 13464 @ 135211: ASSPAR 13465 @ 135212: CALL 2323 N = 0 13466 @ 135213: LINE 2323 "regression-compile-tmp/asems412.imp" 13467 @ 135252: PUSH N 13468 @ 135255: PUSHI #0x00000000 13469 @ 135260: ASSVAL 2324 %CYCLE 13470 @ 135261: LINE 2324 "regression-compile-tmp/asems412.imp" 13471 @ 135300: LOCATE L_0009 2325 DUMP(CURRENTSTRING(N)<<8+CURRENTSTRING(N+1)) 13472 @ 135303: LINE 2325 "regression-compile-tmp/asems412.imp" 13473 @ 135342: PUSH DUMP 13474 @ 135345: PUSH CURRENTSTRING 13475 @ 135348: PUSH N 13476 @ 135351: ACCESS 13477 @ 135352: PUSHI #0x00000008 13478 @ 135357: LSH 13479 @ 135358: PUSH CURRENTSTRING 13480 @ 135361: PUSH N 13481 @ 135364: PUSHI #0x00000001 13482 @ 135369: ADD 13483 @ 135370: ACCESS 13484 @ 135371: ADD 13485 @ 135372: ASSPAR 13486 @ 135373: CALL 2326 N = N+2 13487 @ 135374: LINE 2326 "regression-compile-tmp/asems412.imp" 13488 @ 135413: PUSH N 13489 @ 135416: PUSH N 13490 @ 135419: PUSHI #0x00000002 13491 @ 135424: ADD 13492 @ 135425: ASSVAL 2327 %EXIT %IF N > CSLEN 13493 @ 135426: LINE 2327 "regression-compile-tmp/asems412.imp" 13494 @ 135465: PUSH N 13495 @ 135468: PUSH CSLEN 13496 @ 135471: JUMPIF <= L_000d 13497 @ 135475: GOTO L_000a 13498 @ 135478: LOCATE L_000d 2328 %REPEAT 13499 @ 135481: LINE 2328 "regression-compile-tmp/asems412.imp" 13500 @ 135520: REPEAT L_0009 13501 @ 135523: LOCATE L_000a 2329 CSLEN = 0 13502 @ 135526: LINE 2329 "regression-compile-tmp/asems412.imp" 13503 @ 135565: PUSH CSLEN 13504 @ 135568: PUSHI #0x00000000 13505 @ 135573: ASSVAL 2330 DEFINE TAG(T) 13506 @ 135574: LINE 2330 "regression-compile-tmp/asems412.imp" 13507 @ 135613: PUSH DEFINETAG 13508 @ 135616: PUSH T 13509 @ 135619: ASSPAR 13510 @ 135620: CALL 2331 RHS_FORM = V IN S; RHS_BASE = R1; RHS_DISP = 0 13511 @ 135621: LINE 2331 "regression-compile-tmp/asems412.imp" 13512 @ 135660: PUSH RHS 13513 @ 135663: SELECT 9 13514 @ 135666: PUSHI #0x00000003 13515 @ 135671: ASSVAL 13516 @ 135672: LINE 2331 "regression-compile-tmp/asems412.imp" 13517 @ 135711: PUSH RHS 13518 @ 135714: SELECT 6 13519 @ 135717: PUSHI #0x00000002 13520 @ 135722: ASSVAL 13521 @ 135723: LINE 2331 "regression-compile-tmp/asems412.imp" 13522 @ 135762: PUSH RHS 13523 @ 135765: SELECT 1 13524 @ 135768: PUSHI #0x00000000 13525 @ 135773: ASSVAL 2332 CLAIM(R1) 13526 @ 135774: LINE 2332 "regression-compile-tmp/asems412.imp" 13527 @ 135813: PUSH CLAIM 13528 @ 135816: PUSHI #0x00000002 13529 @ 135821: ASSPAR 13530 @ 135822: CALL 2333 %FINISH 13531 @ 135823: LINE 2333 "regression-compile-tmp/asems412.imp" 13532 @ 135862: LOCATE L_0007 2334 DUMP STRING(0) 13533 @ 135865: LINE 2334 "regression-compile-tmp/asems412.imp" 13534 @ 135904: PUSH DUMPSTRING 13535 @ 135907: PUSHI #0x00000000 13536 @ 135912: ASSPAR 13537 @ 135913: CALL 2335 WDISP = 44 %IF WDISP = 0 13538 @ 135914: LINE 2335 "regression-compile-tmp/asems412.imp" 13539 @ 135953: PUSH WDISP 13540 @ 135956: PUSHI #0x00000000 13541 @ 135961: JUMPIF # L_0007 13542 @ 135965: PUSH WDISP 13543 @ 135968: PUSHI #0x0000002c 13544 @ 135973: ASSVAL 13545 @ 135974: LOCATE L_0007 2336 LRD(RHS, R1) 13546 @ 135977: LINE 2336 "regression-compile-tmp/asems412.imp" 13547 @ 136016: PUSH LRD 13548 @ 136019: PUSH RHS 13549 @ 136022: ASSPAR 13550 @ 136023: PUSHI #0x00000002 13551 @ 136028: ASSPAR 13552 @ 136029: CALL 2337 DROP(LHS) 13553 @ 136030: LINE 2337 "regression-compile-tmp/asems412.imp" 13554 @ 136069: PUSH DROP 13555 @ 136072: PUSH LHS 13556 @ 136075: ASSPAR 13557 @ 136076: CALL 2338 %RETURN 13558 @ 136077: LINE 2338 "regression-compile-tmp/asems412.imp" 13559 @ 136116: RETURN 2339 %FINISH 13560 @ 136117: LINE 2339 "regression-compile-tmp/asems412.imp" 13561 @ 136156: LOCATE L_0004 2340 %IF LHS_TYPE = STRING %START 13562 @ 136159: LINE 2340 "regression-compile-tmp/asems412.imp" 13563 @ 136198: PUSH LHS 13564 @ 136201: SELECT 8 13565 @ 136204: PUSHI #0x00000004 13566 @ 136209: JUMPIF # L_0004 2341 SIZE = LHS_LENGTH-1 13567 @ 136213: LINE 2341 "regression-compile-tmp/asems412.imp" 13568 @ 136252: PUSH SIZE 13569 @ 136255: PUSH LHS 13570 @ 136258: SELECT 4 13571 @ 136261: PUSHI #0x00000001 13572 @ 136266: SUB 13573 @ 136267: ASSVAL 2342 SIZE = 0 %IF SIZE < 0 %OR SIZE = 255 %OR CONTROL&ASSDIAG=0 13574 @ 136268: LINE 2342 "regression-compile-tmp/asems412.imp" 13575 @ 136307: PUSH SIZE 13576 @ 136310: PUSHI #0x00000000 13577 @ 136315: JUMPIF < L_0008 13578 @ 136319: PUSH SIZE 13579 @ 136322: PUSHI #0x000000ff 13580 @ 136327: JUMPIF = L_0008 13581 @ 136331: PUSH CONTROL 13582 @ 136334: PUSHI #0x00000010 13583 @ 136339: AND 13584 @ 136340: PUSHI #0x00000000 13585 @ 136345: JUMPIF # L_0007 13586 @ 136349: LOCATE L_0008 13587 @ 136352: PUSH SIZE 13588 @ 136355: PUSHI #0x00000000 13589 @ 136360: ASSVAL 13590 @ 136361: LOCATE L_0007 2343 DUMP STRING(-1) 13591 @ 136364: LINE 2343 "regression-compile-tmp/asems412.imp" 13592 @ 136403: PUSH DUMPSTRING 13593 @ 136406: PUSHI #0x00000001 13594 @ 136411: NEGATE 13595 @ 136412: ASSPAR 13596 @ 136413: CALL 2344 %IF RHS_FORM = CONSTANT %START;! NULL STRING!! 13597 @ 136414: LINE 2344 "regression-compile-tmp/asems412.imp" 13598 @ 136453: PUSH RHS 13599 @ 136456: SELECT 9 13600 @ 136459: PUSHI #0x00000000 13601 @ 136464: JUMPIF # L_0007 2345 RHS_TYPE = INTEGER; LHS_TYPE = BYTE 13602 @ 136468: LINE 2345 "regression-compile-tmp/asems412.imp" 13603 @ 136507: PUSH RHS 13604 @ 136510: SELECT 8 13605 @ 136513: PUSHI #0x00000001 13606 @ 136518: ASSVAL 13607 @ 136519: LINE 2345 "regression-compile-tmp/asems412.imp" 13608 @ 136558: PUSH LHS 13609 @ 136561: SELECT 8 13610 @ 136564: PUSHI #0x00000002 13611 @ 136569: ASSVAL 2346 %ELSE 13612 @ 136570: LINE 2346 "regression-compile-tmp/asems412.imp" 13613 @ 136609: GOTO L_0006 13614 @ 136612: LOCATE L_0007 2347 WDISP = WDISP-256 %IF RHS_TYPE = 0 13615 @ 136615: LINE 2347 "regression-compile-tmp/asems412.imp" 13616 @ 136654: PUSH RHS 13617 @ 136657: SELECT 8 13618 @ 136660: PUSHI #0x00000000 13619 @ 136665: JUMPIF # L_000a 13620 @ 136669: PUSH WDISP 13621 @ 136672: PUSH WDISP 13622 @ 136675: PUSHI #0x00000100 13623 @ 136680: SUB 13624 @ 136681: ASSVAL 13625 @ 136682: LOCATE L_000a 2348 %IF RHS_LOP # 0 %AND SIZE = 0 %START 13626 @ 136685: LINE 2348 "regression-compile-tmp/asems412.imp" 13627 @ 136724: PUSH RHS 13628 @ 136727: SELECT 7 13629 @ 136730: PUSHI #0x00000000 13630 @ 136735: JUMPIF = L_000a 13631 @ 136739: PUSH SIZE 13632 @ 136742: PUSHI #0x00000000 13633 @ 136747: JUMPIF # L_000a 2349 W == RHS_LINK; RHS_LOP = 0 13634 @ 136751: LINE 2349 "regression-compile-tmp/asems412.imp" 13635 @ 136790: PUSH W 13636 @ 136793: PUSH RHS 13637 @ 136796: SELECT 10 13638 @ 136799: ASSREF 13639 @ 136800: LINE 2349 "regression-compile-tmp/asems412.imp" 13640 @ 136839: PUSH RHS 13641 @ 136842: SELECT 7 13642 @ 136845: PUSHI #0x00000000 13643 @ 136850: ASSVAL 2350 %IF SAME(LHS, RHS) %AND DIFFERENT(LHS, W) %START;! S = S.T 13644 @ 136851: LINE 2350 "regression-compile-tmp/asems412.imp" 13645 @ 136890: PUSH SAME 13646 @ 136893: PUSH LHS 13647 @ 136896: ASSPAR 13648 @ 136897: PUSH RHS 13649 @ 136900: ASSPAR 13650 @ 136901: CALL 13651 @ 136902: bf L_000d 13652 @ 136905: PUSH DIFFERENT 13653 @ 136908: PUSH LHS 13654 @ 136911: ASSPAR 13655 @ 136912: PUSH W 13656 @ 136915: ASSPAR 13657 @ 136916: CALL 13658 @ 136917: bf L_000d 2351 RELEASE(LHS_BASE) 13659 @ 136920: LINE 2351 "regression-compile-tmp/asems412.imp" 13660 @ 136959: PUSH RELEASE 13661 @ 136962: PUSH LHS 13662 @ 136965: SELECT 6 13663 @ 136968: ASSPAR 13664 @ 136969: CALL 2352 LOAD(LHS, R2); RELEASE(R2) 13665 @ 136970: LINE 2352 "regression-compile-tmp/asems412.imp" 13666 @ 137009: PUSH LOAD 13667 @ 137012: PUSH LHS 13668 @ 137015: ASSPAR 13669 @ 137016: PUSHI #0x00000003 13670 @ 137021: ASSPAR 13671 @ 137022: CALL 13672 @ 137023: LINE 2352 "regression-compile-tmp/asems412.imp" 13673 @ 137062: PUSH RELEASE 13674 @ 137065: PUSHI #0x00000003 13675 @ 137070: ASSPAR 13676 @ 137071: CALL 2353 DROP(RHS); JOIN(W) 13677 @ 137072: LINE 2353 "regression-compile-tmp/asems412.imp" 13678 @ 137111: PUSH DROP 13679 @ 137114: PUSH RHS 13680 @ 137117: ASSPAR 13681 @ 137118: CALL 13682 @ 137119: LINE 2353 "regression-compile-tmp/asems412.imp" 13683 @ 137158: PUSH JOIN 13684 @ 137161: PUSH W 13685 @ 137164: ASSPAR 13686 @ 137165: CALL 2354 DROP(LHS) 13687 @ 137166: LINE 2354 "regression-compile-tmp/asems412.imp" 13688 @ 137205: PUSH DROP 13689 @ 137208: PUSH LHS 13690 @ 137211: ASSPAR 13691 @ 137212: CALL 2355 %RETURN 13692 @ 137213: LINE 2355 "regression-compile-tmp/asems412.imp" 13693 @ 137252: RETURN 2356 %FINISH 13694 @ 137253: LINE 2356 "regression-compile-tmp/asems412.imp" 13695 @ 137292: LOCATE L_000d 2357 %IF DIFFERENT(LHS, W) %START; ! S = P.Q 13696 @ 137295: LINE 2357 "regression-compile-tmp/asems412.imp" 13697 @ 137334: PUSH DIFFERENT 13698 @ 137337: PUSH LHS 13699 @ 137340: ASSPAR 13700 @ 137341: PUSH W 13701 @ 137344: ASSPAR 13702 @ 137345: CALL 13703 @ 137346: bf L_000d 2358 LRD(RHS, R1); LRD(LHS, R2); PERM(CONC1) 13704 @ 137349: LINE 2358 "regression-compile-tmp/asems412.imp" 13705 @ 137388: PUSH LRD 13706 @ 137391: PUSH RHS 13707 @ 137394: ASSPAR 13708 @ 137395: PUSHI #0x00000002 13709 @ 137400: ASSPAR 13710 @ 137401: CALL 13711 @ 137402: LINE 2358 "regression-compile-tmp/asems412.imp" 13712 @ 137441: PUSH LRD 13713 @ 137444: PUSH LHS 13714 @ 137447: ASSPAR 13715 @ 137448: PUSHI #0x00000003 13716 @ 137453: ASSPAR 13717 @ 137454: CALL 13718 @ 137455: LINE 2358 "regression-compile-tmp/asems412.imp" 13719 @ 137494: PUSH PERM 13720 @ 137497: PUSHI #0x0000090b 13721 @ 137502: ASSPAR 13722 @ 137503: CALL 2359 JOIN(W) 13723 @ 137504: LINE 2359 "regression-compile-tmp/asems412.imp" 13724 @ 137543: PUSH JOIN 13725 @ 137546: PUSH W 13726 @ 137549: ASSPAR 13727 @ 137550: CALL 2360 %RETURN 13728 @ 137551: LINE 2360 "regression-compile-tmp/asems412.imp" 13729 @ 137590: RETURN 2361 %FINISH 13730 @ 137591: LINE 2361 "regression-compile-tmp/asems412.imp" 13731 @ 137630: LOCATE L_000d 2362 RHS_LOP = CONC 13732 @ 137633: LINE 2362 "regression-compile-tmp/asems412.imp" 13733 @ 137672: PUSH RHS 13734 @ 137675: SELECT 7 13735 @ 137678: PUSHI #0x0000000e 13736 @ 137683: ASSVAL 2363 %FINISH 13737 @ 137684: LINE 2363 "regression-compile-tmp/asems412.imp" 13738 @ 137723: LOCATE L_000a 2364 WDISP = 44 %IF WDISP = 0 %AND LHS_BASE = WSP 13739 @ 137726: LINE 2364 "regression-compile-tmp/asems412.imp" 13740 @ 137765: PUSH WDISP 13741 @ 137768: PUSHI #0x00000000 13742 @ 137773: JUMPIF # L_000a 13743 @ 137777: PUSH LHS 13744 @ 137780: SELECT 6 13745 @ 137783: PUSHI #0x0000002b 13746 @ 137788: JUMPIF # L_000a 13747 @ 137792: PUSH WDISP 13748 @ 137795: PUSHI #0x0000002c 13749 @ 137800: ASSVAL 13750 @ 137801: LOCATE L_000a 2365 LRD(RHS, R1); LRD(LHS, R2) 13751 @ 137804: LINE 2365 "regression-compile-tmp/asems412.imp" 13752 @ 137843: PUSH LRD 13753 @ 137846: PUSH RHS 13754 @ 137849: ASSPAR 13755 @ 137850: PUSHI #0x00000002 13756 @ 137855: ASSPAR 13757 @ 137856: CALL 13758 @ 137857: LINE 2365 "regression-compile-tmp/asems412.imp" 13759 @ 137896: PUSH LRD 13760 @ 137899: PUSH LHS 13761 @ 137902: ASSPAR 13762 @ 137903: PUSHI #0x00000003 13763 @ 137908: ASSPAR 13764 @ 137909: CALL 2366 %IF SIZE # 0 %START 13765 @ 137910: LINE 2366 "regression-compile-tmp/asems412.imp" 13766 @ 137949: PUSH SIZE 13767 @ 137952: PUSHI #0x00000000 13768 @ 137957: JUMPIF = L_000a 2367 CSTACK(SIZE); STP = STP-1; LRD(STACKED(STP+1)_V, R0) 13769 @ 137961: LINE 2367 "regression-compile-tmp/asems412.imp" 13770 @ 138000: PUSH CSTACK 13771 @ 138003: PUSH SIZE 13772 @ 138006: ASSPAR 13773 @ 138007: CALL 13774 @ 138008: LINE 2367 "regression-compile-tmp/asems412.imp" 13775 @ 138047: PUSH STP 13776 @ 138050: PUSH STP 13777 @ 138053: PUSHI #0x00000001 13778 @ 138058: SUB 13779 @ 138059: ASSVAL 13780 @ 138060: LINE 2367 "regression-compile-tmp/asems412.imp" 13781 @ 138099: PUSH LRD 13782 @ 138102: PUSH STACKED 13783 @ 138105: PUSH STP 13784 @ 138108: PUSHI #0x00000001 13785 @ 138113: ADD 13786 @ 138114: ACCESS 13787 @ 138115: SELECT 1 13788 @ 138118: ASSPAR 13789 @ 138119: PUSHI #0x00000001 13790 @ 138124: ASSPAR 13791 @ 138125: CALL 2368 PERM(STRING ASS) 13792 @ 138126: LINE 2368 "regression-compile-tmp/asems412.imp" 13793 @ 138165: PUSH PERM 13794 @ 138168: PUSHI #0x00000015 13795 @ 138173: ASSPAR 13796 @ 138174: CALL 2369 %FINISH 13797 @ 138175: LINE 2369 "regression-compile-tmp/asems412.imp" 13798 @ 138214: LOCATE L_000a 2370 PERM(SMOVE) 13799 @ 138217: LINE 2370 "regression-compile-tmp/asems412.imp" 13800 @ 138256: PUSH PERM 13801 @ 138259: PUSHI #0x0000090b 13802 @ 138264: ASSPAR 13803 @ 138265: CALL 2371 %RETURN 13804 @ 138266: LINE 2371 "regression-compile-tmp/asems412.imp" 13805 @ 138305: RETURN 2372 %FINISH 13806 @ 138306: LINE 2372 "regression-compile-tmp/asems412.imp" 13807 @ 138345: LOCATE L_0006 2373 %FINISH 13808 @ 138348: LINE 2373 "regression-compile-tmp/asems412.imp" 13809 @ 138387: LOCATE L_0004 2374 ADDRESS(LHS) 13810 @ 138390: LINE 2374 "regression-compile-tmp/asems412.imp" 13811 @ 138429: PUSH ADDRESS 13812 @ 138432: PUSH LHS 13813 @ 138435: ASSPAR 13814 @ 138436: CALL 2375 %IF (LHS_TYPE = INTEGER %AND CONTROL&UNASS DIAG = 0) %C 2376 %OR LHS_TYPE = SHORT %START 13815 @ 138437: LINE 2375 "regression-compile-tmp/asems412.imp" 13816 @ 138476: PUSH LHS 13817 @ 138479: SELECT 8 13818 @ 138482: PUSHI #0x00000001 13819 @ 138487: JUMPIF # L_0006 13820 @ 138491: PUSH CONTROL 13821 @ 138494: PUSHI #0x00000020 13822 @ 138499: AND 13823 @ 138500: PUSHI #0x00000000 13824 @ 138505: JUMPIF = L_0005 13825 @ 138509: LOCATE L_0006 13826 @ 138512: PUSH LHS 13827 @ 138515: SELECT 8 13828 @ 138518: PUSHI #0x00000003 13829 @ 138523: JUMPIF # L_0004 13830 @ 138527: LOCATE L_0005 2377 %IF RHS_LOP = ADD %START 13831 @ 138530: LINE 2377 "regression-compile-tmp/asems412.imp" 13832 @ 138569: PUSH RHS 13833 @ 138572: SELECT 7 13834 @ 138575: PUSHI #0x00000003 13835 @ 138580: JUMPIF # L_0007 2378 T = ADD; T = SADD %IF SAME(LHS, RHS) 13836 @ 138584: LINE 2378 "regression-compile-tmp/asems412.imp" 13837 @ 138623: PUSH T 13838 @ 138626: PUSHI #0x00000003 13839 @ 138631: ASSVAL 13840 @ 138632: LINE 2378 "regression-compile-tmp/asems412.imp" 13841 @ 138671: PUSH SAME 13842 @ 138674: PUSH LHS 13843 @ 138677: ASSPAR 13844 @ 138678: PUSH RHS 13845 @ 138681: ASSPAR 13846 @ 138682: CALL 13847 @ 138683: bf L_000a 13848 @ 138686: PUSH T 13849 @ 138689: PUSHI #0x0000000f 13850 @ 138694: ASSVAL 13851 @ 138695: LOCATE L_000a 2379 RHS_LOP = 0; OPTIMISE(RHS); RHS_LOP = T 13852 @ 138698: LINE 2379 "regression-compile-tmp/asems412.imp" 13853 @ 138737: PUSH RHS 13854 @ 138740: SELECT 7 13855 @ 138743: PUSHI #0x00000000 13856 @ 138748: ASSVAL 13857 @ 138749: LINE 2379 "regression-compile-tmp/asems412.imp" 13858 @ 138788: PUSH OPTIMISE 13859 @ 138791: PUSH RHS 13860 @ 138794: ASSPAR 13861 @ 138795: CALL 13862 @ 138796: LINE 2379 "regression-compile-tmp/asems412.imp" 13863 @ 138835: PUSH RHS 13864 @ 138838: SELECT 7 13865 @ 138841: PUSH T 13866 @ 138844: ASSVAL 2380 %IF SAME(LHS, RHS) %START 13867 @ 138845: LINE 2380 "regression-compile-tmp/asems412.imp" 13868 @ 138884: PUSH SAME 13869 @ 138887: PUSH LHS 13870 @ 138890: ASSPAR 13871 @ 138891: PUSH RHS 13872 @ 138894: ASSPAR 13873 @ 138895: CALL 13874 @ 138896: bf L_000a 2381 W == RHS_LINK 13875 @ 138899: LINE 2381 "regression-compile-tmp/asems412.imp" 13876 @ 138938: PUSH W 13877 @ 138941: PUSH RHS 13878 @ 138944: SELECT 10 13879 @ 138947: ASSREF 2382 LOAD(W, ANY) 13880 @ 138948: LINE 2382 "regression-compile-tmp/asems412.imp" 13881 @ 138987: PUSH LOAD 13882 @ 138990: PUSH W 13883 @ 138993: ASSPAR 13884 @ 138994: PUSHI #0x0000002d 13885 @ 138999: ASSPAR 13886 @ 139000: CALL 2383 RELEASE(LHS_BASE) 13887 @ 139001: LINE 2383 "regression-compile-tmp/asems412.imp" 13888 @ 139040: PUSH RELEASE 13889 @ 139043: PUSH LHS 13890 @ 139046: SELECT 6 13891 @ 139049: ASSPAR 13892 @ 139050: CALL 2384 CCV = LHS; CCREG = -2 13893 @ 139051: LINE 2384 "regression-compile-tmp/asems412.imp" 13894 @ 139090: PUSH CCV 13895 @ 139093: PUSH LHS 13896 @ 139096: ASSVAL 13897 @ 139097: LINE 2384 "regression-compile-tmp/asems412.imp" 13898 @ 139136: PUSH CCREG 13899 @ 139139: PUSHI #0x00000002 13900 @ 139144: NEGATE 13901 @ 139145: ASSVAL 2385 %IF LHS_TYPE = SHORT %THEN P = AHM %C 2386 %ELSE P = AM 13902 @ 139146: LINE 2385 "regression-compile-tmp/asems412.imp" 13903 @ 139185: PUSH LHS 13904 @ 139188: SELECT 8 13905 @ 139191: PUSHI #0x00000003 13906 @ 139196: JUMPIF # L_000d 13907 @ 139200: PUSH P 13908 @ 139203: PUSHI #0x00006100 13909 @ 139208: ASSVAL 13910 @ 139209: GOTO L_000c 13911 @ 139212: LOCATE L_000d 13912 @ 139215: PUSH P 13913 @ 139218: PUSHI #0x00005100 13914 @ 139223: ASSVAL 13915 @ 139224: LOCATE L_000c 2387 RX(P, W_BASE, LHS_BASE, LHS_DISP) 13916 @ 139227: LINE 2387 "regression-compile-tmp/asems412.imp" 13917 @ 139266: PUSH RX 13918 @ 139269: PUSH P 13919 @ 139272: ASSPAR 13920 @ 139273: PUSH W 13921 @ 139276: SELECT 6 13922 @ 139279: ASSPAR 13923 @ 139280: PUSH LHS 13924 @ 139283: SELECT 6 13925 @ 139286: ASSPAR 13926 @ 139287: PUSH LHS 13927 @ 139290: SELECT 1 13928 @ 139293: ASSPAR 13929 @ 139294: CALL 2388 PERM(ASSTH) %IF CONTROL&ASSDIAG # 0 %C 2389 %AND P = AHM 13930 @ 139295: LINE 2388 "regression-compile-tmp/asems412.imp" 13931 @ 139334: PUSH CONTROL 13932 @ 139337: PUSHI #0x00000010 13933 @ 139342: AND 13934 @ 139343: PUSHI #0x00000000 13935 @ 139348: JUMPIF = L_000d 13936 @ 139352: PUSH P 13937 @ 139355: PUSHI #0x00006100 13938 @ 139360: JUMPIF # L_000d 13939 @ 139364: PUSH PERM 13940 @ 139367: PUSHI #0x00000016 13941 @ 139372: ASSPAR 13942 @ 139373: CALL 13943 @ 139374: LOCATE L_000d 2390 FORGET DEST(LHS) 13944 @ 139377: LINE 2390 "regression-compile-tmp/asems412.imp" 13945 @ 139416: PUSH FORGETDEST 13946 @ 139419: PUSH LHS 13947 @ 139422: ASSPAR 13948 @ 139423: CALL 2391 RELEASE(W_BASE) 13949 @ 139424: LINE 2391 "regression-compile-tmp/asems412.imp" 13950 @ 139463: PUSH RELEASE 13951 @ 139466: PUSH W 13952 @ 139469: SELECT 6 13953 @ 139472: ASSPAR 13954 @ 139473: CALL 2392 DROP(RHS); DROP(W); DROP(LHS) 13955 @ 139474: LINE 2392 "regression-compile-tmp/asems412.imp" 13956 @ 139513: PUSH DROP 13957 @ 139516: PUSH RHS 13958 @ 139519: ASSPAR 13959 @ 139520: CALL 13960 @ 139521: LINE 2392 "regression-compile-tmp/asems412.imp" 13961 @ 139560: PUSH DROP 13962 @ 139563: PUSH W 13963 @ 139566: ASSPAR 13964 @ 139567: CALL 13965 @ 139568: LINE 2392 "regression-compile-tmp/asems412.imp" 13966 @ 139607: PUSH DROP 13967 @ 139610: PUSH LHS 13968 @ 139613: ASSPAR 13969 @ 139614: CALL 2393 CCCA = CA 13970 @ 139615: LINE 2393 "regression-compile-tmp/asems412.imp" 13971 @ 139654: PUSH CCCA 13972 @ 139657: PUSH CA 13973 @ 139660: ASSVAL 2394 %RETURN 13974 @ 139661: LINE 2394 "regression-compile-tmp/asems412.imp" 13975 @ 139700: RETURN 2395 %FINISH 13976 @ 139701: LINE 2395 "regression-compile-tmp/asems412.imp" 13977 @ 139740: LOCATE L_000a 2396 %FINISH 13978 @ 139743: LINE 2396 "regression-compile-tmp/asems412.imp" 13979 @ 139782: LOCATE L_0007 2397 %FINISH 13980 @ 139785: LINE 2397 "regression-compile-tmp/asems412.imp" 13981 @ 139824: LOCATE L_0004 2398 %IF LHS_BASE = PARAM %START 13982 @ 139827: LINE 2398 "regression-compile-tmp/asems412.imp" 13983 @ 139866: PUSH LHS 13984 @ 139869: SELECT 6 13985 @ 139872: PUSHI #0x00000030 13986 @ 139877: JUMPIF # L_0004 2399 NEW DISP = 0 13987 @ 139881: LINE 2399 "regression-compile-tmp/asems412.imp" 13988 @ 139920: PUSH NEWDISP 13989 @ 139923: PUSHI #0x00000000 13990 @ 139928: ASSVAL 2400 P = LHS_DISP 13991 @ 139929: LINE 2400 "regression-compile-tmp/asems412.imp" 13992 @ 139968: PUSH P 13993 @ 139971: PUSH LHS 13994 @ 139974: SELECT 1 13995 @ 139977: ASSVAL 2401 LOAD(RHS, P) %IF RHS_LOP # 0; DROP(LHS) 13996 @ 139978: LINE 2401 "regression-compile-tmp/asems412.imp" 13997 @ 140017: PUSH RHS 13998 @ 140020: SELECT 7 13999 @ 140023: PUSHI #0x00000000 14000 @ 140028: JUMPIF = L_0007 14001 @ 140032: PUSH LOAD 14002 @ 140035: PUSH RHS 14003 @ 140038: ASSPAR 14004 @ 140039: PUSH P 14005 @ 140042: ASSPAR 14006 @ 140043: CALL 14007 @ 140044: LOCATE L_0007 14008 @ 140047: LINE 2401 "regression-compile-tmp/asems412.imp" 14009 @ 140086: PUSH DROP 14010 @ 140089: PUSH LHS 14011 @ 140092: ASSPAR 14012 @ 140093: CALL 2402 LHS == STACKED(STP)_V 14013 @ 140094: LINE 2402 "regression-compile-tmp/asems412.imp" 14014 @ 140133: PUSH LHS 14015 @ 140136: PUSH STACKED 14016 @ 140139: PUSH STP 14017 @ 140142: ACCESS 14018 @ 140143: SELECT 1 14019 @ 140146: ASSREF 2403 RHS_LINK == LHS_LINK; RHS_LOP = LHS_LOP 14020 @ 140147: LINE 2403 "regression-compile-tmp/asems412.imp" 14021 @ 140186: PUSH RHS 14022 @ 140189: SELECT 10 14023 @ 140192: PUSH LHS 14024 @ 140195: SELECT 10 14025 @ 140198: ASSREF 14026 @ 140199: LINE 2403 "regression-compile-tmp/asems412.imp" 14027 @ 140238: PUSH RHS 14028 @ 140241: SELECT 7 14029 @ 140244: PUSH LHS 14030 @ 140247: SELECT 7 14031 @ 140250: ASSVAL 2404 LHS_LINK == RHS; LHS_LOP = P 14032 @ 140251: LINE 2404 "regression-compile-tmp/asems412.imp" 14033 @ 140290: PUSH LHS 14034 @ 140293: SELECT 10 14035 @ 140296: PUSH RHS 14036 @ 140299: ASSREF 14037 @ 140300: LINE 2404 "regression-compile-tmp/asems412.imp" 14038 @ 140339: PUSH LHS 14039 @ 140342: SELECT 7 14040 @ 140345: PUSH P 14041 @ 140348: ASSVAL 2405 %ELSE 14042 @ 140349: LINE 2405 "regression-compile-tmp/asems412.imp" 14043 @ 140388: GOTO L_0003 14044 @ 140391: LOCATE L_0004 2406 P = ANY; VAL = 0 14045 @ 140394: LINE 2406 "regression-compile-tmp/asems412.imp" 14046 @ 140433: PUSH P 14047 @ 140436: PUSHI #0x0000002d 14048 @ 140441: ASSVAL 14049 @ 140442: LINE 2406 "regression-compile-tmp/asems412.imp" 14050 @ 140481: PUSH VAL 14051 @ 140484: PUSHI #0x00000000 14052 @ 140489: ASSVAL 2407 %IF LHS_TYPE = INTEGER %START 14053 @ 140490: LINE 2407 "regression-compile-tmp/asems412.imp" 14054 @ 140529: PUSH LHS 14055 @ 140532: SELECT 8 14056 @ 140535: PUSHI #0x00000001 14057 @ 140540: JUMPIF # L_0007 2408 OP = ST 14058 @ 140544: LINE 2408 "regression-compile-tmp/asems412.imp" 14059 @ 140583: PUSH OP 14060 @ 140586: PUSHI #0x00005000 14061 @ 140591: ASSVAL 2409 %ELSE %IF LHS_TYPE = SHORT 14062 @ 140592: LINE 2409 "regression-compile-tmp/asems412.imp" 14063 @ 140631: GOTO L_0006 14064 @ 140634: LOCATE L_0007 14065 @ 140637: PUSH LHS 14066 @ 140640: SELECT 8 14067 @ 140643: PUSHI #0x00000003 14068 @ 140648: JUMPIF # L_0007 2410 OP = STH; VAL = X'FFFF'; T = ASSTH 14069 @ 140652: LINE 2410 "regression-compile-tmp/asems412.imp" 14070 @ 140691: PUSH OP 14071 @ 140694: PUSHI #0x00004000 14072 @ 140699: ASSVAL 14073 @ 140700: LINE 2410 "regression-compile-tmp/asems412.imp" 14074 @ 140739: PUSH VAL 14075 @ 140742: PUSHI #0x0000ffff 14076 @ 140747: ASSVAL 14077 @ 140748: LINE 2410 "regression-compile-tmp/asems412.imp" 14078 @ 140787: PUSH T 14079 @ 140790: PUSHI #0x00000016 14080 @ 140795: ASSVAL 2411 %ELSE %IF LHS_TYPE = BYTE 14081 @ 140796: LINE 2411 "regression-compile-tmp/asems412.imp" 14082 @ 140835: GOTO L_0006 14083 @ 140838: LOCATE L_0007 14084 @ 140841: PUSH LHS 14085 @ 140844: SELECT 8 14086 @ 140847: PUSHI #0x00000002 14087 @ 140852: JUMPIF # L_0007 2412 OP = STB; VAL = 255; T = ASSTB 14088 @ 140856: LINE 2412 "regression-compile-tmp/asems412.imp" 14089 @ 140895: PUSH OP 14090 @ 140898: PUSHI #0x0000d200 14091 @ 140903: ASSVAL 14092 @ 140904: LINE 2412 "regression-compile-tmp/asems412.imp" 14093 @ 140943: PUSH VAL 14094 @ 140946: PUSHI #0x000000ff 14095 @ 140951: ASSVAL 14096 @ 140952: LINE 2412 "regression-compile-tmp/asems412.imp" 14097 @ 140991: PUSH T 14098 @ 140994: PUSHI #0x00000017 14099 @ 140999: ASSVAL 2413 %ELSE 14100 @ 141000: LINE 2413 "regression-compile-tmp/asems412.imp" 14101 @ 141039: GOTO L_0006 14102 @ 141042: LOCATE L_0007 2414 OP = STE; P = ANYF 14103 @ 141045: LINE 2414 "regression-compile-tmp/asems412.imp" 14104 @ 141084: PUSH OP 14105 @ 141087: PUSHI #0x00006000 14106 @ 141092: ASSVAL 14107 @ 141093: LINE 2414 "regression-compile-tmp/asems412.imp" 14108 @ 141132: PUSH P 14109 @ 141135: PUSHI #0x0000002f 14110 @ 141140: ASSVAL 2415 %FINISH 14111 @ 141141: LINE 2415 "regression-compile-tmp/asems412.imp" 14112 @ 141180: LOCATE L_0006 2416 %IF VAL # 0 %START; ! POSSIBLE TEST REQUIRED 14113 @ 141183: LINE 2416 "regression-compile-tmp/asems412.imp" 14114 @ 141222: PUSH VAL 14115 @ 141225: PUSHI #0x00000000 14116 @ 141230: JUMPIF = L_0007 2417 %IF RHS_LOP = 0 %START 14117 @ 141234: LINE 2417 "regression-compile-tmp/asems412.imp" 14118 @ 141273: PUSH RHS 14119 @ 141276: SELECT 7 14120 @ 141279: PUSHI #0x00000000 14121 @ 141284: JUMPIF # L_000a 2418 VAL = 0 %IF (VAL = X'FFFF' %AND RHS_TYPE # INTEGER) %C 2419 %OR RHS_TYPE = BYTE 14122 @ 141288: LINE 2418 "regression-compile-tmp/asems412.imp" 14123 @ 141327: PUSH VAL 14124 @ 141330: PUSHI #0x0000ffff 14125 @ 141335: JUMPIF # L_000f 14126 @ 141339: PUSH RHS 14127 @ 141342: SELECT 8 14128 @ 141345: PUSHI #0x00000001 14129 @ 141350: JUMPIF # L_000e 14130 @ 141354: LOCATE L_000f 14131 @ 141357: PUSH RHS 14132 @ 141360: SELECT 8 14133 @ 141363: PUSHI #0x00000002 14134 @ 141368: JUMPIF # L_000d 14135 @ 141372: LOCATE L_000e 14136 @ 141375: PUSH VAL 14137 @ 141378: PUSHI #0x00000000 14138 @ 141383: ASSVAL 14139 @ 141384: LOCATE L_000d 2420 %ELSE %IF RHS_LOP = AND 14140 @ 141387: LINE 2420 "regression-compile-tmp/asems412.imp" 14141 @ 141426: GOTO L_0009 14142 @ 141429: LOCATE L_000a 14143 @ 141432: PUSH RHS 14144 @ 141435: SELECT 7 14145 @ 141438: PUSHI #0x00000008 14146 @ 141443: JUMPIF # L_000a 2421 %IF RHS_LINK_FORM=CONSTANT %AND RHS_LINK_DISP=VAL %START 14147 @ 141447: LINE 2421 "regression-compile-tmp/asems412.imp" 14148 @ 141486: PUSH RHS 14149 @ 141489: SELECT 10 14150 @ 141492: SELECT 9 14151 @ 141495: PUSHI #0x00000000 14152 @ 141500: JUMPIF # L_000d 14153 @ 141504: PUSH RHS 14154 @ 141507: SELECT 10 14155 @ 141510: SELECT 1 14156 @ 141513: PUSH VAL 14157 @ 141516: JUMPIF # L_000d 2422 DROP(RHS_LINK) 14158 @ 141520: LINE 2422 "regression-compile-tmp/asems412.imp" 14159 @ 141559: PUSH DROP 14160 @ 141562: PUSH RHS 14161 @ 141565: SELECT 10 14162 @ 141568: ASSPAR 14163 @ 141569: CALL 2423 RHS_LOP = 0; VAL = 0; ! DISPENSE WITH TEST 14164 @ 141570: LINE 2423 "regression-compile-tmp/asems412.imp" 14165 @ 141609: PUSH RHS 14166 @ 141612: SELECT 7 14167 @ 141615: PUSHI #0x00000000 14168 @ 141620: ASSVAL 14169 @ 141621: LINE 2423 "regression-compile-tmp/asems412.imp" 14170 @ 141660: PUSH VAL 14171 @ 141663: PUSHI #0x00000000 14172 @ 141668: ASSVAL 2424 %FINISH 14173 @ 141669: LINE 2424 "regression-compile-tmp/asems412.imp" 14174 @ 141708: LOCATE L_000d 2425 %FINISH 14175 @ 141711: LINE 2425 "regression-compile-tmp/asems412.imp" 14176 @ 141750: LOCATE L_000a 14177 @ 141753: LOCATE L_0009 2426 %FINISH 14178 @ 141756: LINE 2426 "regression-compile-tmp/asems412.imp" 14179 @ 141795: LOCATE L_0007 2427 %IF CONTROL&ASSDIAG # 0 %AND RHS_FORM = CONSTANT %START 14180 @ 141798: LINE 2427 "regression-compile-tmp/asems412.imp" 14181 @ 141837: PUSH CONTROL 14182 @ 141840: PUSHI #0x00000010 14183 @ 141845: AND 14184 @ 141846: PUSHI #0x00000000 14185 @ 141851: JUMPIF = L_0007 14186 @ 141855: PUSH RHS 14187 @ 141858: SELECT 9 14188 @ 141861: PUSHI #0x00000000 14189 @ 141866: JUMPIF # L_0007 2428 VAL = 0 %IF VAL = 255 %AND RHS_DISP>>8 = 0 14190 @ 141870: LINE 2428 "regression-compile-tmp/asems412.imp" 14191 @ 141909: PUSH VAL 14192 @ 141912: PUSHI #0x000000ff 14193 @ 141917: JUMPIF # L_000a 14194 @ 141921: PUSH RHS 14195 @ 141924: SELECT 1 14196 @ 141927: PUSHI #0x00000008 14197 @ 141932: RSH 14198 @ 141933: PUSHI #0x00000000 14199 @ 141938: JUMPIF # L_000a 14200 @ 141942: PUSH VAL 14201 @ 141945: PUSHI #0x00000000 14202 @ 141950: ASSVAL 14203 @ 141951: LOCATE L_000a 2429 VAL = 0 %IF VAL = X'FFFF' %C 2430 %AND X'FFFF8000'<=RHS_DISP<=X'10000' 14204 @ 141954: LINE 2429 "regression-compile-tmp/asems412.imp" 14205 @ 141993: PUSH VAL 14206 @ 141996: PUSHI #0x0000ffff 14207 @ 142001: JUMPIF # L_000a 14208 @ 142005: PUSHI #0xffff8000 14209 @ 142010: PUSH RHS 14210 @ 142013: SELECT 1 14211 @ 142016: JUMPIFD > L_000a 14212 @ 142020: PUSHI #0x00010000 14213 @ 142025: JUMPIF > L_000a 14214 @ 142029: PUSH VAL 14215 @ 142032: PUSHI #0x00000000 14216 @ 142037: ASSVAL 14217 @ 142038: LOCATE L_000a 2431 %FINISH 14218 @ 142041: LINE 2431 "regression-compile-tmp/asems412.imp" 14219 @ 142080: LOCATE L_0007 2432 LOAD(RHS, P) 14220 @ 142083: LINE 2432 "regression-compile-tmp/asems412.imp" 14221 @ 142122: PUSH LOAD 14222 @ 142125: PUSH RHS 14223 @ 142128: ASSPAR 14224 @ 142129: PUSH P 14225 @ 142132: ASSPAR 14226 @ 142133: CALL 2433 FORGET DEST(LHS) 14227 @ 142134: LINE 2433 "regression-compile-tmp/asems412.imp" 14228 @ 142173: PUSH FORGETDEST 14229 @ 142176: PUSH LHS 14230 @ 142179: ASSPAR 14231 @ 142180: CALL 2434 RX(OP, RHS_BASE, LHS_BASE, LHS_DISP); CCCA = CCCA+4 14232 @ 142181: LINE 2434 "regression-compile-tmp/asems412.imp" 14233 @ 142220: PUSH RX 14234 @ 142223: PUSH OP 14235 @ 142226: ASSPAR 14236 @ 142227: PUSH RHS 14237 @ 142230: SELECT 6 14238 @ 142233: ASSPAR 14239 @ 142234: PUSH LHS 14240 @ 142237: SELECT 6 14241 @ 142240: ASSPAR 14242 @ 142241: PUSH LHS 14243 @ 142244: SELECT 1 14244 @ 142247: ASSPAR 14245 @ 142248: CALL 14246 @ 142249: LINE 2434 "regression-compile-tmp/asems412.imp" 14247 @ 142288: PUSH CCCA 14248 @ 142291: PUSH CCCA 14249 @ 142294: PUSHI #0x00000004 14250 @ 142299: ADD 14251 @ 142300: ASSVAL 2435 REMEMBER(RHS_BASE+STORE, LHS); !MOVED ONE LINE DOWN?? 14252 @ 142301: LINE 2435 "regression-compile-tmp/asems412.imp" 14253 @ 142340: PUSH REMEMBER 14254 @ 142343: PUSH RHS 14255 @ 142346: SELECT 6 14256 @ 142349: PUSHI #0x00000014 14257 @ 142354: ADD 14258 @ 142355: ASSPAR 14259 @ 142356: PUSH LHS 14260 @ 142359: ASSPAR 14261 @ 142360: CALL 2436 %IF VAL = 0 %OR CONTROL&ASSDIAG = 0 %START;! NO STORE TEST 14262 @ 142361: LINE 2436 "regression-compile-tmp/asems412.imp" 14263 @ 142400: PUSH VAL 14264 @ 142403: PUSHI #0x00000000 14265 @ 142408: JUMPIF = L_0008 14266 @ 142412: PUSH CONTROL 14267 @ 142415: PUSHI #0x00000010 14268 @ 142420: AND 14269 @ 142421: PUSHI #0x00000000 14270 @ 142426: JUMPIF # L_0007 14271 @ 142430: LOCATE L_0008 2437 RELEASE(RHS_BASE) 14272 @ 142433: LINE 2437 "regression-compile-tmp/asems412.imp" 14273 @ 142472: PUSH RELEASE 14274 @ 142475: PUSH RHS 14275 @ 142478: SELECT 6 14276 @ 142481: ASSPAR 14277 @ 142482: CALL 2438 %ELSE 14278 @ 142483: LINE 2438 "regression-compile-tmp/asems412.imp" 14279 @ 142522: GOTO L_0006 14280 @ 142525: LOCATE L_0007 2439 %IF T = ASSTH %START 14281 @ 142528: LINE 2439 "regression-compile-tmp/asems412.imp" 14282 @ 142567: PUSH T 14283 @ 142570: PUSHI #0x00000016 14284 @ 142575: JUMPIF # L_000a 2440 RR(CHVR, RHS_BASE, RHS_BASE) 14285 @ 142579: LINE 2440 "regression-compile-tmp/asems412.imp" 14286 @ 142618: PUSH RR 14287 @ 142621: PUSHI #0x00001200 14288 @ 142626: ASSPAR 14289 @ 142627: PUSH RHS 14290 @ 142630: SELECT 6 14291 @ 142633: ASSPAR 14292 @ 142634: PUSH RHS 14293 @ 142637: SELECT 6 14294 @ 142640: ASSPAR 14295 @ 142641: CALL 2441 %ELSE 14296 @ 142642: LINE 2441 "regression-compile-tmp/asems412.imp" 14297 @ 142681: GOTO L_0009 14298 @ 142684: LOCATE L_000a 2442 HAZARD(R0) 14299 @ 142687: LINE 2442 "regression-compile-tmp/asems412.imp" 14300 @ 142726: PUSH HAZARD 14301 @ 142729: PUSHI #0x00000001 14302 @ 142734: ASSPAR 14303 @ 142735: CALL 2443 RR(LBR, R0, RHS_BASE) 14304 @ 142736: LINE 2443 "regression-compile-tmp/asems412.imp" 14305 @ 142775: PUSH RR 14306 @ 142778: PUSHI #0x00009300 14307 @ 142783: ASSPAR 14308 @ 142784: PUSHI #0x00000001 14309 @ 142789: ASSPAR 14310 @ 142790: PUSH RHS 14311 @ 142793: SELECT 6 14312 @ 142796: ASSPAR 14313 @ 142797: CALL 2444 CLAIM(RHS_BASE); RR(CR, R0, RHS_BASE) 14314 @ 142798: LINE 2444 "regression-compile-tmp/asems412.imp" 14315 @ 142837: PUSH CLAIM 14316 @ 142840: PUSH RHS 14317 @ 142843: SELECT 6 14318 @ 142846: ASSPAR 14319 @ 142847: CALL 14320 @ 142848: LINE 2444 "regression-compile-tmp/asems412.imp" 14321 @ 142887: PUSH RR 14322 @ 142890: PUSHI #0x00000900 14323 @ 142895: ASSPAR 14324 @ 142896: PUSHI #0x00000001 14325 @ 142901: ASSPAR 14326 @ 142902: PUSH RHS 14327 @ 142905: SELECT 6 14328 @ 142908: ASSPAR 14329 @ 142909: CALL 2445 %FINISH 14330 @ 142910: LINE 2445 "regression-compile-tmp/asems412.imp" 14331 @ 142949: LOCATE L_0009 2446 PERM(T) 14332 @ 142952: LINE 2446 "regression-compile-tmp/asems412.imp" 14333 @ 142991: PUSH PERM 14334 @ 142994: PUSH T 14335 @ 142997: ASSPAR 14336 @ 142998: CALL 2447 %FINISH 14337 @ 142999: LINE 2447 "regression-compile-tmp/asems412.imp" 14338 @ 143038: LOCATE L_0006 2448 DROP(RHS); DROP(LHS) 14339 @ 143041: LINE 2448 "regression-compile-tmp/asems412.imp" 14340 @ 143080: PUSH DROP 14341 @ 143083: PUSH RHS 14342 @ 143086: ASSPAR 14343 @ 143087: CALL 14344 @ 143088: LINE 2448 "regression-compile-tmp/asems412.imp" 14345 @ 143127: PUSH DROP 14346 @ 143130: PUSH LHS 14347 @ 143133: ASSPAR 14348 @ 143134: CALL 2449 %FINISH 14349 @ 143135: LINE 2449 "regression-compile-tmp/asems412.imp" 14350 @ 143174: LOCATE L_0003 2450 %END 14351 @ 143177: LINE 2450 "regression-compile-tmp/asems412.imp" 14352 @ 143216: END _lev0id0_ASSEMBLE_ASSIGN {lev=3 --> 2} 2451 %ROUTINE ARRAY REF 14353 @ 143217: LINE 2451 "regression-compile-tmp/asems412.imp" 14354 @ 143256: DEF ARRAYREF (_lev0id0_ASSEMBLE_ARRAYREF) p1=V_0144 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 14355 @ 143276: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 14356 @ 143277: FINISH ) {lev=3} 2452 %RECORD(STACKFM)%NAME A 14357 @ 143278: LINE 2452 "regression-compile-tmp/asems412.imp" 14358 @ 143317: DEF A p1=V_0145 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2453 %ownRECORD(STACKFM) T=0 {to prevent unassigned problems} 14359 @ 143330: LINE 2453 "regression-compile-tmp/asems412.imp" 14360 @ 143369: PUSHI #0x00000000 14361 @ 143374: DEF T p1=V_0146 a/tf=41 b/format=86 c/ostate=21 type=4 (record) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 14362 @ 143387: INIT 1 2454 %INTEGER R, D 14363 @ 143390: LINE 2454 "regression-compile-tmp/asems412.imp" 14364 @ 143429: DEF R p1=V_0147 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 14365 @ 143442: DEF D p1=V_0148 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 2455 SET BOTH 14366 @ 143455: LINE 2455 "regression-compile-tmp/asems412.imp" 14367 @ 143494: PUSH SETBOTH 14368 @ 143497: CALL 2456 T_BASE = CODE 14369 @ 143498: LINE 2456 "regression-compile-tmp/asems412.imp" 14370 @ 143537: PUSH T 14371 @ 143540: SELECT 6 14372 @ 143543: PUSHI #0x0000002c 14373 @ 143548: ASSVAL 2457 A == LHS 14374 @ 143549: LINE 2457 "regression-compile-tmp/asems412.imp" 14375 @ 143588: PUSH A 14376 @ 143591: PUSH LHS 14377 @ 143594: ASSREF 2458 REDUCE(A) %IF A_FORM > V IN S %AND A_FORM # AV IN S 14378 @ 143595: LINE 2458 "regression-compile-tmp/asems412.imp" 14379 @ 143634: PUSH A 14380 @ 143637: SELECT 9 14381 @ 143640: PUSHI #0x00000003 14382 @ 143645: JUMPIF <= L_0004 14383 @ 143649: PUSH A 14384 @ 143652: SELECT 9 14385 @ 143655: PUSHI #0x00000006 14386 @ 143660: JUMPIF = L_0004 14387 @ 143664: PUSH REDUCE 14388 @ 143667: PUSH A 14389 @ 143670: ASSPAR 14390 @ 143671: CALL 14391 @ 143672: LOCATE L_0004 2459 D = 0 14392 @ 143675: LINE 2459 "regression-compile-tmp/asems412.imp" 14393 @ 143714: PUSH D 14394 @ 143717: PUSHI #0x00000000 14395 @ 143722: ASSVAL 2460 %IF RHS_LOP=ADD %AND CONST(RHS_LINK) %START 14396 @ 143723: LINE 2460 "regression-compile-tmp/asems412.imp" 14397 @ 143762: PUSH RHS 14398 @ 143765: SELECT 7 14399 @ 143768: PUSHI #0x00000003 14400 @ 143773: JUMPIF # L_0004 14401 @ 143777: PUSH CONST 14402 @ 143780: PUSH RHS 14403 @ 143783: SELECT 10 14404 @ 143786: ASSPAR 14405 @ 143787: CALL 14406 @ 143788: bf L_0004 2461 D = RHS_LINK_DISP*A_LENGTH 14407 @ 143791: LINE 2461 "regression-compile-tmp/asems412.imp" 14408 @ 143830: PUSH D 14409 @ 143833: PUSH RHS 14410 @ 143836: SELECT 10 14411 @ 143839: SELECT 1 14412 @ 143842: PUSH A 14413 @ 143845: SELECT 4 14414 @ 143848: MUL 14415 @ 143849: ASSVAL 2462 RHS_LOP = 0 14416 @ 143850: LINE 2462 "regression-compile-tmp/asems412.imp" 14417 @ 143889: PUSH RHS 14418 @ 143892: SELECT 7 14419 @ 143895: PUSHI #0x00000000 14420 @ 143900: ASSVAL 2463 DROP(RHS_LINK) 14421 @ 143901: LINE 2463 "regression-compile-tmp/asems412.imp" 14422 @ 143940: PUSH DROP 14423 @ 143943: PUSH RHS 14424 @ 143946: SELECT 10 14425 @ 143949: ASSPAR 14426 @ 143950: CALL 2464 %FINISH 14427 @ 143951: LINE 2464 "regression-compile-tmp/asems412.imp" 14428 @ 143990: LOCATE L_0004 2465 %IF A_FORM = V IN S %START 14429 @ 143993: LINE 2465 "regression-compile-tmp/asems412.imp" 14430 @ 144032: PUSH A 14431 @ 144035: SELECT 9 14432 @ 144038: PUSHI #0x00000003 14433 @ 144043: JUMPIF # L_0004 2466 %IF RHS_LOP = 0 %AND A_LENGTH <= 256 %START 14434 @ 144047: LINE 2466 "regression-compile-tmp/asems412.imp" 14435 @ 144086: PUSH RHS 14436 @ 144089: SELECT 7 14437 @ 144092: PUSHI #0x00000000 14438 @ 144097: JUMPIF # L_0007 14439 @ 144101: PUSH A 14440 @ 144104: SELECT 4 14441 @ 144107: PUSHI #0x00000100 14442 @ 144112: JUMPIF > L_0007 2467 ADDRESS(RHS) %UNLESS RHS_FORM = CONSTANT 14443 @ 144116: LINE 2467 "regression-compile-tmp/asems412.imp" 14444 @ 144155: PUSH RHS 14445 @ 144158: SELECT 9 14446 @ 144161: PUSHI #0x00000000 14447 @ 144166: JUMPIF = L_000a 14448 @ 144170: PUSH ADDRESS 14449 @ 144173: PUSH RHS 14450 @ 144176: ASSPAR 14451 @ 144177: CALL 14452 @ 144178: LOCATE L_000a 2468 T_BASE = RHS_BASE+A_BASE<<8 14453 @ 144181: LINE 2468 "regression-compile-tmp/asems412.imp" 14454 @ 144220: PUSH T 14455 @ 144223: SELECT 6 14456 @ 144226: PUSH RHS 14457 @ 144229: SELECT 6 14458 @ 144232: PUSH A 14459 @ 144235: SELECT 6 14460 @ 144238: PUSHI #0x00000008 14461 @ 144243: LSH 14462 @ 144244: ADD 14463 @ 144245: ASSVAL 2469 T_DISP = RHS_DISP 14464 @ 144246: LINE 2469 "regression-compile-tmp/asems412.imp" 14465 @ 144285: PUSH T 14466 @ 144288: SELECT 1 14467 @ 144291: PUSH RHS 14468 @ 144294: SELECT 1 14469 @ 144297: ASSVAL 2470 T_TYPE = A_LENGTH 14470 @ 144298: LINE 2470 "regression-compile-tmp/asems412.imp" 14471 @ 144337: PUSH T 14472 @ 144340: SELECT 8 14473 @ 144343: PUSH A 14474 @ 144346: SELECT 4 14475 @ 144349: ASSVAL 2471 T_FORM = RHS_FORM ! 128 14476 @ 144350: LINE 2471 "regression-compile-tmp/asems412.imp" 14477 @ 144389: PUSH T 14478 @ 144392: SELECT 9 14479 @ 144395: PUSH RHS 14480 @ 144398: SELECT 9 14481 @ 144401: PUSHI #0x00000080 14482 @ 144406: OR 14483 @ 144407: ASSVAL 2472 R = FIND USE(T_TYPE, T_FORM, T_BASE, T_DISP) 14484 @ 144408: LINE 2472 "regression-compile-tmp/asems412.imp" 14485 @ 144447: PUSH R 14486 @ 144450: PUSH FINDUSE 14487 @ 144453: PUSH T 14488 @ 144456: SELECT 8 14489 @ 144459: ASSPAR 14490 @ 144460: PUSH T 14491 @ 144463: SELECT 9 14492 @ 144466: ASSPAR 14493 @ 144467: PUSH T 14494 @ 144470: SELECT 6 14495 @ 144473: ASSPAR 14496 @ 144474: PUSH T 14497 @ 144477: SELECT 1 14498 @ 144480: ASSPAR 14499 @ 144481: CALL 14500 @ 144482: ASSVAL 2473 %IF R # 0 %START 14501 @ 144483: LINE 2473 "regression-compile-tmp/asems412.imp" 14502 @ 144522: PUSH R 14503 @ 144525: PUSHI #0x00000000 14504 @ 144530: JUMPIF = L_000a 2474 STP = STP-1 14505 @ 144534: LINE 2474 "regression-compile-tmp/asems412.imp" 14506 @ 144573: PUSH STP 14507 @ 144576: PUSH STP 14508 @ 144579: PUSHI #0x00000001 14509 @ 144584: SUB 14510 @ 144585: ASSVAL 2475 A_BASE = R; A_DISP = A_DISP+D; A_FORM = V IN S 14511 @ 144586: LINE 2475 "regression-compile-tmp/asems412.imp" 14512 @ 144625: PUSH A 14513 @ 144628: SELECT 6 14514 @ 144631: PUSH R 14515 @ 144634: ASSVAL 14516 @ 144635: LINE 2475 "regression-compile-tmp/asems412.imp" 14517 @ 144674: PUSH A 14518 @ 144677: SELECT 1 14519 @ 144680: PUSH A 14520 @ 144683: SELECT 1 14521 @ 144686: PUSH D 14522 @ 144689: ADD 14523 @ 144690: ASSVAL 14524 @ 144691: LINE 2475 "regression-compile-tmp/asems412.imp" 14525 @ 144730: PUSH A 14526 @ 144733: SELECT 9 14527 @ 144736: PUSHI #0x00000003 14528 @ 144741: ASSVAL 2476 DROP(RHS) 14529 @ 144742: LINE 2476 "regression-compile-tmp/asems412.imp" 14530 @ 144781: PUSH DROP 14531 @ 144784: PUSH RHS 14532 @ 144787: ASSPAR 14533 @ 144788: CALL 2477 %RETURN 14534 @ 144789: LINE 2477 "regression-compile-tmp/asems412.imp" 14535 @ 144828: RETURN 2478 %FINISH 14536 @ 144829: LINE 2478 "regression-compile-tmp/asems412.imp" 14537 @ 144868: LOCATE L_000a 2479 %FINISH 14538 @ 144871: LINE 2479 "regression-compile-tmp/asems412.imp" 14539 @ 144910: LOCATE L_0007 2480 %FINISH 14540 @ 144913: LINE 2480 "regression-compile-tmp/asems412.imp" 14541 @ 144952: LOCATE L_0004 2481 CSTACK(A_LENGTH) 14542 @ 144955: LINE 2481 "regression-compile-tmp/asems412.imp" 14543 @ 144994: PUSH CSTACK 14544 @ 144997: PUSH A 14545 @ 145000: SELECT 4 14546 @ 145003: ASSPAR 14547 @ 145004: CALL 2482 OPERATE(MUL); LHS == STACKED(STP)_V 14548 @ 145005: LINE 2482 "regression-compile-tmp/asems412.imp" 14549 @ 145044: PUSH OPERATE 14550 @ 145047: PUSHI #0x00000006 14551 @ 145052: ASSPAR 14552 @ 145053: CALL 14553 @ 145054: LINE 2482 "regression-compile-tmp/asems412.imp" 14554 @ 145093: PUSH LHS 14555 @ 145096: PUSH STACKED 14556 @ 145099: PUSH STP 14557 @ 145102: ACCESS 14558 @ 145103: SELECT 1 14559 @ 145106: ASSREF 2483 SSET(A_BASE, A_DISP, V IN S, 0) 14560 @ 145107: LINE 2483 "regression-compile-tmp/asems412.imp" 14561 @ 145146: PUSH SSET 14562 @ 145149: PUSH A 14563 @ 145152: SELECT 6 14564 @ 145155: ASSPAR 14565 @ 145156: PUSH A 14566 @ 145159: SELECT 1 14567 @ 145162: ASSPAR 14568 @ 145163: PUSHI #0x00000003 14569 @ 145168: ASSPAR 14570 @ 145169: PUSHI #0x00000000 14571 @ 145174: ASSPAR 14572 @ 145175: CALL 2484 %IF A_FORM = V IN S %START;! ARRAY 14573 @ 145176: LINE 2484 "regression-compile-tmp/asems412.imp" 14574 @ 145215: PUSH A 14575 @ 145218: SELECT 9 14576 @ 145221: PUSHI #0x00000003 14577 @ 145226: JUMPIF # L_0004 2485 D = D+RHS_DISP; RHS_DISP = 0 14578 @ 145230: LINE 2485 "regression-compile-tmp/asems412.imp" 14579 @ 145269: PUSH D 14580 @ 145272: PUSH D 14581 @ 145275: PUSH RHS 14582 @ 145278: SELECT 1 14583 @ 145281: ADD 14584 @ 145282: ASSVAL 14585 @ 145283: LINE 2485 "regression-compile-tmp/asems412.imp" 14586 @ 145322: PUSH RHS 14587 @ 145325: SELECT 1 14588 @ 145328: PUSHI #0x00000000 14589 @ 145333: ASSVAL 2486 RHS_FORM = V IN R 14590 @ 145334: LINE 2486 "regression-compile-tmp/asems412.imp" 14591 @ 145373: PUSH RHS 14592 @ 145376: SELECT 9 14593 @ 145379: PUSHI #0x00000001 14594 @ 145384: ASSVAL 2487 %FINISH 14595 @ 145385: LINE 2487 "regression-compile-tmp/asems412.imp" 14596 @ 145424: LOCATE L_0004 2488 %IF CONST(LHS) %START 14597 @ 145427: LINE 2488 "regression-compile-tmp/asems412.imp" 14598 @ 145466: PUSH CONST 14599 @ 145469: PUSH LHS 14600 @ 145472: ASSPAR 14601 @ 145473: CALL 14602 @ 145474: bf L_0004 2489 LOAD(RHS, ANY0) %IF RHS_FORM = V IN S 14603 @ 145477: LINE 2489 "regression-compile-tmp/asems412.imp" 14604 @ 145516: PUSH RHS 14605 @ 145519: SELECT 9 14606 @ 145522: PUSHI #0x00000003 14607 @ 145527: JUMPIF # L_0007 14608 @ 145531: PUSH LOAD 14609 @ 145534: PUSH RHS 14610 @ 145537: ASSPAR 14611 @ 145538: PUSHI #0x0000002e 14612 @ 145543: ASSPAR 14613 @ 145544: CALL 14614 @ 145545: LOCATE L_0007 2490 D = D+LHS_DISP; LHS_BASE = RHS_BASE 14615 @ 145548: LINE 2490 "regression-compile-tmp/asems412.imp" 14616 @ 145587: PUSH D 14617 @ 145590: PUSH D 14618 @ 145593: PUSH LHS 14619 @ 145596: SELECT 1 14620 @ 145599: ADD 14621 @ 145600: ASSVAL 14622 @ 145601: LINE 2490 "regression-compile-tmp/asems412.imp" 14623 @ 145640: PUSH LHS 14624 @ 145643: SELECT 6 14625 @ 145646: PUSH RHS 14626 @ 145649: SELECT 6 14627 @ 145652: ASSVAL 2491 STP = STP-1 14628 @ 145653: LINE 2491 "regression-compile-tmp/asems412.imp" 14629 @ 145692: PUSH STP 14630 @ 145695: PUSH STP 14631 @ 145698: PUSHI #0x00000001 14632 @ 145703: SUB 14633 @ 145704: ASSVAL 2492 %ELSE %IF RHS_BASE = 0 %AND RHS_FORM = V IN R 14634 @ 145705: LINE 2492 "regression-compile-tmp/asems412.imp" 14635 @ 145744: GOTO L_0003 14636 @ 145747: LOCATE L_0004 14637 @ 145750: PUSH RHS 14638 @ 145753: SELECT 6 14639 @ 145756: PUSHI #0x00000000 14640 @ 145761: JUMPIF # L_0004 14641 @ 145765: PUSH RHS 14642 @ 145768: SELECT 9 14643 @ 145771: PUSHI #0x00000001 14644 @ 145776: JUMPIF # L_0004 2493 LOAD(LHS, ANY0) 14645 @ 145780: LINE 2493 "regression-compile-tmp/asems412.imp" 14646 @ 145819: PUSH LOAD 14647 @ 145822: PUSH LHS 14648 @ 145825: ASSPAR 14649 @ 145826: PUSHI #0x0000002e 14650 @ 145831: ASSPAR 14651 @ 145832: CALL 2494 STP = STP-1 14652 @ 145833: LINE 2494 "regression-compile-tmp/asems412.imp" 14653 @ 145872: PUSH STP 14654 @ 145875: PUSH STP 14655 @ 145878: PUSHI #0x00000001 14656 @ 145883: SUB 14657 @ 145884: ASSVAL 2495 %ELSE 14658 @ 145885: LINE 2495 "regression-compile-tmp/asems412.imp" 14659 @ 145924: GOTO L_0003 14660 @ 145927: LOCATE L_0004 2496 OPERATE(ADD); LHS == STACKED(STP)_V; RHS == LHS 14661 @ 145930: LINE 2496 "regression-compile-tmp/asems412.imp" 14662 @ 145969: PUSH OPERATE 14663 @ 145972: PUSHI #0x00000003 14664 @ 145977: ASSPAR 14665 @ 145978: CALL 14666 @ 145979: LINE 2496 "regression-compile-tmp/asems412.imp" 14667 @ 146018: PUSH LHS 14668 @ 146021: PUSH STACKED 14669 @ 146024: PUSH STP 14670 @ 146027: ACCESS 14671 @ 146028: SELECT 1 14672 @ 146031: ASSREF 14673 @ 146032: LINE 2496 "regression-compile-tmp/asems412.imp" 14674 @ 146071: PUSH RHS 14675 @ 146074: PUSH LHS 14676 @ 146077: ASSREF 2497 %FINISH 14677 @ 146078: LINE 2497 "regression-compile-tmp/asems412.imp" 14678 @ 146117: LOCATE L_0003 2498 LOAD(LHS, ANY0) %IF LHS_LOP # 0 14679 @ 146120: LINE 2498 "regression-compile-tmp/asems412.imp" 14680 @ 146159: PUSH LHS 14681 @ 146162: SELECT 7 14682 @ 146165: PUSHI #0x00000000 14683 @ 146170: JUMPIF = L_0004 14684 @ 146174: PUSH LOAD 14685 @ 146177: PUSH LHS 14686 @ 146180: ASSPAR 14687 @ 146181: PUSHI #0x0000002e 14688 @ 146186: ASSPAR 14689 @ 146187: CALL 14690 @ 146188: LOCATE L_0004 2499 STP = STP-1 14691 @ 146191: LINE 2499 "regression-compile-tmp/asems412.imp" 14692 @ 146230: PUSH STP 14693 @ 146233: PUSH STP 14694 @ 146236: PUSHI #0x00000001 14695 @ 146241: SUB 14696 @ 146242: ASSVAL 2500 REMEMBER(LHS_BASE, T) %IF LHS_FORM = V IN R 14697 @ 146243: LINE 2500 "regression-compile-tmp/asems412.imp" 14698 @ 146282: PUSH LHS 14699 @ 146285: SELECT 9 14700 @ 146288: PUSHI #0x00000001 14701 @ 146293: JUMPIF # L_0004 14702 @ 146297: PUSH REMEMBER 14703 @ 146300: PUSH LHS 14704 @ 146303: SELECT 6 14705 @ 146306: ASSPAR 14706 @ 146307: PUSH T 14707 @ 146310: ASSPAR 14708 @ 146311: CALL 14709 @ 146312: LOCATE L_0004 2501 A_FORM = V IN S; A_BASE = LHS_BASE; A_DISP = D 14710 @ 146315: LINE 2501 "regression-compile-tmp/asems412.imp" 14711 @ 146354: PUSH A 14712 @ 146357: SELECT 9 14713 @ 146360: PUSHI #0x00000003 14714 @ 146365: ASSVAL 14715 @ 146366: LINE 2501 "regression-compile-tmp/asems412.imp" 14716 @ 146405: PUSH A 14717 @ 146408: SELECT 6 14718 @ 146411: PUSH LHS 14719 @ 146414: SELECT 6 14720 @ 146417: ASSVAL 14721 @ 146418: LINE 2501 "regression-compile-tmp/asems412.imp" 14722 @ 146457: PUSH A 14723 @ 146460: SELECT 1 14724 @ 146463: PUSH D 14725 @ 146466: ASSVAL 2502 %IF D < 0 %START 14726 @ 146467: LINE 2502 "regression-compile-tmp/asems412.imp" 14727 @ 146506: PUSH D 14728 @ 146509: PUSHI #0x00000000 14729 @ 146514: JUMPIF >= L_0004 2503 R = A_TYPE; AMAP(A); LOAD(A, ANY0) 14730 @ 146518: LINE 2503 "regression-compile-tmp/asems412.imp" 14731 @ 146557: PUSH R 14732 @ 146560: PUSH A 14733 @ 146563: SELECT 8 14734 @ 146566: ASSVAL 14735 @ 146567: LINE 2503 "regression-compile-tmp/asems412.imp" 14736 @ 146606: PUSH AMAP 14737 @ 146609: PUSH A 14738 @ 146612: ASSPAR 14739 @ 146613: CALL 14740 @ 146614: LINE 2503 "regression-compile-tmp/asems412.imp" 14741 @ 146653: PUSH LOAD 14742 @ 146656: PUSH A 14743 @ 146659: ASSPAR 14744 @ 146660: PUSHI #0x0000002e 14745 @ 146665: ASSPAR 14746 @ 146666: CALL 2504 A_TYPE = R; A_FORM = V IN S 14747 @ 146667: LINE 2504 "regression-compile-tmp/asems412.imp" 14748 @ 146706: PUSH A 14749 @ 146709: SELECT 8 14750 @ 146712: PUSH R 14751 @ 146715: ASSVAL 14752 @ 146716: LINE 2504 "regression-compile-tmp/asems412.imp" 14753 @ 146755: PUSH A 14754 @ 146758: SELECT 9 14755 @ 146761: PUSHI #0x00000003 14756 @ 146766: ASSVAL 2505 %FINISH 14757 @ 146767: LINE 2505 "regression-compile-tmp/asems412.imp" 14758 @ 146806: LOCATE L_0004 2506 DROP(RHS) %UNLESS RHS == LHS 14759 @ 146809: LINE 2506 "regression-compile-tmp/asems412.imp" 14760 @ 146848: PUSH RHS 14761 @ 146851: PUSH LHS 14762 @ 146854: JUMPIFA = L_0004 14763 @ 146858: PUSH DROP 14764 @ 146861: PUSH RHS 14765 @ 146864: ASSPAR 14766 @ 146865: CALL 14767 @ 146866: LOCATE L_0004 2507 DROP(LHS) 14768 @ 146869: LINE 2507 "regression-compile-tmp/asems412.imp" 14769 @ 146908: PUSH DROP 14770 @ 146911: PUSH LHS 14771 @ 146914: ASSPAR 14772 @ 146915: CALL 2508 %END 14773 @ 146916: LINE 2508 "regression-compile-tmp/asems412.imp" 14774 @ 146955: END _lev0id0_ASSEMBLE_ARRAYREF {lev=3 --> 2} 2509 %ROUTINE CHECKED ARRAY REF 14775 @ 146956: LINE 2509 "regression-compile-tmp/asems412.imp" 14776 @ 146995: DEF CHECKEDARRAYREF (_lev0id0_ASSEMBLE_CHECKEDARRAYREF) p1=V_0145 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 14777 @ 147022: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 14778 @ 147023: FINISH ) {lev=3} 2510 %INTEGER D, FLAG 14779 @ 147024: LINE 2510 "regression-compile-tmp/asems412.imp" 14780 @ 147063: DEF D p1=V_0146 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 14781 @ 147076: DEF FLAG p1=V_0147 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 2511 SET BOTH; STP = STP-2 14782 @ 147092: LINE 2511 "regression-compile-tmp/asems412.imp" 14783 @ 147131: PUSH SETBOTH 14784 @ 147134: CALL 14785 @ 147135: LINE 2511 "regression-compile-tmp/asems412.imp" 14786 @ 147174: PUSH STP 14787 @ 147177: PUSH STP 14788 @ 147180: PUSHI #0x00000002 14789 @ 147185: SUB 14790 @ 147186: ASSVAL 2512 REDUCE(LHS) %IF LHS_FORM > V IN S %AND LHS_FORM # AV IN S 14791 @ 147187: LINE 2512 "regression-compile-tmp/asems412.imp" 14792 @ 147226: PUSH LHS 14793 @ 147229: SELECT 9 14794 @ 147232: PUSHI #0x00000003 14795 @ 147237: JUMPIF <= L_0004 14796 @ 147241: PUSH LHS 14797 @ 147244: SELECT 9 14798 @ 147247: PUSHI #0x00000006 14799 @ 147252: JUMPIF = L_0004 14800 @ 147256: PUSH REDUCE 14801 @ 147259: PUSH LHS 14802 @ 147262: ASSPAR 14803 @ 147263: CALL 14804 @ 147264: LOCATE L_0004 2513 LRD(RHS, R1) 14805 @ 147267: LINE 2513 "regression-compile-tmp/asems412.imp" 14806 @ 147306: PUSH LRD 14807 @ 147309: PUSH RHS 14808 @ 147312: ASSPAR 14809 @ 147313: PUSHI #0x00000002 14810 @ 147318: ASSPAR 14811 @ 147319: CALL 2514 HAZARD(R2); FORGET(R2) 14812 @ 147320: LINE 2514 "regression-compile-tmp/asems412.imp" 14813 @ 147359: PUSH HAZARD 14814 @ 147362: PUSHI #0x00000003 14815 @ 147367: ASSPAR 14816 @ 147368: CALL 14817 @ 147369: LINE 2514 "regression-compile-tmp/asems412.imp" 14818 @ 147408: PUSH FORGET 14819 @ 147411: PUSHI #0x00000003 14820 @ 147416: ASSPAR 14821 @ 147417: CALL 2515 %IF LHS_DV < 0 %START 14822 @ 147418: LINE 2515 "regression-compile-tmp/asems412.imp" 14823 @ 147457: PUSH LHS 14824 @ 147460: SELECT 5 14825 @ 147463: PUSHI #0x00000000 14826 @ 147468: JUMPIF >= L_0004 2516 FLAG = 0; D = 0; RX(LW, R2, LHS_BASE, LHS_DISP+REGLEN) 14827 @ 147472: LINE 2516 "regression-compile-tmp/asems412.imp" 14828 @ 147511: PUSH FLAG 14829 @ 147514: PUSHI #0x00000000 14830 @ 147519: ASSVAL 14831 @ 147520: LINE 2516 "regression-compile-tmp/asems412.imp" 14832 @ 147559: PUSH D 14833 @ 147562: PUSHI #0x00000000 14834 @ 147567: ASSVAL 14835 @ 147568: LINE 2516 "regression-compile-tmp/asems412.imp" 14836 @ 147607: PUSH RX 14837 @ 147610: PUSHI #0x00005800 14838 @ 147615: ASSPAR 14839 @ 147616: PUSHI #0x00000003 14840 @ 147621: ASSPAR 14841 @ 147622: PUSH LHS 14842 @ 147625: SELECT 6 14843 @ 147628: ASSPAR 14844 @ 147629: PUSH LHS 14845 @ 147632: SELECT 1 14846 @ 147635: PUSHI #0x00000004 14847 @ 147640: ADD 14848 @ 147641: ASSPAR 14849 @ 147642: CALL 2517 CLAIM(LHS_BASE) 14850 @ 147643: LINE 2517 "regression-compile-tmp/asems412.imp" 14851 @ 147682: PUSH CLAIM 14852 @ 147685: PUSH LHS 14853 @ 147688: SELECT 6 14854 @ 147691: ASSPAR 14855 @ 147692: CALL 2518 %ELSE 14856 @ 147693: LINE 2518 "regression-compile-tmp/asems412.imp" 14857 @ 147732: GOTO L_0003 14858 @ 147735: LOCATE L_0004 2519 FLAG = 1; D = LHS_DISP; RI2(LHI, R2, GLA, LHS_DV) 14859 @ 147738: LINE 2519 "regression-compile-tmp/asems412.imp" 14860 @ 147777: PUSH FLAG 14861 @ 147780: PUSHI #0x00000001 14862 @ 147785: ASSVAL 14863 @ 147786: LINE 2519 "regression-compile-tmp/asems412.imp" 14864 @ 147825: PUSH D 14865 @ 147828: PUSH LHS 14866 @ 147831: SELECT 1 14867 @ 147834: ASSVAL 14868 @ 147835: LINE 2519 "regression-compile-tmp/asems412.imp" 14869 @ 147874: PUSH RI2 14870 @ 147877: PUSHI #0x0000c800 14871 @ 147882: ASSPAR 14872 @ 147883: PUSHI #0x00000003 14873 @ 147888: ASSPAR 14874 @ 147889: PUSHI #0x0000002a 14875 @ 147894: ASSPAR 14876 @ 147895: PUSH LHS 14877 @ 147898: SELECT 5 14878 @ 147901: ASSPAR 14879 @ 147902: CALL 2520 %FINISH 14880 @ 147903: LINE 2520 "regression-compile-tmp/asems412.imp" 14881 @ 147942: LOCATE L_0003 2521 PERM(A REF); FORGET(R1) 14882 @ 147945: LINE 2521 "regression-compile-tmp/asems412.imp" 14883 @ 147984: PUSH PERM 14884 @ 147987: PUSHI #0x00000314 14885 @ 147992: ASSPAR 14886 @ 147993: CALL 14887 @ 147994: LINE 2521 "regression-compile-tmp/asems412.imp" 14888 @ 148033: PUSH FORGET 14889 @ 148036: PUSHI #0x00000002 14890 @ 148041: ASSPAR 14891 @ 148042: CALL 2522 %IF FLAG # 0 %START 14892 @ 148043: LINE 2522 "regression-compile-tmp/asems412.imp" 14893 @ 148082: PUSH FLAG 14894 @ 148085: PUSHI #0x00000000 14895 @ 148090: JUMPIF = L_0004 2523 RR(AR, R1, LHS_BASE) 14896 @ 148094: LINE 2523 "regression-compile-tmp/asems412.imp" 14897 @ 148133: PUSH RR 14898 @ 148136: PUSHI #0x00000a00 14899 @ 148141: ASSPAR 14900 @ 148142: PUSHI #0x00000002 14901 @ 148147: ASSPAR 14902 @ 148148: PUSH LHS 14903 @ 148151: SELECT 6 14904 @ 148154: ASSPAR 14905 @ 148155: CALL 2524 %ELSE 14906 @ 148156: LINE 2524 "regression-compile-tmp/asems412.imp" 14907 @ 148195: GOTO L_0003 14908 @ 148198: LOCATE L_0004 2525 RX(AW, R1, LHS_BASE, LHS_DISP) 14909 @ 148201: LINE 2525 "regression-compile-tmp/asems412.imp" 14910 @ 148240: PUSH RX 14911 @ 148243: PUSHI #0x00005a00 14912 @ 148248: ASSPAR 14913 @ 148249: PUSHI #0x00000002 14914 @ 148254: ASSPAR 14915 @ 148255: PUSH LHS 14916 @ 148258: SELECT 6 14917 @ 148261: ASSPAR 14918 @ 148262: PUSH LHS 14919 @ 148265: SELECT 1 14920 @ 148268: ASSPAR 14921 @ 148269: CALL 2526 %FINISH 14922 @ 148270: LINE 2526 "regression-compile-tmp/asems412.imp" 14923 @ 148309: LOCATE L_0003 2527 LHS_BASE = R1; LHS_DISP = D; LHS_FORM = V IN S; LHS_DV = 0 14924 @ 148312: LINE 2527 "regression-compile-tmp/asems412.imp" 14925 @ 148351: PUSH LHS 14926 @ 148354: SELECT 6 14927 @ 148357: PUSHI #0x00000002 14928 @ 148362: ASSVAL 14929 @ 148363: LINE 2527 "regression-compile-tmp/asems412.imp" 14930 @ 148402: PUSH LHS 14931 @ 148405: SELECT 1 14932 @ 148408: PUSH D 14933 @ 148411: ASSVAL 14934 @ 148412: LINE 2527 "regression-compile-tmp/asems412.imp" 14935 @ 148451: PUSH LHS 14936 @ 148454: SELECT 9 14937 @ 148457: PUSHI #0x00000003 14938 @ 148462: ASSVAL 14939 @ 148463: LINE 2527 "regression-compile-tmp/asems412.imp" 14940 @ 148502: PUSH LHS 14941 @ 148505: SELECT 5 14942 @ 148508: PUSHI #0x00000000 14943 @ 148513: ASSVAL 2528 SSTACK(LHS) 14944 @ 148514: LINE 2528 "regression-compile-tmp/asems412.imp" 14945 @ 148553: PUSH SSTACK 14946 @ 148556: PUSH LHS 14947 @ 148559: ASSPAR 14948 @ 148560: CALL 2529 DROP(LHS) 14949 @ 148561: LINE 2529 "regression-compile-tmp/asems412.imp" 14950 @ 148600: PUSH DROP 14951 @ 148603: PUSH LHS 14952 @ 148606: ASSPAR 14953 @ 148607: CALL 2530 %END 14954 @ 148608: LINE 2530 "regression-compile-tmp/asems412.imp" 14955 @ 148647: END _lev0id0_ASSEMBLE_CHECKEDARRAYREF {lev=3 --> 2} 2531 %ROUTINE KNOW(%INTEGER REG, VALUE, TYPE) 14956 @ 148648: LINE 2531 "regression-compile-tmp/asems412.imp" 14957 @ 148687: DEF KNOW (_lev0id0_ASSEMBLE_KNOW) p1=V_0146 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 14958 @ 148703: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 14959 @ 148704: DEF REG p1=V_0147 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 14960 @ 148719: DEF VALUE p1=V_0148 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 14961 @ 148736: DEF TYPE p1=V_0149 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 14962 @ 148752: FINISH ) {lev=3} 2532 KNOWN_BASE = REG+STORE; KNOWN_DISP = VALUE 14963 @ 148753: LINE 2532 "regression-compile-tmp/asems412.imp" 14964 @ 148792: PUSH KNOWN 14965 @ 148795: SELECT 3 14966 @ 148798: PUSH REG 14967 @ 148801: PUSHI #0x00000014 14968 @ 148806: ADD 14969 @ 148807: ASSVAL 14970 @ 148808: LINE 2532 "regression-compile-tmp/asems412.imp" 14971 @ 148847: PUSH KNOWN 14972 @ 148850: SELECT 1 14973 @ 148853: PUSH VALUE 14974 @ 148856: ASSVAL 2533 KNOWN_TYPE = TYPE 14975 @ 148857: LINE 2533 "regression-compile-tmp/asems412.imp" 14976 @ 148896: PUSH KNOWN 14977 @ 148899: SELECT 4 14978 @ 148902: PUSH TYPE 14979 @ 148905: ASSVAL 2534 KNOWN_CA = 0 %IF USE(KNOWN_BASE)_CA < LIMEN %C 2535 %OR USE(KNOWN_BASE)_CA = USE(KNOWN_BASE-STORE)_CA 14980 @ 148906: LINE 2534 "regression-compile-tmp/asems412.imp" 14981 @ 148945: PUSH USE 14982 @ 148948: PUSH KNOWN 14983 @ 148951: SELECT 3 14984 @ 148954: ACCESS 14985 @ 148955: SELECT 2 14986 @ 148958: PUSH LIMEN 14987 @ 148961: JUMPIF < L_0005 14988 @ 148965: PUSH USE 14989 @ 148968: PUSH KNOWN 14990 @ 148971: SELECT 3 14991 @ 148974: ACCESS 14992 @ 148975: SELECT 2 14993 @ 148978: PUSH USE 14994 @ 148981: PUSH KNOWN 14995 @ 148984: SELECT 3 14996 @ 148987: PUSHI #0x00000014 14997 @ 148992: SUB 14998 @ 148993: ACCESS 14999 @ 148994: SELECT 2 15000 @ 148997: JUMPIF # L_0004 15001 @ 149001: LOCATE L_0005 15002 @ 149004: PUSH KNOWN 15003 @ 149007: SELECT 2 15004 @ 149010: PUSHI #0x00000000 15005 @ 149015: ASSVAL 15006 @ 149016: LOCATE L_0004 2536 %END 15007 @ 149019: LINE 2536 "regression-compile-tmp/asems412.imp" 15008 @ 149058: END _lev0id0_ASSEMBLE_KNOW {lev=3 --> 2} 2537 %ROUTINE TEST ZERO(%RECORD(STACKFM)%NAME V) 15009 @ 149059: LINE 2537 "regression-compile-tmp/asems412.imp" 15010 @ 149098: DEF TESTZERO (_lev0id0_ASSEMBLE_TESTZERO) p1=V_0147 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 15011 @ 149118: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 15012 @ 149119: DEF V p1=V_0148 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15013 @ 149132: FINISH ) {lev=3} 2538 %RECORD(STACKFM)%NAME W 15014 @ 149133: LINE 2538 "regression-compile-tmp/asems412.imp" 15015 @ 149172: DEF W p1=V_0149 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2539 %INTEGER OP, COP, CR, CT, NOT 15016 @ 149185: LINE 2539 "regression-compile-tmp/asems412.imp" 15017 @ 149224: DEF OP p1=V_014a 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 15018 @ 149238: DEF COP p1=V_014b 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 15019 @ 149253: DEF CR p1=V_014c 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 @ 149267: DEF CT p1=V_014d 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 @ 149281: DEF NOT p1=V_014e 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 2540 NOT = NEXTSYMBOL-'#' 15022 @ 149296: LINE 2540 "regression-compile-tmp/asems412.imp" 15023 @ 149335: PUSH NOT 15024 @ 149338: PUSH NEXTSYMBOL 15025 @ 149341: CALL 15026 @ 149342: PUSHI #0x00000023 15027 @ 149347: SUB 15028 @ 149348: ASSVAL 2541 OP = V_LOP 15029 @ 149349: LINE 2541 "regression-compile-tmp/asems412.imp" 15030 @ 149388: PUSH OP 15031 @ 149391: PUSH V 15032 @ 149394: SELECT 7 15033 @ 149397: ASSVAL 2542 COP = LR ; CR = ANY; CT = INTEGER 15034 @ 149398: LINE 2542 "regression-compile-tmp/asems412.imp" 15035 @ 149437: PUSH COP 15036 @ 149440: PUSHI #0x00000800 15037 @ 149445: ASSVAL 15038 @ 149446: LINE 2542 "regression-compile-tmp/asems412.imp" 15039 @ 149485: PUSH CR 15040 @ 149488: PUSHI #0x0000002d 15041 @ 149493: ASSVAL 15042 @ 149494: LINE 2542 "regression-compile-tmp/asems412.imp" 15043 @ 149533: PUSH CT 15044 @ 149536: PUSHI #0x00000001 15045 @ 149541: ASSVAL 2543 %IF FLOATING(V) %START 15046 @ 149542: LINE 2543 "regression-compile-tmp/asems412.imp" 15047 @ 149581: PUSH FLOATING 15048 @ 149584: PUSH V 15049 @ 149587: ASSPAR 15050 @ 149588: CALL 15051 @ 149589: bf L_0004 2544 COP = LER; CR = ANYF; CT = REALS 15052 @ 149592: LINE 2544 "regression-compile-tmp/asems412.imp" 15053 @ 149631: PUSH COP 15054 @ 149634: PUSHI #0x00002800 15055 @ 149639: ASSVAL 15056 @ 149640: LINE 2544 "regression-compile-tmp/asems412.imp" 15057 @ 149679: PUSH CR 15058 @ 149682: PUSHI #0x0000002f 15059 @ 149687: ASSVAL 15060 @ 149688: LINE 2544 "regression-compile-tmp/asems412.imp" 15061 @ 149727: PUSH CT 15062 @ 149730: PUSHI #0x00000006 15063 @ 149735: ASSVAL 2545 %ELSE %IF OP # 0 %AND SYM = '?' 15064 @ 149736: LINE 2545 "regression-compile-tmp/asems412.imp" 15065 @ 149775: GOTO L_0003 15066 @ 149778: LOCATE L_0004 15067 @ 149781: PUSH OP 15068 @ 149784: PUSHI #0x00000000 15069 @ 149789: JUMPIF = L_0004 15070 @ 149793: PUSH SYM 15071 @ 149796: PUSHI #0x0000003f 15072 @ 149801: JUMPIF # L_0004 2546 W == V_LINK; V_LOP = 0 15073 @ 149805: LINE 2546 "regression-compile-tmp/asems412.imp" 15074 @ 149844: PUSH W 15075 @ 149847: PUSH V 15076 @ 149850: SELECT 10 15077 @ 149853: ASSREF 15078 @ 149854: LINE 2546 "regression-compile-tmp/asems412.imp" 15079 @ 149893: PUSH V 15080 @ 149896: SELECT 7 15081 @ 149899: PUSHI #0x00000000 15082 @ 149904: ASSVAL 2547 %IF OP = AND %AND (W_FORM = CONSTANT %OR W_FORM = V IN R) %C 2548 %START 15083 @ 149905: LINE 2547 "regression-compile-tmp/asems412.imp" 15084 @ 149944: PUSH OP 15085 @ 149947: PUSHI #0x00000008 15086 @ 149952: JUMPIF # L_0007 15087 @ 149956: PUSH W 15088 @ 149959: SELECT 9 15089 @ 149962: PUSHI #0x00000000 15090 @ 149967: JUMPIF = L_0008 15091 @ 149971: PUSH W 15092 @ 149974: SELECT 9 15093 @ 149977: PUSHI #0x00000001 15094 @ 149982: JUMPIF # L_0007 15095 @ 149986: LOCATE L_0008 2549 %IF V_FORM # V IN R # W_FORM %AND V_TYPE = INTEGER %START 15096 @ 149989: LINE 2549 "regression-compile-tmp/asems412.imp" 15097 @ 150028: PUSH V 15098 @ 150031: SELECT 9 15099 @ 150034: PUSHI #0x00000001 15100 @ 150039: JUMPIFD = L_000a 15101 @ 150043: PUSH W 15102 @ 150046: SELECT 9 15103 @ 150049: JUMPIF = L_000a 15104 @ 150053: PUSH V 15105 @ 150056: SELECT 8 15106 @ 150059: PUSHI #0x00000001 15107 @ 150064: JUMPIF # L_000a 2550 %IF W_DISP&X'FFFF' = 0 %OR W_DISP>>16 = 0 %START 15108 @ 150068: LINE 2550 "regression-compile-tmp/asems412.imp" 15109 @ 150107: PUSH W 15110 @ 150110: SELECT 1 15111 @ 150113: PUSHI #0x0000ffff 15112 @ 150118: AND 15113 @ 150119: PUSHI #0x00000000 15114 @ 150124: JUMPIF = L_000e 15115 @ 150128: PUSH W 15116 @ 150131: SELECT 1 15117 @ 150134: PUSHI #0x00000010 15118 @ 150139: RSH 15119 @ 150140: PUSHI #0x00000000 15120 @ 150145: JUMPIF # L_000d 15121 @ 150149: LOCATE L_000e 2551 ADDRESS(V) 15122 @ 150152: LINE 2551 "regression-compile-tmp/asems412.imp" 15123 @ 150191: PUSH ADDRESS 15124 @ 150194: PUSH V 15125 @ 150197: ASSPAR 15126 @ 150198: CALL 2552 V_TYPE = UNSIGNED HALFWORD 15127 @ 150199: LINE 2552 "regression-compile-tmp/asems412.imp" 15128 @ 150238: PUSH V 15129 @ 150241: SELECT 8 15130 @ 150244: PUSHI #0x000000ff 15131 @ 150249: ASSVAL 2553 W_TYPE = UNSIGNED HALFWORD 15132 @ 150250: LINE 2553 "regression-compile-tmp/asems412.imp" 15133 @ 150289: PUSH W 15134 @ 150292: SELECT 8 15135 @ 150295: PUSHI #0x000000ff 15136 @ 150300: ASSVAL 2554 %IF W_DISP&X'FFFF' = 0 %START 15137 @ 150301: LINE 2554 "regression-compile-tmp/asems412.imp" 15138 @ 150340: PUSH W 15139 @ 150343: SELECT 1 15140 @ 150346: PUSHI #0x0000ffff 15141 @ 150351: AND 15142 @ 150352: PUSHI #0x00000000 15143 @ 150357: JUMPIF # L_0010 2555 W_DISP = W_DISP>>16 15144 @ 150361: LINE 2555 "regression-compile-tmp/asems412.imp" 15145 @ 150400: PUSH W 15146 @ 150403: SELECT 1 15147 @ 150406: PUSH W 15148 @ 150409: SELECT 1 15149 @ 150412: PUSHI #0x00000010 15150 @ 150417: RSH 15151 @ 150418: ASSVAL 2556 %ELSE 15152 @ 150419: LINE 2556 "regression-compile-tmp/asems412.imp" 15153 @ 150458: GOTO L_000f 15154 @ 150461: LOCATE L_0010 2557 V_DISP = V_DISP+2 15155 @ 150464: LINE 2557 "regression-compile-tmp/asems412.imp" 15156 @ 150503: PUSH V 15157 @ 150506: SELECT 1 15158 @ 150509: PUSH V 15159 @ 150512: SELECT 1 15160 @ 150515: PUSHI #0x00000002 15161 @ 150520: ADD 15162 @ 150521: ASSVAL 2558 %FINISH 15163 @ 150522: LINE 2558 "regression-compile-tmp/asems412.imp" 15164 @ 150561: LOCATE L_000f 2559 %FINISH 15165 @ 150564: LINE 2559 "regression-compile-tmp/asems412.imp" 15166 @ 150603: LOCATE L_000d 2560 %FINISH 15167 @ 150606: LINE 2560 "regression-compile-tmp/asems412.imp" 15168 @ 150645: LOCATE L_000a 2561 LOAD(V, ANY) 15169 @ 150648: LINE 2561 "regression-compile-tmp/asems412.imp" 15170 @ 150687: PUSH LOAD 15171 @ 150690: PUSH V 15172 @ 150693: ASSPAR 15173 @ 150694: PUSHI #0x0000002d 15174 @ 150699: ASSPAR 15175 @ 150700: CALL 2562 W_DISP = 0 %AND W_TYPE = 0 %IF W_FORM = V IN R 15176 @ 150701: LINE 2562 "regression-compile-tmp/asems412.imp" 15177 @ 150740: PUSH W 15178 @ 150743: SELECT 9 15179 @ 150746: PUSHI #0x00000001 15180 @ 150751: JUMPIF # L_000a 15181 @ 150755: PUSH W 15182 @ 150758: SELECT 1 15183 @ 150761: PUSHI #0x00000000 15184 @ 150766: ASSVAL 15185 @ 150767: PUSH W 15186 @ 150770: SELECT 8 15187 @ 150773: PUSHI #0x00000000 15188 @ 150778: ASSVAL 15189 @ 150779: LOCATE L_000a 2563 %IF -X'8000' <= W_DISP <= X'7FFF' %C 2564 %OR W_TYPE = UNSIGNED HALFWORD %START 15190 @ 150782: LINE 2563 "regression-compile-tmp/asems412.imp" 15191 @ 150821: PUSHI #0x00008000 15192 @ 150826: NEGATE 15193 @ 150827: PUSH W 15194 @ 150830: SELECT 1 15195 @ 150833: JUMPIFD > L_000c 15196 @ 150837: PUSHI #0x00007fff 15197 @ 150842: JUMPIF <= L_000b 15198 @ 150846: LOCATE L_000c 15199 @ 150849: PUSH W 15200 @ 150852: SELECT 8 15201 @ 150855: PUSHI #0x000000ff 15202 @ 150860: JUMPIF # L_000a 15203 @ 150864: LOCATE L_000b 2565 RI2(THI,V_BASE,W_BASE,W_DISP) 15204 @ 150867: LINE 2565 "regression-compile-tmp/asems412.imp" 15205 @ 150906: PUSH RI2 15206 @ 150909: PUSHI #0x0000c300 15207 @ 150914: ASSPAR 15208 @ 150915: PUSH V 15209 @ 150918: SELECT 6 15210 @ 150921: ASSPAR 15211 @ 150922: PUSH W 15212 @ 150925: SELECT 6 15213 @ 150928: ASSPAR 15214 @ 150929: PUSH W 15215 @ 150932: SELECT 1 15216 @ 150935: ASSPAR 15217 @ 150936: CALL 2566 %ELSE 15218 @ 150937: LINE 2566 "regression-compile-tmp/asems412.imp" 15219 @ 150976: GOTO L_0009 15220 @ 150979: LOCATE L_000a 2567 RI3(TI,V_BASE,W_BASE,W_DISP) 15221 @ 150982: LINE 2567 "regression-compile-tmp/asems412.imp" 15222 @ 151021: PUSH RI3 15223 @ 151024: PUSHI #0x0000f300 15224 @ 151029: ASSPAR 15225 @ 151030: PUSH V 15226 @ 151033: SELECT 6 15227 @ 151036: ASSPAR 15228 @ 151037: PUSH W 15229 @ 151040: SELECT 6 15230 @ 151043: ASSPAR 15231 @ 151044: PUSH W 15232 @ 151047: SELECT 1 15233 @ 151050: ASSPAR 15234 @ 151051: CALL 2568 %FINISH 15235 @ 151052: LINE 2568 "regression-compile-tmp/asems412.imp" 15236 @ 151091: LOCATE L_0009 2569 RELEASE(V_BASE); DROP(W) 15237 @ 151094: LINE 2569 "regression-compile-tmp/asems412.imp" 15238 @ 151133: PUSH RELEASE 15239 @ 151136: PUSH V 15240 @ 151139: SELECT 6 15241 @ 151142: ASSPAR 15242 @ 151143: CALL 15243 @ 151144: LINE 2569 "regression-compile-tmp/asems412.imp" 15244 @ 151183: PUSH DROP 15245 @ 151186: PUSH W 15246 @ 151189: ASSPAR 15247 @ 151190: CALL 2570 %RETURN 15248 @ 151191: LINE 2570 "regression-compile-tmp/asems412.imp" 15249 @ 151230: RETURN 2571 %FINISH 15250 @ 151231: LINE 2571 "regression-compile-tmp/asems412.imp" 15251 @ 151270: LOCATE L_0007 2572 %IF W_FORM = CONSTANT %AND OP = ADD %C 2573 %AND (W_DISP < -15 %OR W_DISP > 15) %START 15252 @ 151273: LINE 2572 "regression-compile-tmp/asems412.imp" 15253 @ 151312: PUSH W 15254 @ 151315: SELECT 9 15255 @ 151318: PUSHI #0x00000000 15256 @ 151323: JUMPIF # L_0007 15257 @ 151327: PUSH OP 15258 @ 151330: PUSHI #0x00000003 15259 @ 151335: JUMPIF # L_0007 15260 @ 151339: PUSH W 15261 @ 151342: SELECT 1 15262 @ 151345: PUSHI #0x0000000f 15263 @ 151350: NEGATE 15264 @ 151351: JUMPIF < L_0008 15265 @ 151355: PUSH W 15266 @ 151358: SELECT 1 15267 @ 151361: PUSHI #0x0000000f 15268 @ 151366: JUMPIF <= L_0007 15269 @ 151370: LOCATE L_0008 2574 W_DISP = -W_DISP 15270 @ 151373: LINE 2574 "regression-compile-tmp/asems412.imp" 15271 @ 151412: PUSH W 15272 @ 151415: SELECT 1 15273 @ 151418: PUSH W 15274 @ 151421: SELECT 1 15275 @ 151424: NEGATE 15276 @ 151425: ASSVAL 2575 COMPARE(V, W); DROP(W) 15277 @ 151426: LINE 2575 "regression-compile-tmp/asems412.imp" 15278 @ 151465: PUSH COMPARE 15279 @ 151468: PUSH V 15280 @ 151471: ASSPAR 15281 @ 151472: PUSH W 15282 @ 151475: ASSPAR 15283 @ 151476: CALL 15284 @ 151477: LINE 2575 "regression-compile-tmp/asems412.imp" 15285 @ 151516: PUSH DROP 15286 @ 151519: PUSH W 15287 @ 151522: ASSPAR 15288 @ 151523: CALL 2576 %RETURN 15289 @ 151524: LINE 2576 "regression-compile-tmp/asems412.imp" 15290 @ 151563: RETURN 2577 %FINISH 15291 @ 151564: LINE 2577 "regression-compile-tmp/asems412.imp" 15292 @ 151603: LOCATE L_0007 2578 V_LOP = OP 15293 @ 151606: LINE 2578 "regression-compile-tmp/asems412.imp" 15294 @ 151645: PUSH V 15295 @ 151648: SELECT 7 15296 @ 151651: PUSH OP 15297 @ 151654: ASSVAL 2579 %FINISH 15298 @ 151655: LINE 2579 "regression-compile-tmp/asems412.imp" 15299 @ 151694: LOCATE L_0004 15300 @ 151697: LOCATE L_0003 2580 %IF OP = 0 %AND CCCA = CA %AND LIMEN # CA %START 15301 @ 151700: LINE 2580 "regression-compile-tmp/asems412.imp" 15302 @ 151739: PUSH OP 15303 @ 151742: PUSHI #0x00000000 15304 @ 151747: JUMPIF # L_0004 15305 @ 151751: PUSH CCCA 15306 @ 151754: PUSH CA 15307 @ 151757: JUMPIF # L_0004 15308 @ 151761: PUSH LIMEN 15309 @ 151764: PUSH CA 15310 @ 151767: JUMPIF = L_0004 2581 %IF CCREG < 0 %AND SAME(CCV, V) %START 15311 @ 151771: LINE 2581 "regression-compile-tmp/asems412.imp" 15312 @ 151810: PUSH CCREG 15313 @ 151813: PUSHI #0x00000000 15314 @ 151818: JUMPIF >= L_0007 15315 @ 151822: PUSH SAME 15316 @ 151825: PUSH CCV 15317 @ 151828: ASSPAR 15318 @ 151829: PUSH V 15319 @ 151832: ASSPAR 15320 @ 151833: CALL 15321 @ 151834: bf L_0007 2582 RELEASE(V_BASE); %RETURN 15322 @ 151837: LINE 2582 "regression-compile-tmp/asems412.imp" 15323 @ 151876: PUSH RELEASE 15324 @ 151879: PUSH V 15325 @ 151882: SELECT 6 15326 @ 151885: ASSPAR 15327 @ 151886: CALL 15328 @ 151887: LINE 2582 "regression-compile-tmp/asems412.imp" 15329 @ 151926: RETURN 2583 %FINISH 15330 @ 151927: LINE 2583 "regression-compile-tmp/asems412.imp" 15331 @ 151966: LOCATE L_0007 2584 OPTIMISE(V) 15332 @ 151969: LINE 2584 "regression-compile-tmp/asems412.imp" 15333 @ 152008: PUSH OPTIMISE 15334 @ 152011: PUSH V 15335 @ 152014: ASSPAR 15336 @ 152015: CALL 2585 %IF V_FORM = V IN R %AND V_BASE = CCREG %START 15337 @ 152016: LINE 2585 "regression-compile-tmp/asems412.imp" 15338 @ 152055: PUSH V 15339 @ 152058: SELECT 9 15340 @ 152061: PUSHI #0x00000001 15341 @ 152066: JUMPIF # L_0007 15342 @ 152070: PUSH V 15343 @ 152073: SELECT 6 15344 @ 152076: PUSH CCREG 15345 @ 152079: JUMPIF # L_0007 2586 RELEASE(V_BASE) 15346 @ 152083: LINE 2586 "regression-compile-tmp/asems412.imp" 15347 @ 152122: PUSH RELEASE 15348 @ 152125: PUSH V 15349 @ 152128: SELECT 6 15350 @ 152131: ASSPAR 15351 @ 152132: CALL 2587 KNOW(V_BASE, 0, CT) %IF NOT = 0 15352 @ 152133: LINE 2587 "regression-compile-tmp/asems412.imp" 15353 @ 152172: PUSH NOT 15354 @ 152175: PUSHI #0x00000000 15355 @ 152180: JUMPIF # L_000a 15356 @ 152184: PUSH KNOW 15357 @ 152187: PUSH V 15358 @ 152190: SELECT 6 15359 @ 152193: ASSPAR 15360 @ 152194: PUSHI #0x00000000 15361 @ 152199: ASSPAR 15362 @ 152200: PUSH CT 15363 @ 152203: ASSPAR 15364 @ 152204: CALL 15365 @ 152205: LOCATE L_000a 2588 %RETURN 15366 @ 152208: LINE 2588 "regression-compile-tmp/asems412.imp" 15367 @ 152247: RETURN 2589 %FINISH 15368 @ 152248: LINE 2589 "regression-compile-tmp/asems412.imp" 15369 @ 152287: LOCATE L_0007 2590 %FINISH 15370 @ 152290: LINE 2590 "regression-compile-tmp/asems412.imp" 15371 @ 152329: LOCATE L_0004 2591 LOAD(V, CR) 15372 @ 152332: LINE 2591 "regression-compile-tmp/asems412.imp" 15373 @ 152371: PUSH LOAD 15374 @ 152374: PUSH V 15375 @ 152377: ASSPAR 15376 @ 152378: PUSH CR 15377 @ 152381: ASSPAR 15378 @ 152382: CALL 2592 %UNLESS CCREG = V_BASE %AND CCCA = CA %START 15379 @ 152383: LINE 2592 "regression-compile-tmp/asems412.imp" 15380 @ 152422: PUSH CCREG 15381 @ 152425: PUSH V 15382 @ 152428: SELECT 6 15383 @ 152431: JUMPIF # L_0005 15384 @ 152435: PUSH CCCA 15385 @ 152438: PUSH CA 15386 @ 152441: JUMPIF = L_0004 15387 @ 152445: LOCATE L_0005 2593 RR(COP, V_BASE, V_BASE) 15388 @ 152448: LINE 2593 "regression-compile-tmp/asems412.imp" 15389 @ 152487: PUSH RR 15390 @ 152490: PUSH COP 15391 @ 152493: ASSPAR 15392 @ 152494: PUSH V 15393 @ 152497: SELECT 6 15394 @ 152500: ASSPAR 15395 @ 152501: PUSH V 15396 @ 152504: SELECT 6 15397 @ 152507: ASSPAR 15398 @ 152508: CALL 2594 %ELSE 15399 @ 152509: LINE 2594 "regression-compile-tmp/asems412.imp" 15400 @ 152548: GOTO L_0003 15401 @ 152551: LOCATE L_0004 2595 RELEASE(V_BASE) 15402 @ 152554: LINE 2595 "regression-compile-tmp/asems412.imp" 15403 @ 152593: PUSH RELEASE 15404 @ 152596: PUSH V 15405 @ 152599: SELECT 6 15406 @ 152602: ASSPAR 15407 @ 152603: CALL 2596 %FINISH 15408 @ 152604: LINE 2596 "regression-compile-tmp/asems412.imp" 15409 @ 152643: LOCATE L_0003 2597 KNOW(V_BASE, 0, CT) %IF NOT = 0 15410 @ 152646: LINE 2597 "regression-compile-tmp/asems412.imp" 15411 @ 152685: PUSH NOT 15412 @ 152688: PUSHI #0x00000000 15413 @ 152693: JUMPIF # L_0004 15414 @ 152697: PUSH KNOW 15415 @ 152700: PUSH V 15416 @ 152703: SELECT 6 15417 @ 152706: ASSPAR 15418 @ 152707: PUSHI #0x00000000 15419 @ 152712: ASSPAR 15420 @ 152713: PUSH CT 15421 @ 152716: ASSPAR 15422 @ 152717: CALL 15423 @ 152718: LOCATE L_0004 2598 %END 15424 @ 152721: LINE 2598 "regression-compile-tmp/asems412.imp" 15425 @ 152760: END _lev0id0_ASSEMBLE_TESTZERO {lev=3 --> 2} 2599 %ROUTINE COMPARE REALS(%RECORD(STACKFM)%NAME L, R) 15426 @ 152761: LINE 2599 "regression-compile-tmp/asems412.imp" 15427 @ 152800: DEF COMPAREREALS (_lev0id0_ASSEMBLE_COMPAREREALS) p1=V_0148 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 15428 @ 152824: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 15429 @ 152825: DEF L p1=V_0149 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15430 @ 152838: DEF R p1=V_014a a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15431 @ 152851: FINISH ) {lev=3} 2600 %RECORD(STACKFM) H 15432 @ 152852: LINE 2600 "regression-compile-tmp/asems412.imp" 15433 @ 152891: DEF H p1=V_014b a/tf=41 b/format=86 c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2601 FLOAT(L, ANYF) %UNLESS L_TYPE = REALS 15434 @ 152904: LINE 2601 "regression-compile-tmp/asems412.imp" 15435 @ 152943: PUSH L 15436 @ 152946: SELECT 8 15437 @ 152949: PUSHI #0x00000006 15438 @ 152954: JUMPIF = L_0004 15439 @ 152958: PUSH FLOAT 15440 @ 152961: PUSH L 15441 @ 152964: ASSPAR 15442 @ 152965: PUSHI #0x0000002f 15443 @ 152970: ASSPAR 15444 @ 152971: CALL 15445 @ 152972: LOCATE L_0004 2602 FLOAT(R, ANYF) %UNLESS R_TYPE = REALS 15446 @ 152975: LINE 2602 "regression-compile-tmp/asems412.imp" 15447 @ 153014: PUSH R 15448 @ 153017: SELECT 8 15449 @ 153020: PUSHI #0x00000006 15450 @ 153025: JUMPIF = L_0004 15451 @ 153029: PUSH FLOAT 15452 @ 153032: PUSH R 15453 @ 153035: ASSPAR 15454 @ 153036: PUSHI #0x0000002f 15455 @ 153041: ASSPAR 15456 @ 153042: CALL 15457 @ 153043: LOCATE L_0004 2603 LOAD(L,ANYF) %IF L_LOP # 0 15458 @ 153046: LINE 2603 "regression-compile-tmp/asems412.imp" 15459 @ 153085: PUSH L 15460 @ 153088: SELECT 7 15461 @ 153091: PUSHI #0x00000000 15462 @ 153096: JUMPIF = L_0004 15463 @ 153100: PUSH LOAD 15464 @ 153103: PUSH L 15465 @ 153106: ASSPAR 15466 @ 153107: PUSHI #0x0000002f 15467 @ 153112: ASSPAR 15468 @ 153113: CALL 15469 @ 153114: LOCATE L_0004 2604 LOAD(R,ANYF) %IF R_LOP # 0 15470 @ 153117: LINE 2604 "regression-compile-tmp/asems412.imp" 15471 @ 153156: PUSH R 15472 @ 153159: SELECT 7 15473 @ 153162: PUSHI #0x00000000 15474 @ 153167: JUMPIF = L_0004 15475 @ 153171: PUSH LOAD 15476 @ 153174: PUSH R 15477 @ 153177: ASSPAR 15478 @ 153178: PUSHI #0x0000002f 15479 @ 153183: ASSPAR 15480 @ 153184: CALL 15481 @ 153185: LOCATE L_0004 2605 %IF L_FORM # V IN R %AND R_FORM = V IN R %START 15482 @ 153188: LINE 2605 "regression-compile-tmp/asems412.imp" 15483 @ 153227: PUSH L 15484 @ 153230: SELECT 9 15485 @ 153233: PUSHI #0x00000001 15486 @ 153238: JUMPIF = L_0004 15487 @ 153242: PUSH R 15488 @ 153245: SELECT 9 15489 @ 153248: PUSHI #0x00000001 15490 @ 153253: JUMPIF # L_0004 2606 H = L; L = R; R = H 15491 @ 153257: LINE 2606 "regression-compile-tmp/asems412.imp" 15492 @ 153296: PUSH H 15493 @ 153299: PUSH L 15494 @ 153302: ASSVAL 15495 @ 153303: LINE 2606 "regression-compile-tmp/asems412.imp" 15496 @ 153342: PUSH L 15497 @ 153345: PUSH R 15498 @ 153348: ASSVAL 15499 @ 153349: LINE 2606 "regression-compile-tmp/asems412.imp" 15500 @ 153388: PUSH R 15501 @ 153391: PUSH H 15502 @ 153394: ASSVAL 2607 INVERT = INVERT!!6; SWOPPED = SWOPPED!!1 15503 @ 153395: LINE 2607 "regression-compile-tmp/asems412.imp" 15504 @ 153434: PUSH INVERT 15505 @ 153437: PUSH INVERT 15506 @ 153440: PUSHI #0x00000006 15507 @ 153445: XOR 15508 @ 153446: ASSVAL 15509 @ 153447: LINE 2607 "regression-compile-tmp/asems412.imp" 15510 @ 153486: PUSH SWOPPED 15511 @ 153489: PUSH SWOPPED 15512 @ 153492: PUSHI #0x00000001 15513 @ 153497: XOR 15514 @ 153498: ASSVAL 2608 %FINISH 15515 @ 153499: LINE 2608 "regression-compile-tmp/asems412.imp" 15516 @ 153538: LOCATE L_0004 2609 LOAD(L, ANYF) 15517 @ 153541: LINE 2609 "regression-compile-tmp/asems412.imp" 15518 @ 153580: PUSH LOAD 15519 @ 153583: PUSH L 15520 @ 153586: ASSPAR 15521 @ 153587: PUSHI #0x0000002f 15522 @ 153592: ASSPAR 15523 @ 153593: CALL 2610 LOAD(R, ANYF) %IF CONTROL&UNASS DIAG # 0 15524 @ 153594: LINE 2610 "regression-compile-tmp/asems412.imp" 15525 @ 153633: PUSH CONTROL 15526 @ 153636: PUSHI #0x00000020 15527 @ 153641: AND 15528 @ 153642: PUSHI #0x00000000 15529 @ 153647: JUMPIF = L_0004 15530 @ 153651: PUSH LOAD 15531 @ 153654: PUSH R 15532 @ 153657: ASSPAR 15533 @ 153658: PUSHI #0x0000002f 15534 @ 153663: ASSPAR 15535 @ 153664: CALL 15536 @ 153665: LOCATE L_0004 2611 ADDRESS(R) 15537 @ 153668: LINE 2611 "regression-compile-tmp/asems412.imp" 15538 @ 153707: PUSH ADDRESS 15539 @ 153710: PUSH R 15540 @ 153713: ASSPAR 15541 @ 153714: CALL 2612 %IF R_FORM = V IN R %START 15542 @ 153715: LINE 2612 "regression-compile-tmp/asems412.imp" 15543 @ 153754: PUSH R 15544 @ 153757: SELECT 9 15545 @ 153760: PUSHI #0x00000001 15546 @ 153765: JUMPIF # L_0004 2613 RR(CER, L_BASE, R_BASE) 15547 @ 153769: LINE 2613 "regression-compile-tmp/asems412.imp" 15548 @ 153808: PUSH RR 15549 @ 153811: PUSHI #0x00002900 15550 @ 153816: ASSPAR 15551 @ 153817: PUSH L 15552 @ 153820: SELECT 6 15553 @ 153823: ASSPAR 15554 @ 153824: PUSH R 15555 @ 153827: SELECT 6 15556 @ 153830: ASSPAR 15557 @ 153831: CALL 2614 %ELSE 15558 @ 153832: LINE 2614 "regression-compile-tmp/asems412.imp" 15559 @ 153871: GOTO L_0003 15560 @ 153874: LOCATE L_0004 2615 RX(CE, L_BASE, R_BASE, R_DISP) 15561 @ 153877: LINE 2615 "regression-compile-tmp/asems412.imp" 15562 @ 153916: PUSH RX 15563 @ 153919: PUSHI #0x00006900 15564 @ 153924: ASSPAR 15565 @ 153925: PUSH L 15566 @ 153928: SELECT 6 15567 @ 153931: ASSPAR 15568 @ 153932: PUSH R 15569 @ 153935: SELECT 6 15570 @ 153938: ASSPAR 15571 @ 153939: PUSH R 15572 @ 153942: SELECT 1 15573 @ 153945: ASSPAR 15574 @ 153946: CALL 2616 %FINISH 15575 @ 153947: LINE 2616 "regression-compile-tmp/asems412.imp" 15576 @ 153986: LOCATE L_0003 2617 RELEASE(L_BASE) 15577 @ 153989: LINE 2617 "regression-compile-tmp/asems412.imp" 15578 @ 154028: PUSH RELEASE 15579 @ 154031: PUSH L 15580 @ 154034: SELECT 6 15581 @ 154037: ASSPAR 15582 @ 154038: CALL 2618 %END 15583 @ 154039: LINE 2618 "regression-compile-tmp/asems412.imp" 15584 @ 154078: END _lev0id0_ASSEMBLE_COMPAREREALS {lev=3 --> 2} 2619 %ROUTINE COMPARE STRINGS(%RECORD(STACKFM)%NAME L, R) 15585 @ 154079: LINE 2619 "regression-compile-tmp/asems412.imp" 15586 @ 154118: DEF COMPARESTRINGS (_lev0id0_ASSEMBLE_COMPARESTRINGS) p1=V_0149 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 15587 @ 154144: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 15588 @ 154145: DEF L p1=V_014a a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15589 @ 154158: DEF R p1=V_014b a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15590 @ 154171: FINISH ) {lev=3} 2620 %ROUTINE TEST NULL(%RECORD(STACKFM)%NAME R) 15591 @ 154172: LINE 2620 "regression-compile-tmp/asems412.imp" 15592 @ 154211: DEF TESTNULL (_lev0id0_ASSEMBLE_COMPARESTRINGS_TESTNULL) p1=V_014c 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 15593 @ 154231: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 15594 @ 154232: DEF R p1=V_014d a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15595 @ 154245: FINISH ) {lev=4} 2621 ACTIVE STRING == NULL 15596 @ 154246: LINE 2621 "regression-compile-tmp/asems412.imp" 15597 @ 154285: PUSH ACTIVESTRING 15598 @ 154288: PUSH NULL 15599 @ 154291: ASSREF 2622 LOAD(R, ANY) %IF R_LOP # 0 15600 @ 154292: LINE 2622 "regression-compile-tmp/asems412.imp" 15601 @ 154331: PUSH R 15602 @ 154334: SELECT 7 15603 @ 154337: PUSHI #0x00000000 15604 @ 154342: JUMPIF = L_0004 15605 @ 154346: PUSH LOAD 15606 @ 154349: PUSH R 15607 @ 154352: ASSPAR 15608 @ 154353: PUSHI #0x0000002d 15609 @ 154358: ASSPAR 15610 @ 154359: CALL 15611 @ 154360: LOCATE L_0004 2623 R_TYPE = BYTE 15612 @ 154363: LINE 2623 "regression-compile-tmp/asems412.imp" 15613 @ 154402: PUSH R 15614 @ 154405: SELECT 8 15615 @ 154408: PUSHI #0x00000002 15616 @ 154413: ASSVAL 2624 TEST ZERO(R) 15617 @ 154414: LINE 2624 "regression-compile-tmp/asems412.imp" 15618 @ 154453: PUSH TESTZERO 15619 @ 154456: PUSH R 15620 @ 154459: ASSPAR 15621 @ 154460: CALL 2625 %END 15622 @ 154461: LINE 2625 "regression-compile-tmp/asems412.imp" 15623 @ 154500: END _lev0id0_ASSEMBLE_COMPARESTRINGS_TESTNULL {lev=4 --> 3} 2626 SDISP = 256 %IF L_TYPE = 0 %OR R_TYPE = 0 %C 2627 %OR L_LOP # 0 %OR R_LOP # 0 15624 @ 154501: LINE 2626 "regression-compile-tmp/asems412.imp" 15625 @ 154540: PUSH L 15626 @ 154543: SELECT 8 15627 @ 154546: PUSHI #0x00000000 15628 @ 154551: JUMPIF = L_0005 15629 @ 154555: PUSH R 15630 @ 154558: SELECT 8 15631 @ 154561: PUSHI #0x00000000 15632 @ 154566: JUMPIF = L_0005 15633 @ 154570: PUSH L 15634 @ 154573: SELECT 7 15635 @ 154576: PUSHI #0x00000000 15636 @ 154581: JUMPIF # L_0005 15637 @ 154585: PUSH R 15638 @ 154588: SELECT 7 15639 @ 154591: PUSHI #0x00000000 15640 @ 154596: JUMPIF = L_0004 15641 @ 154600: LOCATE L_0005 15642 @ 154603: PUSH SDISP 15643 @ 154606: PUSHI #0x00000100 15644 @ 154611: ASSVAL 15645 @ 154612: LOCATE L_0004 2628 %IF CSLEN = 0 %START 15646 @ 154615: LINE 2628 "regression-compile-tmp/asems412.imp" 15647 @ 154654: PUSH CSLEN 15648 @ 154657: PUSHI #0x00000000 15649 @ 154662: JUMPIF # L_0004 2629 %IF R_FORM = CONSTANT %START 15650 @ 154666: LINE 2629 "regression-compile-tmp/asems412.imp" 15651 @ 154705: PUSH R 15652 @ 154708: SELECT 9 15653 @ 154711: PUSHI #0x00000000 15654 @ 154716: JUMPIF # L_0007 2630 TEST NULL(L); L_TYPE = STRING; L_FORM = V IN S; %RETURN 15655 @ 154720: LINE 2630 "regression-compile-tmp/asems412.imp" 15656 @ 154759: PUSH TESTNULL 15657 @ 154762: PUSH L 15658 @ 154765: ASSPAR 15659 @ 154766: CALL 15660 @ 154767: LINE 2630 "regression-compile-tmp/asems412.imp" 15661 @ 154806: PUSH L 15662 @ 154809: SELECT 8 15663 @ 154812: PUSHI #0x00000004 15664 @ 154817: ASSVAL 15665 @ 154818: LINE 2630 "regression-compile-tmp/asems412.imp" 15666 @ 154857: PUSH L 15667 @ 154860: SELECT 9 15668 @ 154863: PUSHI #0x00000003 15669 @ 154868: ASSVAL 15670 @ 154869: LINE 2630 "regression-compile-tmp/asems412.imp" 15671 @ 154908: RETURN 2631 %FINISH 15672 @ 154909: LINE 2631 "regression-compile-tmp/asems412.imp" 15673 @ 154948: LOCATE L_0007 2632 %IF L_FORM = CONSTANT %START 15674 @ 154951: LINE 2632 "regression-compile-tmp/asems412.imp" 15675 @ 154990: PUSH L 15676 @ 154993: SELECT 9 15677 @ 154996: PUSHI #0x00000000 15678 @ 155001: JUMPIF # L_0007 2633 TEST NULL(R); INVERT = INVERT!!6; %RETURN 15679 @ 155005: LINE 2633 "regression-compile-tmp/asems412.imp" 15680 @ 155044: PUSH TESTNULL 15681 @ 155047: PUSH R 15682 @ 155050: ASSPAR 15683 @ 155051: CALL 15684 @ 155052: LINE 2633 "regression-compile-tmp/asems412.imp" 15685 @ 155091: PUSH INVERT 15686 @ 155094: PUSH INVERT 15687 @ 155097: PUSHI #0x00000006 15688 @ 155102: XOR 15689 @ 155103: ASSVAL 15690 @ 155104: LINE 2633 "regression-compile-tmp/asems412.imp" 15691 @ 155143: RETURN 2634 %FINISH 15692 @ 155144: LINE 2634 "regression-compile-tmp/asems412.imp" 15693 @ 155183: LOCATE L_0007 2635 %FINISH 15694 @ 155186: LINE 2635 "regression-compile-tmp/asems412.imp" 15695 @ 155225: LOCATE L_0004 2636 DUMP STRING(0) 15696 @ 155228: LINE 2636 "regression-compile-tmp/asems412.imp" 15697 @ 155267: PUSH DUMPSTRING 15698 @ 155270: PUSHI #0x00000000 15699 @ 155275: ASSPAR 15700 @ 155276: CALL 2637 LOAD(R, R1); LOAD(L, R2); LOAD(R, R1);! IN CASE OF HAZARD! 15701 @ 155277: LINE 2637 "regression-compile-tmp/asems412.imp" 15702 @ 155316: PUSH LOAD 15703 @ 155319: PUSH R 15704 @ 155322: ASSPAR 15705 @ 155323: PUSHI #0x00000002 15706 @ 155328: ASSPAR 15707 @ 155329: CALL 15708 @ 155330: LINE 2637 "regression-compile-tmp/asems412.imp" 15709 @ 155369: PUSH LOAD 15710 @ 155372: PUSH L 15711 @ 155375: ASSPAR 15712 @ 155376: PUSHI #0x00000003 15713 @ 155381: ASSPAR 15714 @ 155382: CALL 15715 @ 155383: LINE 2637 "regression-compile-tmp/asems412.imp" 15716 @ 155422: PUSH LOAD 15717 @ 155425: PUSH R 15718 @ 155428: ASSPAR 15719 @ 155429: PUSHI #0x00000002 15720 @ 155434: ASSPAR 15721 @ 155435: CALL 2638 RELEASE(R1); RELEASE(R2) 15722 @ 155436: LINE 2638 "regression-compile-tmp/asems412.imp" 15723 @ 155475: PUSH RELEASE 15724 @ 155478: PUSHI #0x00000002 15725 @ 155483: ASSPAR 15726 @ 155484: CALL 15727 @ 155485: LINE 2638 "regression-compile-tmp/asems412.imp" 15728 @ 155524: PUSH RELEASE 15729 @ 155527: PUSHI #0x00000003 15730 @ 155532: ASSPAR 15731 @ 155533: CALL 2639 PERM(SCOMP) 15732 @ 155534: LINE 2639 "regression-compile-tmp/asems412.imp" 15733 @ 155573: PUSH PERM 15734 @ 155576: PUSHI #0x00006b0d 15735 @ 155581: ASSPAR 15736 @ 155582: CALL 2640 L_TYPE = STRING; L_FORM = V IN S 15737 @ 155583: LINE 2640 "regression-compile-tmp/asems412.imp" 15738 @ 155622: PUSH L 15739 @ 155625: SELECT 8 15740 @ 155628: PUSHI #0x00000004 15741 @ 155633: ASSVAL 15742 @ 155634: LINE 2640 "regression-compile-tmp/asems412.imp" 15743 @ 155673: PUSH L 15744 @ 155676: SELECT 9 15745 @ 155679: PUSHI #0x00000003 15746 @ 155684: ASSVAL 2641 WDISP = 0 15747 @ 155685: LINE 2641 "regression-compile-tmp/asems412.imp" 15748 @ 155724: PUSH WDISP 15749 @ 155727: PUSHI #0x00000000 15750 @ 155732: ASSVAL 2642 %END 15751 @ 155733: LINE 2642 "regression-compile-tmp/asems412.imp" 15752 @ 155772: END _lev0id0_ASSEMBLE_COMPARESTRINGS {lev=3 --> 2} 2643 %ROUTINE COMPARE(%RECORD(STACKFM)%NAME L, R) 15753 @ 155773: LINE 2643 "regression-compile-tmp/asems412.imp" 15754 @ 155812: DEF COMPARE (_lev0id0_ASSEMBLE_COMPARE) p1=V_0125 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 15755 @ 155831: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 15756 @ 155832: DEF L p1=V_014a a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15757 @ 155845: DEF R p1=V_014b a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15758 @ 155858: FINISH ) {lev=3} 2644 %RECORD(STACKFM) T 15759 @ 155859: LINE 2644 "regression-compile-tmp/asems412.imp" 15760 @ 155898: DEF T p1=V_014c a/tf=41 b/format=86 c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2645 %INTEGER OP, ARITH 15761 @ 155911: LINE 2645 "regression-compile-tmp/asems412.imp" 15762 @ 155950: DEF OP p1=V_014d 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 15763 @ 155964: DEF ARITH p1=V_014e 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 2646 %PREDICATE CHANCED 15764 @ 155981: LINE 2646 "regression-compile-tmp/asems412.imp" 15765 @ 156020: DEF CHANCED (_lev0id0_ASSEMBLE_COMPARE_CHANCED) p1=V_014f a/tf=a b/format=0 c/ostate=0 type=0 () form=10 (predicate) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 15766 @ 156039: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 15767 @ 156040: FINISH ) {lev=4} 2647 %FALSE %UNLESS L_LOP = ADD %AND SYM # 126 15768 @ 156041: LINE 2647 "regression-compile-tmp/asems412.imp" 15769 @ 156080: PUSH L 15770 @ 156083: SELECT 7 15771 @ 156086: PUSHI #0x00000003 15772 @ 156091: JUMPIF # L_0005 15773 @ 156095: PUSH SYM 15774 @ 156098: PUSHI #0x0000007e 15775 @ 156103: JUMPIF # L_0004 15776 @ 156107: LOCATE L_0005 15777 @ 156110: FALSE 15778 @ 156111: LOCATE L_0004 2648 %FALSE %UNLESS L_LINK_FORM = CONSTANT %AND L_BASE # 0 15779 @ 156114: LINE 2648 "regression-compile-tmp/asems412.imp" 15780 @ 156153: PUSH L 15781 @ 156156: SELECT 10 15782 @ 156159: SELECT 9 15783 @ 156162: PUSHI #0x00000000 15784 @ 156167: JUMPIF # L_0005 15785 @ 156171: PUSH L 15786 @ 156174: SELECT 6 15787 @ 156177: PUSHI #0x00000000 15788 @ 156182: JUMPIF # L_0004 15789 @ 156186: LOCATE L_0005 15790 @ 156189: FALSE 15791 @ 156190: LOCATE L_0004 2649 %FALSE %UNLESS -X'8000' <= L_LINK_DISP <= X'7FFF' 15792 @ 156193: LINE 2649 "regression-compile-tmp/asems412.imp" 15793 @ 156232: PUSHI #0x00008000 15794 @ 156237: NEGATE 15795 @ 156238: PUSH L 15796 @ 156241: SELECT 10 15797 @ 156244: SELECT 1 15798 @ 156247: JUMPIFD > L_0005 15799 @ 156251: PUSHI #0x00007fff 15800 @ 156256: JUMPIF <= L_0004 15801 @ 156260: LOCATE L_0005 15802 @ 156263: FALSE 15803 @ 156264: LOCATE L_0004 2650 %FALSE %IF L_TYPE = REALS 15804 @ 156267: LINE 2650 "regression-compile-tmp/asems412.imp" 15805 @ 156306: PUSH L 15806 @ 156309: SELECT 8 15807 @ 156312: PUSHI #0x00000006 15808 @ 156317: JUMPIF # L_0004 15809 @ 156321: FALSE 15810 @ 156322: LOCATE L_0004 2651 INVERT = INVERT!!6; SWOPPED = SWOPPED!!1 15811 @ 156325: LINE 2651 "regression-compile-tmp/asems412.imp" 15812 @ 156364: PUSH INVERT 15813 @ 156367: PUSH INVERT 15814 @ 156370: PUSHI #0x00000006 15815 @ 156375: XOR 15816 @ 156376: ASSVAL 15817 @ 156377: LINE 2651 "regression-compile-tmp/asems412.imp" 15818 @ 156416: PUSH SWOPPED 15819 @ 156419: PUSH SWOPPED 15820 @ 156422: PUSHI #0x00000001 15821 @ 156427: XOR 15822 @ 156428: ASSVAL 2652 T = L; L = R; R = T 15823 @ 156429: LINE 2652 "regression-compile-tmp/asems412.imp" 15824 @ 156468: PUSH T 15825 @ 156471: PUSH L 15826 @ 156474: ASSVAL 15827 @ 156475: LINE 2652 "regression-compile-tmp/asems412.imp" 15828 @ 156514: PUSH L 15829 @ 156517: PUSH R 15830 @ 156520: ASSVAL 15831 @ 156521: LINE 2652 "regression-compile-tmp/asems412.imp" 15832 @ 156560: PUSH R 15833 @ 156563: PUSH T 15834 @ 156566: ASSVAL 2653 R_LOP = 0 15835 @ 156567: LINE 2653 "regression-compile-tmp/asems412.imp" 15836 @ 156606: PUSH R 15837 @ 156609: SELECT 7 15838 @ 156612: PUSHI #0x00000000 15839 @ 156617: ASSVAL 2654 LOAD(L, ANY) 15840 @ 156618: LINE 2654 "regression-compile-tmp/asems412.imp" 15841 @ 156657: PUSH LOAD 15842 @ 156660: PUSH L 15843 @ 156663: ASSPAR 15844 @ 156664: PUSHI #0x0000002d 15845 @ 156669: ASSPAR 15846 @ 156670: CALL 2655 LOAD(R, ANY0) 15847 @ 156671: LINE 2655 "regression-compile-tmp/asems412.imp" 15848 @ 156710: PUSH LOAD 15849 @ 156713: PUSH R 15850 @ 156716: ASSPAR 15851 @ 156717: PUSHI #0x0000002e 15852 @ 156722: ASSPAR 15853 @ 156723: CALL 2656 %IF -X'8000' <= R_LINK_DISP <= X'7FFF' %START 15854 @ 156724: LINE 2656 "regression-compile-tmp/asems412.imp" 15855 @ 156763: PUSHI #0x00008000 15856 @ 156768: NEGATE 15857 @ 156769: PUSH R 15858 @ 156772: SELECT 10 15859 @ 156775: SELECT 1 15860 @ 156778: JUMPIFD > L_0004 15861 @ 156782: PUSHI #0x00007fff 15862 @ 156787: JUMPIF > L_0004 2657 %IF ARITH # 0 %THEN OP = CLHI %ELSE OP = CHI 15863 @ 156791: LINE 2657 "regression-compile-tmp/asems412.imp" 15864 @ 156830: PUSH ARITH 15865 @ 156833: PUSHI #0x00000000 15866 @ 156838: JUMPIF = L_0007 15867 @ 156842: PUSH OP 15868 @ 156845: PUSHI #0x0000c500 15869 @ 156850: ASSVAL 15870 @ 156851: GOTO L_0006 15871 @ 156854: LOCATE L_0007 15872 @ 156857: PUSH OP 15873 @ 156860: PUSHI #0x0000c900 15874 @ 156865: ASSVAL 15875 @ 156866: LOCATE L_0006 2658 RI2(OP,L_BASE,R_BASE,R_LINK_DISP) 15876 @ 156869: LINE 2658 "regression-compile-tmp/asems412.imp" 15877 @ 156908: PUSH RI2 15878 @ 156911: PUSH OP 15879 @ 156914: ASSPAR 15880 @ 156915: PUSH L 15881 @ 156918: SELECT 6 15882 @ 156921: ASSPAR 15883 @ 156922: PUSH R 15884 @ 156925: SELECT 6 15885 @ 156928: ASSPAR 15886 @ 156929: PUSH R 15887 @ 156932: SELECT 10 15888 @ 156935: SELECT 1 15889 @ 156938: ASSPAR 15890 @ 156939: CALL 2659 %ELSE 15891 @ 156940: LINE 2659 "regression-compile-tmp/asems412.imp" 15892 @ 156979: GOTO L_0003 15893 @ 156982: LOCATE L_0004 2660 %IF ARITH # 0 %THEN OP = CLI %ELSE OP = CI 15894 @ 156985: LINE 2660 "regression-compile-tmp/asems412.imp" 15895 @ 157024: PUSH ARITH 15896 @ 157027: PUSHI #0x00000000 15897 @ 157032: JUMPIF = L_0007 15898 @ 157036: PUSH OP 15899 @ 157039: PUSHI #0x0000f500 15900 @ 157044: ASSVAL 15901 @ 157045: GOTO L_0006 15902 @ 157048: LOCATE L_0007 15903 @ 157051: PUSH OP 15904 @ 157054: PUSHI #0x0000f900 15905 @ 157059: ASSVAL 15906 @ 157060: LOCATE L_0006 2661 RI3(OP,L_BASE,R_BASE,R_LINK_DISP) 15907 @ 157063: LINE 2661 "regression-compile-tmp/asems412.imp" 15908 @ 157102: PUSH RI3 15909 @ 157105: PUSH OP 15910 @ 157108: ASSPAR 15911 @ 157109: PUSH L 15912 @ 157112: SELECT 6 15913 @ 157115: ASSPAR 15914 @ 157116: PUSH R 15915 @ 157119: SELECT 6 15916 @ 157122: ASSPAR 15917 @ 157123: PUSH R 15918 @ 157126: SELECT 10 15919 @ 157129: SELECT 1 15920 @ 157132: ASSPAR 15921 @ 157133: CALL 2662 %FINISH 15922 @ 157134: LINE 2662 "regression-compile-tmp/asems412.imp" 15923 @ 157173: LOCATE L_0003 2663 RELEASE(L_BASE) 15924 @ 157176: LINE 2663 "regression-compile-tmp/asems412.imp" 15925 @ 157215: PUSH RELEASE 15926 @ 157218: PUSH L 15927 @ 157221: SELECT 6 15928 @ 157224: ASSPAR 15929 @ 157225: CALL 2664 DROP(R_LINK) 15930 @ 157226: LINE 2664 "regression-compile-tmp/asems412.imp" 15931 @ 157265: PUSH DROP 15932 @ 157268: PUSH R 15933 @ 157271: SELECT 10 15934 @ 157274: ASSPAR 15935 @ 157275: CALL 2665 %TRUE 15936 @ 157276: LINE 2665 "regression-compile-tmp/asems412.imp" 15937 @ 157315: TRUE 2666 %END 15938 @ 157316: LINE 2666 "regression-compile-tmp/asems412.imp" 15939 @ 157355: END _lev0id0_ASSEMBLE_COMPARE_CHANCED {lev=4 --> 3} 2667 SWOPPED = 0; SDISP = 0 15940 @ 157356: LINE 2667 "regression-compile-tmp/asems412.imp" 15941 @ 157395: PUSH SWOPPED 15942 @ 157398: PUSHI #0x00000000 15943 @ 157403: ASSVAL 15944 @ 157404: LINE 2667 "regression-compile-tmp/asems412.imp" 15945 @ 157443: PUSH SDISP 15946 @ 157446: PUSHI #0x00000000 15947 @ 157451: ASSVAL 2668 %IF LHS_TYPE = 0 %OR LHS_TYPE = STRING %START 15948 @ 157452: LINE 2668 "regression-compile-tmp/asems412.imp" 15949 @ 157491: PUSH LHS 15950 @ 157494: SELECT 8 15951 @ 157497: PUSHI #0x00000000 15952 @ 157502: JUMPIF = L_0005 15953 @ 157506: PUSH LHS 15954 @ 157509: SELECT 8 15955 @ 157512: PUSHI #0x00000004 15956 @ 157517: JUMPIF # L_0004 15957 @ 157521: LOCATE L_0005 2669 COMPARE STRINGS(L, R); %RETURN 15958 @ 157524: LINE 2669 "regression-compile-tmp/asems412.imp" 15959 @ 157563: PUSH COMPARESTRINGS 15960 @ 157566: PUSH L 15961 @ 157569: ASSPAR 15962 @ 157570: PUSH R 15963 @ 157573: ASSPAR 15964 @ 157574: CALL 15965 @ 157575: LINE 2669 "regression-compile-tmp/asems412.imp" 15966 @ 157614: RETURN 2670 %FINISH 15967 @ 157615: LINE 2670 "regression-compile-tmp/asems412.imp" 15968 @ 157654: LOCATE L_0004 2671 %IF ZERO(R) %START 15969 @ 157657: LINE 2671 "regression-compile-tmp/asems412.imp" 15970 @ 157696: PUSH ZERO 15971 @ 157699: PUSH R 15972 @ 157702: ASSPAR 15973 @ 157703: CALL 15974 @ 157704: bf L_0004 2672 TEST ZERO(L); %RETURN 15975 @ 157707: LINE 2672 "regression-compile-tmp/asems412.imp" 15976 @ 157746: PUSH TESTZERO 15977 @ 157749: PUSH L 15978 @ 157752: ASSPAR 15979 @ 157753: CALL 15980 @ 157754: LINE 2672 "regression-compile-tmp/asems412.imp" 15981 @ 157793: RETURN 2673 %FINISH 15982 @ 157794: LINE 2673 "regression-compile-tmp/asems412.imp" 15983 @ 157833: LOCATE L_0004 2674 %IF ZERO(L) %START 15984 @ 157836: LINE 2674 "regression-compile-tmp/asems412.imp" 15985 @ 157875: PUSH ZERO 15986 @ 157878: PUSH L 15987 @ 157881: ASSPAR 15988 @ 157882: CALL 15989 @ 157883: bf L_0004 2675 TEST ZERO(R); INVERT = INVERT!!6; %RETURN 15990 @ 157886: LINE 2675 "regression-compile-tmp/asems412.imp" 15991 @ 157925: PUSH TESTZERO 15992 @ 157928: PUSH R 15993 @ 157931: ASSPAR 15994 @ 157932: CALL 15995 @ 157933: LINE 2675 "regression-compile-tmp/asems412.imp" 15996 @ 157972: PUSH INVERT 15997 @ 157975: PUSH INVERT 15998 @ 157978: PUSHI #0x00000006 15999 @ 157983: XOR 16000 @ 157984: ASSVAL 16001 @ 157985: LINE 2675 "regression-compile-tmp/asems412.imp" 16002 @ 158024: RETURN 2676 %FINISH 16003 @ 158025: LINE 2676 "regression-compile-tmp/asems412.imp" 16004 @ 158064: LOCATE L_0004 2677 ARITH = NEXTSYMBOL 16005 @ 158067: LINE 2677 "regression-compile-tmp/asems412.imp" 16006 @ 158106: PUSH ARITH 16007 @ 158109: PUSH NEXTSYMBOL 16008 @ 158112: CALL 16009 @ 158113: ASSVAL 2678 ARITH = 0 %IF ARITH # '#' %AND ARITH # '=' %AND SYM # 'F'+32 16010 @ 158114: LINE 2678 "regression-compile-tmp/asems412.imp" 16011 @ 158153: PUSH ARITH 16012 @ 158156: PUSHI #0x00000023 16013 @ 158161: JUMPIF = L_0004 16014 @ 158165: PUSH ARITH 16015 @ 158168: PUSHI #0x0000003d 16016 @ 158173: JUMPIF = L_0004 16017 @ 158177: PUSH SYM 16018 @ 158180: PUSHI #0x00000046 16019 @ 158185: PUSHI #0x00000020 16020 @ 158190: ADD 16021 @ 158191: JUMPIF = L_0004 16022 @ 158195: PUSH ARITH 16023 @ 158198: PUSHI #0x00000000 16024 @ 158203: ASSVAL 16025 @ 158204: LOCATE L_0004 2679 %RETURN %IF CHANCED 16026 @ 158207: LINE 2679 "regression-compile-tmp/asems412.imp" 16027 @ 158246: PUSH CHANCED 16028 @ 158249: CALL 16029 @ 158250: bf L_0004 16030 @ 158253: RETURN 16031 @ 158254: LOCATE L_0004 2680 OPTIMISE(R); OPTIMISE(L) 16032 @ 158257: LINE 2680 "regression-compile-tmp/asems412.imp" 16033 @ 158296: PUSH OPTIMISE 16034 @ 158299: PUSH R 16035 @ 158302: ASSPAR 16036 @ 158303: CALL 16037 @ 158304: LINE 2680 "regression-compile-tmp/asems412.imp" 16038 @ 158343: PUSH OPTIMISE 16039 @ 158346: PUSH L 16040 @ 158349: ASSPAR 16041 @ 158350: CALL 2681 COMPARE REALS(L ,R) %AND %RETURN %IF FLOATING(L) %OR FLOATING(R) 16042 @ 158351: LINE 2681 "regression-compile-tmp/asems412.imp" 16043 @ 158390: PUSH FLOATING 16044 @ 158393: PUSH L 16045 @ 158396: ASSPAR 16046 @ 158397: CALL 16047 @ 158398: bt L_0005 16048 @ 158401: PUSH FLOATING 16049 @ 158404: PUSH R 16050 @ 158407: ASSPAR 16051 @ 158408: CALL 16052 @ 158409: bf L_0004 16053 @ 158412: LOCATE L_0005 16054 @ 158415: PUSH COMPAREREALS 16055 @ 158418: PUSH L 16056 @ 158421: ASSPAR 16057 @ 158422: PUSH R 16058 @ 158425: ASSPAR 16059 @ 158426: CALL 16060 @ 158427: RETURN 16061 @ 158428: LOCATE L_0004 2682 %IF CONST(L) %OR R_FORM = V IN R %OR L_TYPE = BYTE %C 2683 %OR R_LOP # 0 %START 16062 @ 158431: LINE 2682 "regression-compile-tmp/asems412.imp" 16063 @ 158470: PUSH CONST 16064 @ 158473: PUSH L 16065 @ 158476: ASSPAR 16066 @ 158477: CALL 16067 @ 158478: bt L_0005 16068 @ 158481: PUSH R 16069 @ 158484: SELECT 9 16070 @ 158487: PUSHI #0x00000001 16071 @ 158492: JUMPIF = L_0005 16072 @ 158496: PUSH L 16073 @ 158499: SELECT 8 16074 @ 158502: PUSHI #0x00000002 16075 @ 158507: JUMPIF = L_0005 16076 @ 158511: PUSH R 16077 @ 158514: SELECT 7 16078 @ 158517: PUSHI #0x00000000 16079 @ 158522: JUMPIF = L_0004 16080 @ 158526: LOCATE L_0005 2684 T = L; L = R; R = T 16081 @ 158529: LINE 2684 "regression-compile-tmp/asems412.imp" 16082 @ 158568: PUSH T 16083 @ 158571: PUSH L 16084 @ 158574: ASSVAL 16085 @ 158575: LINE 2684 "regression-compile-tmp/asems412.imp" 16086 @ 158614: PUSH L 16087 @ 158617: PUSH R 16088 @ 158620: ASSVAL 16089 @ 158621: LINE 2684 "regression-compile-tmp/asems412.imp" 16090 @ 158660: PUSH R 16091 @ 158663: PUSH T 16092 @ 158666: ASSVAL 2685 INVERT = INVERT!!6; SWOPPED = SWOPPED!!1 16093 @ 158667: LINE 2685 "regression-compile-tmp/asems412.imp" 16094 @ 158706: PUSH INVERT 16095 @ 158709: PUSH INVERT 16096 @ 158712: PUSHI #0x00000006 16097 @ 158717: XOR 16098 @ 158718: ASSVAL 16099 @ 158719: LINE 2685 "regression-compile-tmp/asems412.imp" 16100 @ 158758: PUSH SWOPPED 16101 @ 158761: PUSH SWOPPED 16102 @ 158764: PUSHI #0x00000001 16103 @ 158769: XOR 16104 @ 158770: ASSVAL 2686 %RETURN %IF CHANCED 16105 @ 158771: LINE 2686 "regression-compile-tmp/asems412.imp" 16106 @ 158810: PUSH CHANCED 16107 @ 158813: CALL 16108 @ 158814: bf L_0007 16109 @ 158817: RETURN 16110 @ 158818: LOCATE L_0007 2687 %FINISH 16111 @ 158821: LINE 2687 "regression-compile-tmp/asems412.imp" 16112 @ 158860: LOCATE L_0004 2688 LOAD(L, ANY) 16113 @ 158863: LINE 2688 "regression-compile-tmp/asems412.imp" 16114 @ 158902: PUSH LOAD 16115 @ 158905: PUSH L 16116 @ 158908: ASSPAR 16117 @ 158909: PUSHI #0x0000002d 16118 @ 158914: ASSPAR 16119 @ 158915: CALL 2689 %IF R_LOP # 0 %OR R_TYPE = BYTE %OR R_TYPE = UNSIGNED HALFWORD %C 2690 %OR (CONTROL&UNASS DIAG # 0 %AND (R_FORM=VINS %OR %C 2691 R_FORM=AVINS)) %START 16120 @ 158916: LINE 2689 "regression-compile-tmp/asems412.imp" 16121 @ 158955: PUSH R 16122 @ 158958: SELECT 7 16123 @ 158961: PUSHI #0x00000000 16124 @ 158966: JUMPIF # L_0005 16125 @ 158970: PUSH R 16126 @ 158973: SELECT 8 16127 @ 158976: PUSHI #0x00000002 16128 @ 158981: JUMPIF = L_0005 16129 @ 158985: PUSH R 16130 @ 158988: SELECT 8 16131 @ 158991: PUSHI #0x000000ff 16132 @ 158996: JUMPIF = L_0005 16133 @ 159000: PUSH CONTROL 16134 @ 159003: PUSHI #0x00000020 16135 @ 159008: AND 16136 @ 159009: PUSHI #0x00000000 16137 @ 159014: JUMPIF = L_0004 16138 @ 159018: PUSH R 16139 @ 159021: SELECT 9 16140 @ 159024: PUSHI #0x00000003 16141 @ 159029: JUMPIF = L_0005 16142 @ 159033: PUSH R 16143 @ 159036: SELECT 9 16144 @ 159039: PUSHI #0x00000006 16145 @ 159044: JUMPIF # L_0004 16146 @ 159048: LOCATE L_0005 2692 LOAD(R, ANY) 16147 @ 159051: LINE 2692 "regression-compile-tmp/asems412.imp" 16148 @ 159090: PUSH LOAD 16149 @ 159093: PUSH R 16150 @ 159096: ASSPAR 16151 @ 159097: PUSHI #0x0000002d 16152 @ 159102: ASSPAR 16153 @ 159103: CALL 2693 %FINISH 16154 @ 159104: LINE 2693 "regression-compile-tmp/asems412.imp" 16155 @ 159143: LOCATE L_0004 2694 REDUCE(R) %IF R_FORM = AV IN REC 16156 @ 159146: LINE 2694 "regression-compile-tmp/asems412.imp" 16157 @ 159185: PUSH R 16158 @ 159188: SELECT 9 16159 @ 159191: PUSHI #0x00000007 16160 @ 159196: JUMPIF # L_0004 16161 @ 159200: PUSH REDUCE 16162 @ 159203: PUSH R 16163 @ 159206: ASSPAR 16164 @ 159207: CALL 16165 @ 159208: LOCATE L_0004 2695 %IF (R_FORM = CONSTANT %OR R_FORM = AV IN S) %START 16166 @ 159211: LINE 2695 "regression-compile-tmp/asems412.imp" 16167 @ 159250: PUSH R 16168 @ 159253: SELECT 9 16169 @ 159256: PUSHI #0x00000000 16170 @ 159261: JUMPIF = L_0005 16171 @ 159265: PUSH R 16172 @ 159268: SELECT 9 16173 @ 159271: PUSHI #0x00000006 16174 @ 159276: JUMPIF # L_0004 16175 @ 159280: LOCATE L_0005 2696 %IF -X'8000' <= R_DISP <= X'7FFF' %START 16176 @ 159283: LINE 2696 "regression-compile-tmp/asems412.imp" 16177 @ 159322: PUSHI #0x00008000 16178 @ 159327: NEGATE 16179 @ 159328: PUSH R 16180 @ 159331: SELECT 1 16181 @ 159334: JUMPIFD > L_0007 16182 @ 159338: PUSHI #0x00007fff 16183 @ 159343: JUMPIF > L_0007 2697 %IF ARITH # 0 %THEN OP = CLHI %ELSE OP = CHI 16184 @ 159347: LINE 2697 "regression-compile-tmp/asems412.imp" 16185 @ 159386: PUSH ARITH 16186 @ 159389: PUSHI #0x00000000 16187 @ 159394: JUMPIF = L_000a 16188 @ 159398: PUSH OP 16189 @ 159401: PUSHI #0x0000c500 16190 @ 159406: ASSVAL 16191 @ 159407: GOTO L_0009 16192 @ 159410: LOCATE L_000a 16193 @ 159413: PUSH OP 16194 @ 159416: PUSHI #0x0000c900 16195 @ 159421: ASSVAL 16196 @ 159422: LOCATE L_0009 2698 RI2(OP,L_BASE,R_BASE,R_DISP) 16197 @ 159425: LINE 2698 "regression-compile-tmp/asems412.imp" 16198 @ 159464: PUSH RI2 16199 @ 159467: PUSH OP 16200 @ 159470: ASSPAR 16201 @ 159471: PUSH L 16202 @ 159474: SELECT 6 16203 @ 159477: ASSPAR 16204 @ 159478: PUSH R 16205 @ 159481: SELECT 6 16206 @ 159484: ASSPAR 16207 @ 159485: PUSH R 16208 @ 159488: SELECT 1 16209 @ 159491: ASSPAR 16210 @ 159492: CALL 2699 %ELSE 16211 @ 159493: LINE 2699 "regression-compile-tmp/asems412.imp" 16212 @ 159532: GOTO L_0006 16213 @ 159535: LOCATE L_0007 2700 %IF ARITH # 0 %THEN OP = CLI %ELSE OP = CI 16214 @ 159538: LINE 2700 "regression-compile-tmp/asems412.imp" 16215 @ 159577: PUSH ARITH 16216 @ 159580: PUSHI #0x00000000 16217 @ 159585: JUMPIF = L_000a 16218 @ 159589: PUSH OP 16219 @ 159592: PUSHI #0x0000f500 16220 @ 159597: ASSVAL 16221 @ 159598: GOTO L_0009 16222 @ 159601: LOCATE L_000a 16223 @ 159604: PUSH OP 16224 @ 159607: PUSHI #0x0000f900 16225 @ 159612: ASSVAL 16226 @ 159613: LOCATE L_0009 2701 RI3(OP,L_BASE,R_BASE,R_DISP) 16227 @ 159616: LINE 2701 "regression-compile-tmp/asems412.imp" 16228 @ 159655: PUSH RI3 16229 @ 159658: PUSH OP 16230 @ 159661: ASSPAR 16231 @ 159662: PUSH L 16232 @ 159665: SELECT 6 16233 @ 159668: ASSPAR 16234 @ 159669: PUSH R 16235 @ 159672: SELECT 6 16236 @ 159675: ASSPAR 16237 @ 159676: PUSH R 16238 @ 159679: SELECT 1 16239 @ 159682: ASSPAR 16240 @ 159683: CALL 2702 %FINISH 16241 @ 159684: LINE 2702 "regression-compile-tmp/asems412.imp" 16242 @ 159723: LOCATE L_0006 2703 KNOW(L_BASE, R_DISP, INTEGER) %IF R_FORM = CONSTANT %C 2704 %AND ARITH = '#' 16243 @ 159726: LINE 2703 "regression-compile-tmp/asems412.imp" 16244 @ 159765: PUSH R 16245 @ 159768: SELECT 9 16246 @ 159771: PUSHI #0x00000000 16247 @ 159776: JUMPIF # L_0007 16248 @ 159780: PUSH ARITH 16249 @ 159783: PUSHI #0x00000023 16250 @ 159788: JUMPIF # L_0007 16251 @ 159792: PUSH KNOW 16252 @ 159795: PUSH L 16253 @ 159798: SELECT 6 16254 @ 159801: ASSPAR 16255 @ 159802: PUSH R 16256 @ 159805: SELECT 1 16257 @ 159808: ASSPAR 16258 @ 159809: PUSHI #0x00000001 16259 @ 159814: ASSPAR 16260 @ 159815: CALL 16261 @ 159816: LOCATE L_0007 2705 %ELSE 16262 @ 159819: LINE 2705 "regression-compile-tmp/asems412.imp" 16263 @ 159858: GOTO L_0003 16264 @ 159861: LOCATE L_0004 2706 ADDRESS(R) 16265 @ 159864: LINE 2706 "regression-compile-tmp/asems412.imp" 16266 @ 159903: PUSH ADDRESS 16267 @ 159906: PUSH R 16268 @ 159909: ASSPAR 16269 @ 159910: CALL 2707 %IF R_FORM = V IN R %START 16270 @ 159911: LINE 2707 "regression-compile-tmp/asems412.imp" 16271 @ 159950: PUSH R 16272 @ 159953: SELECT 9 16273 @ 159956: PUSHI #0x00000001 16274 @ 159961: JUMPIF # L_0007 2708 %IF ARITH # 0 %THEN OP = CLR %ELSE OP = CR 16275 @ 159965: LINE 2708 "regression-compile-tmp/asems412.imp" 16276 @ 160004: PUSH ARITH 16277 @ 160007: PUSHI #0x00000000 16278 @ 160012: JUMPIF = L_000a 16279 @ 160016: PUSH OP 16280 @ 160019: PUSHI #0x00000500 16281 @ 160024: ASSVAL 16282 @ 160025: GOTO L_0009 16283 @ 160028: LOCATE L_000a 16284 @ 160031: PUSH OP 16285 @ 160034: PUSHI #0x00000900 16286 @ 160039: ASSVAL 16287 @ 160040: LOCATE L_0009 2709 RR(OP, L_BASE, R_BASE) 16288 @ 160043: LINE 2709 "regression-compile-tmp/asems412.imp" 16289 @ 160082: PUSH RR 16290 @ 160085: PUSH OP 16291 @ 160088: ASSPAR 16292 @ 160089: PUSH L 16293 @ 160092: SELECT 6 16294 @ 160095: ASSPAR 16295 @ 160096: PUSH R 16296 @ 160099: SELECT 6 16297 @ 160102: ASSPAR 16298 @ 160103: CALL 2710 %ELSE 16299 @ 160104: LINE 2710 "regression-compile-tmp/asems412.imp" 16300 @ 160143: GOTO L_0006 16301 @ 160146: LOCATE L_0007 2711 %IF R_TYPE = BYTE %START 16302 @ 160149: LINE 2711 "regression-compile-tmp/asems412.imp" 16303 @ 160188: PUSH R 16304 @ 160191: SELECT 8 16305 @ 160194: PUSHI #0x00000002 16306 @ 160199: JUMPIF # L_000a 2712 OP = CLB 16307 @ 160203: LINE 2712 "regression-compile-tmp/asems412.imp" 16308 @ 160242: PUSH OP 16309 @ 160245: PUSHI #0x0000d400 16310 @ 160250: ASSVAL 2713 %ELSE %IF ARITH # 0 16311 @ 160251: LINE 2713 "regression-compile-tmp/asems412.imp" 16312 @ 160290: GOTO L_0009 16313 @ 160293: LOCATE L_000a 16314 @ 160296: PUSH ARITH 16315 @ 160299: PUSHI #0x00000000 16316 @ 160304: JUMPIF = L_000a 2714 %IF R_TYPE = SHORT %THEN OP = CLH %ELSE OP = CL 16317 @ 160308: LINE 2714 "regression-compile-tmp/asems412.imp" 16318 @ 160347: PUSH R 16319 @ 160350: SELECT 8 16320 @ 160353: PUSHI #0x00000003 16321 @ 160358: JUMPIF # L_000d 16322 @ 160362: PUSH OP 16323 @ 160365: PUSHI #0x00004500 16324 @ 160370: ASSVAL 16325 @ 160371: GOTO L_000c 16326 @ 160374: LOCATE L_000d 16327 @ 160377: PUSH OP 16328 @ 160380: PUSHI #0x00005500 16329 @ 160385: ASSVAL 16330 @ 160386: LOCATE L_000c 2715 %ELSE 16331 @ 160389: LINE 2715 "regression-compile-tmp/asems412.imp" 16332 @ 160428: GOTO L_0009 16333 @ 160431: LOCATE L_000a 2716 %IF R_TYPE = SHORT %THEN OP = CH %ELSE OP = C 16334 @ 160434: LINE 2716 "regression-compile-tmp/asems412.imp" 16335 @ 160473: PUSH R 16336 @ 160476: SELECT 8 16337 @ 160479: PUSHI #0x00000003 16338 @ 160484: JUMPIF # L_000d 16339 @ 160488: PUSH OP 16340 @ 160491: PUSHI #0x00004900 16341 @ 160496: ASSVAL 16342 @ 160497: GOTO L_000c 16343 @ 160500: LOCATE L_000d 16344 @ 160503: PUSH OP 16345 @ 160506: PUSHI #0x00005900 16346 @ 160511: ASSVAL 16347 @ 160512: LOCATE L_000c 2717 %FINISH 16348 @ 160515: LINE 2717 "regression-compile-tmp/asems412.imp" 16349 @ 160554: LOCATE L_0009 2718 RX(OP, L_BASE, R_BASE, R_DISP) 16350 @ 160557: LINE 2718 "regression-compile-tmp/asems412.imp" 16351 @ 160596: PUSH RX 16352 @ 160599: PUSH OP 16353 @ 160602: ASSPAR 16354 @ 160603: PUSH L 16355 @ 160606: SELECT 6 16356 @ 160609: ASSPAR 16357 @ 160610: PUSH R 16358 @ 160613: SELECT 6 16359 @ 160616: ASSPAR 16360 @ 160617: PUSH R 16361 @ 160620: SELECT 1 16362 @ 160623: ASSPAR 16363 @ 160624: CALL 2719 %FINISH 16364 @ 160625: LINE 2719 "regression-compile-tmp/asems412.imp" 16365 @ 160664: LOCATE L_0006 2720 %FINISH 16366 @ 160667: LINE 2720 "regression-compile-tmp/asems412.imp" 16367 @ 160706: LOCATE L_0003 2721 RELEASE(L_BASE) 16368 @ 160709: LINE 2721 "regression-compile-tmp/asems412.imp" 16369 @ 160748: PUSH RELEASE 16370 @ 160751: PUSH L 16371 @ 160754: SELECT 6 16372 @ 160757: ASSPAR 16373 @ 160758: CALL 2722 %END 16374 @ 160759: LINE 2722 "regression-compile-tmp/asems412.imp" 16375 @ 160798: END _lev0id0_ASSEMBLE_COMPARE {lev=3 --> 2} 2723 %ROUTINE CLAIM WSP(%INTEGERNAME SIZE) 16376 @ 160799: LINE 2723 "regression-compile-tmp/asems412.imp" 16377 @ 160838: DEF CLAIMWSP (_lev0id0_ASSEMBLE_CLAIMWSP) p1=V_014a 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 16378 @ 160858: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 16379 @ 160859: DEF SIZE p1=V_014b 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 16380 @ 160875: FINISH ) {lev=3} 2724 SIZE = (WDISP+(REGLEN-1))&(\(REGLEN-1)); %RETURN %IF SIZE = 0 16381 @ 160876: LINE 2724 "regression-compile-tmp/asems412.imp" 16382 @ 160915: PUSH SIZE 16383 @ 160918: PUSH WDISP 16384 @ 160921: PUSHI #0x00000004 16385 @ 160926: PUSHI #0x00000001 16386 @ 160931: SUB 16387 @ 160932: ADD 16388 @ 160933: PUSHI #0x00000004 16389 @ 160938: PUSHI #0x00000001 16390 @ 160943: SUB 16391 @ 160944: NOT 16392 @ 160945: AND 16393 @ 160946: ASSVAL 16394 @ 160947: LINE 2724 "regression-compile-tmp/asems412.imp" 16395 @ 160986: PUSH SIZE 16396 @ 160989: PUSHI #0x00000000 16397 @ 160994: JUMPIF # L_0004 16398 @ 160998: RETURN 16399 @ 160999: LOCATE L_0004 2725 WDISP = 0 16400 @ 161002: LINE 2725 "regression-compile-tmp/asems412.imp" 16401 @ 161041: PUSH WDISP 16402 @ 161044: PUSHI #0x00000000 16403 @ 161049: ASSVAL 2726 RI2(AHI, WSP, 0, SIZE) %IF SIZE > 15 16404 @ 161050: LINE 2726 "regression-compile-tmp/asems412.imp" 16405 @ 161089: PUSH SIZE 16406 @ 161092: PUSHI #0x0000000f 16407 @ 161097: JUMPIF <= L_0004 16408 @ 161101: PUSH RI2 16409 @ 161104: PUSHI #0x0000ca00 16410 @ 161109: ASSPAR 16411 @ 161110: PUSHI #0x0000002b 16412 @ 161115: ASSPAR 16413 @ 161116: PUSHI #0x00000000 16414 @ 161121: ASSPAR 16415 @ 161122: PUSH SIZE 16416 @ 161125: ASSPAR 16417 @ 161126: CALL 16418 @ 161127: LOCATE L_0004 2727 %END 16419 @ 161130: LINE 2727 "regression-compile-tmp/asems412.imp" 16420 @ 161169: END _lev0id0_ASSEMBLE_CLAIMWSP {lev=3 --> 2} 2728 %ROUTINE RELEASE WSP(%INTEGER SIZE) 16421 @ 161170: LINE 2728 "regression-compile-tmp/asems412.imp" 16422 @ 161209: DEF RELEASEWSP (_lev0id0_ASSEMBLE_RELEASEWSP) p1=V_014b 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 16423 @ 161231: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 16424 @ 161232: DEF SIZE p1=V_014c 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 16425 @ 161248: FINISH ) {lev=3} 2729 WDISP = SIZE 16426 @ 161249: LINE 2729 "regression-compile-tmp/asems412.imp" 16427 @ 161288: PUSH WDISP 16428 @ 161291: PUSH SIZE 16429 @ 161294: ASSVAL 2730 RI2(SHI, WSP, 0, WDISP) %IF WDISP > 15 16430 @ 161295: LINE 2730 "regression-compile-tmp/asems412.imp" 16431 @ 161334: PUSH WDISP 16432 @ 161337: PUSHI #0x0000000f 16433 @ 161342: JUMPIF <= L_0004 16434 @ 161346: PUSH RI2 16435 @ 161349: PUSHI #0x0000cb00 16436 @ 161354: ASSPAR 16437 @ 161355: PUSHI #0x0000002b 16438 @ 161360: ASSPAR 16439 @ 161361: PUSHI #0x00000000 16440 @ 161366: ASSPAR 16441 @ 161367: PUSH WDISP 16442 @ 161370: ASSPAR 16443 @ 161371: CALL 16444 @ 161372: LOCATE L_0004 2731 %END 16445 @ 161375: LINE 2731 "regression-compile-tmp/asems412.imp" 16446 @ 161414: END _lev0id0_ASSEMBLE_RELEASEWSP {lev=3 --> 2} 2732 %ROUTINE HEADER(%RECORD(VARFM)%NAME V) 16447 @ 161415: LINE 2732 "regression-compile-tmp/asems412.imp" 16448 @ 161454: DEF HEADER (_lev0id0_ASSEMBLE_HEADER) p1=V_0126 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 16449 @ 161472: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 16450 @ 161473: DEF V p1=V_014c a/tf=42 b/format=85 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 16451 @ 161486: FINISH ) {lev=3} 2733 LIMEN = CA-2 16452 @ 161487: LINE 2733 "regression-compile-tmp/asems412.imp" 16453 @ 161526: PUSH LIMEN 16454 @ 161529: PUSH CA 16455 @ 161532: PUSHI #0x00000002 16456 @ 161537: SUB 16457 @ 161538: ASSVAL 2734 FRAME = 11*REGLEN %IF FRAME < 11*REGLEN 16458 @ 161539: LINE 2734 "regression-compile-tmp/asems412.imp" 16459 @ 161578: PUSH FRAME 16460 @ 161581: PUSHI #0x0000000b 16461 @ 161586: PUSHI #0x00000004 16462 @ 161591: MUL 16463 @ 161592: JUMPIF >= L_0004 16464 @ 161596: PUSH FRAME 16465 @ 161599: PUSHI #0x0000000b 16466 @ 161604: PUSHI #0x00000004 16467 @ 161609: MUL 16468 @ 161610: ASSVAL 16469 @ 161611: LOCATE L_0004 2735 DEFINE TAG(V_DISP&X'FFF') %UNLESS V == BEGIN 16470 @ 161614: LINE 2735 "regression-compile-tmp/asems412.imp" 16471 @ 161653: PUSH V 16472 @ 161656: PUSH BEGIN 16473 @ 161659: JUMPIFA = L_0004 16474 @ 161663: PUSH DEFINETAG 16475 @ 161666: PUSH V 16476 @ 161669: SELECT 1 16477 @ 161672: PUSHI #0x00000fff 16478 @ 161677: AND 16479 @ 161678: ASSPAR 16480 @ 161679: CALL 16481 @ 161680: LOCATE L_0004 2736 RX(STM, P2, WSP, 0) 16482 @ 161683: LINE 2736 "regression-compile-tmp/asems412.imp" 16483 @ 161722: PUSH RX 16484 @ 161725: PUSHI #0x0000d000 16485 @ 161730: ASSPAR 16486 @ 161731: PUSHI #0x00000006 16487 @ 161736: ASSPAR 16488 @ 161737: PUSHI #0x0000002b 16489 @ 161742: ASSPAR 16490 @ 161743: PUSHI #0x00000000 16491 @ 161748: ASSPAR 16492 @ 161749: CALL 2737 RR(LR , LOCAL, WSP) 16493 @ 161750: LINE 2737 "regression-compile-tmp/asems412.imp" 16494 @ 161789: PUSH RR 16495 @ 161792: PUSHI #0x00000800 16496 @ 161797: ASSPAR 16497 @ 161798: PUSH LOCAL 16498 @ 161801: ASSPAR 16499 @ 161802: PUSHI #0x0000002b 16500 @ 161807: ASSPAR 16501 @ 161808: CALL 2738 %IF CONTROL&(UNASS DIAG!STKDIAG) # 0 %START 16502 @ 161809: LINE 2738 "regression-compile-tmp/asems412.imp" 16503 @ 161848: PUSH CONTROL 16504 @ 161851: PUSHI #0x00000020 16505 @ 161856: PUSHI #0x00000002 16506 @ 161861: OR 16507 @ 161862: AND 16508 @ 161863: PUSHI #0x00000000 16509 @ 161868: JUMPIF = L_0004 2739 %IF CONTROL&UNASS DIAG # 0 %START 16510 @ 161872: LINE 2739 "regression-compile-tmp/asems412.imp" 16511 @ 161911: PUSH CONTROL 16512 @ 161914: PUSHI #0x00000020 16513 @ 161919: AND 16514 @ 161920: PUSHI #0x00000000 16515 @ 161925: JUMPIF = L_0007 2740 PERM(EXBUNASS); DUMP(FRAME) 16516 @ 161929: LINE 2740 "regression-compile-tmp/asems412.imp" 16517 @ 161968: PUSH PERM 16518 @ 161971: PUSHI #0x00001112 16519 @ 161976: ASSPAR 16520 @ 161977: CALL 16521 @ 161978: LINE 2740 "regression-compile-tmp/asems412.imp" 16522 @ 162017: PUSH DUMP 16523 @ 162020: PUSH FRAME 16524 @ 162023: ASSPAR 16525 @ 162024: CALL 2741 %ELSE 16526 @ 162025: LINE 2741 "regression-compile-tmp/asems412.imp" 16527 @ 162064: GOTO L_0006 16528 @ 162067: LOCATE L_0007 2742 PERM(EXB) 16529 @ 162070: LINE 2742 "regression-compile-tmp/asems412.imp" 16530 @ 162109: PUSH PERM 16531 @ 162112: PUSHI #0x00000113 16532 @ 162117: ASSPAR 16533 @ 162118: CALL 2743 %FINISH 16534 @ 162119: LINE 2743 "regression-compile-tmp/asems412.imp" 16535 @ 162158: LOCATE L_0006 2744 %ELSE 16536 @ 162161: LINE 2744 "regression-compile-tmp/asems412.imp" 16537 @ 162200: GOTO L_0003 16538 @ 162203: LOCATE L_0004 2745 DUMP(AHI+ACTUAL(WSP)<<4) 16539 @ 162206: LINE 2745 "regression-compile-tmp/asems412.imp" 16540 @ 162245: PUSH DUMP 16541 @ 162248: PUSHI #0x0000ca00 16542 @ 162253: PUSH ACTUAL 16543 @ 162256: PUSHI #0x0000002b 16544 @ 162261: ACCESS 16545 @ 162262: PUSHI #0x00000004 16546 @ 162267: LSH 16547 @ 162268: ADD 16548 @ 162269: ASSPAR 16549 @ 162270: CALL 2746 %FINISH 16550 @ 162271: LINE 2746 "regression-compile-tmp/asems412.imp" 16551 @ 162310: LOCATE L_0003 2747 SIZE PATCH = CA 16552 @ 162313: LINE 2747 "regression-compile-tmp/asems412.imp" 16553 @ 162352: PUSH SIZEPATCH 16554 @ 162355: PUSH CA 16555 @ 162358: ASSVAL 2748 DUMP(0) 16556 @ 162359: LINE 2748 "regression-compile-tmp/asems412.imp" 16557 @ 162398: PUSH DUMP 16558 @ 162401: PUSHI #0x00000000 16559 @ 162406: ASSPAR 16560 @ 162407: CALL 2749 %END 16561 @ 162408: LINE 2749 "regression-compile-tmp/asems412.imp" 16562 @ 162447: END _lev0id0_ASSEMBLE_HEADER {lev=3 --> 2} 2750 %ROUTINE RETURN 16563 @ 162448: LINE 2750 "regression-compile-tmp/asems412.imp" 16564 @ 162487: DEF RETURN (_lev0id0_ASSEMBLE_RETURN) p1=V_014c 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 16565 @ 162505: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 16566 @ 162506: FINISH ) {lev=3} 2751 %RETURN %IF UNCOND JUMP = CA 16567 @ 162507: LINE 2751 "regression-compile-tmp/asems412.imp" 16568 @ 162546: PUSH UNCONDJUMP 16569 @ 162549: PUSH CA 16570 @ 162552: JUMPIF # L_0004 16571 @ 162556: RETURN 16572 @ 162557: LOCATE L_0004 2752 RX(LM, WSP, LOCAL, 2*REGLEN) 16573 @ 162560: LINE 2752 "regression-compile-tmp/asems412.imp" 16574 @ 162599: PUSH RX 16575 @ 162602: PUSHI #0x0000d100 16576 @ 162607: ASSPAR 16577 @ 162608: PUSHI #0x0000002b 16578 @ 162613: ASSPAR 16579 @ 162614: PUSH LOCAL 16580 @ 162617: ASSPAR 16581 @ 162618: PUSHI #0x00000002 16582 @ 162623: PUSHI #0x00000004 16583 @ 162628: MUL 16584 @ 162629: ASSPAR 16585 @ 162630: CALL 2753 CLAIM(LINK); RR(BFCR, 0, LINK) 16586 @ 162631: LINE 2753 "regression-compile-tmp/asems412.imp" 16587 @ 162670: PUSH CLAIM 16588 @ 162673: PUSHI #0x0000000c 16589 @ 162678: ASSPAR 16590 @ 162679: CALL 16591 @ 162680: LINE 2753 "regression-compile-tmp/asems412.imp" 16592 @ 162719: PUSH RR 16593 @ 162722: PUSHI #0x00000300 16594 @ 162727: ASSPAR 16595 @ 162728: PUSHI #0x00000000 16596 @ 162733: ASSPAR 16597 @ 162734: PUSHI #0x0000000c 16598 @ 162739: ASSPAR 16599 @ 162740: CALL 2754 UNCOND JUMP = CA 16600 @ 162741: LINE 2754 "regression-compile-tmp/asems412.imp" 16601 @ 162780: PUSH UNCONDJUMP 16602 @ 162783: PUSH CA 16603 @ 162786: ASSVAL 2755 %END 16604 @ 162787: LINE 2755 "regression-compile-tmp/asems412.imp" 16605 @ 162826: END _lev0id0_ASSEMBLE_RETURN {lev=3 --> 2} 2756 %ROUTINE CALL(%RECORD(STACKFM)%NAME V) 16606 @ 162827: LINE 2756 "regression-compile-tmp/asems412.imp" 16607 @ 162866: DEF CALL (_lev0id0_ASSEMBLE_CALL) p1=V_014d 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 16608 @ 162882: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 16609 @ 162883: DEF V p1=V_014e a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 16610 @ 162896: FINISH ) {lev=3} 2757 %SWITCH B(0:15) 16611 @ 162897: LINE 2757 "regression-compile-tmp/asems412.imp" 16612 @ 162936: PUSHI #0x00000000 16613 @ 162941: PUSHI #0x0000000f 16614 @ 162946: BOUNDS 16615 @ 162947: DEF B p1=V_014f 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 2758 %OWNINTEGER INT G = 0, FRACPT G = 0 16616 @ 162960: LINE 2758 "regression-compile-tmp/asems412.imp" 16617 @ 162999: PUSHI #0x00000000 16618 @ 163004: DEF INTG p1=V_0150 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 16619 @ 163020: INIT 1 16620 @ 163023: PUSHI #0x00000000 16621 @ 163028: DEF FRACPTG p1=V_0151 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 16622 @ 163047: INIT 1 2759 %INTEGER WORK, AWORK, REG, AREG 16623 @ 163050: LINE 2759 "regression-compile-tmp/asems412.imp" 16624 @ 163089: DEF WORK p1=V_0152 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 16625 @ 163105: DEF AWORK p1=V_0153 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 16626 @ 163122: DEF REG p1=V_0154 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 16627 @ 163137: DEF AREG p1=V_0155 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 2760 %INTEGER ADDR, T, L 16628 @ 163153: LINE 2760 "regression-compile-tmp/asems412.imp" 16629 @ 163192: DEF ADDR p1=V_0156 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 16630 @ 163208: DEF T p1=V_0157 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 16631 @ 163221: DEF L p1=V_0158 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 2761 %INTEGERFN SET(%INTEGER H, L) 16632 @ 163234: LINE 2761 "regression-compile-tmp/asems412.imp" 16633 @ 163273: DEF SET (_lev0id0_ASSEMBLE_CALL_SET) p1=V_0159 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 16634 @ 163288: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 16635 @ 163289: DEF H p1=V_015a 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 16636 @ 163302: DEF L p1=V_015b 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 16637 @ 163315: FINISH ) {lev=4} 2762 GFIX(4) 16638 @ 163316: LINE 2762 "regression-compile-tmp/asems412.imp" 16639 @ 163355: PUSH GFIX 16640 @ 163358: PUSHI #0x00000004 16641 @ 163363: ASSPAR 16642 @ 163364: CALL 2763 GHALF(H); GHALF(L) 16643 @ 163365: LINE 2763 "regression-compile-tmp/asems412.imp" 16644 @ 163404: PUSH GHALF 16645 @ 163407: PUSH H 16646 @ 163410: ASSPAR 16647 @ 163411: CALL 16648 @ 163412: LINE 2763 "regression-compile-tmp/asems412.imp" 16649 @ 163451: PUSH GHALF 16650 @ 163454: PUSH L 16651 @ 163457: ASSPAR 16652 @ 163458: CALL 2764 %RESULT = GA-4 16653 @ 163459: LINE 2764 "regression-compile-tmp/asems412.imp" 16654 @ 163498: PUSH GA 16655 @ 163501: PUSHI #0x00000004 16656 @ 163506: SUB 16657 @ 163507: RESULT 2765 %END 16658 @ 163508: LINE 2765 "regression-compile-tmp/asems412.imp" 16659 @ 163547: END _lev0id0_ASSEMBLE_CALL_SET {lev=4 --> 3} 2766 ADDR = V_DISP 16660 @ 163548: LINE 2766 "regression-compile-tmp/asems412.imp" 16661 @ 163587: PUSH ADDR 16662 @ 163590: PUSH V 16663 @ 163593: SELECT 1 16664 @ 163596: ASSVAL 2767 %IF ADDR < 0 %START 16665 @ 163597: LINE 2767 "regression-compile-tmp/asems412.imp" 16666 @ 163636: PUSH ADDR 16667 @ 163639: PUSHI #0x00000000 16668 @ 163644: JUMPIF >= L_0004 2768 PERM(X'1EF00'-ADDR) 16669 @ 163648: LINE 2768 "regression-compile-tmp/asems412.imp" 16670 @ 163687: PUSH PERM 16671 @ 163690: PUSHI #0x0001ef00 16672 @ 163695: PUSH ADDR 16673 @ 163698: SUB 16674 @ 163699: ASSPAR 16675 @ 163700: CALL 2769 %ELSE 16676 @ 163701: LINE 2769 "regression-compile-tmp/asems412.imp" 16677 @ 163740: GOTO L_0003 16678 @ 163743: LOCATE L_0004 2770 %IF V_BASE = LINK %START; ! INTRINSIC 16679 @ 163746: LINE 2770 "regression-compile-tmp/asems412.imp" 16680 @ 163785: PUSH V 16681 @ 163788: SELECT 6 16682 @ 163791: PUSHI #0x0000000c 16683 @ 163796: JUMPIF # L_0007 2771 V_DV = 0; DROP(V) 16684 @ 163800: LINE 2771 "regression-compile-tmp/asems412.imp" 16685 @ 163839: PUSH V 16686 @ 163842: SELECT 5 16687 @ 163845: PUSHI #0x00000000 16688 @ 163850: ASSVAL 16689 @ 163851: LINE 2771 "regression-compile-tmp/asems412.imp" 16690 @ 163890: PUSH DROP 16691 @ 163893: PUSH V 16692 @ 163896: ASSPAR 16693 @ 163897: CALL 2772 SET LHS 16694 @ 163898: LINE 2772 "regression-compile-tmp/asems412.imp" 16695 @ 163937: PUSH SETLHS 16696 @ 163940: CALL 2773 L = 0; T = V_DISP; SYM = 0 16697 @ 163941: LINE 2773 "regression-compile-tmp/asems412.imp" 16698 @ 163980: PUSH L 16699 @ 163983: PUSHI #0x00000000 16700 @ 163988: ASSVAL 16701 @ 163989: LINE 2773 "regression-compile-tmp/asems412.imp" 16702 @ 164028: PUSH T 16703 @ 164031: PUSH V 16704 @ 164034: SELECT 1 16705 @ 164037: ASSVAL 16706 @ 164038: LINE 2773 "regression-compile-tmp/asems412.imp" 16707 @ 164077: PUSH SYM 16708 @ 164080: PUSHI #0x00000000 16709 @ 164085: ASSVAL 2774 ->B(T) 16710 @ 164086: LINE 2774 "regression-compile-tmp/asems412.imp" 16711 @ 164125: PUSH T 16712 @ 164128: SJUMP 335 2775 B(12):! FRACPT 16713 @ 164131: LINE 2775 "regression-compile-tmp/asems412.imp" 16714 @ 164170: PUSHI #0x0000000c 16715 @ 164175: SLABEL 335 2776 LOAD(LHS, ANYF) 16716 @ 164178: LINE 2776 "regression-compile-tmp/asems412.imp" 16717 @ 164217: PUSH LOAD 16718 @ 164220: PUSH LHS 16719 @ 164223: ASSPAR 16720 @ 164224: PUSHI #0x0000002f 16721 @ 164229: ASSPAR 16722 @ 164230: CALL 2777 REG = LHS_BASE; AREG = ACTUAL(REG) 16723 @ 164231: LINE 2777 "regression-compile-tmp/asems412.imp" 16724 @ 164270: PUSH REG 16725 @ 164273: PUSH LHS 16726 @ 164276: SELECT 6 16727 @ 164279: ASSVAL 16728 @ 164280: LINE 2777 "regression-compile-tmp/asems412.imp" 16729 @ 164319: PUSH AREG 16730 @ 164322: PUSH ACTUAL 16731 @ 164325: PUSH REG 16732 @ 164328: ACCESS 16733 @ 164329: ASSVAL 2778 WORK = FPR; AWORK = ACTUAL(WORK) 16734 @ 164330: LINE 2778 "regression-compile-tmp/asems412.imp" 16735 @ 164369: PUSH WORK 16736 @ 164372: PUSH FPR 16737 @ 164375: CALL 16738 @ 164376: ASSVAL 16739 @ 164377: LINE 2778 "regression-compile-tmp/asems412.imp" 16740 @ 164416: PUSH AWORK 16741 @ 164419: PUSH ACTUAL 16742 @ 164422: PUSH WORK 16743 @ 164425: ACCESS 16744 @ 164426: ASSVAL 2779 DUMP(LER+AWORK<<4+AREG) 16745 @ 164427: LINE 2779 "regression-compile-tmp/asems412.imp" 16746 @ 164466: PUSH DUMP 16747 @ 164469: PUSHI #0x00002800 16748 @ 164474: PUSH AWORK 16749 @ 164477: PUSHI #0x00000004 16750 @ 164482: LSH 16751 @ 164483: ADD 16752 @ 164484: PUSH AREG 16753 @ 164487: ADD 16754 @ 164488: ASSPAR 16755 @ 164489: CALL 2780 %IF FRACPT G = 0 %START 16756 @ 164490: LINE 2780 "regression-compile-tmp/asems412.imp" 16757 @ 164529: PUSH FRACPTG 16758 @ 164532: PUSHI #0x00000000 16759 @ 164537: JUMPIF # L_000a 2781 FRACPT G = SET(X'4600', 0); ! UNNORM. ZERO 16760 @ 164541: LINE 2781 "regression-compile-tmp/asems412.imp" 16761 @ 164580: PUSH FRACPTG 16762 @ 164583: PUSH SET 16763 @ 164586: PUSHI #0x00004600 16764 @ 164591: ASSPAR 16765 @ 164592: PUSHI #0x00000000 16766 @ 164597: ASSPAR 16767 @ 164598: CALL 16768 @ 164599: ASSVAL 2782 ADDR = SET(X'4110', 0);! 1.0 16769 @ 164600: LINE 2782 "regression-compile-tmp/asems412.imp" 16770 @ 164639: PUSH ADDR 16771 @ 164642: PUSH SET 16772 @ 164645: PUSHI #0x00004110 16773 @ 164650: ASSPAR 16774 @ 164651: PUSHI #0x00000000 16775 @ 164656: ASSPAR 16776 @ 164657: CALL 16777 @ 164658: ASSVAL 2783 %FINISH 16778 @ 164659: LINE 2783 "regression-compile-tmp/asems412.imp" 16779 @ 164698: LOCATE L_000a 2784 DUMP(AE+AWORK<<4+ACTUAL(GLA)); DUMP(FRACPT G) 16780 @ 164701: LINE 2784 "regression-compile-tmp/asems412.imp" 16781 @ 164740: PUSH DUMP 16782 @ 164743: PUSHI #0x00006a00 16783 @ 164748: PUSH AWORK 16784 @ 164751: PUSHI #0x00000004 16785 @ 164756: LSH 16786 @ 164757: ADD 16787 @ 164758: PUSH ACTUAL 16788 @ 164761: PUSHI #0x0000002a 16789 @ 164766: ACCESS 16790 @ 164767: ADD 16791 @ 164768: ASSPAR 16792 @ 164769: CALL 16793 @ 164770: LINE 2784 "regression-compile-tmp/asems412.imp" 16794 @ 164809: PUSH DUMP 16795 @ 164812: PUSH FRACPTG 16796 @ 164815: ASSPAR 16797 @ 164816: CALL 2785 DUMP(LER+AWORK<<4+AWORK) 16798 @ 164817: LINE 2785 "regression-compile-tmp/asems412.imp" 16799 @ 164856: PUSH DUMP 16800 @ 164859: PUSHI #0x00002800 16801 @ 164864: PUSH AWORK 16802 @ 164867: PUSHI #0x00000004 16803 @ 164872: LSH 16804 @ 164873: ADD 16805 @ 164874: PUSH AWORK 16806 @ 164877: ADD 16807 @ 164878: ASSPAR 16808 @ 164879: CALL 2786 DUMP(SER+AREG<<4+AWORK) 16809 @ 164880: LINE 2786 "regression-compile-tmp/asems412.imp" 16810 @ 164919: PUSH DUMP 16811 @ 164922: PUSHI #0x00002b00 16812 @ 164927: PUSH AREG 16813 @ 164930: PUSHI #0x00000004 16814 @ 164935: LSH 16815 @ 164936: ADD 16816 @ 164937: PUSH AWORK 16817 @ 164940: ADD 16818 @ 164941: ASSPAR 16819 @ 164942: CALL 2787 DUMP(X'2313'); ! BNMFS .+3 16820 @ 164943: LINE 2787 "regression-compile-tmp/asems412.imp" 16821 @ 164982: PUSH DUMP 16822 @ 164985: PUSHI #0x00002313 16823 @ 164990: ASSPAR 16824 @ 164991: CALL 2788 DUMP(AE+AREG<<4+ACTUAL(GLA)); DUMP(FRACPT G+4) 16825 @ 164992: LINE 2788 "regression-compile-tmp/asems412.imp" 16826 @ 165031: PUSH DUMP 16827 @ 165034: PUSHI #0x00006a00 16828 @ 165039: PUSH AREG 16829 @ 165042: PUSHI #0x00000004 16830 @ 165047: LSH 16831 @ 165048: ADD 16832 @ 165049: PUSH ACTUAL 16833 @ 165052: PUSHI #0x0000002a 16834 @ 165057: ACCESS 16835 @ 165058: ADD 16836 @ 165059: ASSPAR 16837 @ 165060: CALL 16838 @ 165061: LINE 2788 "regression-compile-tmp/asems412.imp" 16839 @ 165100: PUSH DUMP 16840 @ 165103: PUSH FRACPTG 16841 @ 165106: PUSHI #0x00000004 16842 @ 165111: ADD 16843 @ 165112: ASSPAR 16844 @ 165113: CALL 2789 FORGET(REG); FORGET(WORK) 16845 @ 165114: LINE 2789 "regression-compile-tmp/asems412.imp" 16846 @ 165153: PUSH FORGET 16847 @ 165156: PUSH REG 16848 @ 165159: ASSPAR 16849 @ 165160: CALL 16850 @ 165161: LINE 2789 "regression-compile-tmp/asems412.imp" 16851 @ 165200: PUSH FORGET 16852 @ 165203: PUSH WORK 16853 @ 165206: ASSPAR 16854 @ 165207: CALL 2790 %RETURN 16855 @ 165208: LINE 2790 "regression-compile-tmp/asems412.imp" 16856 @ 165247: RETURN 2791 B(11):! INT 16857 @ 165248: LINE 2791 "regression-compile-tmp/asems412.imp" 16858 @ 165287: PUSHI #0x0000000b 16859 @ 165292: SLABEL 335 2792 INT G = SET(X'4080', 0) %IF INT G = 0;! =0.5 16860 @ 165295: LINE 2792 "regression-compile-tmp/asems412.imp" 16861 @ 165334: PUSH INTG 16862 @ 165337: PUSHI #0x00000000 16863 @ 165342: JUMPIF # L_000a 16864 @ 165346: PUSH INTG 16865 @ 165349: PUSH SET 16866 @ 165352: PUSHI #0x00004080 16867 @ 165357: ASSPAR 16868 @ 165358: PUSHI #0x00000000 16869 @ 165363: ASSPAR 16870 @ 165364: CALL 16871 @ 165365: ASSVAL 16872 @ 165366: LOCATE L_000a 2793 STACK(INT G, GLA, REALS, 1, 0, 0, 0); OPERATE(ADD) 16873 @ 165369: LINE 2793 "regression-compile-tmp/asems412.imp" 16874 @ 165408: PUSH STACK 16875 @ 165411: PUSH INTG 16876 @ 165414: ASSPAR 16877 @ 165415: PUSHI #0x0000002a 16878 @ 165420: ASSPAR 16879 @ 165421: PUSHI #0x00000006 16880 @ 165426: ASSPAR 16881 @ 165427: PUSHI #0x00000001 16882 @ 165432: ASSPAR 16883 @ 165433: PUSHI #0x00000000 16884 @ 165438: ASSPAR 16885 @ 165439: PUSHI #0x00000000 16886 @ 165444: ASSPAR 16887 @ 165445: PUSHI #0x00000000 16888 @ 165450: ASSPAR 16889 @ 165451: CALL 16890 @ 165452: LINE 2793 "regression-compile-tmp/asems412.imp" 16891 @ 165491: PUSH OPERATE 16892 @ 165494: PUSHI #0x00000003 16893 @ 165499: ASSPAR 16894 @ 165500: CALL 2794 SET LHS 16895 @ 165501: LINE 2794 "regression-compile-tmp/asems412.imp" 16896 @ 165540: PUSH SETLHS 16897 @ 165543: CALL 2795 B(10):! INTPT 16898 @ 165544: LINE 2795 "regression-compile-tmp/asems412.imp" 16899 @ 165583: PUSHI #0x0000000a 16900 @ 165588: SLABEL 335 2796 LOAD(LHS, ANYF) 16901 @ 165591: LINE 2796 "regression-compile-tmp/asems412.imp" 16902 @ 165630: PUSH LOAD 16903 @ 165633: PUSH LHS 16904 @ 165636: ASSPAR 16905 @ 165637: PUSHI #0x0000002f 16906 @ 165642: ASSPAR 16907 @ 165643: CALL 2797 L = GPR(0); RR(FXR, L, LHS_BASE) 16908 @ 165644: LINE 2797 "regression-compile-tmp/asems412.imp" 16909 @ 165683: PUSH L 16910 @ 165686: PUSH GPR 16911 @ 165689: PUSHI #0x00000000 16912 @ 165694: ASSPAR 16913 @ 165695: CALL 16914 @ 165696: ASSVAL 16915 @ 165697: LINE 2797 "regression-compile-tmp/asems412.imp" 16916 @ 165736: PUSH RR 16917 @ 165739: PUSHI #0x00002e00 16918 @ 165744: ASSPAR 16919 @ 165745: PUSH L 16920 @ 165748: ASSPAR 16921 @ 165749: PUSH LHS 16922 @ 165752: SELECT 6 16923 @ 165755: ASSPAR 16924 @ 165756: CALL 2798 CLAIM(L); LHS_BASE = L; LHS_TYPE = INTEGER 16925 @ 165757: LINE 2798 "regression-compile-tmp/asems412.imp" 16926 @ 165796: PUSH CLAIM 16927 @ 165799: PUSH L 16928 @ 165802: ASSPAR 16929 @ 165803: CALL 16930 @ 165804: LINE 2798 "regression-compile-tmp/asems412.imp" 16931 @ 165843: PUSH LHS 16932 @ 165846: SELECT 6 16933 @ 165849: PUSH L 16934 @ 165852: ASSVAL 16935 @ 165853: LINE 2798 "regression-compile-tmp/asems412.imp" 16936 @ 165892: PUSH LHS 16937 @ 165895: SELECT 8 16938 @ 165898: PUSHI #0x00000001 16939 @ 165903: ASSVAL 2799 %RETURN 16940 @ 165904: LINE 2799 "regression-compile-tmp/asems412.imp" 16941 @ 165943: RETURN 2800 B(0):! ADDR 16942 @ 165944: LINE 2800 "regression-compile-tmp/asems412.imp" 16943 @ 165983: PUSHI #0x00000000 16944 @ 165988: SLABEL 335 2801 AMAP(LHS); %RETURN 16945 @ 165991: LINE 2801 "regression-compile-tmp/asems412.imp" 16946 @ 166030: PUSH AMAP 16947 @ 166033: PUSH LHS 16948 @ 166036: ASSPAR 16949 @ 166037: CALL 16950 @ 166038: LINE 2801 "regression-compile-tmp/asems412.imp" 16951 @ 166077: RETURN 2802 B(7):! LENGTH 16952 @ 166078: LINE 2802 "regression-compile-tmp/asems412.imp" 16953 @ 166117: PUSHI #0x00000007 16954 @ 166122: SLABEL 335 2803 CSTACK(0) 16955 @ 166125: LINE 2803 "regression-compile-tmp/asems412.imp" 16956 @ 166164: PUSH CSTACK 16957 @ 166167: PUSHI #0x00000000 16958 @ 166172: ASSPAR 16959 @ 166173: CALL 2804 B(8):! CHARNO 16960 @ 166174: LINE 2804 "regression-compile-tmp/asems412.imp" 16961 @ 166213: PUSHI #0x00000008 16962 @ 166218: SLABEL 335 2805 SET BOTH 16963 @ 166221: LINE 2805 "regression-compile-tmp/asems412.imp" 16964 @ 166260: PUSH SETBOTH 16965 @ 166263: CALL 2806 LHS_TYPE = BYTE; LHS_LENGTH = 1; ARRAY REF 16966 @ 166264: LINE 2806 "regression-compile-tmp/asems412.imp" 16967 @ 166303: PUSH LHS 16968 @ 166306: SELECT 8 16969 @ 166309: PUSHI #0x00000002 16970 @ 166314: ASSVAL 16971 @ 166315: LINE 2806 "regression-compile-tmp/asems412.imp" 16972 @ 166354: PUSH LHS 16973 @ 166357: SELECT 4 16974 @ 166360: PUSHI #0x00000001 16975 @ 166365: ASSVAL 16976 @ 166366: LINE 2806 "regression-compile-tmp/asems412.imp" 16977 @ 166405: PUSH ARRAYREF 16978 @ 166408: CALL 2807 %RETURN 16979 @ 166409: LINE 2807 "regression-compile-tmp/asems412.imp" 16980 @ 166448: RETURN 2808 B(4):! STRING 16981 @ 166449: LINE 2808 "regression-compile-tmp/asems412.imp" 16982 @ 166488: PUSHI #0x00000004 16983 @ 166493: SLABEL 335 2809 L = 255 16984 @ 166496: LINE 2809 "regression-compile-tmp/asems412.imp" 16985 @ 166535: PUSH L 16986 @ 166538: PUSHI #0x000000ff 16987 @ 166543: ASSVAL 2810 B(1):! INTEGER 16988 @ 166544: LINE 2810 "regression-compile-tmp/asems412.imp" 16989 @ 166583: PUSHI #0x00000001 16990 @ 166588: SLABEL 335 2811 B(2):! BYTEINTEGER 16991 @ 166591: LINE 2811 "regression-compile-tmp/asems412.imp" 16992 @ 166630: PUSHI #0x00000002 16993 @ 166635: SLABEL 335 2812 B(3):! SHORTINTEGER 16994 @ 166638: LINE 2812 "regression-compile-tmp/asems412.imp" 16995 @ 166677: PUSHI #0x00000003 16996 @ 166682: SLABEL 335 2813 B(5):! RECORD 16997 @ 166685: LINE 2813 "regression-compile-tmp/asems412.imp" 16998 @ 166724: PUSHI #0x00000005 16999 @ 166729: SLABEL 335 2814 B(6):! REAL 17000 @ 166732: LINE 2814 "regression-compile-tmp/asems412.imp" 17001 @ 166771: PUSHI #0x00000006 17002 @ 166776: SLABEL 335 2815 VMAP(LHS); LHS_TYPE = T; LHS_LENGTH = L 17003 @ 166779: LINE 2815 "regression-compile-tmp/asems412.imp" 17004 @ 166818: PUSH VMAP 17005 @ 166821: PUSH LHS 17006 @ 166824: ASSPAR 17007 @ 166825: CALL 17008 @ 166826: LINE 2815 "regression-compile-tmp/asems412.imp" 17009 @ 166865: PUSH LHS 17010 @ 166868: SELECT 8 17011 @ 166871: PUSH T 17012 @ 166874: ASSVAL 17013 @ 166875: LINE 2815 "regression-compile-tmp/asems412.imp" 17014 @ 166914: PUSH LHS 17015 @ 166917: SELECT 4 17016 @ 166920: PUSH L 17017 @ 166923: ASSVAL 2816 %RETURN 17018 @ 166924: LINE 2816 "regression-compile-tmp/asems412.imp" 17019 @ 166963: RETURN 2817 B(9):! REM 17020 @ 166964: LINE 2817 "regression-compile-tmp/asems412.imp" 17021 @ 167003: PUSHI #0x00000009 17022 @ 167008: SLABEL 335 2818 SET BOTH 17023 @ 167011: LINE 2818 "regression-compile-tmp/asems412.imp" 17024 @ 167050: PUSH SETBOTH 17025 @ 167053: CALL 2819 OPERATE(REM); %RETURN 17026 @ 167054: LINE 2819 "regression-compile-tmp/asems412.imp" 17027 @ 167093: PUSH OPERATE 17028 @ 167096: PUSHI #0x00000011 17029 @ 167101: ASSPAR 17030 @ 167102: CALL 17031 @ 167103: LINE 2819 "regression-compile-tmp/asems412.imp" 17032 @ 167142: RETURN 2820 B(13):! READSYMBOL 17033 @ 167143: LINE 2820 "regression-compile-tmp/asems412.imp" 17034 @ 167182: PUSHI #0x0000000d 17035 @ 167187: SLABEL 335 2821 LIMEN = CA; !SPECIALLY HERE 17036 @ 167190: LINE 2821 "regression-compile-tmp/asems412.imp" 17037 @ 167229: PUSH LIMEN 17038 @ 167232: PUSH CA 17039 @ 167235: ASSVAL 2822 PERM(RSYM); CLAIM(R1) 17040 @ 167236: LINE 2822 "regression-compile-tmp/asems412.imp" 17041 @ 167275: PUSH PERM 17042 @ 167278: PUSHI #0x0001ef0e 17043 @ 167283: ASSPAR 17044 @ 167284: CALL 17045 @ 167285: LINE 2822 "regression-compile-tmp/asems412.imp" 17046 @ 167324: PUSH CLAIM 17047 @ 167327: PUSHI #0x00000002 17048 @ 167332: ASSPAR 17049 @ 167333: CALL 2823 SSET(R1, 0, V IN R, 0) 17050 @ 167334: LINE 2823 "regression-compile-tmp/asems412.imp" 17051 @ 167373: PUSH SSET 17052 @ 167376: PUSHI #0x00000002 17053 @ 167381: ASSPAR 17054 @ 167382: PUSHI #0x00000000 17055 @ 167387: ASSPAR 17056 @ 167388: PUSHI #0x00000001 17057 @ 167393: ASSPAR 17058 @ 167394: PUSHI #0x00000000 17059 @ 167399: ASSPAR 17060 @ 167400: CALL 2824 ASSIGN(1); %RETURN 17061 @ 167401: LINE 2824 "regression-compile-tmp/asems412.imp" 17062 @ 167440: PUSH ASSIGN 17063 @ 167443: PUSHI #0x00000001 17064 @ 167448: ASSPAR 17065 @ 167449: CALL 17066 @ 167450: LINE 2824 "regression-compile-tmp/asems412.imp" 17067 @ 167489: RETURN 2825 B(14):! TOSTRING 17068 @ 167490: LINE 2825 "regression-compile-tmp/asems412.imp" 17069 @ 167529: PUSHI #0x0000000e 17070 @ 167534: SLABEL 335 2826 CSTACK(255); OPERATE(AND) 17071 @ 167537: LINE 2826 "regression-compile-tmp/asems412.imp" 17072 @ 167576: PUSH CSTACK 17073 @ 167579: PUSHI #0x000000ff 17074 @ 167584: ASSPAR 17075 @ 167585: CALL 17076 @ 167586: LINE 2826 "regression-compile-tmp/asems412.imp" 17077 @ 167625: PUSH OPERATE 17078 @ 167628: PUSHI #0x00000008 17079 @ 167633: ASSPAR 17080 @ 167634: CALL 2827 CSTACK(256); OPERATE(ADD) 17081 @ 167635: LINE 2827 "regression-compile-tmp/asems412.imp" 17082 @ 167674: PUSH CSTACK 17083 @ 167677: PUSHI #0x00000100 17084 @ 167682: ASSPAR 17085 @ 167683: CALL 17086 @ 167684: LINE 2827 "regression-compile-tmp/asems412.imp" 17087 @ 167723: PUSH OPERATE 17088 @ 167726: PUSHI #0x00000003 17089 @ 167731: ASSPAR 17090 @ 167732: CALL 2828 SET LHS 17091 @ 167733: LINE 2828 "regression-compile-tmp/asems412.imp" 17092 @ 167772: PUSH SETLHS 17093 @ 167775: CALL 2829 %IF CONST(LHS) %START 17094 @ 167776: LINE 2829 "regression-compile-tmp/asems412.imp" 17095 @ 167815: PUSH CONST 17096 @ 167818: PUSH LHS 17097 @ 167821: ASSPAR 17098 @ 167822: CALL 17099 @ 167823: bf L_000a 2830 GFIX(2); ADDR = GA; GHALF(LHS_DISP) 17100 @ 167826: LINE 2830 "regression-compile-tmp/asems412.imp" 17101 @ 167865: PUSH GFIX 17102 @ 167868: PUSHI #0x00000002 17103 @ 167873: ASSPAR 17104 @ 167874: CALL 17105 @ 167875: LINE 2830 "regression-compile-tmp/asems412.imp" 17106 @ 167914: PUSH ADDR 17107 @ 167917: PUSH GA 17108 @ 167920: ASSVAL 17109 @ 167921: LINE 2830 "regression-compile-tmp/asems412.imp" 17110 @ 167960: PUSH GHALF 17111 @ 167963: PUSH LHS 17112 @ 167966: SELECT 1 17113 @ 167969: ASSPAR 17114 @ 167970: CALL 2831 LHS_TYPE = STRING; LHS_FORM = V IN S 17115 @ 167971: LINE 2831 "regression-compile-tmp/asems412.imp" 17116 @ 168010: PUSH LHS 17117 @ 168013: SELECT 8 17118 @ 168016: PUSHI #0x00000004 17119 @ 168021: ASSVAL 17120 @ 168022: LINE 2831 "regression-compile-tmp/asems412.imp" 17121 @ 168061: PUSH LHS 17122 @ 168064: SELECT 9 17123 @ 168067: PUSHI #0x00000003 17124 @ 168072: ASSVAL 2832 LHS_BASE = GLA; LHS_DISP = ADDR 17125 @ 168073: LINE 2832 "regression-compile-tmp/asems412.imp" 17126 @ 168112: PUSH LHS 17127 @ 168115: SELECT 6 17128 @ 168118: PUSHI #0x0000002a 17129 @ 168123: ASSVAL 17130 @ 168124: LINE 2832 "regression-compile-tmp/asems412.imp" 17131 @ 168163: PUSH LHS 17132 @ 168166: SELECT 1 17133 @ 168169: PUSH ADDR 17134 @ 168172: ASSVAL 2833 %ELSE 17135 @ 168173: LINE 2833 "regression-compile-tmp/asems412.imp" 17136 @ 168212: GOTO L_0009 17137 @ 168215: LOCATE L_000a 2834 SSTACK(LHS); SET BOTH 17138 @ 168218: LINE 2834 "regression-compile-tmp/asems412.imp" 17139 @ 168257: PUSH SSTACK 17140 @ 168260: PUSH LHS 17141 @ 168263: ASSPAR 17142 @ 168264: CALL 17143 @ 168265: LINE 2834 "regression-compile-tmp/asems412.imp" 17144 @ 168304: PUSH SETBOTH 17145 @ 168307: CALL 2835 LHS_LOP = 0; RELEASE(LHS_BASE) 17146 @ 168308: LINE 2835 "regression-compile-tmp/asems412.imp" 17147 @ 168347: PUSH LHS 17148 @ 168350: SELECT 7 17149 @ 168353: PUSHI #0x00000000 17150 @ 168358: ASSVAL 17151 @ 168359: LINE 2835 "regression-compile-tmp/asems412.imp" 17152 @ 168398: PUSH RELEASE 17153 @ 168401: PUSH LHS 17154 @ 168404: SELECT 6 17155 @ 168407: ASSPAR 17156 @ 168408: CALL 2836 FRAME = (FRAME+1)&(\1) 17157 @ 168409: LINE 2836 "regression-compile-tmp/asems412.imp" 17158 @ 168448: PUSH FRAME 17159 @ 168451: PUSH FRAME 17160 @ 168454: PUSHI #0x00000001 17161 @ 168459: ADD 17162 @ 168460: PUSHI #0x00000001 17163 @ 168465: NOT 17164 @ 168466: AND 17165 @ 168467: ASSVAL 2837 LHS_TYPE = SHORT; LHS_FORM = V IN S 17166 @ 168468: LINE 2837 "regression-compile-tmp/asems412.imp" 17167 @ 168507: PUSH LHS 17168 @ 168510: SELECT 8 17169 @ 168513: PUSHI #0x00000003 17170 @ 168518: ASSVAL 17171 @ 168519: LINE 2837 "regression-compile-tmp/asems412.imp" 17172 @ 168558: PUSH LHS 17173 @ 168561: SELECT 9 17174 @ 168564: PUSHI #0x00000003 17175 @ 168569: ASSVAL 2838 LHS_BASE = LOCAL; LHS_DISP = FRAME 17176 @ 168570: LINE 2838 "regression-compile-tmp/asems412.imp" 17177 @ 168609: PUSH LHS 17178 @ 168612: SELECT 6 17179 @ 168615: PUSH LOCAL 17180 @ 168618: ASSVAL 17181 @ 168619: LINE 2838 "regression-compile-tmp/asems412.imp" 17182 @ 168658: PUSH LHS 17183 @ 168661: SELECT 1 17184 @ 168664: PUSH FRAME 17185 @ 168667: ASSVAL 2839 ASSIGN(1) 17186 @ 168668: LINE 2839 "regression-compile-tmp/asems412.imp" 17187 @ 168707: PUSH ASSIGN 17188 @ 168710: PUSHI #0x00000001 17189 @ 168715: ASSPAR 17190 @ 168716: CALL 2840 SSET(LOCAL, FRAME, V IN S, 0); RHS_TYPE = STRING 17191 @ 168717: LINE 2840 "regression-compile-tmp/asems412.imp" 17192 @ 168756: PUSH SSET 17193 @ 168759: PUSH LOCAL 17194 @ 168762: ASSPAR 17195 @ 168763: PUSH FRAME 17196 @ 168766: ASSPAR 17197 @ 168767: PUSHI #0x00000003 17198 @ 168772: ASSPAR 17199 @ 168773: PUSHI #0x00000000 17200 @ 168778: ASSPAR 17201 @ 168779: CALL 17202 @ 168780: LINE 2840 "regression-compile-tmp/asems412.imp" 17203 @ 168819: PUSH RHS 17204 @ 168822: SELECT 8 17205 @ 168825: PUSHI #0x00000004 17206 @ 168830: ASSVAL 2841 FRAME = FRAME+2 17207 @ 168831: LINE 2841 "regression-compile-tmp/asems412.imp" 17208 @ 168870: PUSH FRAME 17209 @ 168873: PUSH FRAME 17210 @ 168876: PUSHI #0x00000002 17211 @ 168881: ADD 17212 @ 168882: ASSVAL 2842 %FINISH 17213 @ 168883: LINE 2842 "regression-compile-tmp/asems412.imp" 17214 @ 168922: LOCATE L_0009 2843 %RETURN 17215 @ 168925: LINE 2843 "regression-compile-tmp/asems412.imp" 17216 @ 168964: RETURN 2844 B(15):! SVC(N, P) 17217 @ 168965: LINE 2844 "regression-compile-tmp/asems412.imp" 17218 @ 169004: PUSHI #0x0000000f 17219 @ 169009: SLABEL 335 2845 SET BOTH; STP = STP-2 17220 @ 169012: LINE 2845 "regression-compile-tmp/asems412.imp" 17221 @ 169051: PUSH SETBOTH 17222 @ 169054: CALL 17223 @ 169055: LINE 2845 "regression-compile-tmp/asems412.imp" 17224 @ 169094: PUSH STP 17225 @ 169097: PUSH STP 17226 @ 169100: PUSHI #0x00000002 17227 @ 169105: SUB 17228 @ 169106: ASSVAL 2846 REG = 0; WORK = LHS_DISP 17229 @ 169107: LINE 2846 "regression-compile-tmp/asems412.imp" 17230 @ 169146: PUSH REG 17231 @ 169149: PUSHI #0x00000000 17232 @ 169154: ASSVAL 17233 @ 169155: LINE 2846 "regression-compile-tmp/asems412.imp" 17234 @ 169194: PUSH WORK 17235 @ 169197: PUSH LHS 17236 @ 169200: SELECT 1 17237 @ 169203: ASSVAL 2847 %UNLESS CONST(LHS) %START 17238 @ 169204: LINE 2847 "regression-compile-tmp/asems412.imp" 17239 @ 169243: PUSH CONST 17240 @ 169246: PUSH LHS 17241 @ 169249: ASSPAR 17242 @ 169250: CALL 17243 @ 169251: bt L_000a 2848 LOAD(LHS, ANY0); WORK = 0; REG = LHS_BASE 17244 @ 169254: LINE 2848 "regression-compile-tmp/asems412.imp" 17245 @ 169293: PUSH LOAD 17246 @ 169296: PUSH LHS 17247 @ 169299: ASSPAR 17248 @ 169300: PUSHI #0x0000002e 17249 @ 169305: ASSPAR 17250 @ 169306: CALL 17251 @ 169307: LINE 2848 "regression-compile-tmp/asems412.imp" 17252 @ 169346: PUSH WORK 17253 @ 169349: PUSHI #0x00000000 17254 @ 169354: ASSVAL 17255 @ 169355: LINE 2848 "regression-compile-tmp/asems412.imp" 17256 @ 169394: PUSH REG 17257 @ 169397: PUSH LHS 17258 @ 169400: SELECT 6 17259 @ 169403: ASSVAL 2849 %FINISH 17260 @ 169404: LINE 2849 "regression-compile-tmp/asems412.imp" 17261 @ 169443: LOCATE L_000a 2850 ADDRESS(RHS) 17262 @ 169446: LINE 2850 "regression-compile-tmp/asems412.imp" 17263 @ 169485: PUSH ADDRESS 17264 @ 169488: PUSH RHS 17265 @ 169491: ASSPAR 17266 @ 169492: CALL 2851 RX(LME, FPR0, RHS_BASE, RHS_DISP) 17267 @ 169493: LINE 2851 "regression-compile-tmp/asems412.imp" 17268 @ 169532: PUSH RX 17269 @ 169535: PUSHI #0x00007200 17270 @ 169540: ASSPAR 17271 @ 169541: PUSHI #0x0000000d 17272 @ 169546: ASSPAR 17273 @ 169547: PUSH RHS 17274 @ 169550: SELECT 6 17275 @ 169553: ASSPAR 17276 @ 169554: PUSH RHS 17277 @ 169557: SELECT 1 17278 @ 169560: ASSPAR 17279 @ 169561: CALL 2852 RX(SVC, 0, REG, WORK) 17280 @ 169562: LINE 2852 "regression-compile-tmp/asems412.imp" 17281 @ 169601: PUSH RX 17282 @ 169604: PUSHI #0x0000e100 17283 @ 169609: ASSPAR 17284 @ 169610: PUSHI #0x00000000 17285 @ 169615: ASSPAR 17286 @ 169616: PUSH REG 17287 @ 169619: ASSPAR 17288 @ 169620: PUSH WORK 17289 @ 169623: ASSPAR 17290 @ 169624: CALL 2853 CLAIM(RHS_BASE) 17291 @ 169625: LINE 2853 "regression-compile-tmp/asems412.imp" 17292 @ 169664: PUSH CLAIM 17293 @ 169667: PUSH RHS 17294 @ 169670: SELECT 6 17295 @ 169673: ASSPAR 17296 @ 169674: CALL 2854 RX(STME, FPR0, RHS_BASE, RHS_DISP) 17297 @ 169675: LINE 2854 "regression-compile-tmp/asems412.imp" 17298 @ 169714: PUSH RX 17299 @ 169717: PUSHI #0x00007100 17300 @ 169722: ASSPAR 17301 @ 169723: PUSHI #0x0000000d 17302 @ 169728: ASSPAR 17303 @ 169729: PUSH RHS 17304 @ 169732: SELECT 6 17305 @ 169735: ASSPAR 17306 @ 169736: PUSH RHS 17307 @ 169739: SELECT 1 17308 @ 169742: ASSPAR 17309 @ 169743: CALL 2855 DROP(RHS); DROP(LHS) 17310 @ 169744: LINE 2855 "regression-compile-tmp/asems412.imp" 17311 @ 169783: PUSH DROP 17312 @ 169786: PUSH RHS 17313 @ 169789: ASSPAR 17314 @ 169790: CALL 17315 @ 169791: LINE 2855 "regression-compile-tmp/asems412.imp" 17316 @ 169830: PUSH DROP 17317 @ 169833: PUSH LHS 17318 @ 169836: ASSPAR 17319 @ 169837: CALL 2856 LIMEN = CA; !FORGET EVERYTHING 17320 @ 169838: LINE 2856 "regression-compile-tmp/asems412.imp" 17321 @ 169877: PUSH LIMEN 17322 @ 169880: PUSH CA 17323 @ 169883: ASSVAL 2857 %RETURN 17324 @ 169884: LINE 2857 "regression-compile-tmp/asems412.imp" 17325 @ 169923: RETURN 2858 %FINISH 17326 @ 169924: LINE 2858 "regression-compile-tmp/asems412.imp" 17327 @ 169963: LOCATE L_0007 2859 HAZARD ALL 17328 @ 169966: LINE 2859 "regression-compile-tmp/asems412.imp" 17329 @ 170005: PUSH HAZARDALL 17330 @ 170008: CALL 2860 %IF ADDR&X'4000' = 0 %START; ! PARAMETER 17331 @ 170009: LINE 2860 "regression-compile-tmp/asems412.imp" 17332 @ 170048: PUSH ADDR 17333 @ 170051: PUSHI #0x00004000 17334 @ 170056: AND 17335 @ 170057: PUSHI #0x00000000 17336 @ 170062: JUMPIF # L_0007 2861 ADDR = NEW TAG; DEFINE REFERENCE(ADDR, R REF) 17337 @ 170066: LINE 2861 "regression-compile-tmp/asems412.imp" 17338 @ 170105: PUSH ADDR 17339 @ 170108: PUSH NEWTAG 17340 @ 170111: CALL 17341 @ 170112: ASSVAL 17342 @ 170113: LINE 2861 "regression-compile-tmp/asems412.imp" 17343 @ 170152: PUSH DEFINEREFERENCE 17344 @ 170155: PUSH ADDR 17345 @ 170158: ASSPAR 17346 @ 170159: PUSHI #0x00000004 17347 @ 170164: ASSPAR 17348 @ 170165: CALL 2862 RX(LA, LINK, CODE, 0);! RETURN ADDRESS 17349 @ 170166: LINE 2862 "regression-compile-tmp/asems412.imp" 17350 @ 170205: PUSH RX 17351 @ 170208: PUSHI #0x0000e600 17352 @ 170213: ASSPAR 17353 @ 170214: PUSHI #0x0000000c 17354 @ 170219: ASSPAR 17355 @ 170220: PUSHI #0x0000002c 17356 @ 170225: ASSPAR 17357 @ 170226: PUSHI #0x00000000 17358 @ 170231: ASSPAR 17359 @ 170232: CALL 2863 RX(STM, P2, WSP, 0) 17360 @ 170233: LINE 2863 "regression-compile-tmp/asems412.imp" 17361 @ 170272: PUSH RX 17362 @ 170275: PUSHI #0x0000d000 17363 @ 170280: ASSPAR 17364 @ 170281: PUSHI #0x00000006 17365 @ 170286: ASSPAR 17366 @ 170287: PUSHI #0x0000002b 17367 @ 170292: ASSPAR 17368 @ 170293: PUSHI #0x00000000 17369 @ 170298: ASSPAR 17370 @ 170299: CALL 2864 RX(LW, R2, V_BASE, V_DISP) 17371 @ 170300: LINE 2864 "regression-compile-tmp/asems412.imp" 17372 @ 170339: PUSH RX 17373 @ 170342: PUSHI #0x00005800 17374 @ 170347: ASSPAR 17375 @ 170348: PUSHI #0x00000003 17376 @ 170353: ASSPAR 17377 @ 170354: PUSH V 17378 @ 170357: SELECT 6 17379 @ 170360: ASSPAR 17380 @ 170361: PUSH V 17381 @ 170364: SELECT 1 17382 @ 170367: ASSPAR 17383 @ 170368: CALL 2865 RX(LW, R3, V_BASE, V_DISP+REGLEN) 17384 @ 170369: LINE 2865 "regression-compile-tmp/asems412.imp" 17385 @ 170408: PUSH RX 17386 @ 170411: PUSHI #0x00005800 17387 @ 170416: ASSPAR 17388 @ 170417: PUSHI #0x00000004 17389 @ 170422: ASSPAR 17390 @ 170423: PUSH V 17391 @ 170426: SELECT 6 17392 @ 170429: ASSPAR 17393 @ 170430: PUSH V 17394 @ 170433: SELECT 1 17395 @ 170436: PUSHI #0x00000004 17396 @ 170441: ADD 17397 @ 170442: ASSPAR 17398 @ 170443: CALL 2866 CLAIM(R2); RX(LM, R9, R2, 4*REGLEN) 17399 @ 170444: LINE 2866 "regression-compile-tmp/asems412.imp" 17400 @ 170483: PUSH CLAIM 17401 @ 170486: PUSHI #0x00000003 17402 @ 170491: ASSPAR 17403 @ 170492: CALL 17404 @ 170493: LINE 2866 "regression-compile-tmp/asems412.imp" 17405 @ 170532: PUSH RX 17406 @ 170535: PUSHI #0x0000d100 17407 @ 170540: ASSPAR 17408 @ 170541: PUSHI #0x00000008 17409 @ 170546: ASSPAR 17410 @ 170547: PUSHI #0x00000003 17411 @ 170552: ASSPAR 17412 @ 170553: PUSHI #0x00000004 17413 @ 170558: PUSHI #0x00000004 17414 @ 170563: MUL 17415 @ 170564: ASSPAR 17416 @ 170565: CALL 2867 CLAIM(R3); RX(BAL, LINK, R3, 4) 17417 @ 170566: LINE 2867 "regression-compile-tmp/asems412.imp" 17418 @ 170605: PUSH CLAIM 17419 @ 170608: PUSHI #0x00000004 17420 @ 170613: ASSPAR 17421 @ 170614: CALL 17422 @ 170615: LINE 2867 "regression-compile-tmp/asems412.imp" 17423 @ 170654: PUSH RX 17424 @ 170657: PUSHI #0x00004100 17425 @ 170662: ASSPAR 17426 @ 170663: PUSHI #0x0000000c 17427 @ 170668: ASSPAR 17428 @ 170669: PUSHI #0x00000004 17429 @ 170674: ASSPAR 17430 @ 170675: PUSHI #0x00000004 17431 @ 170680: ASSPAR 17432 @ 170681: CALL 2868 DEFINE TAG(ADDR) 17433 @ 170682: LINE 2868 "regression-compile-tmp/asems412.imp" 17434 @ 170721: PUSH DEFINETAG 17435 @ 170724: PUSH ADDR 17436 @ 170727: ASSPAR 17437 @ 170728: CALL 2869 %ELSE 17438 @ 170729: LINE 2869 "regression-compile-tmp/asems412.imp" 17439 @ 170768: GOTO L_0006 17440 @ 170771: LOCATE L_0007 2870 DEFINE REFERENCE(ADDR&X'FFF', R REF) 17441 @ 170774: LINE 2870 "regression-compile-tmp/asems412.imp" 17442 @ 170813: PUSH DEFINEREFERENCE 17443 @ 170816: PUSH ADDR 17444 @ 170819: PUSHI #0x00000fff 17445 @ 170824: AND 17446 @ 170825: ASSPAR 17447 @ 170826: PUSHI #0x00000004 17448 @ 170831: ASSPAR 17449 @ 170832: CALL 2871 RX(BAL, LINK, CODE, ADDR&X'FFF') 17450 @ 170833: LINE 2871 "regression-compile-tmp/asems412.imp" 17451 @ 170872: PUSH RX 17452 @ 170875: PUSHI #0x00004100 17453 @ 170880: ASSPAR 17454 @ 170881: PUSHI #0x0000000c 17455 @ 170886: ASSPAR 17456 @ 170887: PUSHI #0x0000002c 17457 @ 170892: ASSPAR 17458 @ 170893: PUSH ADDR 17459 @ 170896: PUSHI #0x00000fff 17460 @ 170901: AND 17461 @ 170902: ASSPAR 17462 @ 170903: CALL 2872 %FINISH 17463 @ 170904: LINE 2872 "regression-compile-tmp/asems412.imp" 17464 @ 170943: LOCATE L_0006 2873 LIMEN = CA-1 17465 @ 170946: LINE 2873 "regression-compile-tmp/asems412.imp" 17466 @ 170985: PUSH LIMEN 17467 @ 170988: PUSH CA 17468 @ 170991: PUSHI #0x00000001 17469 @ 170996: SUB 17470 @ 170997: ASSVAL 2874 %FINISH 17471 @ 170998: LINE 2874 "regression-compile-tmp/asems412.imp" 17472 @ 171037: LOCATE L_0003 2875 DROP(V) %IF V_TYPE = 0 17473 @ 171040: LINE 2875 "regression-compile-tmp/asems412.imp" 17474 @ 171079: PUSH V 17475 @ 171082: SELECT 8 17476 @ 171085: PUSHI #0x00000000 17477 @ 171090: JUMPIF # L_0004 17478 @ 171094: PUSH DROP 17479 @ 171097: PUSH V 17480 @ 171100: ASSPAR 17481 @ 171101: CALL 17482 @ 171102: LOCATE L_0004 2876 %END 17483 @ 171105: LINE 2876 "regression-compile-tmp/asems412.imp" 17484 @ 171144: END _lev0id0_ASSEMBLE_CALL {lev=3 --> 2} 2877 %ROUTINE FOR 17485 @ 171145: LINE 2877 "regression-compile-tmp/asems412.imp" 17486 @ 171184: DEF FOR (_lev0id0_ASSEMBLE_FOR) p1=V_014e 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 17487 @ 171199: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 17488 @ 171200: FINISH ) {lev=3} 2878 %RECORD(STACKFM)%NAME CV, IV, INC, FV 17489 @ 171201: LINE 2878 "regression-compile-tmp/asems412.imp" 17490 @ 171240: DEF CV p1=V_014f a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 17491 @ 171254: DEF IV p1=V_0150 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 17492 @ 171268: DEF INC p1=V_0151 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 17493 @ 171283: DEF FV p1=V_0152 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2879 %INTEGER LAB, REG, SPECIAL 17494 @ 171297: LINE 2879 "regression-compile-tmp/asems412.imp" 17495 @ 171336: DEF LAB p1=V_0153 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 17496 @ 171351: DEF REG p1=V_0154 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 17497 @ 171366: DEF SPECIAL p1=V_0155 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 2880 %ROUTINE STAB(%RECORD(STACKFM)%NAME V, %INTEGER TYPE) 17498 @ 171385: LINE 2880 "regression-compile-tmp/asems412.imp" 17499 @ 171424: DEF STAB (_lev0id0_ASSEMBLE_FOR_STAB) p1=V_0156 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 17500 @ 171440: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 17501 @ 171441: DEF V p1=V_0157 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 17502 @ 171454: DEF TYPE p1=V_0158 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 17503 @ 171470: FINISH ) {lev=4} 2881 %INTEGER T, R 17504 @ 171471: LINE 2881 "regression-compile-tmp/asems412.imp" 17505 @ 171510: DEF T p1=V_0159 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 17506 @ 171523: DEF R p1=V_015a 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 2882 %RETURN %IF CONST(V) 17507 @ 171536: LINE 2882 "regression-compile-tmp/asems412.imp" 17508 @ 171575: PUSH CONST 17509 @ 171578: PUSH V 17510 @ 171581: ASSPAR 17511 @ 171582: CALL 17512 @ 171583: bf L_0004 17513 @ 171586: RETURN 17514 @ 171587: LOCATE L_0004 2883 LOAD(V, ANY); R = V_BASE 17515 @ 171590: LINE 2883 "regression-compile-tmp/asems412.imp" 17516 @ 171629: PUSH LOAD 17517 @ 171632: PUSH V 17518 @ 171635: ASSPAR 17519 @ 171636: PUSHI #0x0000002d 17520 @ 171641: ASSPAR 17521 @ 171642: CALL 17522 @ 171643: LINE 2883 "regression-compile-tmp/asems412.imp" 17523 @ 171682: PUSH R 17524 @ 171685: PUSH V 17525 @ 171688: SELECT 6 17526 @ 171691: ASSVAL 2884 T = TEMP; RX(ST, R, LOCAL, T) 17527 @ 171692: LINE 2884 "regression-compile-tmp/asems412.imp" 17528 @ 171731: PUSH T 17529 @ 171734: PUSH TEMP 17530 @ 171737: CALL 17531 @ 171738: ASSVAL 17532 @ 171739: LINE 2884 "regression-compile-tmp/asems412.imp" 17533 @ 171778: PUSH RX 17534 @ 171781: PUSHI #0x00005000 17535 @ 171786: ASSPAR 17536 @ 171787: PUSH R 17537 @ 171790: ASSPAR 17538 @ 171791: PUSH LOCAL 17539 @ 171794: ASSPAR 17540 @ 171795: PUSH T 17541 @ 171798: ASSPAR 17542 @ 171799: CALL 2885 RELEASE(R) 17543 @ 171800: LINE 2885 "regression-compile-tmp/asems412.imp" 17544 @ 171839: PUSH RELEASE 17545 @ 171842: PUSH R 17546 @ 171845: ASSPAR 17547 @ 171846: CALL 2886 V_BASE = LOCAL; V_DISP = T 17548 @ 171847: LINE 2886 "regression-compile-tmp/asems412.imp" 17549 @ 171886: PUSH V 17550 @ 171889: SELECT 6 17551 @ 171892: PUSH LOCAL 17552 @ 171895: ASSVAL 17553 @ 171896: LINE 2886 "regression-compile-tmp/asems412.imp" 17554 @ 171935: PUSH V 17555 @ 171938: SELECT 1 17556 @ 171941: PUSH T 17557 @ 171944: ASSVAL 2887 V_TYPE = TYPE; V_FORM = V IN S 17558 @ 171945: LINE 2887 "regression-compile-tmp/asems412.imp" 17559 @ 171984: PUSH V 17560 @ 171987: SELECT 8 17561 @ 171990: PUSH TYPE 17562 @ 171993: ASSVAL 17563 @ 171994: LINE 2887 "regression-compile-tmp/asems412.imp" 17564 @ 172033: PUSH V 17565 @ 172036: SELECT 9 17566 @ 172039: PUSHI #0x00000003 17567 @ 172044: ASSVAL 2888 REMEMBER(R, V) 17568 @ 172045: LINE 2888 "regression-compile-tmp/asems412.imp" 17569 @ 172084: PUSH REMEMBER 17570 @ 172087: PUSH R 17571 @ 172090: ASSPAR 17572 @ 172091: PUSH V 17573 @ 172094: ASSPAR 17574 @ 172095: CALL 2889 %END 17575 @ 172096: LINE 2889 "regression-compile-tmp/asems412.imp" 17576 @ 172135: END _lev0id0_ASSEMBLE_FOR_STAB {lev=4 --> 3} 2890 %PREDICATE CHECK REQD 17577 @ 172136: LINE 2890 "regression-compile-tmp/asems412.imp" 17578 @ 172175: DEF CHECKREQD (_lev0id0_ASSEMBLE_FOR_CHECKREQD) p1=V_0157 a/tf=a b/format=0 c/ostate=0 type=0 () form=10 (predicate) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 17579 @ 172196: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 17580 @ 172197: FINISH ) {lev=4} 2891 %INTEGER I 17581 @ 172198: LINE 2891 "regression-compile-tmp/asems412.imp" 17582 @ 172237: DEF I p1=V_0158 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 2892 %TRUE %UNLESS CONST(FV) %AND CONST(IV) %AND CONST(INC) 17583 @ 172250: LINE 2892 "regression-compile-tmp/asems412.imp" 17584 @ 172289: PUSH CONST 17585 @ 172292: PUSH FV 17586 @ 172295: ASSPAR 17587 @ 172296: CALL 17588 @ 172297: bf L_0005 17589 @ 172300: PUSH CONST 17590 @ 172303: PUSH IV 17591 @ 172306: ASSPAR 17592 @ 172307: CALL 17593 @ 172308: bf L_0005 17594 @ 172311: PUSH CONST 17595 @ 172314: PUSH INC 17596 @ 172317: ASSPAR 17597 @ 172318: CALL 17598 @ 172319: bt L_0004 17599 @ 172322: LOCATE L_0005 17600 @ 172325: TRUE 17601 @ 172326: LOCATE L_0004 2893 %IF INC_DISP # 0 %START 17602 @ 172329: LINE 2893 "regression-compile-tmp/asems412.imp" 17603 @ 172368: PUSH INC 17604 @ 172371: SELECT 1 17605 @ 172374: PUSHI #0x00000000 17606 @ 172379: JUMPIF = L_0004 2894 I = (FV_DISP - IV_DISP)//INC_DISP + 1 17607 @ 172383: LINE 2894 "regression-compile-tmp/asems412.imp" 17608 @ 172422: PUSH I 17609 @ 172425: PUSH FV 17610 @ 172428: SELECT 1 17611 @ 172431: PUSH IV 17612 @ 172434: SELECT 1 17613 @ 172437: SUB 17614 @ 172438: PUSH INC 17615 @ 172441: SELECT 1 17616 @ 172444: QUOT 17617 @ 172445: PUSHI #0x00000001 17618 @ 172450: ADD 17619 @ 172451: ASSVAL 2895 %FALSE %IF I >= 0 %AND IV_DISP + (I-1)*INC_DISP = FV_DISP 17620 @ 172452: LINE 2895 "regression-compile-tmp/asems412.imp" 17621 @ 172491: PUSH I 17622 @ 172494: PUSHI #0x00000000 17623 @ 172499: JUMPIF < L_0007 17624 @ 172503: PUSH IV 17625 @ 172506: SELECT 1 17626 @ 172509: PUSH I 17627 @ 172512: PUSHI #0x00000001 17628 @ 172517: SUB 17629 @ 172518: PUSH INC 17630 @ 172521: SELECT 1 17631 @ 172524: MUL 17632 @ 172525: ADD 17633 @ 172526: PUSH FV 17634 @ 172529: SELECT 1 17635 @ 172532: JUMPIF # L_0007 17636 @ 172536: FALSE 17637 @ 172537: LOCATE L_0007 2896 %FINISH 17638 @ 172540: LINE 2896 "regression-compile-tmp/asems412.imp" 17639 @ 172579: LOCATE L_0004 2897 ABORT(-12); ! ...FAULTY, CONSTANT, %FOR PARAMETERS 17640 @ 172582: LINE 2897 "regression-compile-tmp/asems412.imp" 17641 @ 172621: PUSH ABORT 17642 @ 172624: PUSHI #0x0000000c 17643 @ 172629: NEGATE 17644 @ 172630: ASSPAR 17645 @ 172631: CALL 2898 %TRUE; ! ...INCLUDE RUN-TIME CHECK FOR SAFETY 17646 @ 172632: LINE 2898 "regression-compile-tmp/asems412.imp" 17647 @ 172671: TRUE 2899 %END 17648 @ 172672: LINE 2899 "regression-compile-tmp/asems412.imp" 17649 @ 172711: END _lev0id0_ASSEMBLE_FOR_CHECKREQD {lev=4 --> 3} 2900 %ROUTINE SET(%RECORD(STACKFM)%NAME V, %INTEGER REG) 17650 @ 172712: LINE 2900 "regression-compile-tmp/asems412.imp" 17651 @ 172751: DEF SET (_lev0id0_ASSEMBLE_FOR_SET) p1=V_0158 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 17652 @ 172766: START ( FORMAL PARAMETERS {lev=4 --> 5, nested=0 --> 1} 17653 @ 172767: DEF V p1=V_0159 a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 17654 @ 172780: DEF REG p1=V_015a 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 17655 @ 172795: FINISH ) {lev=4} 2901 %RECORD(STACKFM)%NAME R 17656 @ 172796: LINE 2901 "regression-compile-tmp/asems412.imp" 17657 @ 172835: DEF R p1=V_015b a/tf=42 b/format=86 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 2902 SSTACK(V); R == STACKED(STP)_V 17658 @ 172848: LINE 2902 "regression-compile-tmp/asems412.imp" 17659 @ 172887: PUSH SSTACK 17660 @ 172890: PUSH V 17661 @ 172893: ASSPAR 17662 @ 172894: CALL 17663 @ 172895: LINE 2902 "regression-compile-tmp/asems412.imp" 17664 @ 172934: PUSH R 17665 @ 172937: PUSH STACKED 17666 @ 172940: PUSH STP 17667 @ 172943: ACCESS 17668 @ 172944: SELECT 1 17669 @ 172947: ASSREF 2903 LRD(R, REG) 17670 @ 172948: LINE 2903 "regression-compile-tmp/asems412.imp" 17671 @ 172987: PUSH LRD 17672 @ 172990: PUSH R 17673 @ 172993: ASSPAR 17674 @ 172994: PUSH REG 17675 @ 172997: ASSPAR 17676 @ 172998: CALL 2904 STP = STP-1 17677 @ 172999: LINE 2904 "regression-compile-tmp/asems412.imp" 17678 @ 173038: PUSH STP 17679 @ 173041: PUSH STP 17680 @ 173044: PUSHI #0x00000001 17681 @ 173049: SUB 17682 @ 173050: ASSVAL 2905 %END 2906 17683 @ 173051: LINE 2905 "regression-compile-tmp/asems412.imp" 17684 @ 173090: END _lev0id0_ASSEMBLE_FOR_SET {lev=4 --> 3} 2907 SPECIAL = 0 17685 @ 173091: LINE 2907 "regression-compile-tmp/asems412.imp" 17686 @ 173130: PUSH SPECIAL 17687 @ 173133: PUSHI #0x00000000 17688 @ 173138: ASSVAL 2908 CV == STACKED(STP-3)_V 17689 @ 173139: LINE 2908 "regression-compile-tmp/asems412.imp" 17690 @ 173178: PUSH CV 17691 @ 173181: PUSH STACKED 17692 @ 173184: PUSH STP 17693 @ 173187: PUSHI #0x00000003 17694 @ 173192: SUB 17695 @ 173193: ACCESS 17696 @ 173194: SELECT 1 17697 @ 173197: ASSREF 2909 IV == STACKED(STP-2)_V 17698 @ 173198: LINE 2909 "regression-compile-tmp/asems412.imp" 17699 @ 173237: PUSH IV 17700 @ 173240: PUSH STACKED 17701 @ 173243: PUSH STP 17702 @ 173246: PUSHI #0x00000002 17703 @ 173251: SUB 17704 @ 173252: ACCESS 17705 @ 173253: SELECT 1 17706 @ 173256: ASSREF 2910 INC== STACKED(STP-1)_V 17707 @ 173257: LINE 2910 "regression-compile-tmp/asems412.imp" 17708 @ 173296: PUSH INC 17709 @ 173299: PUSH STACKED 17710 @ 173302: PUSH STP 17711 @ 173305: PUSHI #0x00000001 17712 @ 173310: SUB 17713 @ 173311: ACCESS 17714 @ 173312: SELECT 1 17715 @ 173315: ASSREF 2911 FV == STACKED(STP )_V 17716 @ 173316: LINE 2911 "regression-compile-tmp/asems412.imp" 17717 @ 173355: PUSH FV 17718 @ 173358: PUSH STACKED 17719 @ 173361: PUSH STP 17720 @ 173364: ACCESS 17721 @ 173365: SELECT 1 17722 @ 173368: ASSREF 2912 SKIPSYMBOL; LAB = TAG 17723 @ 173369: LINE 2912 "regression-compile-tmp/asems412.imp" 17724 @ 173408: PUSH SKIPSYMBOL 17725 @ 173411: CALL 17726 @ 173412: LINE 2912 "regression-compile-tmp/asems412.imp" 17727 @ 173451: PUSH LAB 17728 @ 173454: PUSH TAG 17729 @ 173457: CALL 17730 @ 173458: ASSVAL 2913 STAB(INC,INTEGER); STAB(FV,INTEGER) 17731 @ 173459: LINE 2913 "regression-compile-tmp/asems412.imp" 17732 @ 173498: PUSH STAB 17733 @ 173501: PUSH INC 17734 @ 173504: ASSPAR 17735 @ 173505: PUSHI #0x00000001 17736 @ 173510: ASSPAR 17737 @ 173511: CALL 17738 @ 173512: LINE 2913 "regression-compile-tmp/asems412.imp" 17739 @ 173551: PUSH STAB 17740 @ 173554: PUSH FV 17741 @ 173557: ASSPAR 17742 @ 173558: PUSHI #0x00000001 17743 @ 173563: ASSPAR 17744 @ 173564: CALL 2914 %IF CONTROL&FORDIAG # 0 %AND CHECK REQD %START 17745 @ 173565: LINE 2914 "regression-compile-tmp/asems412.imp" 17746 @ 173604: PUSH CONTROL 17747 @ 173607: PUSHI #0x00000008 17748 @ 173612: AND 17749 @ 173613: PUSHI #0x00000000 17750 @ 173618: JUMPIF = L_0004 17751 @ 173622: PUSH CHECKREQD 17752 @ 173625: CALL 17753 @ 173626: bf L_0004 2915 STAB(IV,INTEGER) 17754 @ 173629: LINE 2915 "regression-compile-tmp/asems412.imp" 17755 @ 173668: PUSH STAB 17756 @ 173671: PUSH IV 17757 @ 173674: ASSPAR 17758 @ 173675: PUSHI #0x00000001 17759 @ 173680: ASSPAR 17760 @ 173681: CALL 2916 SET(IV,R0); SET(FV,R1); SET(INC,R2) 17761 @ 173682: LINE 2916 "regression-compile-tmp/asems412.imp" 17762 @ 173721: PUSH SET 17763 @ 173724: PUSH IV 17764 @ 173727: ASSPAR 17765 @ 173728: PUSHI #0x00000001 17766 @ 173733: ASSPAR 17767 @ 173734: CALL 17768 @ 173735: LINE 2916 "regression-compile-tmp/asems412.imp" 17769 @ 173774: PUSH SET 17770 @ 173777: PUSH FV 17771 @ 173780: ASSPAR 17772 @ 173781: PUSHI #0x00000002 17773 @ 173786: ASSPAR 17774 @ 173787: CALL 17775 @ 173788: LINE 2916 "regression-compile-tmp/asems412.imp" 17776 @ 173827: PUSH SET 17777 @ 173830: PUSH INC 17778 @ 173833: ASSPAR 17779 @ 173834: PUSHI #0x00000003 17780 @ 173839: ASSPAR 17781 @ 173840: CALL 2917 PERM(FORTEST) 17782 @ 173841: LINE 2917 "regression-compile-tmp/asems412.imp" 17783 @ 173880: PUSH PERM 17784 @ 173883: PUSHI #0x0001ef18 17785 @ 173888: ASSPAR 17786 @ 173889: CALL 2918 %FINISH 17787 @ 173890: LINE 2918 "regression-compile-tmp/asems412.imp" 17788 @ 173929: LOCATE L_0004 2919 %IF CV_FORM # V IN S %OR ACTIVITY(CV_BASE) >= 0 %START 17789 @ 173932: LINE 2919 "regression-compile-tmp/asems412.imp" 17790 @ 173971: PUSH CV 17791 @ 173974: SELECT 9 17792 @ 173977: PUSHI #0x00000003 17793 @ 173982: JUMPIF # L_0005 17794 @ 173986: PUSH ACTIVITY 17795 @ 173989: PUSH CV 17796 @ 173992: SELECT 6 17797 @ 173995: ACCESS 17798 @ 173996: PUSHI #0x00000000 17799 @ 174001: JUMPIF < L_0004 17800 @ 174005: LOCATE L_0005 2920 AMAP(CV) 17801 @ 174008: LINE 2920 "regression-compile-tmp/asems412.imp" 17802 @ 174047: PUSH AMAP 17803 @ 174050: PUSH CV 17804 @ 174053: ASSPAR 17805 @ 174054: CALL 2921 STAB(CV, CV_TYPE) 17806 @ 174055: LINE 2921 "regression-compile-tmp/asems412.imp" 17807 @ 174094: PUSH STAB 17808 @ 174097: PUSH CV 17809 @ 174100: ASSPAR 17810 @ 174101: PUSH CV 17811 @ 174104: SELECT 8 17812 @ 174107: ASSPAR 17813 @ 174108: CALL 2922 CV_FORM = A IN S 17814 @ 174109: LINE 2922 "regression-compile-tmp/asems412.imp" 17815 @ 174148: PUSH CV 17816 @ 174151: SELECT 9 17817 @ 174154: PUSHI #0x00000002 17818 @ 174159: ASSVAL 2923 %FINISH 17819 @ 174160: LINE 2923 "regression-compile-tmp/asems412.imp" 17820 @ 174199: LOCATE L_0004 2924 SPECIAL = CONTROL&512 %IF CONST(FV) %AND CONST(INC) %C 2925 %AND CONST(IV) %AND FV_DISP+INC_DISP # IV_DISP 17821 @ 174202: LINE 2924 "regression-compile-tmp/asems412.imp" 17822 @ 174241: PUSH CONST 17823 @ 174244: PUSH FV 17824 @ 174247: ASSPAR 17825 @ 174248: CALL 17826 @ 174249: bf L_0004 17827 @ 174252: PUSH CONST 17828 @ 174255: PUSH INC 17829 @ 174258: ASSPAR 17830 @ 174259: CALL 17831 @ 174260: bf L_0004 17832 @ 174263: PUSH CONST 17833 @ 174266: PUSH IV 17834 @ 174269: ASSPAR 17835 @ 174270: CALL 17836 @ 174271: bf L_0004 17837 @ 174274: PUSH FV 17838 @ 174277: SELECT 1 17839 @ 174280: PUSH INC 17840 @ 174283: SELECT 1 17841 @ 174286: ADD 17842 @ 174287: PUSH IV 17843 @ 174290: SELECT 1 17844 @ 174293: JUMPIF = L_0004 17845 @ 174297: PUSH SPECIAL 17846 @ 174300: PUSH CONTROL 17847 @ 174303: PUSHI #0x00000200 17848 @ 174308: AND 17849 @ 174309: ASSVAL 17850 @ 174310: LOCATE L_0004 2926 STP = STP-4 17851 @ 174313: LINE 2926 "regression-compile-tmp/asems412.imp" 17852 @ 174352: PUSH STP 17853 @ 174355: PUSH STP 17854 @ 174358: PUSHI #0x00000004 17855 @ 174363: SUB 17856 @ 174364: ASSVAL 2927 SSTACK(CV); SSTACK(IV); RELEASE(IV_BASE); SSTACK(INC) 17857 @ 174365: LINE 2927 "regression-compile-tmp/asems412.imp" 17858 @ 174404: PUSH SSTACK 17859 @ 174407: PUSH CV 17860 @ 174410: ASSPAR 17861 @ 174411: CALL 17862 @ 174412: LINE 2927 "regression-compile-tmp/asems412.imp" 17863 @ 174451: PUSH SSTACK 17864 @ 174454: PUSH IV 17865 @ 174457: ASSPAR 17866 @ 174458: CALL 17867 @ 174459: LINE 2927 "regression-compile-tmp/asems412.imp" 17868 @ 174498: PUSH RELEASE 17869 @ 174501: PUSH IV 17870 @ 174504: SELECT 6 17871 @ 174507: ASSPAR 17872 @ 174508: CALL 17873 @ 174509: LINE 2927 "regression-compile-tmp/asems412.imp" 17874 @ 174548: PUSH SSTACK 17875 @ 174551: PUSH INC 17876 @ 174554: ASSPAR 17877 @ 174555: CALL 2928 DROP(IV) 17878 @ 174556: LINE 2928 "regression-compile-tmp/asems412.imp" 17879 @ 174595: PUSH DROP 17880 @ 174598: PUSH IV 17881 @ 174601: ASSPAR 17882 @ 174602: CALL 2929 OPERATE(SUB) 17883 @ 174603: LINE 2929 "regression-compile-tmp/asems412.imp" 17884 @ 174642: PUSH OPERATE 17885 @ 174645: PUSHI #0x00000004 17886 @ 174650: ASSPAR 17887 @ 174651: CALL 2930 %IF SPECIAL # 0 %START 17888 @ 174652: LINE 2930 "regression-compile-tmp/asems412.imp" 17889 @ 174691: PUSH SPECIAL 17890 @ 174694: PUSHI #0x00000000 17891 @ 174699: JUMPIF = L_0004 2931 REG = GPR(0); SET LHS; LOAD(LHS, REG) 17892 @ 174703: LINE 2931 "regression-compile-tmp/asems412.imp" 17893 @ 174742: PUSH REG 17894 @ 174745: PUSH GPR 17895 @ 174748: PUSHI #0x00000000 17896 @ 174753: ASSPAR 17897 @ 174754: CALL 17898 @ 174755: ASSVAL 17899 @ 174756: LINE 2931 "regression-compile-tmp/asems412.imp" 17900 @ 174795: PUSH SETLHS 17901 @ 174798: CALL 17902 @ 174799: LINE 2931 "regression-compile-tmp/asems412.imp" 17903 @ 174838: PUSH LOAD 17904 @ 174841: PUSH LHS 17905 @ 174844: ASSPAR 17906 @ 174845: PUSH REG 17907 @ 174848: ASSPAR 17908 @ 174849: CALL 2932 %ELSE 17909 @ 174850: LINE 2932 "regression-compile-tmp/asems412.imp" 17910 @ 174889: GOTO L_0003 17911 @ 174892: LOCATE L_0004 2933 ASSIGN(1); ! CV = CV-INC 17912 @ 174895: LINE 2933 "regression-compile-tmp/asems412.imp" 17913 @ 174934: PUSH ASSIGN 17914 @ 174937: PUSHI #0x00000001 17915 @ 174942: ASSPAR 17916 @ 174943: CALL 2934 %FINISH 17917 @ 174944: LINE 2934 "regression-compile-tmp/asems412.imp" 17918 @ 174983: LOCATE L_0003 2935 DEFINE LABEL(LAB) 17919 @ 174986: LINE 2935 "regression-compile-tmp/asems412.imp" 17920 @ 175025: PUSH DEFINELABEL 17921 @ 175028: PUSH LAB 17922 @ 175031: ASSPAR 17923 @ 175032: CALL 2936 %IF SPECIAL # 0 %START 17924 @ 175033: LINE 2936 "regression-compile-tmp/asems412.imp" 17925 @ 175072: PUSH SPECIAL 17926 @ 175075: PUSHI #0x00000000 17927 @ 175080: JUMPIF = L_0004 2937 FLAB_BASE = CV_BASE; FLAB_DISP = CV_DISP 17928 @ 175084: LINE 2937 "regression-compile-tmp/asems412.imp" 17929 @ 175123: PUSH FLAB 17930 @ 175126: SELECT 4 17931 @ 175129: PUSH CV 17932 @ 175132: SELECT 6 17933 @ 175135: ASSVAL 17934 @ 175136: LINE 2937 "regression-compile-tmp/asems412.imp" 17935 @ 175175: PUSH FLAB 17936 @ 175178: SELECT 6 17937 @ 175181: PUSH CV 17938 @ 175184: SELECT 1 17939 @ 175187: ASSVAL 2938 FLAB_REG = REG 17940 @ 175188: LINE 2938 "regression-compile-tmp/asems412.imp" 17941 @ 175227: PUSH FLAB 17942 @ 175230: SELECT 3 17943 @ 175233: PUSH REG 17944 @ 175236: ASSVAL 2939 FLAB_LIMIT = FV_DISP 17945 @ 175237: LINE 2939 "regression-compile-tmp/asems412.imp" 17946 @ 175276: PUSH FLAB 17947 @ 175279: SELECT 5 17948 @ 175282: PUSH FV 17949 @ 175285: SELECT 1 17950 @ 175288: ASSVAL 2940 SSTACK(INC); OPERATE(ADD); ASSIGN(1) 17951 @ 175289: LINE 2940 "regression-compile-tmp/asems412.imp" 17952 @ 175328: PUSH SSTACK 17953 @ 175331: PUSH INC 17954 @ 175334: ASSPAR 17955 @ 175335: CALL 17956 @ 175336: LINE 2940 "regression-compile-tmp/asems412.imp" 17957 @ 175375: PUSH OPERATE 17958 @ 175378: PUSHI #0x00000003 17959 @ 175383: ASSPAR 17960 @ 175384: CALL 17961 @ 175385: LINE 2940 "regression-compile-tmp/asems412.imp" 17962 @ 175424: PUSH ASSIGN 17963 @ 175427: PUSHI #0x00000001 17964 @ 175432: ASSPAR 17965 @ 175433: CALL 2941 USE(REG) = USE(REG+STORE); ! REMEMBER CONTROL VAR 17966 @ 175434: LINE 2941 "regression-compile-tmp/asems412.imp" 17967 @ 175473: PUSH USE 17968 @ 175476: PUSH REG 17969 @ 175479: ACCESS 17970 @ 175480: PUSH USE 17971 @ 175483: PUSH REG 17972 @ 175486: PUSHI #0x00000014 17973 @ 175491: ADD 17974 @ 175492: ACCESS 17975 @ 175493: ASSVAL 2942 %ELSE 17976 @ 175494: LINE 2942 "regression-compile-tmp/asems412.imp" 17977 @ 175533: GOTO L_0003 17978 @ 175536: LOCATE L_0004 2943 SSTACK(CV); SSTACK(CV) 17979 @ 175539: LINE 2943 "regression-compile-tmp/asems412.imp" 17980 @ 175578: PUSH SSTACK 17981 @ 175581: PUSH CV 17982 @ 175584: ASSPAR 17983 @ 175585: CALL 17984 @ 175586: LINE 2943 "regression-compile-tmp/asems412.imp" 17985 @ 175625: PUSH SSTACK 17986 @ 175628: PUSH CV 17987 @ 175631: ASSPAR 17988 @ 175632: CALL 2944 COMPARE(CV, FV) 17989 @ 175633: LINE 2944 "regression-compile-tmp/asems412.imp" 17990 @ 175672: PUSH COMPARE 17991 @ 175675: PUSH CV 17992 @ 175678: ASSPAR 17993 @ 175679: PUSH FV 17994 @ 175682: ASSPAR 17995 @ 175683: CALL 2945 JUMP TO(LAB-2, 0, REDEFINE) 17996 @ 175684: LINE 2945 "regression-compile-tmp/asems412.imp" 17997 @ 175723: PUSH JUMPTO 17998 @ 175726: PUSH LAB 17999 @ 175729: PUSHI #0x00000002 18000 @ 175734: SUB 18001 @ 175735: ASSPAR 18002 @ 175736: PUSHI #0x00000000 18003 @ 175741: ASSPAR 18004 @ 175742: PUSHI #0x00000001 18005 @ 175747: ASSPAR 18006 @ 175748: CALL 2946 SSTACK(INC); OPERATE(ADD); ASSIGN(1) 18007 @ 175749: LINE 2946 "regression-compile-tmp/asems412.imp" 18008 @ 175788: PUSH SSTACK 18009 @ 175791: PUSH INC 18010 @ 175794: ASSPAR 18011 @ 175795: CALL 18012 @ 175796: LINE 2946 "regression-compile-tmp/asems412.imp" 18013 @ 175835: PUSH OPERATE 18014 @ 175838: PUSHI #0x00000003 18015 @ 175843: ASSPAR 18016 @ 175844: CALL 18017 @ 175845: LINE 2946 "regression-compile-tmp/asems412.imp" 18018 @ 175884: PUSH ASSIGN 18019 @ 175887: PUSHI #0x00000001 18020 @ 175892: ASSPAR 18021 @ 175893: CALL 2947 %FINISH 18022 @ 175894: LINE 2947 "regression-compile-tmp/asems412.imp" 18023 @ 175933: LOCATE L_0003 2948 DROP(CV); DROP(FV); DROP(INC) 18024 @ 175936: LINE 2948 "regression-compile-tmp/asems412.imp" 18025 @ 175975: PUSH DROP 18026 @ 175978: PUSH CV 18027 @ 175981: ASSPAR 18028 @ 175982: CALL 18029 @ 175983: LINE 2948 "regression-compile-tmp/asems412.imp" 18030 @ 176022: PUSH DROP 18031 @ 176025: PUSH FV 18032 @ 176028: ASSPAR 18033 @ 176029: CALL 18034 @ 176030: LINE 2948 "regression-compile-tmp/asems412.imp" 18035 @ 176069: PUSH DROP 18036 @ 176072: PUSH INC 18037 @ 176075: ASSPAR 18038 @ 176076: CALL 2949 %END; ! ... OF 'FOR' 18039 @ 176077: LINE 2949 "regression-compile-tmp/asems412.imp" 18040 @ 176116: END _lev0id0_ASSEMBLE_FOR {lev=3 --> 2} 2950 %ROUTINE ADUMP 18041 @ 176117: LINE 2950 "regression-compile-tmp/asems412.imp" 18042 @ 176156: DEF ADUMP (_lev0id0_ASSEMBLE_ADUMP) p1=V_014f 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 18043 @ 176173: START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} 18044 @ 176174: FINISH ) {lev=3} 2951 %IF OWNTYPE = INTEGER %START 18045 @ 176175: LINE 2951 "regression-compile-tmp/asems412.imp" 18046 @ 176214: PUSH OWNTYPE 18047 @ 176217: PUSHI #0x00000001 18048 @ 176222: JUMPIF # L_0004 2952 GWORD(OWNVAL) 18049 @ 176226: LINE 2952 "regression-compile-tmp/asems412.imp" 18050 @ 176265: PUSH GWORD 18051 @ 176268: PUSH OWNVAL 18052 @ 176271: ASSPAR 18053 @ 176272: CALL 2953 %ELSE %IF OWNTYPE = SHORT 18054 @ 176273: LINE 2953 "regression-compile-tmp/asems412.imp" 18055 @ 176312: GOTO L_0003 18056 @ 176315: LOCATE L_0004 18057 @ 176318: PUSH OWNTYPE 18058 @ 176321: PUSHI #0x00000003 18059 @ 176326: JUMPIF # L_0004 2954 GHALF(OWNVAL) 18060 @ 176330: LINE 2954 "regression-compile-tmp/asems412.imp" 18061 @ 176369: PUSH GHALF 18062 @ 176372: PUSH OWNVAL 18063 @ 176375: ASSPAR 18064 @ 176376: CALL 2955 %ELSE %IF OWNTYPE = BYTE 18065 @ 176377: LINE 2955 "regression-compile-tmp/asems412.imp" 18066 @ 176416: GOTO L_0003 18067 @ 176419: LOCATE L_0004 18068 @ 176422: PUSH OWNTYPE 18069 @ 176425: PUSHI #0x00000002 18070 @ 176430: JUMPIF # L_0004 2956 GBYTE(OWNVAL) 18071 @ 176434: LINE 2956 "regression-compile-tmp/asems412.imp" 18072 @ 176473: PUSH GBYTE 18073 @ 176476: PUSH OWNVAL 18074 @ 176479: ASSPAR 18075 @ 176480: CALL 2957 %ELSE %IF OWNTYPE = STRING 18076 @ 176481: LINE 2957 "regression-compile-tmp/asems412.imp" 18077 @ 176520: GOTO L_0003 18078 @ 176523: LOCATE L_0004 18079 @ 176526: PUSH OWNTYPE 18080 @ 176529: PUSHI #0x00000004 18081 @ 176534: JUMPIF # L_0004 2958 DUMP STRING(DATA SIZE) 18082 @ 176538: LINE 2958 "regression-compile-tmp/asems412.imp" 18083 @ 176577: PUSH DUMPSTRING 18084 @ 176580: PUSH DATASIZE 18085 @ 176583: ASSPAR 18086 @ 176584: CALL 2959 %ELSE %IF OWNTYPE = REALS 18087 @ 176585: LINE 2959 "regression-compile-tmp/asems412.imp" 18088 @ 176624: GOTO L_0003 18089 @ 176627: LOCATE L_0004 18090 @ 176630: PUSH OWNTYPE 18091 @ 176633: PUSHI #0x00000006 18092 @ 176638: JUMPIF # L_0004 2960 GWORD(OWNVAL) %IF REALGA = GA 18093 @ 176642: LINE 2960 "regression-compile-tmp/asems412.imp" 18094 @ 176681: PUSH REALGA 18095 @ 176684: PUSH GA 18096 @ 176687: JUMPIF # L_0007 18097 @ 176691: PUSH GWORD 18098 @ 176694: PUSH OWNVAL 18099 @ 176697: ASSPAR 18100 @ 176698: CALL 18101 @ 176699: LOCATE L_0007 2961 REALGA = GA 18102 @ 176702: LINE 2961 "regression-compile-tmp/asems412.imp" 18103 @ 176741: PUSH REALGA 18104 @ 176744: PUSH GA 18105 @ 176747: ASSVAL 2962 %ELSE 18106 @ 176748: LINE 2962 "regression-compile-tmp/asems412.imp" 18107 @ 176787: GOTO L_0003 18108 @ 176790: LOCATE L_0004 2963 GHALF(0) %FOR VAL = 1,1,DATA SIZE >> 1 18109 @ 176793: LINE 2963 "regression-compile-tmp/asems412.imp" 18110 @ 176832: PUSH VAL 18111 @ 176835: PUSHI #0x00000001 18112 @ 176840: PUSH DATASIZE 18113 @ 176843: PUSHI #0x00000001 18114 @ 176848: RSH 18115 @ 176849: PUSHI #0x00000001 18116 @ 176854: FOR L_0006 18117 @ 176857: PUSH GHALF 18118 @ 176860: PUSHI #0x00000000 18119 @ 176865: ASSPAR 18120 @ 176866: CALL 18121 @ 176867: REPEAT L_0006 18122 @ 176870: LOCATE L_0007 2964 %FINISH 18123 @ 176873: LINE 2964 "regression-compile-tmp/asems412.imp" 18124 @ 176912: LOCATE L_0003 2965 %END 2966 18125 @ 176915: LINE 2965 "regression-compile-tmp/asems412.imp" 18126 @ 176954: END _lev0id0_ASSEMBLE_ADUMP {lev=3 --> 2} 2967 NEXT: READSYMBOL(SYM); ->Z(SYM) 18127 @ 176955: LINE 2967 "regression-compile-tmp/asems412.imp" 18128 @ 176994: LABEL L_0150 18129 @ 176997: LINE 2967 "regression-compile-tmp/asems412.imp" 18130 @ 177036: PUSH READSYMBOL 18131 @ 177039: PUSH SYM 18132 @ 177042: ASSPAR 18133 @ 177043: CALL 18134 @ 177044: LINE 2967 "regression-compile-tmp/asems412.imp" 18135 @ 177083: PUSH SYM 18136 @ 177086: SJUMP 257 2968 Z('O'):ABORT(14) %IF STP # 0 18137 @ 177089: LINE 2968 "regression-compile-tmp/asems412.imp" 18138 @ 177128: PUSHI #0x0000004f 18139 @ 177133: SLABEL 257 18140 @ 177136: LINE 2968 "regression-compile-tmp/asems412.imp" 18141 @ 177175: PUSH STP 18142 @ 177178: PUSHI #0x00000000 18143 @ 177183: JUMPIF = L_0004 18144 @ 177187: PUSH ABORT 18145 @ 177190: PUSHI #0x0000000e 18146 @ 177195: ASSPAR 18147 @ 177196: CALL 18148 @ 177197: LOCATE L_0004 2969 ABORT(19) %UNLESS USING_LINK == NULL 18149 @ 177200: LINE 2969 "regression-compile-tmp/asems412.imp" 18150 @ 177239: PUSH USING 18151 @ 177242: SELECT 2 18152 @ 177245: PUSH NULL 18153 @ 177248: JUMPIFA = L_0004 18154 @ 177252: PUSH ABORT 18155 @ 177255: PUSHI #0x00000013 18156 @ 177260: ASSPAR 18157 @ 177261: CALL 18158 @ 177262: LOCATE L_0004 2970 CHECK RELEASED 18159 @ 177265: LINE 2970 "regression-compile-tmp/asems412.imp" 18160 @ 177304: PUSH CHECKRELEASED 18161 @ 177307: CALL 2971 SET LINE 18162 @ 177308: LINE 2971 "regression-compile-tmp/asems412.imp" 18163 @ 177347: PUSH SETLINE 18164 @ 177350: CALL 2972 MIN TEMP = FRAME 18165 @ 177351: LINE 2972 "regression-compile-tmp/asems412.imp" 18166 @ 177390: PUSH MINTEMP 18167 @ 177393: PUSH FRAME 18168 @ 177396: ASSVAL 2973 DIAG GLA = 0; WDISP = 0 18169 @ 177397: LINE 2973 "regression-compile-tmp/asems412.imp" 18170 @ 177436: PUSH DIAGGLA 18171 @ 177439: PUSHI #0x00000000 18172 @ 177444: ASSVAL 18173 @ 177445: LINE 2973 "regression-compile-tmp/asems412.imp" 18174 @ 177484: PUSH WDISP 18175 @ 177487: PUSHI #0x00000000 18176 @ 177492: ASSVAL 2974 %IF FRAME >= X'4000' %AND WARNING = 0 %START 18177 @ 177493: LINE 2974 "regression-compile-tmp/asems412.imp" 18178 @ 177532: PUSH FRAME 18179 @ 177535: PUSHI #0x00004000 18180 @ 177540: JUMPIF < L_0004 18181 @ 177544: PUSH WARNING 18182 @ 177547: PUSHI #0x00000000 18183 @ 177552: JUMPIF # L_0004 2975 WARN: WARNING = -15; ABORT(-15) 18184 @ 177556: LINE 2975 "regression-compile-tmp/asems412.imp" 18185 @ 177595: LABEL L_0151 18186 @ 177598: LINE 2975 "regression-compile-tmp/asems412.imp" 18187 @ 177637: PUSH WARNING 18188 @ 177640: PUSHI #0x0000000f 18189 @ 177645: NEGATE 18190 @ 177646: ASSVAL 18191 @ 177647: LINE 2975 "regression-compile-tmp/asems412.imp" 18192 @ 177686: PUSH ABORT 18193 @ 177689: PUSHI #0x0000000f 18194 @ 177694: NEGATE 18195 @ 177695: ASSPAR 18196 @ 177696: CALL 2976 %FINISH 18197 @ 177697: LINE 2976 "regression-compile-tmp/asems412.imp" 18198 @ 177736: LOCATE L_0004 2977 ->NEXT 18199 @ 177739: LINE 2977 "regression-compile-tmp/asems412.imp" 18200 @ 177778: JUMP L_0150 2978 Z('$'):DEFINE VAR; ->NEXT 18201 @ 177781: LINE 2978 "regression-compile-tmp/asems412.imp" 18202 @ 177820: PUSHI #0x00000024 18203 @ 177825: SLABEL 257 18204 @ 177828: LINE 2978 "regression-compile-tmp/asems412.imp" 18205 @ 177867: PUSH DEFINEVAR 18206 @ 177870: CALL 18207 @ 177871: LINE 2978 "regression-compile-tmp/asems412.imp" 18208 @ 177910: JUMP L_0150 2979 Z(98):APARM = TAG; ! LOWER CASE 'B' 18209 @ 177913: LINE 2979 "regression-compile-tmp/asems412.imp" 18210 @ 177952: PUSHI #0x00000062 18211 @ 177957: SLABEL 257 18212 @ 177960: LINE 2979 "regression-compile-tmp/asems412.imp" 18213 @ 177999: PUSH APARM 18214 @ 178002: PUSH TAG 18215 @ 178005: CALL 18216 @ 178006: ASSVAL 2980 Z(119):STP = STP-2; ! LOWER CASE 'W' 18217 @ 178007: LINE 2980 "regression-compile-tmp/asems412.imp" 18218 @ 178046: PUSHI #0x00000077 18219 @ 178051: SLABEL 257 18220 @ 178054: LINE 2980 "regression-compile-tmp/asems412.imp" 18221 @ 178093: PUSH STP 18222 @ 178096: PUSH STP 18223 @ 178099: PUSHI #0x00000002 18224 @ 178104: SUB 18225 @ 178105: ASSVAL 2981 VLB = STACKED(STP+1)_V_DISP 18226 @ 178106: LINE 2981 "regression-compile-tmp/asems412.imp" 18227 @ 178145: PUSH VLB 18228 @ 178148: PUSH STACKED 18229 @ 178151: PUSH STP 18230 @ 178154: PUSHI #0x00000001 18231 @ 178159: ADD 18232 @ 178160: ACCESS 18233 @ 178161: SELECT 1 18234 @ 178164: SELECT 1 18235 @ 178167: ASSVAL 2982 VUB = STACKED(STP+2)_V_DISP 18236 @ 178168: LINE 2982 "regression-compile-tmp/asems412.imp" 18237 @ 178207: PUSH VUB 18238 @ 178210: PUSH STACKED 18239 @ 178213: PUSH STP 18240 @ 178216: PUSHI #0x00000002 18241 @ 178221: ADD 18242 @ 178222: ACCESS 18243 @ 178223: SELECT 1 18244 @ 178226: SELECT 1 18245 @ 178229: ASSVAL 2983 DROP(STACKED(STP+1)_V); DROP(STACKED(STP+2)_V) 2984 ! IMP SWITCH BOUNDS MUST BE AS BELOW -- POTENTIAL ALGOL PROBLEM??? 18246 @ 178230: LINE 2983 "regression-compile-tmp/asems412.imp" 18247 @ 178269: PUSH DROP 18248 @ 178272: PUSH STACKED 18249 @ 178275: PUSH STP 18250 @ 178278: PUSHI #0x00000001 18251 @ 178283: ADD 18252 @ 178284: ACCESS 18253 @ 178285: SELECT 1 18254 @ 178288: ASSPAR 18255 @ 178289: CALL 18256 @ 178290: LINE 2983 "regression-compile-tmp/asems412.imp" 18257 @ 178329: PUSH DROP 18258 @ 178332: PUSH STACKED 18259 @ 178335: PUSH STP 18260 @ 178338: PUSHI #0x00000002 18261 @ 178343: ADD 18262 @ 178344: ACCESS 18263 @ 178345: SELECT 1 18264 @ 178348: ASSPAR 18265 @ 178349: CALL 2985 %IF VLB < -32768 %OR VUB > 32767 %START 18266 @ 178350: LINE 2985 "regression-compile-tmp/asems412.imp" 18267 @ 178389: PUSH VLB 18268 @ 178392: PUSHI #0x00008000 18269 @ 178397: NEGATE 18270 @ 178398: JUMPIF < L_0005 18271 @ 178402: PUSH VUB 18272 @ 178405: PUSHI #0x00007fff 18273 @ 178410: JUMPIF <= L_0004 18274 @ 178414: LOCATE L_0005 2986 ABORT(-10); VUB = 0; VLB = 0 18275 @ 178417: LINE 2986 "regression-compile-tmp/asems412.imp" 18276 @ 178456: PUSH ABORT 18277 @ 178459: PUSHI #0x0000000a 18278 @ 178464: NEGATE 18279 @ 178465: ASSPAR 18280 @ 178466: CALL 18281 @ 178467: LINE 2986 "regression-compile-tmp/asems412.imp" 18282 @ 178506: PUSH VUB 18283 @ 178509: PUSHI #0x00000000 18284 @ 178514: ASSVAL 18285 @ 178515: LINE 2986 "regression-compile-tmp/asems412.imp" 18286 @ 178554: PUSH VLB 18287 @ 178557: PUSHI #0x00000000 18288 @ 178562: ASSVAL 2987 %FINISH 18289 @ 178563: LINE 2987 "regression-compile-tmp/asems412.imp" 18290 @ 178602: LOCATE L_0004 2988 ->NEXT 18291 @ 178605: LINE 2988 "regression-compile-tmp/asems412.imp" 18292 @ 178644: JUMP L_0150 2989 Z('I'):VAL = (VUB-VLB+1)*DATA SIZE 18293 @ 178647: LINE 2989 "regression-compile-tmp/asems412.imp" 18294 @ 178686: PUSHI #0x00000049 18295 @ 178691: SLABEL 257 18296 @ 178694: LINE 2989 "regression-compile-tmp/asems412.imp" 18297 @ 178733: PUSH VAL 18298 @ 178736: PUSH VUB 18299 @ 178739: PUSH VLB 18300 @ 178742: SUB 18301 @ 178743: PUSHI #0x00000001 18302 @ 178748: ADD 18303 @ 178749: PUSH DATASIZE 18304 @ 178752: MUL 18305 @ 178753: ASSVAL 2990 VAL = DATA SIZE %AND ABORT(-8) %IF VAL <= 0 18306 @ 178754: LINE 2990 "regression-compile-tmp/asems412.imp" 18307 @ 178793: PUSH VAL 18308 @ 178796: PUSHI #0x00000000 18309 @ 178801: JUMPIF > L_0004 18310 @ 178805: PUSH VAL 18311 @ 178808: PUSH DATASIZE 18312 @ 178811: ASSVAL 18313 @ 178812: PUSH ABORT 18314 @ 178815: PUSHI #0x00000008 18315 @ 178820: NEGATE 18316 @ 178821: ASSPAR 18317 @ 178822: CALL 18318 @ 178823: LOCATE L_0004 2991 GBYTE(0) %FOR J = 1, 1, VAL 18319 @ 178826: LINE 2991 "regression-compile-tmp/asems412.imp" 18320 @ 178865: PUSH J 18321 @ 178868: PUSHI #0x00000001 18322 @ 178873: PUSH VAL 18323 @ 178876: PUSHI #0x00000001 18324 @ 178881: FOR L_0003 18325 @ 178884: PUSH GBYTE 18326 @ 178887: PUSHI #0x00000000 18327 @ 178892: ASSPAR 18328 @ 178893: CALL 18329 @ 178894: REPEAT L_0003 18330 @ 178897: LOCATE L_0004 2992 ->NEXT 18331 @ 178900: LINE 2992 "regression-compile-tmp/asems412.imp" 18332 @ 178939: JUMP L_0150 2993 Z('A'):APARM = 1 18333 @ 178942: LINE 2993 "regression-compile-tmp/asems412.imp" 18334 @ 178981: PUSHI #0x00000041 18335 @ 178986: SLABEL 257 18336 @ 178989: LINE 2993 "regression-compile-tmp/asems412.imp" 18337 @ 179028: PUSH APARM 18338 @ 179031: PUSHI #0x00000001 18339 @ 179036: ASSVAL 2994 SKIPSYMBOL %AND APARM = TAG %IF NEXTSYMBOL = COMMA 18340 @ 179037: LINE 2994 "regression-compile-tmp/asems412.imp" 18341 @ 179076: PUSH NEXTSYMBOL 18342 @ 179079: CALL 18343 @ 179080: PUSHI #0x0000002c 18344 @ 179085: JUMPIF # L_0004 18345 @ 179089: PUSH SKIPSYMBOL 18346 @ 179092: CALL 18347 @ 179093: PUSH APARM 18348 @ 179096: PUSH TAG 18349 @ 179099: CALL 18350 @ 179100: ASSVAL 18351 @ 179101: LOCATE L_0004 2995 %IF OWNFORM = ARRAY %START 18352 @ 179104: LINE 2995 "regression-compile-tmp/asems412.imp" 18353 @ 179143: PUSH OWNFORM 18354 @ 179146: PUSHI #0x0000000b 18355 @ 179151: JUMPIF # L_0004 2996 OWNVAL = 0 18356 @ 179155: LINE 2996 "regression-compile-tmp/asems412.imp" 18357 @ 179194: PUSH OWNVAL 18358 @ 179197: PUSHI #0x00000000 18359 @ 179202: ASSVAL 2997 %IF STP # 0 %START 18360 @ 179203: LINE 2997 "regression-compile-tmp/asems412.imp" 18361 @ 179242: PUSH STP 18362 @ 179245: PUSHI #0x00000000 18363 @ 179250: JUMPIF = L_0007 2998 POP LHS; OWN VAL = LHS_DISP; DROP(LHS) 18364 @ 179254: LINE 2998 "regression-compile-tmp/asems412.imp" 18365 @ 179293: PUSH POPLHS 18366 @ 179296: CALL 18367 @ 179297: LINE 2998 "regression-compile-tmp/asems412.imp" 18368 @ 179336: PUSH OWNVAL 18369 @ 179339: PUSH LHS 18370 @ 179342: SELECT 1 18371 @ 179345: ASSVAL 18372 @ 179346: LINE 2998 "regression-compile-tmp/asems412.imp" 18373 @ 179385: PUSH DROP 18374 @ 179388: PUSH LHS 18375 @ 179391: ASSPAR 18376 @ 179392: CALL 2999 %FINISH 18377 @ 179393: LINE 2999 "regression-compile-tmp/asems412.imp" 18378 @ 179432: LOCATE L_0007 3000 %IF STP # 0 %START 18379 @ 179435: LINE 3000 "regression-compile-tmp/asems412.imp" 18380 @ 179474: PUSH STP 18381 @ 179477: PUSHI #0x00000000 18382 @ 179482: JUMPIF = L_0007 3001 APARM = OWN VAL 18383 @ 179486: LINE 3001 "regression-compile-tmp/asems412.imp" 18384 @ 179525: PUSH APARM 18385 @ 179528: PUSH OWNVAL 18386 @ 179531: ASSVAL 3002 POP LHS; OWNVAL = LHS_DISP; DROP(LHS) 18387 @ 179532: LINE 3002 "regression-compile-tmp/asems412.imp" 18388 @ 179571: PUSH POPLHS 18389 @ 179574: CALL 18390 @ 179575: LINE 3002 "regression-compile-tmp/asems412.imp" 18391 @ 179614: PUSH OWNVAL 18392 @ 179617: PUSH LHS 18393 @ 179620: SELECT 1 18394 @ 179623: ASSVAL 18395 @ 179624: LINE 3002 "regression-compile-tmp/asems412.imp" 18396 @ 179663: PUSH DROP 18397 @ 179666: PUSH LHS 18398 @ 179669: ASSPAR 18399 @ 179670: CALL 3003 %FINISH 18400 @ 179671: LINE 3003 "regression-compile-tmp/asems412.imp" 18401 @ 179710: LOCATE L_0007 3004 %IF OWNTYPE = REALS %START 18402 @ 179713: LINE 3004 "regression-compile-tmp/asems412.imp" 18403 @ 179752: PUSH OWNTYPE 18404 @ 179755: PUSHI #0x00000006 18405 @ 179760: JUMPIF # L_0007 3005 %IF LHS_TYPE = INTEGER %START 18406 @ 179764: LINE 3005 "regression-compile-tmp/asems412.imp" 18407 @ 179803: PUSH LHS 18408 @ 179806: SELECT 8 18409 @ 179809: PUSHI #0x00000001 18410 @ 179814: JUMPIF # L_000a 3006 REAL(ADDR(OWNVAL)) = OWNVAL 18411 @ 179818: LINE 3006 "regression-compile-tmp/asems412.imp" 18412 @ 179857: PUSH REAL 18413 @ 179860: PUSH ADDR 18414 @ 179863: PUSH OWNVAL 18415 @ 179866: ASSPAR 18416 @ 179867: CALL 18417 @ 179868: ASSPAR 18418 @ 179869: CALL 18419 @ 179870: PUSH OWNVAL 18420 @ 179873: ASSVAL 3007 %ELSE 18421 @ 179874: LINE 3007 "regression-compile-tmp/asems412.imp" 18422 @ 179913: GOTO L_0009 18423 @ 179916: LOCATE L_000a 3008 DECVAR_DISP = DECVAR_DISP-4 18424 @ 179919: LINE 3008 "regression-compile-tmp/asems412.imp" 18425 @ 179958: PUSH DECVAR 18426 @ 179961: SELECT 1 18427 @ 179964: PUSH DECVAR 18428 @ 179967: SELECT 1 18429 @ 179970: PUSHI #0x00000004 18430 @ 179975: SUB 18431 @ 179976: ASSVAL 3009 %FINISH 18432 @ 179977: LINE 3009 "regression-compile-tmp/asems412.imp" 18433 @ 180016: LOCATE L_0009 3010 %FINISH 18434 @ 180019: LINE 3010 "regression-compile-tmp/asems412.imp" 18435 @ 180058: LOCATE L_0007 3011 APARM = VUB-VLB+1 %IF APARM = 0 18436 @ 180061: LINE 3011 "regression-compile-tmp/asems412.imp" 18437 @ 180100: PUSH APARM 18438 @ 180103: PUSHI #0x00000000 18439 @ 180108: JUMPIF # L_0007 18440 @ 180112: PUSH APARM 18441 @ 180115: PUSH VUB 18442 @ 180118: PUSH VLB 18443 @ 180121: SUB 18444 @ 180122: PUSHI #0x00000001 18445 @ 180127: ADD 18446 @ 180128: ASSVAL 18447 @ 180129: LOCATE L_0007 3012 %IF APARM <= 0 %START 18448 @ 180132: LINE 3012 "regression-compile-tmp/asems412.imp" 18449 @ 180171: PUSH APARM 18450 @ 180174: PUSHI #0x00000000 18451 @ 180179: JUMPIF > L_0007 3013 VUB = VLB; APARM = 1; ABORT(-8) 18452 @ 180183: LINE 3013 "regression-compile-tmp/asems412.imp" 18453 @ 180222: PUSH VUB 18454 @ 180225: PUSH VLB 18455 @ 180228: ASSVAL 18456 @ 180229: LINE 3013 "regression-compile-tmp/asems412.imp" 18457 @ 180268: PUSH APARM 18458 @ 180271: PUSHI #0x00000001 18459 @ 180276: ASSVAL 18460 @ 180277: LINE 3013 "regression-compile-tmp/asems412.imp" 18461 @ 180316: PUSH ABORT 18462 @ 180319: PUSHI #0x00000008 18463 @ 180324: NEGATE 18464 @ 180325: ASSPAR 18465 @ 180326: CALL 3014 %FINISH 18466 @ 180327: LINE 3014 "regression-compile-tmp/asems412.imp" 18467 @ 180366: LOCATE L_0007 3015 %FOR J = 1, 1, APARM %CYCLE 18468 @ 180369: LINE 3015 "regression-compile-tmp/asems412.imp" 18469 @ 180408: PUSH J 18470 @ 180411: PUSHI #0x00000001 18471 @ 180416: PUSH APARM 18472 @ 180419: PUSHI #0x00000001 18473 @ 180424: FOR L_0006 3016 VLB = VLB+1 18474 @ 180427: LINE 3016 "regression-compile-tmp/asems412.imp" 18475 @ 180466: PUSH VLB 18476 @ 180469: PUSH VLB 18477 @ 180472: PUSHI #0x00000001 18478 @ 180477: ADD 18479 @ 180478: ASSVAL 3017 ADUMP 18480 @ 180479: LINE 3017 "regression-compile-tmp/asems412.imp" 18481 @ 180518: PUSH ADUMP 18482 @ 180521: CALL 3018 %REPEAT 18483 @ 180522: LINE 3018 "regression-compile-tmp/asems412.imp" 18484 @ 180561: REPEAT L_0006 18485 @ 180564: LOCATE L_0007 3019 %ELSE 18486 @ 180567: LINE 3019 "regression-compile-tmp/asems412.imp" 18487 @ 180606: GOTO L_0003 18488 @ 180609: LOCATE L_0004 3020 OWNVAL = 0 18489 @ 180612: LINE 3020 "regression-compile-tmp/asems412.imp" 18490 @ 180651: PUSH OWNVAL 18491 @ 180654: PUSHI #0x00000000 18492 @ 180659: ASSVAL 3021 %IF STP # 0 %START 18493 @ 180660: LINE 3021 "regression-compile-tmp/asems412.imp" 18494 @ 180699: PUSH STP 18495 @ 180702: PUSHI #0x00000000 18496 @ 180707: JUMPIF = L_0007 3022 POP LHS; OWN VAL = LHS_DISP; DROP(LHS) 18497 @ 180711: LINE 3022 "regression-compile-tmp/asems412.imp" 18498 @ 180750: PUSH POPLHS 18499 @ 180753: CALL 18500 @ 180754: LINE 3022 "regression-compile-tmp/asems412.imp" 18501 @ 180793: PUSH OWNVAL 18502 @ 180796: PUSH LHS 18503 @ 180799: SELECT 1 18504 @ 180802: ASSVAL 18505 @ 180803: LINE 3022 "regression-compile-tmp/asems412.imp" 18506 @ 180842: PUSH DROP 18507 @ 180845: PUSH LHS 18508 @ 180848: ASSPAR 18509 @ 180849: CALL 3023 %FINISH 18510 @ 180850: LINE 3023 "regression-compile-tmp/asems412.imp" 18511 @ 180889: LOCATE L_0007 3024 NAMES = NAMES-APARM 18512 @ 180892: LINE 3024 "regression-compile-tmp/asems412.imp" 18513 @ 180931: PUSH NAMES 18514 @ 180934: PUSH NAMES 18515 @ 180937: PUSH APARM 18516 @ 180940: SUB 18517 @ 180941: ASSVAL 3025 ->NEXT %IF OWNFORM = 5 18518 @ 180942: LINE 3025 "regression-compile-tmp/asems412.imp" 18519 @ 180981: PUSH OWNFORM 18520 @ 180984: PUSHI #0x00000005 18521 @ 180989: JUMPIF # L_0007 18522 @ 180993: JUMP L_0150 18523 @ 180996: LOCATE L_0007 3026 %FOR J = 1, 1, APARM %CYCLE 18524 @ 180999: LINE 3026 "regression-compile-tmp/asems412.imp" 18525 @ 181038: PUSH J 18526 @ 181041: PUSHI #0x00000001 18527 @ 181046: PUSH APARM 18528 @ 181049: PUSHI #0x00000001 18529 @ 181054: FOR L_0006 3027 NAMES = NAMES+1; DEC VAR == VAR(NAMES) 18530 @ 181057: LINE 3027 "regression-compile-tmp/asems412.imp" 18531 @ 181096: PUSH NAMES 18532 @ 181099: PUSH NAMES 18533 @ 181102: PUSHI #0x00000001 18534 @ 181107: ADD 18535 @ 181108: ASSVAL 18536 @ 181109: LINE 3027 "regression-compile-tmp/asems412.imp" 18537 @ 181148: PUSH DECVAR 18538 @ 181151: PUSH VAR 18539 @ 181154: PUSH NAMES 18540 @ 181157: ACCESS 18541 @ 181158: ASSREF 3028 %IF OTYPE = 0 %START 18542 @ 181159: LINE 3028 "regression-compile-tmp/asems412.imp" 18543 @ 181198: PUSH OTYPE 18544 @ 181201: PUSHI #0x00000000 18545 @ 181206: JUMPIF # L_000a 3029 DECVAR_DISP = OWNVAL; DECVAR_BASE = 0 18546 @ 181210: LINE 3029 "regression-compile-tmp/asems412.imp" 18547 @ 181249: PUSH DECVAR 18548 @ 181252: SELECT 1 18549 @ 181255: PUSH OWNVAL 18550 @ 181258: ASSVAL 18551 @ 181259: LINE 3029 "regression-compile-tmp/asems412.imp" 18552 @ 181298: PUSH DECVAR 18553 @ 181301: SELECT 6 18554 @ 181304: PUSHI #0x00000000 18555 @ 181309: ASSVAL 3030 DECVAR_FORM = DECVAR_FORM-1 18556 @ 181310: LINE 3030 "regression-compile-tmp/asems412.imp" 18557 @ 181349: PUSH DECVAR 18558 @ 181352: SELECT 8 18559 @ 181355: PUSH DECVAR 18560 @ 181358: SELECT 8 18561 @ 181361: PUSHI #0x00000001 18562 @ 181366: SUB 18563 @ 181367: ASSVAL 3031 %ELSE 18564 @ 181368: LINE 3031 "regression-compile-tmp/asems412.imp" 18565 @ 181407: GOTO L_0009 18566 @ 181410: LOCATE L_000a 3032 DECVAR_DISP = GA; DECVAR_BASE = GLA 18567 @ 181413: LINE 3032 "regression-compile-tmp/asems412.imp" 18568 @ 181452: PUSH DECVAR 18569 @ 181455: SELECT 1 18570 @ 181458: PUSH GA 18571 @ 181461: ASSVAL 18572 @ 181462: LINE 3032 "regression-compile-tmp/asems412.imp" 18573 @ 181501: PUSH DECVAR 18574 @ 181504: SELECT 6 18575 @ 181507: PUSHI #0x0000002a 18576 @ 181512: ASSVAL 3033 %IF OWNTYPE = REALS %AND LHS_TYPE = REALS %START 18577 @ 181513: LINE 3033 "regression-compile-tmp/asems412.imp" 18578 @ 181552: PUSH OWNTYPE 18579 @ 181555: PUSHI #0x00000006 18580 @ 181560: JUMPIF # L_000d 18581 @ 181564: PUSH LHS 18582 @ 181567: SELECT 8 18583 @ 181570: PUSHI #0x00000006 18584 @ 181575: JUMPIF # L_000d 3034 DECVAR_DISP = DECVAR_DISP-4 18585 @ 181579: LINE 3034 "regression-compile-tmp/asems412.imp" 18586 @ 181618: PUSH DECVAR 18587 @ 181621: SELECT 1 18588 @ 181624: PUSH DECVAR 18589 @ 181627: SELECT 1 18590 @ 181630: PUSHI #0x00000004 18591 @ 181635: SUB 18592 @ 181636: ASSVAL 3035 %FINISH 18593 @ 181637: LINE 3035 "regression-compile-tmp/asems412.imp" 18594 @ 181676: LOCATE L_000d 3036 ADUMP 18595 @ 181679: LINE 3036 "regression-compile-tmp/asems412.imp" 18596 @ 181718: PUSH ADUMP 18597 @ 181721: CALL 3037 %FINISH 18598 @ 181722: LINE 3037 "regression-compile-tmp/asems412.imp" 18599 @ 181761: LOCATE L_0009 3038 %REPEAT 18600 @ 181764: LINE 3038 "regression-compile-tmp/asems412.imp" 18601 @ 181803: REPEAT L_0006 18602 @ 181806: LOCATE L_0007 3039 %FINISH 18603 @ 181809: LINE 3039 "regression-compile-tmp/asems412.imp" 18604 @ 181848: LOCATE L_0003 3040 ->WARN %IF GA > X'4000' %AND WARNING = 0 18605 @ 181851: LINE 3040 "regression-compile-tmp/asems412.imp" 18606 @ 181890: PUSH GA 18607 @ 181893: PUSHI #0x00004000 18608 @ 181898: JUMPIF <= L_0004 18609 @ 181902: PUSH WARNING 18610 @ 181905: PUSHI #0x00000000 18611 @ 181910: JUMPIF # L_0004 18612 @ 181914: JUMP L_0151 18613 @ 181917: LOCATE L_0004 3041 ->NEXT 18614 @ 181920: LINE 3041 "regression-compile-tmp/asems412.imp" 18615 @ 181959: JUMP L_0150 3042 Z(''''):GET STRING; ->NEXT 18616 @ 181962: LINE 3042 "regression-compile-tmp/asems412.imp" 18617 @ 182001: PUSHI #0x00000027 18618 @ 182006: SLABEL 257 18619 @ 182009: LINE 3042 "regression-compile-tmp/asems412.imp" 18620 @ 182048: PUSH GETSTRING 18621 @ 182051: CALL 18622 @ 182052: LINE 3042 "regression-compile-tmp/asems412.imp" 18623 @ 182091: JUMP L_0150 3043 Z('N'):LEN = TAG; SKIPSYMBOL 18624 @ 182094: LINE 3043 "regression-compile-tmp/asems412.imp" 18625 @ 182133: PUSHI #0x0000004e 18626 @ 182138: SLABEL 257 18627 @ 182141: LINE 3043 "regression-compile-tmp/asems412.imp" 18628 @ 182180: PUSH LEN 18629 @ 182183: PUSH TAG 18630 @ 182186: CALL 18631 @ 182187: ASSVAL 18632 @ 182188: LINE 3043 "regression-compile-tmp/asems412.imp" 18633 @ 182227: PUSH SKIPSYMBOL 18634 @ 182230: CALL 3044 CSTACK(EVAL(LEN)); ->NEXT 18635 @ 182231: LINE 3044 "regression-compile-tmp/asems412.imp" 18636 @ 182270: PUSH CSTACK 18637 @ 182273: PUSH EVAL 18638 @ 182276: PUSH LEN 18639 @ 182279: ASSPAR 18640 @ 182280: CALL 18641 @ 182281: ASSPAR 18642 @ 182282: CALL 18643 @ 182283: LINE 3044 "regression-compile-tmp/asems412.imp" 18644 @ 182322: JUMP L_0150 3045 Z('D'): RHS == DESCRIPTOR; FP CSTACK(REAL CONSTANT,RHS); -> NEXT 3046 18645 @ 182325: LINE 3045 "regression-compile-tmp/asems412.imp" 18646 @ 182364: PUSHI #0x00000044 18647 @ 182369: SLABEL 257 18648 @ 182372: LINE 3045 "regression-compile-tmp/asems412.imp" 18649 @ 182411: PUSH RHS 18650 @ 182414: PUSH DESCRIPTOR 18651 @ 182417: CALL 18652 @ 182418: ASSREF 18653 @ 182419: LINE 3045 "regression-compile-tmp/asems412.imp" 18654 @ 182458: PUSH FPCSTACK 18655 @ 182461: PUSH REALCONSTANT 18656 @ 182464: CALL 18657 @ 182465: ASSPAR 18658 @ 182466: PUSH RHS 18659 @ 182469: ASSPAR 18660 @ 182470: CALL 18661 @ 182471: LINE 3045 "regression-compile-tmp/asems412.imp" 18662 @ 182510: JUMP L_0150 3047 Z('@'):%IF NEXTSYMBOL = MINUS %START 18663 @ 182513: LINE 3047 "regression-compile-tmp/asems412.imp" 18664 @ 182552: PUSHI #0x00000040 18665 @ 182557: SLABEL 257 18666 @ 182560: LINE 3047 "regression-compile-tmp/asems412.imp" 18667 @ 182599: PUSH NEXTSYMBOL 18668 @ 182602: CALL 18669 @ 182603: PUSHI #0x0000002d 18670 @ 182608: JUMPIF # L_0004 3048 SKIPSYMBOL; LEN = TAG; SET LHS 18671 @ 182612: LINE 3048 "regression-compile-tmp/asems412.imp" 18672 @ 182651: PUSH SKIPSYMBOL 18673 @ 182654: CALL 18674 @ 182655: LINE 3048 "regression-compile-tmp/asems412.imp" 18675 @ 182694: PUSH LEN 18676 @ 182697: PUSH TAG 18677 @ 182700: CALL 18678 @ 182701: ASSVAL 18679 @ 182702: LINE 3048 "regression-compile-tmp/asems412.imp" 18680 @ 182741: PUSH SETLHS 18681 @ 182744: CALL 3049 V == VAR(VAR(LHS_FORMAT)_EXTRA+LEN-1) 18682 @ 182745: LINE 3049 "regression-compile-tmp/asems412.imp" 18683 @ 182784: PUSH V 18684 @ 182787: PUSH VAR 18685 @ 182790: PUSH VAR 18686 @ 182793: PUSH LHS 18687 @ 182796: SELECT 2 18688 @ 182799: ACCESS 18689 @ 182800: SELECT 3 18690 @ 182803: PUSH LEN 18691 @ 182806: ADD 18692 @ 182807: PUSHI #0x00000001 18693 @ 182812: SUB 18694 @ 182813: ACCESS 18695 @ 182814: ASSREF 3050 DISPLAY VAR(V) %IF CONTROL < 0 18696 @ 182815: LINE 3050 "regression-compile-tmp/asems412.imp" 18697 @ 182854: PUSH CONTROL 18698 @ 182857: PUSHI #0x00000000 18699 @ 182862: JUMPIF >= L_0007 18700 @ 182866: PUSH DISPLAYVAR 18701 @ 182869: PUSH V 18702 @ 182872: ASSPAR 18703 @ 182873: CALL 18704 @ 182874: LOCATE L_0007 3051 VSTACK(V); SET BOTH 18705 @ 182877: LINE 3051 "regression-compile-tmp/asems412.imp" 18706 @ 182916: PUSH VSTACK 18707 @ 182919: PUSH V 18708 @ 182922: ASSPAR 18709 @ 182923: CALL 18710 @ 182924: LINE 3051 "regression-compile-tmp/asems412.imp" 18711 @ 182963: PUSH SETBOTH 18712 @ 182966: CALL 3052 STP = STP-1 18713 @ 182967: LINE 3052 "regression-compile-tmp/asems412.imp" 18714 @ 183006: PUSH STP 18715 @ 183009: PUSH STP 18716 @ 183012: PUSHI #0x00000001 18717 @ 183017: SUB 18718 @ 183018: ASSVAL 3053 %IF LHS_FORM = V IN S %OR LHS_FORM = V IN REC %START 18719 @ 183019: LINE 3053 "regression-compile-tmp/asems412.imp" 18720 @ 183058: PUSH LHS 18721 @ 183061: SELECT 9 18722 @ 183064: PUSHI #0x00000003 18723 @ 183069: JUMPIF = L_0008 18724 @ 183073: PUSH LHS 18725 @ 183076: SELECT 9 18726 @ 183079: PUSHI #0x00000005 18727 @ 183084: JUMPIF # L_0007 18728 @ 183088: LOCATE L_0008 3054 RHS_DISP = LHS_DISP+RHS_DISP 18729 @ 183091: LINE 3054 "regression-compile-tmp/asems412.imp" 18730 @ 183130: PUSH RHS 18731 @ 183133: SELECT 1 18732 @ 183136: PUSH LHS 18733 @ 183139: SELECT 1 18734 @ 183142: PUSH RHS 18735 @ 183145: SELECT 1 18736 @ 183148: ADD 18737 @ 183149: ASSVAL 3055 LHS_FORM = LHS_FORM-V IN S+RHS_FORM 18738 @ 183150: LINE 3055 "regression-compile-tmp/asems412.imp" 18739 @ 183189: PUSH LHS 18740 @ 183192: SELECT 9 18741 @ 183195: PUSH LHS 18742 @ 183198: SELECT 9 18743 @ 183201: PUSHI #0x00000003 18744 @ 183206: SUB 18745 @ 183207: PUSH RHS 18746 @ 183210: SELECT 9 18747 @ 183213: ADD 18748 @ 183214: ASSVAL 3056 %ELSE %IF LHS_FORM = A IN REC 18749 @ 183215: LINE 3056 "regression-compile-tmp/asems412.imp" 18750 @ 183254: GOTO L_0006 18751 @ 183257: LOCATE L_0007 18752 @ 183260: PUSH LHS 18753 @ 183263: SELECT 9 18754 @ 183266: PUSHI #0x00000004 18755 @ 183271: JUMPIF # L_0007 3057 LHS_FORM = V IN REC; LHS_TYPE = INTEGER 18756 @ 183275: LINE 3057 "regression-compile-tmp/asems412.imp" 18757 @ 183314: PUSH LHS 18758 @ 183317: SELECT 9 18759 @ 183320: PUSHI #0x00000005 18760 @ 183325: ASSVAL 18761 @ 183326: LINE 3057 "regression-compile-tmp/asems412.imp" 18762 @ 183365: PUSH LHS 18763 @ 183368: SELECT 8 18764 @ 183371: PUSHI #0x00000001 18765 @ 183376: ASSVAL 3058 LOAD(LHS, ANY0) 18766 @ 183377: LINE 3058 "regression-compile-tmp/asems412.imp" 18767 @ 183416: PUSH LOAD 18768 @ 183419: PUSH LHS 18769 @ 183422: ASSPAR 18770 @ 183423: PUSHI #0x0000002e 18771 @ 183428: ASSPAR 18772 @ 183429: CALL 3059 LHS_FORM = RHS_FORM 18773 @ 183430: LINE 3059 "regression-compile-tmp/asems412.imp" 18774 @ 183469: PUSH LHS 18775 @ 183472: SELECT 9 18776 @ 183475: PUSH RHS 18777 @ 183478: SELECT 9 18778 @ 183481: ASSVAL 3060 %ELSE %IF LHS_FORM <= V IN R 18779 @ 183482: LINE 3060 "regression-compile-tmp/asems412.imp" 18780 @ 183521: GOTO L_0006 18781 @ 183524: LOCATE L_0007 18782 @ 183527: PUSH LHS 18783 @ 183530: SELECT 9 18784 @ 183533: PUSHI #0x00000001 18785 @ 183538: JUMPIF > L_0007 3061 LHS_FORM = RHS_FORM 18786 @ 183542: LINE 3061 "regression-compile-tmp/asems412.imp" 18787 @ 183581: PUSH LHS 18788 @ 183584: SELECT 9 18789 @ 183587: PUSH RHS 18790 @ 183590: SELECT 9 18791 @ 183593: ASSVAL 3062 %ELSE 18792 @ 183594: LINE 3062 "regression-compile-tmp/asems412.imp" 18793 @ 183633: GOTO L_0006 18794 @ 183636: LOCATE L_0007 3063 LHS_EXTRA = LHS_DISP 18795 @ 183639: LINE 3063 "regression-compile-tmp/asems412.imp" 18796 @ 183678: PUSH LHS 18797 @ 183681: SELECT 3 18798 @ 183684: PUSH LHS 18799 @ 183687: SELECT 1 18800 @ 183690: ASSVAL 3064 LHS_FORM = RHS_FORM+2 18801 @ 183691: LINE 3064 "regression-compile-tmp/asems412.imp" 18802 @ 183730: PUSH LHS 18803 @ 183733: SELECT 9 18804 @ 183736: PUSH RHS 18805 @ 183739: SELECT 9 18806 @ 183742: PUSHI #0x00000002 18807 @ 183747: ADD 18808 @ 183748: ASSVAL 3065 %FINISH 18809 @ 183749: LINE 3065 "regression-compile-tmp/asems412.imp" 18810 @ 183788: LOCATE L_0006 3066 LHS_DISP = RHS_DISP 18811 @ 183791: LINE 3066 "regression-compile-tmp/asems412.imp" 18812 @ 183830: PUSH LHS 18813 @ 183833: SELECT 1 18814 @ 183836: PUSH RHS 18815 @ 183839: SELECT 1 18816 @ 183842: ASSVAL 3067 LHS_TYPE = RHS_TYPE; LHS_LENGTH = RHS_LENGTH 18817 @ 183843: LINE 3067 "regression-compile-tmp/asems412.imp" 18818 @ 183882: PUSH LHS 18819 @ 183885: SELECT 8 18820 @ 183888: PUSH RHS 18821 @ 183891: SELECT 8 18822 @ 183894: ASSVAL 18823 @ 183895: LINE 3067 "regression-compile-tmp/asems412.imp" 18824 @ 183934: PUSH LHS 18825 @ 183937: SELECT 4 18826 @ 183940: PUSH RHS 18827 @ 183943: SELECT 4 18828 @ 183946: ASSVAL 3068 LHS_FORMAT = RHS_FORMAT; LHS_DV = RHS_DV 18829 @ 183947: LINE 3068 "regression-compile-tmp/asems412.imp" 18830 @ 183986: PUSH LHS 18831 @ 183989: SELECT 2 18832 @ 183992: PUSH RHS 18833 @ 183995: SELECT 2 18834 @ 183998: ASSVAL 18835 @ 183999: LINE 3068 "regression-compile-tmp/asems412.imp" 18836 @ 184038: PUSH LHS 18837 @ 184041: SELECT 5 18838 @ 184044: PUSH RHS 18839 @ 184047: SELECT 5 18840 @ 184050: ASSVAL 3069 DROP(RHS) 18841 @ 184051: LINE 3069 "regression-compile-tmp/asems412.imp" 18842 @ 184090: PUSH DROP 18843 @ 184093: PUSH RHS 18844 @ 184096: ASSPAR 18845 @ 184097: CALL 3070 %ELSE 18846 @ 184098: LINE 3070 "regression-compile-tmp/asems412.imp" 18847 @ 184137: GOTO L_0003 18848 @ 184140: LOCATE L_0004 3071 V == VAR(LOOKUP(TAG)) 18849 @ 184143: LINE 3071 "regression-compile-tmp/asems412.imp" 18850 @ 184182: PUSH V 18851 @ 184185: PUSH VAR 18852 @ 184188: PUSH LOOKUP 18853 @ 184191: PUSH TAG 18854 @ 184194: CALL 18855 @ 184195: ASSPAR 18856 @ 184196: CALL 18857 @ 184197: ACCESS 18858 @ 184198: ASSREF 3072 VSTACK(V) 18859 @ 184199: LINE 3072 "regression-compile-tmp/asems412.imp" 18860 @ 184238: PUSH VSTACK 18861 @ 184241: PUSH V 18862 @ 184244: ASSPAR 18863 @ 184245: CALL 3073 CLAIM WSP(LHS_DV) %IF LHS_FORM&16 # 0 %AND %C 3074 LHS_BASE # LINK %AND NEXTSYMBOL # 'P'+32 18864 @ 184246: LINE 3073 "regression-compile-tmp/asems412.imp" 18865 @ 184285: PUSH LHS 18866 @ 184288: SELECT 9 18867 @ 184291: PUSHI #0x00000010 18868 @ 184296: AND 18869 @ 184297: PUSHI #0x00000000 18870 @ 184302: JUMPIF = L_0007 18871 @ 184306: PUSH LHS 18872 @ 184309: SELECT 6 18873 @ 184312: PUSHI #0x0000000c 18874 @ 184317: JUMPIF = L_0007 18875 @ 184321: PUSH NEXTSYMBOL 18876 @ 184324: CALL 18877 @ 184325: PUSHI #0x00000050 18878 @ 184330: PUSHI #0x00000020 18879 @ 184335: ADD 18880 @ 184336: JUMPIF = L_0007 18881 @ 184340: PUSH CLAIMWSP 18882 @ 184343: PUSH LHS 18883 @ 184346: SELECT 5 18884 @ 184349: ASSPAR 18885 @ 184350: CALL 18886 @ 184351: LOCATE L_0007 3075 %FINISH 18887 @ 184354: LINE 3075 "regression-compile-tmp/asems412.imp" 18888 @ 184393: LOCATE L_0003 3076 ->NEXT 18889 @ 184396: LINE 3076 "regression-compile-tmp/asems412.imp" 18890 @ 184435: JUMP L_0150 3077 Z('E'):POP LHS 18891 @ 184438: LINE 3077 "regression-compile-tmp/asems412.imp" 18892 @ 184477: PUSHI #0x00000045 18893 @ 184482: SLABEL 257 18894 @ 184485: LINE 3077 "regression-compile-tmp/asems412.imp" 18895 @ 184524: PUSH POPLHS 18896 @ 184527: CALL 3078 OPR = LHS_LOP; LHS_LOP = 0; J = 0 18897 @ 184528: LINE 3078 "regression-compile-tmp/asems412.imp" 18898 @ 184567: PUSH OPR 18899 @ 184570: PUSH LHS 18900 @ 184573: SELECT 7 18901 @ 184576: ASSVAL 18902 @ 184577: LINE 3078 "regression-compile-tmp/asems412.imp" 18903 @ 184616: PUSH LHS 18904 @ 184619: SELECT 7 18905 @ 184622: PUSHI #0x00000000 18906 @ 184627: ASSVAL 18907 @ 184628: LINE 3078 "regression-compile-tmp/asems412.imp" 18908 @ 184667: PUSH J 18909 @ 184670: PUSHI #0x00000000 18910 @ 184675: ASSVAL 3079 %WHILE OPR # 0 %CYCLE 18911 @ 184676: LINE 3079 "regression-compile-tmp/asems412.imp" 18912 @ 184715: LOCATE L_0003 18913 @ 184718: PUSH OPR 18914 @ 184721: PUSHI #0x00000000 18915 @ 184726: JUMPIF = L_0004 3080 X == LHS_LINK; LHS_LINK == X_LINK 18916 @ 184730: LINE 3080 "regression-compile-tmp/asems412.imp" 18917 @ 184769: PUSH X 18918 @ 184772: PUSH LHS 18919 @ 184775: SELECT 10 18920 @ 184778: ASSREF 18921 @ 184779: LINE 3080 "regression-compile-tmp/asems412.imp" 18922 @ 184818: PUSH LHS 18923 @ 184821: SELECT 10 18924 @ 184824: PUSH X 18925 @ 184827: SELECT 10 18926 @ 184830: ASSREF 3081 N = X_LOP; X_LOP = 0 18927 @ 184831: LINE 3081 "regression-compile-tmp/asems412.imp" 18928 @ 184870: PUSH N 18929 @ 184873: PUSH X 18930 @ 184876: SELECT 7 18931 @ 184879: ASSVAL 18932 @ 184880: LINE 3081 "regression-compile-tmp/asems412.imp" 18933 @ 184919: PUSH X 18934 @ 184922: SELECT 7 18935 @ 184925: PUSHI #0x00000000 18936 @ 184930: ASSVAL 3082 LOAD(X, OPR) 18937 @ 184931: LINE 3082 "regression-compile-tmp/asems412.imp" 18938 @ 184970: PUSH LOAD 18939 @ 184973: PUSH X 18940 @ 184976: ASSPAR 18941 @ 184977: PUSH OPR 18942 @ 184980: ASSPAR 18943 @ 184981: CALL 3083 DROP(X); J = J<<8!OPR 18944 @ 184982: LINE 3083 "regression-compile-tmp/asems412.imp" 18945 @ 185021: PUSH DROP 18946 @ 185024: PUSH X 18947 @ 185027: ASSPAR 18948 @ 185028: CALL 18949 @ 185029: LINE 3083 "regression-compile-tmp/asems412.imp" 18950 @ 185068: PUSH J 18951 @ 185071: PUSH J 18952 @ 185074: PUSHI #0x00000008 18953 @ 185079: LSH 18954 @ 185080: PUSH OPR 18955 @ 185083: OR 18956 @ 185084: ASSVAL 3084 OPR = N 18957 @ 185085: LINE 3084 "regression-compile-tmp/asems412.imp" 18958 @ 185124: PUSH OPR 18959 @ 185127: PUSH N 18960 @ 185130: ASSVAL 3085 %REPEAT 18961 @ 185131: LINE 3085 "regression-compile-tmp/asems412.imp" 18962 @ 185170: REPEAT L_0003 18963 @ 185173: LOCATE L_0004 3086 RELEASE(J&255); RELEASE(J>>8) 18964 @ 185176: LINE 3086 "regression-compile-tmp/asems412.imp" 18965 @ 185215: PUSH RELEASE 18966 @ 185218: PUSH J 18967 @ 185221: PUSHI #0x000000ff 18968 @ 185226: AND 18969 @ 185227: ASSPAR 18970 @ 185228: CALL 18971 @ 185229: LINE 3086 "regression-compile-tmp/asems412.imp" 18972 @ 185268: PUSH RELEASE 18973 @ 185271: PUSH J 18974 @ 185274: PUSHI #0x00000008 18975 @ 185279: RSH 18976 @ 185280: ASSPAR 18977 @ 185281: CALL 3087 X == LHS; CALL(X); DOPE = X_DV 18978 @ 185282: LINE 3087 "regression-compile-tmp/asems412.imp" 18979 @ 185321: PUSH X 18980 @ 185324: PUSH LHS 18981 @ 185327: ASSREF 18982 @ 185328: LINE 3087 "regression-compile-tmp/asems412.imp" 18983 @ 185367: PUSH CALL 18984 @ 185370: PUSH X 18985 @ 185373: ASSPAR 18986 @ 185374: CALL 18987 @ 185375: LINE 3087 "regression-compile-tmp/asems412.imp" 18988 @ 185414: PUSH DOPE 18989 @ 185417: PUSH X 18990 @ 185420: SELECT 5 18991 @ 185423: ASSVAL 3088 %IF X_TYPE # 0 %AND SYM # 0 %START;! FN/MAP 18992 @ 185424: LINE 3088 "regression-compile-tmp/asems412.imp" 18993 @ 185463: PUSH X 18994 @ 185466: SELECT 8 18995 @ 185469: PUSHI #0x00000000 18996 @ 185474: JUMPIF = L_0004 18997 @ 185478: PUSH SYM 18998 @ 185481: PUSHI #0x00000000 18999 @ 185486: JUMPIF = L_0004 3089 SSTACK(X); DROP(X); SET LHS; RELEASE(LHS_BASE) 19000 @ 185490: LINE 3089 "regression-compile-tmp/asems412.imp" 19001 @ 185529: PUSH SSTACK 19002 @ 185532: PUSH X 19003 @ 185535: ASSPAR 19004 @ 185536: CALL 19005 @ 185537: LINE 3089 "regression-compile-tmp/asems412.imp" 19006 @ 185576: PUSH DROP 19007 @ 185579: PUSH X 19008 @ 185582: ASSPAR 19009 @ 185583: CALL 19010 @ 185584: LINE 3089 "regression-compile-tmp/asems412.imp" 19011 @ 185623: PUSH SETLHS 19012 @ 185626: CALL 19013 @ 185627: LINE 3089 "regression-compile-tmp/asems412.imp" 19014 @ 185666: PUSH RELEASE 19015 @ 185669: PUSH LHS 19016 @ 185672: SELECT 6 19017 @ 185675: ASSPAR 19018 @ 185676: CALL 3090 %IF LHS_TYPE = REALS %THEN OPR = FPR0 %ELSE OPR = R1 19019 @ 185677: LINE 3090 "regression-compile-tmp/asems412.imp" 19020 @ 185716: PUSH LHS 19021 @ 185719: SELECT 8 19022 @ 185722: PUSHI #0x00000006 19023 @ 185727: JUMPIF # L_0007 19024 @ 185731: PUSH OPR 19025 @ 185734: PUSHI #0x0000000d 19026 @ 185739: ASSVAL 19027 @ 185740: GOTO L_0006 19028 @ 185743: LOCATE L_0007 19029 @ 185746: PUSH OPR 19030 @ 185749: PUSHI #0x00000002 19031 @ 185754: ASSVAL 19032 @ 185755: LOCATE L_0006 3091 LHS_BASE = OPR; LHS_DISP = 0; LHS_FORM = LHS_FORM&15 19033 @ 185758: LINE 3091 "regression-compile-tmp/asems412.imp" 19034 @ 185797: PUSH LHS 19035 @ 185800: SELECT 6 19036 @ 185803: PUSH OPR 19037 @ 185806: ASSVAL 19038 @ 185807: LINE 3091 "regression-compile-tmp/asems412.imp" 19039 @ 185846: PUSH LHS 19040 @ 185849: SELECT 1 19041 @ 185852: PUSHI #0x00000000 19042 @ 185857: ASSVAL 19043 @ 185858: LINE 3091 "regression-compile-tmp/asems412.imp" 19044 @ 185897: PUSH LHS 19045 @ 185900: SELECT 9 19046 @ 185903: PUSH LHS 19047 @ 185906: SELECT 9 19048 @ 185909: PUSHI #0x0000000f 19049 @ 185914: AND 19050 @ 185915: ASSVAL 3092 CLAIM(OPR) 19051 @ 185916: LINE 3092 "regression-compile-tmp/asems412.imp" 19052 @ 185955: PUSH CLAIM 19053 @ 185958: PUSH OPR 19054 @ 185961: ASSPAR 19055 @ 185962: CALL 3093 %IF LHS_TYPE = STRING %AND LHS_FORM = V IN R %START 19056 @ 185963: LINE 3093 "regression-compile-tmp/asems412.imp" 19057 @ 186002: PUSH LHS 19058 @ 186005: SELECT 8 19059 @ 186008: PUSHI #0x00000004 19060 @ 186013: JUMPIF # L_0007 19061 @ 186017: PUSH LHS 19062 @ 186020: SELECT 9 19063 @ 186023: PUSHI #0x00000001 19064 @ 186028: JUMPIF # L_0007 3094 LHS_FORM = V IN S 19065 @ 186032: LINE 3094 "regression-compile-tmp/asems412.imp" 19066 @ 186071: PUSH LHS 19067 @ 186074: SELECT 9 19068 @ 186077: PUSHI #0x00000003 19069 @ 186082: ASSVAL 3095 SYM = NEXTSYMBOL 19070 @ 186083: LINE 3095 "regression-compile-tmp/asems412.imp" 19071 @ 186122: PUSH SYM 19072 @ 186125: PUSH NEXTSYMBOL 19073 @ 186128: CALL 19074 @ 186129: ASSVAL 3096 %IF SYM # 'S' %AND SYM # 'P'+32 %AND SYM # '?' %START 19075 @ 186130: LINE 3096 "regression-compile-tmp/asems412.imp" 19076 @ 186169: PUSH SYM 19077 @ 186172: PUSHI #0x00000053 19078 @ 186177: JUMPIF = L_000a 19079 @ 186181: PUSH SYM 19080 @ 186184: PUSHI #0x00000050 19081 @ 186189: PUSHI #0x00000020 19082 @ 186194: ADD 19083 @ 186195: JUMPIF = L_000a 19084 @ 186199: PUSH SYM 19085 @ 186202: PUSHI #0x0000003f 19086 @ 186207: JUMPIF = L_000a 3097 N = X_LENGTH; N = 256 %IF N = 0 19087 @ 186211: LINE 3097 "regression-compile-tmp/asems412.imp" 19088 @ 186250: PUSH N 19089 @ 186253: PUSH X 19090 @ 186256: SELECT 4 19091 @ 186259: ASSVAL 19092 @ 186260: LINE 3097 "regression-compile-tmp/asems412.imp" 19093 @ 186299: PUSH N 19094 @ 186302: PUSHI #0x00000000 19095 @ 186307: JUMPIF # L_000d 19096 @ 186311: PUSH N 19097 @ 186314: PUSHI #0x00000100 19098 @ 186319: ASSVAL 19099 @ 186320: LOCATE L_000d 3098 FRAME = (FRAME+1)&(\1) 19100 @ 186323: LINE 3098 "regression-compile-tmp/asems412.imp" 19101 @ 186362: PUSH FRAME 19102 @ 186365: PUSH FRAME 19103 @ 186368: PUSHI #0x00000001 19104 @ 186373: ADD 19105 @ 186374: PUSHI #0x00000001 19106 @ 186379: NOT 19107 @ 186380: AND 19108 @ 186381: ASSVAL 3099 LHS_FORM = V IN S; LHS_BASE = LOCAL; LHS_DISP = FRAME 19109 @ 186382: LINE 3099 "regression-compile-tmp/asems412.imp" 19110 @ 186421: PUSH LHS 19111 @ 186424: SELECT 9 19112 @ 186427: PUSHI #0x00000003 19113 @ 186432: ASSVAL 19114 @ 186433: LINE 3099 "regression-compile-tmp/asems412.imp" 19115 @ 186472: PUSH LHS 19116 @ 186475: SELECT 6 19117 @ 186478: PUSH LOCAL 19118 @ 186481: ASSVAL 19119 @ 186482: LINE 3099 "regression-compile-tmp/asems412.imp" 19120 @ 186521: PUSH LHS 19121 @ 186524: SELECT 1 19122 @ 186527: PUSH FRAME 19123 @ 186530: ASSVAL 3100 FRAME = FRAME+N 19124 @ 186531: LINE 3100 "regression-compile-tmp/asems412.imp" 19125 @ 186570: PUSH FRAME 19126 @ 186573: PUSH FRAME 19127 @ 186576: PUSH N 19128 @ 186579: ADD 19129 @ 186580: ASSVAL 3101 SSET(LOCAL, LHS_DISP, V IN S, 0) 19130 @ 186581: LINE 3101 "regression-compile-tmp/asems412.imp" 19131 @ 186620: PUSH SSET 19132 @ 186623: PUSH LOCAL 19133 @ 186626: ASSPAR 19134 @ 186627: PUSH LHS 19135 @ 186630: SELECT 1 19136 @ 186633: ASSPAR 19137 @ 186634: PUSHI #0x00000003 19138 @ 186639: ASSPAR 19139 @ 186640: PUSHI #0x00000000 19140 @ 186645: ASSPAR 19141 @ 186646: CALL 3102 RHS_TYPE = STRING; RHS_LENGTH = N 19142 @ 186647: LINE 3102 "regression-compile-tmp/asems412.imp" 19143 @ 186686: PUSH RHS 19144 @ 186689: SELECT 8 19145 @ 186692: PUSHI #0x00000004 19146 @ 186697: ASSVAL 19147 @ 186698: LINE 3102 "regression-compile-tmp/asems412.imp" 19148 @ 186737: PUSH RHS 19149 @ 186740: SELECT 4 19150 @ 186743: PUSH N 19151 @ 186746: ASSVAL 3103 SSET(R1, 0, V IN S, 0); RHS_TYPE = STRING 19152 @ 186747: LINE 3103 "regression-compile-tmp/asems412.imp" 19153 @ 186786: PUSH SSET 19154 @ 186789: PUSHI #0x00000002 19155 @ 186794: ASSPAR 19156 @ 186795: PUSHI #0x00000000 19157 @ 186800: ASSPAR 19158 @ 186801: PUSHI #0x00000003 19159 @ 186806: ASSPAR 19160 @ 186807: PUSHI #0x00000000 19161 @ 186812: ASSPAR 19162 @ 186813: CALL 19163 @ 186814: LINE 3103 "regression-compile-tmp/asems412.imp" 19164 @ 186853: PUSH RHS 19165 @ 186856: SELECT 8 19166 @ 186859: PUSHI #0x00000004 19167 @ 186864: ASSVAL 3104 ASSIGN(1) 19168 @ 186865: LINE 3104 "regression-compile-tmp/asems412.imp" 19169 @ 186904: PUSH ASSIGN 19170 @ 186907: PUSHI #0x00000001 19171 @ 186912: ASSPAR 19172 @ 186913: CALL 3105 %FINISH 19173 @ 186914: LINE 3105 "regression-compile-tmp/asems412.imp" 19174 @ 186953: LOCATE L_000a 3106 %FINISH 19175 @ 186956: LINE 3106 "regression-compile-tmp/asems412.imp" 19176 @ 186995: LOCATE L_0007 3107 %FINISH 19177 @ 186998: LINE 3107 "regression-compile-tmp/asems412.imp" 19178 @ 187037: LOCATE L_0004 3108 RELEASE WSP(DOPE) %IF SYM # 0; !NOT IF BUILT-IN 19179 @ 187040: LINE 3108 "regression-compile-tmp/asems412.imp" 19180 @ 187079: PUSH SYM 19181 @ 187082: PUSHI #0x00000000 19182 @ 187087: JUMPIF = L_0004 19183 @ 187091: PUSH RELEASEWSP 19184 @ 187094: PUSH DOPE 19185 @ 187097: ASSPAR 19186 @ 187098: CALL 19187 @ 187099: LOCATE L_0004 3109 ->NEXT 19188 @ 187102: LINE 3109 "regression-compile-tmp/asems412.imp" 19189 @ 187141: JUMP L_0150 3110 Z('R'):RETURN; ->NEXT 19190 @ 187144: LINE 3110 "regression-compile-tmp/asems412.imp" 19191 @ 187183: PUSHI #0x00000052 19192 @ 187188: SLABEL 257 19193 @ 187191: LINE 3110 "regression-compile-tmp/asems412.imp" 19194 @ 187230: PUSH RETURN 19195 @ 187233: CALL 19196 @ 187234: LINE 3110 "regression-compile-tmp/asems412.imp" 19197 @ 187273: JUMP L_0150 3111 Z('V'):POP LHS 19198 @ 187276: LINE 3111 "regression-compile-tmp/asems412.imp" 19199 @ 187315: PUSHI #0x00000056 19200 @ 187320: SLABEL 257 19201 @ 187323: LINE 3111 "regression-compile-tmp/asems412.imp" 19202 @ 187362: PUSH POPLHS 19203 @ 187365: CALL 3112 DUMP STRING(0) 19204 @ 187366: LINE 3112 "regression-compile-tmp/asems412.imp" 19205 @ 187405: PUSH DUMPSTRING 19206 @ 187408: PUSHI #0x00000000 19207 @ 187413: ASSPAR 19208 @ 187414: CALL 3113 %IF GVAR_TYPE = REALS %THEN OPR = FPR0 %ELSE OPR = R1 19209 @ 187415: LINE 3113 "regression-compile-tmp/asems412.imp" 19210 @ 187454: PUSH GVAR 19211 @ 187457: SELECT 7 19212 @ 187460: PUSHI #0x00000006 19213 @ 187465: JUMPIF # L_0004 19214 @ 187469: PUSH OPR 19215 @ 187472: PUSHI #0x0000000d 19216 @ 187477: ASSVAL 19217 @ 187478: GOTO L_0003 19218 @ 187481: LOCATE L_0004 19219 @ 187484: PUSH OPR 19220 @ 187487: PUSHI #0x00000002 19221 @ 187492: ASSVAL 19222 @ 187493: LOCATE L_0003 3114 LRD(LHS, OPR); RETURN; ->NEXT 19223 @ 187496: LINE 3114 "regression-compile-tmp/asems412.imp" 19224 @ 187535: PUSH LRD 19225 @ 187538: PUSH LHS 19226 @ 187541: ASSPAR 19227 @ 187542: PUSH OPR 19228 @ 187545: ASSPAR 19229 @ 187546: CALL 19230 @ 187547: LINE 3114 "regression-compile-tmp/asems412.imp" 19231 @ 187586: PUSH RETURN 19232 @ 187589: CALL 19233 @ 187590: LINE 3114 "regression-compile-tmp/asems412.imp" 19234 @ 187629: JUMP L_0150 3115 Z('M'):POP LHS; AMAP(LHS); LRD(LHS, R1); RETURN; ->NEXT 19235 @ 187632: LINE 3115 "regression-compile-tmp/asems412.imp" 19236 @ 187671: PUSHI #0x0000004d 19237 @ 187676: SLABEL 257 19238 @ 187679: LINE 3115 "regression-compile-tmp/asems412.imp" 19239 @ 187718: PUSH POPLHS 19240 @ 187721: CALL 19241 @ 187722: LINE 3115 "regression-compile-tmp/asems412.imp" 19242 @ 187761: PUSH AMAP 19243 @ 187764: PUSH LHS 19244 @ 187767: ASSPAR 19245 @ 187768: CALL 19246 @ 187769: LINE 3115 "regression-compile-tmp/asems412.imp" 19247 @ 187808: PUSH LRD 19248 @ 187811: PUSH LHS 19249 @ 187814: ASSPAR 19250 @ 187815: PUSHI #0x00000002 19251 @ 187820: ASSPAR 19252 @ 187821: CALL 19253 @ 187822: LINE 3115 "regression-compile-tmp/asems412.imp" 19254 @ 187861: PUSH RETURN 19255 @ 187864: CALL 19256 @ 187865: LINE 3115 "regression-compile-tmp/asems412.imp" 19257 @ 187904: JUMP L_0150 3116 Z('T'):DUMP(X'2411'); RETURN; ! *LIS R1, 1 19258 @ 187907: LINE 3116 "regression-compile-tmp/asems412.imp" 19259 @ 187946: PUSHI #0x00000054 19260 @ 187951: SLABEL 257 19261 @ 187954: LINE 3116 "regression-compile-tmp/asems412.imp" 19262 @ 187993: PUSH DUMP 19263 @ 187996: PUSHI #0x00002411 19264 @ 188001: ASSPAR 19265 @ 188002: CALL 19266 @ 188003: LINE 3116 "regression-compile-tmp/asems412.imp" 19267 @ 188042: PUSH RETURN 19268 @ 188045: CALL 3117 ->NEXT 19269 @ 188046: LINE 3117 "regression-compile-tmp/asems412.imp" 19270 @ 188085: JUMP L_0150 3118 Z('K'):DUMP(X'2410'); RETURN; ! *LIS R1, 0 19271 @ 188088: LINE 3118 "regression-compile-tmp/asems412.imp" 19272 @ 188127: PUSHI #0x0000004b 19273 @ 188132: SLABEL 257 19274 @ 188135: LINE 3118 "regression-compile-tmp/asems412.imp" 19275 @ 188174: PUSH DUMP 19276 @ 188177: PUSHI #0x00002410 19277 @ 188182: ASSPAR 19278 @ 188183: CALL 19279 @ 188184: LINE 3118 "regression-compile-tmp/asems412.imp" 19280 @ 188223: PUSH RETURN 19281 @ 188226: CALL 3119 ->NEXT 19282 @ 188227: LINE 3119 "regression-compile-tmp/asems412.imp" 19283 @ 188266: JUMP L_0150 3120 Z(97):%IF CONTROL&ARRAY DIAG # 0 %THEN CHECKED ARRAY REF %C 3121 %ELSE ARRAY REF 19284 @ 188269: LINE 3120 "regression-compile-tmp/asems412.imp" 19285 @ 188308: PUSHI #0x00000061 19286 @ 188313: SLABEL 257 19287 @ 188316: LINE 3120 "regression-compile-tmp/asems412.imp" 19288 @ 188355: PUSH CONTROL 19289 @ 188358: PUSHI #0x00000004 19290 @ 188363: AND 19291 @ 188364: PUSHI #0x00000000 19292 @ 188369: JUMPIF = L_0004 19293 @ 188373: PUSH CHECKEDARRAYREF 19294 @ 188376: CALL 19295 @ 188377: GOTO L_0003 19296 @ 188380: LOCATE L_0004 19297 @ 188383: PUSH ARRAYREF 19298 @ 188386: CALL 19299 @ 188387: LOCATE L_0003 3122 ->NEXT 19300 @ 188390: LINE 3122 "regression-compile-tmp/asems412.imp" 19301 @ 188429: JUMP L_0150 3123 Z('.'):OPR = CONC; ->ARITH 19302 @ 188432: LINE 3123 "regression-compile-tmp/asems412.imp" 19303 @ 188471: PUSHI #0x0000002e 19304 @ 188476: SLABEL 257 19305 @ 188479: LINE 3123 "regression-compile-tmp/asems412.imp" 19306 @ 188518: PUSH OPR 19307 @ 188521: PUSHI #0x0000000e 19308 @ 188526: ASSVAL 19309 @ 188527: LINE 3123 "regression-compile-tmp/asems412.imp" 19310 @ 188566: JUMP L_0152 3124 Z('+'):OPR = ADD; ->ARITH 19311 @ 188569: LINE 3124 "regression-compile-tmp/asems412.imp" 19312 @ 188608: PUSHI #0x0000002b 19313 @ 188613: SLABEL 257 19314 @ 188616: LINE 3124 "regression-compile-tmp/asems412.imp" 19315 @ 188655: PUSH OPR 19316 @ 188658: PUSHI #0x00000003 19317 @ 188663: ASSVAL 19318 @ 188664: LINE 3124 "regression-compile-tmp/asems412.imp" 19319 @ 188703: JUMP L_0152 3125 Z('-'):OPR = SUB; ->ARITH 19320 @ 188706: LINE 3125 "regression-compile-tmp/asems412.imp" 19321 @ 188745: PUSHI #0x0000002d 19322 @ 188750: SLABEL 257 19323 @ 188753: LINE 3125 "regression-compile-tmp/asems412.imp" 19324 @ 188792: PUSH OPR 19325 @ 188795: PUSHI #0x00000004 19326 @ 188800: ASSVAL 19327 @ 188801: LINE 3125 "regression-compile-tmp/asems412.imp" 19328 @ 188840: JUMP L_0152 3126 Z('!'):OPR = IOR; ->ARITH 19329 @ 188843: LINE 3126 "regression-compile-tmp/asems412.imp" 19330 @ 188882: PUSHI #0x00000021 19331 @ 188887: SLABEL 257 19332 @ 188890: LINE 3126 "regression-compile-tmp/asems412.imp" 19333 @ 188929: PUSH OPR 19334 @ 188932: PUSHI #0x00000009 19335 @ 188937: ASSVAL 19336 @ 188938: LINE 3126 "regression-compile-tmp/asems412.imp" 19337 @ 188977: JUMP L_0152 3127 Z('%'):OPR = XOR; ->ARITH 19338 @ 188980: LINE 3127 "regression-compile-tmp/asems412.imp" 19339 @ 189019: PUSHI #0x00000025 19340 @ 189024: SLABEL 257 19341 @ 189027: LINE 3127 "regression-compile-tmp/asems412.imp" 19342 @ 189066: PUSH OPR 19343 @ 189069: PUSHI #0x0000000a 19344 @ 189074: ASSVAL 19345 @ 189075: LINE 3127 "regression-compile-tmp/asems412.imp" 19346 @ 189114: JUMP L_0152 3128 Z('&'):OPR = AND; ->ARITH 19347 @ 189117: LINE 3128 "regression-compile-tmp/asems412.imp" 19348 @ 189156: PUSHI #0x00000026 19349 @ 189161: SLABEL 257 19350 @ 189164: LINE 3128 "regression-compile-tmp/asems412.imp" 19351 @ 189203: PUSH OPR 19352 @ 189206: PUSHI #0x00000008 19353 @ 189211: ASSVAL 19354 @ 189212: LINE 3128 "regression-compile-tmp/asems412.imp" 19355 @ 189251: JUMP L_0152 3129 Z('['):OPR = LSH; ->ARITH 19356 @ 189254: LINE 3129 "regression-compile-tmp/asems412.imp" 19357 @ 189293: PUSHI #0x0000005b 19358 @ 189298: SLABEL 257 19359 @ 189301: LINE 3129 "regression-compile-tmp/asems412.imp" 19360 @ 189340: PUSH OPR 19361 @ 189343: PUSHI #0x0000000b 19362 @ 189348: ASSVAL 19363 @ 189349: LINE 3129 "regression-compile-tmp/asems412.imp" 19364 @ 189388: JUMP L_0152 3130 Z(']'):OPR = RSH; ->ARITH 19365 @ 189391: LINE 3130 "regression-compile-tmp/asems412.imp" 19366 @ 189430: PUSHI #0x0000005d 19367 @ 189435: SLABEL 257 19368 @ 189438: LINE 3130 "regression-compile-tmp/asems412.imp" 19369 @ 189477: PUSH OPR 19370 @ 189480: PUSHI #0x0000000c 19371 @ 189485: ASSVAL 19372 @ 189486: LINE 3130 "regression-compile-tmp/asems412.imp" 19373 @ 189525: JUMP L_0152 3131 Z('*'):OPR = MUL; ->ARITH 19374 @ 189528: LINE 3131 "regression-compile-tmp/asems412.imp" 19375 @ 189567: PUSHI #0x0000002a 19376 @ 189572: SLABEL 257 19377 @ 189575: LINE 3131 "regression-compile-tmp/asems412.imp" 19378 @ 189614: PUSH OPR 19379 @ 189617: PUSHI #0x00000006 19380 @ 189622: ASSVAL 19381 @ 189623: LINE 3131 "regression-compile-tmp/asems412.imp" 19382 @ 189662: JUMP L_0152 3132 Z('/'):OPR = DIV; ->ARITH 19383 @ 189665: LINE 3132 "regression-compile-tmp/asems412.imp" 19384 @ 189704: PUSHI #0x0000002f 19385 @ 189709: SLABEL 257 19386 @ 189712: LINE 3132 "regression-compile-tmp/asems412.imp" 19387 @ 189751: PUSH OPR 19388 @ 189754: PUSHI #0x00000007 19389 @ 189759: ASSVAL 19390 @ 189760: LINE 3132 "regression-compile-tmp/asems412.imp" 19391 @ 189799: JUMP L_0152 3133 Z('Q'):OPR = RDIV; ->ARITH 19392 @ 189802: LINE 3133 "regression-compile-tmp/asems412.imp" 19393 @ 189841: PUSHI #0x00000051 19394 @ 189846: SLABEL 257 19395 @ 189849: LINE 3133 "regression-compile-tmp/asems412.imp" 19396 @ 189888: PUSH OPR 19397 @ 189891: PUSHI #0x00000010 19398 @ 189896: ASSVAL 19399 @ 189897: LINE 3133 "regression-compile-tmp/asems412.imp" 19400 @ 189936: JUMP L_0152 3134 Z('U'):OPR = NEG; ->ARITH 19401 @ 189939: LINE 3134 "regression-compile-tmp/asems412.imp" 19402 @ 189978: PUSHI #0x00000055 19403 @ 189983: SLABEL 257 19404 @ 189986: LINE 3134 "regression-compile-tmp/asems412.imp" 19405 @ 190025: PUSH OPR 19406 @ 190028: PUSHI #0x00000002 19407 @ 190033: ASSVAL 19408 @ 190034: LINE 3134 "regression-compile-tmp/asems412.imp" 19409 @ 190073: JUMP L_0152 3135 Z('\'):OPR = NOT; ->ARITH 19410 @ 190076: LINE 3135 "regression-compile-tmp/asems412.imp" 19411 @ 190115: PUSHI #0x0000005c 19412 @ 190120: SLABEL 257 19413 @ 190123: LINE 3135 "regression-compile-tmp/asems412.imp" 19414 @ 190162: PUSH OPR 19415 @ 190165: PUSHI #0x00000001 19416 @ 190170: ASSVAL 19417 @ 190171: LINE 3135 "regression-compile-tmp/asems412.imp" 19418 @ 190210: JUMP L_0152 3136 Z('X'): 19419 @ 190213: LINE 3136 "regression-compile-tmp/asems412.imp" 19420 @ 190252: PUSHI #0x00000058 19421 @ 190257: SLABEL 257 3137 Z(120):OPR = EXP; ! LOWER CASE 'X' 3138 19422 @ 190260: LINE 3137 "regression-compile-tmp/asems412.imp" 19423 @ 190299: PUSHI #0x00000078 19424 @ 190304: SLABEL 257 19425 @ 190307: LINE 3137 "regression-compile-tmp/asems412.imp" 19426 @ 190346: PUSH OPR 19427 @ 190349: PUSHI #0x0000000d 19428 @ 190354: ASSVAL 3139 ARITH: OPERATE(OPR); ->NEXT 3140 19429 @ 190355: LINE 3139 "regression-compile-tmp/asems412.imp" 19430 @ 190394: LABEL L_0152 19431 @ 190397: LINE 3139 "regression-compile-tmp/asems412.imp" 19432 @ 190436: PUSH OPERATE 19433 @ 190439: PUSH OPR 19434 @ 190442: ASSPAR 19435 @ 190443: CALL 19436 @ 190444: LINE 3139 "regression-compile-tmp/asems412.imp" 19437 @ 190483: JUMP L_0150 3141 Z(118):SET LHS; ! LOWER CASE 'V' 19438 @ 190486: LINE 3141 "regression-compile-tmp/asems412.imp" 19439 @ 190525: PUSHI #0x00000076 19440 @ 190530: SLABEL 257 19441 @ 190533: LINE 3141 "regression-compile-tmp/asems412.imp" 19442 @ 190572: PUSH SETLHS 19443 @ 190575: CALL 3142 CCREG = 0 %IF CCREG < 0 19444 @ 190576: LINE 3142 "regression-compile-tmp/asems412.imp" 19445 @ 190615: PUSH CCREG 19446 @ 190618: PUSHI #0x00000000 19447 @ 190623: JUMPIF >= L_0004 19448 @ 190627: PUSH CCREG 19449 @ 190630: PUSHI #0x00000000 19450 @ 190635: ASSVAL 19451 @ 190636: LOCATE L_0004 3143 %IF FLOATING(LHS) %THEN K = ANYF %ELSE K = ANY 19452 @ 190639: LINE 3143 "regression-compile-tmp/asems412.imp" 19453 @ 190678: PUSH FLOATING 19454 @ 190681: PUSH LHS 19455 @ 190684: ASSPAR 19456 @ 190685: CALL 19457 @ 190686: bf L_0004 19458 @ 190689: PUSH K 19459 @ 190692: PUSHI #0x0000002f 19460 @ 190697: ASSVAL 19461 @ 190698: GOTO L_0003 19462 @ 190701: LOCATE L_0004 19463 @ 190704: PUSH K 19464 @ 190707: PUSHI #0x0000002d 19465 @ 190712: ASSVAL 19466 @ 190713: LOCATE L_0003 3144 LOAD(LHS,K) 19467 @ 190716: LINE 3144 "regression-compile-tmp/asems412.imp" 19468 @ 190755: PUSH LOAD 19469 @ 190758: PUSH LHS 19470 @ 190761: ASSPAR 19471 @ 190762: PUSH K 19472 @ 190765: ASSPAR 19473 @ 190766: CALL 3145 TEST ZERO(LHS) 19474 @ 190767: LINE 3145 "regression-compile-tmp/asems412.imp" 19475 @ 190806: PUSH TESTZERO 19476 @ 190809: PUSH LHS 19477 @ 190812: ASSPAR 19478 @ 190813: CALL 3146 K = LHS_BASE 19479 @ 190814: LINE 3146 "regression-compile-tmp/asems412.imp" 19480 @ 190853: PUSH K 19481 @ 190856: PUSH LHS 19482 @ 190859: SELECT 6 19483 @ 190862: ASSVAL 3147 JUMP TO(3, 5, REDEFINE) 19484 @ 190863: LINE 3147 "regression-compile-tmp/asems412.imp" 19485 @ 190902: PUSH JUMPTO 19486 @ 190905: PUSHI #0x00000003 19487 @ 190910: ASSPAR 19488 @ 190911: PUSHI #0x00000005 19489 @ 190916: ASSPAR 19490 @ 190917: PUSHI #0x00000001 19491 @ 190922: ASSPAR 19492 @ 190923: CALL 3148 CLAIM(LHS_BASE) 19493 @ 190924: LINE 3148 "regression-compile-tmp/asems412.imp" 19494 @ 190963: PUSH CLAIM 19495 @ 190966: PUSH LHS 19496 @ 190969: SELECT 6 19497 @ 190972: ASSPAR 19498 @ 190973: CALL 3149 OPERATE(NEG); SET LHS 19499 @ 190974: LINE 3149 "regression-compile-tmp/asems412.imp" 19500 @ 191013: PUSH OPERATE 19501 @ 191016: PUSHI #0x00000002 19502 @ 191021: ASSPAR 19503 @ 191022: CALL 19504 @ 191023: LINE 3149 "regression-compile-tmp/asems412.imp" 19505 @ 191062: PUSH SETLHS 19506 @ 191065: CALL 3150 LOAD(LHS,K) 19507 @ 191066: LINE 3150 "regression-compile-tmp/asems412.imp" 19508 @ 191105: PUSH LOAD 19509 @ 191108: PUSH LHS 19510 @ 191111: ASSPAR 19511 @ 191112: PUSH K 19512 @ 191115: ASSPAR 19513 @ 191116: CALL 3151 DEFINE LABEL(3) 19514 @ 191117: LINE 3151 "regression-compile-tmp/asems412.imp" 19515 @ 191156: PUSH DEFINELABEL 19516 @ 191159: PUSHI #0x00000003 19517 @ 191164: ASSPAR 19518 @ 191165: CALL 3152 FORGET(LHS_BASE) 19519 @ 191166: LINE 3152 "regression-compile-tmp/asems412.imp" 19520 @ 191205: PUSH FORGET 19521 @ 191208: PUSH LHS 19522 @ 191211: SELECT 6 19523 @ 191214: ASSPAR 19524 @ 191215: CALL 3153 ->NEXT 3154 19525 @ 191216: LINE 3153 "regression-compile-tmp/asems412.imp" 19526 @ 191255: JUMP L_0150 3155 Z('S'):ASSIGN(1); ->NEXT 19527 @ 191258: LINE 3155 "regression-compile-tmp/asems412.imp" 19528 @ 191297: PUSHI #0x00000053 19529 @ 191302: SLABEL 257 19530 @ 191305: LINE 3155 "regression-compile-tmp/asems412.imp" 19531 @ 191344: PUSH ASSIGN 19532 @ 191347: PUSHI #0x00000001 19533 @ 191352: ASSPAR 19534 @ 191353: CALL 19535 @ 191354: LINE 3155 "regression-compile-tmp/asems412.imp" 19536 @ 191393: JUMP L_0150 3156 Z('Z'):ASSIGN(0); ->NEXT 19537 @ 191396: LINE 3156 "regression-compile-tmp/asems412.imp" 19538 @ 191435: PUSHI #0x0000005a 19539 @ 191440: SLABEL 257 19540 @ 191443: LINE 3156 "regression-compile-tmp/asems412.imp" 19541 @ 191482: PUSH ASSIGN 19542 @ 191485: PUSHI #0x00000000 19543 @ 191490: ASSPAR 19544 @ 191491: CALL 19545 @ 191492: LINE 3156 "regression-compile-tmp/asems412.imp" 19546 @ 191531: JUMP L_0150 3157 Z(112):ASSIGN(-1); WDISP = NEW DISP; ->NEXT; ! LOWER CASE 'P' 3158 19547 @ 191534: LINE 3157 "regression-compile-tmp/asems412.imp" 19548 @ 191573: PUSHI #0x00000070 19549 @ 191578: SLABEL 257 19550 @ 191581: LINE 3157 "regression-compile-tmp/asems412.imp" 19551 @ 191620: PUSH ASSIGN 19552 @ 191623: PUSHI #0x00000001 19553 @ 191628: NEGATE 19554 @ 191629: ASSPAR 19555 @ 191630: CALL 19556 @ 191631: LINE 3157 "regression-compile-tmp/asems412.imp" 19557 @ 191670: PUSH WDISP 19558 @ 191673: PUSH NEWDISP 19559 @ 191676: ASSVAL 19560 @ 191677: LINE 3157 "regression-compile-tmp/asems412.imp" 19561 @ 191716: JUMP L_0150 3159 Z(107):KNOW(R1, 1, INTEGER) 19562 @ 191719: LINE 3159 "regression-compile-tmp/asems412.imp" 19563 @ 191758: PUSHI #0x0000006b 19564 @ 191763: SLABEL 257 19565 @ 191766: LINE 3159 "regression-compile-tmp/asems412.imp" 19566 @ 191805: PUSH KNOW 19567 @ 191808: PUSHI #0x00000002 19568 @ 191813: ASSPAR 19569 @ 191814: PUSHI #0x00000001 19570 @ 191819: ASSPAR 19571 @ 191820: PUSHI #0x00000001 19572 @ 191825: ASSPAR 19573 @ 191826: CALL 3160 Z('='):OPR = 0; ->COND; ! LOWER CASE 'K' 19574 @ 191827: LINE 3160 "regression-compile-tmp/asems412.imp" 19575 @ 191866: PUSHI #0x0000003d 19576 @ 191871: SLABEL 257 19577 @ 191874: LINE 3160 "regression-compile-tmp/asems412.imp" 19578 @ 191913: PUSH OPR 19579 @ 191916: PUSHI #0x00000000 19580 @ 191921: ASSVAL 19581 @ 191922: LINE 3160 "regression-compile-tmp/asems412.imp" 19582 @ 191961: JUMP L_0153 3161 Z(116):KNOW(R1, 0, INTEGER) 19583 @ 191964: LINE 3161 "regression-compile-tmp/asems412.imp" 19584 @ 192003: PUSHI #0x00000074 19585 @ 192008: SLABEL 257 19586 @ 192011: LINE 3161 "regression-compile-tmp/asems412.imp" 19587 @ 192050: PUSH KNOW 19588 @ 192053: PUSHI #0x00000002 19589 @ 192058: ASSPAR 19590 @ 192059: PUSHI #0x00000000 19591 @ 192064: ASSPAR 19592 @ 192065: PUSHI #0x00000001 19593 @ 192070: ASSPAR 19594 @ 192071: CALL 3162 Z('#'):OPR = 1; ->COND; ! LOWER CASE 'T' 19595 @ 192072: LINE 3162 "regression-compile-tmp/asems412.imp" 19596 @ 192111: PUSHI #0x00000023 19597 @ 192116: SLABEL 257 19598 @ 192119: LINE 3162 "regression-compile-tmp/asems412.imp" 19599 @ 192158: PUSH OPR 19600 @ 192161: PUSHI #0x00000001 19601 @ 192166: ASSVAL 19602 @ 192167: LINE 3162 "regression-compile-tmp/asems412.imp" 19603 @ 192206: JUMP L_0153 3163 Z('<'):OPR = 2; ->COND 19604 @ 192209: LINE 3163 "regression-compile-tmp/asems412.imp" 19605 @ 192248: PUSHI #0x0000003c 19606 @ 192253: SLABEL 257 19607 @ 192256: LINE 3163 "regression-compile-tmp/asems412.imp" 19608 @ 192295: PUSH OPR 19609 @ 192298: PUSHI #0x00000002 19610 @ 192303: ASSVAL 19611 @ 192304: LINE 3163 "regression-compile-tmp/asems412.imp" 19612 @ 192343: JUMP L_0153 3164 Z('>'):OPR = 3; ->COND 19613 @ 192346: LINE 3164 "regression-compile-tmp/asems412.imp" 19614 @ 192385: PUSHI #0x0000003e 19615 @ 192390: SLABEL 257 19616 @ 192393: LINE 3164 "regression-compile-tmp/asems412.imp" 19617 @ 192432: PUSH OPR 19618 @ 192435: PUSHI #0x00000003 19619 @ 192440: ASSVAL 19620 @ 192441: LINE 3164 "regression-compile-tmp/asems412.imp" 19621 @ 192480: JUMP L_0153 3165 Z('('):OPR = 4; ->COND 19622 @ 192483: LINE 3165 "regression-compile-tmp/asems412.imp" 19623 @ 192522: PUSHI #0x00000028 19624 @ 192527: SLABEL 257 19625 @ 192530: LINE 3165 "regression-compile-tmp/asems412.imp" 19626 @ 192569: PUSH OPR 19627 @ 192572: PUSHI #0x00000004 19628 @ 192577: ASSVAL 19629 @ 192578: LINE 3165 "regression-compile-tmp/asems412.imp" 19630 @ 192617: JUMP L_0153 3166 Z(')'):OPR = 5 3167 19631 @ 192620: LINE 3166 "regression-compile-tmp/asems412.imp" 19632 @ 192659: PUSHI #0x00000029 19633 @ 192664: SLABEL 257 19634 @ 192667: LINE 3166 "regression-compile-tmp/asems412.imp" 19635 @ 192706: PUSH OPR 19636 @ 192709: PUSHI #0x00000005 19637 @ 192714: ASSVAL 3168 COND: VAL = TAG 19638 @ 192715: LINE 3168 "regression-compile-tmp/asems412.imp" 19639 @ 192754: LABEL L_0153 19640 @ 192757: LINE 3168 "regression-compile-tmp/asems412.imp" 19641 @ 192796: PUSH VAL 19642 @ 192799: PUSH TAG 19643 @ 192802: CALL 19644 @ 192803: ASSVAL 3169 JUMP TO(VAL, OPR+INVERT, REDEFINE) 19645 @ 192804: LINE 3169 "regression-compile-tmp/asems412.imp" 19646 @ 192843: PUSH JUMPTO 19647 @ 192846: PUSH VAL 19648 @ 192849: ASSPAR 19649 @ 192850: PUSH OPR 19650 @ 192853: PUSH INVERT 19651 @ 192856: ADD 19652 @ 192857: ASSPAR 19653 @ 192858: PUSHI #0x00000001 19654 @ 192863: ASSPAR 19655 @ 192864: CALL 3170 ->NEXT 19656 @ 192865: LINE 3170 "regression-compile-tmp/asems412.imp" 19657 @ 192904: JUMP L_0150 3171 Z('C'):SET BOTH 19658 @ 192907: LINE 3171 "regression-compile-tmp/asems412.imp" 19659 @ 192946: PUSHI #0x00000043 19660 @ 192951: SLABEL 257 19661 @ 192954: LINE 3171 "regression-compile-tmp/asems412.imp" 19662 @ 192993: PUSH SETBOTH 19663 @ 192996: CALL 3172 AMAP(LHS); AMAP(RHS) 19664 @ 192997: LINE 3172 "regression-compile-tmp/asems412.imp" 19665 @ 193036: PUSH AMAP 19666 @ 193039: PUSH LHS 19667 @ 193042: ASSPAR 19668 @ 193043: CALL 19669 @ 193044: LINE 3172 "regression-compile-tmp/asems412.imp" 19670 @ 193083: PUSH AMAP 19671 @ 193086: PUSH RHS 19672 @ 193089: ASSPAR 19673 @ 193090: CALL 3173 Z(126):! FIRST OF DOUBLE SIDED 19674 @ 193091: LINE 3173 "regression-compile-tmp/asems412.imp" 19675 @ 193130: PUSHI #0x0000007e 19676 @ 193135: SLABEL 257 3174 Z('?'):SET BOTH 19677 @ 193138: LINE 3174 "regression-compile-tmp/asems412.imp" 19678 @ 193177: PUSHI #0x0000003f 19679 @ 193182: SLABEL 257 19680 @ 193185: LINE 3174 "regression-compile-tmp/asems412.imp" 19681 @ 193224: PUSH SETBOTH 19682 @ 193227: CALL 3175 COMPARE(LHS, RHS); STP = STP-2 19683 @ 193228: LINE 3175 "regression-compile-tmp/asems412.imp" 19684 @ 193267: PUSH COMPARE 19685 @ 193270: PUSH LHS 19686 @ 193273: ASSPAR 19687 @ 193274: PUSH RHS 19688 @ 193277: ASSPAR 19689 @ 193278: CALL 19690 @ 193279: LINE 3175 "regression-compile-tmp/asems412.imp" 19691 @ 193318: PUSH STP 19692 @ 193321: PUSH STP 19693 @ 193324: PUSHI #0x00000002 19694 @ 193329: SUB 19695 @ 193330: ASSVAL 3176 DROP(RHS); DROP(LHS) 19696 @ 193331: LINE 3176 "regression-compile-tmp/asems412.imp" 19697 @ 193370: PUSH DROP 19698 @ 193373: PUSH RHS 19699 @ 193376: ASSPAR 19700 @ 193377: CALL 19701 @ 193378: LINE 3176 "regression-compile-tmp/asems412.imp" 19702 @ 193417: PUSH DROP 19703 @ 193420: PUSH LHS 19704 @ 193423: ASSPAR 19705 @ 193424: CALL 3177 ->NEXT 19706 @ 193425: LINE 3177 "regression-compile-tmp/asems412.imp" 19707 @ 193464: JUMP L_0150 3178 Z('"'):ST WORK = STACKED(STP+SWOPPED+1)_V 19708 @ 193467: LINE 3178 "regression-compile-tmp/asems412.imp" 19709 @ 193506: PUSHI #0x00000022 19710 @ 193511: SLABEL 257 19711 @ 193514: LINE 3178 "regression-compile-tmp/asems412.imp" 19712 @ 193553: PUSH STWORK 19713 @ 193556: PUSH STACKED 19714 @ 193559: PUSH STP 19715 @ 193562: PUSH SWOPPED 19716 @ 193565: ADD 19717 @ 193566: PUSHI #0x00000001 19718 @ 193571: ADD 19719 @ 193572: ACCESS 19720 @ 193573: SELECT 1 19721 @ 193576: ASSVAL 3179 SSTACK(ST WORK) 19722 @ 193577: LINE 3179 "regression-compile-tmp/asems412.imp" 19723 @ 193616: PUSH SSTACK 19724 @ 193619: PUSH STWORK 19725 @ 193622: ASSPAR 19726 @ 193623: CALL 3180 WDISP = SDISP 19727 @ 193624: LINE 3180 "regression-compile-tmp/asems412.imp" 19728 @ 193663: PUSH WDISP 19729 @ 193666: PUSH SDISP 19730 @ 193669: ASSVAL 3181 ->NEXT 19731 @ 193670: LINE 3181 "regression-compile-tmp/asems412.imp" 19732 @ 193709: JUMP L_0150 3182 Z('_'):LIMEN = CA 19733 @ 193712: LINE 3182 "regression-compile-tmp/asems412.imp" 19734 @ 193751: PUSHI #0x0000005f 19735 @ 193756: SLABEL 257 19736 @ 193759: LINE 3182 "regression-compile-tmp/asems412.imp" 19737 @ 193798: PUSH LIMEN 19738 @ 193801: PUSH CA 19739 @ 193804: ASSVAL 3183 UNCONDJUMP = 0 19740 @ 193805: LINE 3183 "regression-compile-tmp/asems412.imp" 19741 @ 193844: PUSH UNCONDJUMP 19742 @ 193847: PUSHI #0x00000000 19743 @ 193852: ASSVAL 3184 V == VAR(LOOKUP(TAG)); POP LHS; DROP(LHS) 19744 @ 193853: LINE 3184 "regression-compile-tmp/asems412.imp" 19745 @ 193892: PUSH V 19746 @ 193895: PUSH VAR 19747 @ 193898: PUSH LOOKUP 19748 @ 193901: PUSH TAG 19749 @ 193904: CALL 19750 @ 193905: ASSPAR 19751 @ 193906: CALL 19752 @ 193907: ACCESS 19753 @ 193908: ASSREF 19754 @ 193909: LINE 3184 "regression-compile-tmp/asems412.imp" 19755 @ 193948: PUSH POPLHS 19756 @ 193951: CALL 19757 @ 193952: LINE 3184 "regression-compile-tmp/asems412.imp" 19758 @ 193991: PUSH DROP 19759 @ 193994: PUSH LHS 19760 @ 193997: ASSPAR 19761 @ 193998: CALL 3185 GPATCH(CA, V_EXTRA+LHS_DISP*2) 19762 @ 193999: LINE 3185 "regression-compile-tmp/asems412.imp" 19763 @ 194038: PUSH GPATCH 19764 @ 194041: PUSH CA 19765 @ 194044: ASSPAR 19766 @ 194045: PUSH V 19767 @ 194048: SELECT 3 19768 @ 194051: PUSH LHS 19769 @ 194054: SELECT 1 19770 @ 194057: PUSHI #0x00000002 19771 @ 194062: MUL 19772 @ 194063: ADD 19773 @ 194064: ASSPAR 19774 @ 194065: CALL 3186 ->NEXT 19775 @ 194066: LINE 3186 "regression-compile-tmp/asems412.imp" 19776 @ 194105: JUMP L_0150 3187 Z('W'):V == VAR(LOOKUP(TAG)) 19777 @ 194108: LINE 3187 "regression-compile-tmp/asems412.imp" 19778 @ 194147: PUSHI #0x00000057 19779 @ 194152: SLABEL 257 19780 @ 194155: LINE 3187 "regression-compile-tmp/asems412.imp" 19781 @ 194194: PUSH V 19782 @ 194197: PUSH VAR 19783 @ 194200: PUSH LOOKUP 19784 @ 194203: PUSH TAG 19785 @ 194206: CALL 19786 @ 194207: ASSPAR 19787 @ 194208: CALL 19788 @ 194209: ACCESS 19789 @ 194210: ASSREF 3188 %IF CONTROL&TEST SWITCH # 0 %START 19790 @ 194211: LINE 3188 "regression-compile-tmp/asems412.imp" 19791 @ 194250: PUSH CONTROL 19792 @ 194253: PUSHI #0x00000001 19793 @ 194258: AND 19794 @ 194259: PUSHI #0x00000000 19795 @ 194264: JUMPIF = L_0004 3189 HALF = GLA; K = V_DISP 19796 @ 194268: LINE 3189 "regression-compile-tmp/asems412.imp" 19797 @ 194307: PUSH HALF 19798 @ 194310: PUSHI #0x0000002a 19799 @ 194315: ASSVAL 19800 @ 194316: LINE 3189 "regression-compile-tmp/asems412.imp" 19801 @ 194355: PUSH K 19802 @ 194358: PUSH V 19803 @ 194361: SELECT 1 19804 @ 194364: ASSVAL 3190 RANGE(HALF, K) 19805 @ 194365: LINE 3190 "regression-compile-tmp/asems412.imp" 19806 @ 194404: PUSH RANGE 19807 @ 194407: PUSH HALF 19808 @ 194410: ASSPAR 19809 @ 194411: PUSH K 19810 @ 194414: ASSPAR 19811 @ 194415: CALL 3191 POP LHS; LRD(LHS, R1) 19812 @ 194416: LINE 3191 "regression-compile-tmp/asems412.imp" 19813 @ 194455: PUSH POPLHS 19814 @ 194458: CALL 19815 @ 194459: LINE 3191 "regression-compile-tmp/asems412.imp" 19816 @ 194498: PUSH LRD 19817 @ 194501: PUSH LHS 19818 @ 194504: ASSPAR 19819 @ 194505: PUSHI #0x00000002 19820 @ 194510: ASSPAR 19821 @ 194511: CALL 3192 RI2(LHI, R2, HALF, K) 19822 @ 194512: LINE 3192 "regression-compile-tmp/asems412.imp" 19823 @ 194551: PUSH RI2 19824 @ 194554: PUSHI #0x0000c800 19825 @ 194559: ASSPAR 19826 @ 194560: PUSHI #0x00000003 19827 @ 194565: ASSPAR 19828 @ 194566: PUSH HALF 19829 @ 194569: ASSPAR 19830 @ 194570: PUSH K 19831 @ 194573: ASSPAR 19832 @ 194574: CALL 3193 PERM(SWJUMP) 19833 @ 194575: LINE 3193 "regression-compile-tmp/asems412.imp" 19834 @ 194614: PUSH PERM 19835 @ 194617: PUSHI #0x0001ef04 19836 @ 194622: ASSPAR 19837 @ 194623: CALL 3194 %ELSE 19838 @ 194624: LINE 3194 "regression-compile-tmp/asems412.imp" 19839 @ 194663: GOTO L_0003 19840 @ 194666: LOCATE L_0004 3195 CSTACK(1); OPERATE(LSH) 19841 @ 194669: LINE 3195 "regression-compile-tmp/asems412.imp" 19842 @ 194708: PUSH CSTACK 19843 @ 194711: PUSHI #0x00000001 19844 @ 194716: ASSPAR 19845 @ 194717: CALL 19846 @ 194718: LINE 3195 "regression-compile-tmp/asems412.imp" 19847 @ 194757: PUSH OPERATE 19848 @ 194760: PUSHI #0x0000000b 19849 @ 194765: ASSPAR 19850 @ 194766: CALL 3196 POP LHS; LRD(LHS, ANY0) 19851 @ 194767: LINE 3196 "regression-compile-tmp/asems412.imp" 19852 @ 194806: PUSH POPLHS 19853 @ 194809: CALL 19854 @ 194810: LINE 3196 "regression-compile-tmp/asems412.imp" 19855 @ 194849: PUSH LRD 19856 @ 194852: PUSH LHS 19857 @ 194855: ASSPAR 19858 @ 194856: PUSHI #0x0000002e 19859 @ 194861: ASSPAR 19860 @ 194862: CALL 3197 J = ACTUAL(LHS_BASE) 19861 @ 194863: LINE 3197 "regression-compile-tmp/asems412.imp" 19862 @ 194902: PUSH J 19863 @ 194905: PUSH ACTUAL 19864 @ 194908: PUSH LHS 19865 @ 194911: SELECT 6 19866 @ 194914: ACCESS 19867 @ 194915: ASSVAL 3198 DUMP(LHL+J<<4+ACTUAL(GLA)) 19868 @ 194916: LINE 3198 "regression-compile-tmp/asems412.imp" 19869 @ 194955: PUSH DUMP 19870 @ 194958: PUSHI #0x00007300 19871 @ 194963: PUSH J 19872 @ 194966: PUSHI #0x00000004 19873 @ 194971: LSH 19874 @ 194972: ADD 19875 @ 194973: PUSH ACTUAL 19876 @ 194976: PUSHI #0x0000002a 19877 @ 194981: ACCESS 19878 @ 194982: ADD 19879 @ 194983: ASSPAR 19880 @ 194984: CALL 3199 K = V_EXTRA 19881 @ 194985: LINE 3199 "regression-compile-tmp/asems412.imp" 19882 @ 195024: PUSH K 19883 @ 195027: PUSH V 19884 @ 195030: SELECT 3 19885 @ 195033: ASSVAL 3200 DUMP(X'4000'+J<<8+K>>16&255) 19886 @ 195034: LINE 3200 "regression-compile-tmp/asems412.imp" 19887 @ 195073: PUSH DUMP 19888 @ 195076: PUSHI #0x00004000 19889 @ 195081: PUSH J 19890 @ 195084: PUSHI #0x00000008 19891 @ 195089: LSH 19892 @ 195090: ADD 19893 @ 195091: PUSH K 19894 @ 195094: PUSHI #0x00000010 19895 @ 195099: RSH 19896 @ 195100: PUSHI #0x000000ff 19897 @ 195105: AND 19898 @ 195106: ADD 19899 @ 195107: ASSPAR 19900 @ 195108: CALL 3201 DUMP(K&X'FFFF') 19901 @ 195109: LINE 3201 "regression-compile-tmp/asems412.imp" 19902 @ 195148: PUSH DUMP 19903 @ 195151: PUSH K 19904 @ 195154: PUSHI #0x0000ffff 19905 @ 195159: AND 19906 @ 195160: ASSPAR 19907 @ 195161: CALL 3202 DUMP(AR+J<<4+ACTUAL(CODE)) 19908 @ 195162: LINE 3202 "regression-compile-tmp/asems412.imp" 19909 @ 195201: PUSH DUMP 19910 @ 195204: PUSHI #0x00000a00 19911 @ 195209: PUSH J 19912 @ 195212: PUSHI #0x00000004 19913 @ 195217: LSH 19914 @ 195218: ADD 19915 @ 195219: PUSH ACTUAL 19916 @ 195222: PUSHI #0x0000002c 19917 @ 195227: ACCESS 19918 @ 195228: ADD 19919 @ 195229: ASSPAR 19920 @ 195230: CALL 3203 DUMP(BFCR+J) 19921 @ 195231: LINE 3203 "regression-compile-tmp/asems412.imp" 19922 @ 195270: PUSH DUMP 19923 @ 195273: PUSHI #0x00000300 19924 @ 195278: PUSH J 19925 @ 195281: ADD 19926 @ 195282: ASSPAR 19927 @ 195283: CALL 3204 LIMEN = CA; UNCOND JUMP = CA 19928 @ 195284: LINE 3204 "regression-compile-tmp/asems412.imp" 19929 @ 195323: PUSH LIMEN 19930 @ 195326: PUSH CA 19931 @ 195329: ASSVAL 19932 @ 195330: LINE 3204 "regression-compile-tmp/asems412.imp" 19933 @ 195369: PUSH UNCONDJUMP 19934 @ 195372: PUSH CA 19935 @ 195375: ASSVAL 3205 %FINISH 19936 @ 195376: LINE 3205 "regression-compile-tmp/asems412.imp" 19937 @ 195415: LOCATE L_0003 3206 ->NEXT 19938 @ 195418: LINE 3206 "regression-compile-tmp/asems412.imp" 19939 @ 195457: JUMP L_0150 3207 Z('B'): 19940 @ 195460: LINE 3207 "regression-compile-tmp/asems412.imp" 19941 @ 195499: PUSHI #0x00000042 19942 @ 195504: SLABEL 257 3208 Z(113): ! LOWER CASE 'Q' 19943 @ 195507: LINE 3208 "regression-compile-tmp/asems412.imp" 19944 @ 195546: PUSHI #0x00000071 19945 @ 195551: SLABEL 257 3209 JUMP TO(TAG, JUMP, DEFINE); ->NEXT 19946 @ 195554: LINE 3209 "regression-compile-tmp/asems412.imp" 19947 @ 195593: PUSH JUMPTO 19948 @ 195596: PUSH TAG 19949 @ 195599: CALL 19950 @ 195600: ASSPAR 19951 @ 195601: PUSHI #0x0000000c 19952 @ 195606: ASSPAR 19953 @ 195607: PUSHI #0x00000000 19954 @ 195612: ASSPAR 19955 @ 195613: CALL 19956 @ 195614: LINE 3209 "regression-compile-tmp/asems412.imp" 19957 @ 195653: JUMP L_0150 3210 Z('F'): 19958 @ 195656: LINE 3210 "regression-compile-tmp/asems412.imp" 19959 @ 195695: PUSHI #0x00000046 19960 @ 195700: SLABEL 257 3211 Z(117): ! LOWER CASE 'U' 19961 @ 195703: LINE 3211 "regression-compile-tmp/asems412.imp" 19962 @ 195742: PUSHI #0x00000075 19963 @ 195747: SLABEL 257 3212 JUMP TO(TAG, JUMP, REDEFINE); ->NEXT 19964 @ 195750: LINE 3212 "regression-compile-tmp/asems412.imp" 19965 @ 195789: PUSH JUMPTO 19966 @ 195792: PUSH TAG 19967 @ 195795: CALL 19968 @ 195796: ASSPAR 19969 @ 195797: PUSHI #0x0000000c 19970 @ 195802: ASSPAR 19971 @ 195803: PUSHI #0x00000001 19972 @ 195808: ASSPAR 19973 @ 195809: CALL 19974 @ 195810: LINE 3212 "regression-compile-tmp/asems412.imp" 19975 @ 195849: JUMP L_0150 3213 Z('J'):JUMP TO(-TAG, JUMP, DEFINE); ->NEXT 19976 @ 195852: LINE 3213 "regression-compile-tmp/asems412.imp" 19977 @ 195891: PUSHI #0x0000004a 19978 @ 195896: SLABEL 257 19979 @ 195899: LINE 3213 "regression-compile-tmp/asems412.imp" 19980 @ 195938: PUSH JUMPTO 19981 @ 195941: PUSH TAG 19982 @ 195944: CALL 19983 @ 195945: NEGATE 19984 @ 195946: ASSPAR 19985 @ 195947: PUSHI #0x0000000c 19986 @ 195952: ASSPAR 19987 @ 195953: PUSHI #0x00000000 19988 @ 195958: ASSPAR 19989 @ 195959: CALL 19990 @ 195960: LINE 3213 "regression-compile-tmp/asems412.imp" 19991 @ 195999: JUMP L_0150 3214 Z('L'):DEFINE LABEL(-TAG); ->NEXT 19992 @ 196002: LINE 3214 "regression-compile-tmp/asems412.imp" 19993 @ 196041: PUSHI #0x0000004c 19994 @ 196046: SLABEL 257 19995 @ 196049: LINE 3214 "regression-compile-tmp/asems412.imp" 19996 @ 196088: PUSH DEFINELABEL 19997 @ 196091: PUSH TAG 19998 @ 196094: CALL 19999 @ 196095: NEGATE 20000 @ 196096: ASSPAR 20001 @ 196097: CALL 20002 @ 196098: LINE 3214 "regression-compile-tmp/asems412.imp" 20003 @ 196137: JUMP L_0150 3215 Z(':'):DEFINE LABEL(TAG); ->NEXT 20004 @ 196140: LINE 3215 "regression-compile-tmp/asems412.imp" 20005 @ 196179: PUSHI #0x0000003a 20006 @ 196184: SLABEL 257 20007 @ 196187: LINE 3215 "regression-compile-tmp/asems412.imp" 20008 @ 196226: PUSH DEFINELABEL 20009 @ 196229: PUSH TAG 20010 @ 196232: CALL 20011 @ 196233: ASSPAR 20012 @ 196234: CALL 20013 @ 196235: LINE 3215 "regression-compile-tmp/asems412.imp" 20014 @ 196274: JUMP L_0150 3216 Z(102):FOR; ->NEXT; ! LOWER CASE 'F' 3217 20015 @ 196277: LINE 3216 "regression-compile-tmp/asems412.imp" 20016 @ 196316: PUSHI #0x00000066 20017 @ 196321: SLABEL 257 20018 @ 196324: LINE 3216 "regression-compile-tmp/asems412.imp" 20019 @ 196363: PUSH FOR 20020 @ 196366: CALL 20021 @ 196367: LINE 3216 "regression-compile-tmp/asems412.imp" 20022 @ 196406: JUMP L_0150 3218 Z('P'):POP LHS; DROP(LHS); DUMP(LHS_DISP); LIMEN = CA; ->NEXT 20023 @ 196409: LINE 3218 "regression-compile-tmp/asems412.imp" 20024 @ 196448: PUSHI #0x00000050 20025 @ 196453: SLABEL 257 20026 @ 196456: LINE 3218 "regression-compile-tmp/asems412.imp" 20027 @ 196495: PUSH POPLHS 20028 @ 196498: CALL 20029 @ 196499: LINE 3218 "regression-compile-tmp/asems412.imp" 20030 @ 196538: PUSH DROP 20031 @ 196541: PUSH LHS 20032 @ 196544: ASSPAR 20033 @ 196545: CALL 20034 @ 196546: LINE 3218 "regression-compile-tmp/asems412.imp" 20035 @ 196585: PUSH DUMP 20036 @ 196588: PUSH LHS 20037 @ 196591: SELECT 1 20038 @ 196594: ASSPAR 20039 @ 196595: CALL 20040 @ 196596: LINE 3218 "regression-compile-tmp/asems412.imp" 20041 @ 196635: PUSH LIMEN 20042 @ 196638: PUSH CA 20043 @ 196641: ASSVAL 20044 @ 196642: LINE 3218 "regression-compile-tmp/asems412.imp" 20045 @ 196681: JUMP L_0150 3219 Z(122):POP LHS; DROP(LHS); CONTROL = LHS_DISP 20046 @ 196684: LINE 3219 "regression-compile-tmp/asems412.imp" 20047 @ 196723: PUSHI #0x0000007a 20048 @ 196728: SLABEL 257 20049 @ 196731: LINE 3219 "regression-compile-tmp/asems412.imp" 20050 @ 196770: PUSH POPLHS 20051 @ 196773: CALL 20052 @ 196774: LINE 3219 "regression-compile-tmp/asems412.imp" 20053 @ 196813: PUSH DROP 20054 @ 196816: PUSH LHS 20055 @ 196819: ASSPAR 20056 @ 196820: CALL 20057 @ 196821: LINE 3219 "regression-compile-tmp/asems412.imp" 20058 @ 196860: PUSH CONTROL 20059 @ 196863: PUSH LHS 20060 @ 196866: SELECT 1 20061 @ 196869: ASSVAL 3220 %IF CONTROL&UNASS DIAG # 0 %START 20062 @ 196870: LINE 3220 "regression-compile-tmp/asems412.imp" 20063 @ 196909: PUSH CONTROL 20064 @ 196912: PUSHI #0x00000020 20065 @ 196917: AND 20066 @ 196918: PUSHI #0x00000000 20067 @ 196923: JUMPIF = L_0004 3221 ACTIVITY(R4) = -1 20068 @ 196927: LINE 3221 "regression-compile-tmp/asems412.imp" 20069 @ 196966: PUSH ACTIVITY 20070 @ 196969: PUSHI #0x00000005 20071 @ 196974: ACCESS 20072 @ 196975: PUSHI #0x00000001 20073 @ 196980: NEGATE 20074 @ 196981: ASSVAL 3222 ABORT(-14) %IF ENTER UNASS = 0 20075 @ 196982: LINE 3222 "regression-compile-tmp/asems412.imp" 20076 @ 197021: PUSH ENTERUNASS 20077 @ 197024: PUSHI #0x00000000 20078 @ 197029: JUMPIF # L_0007 20079 @ 197033: PUSH ABORT 20080 @ 197036: PUSHI #0x0000000e 20081 @ 197041: NEGATE 20082 @ 197042: ASSPAR 20083 @ 197043: CALL 20084 @ 197044: LOCATE L_0007 3223 %FINISH %ELSE ACTIVITY(R4) = 0 20085 @ 197047: LINE 3223 "regression-compile-tmp/asems412.imp" 20086 @ 197086: GOTO L_0003 20087 @ 197089: LOCATE L_0004 20088 @ 197092: PUSH ACTIVITY 20089 @ 197095: PUSHI #0x00000005 20090 @ 197100: ACCESS 20091 @ 197101: PUSHI #0x00000000 20092 @ 197106: ASSVAL 20093 @ 197107: LOCATE L_0003 3224 ->NEXT 3225 20094 @ 197110: LINE 3224 "regression-compile-tmp/asems412.imp" 20095 @ 197149: JUMP L_0150 3226 Z(100):ABORT(-9) %IF TAG # 1; ! LOWER CASE 'D' 20096 @ 197152: LINE 3226 "regression-compile-tmp/asems412.imp" 20097 @ 197191: PUSHI #0x00000064 20098 @ 197196: SLABEL 257 20099 @ 197199: LINE 3226 "regression-compile-tmp/asems412.imp" 20100 @ 197238: PUSH TAG 20101 @ 197241: CALL 20102 @ 197242: PUSHI #0x00000001 20103 @ 197247: JUMPIF = L_0004 20104 @ 197251: PUSH ABORT 20105 @ 197254: PUSHI #0x00000009 20106 @ 197259: NEGATE 20107 @ 197260: ASSPAR 20108 @ 197261: CALL 20109 @ 197262: LOCATE L_0004 3227 SET BOTH 20110 @ 197265: LINE 3227 "regression-compile-tmp/asems412.imp" 20111 @ 197304: PUSH SETBOTH 20112 @ 197307: CALL 3228 DOPE = 0 20113 @ 197308: LINE 3228 "regression-compile-tmp/asems412.imp" 20114 @ 197347: PUSH DOPE 20115 @ 197350: PUSHI #0x00000000 20116 @ 197355: ASSVAL 3229 %UNLESS CONST(LHS) %AND CONST(RHS) %START 20117 @ 197356: LINE 3229 "regression-compile-tmp/asems412.imp" 20118 @ 197395: PUSH CONST 20119 @ 197398: PUSH LHS 20120 @ 197401: ASSPAR 20121 @ 197402: CALL 20122 @ 197403: bf L_0005 20123 @ 197406: PUSH CONST 20124 @ 197409: PUSH RHS 20125 @ 197412: ASSPAR 20126 @ 197413: CALL 20127 @ 197414: bt L_0004 20128 @ 197417: LOCATE L_0005 3230 LOAD(LHS, P2); LOAD(RHS, R3) 20129 @ 197420: LINE 3230 "regression-compile-tmp/asems412.imp" 20130 @ 197459: PUSH LOAD 20131 @ 197462: PUSH LHS 20132 @ 197465: ASSPAR 20133 @ 197466: PUSHI #0x00000006 20134 @ 197471: ASSPAR 20135 @ 197472: CALL 20136 @ 197473: LINE 3230 "regression-compile-tmp/asems412.imp" 20137 @ 197512: PUSH LOAD 20138 @ 197515: PUSH RHS 20139 @ 197518: ASSPAR 20140 @ 197519: PUSHI #0x00000004 20141 @ 197524: ASSPAR 20142 @ 197525: CALL 3231 DOPE = -FRAME; FRAME = FRAME+12 20143 @ 197526: LINE 3231 "regression-compile-tmp/asems412.imp" 20144 @ 197565: PUSH DOPE 20145 @ 197568: PUSH FRAME 20146 @ 197571: NEGATE 20147 @ 197572: ASSVAL 20148 @ 197573: LINE 3231 "regression-compile-tmp/asems412.imp" 20149 @ 197612: PUSH FRAME 20150 @ 197615: PUSH FRAME 20151 @ 197618: PUSHI #0x0000000c 20152 @ 197623: ADD 20153 @ 197624: ASSVAL 3232 DYNAMIC = -1 20154 @ 197625: LINE 3232 "regression-compile-tmp/asems412.imp" 20155 @ 197664: PUSH DYNAMIC 20156 @ 197667: PUSHI #0x00000001 20157 @ 197672: NEGATE 20158 @ 197673: ASSVAL 3233 %ELSE 20159 @ 197674: LINE 3233 "regression-compile-tmp/asems412.imp" 20160 @ 197713: GOTO L_0003 20161 @ 197716: LOCATE L_0004 3234 DYNAMIC = 0 20162 @ 197719: LINE 3234 "regression-compile-tmp/asems412.imp" 20163 @ 197758: PUSH DYNAMIC 20164 @ 197761: PUSHI #0x00000000 20165 @ 197766: ASSVAL 3235 VLB = LHS_DISP; VUB = RHS_DISP 20166 @ 197767: LINE 3235 "regression-compile-tmp/asems412.imp" 20167 @ 197806: PUSH VLB 20168 @ 197809: PUSH LHS 20169 @ 197812: SELECT 1 20170 @ 197815: ASSVAL 20171 @ 197816: LINE 3235 "regression-compile-tmp/asems412.imp" 20172 @ 197855: PUSH VUB 20173 @ 197858: PUSH RHS 20174 @ 197861: SELECT 1 20175 @ 197864: ASSVAL 3236 ABORT(-7) %AND VUB = VLB %UNLESS VLB <= VUB 20176 @ 197865: LINE 3236 "regression-compile-tmp/asems412.imp" 20177 @ 197904: PUSH VLB 20178 @ 197907: PUSH VUB 20179 @ 197910: JUMPIF <= L_0007 20180 @ 197914: PUSH ABORT 20181 @ 197917: PUSHI #0x00000007 20182 @ 197922: NEGATE 20183 @ 197923: ASSPAR 20184 @ 197924: CALL 20185 @ 197925: PUSH VUB 20186 @ 197928: PUSH VLB 20187 @ 197931: ASSVAL 20188 @ 197932: LOCATE L_0007 3237 %FINISH 20189 @ 197935: LINE 3237 "regression-compile-tmp/asems412.imp" 20190 @ 197974: LOCATE L_0003 3238 STP = STP-2 20191 @ 197977: LINE 3238 "regression-compile-tmp/asems412.imp" 20192 @ 198016: PUSH STP 20193 @ 198019: PUSH STP 20194 @ 198022: PUSHI #0x00000002 20195 @ 198027: SUB 20196 @ 198028: ASSVAL 3239 DROP(RHS); DROP(LHS) 20197 @ 198029: LINE 3239 "regression-compile-tmp/asems412.imp" 20198 @ 198068: PUSH DROP 20199 @ 198071: PUSH RHS 20200 @ 198074: ASSPAR 20201 @ 198075: CALL 20202 @ 198076: LINE 3239 "regression-compile-tmp/asems412.imp" 20203 @ 198115: PUSH DROP 20204 @ 198118: PUSH LHS 20205 @ 198121: ASSPAR 20206 @ 198122: CALL 3240 ->NEXT 20207 @ 198123: LINE 3240 "regression-compile-tmp/asems412.imp" 20208 @ 198162: JUMP L_0150 3241 Z(104):%IF DYNAMIC # 0 %START; ! LOWER CASE 'H' 20209 @ 198165: LINE 3241 "regression-compile-tmp/asems412.imp" 20210 @ 198204: PUSHI #0x00000068 20211 @ 198209: SLABEL 257 20212 @ 198212: LINE 3241 "regression-compile-tmp/asems412.imp" 20213 @ 198251: PUSH DYNAMIC 20214 @ 198254: PUSHI #0x00000000 20215 @ 198259: JUMPIF = L_0004 3242 %IF DYNAMIC < 0 %START 20216 @ 198263: LINE 3242 "regression-compile-tmp/asems412.imp" 20217 @ 198302: PUSH DYNAMIC 20218 @ 198305: PUSHI #0x00000000 20219 @ 198310: JUMPIF >= L_0007 3243 RI2(LHI, P1, LOCAL, -DOPE) 20220 @ 198314: LINE 3243 "regression-compile-tmp/asems412.imp" 20221 @ 198353: PUSH RI2 20222 @ 198356: PUSHI #0x0000c800 20223 @ 198361: ASSPAR 20224 @ 198362: PUSHI #0x00000007 20225 @ 198367: ASSPAR 20226 @ 198368: PUSH LOCAL 20227 @ 198371: ASSPAR 20228 @ 198372: PUSH DOPE 20229 @ 198375: NEGATE 20230 @ 198376: ASSPAR 20231 @ 198377: CALL 3244 BIG STATIC: CSTACK(DATA SIZE); POP LHS; LRD(LHS, R1) 20232 @ 198378: LINE 3244 "regression-compile-tmp/asems412.imp" 20233 @ 198417: LABEL L_0154 20234 @ 198420: LINE 3244 "regression-compile-tmp/asems412.imp" 20235 @ 198459: PUSH CSTACK 20236 @ 198462: PUSH DATASIZE 20237 @ 198465: ASSPAR 20238 @ 198466: CALL 20239 @ 198467: LINE 3244 "regression-compile-tmp/asems412.imp" 20240 @ 198506: PUSH POPLHS 20241 @ 198509: CALL 20242 @ 198510: LINE 3244 "regression-compile-tmp/asems412.imp" 20243 @ 198549: PUSH LRD 20244 @ 198552: PUSH LHS 20245 @ 198555: ASSPAR 20246 @ 198556: PUSHI #0x00000002 20247 @ 198561: ASSPAR 20248 @ 198562: CALL 3245 RELEASE(P2); RELEASE(R3) 20249 @ 198563: LINE 3245 "regression-compile-tmp/asems412.imp" 20250 @ 198602: PUSH RELEASE 20251 @ 198605: PUSHI #0x00000006 20252 @ 198610: ASSPAR 20253 @ 198611: CALL 20254 @ 198612: LINE 3245 "regression-compile-tmp/asems412.imp" 20255 @ 198651: PUSH RELEASE 20256 @ 198654: PUSHI #0x00000004 20257 @ 198659: ASSPAR 20258 @ 198660: CALL 3246 PERM(ASET) 20259 @ 198661: LINE 3246 "regression-compile-tmp/asems412.imp" 20260 @ 198700: PUSH PERM 20261 @ 198703: PUSHI #0x00006f05 20262 @ 198708: ASSPAR 20263 @ 198709: CALL 3247 DYNAMIC = 1 20264 @ 198710: LINE 3247 "regression-compile-tmp/asems412.imp" 20265 @ 198749: PUSH DYNAMIC 20266 @ 198752: PUSHI #0x00000001 20267 @ 198757: ASSVAL 3248 %FINISH 20268 @ 198758: LINE 3248 "regression-compile-tmp/asems412.imp" 20269 @ 198797: LOCATE L_0007 3249 DECVAR_FORM = ARRAYNAME; DECVAR_DISP = FRAME 20270 @ 198800: LINE 3249 "regression-compile-tmp/asems412.imp" 20271 @ 198839: PUSH DECVAR 20272 @ 198842: SELECT 8 20273 @ 198845: PUSHI #0x0000000c 20274 @ 198850: ASSVAL 20275 @ 198851: LINE 3249 "regression-compile-tmp/asems412.imp" 20276 @ 198890: PUSH DECVAR 20277 @ 198893: SELECT 1 20278 @ 198896: PUSH FRAME 20279 @ 198899: ASSVAL 3250 FRAME = FRAME+8 20280 @ 198900: LINE 3250 "regression-compile-tmp/asems412.imp" 20281 @ 198939: PUSH FRAME 20282 @ 198942: PUSH FRAME 20283 @ 198945: PUSHI #0x00000008 20284 @ 198950: ADD 20285 @ 198951: ASSVAL 3251 RI2(LHI, R3, LOCAL, DECVAR_DISP); PERM(ALLOC) 20286 @ 198952: LINE 3251 "regression-compile-tmp/asems412.imp" 20287 @ 198991: PUSH RI2 20288 @ 198994: PUSHI #0x0000c800 20289 @ 198999: ASSPAR 20290 @ 199000: PUSHI #0x00000004 20291 @ 199005: ASSPAR 20292 @ 199006: PUSH LOCAL 20293 @ 199009: ASSPAR 20294 @ 199010: PUSH DECVAR 20295 @ 199013: SELECT 1 20296 @ 199016: ASSPAR 20297 @ 199017: CALL 20298 @ 199018: LINE 3251 "regression-compile-tmp/asems412.imp" 20299 @ 199057: PUSH PERM 20300 @ 199060: PUSHI #0x00002e09 20301 @ 199065: ASSPAR 20302 @ 199066: CALL 3252 %ELSE 20303 @ 199067: LINE 3252 "regression-compile-tmp/asems412.imp" 20304 @ 199106: GOTO L_0003 20305 @ 199109: LOCATE L_0004 3253 %IF DOPE = 0 %START 20306 @ 199112: LINE 3253 "regression-compile-tmp/asems412.imp" 20307 @ 199151: PUSH DOPE 20308 @ 199154: PUSHI #0x00000000 20309 @ 199159: JUMPIF # L_0007 3254 GFIX(4); DOPE = GA 20310 @ 199163: LINE 3254 "regression-compile-tmp/asems412.imp" 20311 @ 199202: PUSH GFIX 20312 @ 199205: PUSHI #0x00000004 20313 @ 199210: ASSPAR 20314 @ 199211: CALL 20315 @ 199212: LINE 3254 "regression-compile-tmp/asems412.imp" 20316 @ 199251: PUSH DOPE 20317 @ 199254: PUSH GA 20318 @ 199257: ASSVAL 3255 GWORD(VLB); GWORD(VUB); GWORD(DATA SIZE) 20319 @ 199258: LINE 3255 "regression-compile-tmp/asems412.imp" 20320 @ 199297: PUSH GWORD 20321 @ 199300: PUSH VLB 20322 @ 199303: ASSPAR 20323 @ 199304: CALL 20324 @ 199305: LINE 3255 "regression-compile-tmp/asems412.imp" 20325 @ 199344: PUSH GWORD 20326 @ 199347: PUSH VUB 20327 @ 199350: ASSPAR 20328 @ 199351: CALL 20329 @ 199352: LINE 3255 "regression-compile-tmp/asems412.imp" 20330 @ 199391: PUSH GWORD 20331 @ 199394: PUSH DATASIZE 20332 @ 199397: ASSPAR 20333 @ 199398: CALL 3256 %FINISH 20334 @ 199399: LINE 3256 "regression-compile-tmp/asems412.imp" 20335 @ 199438: LOCATE L_0007 3257 K = (VUB-VLB+1)*DATA SIZE + FRAME 20336 @ 199441: LINE 3257 "regression-compile-tmp/asems412.imp" 20337 @ 199480: PUSH K 20338 @ 199483: PUSH VUB 20339 @ 199486: PUSH VLB 20340 @ 199489: SUB 20341 @ 199490: PUSHI #0x00000001 20342 @ 199495: ADD 20343 @ 199496: PUSH DATASIZE 20344 @ 199499: MUL 20345 @ 199500: PUSH FRAME 20346 @ 199503: ADD 20347 @ 199504: ASSVAL 3258 %IF K > MAX STATIC %AND GMODE = 0 %START; ! TOO BIG FOR LOCALS 20348 @ 199505: LINE 3258 "regression-compile-tmp/asems412.imp" 20349 @ 199544: PUSH K 20350 @ 199547: PUSHI #0x000032c8 20351 @ 199552: JUMPIF <= L_0007 20352 @ 199556: PUSH GMODE 20353 @ 199559: PUSHI #0x00000000 20354 @ 199564: JUMPIF # L_0007 3259 CSTACK(VLB); CSTACK(VUB); SET BOTH 20355 @ 199568: LINE 3259 "regression-compile-tmp/asems412.imp" 20356 @ 199607: PUSH CSTACK 20357 @ 199610: PUSH VLB 20358 @ 199613: ASSPAR 20359 @ 199614: CALL 20360 @ 199615: LINE 3259 "regression-compile-tmp/asems412.imp" 20361 @ 199654: PUSH CSTACK 20362 @ 199657: PUSH VUB 20363 @ 199660: ASSPAR 20364 @ 199661: CALL 20365 @ 199662: LINE 3259 "regression-compile-tmp/asems412.imp" 20366 @ 199701: PUSH SETBOTH 20367 @ 199704: CALL 3260 LOAD(LHS, P2); LOAD(RHS, R3) 20368 @ 199705: LINE 3260 "regression-compile-tmp/asems412.imp" 20369 @ 199744: PUSH LOAD 20370 @ 199747: PUSH LHS 20371 @ 199750: ASSPAR 20372 @ 199751: PUSHI #0x00000006 20373 @ 199756: ASSPAR 20374 @ 199757: CALL 20375 @ 199758: LINE 3260 "regression-compile-tmp/asems412.imp" 20376 @ 199797: PUSH LOAD 20377 @ 199800: PUSH RHS 20378 @ 199803: ASSPAR 20379 @ 199804: PUSHI #0x00000004 20380 @ 199809: ASSPAR 20381 @ 199810: CALL 3261 DROP(RHS); DROP(LHS); STP = STP-2 20382 @ 199811: LINE 3261 "regression-compile-tmp/asems412.imp" 20383 @ 199850: PUSH DROP 20384 @ 199853: PUSH RHS 20385 @ 199856: ASSPAR 20386 @ 199857: CALL 20387 @ 199858: LINE 3261 "regression-compile-tmp/asems412.imp" 20388 @ 199897: PUSH DROP 20389 @ 199900: PUSH LHS 20390 @ 199903: ASSPAR 20391 @ 199904: CALL 20392 @ 199905: LINE 3261 "regression-compile-tmp/asems412.imp" 20393 @ 199944: PUSH STP 20394 @ 199947: PUSH STP 20395 @ 199950: PUSHI #0x00000002 20396 @ 199955: SUB 20397 @ 199956: ASSVAL 3262 RI2(LHI, P1, GLA, DOPE); FORGET(P1) 20398 @ 199957: LINE 3262 "regression-compile-tmp/asems412.imp" 20399 @ 199996: PUSH RI2 20400 @ 199999: PUSHI #0x0000c800 20401 @ 200004: ASSPAR 20402 @ 200005: PUSHI #0x00000007 20403 @ 200010: ASSPAR 20404 @ 200011: PUSHI #0x0000002a 20405 @ 200016: ASSPAR 20406 @ 200017: PUSH DOPE 20407 @ 200020: ASSPAR 20408 @ 200021: CALL 20409 @ 200022: LINE 3262 "regression-compile-tmp/asems412.imp" 20410 @ 200061: PUSH FORGET 20411 @ 200064: PUSHI #0x00000007 20412 @ 200069: ASSPAR 20413 @ 200070: CALL 3263 DOPE = -DOPE 20414 @ 200071: LINE 3263 "regression-compile-tmp/asems412.imp" 20415 @ 200110: PUSH DOPE 20416 @ 200113: PUSH DOPE 20417 @ 200116: NEGATE 20418 @ 200117: ASSVAL 3264 -> BIG STATIC 20419 @ 200118: LINE 3264 "regression-compile-tmp/asems412.imp" 20420 @ 200157: JUMP L_0154 3265 %FINISH 20421 @ 200160: LINE 3265 "regression-compile-tmp/asems412.imp" 20422 @ 200199: LOCATE L_0007 3266 DECVAR_DISP = FRAME-VLB*DATA SIZE 20423 @ 200202: LINE 3266 "regression-compile-tmp/asems412.imp" 20424 @ 200241: PUSH DECVAR 20425 @ 200244: SELECT 1 20426 @ 200247: PUSH FRAME 20427 @ 200250: PUSH VLB 20428 @ 200253: PUSH DATASIZE 20429 @ 200256: MUL 20430 @ 200257: SUB 20431 @ 200258: ASSVAL 3267 FRAME = K 20432 @ 200259: LINE 3267 "regression-compile-tmp/asems412.imp" 20433 @ 200298: PUSH FRAME 20434 @ 200301: PUSH K 20435 @ 200304: ASSVAL 3268 %FINISH 20436 @ 200305: LINE 3268 "regression-compile-tmp/asems412.imp" 20437 @ 200344: LOCATE L_0003 3269 DECVAR_EXTRA = DOPE 20438 @ 200347: LINE 3269 "regression-compile-tmp/asems412.imp" 20439 @ 200386: PUSH DECVAR 20440 @ 200389: SELECT 3 20441 @ 200392: PUSH DOPE 20442 @ 200395: ASSVAL 3270 Z(99):->NEXT; ! LOWER CASE 'C' 20443 @ 200396: LINE 3270 "regression-compile-tmp/asems412.imp" 20444 @ 200435: PUSHI #0x00000063 20445 @ 200440: SLABEL 257 20446 @ 200443: LINE 3270 "regression-compile-tmp/asems412.imp" 20447 @ 200482: JUMP L_0150 3271 Z('G'):READSYMBOL(GG) 20448 @ 200485: LINE 3271 "regression-compile-tmp/asems412.imp" 20449 @ 200524: PUSHI #0x00000047 20450 @ 200529: SLABEL 257 20451 @ 200532: LINE 3271 "regression-compile-tmp/asems412.imp" 20452 @ 200571: PUSH READSYMBOL 20453 @ 200574: PUSH GG 20454 @ 200577: ASSPAR 20455 @ 200578: CALL 3272 GMODE = \GMODE 20456 @ 200579: LINE 3272 "regression-compile-tmp/asems412.imp" 20457 @ 200618: PUSH GMODE 20458 @ 200621: PUSH GMODE 20459 @ 200624: NOT 20460 @ 200625: ASSVAL 3273 %IF GMODE # 0 %START 20461 @ 200626: LINE 3273 "regression-compile-tmp/asems412.imp" 20462 @ 200665: PUSH GMODE 20463 @ 200668: PUSHI #0x00000000 20464 @ 200673: JUMPIF = L_0004 3274 ASSEMBLE(GTYPE, LABS, NAMES) 20465 @ 200677: LINE 3274 "regression-compile-tmp/asems412.imp" 20466 @ 200716: PUSH ASSEMBLE 20467 @ 200719: PUSH GTYPE 20468 @ 200722: ASSPAR 20469 @ 200723: PUSH LABS 20470 @ 200726: ASSPAR 20471 @ 200727: PUSH NAMES 20472 @ 200730: ASSPAR 20473 @ 200731: CALL 3275 %ELSE 20474 @ 200732: LINE 3275 "regression-compile-tmp/asems412.imp" 20475 @ 200771: GOTO L_0003 20476 @ 200774: LOCATE L_0004 3276 SPS = 0; N = P1 20477 @ 200777: LINE 3276 "regression-compile-tmp/asems412.imp" 20478 @ 200816: PUSH SPS 20479 @ 200819: PUSHI #0x00000000 20480 @ 200824: ASSVAL 20481 @ 200825: LINE 3276 "regression-compile-tmp/asems412.imp" 20482 @ 200864: PUSH N 20483 @ 200867: PUSHI #0x00000007 20484 @ 200872: ASSVAL 3277 GVAR_LENGTH = (FRAME+(REGLEN-1))&(\(REGLEN-1)) %IF GG=FORMATS 20485 @ 200873: LINE 3277 "regression-compile-tmp/asems412.imp" 20486 @ 200912: PUSH GG 20487 @ 200915: PUSHI #0x00000032 20488 @ 200920: JUMPIF # L_0007 20489 @ 200924: PUSH GVAR 20490 @ 200927: SELECT 5 20491 @ 200930: PUSH FRAME 20492 @ 200933: PUSHI #0x00000004 20493 @ 200938: PUSHI #0x00000001 20494 @ 200943: SUB 20495 @ 200944: ADD 20496 @ 200945: PUSHI #0x00000004 20497 @ 200950: PUSHI #0x00000001 20498 @ 200955: SUB 20499 @ 200956: NOT 20500 @ 200957: AND 20501 @ 200958: ASSVAL 20502 @ 200959: LOCATE L_0007 3278 LEN = NAMES-GSTART 20503 @ 200962: LINE 3278 "regression-compile-tmp/asems412.imp" 20504 @ 201001: PUSH LEN 20505 @ 201004: PUSH NAMES 20506 @ 201007: PUSH GSTART 20507 @ 201010: SUB 20508 @ 201011: ASSVAL 3279 J = 0; J = LEN %IF GG = FORMATS 20509 @ 201012: LINE 3279 "regression-compile-tmp/asems412.imp" 20510 @ 201051: PUSH J 20511 @ 201054: PUSHI #0x00000000 20512 @ 201059: ASSVAL 20513 @ 201060: LINE 3279 "regression-compile-tmp/asems412.imp" 20514 @ 201099: PUSH GG 20515 @ 201102: PUSHI #0x00000032 20516 @ 201107: JUMPIF # L_0007 20517 @ 201111: PUSH J 20518 @ 201114: PUSH LEN 20519 @ 201117: ASSVAL 20520 @ 201118: LOCATE L_0007 3280 %IF LEN > 0 %START 20521 @ 201121: LINE 3280 "regression-compile-tmp/asems412.imp" 20522 @ 201160: PUSH LEN 20523 @ 201163: PUSHI #0x00000000 20524 @ 201168: JUMPIF <= L_0007 3281 LEN = 0 20525 @ 201172: LINE 3281 "regression-compile-tmp/asems412.imp" 20526 @ 201211: PUSH LEN 20527 @ 201214: PUSHI #0x00000000 20528 @ 201219: ASSVAL 3282 GVAR_EXTRA = PARMS-J 20529 @ 201220: LINE 3282 "regression-compile-tmp/asems412.imp" 20530 @ 201259: PUSH GVAR 20531 @ 201262: SELECT 3 20532 @ 201265: PUSH PARMS 20533 @ 201268: PUSH J 20534 @ 201271: SUB 20535 @ 201272: ASSVAL 3283 %FOR J = GSTART+1, 1, NAMES %CYCLE 20536 @ 201273: LINE 3283 "regression-compile-tmp/asems412.imp" 20537 @ 201312: PUSH J 20538 @ 201315: PUSHI #0x00000001 20539 @ 201320: PUSH NAMES 20540 @ 201323: PUSH GSTART 20541 @ 201326: PUSHI #0x00000001 20542 @ 201331: ADD 20543 @ 201332: FOR L_0009 3284 PARMS = PARMS-1 20544 @ 201335: LINE 3284 "regression-compile-tmp/asems412.imp" 20545 @ 201374: PUSH PARMS 20546 @ 201377: PUSH PARMS 20547 @ 201380: PUSHI #0x00000001 20548 @ 201385: SUB 20549 @ 201386: ASSVAL 3285 FP == VAR(PARMS); AP == VAR(J) 20550 @ 201387: LINE 3285 "regression-compile-tmp/asems412.imp" 20551 @ 201426: PUSH FP 20552 @ 201429: PUSH VAR 20553 @ 201432: PUSH PARMS 20554 @ 201435: ACCESS 20555 @ 201436: ASSREF 20556 @ 201437: LINE 3285 "regression-compile-tmp/asems412.imp" 20557 @ 201476: PUSH AP 20558 @ 201479: PUSH VAR 20559 @ 201482: PUSH J 20560 @ 201485: ACCESS 20561 @ 201486: ASSREF 3286 FP = AP 20562 @ 201487: LINE 3286 "regression-compile-tmp/asems412.imp" 20563 @ 201526: PUSH FP 20564 @ 201529: PUSH AP 20565 @ 201532: ASSVAL 3287 %IF GG # FORMATS %START 20566 @ 201533: LINE 3287 "regression-compile-tmp/asems412.imp" 20567 @ 201572: PUSH GG 20568 @ 201575: PUSHI #0x00000032 20569 @ 201580: JUMPIF = L_000d 3288 %IF FP_BASE = PARAM %START 20570 @ 201584: LINE 3288 "regression-compile-tmp/asems412.imp" 20571 @ 201623: PUSH FP 20572 @ 201626: SELECT 6 20573 @ 201629: PUSHI #0x00000030 20574 @ 201634: JUMPIF # L_0010 3289 AP_BASE = LOCAL; FP_DISP = N 20575 @ 201638: LINE 3289 "regression-compile-tmp/asems412.imp" 20576 @ 201677: PUSH AP 20577 @ 201680: SELECT 6 20578 @ 201683: PUSH LOCAL 20579 @ 201686: ASSVAL 20580 @ 201687: LINE 3289 "regression-compile-tmp/asems412.imp" 20581 @ 201726: PUSH FP 20582 @ 201729: SELECT 1 20583 @ 201732: PUSH N 20584 @ 201735: ASSVAL 3290 %IF GG = PROCEDURE %START 20585 @ 201736: LINE 3290 "regression-compile-tmp/asems412.imp" 20586 @ 201775: PUSH GG 20587 @ 201778: PUSHI #0x00000031 20588 @ 201783: JUMPIF # L_0013 3291 VSTACK(AP); POP LHS; DROP(LHS) 20589 @ 201787: LINE 3291 "regression-compile-tmp/asems412.imp" 20590 @ 201826: PUSH VSTACK 20591 @ 201829: PUSH AP 20592 @ 201832: ASSPAR 20593 @ 201833: CALL 20594 @ 201834: LINE 3291 "regression-compile-tmp/asems412.imp" 20595 @ 201873: PUSH POPLHS 20596 @ 201876: CALL 20597 @ 201877: LINE 3291 "regression-compile-tmp/asems412.imp" 20598 @ 201916: PUSH DROP 20599 @ 201919: PUSH LHS 20600 @ 201922: ASSPAR 20601 @ 201923: CALL 3292 %IF LHS_FORM # V IN S %START 20602 @ 201924: LINE 3292 "regression-compile-tmp/asems412.imp" 20603 @ 201963: PUSH LHS 20604 @ 201966: SELECT 9 20605 @ 201969: PUSHI #0x00000003 20606 @ 201974: JUMPIF = L_0016 3293 LHS_TYPE = INTEGER; LHS_FORM = V IN S 20607 @ 201978: LINE 3293 "regression-compile-tmp/asems412.imp" 20608 @ 202017: PUSH LHS 20609 @ 202020: SELECT 8 20610 @ 202023: PUSHI #0x00000001 20611 @ 202028: ASSVAL 20612 @ 202029: LINE 3293 "regression-compile-tmp/asems412.imp" 20613 @ 202068: PUSH LHS 20614 @ 202071: SELECT 9 20615 @ 202074: PUSHI #0x00000003 20616 @ 202079: ASSVAL 3294 %FINISH 20617 @ 202080: LINE 3294 "regression-compile-tmp/asems412.imp" 20618 @ 202119: LOCATE L_0016 3295 REMEMBER(N, LHS) 20619 @ 202122: LINE 3295 "regression-compile-tmp/asems412.imp" 20620 @ 202161: PUSH REMEMBER 20621 @ 202164: PUSH N 20622 @ 202167: ASSPAR 20623 @ 202168: PUSH LHS 20624 @ 202171: ASSPAR 20625 @ 202172: CALL 3296 %FINISH 20626 @ 202173: LINE 3296 "regression-compile-tmp/asems412.imp" 20627 @ 202212: LOCATE L_0013 3297 %ELSE 20628 @ 202215: LINE 3297 "regression-compile-tmp/asems412.imp" 20629 @ 202254: GOTO L_000f 20630 @ 202257: LOCATE L_0010 3298 FP_BASE = WSP; N = P2 20631 @ 202260: LINE 3298 "regression-compile-tmp/asems412.imp" 20632 @ 202299: PUSH FP 20633 @ 202302: SELECT 6 20634 @ 202305: PUSHI #0x0000002b 20635 @ 202310: ASSVAL 20636 @ 202311: LINE 3298 "regression-compile-tmp/asems412.imp" 20637 @ 202350: PUSH N 20638 @ 202353: PUSHI #0x00000006 20639 @ 202358: ASSVAL 3299 %FINISH 20640 @ 202359: LINE 3299 "regression-compile-tmp/asems412.imp" 20641 @ 202398: LOCATE L_000f 3300 %FINISH 20642 @ 202401: LINE 3300 "regression-compile-tmp/asems412.imp" 20643 @ 202440: LOCATE L_000d 3301 %IF CONTROL < 0 %START 20644 @ 202443: LINE 3301 "regression-compile-tmp/asems412.imp" 20645 @ 202482: PUSH CONTROL 20646 @ 202485: PUSHI #0x00000000 20647 @ 202490: JUMPIF >= L_000d 3302 DISPLAY VAR(FP); DISPLAY VAR(AP) 20648 @ 202494: LINE 3302 "regression-compile-tmp/asems412.imp" 20649 @ 202533: PUSH DISPLAYVAR 20650 @ 202536: PUSH FP 20651 @ 202539: ASSPAR 20652 @ 202540: CALL 20653 @ 202541: LINE 3302 "regression-compile-tmp/asems412.imp" 20654 @ 202580: PUSH DISPLAYVAR 20655 @ 202583: PUSH AP 20656 @ 202586: ASSPAR 20657 @ 202587: CALL 3303 %FINISH 20658 @ 202588: LINE 3303 "regression-compile-tmp/asems412.imp" 20659 @ 202627: LOCATE L_000d 3304 N = N-1 20660 @ 202630: LINE 3304 "regression-compile-tmp/asems412.imp" 20661 @ 202669: PUSH N 20662 @ 202672: PUSH N 20663 @ 202675: PUSHI #0x00000001 20664 @ 202680: SUB 20665 @ 202681: ASSVAL 3305 %REPEAT 20666 @ 202682: LINE 3305 "regression-compile-tmp/asems412.imp" 20667 @ 202721: REPEAT L_0009 20668 @ 202724: LOCATE L_000a 3306 ABORT(-4) %IF PARMS <= NAMES 20669 @ 202727: LINE 3306 "regression-compile-tmp/asems412.imp" 20670 @ 202766: PUSH PARMS 20671 @ 202769: PUSH NAMES 20672 @ 202772: JUMPIF > L_000a 20673 @ 202776: PUSH ABORT 20674 @ 202779: PUSHI #0x00000004 20675 @ 202784: NEGATE 20676 @ 202785: ASSPAR 20677 @ 202786: CALL 20678 @ 202787: LOCATE L_000a 3307 %IF GG # FORMATS %START 20679 @ 202790: LINE 3307 "regression-compile-tmp/asems412.imp" 20680 @ 202829: PUSH GG 20681 @ 202832: PUSHI #0x00000032 20682 @ 202837: JUMPIF = L_000a 3308 %IF FP_TYPE = STRING %AND FP_FORM = 1 %START 20683 @ 202841: LINE 3308 "regression-compile-tmp/asems412.imp" 20684 @ 202880: PUSH FP 20685 @ 202883: SELECT 7 20686 @ 202886: PUSHI #0x00000004 20687 @ 202891: JUMPIF # L_000d 20688 @ 202895: PUSH FP 20689 @ 202898: SELECT 8 20690 @ 202901: PUSHI #0x00000001 20691 @ 202906: JUMPIF # L_000d 3309 FP_TYPE = 15; N = 0 20692 @ 202910: LINE 3309 "regression-compile-tmp/asems412.imp" 20693 @ 202949: PUSH FP 20694 @ 202952: SELECT 7 20695 @ 202955: PUSHI #0x0000000f 20696 @ 202960: ASSVAL 20697 @ 202961: LINE 3309 "regression-compile-tmp/asems412.imp" 20698 @ 203000: PUSH N 20699 @ 203003: PUSHI #0x00000000 20700 @ 203008: ASSVAL 3310 %FINISH 20701 @ 203009: LINE 3310 "regression-compile-tmp/asems412.imp" 20702 @ 203048: LOCATE L_000d 3311 %FINISH 20703 @ 203051: LINE 3311 "regression-compile-tmp/asems412.imp" 20704 @ 203090: LOCATE L_000a 3312 %FINISH 20705 @ 203093: LINE 3312 "regression-compile-tmp/asems412.imp" 20706 @ 203132: LOCATE L_0007 3313 ->OUT %IF GG # PROCEDURE 20707 @ 203135: LINE 3313 "regression-compile-tmp/asems412.imp" 20708 @ 203174: PUSH GG 20709 @ 203177: PUSHI #0x00000031 20710 @ 203182: JUMPIF = L_0007 20711 @ 203186: JUMP L_0155 20712 @ 203189: LOCATE L_0007 3314 HEADER(GVAR) 20713 @ 203192: LINE 3314 "regression-compile-tmp/asems412.imp" 20714 @ 203231: PUSH HEADER 20715 @ 203234: PUSH GVAR 20716 @ 203237: ASSPAR 20717 @ 203238: CALL 3315 %IF N = 0 %START 20718 @ 203239: LINE 3315 "regression-compile-tmp/asems412.imp" 20719 @ 203278: PUSH N 20720 @ 203281: PUSHI #0x00000000 20721 @ 203286: JUMPIF # L_0007 3316 RX(LHI, R2, LOCAL, AP_DISP) 20722 @ 203290: LINE 3316 "regression-compile-tmp/asems412.imp" 20723 @ 203329: PUSH RX 20724 @ 203332: PUSHI #0x0000c800 20725 @ 203337: ASSPAR 20726 @ 203338: PUSHI #0x00000003 20727 @ 203343: ASSPAR 20728 @ 203344: PUSH LOCAL 20729 @ 203347: ASSPAR 20730 @ 203348: PUSH AP 20731 @ 203351: SELECT 1 20732 @ 203354: ASSPAR 20733 @ 203355: CALL 3317 %IF CONTROL&ASSDIAG # 0 %AND AP_SIZE # 255 %START 20734 @ 203356: LINE 3317 "regression-compile-tmp/asems412.imp" 20735 @ 203395: PUSH CONTROL 20736 @ 203398: PUSHI #0x00000010 20737 @ 203403: AND 20738 @ 203404: PUSHI #0x00000000 20739 @ 203409: JUMPIF = L_000a 20740 @ 203413: PUSH AP 20741 @ 203416: SELECT 9 20742 @ 203419: PUSHI #0x000000ff 20743 @ 203424: JUMPIF = L_000a 3318 CSTACK(AP_SIZE); POP LHS; LRD(LHS, R0) 20744 @ 203428: LINE 3318 "regression-compile-tmp/asems412.imp" 20745 @ 203467: PUSH CSTACK 20746 @ 203470: PUSH AP 20747 @ 203473: SELECT 9 20748 @ 203476: ASSPAR 20749 @ 203477: CALL 20750 @ 203478: LINE 3318 "regression-compile-tmp/asems412.imp" 20751 @ 203517: PUSH POPLHS 20752 @ 203520: CALL 20753 @ 203521: LINE 3318 "regression-compile-tmp/asems412.imp" 20754 @ 203560: PUSH LRD 20755 @ 203563: PUSH LHS 20756 @ 203566: ASSPAR 20757 @ 203567: PUSHI #0x00000001 20758 @ 203572: ASSPAR 20759 @ 203573: CALL 3319 PERM(STRING ASS) 20760 @ 203574: LINE 3319 "regression-compile-tmp/asems412.imp" 20761 @ 203613: PUSH PERM 20762 @ 203616: PUSHI #0x00000015 20763 @ 203621: ASSPAR 20764 @ 203622: CALL 3320 %FINISH 20765 @ 203623: LINE 3320 "regression-compile-tmp/asems412.imp" 20766 @ 203662: LOCATE L_000a 3321 PERM(SMOVE) 20767 @ 203665: LINE 3321 "regression-compile-tmp/asems412.imp" 20768 @ 203704: PUSH PERM 20769 @ 203707: PUSHI #0x0000090b 20770 @ 203712: ASSPAR 20771 @ 203713: CALL 3322 %FINISH 20772 @ 203714: LINE 3322 "regression-compile-tmp/asems412.imp" 20773 @ 203753: LOCATE L_0007 3323 %FINISH 20774 @ 203756: LINE 3323 "regression-compile-tmp/asems412.imp" 20775 @ 203795: LOCATE L_0003 3324 ->NEXT 20776 @ 203798: LINE 3324 "regression-compile-tmp/asems412.imp" 20777 @ 203837: JUMP L_0150 3325 Z('H'): 20778 @ 203840: LINE 3325 "regression-compile-tmp/asems412.imp" 20779 @ 203879: PUSHI #0x00000048 20780 @ 203884: SLABEL 257 3326 %IF CA = 0 %START; ! INITIAL BEGIN 20781 @ 203887: LINE 3326 "regression-compile-tmp/asems412.imp" 20782 @ 203926: PUSH CA 20783 @ 203929: PUSHI #0x00000000 20784 @ 203934: JUMPIF # L_0004 3327 ENTER UNASS = 0 20785 @ 203938: LINE 3327 "regression-compile-tmp/asems412.imp" 20786 @ 203977: PUSH ENTERUNASS 20787 @ 203980: PUSHI #0x00000000 20788 @ 203985: ASSVAL 3328 %IF CONTROL&UNASS DIAG # 0 %START 20789 @ 203986: LINE 3328 "regression-compile-tmp/asems412.imp" 20790 @ 204025: PUSH CONTROL 20791 @ 204028: PUSHI #0x00000020 20792 @ 204033: AND 20793 @ 204034: PUSHI #0x00000000 20794 @ 204039: JUMPIF = L_0007 3329 ENTER UNASS = X'0140'+ACTUAL(CODE) 20795 @ 204043: LINE 3329 "regression-compile-tmp/asems412.imp" 20796 @ 204082: PUSH ENTERUNASS 20797 @ 204085: PUSHI #0x00000140 20798 @ 204090: PUSH ACTUAL 20799 @ 204093: PUSHI #0x0000002c 20800 @ 204098: ACCESS 20801 @ 204099: ADD 20802 @ 204100: ASSVAL 3330 DUMP(X'0234'); DUMP(X'0884'); DUMP(X'2401') 20803 @ 204101: LINE 3330 "regression-compile-tmp/asems412.imp" 20804 @ 204140: PUSH DUMP 20805 @ 204143: PUSHI #0x00000234 20806 @ 204148: ASSPAR 20807 @ 204149: CALL 20808 @ 204150: LINE 3330 "regression-compile-tmp/asems412.imp" 20809 @ 204189: PUSH DUMP 20810 @ 204192: PUSHI #0x00000884 20811 @ 204197: ASSPAR 20812 @ 204198: CALL 20813 @ 204199: LINE 3330 "regression-compile-tmp/asems412.imp" 20814 @ 204238: PUSH DUMP 20815 @ 204241: PUSHI #0x00002401 20816 @ 204246: ASSPAR 20817 @ 204247: CALL 3331 DUMP(X'2410'); DUMP(X'2440') 20818 @ 204248: LINE 3331 "regression-compile-tmp/asems412.imp" 20819 @ 204287: PUSH DUMP 20820 @ 204290: PUSHI #0x00002410 20821 @ 204295: ASSPAR 20822 @ 204296: CALL 20823 @ 204297: LINE 3331 "regression-compile-tmp/asems412.imp" 20824 @ 204336: PUSH DUMP 20825 @ 204339: PUSHI #0x00002440 20826 @ 204344: ASSPAR 20827 @ 204345: CALL 3332 DUMP(X'583D'); DUMP(SIGNAL EP) 20828 @ 204346: LINE 3332 "regression-compile-tmp/asems412.imp" 20829 @ 204385: PUSH DUMP 20830 @ 204388: PUSHI #0x0000583d 20831 @ 204393: ASSPAR 20832 @ 204394: CALL 20833 @ 204395: LINE 3332 "regression-compile-tmp/asems412.imp" 20834 @ 204434: PUSH DUMP 20835 @ 204437: PUSHI #0x00000004 20836 @ 204442: ASSPAR 20837 @ 204443: CALL 3333 DUMP(X'0303') 20838 @ 204444: LINE 3333 "regression-compile-tmp/asems412.imp" 20839 @ 204483: PUSH DUMP 20840 @ 204486: PUSHI #0x00000303 20841 @ 204491: ASSPAR 20842 @ 204492: CALL 3334 DUMP(X'8080'); DUMP(X'8080') 20843 @ 204493: LINE 3334 "regression-compile-tmp/asems412.imp" 20844 @ 204532: PUSH DUMP 20845 @ 204535: PUSHI #0x00008080 20846 @ 204540: ASSPAR 20847 @ 204541: CALL 20848 @ 204542: LINE 3334 "regression-compile-tmp/asems412.imp" 20849 @ 204581: PUSH DUMP 20850 @ 204584: PUSHI #0x00008080 20851 @ 204589: ASSPAR 20852 @ 204590: CALL 3335 DUMP(X'8080'); DUMP(X'8080') 20853 @ 204591: LINE 3335 "regression-compile-tmp/asems412.imp" 20854 @ 204630: PUSH DUMP 20855 @ 204633: PUSHI #0x00008080 20856 @ 204638: ASSPAR 20857 @ 204639: CALL 20858 @ 204640: LINE 3335 "regression-compile-tmp/asems412.imp" 20859 @ 204679: PUSH DUMP 20860 @ 204682: PUSHI #0x00008080 20861 @ 204687: ASSPAR 20862 @ 204688: CALL 3336 %FINISH 20863 @ 204689: LINE 3336 "regression-compile-tmp/asems412.imp" 20864 @ 204728: LOCATE L_0007 3337 HEADER(BEGIN) 20865 @ 204731: LINE 3337 "regression-compile-tmp/asems412.imp" 20866 @ 204770: PUSH HEADER 20867 @ 204773: PUSH BEGIN 20868 @ 204776: ASSPAR 20869 @ 204777: CALL 3338 %FINISH 20870 @ 204778: LINE 3338 "regression-compile-tmp/asems412.imp" 20871 @ 204817: LOCATE L_0004 3339 N = TEMP 20872 @ 204820: LINE 3339 "regression-compile-tmp/asems412.imp" 20873 @ 204859: PUSH N 20874 @ 204862: PUSH TEMP 20875 @ 204865: CALL 20876 @ 204866: ASSVAL 3340 HALF = LOCAL; K = N; RANGE(HALF, K) 20877 @ 204867: LINE 3340 "regression-compile-tmp/asems412.imp" 20878 @ 204906: PUSH HALF 20879 @ 204909: PUSH LOCAL 20880 @ 204912: ASSVAL 20881 @ 204913: LINE 3340 "regression-compile-tmp/asems412.imp" 20882 @ 204952: PUSH K 20883 @ 204955: PUSH N 20884 @ 204958: ASSVAL 20885 @ 204959: LINE 3340 "regression-compile-tmp/asems412.imp" 20886 @ 204998: PUSH RANGE 20887 @ 205001: PUSH HALF 20888 @ 205004: ASSPAR 20889 @ 205005: PUSH K 20890 @ 205008: ASSPAR 20891 @ 205009: CALL 3341 RX(ST, WSP, HALF, K) 20892 @ 205010: LINE 3341 "regression-compile-tmp/asems412.imp" 20893 @ 205049: PUSH RX 20894 @ 205052: PUSHI #0x00005000 20895 @ 205057: ASSPAR 20896 @ 205058: PUSHI #0x0000002b 20897 @ 205063: ASSPAR 20898 @ 205064: PUSH HALF 20899 @ 205067: ASSPAR 20900 @ 205068: PUSH K 20901 @ 205071: ASSPAR 20902 @ 205072: CALL 3342 DECVAR == BEGIN 20903 @ 205073: LINE 3342 "regression-compile-tmp/asems412.imp" 20904 @ 205112: PUSH DECVAR 20905 @ 205115: PUSH BEGIN 20906 @ 205118: ASSREF 3343 ASSEMBLE(0, LABS, NAMES) 20907 @ 205119: LINE 3343 "regression-compile-tmp/asems412.imp" 20908 @ 205158: PUSH ASSEMBLE 20909 @ 205161: PUSHI #0x00000000 20910 @ 205166: ASSPAR 20911 @ 205167: PUSH LABS 20912 @ 205170: ASSPAR 20913 @ 205171: PUSH NAMES 20914 @ 205174: ASSPAR 20915 @ 205175: CALL 3344 HALF = LOCAL; K = N; RANGE(HALF, K) 20916 @ 205176: LINE 3344 "regression-compile-tmp/asems412.imp" 20917 @ 205215: PUSH HALF 20918 @ 205218: PUSH LOCAL 20919 @ 205221: ASSVAL 20920 @ 205222: LINE 3344 "regression-compile-tmp/asems412.imp" 20921 @ 205261: PUSH K 20922 @ 205264: PUSH N 20923 @ 205267: ASSVAL 20924 @ 205268: LINE 3344 "regression-compile-tmp/asems412.imp" 20925 @ 205307: PUSH RANGE 20926 @ 205310: PUSH HALF 20927 @ 205313: ASSPAR 20928 @ 205314: PUSH K 20929 @ 205317: ASSPAR 20930 @ 205318: CALL 3345 RX(LW, WSP, HALF, K) 20931 @ 205319: LINE 3345 "regression-compile-tmp/asems412.imp" 20932 @ 205358: PUSH RX 20933 @ 205361: PUSHI #0x00005800 20934 @ 205366: ASSPAR 20935 @ 205367: PUSHI #0x0000002b 20936 @ 205372: ASSPAR 20937 @ 205373: PUSH HALF 20938 @ 205376: ASSPAR 20939 @ 205377: PUSH K 20940 @ 205380: ASSPAR 20941 @ 205381: CALL 3346 ->NEXT 3347 20942 @ 205382: LINE 3346 "regression-compile-tmp/asems412.imp" 20943 @ 205421: JUMP L_0150 3348 Z(115): ! LOWER CASE 'S' - %STOP 20944 @ 205424: LINE 3348 "regression-compile-tmp/asems412.imp" 20945 @ 205463: PUSHI #0x00000073 20946 @ 205468: SLABEL 257 3349 CSTACK(0); CSTACK(0) 20947 @ 205471: LINE 3349 "regression-compile-tmp/asems412.imp" 20948 @ 205510: PUSH CSTACK 20949 @ 205513: PUSHI #0x00000000 20950 @ 205518: ASSPAR 20951 @ 205519: CALL 20952 @ 205520: LINE 3349 "regression-compile-tmp/asems412.imp" 20953 @ 205559: PUSH CSTACK 20954 @ 205562: PUSHI #0x00000000 20955 @ 205567: ASSPAR 20956 @ 205568: CALL 3350 Z(101): ! LOWER CASE 'E' -- %SIGNAL EVENT,SUBEVENT,EXTRA 20957 @ 205569: LINE 3350 "regression-compile-tmp/asems412.imp" 20958 @ 205608: PUSHI #0x00000065 20959 @ 205613: SLABEL 257 3351 N = STP+R0-1 20960 @ 205616: LINE 3351 "regression-compile-tmp/asems412.imp" 20961 @ 205655: PUSH N 20962 @ 205658: PUSH STP 20963 @ 205661: PUSHI #0x00000001 20964 @ 205666: ADD 20965 @ 205667: PUSHI #0x00000001 20966 @ 205672: SUB 20967 @ 205673: ASSVAL 3352 %WHILE STP # 0 %CYCLE 20968 @ 205674: LINE 3352 "regression-compile-tmp/asems412.imp" 20969 @ 205713: LOCATE L_0003 20970 @ 205716: PUSH STP 20971 @ 205719: PUSHI #0x00000000 20972 @ 205724: JUMPIF = L_0004 3353 POP LHS; LRD(LHS, N-STP) 20973 @ 205728: LINE 3353 "regression-compile-tmp/asems412.imp" 20974 @ 205767: PUSH POPLHS 20975 @ 205770: CALL 20976 @ 205771: LINE 3353 "regression-compile-tmp/asems412.imp" 20977 @ 205810: PUSH LRD 20978 @ 205813: PUSH LHS 20979 @ 205816: ASSPAR 20980 @ 205817: PUSH N 20981 @ 205820: PUSH STP 20982 @ 205823: SUB 20983 @ 205824: ASSPAR 20984 @ 205825: CALL 3354 %REPEAT 20985 @ 205826: LINE 3354 "regression-compile-tmp/asems412.imp" 20986 @ 205865: REPEAT L_0003 20987 @ 205868: LOCATE L_0004 3355 PERM(MONITOR) 20988 @ 205871: LINE 3355 "regression-compile-tmp/asems412.imp" 20989 @ 205910: PUSH PERM 20990 @ 205913: PUSHI #0x0001ef01 20991 @ 205918: ASSPAR 20992 @ 205919: CALL 3356 UNCOND JUMP = CA; STP = 0 20993 @ 205920: LINE 3356 "regression-compile-tmp/asems412.imp" 20994 @ 205959: PUSH UNCONDJUMP 20995 @ 205962: PUSH CA 20996 @ 205965: ASSVAL 20997 @ 205966: LINE 3356 "regression-compile-tmp/asems412.imp" 20998 @ 206005: PUSH STP 20999 @ 206008: PUSHI #0x00000000 21000 @ 206013: ASSVAL 3357 -> NEXT 3358 21001 @ 206014: LINE 3357 "regression-compile-tmp/asems412.imp" 21002 @ 206053: JUMP L_0150 3359 Z(';'):%IF AMODE = 0 %START 21003 @ 206056: LINE 3359 "regression-compile-tmp/asems412.imp" 21004 @ 206095: PUSHI #0x0000003b 21005 @ 206100: SLABEL 257 21006 @ 206103: LINE 3359 "regression-compile-tmp/asems412.imp" 21007 @ 206142: PUSH AMODE 21008 @ 206145: PUSHI #0x00000000 21009 @ 206150: JUMPIF # L_0004 3360 OLD FRAME = FRAME 21010 @ 206154: LINE 3360 "regression-compile-tmp/asems412.imp" 21011 @ 206193: PUSH OLDFRAME 21012 @ 206196: PUSH FRAME 21013 @ 206199: ASSVAL 3361 %ELSE 21014 @ 206200: LINE 3361 "regression-compile-tmp/asems412.imp" 21015 @ 206239: GOTO L_0003 21016 @ 206242: LOCATE L_0004 3362 PATCH((FRAME+(REGLEN-1))&(\(REGLEN-1)), SIZE PATCH) 21017 @ 206245: LINE 3362 "regression-compile-tmp/asems412.imp" 21018 @ 206284: PUSH PATCH 21019 @ 206287: PUSH FRAME 21020 @ 206290: PUSHI #0x00000004 21021 @ 206295: PUSHI #0x00000001 21022 @ 206300: SUB 21023 @ 206301: ADD 21024 @ 206302: PUSHI #0x00000004 21025 @ 206307: PUSHI #0x00000001 21026 @ 206312: SUB 21027 @ 206313: NOT 21028 @ 206314: AND 21029 @ 206315: ASSPAR 21030 @ 206316: PUSH SIZEPATCH 21031 @ 206319: ASSPAR 21032 @ 206320: CALL 3363 %IF UNCOND JUMP # CA %START 21033 @ 206321: LINE 3363 "regression-compile-tmp/asems412.imp" 21034 @ 206360: PUSH UNCONDJUMP 21035 @ 206363: PUSH CA 21036 @ 206366: JUMPIF = L_0007 3364 %IF GVAR_TYPE # 0 %START 21037 @ 206370: LINE 3364 "regression-compile-tmp/asems412.imp" 21038 @ 206409: PUSH GVAR 21039 @ 206412: SELECT 7 21040 @ 206415: PUSHI #0x00000000 21041 @ 206420: JUMPIF = L_000a 3365 ABORT(-11); ! ...%RESULT MISSING 21042 @ 206424: LINE 3365 "regression-compile-tmp/asems412.imp" 21043 @ 206463: PUSH ABORT 21044 @ 206466: PUSHI #0x0000000b 21045 @ 206471: NEGATE 21046 @ 206472: ASSPAR 21047 @ 206473: CALL 3366 %ELSE 21048 @ 206474: LINE 3366 "regression-compile-tmp/asems412.imp" 21049 @ 206513: GOTO L_0009 21050 @ 206516: LOCATE L_000a 3367 RETURN 21051 @ 206519: LINE 3367 "regression-compile-tmp/asems412.imp" 21052 @ 206558: PUSH RETURN 21053 @ 206561: CALL 3368 %FINISH 21054 @ 206562: LINE 3368 "regression-compile-tmp/asems412.imp" 21055 @ 206601: LOCATE L_0009 3369 %FINISH 21056 @ 206604: LINE 3369 "regression-compile-tmp/asems412.imp" 21057 @ 206643: LOCATE L_0007 3370 %FINISH 21058 @ 206646: LINE 3370 "regression-compile-tmp/asems412.imp" 21059 @ 206685: LOCATE L_0003 3371 SET DIAG(0, 0, 0, -1) 21060 @ 206688: LINE 3371 "regression-compile-tmp/asems412.imp" 21061 @ 206727: PUSH SETDIAG 21062 @ 206730: PUSHI #0x00000000 21063 @ 206735: ASSPAR 21064 @ 206736: PUSHI #0x00000000 21065 @ 206741: ASSPAR 21066 @ 206742: PUSHI #0x00000000 21067 @ 206747: ASSPAR 21068 @ 206748: PUSHI #0x00000001 21069 @ 206753: NEGATE 21070 @ 206754: ASSPAR 21071 @ 206755: CALL 3372 OUT: FRAME = OLD FRAME 21072 @ 206756: LINE 3372 "regression-compile-tmp/asems412.imp" 21073 @ 206795: LABEL L_0155 21074 @ 206798: LINE 3372 "regression-compile-tmp/asems412.imp" 21075 @ 206837: PUSH FRAME 21076 @ 206840: PUSH OLDFRAME 21077 @ 206843: ASSVAL 3373 %IF AMODE > 0 %START 21078 @ 206844: LINE 3373 "regression-compile-tmp/asems412.imp" 21079 @ 206883: PUSH AMODE 21080 @ 206886: PUSHI #0x00000000 21081 @ 206891: JUMPIF <= L_0004 3374 ACTIVITY(LOCAL) = 0 21082 @ 206895: LINE 3374 "regression-compile-tmp/asems412.imp" 21083 @ 206934: PUSH ACTIVITY 21084 @ 206937: PUSH LOCAL 21085 @ 206940: ACCESS 21086 @ 206941: PUSHI #0x00000000 21087 @ 206946: ASSVAL 3375 ASS LEVEL = ASS LEVEL-1; LOCAL = BASE REG(ASS LEVEL) 21088 @ 206947: LINE 3375 "regression-compile-tmp/asems412.imp" 21089 @ 206986: PUSH ASSLEVEL 21090 @ 206989: PUSH ASSLEVEL 21091 @ 206992: PUSHI #0x00000001 21092 @ 206997: SUB 21093 @ 206998: ASSVAL 21094 @ 206999: LINE 3375 "regression-compile-tmp/asems412.imp" 21095 @ 207038: PUSH LOCAL 21096 @ 207041: PUSH BASEREG 21097 @ 207044: PUSH ASSLEVEL 21098 @ 207047: ACCESS 21099 @ 207048: ASSVAL 3376 %FINISH 21100 @ 207049: LINE 3376 "regression-compile-tmp/asems412.imp" 21101 @ 207088: LOCATE L_0004 3377 XLEVEL = XLEVEL-1 21102 @ 207091: LINE 3377 "regression-compile-tmp/asems412.imp" 21103 @ 207130: PUSH XLEVEL 21104 @ 207133: PUSH XLEVEL 21105 @ 207136: PUSHI #0x00000001 21106 @ 207141: SUB 21107 @ 207142: ASSVAL 3378 %END;! OF ASSEMBLE 3379 3380 21108 @ 207143: LINE 3378 "regression-compile-tmp/asems412.imp" 21109 @ 207182: END _lev0id0_ASSEMBLE {lev=2 --> 1} 3381 FAULTY = 0 3382 21110 @ 207183: LINE 3381 "regression-compile-tmp/asems412.imp" 21111 @ 207222: PUSH FAULTY 21112 @ 207225: PUSHI #0x00000000 21113 @ 207230: ASSVAL 3383 ABORT(0) %IF MAX VARS = 1; ! ----COMPILER CAN'T RUN AT ALL---- 3384 21114 @ 207231: LINE 3383 "regression-compile-tmp/asems412.imp" 21115 @ 207270: PUSH MAXVARS 21116 @ 207273: PUSHI #0x00000001 21117 @ 207278: JUMPIF # L_0004 21118 @ 207282: PUSH ABORT 21119 @ 207285: PUSHI #0x00000000 21120 @ 207290: ASSPAR 21121 @ 207291: CALL 21122 @ 207292: LOCATE L_0004 3385 SELECT INPUT(INSTREAM) 21123 @ 207295: LINE 3385 "regression-compile-tmp/asems412.imp" 21124 @ 207334: PUSH SELECTINPUT 21125 @ 207337: PUSHI #0x00000002 21126 @ 207342: ASSPAR 21127 @ 207343: CALL 3386 SELECT OUTPUT(DIRECT); PRINT SYMBOL(INIT GLA) 21128 @ 207344: LINE 3386 "regression-compile-tmp/asems412.imp" 21129 @ 207383: PUSH SELECTOUTPUT 21130 @ 207386: PUSHI #0x00000003 21131 @ 207391: ASSPAR 21132 @ 207392: CALL 21133 @ 207393: LINE 3386 "regression-compile-tmp/asems412.imp" 21134 @ 207432: PUSH PRINTSYMBOL 21135 @ 207435: PUSHI #0x00000020 21136 @ 207440: ASSPAR 21137 @ 207441: CALL 3387 SELECT OUTPUT(OBJECT); PRINT SYMBOL(START) 21138 @ 207442: LINE 3387 "regression-compile-tmp/asems412.imp" 21139 @ 207481: PUSH SELECTOUTPUT 21140 @ 207484: PUSHI #0x00000002 21141 @ 207489: ASSPAR 21142 @ 207490: CALL 21143 @ 207491: LINE 3387 "regression-compile-tmp/asems412.imp" 21144 @ 207530: PUSH PRINTSYMBOL 21145 @ 207533: PUSHI #0x00000001 21146 @ 207538: ASSPAR 21147 @ 207539: CALL 3388 BLOCK WORD = 'B'-32+('L'-32)<<6+('O'-32)<<12 %C 3389 +('C'-32)<<18+('K'-32)<<24 21148 @ 207540: LINE 3388 "regression-compile-tmp/asems412.imp" 21149 @ 207579: PUSH BLOCKWORD 21150 @ 207582: PUSHI #0x00000042 21151 @ 207587: PUSHI #0x00000020 21152 @ 207592: SUB 21153 @ 207593: PUSHI #0x0000004c 21154 @ 207598: PUSHI #0x00000020 21155 @ 207603: SUB 21156 @ 207604: PUSHI #0x00000006 21157 @ 207609: LSH 21158 @ 207610: ADD 21159 @ 207611: PUSHI #0x0000004f 21160 @ 207616: PUSHI #0x00000020 21161 @ 207621: SUB 21162 @ 207622: PUSHI #0x0000000c 21163 @ 207627: LSH 21164 @ 207628: ADD 21165 @ 207629: PUSHI #0x00000043 21166 @ 207634: PUSHI #0x00000020 21167 @ 207639: SUB 21168 @ 207640: PUSHI #0x00000012 21169 @ 207645: LSH 21170 @ 207646: ADD 21171 @ 207647: PUSHI #0x0000004b 21172 @ 207652: PUSHI #0x00000020 21173 @ 207657: SUB 21174 @ 207658: PUSHI #0x00000018 21175 @ 207663: LSH 21176 @ 207664: ADD 21177 @ 207665: ASSVAL 3390 CA = 0; LIMEN = 0; GA = INIT GLA; DA = 0; LINE SIZE = 0 21178 @ 207666: LINE 3390 "regression-compile-tmp/asems412.imp" 21179 @ 207705: PUSH CA 21180 @ 207708: PUSHI #0x00000000 21181 @ 207713: ASSVAL 21182 @ 207714: LINE 3390 "regression-compile-tmp/asems412.imp" 21183 @ 207753: PUSH LIMEN 21184 @ 207756: PUSHI #0x00000000 21185 @ 207761: ASSVAL 21186 @ 207762: LINE 3390 "regression-compile-tmp/asems412.imp" 21187 @ 207801: PUSH GA 21188 @ 207804: PUSHI #0x00000020 21189 @ 207809: ASSVAL 21190 @ 207810: LINE 3390 "regression-compile-tmp/asems412.imp" 21191 @ 207849: PUSH DA 21192 @ 207852: PUSHI #0x00000000 21193 @ 207857: ASSVAL 21194 @ 207858: LINE 3390 "regression-compile-tmp/asems412.imp" 21195 @ 207897: PUSH LINESIZE 21196 @ 207900: PUSHI #0x00000000 21197 @ 207905: ASSVAL 3391 STP = 0; STACK ASL = 0; ENVP = 0; GMODE = 0 21198 @ 207906: LINE 3391 "regression-compile-tmp/asems412.imp" 21199 @ 207945: PUSH STP 21200 @ 207948: PUSHI #0x00000000 21201 @ 207953: ASSVAL 21202 @ 207954: LINE 3391 "regression-compile-tmp/asems412.imp" 21203 @ 207993: PUSH STACKASL 21204 @ 207996: PUSHI #0x00000000 21205 @ 208001: ASSVAL 21206 @ 208002: LINE 3391 "regression-compile-tmp/asems412.imp" 21207 @ 208041: PUSH ENVP 21208 @ 208044: PUSHI #0x00000000 21209 @ 208049: ASSVAL 21210 @ 208050: LINE 3391 "regression-compile-tmp/asems412.imp" 21211 @ 208089: PUSH GMODE 21212 @ 208092: PUSHI #0x00000000 21213 @ 208097: ASSVAL 3392 UNCOND JUMP = 0; CURRENT LINE = 0 21214 @ 208098: LINE 3392 "regression-compile-tmp/asems412.imp" 21215 @ 208137: PUSH UNCONDJUMP 21216 @ 208140: PUSHI #0x00000000 21217 @ 208145: ASSVAL 21218 @ 208146: LINE 3392 "regression-compile-tmp/asems412.imp" 21219 @ 208185: PUSH CURRENTLINE 21220 @ 208188: PUSHI #0x00000000 21221 @ 208193: ASSVAL 3393 INVERT = 0; SWOPPED = 0 21222 @ 208194: LINE 3393 "regression-compile-tmp/asems412.imp" 21223 @ 208233: PUSH INVERT 21224 @ 208236: PUSHI #0x00000000 21225 @ 208241: ASSVAL 21226 @ 208242: LINE 3393 "regression-compile-tmp/asems412.imp" 21227 @ 208281: PUSH SWOPPED 21228 @ 208284: PUSHI #0x00000000 21229 @ 208289: ASSVAL 3394 PARMS = MAX VARS 21230 @ 208290: LINE 3394 "regression-compile-tmp/asems412.imp" 21231 @ 208329: PUSH PARMS 21232 @ 208332: PUSH MAXVARS 21233 @ 208335: ASSVAL 3395 CSLEN == CURRENT STRING(0); CSLEN = 0; ACTIVE STRING == NULL 21234 @ 208336: LINE 3395 "regression-compile-tmp/asems412.imp" 21235 @ 208375: PUSH CSLEN 21236 @ 208378: PUSH CURRENTSTRING 21237 @ 208381: PUSHI #0x00000000 21238 @ 208386: ACCESS 21239 @ 208387: ASSREF 21240 @ 208388: LINE 3395 "regression-compile-tmp/asems412.imp" 21241 @ 208427: PUSH CSLEN 21242 @ 208430: PUSHI #0x00000000 21243 @ 208435: ASSVAL 21244 @ 208436: LINE 3395 "regression-compile-tmp/asems412.imp" 21245 @ 208475: PUSH ACTIVESTRING 21246 @ 208478: PUSH NULL 21247 @ 208481: ASSREF 3396 ACTIVITY(J) = 0 %FOR J = 0, 1, 44 21248 @ 208482: LINE 3396 "regression-compile-tmp/asems412.imp" 21249 @ 208521: PUSH J 21250 @ 208524: PUSHI #0x00000001 21251 @ 208529: PUSHI #0x0000002c 21252 @ 208534: PUSHI #0x00000000 21253 @ 208539: FOR L_0003 21254 @ 208542: PUSH ACTIVITY 21255 @ 208545: PUSH J 21256 @ 208548: ACCESS 21257 @ 208549: PUSHI #0x00000000 21258 @ 208554: ASSVAL 21259 @ 208555: REPEAT L_0003 21260 @ 208558: LOCATE L_0004 3397 USED(J) = 0 %FOR J = 0, 1, 20 21261 @ 208561: LINE 3397 "regression-compile-tmp/asems412.imp" 21262 @ 208600: PUSH J 21263 @ 208603: PUSHI #0x00000001 21264 @ 208608: PUSHI #0x00000014 21265 @ 208613: PUSHI #0x00000000 21266 @ 208618: FOR L_0003 21267 @ 208621: PUSH USED 21268 @ 208624: PUSH J 21269 @ 208627: ACCESS 21270 @ 208628: PUSHI #0x00000000 21271 @ 208633: ASSVAL 21272 @ 208634: REPEAT L_0003 21273 @ 208637: LOCATE L_0004 3398 ACTIVITY(WSP) = -1; ACTIVITY(GLA) = -1; ACTIVITY(CODE) = -1 21274 @ 208640: LINE 3398 "regression-compile-tmp/asems412.imp" 21275 @ 208679: PUSH ACTIVITY 21276 @ 208682: PUSHI #0x0000002b 21277 @ 208687: ACCESS 21278 @ 208688: PUSHI #0x00000001 21279 @ 208693: NEGATE 21280 @ 208694: ASSVAL 21281 @ 208695: LINE 3398 "regression-compile-tmp/asems412.imp" 21282 @ 208734: PUSH ACTIVITY 21283 @ 208737: PUSHI #0x0000002a 21284 @ 208742: ACCESS 21285 @ 208743: PUSHI #0x00000001 21286 @ 208748: NEGATE 21287 @ 208749: ASSVAL 21288 @ 208750: LINE 3398 "regression-compile-tmp/asems412.imp" 21289 @ 208789: PUSH ACTIVITY 21290 @ 208792: PUSHI #0x0000002c 21291 @ 208797: ACCESS 21292 @ 208798: PUSHI #0x00000001 21293 @ 208803: NEGATE 21294 @ 208804: ASSVAL 3399 ACTIVITY(0) = -1; KNOWN_CA = -1 21295 @ 208805: LINE 3399 "regression-compile-tmp/asems412.imp" 21296 @ 208844: PUSH ACTIVITY 21297 @ 208847: PUSHI #0x00000000 21298 @ 208852: ACCESS 21299 @ 208853: PUSHI #0x00000001 21300 @ 208858: NEGATE 21301 @ 208859: ASSVAL 21302 @ 208860: LINE 3399 "regression-compile-tmp/asems412.imp" 21303 @ 208899: PUSH KNOWN 21304 @ 208902: SELECT 2 21305 @ 208905: PUSHI #0x00000001 21306 @ 208910: NEGATE 21307 @ 208911: ASSVAL 3400 ACTIVITY(R4) = -1 %IF CONTROL&UNASS DIAG # 0 21308 @ 208912: LINE 3400 "regression-compile-tmp/asems412.imp" 21309 @ 208951: PUSH CONTROL 21310 @ 208954: PUSHI #0x00000020 21311 @ 208959: AND 21312 @ 208960: PUSHI #0x00000000 21313 @ 208965: JUMPIF = L_0004 21314 @ 208969: PUSH ACTIVITY 21315 @ 208972: PUSHI #0x00000005 21316 @ 208977: ACCESS 21317 @ 208978: PUSHI #0x00000001 21318 @ 208983: NEGATE 21319 @ 208984: ASSVAL 21320 @ 208985: LOCATE L_0004 3401 ENTER UNASS = -1 21321 @ 208988: LINE 3401 "regression-compile-tmp/asems412.imp" 21322 @ 209027: PUSH ENTERUNASS 21323 @ 209030: PUSHI #0x00000001 21324 @ 209035: NEGATE 21325 @ 209036: ASSVAL 3402 ENVIR(J) = 0 %FOR J = 0, 1, MAX ENVIRS 21326 @ 209037: LINE 3402 "regression-compile-tmp/asems412.imp" 21327 @ 209076: PUSH J 21328 @ 209079: PUSHI #0x00000001 21329 @ 209084: PUSHI #0x0000000d 21330 @ 209089: PUSHI #0x00000000 21331 @ 209094: FOR L_0003 21332 @ 209097: PUSH ENVIR 21333 @ 209100: PUSH J 21334 @ 209103: ACCESS 21335 @ 209104: PUSHI #0x00000000 21336 @ 209109: ASSVAL 21337 @ 209110: REPEAT L_0003 21338 @ 209113: LOCATE L_0004 3403 %for j = 1,1,44 %cycle 21339 @ 209116: LINE 3403 "regression-compile-tmp/asems412.imp" 21340 @ 209155: PUSH J 21341 @ 209158: PUSHI #0x00000001 21342 @ 209163: PUSHI #0x0000002c 21343 @ 209168: PUSHI #0x00000001 21344 @ 209173: FOR L_0003 3404 use(j) = 0 21345 @ 209176: LINE 3404 "regression-compile-tmp/asems412.imp" 21346 @ 209215: PUSH USE 21347 @ 209218: PUSH J 21348 @ 209221: ACCESS 21349 @ 209222: PUSHI #0x00000000 21350 @ 209227: ASSVAL 3405 USE(J)_CA = -8 21351 @ 209228: LINE 3405 "regression-compile-tmp/asems412.imp" 21352 @ 209267: PUSH USE 21353 @ 209270: PUSH J 21354 @ 209273: ACCESS 21355 @ 209274: SELECT 2 21356 @ 209277: PUSHI #0x00000008 21357 @ 209282: NEGATE 21358 @ 209283: ASSVAL 3406 %repeat 21359 @ 209284: LINE 3406 "regression-compile-tmp/asems412.imp" 21360 @ 209323: REPEAT L_0003 21361 @ 209326: LOCATE L_0004 3407 %FOR J = 0, 1, MAX STACK-1 %CYCLE 21362 @ 209329: LINE 3407 "regression-compile-tmp/asems412.imp" 21363 @ 209368: PUSH J 21364 @ 209371: PUSHI #0x00000001 21365 @ 209376: PUSHI #0x0000001f 21366 @ 209381: PUSHI #0x00000001 21367 @ 209386: SUB 21368 @ 209387: PUSHI #0x00000000 21369 @ 209392: FOR L_0003 3408 STAK(J)_LINK == STAK(J+1) 21370 @ 209395: LINE 3408 "regression-compile-tmp/asems412.imp" 21371 @ 209434: PUSH STAK 21372 @ 209437: PUSH J 21373 @ 209440: ACCESS 21374 @ 209441: SELECT 10 21375 @ 209444: PUSH STAK 21376 @ 209447: PUSH J 21377 @ 209450: PUSHI #0x00000001 21378 @ 209455: ADD 21379 @ 209456: ACCESS 21380 @ 209457: ASSREF 3409 DLIST(J)_LINK == DLIST(J+1) 21381 @ 209458: LINE 3409 "regression-compile-tmp/asems412.imp" 21382 @ 209497: PUSH DLIST 21383 @ 209500: PUSH J 21384 @ 209503: ACCESS 21385 @ 209504: SELECT 2 21386 @ 209507: PUSH DLIST 21387 @ 209510: PUSH J 21388 @ 209513: PUSHI #0x00000001 21389 @ 209518: ADD 21390 @ 209519: ACCESS 21391 @ 209520: ASSREF 3410 %REPEAT 21392 @ 209521: LINE 3410 "regression-compile-tmp/asems412.imp" 21393 @ 209560: REPEAT L_0003 21394 @ 209563: LOCATE L_0004 3411 STAK(MAX STACK)_LINK == NULL; DLIST(MAX STACK)_LINK == NULL 21395 @ 209566: LINE 3411 "regression-compile-tmp/asems412.imp" 21396 @ 209605: PUSH STAK 21397 @ 209608: PUSHI #0x0000001f 21398 @ 209613: ACCESS 21399 @ 209614: SELECT 10 21400 @ 209617: PUSH NULL 21401 @ 209620: ASSREF 21402 @ 209621: LINE 3411 "regression-compile-tmp/asems412.imp" 21403 @ 209660: PUSH DLIST 21404 @ 209663: PUSHI #0x0000001f 21405 @ 209668: ACCESS 21406 @ 209669: SELECT 2 21407 @ 209672: PUSH NULL 21408 @ 209675: ASSREF 3412 DESC ASL == STAK(0); DASL == DLIST(0) 21409 @ 209676: LINE 3412 "regression-compile-tmp/asems412.imp" 21410 @ 209715: PUSH DESCASL 21411 @ 209718: PUSH STAK 21412 @ 209721: PUSHI #0x00000000 21413 @ 209726: ACCESS 21414 @ 209727: ASSREF 21415 @ 209728: LINE 3412 "regression-compile-tmp/asems412.imp" 21416 @ 209767: PUSH DASL 21417 @ 209770: PUSH DLIST 21418 @ 209773: PUSHI #0x00000000 21419 @ 209778: ACCESS 21420 @ 209779: ASSREF 3413 USING_LINK == NULL 21421 @ 209780: LINE 3413 "regression-compile-tmp/asems412.imp" 21422 @ 209819: PUSH USING 21423 @ 209822: SELECT 2 21424 @ 209825: PUSH NULL 21425 @ 209828: ASSREF 3414 DECVAR == BEGIN 3415 21426 @ 209829: LINE 3414 "regression-compile-tmp/asems412.imp" 21427 @ 209868: PUSH DECVAR 21428 @ 209871: PUSH BEGIN 21429 @ 209874: ASSREF 3416 ASSEMBLE(2, 0, 0); ! ASSEMBLE THE OUTER BLOCK (+REST) 3417 21430 @ 209875: LINE 3416 "regression-compile-tmp/asems412.imp" 21431 @ 209914: PUSH ASSEMBLE 21432 @ 209917: PUSHI #0x00000002 21433 @ 209922: ASSPAR 21434 @ 209923: PUSHI #0x00000000 21435 @ 209928: ASSPAR 21436 @ 209929: PUSHI #0x00000000 21437 @ 209934: ASSPAR 21438 @ 209935: CALL 3418 GFIX(4) 21439 @ 209936: LINE 3418 "regression-compile-tmp/asems412.imp" 21440 @ 209975: PUSH GFIX 21441 @ 209978: PUSHI #0x00000004 21442 @ 209983: ASSPAR 21443 @ 209984: CALL 3419 PRINTSYMBOL(CEND) 21444 @ 209985: LINE 3419 "regression-compile-tmp/asems412.imp" 21445 @ 210024: PUSH PRINTSYMBOL 21446 @ 210027: PUSHI #0x00000005 21447 @ 210032: ASSPAR 21448 @ 210033: CALL 3420 SELECTOUTPUT(DIRECT); PRINTSYMBOL(DEND) 21449 @ 210034: LINE 3420 "regression-compile-tmp/asems412.imp" 21450 @ 210073: PUSH SELECTOUTPUT 21451 @ 210076: PUSHI #0x00000003 21452 @ 210081: ASSPAR 21453 @ 210082: CALL 21454 @ 210083: LINE 3420 "regression-compile-tmp/asems412.imp" 21455 @ 210122: PUSH PRINTSYMBOL 21456 @ 210125: PUSHI #0x00000008 21457 @ 210130: ASSPAR 21458 @ 210131: CALL 3421 PUT(CA); PUT((GA+1)&(\1)); PUT(LINE SIZE); PUT(DA) 3422 21459 @ 210132: LINE 3421 "regression-compile-tmp/asems412.imp" 21460 @ 210171: PUSH PUT 21461 @ 210174: PUSH CA 21462 @ 210177: ASSPAR 21463 @ 210178: CALL 21464 @ 210179: LINE 3421 "regression-compile-tmp/asems412.imp" 21465 @ 210218: PUSH PUT 21466 @ 210221: PUSH GA 21467 @ 210224: PUSHI #0x00000001 21468 @ 210229: ADD 21469 @ 210230: PUSHI #0x00000001 21470 @ 210235: NOT 21471 @ 210236: AND 21472 @ 210237: ASSPAR 21473 @ 210238: CALL 21474 @ 210239: LINE 3421 "regression-compile-tmp/asems412.imp" 21475 @ 210278: PUSH PUT 21476 @ 210281: PUSH LINESIZE 21477 @ 210284: ASSPAR 21478 @ 210285: CALL 21479 @ 210286: LINE 3421 "regression-compile-tmp/asems412.imp" 21480 @ 210325: PUSH PUT 21481 @ 210328: PUSH DA 21482 @ 210331: ASSPAR 21483 @ 210332: CALL 3423 %SIGNAL 15,3 %IF FAULTY # 0 3424 21484 @ 210333: LINE 3423 "regression-compile-tmp/asems412.imp" 21485 @ 210372: PUSH FAULTY 21486 @ 210375: PUSHI #0x00000000 21487 @ 210380: JUMPIF = L_0004 21488 @ 210384: PUSHI #0x00000003 21489 @ 210389: EVENT 000f 21490 @ 210392: LOCATE L_0004 3425 %ENDOFPROGRAM 21491 @ 210395: LINE 3425 "regression-compile-tmp/asems412.imp" 21492 @ 210434: END _lev0id0 {lev=1 --> 0} 21493 @ 210435: END {lev=0 --> -1} 21494 @ 210436: