CAC 2016-02-05 part 2

map355 part2

ENTRY TO get_shortest_pathname_                             STATEMENT 1 ON LINE 105
get_shortest_pathname_:
          entry (bv_input_pathname, bv_output_pathname, bv_err_code);

000025  at     000003000003
000026  tt     000003000004
000027  ta     000025000000
000030  da     000077300000
000031  aa   000360 6270 00   eax7      240
000032  aa  7 00034 3521 20   epp2      pr7|28,*
000033  aa  2 01046 2721 00   tsp2      pr2|550             ext_entry_desc
000034  aa     000006000000
000035  aa     000000000000
000036  aa  6 00042 3735 20   epp7      pr6|34,*
000037  aa  7 00000 2361 20   ldq       pr7|0,*
000040  aa   000002 6040 04   tmi       2,ic                000042
000041  aa   777777 3760 07   anq       262143,dl
000042  aa  0 00250 3761 00   anq       pr0|168             = 000077777777
000043  aa  6 00262 7561 00   stq       pr6|178^L000044  aa  7 00002 2361 20   ldq       pr7|2,*
000045  aa   000002 6040 04   tmi       2,ic                000047
000046  aa   777777 3760 07   anq       262143,dl
000047  aa  0 00250 3761 00   anq       pr0|168             = 000077777777
000050  aa  6 00263 7561 00   stq       pr6|179

DBG(446289069)> CPU TRACE: 00306:006127 4 000360627000 (EAX7 000360) 000360 627(0) 0 0 0 00
DBG(446289071)> CPU TRACE: 00306:006130 4 700034352120 (EPP2 PR7|34,N*) 700034 352(0) 1 0 1 00
DBG(446289073)> CPU TRACE: 00306:006131 4 201046272100 (TSP2 PR2|1046) 201046 272(0) 1 0 0 00
DBG(446289129)> CPU TRACE: 00306:006134 4 600042373520 (EPP7 PR6|42,N*) 600042 373(1) 1 0 1 00
DBG(446289131)> CPU TRACE: 00306:006135 4 700000236120 (LDQ PR7|0,N*) 700000 236(0) 1 0 1 00
DBG(446289133)> CPU TRACE: 00306:006136 4 000002604004 (TMI 000002,IC) 000002 604(0) 0 0 0 04
DBG(446289135)> CPU TRACE: 00306:006140 4 000250376100 (ANQ PR0|250) 000250 376(0) 1 0 0 00
DBG(446289137)> CPU TRACE: 00306:006141 4 600262756100 (STQ PR6|262) 600262 756(0) 1 0 0 00
DBG(446289139)> CPU TRACE: 00306:006142 4 700002236120 (LDQ PR7|2,N*) 700002 236(0) 1 0 1 00
DBG(446289141)> CPU TRACE: 00306:006143 4 000002604004 (TMI 000002,IC) 000002 604(0) 0 0 0 04
DBG(446289143)> CPU TRACE: 00306:006145 4 000250376100 (ANQ PR0|250) 000250 376(0) 1 0 0 00
DBG(446289145)> CPU TRACE: 00306:006146 4 600263756100 (STQ PR6|263) 600263 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 108
          desired_type = "shortest";

000051  aa   777743 2370 04   ldaq      -29,ic              000014 = 163150157162 164145163164
000052  aa  6 00106 7571 00   staq      pr6|70              desired_type

