CAC 2017-01-20

basic 2

                                                            STATEMENT 1 ON LINE 6255
          basic_program_header.incoming_args.location =
               bit (fixed (fixed (basic_program_header.incoming_args.location, 18) + number_of_constants, 18), 18);

017143  aa  6 00154 3515 20   epp1      pr6|108,*           program_header_pt
017144  aa  1 00005 2351 00   lda       pr1|5               basic_program_header.location
017145  aa   000066 7730 00   lrl       54
017146  aa  6 01375 0761 00   adq       pr6|765             number_of_constants
017147  aa   000003 6050 04   tpl       3,ic                017152
017150  aa  0 00110 6761 00   erq       pr0|72              = 777777777777
017151  aa   000001 0760 07   adq       1,dl
017152  aa   000066 7370 00   lls       54
017153  aa  1 00005 5511 60   stba      pr1|5,60            basic_program_header.location
                                                            STATEMENT 1 ON LINE 6258
          end_pos = end_pos + number_of_constants;

017154  aa  6 01375 2361 00   ldq       pr6|765             number_of_constants
017155  aa  6 16425 0561 00   asq       pr6|7445            end_pos
                                                            STATEMENT 1 ON LINE 6262
          if numeric_data_count ^= 0
          then do;

017156  aa  6 01367 2361 00   ldq       pr6|759             numeric_data_count
017157  aa   000042 6000 04   tze       34,ic               017221

