CAC 2016-02-19 part 5
                                                            STATEMENT 1 ON LINE 110
          if ((sys_info$collection_1_phase = EARLY_INITIALIZATION) | (sys_info$collection_1_phase = BOOT_INITIALIZATION)
               | (sys_info$collection_1_phase = SERVICE_INITIALIZATION))
          then severity = CRASH;
000753  la  4 00062 2361 20   ldq       pr4|50,*            sys_info$collection_1_phase

DBG(114897345)> CPU TRACE: 0: 00432:000777 0 400760236120 (LDQ PR4|760,N*) 400760 236(0) 1 0 1 00

                                                            STATEMENT 1 ON LINE 117
          unspec (scs$scas_page_table) = ""b;

000774  la  4 00220 3735 20   epp7      pr4|144,*

DBG(114897361)> CPU TRACE: 0: 00432:001013 0 400762373520 (EPP7 PR4|762,N*) 400762 373(1) 1 0 1 00

                                                            STATEMENT 1 ON LINE 118
          do i = 0 to 31;

001000  aa  6 00100 4501 00   stz       pr6|64              i

                                                            STATEMENT 1 ON LINE 123
          unspec (sdwi) = ""b;

001013  aa  000 100 100 400   mlr       (),(pr),fill(000)

DBG(114897949)> CPU TRACE: 0: 00432:001031 0 000100100400 (MLR 000100) 000100 100(1) 0 0 0 00

                                                            STATEMENT 1 ON LINE 124
          sdwi.address = absadr (addr (scs$scas_page_table), code);

001016  aa  6 00044 3701 20   epp4      pr6|36,*

DBG(114897951)> CPU TRACE: 0: 00432:001034 0 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00

                                                            STATEMENT 1 ON LINE 125
          if code ^= 0 then call syserr (CRASH, "scas_init: Error from absadr setting up SCAS.");

001035  aa  6 00120 2361 00   ldq       pr6|80              code

DBG(114898159)> CPU TRACE: 0: 00432:001053 0 600120236100 (LDQ PR6|120) 600120 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 126
          sdwi.read = "1"b;

001057  aa   400000 2350 03   lda       131072,du

DBG(114898163)> CPU TRACE: 0: 00432:001075 0 400000235003 (LDA 400000,DU) 400000 235(0) 0 0 0 03

                                                            STATEMENT 1 ON LINE 127
          sdwi.write = "1"b;

001061  aa   100000 2350 03   lda       32768,du

DBG(114898167)> CPU TRACE: 0: 00432:001077 0 100000235003 (LDA 100000,DU) 100000 235(0) 0 0 0 03

                                                            STATEMENT 1 ON LINE 128
          sdwi.paged = "1"b;

001063  aa   400000 2350 03   lda       131072,du

DBG(114898171)> CPU TRACE: 0: 00432:001101 0 400000235003 (LDA 400000,DU) 400000 235(0) 0 0 0 03

                                                            STATEMENT 1 ON LINE 129
          sdwi.size = 32 * 1024;

001065  aa   100000 2360 07   ldq       32768,dl

DBG(114898175)> CPU TRACE: 0: 00432:001103 0 100000236007 (LDQ 100000,DL) 100000 236(0) 0 0 0 07

                                                            STATEMENT 1 ON LINE 131
          call sdw_util_$construct (addr (tsdw), addr (sdwi));

001067  aa  6 00140 3735 00   epp7      pr6|96              tsdw

DBG(114898179)> CPU TRACE: 0: 00432:001105 0 600140373500 (EPP7 PR6|140) 600140 373(1) 1 0 0 00

                                                            STATEMENT 1 ON LINE 134
          call privileged_mode_ut$swap_sdw (addr (scas$), addr (tsdw));

001104  aa  6 00044 3701 20   epp4      pr6|36,*

DBG(114898425)> CPU TRACE: 0: 00432:001122 0 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00

                                                            STATEMENT 1 ON LINE 139
          do tag = 0 to 7;