DBG(446289147)> CPU TRACE: 00306:006147 4 777743237004 (LDAQ 777743,IC) 777743 237(0) 0 0 0 04
DBG(446289149)> CPU TRACE: 00306:006150 4 600106757100 (STAQ PR6|106) 600106 757(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 110
          goto common_code;

000053  aa   000053 7100 04   tra       43,ic               000126

DBG(446289151)> CPU TRACE: 00306:006151 4 000053710004 (TRA 000053,IC) 000053 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 137
common_code:
          name_len = length (bv_input_pathname) - verify (reverse (bv_input_pathname), " ") + 1;

000126  aa  6 00032 3735 20   epp7      pr6|26,*
000127  aa  7 00002 3715 20   epp5      pr7|2,*
000130  aa  6 00262 2361 00   ldq       pr6|178
000131  aa  000 000 165 540   tctr      (pr,rl)
000132  aa  5 00000 00 0006   desc9a    pr5|0,ql            bv_input_pathname
000133  aa  0 76605 0001 00   arg       pr0|-635            = 777777777777
000134  aa  6 00056 0001 00   arg       pr6|46
000135  aa  6 00056 2361 00   ldq       pr6|46
000136  aa  0 00242 3761 00   anq       pr0|162             = 000777777777
000137  aa   000002 6070 04   ttf       2,ic                000141
000140  aa   000001 3360 07   lcq       1,dl
000141  aa   000001 0760 07   adq       1,dl
000142  aa  6 00264 7561 00   stq       pr6|180
000143  aa  6 00262 2361 00   ldq       pr6|178
000144  aa  6 00264 1761 00   sbq       pr6|180
000145  aa   000001 0760 07   adq       1,dl
000146  aa  6 00103 7561 00   stq       pr6|67              name_len

DBG(446289153)> CPU TRACE: 00306:006224 4 600032373520 (EPP7 PR6|32,N*) 600032 373(1) 1 0 1 00
DBG(446289155)> CPU TRACE: 00306:006225 4 700002371520 (EPP5 PR7|2,N*) 700002 371(1) 1 0 1 00
DBG(446289157)> CPU TRACE: 00306:006226 4 600262236100 (LDQ PR6|262) 600262 236(0) 1 0 0 00
DBG(446289159)> CPU TRACE: 00306:006227 4 000000165540 (TCTR PR0|0,F1) 000000 165(1) 0 0 0 00
DBG(446289161)> CPU TRACE: 00306:006233 4 600056236100 (LDQ PR6|56) 600056 236(0) 1 0 0 00
DBG(446289163)> CPU TRACE: 00306:006234 4 000242376100 (ANQ PR0|242) 000242 376(0) 1 0 0 00
DBG(446289165)> CPU TRACE: 00306:006235 4 000002607004 (TTF 000002,IC) 000002 607(0) 0 0 0 04
DBG(446289167)> CPU TRACE: 00306:006237 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(446289169)> CPU TRACE: 00306:006240 4 600264756100 (STQ PR6|264) 600264 756(0) 1 0 0 00
DBG(446289171)> CPU TRACE: 00306:006241 4 600262236100 (LDQ PR6|262) 600262 236(0) 1 0 0 00
DBG(446289173)> CPU TRACE: 00306:006242 4 600264176100 (SBQ PR6|264) 600264 176(0) 1 0 0 00
DBG(446289175)> CPU TRACE: 00306:006243 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(446289177)> CPU TRACE: 00306:006244 4 600103756100 (STQ PR6|103) 600103 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 139
          in_name = substr (bv_input_pathname, 1, name_len) || ">";

000147  aa   000001 0760 07   adq       1,dl
000150  aa  0 00551 7001 00   tsx0      pr0|361             alloc_char_temp
000151  aa  6 00103 2351 00   lda       pr6|67              name_len
000152  aa  040 140 100 540   mlr       (pr,rl),(pr,rl),fill(040)
000153  aa  5 00000 00 0005   desc9a    pr5|0,al            bv_input_pathname
000154  aa  2 00000 00 0005   desc9a    pr2|0,al
000155  aa  040 105 100 404   mlr       (ic),(pr,al),fill(040)
000156  aa   000624 00 0001   desc9a    404,1               001001 = 076000000000
000157  aa  2 00000 00 0001   desc9a    pr2|0,1
000160  aa   000250 1160 07   cmpq      168,dl
000161  aa   000002 6040 04   tmi       2,ic                000163
000162  aa   000250 2360 07   ldq       168,dl
000163  aa  6 00120 7561 00   stq       pr6|80              in_name
000164  aa  040 140 100 540   mlr       (pr,rl),(pr,rl),fill(040)
000165  aa  2 00000 00 0006   desc9a    pr2|0,ql
000166  aa  6 00121 00 0006   desc9a    pr6|81,ql           in_name

DBG(446289179)> CPU TRACE: 00306:006245 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(446289181)> CPU TRACE: 00306:006246 4 000551700100 (TSX0 PR0|551) 000551 700(0) 1 0 0 00
DBG(446289231)> CPU TRACE: 00306:006247 4 600103235100 (LDA PR6|103) 600103 235(0) 1 0 0 00
DBG(446289233)> CPU TRACE: 00306:006250 4 040140100540 (MLR PR0|40140,F1) 040140 100(1) 0 0 0 00
DBG(446289233)> CPU TRACE: MLR special case #1
DBG(446289235)> CPU TRACE: 00306:006253 4 040105100404 (MLR 040105,IC) 040105 100(1) 0 0 0 00
DBG(446289237)> CPU TRACE: 00306:006256 4 000250116007 (CMPQ 000250,DL) 000250 116(0) 0 0 0 07
DBG(446289239)> CPU TRACE: 00306:006257 4 000002604004 (TMI 000002,IC) 000002 604(0) 0 0 0 04
DBG(446289241)> CPU TRACE: 00306:006261 4 600120756100 (STQ PR6|120) 600120 756(0) 1 0 0 00
DBG(446289243)> CPU TRACE: 00306:006262 4 040140100540 (MLR PR0|40140,F1) 040140 100(1) 0 0 0 00

                                                            STATEMENT 1 ON LINE 141
          cur_loc = 1;

000167  aa  0 01014 7001 00   tsx0      pr0|524             shorten_stack
000170  aa   000001 2360 07   ldq       1,dl
000171  aa  6 00102 7561 00   stq       pr6|66              cur_loc

DBG(446289245)> CPU TRACE: 00306:006265 4 001014700100 (TSX0 PR0|1014) 001014 700(0) 1 0 0 00
DBG(446289259)> CPU TRACE: 00306:006266 4 000001236007 (LDQ 000001,DL) 000001 236(0) 0 0 0 07
DBG(446289261)> CPU TRACE: 00306:006267 4 600102756100 (STQ PR6|102) 600102 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 142
          out_name = "";

000172  aa  6 00173 4501 00   stz       pr6|123             out_name

DBG(446289263)> CPU TRACE: 00306:006270 4 600173450100 (STZ PR6|173) 600173 450(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 144
          area_ptr = get_system_free_area_ ();

000173  aa  6 00246 3521 00   epp2      pr6|166             area_ptr
000174  aa  6 00270 2521 00   spri2     pr6|184
000175  aa  6 00266 6211 00   eax1      pr6|182
000176  aa   004000 4310 07   fld       2048,dl
000177  aa  6 00044 3701 20   epp4      pr6|36,*
000200  la  4 00014 3521 20   epp2      pr4|12,*            get_system_free_area_
000201  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out

DBG(446289265)> CPU TRACE: 00306:006271 4 600246352100 (EPP2 PR6|246) 600246 352(0) 1 0 0 00
DBG(446289267)> CPU TRACE: 00306:006272 4 600270252100 (SPRI2 PR6|270) 600270 252(0) 1 0 0 00
DBG(446289269)> CPU TRACE: 00306:006273 4 600266621100 (EAX1 PR6|266) 600266 621(0) 1 0 0 00
DBG(446289271)> CPU TRACE: 00306:006274 4 004000431007 (FLD 004000,DL) 004000 431(0) 0 0 0 07
DBG(446289273)> CPU TRACE: 00306:006275 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(446289275)> CPU TRACE: 00306:006276 4 400102352120 (EPP2 PR4|102,N*) 400102 352(0) 1 0 1 00
DBG(446289277)> CPU TRACE: 006276 000560657220 (SCU 000560,N*) 000560 657(0) 0 1 1 00
DBG(446289278)> CPU TRACE: 006276 000460710220 (TRA 000460,N*) 000460 710(0) 0 1 1 00
DBG(446293945)> CPU TRACE: 00306:006276 4 027334352020 (EPP2 027334,N*) 027334 352(0) 0 0 1 00
DBG(446293947)> CPU TRACE: 00306:006277 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 145
          names_ptr = null ();

000202  aa   777604 2370 04   ldaq      -124,ic             000006 = 077777000043 000001000000
000203  aa  6 00252 7571 00   staq      pr6|170             names_ptr

DBG(446294003)> CPU TRACE: 00306:006300 4 777604237004 (LDAQ 777604,IC) 777604 237(0) 0 0 0 04
DBG(446294005)> CPU TRACE: 00306:006301 4 600252757100 (STAQ PR6|252) 600252 757(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 146
          link_ptr = null ();

000204  aa  6 00250 7571 00   staq      pr6|168             link_ptr

DBG(446294007)> CPU TRACE: 00306:006302 4 600250757100 (STAQ PR6|250) 600250 757(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 148
          entry_branch.nrp = ""b;

000205  aa   777777 2350 03   lda       262143,du
000206  aa  6 00254 3551 00   ansa      pr6|172             entry_branch.nrp

DBG(446294009)> CPU TRACE: 00306:006303 4 777777235003 (LDA 777777,DU) 777777 235(0) 0 0 0 03
DBG(446294011)> CPU TRACE: 00306:006304 4 600254355100 (ANSA PR6|254) 600254 355(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 149
          link_branch.pnrp = ""b;

000207  aa  6 00257 3551 00   ansa      pr6|175             link_branch.pnrp

DBG(446294013)> CPU TRACE: 00306:006305 4 600257355100 (ANSA PR6|257) 600257 355(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 151
          call establish_cleanup_proc_ (cleanup);

000210  aa   000514 3520 04   epp2      332,ic              000724 = 000120627000
000211  aa  6 00266 2521 00   spri2     pr6|182             cp.63
000212  aa  6 00270 6521 00   spri6     pr6|184             cp.63
000213  aa  6 00266 3521 00   epp2      pr6|182             cp.63
000214  aa  6 00274 2521 00   spri2     pr6|188
000215  aa  6 00272 6211 00   eax1      pr6|186
000216  aa   004000 4310 07   fld       2048,dl
000217  aa  6 00044 3701 20   epp4      pr6|36,*
000220  la  4 00012 3521 20   epp2      pr4|10,*            establish_cleanup_proc_
000221  aa  0 00623 7001 00   tsx0      pr0|403             call_ext_out

DBG(446294015)> CPU TRACE: 00306:006306 4 000513352004 (EPP2 000513,IC) 000513 352(0) 0 0 0 04
DBG(446294017)> CPU TRACE: 00306:006307 4 600266252100 (SPRI2 PR6|266) 600266 252(0) 1 0 0 00
DBG(446294019)> CPU TRACE: 00306:006310 4 600270652100 (SPRI6 PR6|270) 600270 652(0) 1 0 0 00
DBG(446294021)> CPU TRACE: 00306:006311 4 600266352100 (EPP2 PR6|266) 600266 352(0) 1 0 0 00
DBG(446294023)> CPU TRACE: 00306:006312 4 600274252100 (SPRI2 PR6|274) 600274 252(0) 1 0 0 00
DBG(446294025)> CPU TRACE: 00306:006313 4 600272621100 (EAX1 PR6|272) 600272 621(0) 1 0 0 00
DBG(446294027)> CPU TRACE: 00306:006314 4 004000431007 (FLD 004000,DL) 004000 431(0) 0 0 0 07
DBG(446294029)> CPU TRACE: 00306:006315 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(446294031)> CPU TRACE: 00306:006316 4 400104352120 (EPP2 PR4|104,N*) 400104 352(0) 1 0 1 00
DBG(446294033)> CPU TRACE: 006316 000560657220 (SCU 000560,N*) 000560 657(0) 0 1 1 00
DBG(446294034)> CPU TRACE: 006316 000460710220 (TRA 000460,N*) 000460 710(0) 0 1 1 00
DBG(446318799)> CPU TRACE: 00306:006316 4 027336352020 (EPP2 027336,N*) 027336 352(0) 0 0 1 00
DBG(446318801)> CPU TRACE: 00306:006317 4 000623700100 (TSX0 PR0|623) 000623 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 154
               next_loc = index (substr (in_name, cur_loc + 1), ">");

000222  aa  6 00120 2361 00   ldq       pr6|80              in_name
000223  aa  6 00102 1761 00   sbq       pr6|66              cur_loc
000224  aa  6 00102 2351 00   lda       pr6|66              cur_loc
000225  aa  000 003 124 545   scm       (pr,rl,al),(du),mask(000)
000226  aa  6 00121 00 0006   desc9a    pr6|81,ql           in_name
000227  aa   076000 00 0001   desc9a    31744,1
000230  aa  6 00056 0001 00   arg       pr6|46^L000231  aa  6 00056 2361 00   ldq       pr6|46
000232  aa   000002 6070 04   ttf       2,ic                000234
000233  aa   000001 3360 07   lcq       1,dl
000234  aa   000001 0760 07   adq       1,dl
000235  aa  6 00104 7561 00   stq       pr6|68              next_loc

DBG(446318985)> CPU TRACE: 00306:006320 4 600120236100 (LDQ PR6|120) 600120 236(0) 1 0 0 00
DBG(446318987)> CPU TRACE: 00306:006321 4 600102176100 (SBQ PR6|102) 600102 176(0) 1 0 0 00
DBG(446318989)> CPU TRACE: 00306:006322 4 600102235100 (LDA PR6|102) 600102 235(0) 1 0 0 00
DBG(446318991)> CPU TRACE: 00306:006323 4 000003124545 (SCM PR0|3,SCR) 000003 124(1) 0 0 0 00
DBG(446318993)> CPU TRACE: 00306:006327 4 600056236100 (LDQ PR6|56) 600056 236(0) 1 0 0 00
DBG(446318995)> CPU TRACE: 00306:006330 4 000002607004 (TTF 000002,IC) 000002 607(0) 0 0 0 04
DBG(446318997)> CPU TRACE: 00306:006332 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(446318999)> CPU TRACE: 00306:006333 4 600104756100 (STQ PR6|104) 600104 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 155
               if next_loc = 0 then goto almost_done;

000236  aa   000450 6000 04   tze       296,ic              000706

DBG(446319001)> CPU TRACE: 00306:006334 4 000447600004 (TZE 000447,IC) 000447 600(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 157
               next_loc = cur_loc + next_loc;

000237  aa  6 00102 2361 00   ldq       pr6|66              cur_loc
000240  aa  6 00104 0561 00   asq       pr6|68              next_loc

DBG(446319003)> CPU TRACE: 00306:006335 4 600102236100 (LDQ PR6|102) 600102 236(0) 1 0 0 00
DBG(446319005)> CPU TRACE: 00306:006336 4 600104056100 (ASQ PR6|104) 600104 056(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 159
               call hcs_$status_ (substr (in_name, 1, max (cur_loc - 1, 1)), substr (in_name, cur_loc + 1, next_loc - cur_loc - 1),
                    0b, addr (entry_branch), area_ptr, bv_err_code);

000241  aa   000001 1760 07   sbq       1,dl
000242  aa   000001 1160 07   cmpq      1,dl
000243  aa   000002 6050 04   tpl       2,ic                000245
000244  aa   000001 2360 07   ldq       1,dl
000245  aa  6 00264 7561 00   stq       pr6|180
000246  aa   524000 2760 03   orq       174080,du
000247  aa  6 00265 7561 00   stq       pr6|181
000250  aa  6 00104 2361 00   ldq       pr6|68              next_loc
000251  aa  6 00102 1761 00   sbq       pr6|66              cur_loc
000252  aa   000001 1760 07   sbq       1,dl
000253  aa  6 00277 7561 00   stq       pr6|191
000254  aa   524000 2760 03   orq       174080,du
000255  aa  6 00276 7561 00   stq       pr6|190
000256  aa  6 00264 2361 00   ldq       pr6|180
000257  aa  0 00551 7001 00   tsx0      pr0|361             alloc_char_temp
000260  aa  6 00312 2521 00   spri2     pr6|202
000261  aa  040 140 100 540   mlr       (pr,rl),(pr,rl),fill(040)
000262  aa  6 00121 00 0006   desc9a    pr6|81,ql           in_name
000263  aa  2 00000 00 0006   desc9a    pr2|0,ql
000264  aa  6 00277 2361 00   ldq       pr6|191
000265  aa  0 00551 7001 00   tsx0      pr0|361             alloc_char_temp
000266  aa  6 00314 2521 00   spri2     pr6|204
000267  aa  6 00102 2351 00   lda       pr6|66              cur_loc
000270  aa  040 140 100 545   mlr       (pr,rl,al),(pr,rl),fill(040)
000271  aa  6 00121 00 0006   desc9a    pr6|81,ql           in_name
000272  aa  2 00000 00 0006   desc9a    pr2|0,ql
000273  aa  6 00304 4501 00   stz       pr6|196
000274  aa  6 00254 3735 00   epp7      pr6|172             entry_branch
000275  aa  6 00306 6535 00   spri7     pr6|198
000276  aa  6 00304 3521 00   epp2      pr6|196
000277  aa  6 00316 2521 00   spri2     pr6|206
000300  aa  6 00306 3521 00   epp2      pr6|198
000301  aa  6 00320 2521 00   spri2     pr6|208
000302  aa  6 00246 3521 00   epp2      pr6|166             area_ptr
000303  aa  6 00322 2521 00   spri2     pr6|210
000304  aa  6 00032 3715 20   epp5      pr6|26,*
000305  aa  5 00006 3521 20   epp2      pr5|6,*             bv_err_code
000306  aa  6 00324 2521 00   spri2     pr6|212
000307  aa  6 00265 3521 00   epp2      pr6|181
000310  aa  6 00326 2521 00   spri2     pr6|214
000311  aa  6 00276 3521 00   epp2      pr6|190
000312  aa  6 00330 2521 00   spri2     pr6|216
000313  aa   777465 3520 04   epp2      -203,ic             000000 = 404000000001
000314  aa  6 00332 2521 00   spri2     pr6|218
000315  aa   777465 3520 04   epp2      -203,ic             000002 = 464000000000
000316  aa  6 00334 2521 00   spri2     pr6|220
000317  aa  6 00336 2521 00   spri2     pr6|222
000320  aa   777464 3520 04   epp2      -204,ic             000004 = 514000000044
000321  aa  6 00340 2521 00   spri2     pr6|224
000322  aa  6 00310 6211 00   eax1      pr6|200
000323  aa   030000 4310 07   fld       12288,dl
000324  aa  6 00044 3701 20   epp4      pr6|36,*
000325  la  4 00016 3521 20   epp2      pr4|14,*            hcs_$status_
000326  aa  0 00622 7001 00   tsx0      pr0|402             call_ext_out_desc

DBG(446319007)> CPU TRACE: 00306:006337 4 000001176007 (SBQ 000001,DL) 000001 176(0) 0 0 0 07
DBG(446319009)> CPU TRACE: 00306:006340 4 000001116007 (CMPQ 000001,DL) 000001 116(0) 0 0 0 07
DBG(446319011)> CPU TRACE: 00306:006341 4 000002605004 (TPL 000002,IC) 000002 605(0) 0 0 0 04
DBG(446319013)> CPU TRACE: 00306:006342 4 000001236007 (LDQ 000001,DL) 000001 236(0) 0 0 0 07
DBG(446319015)> CPU TRACE: 00306:006343 4 600264756100 (STQ PR6|264) 600264 756(0) 1 0 0 00
DBG(446319017)> CPU TRACE: 00306:006344 4 524000276003 (ORQ 524000,DU) 524000 276(0) 0 0 0 03
DBG(446319019)> CPU TRACE: 00306:006345 4 600265756100 (STQ PR6|265) 600265 756(0) 1 0 0 00
DBG(446319021)> CPU TRACE: 00306:006346 4 600104236100 (LDQ PR6|104) 600104 236(0) 1 0 0 00
DBG(446319023)> CPU TRACE: 00306:006347 4 600102176100 (SBQ PR6|102) 600102 176(0) 1 0 0 00
DBG(446319025)> CPU TRACE: 00306:006350 4 000001176007 (SBQ 000001,DL) 000001 176(0) 0 0 0 07
DBG(446319027)> CPU TRACE: 00306:006351 4 600277756100 (STQ PR6|277) 600277 756(0) 1 0 0 00
DBG(446319029)> CPU TRACE: 00306:006352 4 524000276003 (ORQ 524000,DU) 524000 276(0) 0 0 0 03
DBG(446319031)> CPU TRACE: 00306:006353 4 600276756100 (STQ PR6|276) 600276 756(0) 1 0 0 00
DBG(446319033)> CPU TRACE: 00306:006354 4 600264236100 (LDQ PR6|264) 600264 236(0) 1 0 0 00
DBG(446319035)> CPU TRACE: 00306:006355 4 000551700100 (TSX0 PR0|551) 000551 700(0) 1 0 0 00
DBG(446319085)> CPU TRACE: 00306:006356 4 600312252100 (SPRI2 PR6|312) 600312 252(0) 1 0 0 00
DBG(446319087)> CPU TRACE: 00306:006357 4 040140100540 (MLR PR0|40140,F1) 040140 100(1) 0 0 0 00
DBG(446319089)> CPU TRACE: 00306:006362 4 600277236100 (LDQ PR6|277) 600277 236(0) 1 0 0 00
DBG(446319091)> CPU TRACE: 00306:006363 4 000551700100 (TSX0 PR0|551) 000551 700(0) 1 0 0 00
DBG(446319141)> CPU TRACE: 00306:006364 4 600314252100 (SPRI2 PR6|314) 600314 252(0) 1 0 0 00
DBG(446319143)> CPU TRACE: 00306:006365 4 600102235100 (LDA PR6|102) 600102 235(0) 1 0 0 00
DBG(446319145)> CPU TRACE: 00306:006366 4 040140100545 (MLR PR0|40140,SCR) 040140 100(1) 0 0 0 00
DBG(446319147)> CPU TRACE: 00306:006371 4 600304450100 (STZ PR6|304) 600304 450(0) 1 0 0 00
DBG(446319149)> CPU TRACE: 00306:006372 4 600254351500 (EPP1 PR6|254) 600254 351(1) 1 0 0 00
DBG(446319151)> CPU TRACE: 00306:006373 4 600306251500 (SPRI1 PR6|306) 600306 251(1) 1 0 0 00
DBG(446319153)> CPU TRACE: 00306:006374 4 600304352100 (EPP2 PR6|304) 600304 352(0) 1 0 0 00
DBG(446319155)> CPU TRACE: 00306:006375 4 600316252100 (SPRI2 PR6|316) 600316 252(0) 1 0 0 00
DBG(446319157)> CPU TRACE: 00306:006376 4 600306352100 (EPP2 PR6|306) 600306 352(0) 1 0 0 00
DBG(446319159)> CPU TRACE: 00306:006377 4 600320252100 (SPRI2 PR6|320) 600320 252(0) 1 0 0 00
DBG(446319161)> CPU TRACE: 00306:006400 4 600246352100 (EPP2 PR6|246) 600246 352(0) 1 0 0 00
DBG(446319163)> CPU TRACE: 00306:006401 4 600322252100 (SPRI2 PR6|322) 600322 252(0) 1 0 0 00
DBG(446319165)> CPU TRACE: 00306:006402 4 600032373520 (EPP7 PR6|32,N*) 600032 373(1) 1 0 1 00
DBG(446319167)> CPU TRACE: 00306:006403 4 700006352120 (EPP2 PR7|6,N*) 700006 352(0) 1 0 1 00
DBG(446319169)> CPU TRACE: 00306:006404 4 600324252100 (SPRI2 PR6|324) 600324 252(0) 1 0 0 00
DBG(446319171)> CPU TRACE: 00306:006405 4 600265352100 (EPP2 PR6|265) 600265 352(0) 1 0 0 00
DBG(446319173)> CPU TRACE: 00306:006406 4 600326252100 (SPRI2 PR6|326) 600326 252(0) 1 0 0 00
DBG(446319175)> CPU TRACE: 00306:006407 4 600276352100 (EPP2 PR6|276) 600276 352(0) 1 0 0 00
DBG(446319177)> CPU TRACE: 00306:006410 4 600330252100 (SPRI2 PR6|330) 600330 252(0) 1 0 0 00
DBG(446319179)> CPU TRACE: 00306:006411 4 777465352004 (EPP2 777465,IC) 777465 352(0) 0 0 0 04
DBG(446319181)> CPU TRACE: 00306:006412 4 600332252100 (SPRI2 PR6|332) 600332 252(0) 1 0 0 00
DBG(446319183)> CPU TRACE: 00306:006413 4 777465352004 (EPP2 777465,IC) 777465 352(0) 0 0 0 04
DBG(446319185)> CPU TRACE: 00306:006414 4 600334252100 (SPRI2 PR6|334) 600334 252(0) 1 0 0 00
DBG(446319187)> CPU TRACE: 00306:006415 4 600336252100 (SPRI2 PR6|336) 600336 252(0) 1 0 0 00
DBG(446319189)> CPU TRACE: 00306:006416 4 777464352004 (EPP2 777464,IC) 777464 352(0) 0 0 0 04
DBG(446319191)> CPU TRACE: 00306:006417 4 600340252100 (SPRI2 PR6|340) 600340 252(0) 1 0 0 00
DBG(446319193)> CPU TRACE: 00306:006420 4 600310621100 (EAX1 PR6|310) 600310 621(0) 1 0 0 00
DBG(446319195)> CPU TRACE: 00306:006421 4 030000431007 (FLD 030000,DL) 030000 431(0) 0 0 0 07
DBG(446319197)> CPU TRACE: 00306:006422 4 600044370120 (EPP4 PR6|44,N*) 600044 370(0) 1 0 1 00
DBG(446319199)> CPU TRACE: 00306:006423 4 400106352120 (EPP2 PR4|106,N*) 400106 352(0) 1 0 1 00
DBG(446319201)> CPU TRACE: 006423 000560657220 (SCU 000560,N*) 000560 657(0) 0 1 1 00
DBG(446319202)> CPU TRACE: 006423 000460710220 (TRA 000460,N*) 000460 710(0) 0 1 1 00
DBG(446323707)> CPU TRACE: 00306:006423 4 027340352020 (EPP2 027340,N*) 027340 352(0) 0 0 1 00
DBG(446323709)> CPU TRACE: 00306:006424 4 000622700100 (TSX0 PR0|622) 000622 700(0) 1 0 0 00

161
               if bv_err_code ^= ""b
               then return;

000327  aa  0 01014 7001 00   tsx0      pr0|524             shorten_stack
000330  aa  6 00032 3735 20   epp7      pr6|26,*
000331  aa  7 00006 2351 20   lda       pr7|6,*             bv_err_code
000332  aa  0 00631 6011 00   tnz       pr0|409             return_mac

DBG(446337101)> CPU TRACE: 00306:006425 4 001014700100 (TSX0 PR0|1014) 001014 700(0) 1 0 0 00
DBG(446337115)> CPU TRACE: 00306:006426 4 600032373520 (EPP7 PR6|32,N*) 600032 373(1) 1 0 1 00
DBG(446337117)> CPU TRACE: 00306:006427 4 700006235120 (LDA PR7|6,N*) 700006 235(0) 1 0 1 00
DBG(446337119)> CPU TRACE: 00306:006430 4 000631601100 (TNZ PR0|631) 000631 601(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 164
               names_ptr = pointer (area_ptr, entry_branch.nrp);

000333  aa  6 00254 2351 00   lda       pr6|172             entry_branch.nrp
000334  aa   000022 7350 00   als       18
000335  aa  6 00246 3521 20   epp2      pr6|166,*           area_ptr
000336  aa   000000 3120 01   eawp2     0,au
000337  aa  6 00252 2521 00   spri2     pr6|170             names_ptr

DBG(446337121)> CPU TRACE: 00306:006431 4 600254235100 (LDA PR6|254) 600254 235(0) 1 0 0 00
DBG(446337123)> CPU TRACE: 00306:006432 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(446337125)> CPU TRACE: 00306:006433 4 600246352120 (EPP2 PR6|246,N*) 600246 352(0) 1 0 1 00
DBG(446337127)> CPU TRACE: 00306:006434 4 000000312001 (EAWP2 000000,AU) 000000 312(0) 0 0 0 01
DBG(446337129)> CPU TRACE: 00306:006435 4 600252252100 (SPRI2 PR6|252) 600252 252(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 165
               entry_branch.nrp = ""b;

000340  aa   777777 2350 03   lda       262143,du
000341  aa  6 00254 3551 00   ansa      pr6|172             entry_branch.nrp

DBG(446337131)> CPU TRACE: 00306:006436 4 777777235003 (LDA 777777,DU) 777777 235(0) 0 0 0 03
DBG(446337133)> CPU TRACE: 00306:006437 4 600254355100 (ANSA PR6|254) 600254 355(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 167
               if entry_branch.type = "00"b
               then link_ptr = pointer (area_ptr, link_branch.pnrp);

000342  aa  6 00254 2351 00   lda       pr6|172             entry_branch.type
000343  aa   600000 3150 03   cana      196608,du
000344  aa   000007 6010 04   tnz       7,ic                000353
000345  aa  6 00257 2351 00   lda       pr6|175             link_branch.pnrp
000346  aa   000022 7350 00   als       18
000347  aa  6 00246 3515 20   epp1      pr6|166,*           area_ptr
000350  aa   000000 3114 01   eawp1     0,au
000351  aa  6 00250 2515 00   spri1     pr6|168             link_ptr
000352  aa   000003 7100 04   tra       3,ic                000355

DBG(446337135)> CPU TRACE: 00306:006440 4 600254235100 (LDA PR6|254) 600254 235(0) 1 0 0 00
DBG(446337137)> CPU TRACE: 00306:006441 4 600000315003 (CANA 600000,DU) 600000 315(0) 0 0 0 03
DBG(446337139)> CPU TRACE: 00306:006442 4 000007601004 (TNZ 000007,IC) 000007 601(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 169
               else link_ptr = null ();

000353  aa   777433 2370 04   ldaq      -229,ic             000006 = 077777000043 000001000000
000354  aa  6 00250 7571 00   staq      pr6|168             link_ptr

DBG(446337141)> CPU TRACE: 00306:006451 4 777433237004 (LDAQ 777433,IC) 777433 237(0) 0 0 0 04
DBG(446337143)> CPU TRACE: 00306:006452 4 600250757100 (STAQ PR6|250) 600250 757(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 170
               link_branch.pnrp = ""b;

000355  aa   777777 2350 03   lda       262143,du
000356  aa  6 00257 3551 00   ansa      pr6|175             link_branch.pnrp

DBG(446337145)> CPU TRACE: 00306:006453 4 777777235003 (LDA 777777,DU) 777777 235(0) 0 0 0 03
DBG(446337147)> CPU TRACE: 00306:006454 4 600257355100 (ANSA PR6|257) 600257 355(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 172
               if desired_type = "primary " then do;

000357  aa  6 00106 2371 00   ldaq      pr6|70              desired_type
000360  aa   777430 1170 04   cmpaq     -232,ic             000010 = 160162151155 141162171040
000361  aa   000064 6010 04   tnz       52,ic               000445

DBG(446337149)> CPU TRACE: 00306:006455 4 600106237100 (LDAQ PR6|106) 600106 237(0) 1 0 0 00
DBG(446337151)> CPU TRACE: 00306:006456 4 777430117004 (CMPAQ 777430,IC) 777430 117(0) 0 0 0 04
DBG(446337153)> CPU TRACE: 00306:006457 4 000064601004 (TNZ 000064,IC) 000064 601(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 177
               else if desired_type = "shortest" then do;

000445  aa   777347 1170 04   cmpaq     -281,ic             000014 = 163150157162 164145163164
000446  aa   000114 6010 04   tnz       76,ic               000562

DBG(446337155)> CPU TRACE: 00306:006543 4 777347117004 (CMPAQ 777347,IC) 777347 117(0) 0 0 0 04
DBG(446337157)> CPU TRACE: 00306:006544 4 000114601004 (TNZ 000114,IC) 000114 601(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 178
                         output_ename_len = 33;

000447  aa   000041 2360 07   ldq       33,dl
000450  aa  6 00105 7561 00   stq       pr6|69              output_ename_len

DBG(446337159)> CPU TRACE: 00306:006545 4 000041236007 (LDQ 000041,DL) 000041 236(0) 0 0 0 07
DBG(446337161)> CPU TRACE: 00306:006546 4 600105756100 (STQ PR6|105) 600105 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 179
                         output_ename_indx = 0;

000451  aa  6 00101 4501 00   stz       pr6|65              output_ename_indx

DBG(446337163)> CPU TRACE: 00306:006547 4 600101450100 (STZ PR6|101) 600101 450(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 181
                         do indx = 1 by 1 to binary (entry_branch.nnames, 16);

000452  aa  6 00254 2351 00   lda       pr6|172             entry_branch.nnames
000453  aa   000002 7350 00   als       2
000454  aa   000070 7730 00   lrl       56
000455  aa  6 00260 7561 00   stq       pr6|176
000456  aa   000001 2360 07   ldq       1,dl
000457  aa  6 00100 7561 00   stq       pr6|64              indx
000460  aa  6 00100 2361 00   ldq       pr6|64              indx
000461  aa  6 00260 1161 00   cmpq      pr6|176
000462  aa   000035 6054 04   tpnz      29,ic               000517

DBG(446337165)> CPU TRACE: 00306:006550 4 600254235100 (LDA PR6|254) 600254 235(0) 1 0 0 00
DBG(446337167)> CPU TRACE: 00306:006551 4 000002735000 (ALS 000002) 000002 735(0) 0 0 0 00
DBG(446337169)> CPU TRACE: 00306:006552 4 000070773000 (LRL 000070) 000070 773(0) 0 0 0 00
DBG(446337171)> CPU TRACE: 00306:006553 4 600260756100 (STQ PR6|260) 600260 756(0) 1 0 0 00
DBG(446337173)> CPU TRACE: 00306:006554 4 000001236007 (LDQ 000001,DL) 000001 236(0) 0 0 0 07
DBG(446337175)> CPU TRACE: 00306:006555 4 600100756100 (STQ PR6|100) 600100 756(0) 1 0 0 00
DBG(446337177)> CPU TRACE: 00306:006556 4 600100236100 (LDQ PR6|100) 600100 236(0) 1 0 0 00
DBG(446337179)> CPU TRACE: 00306:006557 4 600260116100 (CMPQ PR6|260) 600260 116(0) 1 0 0 00
DBG(446337181)> CPU TRACE: 00306:006560 4 000035605404 (TPNZ 000035,IC) 000035 605(1) 0 0 0 04

                                                            STATEMENT 1 ON LINE 182
                              name = names_ptr -> based_names (indx);

000463  aa   000003 7360 00   qls       3
000464  aa  6 00252 3735 20   epp7      pr6|170,*           names_ptr
000465  aa  7 77770 3735 06   epp7      pr7|-8,ql           based_names
000466  aa  000 100 100 500   mlr       (pr),(pr),fill(000)
000467  aa  7 00000 00 0040   desc9a    pr7|0,32            based_names
000470  aa  6 00110 00 0040   desc9a    pr6|72,32           name

BG(446337183)> CPU TRACE: 00306:006561 4 000003736000 (QLS 000003) 000003 736(0) 0 0 0 00
DBG(446337185)> CPU TRACE: 00306:006562 4 600252373520 (EPP7 PR6|252,N*) 600252 373(1) 1 0 1 00
DBG(446337187)> CPU TRACE: 00306:006563 4 777770373506 (EPP7 PR7|77770,QL) 777770 373(1) 1 0 0 06
DBG(446337189)> CPU TRACE: 00306:006564 4 000100100500 (MLR PR0|100) 000100 100(1) 0 0 0 00

                                                            STATEMENT 1 ON LINE 183
                              name_len = length (name) - verify (reverse (name), " ") + 1;

000471  aa  000 000 165 500   tctr      (pr)
000472  aa  6 00110 00 0040   desc9a    pr6|72,32           name
000473  aa  0 76605 0001 00   arg       pr0|-635            = 777777777777
000474  aa  6 00056 0001 00   arg       pr6|46
000475  aa  6 00056 2361 00   ldq       pr6|46
000476  aa  0 00242 3761 00   anq       pr0|162             = 000777777777
000477  aa   000002 6070 04   ttf       2,ic                000501
000500  aa   000001 3360 07   lcq       1,dl
000501  aa   000001 0760 07   adq       1,dl
000502  aa  6 00304 7561 00   stq       pr6|196
000503  aa   000040 2360 07   ldq       32,dl
000504  aa  6 00304 1761 00   sbq       pr6|196
000505  aa   000001 0760 07   adq       1,dl
000506  aa  6 00103 7561 00   stq       pr6|67              name_len

DBG(446337191)> CPU TRACE: 00306:006567 4 000000165500 (TCTR PR0|0) 000000 165(1) 0 0 0 00
DBG(446337193)> CPU TRACE: 00306:006573 4 600056236100 (LDQ PR6|56) 600056 236(0) 1 0 0 00
DBG(446337195)> CPU TRACE: 00306:006574 4 000242376100 (ANQ PR0|242) 000242 376(0) 1 0 0 00
DBG(446337197)> CPU TRACE: 00306:006575 4 000002607004 (TTF 000002,IC) 000002 607(0) 0 0 0 04
DBG(446337199)> CPU TRACE: 00306:006577 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(446337201)> CPU TRACE: 00306:006600 4 600304756100 (STQ PR6|304) 600304 756(0) 1 0 0 00
DBG(446337203)> CPU TRACE: 00306:006601 4 000040236007 (LDQ 000040,DL) 000040 236(0) 0 0 0 07
DBG(446337205)> CPU TRACE: 00306:006602 4 600304176100 (SBQ PR6|304) 600304 176(0) 1 0 0 00
DBG(446337207)> CPU TRACE: 00306:006603 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(446337209)> CPU TRACE: 00306:006604 4 600103756100 (STQ PR6|103) 600103 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 184
                              if name_len < output_ename_len then do;
000507  aa  6 00105 1161 00   cmpq      pr6|69              output_ename_len
000510  aa   000005 6050 04   tpl       5,ic                000515

DBG(446337211)> CPU TRACE: 00306:006605 4 600105116100 (CMPQ PR6|105) 600105 116(0) 1 0 0 00
DBG(446337213)> CPU TRACE: 00306:006606 4 000005605004 (TPL 000005,IC) 000005 605(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 185
                                   output_ename_indx = indx;

000511  aa  6 00100 2361 00   ldq       pr6|64              indx
000512  aa  6 00101 7561 00   stq       pr6|65              output_ename_indx

DBG(446337215)> CPU TRACE: 00306:006607 4 600100236100 (LDQ PR6|100) 600100 236(0) 1 0 0 00
DBG(446337217)> CPU TRACE: 00306:006610 4 600101756100 (STQ PR6|101) 600101 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 186
                                   output_ename_len = name_len;

000513  aa  6 00103 2361 00   ldq       pr6|67              name_len
000514  aa  6 00105 7561 00   stq       pr6|69              output_ename_len

DBG(446337219)> CPU TRACE: 00306:006611 4 600103236100 (LDQ PR6|103) 600103 236(0) 1 0 0 00
DBG(446337221)> CPU TRACE: 00306:006612 4 600105756100 (STQ PR6|105) 600105 756(0) 1 0 0 00

                                                           STATEMENT 1 ON LINE 187
                                   end;

                                                            STATEMENT 1 ON LINE 188
                              end;

000515  aa  6 00100 0541 00   aos       pr6|64              indx
000516  aa   777742 7100 04   tra       -30,ic              000460

DBG(446337223)> CPU TRACE: 00306:006613 4 600100054100 (AOS PR6|100) 600100 054(0) 1 0 0 00
DBG(446337225)> CPU TRACE: 00306:006614 4 777742710004 (TRA 777742,IC) 777742 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 181
                         do indx = 1 by 1 to binary (entry_branch.nnames, 16);

000460  aa  6 00100 2361 00   ldq       pr6|64              indx
000461  aa  6 00260 1161 00   cmpq      pr6|176
000462  aa   000035 6054 04   tpnz      29,ic               000517

DBG(446337227)> CPU TRACE: 00306:006556 4 600100236100 (LDQ PR6|100) 600100 236(0) 1 0 0 00
DBG(446337229)> CPU TRACE: 00306:006557 4 600260116100 (CMPQ PR6|260) 600260 116(0) 1 0 0 00
DBG(446337231)> CPU TRACE: 00306:006560 4 000035605404 (TPNZ 000035,IC) 000035 605(1) 0 0 0 04

                                                            STATEMENT 1 ON LINE 182
                              name = names_ptr -> based_names (indx);

000463  aa   000003 7360 00   qls       3
000464  aa  6 00252 3735 20   epp7      pr6|170,*           names_ptr
000465  aa  7 77770 3735 06   epp7      pr7|-8,ql           based_names
000466  aa  000 100 100 500   mlr       (pr),(pr),fill(000)
000467  aa  7 00000 00 0040   desc9a    pr7|0,32            based_names
000470  aa  6 00110 00 0040   desc9a    pr6|72,32           name

DBG(446337233)> CPU TRACE: 00306:006561 4 000003736000 (QLS 000003) 000003 736(0) 0 0 0 00
DBG(446337235)> CPU TRACE: 00306:006562 4 600252373520 (EPP7 PR6|252,N*) 600252 373(1) 1 0 1 00
DBG(446337237)> CPU TRACE: 00306:006563 4 777770373506 (EPP7 PR7|77770,QL) 777770 373(1) 1 0 0 06
DBG(446337239)> CPU TRACE: 00306:006564 4 000100100500 (MLR PR0|100) 000100 100(1) 0 0 0 00

                                                            STATEMENT 1 ON LINE 183
                              name_len = length (name) - verify (reverse (name), " ") + 1;

000471  aa  000 000 165 500   tctr      (pr)
000472  aa  6 00110 00 0040   desc9a    pr6|72,32           name
000473  aa  0 76605 0001 00   arg       pr0|-635            = 777777777777
000474  aa  6 00056 0001 00   arg       pr6|46
000475  aa  6 00056 2361 00   ldq       pr6|46
000476  aa  0 00242 3761 00   anq       pr0|162             = 000777777777
000477  aa   000002 6070 04   ttf       2,ic                000501
000500  aa   000001 3360 07   lcq       1,dl
000501  aa   000001 0760 07   adq       1,dl
000502  aa  6 00304 7561 00   stq       pr6|196
000503  aa   000040 2360 07   ldq       32,dl
000504  aa  6 00304 1761 00   sbq       pr6|196
000505  aa   000001 0760 07   adq       1,dl
000506  aa  6 00103 7561 00   stq       pr6|67              name_len

DBG(446337241)> CPU TRACE: 00306:006567 4 000000165500 (TCTR PR0|0) 000000 165(1) 0 0 0 00
DBG(446337243)> CPU TRACE: 00306:006573 4 600056236100 (LDQ PR6|56) 600056 236(0) 1 0 0 00
DBG(446337245)> CPU TRACE: 00306:006574 4 000242376100 (ANQ PR0|242) 000242 376(0) 1 0 0 00
DBG(446337247)> CPU TRACE: 00306:006575 4 000002607004 (TTF 000002,IC) 000002 607(0) 0 0 0 04
DBG(446337249)> CPU TRACE: 00306:006577 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(446337251)> CPU TRACE: 00306:006600 4 600304756100 (STQ PR6|304) 600304 756(0) 1 0 0 00
DBG(446337253)> CPU TRACE: 00306:006601 4 000040236007 (LDQ 000040,DL) 000040 236(0) 0 0 0 07
DBG(446337255)> CPU TRACE: 00306:006602 4 600304176100 (SBQ PR6|304) 600304 176(0) 1 0 0 00
DBG(446337257)> CPU TRACE: 00306:006603 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(446337259)> CPU TRACE: 00306:006604 4 600103756100 (STQ PR6|103) 600103 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 184
                              if name_len < output_ename_len then do;

000507  aa  6 00105 1161 00   cmpq      pr6|69              output_ename_len
000510  aa   000005 6050 04   tpl       5,ic                000515

DBG(446337261)> CPU TRACE: 00306:006605 4 600105116100 (CMPQ PR6|105) 600105 116(0) 1 0 0 00
DBG(446337263)> CPU TRACE: 00306:006606 4 000005605004 (TPL 000005,IC) 000005 605(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 185
                                   output_ename_indx = indx;

000511  aa  6 00100 2361 00   ldq       pr6|64              indx
000512  aa  6 00101 7561 00   stq       pr6|65              output_ename_indx

DBG(446337265)> CPU TRACE: 00306:006607 4 600100236100 (LDQ PR6|100) 600100 236(0) 1 0 0 00
DBG(446337267)> CPU TRACE: 00306:006610 4 600101756100 (STQ PR6|101) 600101 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 186
                                   output_ename_len = name_len;

000513  aa  6 00103 2361 00   ldq       pr6|67              name_len
000514  aa  6 00105 7561 00   stq       pr6|69              output_ename_len

DBG(446337269)> CPU TRACE: 00306:006611 4 600103236100 (LDQ PR6|103) 600103 236(0) 1 0 0 00
DBG(446337271)> CPU TRACE: 00306:006612 4 600105756100 (STQ PR6|105) 600105 756(0) 1 0 0 00

                                                           STATEMENT 1 ON LINE 187
                                   end;

                                                            STATEMENT 1 ON LINE 188
                              end;

000515  aa  6 00100 0541 00   aos       pr6|64              indx
000516  aa   777742 7100 04   tra       -30,ic              000460

DBG(446337273)> CPU TRACE: 00306:006613 4 600100054100 (AOS PR6|100) 600100 054(0) 1 0 0 00
DBG(446337275)> CPU TRACE: 00306:006614 4 777742710004 (TRA 777742,IC) 777742 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 181
                         do indx = 1 by 1 to binary (entry_branch.nnames, 16);

000460  aa  6 00100 2361 00   ldq       pr6|64              indx
000461  aa  6 00260 1161 00   cmpq      pr6|176
000462  aa   000035 6054 04   tpnz      29,ic               000517

DBG(446337277)> CPU TRACE: 00306:006556 4 600100236100 (LDQ PR6|100) 600100 236(0) 1 0 0 00
DBG(446337279)> CPU TRACE: 00306:006557 4 600260116100 (CMPQ PR6|260) 600260 116(0) 1 0 0 00
DBG(446337281)> CPU TRACE: 00306:006560 4 000035605404 (TPNZ 000035,IC) 000035 605(1) 0 0 0 04

                                                            STATEMENT 1 ON LINE 189
                         out_name = out_name || ">" || substr (names_ptr -> based_names (output_ename_indx), 1, output_ename_len);

000517  aa  6 00101 2361 00   ldq       pr6|65              output_ename_indx
000520  aa   000005 7360 00   qls       5
000521  aa  6 00304 7561 00   stq       pr6|196
000522  aa  6 00173 2361 00   ldq       pr6|123             out_name
000523  aa   000001 0760 07   adq       1,dl
000524  aa  0 00551 7001 00   tsx0      pr0|361             alloc_char_temp
000525  aa  6 00173 7271 00   lxl7      pr6|123             out_name
000526  aa  040 140 100 540   mlr       (pr,rl),(pr,rl),fill(040)
000527  aa  6 00174 00 0017   desc9a    pr6|124,x7          out_name
000530  aa  2 00000 00 0017   desc9a    pr2|0,x7
000531  aa  6 00173 7271 00   lxl7      pr6|123             out_name
000532  aa  040 117 100 404   mlr       (ic),(pr,x7),fill(040)
000533  aa   000247 00 0001   desc9a    167,1               001001 = 076000000000
000534  aa  2 00000 00 0001   desc9a    pr2|0,1
000535  aa  6 00276 7561 00   stq       pr6|190
000536  aa  6 00105 0761 00   adq       pr6|69              output_ename_len
000537  aa  6 00265 7561 00   stq       pr6|181
000540  aa  0 00606 7001 00   tsx0      pr0|390             cat_realloc_chars
000541  aa  6 00276 2351 00   lda       pr6|190
000542  aa  6 00304 7271 00   lxl7      pr6|196
000543  aa  6 00252 3735 20   epp7      pr6|170,*           names_ptr
000544  aa  6 00105 2361 00   ldq       pr6|69              output_ename_len
000545  aa  040 145 100 557   mlr       (pr,rl,x7),(pr,rl,al),fill(040)
000546  aa  7 77770 00 0006   desc9a    pr7|-8,ql           based_names
000547  aa  2 00000 00 0006   desc9a    pr2|0,ql
000550  aa  6 00265 2361 00   ldq       pr6|181
000551  aa   000250 1160 07   cmpq      168,dl
000552  aa   000002 6040 04   tmi       2,ic                000554
000553  aa   000250 2360 07   ldq       168,dl
000554  aa  6 00173 7561 00   stq       pr6|123             out_name
000555  aa  040 140 100 540   mlr       (pr,rl),(pr,rl),fill(040)
000556  aa  2 00000 00 0006   desc9a    pr2|0,ql
000557  aa  6 00174 00 0006   desc9a    pr6|124,ql          out_name

DBG(446337283)> CPU TRACE: 00306:006615 4 600101236100 (LDQ PR6|101) 600101 236(0) 1 0 0 00
DBG(446337285)> CPU TRACE: 00306:006616 4 000005736000 (QLS 000005) 000005 736(0) 0 0 0 00
DBG(446337287)> CPU TRACE: 00306:006617 4 600304756100 (STQ PR6|304) 600304 756(0) 1 0 0 00
DBG(446337289)> CPU TRACE: 00306:006620 4 600173236100 (LDQ PR6|173) 600173 236(0) 1 0 0 00
DBG(446337291)> CPU TRACE: 00306:006621 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(446337293)> CPU TRACE: 00306:006622 4 000551700100 (TSX0 PR0|551) 000551 700(0) 1 0 0 00
DBG(446337343)> CPU TRACE: 00306:006623 4 600173727100 (LXL7 PR6|173) 600173 727(0) 1 0 0 00
DBG(446337345)> CPU TRACE: 00306:006624 4 040140100540 (MLR PR0|40140,F1) 040140 100(1) 0 0 0 00
DBG(446337347)> CPU TRACE: 00306:006627 4 600173727100 (LXL7 PR6|173) 600173 727(0) 1 0 0 00
DBG(446337349)> CPU TRACE: 00306:006630 4 040117100404 (MLR 040117,IC) 040117 100(1) 0 0 0 00
DBG(446337351)> CPU TRACE: 00306:006633 4 600276756100 (STQ PR6|276) 600276 756(0) 1 0 0 00
DBG(446337353)> CPU TRACE: 00306:006634 4 600105076100 (ADQ PR6|105) 600105 076(0) 1 0 0 00
DBG(446337355)> CPU TRACE: 00306:006635 4 600265756100 (STQ PR6|265) 600265 756(0) 1 0 0 00
DBG(446337357)> CPU TRACE: 00306:006636 4 000606700100 (TSX0 PR0|606) 000606 700(0) 1 0 0 00
DBG(446337395)> CPU TRACE: 00306:006637 4 600276235100 (LDA PR6|276) 600276 235(0) 1 0 0 00
DBG(446337397)> CPU TRACE: 00306:006640 4 600304727100 (LXL7 PR6|304) 600304 727(0) 1 0 0 00
DBG(446337399)> CPU TRACE: 00306:006641 4 600252373520 (EPP7 PR6|252,N*) 600252 373(1) 1 0 1 00
DBG(446337401)> CPU TRACE: 00306:006642 4 600105236100 (LDQ PR6|105) 600105 236(0) 1 0 0 00
DBG(446337403)> CPU TRACE: 00306:006643 4 040145100557 (MLR PR0|40145,IDC) 040145 100(1) 0 0 0 00
DBG(446337405)> CPU TRACE: 00306:006646 4 600265236100 (LDQ PR6|265) 600265 236(0) 1 0 0 00
DBG(446337407)> CPU TRACE: 00306:006647 4 000250116007 (CMPQ 000250,DL) 000250 116(0) 0 0 0 07
DBG(446337409)> CPU TRACE: 00306:006650 4 000002604004 (TMI 000002,IC) 000002 604(0) 0 0 0 04
DBG(446337411)> CPU TRACE: 00306:006652 4 600173756100 (STQ PR6|173) 600173 756(0) 1 0 0 00
DBG(446337413)> CPU TRACE: 00306:006653 4 040140100540 (MLR PR0|40140,F1) 040140 100(1) 0 0 0 00

                                                            STATEMENT 1 ON LINE 190
                         end;

000560  aa  0 01014 7001 00   tsx0      pr0|524             shorten_stack
000561  aa   000116 7100 04   tra       78,ic               000677

DBG(446337415)> CPU TRACE: 00306:006656 4 001014700100 (TSX0 PR0|1014) 001014 700(0) 1 0 0 00
DBG(446337429)> CPU TRACE: 00306:006657 4 000115710004 (TRA 000115,IC) 000115 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 207
               call cleanup ();

000677  aa  6 00056 6211 00   eax1      pr6|46
000700  aa   000000 4310 07   fld       0,dl
000701  aa   000023 3520 04   epp2      19,ic               000724 = 000120627000
000702  aa  0 00625 7001 00   tsx0      pr0|405             call_int_this

DBG(446337431)> CPU TRACE: 00306:006774 4 600056621100 (EAX1 PR6|56) 600056 621(0) 1 0 0 00
DBG(446337433)> CPU TRACE: 00306:006775 4 000000431007 (FLD 000000,DL) 000000 431(0) 0 0 0 07
DBG(446337435)> CPU TRACE: 00306:006776 4 000023352004 (EPP2 000023,IC) 000023 352(0) 0 0 0 04
DBG(446337437)> CPU TRACE: 00306:006777 4 000625700100 (TSX0 PR0|625) 000625 700(0) 1 0 0 00

ENTRY TO cleanup                                            STATEMENT 1 ON LINE 230
cleanup:
          procedure ();

000723  da     000126200000
000724  aa   000120 6270 00   eax7      80
000725  aa  7 00034 3521 20   epp2      pr7|28,*
000726  aa  2 01047 2721 00   tsp2      pr2|551             int_entry
000727  aa     000000000000
000730  aa     000000000000

DBG(446337457)> CPU TRACE: 00306:007021 4 000120627000 (EAX7 000120) 000120 627(0) 0 0 0 00
DBG(446337459)> CPU TRACE: 00306:007022 4 700034352120 (EPP2 PR7|34,N*) 700034 352(0) 1 0 1 00
DBG(446337461)> CPU TRACE: 00306:007023 4 201047272100 (TSP2 PR2|1047) 201047 272(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 235
          if names_ptr ^= null ()
          then free names_ptr -> based_names in (area_ptr -> based_area);^L
000731  aa  6 00040 3735 20   epp7      pr6|32,*
000732  aa  7 00252 2371 00   ldaq      pr7|170             names_ptr
000733  aa   777053 6770 04   eraq      -469,ic             000006 = 077777000043 000001000000
000734  aa  0 00460 3771 00   anaq      pr0|304             = 077777000077 777777077077
000735  aa   000003 6000 04   tze       3,ic                000740
000736  aa  7 00252 3715 00   epp5      pr7|170             names_ptr
000737  aa  0 01404 7001 00   tsx0      pr0|772             op_freen_

DBG(446337513)> CPU TRACE: 00306:007026 4 600040373520 (EPP7 PR6|40,N*) 600040 373(1) 1 0 1 00
DBG(446337515)> CPU TRACE: 00306:007027 4 700252237100 (LDAQ PR7|252) 700252 237(0) 1 0 0 00
DBG(446337517)> CPU TRACE: 00306:007030 4 777054677004 (ERAQ 777054,IC) 777054 677(0) 0 0 0 04
DBG(446337519)> CPU TRACE: 00306:007031 4 000460377100 (ANAQ PR0|460) 000460 377(0) 1 0 0 00
DBG(446337521)> CPU TRACE: 00306:007032 4 000003600004 (TZE 000003,IC) 000003 600(0) 0 0 0 04
DBG(446337523)> CPU TRACE: 00306:007033 4 700252371500 (EPP5 PR7|252) 700252 371(1) 1 0 0 00
DBG(446337525)> CPU TRACE: 00306:007034 4 001404700100 (TSX0 PR0|1404) 001404 700(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 238
          if link_ptr ^= null ()
          then free link_ptr -> based_link_pathname in (area_ptr -> based_area);

000740  aa  6 00040 3735 20   epp7      pr6|32,*
000741  aa  7 00250 2371 00   ldaq      pr7|168             link_ptr
000742  aa   777044 6770 04   eraq      -476,ic             000006 = 077777000043 000001000000
000743  aa  0 00460 3771 00   anaq      pr0|304             = 077777000077 777777077077
000744  aa   000011 6000 04   tze       9,ic                000755
000745  aa  7 00257 2351 00   lda       pr7|175             link_branch.pnl
000746  aa   000066 7730 00   lrl       54
000747  aa  6 00100 7561 00   stq       pr6|64
000750  aa   000003 0760 07   adq       3,dl
000751  aa   000002 7320 00   qrs       2
000752  aa  7 00250 3715 00   epp5      pr7|168             link_ptr
000753  aa  0 01404 7001 00   tsx0      pr0|772             op_freen_
000754  aa   000024 7100 04   tra       20,ic               001000

DBG(446337733)> CPU TRACE: 00306:007035 4 600040373520 (EPP7 PR6|40,N*) 600040 373(1) 1 0 1 00
DBG(446337735)> CPU TRACE: 00306:007036 4 700250237100 (LDAQ PR7|250) 700250 237(0) 1 0 0 00
DBG(446337737)> CPU TRACE: 00306:007037 4 777045677004 (ERAQ 777045,IC) 777045 677(0) 0 0 0 04
DBG(446337739)> CPU TRACE: 00306:007040 4 000460377100 (ANAQ PR0|460) 000460 377(0) 1 0 0 00
DBG(446337741)> CPU TRACE: 00306:007041 4 000011600004 (TZE 000011,IC) 000011 600(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 240
          else if (entry_branch.type = "00"b) & (link_branch.pnrp ^= ""b)
               then free pointer (area_ptr, link_branch.pnrp) -> based_link_pathname in (area_ptr -> based_area);

000755  aa  7 00257 2351 00   lda       pr7|175             link_branch.pnrp
000756  aa   000022 7350 00   als       18
000757  aa  6 00100 7551 00   sta       pr6|64              link_branch.pnrp
000760  aa  7 00254 2351 00   lda       pr7|172             entry_branch.type
000761  aa   600000 3150 03   cana      196608,du
000762  aa   000016 6010 04   tnz       14,ic               001000
000763  aa  6 00100 2351 00   lda       pr6|64              link_branch.pnrp
000764  aa   000014 6000 04   tze       12,ic               001000
000765  aa  7 00257 2351 00   lda       pr7|175             link_branch.pnl
000766  aa   000066 7730 00   lrl       54
000767  aa  6 00101 7561 00   stq       pr6|65
000770  aa   000003 0760 07   adq       3,dl
000771  aa   000002 7320 00   qrs       2
000772  aa  6 00100 2351 00   lda       pr6|64              link_branch.pnrp
000773  aa  7 00246 3521 20   epp2      pr7|166,*           area_ptr
000774  aa   000000 3120 01   eawp2     0,au
000775  aa  6 00102 3715 00   epp5      pr6|66
000776  aa  6 00102 2521 00   spri2     pr6|66
000777  aa  0 01404 7001 00   tsx0      pr0|772             op_freen_

DBG(446337743)> CPU TRACE: 00306:007052 4 700257235100 (LDA PR7|257) 700257 235(0) 1 0 0 00
DBG(446337745)> CPU TRACE: 00306:007053 4 000022735000 (ALS 000022) 000022 735(0) 0 0 0 00
DBG(446337747)> CPU TRACE: 00306:007054 4 600100755100 (STA PR6|100) 600100 755(0) 1 0 0 00
DBG(446337749)> CPU TRACE: 00306:007055 4 700254235100 (LDA PR7|254) 700254 235(0) 1 0 0 00
DBG(446337751)> CPU TRACE: 00306:007056 4 600000315003 (CANA 600000,DU) 600000 315(0) 0 0 0 03
DBG(446337753)> CPU TRACE: 00306:007057 4 000016601004 (TNZ 000016,IC) 000016 601(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 243
          return;

001000  aa  0 00631 7101 00   tra       pr0|409             return_mac

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

                                                            STATEMENT 1 ON LINE 209
               cur_loc = next_loc;

000703  aa  6 00104 2361 00   ldq       pr6|68              next_loc
000704  aa  6 00102 7561 00   stq       pr6|66              cur_loc

DBG(446337773)> CPU TRACE: 00306:007000 4 600104236100 (LDQ PR6|104) 600104 236(0) 1 0 0 00
DBG(446337775)> CPU TRACE: 00306:007001 4 600102756100 (STQ PR6|102) 600102 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 210
               end;

000705  aa   777315 7100 04   tra       -307,ic             000222

DBG(446337777)> CPU TRACE: 00306:007002 4 777316710004 (TRA 777316,IC) 777316 710(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 154
               next_loc = index (substr (in_name, cur_loc + 1), ">");

000222  aa  6 00120 2361 00   ldq       pr6|80              in_name
000223  aa  6 00102 1761 00   sbq       pr6|66              cur_loc
000224  aa  6 00102 2351 00   lda       pr6|66              cur_loc
000225  aa  000 003 124 545   scm       (pr,rl,al),(du),mask(000)
000226  aa  6 00121 00 0006   desc9a    pr6|81,ql           in_name
000227  aa   076000 00 0001   desc9a    31744,1
000230  aa  6 00056 0001 00   arg       pr6|46^L000231  aa  6 00056 2361 00   ldq       pr6|46
000232  aa   000002 6070 04   ttf       2,ic                000234
000233  aa   000001 3360 07   lcq       1,dl
000234  aa   000001 0760 07   adq       1,dl
000235  aa  6 00104 7561 00   stq       pr6|68              next_loc

DBG(446337779)> CPU TRACE: 00306:006320 4 600120236100 (LDQ PR6|120) 600120 236(0) 1 0 0 00
DBG(446337781)> CPU TRACE: 00306:006321 4 600102176100 (SBQ PR6|102) 600102 176(0) 1 0 0 00
DBG(446337783)> CPU TRACE: 00306:006322 4 600102235100 (LDA PR6|102) 600102 235(0) 1 0 0 00
DBG(446337785)> CPU TRACE: 00306:006323 4 000003124545 (SCM PR0|3,SCR) 000003 124(1) 0 0 0 00
DBG(446337787)> CPU TRACE: 00306:006327 4 600056236100 (LDQ PR6|56) 600056 236(0) 1 0 0 00
DBG(446337789)> CPU TRACE: 00306:006330 4 000002607004 (TTF 000002,IC) 000002 607(0) 0 0 0 04
DBG(446337791)> CPU TRACE: 00306:006331 4 000001336007 (LCQ 000001,DL) 000001 336(0) 0 0 0 07
DBG(446337793)> CPU TRACE: 00306:006332 4 000001076007 (ADQ 000001,DL) 000001 076(0) 0 0 0 07
DBG(446337795)> CPU TRACE: 00306:006333 4 600104756100 (STQ PR6|104) 600104 756(0) 1 0 0 00

                                                            STATEMENT 1 ON LINE 155
               if next_loc = 0 then goto almost_done;

000236  aa   000450 6000 04   tze       296,ic              000706

DBG(446337797)> CPU TRACE: 00306:006334 4 000447600004 (TZE 000447,IC) 000447 600(0) 0 0 0 04

                                                            STATEMENT 1 ON LINE 214
almost_done:
          bv_output_pathname = out_name;

000706  aa  6 00032 3735 20   epp7      pr6|26,*
000707  aa  7 00004 3715 20   epp5      pr7|4,*
000710  aa  6 00263 2351 00   lda       pr6|179
000711  aa  6 00173 7271 00   lxl7      pr6|123             out_name
000712  aa  040 140 100 540   mlr       (pr,rl),(pr,rl),fill(040)
000713  aa  6 00174 00 0017   desc9a    pr6|124,x7          out_name
000714  aa  5 00000 00 0005   desc9a    pr5|0,al            bv_output_pathname

DBG(446337799)> CPU TRACE: 00306:007003 4 600032373520 (EPP7 PR6|32,N*) 600032 373(1) 1 0 1 00
DBG(446337801)> CPU TRACE: 00306:007004 4 700004371520 (EPP5 PR7|4,N*) 700004 371(1) 1 0 1 00
DBG(446337803)> CPU TRACE: 00306:007005 4 600263235100 (LDA PR6|263) 600263 235(0) 1 0 0 00
DBG(446337805)> CPU TRACE: 00306:007006 4 600173727100 (LXL7 PR6|173) 600173 727(0) 1 0 0 00
DBG(446337807)> CPU TRACE: 00306:007007 4 040140100540 (MLR PR0|40140,F1) 040140 100(1) 0 0 0 00

                                                            STATEMENT 1 ON LINE 217
          bv_err_code = ""b;

000715  aa  7 00006 4501 20   stz       pr7|6,*             bv_err_code

DBG(446337809)> CPU TRACE: 00306:007012 4 700006450120 (STZ PR7|6,N*) 700006 450(0) 1 0 1 00

                                                            STATEMENT 1 ON LINE 219
          return;

000716  aa  0 00631 7101 00   tra       pr0|409             return_mac

DBG(446337811)> CPU TRACE: 00306:007013 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