DBG(2464648760567)> CPU TRACE: 00310:026636 4 100005235100 (LDA PR1|5) 100005 235(0) 1 0 0 00
DBG(2464648760569)> CPU TRACE: 00310:026637 4 000066773000 (LRL 000066) 000066 773(0) 0 0 0 00
DBG(2464648760571)> CPU TRACE: 00310:026640 4 601375076100 (ADQ PR6|1375) 601375 076(0) 1 0 0 00
DBG(2464648760571)> CPU TRACE: Add36b op1 000000000000 op2 000000000000 carryin 0 flagsToSet 740000 flags 500200 ovf 0
DBG(2464648760571)> CPU TRACE: Add36b res 000000000000 flags 400200 ovf 0
DBG(2464648760573)> CPU TRACE: 00310:026641 4 000003605004 (TPL 000003,IC) 000003 605(0) 0 0 0 04
DBG(2464648760575)> CPU TRACE: 00310:026644 4 000066737000 (LLS 000066) 000066 737(0) 0 0 0 00
DBG(2464648760577)> CPU TRACE: 00310:026645 4 100005551160 (STBA PR1|5,*N) 100005 551(0) 1 0 3 00
DBG(2464648760579)> CPU TRACE: 00310:026646 4 601375236100 (LDQ PR6|1375) 601375 236(0) 1 0 0 00
DBG(2464648760581)> CPU TRACE: 00310:026647 4 616425056100 (ASQ PR6|16425) 616425 056(0) 1 0 0 00
DBG(2464648760581)> CPU TRACE: Add36b op1 000000000000 op2 000000000025 carryin 0 flagsToSet 740000 flags 400200 ovf 0
DBG(2464648760581)> CPU TRACE: Add36b res 000000000025 flags 000200 ovf 0
DBG(2464648760583)> CPU TRACE: 00310:026650 4 601367236100 (LDQ PR6|1367) 601367 236(0) 1 0 0 00
DBG(2464648760585)> CPU TRACE: 00310:026651 4 000042600004 (TZE 000042,IC) 000042 600(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6278
          if string_data_count ^= 0
          then do;

017221  aa  6 01370 2361 00   ldq       pr6|760             string_data_count
017222  aa   000032 6000 04   tze       26,ic               017254

DBG(2464648760587)> CPU TRACE: 00310:026713 4 601370236100 (LDQ PR6|1370) 601370 236(0) 1 0 0 00
DBG(2464648760589)> CPU TRACE: 00310:026714 4 000032600004 (TZE 000032,IC) 000032 600(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6292
          if precision_lng = 2
          then if mod (auto_ctr (0), 2) ^= 0
               then auto_ctr (0) = auto_ctr (0) + 1;

017254  aa  6 00226 2361 00   ldq       pr6|150             precision_lng
017255  aa  2 00000 1161 00   cmpq      pr2|0
017256  aa   000010 6010 04   tnz       8,ic                017266
017257  aa  6 00352 2361 00   ldq       pr6|234             auto_ctr
017260  aa  0 00704 7001 00   tsx0      pr0|452             mdfx1
017261  aa   000005 6000 04   tze       5,ic                017266
017262  aa  6 00352 2351 00   lda       pr6|234             auto_ctr
017263  aa   000044 7330 00   lrs       36
017264  aa   000001 0330 07   adl       1,dl
017265  aa  6 00352 7561 00   stq       pr6|234             auto_ctr

DBG(2464648760591)> CPU TRACE: 00310:026746 4 600226236100 (LDQ PR6|226) 600226 236(0) 1 0 0 00
DBG(2464648760593)> CPU TRACE: 00310:026747 4 200000116100 (CMPQ PR2|0) 200000 116(0) 1 0 0 00
DBG(2464648760595)> CPU TRACE: 00310:026750 4 000010601004 (TNZ 000010,IC) 000010 601(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6296
          string (basic_program_header.numeric_arrays) = process_arrays (1);

017266  aa   000001 2360 07   ldq       1,dl
017267  aa  6 17366 7561 00   stq       pr6|7926
017270  aa   004076 3520 04   epp2      2110,ic             023366 = 000004000000
017271  aa   000241 6700 04   tsp4      161,ic              017532
017272  aa  6 17367 2351 00   lda       pr6|7927
017273  aa  6 00154 3735 20   epp7      pr6|108,*           program_header_pt
017274  aa  7 00011 7551 00   sta       pr7|9

DBG(2464648760597)> CPU TRACE: 00310:026760 4 000001236007 (LDQ 000001,DL) 000001 236(0) 0 0 0 07
DBG(2464648760599)> CPU TRACE: 00310:026761 4 617362756100 (STQ PR6|17362) 617362 756(0) 1 0 0 00
DBG(2464648760601)> CPU TRACE: 00310:026762 4 004076352004 (EPP2 004076,IC) 004076 352(0) 0 0 0 04
DBG(2464648760603)> CPU TRACE: 00310:026763 4 000241670004 (TSP4 000241,IC) 000241 670(0) 0 0 0 04

<skip>

DBG(2464648761273)> CPU TRACE: 00310:026764 4 617363235100 (LDA PR6|17363) 617363 235(0) 1 0 0 00
DBG(2464648761275)> CPU TRACE: 00310:026765 4 600154373520 (EPP7 PR6|154,N*) 600154 373(1) 1 0 1 00
DBG(2464648761277)> CPU TRACE: 00310:026766 4 700011755100 (STA PR7|11) 700011 755(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6299
          string_start = auto_ctr (0);
017275  aa  6 00352 2361 00   ldq       pr6|234             auto_ctr
017276  aa  6 16426 7561 00   stq       pr6|7446            string_start

DBG(2464648761279)> CPU TRACE: 00310:026767 4 600352236100 (LDQ PR6|352) 600352 236(0) 1 0 0 00
DBG(2464648761281)> CPU TRACE: 00310:026770 4 616426756100 (STQ PR6|16426) 616426 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6301
          basic_program_header.numeric_storage.location = "000000000010000000"b;

017277  aa   000200 2350 03   lda       128,du
017300  aa  7 00001 5511 60   stba      pr7|1,60            basic_program_header.location
                                                            STATEMENT 1 ON LINE 6302
          basic_program_header.numeric_storage.number = bit (fixed (auto_ctr (0) - 128, 18), 18);

017301  aa  6 00352 3361 00   lcq       pr6|234             auto_ctr
017302  aa   000044 7770 00   llr       36
017303  aa   000044 7330 00   lrs       36
017304  aa   000200 0330 07   adl       128,dl
017305  aa   000000 5330 00   negl      0
017306  aa   000003 6050 04   tpl       3,ic                017311
017307  aa  0 00110 6761 00   erq       pr0|72              = 777777777777
017310  aa   000001 0760 07   adq       1,dl
017311  aa   000066 7370 00   lls       54
017312  aa   000022 7730 00   lrl       18
017313  aa  7 00001 5511 14   stba      pr7|1,14            basic_program_header.number
                                                            STATEMENT 1 ON LINE 6307
          auto_ctr (0) = auto_ctr (0) + auto_ctr (1);

017314  aa  6 00352 2351 00   lda       pr6|234             auto_ctr
017315  aa   000044 7330 00   lrs       36
017316  aa  6 00353 0331 00   adl       pr6|235             auto_ctr
017317  aa  6 00352 7561 00   stq       pr6|234             auto_ctr
                                                            STATEMENT 1 ON LINE 6309
          string (basic_program_header.string_arrays) = process_arrays (-1);

017320  aa   000001 3360 07   lcq       1,dl
017321  aa  6 17367 7561 00   stq       pr6|7927
017322  aa   004022 3520 04   epp2      2066,ic             023344 = 000004000000
017323  aa   000207 6700 04   tsp4      135,ic              017532
017324  aa  6 17366 2351 00   lda       pr6|7926
017325  aa  6 00154 3735 20   epp7      pr6|108,*           program_header_pt
017326  aa  7 00012 7551 00   sta       pr7|10
                                                            STATEMENT 1 ON LINE 6317
          if auto_ctr (0) > max_storage_amount
          then call error_no_line (-170);

017327  aa  6 00352 2361 00   ldq       pr6|234             auto_ctr
017330  aa   776000 1160 07   cmpq      261120,dl
017331  aa   000005 6044 04   tmoz      5,ic                017336

DBG(2464648761283)> CPU TRACE: 00310:026771 4 000200235003 (LDA 000200,DU) 000200 235(0) 0 0 0 03
DBG(2464648761285)> CPU TRACE: 00310:026772 4 700001551160 (STBA PR7|1,*N) 700001 551(0) 1 0 3 00
DBG(2464648761287)> CPU TRACE: 00310:026773 4 600352336100 (LCQ PR6|352) 600352 336(0) 1 0 0 00
DBG(2464648761289)> CPU TRACE: 00310:026774 4 000044777000 (LLR 000044) 000044 777(0) 0 0 0 00
DBG(2464648761291)> CPU TRACE: 00310:026775 4 000044733000 (LRS 000044) 000044 733(0) 0 0 0 00
DBG(2464648761293)> CPU TRACE: 00310:026776 4 000200033007 (ADL 000200,DL) 000200 033(0) 0 0 0 07
DBG(2464648761295)> CPU TRACE: 00310:026777 4 000000533000 (NEGL 000000) 000000 533(0) 0 0 0 00
DBG(2464648761297)> CPU TRACE: 00310:027000 4 000003605004 (TPL 000003,IC) 000003 605(0) 0 0 0 04
DBG(2464648761299)> CPU TRACE: 00310:027003 4 000066737000 (LLS 000066) 000066 737(0) 0 0 0 00
DBG(2464648761301)> CPU TRACE: 00310:027004 4 000022773000 (LRL 000022) 000022 773(0) 0 0 0 00
DBG(2464648761303)> CPU TRACE: 00310:027005 4 700001551114 (STBA PR7|1,4) 700001 551(0) 1 0 0 14
DBG(2464648761305)> CPU TRACE: 00310:027006 4 600352235100 (LDA PR6|352) 600352 235(0) 1 0 0 00
DBG(2464648761307)> CPU TRACE: 00310:027007 4 000044733000 (LRS 000044) 000044 733(0) 0 0 0 00
DBG(2464648761309)> CPU TRACE: 00310:027010 4 600353033100 (ADL PR6|353) 600353 033(0) 1 0 0 00
DBG(2464648761311)> CPU TRACE: 00310:027011 4 600352756100 (STQ PR6|352) 600352 756(0) 1 0 0 00
DBG(2464648761313)> CPU TRACE: 00310:027012 4 000001336007 (LCQ 000001,DL) 000001 336(0) 0 0 0 07
DBG(2464648761315)> CPU TRACE: 00310:027013 4 617363756100 (STQ PR6|17363) 617363 756(0) 1 0 0 00
DBG(2464648761317)> CPU TRACE: 00310:027014 4 004022352004 (EPP2 004022,IC) 004022 352(0) 0 0 0 04
DBG(2464648761319)> CPU TRACE: 00310:027015 4 000207670004 (TSP4 000207,IC) 000207 670(0) 0 0 0 04

<skip>

DBG(2464648761989)> CPU TRACE: 00310:027016 4 617362235100 (LDA PR6|17362) 617362 235(0) 1 0 0 00
DBG(2464648761991)> CPU TRACE: 00310:027017 4 600154373520 (EPP7 PR6|154,N*) 600154 373(1) 1 0 1 00
DBG(2464648761993)> CPU TRACE: 00310:027020 4 700012755100 (STA PR7|12) 700012 755(0) 1 0 0 00
DBG(2464648761995)> CPU TRACE: 00310:027021 4 600352236100 (LDQ PR6|352) 600352 236(0) 1 0 0 00
DBG(2464648761997)> CPU TRACE: 00310:027022 4 776000116007 (CMPQ 776000,DL) 776000 116(0) 0 0 0 07
DBG(2464648761999)> CPU TRACE: 00310:027023 4 000005604404 (TMOZ 000005,IC) 000005 604(1) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6320
          basic_program_header.string_storage.location = bit (string_start, 18);

017336  aa  6 16426 2351 00   lda       pr6|7446            string_start
017337  aa   000022 7350 00   als       18
017340  aa  6 00154 3735 20   epp7      pr6|108,*           program_header_pt
017341  aa  7 00002 5511 60   stba      pr7|2,60            basic_program_header.location
                                                            STATEMENT 1 ON LINE 6321
          basic_program_header.string_storage.number = bit (fixed (auto_ctr (0) - string_start, 18), 18);

017342  aa  6 00352 3361 00   lcq       pr6|234             auto_ctr
017343  aa   000044 7770 00   llr       36
017344  aa   000044 7330 00   lrs       36
017345  aa  6 16426 0331 00   adl       pr6|7446            string_start
017346  aa   000000 5330 00   negl      0
017347  aa   000003 6050 04   tpl       3,ic                017352
017350  aa  0 00110 6761 00   erq       pr0|72              = 777777777777
017351  aa   000001 0760 07   adq       1,dl
017352  aa   000066 7370 00   lls       54
017353  aa   000022 7730 00   lrl       18
017354  aa  7 00002 5511 14   stba      pr7|2,14            basic_program_header.number
                                                            STATEMENT 1 ON LINE 6327
          string (basic_program_header.numeric_scalars) = process_scalars (1);

017355  aa   000001 2360 07   ldq       1,dl
017356  aa  6 17366 7561 00   stq       pr6|7926
017357  aa   004007 3520 04   epp2      2055,ic             023366 = 000004000000
017360  aa   000305 6700 04   tsp4      197,ic              017665
017361  aa  6 17367 2351 00   lda       pr6|7927
017362  aa  6 00154 3735 20   epp7      pr6|108,*           program_header_pt
017363  aa  7 00007 7551 00   sta       pr7|7
                                                            STATEMENT 1 ON LINE 6329
          string (basic_program_header.string_scalars) = process_scalars (-1);

017364  aa   000001 3360 07   lcq       1,dl
017365  aa  6 17367 7561 00   stq       pr6|7927
017366  aa   003756 3520 04   epp2      2030,ic             023344 = 000004000000
017367  aa   000276 6700 04   tsp4      190,ic              017665
017370  aa  6 17366 2351 00   lda       pr6|7926
017371  aa  6 00154 3735 20   epp7      pr6|108,*           program_header_pt
017372  aa  7 00010 7551 00   sta       pr7|8

DBG(2464648762001)> CPU TRACE: 00310:027030 4 616426235100 (LDA PR6|16426) 616426 235(0) 1 0 0 00
DBG(2464648762003)> CPU TRACE: 00310:027031 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648762005)> CPU TRACE: 00310:027032 4 600154373520 (EPP7 PR6|154,N*) 600154 373(1) 1 0 1 00
DBG(2464648762007)> CPU TRACE: 00310:027033 4 700002551160 (STBA PR7|2,*N) 700002 551(0) 1 0 3 00
DBG(2464648762009)> CPU TRACE: 00310:027034 4 600352336100 (LCQ PR6|352) 600352 336(0) 1 0 0 00
DBG(2464648762011)> CPU TRACE: 00310:027035 4 000044777000 (LLR 000044) 000044 777(0) 0 0 0 00
DBG(2464648762013)> CPU TRACE: 00310:027036 4 000044733000 (LRS 000044) 000044 733(0) 0 0 0 00
DBG(2464648762015)> CPU TRACE: 00310:027037 4 616426033100 (ADL PR6|16426) 616426 033(0) 1 0 0 00
DBG(2464648762017)> CPU TRACE: 00310:027040 4 000000533000 (NEGL 000000) 000000 533(0) 0 0 0 00
DBG(2464648762019)> CPU TRACE: 00310:027041 4 000003605004 (TPL 000003,IC) 000003 605(0) 0 0 0 04
DBG(2464648762021)> CPU TRACE: 00310:027044 4 000066737000 (LLS 000066) 000066 737(0) 0 0 0 00
DBG(2464648762023)> CPU TRACE: 00310:027045 4 000022773000 (LRL 000022) 000022 773(0) 0 0 0 00
DBG(2464648762025)> CPU TRACE: 00310:027046 4 700002551114 (STBA PR7|2,4) 700002 551(0) 1 0 0 14
DBG(2464648762027)> CPU TRACE: 00310:027047 4 000001236007 (LDQ 000001,DL) 000001 236(0) 0 0 0 07
DBG(2464648762029)> CPU TRACE: 00310:027050 4 617362756100 (STQ PR6|17362) 617362 756(0) 1 0 0 00
DBG(2464648762031)> CPU TRACE: 00310:027051 4 004007352004 (EPP2 004007,IC) 004007 352(0) 0 0 0 04
DBG(2464648762033)> CPU TRACE: 00310:027052 4 000305670004 (TSP4 000305,IC) 000305 670(0) 0 0 0 04
<skip>
DBG(2464648771295)> CPU TRACE: 00310:027053 4 617363235100 (LDA PR6|17363) 617363 235(0) 1 0 0 00
DBG(2464648771297)> CPU TRACE: 00310:027054 4 600154373520 (EPP7 PR6|154,N*) 600154 373(1) 1 0 1 00
DBG(2464648771299)> CPU TRACE: 00310:027055 4 700007755100 (STA PR7|7) 700007 755(0) 1 0 0 00

                                                             STATEMENT 1 ON LINE 6329
          string (basic_program_header.string_scalars) = process_scalars (-1);

017364  aa   000001 3360 07   lcq       1,dl
017365  aa  6 17367 7561 00   stq       pr6|7927
017366  aa   003756 3520 04   epp2      2030,ic             023344 = 000004000000
017367  aa   000276 6700 04   tsp4      190,ic              017665
017370  aa  6 17366 2351 00   lda       pr6|7926
017371  aa  6 00154 3735 20   epp7      pr6|108,*           program_header_pt
017372  aa  7 00010 7551 00   sta       pr7|8

DBG(2464648771301)> CPU TRACE: 00310:027056 4 000001336007 (LCQ 000001,DL) 000001 336(0) 0 0 0 07
DBG(2464648771303)> CPU TRACE: 00310:027057 4 617363756100 (STQ PR6|17363) 617363 756(0) 1 0 0 00
DBG(2464648771305)> CPU TRACE: 00310:027060 4 003756352004 (EPP2 003756,IC) 003756 352(0) 0 0 0 04
DBG(2464648771307)> CPU TRACE: 00310:027061 4 000276670004 (TSP4 000276,IC) 000276 670(0) 0 0 0 04

<skip>

DBG(2464648778499)> CPU TRACE: 00310:027062 4 617362235100 (LDA PR6|17362) 617362 235(0) 1 0 0 00
DBG(2464648778501)> CPU TRACE: 00310:027063 4 600154373520 (EPP7 PR6|154,N*) 600154 373(1) 1 0 1 00
DBG(2464648778503)> CPU TRACE: 00310:027064 4 700010755100 (STA PR7|10) 700010 755(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6333
          m = header_pos (program_number);

017373  aa  6 00207 2361 00   ldq       pr6|135             program_number
017374  aa   000013 4020 07   mpy       11,dl
017375  aa  6 01552 2361 06   ldq       pr6|874,ql          subprogram.header_pos
017376  aa  6 16424 7561 00   stq       pr6|7444            m

DBG(2464648778505)> CPU TRACE: 00310:027065 4 600207236100 (LDQ PR6|207) 600207 236(0) 1 0 0 00
DBG(2464648778507)> CPU TRACE: 00310:027066 4 000013402007 (MPY 000013,DL) 000013 402(0) 0 0 0 07
DBG(2464648778509)> CPU TRACE: 00310:027067 4 601552236106 (LDQ PR6|1552,QL) 601552 236(0) 1 0 0 06
DBG(2464648778511)> CPU TRACE: 00310:027070 4 616424756100 (STQ PR6|16424) 616424 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6334
          basic_program_header.statement_map.location = bit (fixed (output_pos - m, 18), 18);

017377  aa  6 01346 2361 00   ldq       pr6|742             output_pos
017400  aa  6 16424 1761 00   sbq       pr6|7444            m
017401  aa   000003 6050 04   tpl       3,ic                017404
017402  aa  0 00110 6761 00   erq       pr0|72              = 777777777777
017403  aa   000001 0760 07   adq       1,dl
017404  aa   000066 7370 00   lls       54
017405  aa  7 00014 5511 60   stba      pr7|12,60           basic_program_header.location

DBG(2464648778513)> CPU TRACE: 00310:027071 4 601346236100 (LDQ PR6|1346) 601346 236(0) 1 0 0 00
DBG(2464648778515)> CPU TRACE: 00310:027072 4 616424176100 (SBQ PR6|16424) 616424 176(0) 1 0 0 00
DBG(2464648778517)> CPU TRACE: 00310:027073 4 000003605004 (TPL 000003,IC) 000003 605(0) 0 0 0 04
DBG(2464648778519)> CPU TRACE: 00310:027076 4 000066737000 (LLS 000066) 000066 737(0) 0 0 0 00
DBG(2464648778521)> CPU TRACE: 00310:027077 4 700014551160 (STBA PR7|14,*N) 700014 551(0) 1 0 3 00

                                                            STATEMENT 1 ON LINE 6336
          basic_program_header.statement_map.number = bit (number_of_lines, 18);

017406  aa  6 01371 2351 00   lda       pr6|761             number_of_lines
017407  aa   000002 6050 04   tpl       2,ic                017411
017410  aa   000000 5310 00   neg       0
017411  aa  0 00264 3771 00   anaq      pr0|180             = 000000777777 777777777777
017412  aa  7 00014 5511 14   stba      pr7|12,14           basic_program_header.number

DBG(2464648778523)> CPU TRACE: 00310:027100 4 601371235100 (LDA PR6|1371) 601371 235(0) 1 0 0 00
DBG(2464648778525)> CPU TRACE: 00310:027101 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648778527)> CPU TRACE: 00310:027103 4 000264377100 (ANAQ PR0|264) 000264 377(0) 1 0 0 00
DBG(2464648778529)> CPU TRACE: 00310:027104 4 700014551114 (STBA PR7|14,4) 700014 551(0) 1 0 0 14

                                                            STATEMENT 1 ON LINE 6338
          do i = 1 to number_of_lines;

017413  aa  6 01371 2361 00   ldq       pr6|761             number_of_lines
017414  aa  6 16435 7561 00   stq       pr6|7453^L017415  aa   000001 2360 07   ldq       1,dl
017416  aa  6 16422 7561 00   stq       pr6|7442            i
017417  aa   000000 0110 03   nop       0,du
017420  aa  6 16422 2361 00   ldq       pr6|7442            i
017421  aa  6 16435 1161 00   cmpq      pr6|7453
017422  aa   000025 6054 04   tpnz      21,ic               017447

DBG(2464648778531)> CPU TRACE: 00310:027105 4 601371236100 (LDQ PR6|1371) 601371 236(0) 1 0 0 00
DBG(2464648778533)> CPU TRACE: 00310:027106 4 616435756100 (STQ PR6|16435) 616435 756(0) 1 0 0 00
DBG(2464648778535)> CPU TRACE: 00310:027107 4 000001236007 (LDQ 000001,DL) 000001 236(0) 0 0 0 07
DBG(2464648778537)> CPU TRACE: 00310:027110 4 616422756100 (STQ PR6|16422) 616422 756(0) 1 0 0 00
DBG(2464648778539)> CPU TRACE: 00310:027111 4 000000011003 (NOP 000000,DU) 000000 011(0) 0 0 0 03
DBG(2464648778541)> CPU TRACE: 00310:027112 4 616422236100 (LDQ PR6|16422) 616422 236(0) 1 0 0 00
DBG(2464648778543)> CPU TRACE: 00310:027113 4 616435116100 (CMPQ PR6|16435) 616435 116(0) 1 0 0 00
DBG(2464648778545)> CPU TRACE: 00310:027114 4 000025605404 (TPNZ 000025,IC) 000025 605(1) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6339
               output_word (output_pos) =
                    bit (fixed (fixed (line (i).location, 17) - m + number_of_constants, 18), 18)
                    || unspec (line (i).number);

017423  aa  6 00174 3735 20   epp7      pr6|124,*           table_pt
017424  aa  7 77777 2351 06   lda       pr7|-1,ql           line.location
017425  aa   000001 7350 00   als       1
017426  aa   000067 7730 00   lrl       55
017427  aa  6 16424 1761 00   sbq       pr6|7444            m
017430  aa  6 01375 0761 00   adq       pr6|765             number_of_constants
017431  aa   000003 6050 04   tpl       3,ic                017434
017432  aa  0 00110 6761 00   erq       pr0|72              = 777777777777
017433  aa   000001 0760 07   adq       1,dl
017434  aa   000066 7370 00   lls       54
017435  aa  6 17366 7551 00   sta       pr6|7926
017436  aa  6 16422 7271 00   lxl7      pr6|7442            i
017437  aa  7 77777 2351 17   lda       pr7|-1,7
017440  aa  0 00264 3771 00   anaq      pr0|180             = 000000777777 777777777777
017441  aa  6 17366 2751 00   ora       pr6|7926
017442  aa  6 01346 7261 00   lxl6      pr6|742             output_pos
017443  aa  6 00146 7551 76   sta       pr6|102,*6          output_word

DBG(2464648778547)> CPU TRACE: 00310:027115 4 600174373520 (EPP7 PR6|174,N*) 600174 373(1) 1 0 1 00
DBG(2464648778549)> CPU TRACE: 00310:027116 4 777777235106 (LDA PR7|77777,QL) 777777 235(0) 1 0 0 06
DBG(2464648778551)> CPU TRACE: 00310:027117 4 000001735000 (ALS 000001) 000001 735(0) 0 0 0 00
DBG(2464648778553)> CPU TRACE: 00310:027120 4 000067773000 (LRL 000067) 000067 773(0) 0 0 0 00
DBG(2464648778555)> CPU TRACE: 00310:027121 4 616424176100 (SBQ PR6|16424) 616424 176(0) 1 0 0 00
DBG(2464648778557)> CPU TRACE: 00310:027122 4 601375076100 (ADQ PR6|1375) 601375 076(0) 1 0 0 00
DBG(2464648778557)> CPU TRACE: Add36b op1 000000000023 op2 000000000000 carryin 0 flagsToSet 740000 flags 100200 ovf 0
DBG(2464648778557)> CPU TRACE: Add36b res 000000000023 flags 000200 ovf 0
DBG(2464648778559)> CPU TRACE: 00310:027123 4 000003605004 (TPL 000003,IC) 000003 605(0) 0 0 0 04
DBG(2464648778561)> CPU TRACE: 00310:027126 4 000066737000 (LLS 000066) 000066 737(0) 0 0 0 00
DBG(2464648778563)> CPU TRACE: 00310:027127 4 617362755100 (STA PR6|17362) 617362 755(0) 1 0 0 00
DBG(2464648778565)> CPU TRACE: 00310:027130 4 616422727100 (LXL7 PR6|16422) 616422 727(0) 1 0 0 00
DBG(2464648778567)> CPU TRACE: 00310:027131 4 777777235117 (LDA PR7|77777,7) 777777 235(0) 1 0 0 17
DBG(2464648778569)> CPU TRACE: 00310:027132 4 000264377100 (ANAQ PR0|264) 000264 377(0) 1 0 0 00
DBG(2464648778571)> CPU TRACE: 00310:027133 4 617362275100 (ORA PR6|17362) 617362 275(0) 1 0 0 00
DBG(2464648778573)> CPU TRACE: 00310:027134 4 601346726100 (LXL6 PR6|1346) 601346 726(0) 1 0 0 00
DBG(2464648778575)> CPU TRACE: 00310:027135 4 600146755176 (STA PR6|146,*6) 600146 755(0) 1 0 3 16

                                                            STATEMENT 1 ON LINE 6342
               output_pos = output_pos + 1;

017444  aa  6 01346 0541 00   aos       pr6|742             output_pos

DBG(2464648778577)> CPU TRACE: 00310:027136 4 601346054100 (AOS PR6|1346) 601346 054(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6343
          end;

017445  aa  6 16422 0541 00   aos       pr6|7442            i
017446  aa   777752 7100 04   tra       -22,ic              017420

DBG(2464648778579)> CPU TRACE: 00310:027137 4 616422054100 (AOS PR6|16422) 616422 054(0) 1 0 0 00
DBG(2464648778581)> CPU TRACE: 00310:027140 4 777752710004 (TRA 777752,IC) 777752 710(0) 0 0 0 04

017420  aa  6 16422 2361 00   ldq       pr6|7442            i
017421  aa  6 16435 1161 00   cmpq      pr6|7453
017422  aa   000025 6054 04   tpnz      21,ic               017447

DBG(2464648778583)> CPU TRACE: 00310:027112 4 616422236100 (LDQ PR6|16422) 616422 236(0) 1 0 0 00
DBG(2464648778585)> CPU TRACE: 00310:027113 4 616435116100 (CMPQ PR6|16435) 616435 116(0) 1 0 0 00
DBG(2464648778587)> CPU TRACE: 00310:027114 4 000025605404 (TPNZ 000025,IC) 000025 605(1) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6339
               output_word (output_pos) =
                    bit (fixed (fixed (line (i).location, 17) - m + number_of_constants, 18), 18)
                    || unspec (line (i).number);

017423  aa  6 00174 3735 20   epp7      pr6|124,*           table_pt
017424  aa  7 77777 2351 06   lda       pr7|-1,ql           line.location
017425  aa   000001 7350 00   als       1
017426  aa   000067 7730 00   lrl       55
017427  aa  6 16424 1761 00   sbq       pr6|7444            m
017430  aa  6 01375 0761 00   adq       pr6|765             number_of_constants
017431  aa   000003 6050 04   tpl       3,ic                017434
017432  aa  0 00110 6761 00   erq       pr0|72              = 777777777777
017433  aa   000001 0760 07   adq       1,dl
017434  aa   000066 7370 00   lls       54
017435  aa  6 17366 7551 00   sta       pr6|7926
017436  aa  6 16422 7271 00   lxl7      pr6|7442            i
017437  aa  7 77777 2351 17   lda       pr7|-1,7
017440  aa  0 00264 3771 00   anaq      pr0|180             = 000000777777 777777777777
017441  aa  6 17366 2751 00   ora       pr6|7926
017442  aa  6 01346 7261 00   lxl6      pr6|742             output_pos
017443  aa  6 00146 7551 76   sta       pr6|102,*6          output_word

DBG(2464648778589)> CPU TRACE: 00310:027115 4 600174373520 (EPP7 PR6|174,N*) 600174 373(1) 1 0 1 00
DBG(2464648778591)> CPU TRACE: 00310:027116 4 777777235106 (LDA PR7|77777,QL) 777777 235(0) 1 0 0 06
DBG(2464648778593)> CPU TRACE: 00310:027117 4 000001735000 (ALS 000001) 000001 735(0) 0 0 0 00
DBG(2464648778595)> CPU TRACE: 00310:027120 4 000067773000 (LRL 000067) 000067 773(0) 0 0 0 00
DBG(2464648778597)> CPU TRACE: 00310:027121 4 616424176100 (SBQ PR6|16424) 616424 176(0) 1 0 0 00
DBG(2464648778599)> CPU TRACE: 00310:027122 4 601375076100 (ADQ PR6|1375) 601375 076(0) 1 0 0 00
DBG(2464648778599)> CPU TRACE: Add36b op1 000000000024 op2 000000000000 carryin 0 flagsToSet 740000 flags 100200 ovf 0
DBG(2464648778599)> CPU TRACE: Add36b res 000000000024 flags 000200 ovf 0
DBG(2464648778601)> CPU TRACE: 00310:027123 4 000003605004 (TPL 000003,IC) 000003 605(0) 0 0 0 04
DBG(2464648778603)> CPU TRACE: 00310:027126 4 000066737000 (LLS 000066) 000066 737(0) 0 0 0 00
DBG(2464648778605)> CPU TRACE: 00310:027127 4 617362755100 (STA PR6|17362) 617362 755(0) 1 0 0 00
DBG(2464648778607)> CPU TRACE: 00310:027130 4 616422727100 (LXL7 PR6|16422) 616422 727(0) 1 0 0 00
DBG(2464648778609)> CPU TRACE: 00310:027131 4 777777235117 (LDA PR7|77777,7) 777777 235(0) 1 0 0 17
DBG(2464648778611)> CPU TRACE: 00310:027132 4 000264377100 (ANAQ PR0|264) 000264 377(0) 1 0 0 00
DBG(2464648778613)> CPU TRACE: 00310:027133 4 617362275100 (ORA PR6|17362) 617362 275(0) 1 0 0 00
DBG(2464648778615)> CPU TRACE: 00310:027134 4 601346726100 (LXL6 PR6|1346) 601346 726(0) 1 0 0 00
DBG(2464648778617)> CPU TRACE: 00310:027135 4 600146755176 (STA PR6|146,*6) 600146 755(0) 1 0 3 16

                                                            STATEMENT 1 ON LINE 6342
               output_pos = output_pos + 1;

017444  aa  6 01346 0541 00   aos       pr6|742             output_pos

DBG(2464648778621)> CPU TRACE: 00310:027137 4 616422054100 (AOS PR6|16422) 616422 054(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6343
          end;

017445  aa  6 16422 0541 00   aos       pr6|7442            i
017446  aa   777752 7100 04   tra       -22,ic              017420

DBG(2464648778621)> CPU TRACE: 00310:027137 4 616422054100 (AOS PR6|16422) 616422 054(0) 1 0 0 00
DBG(2464648778623)> CPU TRACE: 00310:027140 4 777752710004 (TRA 777752,IC) 777752 710(0) 0 0 0 04

017420  aa  6 16422 2361 00   ldq       pr6|7442            i
017421  aa  6 16435 1161 00   cmpq      pr6|7453
017422  aa   000025 6054 04   tpnz      21,ic               017447

DBG(2464648778625)> CPU TRACE: 00310:027112 4 616422236100 (LDQ PR6|16422) 616422 236(0) 1 0 0 00
DBG(2464648778627)> CPU TRACE: 00310:027113 4 616435116100 (CMPQ PR6|16435) 616435 116(0) 1 0 0 00
DBG(2464648778629)> CPU TRACE: 00310:027114 4 000025605404 (TPNZ 000025,IC) 000025 605(1) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6347
          output_word (output_pos) = bit (end_pos, 18) || (18)"1"b;

017447  aa  6 16425 2351 00   lda       pr6|7445            end_pos
017450  aa   000002 6050 04   tpl       2,ic                017452
017451  aa   000000 5310 00   neg       0
017452  aa   000022 7350 00   als       18
017453  aa  6 17366 7551 00   sta       pr6|7926
017454  aa   777777 2350 07   lda       262143,dl
017455  aa  6 17366 2751 00   ora       pr6|7926
017456  aa  6 01346 7271 00   lxl7      pr6|742             output_pos
017457  aa  6 00146 7551 77   sta       pr6|102,*7          output_word

DBG(2464648778631)> CPU TRACE: 00310:027141 4 616425235100 (LDA PR6|16425) 616425 235(0) 1 0 0 00
DBG(2464648778633)> CPU TRACE: 00310:027142 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648778635)> CPU TRACE: 00310:027144 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648778637)> CPU TRACE: 00310:027145 4 617362755100 (STA PR6|17362) 617362 755(0) 1 0 0 00
DBG(2464648778639)> CPU TRACE: 00310:027146 4 777777235007 (LDA 777777,DL) 777777 235(0) 0 0 0 07
DBG(2464648778641)> CPU TRACE: 00310:027147 4 617362275100 (ORA PR6|17362) 617362 275(0) 1 0 0 00
DBG(2464648778643)> CPU TRACE: 00310:027150 4 601346727100 (LXL7 PR6|1346) 601346 727(0) 1 0 0 00
DBG(2464648778645)> CPU TRACE: 00310:027151 4 600146755177 (STA PR6|146,*7) 600146 755(0) 1 0 3 17

                                                            STATEMENT 1 ON LINE 6348
          output_pos = output_pos + 1;

017460  aa  6 01346 0541 00   aos       pr6|742             output_pos
                                                            STATEMENT 1 ON LINE 6350
          if single
          then basic_program_header.version_number = 2;

017461  aa  6 01471 2351 00   lda       pr6|825             single
017462  aa   000004 6000 04   tze       4,ic                017466
017463  aa   000002 2360 07   ldq       2,dl^L017464  aa  6 00154 7561 20   stq       pr6|108,*           basic_program_header.version_number
017465  aa   000003 7100 04   tra       3,ic                017470

DBG(2464648778647)> CPU TRACE: 00310:027152 4 601346054100 (AOS PR6|1346) 601346 054(0) 1 0 0 00
DBG(2464648778647)> CPU TRACE: Add36b op1 000000000027 op2 000000000001 carryin 0 flagsToSet 740000 flags 000200 ovf 0
DBG(2464648778647)> CPU TRACE: Add36b res 000000000030 flags 000200 ovf 0
DBG(2464648778649)> CPU TRACE: 00310:027153 4 601471235100 (LDA PR6|1471) 601471 235(0) 1 0 0 00
DBG(2464648778651)> CPU TRACE: 00310:027154 4 000004600004 (TZE 000004,IC) 000004 600(0) 0 0 0 04
DBG(2464648778653)> CPU TRACE: 00310:027155 4 000002236007 (LDQ 000002,DL) 000002 236(0) 0 0 0 07
DBG(2464648778655)> CPU TRACE: 00310:027156 4 600154756120 (STQ PR6|154,N*) 600154 756(0) 1 0 1 00
DBG(2464648778657)> CPU TRACE: 00310:027157 4 000003710004 (TRA 000003,IC) 000003 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6354
          basic_program_header.precision_ind = precision_lng - 1;

017470  aa  6 00226 2361 00   ldq       pr6|150             precision_lng
017471  aa   000001 1760 07   sbq       1,dl
017472  aa   000066 7370 00   lls       54
017473  aa  6 00154 3735 20   epp7      pr6|108,*           program_header_pt
017474  aa  7 00015 5511 60   stba      pr7|13,60           basic_program_header.precision_ind

DBG(2464648778659)> CPU TRACE: 00310:027162 4 600226236100 (LDQ PR6|226) 600226 236(0) 1 0 0 00
DBG(2464648778661)> CPU TRACE: 00310:027163 4 000001176007 (SBQ 000001,DL) 000001 176(0) 0 0 0 07
DBG(2464648778663)> CPU TRACE: 00310:027164 4 000066737000 (LLS 000066) 000066 737(0) 0 0 0 00
DBG(2464648778665)> CPU TRACE: 00310:027165 4 600154373520 (EPP7 PR6|154,N*) 600154 373(1) 1 0 1 00
DBG(2464648778667)> CPU TRACE: 00310:027166 4 700015551160 (STBA PR7|15,*N) 700015 551(0) 1 0 3 00

                                                            STATEMENT 1 ON LINE 6359
          k = mod (auto_ctr (0), 16);

017475  aa  6 00352 2361 00   ldq       pr6|234             auto_ctr
017476  aa   004602 3520 04   epp2      2434,ic             024300 = 000000000020
017477  aa  0 00704 7001 00   tsx0      pr0|452             mdfx1
017500  aa  6 16423 7561 00   stq       pr6|7443            k

DBG(2464648778669)> CPU TRACE: 00310:027167 4 600352236100 (LDQ PR6|352) 600352 236(0) 1 0 0 00
DBG(2464648778671)> CPU TRACE: 00310:027170 4 004602352004 (EPP2 004602,IC) 004602 352(0) 0 0 0 04
DBG(2464648778673)> CPU TRACE: 00310:027171 4 000704700100 (TSX0 PR0|704) 000704 700(0) 1 0 0 00

<skip>

DBG(2464648778693)> CPU TRACE: 00310:027172 4 616423756100 (STQ PR6|16423) 616423 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6360
          if k ^= 0
          then auto_ctr (0) = auto_ctr (0) + 16 - k;

017501  aa   000010 6000 04   tze       8,ic                017511
017502  aa  6 00352 2351 00   lda       pr6|234             auto_ctr
017503  aa   000044 7330 00   lrs       36
017504  aa  2 00000 0331 00   adl       pr2|0
017505  aa   000000 5330 00   negl      0
017506  aa  6 16423 0331 00   adl       pr6|7443            k
017507  aa   000000 5330 00   negl      0
017510  aa  6 00352 7561 00   stq       pr6|234             auto_ctr

DBG(2464648778693)> CPU TRACE: 00310:027172 4 616423756100 (STQ PR6|16423) 616423 756(0) 1 0 0 00
DBG(2464648778695)> CPU TRACE: 00310:027173 4 000010600004 (TZE 000010,IC) 000010 600(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6363
          entry_pt -> basic_entry.stack_size = bit (fixed (auto_ctr (0), 18), 18);

017511  aa  6 00352 2351 00   lda       pr6|234             auto_ctr
017512  aa   000002 6050 04   tpl       2,ic                017514
017513  aa   000000 5310 00   neg       0
017514  aa   000022 7350 00   als       18
017515  aa  6 00156 3715 20   epp5      pr6|110,*           entry_pt
017516  aa  5 00001 5511 60   stba      pr5|1,60            basic_entry.stack_size

DBG(2464648778697)> CPU TRACE: 00310:027203 4 600352235100 (LDA PR6|352) 600352 235(0) 1 0 0 00
DBG(2464648778699)> CPU TRACE: 00310:027204 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648778701)> CPU TRACE: 00310:027206 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648778703)> CPU TRACE: 00310:027207 4 600156371520 (EPP5 PR6|156,N*) 600156 371(1) 1 0 1 00
DBG(2464648778705)> CPU TRACE: 00310:027210 4 500001551160 (STBA PR5|1,*N) 500001 551(0) 1 0 3 00

                                                            STATEMENT 1 ON LINE 6364
          entry_pt -> basic_entry.eax_7 = "110010111000000000"b;

017517  aa   627000 2350 07   lda       208384,dl
017520  aa  5 00001 5511 14   stba      pr5|1,14            basic_entry.eax_7

DBG(2464648778707)> CPU TRACE: 00310:027211 4 627000235007 (LDA 627000,DL) 627000 235(0) 0 0 0 07
DBG(2464648778709)> CPU TRACE: 00310:027212 4 500001551114 (STBA PR5|1,4) 500001 551(0) 1 0 0 14

                                                            STATEMENT 1 ON LINE 6365
          entry_pt -> basic_entry.word_2 = "111000000000101000011101010001010000"b;

017521  aa   760625 2350 04   lda       -7787,ic            000346 = 700050352120
017522  aa  5 00002 7551 00   sta       pr5|2               basic_entry.word_2

DBG(2464648778711)> CPU TRACE: 00310:027213 4 760647235004 (LDA 760647,IC) 760647 235(0) 0 0 0 04
DBG(2464648778713)> CPU TRACE: 00310:027214 4 500002755100 (STA PR5|2) 500002 755(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6367
          entry_pt -> basic_entry.header = header_pos (program_number) - entry_pos (program_number);

017523  aa  6 00207 2361 00   ldq       pr6|135             program_number
017524  aa   000013 4020 07   mpy       11,dl
017525  aa   000000 6270 06   eax7      0,ql
017526  aa  6 01552 2361 06   ldq       pr6|874,ql          subprogram.header_pos
017527  aa  6 01553 1761 17   sbq       pr6|875,7           subprogram.entry_pos
017530  aa  5 00004 7561 00   stq       pr5|4               basic_entry.header

DBG(2464648778715)> CPU TRACE: 00310:027215 4 600207236100 (LDQ PR6|207) 600207 236(0) 1 0 0 00
DBG(2464648778717)> CPU TRACE: 00310:027216 4 000013402007 (MPY 000013,DL) 000013 402(0) 0 0 0 07
DBG(2464648778719)> CPU TRACE: 00310:027217 4 000000627006 (EAX7 000000,QL) 000000 627(0) 0 0 0 06
DBG(2464648778721)> CPU TRACE: 00310:027220 4 601552236106 (LDQ PR6|1552,QL) 601552 236(0) 1 0 0 06
DBG(2464648778723)> CPU TRACE: 00310:027221 4 601553176117 (SBQ PR6|1553,7) 601553 176(0) 1 0 0 17
DBG(2464648778725)> CPU TRACE: 00310:027222 4 500004756100 (STQ PR5|4) 500004 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6478
     end;

017531  aa  6 16414 6101 00   rtcd      pr6|7436

DBG(2464648778727)> CPU TRACE: 00310:027223 4 616414610100 (RTCD PR6|16414) 616414 610(0) 1 0 0 00

                                                           STATEMENT 1 ON LINE 1015
          end;

001773  aa   777603 7100 04   tra       -125,ic             001576

DBG(2464648778729)> CPU TRACE: 00310:011507 4 777603710004 (TRA 777603,IC) 777603 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 918
          do while (input_pos < input_length);

001575  aa   000000 0110 03   nop       0,du
001576  aa  6 10257 2361 00   ldq       pr6|4271            next_line_storage.input_pos
001577  aa  6 10256 1161 00   cmpq      pr6|4270            next_line_storage.input_length
001600  aa   000174 6050 04   tpl       124,ic              001774

DBG(2464648778731)> CPU TRACE: 00310:011312 4 610257236100 (LDQ PR6|10257) 610257 236(0) 1 0 0 00
DBG(2464648778733)> CPU TRACE: 00310:011313 4 610256116100 (CMPQ PR6|10256) 610256 116(0) 1 0 0 00
DBG(2464648778735)> CPU TRACE: 00310:011314 4 000174605004 (TPL 000174,IC) 000174 605(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 1017
          if which = 3
          then do;

001774  aa  6 00336 2361 00   ldq       pr6|222             which
001775  aa   000003 1160 07   cmpq      3,dl
001776  aa   000025 6010 04   tnz       21,ic               002023

DBG(2464648778737)> CPU TRACE: 00310:011510 4 600336236100 (LDQ PR6|336) 600336 236(0) 1 0 0 00
DBG(2464648778739)> CPU TRACE: 00310:011511 4 000003116007 (CMPQ 000003,DL) 000003 116(0) 0 0 0 07
DBG(2464648778741)> CPU TRACE: 00310:011512 4 000025601004 (TNZ 000025,IC) 000025 601(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 1032
finish:
          call finish_object;

002023  aa   016002 6700 04   tsp4      7170,ic             020025

DBG(2464648778759)> CPU TRACE: 00310:027605 4 000704700100 (TSX0 PR0|704) 000704 700(0) 1 0 0 00

ENTRY TO finish_object                                      STATEMENT 1 ON LINE 6482
finish_object:
     proc;

020025  aa  6 16474 6501 00   spri4     pr6|7484

DBG(2464648778745)> CPU TRACE: 00310:027517 4 616474650100 (SPRI4 PR6|16474) 616474 650(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6536
          if lib_count > 0
          then do;

020026  aa  6 00337 2361 00   ldq       pr6|223             lib_count
020027  aa   000060 6044 04   tmoz      48,ic               020107

DBG(2464648778747)> CPU TRACE: 00310:027520 4 600337236100 (LDQ PR6|337) 600337 236(0) 1 0 0 00
DBG(2464648778749)> CPU TRACE: 00310:027521 4 000060604404 (TMOZ 000060,IC) 000060 604(1) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6550
          else lib_list_pt = null;

020107  aa   760361 2370 04   ldaq      -7951,ic            000470 = 077777000043 000001000000
020110  aa  6 16526 7571 00   staq      pr6|7510            lib_list_pt

DBG(2464648778751)> CPU TRACE: 00310:027601 4 760403237004 (LDAQ 760403,IC) 760403 237(0) 0 0 0 04
DBG(2464648778753)> CPU TRACE: 00310:027602 4 616526757100 (STAQ PR6|16526) 616526 757(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6554
          def_start = output_pos + mod (output_pos, 2);

020111  aa  6 01346 2361 00   ldq       pr6|742             output_pos
020112  aa   004200 3520 04   epp2      2176,ic             024312 = 000000000002
020113  aa  0 00704 7001 00   tsx0      pr0|452             mdfx1
020114  aa  6 01346 0761 00   adq       pr6|742             output_pos
020115  aa  6 16502 7561 00   stq       pr6|7490            def_start

DBG(2464648778755)> CPU TRACE: 00310:027603 4 601346236100 (LDQ PR6|1346) 601346 236(0) 1 0 0 00
DBG(2464648778757)> CPU TRACE: 00310:027604 4 004200352004 (EPP2 004200,IC) 004200 352(0) 0 0 0 04
DBG(2464648778759)> CPU TRACE: 00310:027605 4 000704700100 (TSX0 PR0|704) 000704 700(0) 1 0 0 00

DBG(2464648778779)> CPU TRACE: 00310:027606 4 601346076100 (ADQ PR6|1346) 601346 076(0) 1 0 0 00
DBG(2464648778781)> CPU TRACE: 00310:027607 4 616502756100 (STQ PR6|16502) 616502 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6555
          def_base = addrel (output_pt, def_start);

020116  aa  6 00146 3515 66   epp1      pr6|102,*ql         output_pt
020117  aa   000000 0510 03   adwp1     0,du
020120  aa  6 16516 2515 00   spri1     pr6|7502            def_base

DBG(2464648778783)> CPU TRACE: 00310:027610 4 600146351566 (EPP1 PR6|146,*QL) 600146 351(1) 1 0 3 06
DBG(2464648778785)> CPU TRACE: 00310:027611 4 000000051003 (ADWP1 000000,DU) 000000 051(0) 0 0 0 03
DBG(2464648778787)> CPU TRACE: 00310:027612 4 616516251500 (SPRI1 PR6|16516) 616516 251(1) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6559
          def_base -> def_header.flags = "11"b;

020121  aa   600000 2350 07   lda       196608,dl
020122  aa  1 00001 5511 14   stba      pr1|1,14            def_header.flags

DBG(2464648778789)> CPU TRACE: 00310:027613 4 600000235007 (LDA 600000,DL) 600000 235(0) 0 0 0 07
DBG(2464648778791)> CPU TRACE: 00310:027614 4 100001551114 (STBA PR1|1,4) 100001 551(0) 1 0 0 14

                                                            STATEMENT 1 ON LINE 6561
          zero_def = "000000000000000010"b;

020123  aa   000002 2350 03   lda       2,du
020124  aa  6 16540 7551 00   sta       pr6|7520            zero_def

DBG(2464648778793)> CPU TRACE: 00310:027615 4 000002235003 (LDA 000002,DU) 000002 235(0) 0 0 0 03
DBG(2464648778795)> CPU TRACE: 00310:027616 4 616540755100 (STA PR6|16540) 616540 755(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6562
          last_def = (18)"0"b;

020125  aa  6 16542 4501 00   stz       pr6|7522            last_def

DBG(2464648778797)> CPU TRACE: 00310:027617 4 616542450100 (STZ PR6|16542) 616542 450(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6564
          def_pos = 3;

020126  aa   000003 2360 07   ldq       3,dl
020127  aa  6 16503 7561 00   stq       pr6|7491            def_pos

DBG(2464648778799)> CPU TRACE: 00310:027620 4 000003236007 (LDQ 000003,DL) 000003 236(0) 0 0 0 07
DBG(2464648778801)> CPU TRACE: 00310:027621 4 616503756100 (STQ PR6|16503) 616503 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6566
          call generate_definition (seg_name, 3, zero_def, "0"b);

020130  aa   000003 2360 07   ldq       3,dl
020131  aa  6 17402 7561 00   stq       pr6|7938
020132  aa   000000 2350 07   lda       0,dl
020133  aa  6 17403 7551 00   sta       pr6|7939
020134  aa   003176 3520 04   epp2      1662,ic             023332 = 000010000000
020135  aa   001050 6700 04   tsp4      552,ic              021205

DBG(2464648778807)> CPU TRACE: 00310:027624 4 000000235007 (LDA 000000,DL) 000000 235(0) 0 0 0 07
DBG(2464648778809)> CPU TRACE: 00310:027625 4 617377755100 (STA PR6|17377) 617377 755(0) 1 0 0 00
DBG(2464648778811)> CPU TRACE: 00310:027626 4 003176352004 (EPP2 003176,IC) 003176 352(0) 0 0 0 04
DBG(2464648778813)> CPU TRACE: 00310:027627 4 001050670004 (TSP4 001050,IC) 001050 670(0) 0 0 0 04

ENTRY TO generate_definition                                STATEMENT 1 ON LINE 6782
generate_definition:
     proc (name, class, value, entry_sw);

021205  aa  6 16552 6501 00   spri4     pr6|7530
021206  aa  6 16554 2521 00   spri2     pr6|7532
                                                            STATEMENT 1 ON LINE 6798
          b18 = bit (def_pos, 18);

021207  aa  6 16503 2351 00   lda       pr6|7491            def_pos^L021210  aa   000002 6050 04   tpl       2,ic                021212
021211  aa   000000 5310 00   neg       0
021212  aa   000022 7350 00   als       18
021213  aa  6 16543 7551 00   sta       pr6|7523            b18
                                                            STATEMENT 1 ON LINE 6799
          q = addrel (def_base, def_pos);

021214  aa  6 16503 2361 00   ldq       pr6|7491            def_pos
021215  aa  6 16516 3515 66   epp1      pr6|7502,*ql        def_base
021216  aa   000000 0510 03   adwp1     0,du
021217  aa  6 16564 2515 00   spri1     pr6|7540            q
                                                            STATEMENT 1 ON LINE 6801
          n = length (name);

021220  aa  2 00002 3735 20   epp7      pr2|2,*
021221  aa  7 77777 2361 00   ldq       pr7|-1              name
021222  aa  6 16560 7561 00   stq       pr6|7536            n
                                                            STATEMENT 1 ON LINE 6802
          q -> acc.count = bit (n, 9);

021223  aa  6 16560 2351 00   lda       pr6|7536            n
021224  aa   000002 6050 04   tpl       2,ic                021226
021225  aa   000000 5310 00   neg       0
021226  aa   000033 7350 00   als       27
021227  aa  1 00000 5511 40   stba      pr1|0,40            acc.count
                                                            STATEMENT 1 ON LINE 6803
          q -> acc.str = name;

021230  aa  7 77777 7271 00   lxl7      pr7|-1              name
021231  aa  040 140 100 540   mlr       (pr,rl),(pr,rl),fill(040)
021232  aa  7 00000 00 0017   desc9a    pr7|0,x7            name
021233  aa  1 00000 20 0006   desc9a    pr1|0(1),ql         acc.str

DBG(2464648778815)> CPU TRACE: 00310:030677 4 616552650100 (SPRI4 PR6|16552) 616552 650(0) 1 0 0 00
DBG(2464648778817)> CPU TRACE: 00310:030700 4 616554252100 (SPRI2 PR6|16554) 616554 252(0) 1 0 0 00
DBG(2464648778819)> CPU TRACE: 00310:030701 4 616503235100 (LDA PR6|16503) 616503 235(0) 1 0 0 00
DBG(2464648778821)> CPU TRACE: 00310:030702 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648778823)> CPU TRACE: 00310:030704 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648778825)> CPU TRACE: 00310:030705 4 616543755100 (STA PR6|16543) 616543 755(0) 1 0 0 00
DBG(2464648778827)> CPU TRACE: 00310:030706 4 616503236100 (LDQ PR6|16503) 616503 236(0) 1 0 0 00
DBG(2464648778829)> CPU TRACE: 00310:030707 4 616516351566 (EPP1 PR6|16516,*QL) 616516 351(1) 1 0 3 06
DBG(2464648778831)> CPU TRACE: 00310:030710 4 000000051003 (ADWP1 000000,DU) 000000 051(0) 0 0 0 03
DBG(2464648778833)> CPU TRACE: 00310:030711 4 616564251500 (SPRI1 PR6|16564) 616564 251(1) 1 0 0 00
DBG(2464648778835)> CPU TRACE: 00310:030712 4 200002373520 (EPP7 PR2|2,N*) 200002 373(1) 1 0 1 00
DBG(2464648778837)> CPU TRACE: 00310:030713 4 777777236100 (LDQ PR7|77777) 777777 236(0) 1 0 0 00
DBG(2464648778839)> CPU TRACE: 00310:030714 4 616560756100 (STQ PR6|16560) 616560 756(0) 1 0 0 00
DBG(2464648778841)> CPU TRACE: 00310:030715 4 616560235100 (LDA PR6|16560) 616560 235(0) 1 0 0 00
DBG(2464648778843)> CPU TRACE: 00310:030716 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648778845)> CPU TRACE: 00310:030720 4 000033735000 (ALS 000033) 000033 735(0) 0 0 0 00
DBG(2464648778847)> CPU TRACE: 00310:030721 4 100000551140 (STBA PR1|0,F1) 100000 551(0) 1 0 2 00
DBG(2464648778849)> CPU TRACE: 00310:030722 4 777777727100 (LXL7 PR7|77777) 777777 727(0) 1 0 0 00
DBG(2464648778851)> CPU TRACE: 00310:030723 4 040140100540 (MLR PR0|40140,F1) 040140 100(1) 0 0 0 00

                                                            STATEMENT 1 ON LINE 6805
          def_pos = def_pos + size (acc);

021234  aa   000001 0760 07   adq       1,dl
021235  aa   000003 0760 07   adq       3,dl
021236  aa   000002 7320 00   qrs       2
021237  aa  6 16503 0561 00   asq       pr6|7491            def_pos
                                                            STATEMENT 1 ON LINE 6807
          def_ptr = addrel (def_base, def_pos);

021240  aa  6 16503 2361 00   ldq       pr6|7491            def_pos
021241  aa  6 16516 3535 66   epp3      pr6|7502,*ql        def_base
021242  aa   000000 0530 03   adwp3     0,du
021243  aa  6 16562 2535 00   spri3     pr6|7538            def_ptr
                                                            STATEMENT 1 ON LINE 6809
          if last_def
          then def_ptr -> definition.backward = last_def;

021244  aa  6 16542 2351 00   lda       pr6|7522            last_def
021245  aa   000004 6000 04   tze       4,ic                021251
021246  aa   000022 7710 00   arl       18
021247  aa  3 00000 5511 14   stba      pr3|0,14            definition.backward
021250  aa   000004 7100 04   tra       4,ic                021254
                                                            STATEMENT 1 ON LINE 6811
          else def_ptr -> definition.backward = zero_def;

021251  aa  6 16540 2351 00   lda       pr6|7520            zero_def
021252  aa   000022 7710 00   arl       18^L021253  aa  3 00000 5511 14   stba      pr3|0,14            definition.backward
                                                            STATEMENT 1 ON LINE 6813
          addrel (def_base, last_def) -> definition.forward = bit (def_pos, 18);

021254  aa  6 16542 2351 00   lda       pr6|7522            last_def
021255  aa  6 16516 3715 61   epp5      pr6|7502,*au        def_base
021256  aa   000000 1510 03   adwp5     0,du
021257  aa  6 16503 2351 00   lda       pr6|7491            def_pos
021260  aa   000002 6050 04   tpl       2,ic                021262
021261  aa   000000 5310 00   neg       0
021262  aa   000022 7350 00   als       18
021263  aa  5 00000 5511 60   stba      pr5|0,60            definition.forward

DBG(2464648778853)> CPU TRACE: 00310:030726 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(2464648778855)> CPU TRACE: 00310:030727 4 000003076007 (ADQ 000003,DL) 000003 076(0) 0 0 0 07
DBG(2464648778857)> CPU TRACE: 00310:030730 4 000002732000 (QRS 000002) 000002 732(0) 0 0 0 00
DBG(2464648778859)> CPU TRACE: 00310:030731 4 616503056100 (ASQ PR6|16503) 616503 056(0) 1 0 0 00
DBG(2464648778861)> CPU TRACE: 00310:030732 4 616503236100 (LDQ PR6|16503) 616503 236(0) 1 0 0 00

DBG(2464648778863)> CPU TRACE: 00310:030733 4 616516353566 (EPP3 PR6|16516,*QL) 616516 353(1) 1 0 3 06
DBG(2464648778865)> CPU TRACE: 00310:030734 4 000000053003 (ADWP3 000000,DU) 000000 053(0) 0 0 0 03
DBG(2464648778867)> CPU TRACE: 00310:030735 4 616562253500 (SPRI3 PR6|16562) 616562 253(1) 1 0 0 00
DBG(2464648778869)> CPU TRACE: 00310:030736 4 616542235100 (LDA PR6|16542) 616542 235(0) 1 0 0 00
DBG(2464648778871)> CPU TRACE: 00310:030737 4 000004600004 (TZE 000004,IC) 000004 600(0) 0 0 0 04
DBG(2464648778873)> CPU TRACE: 00310:030743 4 616540235100 (LDA PR6|16540) 616540 235(0) 1 0 0 00
DBG(2464648778875)> CPU TRACE: 00310:030744 4 000022771000 (ARL 000022) 000022 771(0) 0 0 0 00
DBG(2464648778877)> CPU TRACE: 00310:030745 4 300000551114 (STBA PR3|0,4) 300000 551(0) 1 0 0 14
DBG(2464648778879)> CPU TRACE: 00310:030746 4 616542235100 (LDA PR6|16542) 616542 235(0) 1 0 0 00
DBG(2464648778881)> CPU TRACE: 00310:030747 4 616516371561 (EPP5 PR6|16516,*AU) 616516 371(1) 1 0 3 01
DBG(2464648778883)> CPU TRACE: 00310:030750 4 000000151003 (ADWP5 000000,DU) 000000 151(0) 0 0 0 03
DBG(2464648778885)> CPU TRACE: 00310:030751 4 616503235100 (LDA PR6|16503) 616503 235(0) 1 0 0 00
DBG(2464648778887)> CPU TRACE: 00310:030752 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648778889)> CPU TRACE: 00310:030754 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648778891)> CPU TRACE: 00310:030755 4 500000551160 (STBA PR5|0,*N) 500000 551(0) 1 0 3 00

                                                            STATEMENT 1 ON LINE 6815
          def_ptr -> definition.new = "1"b;

021264  aa   400000 2350 07   lda       131072,dl
021265  aa  3 00001 2551 00   orsa      pr3|1               definition.new
                                                            STATEMENT 1 ON LINE 6816
          def_ptr -> definition.retain = "1"b;

021266  aa   040000 2350 07   lda       16384,dl
021267  aa  3 00001 2551 00   orsa      pr3|1               definition.retain
                                                            STATEMENT 1 ON LINE 6817
          def_ptr -> definition.symbol = b18;

021270  aa  6 16543 2351 00   lda       pr6|7523            b18
021271  aa  3 00002 5511 60   stba      pr3|2,60            definition.symbol
                                                            STATEMENT 1 ON LINE 6818
          def_ptr -> definition.value = value;

021272  aa  2 00006 2351 20   lda       pr2|6,*             value
021273  aa  3 00001 5511 60   stba      pr3|1,60            definition.value
                                                            STATEMENT 1 ON LINE 6820
          def_ptr -> definition.class = bit (class, 3);

021274  aa  2 00004 2351 20   lda       pr2|4,*             class
021275  aa   000002 6050 04   tpl       2,ic                021277
021276  aa   000000 5310 00   neg       0
021277  aa  0 00322 3771 00   anaq      pr0|210             = 000000000007 777777777777
021300  aa  3 00001 6751 00   era       pr3|1               definition.class
021301  aa   000007 3750 07   ana       7,dl
021302  aa  3 00001 6551 00   ersa      pr3|1               definition.class

DBG(2464648778893)> CPU TRACE: 00310:030756 4 400000235007 (LDA 400000,DL) 400000 235(0) 0 0 0 07
DBG(2464648778895)> CPU TRACE: 00310:030757 4 300001255100 (ORSA PR3|1) 300001 255(0) 1 0 0 00
DBG(2464648778897)> CPU TRACE: 00310:030760 4 040000235007 (LDA 040000,DL) 040000 235(0) 0 0 0 07
DBG(2464648778899)> CPU TRACE: 00310:030761 4 300001255100 (ORSA PR3|1) 300001 255(0) 1 0 0 00
DBG(2464648778901)> CPU TRACE: 00310:030762 4 616543235100 (LDA PR6|16543) 616543 235(0) 1 0 0 00
DBG(2464648778903)> CPU TRACE: 00310:030763 4 300002551160 (STBA PR3|2,*N) 300002 551(0) 1 0 3 00
DBG(2464648778905)> CPU TRACE: 00310:030764 4 200006235120 (LDA PR2|6,N*) 200006 235(0) 1 0 1 00
DBG(2464648778907)> CPU TRACE: 00310:030765 4 300001551160 (STBA PR3|1,*N) 300001 551(0) 1 0 3 00
DBG(2464648778909)> CPU TRACE: 00310:030766 4 200004235120 (LDA PR2|4,N*) 200004 235(0) 1 0 1 00
DBG(2464648778911)> CPU TRACE: 00310:030767 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648778913)> CPU TRACE: 00310:030771 4 000322377100 (ANAQ PR0|322) 000322 377(0) 1 0 0 00
DBG(2464648778915)> CPU TRACE: 00310:030772 4 300001675100 (ERA PR3|1) 300001 675(0) 1 0 0 00
DBG(2464648778917)> CPU TRACE: 00310:030773 4 000007375007 (ANA 000007,DL) 000007 375(0) 0 0 0 07
DBG(2464648778919)> CPU TRACE: 00310:030774 4 300001655100 (ERSA PR3|1) 300001 655(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6822
          if class = 3
          then seg_def = bit (def_pos, 18);

021303  aa  2 00004 2361 20   ldq       pr2|4,*             class
021304  aa   000003 1160 07   cmpq      3,dl
021305  aa   000007 6010 04   tnz       7,ic                021314
021306  aa  6 16503 2351 00   lda       pr6|7491            def_pos
021307  aa   000002 6050 04   tpl       2,ic                021311
021310  aa   000000 5310 00   neg       0
021311  aa   000022 7350 00   als       18
021312  aa  6 16541 7551 00   sta       pr6|7521            seg_def
021313  aa   000011 7100 04   tra       9,ic                021324

DBG(2464648778921)> CPU TRACE: 00310:030775 4 200004236120 (LDQ PR2|4,N*) 200004 236(0) 1 0 1 00
DBG(2464648778923)> CPU TRACE: 00310:030776 4 000003116007 (CMPQ 000003,DL) 000003 116(0) 0 0 0 07
DBG(2464648778925)> CPU TRACE: 00310:030777 4 000007601004 (TNZ 000007,IC) 000007 601(0) 0 0 0 04
DBG(2464648778927)> CPU TRACE: 00310:031000 4 616503235100 (LDA PR6|16503) 616503 235(0) 1 0 0 00
DBG(2464648778929)> CPU TRACE: 00310:031001 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648778931)> CPU TRACE: 00310:031003 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648778933)> CPU TRACE: 00310:031004 4 616541755100 (STA PR6|16541) 616541 755(0) 1 0 0 00
DBG(2464648778935)> CPU TRACE: 00310:031005 4 000011710004 (TRA 000011,IC) 000011 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6827
               end;

                                                            STATEMENT 1 ON LINE 6829
          last_def = bit (def_pos, 18);

021324  aa  6 16503 2351 00   lda       pr6|7491            def_pos
021325  aa   000002 6050 04   tpl       2,ic                021327
021326  aa   000000 5310 00   neg       0
021327  aa   000022 7350 00   als       18
021330  aa  6 16542 7551 00   sta       pr6|7522            last_def
                                                            STATEMENT 1 ON LINE 6830
          def_pos = def_pos + 3;

021331  aa   000003 2360 07   ldq       3,dl
021332  aa  6 16503 0561 00   asq       pr6|7491            def_pos
                                                            STATEMENT 1 ON LINE 6832
     end;

021333  aa  6 16552 6101 00   rtcd      pr6|7530

DBG(2464648778937)> CPU TRACE: 00310:031016 4 616503235100 (LDA PR6|16503) 616503 235(0) 1 0 0 00
DBG(2464648778939)> CPU TRACE: 00310:031017 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648778941)> CPU TRACE: 00310:031021 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648778943)> CPU TRACE: 00310:031022 4 616542755100 (STA PR6|16542) 616542 755(0) 1 0 0 00
DBG(2464648778945)> CPU TRACE: 00310:031023 4 000003236007 (LDQ 000003,DL) 000003 236(0) 0 0 0 07
DBG(2464648778947)> CPU TRACE: 00310:031024 4 616503056100 (ASQ PR6|16503) 616503 056(0) 1 0 0 00
DBG(2464648778947)> CPU TRACE: Add36b op1 000000000003 op2 000000000007 carryin 0 flagsToSet 740000 flags 000200 ovf 0
DBG(2464648778947)> CPU TRACE: Add36b res 000000000012 flags 000200 ovf 0
DBG(2464648778949)> CPU TRACE: 00310:031025 4 616552610100 (RTCD PR6|16552) 616552 610(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6568
          call generate_definition ("symbol_table", 2, "0"b, "0"b);

020136  aa   000014 2360 07   ldq       12,dl
020137  aa  6 17404 7561 00   stq       pr6|7940
020140  aa  040 140 100 444   mlr       (rl,ic),(pr,rl),fill(040)
020141  aa   760336 00 0006   desc9a    -7970,ql            000476 = 163171155142
020142  aa  6 17405 00 0006   desc9a    pr6|7941,ql
020143  aa   000002 2360 07   ldq       2,dl
020144  aa  6 17403 7561 00   stq       pr6|7939
020145  aa   000000 2350 07   lda       0,dl
020146  aa  6 17402 7551 00   sta       pr6|7938
020147  aa   000000 2350 07   lda       0,dl
020150  aa  6 17415 7551 00   sta       pr6|7949
020151  aa   003147 3520 04   epp2      1639,ic             023320 = 000010000000
020152  aa   001033 6700 04   tsp4      539,ic              021205

DBG(2464648778951)> CPU TRACE: 00310:027630 4 000014236007 (LDQ 000014,DL) 000014 236(0) 0 0 0 07
DBG(2464648778953)> CPU TRACE: 00310:027631 4 617400756100 (STQ PR6|17400) 617400 756(0) 1 0 0 00
DBG(2464648778955)> CPU TRACE: 00310:027632 4 040140100444 (MLR 040140,SD) 040140 100(1) 0 0 0 00
DBG(2464648778955)> CPU TRACE: MLR special case #1
DBG(2464648778957)> CPU TRACE: 00310:027635 4 000002236007 (LDQ 000002,DL) 000002 236(0) 0 0 0 07
DBG(2464648778959)> CPU TRACE: 00310:027636 4 617377756100 (STQ PR6|17377) 617377 756(0) 1 0 0 00
DBG(2464648778961)> CPU TRACE: 00310:027637 4 000000235007 (LDA 000000,DL) 000000 235(0) 0 0 0 07
DBG(2464648778963)> CPU TRACE: 00310:027640 4 617376755100 (STA PR6|17376) 617376 755(0) 1 0 0 00
DBG(2464648778965)> CPU TRACE: 00310:027641 4 000000235007 (LDA 000000,DL) 000000 235(0) 0 0 0 07
DBG(2464648778967)> CPU TRACE: 00310:027642 4 617411755100 (STA PR6|17411) 617411 755(0) 1 0 0 00
DBG(2464648778969)> CPU TRACE: 00310:027643 4 003147352004 (EPP2 003147,IC) 003147 352(0) 0 0 0 04
DBG(2464648778971)> CPU TRACE: 00310:027644 4 001033670004 (TSP4 001033,IC) 001033 670(0) 0 0 0 04

ENTRY TO generate_definition                                STATEMENT 1 ON LINE 6782
generate_definition:
     proc (name, class, value, entry_sw);

021205  aa  6 16552 6501 00   spri4     pr6|7530
021206  aa  6 16554 2521 00   spri2     pr6|7532            
                                                            STATEMENT 1 ON LINE 6798
          b18 = bit (def_pos, 18);

021207  aa  6 16503 2351 00   lda       pr6|7491            def_pos^L021210  aa   000002 6050 04   tpl       2,ic                021212
021211  aa   000000 5310 00   neg       0
021212  aa   000022 7350 00   als       18
021213  aa  6 16543 7551 00   sta       pr6|7523            b18
                                                            STATEMENT 1 ON LINE 6799
          q = addrel (def_base, def_pos);

021214  aa  6 16503 2361 00   ldq       pr6|7491            def_pos
021215  aa  6 16516 3515 66   epp1      pr6|7502,*ql        def_base
021216  aa   000000 0510 03   adwp1     0,du
021217  aa  6 16564 2515 00   spri1     pr6|7540            q

DBG(2464648778973)> CPU TRACE: 00310:030677 4 616552650100 (SPRI4 PR6|16552) 616552 650(0) 1 0 0 00
DBG(2464648778975)> CPU TRACE: 00310:030700 4 616554252100 (SPRI2 PR6|16554) 616554 252(0) 1 0 0 00
DBG(2464648778977)> CPU TRACE: 00310:030701 4 616503235100 (LDA PR6|16503) 616503 235(0) 1 0 0 00
DBG(2464648778979)> CPU TRACE: 00310:030702 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648778981)> CPU TRACE: 00310:030704 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648778983)> CPU TRACE: 00310:030705 4 616543755100 (STA PR6|16543) 616543 755(0) 1 0 0 00
DBG(2464648778985)> CPU TRACE: 00310:030706 4 616503236100 (LDQ PR6|16503) 616503 236(0) 1 0 0 00
DBG(2464648778987)> CPU TRACE: 00310:030707 4 616516351566 (EPP1 PR6|16516,*QL) 616516 351(1) 1 0 3 06
DBG(2464648778989)> CPU TRACE: 00310:030710 4 000000051003 (ADWP1 000000,DU) 000000 051(0) 0 0 0 03
DBG(2464648778991)> CPU TRACE: 00310:030711 4 616564251500 (SPRI1 PR6|16564) 616564 251(1) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6801
          n = length (name);