001121  aa  6 00111 4501 00   stz       pr6|73              tag

DBG(114898521)> CPU TRACE: 0: 00432:001137 0 600111450100 (STZ PR6|111) 600111 450(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 146
          scs$processor_switch_template = scs$processor_switch_data;

001142  aa  6 00044 3701 20   epp4      pr6|36,*

DBG(114899689)> CPU TRACE: 0: 00432:001160 0 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00

                                                            STATEMENT 1 ON LINE 151
          toehold_abs = absadr (addr (toehold$), code);

001150  la  4 00024 3535 20   epp3      pr4|20,*            toehold$

DBG(114899697)> CPU TRACE: 0: 00432:001166 0 401004353520 (EPP3 PR4|1004,N*) 401004 353(1) 1 0 1 00

                                                            STATEMENT 1 ON LINE 152
          scs$processor_data_switch_value = bit (bin (toehold_abs, 18), 18) || XED_INHIB;

001164  aa  6 00127 2351 00   lda       pr6|87              toehold_abs
001165  aa   000002 6050 04   tpl       2,ic                001167
001166  aa   000000 5310 00   neg       0
001167  aa   000022 7350 00   als       18
001170  aa  6 00212 7551 00   sta       pr6|138
001171  aa   717200 2350 07   lda       237184,dl
001172  aa  6 00212 2751 00   ora       pr6|138
001173  aa  6 00044 3701 20   epp4      pr6|36,*
001174  la  4 00212 7551 20   sta       pr4|138,*           scs$processor_data_switch_value

DBG(114899899)> CPU TRACE: 0: 00432:001202 0 600127235100 (LDA PR6|127) 600127 235(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 153
          if sys_info$collection_1_phase = EARLY_INITIALIZATION | sys_info$collection_1_phase = BOOT_INITIALIZATION
               | sys_info$collection_1_phase = SERVICE_INITIALIZATION
          then if scs$processor_switch_data (0) ^= scs$processor_data_switch_value
               then call syserr (ANNOUNCE, "scas_init: CPU data switches are ^w, should be ^w",
                         scs$processor_switch_data (0), scs$processor_data_switch_value);

001175  la  4 00062 2361 20   ldq       pr4|50,*            sys_info$collection_1_phase

DBG(114899915)> CPU TRACE: 0: 00432:001213 0 400760236120 (LDQ PR4|760,N*) 400760 236(0) 1 0 1 00

                                                            STATEMENT 1 ON LINE 162
          iom_low_port, cpu_low_port = 36;

001242  aa   000044 2360 07   ldq       36,dl

DBG(114899929)> CPU TRACE: 0: 00432:001252 0 000044236007 (LDQ 000044,DL) 000044 236(0) 0 0 0 07

                                                            STATEMENT 1 ON LINE 163
          iom_high_port, cpu_high_port = -1;

001245  aa   000001 3360 07   lcq       1,dl

DBG(114899935)> CPU TRACE: 0: 00432:001255 0 000001336007 (LCQ 000001,DL) 000001 336(0) 0 0 0 07

                                                            STATEMENT 1 ON LINE 164
          iom_ports, cpu_ports = "0"b;

001250  aa  6 00126 4501 00   stz       pr6|86              iom_ports

DBG(114899941)> CPU TRACE: 0: 00432:001260 0 600126450100 (STZ PR6|126) 600126 450(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 168
          n_cpus = 0;

001252  aa  6 00104 4501 00   stz       pr6|68              n_cpus

DBG(114899945)> CPU TRACE: 0: 00432:001262 0 600104450100 (STZ PR6|104) 600104 450(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 169
          found = "0"b;

001253  aa  6 00102 4501 00   stz       pr6|66              found

DBG(114899947)> CPU TRACE: 0: 00432:001263 0 600102450100 (STZ PR6|102) 600102 450(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 170
          dps8 = "0"b;

001254  aa  6 00103 4501 00   stz       pr6|67              dps8

DBG(114899949)> CPU TRACE: 0: 00432:001264 0 600103450100 (STZ PR6|103) 600103 450(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 172
          do i = 0 to 7;

001255  aa  6 00100 4501 00   stz       pr6|64              i

DBG(114899951)> CPU TRACE: 0: 00432:001265 0 600100450100 (STZ PR6|100) 600100 450(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 176
          cpu_cardp = null ();

001266  aa   776572 2370 04   ldaq      -646,ic             000060 = 077777000043 000001000000

DBG(114900087)> CPU TRACE: 0: 00432:001276 0 776606237004 (LDAQ 776606,IC) 776606 237(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 177
cpu_loop:
          call config_$find (CPU_CARD_WORD, cpu_cardp);

001270  aa   776521 3520 04   epp2      -687,ic             000011 = 143160165040

DBG(114900091)> CPU TRACE: 0: 00432:001300 0 776536352004 (EPP2 776536,IC) 776536 352(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 179
          if cpu_cardp = null () then go to cpu_loop_end;

001301  aa  6 00150 2371 00   ldaq      pr6|104             cpu_cardp

DBG(114900343)> CPU TRACE: 0: 00432:001311 0 600150237100 (LDAQ PR6|150) 600150 237(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 180
          n_cpus = n_cpus + 1;

001306  aa  6 00104 0541 00   aos       pr6|68              n_cpus

DBG(114900351)> CPU TRACE: 0: 00432:001315 0 600104054100 (AOS PR6|104) 600104 054(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 182
          tag = cpu_card.tag - 1;

001307  aa  6 00150 3735 20   epp7      pr6|104,*           cpu_cardp

DBG(114900353)> CPU TRACE: 0: 00432:001316 0 600150373520 (EPP7 PR6|150,N*) 600150 373(1) 1 0 1 00

                                                            STATEMENT 1 ON LINE 183
          if (tag < 0) | (tag > 7)
          then                                              /* Make sure tag is legit. */
               call syserr (CRASH, "scas_init: Illegal tag on ^a config card.", CPU_CARD_WORD);

001313  aa   000007 1160 07   cmpq      7,dl

DBG(114900361)> CPU TRACE: 0: 00432:001322 0 000003604004 (TMI 000003,IC) 000003 604(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 187
          pdp = addr (scs$processor_data (tag));

001346  aa  6 00111 7271 00   lxl7      pr6|73              tag

DBG(114900367)> CPU TRACE: 0: 00432:001351 0 600111727100 (LXL7 PR6|111) 600111 727(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 188
          if pdata.offline
          then                                              /* If we already saw config card for this CPU ... */
               call syserr (CRASH, "scas_init: ^a ^a appears twice in config deck.", CPU_CARD_WORD, tag_letter (tag));

001352  aa  7 00000 2351 00   lda       pr7|0               pdata.offline

DBG(114900375)> CPU TRACE: 0: 00432:001355 0 700000235100 (LDA PR7|0) 700000 235(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 192
          if tag = scs$bos_processor_tag then do;

001404  aa  6 00111 2361 00   ldq       pr6|73              tag

DBG(114900381)> CPU TRACE: 0: 00432:001407 0 600111236100 (LDQ PR6|111) 600111 236(0) 1 0 0 00

001407  aa   000057 6010 04   tnz       47,ic               001466
                                                            STATEMENT 1 ON LINE 193
               found = "1"b;

001410  aa   400000 2350 03   lda       131072,du

DBG(114900389)> CPU TRACE: 0: 00432:001413 0 400000235003 (LDA 400000,DU) 400000 235(0) 0 0 0 03

                                                            STATEMENT 1 ON LINE 194
               if cpu_card.state ^= "on  " then do;

001412  aa  6 00150 3735 20   epp7      pr6|104,*           cpu_cardp

DBG(114900393)> CPU TRACE: 0: 00432:001415 0 600150373520 (EPP7 PR6|150,N*) 600150 373(1) 1 0 1 00

                                                            STATEMENT 1 ON LINE 199
               rswp = addr (scs$processor_switch_data (2));

001453  aa  6 00044 3701 20   epp4      pr6|36,*

DBG(114900401)> CPU TRACE: 0: 00432:001456 0 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
                                                            STATEMENT 1 ON LINE 200
               if dps8_rsw_2.cpu_type > 0 then dps8 = "1"b;

001457  aa  5 00000 2351 00   lda       pr5|0               dps8_rsw_2.cpu_type

DBG(114900409)> CPU TRACE: 0: 00432:001462 0 500000235100 (LDA PR5|0) 500000 235(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 201
               end;

001465  aa   000007 7100 04   tra       7,ic                001474

DBG(114900421)> CPU TRACE: 0: 00432:001470 0 000007710004 (TRA 000007,IC) 000007 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 204
          cport = cpu_card.port;

001474  aa  7 00002 2361 00   ldq       pr7|2               cpu_card.port

DBG(114900423)> CPU TRACE: 0: 00432:001477 0 700002236100 (LDQ PR7|2) 700002 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 206
          if cport < cpu_low_port then cpu_low_port = cport;

001476  aa  6 00121 1161 00   cmpq      pr6|81              cpu_low_port

DBG(114900427)> CPU TRACE: 0: 00432:001501 0 600121116100 (CMPQ PR6|121) 600121 116(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 207
          if cport > cpu_high_port then cpu_high_port = cport;

001501  aa  6 00122 1161 00   cmpq      pr6|82              cpu_high_port

DBG(114900433)> CPU TRACE: 0: 00432:001504 0 600122116100 (CMPQ PR6|122) 600122 116(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 209
          if cpu_card.expander_port ^= -1 then do;

001504  aa  7 00007 2361 00   ldq       pr7|7               cpu_card.expander_port

DBG(114900439)> CPU TRACE: 0: 00432:001507 0 700007236100 (LDQ PR7|7) 700007 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 237
          else if scs$expanded_ports (cport)
               then call syserr (CRASH, "scas_init: SCU port ^d configured as both expanded and non-expanded port.",
                         cport);

001745  aa  6 00106 7271 00   lxl7      pr6|70              cport

DBG(114900445)> CPU TRACE: 0: 00432:001737 0 600106727100 (LXL7 PR6|106) 600106 727(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 240
          pdata.controller_port = cport;

001776  aa  6 00106 2361 00   ldq       pr6|70              cport

DBG(114900453)> CPU TRACE: 0: 00432:001770 0 600106236100 (LDQ PR6|106) 600106 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 241
          scs$cow (tag).controller_port = cport;

002002  aa  6 00111 2361 00   ldq       pr6|73              tag

DBG(114900461)> CPU TRACE: 0: 00432:001774 0 600111236100 (LDQ PR6|111) 600111 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 242
          scs$cow_ptrs (tag).rel_cow_ptr = rel (addr (scs$cow (tag).cow));

002013  aa  6 00111 2361 00   ldq       pr6|73              tag

DBG(114900479)> CPU TRACE: 0: 00432:002005 0 700001371517 (EPP5 PR7|1,7) 700001 371(1) 1 0 0 17

                                                            STATEMENT 1 ON LINE 244
          scs$cow_ptrs (tag).tag = "00"b3;

002022  aa   002111 2350 04   lda       1097,ic             004133 = 777777777700

DBG(114900489)> CPU TRACE: 0: 00432:002012 0 002035235004 (LDA 002035,IC) 002035 235(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 245
          pdata.offline = "1"b;

002024  aa   200000 2350 03   lda       65536,du

DBG(114900493)> CPU TRACE: 0: 00432:002014 0 200000235003 (LDA 200000,DU) 200000 235(0) 0 0 0 03

                                                            STATEMENT 1 ON LINE 247
          if sys_info$collection_1_phase = CRASH_INITIALIZATION
                                                            /* keep all on cpu's enabled on bootload scu */
          then if cpu_card.state = "on  " then call scr_util$set_port_enable_bit (cport, "1"b);

002026  la  4 00062 2361 20   ldq       pr4|50,*            sys_info$collection_1_phase

DBG(114900497)> CPU TRACE: 0: 00432:002016 0 400760236120 (LDQ PR4|760,N*) 400760 236(0) 1 0 1 00

                                                            STATEMENT 1 ON LINE 250
          go to cpu_loop;

002050  aa   777220 7100 04   tra       -368,ic             001270

                                                            STATEMENT 1 ON LINE 177
cpu_loop:
          call config_$find (CPU_CARD_WORD, cpu_cardp);

001270  aa   776521 3520 04   epp2      -687,ic             000011 = 143160165040

DBG(114900503)> CPU TRACE: 0: 00432:001300 0 776536352004 (EPP2 776536,IC) 776536 352(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 179
          if cpu_cardp = null () then go to cpu_loop_end;

001301  aa  6 00150 2371 00   ldaq      pr6|104             cpu_cardp

DBG(114900793)> CPU TRACE: 0: 00432:001311 0 600150237100 (LDAQ PR6|150) 600150 237(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 180
          n_cpus = n_cpus + 1;

001306  aa  6 00104 0541 00   aos       pr6|68              n_cpus

DBG(114900801)> CPU TRACE: 0: 00432:001315 0 600104054100 (AOS PR6|104) 600104 054(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 182
          tag = cpu_card.tag - 1;

001307  aa  6 00150 3735 20   epp7      pr6|104,*           cpu_cardp

DBG(114900803)> CPU TRACE: 0: 00432:001316 0 600150373520 (EPP7 PR6|150,N*) 600150 373(1) 1 0 1 00

                                                            STATEMENT 1 ON LINE 183
          if (tag < 0) | (tag > 7)
          then                                              /* Make sure tag is legit. */
               call syserr (CRASH, "scas_init: Illegal tag on ^a config card.", CPU_CARD_WORD);

001313  aa   000007 1160 07   cmpq      7,dl

DBG(114900811)> CPU TRACE: 0: 00432:001322 0 000003604004 (TMI 000003,IC) 000003 604(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 187
          pdp = addr (scs$processor_data (tag));

001346  aa  6 00111 7271 00   lxl7      pr6|73              tag

DBG(114900817)> CPU TRACE: 0: 00432:001351 0 600111727100 (LXL7 PR6|111) 600111 727(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 188
          if pdata.offline
          then                                              /* If we already saw config card for this CPU ... */
               call syserr (CRASH, "scas_init: ^a ^a appears twice in config deck.", CPU_CARD_WORD, tag_letter (tag));

001352  aa  7 00000 2351 00   lda       pr7|0               pdata.offline

DBG(114900825)> CPU TRACE: 0: 00432:001355 0 700000235100 (LDA PR7|0) 700000 235(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 192
          if tag = scs$bos_processor_tag then do;

001404  aa  6 00111 2361 00   ldq       pr6|73              tag

DBG(114900831)> CPU TRACE: 0: 00432:001407 0 600111236100 (LDQ PR6|111) 600111 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 202
          else if cpu_card.type = "dps8" then dps8 = "1"b;

001466  aa  6 00150 3735 20   epp7      pr6|104,*           cpu_cardp

DBG(114900839)> CPU TRACE: 0: 00432:001471 0 600150373520 (EPP7 PR6|150,N*) 600150 373(1) 1 0 1 00

                                                            STATEMENT 1 ON LINE 204
          cport = cpu_card.port;

001474  aa  7 00002 2361 00   ldq       pr7|2               cpu_card.port

DBG(114900851)> CPU TRACE: 0: 00432:001477 0 700002236100 (LDQ PR7|2) 700002 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 206
          if cport < cpu_low_port then cpu_low_port = cport;

001476  aa  6 00121 1161 00   cmpq      pr6|81              cpu_low_port

DBG(114900855)> CPU TRACE: 0: 00432:001501 0 600121116100 (CMPQ PR6|121) 600121 116(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 207
          if cport > cpu_high_port then cpu_high_port = cport;

001501  aa  6 00122 1161 00   cmpq      pr6|82              cpu_high_port

DBG(114900861)> CPU TRACE: 0: 00432:001504 0 600122116100 (CMPQ PR6|122) 600122 116(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 209
          if cpu_card.expander_port ^= -1 then do;

001504  aa  7 00007 2361 00   ldq       pr7|7               cpu_card.expander_port

DBG(114900865)> CPU TRACE: 0: 00432:001507 0 700007236100 (LDQ PR7|7) 700007 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 237
          else if scs$expanded_ports (cport)
               then call syserr (CRASH, "scas_init: SCU port ^d configured as both expanded and non-expanded port.",
                         cport);

001745  aa  6 00106 7271 00   lxl7      pr6|70              cport

DBG(114900871)> CPU TRACE: 0: 00432:001737 0 600106727100 (LXL7 PR6|106) 600106 727(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 240
          pdata.controller_port = cport;

001776  aa  6 00106 2361 00   ldq       pr6|70              cport

DBG(114900879)> CPU TRACE: 0: 00432:001770 0 600106236100 (LDQ PR6|106) 600106 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 241
          scs$cow (tag).controller_port = cport;

002002  aa  6 00111 2361 00   ldq       pr6|73              tag

DBG(114900887)> CPU TRACE: 0: 00432:001774 0 600111236100 (LDQ PR6|111) 600111 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 242
          scs$cow_ptrs (tag).rel_cow_ptr = rel (addr (scs$cow (tag).cow));

002013  aa  6 00111 2361 00   ldq       pr6|73              tag

DBG(114900905)> CPU TRACE: 0: 00432:002005 0 700001371517 (EPP5 PR7|1,7) 700001 371(1) 1 0 0 17

                                                            STATEMENT 1 ON LINE 244
          scs$cow_ptrs (tag).tag = "00"b3;

002022  aa   002111 2350 04   lda       1097,ic             004133 = 777777777700

DBG(114900915)> CPU TRACE: 0: 00432:002012 0 002035235004 (LDA 002035,IC) 002035 235(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 245
          pdata.offline = "1"b;

002024  aa   200000 2350 03   lda       65536,du

DBG(114900919)> CPU TRACE: 0: 00432:002014 0 200000235003 (LDA 200000,DU) 200000 235(0) 0 0 0 03

                                                            STATEMENT 1 ON LINE 247
          if sys_info$collection_1_phase = CRASH_INITIALIZATION
                                                            /* keep all on cpu's enabled on bootload scu */
          then if cpu_card.state = "on  " then call scr_util$set_port_enable_bit (cport, "1"b);

002026  la  4 00062 2361 20   ldq       pr4|50,*            sys_info$collection_1_phase

DBG(114900923)> CPU TRACE: 0: 00432:002016 0 400760236120 (LDQ PR4|760,N*) 400760 236(0) 1 0 1 00

                                                            STATEMENT 1 ON LINE 250
          go to cpu_loop;

002050  aa   777220 7100 04   tra       -368,ic             001270

DBG(114900927)> CPU TRACE: 0: 00432:002020 0 777260601004 (TNZ 777260,IC) 777260 601(0) 0 0 0 04

cpu_loop:
          call config_$find (CPU_CARD_WORD, cpu_cardp);

001270  aa   776521 3520 04   epp2      -687,ic             000011 = 143160165040

DBG(114900929)> CPU TRACE: 0: 00432:001300 0 776536352004 (EPP2 776536,IC) 776536 352(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 179
          if cpu_cardp = null () then go to cpu_loop_end;

001301  aa  6 00150 2371 00   ldaq      pr6|104             cpu_cardp

DBG(114901839)> CPU TRACE: 0: 00432:001311 0 600150237100 (LDAQ PR6|150) 600150 237(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 252
cpu_loop_end:
          if n_cpus < 1
          then                                              /* Must be at least one card. */
               call syserr (CRASH, "scas_init: No ^a config card.", CPU_CARD_WORD);

002051  aa  6 00104 2361 00   ldq       pr6|68              n_cpus

DBG(114901847)> CPU TRACE: 0: 00432:002041 0 600104236100 (LDQ PR6|104) 600104 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 257
          if ^found then call syserr (CRASH, "scas_init: No config card for bootload ^a.", CPU_CARD_WORD);

002100  aa  6 00102 2351 00   lda       pr6|66              found

DBG(114901853)> CPU TRACE: 0: 00432:002070 0 600102235100 (LDA PR6|102) 600102 235(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 261
          n_mems = 0;

002126  aa  6 00105 4501 00   stz       pr6|69              n_mems

DBG(114901857)> CPU TRACE: 0: 00432:002116 0 600105450100 (STZ PR6|105) 600105 450(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 262
          found = "0"b;

002127  aa  6 00102 4501 00   stz       pr6|66              found

DBG(114901859)> CPU TRACE: 0: 00432:002117 0 600102450100 (STZ PR6|102) 600102 450(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 263
          expected_base = 0;

002130  aa  6 00117 4501 00   stz       pr6|79              expected_base

DBG(114901861)> CPU TRACE: 0: 00432:002120 0 600117450100 (STZ PR6|117) 600117 450(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 265
          mem_cardp = null ();

002131  aa   775727 2370 04   ldaq      -1065,ic            000060 = 077777000043 000001000000

DBG(114901863)> CPU TRACE: 0: 00432:002121 0 775763237004 (LDAQ 775763,IC) 775763 237(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 266
mem_loop:
          call config_$find ("mem ", mem_cardp);

002133  aa   775676 2350 04   lda       -1090,ic            000031 = 155145155040

DBG(114901867)> CPU TRACE: 0: 00432:002123 0 775732235004 (LDA 775732,IC) 775732 235(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 268
          if mem_cardp = null () then go to mem_loop_end;

002146  aa  6 00146 2371 00   ldaq      pr6|102             mem_cardp

DBG(114902175)> CPU TRACE: 0: 00432:002136 0 600146237100 (LDAQ PR6|146) 600146 237(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 269
          n_mems = n_mems + 1;

002153  aa  6 00105 0541 00   aos       pr6|69              n_mems

DBG(114902183)> CPU TRACE: 0: 00432:002142 0 600105054100 (AOS PR6|105) 600105 054(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 271
          tag = mem_card.tag - 1;

002154  aa  6 00146 3735 20   epp7      pr6|102,*           mem_cardp

DBG(114902185)> CPU TRACE: 0: 00432:002143 0 600146373520 (EPP7 PR6|146,N*) 600146 373(1) 1 0 1 00

                                                            STATEMENT 1 ON LINE 272
          if (tag < 0) | (tag > 7)
          then                                              /* Make sure tag is legitimate. */
               call syserr (CRASH, "scas_init: Illegal tag on ^a config card.", MEM_CARD_WORD);

002160  aa   000007 1160 07   cmpq      7,dl

DBG(114902193)> CPU TRACE: 0: 00432:002147 0 000003604004 (TMI 000003,IC) 000003 604(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 276
          if dps8
          then                                              /* if  a dps8 cpu in config deck... */
               if tag > 3
               then call syserr (CRASH,                     /* only  MEM tags A, B, C, and D are allowed */
                         "scas_init: ^a ^a. Tags greater than ""D"" not supported by DPS8 CPUs", MEM_CARD_WORD,
                         tag_letter (tag));

002213  aa  6 00103 2351 00   lda       pr6|67              dps8

DBG(114902199)> CPU TRACE: 0: 00432:002176 0 600103235100 (LDA PR6|103) 600103 235(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 283
          cdp = addr (scs$controller_data (tag));

002250  aa  6 00111 2361 00   ldq       pr6|73              tag

DBG(114902209)> CPU TRACE: 0: 00432:002233 0 600111236100 (LDQ PR6|111) 600111 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 284
          if cdata.online | cdata.offline
          then                                              /* See if controller already found. */
               call syserr (CRASH, "scas_init: ^a ^a appears twice in config deck.", MEM_CARD_WORD, tag_letter (tag));

002255  aa  7 00002 2351 00   lda       pr7|2               cdata.offline

DBG(114902219)> CPU TRACE: 0: 00432:002240 0 700002235100 (LDA PR7|2) 700002 235(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 288
          if mem_card.state = "on  "
          then                                              /* See if controller is online. */
               cdata.online = "1"b;

002315  aa  6 00146 3735 20   epp7      pr6|102,*           mem_cardp

DBG(114902225)> CPU TRACE: 0: 00432:002273 0 600146373520 (EPP7 PR6|146,N*) 600146 373(1) 1 0 1 00

                                                            STATEMENT 1 ON LINE 298
          call rsw_util$port_info (tag, enabled, base, size, interlace);

002365  aa  6 00111 3521 00   epp2      pr6|73              tag

DBG(114902241)> CPU TRACE: 0: 00432:002342 0 600111352100 (EPP2 PR6|111) 600111 352(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 301
          if base = 0 then do;

002404  aa  6 00114 2361 00   ldq       pr6|76              base

DBG(114902579)> CPU TRACE: 0: 00432:002361 0 600114236100 (LDQ PR6|114) 600114 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 302
               if found
               then                                         /* If more than one low-order system controller ... */
                    call syserr (CRASH, "scas_init: More than one low-order MEM.");

002406  aa  6 00102 2351 00   lda       pr6|66              found

DBG(114902583)> CPU TRACE: 0: 00432:002363 0 600102235100 (LDA PR6|102) 600102 235(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 305
               else do;

                                                            STATEMENT 1 ON LINE 306
                    found = "1"b;

002431  aa   400000 2350 03   lda       131072,du

DBG(114902587)> CPU TRACE: 0: 00432:002406 0 400000235003 (LDA 400000,DU) 400000 235(0) 0 0 0 03

                                                            STATEMENT 1 ON LINE 307
                    if cdata.offline then do;

002433  aa  6 00142 3735 20   epp7      pr6|98,*            cdp

DBG(114902591)> CPU TRACE: 0: 00432:002410 0 600142373520 (EPP7 PR6|142,N*) 600142 373(1) 1 0 1 00

                                                            STATEMENT 1 ON LINE 317
          if cdata.online & ^enabled then do;

002473  aa  6 00113 2351 00   lda       pr6|75              enabled

DBG(114902599)> CPU TRACE: 0: 00432:002450 0 600142373520 (EPP7 PR6|142,N*) 600142 373(1) 1 0 1 00
DBG(114902601)> CPU TRACE: 0: 00432:002451 0 700002235100 (LDA PR7|2) 700002 235(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 323
          call rsw_util$init_rsw_mask (tag, (cdata.online));

002541  aa  6 00142 3735 20   epp7      pr6|98,*            cdp

DBG(114902613)> CPU TRACE: 0: 00432:002514 0 600142373520 (EPP7 PR6|142,N*) 600142 373(1) 1 0 1 00

                                                            STATEMENT 1 ON LINE 325
          cdata.size = size;

002556  aa  6 00115 2361 00   ldq       pr6|77              size

DBG(114902797)> CPU TRACE: 0: 00432:002531 0 600115236100 (LDQ PR6|115) 600115 236(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 326
          cdata.base = base;

002562  aa  6 00114 2361 00   ldq       pr6|76              base

DBG(114902805)> CPU TRACE: 0: 00432:002535 0 600114236100 (LDQ PR6|114) 600114 236(0) 1 0 0 00
Unless otherwise stated, the content of this page is licensed under Creative Commons Attribution-ShareAlike 3.0 License