bound_misc_translatrs_.bind 08/12/83 1027.6rew 08/12/83 0953.0 16326 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */ /* */ /* N__a_m_e: bound_misc_translatrs_.bind */ /* */ /* This bound segment contains tools which translate special-purpose languages. */ /* */ /* S__t_a_t_u_s */ /* */ /* 1) Modified by: Arlene Scherer on January 11, 1973 */ /* a) shorten name of bound segment. */ /* 2) Modified by: Gary C. Dixon on February 11, 1975 */ /* a) add reduction_compiler (rdc), reduction_compiler_, lex_string_, lex_error_, */ /* and translator_temp_. */ /* 3) Modified by: Bernard S. Greenberg on February 24, 1976 */ /* a) add create_data_segment_, and command interface, create_data_segment. */ /* 4) Modified by: Gary C. Dixon on August 10, 1983 */ /* a) add name reductions to reduction_compiler. */ /* */ /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */ Objectname: bound_misc_translatrs_; Addname: create_data_segment, cds, /* Please keep these names ordered alphabetically.*/ create_data_segment_, extract_message_doc, gate_sw, reduction_compiler, reductions, rdc; Global: delete; Order: create_data_segment, create_data_segment_, reduction_compiler, reduction_compiler_, gate_sw, extract_message_doc, extract_msg_doc_; objectname: create_data_segment; retain: create_data_segment, cds; objectname: create_data_segment_; retain: create_data_segment_; objectname: extract_message_doc; retain: extract_message_doc; objectname: gate_sw; retain: gate_sw; objectname: reduction_compiler; synonym: reductions, rdc; retain: reduction_compiler, reductions, rdc; objectname: reduction_compiler_; /* End */  create_data_segment 05/18/90 1156.1re 05/18/90 1156.1 61344 @create_data_segmentT'T:TTTVTT&NLT 4T.pl1Lsdc..cdsTV TcdsVT-lsT V#VV@^a$^a-tableCDS - -table -map ?#.list-listcleanup^a^[>^]^aArgument ^d.PL/I errors occured.Usage: ^a path {-control_args}Getting link information for ^a^[>^]^a.Appending link ^a^[>^]^a to ^a^[>^]^a.Check arguments to the call of create_data_segment_ in ^a.`P%@`P%@@@@C@@@P@C@C@@w@ @"@@$P P@@A(@B(@@@@D@ D@N@D@@@@@ @C@"@@$PP@C@@@C@&@K(@@*@D@,@i.@f0@c2@`4@$@$P P@@P@ F`k F`QB@eT`-.@.@>N@V6@^a7@$PP&@(@7@*@@,@6.@30@-2@6@4@$@ P@@A,@A@N<@V6@7@@:@7@<@@>@~@@@C@B@6@D@ F@H@J@L@8@$PP@C@@V6@^a7@C@&@(@7@*@P,@.@0@2@6@4@$@$P P@@D,@aA@N6(@@@  6@&@(@@*@,@.@0@4@2@$@$PP@@ ~@@d@(P @@@  @@@6@ 6~@6@@@E@6@d@(P @@`@v  @u@v >@.@.@@6@ 6~@6@>i@6@ `@`v E@ @@`  @6@&@@(@*@,@$@$P0P@i@ @@@ @@x @@@  @i@ @@@ @@ @@@  @H@t@@@@$PP@J@@@$PP@v@ @P'@.@@@7(@P@@T@~@V@6@X@7@Z@P@\@t@^@C@`@Bb@5d@,f@)h@&j@#l@4n@R@$P$P@t@:0@(?@a@ F@M@P@C@T@V@@X@@Z@P@\@~@^@`@b@d@f@h@j@R@$P P@@P(@t@&@P@(@*@C@,@.@0@2@4@$@$P.P@.@X@@@u@>@.@.@@q@q~@q@>r@ >s@Tp@r@i@q@ `@` E@s@@r@ E@@~ |@J@x@@z@C@~@@@p@@@v@$PP@ @C@5@@(v( F@JM@p@ F@M@s@C@@|@v@@J@@p@@@@@@s@@~@@@@t@@@r@@{@@@$$P P@@B@@@@@s@@@@C@@q@d@@Z@h@@$P P@mF@hF@dt@t@x@?z@v@$P(P@u@J>@.@.@@p@p~@p@>r@>q@Ts@r@i@p@ `@`J E@4q@@r@ E@@x@7@@z@F@|@s@~@@ @v@ $P,P@ @$P PNs(@6v@6x@6z@s@@@v@@@ @@@  P@Y@ܪ@@ު@@@@@@ڑ@ $P*P@i@ @@@ @@* @@@ @@@v  @@@@@C@@@@@@@@@$PP@ @C@ϟ@C@@@@@@@v@@@@@ª@Ī@@$P P@@.@@@B@@@"@@$@@&@ @(@@*@H@,@C@.@0@2@4@}6@8@|:@<@ @$P&P@H@0@( @a"@ F@wM@@C@@@SB@ @D@@F@@H@@J@mL@jN@UP@iR@PT@ZV@>@$P P@@  .@ @ FHP F@(@X@@"@v@$@@&@@(@X@*@t@,@C@.@D0@72@.4@+6@(8@%:@6<@ @$P$P@t@<0@AA>@a@@ F@ M@X@C@"@$@>@&@@(@X@*@v@,@.@0@2@4@6@8@ @$P P@X(@@@A<>@&@~@(@*@,@.@0@ @$P P@@tP@HP@ @@@@@@ @ԝ@@Z@Z@@@C@B@>@$PP@C@'@@(>( F@M@Y@C@"@$@>@&@@(@Y@*@v@,@.@0@2@4@6@8@ @$P P@@H@@@@B@~D@C@F@H@J@L@N@>@$P.P@@pP'@ PJ@B@@D@C@F@H@zJ@L@@@ "P@ P@B@@D@C@F@vH@sJ@pL@@@ $P"P@ P@P@@R@T@@V@C@X@aZ@T\@^@`@Yb@N@$P P@ PC@@P@@R@T@d@V@C@X@HZ@;\@^@1`@?b@N@$P P@d(@ PH@P@d@R@ T@C@V@X@Z@\@(^@N@$P.P@d(@ Pt@P@d@R@T@C@V@X@Z@\@^@N@$P.P@@$>create_data_segment symbol_table  error_table_badopt pl1_severity_!com_err_$$' suppress_name$*.cu_ arg_count125arg_ptr18: cv_entry_==@expand_pathname_ add_suffixCHKform_link_info_NNR get_pdir_UUX get_wdir_[[^hcs_ append_linkacf chname_fileail delentry_fileaosinitiateavyinitiate_counta|ioa_nnl pathname_pl1terminate_file_ unique_chars_cdss`z` cleanup.1 clean_up_segs 2&&#&)&0&7&<&B&M&T&Z&`&h&n&u&{&&&&&&symbtreeO=PSPL/I 6"& *HUoUUMultics PL/I Compiler, Release 32f, of October 9, 1989Fudge.SysMaint.aoptimize map4*HPS?$~uIX>spec>install>1010>create_data_segment.pl1>ldd>include>terminate_file.incl.pl1pl1info Pcreate_data_segmentQ%/z<#OӃx!+ºN<-Oӆtx?0}xC$:N@@@@B@@P"PFD@F@H@L@J@<@$P$P@c,@@@RO@,@N@@ @P'@.@9@@`@T@ @@"@|$@&@{(@@ $P P@ܞ@@@@@H @@"@i$@d&@X(@@ $P$P@.@ @N@@@$PP@N@z@@|@@~@@@@@:@C@C@@A@x@$P P@@C0@^a@@>@ @@@B@@D@,F@'H@L@J@<@$P$P@RVb@RV`@@(@@@@@@@@@^@ipiL@@ip@iL@.@@`@@0@$@@iL@ip@,@@`@@@Pip@Y@@iL@Y@ip@P@@^@@ip@iL@ip@iL@ip@@PP@@@.@u@ >@.@.@@@ ~@@T@@i@@ `@`@ @@$@&@@@ @PPPipR@`PP@PPPiLPPip@PPiLPP@@@@@RPiL@bP^@.@@@@@:@ @o$@|&@@_@:PPPip^P@ip^PiL^PiLipip@ԟ@o0@D(@(@ D@@D>@@(@,֟@`0@E(@(@ E@@E>@@@؟@P0@C(@(@ C@@C>@@@ @@>@@@YPip(@@P`@ߞ@ D@@dP`@`@@ߞ@.@F@(@@@@@@`@@@R_`@`@@@.@@@@C@@@`@@fP`@`@@@.@@RVb@^@(@@P`@@6@H@@@ @Yipݞ@>H@>6ipiL.@+`@ݞ@ E@@hP`@`@ݞ@.@@.@F@&HP@A@YHP@ip@@@@@`@@@R_`@`@@@>@H@>6@iL@.@.@.@@~@(@@N@ bviLbvip,@^Pipip@@P`@RVb@(@@l@j@@@@(@@@@@@@@@@$PP:@@ܞ@n@n@@@@@@@@@@@$PP@ܞ@xP@l@`PH@HP\HP@@@@@@l@@@j@@@H@@@ @@@F*`@Z@Z@Z@@z@l@|@@~@@@@@@@@@!@x@$P"P@$>@@T@@i@ @@R$$@ `@` ,@HP @.@bP@ @0@@4@6@8@*@ *@ @@@@$PP@u@ >@.@.@@@ ~@@T@@i@,@ `@`HP @.@bP@ @0@@4@6@8@*@ @ @Pڪ@(@@@@@@@@@@$PP@ܞ@n@n@@@@@@@@@@@$PP@xPN@NP@@$@@A*L@@E@.@@YHPip@F)`@J@LPJPLP@JP@@@bP@@@@>.@@F*`@@@@@ @N@4LPF$@Nq*Ī@O@@V@@^@@@Y@@,@JPO.@PO0@@4@@6@@8@*@ @@LvJLPOJPO,@RV^@ipiLiLipipiL@YHP@ip@iLY@ ip@ iL@@F*`@F@6 @@CO@@@RF@@ @9HP@@@@RF@@ @-HP@CO@@@RF@@ @@@HP@@@@RF@@ @@@.@@P`@@@,@@@ߝ@Y@iL@Yip@Y@iL@YipF@ ݞ@>@H@>6iLݝ@Y@iL@@Yip@Y@iL @@>H@>6ipݞ@~H@>6iL@Yipޝ@Y@iL@@  @F@@ @ @ *`@@6@ ~H@>6@,@@$@@@@@ @@"@@$@@&@@$PP@z@ܞ@@@@@@? @@"@`$@[&@K(@@ $P$P@.@@@PP'@%B@ PT@D@@F@@H@UJ@?L@@@ P@ P@A0@@B@@@$PP@@@@PP@ @@P @@@ @N@&ܞ@$P@$@A*@?@V@@@@O֪@@P@"PFت@@ڪ@@ܪ@ު@@ԑ@ $PP@,@ܞ@ЀPB(@(@x@@P@@@@@@@@@@@PP@B@@@@@ $P(P@B@,P@$@A*@?@V@(@@@ ,,@@@@@@B@@P@O@@@ @ @@@@$P$P@JPF@@@(@(P@$@A*@?@V@(@@@TT@@@h@@@P@N@@@i@@@@$P$P@SPPN@$@@`P`@P@PY@PP@@@@RP@iL@Y@ip@@bP^@@ip@iL@ip@@P@0@@.@P@@$@@A*@?@V@@@O֪@@ت@@ܪ@4ު@ԑ@@PPPip@P@ipPiL@P@@@GA@@PP(@"PP@A@ P@@@`P@`@A@F>@@@@@@  P@@N@@bP@~F@iL@O@ip,@A@?`P@i`@@?`PP@PA@ `@`@@.@@@`@P@P@PP(@"PP@@@@@Y.@P@P@0@.>F P@@A@@P@0@A@0@A@@@@@@@Hv*@`@@HP6A@@6A~@H@>6.@@0@.@P@@@@ `@`@@@.@@@@Hv*@`@@@@A@P@@P@@PPu`@>@.@.@@@@~@@T@@i@@ `@`@}@@@@@B@ @@"@h$@(@,@@&@L*@@$P&P@ @B@%(@@@  @0@-2@@4@(6@PP8@P:@B<@B>@B@'@@P@PD@@PF@.@$P$P@P@@!(@@@},,@0@2@@4@P@P6@@P8@:@<@>@PP@@PB@.@$P$P@@!(@@@P((@0@2@@4@P@P6@@P8@:@<@>@PP@@PB@.@$P$P@@A*P@P@@@@`P`P@.@@Hv)`@P~ @(@ @ N@PP@vJ@H@@/@PP@CNJ@H@@$,@@~P@@Q@.@@F@@.@HP6N@@6N~@H@>6.@P@P@0@.@`v)`@@ @ @P6@@`PO0,@@`PO0@.@ @!!f0!!!h1!!!d2!$ create_data_segment_ symbol_table  error_table_translation_failedtssi_ get_segment!$get_temp_segments_'',release_temp_segments_//5 get_wdir_88;match_star_name_>>Ccheck_star_name_entryFKMfinish_segmentPT object_info_briefW[]hcs_ status_mins`beclean_up_segmenthm get_group_id_pptstu_get_runtime_blockwy~ date_time_formatcom_err_find_runtime_symbolwdecode_runtime_valuew` cleanup.1 clupper alloc_acc> putstr *&&&&.&7&=&E&O&V&_&g&o&v&&&&&symbtreeO=PR\WyPL/I 6"& * Multics PL/I Compiler, Release 32f, of October 9, 1989Fudge.SysMaint.aoptimize map \+7PR\Wg~JCЀo!~MG4x ~M(!~G3& ~F ~8G3$!~DeȀ ~!DeȀ~>Jb'~A݀$~fF >spec>install>1009>create_data_segment_.pl1>ldd>include>cds_args.incl.pl1>ldd>include>stack_frame.incl.pl1>ldd>include>definition.incl.pl1>ldd>include>segname_def.incl.pl1>ldd>include>source_map.incl.pl1>ldd>include>relbts.incl.pl1>ldd>include>object_info.incl.pl1>ldd>include>object_map.incl.pl1>ldd>include>linkdcl.incl.pl1>ldd>include>std_symbol_header.incl.pl1>ldd>include>runtime_symbol.incl.pl1pl1info create_data_segment_A &<1@|5O Ӂ}xg.^a?#cleanupAttaching to ^aDocumentation missing in ^aError extracting documentation from ^a0P%@(@(@@@@@@@B@@K@@@ P@K@K@@ª@@Ī@ƪ@Ȫ@ʪ@@ $P P@@B@V@@PΪ@L@Ъ@v@Ҫ@K@Ԫ@@֪@ت@ڪ@ܪ@̑@$PP@K@B@V@^a@K@Ϊ@xЪ@@Ҫ@@PԪ@֪@ت@ڪ@@ܪ@̑@$P P@@@L@@v@@@@J@@@@D@@K@@g@d@e@^@[@X@_@ޑ@$PP@D@d0@_@K@@9@@@L@@v@@H@E@:@>@;@ޑ@$P P@@ v@@=@@DP@@@D@ª@v@Ī@J@ƪ@K@Ȫ@@$P P@K@ɁJ@ FF@@@@@@@B@@K@@@$P P@K@GB@V@@P@~@ª@K@Ī@@ƪ@Ȫ@ʪ@@ $PP@K@B@V@^a@K@@@ª@@PĪ@ƪ@Ȫ@@ʪ@@ $P P@7@@@@ª@Ī@ƪ@@$PP@i@ @@ @@@~ @@@ @@)@Ϊ@H@Ъ@@Ҫ@K@Ԫ@֪@ت@ڪ@ܪ@̑@$PP@ @K@@@K@Ϊ@Ъ@@Ҫ@~@Ԫ@֪@ت@ڪ@ܪ@̑@$P P@@@H@@@@@@K@@@$PP@@@@@@@B@@K@@@$P P@K@)@PB@ F`k F`V@B@V@^a@$P$PΪ@>Ъ@@Ҫ@@Ԫ@O֪@Lت@Eڪ@@ܪ@̑@ P@P@PP'@@(@ PH@D@@@F@B@P@@(@ PH@D@@@F@B@$PP@@v@@D@@F@@H@@K@@@ @@@@ޑ@$PP@K@N@5(@@@@Ϊ@Ъ@@Ҫ@v@Ԫ@֪@ت@ڪ@ܪ@̑@$P P@K@@@((K@Ϊ@Ъ@@Ҫ@v@Ԫ@֪@ت@ڪ@ܪ@̑@$P P@@@@D@ª@v@Ī@J@ƪ@K@Ȫ@@$P"P@K@J@ FF@H@@K@@@$PP@H@@K@@@$PP@D@@K@@@$PP@@extract_message_doc symbol_table extract_msg_doc_cu_arg_ptrcom_err_ #expand_pathname_&&+absolute_pathname_..3hcs_terminate_noname68= unique_chars_@@Diox_ attach_ionameGIMopenGPRcloseGUW detach_iocbGZ]initiate_count6`d archive_util_first_disectedgkodisected_elementgrw error_table_badoptz~>` cleanup.1|&&&&%&-&5&?&F&O&T&Y&_&f&q&y&symbtreeIIoPL/I 7"' *;vHZksHHMultics PL/I Compiler, Release 27d, of October 11, 1982Holmstedt.SysMaint.moptimize map0)K_I݌ˀ>dumps>old>recomp>extract_message_doc.pl1pl1info Cextract_message_doc5Oiz<=O ӂ]x_iz<O ӂt7 i@~E@~i@U`@ .@.@D@E@D~@j@D@ N j@G@ `@eH B@AN@w B.@@@B>@~E@A@B~@>E@=PP@P@@E@ I@~F@A@B~@F@~E@j@Pe .@.@>C@ j@=@@E@1@C@C[j@PPl@Ph@u`@>@.@.@@k@h@k~@k@j(@Pp@l@r@k@t@j@v@n@$PP@]j@ʸ j@Ƹq~j@E@C>@>j@F@>C~@~k@`!k@F@B.@@P@PPP@P@ @P@P@P@ @P@P@P@ @P@P@P@ @P@P@P@@P@P@P@@P@P@P@@P@P@P@@P@P@P@@P@P@P@@P@ (PP@V@X@P\@P]@`(@]@J\@PP@PTe .@.@>^@]@>^@~DN@D@_@G@ `FeH_(@^@_~@N`@H'`.@\@_>@x@>PP@P@@Fz@^@_~@~y@x(@P~@z@@y@@x@@|@$PP@`,@^@\.@^@].@V@b@d@P@@(@PP@@@@@@@@$PP@b@!k!j!k!E!C!jextract_msg_doc_ symbol_table iox_ put_charsK` &symbtreeLïjL,()PL/I 8"' *:YFMSVFFMultics PL/I Compiler, Release 28e, of February 14, 1985GJohnson.SysMaint.aoptimize map0'd' FL,(>spec>install>1060>extract_msg_doc_.pl1pl1info Bextract_msg_doc_lB!*i̺<PVjZZjVjZj @e`obj_map  Yt  gate_sw 11/15/82 1846.3rew 11/15/82 1728.0 64296 TXTsimTVsim TT"TT#TT!VTTV 4Thcs_TT#V?revert?#real_sim_initgate_sw system_librariesInitiate err on ^aErr on term of ^aUnable to get ptr to ^aReal gate reestablishedExpand_path err on ^aUnable to terminate gate ^aUnable to get pathname ^pUnable to remove refname ^aErr on init of real gate ^aSetting search rule errorUnable to find entry real in ^aUnable to initiate new gate ^aUnable to add refname ^a to ^aUnable to term name ^a on sys gateUnable to reinit real_^a with nameUnable to reset user's search rulesCannot get real gate pathname, ^aUnable to recognize switch setting desired,please consult documentation for correct nameP&@"PP@@P@@P(@Q(@S@P@PF@@R@U@H@@L@@N@@J@F@@R@@H@@L@@T@@@P@T@P@P@P@T@@@@@@PP@@@@"P@P@@$PP@@ F@ P@PP@ F`@ %i@ @@ @@@  @@@  @@@@Y@B@Y@ @@Z@@@@$PP@B@@T@@@$P P@T@@@ T@@@@@@@@@@ $PP@Q@@@@@@@@D@@T@@@@@@@@$P P@T@@@T@@@@@@@@@@@@@$PP@Q@}D@@@@S@@@@T@@z@t@q@s@w@@$P P@T@@@$$T@@@@@@@@c@`@T@W@@$PP@Q@G(@@@@@ª@@Ī@@ƪ@@Ȫ@D@ʪ@T@̪@9Ϊ@:Ъ@Ҫ@1Ԫ@.֪@4ت@7ڪ@@$PP@T@$P(NP T@@@ T@@@@@@@@@@@@ @@@@P@Q@@@@T@@@$P P@T@@@|$$T@@@@@@@@@@ $PP@Q@@L@@T@@@$PP@T@@@T@@@@@@@@@@@@@$PP@@P@@@T@@@@@$PP@@@T@@@@@$PP@T@$P*NP@@T@@@@@@@@@@@@@P@@P@$(@@U@@@ª@Ī@@ƪ@@Ȫ@B@ʪ@T@̪@sΪ@tЪ@Ҫ@kԪ@h֪@nت@qڪ@@$PP@#(@@U@@@ª@Ī@@ƪ@@Ȫ@B@ʪ@T@̪@PΪ@QЪ@Ҫ@HԪ@E֪@Kت@Nڪ@@$PP@T@@@ T@@@@@@@@:@7@(@.@@$PP@P@$(@@@@@ª@Ī@@ƪ@@Ȫ@B@ʪ@T@̪@Ϊ@Ъ@Ҫ@ Ԫ@֪@ ت@ڪ@@$PP@#(@@@@@ª@Ī@@ƪ@@Ȫ@B@ʪ@T@̪@Ϊ@Ъ@Ҫ@Ԫ@֪@ت@ڪ@@$PP@T@@@U$$T@@@@@@@@@@@@@$PP@@(@@@@@@@@@@@@@@ $PP@@@P@B@@@@@@D@@T@@@@@@@@$PP@B@@@@@@D@@T@@@@@q@@@$P P@T@@@ T@@@@@@PP@o@l@U@"P@P@@$PP@4D@@Y@@$PP@@P@$(@@U@@@ª@Ī@@ƪ@@Ȫ@B@ʪ@T@̪@;Ϊ@<Ъ@Ҫ@3Ԫ@0֪@6ت@9ڪ@@$PP@#(@@U@@@ª@Ī@@ƪ@@Ȫ@B@ʪ@T@̪@Ϊ@Ъ@Ҫ@Ԫ@ ֪@ت@ڪ@@$PP@T@$P(NPT@$@$@$@T@@@@@@@@@@@@@P@@PP@ F`@ӝ@5 F`@@. F`@f%i@ @@ @@@  @@@  @P@@@@@@T@@@@@@ &P@@@@@@T@@@@@@ $P@T@ß@ß@ß@T@@@@@@@@@@@@@$PP@@P@@@@@@S@@@@T@@{@u@r@t@x@@$P"P@@@@@@S@@@@T@@a@[@X@Z@^@@$P P@T@@@T@@@@@@@@@J@G@B@?@@$PP@@P@@@T@@0@4@@$PP@@@T@@"@&@@$PP@T@@@JT@@@@@@@@@@@@@$PP@@P@$(@@@@@ª@Ī@@ƪ@@Ȫ@B@ʪ@T@̪@Ϊ@Ъ@Ҫ@Ԫ@֪@ت@ڪ@@$PP@#(@@@@@ª@Ī@@ƪ@@Ȫ@B@ʪ@T@̪@Ϊ@Ъ@Ҫ@Ԫ@֪@ت@ڪ@@$PP@T@$P(NPT@ȟ@ȟ@^a@T@@@@@@@@@@@@@P@@@@T@@@@@P@T@@@$$T@@@@@@@@@@n@w@@$PP@@@(@@@XX@@@@@@X@g@M@@ P@@gate_sw  symbol_tablehcs_get_search_rulesinitiate_search_rulesmake_ptr"% real_hcs_("+initiate.1(.4terminate_name7;(7>term_ nomakeunknownACGcu_ptr_callJKNcom_err_QQT expand_path_WW[fs_get_path_name^c(^ffs_get_seg_ptrim(ip error_table_segknownswzname_not_founds} `,&&!&'&-&3&6&=&@&I&P&V&]&e&h&o&r&|&symbtreeIIƺېPL/I 7"' *8Bas|BBMultics PL/I Compiler, Release 27d, of October 11, 1982Holmstedt.SysMaint.moptimize map0K_I݌&>dumps>old>recomp>gate_sw.pl1pl1info @gate_swA n<=OӁ4]xs:.z<O ӁSMxZ<1OӃ4x'$hxo3i<3O Ӂxg$hxo %P +!PVjP VjVjԭZ+ZPZZQ_jյ@eU*eU*eU*eU*eU*eU* obj_map B,Jn  reduction_compiler 11/01/84 0827.7re 11/01/84 0827.6 52560 T&T1T>L ^aTT"L$TT 4TTpl1#V TVoff-bf-lgVTRDC - ?#-prefix-trace-brief-longcleanup ^a^[>^]^a-no_trace[where pl1]$pl1 ^a Only one pathname may be given.^/No object segment will be generated.^/While creating the object segment^/(^a^[>^]^a).^/While creating a temporary segment in the process directory.^/Calling sequence:^-reductions pathname {-ctl_args} control_arg is:^--long, -lg^/^2--brief,-bf^/^2--trace {on|off}^/^2--no_trace, -ntrace߀`P%@`P%@`P%@D@@X@@@P@X@GD@NRP(@ @@ (@@@@@@N@@@@J@@A@@X@@@$PP@JPA@ F`W F``P@ F`K F`SP@ F`J'@P@ P@@@DN@ԅ@,@@@@J@@A@@X@@@$PP@JPA@ F` F`ߝP@@.@ F`+ ԝP@T`-.@.@>ND F@ A@V@rd@@@@@Y@@@@X@@@@@@@@@$PP@X@؁rd@ٝ@@@@@@@@@X@@@@@@@@$P&P@X@Ձa F`L@@DN@I@,@@@@J@@A@@X@@@$PP@@,N,@ F@n,~@N@.@ o@$@,N,@ F@]A@V@JP@@@@@@@@$P$P@@@ @P,~@ N@ @@.@ o@` @@,N,@ F@4,~@AN@A@@.@ n@`@,@fF@N@L@k@R @P'@.@@@(@Y@@@@@@Q@@@@N@@X@@=@5@/ @,"@)$@&&@*(@ @$PP@N@-0@6Q@ FC@$P@@F@@X@@@ @@@ (P@F@0@I*@@@$PP@@@@*YY@@@@L@@H@@X@@@@@@@@$P0P@X@>$P>PB@@@@@@P@P@@N@,@C@.@F@0@L@2@B@4@@6@@8@$P@B@D@@@F@H@J@L@N@*@$"P@B@(@(@L@@@@@@@ $PP@B@ @@ (@L@@@@@@H@@ @@@$P.P@L@.@ @X@Y@@@@*@@@@z@@ $P P@i@ @@ @@@*>@ @@@ `@`. @,N,@ `@` @@@@ @@@ @@X@@@ $PP@$P onreduction_compiler symbol_table com_err_cu_ arg_countarg_ptr!cp$%expand_pathname_ add_suffix(-0 get_wdir_336hcs_initiate_count9;?terminate_noname9BG truncate_seg9JNioa_nnlQST pathname_WWZreduction_compiler_]]brequote_string_eeisuffixed_name_ new_suffixlpstranslator_temp_ get_segmentv{~release_all_segmentsvtssi_clean_up_segmentfinish_segment{ error_table_mdc_path_dup_args no_makeknownnoentrywrong_no_of_args pl1_severity_reductions_severity_sys_info max_seg_sizerdc` reductions`` cleanup.1cleaner @reductions&&&#&'&2&8&A&I&P&V&\&d&k&u&&&&&&&&&&&&symbtreeKMR#KbPL/I 6"' *>KhKKMultics PL/I Compiler, Release 28d, of October 4, 1983GJohnson.SysMaint.aoptimize map08YeKbǗ>special_ldd>online>6967-11/01/84>reduction_compiler.pl1pl1info Freduction_compilerU/ iz iZiZ<O ӂm(O((g?)<ӂy}x3> W4x/PVjZZjk@+@+@k@+ZZk@ZkVjVkZZPZ+_VkԭZ+XV@NCUYUYUYUYUYUYUYUYUobj_map @  reduction_compiler_ 03/17/86 1520.8re 03/17/86 1457.6 411984 CThe reduction source segment does not contain any valid reductions. No reductions. The statement is not a valid attribute declaration or reduction. (Remember, the label of the first reduction must be 'BEGIN'.) Invalid statement. 3Label '^a' is invalid. The label has been ignored. Invalid label '^a' ignored. jLabel '^a' in the next-reduction field of the reduction statement is invalid. The label has been ignored. Invalid label '^a' ignored. \Unexpected end encountered. The reduction source segment ends with an incomplete reduction. Reductions are incomplete. [Unexpected statement encountered when the end of the reduction source segment was expected. -Unexpected statement after end of reductions. Compiler restriction: the reduction source segment contains more than ^d labels. Label '^a' and all labels which follow it have been ignored. 'Restriction: >^d labels. '^a' ignored. Compiler restriction: the reduction source segment contains more than ^d reductions. The reduction on line ^d, and those which follow it, could not be compiled. .Restriction: >^d reductions. Line ^d ignored. tCompiler restriction: the reduction source segment contains more than ^d tokens. Token '^a' could not be compiled. 'Restriction: >^d tokens. '^a' ignored. Compiler restriction: the reduction source segment contains too many different tokens. Because more than ^d token value characters have been defined, token '^a' could not be compiled. 1Restriction: >^d token characters. '^a' ignored. LLabel '^a' is undefined. The reference to this label could not be resolved. Label '^a' undefined. ]The reduction source segment is too large to compile, causing the object segment to overflow. Object segment overflow. %Label '^a' has been multiply-defined. Label '^a' multiply-defined. Token requirement '^a' appears in a reduction after a token requirement. This combination of requirements could never be satisfied. Therefore, the reduction will be ignored. '^a' appears after . Label '^a' in the next-reduction field of a reduction is invalid. In addition, the next-reduction field contains more than one label. This is not allowed. .Label '^a' invalid & >1 next-reduction labels. ZThe next-reduction field of a reduction contains more than one label. This is not allowed. !>1 label in next-reduction field. Compiler restriction: the reduction source segment contains more than ^d token requirement functions. Function '<^a>' could not be compiled. >Restriction: >^d token requirement functions. '<^a>' ignored. Compiler restriction: the number specified in a 'MAX_DEPTH' attribute declaration is out of bounds. The allowable range is: ^2-0 < MAX_DEPTH < ^d A maximum depth of ^d will be assumed. .Restriction: 0 < MAX_DEPTH < ^d. ^d assumed. IThe '^a' built-in action routine has been used improperly in a reduction. '^a' built-in used improperly. In attempting to compile the reduction on line ^d, the estimated number of reductions (^d) was exceeded. The reduction on line ^d, and those which follow it, could not be compiled. #_reductions > ^s^d estimate. ?Unexpected '^a' in the action field of the reduction statement. Unexpected '^a' ignored. One or more fields are missing from a reduction. All of the reduction fields (label, syntax, action, & next-label field) must be supplied. Incomplete reduction. A quoted string appears as the name of a semantic subroutine in the action field. This is not permitted. The reduction has been ignored. Quoted subroutine name. HA right parenthesis ()) is missing from the action field of a reduction. ')' missing from action field. 8The reduction segment ends with an incomplete reduction. Reductions incomplete. _The reduction delimiters in the reduction segment were not found or were positioned improperly. Bad reduction delimiters.   2 ?        # - 0 3 = E M U ] e m x                       ! ' 0 9 B K T ] h v                 ( 2 < J T V ` i v                         - 4 p           $AKy{}"5R\rtvxz|~ BEGINMAX_DEPTH\PUSHDOWNLANGUAGEINCLUDEDELETEDELETE_STMTERRORNEXT_STMTLEX/[]()anynamedecimalintegerBSquotedstring+POP,bb1b2b3b4;=^RETURNSTACKSTACK_POP   ' -  8 =  FII JKMNSJ S T U V W JKMNSIJXMNSJ[SJ_MfSJmSJoMuSJSFVWFVMWFV{W= V|VVW- V8VWV'VW'VMW'V{W'VMW'VMMW'VM{W'V{W'V{MW'V{{W'VW'VMW'V{WVWJSSJMSM{    ! !&')*,-/0235689>!&?CDFGKLNOSTVWZ[_`dWXefghggil mnorop--003366stutuz{uv 33003366xx   /\<>[]()-^=;, XXVT T T&T#TTT6TCV5T`TyT.T TTThTTTT[TTT\T"); ", T@TTQTT, ); TETTTTTTTT*/ X TTT T/ TTTGTTZTTlTTTTT:VX?TT)V?VXNNTT XXXLTT++*//*++LXG#N?V 4 0, 0 ) */ NRED = end " , /* ); /* ?# call PUSH(date_time) char ( RD_ACTION( call call ); /* PUSH(): STOKEN_FCN = RD_TOKEN_FCN( dcl STACK ( dcl RED_TEXT ( %include rdc_lex_; %include rdc_end_; ): /* / */ call LEX(1); %include rdc_error_; %include rdc_delete_; go to RD_ACTION(NRED); TOKEN_STRING_ARRAYS ( TOKEN_REQUIREMENTS ( dcl 1 REDUCTION ( %include rdc_start_; %include rdc_next_stmt_; %include rdc_delete_stmt_; %include rdc_tracing_fcns_; %include rdc_stack_fcns_; (); go to RD_TEST_RESULT; return; /* / RETURN \ */ dcl TOKEN_STRINGS char( dcl 1 TOKEN_REQUIREMENT (; go to RD_TEST_REDUCTION; /* / go to RD_STACK; /* / STACK \ */ go to RD_NEXT_REDUCTION; /* / \ */ go to RD_STACK_POP; /* / STACK_POP \ */ ) varying int static options(constant) init ( STACK_DEPTH = max(STACK_DEPTH-1,0); /* POP */ dcl TRACING bit(1) aligned int static init("0"b); dcl TRACING bit(1) aligned int static init("1"b); ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789_$) char(100) aligned internal static options(constant) initial ( ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz_0123456789 Ptoken, Pthis_token = Pthis_token -> token.Pnext; /* LEX */ ) fixed bin(17) unaligned internal static options(constant) initial () fixed bin(17) unaligned internal static options(constant) initial ( ) aligned based (addr (TOKEN_STRING_ARRAYS)), /* object token values. */ dcl DIRECTION fixed bin init(+1); /* direction in which tokens compared. */ dcl DIRECTION fixed bin init(-1); /* direction in which tokens compared. */ */ /* */ /* * * * * * * * * * * * * * * * * * * * * * * */ RD_MATCH: Ptoken = token.Pnext; RD_MATCH_NO_TOKEN: end; Ptoken = Pthis_token; RD_MATCH: Ptoken = token.Plast; RD_MATCH_NO_TOKEN: end; Ptoken = Pthis_token; RD_TEST_RESULT: if STOKEN_FCN then go to RD_MATCH; else go to RD_NEXT_REDUCTION; end; else do; /* relative syntax function. */ go to RD_TOKEN_FCN(TOKEN_REQD.TYPE); ) unaligned based (addr (REDUCTIONS)), /* object reductions. */ 2 TOKEN_REQD, */ /* Compiled by: reduction_compiler, Version 2.5 of Oct 21, 1985 */ /* Compiled on: dcl SPDL bit(1) aligned init ("1"b); /* on: This compiler parses a PUSH DOWN LANGUAGE. */ ) fixed bin, /* reduction label stack. */ STACK_DEPTH fixed bin init (0); /* index into STACK. */ /* * * * * * * * * * * * * * * * * * * * * * * */ /* */ /* COMPILED OUTPUT OF SEGMENT dcl SPDL bit(1) aligned init ("0"b); /* off: This compiler parses a non-PUSH DOWN */ /* LANGUAGE. */ end SEMANTIC_ANALYSIS; /* * * * * * * * * * * * * * * * * ** * * * * * * * * * * * * * * * * * * */ /* chain is exhausted (). */ /* 2 = compile test for any token value */ /* (). */) unaligned based (addr (TOKEN_REQUIREMENTS)), /* object token requirements. */ 2 FORM fixed bin(17), /* form of the token requirement: */ 3 IFIRST fixed bin(17), /* index of first required token. */ 3 ILAST fixed bin(17), /* index of last required token. */ REDUCTIONS ( if TRACING then do; call PRINT_REDUCTION(NRED); call PRINT_TOKENS (DIRECTION, (RED.TOKEN_REQD.IFIRST), (RED.TOKEN_REQD.ILAST)); end; 2 TYPE fixed bin(17) unal, /* type of the built-in token requirement */ /* function: */ /* 1 = compile test to see if input token */ /* TYPE = as defined below. */ /* >0 = absolute token requirement: */ /* FORM = index(TOKEN_STRINGS,TOKEN_REQD); */ /* TYPE = length(TOKEN_REQD); */ /* 5 = compile test for token which is a single */ /* backspace character (). */ /* 6 = compile test for a token which is a */ /* . */ /* 3 = compile test for a PL/I identifier */ /* () of 32 or fewer characters. */ /* 4 = compile test for token which is a */ /* . */ /* -1 = relative token requirement function; */ /* TYPE = index of the particular token */ /* function in the token_fcn array. */ /* 0 = built-in token requirement function; */ "!""! |P&@"P P@U@D(@B(@C(@D(@G@#>$FH@@J@L(@M@L,@L@JPO0M@M,@NE(@F@'N@P@(P@PU@@0`D@0`V$V@@i@V@@j@j(@i@$PK@ RX@9>@<@@P@PP@@@@@PP@@A@@@ A@~W@@@>WN@W@W@\@Z@ @$PPPP@.@A.@@4"W@V@\"`@\a@b@W@f@V@h@`@j@xl@a@n@b@p@wr@rt@+@v@ @x@z@|@@@~@@@@@@d@(P@$P(@A@@~@>b@@@~a@`@"V@W@\"c@\@X@P@P@b@@a@@@P@`@@V@@W@@c@@1@@@2@-@+@@ @@X@@@@@r@@@@Ъ@Ҫ@@@y@s@@Ī@ƪ@mª@iȪ@fʪ@c̪@Ϊ@lԪ@@DP@r@ @@\@Z@ @@@y0@r@PP@P<@C@PPN (PP$PPP@P@R@h@PP@V@q@q@@ܪ@,@ڑ@5@ c¸@@@@@@(@V@\@^@^P>O@^PN@QtX@'X@@P@@V@ @6@@@@)@ti@@ `@${'i@@ `@$@@@ @JPCO @@@C@@@@@@@D@@^P@@@@@ @N@"@$@&@2@(@*@,@@.@@0@@4@@,$PP@@ @}@N@VP@O6>@OjLPT@P@ZPZP@@@@P@@@@@6O@^P@O@ip@@O@jL`PO0@ mq(@@@>@FN@NX@1X@@V@ @\6@@@@*@i@@ `@$T1i@@ `@$@ @ JPCO @@@C@@@@@@@D@@F@@@@] @N@"@i$@&@2@m(@*@U,@@.@@0@@4@@,$PP@@ @@@>6O@^P@Oip@P@@O@jL`PO0@ ZPF@@~@N@@@@@.@ e@`@\@O@MipPM@jL\@O@Mip@b@P@ P@bN@ @P@F@@P@ `F`@P,@P@N@O@^PO@jL\@dNSX@>X@@P@V@@6@@@@*8@i@@ `@$>i@@ `@$8d:@@@ @JPCO @@@C@@8@@@@@D@@:@@@@ @N@"@$@&@(@*@,@@.@@0@2@@4@@,$PP@@ @nO@^PO@jL@ @P@@@P@ N NN `@`@@\@d@Q,@Q@NWQ@@X;@.X<@=@6>@@P@@*R@i@j@ `@$.i@l@ `@$@ @6X@=@\@JPCO^@>@`@C@b@R@d@@@f@D@h@n@X@p@[r@N@t@bv@x@@fz@|@N~@;@@<@@Y@Z@,$PPP@@ @@P@>@B@N@@NB@d@d@f@R@>NR@fPPj@@@jN@ F@@P>@NF@@@@,@d@l@n@Ap@P@@@s@r@r@sN@  FnP@P@ `F@ r,@r@N@  @@@@ @nPPl@ FnPPl@t@@@,,@@@@@t@`P(@"PP@D@P@P@@J@@J F t@F >@.@.@@I@ I~@NI@B@ `@eFC@PD@t`@ q.@.@@ FF@ I@;@@@@EE@ MB@D>@L@VPL@i@B@ `@`CB@D@ o@`@@B@ F`@ D@B~@M@B>@N@VPN@i@B@ `@`CB@M@ n@o@@/MD@VPD@@P@D@t`@ .@.@@>@@~E@D@E~@@@to .@.@@>M@E@M>@@@ FFV@,@@@ FO "@@~M@D@M~@E@M@B>@O@E>@P@VPO@i@M@ `@`@B@ n@`C P@@O@E@ e@oP@@B@ Fo *@@B>@O@~E@D@E~@E@@@~M@B>@Q@E>@R@VPQ@i@M@ `@`@ B@ m@`C R@@Q@O@>@@FE@ e@`R@@D@VPD@@P@PP(@"PP@@@ P@CN@  A@A@D@B@ {@@@TPP@P `@`@@F@T@@@@C.@@@@D.@@PP(@"PP@D@"E@E@H@L@F@@PPB@D@A@T`".@.@>@@ @@(VE@BPH@E@L@F@@"E@E@H@L@F@@@@BP@EB@@@A.@A@T`".@.@>@@A@ VE@BPH@E@L@F@~@"E@E@H@qL@F@s@@z@|@P@@M(@@@ Lt@L>@.@.@@@~@@T@@i@@@ `@eL@@@N@ @z@@@PP@P@P@@F@P~P@V@@@@@@@6@@@@@A@P@@PP@CN@  @@ª@@ @TP@ `@`@@@FT@@C.@@D.@@@VP>N@VPN@R@P@@>@X@X@@6@i@@ `@$i@@ `@$*@ @6@@@@JPCO@@@C@@>@@@@@D@@@@VP@@@@@N@@@@@@@@@ @@ @@@@0$PP@ @f^P>6N@O@ip^POjLq@@@N@VPq@@N@VPO6@O6N@@@^P@N6@@N6:@@~@@@N@R^PF6N@K@O6:N@EN@VP@N6@@N6~@@@@N@>@N@VPO6>@^P@F@6@@N6N@@%@@M6@@N6N@,@.@@>@@N@VPO6~N@@^P@6N@O@ip@>@OjL@,@@@Q@>@PP@@@V@@@ $PP@Q@VP@R@>@P@P@@@^@@@ $PP@R@^P@#>$F@P@P@@@`@@@ $PP@F@>>@PP@@@Z@@@ $PP@i@Q@5@ @ʻ@-@B@5@=@M@B@V(P^(P`PR@`0(@P@PPT@@ PC@@@C@N~VP @@@@D@B@V@sPP@Pd@ PC~@H@I@>@@PJ@@@L@f@N@H@ $PP@fPdPI@H@ `@`@PP@PT@ PC@EJ@N@H@@j@ @@P@ *@@H`H`@J@N@H@@VP@@ @N@m @@J@N@H@@h@@VPO6@@@M(@@@ L@VPO6@@@M(@@@LL@@@J@N@H@@, @@J@N@H@@h@@VPO6@@@M(@@@L@VPO6@@@M(@@@LL@@@J@nN@H@@@VNP @@J@bN@H@@ @@J@VN@H@w@@@M(@@@LL@@@J@DN@H@e@=@@J@8N@H@[@)D@@VPO6@O6@@N@^PF6@/ZP@N\@@M6G@`P6Mu@ V_@J@_@N@H@X@ V_@J@_@N@H@%@ _@_@J@N@H@@vS@O[CCB@BD@B@J@N@H@ @d2B@2D@B@J@N@H@@W@@J@N@H@@LNB@ND@> F@B@J@N@H@@=@@J@N@H@@2B@D@B@J@N@H@@#<@@J@N@H@@@^PO6 FJ@L@H@@|> @@J@N@H@@,@TnD~@NE@V@XPJ@@N@H@@e@@J@fN@H@@,@*J@iN@H@@@@J H H@R@KV@P@t@^PD@B@@@@@J@9N@H@c@@@ؕؕ@J@-N@H@X@@@'ĕĕ@J@!N@H@M@@@@J@N@H@B@@@T@J@ N@H@7@@@iȕȕ@J@N@H@,@@@,ȕȕ@J@N@H@!@B@D@F@B@J@N@H@@^P^>P@2@@H`H`@J@N@H@@^P@@ @N@m @@J@N@H@@@>^NP^P@@@ @N@S^PF6@@@M(@@@LL@@@J@N@H@@,@@J@N@H@@@^PO6@@@M(@@@LL@@@J@N@H@@@^NP r@@J@}N@H@@ f@@J@aN@H@@,@.@,@ZP@@@P H H@R@MV@P@@@@T`T`@J@?N@H@u@ZPdF>@B@D@F@B@J@,N@H@c@@@@`@`@J@N@H@V@dG@@~@(@@N@([@@J@N@H@C@@dZP@@F\@_@G@V@J@@N@H@2@@@J@N@H@(@,@4@@J@N@H@@@dZP@@F\@@@~@G@V@@J@@@N@H@ @ɝ@@@@J@N@H@@J@N@H@@@@PBB@J@N@H@@@T@@\v\v@J@N@H@@@@@ @N@6B@N(D@B@J@N@H@@VB@D@B@J@N@H@@@ FJ@L@H@@|@@cHH@R@fV@P@@,@@@\v\v@J@[N@H@@h@ @@\v\v@J@KN@H@@ @@y\v\v@J@?N@H@~@i@ @@@J@1N@H@q@B@D@F@B@J@GN@H@c@p@J@CN@H@Y@@@HH@R@V@P@N@J@0N@H@F@I@V@@fPJ@@@N@H@;@i@J@N@H@1@@@HH@R@V@P@&@@@@J@N@H@@J@N@H@@h@ @@hvhv@J@N@H@@ @@@J@N@H@@o@LB@LD@LF@B@J@N@H@@k@J@N@H@@TB@TD@TF@B@J@N@H@@l@sJ@N@H@@@@gHH@R@|V@P@@m@^J@N@H@@!B@!D@!F@B@J@nN@H@@n@FJ@N@H@@@@3HH@R@KV@P@@i@1J@pN@H@@@@BB@J@qN@H@{@B@(D@B@J@&N@H@l@Q@5@@ʻ@@-@B@5@@}@@B@@@]0P0P@J@N@H@U@bP@>@@BN@B@A@T@@@@A@i@d@ `@`@@b@@f@8j@@@l@@n@`@ J@PJ@@N@H@U@ @Q@@@ @N@5, @@@@J@N@H@@>P@>@@BN@B@@T@@@@i@d@ `@`@@b@@f@j@@@l@A@n@`@ @PJ@A@N@H@@ @,@@@@@J@N@H@@PP@Pd@ PC~@H@I@>@@PJ@@@L@f@N@H@ $PP@fPdPI@H@ `@`@PP@PT@ PC@@@r||@J@oN@H@@P PJ@N@H@@@@`v`v@J@ZN@H@@ǟB@eD@@J@H@$PP@B@x@@z@@@|@A@~@@@B@@p@@@v@$PP@@ @@`s5s@J@*N@H@t@@@M\v\v@J@LN@H@i@ J@KN@H@a@bP@>@S(@Q@@@ @N@<>P@@@@>=B$A@[@>P@VA@@@b@@@d@@f@7j@A@l@@@n@`@ I@PJ@@@N@H@+@ @>P@@@@>=B$>P>@S@@>@,@PPA@'ʸI@VA@fPJ@A@N@H@ @rdA@P Px@A@z@@@|@@~@r@@@@@@@v@$PP@@@J@N@H@@u@ >@.@.@@A@ A~@A@T@@A@i@J@ `@`@@N@H@@ @; @@@@J@N@H@@C@P .P@Ĩ@ J@Q(@R(@B(@F(@(@h(@k(@l(@m(@n(@o(@p(@Ĉ@ʨ@̪@Pah@4@6@8@4@<@@@:@@o@ @@DBDB@<@A@@:@@ʈ@@@8B8B@<@4@@:@@p@ʈ@4@6@4@<@g@@:@p@@P@VS@@@@D@T@F@S@H@_J@B@@7k4@6@4@<@5@@:@O@FD@@P@VS@@@@<@S@@@:@@@)S@S@<@3@@:@6@nD~@E@VS@XP<@S@@@:@)@S@S@<@@@:@@p@ʈ@Ш@RRV@QQX@V@\@`@Z@ @@P@VU@@@@\@U@`@Z@@U@U@\@`@Z@@Ј@֨@''b@&&d@b@h@l@f@@@P@Vn@@@@h@n@l@f@@ (n@n@h@l@f@@ֈ@ܨ@@P@J@NKXo@.Xp@q@6r@@@@*@i@@ `@$ .i@@ `@$Cq@@JPCO@r@@C@@@@@@@D@@@@@@N@@@@@@@@z@o@@p@@@,$PP@@ @J@܈@܈@@@@@ @N@  @P@F@P@ `F@@ ,@@N@  @@@@@@NSX@'X@@P@V@@6@@@@*ت@i@@ `@$'i@@ `@$K@@@@JPCO@@@C@@@@@@@D@@@@@@@N@@@@@@@@@@@ @@ @@,$PP֩@@ @@ @P@F@P@ @@`@ Q@>N@@@@@@@@@P@V@@@@@@@@ @"@@@i@@$$@@@@@D(@@P@V@@@@@@@@@ \@@@@@@"D~@NE@V@XP@@@@@@@@|@@@@@@@w(&(&@2@@6@0@@p@@@@@}0808@F@:J@D@@p@@@@@8 L L@V@!Z@T@r@@@@)(@$PK@K@ @ ,@ @$ @S@P@O @@V^@@@@b@@d@@f@^@h@j@l@`@ $PP@@y@@P@2t@P@Np@ F`@k @%g@P @ b@P @]@@M@ P6@@@ `F`@  M@j4j@D@P@@@<@.@N@ @E@@@<@ @?\@ \@o@q @1\@\@o@q @#\@ݸ\@xo@q @\@\@b@`@@O @ \@@@@)@NXx(@y@z@{(@|@~@@@x@@y@@z@@{@@|@@~@@@@$PO@@M@@ @@@P@P@@@@@@@@@@x@u@@@@@0P@.@$PP@$P@~@!@(@P@~@@@@@@@P@),@P)@O>@D@F@@T@T@@P@N @@@>@p@@N@T(@>@p@@PN@ B@@@@@<@<@N@!\!!!T!S!A!B!Q!!!J c  f !N /reduction_compiler_ symbol_table| clock_ date_time_format lex_error_" lex_string_lex%()init_lex_delims%,0suffixed_name_ new_suffix37:translator_temp_allocate=BE error_table_ fatal_errorHLOimproper_data_formatHRX cv_dec_check_[[_cu_clbcdiox_ put_charsgil error_outputgosvy`number| 4output  output_quote GERRORs An internal stack (the reduction stack) has overflowed. The translation has failed. Contact translator maintenance personnel for assistance. Processing reduction: ^d Reduction being stacked: ^d Maximum stack depth: ^d Translation cannot be restarted. l&j&h&$f&+d&2b&<`&G^&Q\&ZZ&aX&fV&nT&uR&xP&{symbtreeK˥1LAPL/I 8"' *Multics PL/I Compiler, Release 28e, of February 14, 1985GJohnson.SysMaint.aoptimize mapL*cŴLAW #XBE#_&#XBE%i$cůL+r%#XBE#|#XBE$ PJ5$#XBE$>spec>install>1032>reduction_compiler_.pl1>ldd>include>rdc_start_.incl.pl1>ldd>include>lex_descriptors_.incl.pl1>spec>install>1032>rdc_end_.incl.pl1>ldd>include>rdc_stack_fcns_.incl.pl1>ldd>include>rdc_lex_.incl.pl1>ldd>include>rdc_error_.incl.pl1>ldd>include>rdc_next_stmt_.incl.pl1pl1info reduction_compiler_o!B _k#|'@ gxמv<_tׅ5yK=3