021220  aa  2 00002 3735 20   epp7      pr2|2,*
021221  aa  7 77777 2361 00   ldq       pr7|-1              name
021222  aa  6 16560 7561 00   stq       pr6|7536            n
                                                            STATEMENT 1 ON LINE 6802
          q -> acc.count = bit (n, 9);

021223  aa  6 16560 2351 00   lda       pr6|7536            n
021224  aa   000002 6050 04   tpl       2,ic                021226
021225  aa   000000 5310 00   neg       0
021226  aa   000033 7350 00   als       27
021227  aa  1 00000 5511 40   stba      pr1|0,40            acc.count

DBG(2464648778993)> CPU TRACE: 00310:030712 4 200002373520 (EPP7 PR2|2,N*) 200002 373(1) 1 0 1 00
DBG(2464648778995)> CPU TRACE: 00310:030713 4 777777236100 (LDQ PR7|77777) 777777 236(0) 1 0 0 00
DBG(2464648778997)> CPU TRACE: 00310:030714 4 616560756100 (STQ PR6|16560) 616560 756(0) 1 0 0 00
DBG(2464648778999)> CPU TRACE: 00310:030715 4 616560235100 (LDA PR6|16560) 616560 235(0) 1 0 0 00
DBG(2464648779001)> CPU TRACE: 00310:030716 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648779003)> CPU TRACE: 00310:030720 4 000033735000 (ALS 000033) 000033 735(0) 0 0 0 00
DBG(2464648779005)> CPU TRACE: 00310:030721 4 100000551140 (STBA PR1|0,F1) 100000 551(0) 1 0 2 00

                                                            STATEMENT 1 ON LINE 6803
          q -> acc.str = name;

