|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5e40f2
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0280 | | .CONST 0x0280 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 004b | K | .CONST 0x004b ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 000c | | .CONST 0x000c ; Number of locals 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 1818 | | Execute Package,Field_Execute,Field_Number 0x18 001d e5fd | | Load 0x2,-0x3 001e 8002 | | Call 0x0,0x2 001f 485f |H_ | Short_Literal 0x5f 0020 4800 |H | Short_Literal 0x0 0021 4803 |H | Short_Literal 0x3 0022 4804 |H | Short_Literal 0x4 0023 e003 | | Load 0x0,0x3 0024 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0025 e003 | | Load 0x0,0x3 0026 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0027 01ca | | Execute Vector,Prepend 0028 0007 | | Action Break_Optional 0029 0092 016e | n| Action Push_String_Extended,0x16e ; "$$.Lists.Demote_Specs" 002b 00d9 | | Load_Top At_Offset_1 002c 01cc | | Execute Vector,Catenate 002d 0007 | | Action Break_Optional 002e 0092 016f | o| Action Push_String_Extended,0x16f ; "$$.Lists.Install_Specs" 0030 00da | | Load_Top At_Offset_2 0031 01cc | | Execute Vector,Catenate 0032 0007 | | Action Break_Optional 0033 0092 0170 | p| Action Push_String_Extended,0x170 ; "$$.Lists.Code_Specs" 0035 00db | | Load_Top At_Offset_3 0036 01cc | | Execute Vector,Catenate 0037 0007 | | Action Break_Optional 0038 0092 0171 | q| Action Push_String_Extended,0x171 ; "$$.Lists.Freeze_Specs" 003a e404 | | Load 0x2,0x4 003b 01cc | | Execute Vector,Catenate 003c 0007 | | Action Break_Optional 003d 0092 0172 | r| Action Push_String_Extended,0x172 ; "$$.Lists.Acls_list" 003f e404 | | Load 0x2,0x4 0040 01cc | | Execute Vector,Catenate 0041 0007 | | Action Break_Optional 0042 e5ff | | Load 0x2,-0x1 0043 e004 | | Load 0x0,0x4 0044 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0045 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0046 4801 |H | Short_Literal 0x1 0047 e5ff | | Load 0x2,-0x1 0048 8005 | | Call 0x0,0x5 0049 029f 0133 | 3| Declare_Subprogram INIT_0130,For_Call 004b BODY_0018: 004b 0092 0173 | s| Action Push_String_Extended,0x173 ; "$$[D_@].Logs.Install_Universe" 004d e404 | | Load 0x2,0x4 004e 01cc | | Execute Vector,Catenate 004f e006 | | Load 0x0,0x6 0050 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0051 e007 | | Load 0x0,0x7 0052 180e | | Execute Package,Field_Execute,Field_Number 0xe 0053 4803 |H | Short_Literal 0x3 0054 0092 0174 | t| Action Push_String_Extended,0x174 ; "Installing the units listed in " 0056 e40a | | Load 0x2,0xa 0057 01cc | | Execute Vector,Catenate 0058 e006 | | Load 0x0,0x6 0059 1813 | | Execute Package,Field_Execute,Field_Number 0x13 005a 00d9 | | Load_Top At_Offset_1 005b 0092 0175 | u| Action Push_String_Extended,0x175 ; "[]" 005d 01df | | Execute Vector,Equal 005e 680b |h | Jump_Zero 0x6a 005f 4801 |H | Short_Literal 0x1 0060 0092 0176 | v| Action Push_String_Extended,0x176 ; "No units to be Restored" 0062 8008 | | Call 0x0,0x8 0063 e007 | | Load 0x0,0x7 0064 180e | | Execute Package,Field_Execute,Field_Number 0xe 0065 e007 | | Load 0x0,0x7 0066 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0067 e006 | | Load 0x0,0x6 0068 180f | | Execute Package,Field_Execute,Field_Number 0xf 0069 4504 |E | Exit_Suprogram New_Top_Offset 0x4 006a 0092 0177 | w| Action Push_String_Extended,0x177 ; "Install_Universe" 006c 8009 | | Call 0x0,0x9 006d 68b3 |h | Jump_Zero 0x121 006e 4800 |H | Short_Literal 0x0 006f 0092 0178 | x| Action Push_String_Extended,0x178 ; "Computing demotions for updating " 0071 e40a | | Load 0x2,0xa 0072 01cc | | Execute Vector,Catenate 0073 8008 | | Call 0x0,0x8 0074 0092 0179 | y| Action Push_String_Extended,0x179 ; "<PROFILE>" 0076 e408 | | Load 0x2,0x8 0077 e407 | | Load 0x2,0x7 0078 e406 | | Load 0x2,0x6 0079 e405 | | Load 0x2,0x5 007a 0092 017a | z| Action Push_String_Extended,0x17a ; "!" 007c e40b | | Load 0x2,0xb 007d 01cc | | Execute Vector,Catenate 007e 800a | | Call 0x0,0xa 007f 4800 |H | Short_Literal 0x0 0080 0092 017b | {| Action Push_String_Extended,0x17b ; "Saving ACLs on " 0082 e40a | | Load 0x2,0xa 0083 01cc | | Execute Vector,Catenate 0084 8008 | | Call 0x0,0x8 0085 0092 0179 | y| Action Push_String_Extended,0x179 ; "<PROFILE>" 0087 e409 | | Load 0x2,0x9 0088 0092 017a | z| Action Push_String_Extended,0x17a ; "!" 008a e40b | | Load 0x2,0xb 008b 01cc | | Execute Vector,Catenate 008c 800b | | Call 0x0,0xb 008d e408 | | Load 0x2,0x8 008e 840c | | Call 0x2,0xc 008f 700f |p | Jump_Nonzero 0x9f 0090 4800 |H | Short_Literal 0x0 0091 0092 017c | || Action Push_String_Extended,0x17c ; "Unfreezing clients of " 0093 e40a | | Load 0x2,0xa 0094 01cc | | Execute Vector,Catenate 0095 8008 | | Call 0x0,0x8 0096 0092 0179 | y| Action Push_String_Extended,0x179 ; "<PROFILE>" 0098 4800 |H | Short_Literal 0x0 0099 0092 017d | }| Action Push_String_Extended,0x17d ; "_" 009b e408 | | Load 0x2,0x8 009c 01cc | | Execute Vector,Catenate 009d e00c | | Load 0x0,0xc 009e 181f | | Execute Package,Field_Execute,Field_Number 0x1f 009f e405 | | Load 0x2,0x5 00a0 840c | | Call 0x2,0xc 00a1 7012 |p | Jump_Nonzero 0xb4 00a2 4800 |H | Short_Literal 0x0 00a3 0092 017e | ~| Action Push_String_Extended,0x17e ; "Demoting clients of " 00a5 e40a | | Load 0x2,0xa 00a6 01cc | | Execute Vector,Catenate 00a7 8008 | | Call 0x0,0x8 00a8 0092 0179 | y| Action Push_String_Extended,0x179 ; "<PROFILE>" 00aa 4800 |H | Short_Literal 0x0 00ab 0092 017f | | Action Push_String_Extended,0x17f ; "<ALL_WORLDS>" 00ad 4801 |H | Short_Literal 0x1 00ae 0092 017d | }| Action Push_String_Extended,0x17d ; "_" 00b0 e405 | | Load 0x2,0x5 00b1 01cc | | Execute Vector,Catenate 00b2 e00d | | Load 0x0,0xd 00b3 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00b4 4800 |H | Short_Literal 0x0 00b5 0092 0180 | | Action Push_String_Extended,0x180 ; "Replacing " 00b7 e40a | | Load 0x2,0xa 00b8 01cc | | Execute Vector,Catenate 00b9 8008 | | Call 0x0,0x8 00ba 0092 0179 | y| Action Push_String_Extended,0x179 ; "<PROFILE>" 00bc e5fe | | Load 0x2,-0x2 00bd 0092 0181 | | Action Push_String_Extended,0x181 ; "Replace, Remake" 00bf 0092 0182 | | Action Push_String_Extended,0x182 ; "*" 00c1 0092 017a | z| Action Push_String_Extended,0x17a ; "!" 00c3 0092 0183 | | Action Push_String_Extended,0x183 ; "?" 00c5 e40b | | Load 0x2,0xb 00c6 01cc | | Execute Vector,Catenate 00c7 e00e | | Load 0x0,0xe 00c8 180e | | Execute Package,Field_Execute,Field_Number 0xe 00c9 e406 | | Load 0x2,0x6 00ca 840c | | Call 0x2,0xc 00cb 7016 |p | Jump_Nonzero 0xe2 00cc 4800 |H | Short_Literal 0x0 00cd 0092 0184 | | Action Push_String_Extended,0x184 ; "Installing demoted clients of " 00cf e40a | | Load 0x2,0xa 00d0 01cc | | Execute Vector,Catenate 00d1 8008 | | Call 0x0,0x8 00d2 0092 0179 | y| Action Push_String_Extended,0x179 ; "<PROFILE>" 00d4 4800 |H | Short_Literal 0x0 00d5 0092 017f | | Action Push_String_Extended,0x17f ; "<ALL_WORLDS>" 00d7 4802 |H | Short_Literal 0x2 00d8 4801 |H | Short_Literal 0x1 00d9 0092 0185 | | Action Push_String_Extended,0x185 ; "[_" 00db e406 | | Load 0x2,0x6 00dc 01cc | | Execute Vector,Catenate 00dd 0092 0186 | | Action Push_String_Extended,0x186 ; ", ~!tools.rpc.rev9_1_5??]" 00df 01cc | | Execute Vector,Catenate 00e0 e00d | | Load 0x0,0xd 00e1 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00e2 e407 | | Load 0x2,0x7 00e3 840c | | Call 0x2,0xc 00e4 7016 |p | Jump_Nonzero 0xfb 00e5 4800 |H | Short_Literal 0x0 00e6 0092 0187 | | Action Push_String_Extended,0x187 ; "Coding demoted clients of " 00e8 e40a | | Load 0x2,0xa 00e9 01cc | | Execute Vector,Catenate 00ea 8008 | | Call 0x0,0x8 00eb 0092 0179 | y| Action Push_String_Extended,0x179 ; "<PROFILE>" 00ed 4800 |H | Short_Literal 0x0 00ee 0092 017f | | Action Push_String_Extended,0x17f ; "<ALL_WORLDS>" 00f0 4803 |H | Short_Literal 0x3 00f1 4801 |H | Short_Literal 0x1 00f2 0092 0185 | | Action Push_String_Extended,0x185 ; "[_" 00f4 e407 | | Load 0x2,0x7 00f5 01cc | | Execute Vector,Catenate 00f6 0092 0186 | | Action Push_String_Extended,0x186 ; ", ~!tools.rpc.rev9_1_5??]" 00f8 01cc | | Execute Vector,Catenate 00f9 e00d | | Load 0x0,0xd 00fa 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00fb e408 | | Load 0x2,0x8 00fc 840c | | Call 0x2,0xc 00fd 700f |p | Jump_Nonzero 0x10d 00fe 4800 |H | Short_Literal 0x0 00ff 0092 0188 | | Action Push_String_Extended,0x188 ; "Refreezing clients of " 0101 e40a | | Load 0x2,0xa 0102 01cc | | Execute Vector,Catenate 0103 8008 | | Call 0x0,0x8 0104 0092 0179 | y| Action Push_String_Extended,0x179 ; "<PROFILE>" 0106 4800 |H | Short_Literal 0x0 0107 0092 017d | }| Action Push_String_Extended,0x17d ; "_" 0109 e408 | | Load 0x2,0x8 010a 01cc | | Execute Vector,Catenate 010b e00c | | Load 0x0,0xc 010c 181e | | Execute Package,Field_Execute,Field_Number 0x1e 010d 4800 |H | Short_Literal 0x0 010e 0092 0189 | | Action Push_String_Extended,0x189 ; "Restoring Acls on " 0110 e40a | | Load 0x2,0xa 0111 01cc | | Execute Vector,Catenate 0112 8008 | | Call 0x0,0x8 0113 0092 0179 | y| Action Push_String_Extended,0x179 ; "<PROFILE>" 0115 e409 | | Load 0x2,0x9 0116 800f | | Call 0x0,0xf 0117 e007 | | Load 0x0,0x7 0118 180e | | Execute Package,Field_Execute,Field_Number 0xe 0119 e006 | | Load 0x0,0x6 011a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 011b 0092 0179 | y| Action Push_String_Extended,0x179 ; "<PROFILE>" 011d 0092 018a | | Action Push_String_Extended,0x18a ; "snapshot" 011f e010 | | Load 0x0,0x10 0120 180e | | Execute Package,Field_Execute,Field_Number 0xe 0121 e007 | | Load 0x0,0x7 0122 180e | | Execute Package,Field_Execute,Field_Number 0xe 0123 e007 | | Load 0x0,0x7 0124 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0125 e006 | | Load 0x0,0x6 0126 180f | | Execute Package,Field_Execute,Field_Number 0xf 0127 0092 0173 | s| Action Push_String_Extended,0x173 ; "$$[D_@].Logs.Install_Universe" 0129 e404 | | Load 0x2,0x4 012a 01cc | | Execute Vector,Catenate 012b 8011 | | Call 0x0,0x11 012c e402 | | Load 0x2,0x2 012d e001 | | Load 0x0,0x1 012e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 012f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0141 | A | .CONST 0x0141 ; Address of begin 0131 0163 | c | .CONST 0x0163 ; Address of exception handler 0132 0007 | | .CONST 0x0007 ; Number of locals 0133 INIT_0130: 0133 e012 | | Load 0x0,0x12 0134 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0135 02c7 | | Declare_Variable Any 0136 00d8 | | Load_Top At_Offset_0 0137 1c00 | | Execute_Immediate Run_Utility,0x0 0138 4801 |H | Short_Literal 0x1 0139 4801 |H | Short_Literal 0x1 013a 00e9 | | Load_Encached String_Cache 013b 035b | [ | Declare_Type Array,Constrained 013c 0337 | 7 | Declare_Variable Array 013d 00e3 | | Load_Encached Natural_Cache 013e 00e1 | | Load_Encached Boolean_Cache 013f 03e9 | | Declare_Variable Discrete,Duplicate 0140 03e9 | | Declare_Variable Discrete,Duplicate 0141 BODY_0130: 0141 e602 | | Load 0x3,0x2 0142 00ea | | Load_Encached Null_String_Cache 0143 e7ff | | Load 0x3,-0x1 0144 4800 |H | Short_Literal 0x0 0145 e012 | | Load 0x0,0x12 0146 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0147 c602 | | Store 0x3,0x2 0148 00e1 | | Load_Encached Boolean_Cache 0149 00e1 | | Load_Encached Boolean_Cache 014a 00e1 | | Load_Encached Boolean_Cache 014b 00e3 | | Load_Encached Natural_Cache 014c e603 | | Load 0x3,0x3 014d e602 | | Load 0x3,0x2 014e e012 | | Load 0x0,0x12 014f 1868 | h | Execute Package,Field_Execute,Field_Number 0x68 0150 00d1 | | Pop_Control Pop_Count_1 0151 c604 | | Store 0x3,0x4 0152 c605 | | Store 0x3,0x5 0153 005b | [ | Store_Top Discrete,At_Offset_3 0154 0059 | Y | Store_Top Discrete,At_Offset_1 0155 e602 | | Load 0x3,0x2 0156 e012 | | Load 0x0,0x12 0157 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0158 c602 | | Store 0x3,0x2 0159 00da | | Load_Top At_Offset_2 015a 7006 |p | Jump_Nonzero 0x161 015b 00d9 | | Load_Top At_Offset_1 015c 7002 |p | Jump_Nonzero 0x15f 015d 00d8 | | Load_Top At_Offset_0 015e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 015f 4801 |H | Short_Literal 0x1 0160 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0161 4801 |H | Short_Literal 0x1 0162 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0163 TRAP_0130: 0163 0007 | | Action Break_Optional 0164 e602 | | Load 0x3,0x2 0165 e012 | | Load 0x0,0x12 0166 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0167 6804 |h | Jump_Zero 0x16c 0168 e602 | | Load 0x3,0x2 0169 e012 | | Load 0x0,0x12 016a 181b | | Execute Package,Field_Execute,Field_Number 0x1b 016b c602 | | Store 0x3,0x2 016c 4801 |H | Short_Literal 0x1 016d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 016e ; -------------------------------------------------------------------------------------- 016e ; STRING TABLE 016e ; -------------------------------------------------------------------------------------- 016e 003c | < | .STRTAB 0x003c->0x018c ; "$$.Lists.Demote_Specs" 016f 004f | O | .STRTAB 0x004f->0x0196 ; "$$.Lists.Install_Specs" 0170 0063 | c | .STRTAB 0x0063->0x01a1 ; "$$.Lists.Code_Specs" 0171 0074 | t | .STRTAB 0x0074->0x01ab ; "$$.Lists.Freeze_Specs" 0172 0087 | | .STRTAB 0x0087->0x01b5 ; "$$.Lists.Acls_list" 0173 0097 | | .STRTAB 0x0097->0x01be ; "$$[D_@].Logs.Install_Universe" 0174 00b2 | | .STRTAB 0x00b2->0x01cd ; "Installing the units listed in " 0175 00cf | | .STRTAB 0x00cf->0x01dc ; "[]" 0176 00cf | | .STRTAB 0x00cf->0x01dd ; "No units to be Restored" 0177 00e4 | | .STRTAB 0x00e4->0x01e9 ; "Install_Universe" 0178 00f2 | | .STRTAB 0x00f2->0x01f1 ; "Computing demotions for updating " 0179 0111 | | .STRTAB 0x0111->0x0201 ; "<PROFILE>" 017a 0118 | | .STRTAB 0x0118->0x0206 ; "!" 017b 0117 | | .STRTAB 0x0117->0x0206 ; "Saving ACLs on " 017c 0124 | $ | .STRTAB 0x0124->0x020e ; "Unfreezing clients of " 017d 0138 | 8 | .STRTAB 0x0138->0x0219 ; "_" 017e 0137 | 7 | .STRTAB 0x0137->0x0219 ; "Demoting clients of " 017f 0149 | I | .STRTAB 0x0149->0x0223 ; "<ALL_WORLDS>" 0180 0153 | S | .STRTAB 0x0153->0x0229 ; "Replacing " 0181 015b | [ | .STRTAB 0x015b->0x022e ; "Replace, Remake" 0182 0168 | h | .STRTAB 0x0168->0x0236 ; "*" 0183 0167 | g | .STRTAB 0x0167->0x0236 ; "?" 0184 0166 | f | .STRTAB 0x0166->0x0237 ; "Installing demoted clients of " 0185 0182 | | .STRTAB 0x0182->0x0246 ; "[_" 0186 0182 | | .STRTAB 0x0182->0x0247 ; ", ~!tools.rpc.rev9_1_5??]" 0187 0199 | | .STRTAB 0x0199->0x0253 ; "Coding demoted clients of " 0188 01b1 | | .STRTAB 0x01b1->0x0260 ; "Refreezing clients of " 0189 01c5 | | .STRTAB 0x01c5->0x026b ; "Restoring Acls on " 018a 01d5 | | .STRTAB 0x01d5->0x0274 ; "snapshot" 018b 01db | | .STREND 0x01db->0x0278 018c 2424 2e4c |$$.L| .STRTAB_STRINGS 0279 0000 0000 | | .BLANK 0000[0x7] 0280 ; -------------------------------------------------------------------------------------- 0280 ; Debug Table 0280 ; -------------------------------------------------------------------------------------- 0280 0004 000d | | .DEBUG4 0x0004,0x000d,0xffc7,0x0000,0x0001,0x0000 0286 bf7b 81fa | { | .XXX[0x17a] 0288 0006 ffab | | 028a 0a3d 4e61 | =Na| 028c 7475 7261 |tura| 028e 6c2c 133d |l, =| 0290 4a6f 625f |Job_| 0292 5365 676d |Segm| 0294 656e 742e |ent.| 0296 4765 7429 |Get)| 0298 3b48 0470 |;H p| 029a 6163 6b61 |acka| 029c 6765 2045 |ge E| 029e 7273 6174 |rsat| 02a0 7a5f 5265 |z_Re| 02a2 6665 7265 |fere| 02a4 6e63 6573 |nces| 02a6 2069 7320 | is | 02a8 6e65 7720 |new | 02aa 4572 7361 |Ersa| 02ac 747a 5f41 |tz_A| 02ae 7272 6179 |rray| 02b0 5f47 656e |_Gen| 02b2 6572 6963 |eric| 02b4 2028 5265 | (Re| 02b6 6665 7265 |fere| 02b8 6e63 655f |nce_| 02ba 4461 7461 |Data| 02bc 2c10 3b52 |, ;R| 02be 6566 6572 |efer| 02c0 656e 6365 |ence| 02c2 5f50 7472 |_Ptr| 02c4 2c0c 3b52 |, ;R| 02c6 6566 6572 |efer| 02c8 656e 6365 |ence| 02ca 2c13 3b4a |, ;J| 02cc 6f62 5f53 |ob_S| 02ce 6567 6d65 |egme| 02d0 6e74 2e47 |nt.G| 02d2 6574 293b |et);| 02d4 0200 2204 | " | 02d6 7061 636b |pack| 02d8 6167 6520 |age | 02da 5365 676d |Segm| 02dc 656e 745f |ent_| 02de 546f 5f48 |To_H| 02e0 616e 646c |andl| 02e2 655f 4d61 |e_Ma| 02e4 7020 6973 |p is| 02e6 3e07 6e65 |> ne| 02e8 7720 436f |w Co| 02ea 6d70 6163 |mpac| 02ec 745f 4865 |t_He| 02ee 6170 5f4d |ap_M| 02f0 6170 5f47 |ap_G| 02f2 656e 6572 |ener| 02f4 6963 2028 |ic (| 02f6 446f 6d61 |Doma| 02f8 696e 5f54 |in_T| 02fa 7970 6520 |ype | 02fc 3d3e 2053 |=> S| 02fe 7973 7465 |yste| 0300 6d2e 5365 |m.Se| 0302 676d 656e |gmen| 0304 742c 2025 |t, %| 0306 5261 6e67 |Rang| 0308 655f 5479 |e_Ty| 030a 7065 203d |pe =| 030c 3e20 4164 |> Ad| 030e 615f 5465 |a_Te| 0310 7874 2e48 |xt.H| 0312 616e 646c |andl| 0314 652c 1b25 |e, %| 0316 4b65 795f |Key_| 0318 5479 7065 |Type| 031a 203d 3e20 | => | 031c 4c6f 6e67 |Long| 031e 5f49 6e74 |_Int| 0320 6567 6572 |eger| 0322 2c2b 2545 |,+%E| 0324 6e63 6f64 |ncod| 0326 6520 3d3e |e =>| 0328 2053 6567 | Seg| 032a 6d65 6e74 |ment| 032c 6564 5f48 |ed_H| 032e 6561 705f |eap_| 0330 496e 7465 |Inte| 0332 7266 6163 |rfac| 0334 652e 4861 |e.Ha| 0336 7368 293b |sh);| 0338 0200 3a04 | : | 033a 5374 7269 |Stri| 033c 6e67 5f54 |ng_T| 033e 6162 203a |ab :| 0340 2053 742e | St.| 0342 5461 626c |Tabl| 0344 6520 3a3d |e :=| 0346 2053 742e | St.| 0348 4e65 775f |New_| 034a 5461 626c |Tabl| 034c 6520 2853 |e (S| 034e 7472 696e |trin| 0350 675f 5461 |g_Ta| 0352 625f 5369 |b_Si| 0354 7a65 293b |ze);| 0356 2904 4861 |) Ha| 0358 6e64 6c65 |ndle| 035a 5f4d 6170 |_Map| 035c 203a 2053 | : S| 035e 6567 6d65 |egme| 0360 6e74 5f54 |nt_T| 0362 6f5f 4861 |o_Ha| 0364 6e64 6c65 |ndle| 0366 5f4d 6170 |_Map| 0368 2e4d 6170 |.Map| 036a 3b02 0044 |; D| 036c 0466 756e | fun| 036e 6374 696f |ctio| 0370 6e20 4361 |n Ca| 0372 6c6c 6564 |lled| 0374 5f4e 616d |_Nam| 0376 6573 2028 |es (| 0378 4e20 3a20 |N : | 037a 4e61 7475 |Natu| 037c 7261 6c29 |ral)| 037e 2072 6574 | ret| 0380 7572 6e20 |urn | 0382 4e61 6d65 |Name| 0384 5f52 6563 |_Rec| 0386 6f72 645f |ord_| 0388 5074 7220 |Ptr | 038a 7265 6e61 |rena| 038c 6d65 731c |mes | 038e 0745 7273 | Ers| 0390 6174 7a5f |atz_| 0392 4361 6c6c |Call| 0394 6564 5f4e |ed_N| 0396 616d 6573 |ames| 0398 2e46 6574 |.Fet| 039a 6368 3b44 |ch;D| 039c 0466 756e | fun| 039e 6374 696f |ctio| 03a0 6e20 4361 |n Ca| 03a2 6c6c 6572 |ller| 03a4 5f4e 616d |_Nam| 03a6 6573 2028 |es (| 03a8 4e20 3a20 |N : | 03aa 4e61 7475 |Natu| 03ac 7261 6c29 |ral)| 03ae 2072 6574 | ret| 03b0 7572 6e20 |urn | 03b2 4e61 6d65 |Name| 03b4 5f52 6563 |_Rec| 03b6 6f72 645f |ord_| 03b8 5074 7220 |Ptr | 03ba 7265 6e61 |rena| 03bc 6d65 731c |mes | 03be 0745 7273 | Ers| 03c0 6174 7a5f |atz_| 03c2 4361 6c6c |Call| 03c4 6572 5f4e |er_N| 03c6 616d 6573 |ames| 03c8 2e46 6574 |.Fet| 03ca 6368 3b02 |ch; | 03cc 0041 0466 | A f| 03ce 756e 6374 |unct| 03d0 696f 6e20 |ion | 03d2 5265 665f |Ref_| 03d4 4172 7261 |Arra| 03d6 7920 284e |y (N| 03d8 203a 2052 | : R| 03da 6566 6572 |efer| 03dc 656e 6365 |ence| 03de 2920 7265 |) re| 03e0 7475 726e |turn| 03e2 2052 6566 | Ref| 03e4 6572 656e |eren| 03e6 6365 5f50 |ce_P| 03e8 7472 2072 |tr r| 03ea 656e 616d |enam| 03ec 6573 1a07 |es | 03ee 4572 7361 |Ersa| 03f0 747a 5f52 |tz_R| 03f2 6566 6572 |efer| 03f4 656e 6365 |ence| 03f6 732e 4665 |s.Fe| 03f8 7463 683b |tch;| 03fa 0200 2e04 | . | 03fc 4865 6164 |Head| 03fe 203a 2046 | : F|