Cac 2016 01 24 Part3

back tp dump_machine_cond_

DBG(933547139)> CPU TRACE: 00306:004665 4 000631710100 (TRA PR0|631) 000631 710(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 121
          if struc.text_ptr ^= null
          then                                              /* if can print source line, do so. */
               call print_source_line_ (strp, stream);

000604  aa  6 00116 3735 20   epp7      pr6|78,*            strp
000605  aa  7 00066 2371 00   ldaq      pr7|54              struc.text_ptr
000606  aa   777250 6770 04   eraq      -344,ic             000056 = 077777000043 000001000000
000607  aa  0 00460 3771 00   anaq      pr0|304             = 077777000077 777777077077
000610  aa   000012 6000 04   tze       10,ic               000622
000611  aa  6 00116 3521 00   epp2      pr6|78              strp
000612  aa  6 00314 2521 00   spri2     pr6|204
000613  aa  6 00270 3521 20   epp2      pr6|184,*           stream
000614  aa  6 00316 2521 00   spri2     pr6|206
000615  aa  6 00312 6211 00   eax1      pr6|202
000616  aa   010000 4310 07   fld       4096,dl
000617  aa  6 00044 3701 20   epp4      pr6|36,*
000620  la  4 00014 3521 20   epp2      pr4|12,*            print_source_line_
000621  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out

DBG(933547157)> CPU TRACE: 00306:016742 4 600116373520 (EPP7 PR6|116,N*) 600116 373(1) 1 0 1 00
DBG(933547159)> CPU TRACE: 00306:016743 4 700066237100 (LDAQ PR7|66) 700066 237(0) 1 0 0 00
DBG(933547161)> CPU TRACE: 00306:016744 4 777250677004 (ERAQ 777250,IC) 777250 677(0) 0 0 0 04
DBG(933547163)> CPU TRACE: 00306:016745 4 000460377100 (ANAQ PR0|460) 000460 377(0) 1 0 0 00
DBG(933547165)> CPU TRACE: 00306:016746 4 000012600004 (TZE 000012,IC) 000012 600(0) 0 0 0 04
DBG(933547167)> CPU TRACE: 00306:016747 4 600116352100 (EPP2 PR6|116) 600116 352(0) 1 0 0 00
DBG(933547169)> CPU TRACE: 00306:016750 4 600314252100 (SPRI2 PR6|314) 600314 252(0) 1 0 0 00
DBG(933547171)> CPU TRACE: 00306:016751 4 600270352120 (EPP2 PR6|270,N*) 600270 352(0) 1 0 1 00
DBG(933547173)> CPU TRACE: 00306:016752 4 600316252100 (SPRI2 PR6|316) 600316 252(0) 1 0 0 00
DBG(933547175)> CPU TRACE: 00306:016753 4 600312621100 (EAX1 PR6|312) 600312 621(0) 1 0 0 00
DBG(933547177)> CPU TRACE: 00306:016754 4 010000431007 (FLD 010000,DL) 010000 431(0) 0 0 0 07
DBG(933547179)> CPU TRACE: 00306:016755 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(933547181)> CPU TRACE: 00306:016756 4 014343352000 (EPP2 014343) 014343 352(0) 0 0 0 00
DBG(933547183)> CPU TRACE: 00306:016757 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00

print_source_line_.pl1

ENTRY TO print_source_line_                                 STATEMENT 1 ON LINE 10
print_source_line_:
     proc (strp, stream);

000115  at     000002000036
000116  ta     000035000000
000117  ta     000115000000
000120  da     000233300000
000121  aa   000760 6270 00   eax7      496
000122  aa  7 00034 3521 20   epp2      pr7|28,*
000123  aa  2 01045 2721 00   tsp2      pr2|549             ext_entry
000124  aa     000004000000
000125  aa     000000000000

DBG(933552267)> CPU TRACE: 00306:014343 4 000760627000 (EAX7 000760) 000760 627(0) 0 0 0 00
DBG(933552269)> CPU TRACE: 00306:014344 4 700034352120 (EPP2 PR7|34,N*) 700034 352(0) 1 0 1 00
DBG(933552271)> CPU TRACE: 00306:014345 4 201045272100 (TSP2 PR2|1045) 201045 272(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 25
000126  aa   000001 2360 07   ldq       1,dl
000127  aa  6 00152 7561 00   stq       pr6|106             insx
                                                            STATEMENT 1 ON LINE 81
000130  aa   777716 2370 04   ldaq      -50,ic              000046 = 077777000043 000001000000
000131  aa  6 00356 7571 00   staq      pr6|238             condinfo.mcptr
000132  aa  6 00372 7571 00   staq      pr6|250             condinfo.infoptr
000133  aa  6 00374 7571 00   staq      pr6|252             condinfo.wcptr
000134  aa  6 00376 7571 00   staq      pr6|254             condinfo.loc_ptr
000135  aa  6 00402 7571 00   staq      pr6|258             condinfo.user_loc_ptr
000136  aa   001262 2350 04   lda       690,ic              001420 = 377777777777
000137  aa  6 00400 3551 00   ansa      pr6|256             condinfo.crawlout

DBG(933552315)> CPU TRACE: 00306:014350 4 000001236007 (LDQ 000001,DL) 000001 236(0) 0 0 0 07
DBG(933552317)> CPU TRACE: 00306:014351 4 600152756100 (STQ PR6|152) 600152 756(0) 1 0 0 00
DBG(933552319)> CPU TRACE: 00306:014352 4 777716237004 (LDAQ 777716,IC) 777716 237(0) 0 0 0 04
DBG(933552321)> CPU TRACE: 00306:014353 4 600356757100 (STAQ PR6|356) 600356 757(0) 1 0 0 00
DBG(933552323)> CPU TRACE: 00306:014354 4 600372757100 (STAQ PR6|372) 600372 757(0) 1 0 0 00
DBG(933552325)> CPU TRACE: 00306:014355 4 600374757100 (STAQ PR6|374) 600374 757(0) 1 0 0 00
DBG(933552327)> CPU TRACE: 00306:014356 4 600376757100 (STAQ PR6|376) 600376 757(0) 1 0 0 00
DBG(933552329)> CPU TRACE: 00306:014357 4 600402757100 (STAQ PR6|402) 600402 757(0) 1 0 0 00
DBG(933552331)> CPU TRACE: 00306:014360 4 001262235004 (LDA 001262,IC) 001262 235(0) 0 0 0 04
DBG(933552333)> CPU TRACE: 00306:014361 4 600400355100 (ANSA PR6|400) 600400 355(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 103
          sp = struc.stack_ptr;

000140  aa  6 00032 3735 20   epp7      pr6|26,*
000141  aa  7 00002 3715 20   epp5      pr7|2,*             strp
000142  aa  5 00000 3715 20   epp5      pr5|0,*             strp
000143  aa  5 00070 3535 20   epp3      pr5|56,*            struc.stack_ptr
000144  aa  6 00100 2535 00   spri3     pr6|64              sp

DBG(933552335)> CPU TRACE: 00306:014362 4 600032373520 (EPP7 PR6|32,N*) 600032 373(1) 1 0 1 00
DBG(933552337)> CPU TRACE: 00306:014363 4 700002371520 (EPP5 PR7|2,N*) 700002 371(1) 1 0 1 00
DBG(933552339)> CPU TRACE: 00306:014364 4 500000371520 (EPP5 PR5|0,N*) 500000 371(1) 1 0 1 00
DBG(933552341)> CPU TRACE: 00306:014365 4 500070353520 (EPP3 PR5|70,N*) 500070 353(1) 1 0 1 00
DBG(933552343)> CPU TRACE: 00306:014366 4 600100253500 (SPRI3 PR6|100) 600100 253(1) 1 0 0 00

                                                            STATEMENT 1 ON LINE 104
          fptr = struc.text_ptr;

000145  aa  5 00066 3515 20   epp1      pr5|54,*            struc.text_ptr
000146  aa  6 00102 2515 00   spri1     pr6|66              fptr

DBG(933552345)> CPU TRACE: 00306:014367 4 500066351520 (EPP1 PR5|66,N*) 500066 351(1) 1 0 1 00
DBG(933552347)> CPU TRACE: 00306:014370 4 600102251500 (SPRI1 PR6|102) 600102 251(1) 1 0 0 00

                                                            STATEMENT 1 ON LINE 105
          if is_condition_frame_ (sp) then do;

000147  aa  6 00100 3521 00   epp2      pr6|64              sp
000150  aa  6 00634 2521 00   spri2     pr6|412
000151  aa  6 00631 3521 00   epp2      pr6|409
000152  aa  6 00636 2521 00   spri2     pr6|414
000153  aa  6 00632 6211 00   eax1      pr6|410
000154  aa   010000 4310 07   fld       4096,dl
000155  la  4 00012 3521 20   epp2      pr4|10,*            is_condition_frame_
000156  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out
000157  aa  6 00631 2351 00   lda       pr6|409
000160  aa   400000 3150 03   cana      131072,du
000161  aa   000016 6000 04   tze       14,ic               000177

DBG(933552349)> CPU TRACE: 00306:014371 4 600100352100 (EPP2 PR6|100) 600100 352(0) 1 0 0 00
DBG(933552351)> CPU TRACE: 00306:014372 4 600634252100 (SPRI2 PR6|634) 600634 252(0) 1 0 0 00
DBG(933552353)> CPU TRACE: 00306:014373 4 600631352100 (EPP2 PR6|631) 600631 352(0) 1 0 0 00
DBG(933552355)> CPU TRACE: 00306:014374 4 600636252100 (SPRI2 PR6|636) 600636 252(0) 1 0 0 00
DBG(933552357)> CPU TRACE: 00306:014375 4 600632621100 (EAX1 PR6|632) 600632 621(0) 1 0 0 00
DBG(933552359)> CPU TRACE: 00306:014376 4 010000431007 (FLD 010000,DL) 010000 431(0) 0 0 0 07
DBG(933552361)> CPU TRACE: 00306:014377 4 400040352120 (EPP2 PR4|40,N*) 400040 352(0) 1 0 1 00
DBG(933552363)> CPU TRACE: 00306:014400 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00
DBG(933552473)> CPU TRACE: 00306:014401 4 600631235100 (LDA PR6|631) 600631 235(0) 1 0 0 00
DBG(933552475)> CPU TRACE: 00306:014402 4 400000315003 (CANA 400000,DU) 400000 315(0) 0 0 0 03
DBG(933552477)> CPU TRACE: 00306:014403 4 000016600004 (TZE 000016,IC) 000016 600(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 106
               cip = addr (condinfo);

000162  aa  6 00356 3735 00   epp7      pr6|238             condinfo
000163  aa  6 00106 6535 00   spri7     pr6|70              cip

DBG(933552479)> CPU TRACE: 00306:014404 4 600356373500 (EPP7 PR6|356) 600356 373(1) 1 0 0 00
DBG(933552481)> CPU TRACE: 00306:014405 4 600106653500 (SPRI7 PR6|106) 600106 653(1) 1 0 0 00

                                                            STATEMENT 1 ON LINE 107
               call find_condition_info_ (sp, cip, ec);

000164  aa  6 00100 3521 00   epp2      pr6|64              sp
000165  aa  6 00642 2521 00   spri2     pr6|418
000166  aa  6 00106 3521 00   epp2      pr6|70              cip
000167  aa  6 00644 2521 00   spri2     pr6|420
000170  aa  6 00323 3521 00   epp2      pr6|211             ec
000171  aa  6 00646 2521 00   spri2     pr6|422
000172  aa  6 00640 6211 00   eax1      pr6|416
000173  aa   014000 4310 07   fld       6144,dl
000174  aa  6 00044 3701 20   epp4      pr6|36,*
000175  la  4 00014 3521 20   epp2      pr4|12,*            find_condition_info_
000176  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out

DBG(933552483)> CPU TRACE: 00306:014406 4 600100352100 (EPP2 PR6|100) 600100 352(0) 1 0 0 00
DBG(933552485)> CPU TRACE: 00306:014407 4 600642252100 (SPRI2 PR6|642) 600642 252(0) 1 0 0 00
DBG(933552487)> CPU TRACE: 00306:014410 4 600106352100 (EPP2 PR6|106) 600106 352(0) 1 0 0 00
DBG(933552489)> CPU TRACE: 00306:014411 4 600644252100 (SPRI2 PR6|644) 600644 252(0) 1 0 0 00
DBG(933552491)> CPU TRACE: 00306:014412 4 600323352100 (EPP2 PR6|323) 600323 352(0) 1 0 0 00
DBG(933552493)> CPU TRACE: 00306:014413 4 600646252100 (SPRI2 PR6|646) 600646 252(0) 1 0 0 00
DBG(933552495)> CPU TRACE: 00306:014414 4 600640621100 (EAX1 PR6|640) 600640 621(0) 1 0 0 00
DBG(933552497)> CPU TRACE: 00306:014415 4 014000431007 (FLD 014000,DL) 014000 431(0) 0 0 0 07
DBG(933552499)> CPU TRACE: 00306:014416 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(933552501)> CPU TRACE: 00306:014417 4 400042352120 (EPP2 PR4|42,N*) 400042 352(0) 1 0 1 00
DBG(933552503)> CPU TRACE: 00306:014420 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 109
          call stack_frame_exit_ (sp, condinfo.mcptr, condinfo.wcptr, condinfo.crawlout, callp, op_seg_name,
               addr (situation));

000177  aa  6 00354 3735 00   epp7      pr6|236             situation
000200  aa  6 00650 6535 00   spri7     pr6|424
000201  aa  6 00100 3521 00   epp2      pr6|64              sp
000202  aa  6 00654 2521 00   spri2     pr6|428
000203  aa  6 00356 3521 00   epp2      pr6|238             condinfo.mcptr
000204  aa  6 00656 2521 00   spri2     pr6|430
000205  aa  6 00374 3521 00   epp2      pr6|252             condinfo.wcptr
000206  aa  6 00660 2521 00   spri2     pr6|432
000207  aa  6 00400 3521 00   epp2      pr6|256             condinfo.crawlout
000210  aa  6 00662 2521 00   spri2     pr6|434
000211  aa  6 00110 3521 00   epp2      pr6|72              callp
000212  aa  6 00664 2521 00   spri2     pr6|436
000213  aa  6 00120 3521 00   epp2      pr6|80              op_seg_name
000214  aa  6 00666 2521 00   spri2     pr6|438
000215  aa  6 00650 3521 00   epp2      pr6|424
000216  aa  6 00670 2521 00   spri2     pr6|440
000217  aa  6 00652 6211 00   eax1      pr6|426
000220  aa   034000 4310 07   fld       14336,dl
000221  aa  6 00044 3701 20   epp4      pr6|36,*
000222  la  4 00016 3521 20   epp2      pr4|14,*            stack_frame_exit_
000223  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out

DBG(933625249)> CPU TRACE: 00306:014421 4 600354373500 (EPP7 PR6|354) 600354 373(1) 1 0 0 00
DBG(933625251)> CPU TRACE: 00306:014422 4 600650653500 (SPRI7 PR6|650) 600650 653(1) 1 0 0 00
DBG(933625253)> CPU TRACE: 00306:014423 4 600100352100 (EPP2 PR6|100) 600100 352(0) 1 0 0 00
DBG(933625255)> CPU TRACE: 00306:014424 4 600654252100 (SPRI2 PR6|654) 600654 252(0) 1 0 0 00
DBG(933625257)> CPU TRACE: 00306:014425 4 600356352100 (EPP2 PR6|356) 600356 352(0) 1 0 0 00
DBG(933625259)> CPU TRACE: 00306:014426 4 600656252100 (SPRI2 PR6|656) 600656 252(0) 1 0 0 00
DBG(933625261)> CPU TRACE: 00306:014427 4 600374352100 (EPP2 PR6|374) 600374 352(0) 1 0 0 00
DBG(933625263)> CPU TRACE: 00306:014430 4 600660252100 (SPRI2 PR6|660) 600660 252(0) 1 0 0 00
DBG(933625265)> CPU TRACE: 00306:014431 4 600400352100 (EPP2 PR6|400) 600400 352(0) 1 0 0 00
DBG(933625267)> CPU TRACE: 00306:014432 4 600662252100 (SPRI2 PR6|662) 600662 252(0) 1 0 0 00
DBG(933625269)> CPU TRACE: 00306:014433 4 600110352100 (EPP2 PR6|110) 600110 352(0) 1 0 0 00
DBG(933625271)> CPU TRACE: 00306:014434 4 600664252100 (SPRI2 PR6|664) 600664 252(0) 1 0 0 00
DBG(933625273)> CPU TRACE: 00306:014435 4 600120352100 (EPP2 PR6|120) 600120 352(0) 1 0 0 00
DBG(933625275)> CPU TRACE: 00306:014436 4 600666252100 (SPRI2 PR6|666) 600666 252(0) 1 0 0 00
DBG(933625277)> CPU TRACE: 00306:014437 4 600650352100 (EPP2 PR6|650) 600650 352(0) 1 0 0 00
DBG(933625279)> CPU TRACE: 00306:014440 4 600670252100 (SPRI2 PR6|670) 600670 252(0) 1 0 0 00
DBG(933625281)> CPU TRACE: 00306:014441 4 600652621100 (EAX1 PR6|652) 600652 621(0) 1 0 0 00
DBG(933625283)> CPU TRACE: 00306:014442 4 034000431007 (FLD 034000,DL) 034000 431(0) 0 0 0 07
DBG(933625285)> CPU TRACE: 00306:014443 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(933625287)> CPU TRACE: 00306:014444 4 400072352120 (EPP2 PR4|72,N*) 400072 352(0) 1 0 1 00
DBG(933625289)> CPU TRACE: 00306:014445 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 111
          if situation.bad_frame then return;

000224  aa  6 00354 2351 00   lda       pr6|236             situation.bad_frame
000225  aa   400000 3150 03   cana      131072,du
000226  aa  0 00631 6011 00   tnz       pr0|409             return_mac

DBG(933703365)> CPU TRACE: 00306:014446 4 600354235100 (LDA PR6|354) 600354 235(0) 1 0 0 00
DBG(933703367)> CPU TRACE: 00306:014447 4 400000315003 (CANA 400000,DU) 400000 315(0) 0 0 0 03
DBG(933703369)> CPU TRACE: 00306:014450 4 000631601100 (TNZ PR0|631) 000631 601(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 113
          call find_source_line_ (strp, line_no, dirname, ename, line_offset, line_length, ec);

000227  aa  6 00032 3735 20   epp7      pr6|26,*
000230  aa  7 00002 3521 20   epp2      pr7|2,*             strp
000231  aa  6 00674 2521 00   spri2     pr6|444
000232  aa  6 00235 3521 00   epp2      pr6|157             line_no
000233  aa  6 00676 2521 00   spri2     pr6|446
000234  aa  6 00241 3521 00   epp2      pr6|161             dirname
000235  aa  6 00700 2521 00   spri2     pr6|448
000236  aa  6 00313 3521 00   epp2      pr6|203             ename
000237  aa  6 00702 2521 00   spri2     pr6|450
000240  aa  6 00352 3521 00   epp2      pr6|234             line_offset
000241  aa  6 00704 2521 00   spri2     pr6|452
000242  aa  6 00353 3521 00   epp2      pr6|235             line_length
000243  aa  6 00706 2521 00   spri2     pr6|454
000244  aa  6 00323 3521 00   epp2      pr6|211             ec
000245  aa  6 00710 2521 00   spri2     pr6|456
000246  aa   777570 3520 04   epp2      -136,ic             000036 = 464000000000
000247  aa  6 00712 2521 00   spri2     pr6|458
000250  aa   777563 3520 04   epp2      -141,ic             000033 = 526000000020
000251  aa  6 00714 2521 00   spri2     pr6|460
000252  aa   777560 3520 04   epp2      -144,ic             000032 = 526000000250
000253  aa  6 00716 2521 00   spri2     pr6|462
000254  aa   777555 3520 04   epp2      -147,ic             000031 = 526000000040
000255  aa  6 00720 2521 00   spri2     pr6|464
000256  aa   777552 3520 04   epp2      -150,ic             000030 = 404000000025
000257  aa  6 00722 2521 00   spri2     pr6|466
000260  aa  6 00724 2521 00   spri2     pr6|468
000261  aa   777546 3520 04   epp2      -154,ic             000027 = 404000000043
000262  aa  6 00726 2521 00   spri2     pr6|470
000263  aa  6 00672 6211 00   eax1      pr6|442
000264  aa   034000 4310 07   fld       14336,dl
000265  aa  6 00044 3701 20   epp4      pr6|36,*
000266  la  4 00032 3521 20   epp2      pr4|26,*            find_source_line_
000267  aa  0 00622 7001 00   tsx0      pr0|402             call_ext_out_desc

DBG(933703371)> CPU TRACE: 00306:014451 4 600032373520 (EPP7 PR6|32,N*) 600032 373(1) 1 0 1 00
DBG(933703373)> CPU TRACE: 00306:014452 4 700002352120 (EPP2 PR7|2,N*) 700002 352(0) 1 0 1 00
DBG(933703375)> CPU TRACE: 00306:014453 4 600674252100 (SPRI2 PR6|674) 600674 252(0) 1 0 0 00
DBG(933703377)> CPU TRACE: 00306:014454 4 600235352100 (EPP2 PR6|235) 600235 352(0) 1 0 0 00
DBG(933703379)> CPU TRACE: 00306:014455 4 600676252100 (SPRI2 PR6|676) 600676 252(0) 1 0 0 00
DBG(933703381)> CPU TRACE: 00306:014456 4 600241352100 (EPP2 PR6|241) 600241 352(0) 1 0 0 00
DBG(933703383)> CPU TRACE: 00306:014457 4 600700252100 (SPRI2 PR6|700) 600700 252(0) 1 0 0 00
DBG(933703385)> CPU TRACE: 00306:014460 4 600313352100 (EPP2 PR6|313) 600313 352(0) 1 0 0 00
DBG(933703387)> CPU TRACE: 00306:014461 4 600702252100 (SPRI2 PR6|702) 600702 252(0) 1 0 0 00
DBG(933703389)> CPU TRACE: 00306:014462 4 600352352100 (EPP2 PR6|352) 600352 352(0) 1 0 0 00
DBG(933703391)> CPU TRACE: 00306:014463 4 600704252100 (SPRI2 PR6|704) 600704 252(0) 1 0 0 00
DBG(933703393)> CPU TRACE: 00306:014464 4 600353352100 (EPP2 PR6|353) 600353 352(0) 1 0 0 00
DBG(933703395)> CPU TRACE: 00306:014465 4 600706252100 (SPRI2 PR6|706) 600706 252(0) 1 0 0 00
DBG(933703397)> CPU TRACE: 00306:014466 4 600323352100 (EPP2 PR6|323) 600323 352(0) 1 0 0 00
DBG(933703399)> CPU TRACE: 00306:014467 4 600710252100 (SPRI2 PR6|710) 600710 252(0) 1 0 0 00
DBG(933703401)> CPU TRACE: 00306:014470 4 777570352004 (EPP2 777570,IC) 777570 352(0) 0 0 0 04
DBG(933703403)> CPU TRACE: 00306:014471 4 600712252100 (SPRI2 PR6|712) 600712 252(0) 1 0 0 00
DBG(933703405)> CPU TRACE: 00306:014472 4 777563352004 (EPP2 777563,IC) 777563 352(0) 0 0 0 04
DBG(933703407)> CPU TRACE: 00306:014473 4 600714252100 (SPRI2 PR6|714) 600714 252(0) 1 0 0 00
DBG(933703409)> CPU TRACE: 00306:014474 4 777560352004 (EPP2 777560,IC) 777560 352(0) 0 0 0 04
DBG(933703411)> CPU TRACE: 00306:014475 4 600716252100 (SPRI2 PR6|716) 600716 252(0) 1 0 0 00
DBG(933703413)> CPU TRACE: 00306:014476 4 777555352004 (EPP2 777555,IC) 777555 352(0) 0 0 0 04
DBG(933703415)> CPU TRACE: 00306:014477 4 600720252100 (SPRI2 PR6|720) 600720 252(0) 1 0 0 00
DBG(933703417)> CPU TRACE: 00306:014500 4 777552352004 (EPP2 777552,IC) 777552 352(0) 0 0 0 04
DBG(933703419)> CPU TRACE: 00306:014501 4 600722252100 (SPRI2 PR6|722) 600722 252(0) 1 0 0 00
DBG(933703421)> CPU TRACE: 00306:014502 4 600724252100 (SPRI2 PR6|724) 600724 252(0) 1 0 0 00
DBG(933703423)> CPU TRACE: 00306:014503 4 777546352004 (EPP2 777546,IC) 777546 352(0) 0 0 0 04
DBG(933703425)> CPU TRACE: 00306:014504 4 600726252100 (SPRI2 PR6|726) 600726 252(0) 1 0 0 00
DBG(933703427)> CPU TRACE: 00306:014505 4 600672621100 (EAX1 PR6|672) 600672 621(0) 1 0 0 00
DBG(933703429)> CPU TRACE: 00306:014506 4 034000431007 (FLD 034000,DL) 034000 431(0) 0 0 0 07
DBG(933703431)> CPU TRACE: 00306:014507 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(933703433)> CPU TRACE: 00306:014510 4 015670352000 (EPP2 015670) 015670 352(0) 0 0 0 00
DBG(933703435)> CPU TRACE: 00306:014511 4 000622700100 (TSX0 PR0|622) 000622 700(0) 1 0 0 00

find_source_line.pl1

ENTRY TO find_source_line_                                  STATEMENT 1 ON LINE 11
find_source_line_:
     procedure (strp, Line_no, Dirname, Ename, Offset, Length, Code);

000016  at     000007000010
000017  tt     000007000007
000020  tt     000007000006
000021  tt     000006000005
000022  ta     000016000000
000023  da     000051300000
000024  aa   000200 6270 00   eax7      128
000025  aa  7 00034 3521 20   epp2      pr7|28,*
000026  aa  2 01046 2721 00   tsp2      pr2|550             ext_entry_desc
000027  aa     000016000000
000030  aa     000000000000
000031  aa  6 00042 3735 20   epp7      pr6|34,*
000032  aa  7 00002 2361 20   ldq       pr7|2,*
000033  aa   000002 6040 04   tmi       2,ic                000035
000034  aa   777777 3760 07   anq       262143,dl
000035  aa  0 00250 3761 00   anq       pr0|168             = 000077777777
000036  aa  6 00110 7561 00   stq       pr6|72
000037  aa  7 00004 2361 20   ldq       pr7|4,*
000040  aa   000002 6040 04   tmi       2,ic                000042
000041  aa   777777 3760 07   anq       262143,dl
000042  aa  0 00250 3761 00   anq       pr0|168             = 000077777777
000043  aa  6 00111 7561 00   stq       pr6|73
000044  aa  7 00006 2361 20   ldq       pr7|6,*
000045  aa   000002 6040 04   tmi       2,ic                000047
000046  aa   777777 3760 07   anq       262143,dl
000047  aa  0 00250 3761 00   anq       pr0|168             = 000077777777
000050  aa  6 00112 7561 00   stq       pr6|74

DBG(933703457)> CPU TRACE: 00306:015670 4 000200627000 (EAX7 000200) 000200 627(0) 0 0 0 00
DBG(933703459)> CPU TRACE: 00306:015671 4 700034352120 (EPP2 PR7|34,N*) 700034 352(0) 1 0 1 00
DBG(933703461)> CPU TRACE: 00306:015672 4 201046272100 (TSP2 PR2|1046) 201046 272(0) 1 0 0 00
DBG(933703517)> CPU TRACE: 00306:015675 4 600042373520 (EPP7 PR6|42,N*) 600042 373(1) 1 0 1 00
DBG(933703519)> CPU TRACE: 00306:015676 4 700002236120 (LDQ PR7|2,N*) 700002 236(0) 1 0 1 00
DBG(933703521)> CPU TRACE: 00306:015677 4 000002604004 (TMI 000002,IC) 000002 604(0) 0 0 0 04
DBG(933703523)> CPU TRACE: 00306:015701 4 000250376100 (ANQ PR0|250) 000250 376(0) 1 0 0 00
DBG(933703525)> CPU TRACE: 00306:015702 4 600110756100 (STQ PR6|110) 600110 756(0) 1 0 0 00
DBG(933703527)> CPU TRACE: 00306:015703 4 700004236120 (LDQ PR7|4,N*) 700004 236(0) 1 0 1 00
DBG(933703529)> CPU TRACE: 00306:015704 4 000002604004 (TMI 000002,IC) 000002 604(0) 0 0 0 04
DBG(933703531)> CPU TRACE: 00306:015706 4 000250376100 (ANQ PR0|250) 000250 376(0) 1 0 0 00
DBG(933703533)> CPU TRACE: 00306:015707 4 600111756100 (STQ PR6|111) 600111 756(0) 1 0 0 00
DBG(933703535)> CPU TRACE: 00306:015710 4 700006236120 (LDQ PR7|6,N*) 700006 236(0) 1 0 1 00
DBG(933703537)> CPU TRACE: 00306:015711 4 000002604004 (TMI 000002,IC) 000002 604(0) 0 0 0 04
DBG(933703539)> CPU TRACE: 00306:015713 4 000250376100 (ANQ PR0|250) 000250 376(0) 1 0 0 00
DBG(933703541)> CPU TRACE: 00306:015714 4 600112756100 (STQ PR6|112) 600112 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 38
          Code = 0;

000051  aa  6 00032 3715 20   epp5      pr6|26,*
000052  aa  5 00016 4501 20   stz       pr5|14,*            Code

DBG(933703543)> CPU TRACE: 00306:015715 4 600032371520 (EPP5 PR6|32,N*) 600032 371(1) 1 0 1 00
DBG(933703545)> CPU TRACE: 00306:015716 4 500016450120 (STZ PR5|16,N*) 500016 450(0) 1 0 1 00

                                                            STATEMENT 1 ON LINE 39
          Offset, Length = 0;

000053  aa  5 00012 4501 20   stz       pr5|10,*            Offset
000054  aa  5 00014 4501 20   stz       pr5|12,*            Length

DBG(933703547)> CPU TRACE: 00306:015717 4 500012450120 (STZ PR5|12,N*) 500012 450(0) 1 0 1 00
DBG(933703549)> CPU TRACE: 00306:015720 4 500014450120 (STZ PR5|14,N*) 500014 450(0) 1 0 1 00

                                                            STATEMENT 1 ON LINE 40
          Line_no, Dirname, Ename = "";

000055  aa  5 00004 3535 20   epp3      pr5|4,*
000056  aa  6 00110 2351 00   lda       pr6|72
000057  aa  040 140 100 400   mlr       (),(pr,rl),fill(040)
000060  aa   000000 00 0000   desc9a    0,0
000061  aa  3 00000 00 0005   desc9a    pr3|0,al            Line_no
000062  aa  5 00006 3515 20   epp1      pr5|6,*
000063  aa  6 00111 2361 00   ldq       pr6|73
000064  aa  040 140 100 400   mlr       (),(pr,rl),fill(040)
000065  aa   000000 00 0000   desc9a    0,0
000066  aa  1 00000 00 0006   desc9a    pr1|0,ql            Dirname
000067  aa  5 00010 3735 20   epp7      pr5|8,*
000070  aa  6 00112 2351 00   lda       pr6|74
000071  aa  040 140 100 400   mlr       (),(pr,rl),fill(040)
000072  aa   000000 00 0000   desc9a    0,0
000073  aa  7 00000 00 0005   desc9a    pr7|0,al            Ename

DBG(933703551)> CPU TRACE: 00306:015721 4 500004353520 (EPP3 PR5|4,N*) 500004 353(1) 1 0 1 00
DBG(933703553)> CPU TRACE: 00306:015722 4 600110235100 (LDA PR6|110) 600110 235(0) 1 0 0 00
DBG(933703555)> CPU TRACE: 00306:015723 4 040140100400 (MLR 040140) 040140 100(1) 0 0 0 00
DBG(933703555)> CPU TRACE: MLR special case #2
DBG(933703557)> CPU TRACE: 00306:015726 4 500006351520 (EPP1 PR5|6,N*) 500006 351(1) 1 0 1 00
DBG(933703559)> CPU TRACE: 00306:015727 4 600111236100 (LDQ PR6|111) 600111 236(0) 1 0 0 00
DBG(933703561)> CPU TRACE: 00306:015730 4 040140100400 (MLR 040140) 040140 100(1) 0 0 0 00
DBG(933703561)> CPU TRACE: MLR special case #2
DBG(933703563)> CPU TRACE: 00306:015733 4 500010373520 (EPP7 PR5|10,N*) 500010 373(1) 1 0 1 00
DBG(933703565)> CPU TRACE: 00306:015734 4 600112235100 (LDA PR6|112) 600112 235(0) 1 0 0 00
DBG(933703567)> CPU TRACE: 00306:015735 4 040140100400 (MLR 040140) 040140 100(1) 0 0 0 00
DBG(933703567)> CPU TRACE: MLR special case #2

                                                            STATEMENT 1 ON LINE 42
          if ^struc.std_flag then return;

000074  aa  5 00002 3535 20   epp3      pr5|2,*             strp
000075  aa  3 00000 3535 20   epp3      pr3|0,*             strp
000076  aa  3 00053 2351 00   lda       pr3|43              struc.std_flag
000077  aa   000400 3150 03   cana      256,du
000100  aa  0 00631 6001 00   tze       pr0|409             return_mac

DBG(933703569)> CPU TRACE: 00306:015740 4 500002353520 (EPP3 PR5|2,N*) 500002 353(1) 1 0 1 00
DBG(933703571)> CPU TRACE: 00306:015741 4 300000353520 (EPP3 PR3|0,N*) 300000 353(1) 1 0 1 00
DBG(933703573)> CPU TRACE: 00306:015742 4 300053235100 (LDA PR3|53) 300053 235(0) 1 0 0 00
DBG(933703575)> CPU TRACE: 00306:015743 4 000400315003 (CANA 000400,DU) 000400 315(0) 0 0 0 03
DBG(933703577)> CPU TRACE: 00306:015744 4 000631600100 (TZE PR0|631) 000631 600(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 43
          call stu_$get_line (struc.symbolp, struc.instruction_counter, 1, l_num, Offset, Length, l_comp);

000101  aa   000001 2360 07   ldq       1,dl
000102  aa  6 00113 7561 00   stq       pr6|75
000103  aa  3 00060 3521 00   epp2      pr3|48              struc.symbolp
000104  aa  6 00116 2521 00   spri2     pr6|78
000105  aa  3 00062 3521 00   epp2      pr3|50              struc.instruction_counter
000106  aa  6 00120 2521 00   spri2     pr6|80
000107  aa  6 00113 3521 00   epp2      pr6|75
000110  aa  6 00122 2521 00   spri2     pr6|82
000111  aa  6 00105 3521 00   epp2      pr6|69              l_num
000112  aa  6 00124 2521 00   spri2     pr6|84
000113  aa  5 00012 3521 20   epp2      pr5|10,*            Offset
000114  aa  6 00126 2521 00   spri2     pr6|86
000115  aa  5 00014 3521 20   epp2      pr5|12,*            Length
000116  aa  6 00130 2521 00   spri2     pr6|88
000117  aa  6 00104 3521 00   epp2      pr6|68              l_comp
000120  aa  6 00132 2521 00   spri2     pr6|90
000121  aa  6 00114 6211 00   eax1      pr6|76
000122  aa   034000 4310 07   fld       14336,dl
000123  la  4 00014 3521 20   epp2      pr4|12,*            stu_$get_line
000124  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out

DBG(933703579)> CPU TRACE: 00306:015745 4 000001236007 (LDQ 000001,DL) 000001 236(0) 0 0 0 07
DBG(933703581)> CPU TRACE: 00306:015746 4 600113756100 (STQ PR6|113) 600113 756(0) 1 0 0 00
DBG(933703583)> CPU TRACE: 00306:015747 4 300060352100 (EPP2 PR3|60) 300060 352(0) 1 0 0 00
DBG(933703585)> CPU TRACE: 00306:015750 4 600116252100 (SPRI2 PR6|116) 600116 252(0) 1 0 0 00
DBG(933703587)> CPU TRACE: 00306:015751 4 300062352100 (EPP2 PR3|62) 300062 352(0) 1 0 0 00
DBG(933703589)> CPU TRACE: 00306:015752 4 600120252100 (SPRI2 PR6|120) 600120 252(0) 1 0 0 00
DBG(933703591)> CPU TRACE: 00306:015753 4 600113352100 (EPP2 PR6|113) 600113 352(0) 1 0 0 00
DBG(933703593)> CPU TRACE: 00306:015754 4 600122252100 (SPRI2 PR6|122) 600122 252(0) 1 0 0 00
DBG(933703595)> CPU TRACE: 00306:015755 4 600105352100 (EPP2 PR6|105) 600105 352(0) 1 0 0 00
DBG(933703597)> CPU TRACE: 00306:015756 4 600124252100 (SPRI2 PR6|124) 600124 252(0) 1 0 0 00
DBG(933703599)> CPU TRACE: 00306:015757 4 500012352120 (EPP2 PR5|12,N*) 500012 352(0) 1 0 1 00
DBG(933703601)> CPU TRACE: 00306:015760 4 600126252100 (SPRI2 PR6|126) 600126 252(0) 1 0 0 00
DBG(933703603)> CPU TRACE: 00306:015761 4 500014352120 (EPP2 PR5|14,N*) 500014 352(0) 1 0 1 00
DBG(933703605)> CPU TRACE: 00306:015762 4 600130252100 (SPRI2 PR6|130) 600130 252(0) 1 0 0 00
DBG(933703607)> CPU TRACE: 00306:015763 4 600104352100 (EPP2 PR6|104) 600104 352(0) 1 0 0 00
DBG(933703609)> CPU TRACE: 00306:015764 4 600132252100 (SPRI2 PR6|132) 600132 252(0) 1 0 0 00
DBG(933703611)> CPU TRACE: 00306:015765 4 600114621100 (EAX1 PR6|114) 600114 621(0) 1 0 0 00
DBG(933703613)> CPU TRACE: 00306:015766 4 034000431007 (FLD 034000,DL) 034000 431(0) 0 0 0 07
DBG(933703615)> CPU TRACE: 00306:015767 4 400154352120 (EPP2 PR4|154,N*) 400154 352(0) 1 0 1 00
DBG(933703617)> CPU TRACE: 015767 000560657220 (SCU 000560,N*) 000560 657(0) 0 1 1 00
DBG(933703618)> CPU TRACE: 015767 000460710220 (TRA 000460,N*) 000460 710(0) 0 1 1 00
DBG(933708217)> CPU TRACE: 00306:015767 4 025350352020 (EPP2 025350,N*) 025350 352(0) 0 0 1 00
DBG(933708219)> CPU TRACE: 00306:015770 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 44
          if l_num = -1 then return;

000125  aa  6 00105 2361 00   ldq       pr6|69              l_num
000126  aa   000143 1160 04   cmpq      99,ic               000271 = 777777777777
000127  aa  0 00631 6001 00   tze       pr0|409             return_mac

DBG(933708539)> CPU TRACE: 00306:015771 4 600105236100 (LDQ PR6|105) 600105 236(0) 1 0 0 00
DBG(933708541)> CPU TRACE: 00306:015772 4 000143116004 (CMPQ 000143,IC) 000143 116(0) 0 0 0 04
DBG(933708543)> CPU TRACE: 00306:015773 4 000631600100 (TZE PR0|631) 000631 600(0) 1 0 0 00

print_source_line.pl1

                                                            STATEMENT 1 ON LINE 114
          if line_no = "" then do;

000270  aa  040 004 106 500   cmpc      (pr),(ic),fill(040)
000271  aa  6 00235 00 0020   desc9a    pr6|157,16          line_no
000272  aa   001131 00 0000   desc9a    601,0               001421 = 000010000000
000273  aa   000030 6010 04   tnz       24,ic               000323

DBG(933708561)> CPU TRACE: 00306:014512 4 040004106500 (CMPC PR0|40004) 040004 106(1) 0 0 0 00
DBG(933708563)> CPU TRACE: 00306:014515 4 000030601004 (TNZ 000030,IC) 000030 601(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 115
               call ioa_$ioa_stream (stream, "  Cannot get line number in ^a", struc.segment);

000274  aa  000 100 100 404   mlr       (ic),(pr),fill(000)
000275  aa   777611 00 0040   desc9a    -119,32             000105 = 040040103141
000276  aa  6 00640 00 0040   desc9a    pr6|416,32
000277  aa  6 00032 3735 20   epp7      pr6|26,*
000300  aa  7 00004 3521 20   epp2      pr7|4,*             stream
000301  aa  6 00654 2521 00   spri2     pr6|428
000302  aa  6 00640 3521 00   epp2      pr6|416
000303  aa  6 00656 2521 00   spri2     pr6|430
000304  aa  7 00002 3715 20   epp5      pr7|2,*             strp
000305  aa  5 00000 3715 20   epp5      pr5|0,*             strp
000306  aa  5 00020 3521 00   epp2      pr5|16              struc.segment
000307  aa  6 00660 2521 00   spri2     pr6|432
000310  aa   777525 3520 04   epp2      -171,ic             000035 = 524000000040
000311  aa  6 00662 2521 00   spri2     pr6|434
000312  aa  6 00666 2521 00   spri2     pr6|438
000313  aa   777513 3520 04   epp2      -181,ic             000026 = 524000000036
000314  aa  6 00664 2521 00   spri2     pr6|436
000315  aa  6 00652 6211 00   eax1      pr6|426
000316  aa   014000 4310 07   fld       6144,dl
000317  aa  6 00044 3701 20   epp4      pr6|36,*
000320  la  4 00050 3521 20   epp2      pr4|40,*            ioa_$ioa_stream
000321  aa  0 00622 7001 00   tsx0      pr0|402             call_ext_out_desc

DBG(933708565)> CPU TRACE: 00306:014516 4 000100100404 (MLR 000100,IC) 000100 100(1) 0 0 0 00
DBG(933708565)> CPU TRACE: MLR special case #1
DBG(933708567)> CPU TRACE: 00306:014521 4 600032373520 (EPP7 PR6|32,N*) 600032 373(1) 1 0 1 00
DBG(933708569)> CPU TRACE: 00306:014522 4 700004352120 (EPP2 PR7|4,N*) 700004 352(0) 1 0 1 00
DBG(933708571)> CPU TRACE: 00306:014523 4 600654252100 (SPRI2 PR6|654) 600654 252(0) 1 0 0 00
DBG(933708573)> CPU TRACE: 00306:014524 4 600640352100 (EPP2 PR6|640) 600640 352(0) 1 0 0 00
DBG(933708575)> CPU TRACE: 00306:014525 4 600656252100 (SPRI2 PR6|656) 600656 252(0) 1 0 0 00
DBG(933708577)> CPU TRACE: 00306:014526 4 700002371520 (EPP5 PR7|2,N*) 700002 371(1) 1 0 1 00
DBG(933708579)> CPU TRACE: 00306:014527 4 500000371520 (EPP5 PR5|0,N*) 500000 371(1) 1 0 1 00
DBG(933708581)> CPU TRACE: 00306:014530 4 500020352100 (EPP2 PR5|20) 500020 352(0) 1 0 0 00
DBG(933708583)> CPU TRACE: 00306:014531 4 600660252100 (SPRI2 PR6|660) 600660 252(0) 1 0 0 00
DBG(933708585)> CPU TRACE: 00306:014532 4 777525352004 (EPP2 777525,IC) 777525 352(0) 0 0 0 04
DBG(933708587)> CPU TRACE: 00306:014533 4 600662252100 (SPRI2 PR6|662) 600662 252(0) 1 0 0 00
DBG(933708589)> CPU TRACE: 00306:014534 4 600666252100 (SPRI2 PR6|666) 600666 252(0) 1 0 0 00
DBG(933708591)> CPU TRACE: 00306:014535 4 777513352004 (EPP2 777513,IC) 777513 352(0) 0 0 0 04
DBG(933708593)> CPU TRACE: 00306:014536 4 600664252100 (SPRI2 PR6|664) 600664 252(0) 1 0 0 00
DBG(933708595)> CPU TRACE: 00306:014537 4 600652621100 (EAX1 PR6|652) 600652 621(0) 1 0 0 00
DBG(933708597)> CPU TRACE: 00306:014540 4 014000431007 (FLD 014000,DL) 014000 431(0) 0 0 0 07
DBG(933708599)> CPU TRACE: 00306:014541 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(933708601)> CPU TRACE: 00306:014542 4 400046352120 (EPP2 PR4|46,N*) 400046 352(0) 1 0 1 00
DBG(933708603)> CPU TRACE: 00306:014543 4 000622700100 (TSX0 PR0|622) 000622 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 116
               end;

000322  aa   000165 7100 04   tra       117,ic              000507

DBG(933728091)> CPU TRACE: 00306:014544 4 000165710004 (TRA 000165,IC) 000165 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 126
          if fptr = null then return;

000507  aa  6 00102 2371 00   ldaq      pr6|66              fptr
000510  aa   777336 6770 04   eraq      -290,ic             000046 = 077777000043 000001000000
000511  aa  0 00460 3771 00   anaq      pr0|304             = 077777000077 777777077077
000512  aa  0 00631 6001 00   tze       pr0|409             return_mac

DBG(933728093)> CPU TRACE: 00306:014731 4 600102237100 (LDAQ PR6|102) 600102 237(0) 1 0 0 00
DBG(933728095)> CPU TRACE: 00306:014732 4 777336677004 (ERAQ 777336,IC) 777336 677(0) 0 0 0 04
DBG(933728097)> CPU TRACE: 00306:014733 4 000460377100 (ANAQ PR0|460) 000460 377(0) 1 0 0 00
DBG(933728099)> CPU TRACE: 00306:014734 4 000631600100 (TZE PR0|631) 000631 600(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 127
          pl1_operator_name = "";

000513  aa  040 100 100 400   mlr       (),(pr),fill(040)
000514  aa   000000 00 0000   desc9a    0,0
000515  aa  6 00225 00 0040   desc9a    pr6|149,32          pl1_operator_name

DBG(933728101)> CPU TRACE: 00306:014735 4 040100100400 (MLR 040100) 040100 100(1) 0 0 0 00
DBG(933728101)> CPU TRACE: MLR special case #2

                                                            STATEMENT 1 ON LINE 128
          if op_seg_name = ""
          then if struc.compiler = "v2pl1" | struc.compiler = "PL/I" | struc.compiler = "alm"
               then op_seg_name = "pl1_operators_";

000516  aa  040 004 106 500   cmpc      (pr),(ic),fill(040)
000517  aa  6 00120 00 0040   desc9a    pr6|80,32           op_seg_name
000520  aa   000703 00 0000   desc9a    451,0               001421 = 000010000000
000521  aa   000054 6010 04   tnz       44,ic               000575
000522  aa   777322 2370 04   ldaq      -302,ic             000044 = 166062160154 061000000000
000523  aa  0 00452 2771 00   oraq      pr0|298             = 000000000000 000040040040
000524  aa  6 00032 3735 20   epp7      pr6|26,*
000525  aa  7 00002 3715 20   epp5      pr7|2,*             strp
000526  aa  5 00000 3715 20   epp5      pr5|0,*             strp
000527  aa  5 00064 1151 00   cmpa      pr5|52              struc.compiler
000530  aa   000002 6010 04   tnz       2,ic                000532
000531  aa  5 00065 1161 00   cmpq      pr5|53              struc.compiler
000532  aa   000017 6000 04   tze       15,ic               000551
000533  aa   777265 2350 04   lda       -331,ic             000020 = 120114057111
000534  aa  0 00110 3771 00   anaq      pr0|72              = 777777777777 000000000000
000535  aa  0 00450 2771 00   oraq      pr0|296             = 000000000000 040040040040
000536  aa  5 00064 1151 00   cmpa      pr5|52              struc.compiler
000537  aa   000002 6010 04   tnz       2,ic                000541
000540  aa  5 00065 1161 00   cmpq      pr5|53              struc.compiler
000541  aa   000010 6000 04   tze       8,ic                000551
000542  aa   777255 2350 04   lda       -339,ic             000017 = 141154155000
000543  aa  0 00066 3771 00   anaq      pr0|54              = 777777777000 000000000000
000544  aa  0 00446 2771 00   oraq      pr0|294             = 000000000040 040040040040
000545  aa  5 00064 1151 00   cmpa      pr5|52              struc.compiler
000546  aa   000002 6010 04   tnz       2,ic                000550
000547  aa  5 00065 1161 00   cmpq      pr5|53              struc.compiler
000550  aa   000005 6010 04   tnz       5,ic                000555
000551  aa  040 100 100 404   mlr       (ic),(pr),fill(040)
000552  aa   777321 00 0016   desc9a    -303,14             000072 = 160154061137
000553  aa  6 00120 00 0040   desc9a    pr6|80,32           op_seg_name
000554  aa   000021 7100 04   tra       17,ic               000575

DBG(933728103)> CPU TRACE: 00306:014740 4 040004106500 (CMPC PR0|40004) 040004 106(1) 0 0 0 00
DBG(933728105)> CPU TRACE: 00306:014743 4 000054601004 (TNZ 000054,IC) 000054 601(0) 0 0 0 04
DBG(933728107)> CPU TRACE: 00306:014744 4 777322237004 (LDAQ 777322,IC) 777322 237(0) 0 0 0 04
DBG(933728109)> CPU TRACE: 00306:014745 4 000452277100 (ORAQ PR0|452) 000452 277(0) 1 0 0 00
DBG(933728111)> CPU TRACE: 00306:014746 4 600032373520 (EPP7 PR6|32,N*) 600032 373(1) 1 0 1 00
DBG(933728113)> CPU TRACE: 00306:014747 4 700002371520 (EPP5 PR7|2,N*) 700002 371(1) 1 0 1 00
DBG(933728115)> CPU TRACE: 00306:014750 4 500000371520 (EPP5 PR5|0,N*) 500000 371(1) 1 0 1 00
DBG(933728117)> CPU TRACE: 00306:014751 4 500064115100 (CMPA PR5|64) 500064 115(0) 1 0 0 00
DBG(933728119)> CPU TRACE: 00306:014752 4 000002601004 (TNZ 000002,IC) 000002 601(0) 0 0 0 04
DBG(933728121)> CPU TRACE: 00306:014754 4 000017600004 (TZE 000017,IC) 000017 600(0) 0 0 0 04
DBG(933728123)> CPU TRACE: 00306:014755 4 777265235004 (LDA 777265,IC) 777265 235(0) 0 0 0 04
DBG(933728125)> CPU TRACE: 00306:014756 4 000110377100 (ANAQ PR0|110) 000110 377(0) 1 0 0 00
DBG(933728127)> CPU TRACE: 00306:014757 4 000450277100 (ORAQ PR0|450) 000450 277(0) 1 0 0 00
DBG(933728129)> CPU TRACE: 00306:014760 4 500064115100 (CMPA PR5|64) 500064 115(0) 1 0 0 00
DBG(933728131)> CPU TRACE: 00306:014761 4 000002601004 (TNZ 000002,IC) 000002 601(0) 0 0 0 04
DBG(933728133)> CPU TRACE: 00306:014762 4 500065116100 (CMPQ PR5|65) 500065 116(0) 1 0 0 00
DBG(933728135)> CPU TRACE: 00306:014763 4 000010600004 (TZE 000010,IC) 000010 600(0) 0 0 0 04
DBG(933728137)> CPU TRACE: 00306:014773 4 040100100404 (MLR 040100,IC) 040100 100(1) 0 0 0 00
DBG(933728139)> CPU TRACE: 00306:014776 4 000021710004 (TRA 000021,IC) 000021 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 133
          if ^get_access (callp, btc)
          then pl1_operator_name = "not accessible";

000575  aa   000613 3520 04   epp2      395,ic              001410 = 000006000000
000576  aa   000461 6700 04   tsp4      305,ic              001257
000577  aa  6 00731 2351 00   lda       pr6|473
000600  aa   400000 3150 03   cana      131072,du
000601  aa   000005 6010 04   tnz       5,ic                000606
000602  aa  040 100 100 404   mlr       (ic),(pr),fill(040)
000603  aa   777260 00 0016   desc9a    -336,14             000062 = 156157164040
000604  aa  6 00225 00 0040   desc9a    pr6|149,32          pl1_operator_name
000605  aa   000021 7100 04   tra       17,ic               000626

DBG(933728141)> CPU TRACE: 00306:015017 4 000613352004 (EPP2 000613,IC) 000613 352(0) 0 0 0 04
DBG(933728143)> CPU TRACE: 00306:015020 4 000461670004 (TSP4 000461,IC) 000461 670(0) 0 0 0 04

ENTRY TO get_access                                         STATEMENT 1 ON LINE 187
get_access:
     proc (txtp, bc) returns (bit (1) unal);

001257  aa  6 00612 6501 00   spri4     pr6|394
001260  aa  6 00614 2521 00   spri2     pr6|396

DBG(933728145)> CPU TRACE: 00306:015501 4 600612650100 (SPRI4 PR6|612) 600612 650(0) 1 0 0 00
DBG(933728147)> CPU TRACE: 00306:015502 4 600614252100 (SPRI2 PR6|614) 600614 252(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 202
          call hcs_$high_low_seg_count (highct, hcsct);

001261  aa  6 00630 3521 00   epp2      pr6|408             highct
001262  aa  6 00736 2521 00   spri2     pr6|478
001263  aa  6 00627 3521 00   epp2      pr6|407             hcsct
001264  aa  6 00740 2521 00   spri2     pr6|480
001265  aa  6 00734 6211 00   eax1      pr6|476
001266  aa   010000 4310 07   fld       4096,dl
001267  aa  6 00044 3701 20   epp4      pr6|36,*
001270  la  4 00044 3521 20   epp2      pr4|36,*            hcs_$high_low_seg_count
001271  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out

DBG(933728149)> CPU TRACE: 00306:015503 4 600630352100 (EPP2 PR6|630) 600630 352(0) 1 0 0 00
DBG(933728151)> CPU TRACE: 00306:015504 4 600736252100 (SPRI2 PR6|736) 600736 252(0) 1 0 0 00
DBG(933728153)> CPU TRACE: 00306:015505 4 600627352100 (EPP2 PR6|627) 600627 352(0) 1 0 0 00
DBG(933728155)> CPU TRACE: 00306:015506 4 600740252100 (SPRI2 PR6|740) 600740 252(0) 1 0 0 00
DBG(933728157)> CPU TRACE: 00306:015507 4 600734621100 (EAX1 PR6|734) 600734 621(0) 1 0 0 00
DBG(933728159)> CPU TRACE: 00306:015510 4 010000431007 (FLD 010000,DL) 010000 431(0) 0 0 0 07
DBG(933728161)> CPU TRACE: 00306:015511 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(933728163)> CPU TRACE: 00306:015512 4 400060352120 (EPP2 PR4|60,N*) 400060 352(0) 1 0 1 00
DBG(933728165)> CPU TRACE: 00306:015513 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 203
          if binary (baseno (txtp)) <= hcsct + highct then do;

001272  aa  6 00614 3735 20   epp7      pr6|396,*
001273  aa  7 00002 3715 20   epp5      pr7|2,*             txtp
001274  aa  5 00000 3715 20   epp5      pr5|0,*             txtp
001275  aa  5 00000 2131 00   epaq      pr5|0               txtp
001276  aa   077777 3750 03   ana       32767,du
001277  aa   000066 7730 00   lrl       54
001300  aa  6 00742 7571 00   staq      pr6|482
001301  aa  6 00627 2361 00   ldq       pr6|407             hcsct
001302  aa  6 00630 0761 00   adq       pr6|408             highct
001303  aa   000044 7770 00   llr       36
001304  aa   000044 7330 00   lrs       36
001305  aa  6 00742 1171 00   cmpaq     pr6|482
001306  aa   000074 6040 04   tmi       60,ic               001402

DBG(933728403)> CPU TRACE: 00306:015514 4 600614373520 (EPP7 PR6|614,N*) 600614 373(1) 1 0 1 00
DBG(933728405)> CPU TRACE: 00306:015515 4 700002371520 (EPP5 PR7|2,N*) 700002 371(1) 1 0 1 00
DBG(933728407)> CPU TRACE: 00306:015516 4 500000371520 (EPP5 PR5|0,N*) 500000 371(1) 1 0 1 00
DBG(933728409)> CPU TRACE: 00306:015517 4 500000213100 (EPAQ PR5|0) 500000 213(0) 1 0 0 00
DBG(933728411)> CPU TRACE: 00306:015520 4 077777375003 (ANA 077777,DU) 077777 375(0) 0 0 0 03
DBG(933728413)> CPU TRACE: 00306:015521 4 000066773000 (LRL 000066) 000066 773(0) 0 0 0 00
DBG(933728415)> CPU TRACE: 00306:015522 4 600742757100 (STAQ PR6|742) 600742 757(0) 1 0 0 00
DBG(933728417)> CPU TRACE: 00306:015523 4 600627236100 (LDQ PR6|627) 600627 236(0) 1 0 0 00
DBG(933728419)> CPU TRACE: 00306:015524 4 600630076100 (ADQ PR6|630) 600630 076(0) 1 0 0 00
DBG(933728421)> CPU TRACE: 00306:015525 4 000044777000 (LLR 000044) 000044 777(0) 0 0 0 00
DBG(933728423)> CPU TRACE: 00306:015526 4 000044733000 (LRS 000044) 000044 733(0) 0 0 0 00
DBG(933728425)> CPU TRACE: 00306:015527 4 600742117100 (CMPAQ PR6|742) 600742 117(0) 1 0 0 00
DBG(933728427)> CPU TRACE: 00306:015530 4 000074604004 (TMI 000074,IC) 000074 604(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 204
               call hcs_$status_mins (txtp, type, bc, code);

001307  aa  7 00002 3521 20   epp2      pr7|2,*             txtp
001310  aa  6 00746 2521 00   spri2     pr6|486
001311  aa  6 00624 3521 00   epp2      pr6|404             type
001312  aa  6 00750 2521 00   spri2     pr6|488
001313  aa  7 00004 3521 20   epp2      pr7|4,*             bc
001314  aa  6 00752 2521 00   spri2     pr6|490
001315  aa  6 00620 3521 00   epp2      pr6|400             code
001316  aa  6 00754 2521 00   spri2     pr6|492
001317  aa  6 00744 6211 00   eax1      pr6|484
001320  aa   020000 4310 07   fld       8192,dl
001321  aa  6 00044 3701 20   epp4      pr6|36,*
001322  la  4 00042 3521 20   epp2      pr4|34,*            hcs_$status_mins
001323  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out

DBG(933728429)> CPU TRACE: 00306:015531 4 700002352120 (EPP2 PR7|2,N*) 700002 352(0) 1 0 1 00
DBG(933728431)> CPU TRACE: 00306:015532 4 600746252100 (SPRI2 PR6|746) 600746 252(0) 1 0 0 00
DBG(933728433)> CPU TRACE: 00306:015533 4 600624352100 (EPP2 PR6|624) 600624 352(0) 1 0 0 00
DBG(933728435)> CPU TRACE: 00306:015534 4 600750252100 (SPRI2 PR6|750) 600750 252(0) 1 0 0 00
DBG(933728437)> CPU TRACE: 00306:015535 4 700004352120 (EPP2 PR7|4,N*) 700004 352(0) 1 0 1 00
DBG(933728439)> CPU TRACE: 00306:015536 4 600752252100 (SPRI2 PR6|752) 600752 252(0) 1 0 0 00
DBG(933728441)> CPU TRACE: 00306:015537 4 600620352100 (EPP2 PR6|620) 600620 352(0) 1 0 0 00
DBG(933728443)> CPU TRACE: 00306:015540 4 600754252100 (SPRI2 PR6|754) 600754 252(0) 1 0 0 00
DBG(933728445)> CPU TRACE: 00306:015541 4 600744621100 (EAX1 PR6|744) 600744 621(0) 1 0 0 00
DBG(933728447)> CPU TRACE: 00306:015542 4 020000431007 (FLD 020000,DL) 020000 431(0) 0 0 0 07
DBG(933728449)> CPU TRACE: 00306:015543 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(933728451)> CPU TRACE: 00306:015544 4 400106352120 (EPP2 PR4|106,N*) 400106 352(0) 1 0 1 00
DBG(933728453)> CPU TRACE: 00306:015545 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 205
               if code = 0 & type = 1 then do;

001324  aa  6 00620 2361 00   ldq       pr6|400             code
001325  aa   000055 6010 04   tnz       45,ic               001402
001326  aa  6 00624 2361 00   ldq       pr6|404             type
001327  aa   000001 1160 07   cmpq      1,dl
001330  aa   000052 6010 04   tnz       42,ic               001402

DBG(933738959)> CPU TRACE: 00306:015546 4 600620236100 (LDQ PR6|620) 600620 236(0) 1 0 0 00
DBG(933738961)> CPU TRACE: 00306:015547 4 000055601004 (TNZ 000055,IC) 000055 601(0) 0 0 0 04
DBG(933738963)> CPU TRACE: 00306:015550 4 600624236100 (LDQ PR6|624) 600624 236(0) 1 0 0 00
DBG(933738965)> CPU TRACE: 00306:015551 4 000001116007 (CMPQ 000001,DL) 000001 116(0) 0 0 0 07
DBG(933738967)> CPU TRACE: 00306:015552 4 000052601004 (TNZ 000052,IC) 000052 601(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 206
                    call cu_$level_get (lev);

001331  aa  6 00626 3521 00   epp2      pr6|406             lev
001332  aa  6 00736 2521 00   spri2     pr6|478
001333  aa  6 00734 6211 00   eax1      pr6|476
001334  aa   004000 4310 07   fld       2048,dl
001335  aa  6 00044 3701 20   epp4      pr6|36,*
001336  la  4 00052 3521 20   epp2      pr4|42,*            cu_$level_get
001337  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out

DBG(933738969)> CPU TRACE: 00306:015553 4 600626352100 (EPP2 PR6|626) 600626 352(0) 1 0 0 00
DBG(933738971)> CPU TRACE: 00306:015554 4 600736252100 (SPRI2 PR6|736) 600736 252(0) 1 0 0 00
DBG(933738973)> CPU TRACE: 00306:015555 4 600734621100 (EAX1 PR6|734) 600734 621(0) 1 0 0 00
DBG(933738975)> CPU TRACE: 00306:015556 4 004000431007 (FLD 004000,DL) 004000 431(0) 0 0 0 07
DBG(933738977)> CPU TRACE: 00306:015557 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(933738979)> CPU TRACE: 00306:015560 4 400112352120 (EPP2 PR4|112,N*) 400112 352(0) 1 0 1 00
DBG(933738981)> CPU TRACE: 00306:015561 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 207
                    call hcs_$fs_get_brackets (txtp, mode, rings, code);

001340  aa  6 00614 3735 20   epp7      pr6|396,*
001341  aa  7 00002 3521 20   epp2      pr7|2,*             txtp
001342  aa  6 00746 2521 00   spri2     pr6|486
001343  aa  6 00625 3521 00   epp2      pr6|405             mode
001344  aa  6 00750 2521 00   spri2     pr6|488
001345  aa  6 00621 3521 00   epp2      pr6|401             rings
001346  aa  6 00752 2521 00   spri2     pr6|490
001347  aa  6 00620 3521 00   epp2      pr6|400             code
001350  aa  6 00754 2521 00   spri2     pr6|492
001351  aa  6 00744 6211 00   eax1      pr6|484
001352  aa   020000 4310 07   fld       8192,dl
001353  aa  6 00044 3701 20   epp4      pr6|36,*
001354  la  4 00040 3521 20   epp2      pr4|32,*            hcs_$fs_get_brackets
001355  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out

DBG(933739065)> CPU TRACE: 00306:015562 4 600614373520 (EPP7 PR6|614,N*) 600614 373(1) 1 0 1 00
DBG(933739067)> CPU TRACE: 00306:015563 4 700002352120 (EPP2 PR7|2,N*) 700002 352(0) 1 0 1 00
DBG(933739069)> CPU TRACE: 00306:015564 4 600746252100 (SPRI2 PR6|746) 600746 252(0) 1 0 0 00
DBG(933739071)> CPU TRACE: 00306:015565 4 600625352100 (EPP2 PR6|625) 600625 352(0) 1 0 0 00
DBG(933739073)> CPU TRACE: 00306:015566 4 600750252100 (SPRI2 PR6|750) 600750 252(0) 1 0 0 00
DBG(933739075)> CPU TRACE: 00306:015567 4 600621352100 (EPP2 PR6|621) 600621 352(0) 1 0 0 00
DBG(933739077)> CPU TRACE: 00306:015570 4 600752252100 (SPRI2 PR6|752) 600752 252(0) 1 0 0 00
DBG(933739079)> CPU TRACE: 00306:015571 4 600620352100 (EPP2 PR6|620) 600620 352(0) 1 0 0 00
DBG(933739081)> CPU TRACE: 00306:015572 4 600754252100 (SPRI2 PR6|754) 600754 252(0) 1 0 0 00
DBG(933739083)> CPU TRACE: 00306:015573 4 600744621100 (EAX1 PR6|744) 600744 621(0) 1 0 0 00
DBG(933739085)> CPU TRACE: 00306:015574 4 020000431007 (FLD 020000,DL) 020000 431(0) 0 0 0 07
DBG(933739087)> CPU TRACE: 00306:015575 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(933739089)> CPU TRACE: 00306:015576 4 400114352120 (EPP2 PR4|114,N*) 400114 352(0) 1 0 1 00
DBG(933739091)> CPU TRACE: 00306:015577 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 208
                    if code = 0 & rings (2) >= lev then do;

001356  aa  6 00620 2361 00   ldq       pr6|400             code
001357  aa   000023 6010 04   tnz       19,ic               001402
001360  aa  6 00622 2361 00   ldq       pr6|402             rings
001361  aa  6 00626 1161 00   cmpq      pr6|406             lev
001362  aa   000020 6040 04   tmi       16,ic               001402

DBG(933747429)> CPU TRACE: 00306:015600 4 600620236100 (LDQ PR6|620) 600620 236(0) 1 0 0 00
DBG(933747431)> CPU TRACE: 00306:015601 4 000023601004 (TNZ 000023,IC) 000023 601(0) 0 0 0 04
DBG(933747433)> CPU TRACE: 00306:015602 4 600622236100 (LDQ PR6|622) 600622 236(0) 1 0 0 00
DBG(933747435)> CPU TRACE: 00306:015603 4 600626116100 (CMPQ PR6|626) 600626 116(0) 1 0 0 00
DBG(933747437)> CPU TRACE: 00306:015604 4 000020604004 (TMI 000020,IC) 000020 604(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 209
                         if (bit (mode, 5) & "01000"b) = "01000"b
                         then if bc > 0 then return ("1"b);

001363  aa  6 00625 2351 00   lda       pr6|405             mode
001364  aa   000002 6050 04   tpl       2,ic                001366
001365  aa   000000 5310 00   neg       0
001366  aa   000037 7350 00   als       31
001367  aa   200000 3750 03   ana       65536,du
001370  aa   200000 1150 03   cmpa      65536,du
001371  aa   000011 6010 04   tnz       9,ic                001402
001372  aa  6 00614 3735 20   epp7      pr6|396,*
001373  aa  7 00004 2361 20   ldq       pr7|4,*             bc
001374  aa   000006 6044 04   tmoz      6,ic                001402
001375  aa  7 00006 3715 20   epp5      pr7|6,*
001376  aa  403 100 060 400   csl       (),(pr),fill(1),bool(move)
001377  aa   000000 00 0000   descb     0,0
001400  aa  5 00000 00 0001   descb     pr5|0,1
001401  aa  6 00612 6101 00   rtcd      pr6|394

DBG(933747439)> CPU TRACE: 00306:015605 4 600625235100 (LDA PR6|625) 600625 235(0) 1 0 0 00
DBG(933747441)> CPU TRACE: 00306:015606 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(933747443)> CPU TRACE: 00306:015610 4 000037735000 (ALS 000037) 000037 735(0) 0 0 0 00
DBG(933747445)> CPU TRACE: 00306:015611 4 200000375003 (ANA 200000,DU) 200000 375(0) 0 0 0 03
DBG(933747447)> CPU TRACE: 00306:015612 4 200000115003 (CMPA 200000,DU) 200000 115(0) 0 0 0 03
DBG(933747449)> CPU TRACE: 00306:015613 4 000011601004 (TNZ 000011,IC) 000011 601(0) 0 0 0 04
DBG(933747451)> CPU TRACE: 00306:015614 4 600614373520 (EPP7 PR6|614,N*) 600614 373(1) 1 0 1 00
DBG(933747453)> CPU TRACE: 00306:015615 4 700004236120 (LDQ PR7|4,N*) 700004 236(0) 1 0 1 00
DBG(933747455)> CPU TRACE: 00306:015616 4 000006604404 (TMOZ 000006,IC) 000006 604(1) 0 0 0 04
DBG(933747457)> CPU TRACE: 00306:015617 4 700006371520 (EPP5 PR7|6,N*) 700006 371(1) 1 0 1 00
DBG(933747459)> CPU TRACE: 00306:015620 4 403100060400 (CSL 403100) 403100 060(1) 0 0 0 00
DBG(933747461)> CPU TRACE: 00306:015623 4 600612610100 (RTCD PR6|612) 600612 610(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 133
          if ^get_access (callp, btc)
          then pl1_operator_name = "not accessible";

000575  aa   000613 3520 04   epp2      395,ic              001410 = 000006000000
000576  aa   000461 6700 04   tsp4      305,ic              001257
000577  aa  6 00731 2351 00   lda       pr6|473
000600  aa   400000 3150 03   cana      131072,du
000601  aa   000005 6010 04   tnz       5,ic                000606
000602  aa  040 100 100 404   mlr       (ic),(pr),fill(040)
000603  aa   777260 00 0016   desc9a    -336,14             000062 = 156157164040
000604  aa  6 00225 00 0040   desc9a    pr6|149,32          pl1_operator_name
000605  aa   000021 7100 04   tra       17,ic               000626

DBG(933747463)> CPU TRACE: 00306:015021 4 600731235100 (LDA PR6|731) 600731 235(0) 1 0 0 00
DBG(933747465)> CPU TRACE: 00306:015022 4 400000315003 (CANA 400000,DU) 400000 315(0) 0 0 0 03
DBG(933747467)> CPU TRACE: 00306:015023 4 000005601004 (TNZ 000005,IC) 000005 601(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 135
          else call find_operator_name_ (op_seg_name, callp, pl1_operator_name);

000606  aa  6 00120 3521 00   epp2      pr6|80              op_seg_name
000607  aa  6 00654 2521 00   spri2     pr6|428
000610  aa  6 00110 3521 00   epp2      pr6|72              callp
000611  aa  6 00656 2521 00   spri2     pr6|430
000612  aa  6 00225 3521 00   epp2      pr6|149             pl1_operator_name
000613  aa  6 00660 2521 00   spri2     pr6|432
000614  aa   777221 3520 04   epp2      -367,ic             000035 = 524000000040
000615  aa  6 00662 2521 00   spri2     pr6|434
000616  aa  6 00666 2521 00   spri2     pr6|438
000617  aa   777217 3520 04   epp2      -369,ic             000036 = 464000000000
000620  aa  6 00664 2521 00   spri2     pr6|436
000621  aa  6 00652 6211 00   eax1      pr6|426
000622  aa   014000 4310 07   fld       6144,dl
000623  aa  6 00044 3701 20   epp4      pr6|36,*
000624  la  4 00020 3521 20   epp2      pr4|16,*            find_operator_name_
000625  aa  0 00622 7001 00   tsx0      pr0|402             call_ext_out_desc

DBG(933747469)> CPU TRACE: 00306:015030 4 600120352100 (EPP2 PR6|120) 600120 352(0) 1 0 0 00
DBG(933747471)> CPU TRACE: 00306:015031 4 600654252100 (SPRI2 PR6|654) 600654 252(0) 1 0 0 00
DBG(933747473)> CPU TRACE: 00306:015032 4 600110352100 (EPP2 PR6|110) 600110 352(0) 1 0 0 00
DBG(933747475)> CPU TRACE: 00306:015033 4 600656252100 (SPRI2 PR6|656) 600656 252(0) 1 0 0 00
DBG(933747477)> CPU TRACE: 00306:015034 4 600225352100 (EPP2 PR6|225) 600225 352(0) 1 0 0 00
DBG(933747479)> CPU TRACE: 00306:015035 4 600660252100 (SPRI2 PR6|660) 600660 252(0) 1 0 0 00
DBG(933747481)> CPU TRACE: 00306:015036 4 777221352004 (EPP2 777221,IC) 777221 352(0) 0 0 0 04
DBG(933747483)> CPU TRACE: 00306:015037 4 600662252100 (SPRI2 PR6|662) 600662 252(0) 1 0 0 00
DBG(933747485)> CPU TRACE: 00306:015040 4 600666252100 (SPRI2 PR6|666) 600666 252(0) 1 0 0 00
DBG(933747487)> CPU TRACE: 00306:015041 4 777217352004 (EPP2 777217,IC) 777217 352(0) 0 0 0 04
DBG(933747489)> CPU TRACE: 00306:015042 4 600664252100 (SPRI2 PR6|664) 600664 252(0) 1 0 0 00
DBG(933747491)> CPU TRACE: 00306:015043 4 600652621100 (EAX1 PR6|652) 600652 621(0) 1 0 0 00
DBG(933747493)> CPU TRACE: 00306:015044 4 014000431007 (FLD 014000,DL) 014000 431(0) 0 0 0 07
DBG(933747495)> CPU TRACE: 00306:015045 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(933747497)> CPU TRACE: 00306:015046 4 400074352120 (EPP2 PR4|74,N*) 400074 352(0) 1 0 1 00
DBG(933747499)> CPU TRACE: 00306:015047 4 000622700100 (TSX0 PR0|622) 000622 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 137
          if pl1_operator_name = "alm_call" | substr (pl1_operator_name, 1, 4) = "call" then do;

000626  aa  040 004 106 500   cmpc      (pr),(ic),fill(040)
000627  aa  6 00225 00 0040   desc9a    pr6|149,32          pl1_operator_name
000630  aa   777214 00 0010   desc9a    -372,8              000042 = 141154155137
000631  aa   000004 6000 04   tze       4,ic                000635
000632  aa  6 00225 2351 00   lda       pr6|149             pl1_operator_name
000633  aa   777162 1150 04   cmpa      -398,ic             000015 = 143141154154
000634  aa   000271 6010 04   tnz       185,ic              001125

DBG(933747881)> CPU TRACE: 00306:015050 4 040004106500 (CMPC PR0|40004) 040004 106(1) 0 0 0 00
DBG(933747883)> CPU TRACE: 00306:015053 4 000004600004 (TZE 000004,IC) 000004 600(0) 0 0 0 04
DBG(933747885)> CPU TRACE: 00306:015054 4 600225235100 (LDA PR6|225) 600225 235(0) 1 0 0 00
DBG(933747887)> CPU TRACE: 00306:015055 4 777162115004 (CMPA 777162,IC) 777162 115(0) 0 0 0 04
DBG(933747889)> CPU TRACE: 00306:015056 4 000271601004 (TNZ 000271,IC) 000271 601(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 174
          call disassemble (fptr, disassembled_instr, insx);

001125  aa  6 00102 3521 00   epp2      pr6|66              fptr
001126  aa  6 00654 2521 00   spri2     pr6|428
001127  aa  6 00325 3521 00   epp2      pr6|213             disassembled_instr
001130  aa  6 00656 2521 00   spri2     pr6|430
001131  aa  6 00152 3521 00   epp2      pr6|106             insx
001132  aa  6 00660 2521 00   spri2     pr6|432
001133  aa   776703 3520 04   epp2      -573,ic             000036 = 464000000000
001134  aa  6 00662 2521 00   spri2     pr6|434
001135  aa   776650 3520 04   epp2      -600,ic             000005 = 530000000110
001136  aa  6 00664 2521 00   spri2     pr6|436
001137  aa   776650 3520 04   epp2      -600,ic             000007 = 404000000021
001140  aa  6 00666 2521 00   spri2     pr6|438
001141  aa  6 00652 6211 00   eax1      pr6|426
001142  aa   014000 4310 07   fld       6144,dl
001143  aa  6 00044 3701 20   epp4      pr6|36,*
001144  la  4 00030 3521 20   epp2      pr4|24,*            disassemble
001145  aa  0 00622 7001 00   tsx0      pr0|402             call_ext_out_desc

DBG(933747891)> CPU TRACE: 00306:015347 4 600102352100 (EPP2 PR6|102) 600102 352(0) 1 0 0 00
DBG(933747893)> CPU TRACE: 00306:015350 4 600654252100 (SPRI2 PR6|654) 600654 252(0) 1 0 0 00
DBG(933747895)> CPU TRACE: 00306:015351 4 600325352100 (EPP2 PR6|325) 600325 352(0) 1 0 0 00
DBG(933747897)> CPU TRACE: 00306:015352 4 600656252100 (SPRI2 PR6|656) 600656 252(0) 1 0 0 00
DBG(933747899)> CPU TRACE: 00306:015353 4 600152352100 (EPP2 PR6|152) 600152 352(0) 1 0 0 00
DBG(933747901)> CPU TRACE: 00306:015354 4 600660252100 (SPRI2 PR6|660) 600660 252(0) 1 0 0 00
DBG(933747903)> CPU TRACE: 00306:015355 4 776703352004 (EPP2 776703,IC) 776703 352(0) 0 0 0 04
DBG(933747905)> CPU TRACE: 00306:015356 4 600662252100 (SPRI2 PR6|662) 600662 252(0) 1 0 0 00
DBG(933747907)> CPU TRACE: 00306:015357 4 776650352004 (EPP2 776650,IC) 776650 352(0) 0 0 0 04
DBG(933747909)> CPU TRACE: 00306:015360 4 600664252100 (SPRI2 PR6|664) 600664 252(0) 1 0 0 00
DBG(933747911)> CPU TRACE: 00306:015361 4 776650352004 (EPP2 776650,IC) 776650 352(0) 0 0 0 04
DBG(933747913)> CPU TRACE: 00306:015362 4 600666252100 (SPRI2 PR6|666) 600666 252(0) 1 0 0 00
DBG(933747915)> CPU TRACE: 00306:015363 4 600652621100 (EAX1 PR6|652) 600652 621(0) 1 0 0 00
DBG(933747917)> CPU TRACE: 00306:015364 4 014000431007 (FLD 014000,DL) 014000 431(0) 0 0 0 07
DBG(933747919)> CPU TRACE: 00306:015365 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(933747921)> CPU TRACE: 00306:015366 4 400152352120 (EPP2 PR4|152,N*) 400152 352(0) 1 0 1 00
DBG(933747923)> CPU TRACE: 015366 000560657220 (SCU 000560,N*) 000560 657(0) 0 1 1 00
DBG(933747924)> CPU TRACE: 015366 000460710220 (TRA 000460,N*) 000460 710(0) 0 1 1 00
DBG(933759219)> CPU TRACE: 00306:015366 4 025346352020 (EPP2 025346,N*) 025346 352(0) 0 0 1 00
DBG(933759221)> CPU TRACE: 00306:015367 4 000622700100 (TSX0 PR0|622) 000622 700(0) 1 0 0 00

DBG(933813585)> CPU TRACE: 00306:015370 4 776672237004 (LDAQ 776672,IC) 776672 237(0) 0 0 0 04
DBG(933813587)> CPU TRACE: 00306:015371 4 600732757100 (STAQ PR6|732) 600732 757(0) 1 0 0 00
DBG(933813589)> CPU TRACE: 00306:015372 4 600032373520 (EPP7 PR6|32,N*) 600032 373(1) 1 0 1 00
DBG(933813591)> CPU TRACE: 00306:015373 4 700004352120 (EPP2 PR7|4,N*) 700004 352(0) 1 0 1 00
DBG(933813593)> CPU TRACE: 00306:015374 4 600674252100 (SPRI2 PR6|674) 600674 252(0) 1 0 0 00
DBG(933813595)> CPU TRACE: 00306:015375 4 600732352100 (EPP2 PR6|732) 600732 352(0) 1 0 0 00
DBG(933813597)> CPU TRACE: 00306:015376 4 600676252100 (SPRI2 PR6|676) 600676 252(0) 1 0 0 00
DBG(933813599)> CPU TRACE: 00306:015377 4 600325352100 (EPP2 PR6|325) 600325 352(0) 1 0 0 00
DBG(933813601)> CPU TRACE: 00306:015400 4 600700252100 (SPRI2 PR6|700) 600700 252(0) 1 0 0 00
DBG(933813603)> CPU TRACE: 00306:015401 4 600225352100 (EPP2 PR6|225) 600225 352(0) 1 0 0 00
DBG(933813605)> CPU TRACE: 00306:015402 4 600702252100 (SPRI2 PR6|702) 600702 252(0) 1 0 0 00
DBG(933813607)> CPU TRACE: 00306:015403 4 776654352004 (EPP2 776654,IC) 776654 352(0) 0 0 0 04
DBG(933813609)> CPU TRACE: 00306:015404 4 600704252100 (SPRI2 PR6|704) 600704 252(0) 1 0 0 00
DBG(933813611)> CPU TRACE: 00306:015405 4 600712252100 (SPRI2 PR6|712) 600712 252(0) 1 0 0 00
DBG(933813613)> CPU TRACE: 00306:015406 4 776620352004 (EPP2 776620,IC) 776620 352(0) 0 0 0 04
DBG(933813615)> CPU TRACE: 00306:015407 4 600706252100 (SPRI2 PR6|706) 600706 252(0) 1 0 0 00
DBG(933813617)> CPU TRACE: 00306:015410 4 776617352004 (EPP2 776617,IC) 776617 352(0) 0 0 0 04
DBG(933813619)> CPU TRACE: 00306:015411 4 600710252100 (SPRI2 PR6|710) 600710 252(0) 1 0 0 00
DBG(933813621)> CPU TRACE: 00306:015412 4 600672621100 (EAX1 PR6|672) 600672 621(0) 1 0 0 00
DBG(933813623)> CPU TRACE: 00306:015413 4 020000431007 (FLD 020000,DL) 020000 431(0) 0 0 0 07
DBG(933813625)> CPU TRACE: 00306:015414 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(933813627)> CPU TRACE: 00306:015415 4 400046352120 (EPP2 PR4|46,N*) 400046 352(0) 1 0 1 00
DBG(933813629)> CPU TRACE: 00306:015416 4 000622700100 (TSX0 PR0|622) 000622 700(0) 1 0 0 00
DBG(933836239)> CPU TRACE: RTCD 00306:015417
DBG(933836239)> CPU TRACE: RTCD PPR.PRR 4 PPR.P 0
DBG(933836241)> CPU TRACE: 00306:015417 4 600152236100 (LDQ PR6|152) 600152 236(0) 1 0 0 00
DBG(933836243)> CPU TRACE: 00306:015420 4 000001116007 (CMPQ 000001,DL) 000001 116(0) 0 0 0 07
DBG(933836245)> CPU TRACE: 00306:015421 4 000057604404 (TMOZ 000057,IC) 000057 604(1) 0 0 0 04
DBG(933836247)> CPU TRACE: 00306:015500 4 000631710100 (TRA PR0|631) 000631 710(0) 1 0 0 00
Unless otherwise stated, the content of this page is licensed under Creative Commons Attribution-ShareAlike 3.0 License