021230  aa  7 77777 7271 00   lxl7      pr7|-1              name
021231  aa  040 140 100 540   mlr       (pr,rl),(pr,rl),fill(040)
021232  aa  7 00000 00 0017   desc9a    pr7|0,x7            name
021233  aa  1 00000 20 0006   desc9a    pr1|0(1),ql         acc.str
                                                            STATEMENT 1 ON LINE 6805
          def_pos = def_pos + size (acc);

021234  aa   000001 0760 07   adq       1,dl
021235  aa   000003 0760 07   adq       3,dl
021236  aa   000002 7320 00   qrs       2
021237  aa  6 16503 0561 00   asq       pr6|7491            def_pos

DBG(2464648779007)> CPU TRACE: 00310:030722 4 777777727100 (LXL7 PR7|77777) 777777 727(0) 1 0 0 00
DBG(2464648779009)> CPU TRACE: 00310:030723 4 040140100540 (MLR PR0|40140,F1) 040140 100(1) 0 0 0 00
DBG(2464648779011)> CPU TRACE: 00310:030726 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(2464648779011)> CPU TRACE: Add36b op1 000000000014 op2 000000000001 carryin 0 flagsToSet 740000 flags 000200 ovf 0
DBG(2464648779011)> CPU TRACE: Add36b res 000000000015 flags 000200 ovf 0
DBG(2464648779013)> CPU TRACE: 00310:030727 4 000003076007 (ADQ 000003,DL) 000003 076(0) 0 0 0 07
DBG(2464648779013)> CPU TRACE: Add36b op1 000000000015 op2 000000000003 carryin 0 flagsToSet 740000 flags 000200 ovf 0
DBG(2464648779013)> CPU TRACE: Add36b res 000000000020 flags 000200 ovf 0
DBG(2464648779015)> CPU TRACE: 00310:030730 4 000002732000 (QRS 000002) 000002 732(0) 0 0 0 00
DBG(2464648779017)> CPU TRACE: 00310:030731 4 616503056100 (ASQ PR6|16503) 616503 056(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6807
          def_ptr = addrel (def_base, def_pos);

021240  aa  6 16503 2361 00   ldq       pr6|7491            def_pos
021241  aa  6 16516 3535 66   epp3      pr6|7502,*ql        def_base
021242  aa   000000 0530 03   adwp3     0,du
021243  aa  6 16562 2535 00   spri3     pr6|7538            def_ptr
                                                            STATEMENT 1 ON LINE 6809
          if last_def
          then def_ptr -> definition.backward = last_def;

021244  aa  6 16542 2351 00   lda       pr6|7522            last_def
021245  aa   000004 6000 04   tze       4,ic                021251
021246  aa   000022 7710 00   arl       18
021247  aa  3 00000 5511 14   stba      pr3|0,14            definition.backward
021250  aa   000004 7100 04   tra       4,ic                021254

DBG(2464648779019)> CPU TRACE: 00310:030732 4 616503236100 (LDQ PR6|16503) 616503 236(0) 1 0 0 00
DBG(2464648779021)> CPU TRACE: 00310:030733 4 616516353566 (EPP3 PR6|16516,*QL) 616516 353(1) 1 0 3 06
DBG(2464648779023)> CPU TRACE: 00310:030734 4 000000053003 (ADWP3 000000,DU) 000000 053(0) 0 0 0 03
DBG(2464648779025)> CPU TRACE: 00310:030735 4 616562253500 (SPRI3 PR6|16562) 616562 253(1) 1 0 0 00
DBG(2464648779027)> CPU TRACE: 00310:030736 4 616542235100 (LDA PR6|16542) 616542 235(0) 1 0 0 00
DBG(2464648779029)> CPU TRACE: 00310:030737 4 000004600004 (TZE 000004,IC) 000004 600(0) 0 0 0 04
DBG(2464648779031)> CPU TRACE: 00310:030740 4 000022771000 (ARL 000022) 000022 771(0) 0 0 0 00
DBG(2464648779033)> CPU TRACE: 00310:030741 4 300000551114 (STBA PR3|0,4) 300000 551(0) 1 0 0 14
DBG(2464648779035)> CPU TRACE: 00310:030742 4 000004710004 (TRA 000004,IC) 000004 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6813
          addrel (def_base, last_def) -> definition.forward = bit (def_pos, 18);

021254  aa  6 16542 2351 00   lda       pr6|7522            last_def
021255  aa  6 16516 3715 61   epp5      pr6|7502,*au        def_base
021256  aa   000000 1510 03   adwp5     0,du
021257  aa  6 16503 2351 00   lda       pr6|7491            def_pos
021260  aa   000002 6050 04   tpl       2,ic                021262
021261  aa   000000 5310 00   neg       0
021262  aa   000022 7350 00   als       18
021263  aa  5 00000 5511 60   stba      pr5|0,60            definition.forward

DBG(2464648779037)> CPU TRACE: 00310:030746 4 616542235100 (LDA PR6|16542) 616542 235(0) 1 0 0 00
DBG(2464648779039)> CPU TRACE: 00310:030747 4 616516371561 (EPP5 PR6|16516,*AU) 616516 371(1) 1 0 3 01
DBG(2464648779041)> CPU TRACE: 00310:030750 4 000000151003 (ADWP5 000000,DU) 000000 151(0) 0 0 0 03
DBG(2464648779043)> CPU TRACE: 00310:030751 4 616503235100 (LDA PR6|16503) 616503 235(0) 1 0 0 00
DBG(2464648779045)> CPU TRACE: 00310:030752 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648779047)> CPU TRACE: 00310:030754 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648779049)> CPU TRACE: 00310:030755 4 500000551160 (STBA PR5|0,*N) 500000 551(0) 1 0 3 00
DBG(2464648779051)> CPU TRACE: 00310:030756 4 400000235007 (LDA 400000,DL) 400000 235(0) 0 0 0 07

                                                            STATEMENT 1 ON LINE 6815
          def_ptr -> definition.new = "1"b;

021264  aa   400000 2350 07   lda       131072,dl
021265  aa  3 00001 2551 00   orsa      pr3|1               definition.new
                                                            STATEMENT 1 ON LINE 6816
          def_ptr -> definition.retain = "1"b;

021266  aa   040000 2350 07   lda       16384,dl
021267  aa  3 00001 2551 00   orsa      pr3|1               definition.retain
                                                            STATEMENT 1 ON LINE 6817
          def_ptr -> definition.symbol = b18;

021270  aa  6 16543 2351 00   lda       pr6|7523            b18
021271  aa  3 00002 5511 60   stba      pr3|2,60            definition.symbol
                                                            STATEMENT 1 ON LINE 6818
          def_ptr -> definition.value = value;

021272  aa  2 00006 2351 20   lda       pr2|6,*             value
021273  aa  3 00001 5511 60   stba      pr3|1,60            definition.value

DBG(2464648779051)> CPU TRACE: 00310:030756 4 400000235007 (LDA 400000,DL) 400000 235(0) 0 0 0 07
DBG(2464648779053)> CPU TRACE: 00310:030757 4 300001255100 (ORSA PR3|1) 300001 255(0) 1 0 0 00
DBG(2464648779055)> CPU TRACE: 00310:030760 4 040000235007 (LDA 040000,DL) 040000 235(0) 0 0 0 07
DBG(2464648779057)> CPU TRACE: 00310:030761 4 300001255100 (ORSA PR3|1) 300001 255(0) 1 0 0 00
DBG(2464648779059)> CPU TRACE: 00310:030762 4 616543235100 (LDA PR6|16543) 616543 235(0) 1 0 0 00
DBG(2464648779061)> CPU TRACE: 00310:030763 4 300002551160 (STBA PR3|2,*N) 300002 551(0) 1 0 3 00
DBG(2464648779063)> CPU TRACE: 00310:030764 4 200006235120 (LDA PR2|6,N*) 200006 235(0) 1 0 1 00
DBG(2464648779065)> CPU TRACE: 00310:030765 4 300001551160 (STBA PR3|1,*N) 300001 551(0) 1 0 3 00

basic_.list [+]                                                                                                                            26947,65       91%
                                                            STATEMENT 1 ON LINE 6820
          def_ptr -> definition.class = bit (class, 3);

021274  aa  2 00004 2351 20   lda       pr2|4,*             class
021275  aa   000002 6050 04   tpl       2,ic                021277
021276  aa   000000 5310 00   neg       0
021277  aa  0 00322 3771 00   anaq      pr0|210             = 000000000007 777777777777
021300  aa  3 00001 6751 00   era       pr3|1               definition.class
021301  aa   000007 3750 07   ana       7,dl
021302  aa  3 00001 6551 00   ersa      pr3|1               definition.class

DBG(2464648779067)> CPU TRACE: 00310:030766 4 200004235120 (LDA PR2|4,N*) 200004 235(0) 1 0 1 00
DBG(2464648779069)> CPU TRACE: 00310:030767 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648779071)> CPU TRACE: 00310:030771 4 000322377100 (ANAQ PR0|322) 000322 377(0) 1 0 0 00
DBG(2464648779073)> CPU TRACE: 00310:030772 4 300001675100 (ERA PR3|1) 300001 675(0) 1 0 0 00
DBG(2464648779075)> CPU TRACE: 00310:030773 4 000007375007 (ANA 000007,DL) 000007 375(0) 0 0 0 07
DBG(2464648779077)> CPU TRACE: 00310:030774 4 300001655100 (ERSA PR3|1) 300001 655(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6822
          if class = 3
          then seg_def = bit (def_pos, 18);

021303  aa  2 00004 2361 20   ldq       pr2|4,*             class
021304  aa   000003 1160 07   cmpq      3,dl
021305  aa   000007 6010 04   tnz       7,ic                021314
021306  aa  6 16503 2351 00   lda       pr6|7491            def_pos
021307  aa   000002 6050 04   tpl       2,ic                021311
021310  aa   000000 5310 00   neg       0
021311  aa   000022 7350 00   als       18
021312  aa  6 16541 7551 00   sta       pr6|7521            seg_def
021313  aa   000011 7100 04   tra       9,ic                021324

DBG(2464648779079)> CPU TRACE: 00310:030775 4 200004236120 (LDQ PR2|4,N*) 200004 236(0) 1 0 1 00
DBG(2464648779081)> CPU TRACE: 00310:030776 4 000003116007 (CMPQ 000003,DL) 000003 116(0) 0 0 0 07
DBG(2464648779083)> CPU TRACE: 00310:030777 4 000007601004 (TNZ 000007,IC) 000007 601(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6825
                    def_ptr -> definition.segname = seg_def;

021314  aa  6 16541 2351 00   lda       pr6|7521            seg_def
021315  aa   000022 7710 00   arl       18
021316  aa  3 00002 5511 14   stba      pr3|2,14            definition.segname
                                                            STATEMENT 1 ON LINE 6826
                    def_ptr -> definition.entry = entry_sw;

021317  aa  2 00010 2351 20   lda       pr2|8,*             entry_sw
021320  aa   000024 7710 00   arl       20
021321  aa  3 00001 6751 00   era       pr3|1               definition.entry
021322  aa   100000 3750 07   ana       32768,dl
021323  aa  3 00001 6551 00   ersa      pr3|1               definition.entry

DBG(2464648779085)> CPU TRACE: 00310:031006 4 616541235100 (LDA PR6|16541) 616541 235(0) 1 0 0 00
DBG(2464648779087)> CPU TRACE: 00310:031007 4 000022771000 (ARL 000022) 000022 771(0) 0 0 0 00
DBG(2464648779089)> CPU TRACE: 00310:031010 4 300002551114 (STBA PR3|2,4) 300002 551(0) 1 0 0 14
DBG(2464648779091)> CPU TRACE: 00310:031011 4 200010235120 (LDA PR2|10,N*) 200010 235(0) 1 0 1 00
DBG(2464648779093)> CPU TRACE: 00310:031012 4 000024771000 (ARL 000024) 000024 771(0) 0 0 0 00
DBG(2464648779095)> CPU TRACE: 00310:031013 4 300001675100 (ERA PR3|1) 300001 675(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6829
          last_def = bit (def_pos, 18);

021324  aa  6 16503 2351 00   lda       pr6|7491            def_pos
021325  aa   000002 6050 04   tpl       2,ic                021327
021326  aa   000000 5310 00   neg       0
021327  aa   000022 7350 00   als       18
021330  aa  6 16542 7551 00   sta       pr6|7522            last_def
                                                            STATEMENT 1 ON LINE 6830
          def_pos = def_pos + 3;

021331  aa   000003 2360 07   ldq       3,dl
021332  aa  6 16503 0561 00   asq       pr6|7491            def_pos
                                                            STATEMENT 1 ON LINE 6832
     end;

021333  aa  6 16552 6101 00   rtcd      pr6|7530

DBG(2464648779097)> CPU TRACE: 00310:031014 4 100000375007 (ANA 100000,DL) 100000 375(0) 0 0 0 07
DBG(2464648779099)> CPU TRACE: 00310:031015 4 300001655100 (ERSA PR3|1) 300001 655(0) 1 0 0 00
DBG(2464648779101)> CPU TRACE: 00310:031016 4 616503235100 (LDA PR6|16503) 616503 235(0) 1 0 0 00
DBG(2464648779103)> CPU TRACE: 00310:031017 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648779105)> CPU TRACE: 00310:031021 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648779107)> CPU TRACE: 00310:031022 4 616542755100 (STA PR6|16542) 616542 755(0) 1 0 0 00
DBG(2464648779109)> CPU TRACE: 00310:031023 4 000003236007 (LDQ 000003,DL) 000003 236(0) 0 0 0 07
DBG(2464648779111)> CPU TRACE: 00310:031024 4 616503056100 (ASQ PR6|16503) 616503 056(0) 1 0 0 00
DBG(2464648779111)> CPU TRACE: Add36b op1 000000000003 op2 000000000016 carryin 0 flagsToSet 740000 flags 000200 ovf 0
DBG(2464648779111)> CPU TRACE: Add36b res 000000000021 flags 000200 ovf 0
DBG(2464648779113)> CPU TRACE: 00310:031025 4 616552610100 (RTCD PR6|16552) 616552 610(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6570
          addrel (def_base, seg_def) -> definition.segname = last_def;

020153  aa  6 16541 2351 00   lda       pr6|7521            seg_def
020154  aa  6 16516 3521 61   epp2      pr6|7502,*au        def_base
020155  aa   000000 0520 03   adwp2     0,du
020156  aa  6 16542 2351 00   lda       pr6|7522            last_def
020157  aa   000022 7710 00   arl       18
020160  aa  2 00002 5511 14   stba      pr2|2,14            definition.segname

DBG(2464648779115)> CPU TRACE: 00310:027645 4 616541235100 (LDA PR6|16541) 616541 235(0) 1 0 0 00
DBG(2464648779117)> CPU TRACE: 00310:027646 4 616516352161 (EPP2 PR6|16516,*AU) 616516 352(0) 1 0 3 01
DBG(2464648779119)> CPU TRACE: 00310:027647 4 000000052003 (ADWP2 000000,DU) 000000 052(0) 0 0 0 03
DBG(2464648779121)> CPU TRACE: 00310:027650 4 616542235100 (LDA PR6|16542) 616542 235(0) 1 0 0 00
DBG(2464648779123)> CPU TRACE: 00310:027651 4 000022771000 (ARL 000022) 000022 771(0) 0 0 0 00
DBG(2464648779125)> CPU TRACE: 00310:027652 4 200002551114 (STBA PR2|2,4) 200002 551(0) 1 0 0 14

                                                            STATEMENT 1 ON LINE 6572
          if lib_list_pt ^= null
          then call generate_definition ("library_list_", 0, rel (lib_list_pt), "0"b);

020161  aa  6 16526 2371 00   ldaq      pr6|7510            lib_list_pt
020162  aa   760306 6770 04   eraq      -7994,ic            000470 = 077777000043 000001000000
020163  aa  0 00460 3771 00   anaq      pr0|304             = 077777000077 777777077077
020164  aa   000015 6000 04   tze       13,ic               020201
020165  aa   000015 2360 07   ldq       13,dl
020166  aa  6 17404 7561 00   stq       pr6|7940
020167  aa  040 140 100 444   mlr       (rl,ic),(pr,rl),fill(040)
020170  aa   760324 00 0006   desc9a    -7980,ql            000513 = 154151142162
020171  aa  6 17405 00 0006   desc9a    pr6|7941,ql
020172  aa  6 17415 4501 00   stz       pr6|7949
020173  aa  6 16526 6351 20   eaa       pr6|7510,*          lib_list_pt
020174  aa  6 17402 7551 00   sta       pr6|7938^L020175  aa   000000 2350 07   lda       0,dl
020176  aa  6 17403 7551 00   sta       pr6|7939
020177  aa   003107 3520 04   epp2      1607,ic             023306 = 000010000000
020200  aa   001005 6700 04   tsp4      517,ic              021205

DBG(2464648779127)> CPU TRACE: 00310:027653 4 616526237100 (LDAQ PR6|16526) 616526 237(0) 1 0 0 00
DBG(2464648779129)> CPU TRACE: 00310:027654 4 760330677004 (ERAQ 760330,IC) 760330 677(0) 0 0 0 04
DBG(2464648779131)> CPU TRACE: 00310:027655 4 000460377100 (ANAQ PR0|460) 000460 377(0) 1 0 0 00
DBG(2464648779133)> CPU TRACE: 00310:027656 4 000015600004 (TZE 000015,IC) 000015 600(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6578
          do j = 1 to program_number;

020201  aa  6 00207 2361 00   ldq       pr6|135             program_number
020202  aa  6 16545 7561 00   stq       pr6|7525
020203  aa   000001 2360 07   ldq       1,dl
020204  aa  6 16510 7561 00   stq       pr6|7496            j
020205  aa   000000 0110 03   nop       0,du
020206  aa  6 16510 2361 00   ldq       pr6|7496            j
020207  aa  6 16545 1161 00   cmpq      pr6|7525
020210  aa   000073 6054 04   tpnz      59,ic               020303

DBG(2464648779135)> CPU TRACE: 00310:027673 4 600207236100 (LDQ PR6|207) 600207 236(0) 1 0 0 00
DBG(2464648779137)> CPU TRACE: 00310:027674 4 616545756100 (STQ PR6|16545) 616545 756(0) 1 0 0 00
DBG(2464648779139)> CPU TRACE: 00310:027675 4 000001236007 (LDQ 000001,DL) 000001 236(0) 0 0 0 07
DBG(2464648779141)> CPU TRACE: 00310:027676 4 616510756100 (STQ PR6|16510) 616510 756(0) 1 0 0 00
DBG(2464648779143)> CPU TRACE: 00310:027677 4 000000011003 (NOP 000000,DU) 000000 011(0) 0 0 0 03
DBG(2464648779145)> CPU TRACE: 00310:027700 4 616510236100 (LDQ PR6|16510) 616510 236(0) 1 0 0 00
DBG(2464648779147)> CPU TRACE: 00310:027701 4 616545116100 (CMPQ PR6|16545) 616545 116(0) 1 0 0 00
DBG(2464648779149)> CPU TRACE: 00310:027702 4 000073605404 (TPNZ 000073,IC) 000073 605(1) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6579
               p = addr (subprogram.name (j));

020211  aa   000013 4020 07   mpy       11,dl
020212  aa  6 01541 3735 06   epp7      pr6|865,ql          subprogram.name
020213  aa  6 16524 6535 00   spri7     pr6|7508            p
                                                            STATEMENT 1 ON LINE 6581
               if length (p -> based_vs) = 0
               then p = addr (seg_name);

020214  aa  6 17403 7561 00   stq       pr6|7939
020215  aa  7 00000 2361 00   ldq       pr7|0               based_vs
020216  aa   000003 6010 04   tnz       3,ic                020221
020217  aa  6 01376 3715 00   epp5      pr6|766             seg_name
020220  aa  6 16524 6515 00   spri5     pr6|7508            p
                                                            STATEMENT 1 ON LINE 6584
               call generate_definition (p -> based_vs, 0, bit (fixed (subprogram.entry_pos (j) + 1, 18), 18), "1"b);

020221  aa  6 17402 4501 00   stz       pr6|7938
020222  aa  6 17403 7271 00   lxl7      pr6|7939
020223  aa  6 01553 2361 17   ldq       pr6|875,7           subprogram.entry_pos
020224  aa   000001 0760 07   adq       1,dl
020225  aa   000003 6050 04   tpl       3,ic                020230
020226  aa  0 00110 6761 00   erq       pr0|72              = 777777777777
020227  aa   000001 0760 07   adq       1,dl
020230  aa   000066 7370 00   lls       54
020231  aa  6 17415 7551 00   sta       pr6|7949
020232  aa   400000 2350 03   lda       131072,du
020233  aa  6 17403 7551 00   sta       pr6|7939
020234  aa  6 16524 3735 20   epp7      pr6|7508,*          p
020235  aa  7 00001 3521 00   epp2      pr7|1               based_vs
020236  aa  6 17420 2521 00   spri2     pr6|7952
020237  aa  6 17402 3521 00   epp2      pr6|7938
020240  aa  6 17422 2521 00   spri2     pr6|7954
020241  aa  6 17415 3521 00   epp2      pr6|7949
020242  aa  6 17424 2521 00   spri2     pr6|7956
020243  aa  6 17403 3521 00   epp2      pr6|7939
020244  aa  6 17426 2521 00   spri2     pr6|7958
020245  aa  6 17416 3521 00   epp2      pr6|7950
020246  aa   020000 4310 07   fld       8192,dl
020247  aa  2 00000 7571 00   staq      pr2|0
020250  aa   000735 6700 04   tsp4      477,ic              021205

DBG(2464648779151)> CPU TRACE: 00310:027703 4 000013402007 (MPY 000013,DL) 000013 402(0) 0 0 0 07
DBG(2464648779153)> CPU TRACE: 00310:027704 4 601541373506 (EPP7 PR6|1541,QL) 601541 373(1) 1 0 0 06
DBG(2464648779155)> CPU TRACE: 00310:027705 4 616524653500 (SPRI7 PR6|16524) 616524 653(1) 1 0 0 00
DBG(2464648779157)> CPU TRACE: 00310:027706 4 617377756100 (STQ PR6|17377) 617377 756(0) 1 0 0 00
DBG(2464648779159)> CPU TRACE: 00310:027707 4 700000236100 (LDQ PR7|0) 700000 236(0) 1 0 0 00
DBG(2464648779161)> CPU TRACE: 00310:027710 4 000003601004 (TNZ 000003,IC) 000003 601(0) 0 0 0 04
DBG(2464648779163)> CPU TRACE: 00310:027711 4 601376371500 (EPP5 PR6|1376) 601376 371(1) 1 0 0 00
DBG(2464648779165)> CPU TRACE: 00310:027712 4 616524651500 (SPRI5 PR6|16524) 616524 651(1) 1 0 0 00
DBG(2464648779167)> CPU TRACE: 00310:027713 4 617376450100 (STZ PR6|17376) 617376 450(0) 1 0 0 00
DBG(2464648779169)> CPU TRACE: 00310:027714 4 617377727100 (LXL7 PR6|17377) 617377 727(0) 1 0 0 00
DBG(2464648779171)> CPU TRACE: 00310:027715 4 601553236117 (LDQ PR6|1553,7) 601553 236(0) 1 0 0 17
DBG(2464648779173)> CPU TRACE: 00310:027716 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(2464648779173)> CPU TRACE: Add36b op1 000000000016 op2 000000000001 carryin 0 flagsToSet 740000 flags 100200 ovf 0
DBG(2464648779173)> CPU TRACE: Add36b res 000000000017 flags 000200 ovf 0
DBG(2464648779175)> CPU TRACE: 00310:027717 4 000003605004 (TPL 000003,IC) 000003 605(0) 0 0 0 04
DBG(2464648779177)> CPU TRACE: 00310:027722 4 000066737000 (LLS 000066) 000066 737(0) 0 0 0 00
DBG(2464648779179)> CPU TRACE: 00310:027723 4 617411755100 (STA PR6|17411) 617411 755(0) 1 0 0 00
DBG(2464648779181)> CPU TRACE: 00310:027724 4 400000235003 (LDA 400000,DU) 400000 235(0) 0 0 0 03
DBG(2464648779183)> CPU TRACE: 00310:027725 4 617377755100 (STA PR6|17377) 617377 755(0) 1 0 0 00
DBG(2464648779185)> CPU TRACE: 00310:027726 4 616524373520 (EPP7 PR6|16524,N*) 616524 373(1) 1 0 1 00
DBG(2464648779187)> CPU TRACE: 00310:027727 4 700001352100 (EPP2 PR7|1) 700001 352(0) 1 0 0 00
DBG(2464648779189)> CPU TRACE: 00310:027730 4 617414252100 (SPRI2 PR6|17414) 617414 252(0) 1 0 0 00
DBG(2464648779191)> CPU TRACE: 00310:027731 4 617376352100 (EPP2 PR6|17376) 617376 352(0) 1 0 0 00
DBG(2464648779193)> CPU TRACE: 00310:027732 4 617416252100 (SPRI2 PR6|17416) 617416 252(0) 1 0 0 00
DBG(2464648779195)> CPU TRACE: 00310:027733 4 617411352100 (EPP2 PR6|17411) 617411 352(0) 1 0 0 00
DBG(2464648779197)> CPU TRACE: 00310:027734 4 617420252100 (SPRI2 PR6|17420) 617420 252(0) 1 0 0 00
DBG(2464648779199)> CPU TRACE: 00310:027735 4 617377352100 (EPP2 PR6|17377) 617377 352(0) 1 0 0 00
DBG(2464648779201)> CPU TRACE: 00310:027736 4 617422252100 (SPRI2 PR6|17422) 617422 252(0) 1 0 0 00
DBG(2464648779203)> CPU TRACE: 00310:027737 4 617412352100 (EPP2 PR6|17412) 617412 352(0) 1 0 0 00
DBG(2464648779205)> CPU TRACE: 00310:027740 4 020000431007 (FLD 020000,DL) 020000 431(0) 0 0 0 07
DBG(2464648779207)> CPU TRACE: 00310:027741 4 200000757100 (STAQ PR2|0) 200000 757(0) 1 0 0 00
DBG(2464648779209)> CPU TRACE: 00310:027742 4 000735670004 (TSP4 000735,IC) 000735 670(0) 0 0 0 04

ENTRY TO generate_definition                                STATEMENT 1 ON LINE 6782
generate_definition:
     proc (name, class, value, entry_sw);

021205  aa  6 16552 6501 00   spri4     pr6|7530
021206  aa  6 16554 2521 00   spri2     pr6|7532
                                                            STATEMENT 1 ON LINE 6798
          b18 = bit (def_pos, 18);

021207  aa  6 16503 2351 00   lda       pr6|7491            def_pos^L021210  aa   000002 6050 04   tpl       2,ic                021212
021211  aa   000000 5310 00   neg       0
021212  aa   000022 7350 00   als       18
021213  aa  6 16543 7551 00   sta       pr6|7523            b18
                                                            STATEMENT 1 ON LINE 6799
          q = addrel (def_base, def_pos);    

021214  aa  6 16503 2361 00   ldq       pr6|7491            def_pos
021215  aa  6 16516 3515 66   epp1      pr6|7502,*ql        def_base
021216  aa   000000 0510 03   adwp1     0,du
021217  aa  6 16564 2515 00   spri1     pr6|7540            q

DBG(2464648779211)> CPU TRACE: 00310:030677 4 616552650100 (SPRI4 PR6|16552) 616552 650(0) 1 0 0 00
DBG(2464648779213)> CPU TRACE: 00310:030700 4 616554252100 (SPRI2 PR6|16554) 616554 252(0) 1 0 0 00
DBG(2464648779215)> CPU TRACE: 00310:030701 4 616503235100 (LDA PR6|16503) 616503 235(0) 1 0 0 00
DBG(2464648779217)> CPU TRACE: 00310:030702 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648779219)> CPU TRACE: 00310:030704 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648779221)> CPU TRACE: 00310:030705 4 616543755100 (STA PR6|16543) 616543 755(0) 1 0 0 00
DBG(2464648779223)> CPU TRACE: 00310:030706 4 616503236100 (LDQ PR6|16503) 616503 236(0) 1 0 0 00
DBG(2464648779225)> CPU TRACE: 00310:030707 4 616516351566 (EPP1 PR6|16516,*QL) 616516 351(1) 1 0 3 06
DBG(2464648779227)> CPU TRACE: 00310:030710 4 000000051003 (ADWP1 000000,DU) 000000 051(0) 0 0 0 03
DBG(2464648779229)> CPU TRACE: 00310:030711 4 616564251500 (SPRI1 PR6|16564) 616564 251(1) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6801
          n = length (name);

021220  aa  2 00002 3735 20   epp7      pr2|2,*
021221  aa  7 77777 2361 00   ldq       pr7|-1              name
021222  aa  6 16560 7561 00   stq       pr6|7536            n
                                                            STATEMENT 1 ON LINE 6802
          q -> acc.count = bit (n, 9);

021223  aa  6 16560 2351 00   lda       pr6|7536            n
021224  aa   000002 6050 04   tpl       2,ic                021226
021225  aa   000000 5310 00   neg       0
021226  aa   000033 7350 00   als       27
021227  aa  1 00000 5511 40   stba      pr1|0,40            acc.count

DBG(2464648779231)> CPU TRACE: 00310:030712 4 200002373520 (EPP7 PR2|2,N*) 200002 373(1) 1 0 1 00
DBG(2464648779233)> CPU TRACE: 00310:030713 4 777777236100 (LDQ PR7|77777) 777777 236(0) 1 0 0 00
DBG(2464648779235)> CPU TRACE: 00310:030714 4 616560756100 (STQ PR6|16560) 616560 756(0) 1 0 0 00
DBG(2464648779237)> CPU TRACE: 00310:030715 4 616560235100 (LDA PR6|16560) 616560 235(0) 1 0 0 00
DBG(2464648779239)> CPU TRACE: 00310:030716 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648779241)> CPU TRACE: 00310:030720 4 000033735000 (ALS 000033) 000033 735(0) 0 0 0 00
DBG(2464648779243)> CPU TRACE: 00310:030721 4 100000551140 (STBA PR1|0,F1) 100000 551(0) 1 0 2 00

                                                            STATEMENT 1 ON LINE 6803
          q -> acc.str = name;

021230  aa  7 77777 7271 00   lxl7      pr7|-1              name
021231  aa  040 140 100 540   mlr       (pr,rl),(pr,rl),fill(040)
021232  aa  7 00000 00 0017   desc9a    pr7|0,x7            name
021233  aa  1 00000 20 0006   desc9a    pr1|0(1),ql         acc.str
                                                            STATEMENT 1 ON LINE 6805
          def_pos = def_pos + size (acc);

021234  aa   000001 0760 07   adq       1,dl
021235  aa   000003 0760 07   adq       3,dl
021236  aa   000002 7320 00   qrs       2
021237  aa  6 16503 0561 00   asq       pr6|7491            def_pos

DBG(2464648779245)> CPU TRACE: 00310:030722 4 777777727100 (LXL7 PR7|77777) 777777 727(0) 1 0 0 00
DBG(2464648779247)> CPU TRACE: 00310:030723 4 040140100540 (MLR PR0|40140,F1) 040140 100(1) 0 0 0 00
DBG(2464648779249)> CPU TRACE: 00310:030726 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(2464648779249)> CPU TRACE: Add36b op1 000000000016 op2 000000000001 carryin 0 flagsToSet 740000 flags 000200 ovf 0
DBG(2464648779249)> CPU TRACE: Add36b res 000000000017 flags 000200 ovf 0
DBG(2464648779251)> CPU TRACE: 00310:030727 4 000003076007 (ADQ 000003,DL) 000003 076(0) 0 0 0 07
DBG(2464648779251)> CPU TRACE: Add36b op1 000000000017 op2 000000000003 carryin 0 flagsToSet 740000 flags 000200 ovf 0
DBG(2464648779251)> CPU TRACE: Add36b res 000000000022 flags 000200 ovf 0
DBG(2464648779253)> CPU TRACE: 00310:030730 4 000002732000 (QRS 000002) 000002 732(0) 0 0 0 00
DBG(2464648779255)> CPU TRACE: 00310:030731 4 616503056100 (ASQ PR6|16503) 616503 056(0) 1 0 0 00

                                                           STATEMENT 1 ON LINE 6807
          def_ptr = addrel (def_base, def_pos);

021240  aa  6 16503 2361 00   ldq       pr6|7491            def_pos
021241  aa  6 16516 3535 66   epp3      pr6|7502,*ql        def_base
021242  aa   000000 0530 03   adwp3     0,du
021243  aa  6 16562 2535 00   spri3     pr6|7538            def_ptr
                                                            STATEMENT 1 ON LINE 6809
          if last_def
          then def_ptr -> definition.backward = last_def;

021244  aa  6 16542 2351 00   lda       pr6|7522            last_def
021245  aa   000004 6000 04   tze       4,ic                021251
021246  aa   000022 7710 00   arl       18
021247  aa  3 00000 5511 14   stba      pr3|0,14            definition.backward
021250  aa   000004 7100 04   tra       4,ic                021254

DBG(2464648779257)> CPU TRACE: 00310:030732 4 616503236100 (LDQ PR6|16503) 616503 236(0) 1 0 0 00
DBG(2464648779259)> CPU TRACE: 00310:030733 4 616516353566 (EPP3 PR6|16516,*QL) 616516 353(1) 1 0 3 06
DBG(2464648779261)> CPU TRACE: 00310:030734 4 000000053003 (ADWP3 000000,DU) 000000 053(0) 0 0 0 03
DBG(2464648779263)> CPU TRACE: 00310:030735 4 616562253500 (SPRI3 PR6|16562) 616562 253(1) 1 0 0 00
DBG(2464648779265)> CPU TRACE: 00310:030736 4 616542235100 (LDA PR6|16542) 616542 235(0) 1 0 0 00
DBG(2464648779267)> CPU TRACE: 00310:030737 4 000004600004 (TZE 000004,IC) 000004 600(0) 0 0 0 04
DBG(2464648779269)> CPU TRACE: 00310:030740 4 000022771000 (ARL 000022) 000022 771(0) 0 0 0 00
DBG(2464648779271)> CPU TRACE: 00310:030741 4 300000551114 (STBA PR3|0,4) 300000 551(0) 1 0 0 14
DBG(2464648779273)> CPU TRACE: 00310:030742 4 000004710004 (TRA 000004,IC) 000004 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6813
          addrel (def_base, last_def) -> definition.forward = bit (def_pos, 18);

021254  aa  6 16542 2351 00   lda       pr6|7522            last_def
021255  aa  6 16516 3715 61   epp5      pr6|7502,*au        def_base
021256  aa   000000 1510 03   adwp5     0,du
021257  aa  6 16503 2351 00   lda       pr6|7491            def_pos
021260  aa   000002 6050 04   tpl       2,ic                021262
021261  aa   000000 5310 00   neg       0
021262  aa   000022 7350 00   als       18
021263  aa  5 00000 5511 60   stba      pr5|0,60            definition.forward
                                                            STATEMENT 1 ON LINE 6815
          def_ptr -> definition.new = "1"b;

021264  aa   400000 2350 07   lda       131072,dl
021265  aa  3 00001 2551 00   orsa      pr3|1               definition.new
                                                            STATEMENT 1 ON LINE 6816
          def_ptr -> definition.retain = "1"b;

021266  aa   040000 2350 07   lda       16384,dl
021267  aa  3 00001 2551 00   orsa      pr3|1               definition.retain

DBG(2464648779275)> CPU TRACE: 00310:030746 4 616542235100 (LDA PR6|16542) 616542 235(0) 1 0 0 00
DBG(2464648779277)> CPU TRACE: 00310:030747 4 616516371561 (EPP5 PR6|16516,*AU) 616516 371(1) 1 0 3 01
DBG(2464648779279)> CPU TRACE: 00310:030750 4 000000151003 (ADWP5 000000,DU) 000000 151(0) 0 0 0 03
DBG(2464648779281)> CPU TRACE: 00310:030751 4 616503235100 (LDA PR6|16503) 616503 235(0) 1 0 0 00
DBG(2464648779283)> CPU TRACE: 00310:030752 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648779285)> CPU TRACE: 00310:030754 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648779287)> CPU TRACE: 00310:030755 4 500000551160 (STBA PR5|0,*N) 500000 551(0) 1 0 3 00
DBG(2464648779289)> CPU TRACE: 00310:030756 4 400000235007 (LDA 400000,DL) 400000 235(0) 0 0 0 07
DBG(2464648779291)> CPU TRACE: 00310:030757 4 300001255100 (ORSA PR3|1) 300001 255(0) 1 0 0 00
DBG(2464648779293)> CPU TRACE: 00310:030760 4 040000235007 (LDA 040000,DL) 040000 235(0) 0 0 0 07
DBG(2464648779295)> CPU TRACE: 00310:030761 4 300001255100 (ORSA PR3|1) 300001 255(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6817
          def_ptr -> definition.symbol = b18;

021270  aa  6 16543 2351 00   lda       pr6|7523            b18
021271  aa  3 00002 5511 60   stba      pr3|2,60            definition.symbol
                                                            STATEMENT 1 ON LINE 6818
          def_ptr -> definition.value = value;

021272  aa  2 00006 2351 20   lda       pr2|6,*             value
021273  aa  3 00001 5511 60   stba      pr3|1,60            definition.value
                                                            STATEMENT 1 ON LINE 6820
          def_ptr -> definition.class = bit (class, 3);

021274  aa  2 00004 2351 20   lda       pr2|4,*             class
021275  aa   000002 6050 04   tpl       2,ic                021277
021276  aa   000000 5310 00   neg       0
021277  aa  0 00322 3771 00   anaq      pr0|210             = 000000000007 777777777777
021300  aa  3 00001 6751 00   era       pr3|1               definition.class
021301  aa   000007 3750 07   ana       7,dl
021302  aa  3 00001 6551 00   ersa      pr3|1               definition.class

DBG(2464648779297)> CPU TRACE: 00310:030762 4 616543235100 (LDA PR6|16543) 616543 235(0) 1 0 0 00
DBG(2464648779299)> CPU TRACE: 00310:030763 4 300002551160 (STBA PR3|2,*N) 300002 551(0) 1 0 3 00
DBG(2464648779301)> CPU TRACE: 00310:030764 4 200006235120 (LDA PR2|6,N*) 200006 235(0) 1 0 1 00
DBG(2464648779303)> CPU TRACE: 00310:030765 4 300001551160 (STBA PR3|1,*N) 300001 551(0) 1 0 3 00
DBG(2464648779305)> CPU TRACE: 00310:030766 4 200004235120 (LDA PR2|4,N*) 200004 235(0) 1 0 1 00
DBG(2464648779307)> CPU TRACE: 00310:030767 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648779309)> CPU TRACE: 00310:030771 4 000322377100 (ANAQ PR0|322) 000322 377(0) 1 0 0 00
DBG(2464648779311)> CPU TRACE: 00310:030772 4 300001675100 (ERA PR3|1) 300001 675(0) 1 0 0 00
DBG(2464648779313)> CPU TRACE: 00310:030773 4 000007375007 (ANA 000007,DL) 000007 375(0) 0 0 0 07
DBG(2464648779315)> CPU TRACE: 00310:030774 4 300001655100 (ERSA PR3|1) 300001 655(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6822
          if class = 3
          then seg_def = bit (def_pos, 18);

021303  aa  2 00004 2361 20   ldq       pr2|4,*             class
021304  aa   000003 1160 07   cmpq      3,dl
021305  aa   000007 6010 04   tnz       7,ic                021314
021306  aa  6 16503 2351 00   lda       pr6|7491            def_pos
021307  aa   000002 6050 04   tpl       2,ic                021311
021310  aa   000000 5310 00   neg       0
021311  aa   000022 7350 00   als       18
021312  aa  6 16541 7551 00   sta       pr6|7521            seg_def
021313  aa   000011 7100 04   tra       9,ic                021324

DBG(2464648779317)> CPU TRACE: 00310:030775 4 200004236120 (LDQ PR2|4,N*) 200004 236(0) 1 0 1 00
DBG(2464648779319)> CPU TRACE: 00310:030776 4 000003116007 (CMPQ 000003,DL) 000003 116(0) 0 0 0 07
DBG(2464648779321)> CPU TRACE: 00310:030777 4 000007601004 (TNZ 000007,IC) 000007 601(0) 0 0 0 04

                    def_ptr -> definition.segname = seg_def;

021314  aa  6 16541 2351 00   lda       pr6|7521            seg_def
021315  aa   000022 7710 00   arl       18
021316  aa  3 00002 5511 14   stba      pr3|2,14            definition.segname
                                                            STATEMENT 1 ON LINE 6826
                    def_ptr -> definition.entry = entry_sw;

021317  aa  2 00010 2351 20   lda       pr2|8,*             entry_sw
021320  aa   000024 7710 00   arl       20
021321  aa  3 00001 6751 00   era       pr3|1               definition.entry
021322  aa   100000 3750 07   ana       32768,dl
021323  aa  3 00001 6551 00   ersa      pr3|1               definition.entry

DBG(2464648779323)> CPU TRACE: 00310:031006 4 616541235100 (LDA PR6|16541) 616541 235(0) 1 0 0 00
DBG(2464648779325)> CPU TRACE: 00310:031007 4 000022771000 (ARL 000022) 000022 771(0) 0 0 0 00
DBG(2464648779327)> CPU TRACE: 00310:031010 4 300002551114 (STBA PR3|2,4) 300002 551(0) 1 0 0 14
DBG(2464648779329)> CPU TRACE: 00310:031011 4 200010235120 (LDA PR2|10,N*) 200010 235(0) 1 0 1 00
DBG(2464648779331)> CPU TRACE: 00310:031012 4 000024771000 (ARL 000024) 000024 771(0) 0 0 0 00
DBG(2464648779333)> CPU TRACE: 00310:031013 4 300001675100 (ERA PR3|1) 300001 675(0) 1 0 0 00
DBG(2464648779335)> CPU TRACE: 00310:031014 4 100000375007 (ANA 100000,DL) 100000 375(0) 0 0 0 07
DBG(2464648779337)> CPU TRACE: 00310:031015 4 300001655100 (ERSA PR3|1) 300001 655(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6829
          last_def = bit (def_pos, 18);

021324  aa  6 16503 2351 00   lda       pr6|7491            def_pos
021325  aa   000002 6050 04   tpl       2,ic                021327
021326  aa   000000 5310 00   neg       0
021327  aa   000022 7350 00   als       18
021330  aa  6 16542 7551 00   sta       pr6|7522            last_def
                                                            STATEMENT 1 ON LINE 6830
          def_pos = def_pos + 3;

021331  aa   000003 2360 07   ldq       3,dl
021332  aa  6 16503 0561 00   asq       pr6|7491            def_pos
                                                            STATEMENT 1 ON LINE 6832
     end;

021333  aa  6 16552 6101 00   rtcd      pr6|7530

DBG(2464648779339)> CPU TRACE: 00310:031016 4 616503235100 (LDA PR6|16503) 616503 235(0) 1 0 0 00
DBG(2464648779341)> CPU TRACE: 00310:031017 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648779343)> CPU TRACE: 00310:031021 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648779345)> CPU TRACE: 00310:031022 4 616542755100 (STA PR6|16542) 616542 755(0) 1 0 0 00
DBG(2464648779347)> CPU TRACE: 00310:031023 4 000003236007 (LDQ 000003,DL) 000003 236(0) 0 0 0 07
DBG(2464648779349)> CPU TRACE: 00310:031024 4 616503056100 (ASQ PR6|16503) 616503 056(0) 1 0 0 00
DBG(2464648779349)> CPU TRACE: Add36b op1 000000000003 op2 000000000025 carryin 0 flagsToSet 740000 flags 000200 ovf 0
DBG(2464648779349)> CPU TRACE: Add36b res 000000000030 flags 000200 ovf 0
DBG(2464648779351)> CPU TRACE: 00310:031025 4 616552610100 (RTCD PR6|16552) 616552 610(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6586
               p = addrel (output_pt, subprogram.entry_pos (j));
020251  aa  6 16510 2361 00   ldq       pr6|7496            j
020252  aa   000013 4020 07   mpy       11,dl
020253  aa   000000 6270 06   eax7      0,ql
020254  aa  6 01553 2361 06   ldq       pr6|875,ql          subprogram.entry_pos
020255  aa  6 00146 3521 66   epp2      pr6|102,*ql         output_pt
020256  aa   000000 0520 03   adwp2     0,du
020257  aa  6 16524 2521 00   spri2     pr6|7508            p
                                                            STATEMENT 1 ON LINE 6587
               p -> basic_entry.descriptor = last_def;

020260  aa  6 16542 2351 00   lda       pr6|7522            last_def
020261  aa  2 00000 5511 60   stba      pr2|0,60            basic_entry.descriptor
                                                            STATEMENT 1 ON LINE 6588
               p -> basic_entry.flag = "1"b;

020262  aa   400000 2350 07   lda       131072,dl
020263  aa  2 00000 2551 00   orsa      pr2|0               basic_entry.flag

DBG(2464648779353)> CPU TRACE: 00310:027743 4 616510236100 (LDQ PR6|16510) 616510 236(0) 1 0 0 00
DBG(2464648779355)> CPU TRACE: 00310:027744 4 000013402007 (MPY 000013,DL) 000013 402(0) 0 0 0 07
DBG(2464648779357)> CPU TRACE: 00310:027745 4 000000627006 (EAX7 000000,QL) 000000 627(0) 0 0 0 06
DBG(2464648779359)> CPU TRACE: 00310:027746 4 601553236106 (LDQ PR6|1553,QL) 601553 236(0) 1 0 0 06
DBG(2464648779361)> CPU TRACE: 00310:027747 4 600146352166 (EPP2 PR6|146,*QL) 600146 352(0) 1 0 3 06
DBG(2464648779363)> CPU TRACE: 00310:027750 4 000000052003 (ADWP2 000000,DU) 000000 052(0) 0 0 0 03
DBG(2464648779365)> CPU TRACE: 00310:027751 4 616524252100 (SPRI2 PR6|16524) 616524 252(0) 1 0 0 00
DBG(2464648779367)> CPU TRACE: 00310:027752 4 616542235100 (LDA PR6|16542) 616542 235(0) 1 0 0 00
DBG(2464648779369)> CPU TRACE: 00310:027753 4 200000551160 (STBA PR2|0,*N) 200000 551(0) 1 0 3 00
DBG(2464648779371)> CPU TRACE: 00310:027754 4 400000235007 (LDA 400000,DL) 400000 235(0) 0 0 0 07
DBG(2464648779373)> CPU TRACE: 00310:027755 4 200000255100 (ORSA PR2|0) 200000 255(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 6590
               program_header_pt = addrel (output_pt, subprogram.header_pos (j));

020264  aa  6 01552 2361 17   ldq       pr6|874,7           subprogram.header_pos
020265  aa  6 00146 3515 66   epp1      pr6|102,*ql         output_pt
020266  aa   000000 0510 03   adwp1     0,du
020267  aa  6 00154 2515 00   spri1     pr6|108             program_header_pt
                                                            STATEMENT 1 ON LINE 6592
               if generate_object
               then basic_program_header.definitions = 0;

020270  aa  6 17403 7471 00   stx7      pr6|7939
020271  aa  6 01474 2351 00   lda       pr6|828             generate_object
020272  aa   000004 6000 04   tze       4,ic                020276
020273  aa   000000 2350 03   lda       0,du
020274  aa  1 00015 5511 14   stba      pr1|13,14           basic_program_header.definitions
020275  aa   000004 7100 04   tra       4,ic                020301
                                                            STATEMENT 1 ON LINE 6594
               else basic_program_header.definitions = def_start - subprogram.header_pos (j);

020276  aa  6 16502 2361 00   ldq       pr6|7490            def_start
020277  aa  6 01552 1761 17   sbq       pr6|874,7           subprogram.header_pos
020300  aa  1 00015 5521 14   stbq      pr1|13,14           basic_program_header.definitions
                                                            STATEMENT 1 ON LINE 6595
          end;

020301  aa  6 16510 0541 00   aos       pr6|7496            j
020302  aa   777704 7100 04   tra       -60,ic              020206

DBG(2464648779375)> CPU TRACE: 00310:027756 4 601552236117 (LDQ PR6|1552,7) 601552 236(0) 1 0 0 17
DBG(2464648779377)> CPU TRACE: 00310:027757 4 600146351566 (EPP1 PR6|146,*QL) 600146 351(1) 1 0 3 06
DBG(2464648779379)> CPU TRACE: 00310:027760 4 000000051003 (ADWP1 000000,DU) 000000 051(0) 0 0 0 03
DBG(2464648779381)> CPU TRACE: 00310:027761 4 600154251500 (SPRI1 PR6|154) 600154 251(1) 1 0 0 00
DBG(2464648779383)> CPU TRACE: 00310:027762 4 601474235100 (LDA PR6|1474) 601474 235(0) 1 0 0 00
DBG(2464648779385)> CPU TRACE: 00310:027763 4 617377747100 (STX7 PR6|17377) 617377 747(0) 1 0 0 00
DBG(2464648779387)> CPU TRACE: 00310:027764 4 000004600004 (TZE 000004,IC) 000004 600(0) 0 0 0 04
DBG(2464648779389)> CPU TRACE: 00310:027770 4 616502236100 (LDQ PR6|16502) 616502 236(0) 1 0 0 00
DBG(2464648779391)> CPU TRACE: 00310:027771 4 601552176117 (SBQ PR6|1552,7) 601552 176(0) 1 0 0 17
DBG(2464648779393)> CPU TRACE: 00310:027772 4 100015552114 (STBQ PR1|15,4) 100015 552(0) 1 0 0 14
DBG(2464648779395)> CPU TRACE: 00310:027773 4 616510054100 (AOS PR6|16510) 616510 054(0) 1 0 0 00
DBG(2464648779395)> CPU TRACE: Add36b op1 000000000001 op2 000000000001 carryin 0 flagsToSet 740000 flags 100200 ovf 0
DBG(2464648779395)> CPU TRACE: Add36b res 000000000002 flags 000200 ovf 0
DBG(2464648779397)> CPU TRACE: 00310:027774 4 777704710004 (TRA 777704,IC) 777704 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6578
          do j = 1 to program_number;

020201  aa  6 00207 2361 00   ldq       pr6|135             program_number
020202  aa  6 16545 7561 00   stq       pr6|7525
020203  aa   000001 2360 07   ldq       1,dl
020204  aa  6 16510 7561 00   stq       pr6|7496            j
020205  aa   000000 0110 03   nop       0,du
020206  aa  6 16510 2361 00   ldq       pr6|7496            j
020207  aa  6 16545 1161 00   cmpq      pr6|7525
020210  aa   000073 6054 04   tpnz      59,ic               020303

DBG(2464648779399)> CPU TRACE: 00310:027700 4 616510236100 (LDQ PR6|16510) 616510 236(0) 1 0 0 00
DBG(2464648779401)> CPU TRACE: 00310:027701 4 616545116100 (CMPQ PR6|16545) 616545 116(0) 1 0 0 00
DBG(2464648779403)> CPU TRACE: 00310:027702 4 000073605404 (TPNZ 000073,IC) 000073 605(1) 0 0 0 04

                                                            STATEMENT 1 ON LINE 6600
          addrel (def_base, last_def) -> definition.forward = bit (def_pos, 18);

020303  aa  6 16542 2351 00   lda       pr6|7522            last_def
020304  aa  6 16516 3521 61   epp2      pr6|7502,*au        def_base
020305  aa   000000 0520 03   adwp2     0,du
020306  aa  6 16503 2351 00   lda       pr6|7491            def_pos
020307  aa   000002 6050 04   tpl       2,ic                020311
020310  aa   000000 5310 00   neg       0
020311  aa   000022 7350 00   als       18
020312  aa  2 00000 5511 60   stba      pr2|0,60            definition.forward
                                                            STATEMENT 1 ON LINE 6602
          def_pos = def_pos + 1;

020313  aa  6 16503 0541 00   aos       pr6|7491            def_pos
                                                            STATEMENT 1 ON LINE 6604
          if ^generate_object
          then return;

020314  aa  6 01474 2351 00   lda       pr6|828             generate_object
020315  aa   000002 6010 04   tnz       2,ic                020317
020316  aa  6 16474 6101 00   rtcd      pr6|7484

DBG(2464648779405)> CPU TRACE: 00310:027775 4 616542235100 (LDA PR6|16542) 616542 235(0) 1 0 0 00
DBG(2464648779407)> CPU TRACE: 00310:027776 4 616516352161 (EPP2 PR6|16516,*AU) 616516 352(0) 1 0 3 01
DBG(2464648779409)> CPU TRACE: 00310:027777 4 000000052003 (ADWP2 000000,DU) 000000 052(0) 0 0 0 03
DBG(2464648779411)> CPU TRACE: 00310:030000 4 616503235100 (LDA PR6|16503) 616503 235(0) 1 0 0 00
DBG(2464648779413)> CPU TRACE: 00310:030001 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(2464648779415)> CPU TRACE: 00310:030003 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(2464648779417)> CPU TRACE: 00310:030004 4 200000551160 (STBA PR2|0,*N) 200000 551(0) 1 0 3 00
DBG(2464648779419)> CPU TRACE: 00310:030005 4 616503054100 (AOS PR6|16503) 616503 054(0) 1 0 0 00
DBG(2464648779419)> CPU TRACE: Add36b op1 000000000030 op2 000000000001 carryin 0 flagsToSet 740000 flags 000200 ovf 0
DBG(2464648779419)> CPU TRACE: Add36b res 000000000031 flags 000200 ovf 0
DBG(2464648779421)> CPU TRACE: 00310:030006 4 601474235100 (LDA PR6|1474) 601474 235(0) 1 0 0 00
DBG(2464648779423)> CPU TRACE: 00310:030007 4 000002601004 (TNZ 000002,IC) 000002 601(0) 0 0 0 04
DBG(2464648779425)> CPU TRACE: 00310:030010 4 616474610100 (RTCD PR6|16474) 616474 610(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 1038
abort_compilation:       
          if basic_temp_ptr ^= null
          then call release_temp_segment_ ("basic", basic_temp_ptr, code);

002024  aa  6 00200 2371 00   ldaq      pr6|128             basic_temp_ptr
002025  aa   776443 6770 04   eraq      -733,ic             000470 = 077777000043 000001000000
002026  aa  0 00460 3771 00   anaq      pr0|304             = 077777000077 777777077077
002027  aa   000024 6000 04   tze       20,ic               002053
002030  aa   776432 2370 04   ldaq      -742,ic             000462 = 142141163151 143000000000
002031  aa  6 16706 7571 00   staq      pr6|7622
002032  aa  6 16706 3521 00   epp2      pr6|7622
002033  aa  6 16662 2521 00   spri2     pr6|7602
002034  aa  6 00200 3521 00   epp2      pr6|128             basic_temp_ptr
002035  aa  6 16664 2521 00   spri2     pr6|7604
002036  aa  6 00351 3521 00   epp2      pr6|233             code
002037  aa  6 16666 2521 00   spri2     pr6|7606
002040  aa   776350 3520 04   epp2      -792,ic             000410 = 524000000005^L002041  aa  6 16670 2521 00   spri2     pr6|7608
002042  aa   776357 3520 04   epp2      -785,ic             000421 = 464000000000
002043  aa  6 16672 2521 00   spri2     pr6|7610
002044  aa   776352 3520 04   epp2      -790,ic             000416 = 404000000043
002045  aa  6 16674 2521 00   spri2     pr6|7612
002046  aa  6 16660 6211 00   eax1      pr6|7600
002047  aa   014000 4310 07   fld       6144,dl
002050  aa  6 00044 3701 20   epp4      pr6|36,*
002051  la  4 00044 3521 20   epp2      pr4|36,*            release_temp_segment_
002052  aa  0 00622 7001 00   tsx0      pr0|402             call_ext_out_desc

DBG(2464648779427)> CPU TRACE: 00310:011540 4 600200237100 (LDAQ PR6|200) 600200 237(0) 1 0 0 00
DBG(2464648779429)> CPU TRACE: 00310:011541 4 776443677004 (ERAQ 776443,IC) 776443 677(0) 0 0 0 04
DBG(2464648779431)> CPU TRACE: 00310:011542 4 000460377100 (ANAQ PR0|460) 000460 377(0) 1 0 0 00
DBG(2464648779433)> CPU TRACE: 00310:011543 4 000024600004 (TZE 000024,IC) 000024 600(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 1042
          if instruction_temp_ptr ^= null 
          then call release_temp_segment_ ("basic", instruction_temp_ptr, code);

002053  aa  6 00150 2371 00   ldaq      pr6|104             instruction_temp_ptr
002054  aa   776414 6770 04   eraq      -756,ic             000470 = 077777000043 000001000000
002055  aa  0 00460 3771 00   anaq      pr0|304             = 077777000077 777777077077
002056  aa   000024 6000 04   tze       20,ic               002102 
002057  aa   776403 2370 04   ldaq      -765,ic             000462 = 142141163151 143000000000
002060  aa  6 16706 7571 00   staq      pr6|7622
002061  aa  6 16706 3521 00   epp2      pr6|7622
002062  aa  6 16662 2521 00   spri2     pr6|7602
002063  aa  6 00150 3521 00   epp2      pr6|104             instruction_temp_ptr
002064  aa  6 16664 2521 00   spri2     pr6|7604
002065  aa  6 00351 3521 00   epp2      pr6|233             code
002066  aa  6 16666 2521 00   spri2     pr6|7606
002067  aa   776321 3520 04   epp2      -815,ic             000410 = 524000000005
002070  aa  6 16670 2521 00   spri2     pr6|7608
002071  aa   776330 3520 04   epp2      -808,ic             000421 = 464000000000
002072  aa  6 16672 2521 00   spri2     pr6|7610
002073  aa   776323 3520 04   epp2      -813,ic             000416 = 404000000043
002074  aa  6 16674 2521 00   spri2     pr6|7612
002075  aa  6 16660 6211 00   eax1      pr6|7600
002076  aa   014000 4310 07   fld       6144,dl
002077  aa  6 00044 3701 20   epp4      pr6|36,*
002100  la  4 00044 3521 20   epp2      pr4|36,*            release_temp_segment_
002101  aa  0 00622 7001 00   tsx0      pr0|402             call_ext_out_desc

DBG(2464648779435)> CPU TRACE: 00310:011567 4 600150237100 (LDAQ PR6|150) 600150 237(0) 1 0 0 00
DBG(2464648779437)> CPU TRACE: 00310:011570 4 776414677004 (ERAQ 776414,IC) 776414 677(0) 0 0 0 04
DBG(2464648779439)> CPU TRACE: 00310:011571 4 000460377100 (ANAQ PR0|460) 000460 377(0) 1 0 0 00
DBG(2464648779441)> CPU TRACE: 00310:011572 4 000024600004 (TZE 000024,IC) 000024 600(0) 0 0 0 04
DBG(2464648779443)> CPU TRACE: 00310:011573 4 776403237004 (LDAQ 776403,IC) 776403 237(0) 0 0 0 04
DBG(2464648779445)> CPU TRACE: 00310:011574 4 616706757100 (STAQ PR6|16706) 616706 757(0) 1 0 0 00
DBG(2464648779447)> CPU TRACE: 00310:011575 4 616706352100 (EPP2 PR6|16706) 616706 352(0) 1 0 0 00
DBG(2464648779449)> CPU TRACE: 00310:011576 4 616662252100 (SPRI2 PR6|16662) 616662 252(0) 1 0 0 00
DBG(2464648779451)> CPU TRACE: 00310:011577 4 600150352100 (EPP2 PR6|150) 600150 352(0) 1 0 0 00
DBG(2464648779453)> CPU TRACE: 00310:011600 4 616664252100 (SPRI2 PR6|16664) 616664 252(0) 1 0 0 00
DBG(2464648779455)> CPU TRACE: 00310:011601 4 600351352100 (EPP2 PR6|351) 600351 352(0) 1 0 0 00
DBG(2464648779457)> CPU TRACE: 00310:011602 4 616666252100 (SPRI2 PR6|16666) 616666 252(0) 1 0 0 00
DBG(2464648779459)> CPU TRACE: 00310:011603 4 776321352004 (EPP2 776321,IC) 776321 352(0) 0 0 0 04
DBG(2464648779461)> CPU TRACE: 00310:011604 4 616670252100 (SPRI2 PR6|16670) 616670 252(0) 1 0 0 00
DBG(2464648779463)> CPU TRACE: 00310:011605 4 776330352004 (EPP2 776330,IC) 776330 352(0) 0 0 0 04
DBG(2464648779465)> CPU TRACE: 00310:011606 4 616672252100 (SPRI2 PR6|16672) 616672 252(0) 1 0 0 00
DBG(2464648779467)> CPU TRACE: 00310:011607 4 776323352004 (EPP2 776323,IC) 776323 352(0) 0 0 0 04
DBG(2464648779469)> CPU TRACE: 00310:011610 4 616674252100 (SPRI2 PR6|16674) 616674 252(0) 1 0 0 00
DBG(2464648779471)> CPU TRACE: 00310:011611 4 616660621100 (EAX1 PR6|16660) 616660 621(0) 1 0 0 00
DBG(2464648779473)> CPU TRACE: 00310:011612 4 014000431007 (FLD 014000,DL) 014000 431(0) 0 0 0 07
DBG(2464648779475)> CPU TRACE: 00310:011613 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(2464648779477)> CPU TRACE: 00310:011614 4 400176352120 (EPP2 PR4|176,N*) 400176 352(0) 1 0 1 00
DBG(2464648779479)> CPU TRACE: 00310:011615 4 000622700100 (TSX0 PR0|622) 000622 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 1045
          if which = 1
          then do;

002102  aa  6 00336 2361 00   ldq       pr6|222             which
002103  aa   000001 1160 07   cmpq      1,dl
002104  aa   000007 6010 04   tnz       7,ic                002113

                                                            STATEMENT 1 ON LINE 1047
                    mp = main_pt;

002105  aa  6 00142 3735 20   epp7      pr6|98,*            main_pt
002106  aa  6 00032 3715 20   epp5      pr6|26,*
002107  aa  5 00012 6535 20   spri7     pr5|10,*            mp
                                                            STATEMENT 1 ON LINE 1048
                    err_count = number_of_errors;

002110  aa  6 00206 2361 00   ldq       pr6|134             number_of_errors
002111  aa  5 00014 7561 20   stq       pr5|12,*            err_count
                                                            STATEMENT 1 ON LINE 1049
               end;

002112  aa   000010 7100 04   tra       8,ic                002122

DBG(2464648798765)> CPU TRACE: 00310:011621 4 600142373520 (EPP7 PR6|142,N*) 600142 373(1) 1 0 1 00
DBG(2464648798767)> CPU TRACE: 00310:011622 4 600032371520 (EPP5 PR6|32,N*) 600032 371(1) 1 0 1 00
DBG(2464648798769)> CPU TRACE: 00310:011623 4 500012653520 (SPRI7 PR5|12,N*) 500012 653(1) 1 0 1 00
DBG(2464648798771)> CPU TRACE: 00310:011624 4 600206236100 (LDQ PR6|206) 600206 236(0) 1 0 0 00
DBG(2464648798773)> CPU TRACE: 00310:011625 4 500014756120 (STQ PR5|14,N*) 500014 756(0) 1 0 1 00
DBG(2464648798775)> CPU TRACE: 00310:011626 4 000010710004 (TRA 000010,IC) 000010 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 1055
          return;

002122  aa  0 00631 7101 00   tra       pr0|409             return_mac

DBG(2464648798777)> CPU TRACE: 00310:011636 4 000631710100 (TRA PR0|631) 000631 710(0) 1 0 0 00

Return to basic:

                                                            STATEMENT 1 ON LINE 262
          if source_info_pt = null
          then if err_count = 0
               then if main_pt = null   
                    then call fatal_err (180);

001424  aa  6 00120 2371 00   ldaq      pr6|80              source_info_pt
001425  aa   776421 6770 04   eraq      -751,ic             000046 = 077777000043 000001000000
001426  aa  0 00460 3771 00   anaq      pr0|304             = 077777000077 777777077077
001427  aa   000135 6010 04   tnz       93,ic               001564
001430  aa  6 00103 2361 00   ldq       pr6|67              err_count
001431  aa   000066 6010 04   tnz       54,ic               001517
001432  aa  6 00132 2371 00   ldaq      pr6|90              main_pt
001433  aa   776413 6770 04   eraq      -757,ic             000046 = 077777000043 000001000000
001434  aa  0 00460 3771 00   anaq      pr0|304             = 077777000077 777777077077
001435  aa   000006 6010 04   tnz       6,ic                001443
001436  aa   000264 2360 07   ldq       180,dl
001437  aa  6 00600 7561 00   stq       pr6|384
001440  aa   000652 3520 04   epp2      426,ic              002312 = 000002000000
001441  aa   000541 6700 04   tsp4      353,ic              002202
001442  aa   000122 7100 04   tra       82,ic               001564

DBG(2464648798795)> CPU TRACE: 00310:006616 4 600120237100 (LDAQ PR6|120) 600120 237(0) 1 0 0 00
DBG(2464648798797)> CPU TRACE: 00310:006617 4 776421677004 (ERAQ 776421,IC) 776421 677(0) 0 0 0 04
DBG(2464648798799)> CPU TRACE: 00310:006620 4 000460377100 (ANAQ PR0|460) 000460 377(0) 1 0 0 00
DBG(2464648798801)> CPU TRACE: 00310:006621 4 000135601004 (TNZ 000135,IC) 000135 601(0) 0 0 0 04
DBG(2464648798803)> CPU TRACE: 00310:006622 4 600103236100 (LDQ PR6|103) 600103 236(0) 1 0 0 00
DBG(2464648798805)> CPU TRACE: 00310:006623 4 000066601004 (TNZ 000066,IC) 000066 601(0) 0 0 0 04
DBG(2464648798807)> CPU TRACE: 00310:006624 4 600132237100 (LDAQ PR6|132) 600132 237(0) 1 0 0 00
DBG(2464648798809)> CPU TRACE: 00310:006625 4 776413677004 (ERAQ 776413,IC) 776413 677(0) 0 0 0 04
DBG(2464648798811)> CPU TRACE: 00310:006626 4 000460377100 (ANAQ PR0|460) 000460 377(0) 1 0 0 00
DBG(2464648798813)> CPU TRACE: 00310:006627 4 000006601004 (TNZ 000006,IC) 000006 601(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 266
                    else if time_limit = 0
                    then call cu_$ptr_call (main_pt);

001443  aa  6 00110 2371 00   ldaq      pr6|72              time_limit
001444  aa   000011 6010 04   tnz       9,ic                001455
001445  aa  6 00132 3521 00   epp2      pr6|90              main_pt
001446  aa  6 00440 2521 00   spri2     pr6|288
001447  aa  6 00436 6211 00   eax1      pr6|286
001450  aa   004000 4310 07   fld       2048,dl
001451  aa  6 00044 3701 20   epp4      pr6|36,*
001452  la  4 00022 3521 20   epp2      pr4|18,*            cu_$ptr_call
001453  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out
001454  aa   000110 7100 04   tra       72,ic               001564

DBG(2464648798815)> CPU TRACE: 00310:006635 4 600110237100 (LDAQ PR6|110) 600110 237(0) 1 0 0 00
DBG(2464648798817)> CPU TRACE: 00310:006636 4 000011601004 (TNZ 000011,IC) 000011 601(0) 0 0 0 04
DBG(2464648798819)> CPU TRACE: 00310:006637 4 600132352100 (EPP2 PR6|132) 600132 352(0) 1 0 0 00
DBG(2464648798821)> CPU TRACE: 00310:006640 4 600440252100 (SPRI2 PR6|440) 600440 252(0) 1 0 0 00
DBG(2464648798823)> CPU TRACE: 00310:006641 4 600436621100 (EAX1 PR6|436) 600436 621(0) 1 0 0 00
DBG(2464648798825)> CPU TRACE: 00310:006642 4 004000431007 (FLD 004000,DL) 004000 431(0) 0 0 0 07
DBG(2464648798827)> CPU TRACE: 00310:006643 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(2464648798829)> CPU TRACE: 00310:006644 4 400120352120 (EPP2 PR4|120,N*) 400120 352(0) 1 0 1 00
DBG(2464648798831)> CPU TRACE: 00310:006645 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00
DBG(2464650507414)> CPU TRACE: 00310:006646 4 000110710004 (TRA 000110,IC) 000110 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 285^Ldone:
          call clean_up;

001564  aa  6 00056 6211 00   eax1      pr6|46
001565  aa   000000 4310 07   fld       0,dl
001566  aa   000017 3520 04   epp2      15,ic               001605 = 000160627000
001567  aa  0 00625 7001 00   tsx0      pr0|405             call_int_this
                                                            STATEMENT 1 ON LINE 287
          return;

001570  aa  0 00631 7101 00   tra       pr0|409             return_mac

DBG(2464650507416)> CPU TRACE: 00310:006756 4 600056621100 (EAX1 PR6|56) 600056 621(0) 1 0 0 00
DBG(2464650507418)> CPU TRACE: 00310:006757 4 000000431007 (FLD 000000,DL) 000000 431(0) 0 0 0 07
DBG(2464650507420)> CPU TRACE: 00310:006760 4 000017352004 (EPP2 000017,IC) 000017 352(0) 0 0 0 04
DBG(2464650507422)> CPU TRACE: 00310:006761 4 000625700100 (TSX0 PR0|625) 000625 700(0) 1 0 0 00

ENTRY TO clean_up                                           STATEMENT 1 ON LINE 298
clean_up:
     proc;

001604  da     000405200000   
001605  aa   000160 6270 00   eax7      112
001606  aa  7 00034 3521 20   epp2      pr7|28,*
001607  aa  2 01047 2721 00   tsp2      pr2|551             int_entry
001610  aa     000000000000
001611  aa     000000000000

DBG(2464650507442)> CPU TRACE: 00310:006777 4 000160627000 (EAX7 000160) 000160 627(0) 0 0 0 00
DBG(2464650507444)> CPU TRACE: 00310:007000 4 700034352120 (EPP2 PR7|34,N*) 700034 352(0) 1 0 1 00
DBG(2464650507446)> CPU TRACE: 00310:007001 4 201047272100 (TSP2 PR2|1047) 201047 272(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 301
          if input_pt ^= null
          then call hcs_$terminate_noname (input_pt, code);

001612  aa  6 00040 3735 20   epp7      pr6|32,*
001613  aa  7 00122 2371 00   ldaq      pr7|82              input_pt
001614  aa   776232 6770 04   eraq      -870,ic             000046 = 077777000043 000001000000
001615  aa  0 00460 3771 00   anaq      pr0|304             = 077777000077 777777077077
001616  aa   000011 6000 04   tze       9,ic                001627
001617  aa  7 00122 3521 00   epp2      pr7|82              input_pt
001620  aa  6 00102 2521 00   spri2     pr6|66
001621  aa  7 00102 3521 00   epp2      pr7|66              code
001622  aa  6 00104 2521 00   spri2     pr6|68
001623  aa  6 00100 6211 00   eax1      pr6|64^L001624  aa   010000 4310 07   fld       4096,dl
001625  la  4 00044 3521 20   epp2      pr4|36,*            hcs_$terminate_noname
001626  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out

DBG(2464650507498)> CPU TRACE: 00310:007004 4 600040373520 (EPP7 PR6|40,N*) 600040 373(1) 1 0 1 00
DBG(2464650507500)> CPU TRACE: 00310:007005 4 700122237100 (LDAQ PR7|122) 700122 237(0) 1 0 0 00
DBG(2464650507502)> CPU TRACE: 00310:007006 4 776232677004 (ERAQ 776232,IC) 776232 677(0) 0 0 0 04
DBG(2464650507504)> CPU TRACE: 00310:007007 4 000460377100 (ANAQ PR0|460) 000460 377(0) 1 0 0 00
DBG(2464650507506)> CPU TRACE: 00310:007010 4 000011600004 (TZE 000011,IC) 000011 600(0) 0 0 0 04
DBG(2464650507508)> CPU TRACE: 00310:007011 4 700122352100 (EPP2 PR7|122) 700122 352(0) 1 0 0 00
DBG(2464650507510)> CPU TRACE: 00310:007012 4 600102252100 (SPRI2 PR6|102) 600102 252(0) 1 0 0 00
DBG(2464650507512)> CPU TRACE: 00310:007013 4 700102352100 (EPP2 PR7|102) 700102 352(0) 1 0 0 00
DBG(2464650507514)> CPU TRACE: 00310:007014 4 600104252100 (SPRI2 PR6|104) 600104 252(0) 1 0 0 00
DBG(2464650507516)> CPU TRACE: 00310:007015 4 600100621100 (EAX1 PR6|100) 600100 621(0) 1 0 0 00
DBG(2464650507518)> CPU TRACE: 00310:007016 4 010000431007 (FLD 010000,DL) 010000 431(0) 0 0 0 07
DBG(2464650507520)> CPU TRACE: 00310:007017 4 400164352120 (EPP2 PR4|164,N*) 400164 352(0) 1 0 1 00
DBG(2464650507522)> CPU TRACE: 00310:007020 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 304
          if source_info_pt ^= null
          then if output_pt ^= null
               then do;

001627  aa  6 00040 3735 20   epp7      pr6|32,*
001630  aa  7 00120 2371 00   ldaq      pr7|80              source_info_pt
001631  aa   776215 6770 04   eraq      -883,ic             000046 = 077777000043 000001000000
001632  aa  0 00460 3771 00   anaq      pr0|304             = 077777000077 777777077077
001633  aa   000142 6000 04   tze       98,ic               001775
001634  aa  7 00124 2371 00   ldaq      pr7|84              output_pt
001635  aa   776211 6770 04   eraq      -887,ic             000046 = 077777000043 000001000000
001636  aa  0 00460 3771 00   anaq      pr0|304             = 077777000077 777777077077
001637  aa   000166 6000 04   tze       118,ic              002025

DBG(2464650516548)> CPU TRACE: 00310:007021 4 600040373520 (EPP7 PR6|40,N*) 600040 373(1) 1 0 1 00
DBG(2464650516550)> CPU TRACE: 00310:007022 4 700120237100 (LDAQ PR7|120) 700120 237(0) 1 0 0 00
DBG(2464650516552)> CPU TRACE: 00310:007023 4 776215677004 (ERAQ 776215,IC) 776215 677(0) 0 0 0 04
DBG(2464650516554)> CPU TRACE: 00310:007024 4 000460377100 (ANAQ PR0|460) 000460 377(0) 1 0 0 00
DBG(2464650516556)> CPU TRACE: 00310:007025 4 000142600004 (TZE 000142,IC) 000142 600(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 318
          else if level > 1 
          then call hcs_$delentry_seg (output_pt, code);

001775  aa  6 00044 3701 20   epp4      pr6|36,*
001776  ia  4 00010 2361 00   ldq       pr4|8               level
001777  aa   000001 1160 07   cmpq      1,dl
002000  aa   000012 6044 04   tmoz      10,ic               002012
002001  aa  7 00124 3521 00   epp2      pr7|84              output_pt
002002  aa  6 00102 2521 00   spri2     pr6|66
002003  aa  7 00102 3521 00   epp2      pr7|66              code
002004  aa  6 00104 2521 00   spri2     pr6|68
002005  aa  6 00100 6211 00   eax1      pr6|64
002006  aa   010000 4310 07   fld       4096,dl
002007  la  4 00050 3521 20   epp2      pr4|40,*            hcs_$delentry_seg
002010  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out
002011  aa   000014 7100 04   tra       12,ic               002025

DBG(2464650516558)> CPU TRACE: 00310:007167 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(2464650516560)> CPU TRACE: 00310:007170 4 400030236100 (LDQ PR4|30) 400030 236(0) 1 0 0 00
DBG(2464650516562)> CPU TRACE: 00310:007171 4 000001116007 (CMPQ 000001,DL) 000001 116(0) 0 0 0 07
DBG(2464650516564)> CPU TRACE: 00310:007172 4 000012604404 (TMOZ 000012,IC) 000012 604(1) 0 0 0 04

                                                            STATEMENT 1 ON LINE 320
          else call hcs_$truncate_seg (output_pt, 0, code);

002012  aa  6 00147 4501 00   stz       pr6|103
002013  aa  7 00124 3521 00   epp2      pr7|84              output_pt
002014  aa  6 00110 2521 00   spri2     pr6|72
002015  aa  6 00147 3521 00   epp2      pr6|103
002016  aa  6 00112 2521 00   spri2     pr6|74
002017  aa  7 00102 3521 00   epp2      pr7|66              code
002020  aa  6 00114 2521 00   spri2     pr6|76
002021  aa  6 00106 6211 00   eax1      pr6|70
002022  aa   014000 4310 07   fld       6144,dl
002023  la  4 00062 3521 20   epp2      pr4|50,*            hcs_$truncate_seg
002024  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out

DBG(2464650516566)> CPU TRACE: 00310:007204 4 600147450100 (STZ PR6|147) 600147 450(0) 1 0 0 00
DBG(2464650516568)> CPU TRACE: 00310:007205 4 700124352100 (EPP2 PR7|124) 700124 352(0) 1 0 0 00
DBG(2464650516570)> CPU TRACE: 00310:007206 4 600110252100 (SPRI2 PR6|110) 600110 252(0) 1 0 0 00
DBG(2464650516572)> CPU TRACE: 00310:007207 4 600147352100 (EPP2 PR6|147) 600147 352(0) 1 0 0 00
DBG(2464650516574)> CPU TRACE: 00310:007210 4 600112252100 (SPRI2 PR6|112) 600112 252(0) 1 0 0 00
DBG(2464650516576)> CPU TRACE: 00310:007211 4 700102352100 (EPP2 PR7|102) 700102 352(0) 1 0 0 00
DBG(2464650516578)> CPU TRACE: 00310:007212 4 600114252100 (SPRI2 PR6|114) 600114 252(0) 1 0 0 00
DBG(2464650516580)> CPU TRACE: 00310:007213 4 600106621100 (EAX1 PR6|106) 600106 621(0) 1 0 0 00
DBG(2464650516582)> CPU TRACE: 00310:007214 4 014000431007 (FLD 014000,DL) 014000 431(0) 0 0 0 07
DBG(2464650516584)> CPU TRACE: 00310:007215 4 400112352120 (EPP2 PR4|112,N*) 400112 352(0) 1 0 1 00
DBG(2464650516586)> CPU TRACE: 00310:007216 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 322
          level = level - 1;

002025  aa   000001 3360 07   lcq       1,dl
002026  aa  6 00044 3701 20   epp4      pr6|36,*
002027  ia  4 00010 0561 00   asq       pr4|8               level

DBG(2464650526500)> CPU TRACE: 00310:007217 4 000001336007 (LCQ 000001,DL) 000001 336(0) 0 0 0 07
DBG(2464650526502)> CPU TRACE: 00310:007220 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(2464650526504)> CPU TRACE: 00310:007221 4 400030056100 (ASQ PR4|30) 400030 056(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 324
          if time_limit ^= 0
          then call timer_manager_$reset_cpu_call (cpu_limit);

002030  aa  6 00040 3735 20   epp7      pr6|32,*
002031  aa  7 00110 2371 00   ldaq      pr7|72              time_limit
002032  aa   000014 6000 04   tze       12,ic               002046
002033  aa   000015 3520 04   epp2      13,ic               002050 = 000200627000
002034  aa   000001 2360 07   ldq       1,dl
002035  aa  0 00653 7001 00   tsx0      pr0|427             make_label_var
002036  aa  6 00100 3521 00   epp2      pr6|64              cp.172
002037  aa  0 00652 7001 00   tsx0      pr0|426             move_label_var
002040  aa  6 00100 3521 00   epp2      pr6|64              cp.172^L002041  aa  6 00110 2521 00   spri2     pr6|72
002042  aa  6 00106 6211 00   eax1      pr6|70
002043  aa   004000 4310 07   fld       2048,dl
002044  la  4 00070 3521 20   epp2      pr4|56,*            timer_manager_$reset_cpu_call
002045  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out

DBG(2464650526506)> CPU TRACE: 00310:007222 4 600040373520 (EPP7 PR6|40,N*) 600040 373(1) 1 0 1 00
DBG(2464650526508)> CPU TRACE: 00310:007223 4 700110237100 (LDAQ PR7|110) 700110 237(0) 1 0 0 00
DBG(2464650526510)> CPU TRACE: 00310:007224 4 000014600004 (TZE 000014,IC) 000014 600(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 326
     end;

002046  aa  0 00631 7101 00   tra       pr0|409             return_mac

DBG(2464650526530)> CPU TRACE: 00310:006762 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