|
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: 7168 (0x1c00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦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 0ce0 | | .CONST 0x0ce0 ; 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 8007 | | .CONST 0x8007 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0071 | q | .CONST 0x0071 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0020 | | .CONST 0x0020 ; Number of locals 000b INIT_0008: 000b e001 | | Load 0x0,0x1 000c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 000d 0129 | ) | Execute Any,Make_Visible 000e 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated 0010 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated 0012 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated 0014 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated 0016 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated 0018 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated 001a 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated 001c 029a 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call,Visible,Unelaborated 001e 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated 0020 029a 0653 | S| Declare_Subprogram INIT_0650,For_Outer_Call,Visible,Unelaborated 0022 00bf | | Action Accept_Activation 0023 e002 | | Load 0x0,0x2 0024 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0025 02c7 | | Declare_Variable Any 0026 4800 |H | Short_Literal 0x0 0027 4801 |H | Short_Literal 0x1 0028 4801 |H | Short_Literal 0x1 0029 6156 |aV | Indirect_Literal Discrete,0x180,{0x00000000, 0x0000076d} 002a e002 | | Load 0x0,0x2 002b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 002c a218 | | Store_Unchecked 0x1,0x18 002d 00e1 | | Load_Encached Boolean_Cache 002e 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 002f e003 | | Load 0x0,0x3 0030 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0031 e004 | | Load 0x0,0x4 0032 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0033 00e1 | | Load_Encached Boolean_Cache 0034 e005 | | Load 0x0,0x5 0035 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0036 4900 |I | Short_Literal 0x100 0037 e006 | | Load 0x0,0x6 0038 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0039 1c07 | | Execute_Immediate Run_Utility,0x7 003a 4900 |I | Short_Literal 0x100 003b e006 | | Load 0x0,0x6 003c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 003d 1c07 | | Execute_Immediate Run_Utility,0x7 003e 4900 |I | Short_Literal 0x100 003f e006 | | Load 0x0,0x6 0040 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0041 1c07 | | Execute_Immediate Run_Utility,0x7 0042 4900 |I | Short_Literal 0x100 0043 e006 | | Load 0x0,0x6 0044 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0045 1c07 | | Execute_Immediate Run_Utility,0x7 0046 029f 06db | | Declare_Subprogram INIT_06d8,For_Call 0048 4808 |H | Short_Literal 0x8 0049 032d | - | Declare_Type Record,Defined 004a 029d 071b | | Declare_Subprogram INIT_0718,For_Outer_Call 004c 029d 074b | K| Declare_Subprogram INIT_0748,For_Outer_Call 004e e007 | | Load 0x0,0x7 004f e008 | | Load 0x0,0x8 0050 e21a | | Load 0x1,0x1a 0051 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 0052 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0053 e009 | | Load 0x0,0x9 0054 0387 | | Declare_Variable Package 0055 00d8 | | Load_Top At_Offset_0 0056 020f | | Execute Module,Activate 0057 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0058 00c7 | | Action Elaborate_Subprogram 0059 1d0f | | Execute_Immediate Reference_Lex_1,0xf 005a 00c7 | | Action Elaborate_Subprogram 005b 1d10 | | Execute_Immediate Reference_Lex_1,0x10 005c 00c7 | | Action Elaborate_Subprogram 005d 1d11 | | Execute_Immediate Reference_Lex_1,0x11 005e 00c7 | | Action Elaborate_Subprogram 005f 029d 079b | | Declare_Subprogram INIT_0798,For_Outer_Call 0061 029d 07e3 | | Declare_Subprogram INIT_07e0,For_Outer_Call 0063 029d 07f3 | | Declare_Subprogram INIT_07f0,For_Outer_Call 0065 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0066 00c7 | | Action Elaborate_Subprogram 0067 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0068 00c7 | | Action Elaborate_Subprogram 0069 1d14 | | Execute_Immediate Reference_Lex_1,0x14 006a 00c7 | | Action Elaborate_Subprogram 006b 1d15 | | Execute_Immediate Reference_Lex_1,0x15 006c 00c7 | | Action Elaborate_Subprogram 006d 1d16 | | Execute_Immediate Reference_Lex_1,0x16 006e 00c7 | | Action Elaborate_Subprogram 006f 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0070 00c7 | | Action Elaborate_Subprogram 0071 BODY_0008: 0071 00bc | | Action Signal_Activated 0072 00bb | | Action Signal_Completion 0073 0000 0000 | | .BLANK 0000[0x5] 0078 ; -------------------------------------------------------------------------------------- 0078 ; SUBPROGRAM 0078 ; -------------------------------------------------------------------------------------- 0078 0091 | | .CONST 0x0091 ; Address of begin 0079 0004 | | .CONST 0x0004 ; Address of exception handler 007a 0006 | | .CONST 0x0006 ; Number of locals 007b INIT_0078: 007b 4820 |H | Short_Literal 0x20 007c 00db | | Load_Top At_Offset_3 007d e00a | | Load 0x0,0xa 007e 181c | | Execute Package,Field_Execute,Field_Number 0x1c 007f 4820 |H | Short_Literal 0x20 0080 e5fe | | Load 0x2,-0x2 0081 e00a | | Load 0x0,0xa 0082 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0083 e003 | | Load 0x0,0x3 0084 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0085 e003 | | Load 0x0,0x3 0086 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0087 03f1 | | Declare_Variable Discrete,With_Value 0088 e21a | | Load 0x1,0x1a 0089 0322 | " | Declare_Variable Record 008a 00d8 | | Load_Top At_Offset_0 008b 1c00 | | Execute_Immediate Run_Utility,0x0 008c e001 | | Load 0x0,0x1 008d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 008e 02c7 | | Declare_Variable Any 008f 00d8 | | Load_Top At_Offset_0 0090 1c00 | | Execute_Immediate Run_Utility,0x0 0091 BODY_0078: 0091 4800 |H | Short_Literal 0x0 0092 a5fa | | Store_Unchecked 0x2,-0x6 0093 e402 | | Load 0x2,0x2 0094 01db | | Execute Vector,Length 0095 7007 |p | Jump_Nonzero 0x9d 0096 e00b | | Load 0x0,0xb 0097 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0098 60e3 |` | Indirect_Literal Discrete,0x17c,{0x00000000, 0x0000812b} 0099 e00c | | Load 0x0,0xc 009a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 009b a5fa | | Store_Unchecked 0x2,-0x6 009c 4505 |E | Exit_Suprogram New_Top_Offset 0x5 009d 00da | | Load_Top At_Offset_2 009e e21d | | Load 0x1,0x1d 009f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00a0 7006 |p | Jump_Nonzero 0xa7 00a1 00da | | Load_Top At_Offset_2 00a2 e21d | | Load 0x1,0x1d 00a3 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00a4 00da | | Load_Top At_Offset_2 00a5 017d | } | Execute Record,Structure_Write 00a6 783e |x> | Jump 0xe5 00a7 00da | | Load_Top At_Offset_2 00a8 e21d | | Load 0x1,0x1d 00a9 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00aa 703a |p: | Jump_Nonzero 0xe5 00ab e5fb | | Load 0x2,-0x5 00ac e001 | | Load 0x0,0x1 00ad 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00ae 7031 |p1 | Jump_Nonzero 0xe0 00af e00d | | Load 0x0,0xd 00b0 180e | | Execute Package,Field_Execute,Field_Number 0xe 00b1 4801 |H | Short_Literal 0x1 00b2 0092 0bad | | Action Push_String_Extended,0xbad ; "Destroying invalid connection" 00b4 e00e | | Load 0x0,0xe 00b5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00b6 00d8 | | Load_Top At_Offset_0 00b7 0120 | | Execute Any,Is_Value 00b8 6803 |h | Jump_Zero 0xbc 00b9 e001 | | Load 0x0,0x1 00ba 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00bb 7801 |x | Jump 0xbd 00bc 00d8 | | Load_Top At_Offset_0 00bd e5fb | | Load 0x2,-0x5 00be e001 | | Load 0x0,0x1 00bf 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00c0 011e | | Execute Any,Convert 00c1 e001 | | Load 0x0,0x1 00c2 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00c3 c5fb | | Store 0x2,-0x5 00c4 c406 | | Store 0x2,0x6 00c5 4802 |H | Short_Literal 0x2 00c6 00d9 | | Load_Top At_Offset_1 00c7 e00f | | Load 0x0,0xf 00c8 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00c9 6816 |h | Jump_Zero 0xe0 00ca 4801 |H | Short_Literal 0x1 00cb 4801 |H | Short_Literal 0x1 00cc e00b | | Load 0x0,0xb 00cd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00ce 035b | [ | Declare_Type Array,Constrained 00cf 0337 | 7 | Declare_Variable Array 00d0 00d9 | | Load_Top At_Offset_1 00d1 e00f | | Load 0x0,0xf 00d2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00d3 e00b | | Load 0x0,0xb 00d4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00d5 e00b | | Load 0x0,0xb 00d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00d7 0119 | | Execute Any,Check_In_Formal_Type 00d8 4801 |H | Short_Literal 0x1 00d9 00da | | Load_Top At_Offset_2 00da 01d6 | | Execute Vector,Field_Write 00db 609c |` | Indirect_Literal Discrete,0x178,{0x00000000, 0x0000812f} 00dc e00c | | Load 0x0,0xc 00dd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00de a5fa | | Store_Unchecked 0x2,-0x6 00df 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00e0 00da | | Load_Top At_Offset_2 00e1 e21d | | Load 0x1,0x1d 00e2 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00e3 00da | | Load_Top At_Offset_2 00e4 017d | } | Execute Record,Structure_Write 00e5 00db | | Load_Top At_Offset_3 00e6 01db | | Execute Vector,Length 00e7 7018 |p | Jump_Nonzero 0x100 00e8 00d8 | | Load_Top At_Offset_0 00e9 0120 | | Execute Any,Is_Value 00ea 6803 |h | Jump_Zero 0xee 00eb e001 | | Load 0x0,0x1 00ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00ed 7801 |x | Jump 0xef 00ee 00d8 | | Load_Top At_Offset_0 00ef e5fb | | Load 0x2,-0x5 00f0 0120 | | Execute Any,Is_Value 00f1 6803 |h | Jump_Zero 0xf5 00f2 e001 | | Load 0x0,0x1 00f3 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00f4 7804 |x | Jump 0xf9 00f5 e5fb | | Load 0x2,-0x5 00f6 e001 | | Load 0x0,0x1 00f7 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00f8 011e | | Execute Any,Convert 00f9 00ea | | Load_Encached Null_String_Cache 00fa e402 | | Load 0x2,0x2 00fb e001 | | Load 0x0,0x1 00fc 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00fd c5fb | | Store 0x2,-0x5 00fe c406 | | Store 0x2,0x6 00ff 781a |x | Jump 0x11a 0100 00d8 | | Load_Top At_Offset_0 0101 0120 | | Execute Any,Is_Value 0102 6803 |h | Jump_Zero 0x106 0103 e001 | | Load 0x0,0x1 0104 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0105 7801 |x | Jump 0x107 0106 00d8 | | Load_Top At_Offset_0 0107 e5fb | | Load 0x2,-0x5 0108 0120 | | Execute Any,Is_Value 0109 6803 |h | Jump_Zero 0x10d 010a e001 | | Load 0x0,0x1 010b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 010c 7804 |x | Jump 0x111 010d e5fb | | Load 0x2,-0x5 010e e001 | | Load 0x0,0x1 010f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0110 011e | | Execute Any,Convert 0111 00ea | | Load_Encached Null_String_Cache 0112 00ea | | Load_Encached Null_String_Cache 0113 e5fd | | Load 0x2,-0x3 0114 e403 | | Load 0x2,0x3 0115 e402 | | Load 0x2,0x2 0116 e001 | | Load 0x0,0x1 0117 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0118 c5fb | | Store 0x2,-0x5 0119 c406 | | Store 0x2,0x6 011a 4802 |H | Short_Literal 0x2 011b 00d9 | | Load_Top At_Offset_1 011c e00f | | Load 0x0,0xf 011d 1817 | | Execute Package,Field_Execute,Field_Number 0x17 011e 6823 |h# | Jump_Zero 0x142 011f 4801 |H | Short_Literal 0x1 0120 4802 |H | Short_Literal 0x2 0121 e00b | | Load 0x0,0xb 0122 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0123 035b | [ | Declare_Type Array,Constrained 0124 0337 | 7 | Declare_Variable Array 0125 e5ff | | Load 0x2,-0x1 0126 e00b | | Load 0x0,0xb 0127 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0128 e00b | | Load 0x0,0xb 0129 1b0e | | Execute Package,Field_Read,Field_Number 0xe 012a 0119 | | Execute Any,Check_In_Formal_Type 012b 4801 |H | Short_Literal 0x1 012c 00da | | Load_Top At_Offset_2 012d 01d6 | | Execute Vector,Field_Write 012e 00d9 | | Load_Top At_Offset_1 012f e00f | | Load 0x0,0xf 0130 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0131 e00b | | Load 0x0,0xb 0132 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0133 e00b | | Load 0x0,0xb 0134 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0135 0119 | | Execute Any,Check_In_Formal_Type 0136 4802 |H | Short_Literal 0x2 0137 00da | | Load_Top At_Offset_2 0138 01d6 | | Execute Vector,Field_Write 0139 603a |`: | Indirect_Literal Discrete,0x174,{0x00000000, 0x0000812a} 013a e00c | | Load 0x0,0xc 013b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 013c a5fa | | Store_Unchecked 0x2,-0x6 013d e003 | | Load 0x0,0x3 013e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 013f e21d | | Load 0x1,0x1d 0140 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0141 7816 |x | Jump 0x158 0142 e5fc | | Load 0x2,-0x4 0143 6814 |h | Jump_Zero 0x158 0144 e00d | | Load 0x0,0xd 0145 180e | | Execute Package,Field_Execute,Field_Number 0xe 0146 4801 |H | Short_Literal 0x1 0147 4801 |H | Short_Literal 0x1 0148 e00b | | Load 0x0,0xb 0149 1b0f | | Execute Package,Field_Read,Field_Number 0xf 014a 035b | [ | Declare_Type Array,Constrained 014b 0337 | 7 | Declare_Variable Array 014c e5ff | | Load 0x2,-0x1 014d e00b | | Load 0x0,0xb 014e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 014f e00b | | Load 0x0,0xb 0150 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0151 0119 | | Execute Any,Check_In_Formal_Type 0152 4801 |H | Short_Literal 0x1 0153 00da | | Load_Top At_Offset_2 0154 01d6 | | Execute Vector,Field_Write 0155 601a |` | Indirect_Literal Discrete,0x170,{0x00000000, 0x00008172} 0156 e00c | | Load 0x0,0xc 0157 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0158 00d9 | | Load_Top At_Offset_1 0159 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 015a e402 | | Load 0x2,0x2 015b e006 | | Load 0x0,0x6 015c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 015d 00d1 | | Pop_Control Pop_Count_1 015e 00d9 | | Load_Top At_Offset_1 015f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0160 e403 | | Load 0x2,0x3 0161 e006 | | Load 0x0,0x6 0162 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0163 00d1 | | Pop_Control Pop_Count_1 0164 00d9 | | Load_Top At_Offset_1 0165 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0166 e5fd | | Load 0x2,-0x3 0167 e006 | | Load 0x0,0x6 0168 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0169 00d1 | | Pop_Control Pop_Count_1 016a 4800 |H | Short_Literal 0x0 016b 00db | | Load_Top At_Offset_3 016c 00db | | Load_Top At_Offset_3 016d e21d | | Load 0x1,0x1d 016e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 016f 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0170 0000 0000 | | .LITERAL {0x00000000, 0x00008172} 0174 0000 0000 | | .LITERAL {0x00000000, 0x0000812a} 0178 0000 0000 | | .LITERAL {0x00000000, 0x0000812f} 017c 0000 0000 | | .LITERAL {0x00000000, 0x0000812b} 0180 0000 0000 | | .LITERAL {0x00000000, 0x0000076d} 0184 0000 0000 | | .BLANK 0000[0x4] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018d | | .CONST 0x018d ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0002 | | .CONST 0x0002 ; Number of locals 018b INIT_0188: 018b e00c | | Load 0x0,0xc 018c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 018d BODY_0188: 018d e00c | | Load 0x0,0xc 018e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 018f e5f9 | | Load 0x2,-0x7 0190 e5fa | | Load 0x2,-0x6 0191 e5fb | | Load 0x2,-0x5 0192 e5fc | | Load 0x2,-0x4 0193 e5fd | | Load 0x2,-0x3 0194 820e | | Call 0x1,0xe 0195 c5f9 | | Store 0x2,-0x7 0196 0059 | Y | Store_Top Discrete,At_Offset_1 0197 4800 |H | Short_Literal 0x0 0198 00d9 | | Load_Top At_Offset_1 0199 e00c | | Load 0x0,0xc 019a 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 019b 6809 |h | Jump_Zero 0x1a5 019c e00c | | Load 0x0,0xc 019d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 019e e5fa | | Load 0x2,-0x6 019f e5fe | | Load 0x2,-0x2 01a0 e5f9 | | Load 0x2,-0x7 01a1 e5ff | | Load 0x2,-0x1 01a2 8212 | | Call 0x1,0x12 01a3 c5f8 | | Store 0x2,-0x8 01a4 4507 |E | Exit_Suprogram New_Top_Offset 0x7 01a5 00d8 | | Load_Top At_Offset_0 01a6 a5f8 | | Store_Unchecked 0x2,-0x8 01a7 4507 |E | Exit_Suprogram New_Top_Offset 0x7 01a8 ; -------------------------------------------------------------------------------------- 01a8 ; SUBPROGRAM 01a8 ; -------------------------------------------------------------------------------------- 01a8 01b2 | | .CONST 0x01b2 ; Address of begin 01a9 0004 | | .CONST 0x0004 ; Address of exception handler 01aa 0003 | | .CONST 0x0003 ; Number of locals 01ab INIT_01a8: 01ab e001 | | Load 0x0,0x1 01ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01ad 02c7 | | Declare_Variable Any 01ae 00d8 | | Load_Top At_Offset_0 01af 1c00 | | Execute_Immediate Run_Utility,0x0 01b0 029f 0823 | #| Declare_Subprogram INIT_0820,For_Call 01b2 BODY_01a8: 01b2 4800 |H | Short_Literal 0x0 01b3 a5fd | | Store_Unchecked 0x2,-0x3 01b4 e003 | | Load 0x0,0x3 01b5 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01b6 e21d | | Load 0x1,0x1d 01b7 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01b8 e5fe | | Load 0x2,-0x2 01b9 e001 | | Load 0x0,0x1 01ba 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01bb 6801 |h | Jump_Zero 0x1bd 01bc 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01bd 8403 | | Call 0x2,0x3 01be 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01bf 0000 | | .XXX[0x1] 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01ca | | .CONST 0x01ca ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0003 | | .CONST 0x0003 ; Number of locals 01c3 INIT_01c0: 01c3 e001 | | Load 0x0,0x1 01c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01c5 02c7 | | Declare_Variable Any 01c6 00d8 | | Load_Top At_Offset_0 01c7 1c00 | | Execute_Immediate Run_Utility,0x0 01c8 029f 087b | {| Declare_Subprogram INIT_0878,For_Call 01ca BODY_01c0: 01ca 4800 |H | Short_Literal 0x0 01cb a5fd | | Store_Unchecked 0x2,-0x3 01cc e003 | | Load 0x0,0x3 01cd 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01ce e21d | | Load 0x1,0x1d 01cf 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01d0 e5fe | | Load 0x2,-0x2 01d1 e001 | | Load 0x0,0x1 01d2 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01d3 6801 |h | Jump_Zero 0x1d5 01d4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01d5 8403 | | Call 0x2,0x3 01d6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01d7 0000 | | .XXX[0x1] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01f1 | | .CONST 0x01f1 ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0006 | | .CONST 0x0006 ; Number of locals 01db INIT_01d8: 01db e00c | | Load 0x0,0xc 01dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01dd e003 | | Load 0x0,0x3 01de 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01df e003 | | Load 0x0,0x3 01e0 1b10 | | Execute Package,Field_Read,Field_Number 0x10 01e1 03f1 | | Declare_Variable Discrete,With_Value 01e2 e21a | | Load 0x1,0x1a 01e3 0322 | " | Declare_Variable Record 01e4 00d8 | | Load_Top At_Offset_0 01e5 1c01 | | Execute_Immediate Run_Utility,0x1 01e6 00d9 | | Load_Top At_Offset_1 01e7 e21d | | Load 0x1,0x1d 01e8 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01e9 00d9 | | Load_Top At_Offset_1 01ea 017d | } | Execute Record,Structure_Write 01eb 00e1 | | Load_Encached Boolean_Cache 01ec 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 01ed e20d | | Load 0x1,0xd 01ee 02c7 | | Declare_Variable Any 01ef e5fe | | Load 0x2,-0x2 01f0 a406 | | Store_Unchecked 0x2,0x6 01f1 BODY_01d8: 01f1 4800 |H | Short_Literal 0x0 01f2 a5fb | | Store_Unchecked 0x2,-0x5 01f3 00d8 | | Load_Top At_Offset_0 01f4 e001 | | Load 0x0,0x1 01f5 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01f6 6815 |h | Jump_Zero 0x20c 01f7 4801 |H | Short_Literal 0x1 01f8 4801 |H | Short_Literal 0x1 01f9 e00b | | Load 0x0,0xb 01fa 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01fb 035b | [ | Declare_Type Array,Constrained 01fc 0337 | 7 | Declare_Variable Array 01fd 0092 0bae | | Action Push_String_Extended,0xbae ; "Set_Remote_Directory" 01ff e00b | | Load 0x0,0xb 0200 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0201 e00b | | Load 0x0,0xb 0202 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0203 0119 | | Execute Any,Check_In_Formal_Type 0204 4801 |H | Short_Literal 0x1 0205 00da | | Load_Top At_Offset_2 0206 01d6 | | Execute Vector,Field_Write 0207 606c |`l | Indirect_Literal Discrete,0x274,{0x00000000, 0x00008138} 0208 e00c | | Load 0x0,0xc 0209 1813 | | Execute Package,Field_Execute,Field_Number 0x13 020a a5fb | | Store_Unchecked 0x2,-0x5 020b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 020c 00e1 | | Load_Encached Boolean_Cache 020d 00d9 | | Load_Top At_Offset_1 020e 8220 | | Call 0x1,0x20 020f c406 | | Store 0x2,0x6 0210 005a | Z | Store_Top Discrete,At_Offset_2 0211 00d9 | | Load_Top At_Offset_1 0212 7015 |p | Jump_Nonzero 0x228 0213 4801 |H | Short_Literal 0x1 0214 4801 |H | Short_Literal 0x1 0215 e00b | | Load 0x0,0xb 0216 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0217 035b | [ | Declare_Type Array,Constrained 0218 0337 | 7 | Declare_Variable Array 0219 0092 0bae | | Action Push_String_Extended,0xbae ; "Set_Remote_Directory" 021b e00b | | Load 0x0,0xb 021c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 021d e00b | | Load 0x0,0xb 021e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 021f 0119 | | Execute Any,Check_In_Formal_Type 0220 4801 |H | Short_Literal 0x1 0221 00da | | Load_Top At_Offset_2 0222 01d6 | | Execute Vector,Field_Write 0223 604c |`L | Indirect_Literal Discrete,0x270,{0x00000000, 0x000081d8} 0224 e00c | | Load 0x0,0xc 0225 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0226 a5fb | | Store_Unchecked 0x2,-0x5 0227 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0228 4800 |H | Short_Literal 0x0 0229 e5ff | | Load 0x2,-0x1 022a e404 | | Load 0x2,0x4 022b 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 022c e006 | | Load 0x0,0x6 022d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 022e e00a | | Load 0x0,0xa 022f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0230 680b |h | Jump_Zero 0x23c 0231 e5fd | | Load 0x2,-0x3 0232 01db | | Execute Vector,Length 0233 7008 |p | Jump_Nonzero 0x23c 0234 e00d | | Load 0x0,0xd 0235 180e | | Execute Package,Field_Execute,Field_Number 0xe 0236 4801 |H | Short_Literal 0x1 0237 0092 0baf | | Action Push_String_Extended,0xbaf ; "Reusing existing directory." 0239 e00e | | Load 0x0,0xe 023a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 023b 7823 |x# | Jump 0x25f 023c e00c | | Load 0x0,0xc 023d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 023e e5fc | | Load 0x2,-0x4 023f 4801 |H | Short_Literal 0x1 0240 4800 |H | Short_Literal 0x0 0241 4800 |H | Short_Literal 0x0 0242 00ea | | Load_Encached Null_String_Cache 0243 e406 | | Load 0x2,0x6 0244 e5ff | | Load 0x2,-0x1 0245 8215 | | Call 0x1,0x15 0246 c402 | | Store 0x2,0x2 0247 4800 |H | Short_Literal 0x0 0248 e402 | | Load 0x2,0x2 0249 e00c | | Load 0x0,0xc 024a 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 024b 7003 |p | Jump_Nonzero 0x24f 024c e402 | | Load 0x2,0x2 024d a5fb | | Store_Unchecked 0x2,-0x5 024e 4505 |E | Exit_Suprogram New_Top_Offset 0x5 024f 00db | | Load_Top At_Offset_3 0250 e21d | | Load 0x1,0x1d 0251 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0252 00db | | Load_Top At_Offset_3 0253 017d | } | Execute Record,Structure_Write 0254 00da | | Load_Top At_Offset_2 0255 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0256 e5ff | | Load 0x2,-0x1 0257 e006 | | Load 0x0,0x6 0258 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0259 00d1 | | Pop_Control Pop_Count_1 025a 4800 |H | Short_Literal 0x0 025b e403 | | Load 0x2,0x3 025c e404 | | Load 0x2,0x4 025d e21d | | Load 0x1,0x1d 025e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 025f e5fd | | Load 0x2,-0x3 0260 01db | | Execute Vector,Length 0261 680b |h | Jump_Zero 0x26d 0262 e00c | | Load 0x0,0xc 0263 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0264 e5fc | | Load 0x2,-0x4 0265 4801 |H | Short_Literal 0x1 0266 4800 |H | Short_Literal 0x0 0267 4800 |H | Short_Literal 0x0 0268 00ea | | Load_Encached Null_String_Cache 0269 e406 | | Load 0x2,0x6 026a e5fd | | Load 0x2,-0x3 026b 8215 | | Call 0x1,0x15 026c c5fb | | Store 0x2,-0x5 026d 4505 |E | Exit_Suprogram New_Top_Offset 0x5 026e 0000 0000 | | .XXX[0x2] 0270 0000 0000 | | .LITERAL {0x00000000, 0x000081d8} 0274 0000 0000 | | .LITERAL {0x00000000, 0x00008138} 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 0288 | | .CONST 0x0288 ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0005 | | .CONST 0x0005 ; Number of locals 027b INIT_0278: 027b e001 | | Load 0x0,0x1 027c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 027d 02c7 | | Declare_Variable Any 027e 00d8 | | Load_Top At_Offset_0 027f 1c00 | | Execute_Immediate Run_Utility,0x0 0280 00e1 | | Load_Encached Boolean_Cache 0281 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0282 e20d | | Load 0x1,0xd 0283 02c7 | | Declare_Variable Any 0284 e5fd | | Load 0x2,-0x3 0285 a404 | | Store_Unchecked 0x2,0x4 0286 029f 08cb | | Declare_Subprogram INIT_08c8,For_Call 0288 BODY_0278: 0288 4800 |H | Short_Literal 0x0 0289 a5fa | | Store_Unchecked 0x2,-0x6 028a 00d9 | | Load_Top At_Offset_1 028b e001 | | Load 0x0,0x1 028c 1815 | | Execute Package,Field_Execute,Field_Number 0x15 028d 6815 |h | Jump_Zero 0x2a3 028e 4801 |H | Short_Literal 0x1 028f 4801 |H | Short_Literal 0x1 0290 e00b | | Load 0x0,0xb 0291 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0292 035b | [ | Declare_Type Array,Constrained 0293 0337 | 7 | Declare_Variable Array 0294 0092 0bb0 | | Action Push_String_Extended,0xbb0 ; "Put" 0296 e00b | | Load 0x0,0xb 0297 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0298 e00b | | Load 0x0,0xb 0299 1b0e | | Execute Package,Field_Read,Field_Number 0xe 029a 0119 | | Execute Any,Check_In_Formal_Type 029b 4801 |H | Short_Literal 0x1 029c 00da | | Load_Top At_Offset_2 029d 01d6 | | Execute Vector,Field_Write 029e 67d5 |g | Indirect_Literal Discrete,0x274,{0x00000000, 0x00008138} 029f e00c | | Load 0x0,0xc 02a0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02a1 a5fa | | Store_Unchecked 0x2,-0x6 02a2 4506 |E | Exit_Suprogram New_Top_Offset 0x6 02a3 00e1 | | Load_Encached Boolean_Cache 02a4 00da | | Load_Top At_Offset_2 02a5 8220 | | Call 0x1,0x20 02a6 c404 | | Store 0x2,0x4 02a7 005b | [ | Store_Top Discrete,At_Offset_3 02a8 00da | | Load_Top At_Offset_2 02a9 7015 |p | Jump_Nonzero 0x2bf 02aa 4801 |H | Short_Literal 0x1 02ab 4801 |H | Short_Literal 0x1 02ac e00b | | Load 0x0,0xb 02ad 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02ae 035b | [ | Declare_Type Array,Constrained 02af 0337 | 7 | Declare_Variable Array 02b0 0092 0bb1 | | Action Push_String_Extended,0xbb1 ; "put" 02b2 e00b | | Load 0x0,0xb 02b3 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02b4 e00b | | Load 0x0,0xb 02b5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02b6 0119 | | Execute Any,Check_In_Formal_Type 02b7 4801 |H | Short_Literal 0x1 02b8 00da | | Load_Top At_Offset_2 02b9 01d6 | | Execute Vector,Field_Write 02ba 67b5 |g | Indirect_Literal Discrete,0x270,{0x00000000, 0x000081d8} 02bb e00c | | Load 0x0,0xc 02bc 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02bd a5fa | | Store_Unchecked 0x2,-0x6 02be 4506 |E | Exit_Suprogram New_Top_Offset 0x6 02bf e5fc | | Load 0x2,-0x4 02c0 6802 |h | Jump_Zero 0x2c3 02c1 8405 | | Call 0x2,0x5 02c2 780f |x | Jump 0x2d2 02c3 00db | | Load_Top At_Offset_3 02c4 0120 | | Execute Any,Is_Value 02c5 6803 |h | Jump_Zero 0x2c9 02c6 e001 | | Load 0x0,0x1 02c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02c8 7801 |x | Jump 0x2ca 02c9 00db | | Load_Top At_Offset_3 02ca 00ea | | Load_Encached Null_String_Cache 02cb 4800 |H | Short_Literal 0x0 02cc e404 | | Load 0x2,0x4 02cd e5fe | | Load 0x2,-0x2 02ce e5ff | | Load 0x2,-0x1 02cf e001 | | Load 0x0,0x1 02d0 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 02d1 c402 | | Store 0x2,0x2 02d2 4802 |H | Short_Literal 0x2 02d3 e402 | | Load 0x2,0x2 02d4 e00f | | Load 0x0,0xf 02d5 1817 | | Execute Package,Field_Execute,Field_Number 0x17 02d6 6828 |h( | Jump_Zero 0x2ff 02d7 4801 |H | Short_Literal 0x1 02d8 4803 |H | Short_Literal 0x3 02d9 e00b | | Load 0x0,0xb 02da 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02db 035b | [ | Declare_Type Array,Constrained 02dc 0337 | 7 | Declare_Variable Array 02dd e5ff | | Load 0x2,-0x1 02de e00b | | Load 0x0,0xb 02df 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02e0 e00b | | Load 0x0,0xb 02e1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02e2 0119 | | Execute Any,Check_In_Formal_Type 02e3 4801 |H | Short_Literal 0x1 02e4 00da | | Load_Top At_Offset_2 02e5 01d6 | | Execute Vector,Field_Write 02e6 e5fe | | Load 0x2,-0x2 02e7 e00b | | Load 0x0,0xb 02e8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02e9 e00b | | Load 0x0,0xb 02ea 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02eb 0119 | | Execute Any,Check_In_Formal_Type 02ec 4802 |H | Short_Literal 0x2 02ed 00da | | Load_Top At_Offset_2 02ee 01d6 | | Execute Vector,Field_Write 02ef e402 | | Load 0x2,0x2 02f0 e00f | | Load 0x0,0xf 02f1 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02f2 e00b | | Load 0x0,0xb 02f3 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02f4 e00b | | Load 0x0,0xb 02f5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02f6 0119 | | Execute Any,Check_In_Formal_Type 02f7 4803 |H | Short_Literal 0x3 02f8 00da | | Load_Top At_Offset_2 02f9 01d6 | | Execute Vector,Field_Write 02fa 6029 |`) | Indirect_Literal Discrete,0x324,{0x00000000, 0x00008134} 02fb e00c | | Load 0x0,0xc 02fc 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02fd a5fa | | Store_Unchecked 0x2,-0x6 02fe 4506 |E | Exit_Suprogram New_Top_Offset 0x6 02ff e5fb | | Load 0x2,-0x5 0300 681d |h | Jump_Zero 0x31e 0301 e00d | | Load 0x0,0xd 0302 180e | | Execute Package,Field_Execute,Field_Number 0xe 0303 4801 |H | Short_Literal 0x1 0304 4802 |H | Short_Literal 0x2 0305 e00b | | Load 0x0,0xb 0306 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0307 035b | [ | Declare_Type Array,Constrained 0308 0337 | 7 | Declare_Variable Array 0309 e5ff | | Load 0x2,-0x1 030a e00b | | Load 0x0,0xb 030b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 030c e00b | | Load 0x0,0xb 030d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 030e 0119 | | Execute Any,Check_In_Formal_Type 030f 4801 |H | Short_Literal 0x1 0310 00da | | Load_Top At_Offset_2 0311 01d6 | | Execute Vector,Field_Write 0312 e5fe | | Load 0x2,-0x2 0313 e00b | | Load 0x0,0xb 0314 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0315 e00b | | Load 0x0,0xb 0316 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0317 0119 | | Execute Any,Check_In_Formal_Type 0318 4802 |H | Short_Literal 0x2 0319 00da | | Load_Top At_Offset_2 031a 01d6 | | Execute Vector,Field_Write 031b 6004 |` | Indirect_Literal Discrete,0x320,{0x00000000, 0x00008177} 031c e00c | | Load 0x0,0xc 031d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 031e 4506 |E | Exit_Suprogram New_Top_Offset 0x6 031f 0000 | | .XXX[0x1] 0320 0000 0000 | | .LITERAL {0x00000000, 0x00008177} 0324 0000 0000 | | .LITERAL {0x00000000, 0x00008134} 0328 ; -------------------------------------------------------------------------------------- 0328 ; SUBPROGRAM 0328 ; -------------------------------------------------------------------------------------- 0328 0339 | 9 | .CONST 0x0339 ; Address of begin 0329 0004 | | .CONST 0x0004 ; Address of exception handler 032a 0006 | | .CONST 0x0006 ; Number of locals 032b INIT_0328: 032b 00e1 | | Load_Encached Boolean_Cache 032c e001 | | Load 0x0,0x1 032d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 032e 02c7 | | Declare_Variable Any 032f 00d8 | | Load_Top At_Offset_0 0330 1c00 | | Execute_Immediate Run_Utility,0x0 0331 00e1 | | Load_Encached Boolean_Cache 0332 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0333 e20d | | Load 0x1,0xd 0334 02c7 | | Declare_Variable Any 0335 e5fd | | Load 0x2,-0x3 0336 a405 | | Store_Unchecked 0x2,0x5 0337 029f 08f3 | | Declare_Subprogram INIT_08f0,For_Call 0339 BODY_0328: 0339 4800 |H | Short_Literal 0x0 033a a5fa | | Store_Unchecked 0x2,-0x6 033b 00d9 | | Load_Top At_Offset_1 033c e001 | | Load 0x0,0x1 033d 1815 | | Execute Package,Field_Execute,Field_Number 0x15 033e 6815 |h | Jump_Zero 0x354 033f 4801 |H | Short_Literal 0x1 0340 4801 |H | Short_Literal 0x1 0341 e00b | | Load 0x0,0xb 0342 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0343 035b | [ | Declare_Type Array,Constrained 0344 0337 | 7 | Declare_Variable Array 0345 0092 0bb2 | | Action Push_String_Extended,0xbb2 ; "Get" 0347 e00b | | Load 0x0,0xb 0348 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0349 e00b | | Load 0x0,0xb 034a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 034b 0119 | | Execute Any,Check_In_Formal_Type 034c 4801 |H | Short_Literal 0x1 034d 00da | | Load_Top At_Offset_2 034e 01d6 | | Execute Vector,Field_Write 034f 60dc |` | Indirect_Literal Discrete,0x42c,{0x00000000, 0x00008138} 0350 e00c | | Load 0x0,0xc 0351 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0352 a5fa | | Store_Unchecked 0x2,-0x6 0353 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0354 00e1 | | Load_Encached Boolean_Cache 0355 00da | | Load_Top At_Offset_2 0356 8220 | | Call 0x1,0x20 0357 c405 | | Store 0x2,0x5 0358 005b | [ | Store_Top Discrete,At_Offset_3 0359 00da | | Load_Top At_Offset_2 035a 7015 |p | Jump_Nonzero 0x370 035b 4801 |H | Short_Literal 0x1 035c 4801 |H | Short_Literal 0x1 035d e00b | | Load 0x0,0xb 035e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 035f 035b | [ | Declare_Type Array,Constrained 0360 0337 | 7 | Declare_Variable Array 0361 0092 0bb3 | | Action Push_String_Extended,0xbb3 ; "get" 0363 e00b | | Load 0x0,0xb 0364 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0365 e00b | | Load 0x0,0xb 0366 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0367 0119 | | Execute Any,Check_In_Formal_Type 0368 4801 |H | Short_Literal 0x1 0369 00da | | Load_Top At_Offset_2 036a 01d6 | | Execute Vector,Field_Write 036b 60bc |` | Indirect_Literal Discrete,0x428,{0x00000000, 0x000081d8} 036c e00c | | Load 0x0,0xc 036d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 036e a5fa | | Store_Unchecked 0x2,-0x6 036f 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0370 00e1 | | Load_Encached Boolean_Cache 0371 e403 | | Load 0x2,0x3 0372 0120 | | Execute Any,Is_Value 0373 6803 |h | Jump_Zero 0x377 0374 e001 | | Load 0x0,0x1 0375 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0376 7801 |x | Jump 0x378 0377 e403 | | Load 0x2,0x3 0378 00db | | Load_Top At_Offset_3 0379 e5fe | | Load 0x2,-0x2 037a e001 | | Load 0x0,0x1 037b 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 037c c403 | | Store 0x2,0x3 037d c402 | | Store 0x2,0x2 037e 4802 |H | Short_Literal 0x2 037f e403 | | Load 0x2,0x3 0380 e00f | | Load 0x0,0xf 0381 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0382 681f |h | Jump_Zero 0x3a2 0383 4801 |H | Short_Literal 0x1 0384 4802 |H | Short_Literal 0x2 0385 e00b | | Load 0x0,0xb 0386 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0387 035b | [ | Declare_Type Array,Constrained 0388 0337 | 7 | Declare_Variable Array 0389 e403 | | Load 0x2,0x3 038a e00f | | Load 0x0,0xf 038b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 038c e00b | | Load 0x0,0xb 038d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 038e e00b | | Load 0x0,0xb 038f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0390 0119 | | Execute Any,Check_In_Formal_Type 0391 4801 |H | Short_Literal 0x1 0392 00da | | Load_Top At_Offset_2 0393 01d6 | | Execute Vector,Field_Write 0394 e5fe | | Load 0x2,-0x2 0395 e00b | | Load 0x0,0xb 0396 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0397 e00b | | Load 0x0,0xb 0398 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0399 0119 | | Execute Any,Check_In_Formal_Type 039a 4802 |H | Short_Literal 0x2 039b 00da | | Load_Top At_Offset_2 039c 01d6 | | Execute Vector,Field_Write 039d 6086 |` | Indirect_Literal Discrete,0x424,{0x00000000, 0x00008162} 039e e00c | | Load 0x0,0xc 039f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03a0 a5fa | | Store_Unchecked 0x2,-0x6 03a1 4506 |E | Exit_Suprogram New_Top_Offset 0x6 03a2 e402 | | Load 0x2,0x2 03a3 7014 |p | Jump_Nonzero 0x3b8 03a4 4801 |H | Short_Literal 0x1 03a5 4801 |H | Short_Literal 0x1 03a6 e00b | | Load 0x0,0xb 03a7 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03a8 035b | [ | Declare_Type Array,Constrained 03a9 0337 | 7 | Declare_Variable Array 03aa e5fe | | Load 0x2,-0x2 03ab e00b | | Load 0x0,0xb 03ac 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03ad e00b | | Load 0x0,0xb 03ae 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03af 0119 | | Execute Any,Check_In_Formal_Type 03b0 4801 |H | Short_Literal 0x1 03b1 00da | | Load_Top At_Offset_2 03b2 01d6 | | Execute Vector,Field_Write 03b3 606c |`l | Indirect_Literal Discrete,0x420,{0x00000000, 0x00008171} 03b4 e00c | | Load 0x0,0xc 03b5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03b6 a5fa | | Store_Unchecked 0x2,-0x6 03b7 4506 |E | Exit_Suprogram New_Top_Offset 0x6 03b8 e5fc | | Load 0x2,-0x4 03b9 6802 |h | Jump_Zero 0x3bc 03ba 8406 | | Call 0x2,0x6 03bb 780f |x | Jump 0x3cb 03bc 00db | | Load_Top At_Offset_3 03bd 0120 | | Execute Any,Is_Value 03be 6803 |h | Jump_Zero 0x3c2 03bf e001 | | Load 0x0,0x1 03c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03c1 7801 |x | Jump 0x3c3 03c2 00db | | Load_Top At_Offset_3 03c3 00ea | | Load_Encached Null_String_Cache 03c4 4800 |H | Short_Literal 0x0 03c5 e5ff | | Load 0x2,-0x1 03c6 e405 | | Load 0x2,0x5 03c7 e5fe | | Load 0x2,-0x2 03c8 e001 | | Load 0x0,0x1 03c9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 03ca c403 | | Store 0x2,0x3 03cb 4802 |H | Short_Literal 0x2 03cc e403 | | Load 0x2,0x3 03cd e00f | | Load 0x0,0xf 03ce 1817 | | Execute Package,Field_Execute,Field_Number 0x17 03cf 6828 |h( | Jump_Zero 0x3f8 03d0 4801 |H | Short_Literal 0x1 03d1 4803 |H | Short_Literal 0x3 03d2 e00b | | Load 0x0,0xb 03d3 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03d4 035b | [ | Declare_Type Array,Constrained 03d5 0337 | 7 | Declare_Variable Array 03d6 e5ff | | Load 0x2,-0x1 03d7 e00b | | Load 0x0,0xb 03d8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03d9 e00b | | Load 0x0,0xb 03da 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03db 0119 | | Execute Any,Check_In_Formal_Type 03dc 4801 |H | Short_Literal 0x1 03dd 00da | | Load_Top At_Offset_2 03de 01d6 | | Execute Vector,Field_Write 03df e5fe | | Load 0x2,-0x2 03e0 e00b | | Load 0x0,0xb 03e1 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03e2 e00b | | Load 0x0,0xb 03e3 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03e4 0119 | | Execute Any,Check_In_Formal_Type 03e5 4802 |H | Short_Literal 0x2 03e6 00da | | Load_Top At_Offset_2 03e7 01d6 | | Execute Vector,Field_Write 03e8 e403 | | Load 0x2,0x3 03e9 e00f | | Load 0x0,0xf 03ea 1818 | | Execute Package,Field_Execute,Field_Number 0x18 03eb e00b | | Load 0x0,0xb 03ec 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03ed e00b | | Load 0x0,0xb 03ee 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03ef 0119 | | Execute Any,Check_In_Formal_Type 03f0 4803 |H | Short_Literal 0x3 03f1 00da | | Load_Top At_Offset_2 03f2 01d6 | | Execute Vector,Field_Write 03f3 6028 |`( | Indirect_Literal Discrete,0x41c,{0x00000000, 0x00008133} 03f4 e00c | | Load 0x0,0xc 03f5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03f6 a5fa | | Store_Unchecked 0x2,-0x6 03f7 4506 |E | Exit_Suprogram New_Top_Offset 0x6 03f8 e5fb | | Load 0x2,-0x5 03f9 681d |h | Jump_Zero 0x417 03fa e00d | | Load 0x0,0xd 03fb 180e | | Execute Package,Field_Execute,Field_Number 0xe 03fc 4801 |H | Short_Literal 0x1 03fd 4802 |H | Short_Literal 0x2 03fe e00b | | Load 0x0,0xb 03ff 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0400 035b | [ | Declare_Type Array,Constrained 0401 0337 | 7 | Declare_Variable Array 0402 e5ff | | Load 0x2,-0x1 0403 e00b | | Load 0x0,0xb 0404 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0405 e00b | | Load 0x0,0xb 0406 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0407 0119 | | Execute Any,Check_In_Formal_Type 0408 4801 |H | Short_Literal 0x1 0409 00da | | Load_Top At_Offset_2 040a 01d6 | | Execute Vector,Field_Write 040b e5fe | | Load 0x2,-0x2 040c e00b | | Load 0x0,0xb 040d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 040e e00b | | Load 0x0,0xb 040f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0410 0119 | | Execute Any,Check_In_Formal_Type 0411 4802 |H | Short_Literal 0x2 0412 00da | | Load_Top At_Offset_2 0413 01d6 | | Execute Vector,Field_Write 0414 6003 |` | Indirect_Literal Discrete,0x418,{0x00000000, 0x00008175} 0415 e00c | | Load 0x0,0xc 0416 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0417 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0418 0000 0000 | | .LITERAL {0x00000000, 0x00008175} 041c 0000 0000 | | .LITERAL {0x00000000, 0x00008133} 0420 0000 0000 | | .LITERAL {0x00000000, 0x00008171} 0424 0000 0000 | | .LITERAL {0x00000000, 0x00008162} 0428 0000 0000 | | .LITERAL {0x00000000, 0x000081d8} 042c 0000 0000 | | .LITERAL {0x00000000, 0x00008138} 0430 ; -------------------------------------------------------------------------------------- 0430 ; SUBPROGRAM 0430 ; -------------------------------------------------------------------------------------- 0430 0474 | t | .CONST 0x0474 ; Address of begin 0431 0534 | 4 | .CONST 0x0534 ; Address of exception handler 0432 0012 | | .CONST 0x0012 ; Number of locals 0433 INIT_0430: 0433 e005 | | Load 0x0,0x5 0434 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0435 02c7 | | Declare_Variable Any 0436 00d8 | | Load_Top At_Offset_0 0437 1c00 | | Execute_Immediate Run_Utility,0x0 0438 e001 | | Load 0x0,0x1 0439 1b0d | | Execute Package,Field_Read,Field_Number 0xd 043a 02c7 | | Declare_Variable Any 043b 00d8 | | Load_Top At_Offset_0 043c 1c00 | | Execute_Immediate Run_Utility,0x0 043d e005 | | Load 0x0,0x5 043e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 043f 02c7 | | Declare_Variable Any 0440 e010 | | Load 0x0,0x10 0441 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0442 e010 | | Load 0x0,0x10 0443 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e 0444 a404 | | Store_Unchecked 0x2,0x4 0445 e005 | | Load 0x0,0x5 0446 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0447 02c7 | | Declare_Variable Any 0448 e010 | | Load 0x0,0x10 0449 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 044a e010 | | Load 0x0,0x10 044b 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e 044c a405 | | Store_Unchecked 0x2,0x5 044d 4801 |H | Short_Literal 0x1 044e 4900 |I | Short_Literal 0x100 044f 00e9 | | Load_Encached String_Cache 0450 035b | [ | Declare_Type Array,Constrained 0451 0337 | 7 | Declare_Variable Array 0452 00e3 | | Load_Encached Natural_Cache 0453 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0454 00e1 | | Load_Encached Boolean_Cache 0455 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0456 00e3 | | Load_Encached Natural_Cache 0457 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0458 e00c | | Load 0x0,0xc 0459 1b0d | | Execute Package,Field_Read,Field_Number 0xd 045a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 045b e5fd | | Load 0x2,-0x3 045c 01db | | Execute Vector,Length 045d 00e3 | | Load_Encached Natural_Cache 045e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 045f 00e1 | | Load_Encached Boolean_Cache 0460 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0461 e20d | | Load 0x1,0xd 0462 02c7 | | Declare_Variable Any 0463 e5fe | | Load 0x2,-0x2 0464 a40d | | Store_Unchecked 0x2,0xd 0465 e5fc | | Load 0x2,-0x4 0466 7002 |p | Jump_Nonzero 0x469 0467 e5fb | | Load 0x2,-0x5 0468 7801 |x | Jump 0x46a 0469 4801 |H | Short_Literal 0x1 046a 00e1 | | Load_Encached Boolean_Cache 046b 03f1 | | Declare_Variable Discrete,With_Value 046c 029f 091b | | Declare_Subprogram INIT_0918,For_Call 046e 029f 098b | | Declare_Subprogram INIT_0988,For_Call 0470 029f 0a33 | 3| Declare_Subprogram INIT_0a30,For_Call 0472 029f 0a53 | S| Declare_Subprogram INIT_0a50,For_Call 0474 BODY_0430: 0474 4800 |H | Short_Literal 0x0 0475 a5f8 | | Store_Unchecked 0x2,-0x8 0476 e40d | | Load 0x2,0xd 0477 e001 | | Load 0x0,0x1 0478 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0479 6815 |h | Jump_Zero 0x48f 047a 4801 |H | Short_Literal 0x1 047b 4801 |H | Short_Literal 0x1 047c e00b | | Load 0x0,0xb 047d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 047e 035b | [ | Declare_Type Array,Constrained 047f 0337 | 7 | Declare_Variable Array 0480 0092 0bb4 | | Action Push_String_Extended,0xbb4 ; "Execute_Command" 0482 e00b | | Load 0x0,0xb 0483 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0484 e00b | | Load 0x0,0xb 0485 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0486 0119 | | Execute Any,Check_In_Formal_Type 0487 4801 |H | Short_Literal 0x1 0488 00da | | Load_Top At_Offset_2 0489 01d6 | | Execute Vector,Field_Write 048a 67a1 |g | Indirect_Literal Discrete,0x42c,{0x00000000, 0x00008138} 048b e00c | | Load 0x0,0xc 048c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 048d a5f8 | | Store_Unchecked 0x2,-0x8 048e 4508 |E | Exit_Suprogram New_Top_Offset 0x8 048f 00e1 | | Load_Encached Boolean_Cache 0490 e40d | | Load 0x2,0xd 0491 8220 | | Call 0x1,0x20 0492 c40d | | Store 0x2,0xd 0493 c40c | | Store 0x2,0xc 0494 e40c | | Load 0x2,0xc 0495 7015 |p | Jump_Nonzero 0x4ab 0496 4801 |H | Short_Literal 0x1 0497 4801 |H | Short_Literal 0x1 0498 e00b | | Load 0x0,0xb 0499 1b0f | | Execute Package,Field_Read,Field_Number 0xf 049a 035b | [ | Declare_Type Array,Constrained 049b 0337 | 7 | Declare_Variable Array 049c 0092 0bb5 | | Action Push_String_Extended,0xbb5 ; "execute_command" 049e e00b | | Load 0x0,0xb 049f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04a0 e00b | | Load 0x0,0xb 04a1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04a2 0119 | | Execute Any,Check_In_Formal_Type 04a3 4801 |H | Short_Literal 0x1 04a4 00da | | Load_Top At_Offset_2 04a5 01d6 | | Execute Vector,Field_Write 04a6 6781 |g | Indirect_Literal Discrete,0x428,{0x00000000, 0x000081d8} 04a7 e00c | | Load 0x0,0xc 04a8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04a9 a5f8 | | Store_Unchecked 0x2,-0x8 04aa 4508 |E | Exit_Suprogram New_Top_Offset 0x8 04ab e5f9 | | Load 0x2,-0x7 04ac 6814 |h | Jump_Zero 0x4c1 04ad e00d | | Load 0x0,0xd 04ae 180e | | Execute Package,Field_Execute,Field_Number 0xe 04af 4801 |H | Short_Literal 0x1 04b0 4801 |H | Short_Literal 0x1 04b1 e00b | | Load 0x0,0xb 04b2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04b3 035b | [ | Declare_Type Array,Constrained 04b4 0337 | 7 | Declare_Variable Array 04b5 e5ff | | Load 0x2,-0x1 04b6 e00b | | Load 0x0,0xb 04b7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04b8 e00b | | Load 0x0,0xb 04b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04ba 0119 | | Execute Any,Check_In_Formal_Type 04bb 4801 |H | Short_Literal 0x1 04bc 00da | | Load_Top At_Offset_2 04bd 01d6 | | Execute Vector,Field_Write 04be 6089 |` | Indirect_Literal Discrete,0x548,{0x00000000, 0x00008176} 04bf e00c | | Load 0x0,0xc 04c0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 04c1 e40e | | Load 0x2,0xe 04c2 6801 |h | Jump_Zero 0x4c4 04c3 8410 | | Call 0x2,0x10 04c4 e403 | | Load 0x2,0x3 04c5 0120 | | Execute Any,Is_Value 04c6 6803 |h | Jump_Zero 0x4ca 04c7 e001 | | Load 0x0,0x1 04c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04c9 7801 |x | Jump 0x4cb 04ca e403 | | Load 0x2,0x3 04cb 6078 |`x | Indirect_Literal Discrete,0x544,{0x00007fff, 0xffffffff} 04cc e404 | | Load 0x2,0x4 04cd e405 | | Load 0x2,0x5 04ce e010 | | Load 0x0,0x10 04cf 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 04d0 e010 | | Load 0x0,0x10 04d1 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e 04d2 e40d | | Load 0x2,0xd 04d3 e5ff | | Load 0x2,-0x1 04d4 e001 | | Load 0x0,0x1 04d5 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 04d6 c403 | | Store 0x2,0x3 04d7 4802 |H | Short_Literal 0x2 04d8 e403 | | Load 0x2,0x3 04d9 e00f | | Load 0x0,0xf 04da 1817 | | Execute Package,Field_Execute,Field_Number 0x17 04db 6827 |h' | Jump_Zero 0x503 04dc e40e | | Load 0x2,0xe 04dd 6805 |h | Jump_Zero 0x4e3 04de e402 | | Load 0x2,0x2 04df e005 | | Load 0x0,0x5 04e0 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 04e1 7001 |p | Jump_Nonzero 0x4e3 04e2 8412 | | Call 0x2,0x12 04e3 8411 | | Call 0x2,0x11 04e4 4801 |H | Short_Literal 0x1 04e5 4802 |H | Short_Literal 0x2 04e6 e00b | | Load 0x0,0xb 04e7 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04e8 035b | [ | Declare_Type Array,Constrained 04e9 0337 | 7 | Declare_Variable Array 04ea e5ff | | Load 0x2,-0x1 04eb e00b | | Load 0x0,0xb 04ec 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04ed e00b | | Load 0x0,0xb 04ee 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04ef 0119 | | Execute Any,Check_In_Formal_Type 04f0 4801 |H | Short_Literal 0x1 04f1 00da | | Load_Top At_Offset_2 04f2 01d6 | | Execute Vector,Field_Write 04f3 e403 | | Load 0x2,0x3 04f4 e00f | | Load 0x0,0xf 04f5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04f6 e00b | | Load 0x0,0xb 04f7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04f8 e00b | | Load 0x0,0xb 04f9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04fa 0119 | | Execute Any,Check_In_Formal_Type 04fb 4802 |H | Short_Literal 0x2 04fc 00da | | Load_Top At_Offset_2 04fd 01d6 | | Execute Vector,Field_Write 04fe 6041 |`A | Indirect_Literal Discrete,0x540,{0x00000000, 0x00008132} 04ff e00c | | Load 0x0,0xc 0500 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0501 a5f8 | | Store_Unchecked 0x2,-0x8 0502 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0503 4801 |H | Short_Literal 0x1 0504 0092 0bb6 | | Action Push_String_Extended,0xbb6 ; "VMS" 0506 e5fd | | Load 0x2,-0x3 0507 e00a | | Load 0x0,0xa 0508 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0509 6804 |h | Jump_Zero 0x50e 050a e40d | | Load 0x2,0xd 050b 840f | | Call 0x2,0xf 050c a40a | | Store_Unchecked 0x2,0xa 050d 7808 |x | Jump 0x516 050e e40e | | Load 0x2,0xe 050f 6806 |h | Jump_Zero 0x516 0510 e402 | | Load 0x2,0x2 0511 e005 | | Load 0x0,0x5 0512 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0513 7001 |p | Jump_Nonzero 0x515 0514 8412 | | Call 0x2,0x12 0515 8411 | | Call 0x2,0x11 0516 e5f9 | | Load 0x2,-0x7 0517 6819 |h | Jump_Zero 0x531 0518 4800 |H | Short_Literal 0x0 0519 e40a | | Load 0x2,0xa 051a e00c | | Load 0x0,0xc 051b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 051c 6814 |h | Jump_Zero 0x531 051d e00d | | Load 0x0,0xd 051e 180e | | Execute Package,Field_Execute,Field_Number 0xe 051f 4801 |H | Short_Literal 0x1 0520 4801 |H | Short_Literal 0x1 0521 e00b | | Load 0x0,0xb 0522 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0523 035b | [ | Declare_Type Array,Constrained 0524 0337 | 7 | Declare_Variable Array 0525 e5ff | | Load 0x2,-0x1 0526 e00b | | Load 0x0,0xb 0527 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0528 e00b | | Load 0x0,0xb 0529 1b0e | | Execute Package,Field_Read,Field_Number 0xe 052a 0119 | | Execute Any,Check_In_Formal_Type 052b 4801 |H | Short_Literal 0x1 052c 00da | | Load_Top At_Offset_2 052d 01d6 | | Execute Vector,Field_Write 052e 600d |` | Indirect_Literal Discrete,0x53c,{0x00000000, 0x00008174} 052f e00c | | Load 0x0,0xc 0530 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0531 e40a | | Load 0x2,0xa 0532 a5f8 | | Store_Unchecked 0x2,-0x8 0533 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0534 TRAP_0430: 0534 e011 | | Load 0x0,0x11 0535 010f | | Execute Exception,Equal 0536 6801 |h | Jump_Zero 0x538 0537 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0538 8411 | | Call 0x2,0x11 0539 00d8 | | Load_Top At_Offset_0 053a 0101 | | Execute Exception,Reraise 053b 0000 | | .XXX[0x1] 053c 0000 0000 | | .LITERAL {0x00000000, 0x00008174} 0540 0000 0000 | | .LITERAL {0x00000000, 0x00008132} 0544 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff} 0548 0000 0000 | | .LITERAL {0x00000000, 0x00008176} 054c 0000 0000 | | .BLANK 0000[0x4] 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 055f | _ | .CONST 0x055f ; Address of begin 0551 0004 | | .CONST 0x0004 ; Address of exception handler 0552 0005 | | .CONST 0x0005 ; Number of locals 0553 INIT_0550: 0553 00e1 | | Load_Encached Boolean_Cache 0554 e001 | | Load 0x0,0x1 0555 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0556 02c7 | | Declare_Variable Any 0557 00d8 | | Load_Top At_Offset_0 0558 1c00 | | Execute_Immediate Run_Utility,0x0 0559 00e1 | | Load_Encached Boolean_Cache 055a 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 055b e20d | | Load 0x1,0xd 055c 02c7 | | Declare_Variable Any 055d e5fe | | Load 0x2,-0x2 055e a405 | | Store_Unchecked 0x2,0x5 055f BODY_0550: 055f 4800 |H | Short_Literal 0x0 0560 a5fc | | Store_Unchecked 0x2,-0x4 0561 e218 | | Load 0x1,0x18 0562 c5fb | | Store 0x2,-0x5 0563 00d8 | | Load_Top At_Offset_0 0564 e001 | | Load 0x0,0x1 0565 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0566 6815 |h | Jump_Zero 0x57c 0567 4801 |H | Short_Literal 0x1 0568 4801 |H | Short_Literal 0x1 0569 e00b | | Load 0x0,0xb 056a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 056b 035b | [ | Declare_Type Array,Constrained 056c 0337 | 7 | Declare_Variable Array 056d 0092 0bb7 | | Action Push_String_Extended,0xbb7 ; "Unit_Update_Time" 056f e00b | | Load 0x0,0xb 0570 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0571 e00b | | Load 0x0,0xb 0572 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0573 0119 | | Execute Any,Check_In_Formal_Type 0574 4801 |H | Short_Literal 0x1 0575 00da | | Load_Top At_Offset_2 0576 01d6 | | Execute Vector,Field_Write 0577 60d0 |` | Indirect_Literal Discrete,0x648,{0x00000000, 0x00008138} 0578 e00c | | Load 0x0,0xc 0579 1813 | | Execute Package,Field_Execute,Field_Number 0x13 057a a5fc | | Store_Unchecked 0x2,-0x4 057b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 057c 00e1 | | Load_Encached Boolean_Cache 057d 00d9 | | Load_Top At_Offset_1 057e 8220 | | Call 0x1,0x20 057f c405 | | Store 0x2,0x5 0580 005a | Z | Store_Top Discrete,At_Offset_2 0581 00d9 | | Load_Top At_Offset_1 0582 7015 |p | Jump_Nonzero 0x598 0583 4801 |H | Short_Literal 0x1 0584 4801 |H | Short_Literal 0x1 0585 e00b | | Load 0x0,0xb 0586 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0587 035b | [ | Declare_Type Array,Constrained 0588 0337 | 7 | Declare_Variable Array 0589 0092 0bb8 | | Action Push_String_Extended,0xbb8 ; "Unit_update_time" 058b e00b | | Load 0x0,0xb 058c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 058d e00b | | Load 0x0,0xb 058e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 058f 0119 | | Execute Any,Check_In_Formal_Type 0590 4801 |H | Short_Literal 0x1 0591 00da | | Load_Top At_Offset_2 0592 01d6 | | Execute Vector,Field_Write 0593 60b0 |` | Indirect_Literal Discrete,0x644,{0x00000000, 0x000081d8} 0594 e00c | | Load 0x0,0xc 0595 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0596 a5fc | | Store_Unchecked 0x2,-0x4 0597 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0598 00e1 | | Load_Encached Boolean_Cache 0599 00db | | Load_Top At_Offset_3 059a 0120 | | Execute Any,Is_Value 059b 6803 |h | Jump_Zero 0x59f 059c e001 | | Load 0x0,0x1 059d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 059e 7801 |x | Jump 0x5a0 059f 00db | | Load_Top At_Offset_3 05a0 00da | | Load_Top At_Offset_2 05a1 e5ff | | Load 0x2,-0x1 05a2 e001 | | Load 0x0,0x1 05a3 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 05a4 c403 | | Store 0x2,0x3 05a5 c402 | | Store 0x2,0x2 05a6 4802 |H | Short_Literal 0x2 05a7 00db | | Load_Top At_Offset_3 05a8 e00f | | Load 0x0,0xf 05a9 1817 | | Execute Package,Field_Execute,Field_Number 0x17 05aa 681f |h | Jump_Zero 0x5ca 05ab 4801 |H | Short_Literal 0x1 05ac 4802 |H | Short_Literal 0x2 05ad e00b | | Load 0x0,0xb 05ae 1b0f | | Execute Package,Field_Read,Field_Number 0xf 05af 035b | [ | Declare_Type Array,Constrained 05b0 0337 | 7 | Declare_Variable Array 05b1 00db | | Load_Top At_Offset_3 05b2 e00f | | Load 0x0,0xf 05b3 1818 | | Execute Package,Field_Execute,Field_Number 0x18 05b4 e00b | | Load 0x0,0xb 05b5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05b6 e00b | | Load 0x0,0xb 05b7 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05b8 0119 | | Execute Any,Check_In_Formal_Type 05b9 4801 |H | Short_Literal 0x1 05ba 00da | | Load_Top At_Offset_2 05bb 01d6 | | Execute Vector,Field_Write 05bc e5ff | | Load 0x2,-0x1 05bd e00b | | Load 0x0,0xb 05be 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05bf e00b | | Load 0x0,0xb 05c0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05c1 0119 | | Execute Any,Check_In_Formal_Type 05c2 4802 |H | Short_Literal 0x2 05c3 00da | | Load_Top At_Offset_2 05c4 01d6 | | Execute Vector,Field_Write 05c5 607a |`z | Indirect_Literal Discrete,0x640,{0x00000000, 0x00008162} 05c6 e00c | | Load 0x0,0xc 05c7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05c8 a5fc | | Store_Unchecked 0x2,-0x4 05c9 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05ca 00db | | Load_Top At_Offset_3 05cb 7014 |p | Jump_Nonzero 0x5e0 05cc 4801 |H | Short_Literal 0x1 05cd 4801 |H | Short_Literal 0x1 05ce e00b | | Load 0x0,0xb 05cf 1b0f | | Execute Package,Field_Read,Field_Number 0xf 05d0 035b | [ | Declare_Type Array,Constrained 05d1 0337 | 7 | Declare_Variable Array 05d2 e5ff | | Load 0x2,-0x1 05d3 e00b | | Load 0x0,0xb 05d4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05d5 e00b | | Load 0x0,0xb 05d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05d7 0119 | | Execute Any,Check_In_Formal_Type 05d8 4801 |H | Short_Literal 0x1 05d9 00da | | Load_Top At_Offset_2 05da 01d6 | | Execute Vector,Field_Write 05db 6060 |`` | Indirect_Literal Discrete,0x63c,{0x00000000, 0x00008171} 05dc e00c | | Load 0x0,0xc 05dd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05de a5fc | | Store_Unchecked 0x2,-0x4 05df 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05e0 00da | | Load_Top At_Offset_2 05e1 0120 | | Execute Any,Is_Value 05e2 6803 |h | Jump_Zero 0x5e6 05e3 e001 | | Load 0x0,0x1 05e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05e5 7801 |x | Jump 0x5e7 05e6 00da | | Load_Top At_Offset_2 05e7 e5fb | | Load 0x2,-0x5 05e8 0120 | | Execute Any,Is_Value 05e9 6803 |h | Jump_Zero 0x5ed 05ea e002 | | Load 0x0,0x2 05eb 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05ec 7801 |x | Jump 0x5ee 05ed e5fb | | Load 0x2,-0x5 05ee 00ea | | Load_Encached Null_String_Cache 05ef 00db | | Load_Top At_Offset_3 05f0 e5ff | | Load 0x2,-0x1 05f1 e001 | | Load 0x0,0x1 05f2 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 05f3 c5fb | | Store 0x2,-0x5 05f4 c403 | | Store 0x2,0x3 05f5 4802 |H | Short_Literal 0x2 05f6 00db | | Load_Top At_Offset_3 05f7 e00f | | Load 0x0,0xf 05f8 1817 | | Execute Package,Field_Execute,Field_Number 0x17 05f9 6821 |h! | Jump_Zero 0x61b 05fa 4801 |H | Short_Literal 0x1 05fb 4802 |H | Short_Literal 0x2 05fc e00b | | Load 0x0,0xb 05fd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 05fe 035b | [ | Declare_Type Array,Constrained 05ff 0337 | 7 | Declare_Variable Array 0600 e5ff | | Load 0x2,-0x1 0601 e00b | | Load 0x0,0xb 0602 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0603 e00b | | Load 0x0,0xb 0604 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0605 0119 | | Execute Any,Check_In_Formal_Type 0606 4801 |H | Short_Literal 0x1 0607 00da | | Load_Top At_Offset_2 0608 01d6 | | Execute Vector,Field_Write 0609 00db | | Load_Top At_Offset_3 060a e00f | | Load 0x0,0xf 060b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 060c e00b | | Load 0x0,0xb 060d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 060e e00b | | Load 0x0,0xb 060f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0610 0119 | | Execute Any,Check_In_Formal_Type 0611 4802 |H | Short_Literal 0x2 0612 00da | | Load_Top At_Offset_2 0613 01d6 | | Execute Vector,Field_Write 0614 6023 |`# | Indirect_Literal Discrete,0x638,{0x00000000, 0x00008137} 0615 e00c | | Load 0x0,0xc 0616 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0617 a5fc | | Store_Unchecked 0x2,-0x4 0618 e218 | | Load 0x1,0x18 0619 c5fb | | Store 0x2,-0x5 061a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 061b e5fd | | Load 0x2,-0x3 061c 6814 |h | Jump_Zero 0x631 061d e00d | | Load 0x0,0xd 061e 180e | | Execute Package,Field_Execute,Field_Number 0xe 061f 4801 |H | Short_Literal 0x1 0620 4801 |H | Short_Literal 0x1 0621 e00b | | Load 0x0,0xb 0622 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0623 035b | [ | Declare_Type Array,Constrained 0624 0337 | 7 | Declare_Variable Array 0625 e5ff | | Load 0x2,-0x1 0626 e00b | | Load 0x0,0xb 0627 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0628 e00b | | Load 0x0,0xb 0629 1b0e | | Execute Package,Field_Read,Field_Number 0xe 062a 0119 | | Execute Any,Check_In_Formal_Type 062b 4801 |H | Short_Literal 0x1 062c 00da | | Load_Top At_Offset_2 062d 01d6 | | Execute Vector,Field_Write 062e 6005 |` | Indirect_Literal Discrete,0x634,{0x00000000, 0x00008179} 062f e00c | | Load 0x0,0xc 0630 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0631 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0632 0000 0000 | | .XXX[0x2] 0634 0000 0000 | | .LITERAL {0x00000000, 0x00008179} 0638 0000 0000 | | .LITERAL {0x00000000, 0x00008137} 063c 0000 0000 | | .LITERAL {0x00000000, 0x00008171} 0640 0000 0000 | | .LITERAL {0x00000000, 0x00008162} 0644 0000 0000 | | .LITERAL {0x00000000, 0x000081d8} 0648 0000 0000 | | .LITERAL {0x00000000, 0x00008138} 064c 0000 0000 | | .BLANK 0000[0x4] 0650 ; -------------------------------------------------------------------------------------- 0650 ; SUBPROGRAM 0650 ; -------------------------------------------------------------------------------------- 0650 065e | ^ | .CONST 0x065e ; Address of begin 0651 0004 | | .CONST 0x0004 ; Address of exception handler 0652 0004 | | .CONST 0x0004 ; Number of locals 0653 INIT_0650: 0653 e00f | | Load 0x0,0xf 0654 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0655 02c7 | | Declare_Variable Any 0656 00d8 | | Load_Top At_Offset_0 0657 1c00 | | Execute_Immediate Run_Utility,0x0 0658 00e1 | | Load_Encached Boolean_Cache 0659 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 065a e20d | | Load 0x1,0xd 065b 02c7 | | Declare_Variable Any 065c e5fe | | Load 0x2,-0x2 065d a404 | | Store_Unchecked 0x2,0x4 065e BODY_0650: 065e 4800 |H | Short_Literal 0x0 065f a5fc | | Store_Unchecked 0x2,-0x4 0660 4800 |H | Short_Literal 0x0 0661 a5fb | | Store_Unchecked 0x2,-0x5 0662 00e1 | | Load_Encached Boolean_Cache 0663 00d9 | | Load_Top At_Offset_1 0664 8220 | | Call 0x1,0x20 0665 c404 | | Store 0x2,0x4 0666 005a | Z | Store_Top Discrete,At_Offset_2 0667 00d9 | | Load_Top At_Offset_1 0668 7015 |p | Jump_Nonzero 0x67e 0669 4801 |H | Short_Literal 0x1 066a 4801 |H | Short_Literal 0x1 066b e00b | | Load 0x0,0xb 066c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 066d 035b | [ | Declare_Type Array,Constrained 066e 0337 | 7 | Declare_Variable Array 066f 0092 0bb9 | | Action Push_String_Extended,0xbb9 ; "file_exists" 0671 e00b | | Load 0x0,0xb 0672 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0673 e00b | | Load 0x0,0xb 0674 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0675 0119 | | Execute Any,Check_In_Formal_Type 0676 4801 |H | Short_Literal 0x1 0677 00da | | Load_Top At_Offset_2 0678 01d6 | | Execute Vector,Field_Write 0679 67ca |g | Indirect_Literal Discrete,0x644,{0x00000000, 0x000081d8} 067a e00c | | Load 0x0,0xc 067b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 067c a5fc | | Store_Unchecked 0x2,-0x4 067d 4504 |E | Exit_Suprogram New_Top_Offset 0x4 067e 00e1 | | Load_Encached Boolean_Cache 067f 00db | | Load_Top At_Offset_3 0680 0120 | | Execute Any,Is_Value 0681 6803 |h | Jump_Zero 0x685 0682 e001 | | Load 0x0,0x1 0683 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0684 7801 |x | Jump 0x686 0685 00db | | Load_Top At_Offset_3 0686 00da | | Load_Top At_Offset_2 0687 e5ff | | Load 0x2,-0x1 0688 e001 | | Load 0x0,0x1 0689 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 068a c402 | | Store 0x2,0x2 068b c5fb | | Store 0x2,-0x5 068c 4802 |H | Short_Literal 0x2 068d 00db | | Load_Top At_Offset_3 068e e00f | | Load 0x0,0xf 068f 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0690 681f |h | Jump_Zero 0x6b0 0691 4801 |H | Short_Literal 0x1 0692 4802 |H | Short_Literal 0x2 0693 e00b | | Load 0x0,0xb 0694 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0695 035b | [ | Declare_Type Array,Constrained 0696 0337 | 7 | Declare_Variable Array 0697 00db | | Load_Top At_Offset_3 0698 e00f | | Load 0x0,0xf 0699 1818 | | Execute Package,Field_Execute,Field_Number 0x18 069a e00b | | Load 0x0,0xb 069b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 069c e00b | | Load 0x0,0xb 069d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 069e 0119 | | Execute Any,Check_In_Formal_Type 069f 4801 |H | Short_Literal 0x1 06a0 00da | | Load_Top At_Offset_2 06a1 01d6 | | Execute Vector,Field_Write 06a2 e5ff | | Load 0x2,-0x1 06a3 e00b | | Load 0x0,0xb 06a4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 06a5 e00b | | Load 0x0,0xb 06a6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 06a7 0119 | | Execute Any,Check_In_Formal_Type 06a8 4802 |H | Short_Literal 0x2 06a9 00da | | Load_Top At_Offset_2 06aa 01d6 | | Execute Vector,Field_Write 06ab 6794 |g | Indirect_Literal Discrete,0x640,{0x00000000, 0x00008162} 06ac e00c | | Load 0x0,0xc 06ad 1813 | | Execute Package,Field_Execute,Field_Number 0x13 06ae a5fc | | Store_Unchecked 0x2,-0x4 06af 4504 |E | Exit_Suprogram New_Top_Offset 0x4 06b0 e5fd | | Load 0x2,-0x3 06b1 681a |h | Jump_Zero 0x6cc 06b2 e00d | | Load 0x0,0xd 06b3 180e | | Execute Package,Field_Execute,Field_Number 0xe 06b4 4801 |H | Short_Literal 0x1 06b5 4801 |H | Short_Literal 0x1 06b6 e00b | | Load 0x0,0xb 06b7 1b0f | | Execute Package,Field_Read,Field_Number 0xf 06b8 035b | [ | Declare_Type Array,Constrained 06b9 0337 | 7 | Declare_Variable Array 06ba 0092 0bba | | Action Push_String_Extended,0xbba ; "Successfully determined the existence of remote file \x22" 06bc e5ff | | Load 0x2,-0x1 06bd 01cc | | Execute Vector,Catenate 06be 0092 0bbb | | Action Push_String_Extended,0xbbb ; "\x22." 06c0 01cc | | Execute Vector,Catenate 06c1 e00b | | Load 0x0,0xb 06c2 1810 | | Execute Package,Field_Execute,Field_Number 0x10 06c3 e00b | | Load 0x0,0xb 06c4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 06c5 0119 | | Execute Any,Check_In_Formal_Type 06c6 4801 |H | Short_Literal 0x1 06c7 00da | | Load_Top At_Offset_2 06c8 01d6 | | Execute Vector,Field_Write 06c9 6006 |` | Indirect_Literal Discrete,0x6d0,{0x00000000, 0x00008136} 06ca e00c | | Load 0x0,0xc 06cb 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 06cc 4504 |E | Exit_Suprogram New_Top_Offset 0x4 06cd 0000 0000 | | .XXX[0x3] 06cf 0000 | | 06d0 0000 0000 | | .LITERAL {0x00000000, 0x00008136} 06d4 0000 0000 | | .BLANK 0000[0x4] 06d8 ; -------------------------------------------------------------------------------------- 06d8 ; SUBPROGRAM 06d8 ; -------------------------------------------------------------------------------------- 06d8 06db | | .CONST 0x06db ; Address of begin 06d9 0004 | | .CONST 0x0004 ; Address of exception handler 06da 0001 | | .CONST 0x0001 ; Number of locals 06db BODY_06d8: 06db INIT_06d8: 06db 4608 |F | Jump_Case 0x9 06dc 7808 |x | Jump 0x6e5 ; case 0x0 06dd 7826 |x& | Jump 0x704 ; case 0x1 06de 7832 |x2 | Jump 0x711 ; case 0x2 06df 7831 |x1 | Jump 0x711 ; case 0x3 06e0 7830 |x0 | Jump 0x711 ; case 0x4 06e1 782f |x/ | Jump 0x711 ; case 0x5 06e2 782e |x. | Jump 0x711 ; case 0x6 06e3 782d |x- | Jump 0x711 ; case 0x7 06e4 782c |x, | Jump 0x711 ; case 0x8 06e5 00da | | Load_Top At_Offset_2 06e6 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 06e7 0125 | % | Execute Any,Set_Constraint 06e8 00da | | Load_Top At_Offset_2 06e9 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 06ea 1c00 | | Execute_Immediate Run_Utility,0x0 06eb 00da | | Load_Top At_Offset_2 06ec 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 06ed 0125 | % | Execute Any,Set_Constraint 06ee 00da | | Load_Top At_Offset_2 06ef 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 06f0 1c00 | | Execute_Immediate Run_Utility,0x0 06f1 00da | | Load_Top At_Offset_2 06f2 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 06f3 0125 | % | Execute Any,Set_Constraint 06f4 00da | | Load_Top At_Offset_2 06f5 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 06f6 1c00 | | Execute_Immediate Run_Utility,0x0 06f7 00da | | Load_Top At_Offset_2 06f8 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 06f9 0125 | % | Execute Any,Set_Constraint 06fa 00da | | Load_Top At_Offset_2 06fb 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 06fc 1c00 | | Execute_Immediate Run_Utility,0x0 06fd 00da | | Load_Top At_Offset_2 06fe 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 06ff 0125 | % | Execute Any,Set_Constraint 0700 00da | | Load_Top At_Offset_2 0701 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0702 1c00 | | Execute_Immediate Run_Utility,0x0 0703 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0704 00da | | Load_Top At_Offset_2 0705 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0706 0125 | % | Execute Any,Set_Constraint 0707 00da | | Load_Top At_Offset_2 0708 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0709 0125 | % | Execute Any,Set_Constraint 070a 00da | | Load_Top At_Offset_2 070b 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 070c 0125 | % | Execute Any,Set_Constraint 070d 00da | | Load_Top At_Offset_2 070e 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 070f 0125 | % | Execute Any,Set_Constraint 0710 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0711 0869 | i | Execute_Immediate Raise,0x69 0712 0000 0000 | | .BLANK 0000[0x6] 0718 ; -------------------------------------------------------------------------------------- 0718 ; SUBPROGRAM 0718 ; -------------------------------------------------------------------------------------- 0718 0727 | ' | .CONST 0x0727 ; Address of begin 0719 0004 | | .CONST 0x0004 ; Address of exception handler 071a 0003 | | .CONST 0x0003 ; Number of locals 071b INIT_0718: 071b e003 | | Load 0x0,0x3 071c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 071d e003 | | Load 0x0,0x3 071e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 071f 03f1 | | Declare_Variable Discrete,With_Value 0720 e003 | | Load 0x0,0x3 0721 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0722 e012 | | Load 0x0,0x12 0723 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0724 e004 | | Load 0x0,0x4 0725 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0726 03f1 | | Declare_Variable Discrete,With_Value 0727 BODY_0718: 0727 00d9 | | Load_Top At_Offset_1 0728 e5ff | | Load 0x2,-0x1 0729 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 072a 00d8 | | Load_Top At_Offset_0 072b e5ff | | Load 0x2,-0x1 072c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 072d 4800 |H | Short_Literal 0x0 072e e5ff | | Load 0x2,-0x1 072f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0730 e00d | | Load 0x0,0xd 0731 180e | | Execute Package,Field_Execute,Field_Number 0xe 0732 4801 |H | Short_Literal 0x1 0733 0092 0bbc | | Action Push_String_Extended,0xbbc ; "Initialized Job_Record for job" 0735 e402 | | Load 0x2,0x2 0736 00e0 | | Load_Encached Standard_Cache 0737 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0738 01cc | | Execute Vector,Catenate 0739 0092 0bbd | | Action Push_String_Extended,0xbbd ; ", task" 073b 01cc | | Execute Vector,Catenate 073c 00db | | Load_Top At_Offset_3 073d 00d8 | | Load_Top At_Offset_0 073e 00e2 | | Load_Encached Integer_Cache 073f 0260 | ` | Execute Discrete,In_Type 0740 7001 |p | Jump_Nonzero 0x742 0741 0801 | | Execute_Immediate Raise,0x1 0742 00e0 | | Load_Encached Standard_Cache 0743 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0744 01cc | | Execute Vector,Catenate 0745 e00e | | Load 0x0,0xe 0746 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0747 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0748 ; -------------------------------------------------------------------------------------- 0748 ; SUBPROGRAM 0748 ; -------------------------------------------------------------------------------------- 0748 074b | K | .CONST 0x074b ; Address of begin 0749 0004 | | .CONST 0x0004 ; Address of exception handler 074a 0001 | | .CONST 0x0001 ; Number of locals 074b BODY_0748: 074b INIT_0748: 074b e00d | | Load 0x0,0xd 074c 180e | | Execute Package,Field_Execute,Field_Number 0xe 074d 4801 |H | Short_Literal 0x1 074e 0092 0bbe | | Action Push_String_Extended,0xbbe ; "Finalizing Job_Record" 0750 e00e | | Load 0x0,0xe 0751 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0752 00da | | Load_Top At_Offset_2 0753 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0754 6822 |h" | Jump_Zero 0x777 0755 00da | | Load_Top At_Offset_2 0756 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0757 e005 | | Load 0x0,0x5 0758 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0759 00db | | Load_Top At_Offset_3 075a 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 075b e00d | | Load 0x0,0xd 075c 180e | | Execute Package,Field_Execute,Field_Number 0xe 075d 4801 |H | Short_Literal 0x1 075e 0092 0bbf | | Action Push_String_Extended,0xbbf ; "Deleting temporary file for process" 0760 e5ff | | Load 0x2,-0x1 0761 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0762 00e0 | | Load_Encached Standard_Cache 0763 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0764 01cc | | Execute Vector,Catenate 0765 0092 0bbd | | Action Push_String_Extended,0xbbd ; ", task" 0767 01cc | | Execute Vector,Catenate 0768 e5ff | | Load 0x2,-0x1 0769 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 076a 00d8 | | Load_Top At_Offset_0 076b 00e2 | | Load_Encached Integer_Cache 076c 0260 | ` | Execute Discrete,In_Type 076d 7001 |p | Jump_Nonzero 0x76f 076e 0801 | | Execute_Immediate Raise,0x1 076f 00e0 | | Load_Encached Standard_Cache 0770 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0771 01cc | | Execute Vector,Catenate 0772 e00e | | Load 0x0,0xe 0773 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0774 4800 |H | Short_Literal 0x0 0775 00db | | Load_Top At_Offset_3 0776 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0777 4800 |H | Short_Literal 0x0 0778 00db | | Load_Top At_Offset_3 0779 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 077a 4800 |H | Short_Literal 0x0 077b 00db | | Load_Top At_Offset_3 077c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 077d 00da | | Load_Top At_Offset_2 077e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 077f 00ea | | Load_Encached Null_String_Cache 0780 e006 | | Load 0x0,0x6 0781 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0782 00d1 | | Pop_Control Pop_Count_1 0783 00da | | Load_Top At_Offset_2 0784 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0785 00ea | | Load_Encached Null_String_Cache 0786 e006 | | Load 0x0,0x6 0787 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0788 00d1 | | Pop_Control Pop_Count_1 0789 00da | | Load_Top At_Offset_2 078a 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 078b 00ea | | Load_Encached Null_String_Cache 078c e006 | | Load 0x0,0x6 078d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 078e 00d1 | | Pop_Control Pop_Count_1 078f 00da | | Load_Top At_Offset_2 0790 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0791 00ea | | Load_Encached Null_String_Cache 0792 e006 | | Load 0x0,0x6 0793 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0794 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0795 0000 0000 | | .XXX[0x3] 0797 0000 | | 0798 ; -------------------------------------------------------------------------------------- 0798 ; SUBPROGRAM 0798 ; -------------------------------------------------------------------------------------- 0798 07b0 | | .CONST 0x07b0 ; Address of begin 0799 0004 | | .CONST 0x0004 ; Address of exception handler 079a 0005 | | .CONST 0x0005 ; Number of locals 079b INIT_0798: 079b e001 | | Load 0x0,0x1 079c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 079d 02c7 | | Declare_Variable Any 079e 00d8 | | Load_Top At_Offset_0 079f 1c00 | | Execute_Immediate Run_Utility,0x0 07a0 e003 | | Load 0x0,0x3 07a1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 07a2 e003 | | Load 0x0,0x3 07a3 1b10 | | Execute Package,Field_Read,Field_Number 0x10 07a4 03f1 | | Declare_Variable Discrete,With_Value 07a5 e21a | | Load 0x1,0x1a 07a6 0322 | " | Declare_Variable Record 07a7 00d8 | | Load_Top At_Offset_0 07a8 1c01 | | Execute_Immediate Run_Utility,0x1 07a9 00d9 | | Load_Top At_Offset_1 07aa e21d | | Load 0x1,0x1d 07ab 1815 | | Execute Package,Field_Execute,Field_Number 0x15 07ac 00d9 | | Load_Top At_Offset_1 07ad 017d | } | Execute Record,Structure_Write 07ae 029f 0b33 | 3| Declare_Subprogram INIT_0b30,For_Call 07b0 BODY_0798: 07b0 e00d | | Load 0x0,0xd 07b1 180e | | Execute Package,Field_Execute,Field_Number 0xe 07b2 4801 |H | Short_Literal 0x1 07b3 4801 |H | Short_Literal 0x1 07b4 e00b | | Load 0x0,0xb 07b5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 07b6 035b | [ | Declare_Type Array,Constrained 07b7 0337 | 7 | Declare_Variable Array 07b8 00db | | Load_Top At_Offset_3 07b9 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 07ba e006 | | Load 0x0,0x6 07bb 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07bc e00b | | Load 0x0,0xb 07bd 1810 | | Execute Package,Field_Execute,Field_Number 0x10 07be e00b | | Load 0x0,0xb 07bf 1b0e | | Execute Package,Field_Read,Field_Number 0xe 07c0 0119 | | Execute Any,Check_In_Formal_Type 07c1 4801 |H | Short_Literal 0x1 07c2 00da | | Load_Top At_Offset_2 07c3 01d6 | | Execute Vector,Field_Write 07c4 6017 |` | Indirect_Literal Discrete,0x7dc,{0x00000000, 0x000081d9} 07c5 e00c | | Load 0x0,0xc 07c6 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 07c7 8405 | | Call 0x2,0x5 07c8 e00c | | Load 0x0,0xc 07c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 07ca e5fe | | Load 0x2,-0x2 07cb e5ff | | Load 0x2,-0x1 07cc e404 | | Load 0x2,0x4 07cd 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 07ce e006 | | Load 0x0,0x6 07cf 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07d0 e404 | | Load 0x2,0x4 07d1 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 07d2 e006 | | Load 0x0,0x6 07d3 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07d4 e404 | | Load 0x2,0x4 07d5 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 07d6 e006 | | Load 0x0,0x6 07d7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07d8 820e | | Call 0x1,0xe 07d9 c5fe | | Store 0x2,-0x2 07da c5fd | | Store 0x2,-0x3 07db 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07dc 0000 0000 | | .LITERAL {0x00000000, 0x000081d9} 07e0 ; -------------------------------------------------------------------------------------- 07e0 ; SUBPROGRAM 07e0 ; -------------------------------------------------------------------------------------- 07e0 07e3 | | .CONST 0x07e3 ; Address of begin 07e1 07e7 | | .CONST 0x07e7 ; Address of exception handler 07e2 0001 | | .CONST 0x0001 ; Number of locals 07e3 BODY_07e0: 07e3 INIT_07e0: 07e3 00da | | Load_Top At_Offset_2 07e4 e001 | | Load 0x0,0x1 07e5 181b | | Execute Package,Field_Execute,Field_Number 0x1b 07e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07e7 TRAP_07e0: 07e7 0007 | | Action Break_Optional 07e8 4800 |H | Short_Literal 0x0 07e9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07ea 0000 0000 | | .BLANK 0000[0x6] 07f0 ; -------------------------------------------------------------------------------------- 07f0 ; SUBPROGRAM 07f0 ; -------------------------------------------------------------------------------------- 07f0 07f5 | | .CONST 0x07f5 ; Address of begin 07f1 0817 | | .CONST 0x0817 ; Address of exception handler 07f2 0002 | | .CONST 0x0002 ; Number of locals 07f3 INIT_07f0: 07f3 e00c | | Load 0x0,0xc 07f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 07f5 BODY_07f0: 07f5 4801 |H | Short_Literal 0x1 07f6 a5fe | | Store_Unchecked 0x2,-0x2 07f7 00db | | Load_Top At_Offset_3 07f8 821f | | Call 0x1,0x1f 07f9 701c |p | Jump_Nonzero 0x816 07fa 00cf | | Action Mark_Auxiliary 07fb 4803 |H | Short_Literal 0x3 07fc 4801 |H | Short_Literal 0x1 07fd 0007 | | Action Break_Optional 07fe e00c | | Load 0x0,0xc 07ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0800 e5ff | | Load 0x2,-0x1 0801 4800 |H | Short_Literal 0x0 0802 821e | | Call 0x1,0x1e 0803 c5ff | | Store 0x2,-0x1 0804 c402 | | Store 0x2,0x2 0805 4800 |H | Short_Literal 0x0 0806 e402 | | Load 0x2,0x2 0807 e00c | | Load 0x0,0xc 0808 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0809 6807 |h | Jump_Zero 0x811 080a e5ff | | Load 0x2,-0x1 080b e001 | | Load 0x0,0x1 080c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 080d 6803 |h | Jump_Zero 0x811 080e 4801 |H | Short_Literal 0x1 080f a5fe | | Store_Unchecked 0x2,-0x2 0810 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0811 00c8 | | Action Pop_Auxiliary_Range 0812 3feb |? | Loop_Increasing 0x7fe 0813 00ce | | Action Pop_Auxiliary 0814 4800 |H | Short_Literal 0x0 0815 a5fe | | Store_Unchecked 0x2,-0x2 0816 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0817 TRAP_07f0: 0817 0007 | | Action Break_Optional 0818 4800 |H | Short_Literal 0x0 0819 a5fe | | Store_Unchecked 0x2,-0x2 081a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 081b 0000 0000 | | .BLANK 0000[0x5] 0820 ; -------------------------------------------------------------------------------------- 0820 ; SUBPROGRAM 0820 ; -------------------------------------------------------------------------------------- 0820 0826 | & | .CONST 0x0826 ; Address of begin 0821 0004 | | .CONST 0x0004 ; Address of exception handler 0822 0002 | | .CONST 0x0002 ; Number of locals 0823 INIT_0820: 0823 e5fe | | Load 0x2,-0x2 0824 e001 | | Load 0x0,0x1 0825 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0826 BODY_0820: 0826 e402 | | Load 0x2,0x2 0827 0120 | | Execute Any,Is_Value 0828 6803 |h | Jump_Zero 0x82c 0829 e001 | | Load 0x0,0x1 082a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 082b 7801 |x | Jump 0x82d 082c e402 | | Load 0x2,0x2 082d e5fe | | Load 0x2,-0x2 082e e001 | | Load 0x0,0x1 082f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0830 011e | | Execute Any,Convert 0831 603e |`> | Indirect_Literal Discrete,0x870,{0x00000000, 0x000a0000} 0832 e001 | | Load 0x0,0x1 0833 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0834 c5fe | | Store 0x2,-0x2 0835 c402 | | Store 0x2,0x2 0836 4802 |H | Short_Literal 0x2 0837 e402 | | Load 0x2,0x2 0838 e00f | | Load 0x0,0xf 0839 1817 | | Execute Package,Field_Execute,Field_Number 0x17 083a 6816 |h | Jump_Zero 0x851 083b 4801 |H | Short_Literal 0x1 083c 4801 |H | Short_Literal 0x1 083d e00b | | Load 0x0,0xb 083e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 083f 035b | [ | Declare_Type Array,Constrained 0840 0337 | 7 | Declare_Variable Array 0841 e402 | | Load 0x2,0x2 0842 e00f | | Load 0x0,0xf 0843 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0844 e00b | | Load 0x0,0xb 0845 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0846 e00b | | Load 0x0,0xb 0847 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0848 0119 | | Execute Any,Check_In_Formal_Type 0849 4801 |H | Short_Literal 0x1 084a 00da | | Load_Top At_Offset_2 084b 01d6 | | Execute Vector,Field_Write 084c 601f |` | Indirect_Literal Discrete,0x86c,{0x00000000, 0x00008135} 084d e00c | | Load 0x0,0xc 084e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 084f a5fd | | Store_Unchecked 0x2,-0x3 0850 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0851 e5ff | | Load 0x2,-0x1 0852 6814 |h | Jump_Zero 0x867 0853 e00d | | Load 0x0,0xd 0854 180e | | Execute Package,Field_Execute,Field_Number 0xe 0855 4801 |H | Short_Literal 0x1 0856 4801 |H | Short_Literal 0x1 0857 e00b | | Load 0x0,0xb 0858 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0859 035b | [ | Declare_Type Array,Constrained 085a 0337 | 7 | Declare_Variable Array 085b 00da | | Load_Top At_Offset_2 085c e00b | | Load 0x0,0xb 085d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 085e e00b | | Load 0x0,0xb 085f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0860 0119 | | Execute Any,Check_In_Formal_Type 0861 4801 |H | Short_Literal 0x1 0862 00da | | Load_Top At_Offset_2 0863 01d6 | | Execute Vector,Field_Write 0864 6003 |` | Indirect_Literal Discrete,0x868,{0x00000000, 0x00008178} 0865 e00c | | Load 0x0,0xc 0866 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0867 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0868 0000 0000 | | .LITERAL {0x00000000, 0x00008178} 086c 0000 0000 | | .LITERAL {0x00000000, 0x00008135} 0870 0000 0000 | | .LITERAL {0x00000000, 0x000a0000} 0874 0000 0000 | | .BLANK 0000[0x4] 0878 ; -------------------------------------------------------------------------------------- 0878 ; SUBPROGRAM 0878 ; -------------------------------------------------------------------------------------- 0878 087e | ~ | .CONST 0x087e ; Address of begin 0879 0004 | | .CONST 0x0004 ; Address of exception handler 087a 0002 | | .CONST 0x0002 ; Number of locals 087b INIT_0878: 087b e5fe | | Load 0x2,-0x2 087c e001 | | Load 0x0,0x1 087d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 087e BODY_0878: 087e e402 | | Load 0x2,0x2 087f 0120 | | Execute Any,Is_Value 0880 6803 |h | Jump_Zero 0x884 0881 e001 | | Load 0x0,0x1 0882 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0883 7801 |x | Jump 0x885 0884 e402 | | Load 0x2,0x2 0885 e5fe | | Load 0x2,-0x2 0886 e001 | | Load 0x0,0x1 0887 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0888 011e | | Execute Any,Convert 0889 e001 | | Load 0x0,0x1 088a 1814 | | Execute Package,Field_Execute,Field_Number 0x14 088b c5fe | | Store 0x2,-0x2 088c c402 | | Store 0x2,0x2 088d 4802 |H | Short_Literal 0x2 088e e402 | | Load 0x2,0x2 088f e00f | | Load 0x0,0xf 0890 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0891 6816 |h | Jump_Zero 0x8a8 0892 4801 |H | Short_Literal 0x1 0893 4801 |H | Short_Literal 0x1 0894 e00b | | Load 0x0,0xb 0895 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0896 035b | [ | Declare_Type Array,Constrained 0897 0337 | 7 | Declare_Variable Array 0898 e402 | | Load 0x2,0x2 0899 e00f | | Load 0x0,0xf 089a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 089b e00b | | Load 0x0,0xb 089c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 089d e00b | | Load 0x0,0xb 089e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 089f 0119 | | Execute Any,Check_In_Formal_Type 08a0 4801 |H | Short_Literal 0x1 08a1 00da | | Load_Top At_Offset_2 08a2 01d6 | | Execute Vector,Field_Write 08a3 67c8 |g | Indirect_Literal Discrete,0x86c,{0x00000000, 0x00008135} 08a4 e00c | | Load 0x0,0xc 08a5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08a6 a5fd | | Store_Unchecked 0x2,-0x3 08a7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 08a8 e5ff | | Load 0x2,-0x1 08a9 6814 |h | Jump_Zero 0x8be 08aa e00d | | Load 0x0,0xd 08ab 180e | | Execute Package,Field_Execute,Field_Number 0xe 08ac 4801 |H | Short_Literal 0x1 08ad 4801 |H | Short_Literal 0x1 08ae e00b | | Load 0x0,0xb 08af 1b0f | | Execute Package,Field_Read,Field_Number 0xf 08b0 035b | [ | Declare_Type Array,Constrained 08b1 0337 | 7 | Declare_Variable Array 08b2 00da | | Load_Top At_Offset_2 08b3 e00b | | Load 0x0,0xb 08b4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 08b5 e00b | | Load 0x0,0xb 08b6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 08b7 0119 | | Execute Any,Check_In_Formal_Type 08b8 4801 |H | Short_Literal 0x1 08b9 00da | | Load_Top At_Offset_2 08ba 01d6 | | Execute Vector,Field_Write 08bb 6004 |` | Indirect_Literal Discrete,0x8c0,{0x00000000, 0x00008173} 08bc e00c | | Load 0x0,0xc 08bd 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 08be 4501 |E | Exit_Suprogram New_Top_Offset 0x1 08bf 0000 | | .XXX[0x1] 08c0 0000 0000 | | .LITERAL {0x00000000, 0x00008173} 08c4 0000 0000 | | .BLANK 0000[0x4] 08c8 ; -------------------------------------------------------------------------------------- 08c8 ; SUBPROGRAM 08c8 ; -------------------------------------------------------------------------------------- 08c8 08d0 | | .CONST 0x08d0 ; Address of begin 08c9 0004 | | .CONST 0x0004 ; Address of exception handler 08ca 0002 | | .CONST 0x0002 ; Number of locals 08cb INIT_08c8: 08cb e005 | | Load 0x0,0x5 08cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08cd 02c7 | | Declare_Variable Any 08ce 00d8 | | Load_Top At_Offset_0 08cf 1c00 | | Execute_Immediate Run_Utility,0x0 08d0 BODY_08c8: 08d0 00d8 | | Load_Top At_Offset_0 08d1 e013 | | Load 0x0,0x13 08d2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 08d3 e014 | | Load 0x0,0x14 08d4 180f | | Execute Package,Field_Execute,Field_Number 0xf 08d5 00ea | | Load_Encached Null_String_Cache 08d6 e5ff | | Load 0x2,-0x1 08d7 4800 |H | Short_Literal 0x0 08d8 e005 | | Load 0x0,0x5 08d9 1814 | | Execute Package,Field_Execute,Field_Number 0x14 08da c602 | | Store 0x3,0x2 08db e402 | | Load 0x2,0x2 08dc 0120 | | Execute Any,Is_Value 08dd 6803 |h | Jump_Zero 0x8e1 08de e001 | | Load 0x0,0x1 08df 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08e0 7801 |x | Jump 0x8e2 08e1 e402 | | Load 0x2,0x2 08e2 00ea | | Load_Encached Null_String_Cache 08e3 4800 |H | Short_Literal 0x0 08e4 e404 | | Load 0x2,0x4 08e5 e5fe | | Load 0x2,-0x2 08e6 e602 | | Load 0x3,0x2 08e7 e001 | | Load 0x0,0x1 08e8 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 08e9 c402 | | Store 0x2,0x2 08ea 4501 |E | Exit_Suprogram New_Top_Offset 0x1 08eb 0000 0000 | | .BLANK 0000[0x5] 08f0 ; -------------------------------------------------------------------------------------- 08f0 ; SUBPROGRAM 08f0 ; -------------------------------------------------------------------------------------- 08f0 08f8 | | .CONST 0x08f8 ; Address of begin 08f1 0004 | | .CONST 0x0004 ; Address of exception handler 08f2 0002 | | .CONST 0x0002 ; Number of locals 08f3 INIT_08f0: 08f3 e005 | | Load 0x0,0x5 08f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08f5 02c7 | | Declare_Variable Any 08f6 00d8 | | Load_Top At_Offset_0 08f7 1c00 | | Execute_Immediate Run_Utility,0x0 08f8 BODY_08f0: 08f8 00d8 | | Load_Top At_Offset_0 08f9 e013 | | Load 0x0,0x13 08fa 1b0e | | Execute Package,Field_Read,Field_Number 0xe 08fb e015 | | Load 0x0,0x15 08fc 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 08fd e014 | | Load 0x0,0x14 08fe 180f | | Execute Package,Field_Execute,Field_Number 0xf 08ff 00ea | | Load_Encached Null_String_Cache 0900 e5ff | | Load 0x2,-0x1 0901 4801 |H | Short_Literal 0x1 0902 e005 | | Load 0x0,0x5 0903 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0904 c602 | | Store 0x3,0x2 0905 e403 | | Load 0x2,0x3 0906 0120 | | Execute Any,Is_Value 0907 6803 |h | Jump_Zero 0x90b 0908 e001 | | Load 0x0,0x1 0909 1b0d | | Execute Package,Field_Read,Field_Number 0xd 090a 7801 |x | Jump 0x90c 090b e403 | | Load 0x2,0x3 090c 00ea | | Load_Encached Null_String_Cache 090d 00da | | Load_Top At_Offset_2 090e e405 | | Load 0x2,0x5 090f e5fe | | Load 0x2,-0x2 0910 e001 | | Load 0x0,0x1 0911 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0912 c403 | | Store 0x2,0x3 0913 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0914 0000 0000 | | .BLANK 0000[0x4] 0918 ; -------------------------------------------------------------------------------------- 0918 ; SUBPROGRAM 0918 ; -------------------------------------------------------------------------------------- 0918 093a | : | .CONST 0x093a ; Address of begin 0919 0004 | | .CONST 0x0004 ; Address of exception handler 091a 000e | | .CONST 0x000e ; Number of locals 091b INIT_0918: 091b 00e1 | | Load_Encached Boolean_Cache 091c 00d8 | | Load_Top At_Offset_0 091d 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 091e e00f | | Load 0x0,0xf 091f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0920 02c7 | | Declare_Variable Any 0921 00d8 | | Load_Top At_Offset_0 0922 1c00 | | Execute_Immediate Run_Utility,0x0 0923 029f 0b4b | K| Declare_Subprogram INIT_0b48,For_Call 0925 029f 0b7b | {| Declare_Subprogram INIT_0b78,For_Call 0927 029f 0b83 | | Declare_Subprogram INIT_0b80,For_Call 0929 e001 | | Load 0x0,0x1 092a 1935 | 5 | Execute Package,Field_Reference,Field_Number 0x35 092b 00c6 | | Action Check_Subprogram_Elaborated 092c e602 | | Load 0x3,0x2 092d 4805 |H | Short_Literal 0x5 092e 4803 |H | Short_Literal 0x3 092f 0099 | | Action Reference_Dynamic 0930 4806 |H | Short_Literal 0x6 0931 4803 |H | Short_Literal 0x3 0932 0099 | | Action Reference_Dynamic 0933 4807 |H | Short_Literal 0x7 0934 4803 |H | Short_Literal 0x3 0935 0099 | | Action Reference_Dynamic 0936 e016 | | Load 0x0,0x16 0937 e017 | | Load 0x0,0x17 0938 480e |H | Short_Literal 0xe 0939 0007 | | Action Break_Optional 093a BODY_0918: 093a e604 | | Load 0x3,0x4 093b 0120 | | Execute Any,Is_Value 093c 6803 |h | Jump_Zero 0x940 093d e001 | | Load 0x0,0x1 093e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 093f 7801 |x | Jump 0x941 0940 e604 | | Load 0x3,0x4 0941 e603 | | Load 0x3,0x3 0942 6041 |`A | Indirect_Literal Discrete,0x984,{0x00007fff, 0xffffffff} 0943 e7ff | | Load 0x3,-0x1 0944 0092 0bc0 | | Action Push_String_Extended,0xbc0 ; "write sys$output $status" 0946 e608 | | Load 0x3,0x8 0947 4809 |H | Short_Literal 0x9 0948 4803 |H | Short_Literal 0x3 0949 0099 | | Action Reference_Dynamic 094a 480a |H | Short_Literal 0xa 094b 4803 |H | Short_Literal 0x3 094c 0099 | | Action Reference_Dynamic 094d 480b |H | Short_Literal 0xb 094e 4803 |H | Short_Literal 0x3 094f 0099 | | Action Reference_Dynamic 0950 480c |H | Short_Literal 0xc 0951 4803 |H | Short_Literal 0x3 0952 0099 | | Action Reference_Dynamic 0953 e001 | | Load 0x0,0x1 0954 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0955 c603 | | Store 0x3,0x3 0956 c604 | | Store 0x3,0x4 0957 e604 | | Load 0x3,0x4 0958 e00f | | Load 0x0,0xf 0959 1814 | | Execute Package,Field_Execute,Field_Number 0x14 095a 0c01 | | Execute_Immediate Greater_Equal,0x1 095b 680a |h | Jump_Zero 0x966 095c e00d | | Load 0x0,0xd 095d 180e | | Execute Package,Field_Execute,Field_Number 0xe 095e 4806 |H | Short_Literal 0x6 095f e604 | | Load 0x3,0x4 0960 e00f | | Load 0x0,0xf 0961 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0962 e00e | | Load 0x0,0xe 0963 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0964 4800 |H | Short_Literal 0x0 0965 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0966 e603 | | Load 0x3,0x3 0967 6802 |h | Jump_Zero 0x96a 0968 4800 |H | Short_Literal 0x0 0969 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 096a 4801 |H | Short_Literal 0x1 096b 4801 |H | Short_Literal 0x1 096c e00b | | Load 0x0,0xb 096d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 096e 035b | [ | Declare_Type Array,Constrained 096f 0337 | 7 | Declare_Variable Array 0970 e5ff | | Load 0x2,-0x1 0971 e00b | | Load 0x0,0xb 0972 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0973 e00b | | Load 0x0,0xb 0974 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0975 0119 | | Execute Any,Check_In_Formal_Type 0976 4801 |H | Short_Literal 0x1 0977 00da | | Load_Top At_Offset_2 0978 01d6 | | Execute Vector,Field_Write 0979 6006 |` | Indirect_Literal Discrete,0x980,{0x00000000, 0x00008130} 097a e00c | | Load 0x0,0xc 097b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 097c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 097d 0000 0000 | | .XXX[0x3] 097f 0000 | | 0980 0000 0000 | | .LITERAL {0x00000000, 0x00008130} 0984 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff} 0988 ; -------------------------------------------------------------------------------------- 0988 ; SUBPROGRAM 0988 ; -------------------------------------------------------------------------------------- 0988 099e | | .CONST 0x099e ; Address of begin 0989 0a10 | | .CONST 0x0a10 ; Address of exception handler 098a 0005 | | .CONST 0x0005 ; Number of locals 098b INIT_0988: 098b e003 | | Load 0x0,0x3 098c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 098d e003 | | Load 0x0,0x3 098e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 098f 03f1 | | Declare_Variable Discrete,With_Value 0990 00d8 | | Load_Top At_Offset_0 0991 00e0 | | Load_Encached Standard_Cache 0992 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0993 e21a | | Load 0x1,0x1a 0994 0322 | " | Declare_Variable Record 0995 00d8 | | Load_Top At_Offset_0 0996 1c01 | | Execute_Immediate Run_Utility,0x1 0997 00da | | Load_Top At_Offset_2 0998 e21d | | Load 0x1,0x1d 0999 1815 | | Execute Package,Field_Execute,Field_Number 0x15 099a 00d9 | | Load_Top At_Offset_1 099b 017d | } | Execute Record,Structure_Write 099c 029f 0b8b | | Declare_Subprogram INIT_0b88,For_Call 099e BODY_0988: 099e e219 | | Load 0x1,0x19 099f 6832 |h2 | Jump_Zero 0x9d2 09a0 e402 | | Load 0x2,0x2 09a1 e013 | | Load 0x0,0x13 09a2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 09a3 e018 | | Load 0x0,0x18 09a4 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 09a5 e018 | | Load 0x0,0x18 09a6 181e | | Execute Package,Field_Execute,Field_Number 0x1e 09a7 00ea | | Load_Encached Null_String_Cache 09a8 0092 0bc1 | | Action Push_String_Extended,0xbc1 ; "!Machine.Temporary.Rcf_Output_" 09aa e603 | | Load 0x3,0x3 09ab 01dd | | Execute Vector,First 09ac 0a01 | | Execute_Immediate Plus,0x1 09ad 00d8 | | Load_Top At_Offset_0 09ae 00e2 | | Load_Encached Integer_Cache 09af 0260 | ` | Execute Discrete,In_Type 09b0 7001 |p | Jump_Nonzero 0x9b2 09b1 0801 | | Execute_Immediate Raise,0x1 09b2 e603 | | Load 0x3,0x3 09b3 01dc | | Execute Vector,Last 09b4 e603 | | Load 0x3,0x3 09b5 01cf | | Execute Vector,Slice_Read 09b6 01cc | | Execute Vector,Catenate 09b7 4801 |H | Short_Literal 0x1 09b8 e005 | | Load 0x0,0x5 09b9 1818 | | Execute Package,Field_Execute,Field_Number 0x18 09ba c402 | | Store 0x2,0x2 09bb e00d | | Load 0x0,0xd 09bc 180e | | Execute Package,Field_Execute,Field_Number 0xe 09bd 4801 |H | Short_Literal 0x1 09be 0092 0bc2 | | Action Push_String_Extended,0xbc2 ; "Created temp file " 09c0 e402 | | Load 0x2,0x2 09c1 e005 | | Load 0x0,0x5 09c2 181f | | Execute Package,Field_Execute,Field_Number 0x1f 09c3 01cc | | Execute Vector,Catenate 09c4 e00e | | Load 0x0,0xe 09c5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 09c6 e402 | | Load 0x2,0x2 09c7 00da | | Load_Top At_Offset_2 09c8 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 09c9 4801 |H | Short_Literal 0x1 09ca 00da | | Load_Top At_Offset_2 09cb 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 09cc 4800 |H | Short_Literal 0x0 09cd e602 | | Load 0x3,0x2 09ce 00db | | Load_Top At_Offset_3 09cf e21d | | Load 0x1,0x1d 09d0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 09d1 7836 |x6 | Jump 0xa08 09d2 00d9 | | Load_Top At_Offset_1 09d3 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 09d4 7032 |p2 | Jump_Nonzero 0xa07 09d5 e402 | | Load 0x2,0x2 09d6 e013 | | Load 0x0,0x13 09d7 1b0e | | Execute Package,Field_Read,Field_Number 0xe 09d8 e018 | | Load 0x0,0x18 09d9 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 09da e018 | | Load 0x0,0x18 09db 181e | | Execute Package,Field_Execute,Field_Number 0x1e 09dc 00ea | | Load_Encached Null_String_Cache 09dd 0092 0bc1 | | Action Push_String_Extended,0xbc1 ; "!Machine.Temporary.Rcf_Output_" 09df e603 | | Load 0x3,0x3 09e0 01dd | | Execute Vector,First 09e1 0a01 | | Execute_Immediate Plus,0x1 09e2 00d8 | | Load_Top At_Offset_0 09e3 00e2 | | Load_Encached Integer_Cache 09e4 0260 | ` | Execute Discrete,In_Type 09e5 7001 |p | Jump_Nonzero 0x9e7 09e6 0801 | | Execute_Immediate Raise,0x1 09e7 e603 | | Load 0x3,0x3 09e8 01dc | | Execute Vector,Last 09e9 e603 | | Load 0x3,0x3 09ea 01cf | | Execute Vector,Slice_Read 09eb 01cc | | Execute Vector,Catenate 09ec 4801 |H | Short_Literal 0x1 09ed e005 | | Load 0x0,0x5 09ee 1818 | | Execute Package,Field_Execute,Field_Number 0x18 09ef c402 | | Store 0x2,0x2 09f0 e00d | | Load 0x0,0xd 09f1 180e | | Execute Package,Field_Execute,Field_Number 0xe 09f2 4801 |H | Short_Literal 0x1 09f3 0092 0bc3 | | Action Push_String_Extended,0xbc3 ; "Created temporary file " 09f5 e402 | | Load 0x2,0x2 09f6 e005 | | Load 0x0,0x5 09f7 181f | | Execute Package,Field_Execute,Field_Number 0x1f 09f8 01cc | | Execute Vector,Catenate 09f9 e00e | | Load 0x0,0xe 09fa 1813 | | Execute Package,Field_Execute,Field_Number 0x13 09fb e402 | | Load 0x2,0x2 09fc 00da | | Load_Top At_Offset_2 09fd 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 09fe 4801 |H | Short_Literal 0x1 09ff 00da | | Load_Top At_Offset_2 0a00 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0a01 4800 |H | Short_Literal 0x0 0a02 e602 | | Load 0x3,0x2 0a03 00db | | Load_Top At_Offset_3 0a04 e21d | | Load 0x1,0x1d 0a05 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0a06 7801 |x | Jump 0xa08 0a07 8605 | | Call 0x3,0x5 0a08 e5fc | | Load 0x2,-0x4 0a09 6803 |h | Jump_Zero 0xa0d 0a0a e402 | | Load 0x2,0x2 0a0b c404 | | Store 0x2,0x4 0a0c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a0d e402 | | Load 0x2,0x2 0a0e c405 | | Store 0x2,0x5 0a0f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a10 TRAP_0988: 0a10 0007 | | Action Break_Optional 0a11 4801 |H | Short_Literal 0x1 0a12 4801 |H | Short_Literal 0x1 0a13 e00b | | Load 0x0,0xb 0a14 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a15 035b | [ | Declare_Type Array,Constrained 0a16 0337 | 7 | Declare_Variable Array 0a17 e5ff | | Load 0x2,-0x1 0a18 e00b | | Load 0x0,0xb 0a19 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0a1a e00b | | Load 0x0,0xb 0a1b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0a1c 0119 | | Execute Any,Check_In_Formal_Type 0a1d 4801 |H | Short_Literal 0x1 0a1e 00da | | Load_Top At_Offset_2 0a1f 01d6 | | Execute Vector,Field_Write 0a20 6007 |` | Indirect_Literal Discrete,0xa28,{0x00000000, 0x00008119} 0a21 e00c | | Load 0x0,0xc 0a22 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a23 a5f8 | | Store_Unchecked 0x2,-0x8 0a24 e011 | | Load 0x0,0x11 0a25 0257 | W | Execute Discrete,Raise 0a26 0000 0000 | | .XXX[0x2] 0a28 0000 0000 | | .LITERAL {0x00000000, 0x00008119} 0a2c 0000 0000 | | .BLANK 0000[0x4] 0a30 ; -------------------------------------------------------------------------------------- 0a30 ; SUBPROGRAM 0a30 ; -------------------------------------------------------------------------------------- 0a30 0a33 | 3 | .CONST 0x0a33 ; Address of begin 0a31 0004 | | .CONST 0x0004 ; Address of exception handler 0a32 0001 | | .CONST 0x0001 ; Number of locals 0a33 BODY_0a30: 0a33 INIT_0a30: 0a33 e40e | | Load 0x2,0xe 0a34 681a |h | Jump_Zero 0xa4f 0a35 e219 | | Load 0x1,0x19 0a36 680c |h | Jump_Zero 0xa43 0a37 e00d | | Load 0x0,0xd 0a38 180e | | Execute Package,Field_Execute,Field_Number 0xe 0a39 4801 |H | Short_Literal 0x1 0a3a 0092 0bc4 | | Action Push_String_Extended,0xbc4 ; "Close temp file" 0a3c e00e | | Load 0x0,0xe 0a3d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a3e e402 | | Load 0x2,0x2 0a3f e005 | | Load 0x0,0x5 0a40 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0a41 c402 | | Store 0x2,0x2 0a42 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a43 e00d | | Load 0x0,0xd 0a44 180e | | Execute Package,Field_Execute,Field_Number 0xe 0a45 4801 |H | Short_Literal 0x1 0a46 0092 0bc5 | | Action Push_String_Extended,0xbc5 ; "Reset temp file" 0a48 e00e | | Load 0x0,0xe 0a49 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a4a e402 | | Load 0x2,0x2 0a4b 4801 |H | Short_Literal 0x1 0a4c e005 | | Load 0x0,0x5 0a4d 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0a4e c402 | | Store 0x2,0x2 0a4f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a50 ; -------------------------------------------------------------------------------------- 0a50 ; SUBPROGRAM 0a50 ; -------------------------------------------------------------------------------------- 0a50 0a59 | Y | .CONST 0x0a59 ; Address of begin 0a51 0004 | | .CONST 0x0004 ; Address of exception handler 0a52 0005 | | .CONST 0x0005 ; Number of locals 0a53 INIT_0a50: 0a53 00e3 | | Load_Encached Natural_Cache 0a54 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a55 00e3 | | Load_Encached Natural_Cache 0a56 00e3 | | Load_Encached Natural_Cache 0a57 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a58 00e3 | | Load_Encached Natural_Cache 0a59 BODY_0a50: 0a59 e00d | | Load 0x0,0xd 0a5a 180e | | Execute Package,Field_Execute,Field_Number 0xe 0a5b 4801 |H | Short_Literal 0x1 0a5c 0092 0bc6 | | Action Push_String_Extended,0xbc6 ; "Resetting temp file" 0a5e e00e | | Load 0x0,0xe 0a5f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a60 e402 | | Load 0x2,0x2 0a61 4800 |H | Short_Literal 0x0 0a62 e005 | | Load 0x0,0x5 0a63 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0a64 c402 | | Store 0x2,0x2 0a65 00cf | | Action Mark_Auxiliary 0a66 e40b | | Load 0x2,0xb 0a67 0aff | | Execute_Immediate Plus,-0x1 0a68 4801 |H | Short_Literal 0x1 0a69 0263 | c | Execute Discrete,Above_Bound 0a6a 7006 |p | Jump_Nonzero 0xa71 0a6b 4820 |H | Short_Literal 0x20 0a6c 00d9 | | Load_Top At_Offset_1 0a6d e406 | | Load 0x2,0x6 0a6e 01d6 | | Execute Vector,Field_Write 0a6f 00c8 | | Action Pop_Auxiliary_Range 0a70 3ffa |? | Loop_Increasing 0xa6b 0a71 00c9 | | Action Pop_Auxiliary_Loop 0a72 7891 |x | Jump 0xb04 0a73 e406 | | Load 0x2,0x6 0a74 e40b | | Load 0x2,0xb 0a75 4900 |I | Short_Literal 0x100 0a76 00da | | Load_Top At_Offset_2 0a77 035b | [ | Declare_Type Array,Constrained 0a78 00d0 | | Action Swap_Control 0a79 01cd | | Execute Vector,Slice_Reference 0a7a 00e3 | | Load_Encached Natural_Cache 0a7b 00d9 | | Load_Top At_Offset_1 0a7c e402 | | Load 0x2,0x2 0a7d e005 | | Load 0x0,0x5 0a7e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0a7f 00d1 | | Pop_Control Pop_Count_1 0a80 c407 | | Store 0x2,0x7 0a81 00d1 | | Pop_Control Pop_Count_1 0a82 4801 |H | Short_Literal 0x1 0a83 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0a84 e40b | | Load 0x2,0xb 0a85 0aff | | Execute_Immediate Plus,-0x1 0a86 e407 | | Load 0x2,0x7 0a87 0273 | s | Execute Discrete,Plus 0a88 c603 | | Store 0x3,0x3 0a89 e5fa | | Load 0x2,-0x6 0a8a 6806 |h | Jump_Zero 0xa91 0a8b e40b | | Load 0x2,0xb 0a8c e603 | | Load 0x3,0x3 0a8d e406 | | Load 0x2,0x6 0a8e 01cf | | Execute Vector,Slice_Read 0a8f e010 | | Load 0x0,0x10 0a90 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 0a91 00cf | | Action Mark_Auxiliary 0a92 786b |xk | Jump 0xafe 0a93 e408 | | Load 0x2,0x8 0a94 6852 |hR | Jump_Zero 0xae7 0a95 4801 |H | Short_Literal 0x1 0a96 00db | | Load_Top At_Offset_3 0a97 e603 | | Load 0x3,0x3 0a98 e406 | | Load 0x2,0x6 0a99 01cf | | Execute Vector,Slice_Read 0a9a e5fd | | Load 0x2,-0x3 0a9b e00a | | Load 0x0,0xa 0a9c 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0a9d a604 | | Store_Unchecked 0x3,0x4 0a9e 00db | | Load_Top At_Offset_3 0a9f 6832 |h2 | Jump_Zero 0xad2 0aa0 e409 | | Load 0x2,0x9 0aa1 0a01 | | Execute_Immediate Plus,0x1 0aa2 c409 | | Store 0x2,0x9 0aa3 e409 | | Load 0x2,0x9 0aa4 0f01 | | Execute_Immediate Equal,0x1 0aa5 6813 |h | Jump_Zero 0xab9 0aa6 4801 |H | Short_Literal 0x1 0aa7 4801 |H | Short_Literal 0x1 0aa8 e00b | | Load 0x0,0xb 0aa9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0aaa 035b | [ | Declare_Type Array,Constrained 0aab 0337 | 7 | Declare_Variable Array 0aac e5ff | | Load 0x2,-0x1 0aad e00b | | Load 0x0,0xb 0aae 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0aaf e00b | | Load 0x0,0xb 0ab0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ab1 0119 | | Execute Any,Check_In_Formal_Type 0ab2 4801 |H | Short_Literal 0x1 0ab3 00da | | Load_Top At_Offset_2 0ab4 01d6 | | Execute Vector,Field_Write 0ab5 6072 |`r | Indirect_Literal Discrete,0xb28,{0x00000000, 0x00008130} 0ab6 e00c | | Load 0x0,0xc 0ab7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0ab8 a40a | | Store_Unchecked 0x2,0xa 0ab9 4800 |H | Short_Literal 0x0 0aba e604 | | Load 0x3,0x4 0abb e603 | | Load 0x3,0x3 0abc e406 | | Load 0x2,0x6 0abd 01cf | | Execute Vector,Slice_Read 0abe 480a |H | Short_Literal 0xa 0abf e00a | | Load 0x0,0xa 0ac0 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0ac1 a602 | | Store_Unchecked 0x3,0x2 0ac2 e602 | | Load 0x3,0x2 0ac3 7008 |p | Jump_Nonzero 0xacc 0ac4 e603 | | Load 0x3,0x3 0ac5 0a01 | | Execute_Immediate Plus,0x1 0ac6 c602 | | Store 0x3,0x2 0ac7 4800 |H | Short_Literal 0x0 0ac8 a408 | | Store_Unchecked 0x2,0x8 0ac9 e602 | | Load 0x3,0x2 0aca 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0acb 7831 |x1 | Jump 0xafd 0acc 4801 |H | Short_Literal 0x1 0acd a408 | | Store_Unchecked 0x2,0x8 0ace e602 | | Load 0x3,0x2 0acf 0a01 | | Execute_Immediate Plus,0x1 0ad0 005b | [ | Store_Top Discrete,At_Offset_3 0ad1 782b |x+ | Jump 0xafd 0ad2 e603 | | Load 0x3,0x3 0ad3 e40b | | Load 0x2,0xb 0ad4 0272 | r | Execute Discrete,Minus 0ad5 0a02 | | Execute_Immediate Plus,0x2 0ad6 00d8 | | Load_Top At_Offset_0 0ad7 00e2 | | Load_Encached Integer_Cache 0ad8 0260 | ` | Execute Discrete,In_Type 0ad9 7001 |p | Jump_Nonzero 0xadb 0ada 0801 | | Execute_Immediate Raise,0x1 0adb e603 | | Load 0x3,0x3 0adc e406 | | Load 0x2,0x6 0add 01cf | | Execute Vector,Slice_Read 0ade 4801 |H | Short_Literal 0x1 0adf e40b | | Load 0x2,0xb 0ae0 0aff | | Execute_Immediate Plus,-0x1 0ae1 e406 | | Load 0x2,0x6 0ae2 01ce | | Execute Vector,Slice_Write 0ae3 e603 | | Load 0x3,0x3 0ae4 0a01 | | Execute_Immediate Plus,0x1 0ae5 005b | [ | Store_Top Discrete,At_Offset_3 0ae6 7816 |x | Jump 0xafd 0ae7 4800 |H | Short_Literal 0x0 0ae8 e40b | | Load 0x2,0xb 0ae9 e603 | | Load 0x3,0x3 0aea e406 | | Load 0x2,0x6 0aeb 01cf | | Execute Vector,Slice_Read 0aec 480a |H | Short_Literal 0xa 0aed e00a | | Load 0x0,0xa 0aee 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0aef a602 | | Store_Unchecked 0x3,0x2 0af0 e602 | | Load 0x3,0x2 0af1 7006 |p | Jump_Nonzero 0xaf8 0af2 e603 | | Load 0x3,0x3 0af3 0a01 | | Execute_Immediate Plus,0x1 0af4 c602 | | Store 0x3,0x2 0af5 e602 | | Load 0x3,0x2 0af6 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0af7 7805 |x | Jump 0xafd 0af8 4801 |H | Short_Literal 0x1 0af9 a408 | | Store_Unchecked 0x2,0x8 0afa e602 | | Load 0x3,0x2 0afb 0a01 | | Execute_Immediate Plus,0x1 0afc 005b | [ | Store_Top Discrete,At_Offset_3 0afd 00c9 | | Action Pop_Auxiliary_Loop 0afe 00da | | Load_Top At_Offset_2 0aff e603 | | Load 0x3,0x3 0b00 027a | z | Execute Discrete,Less_Equal 0b01 7791 |w | Jump_Nonzero 0xa93 0b02 00ce | | Action Pop_Auxiliary 0b03 00c9 | | Action Pop_Auxiliary_Loop 0b04 e402 | | Load 0x2,0x2 0b05 e005 | | Load 0x0,0x5 0b06 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0b07 6f6b |ok | Jump_Zero 0xa73 0b08 00ce | | Action Pop_Auxiliary 0b09 e409 | | Load 0x2,0x9 0b0a 0c02 | | Execute_Immediate Greater_Equal,0x2 0b0b 6814 |h | Jump_Zero 0xb20 0b0c e00d | | Load 0x0,0xd 0b0d 180e | | Execute Package,Field_Execute,Field_Number 0xe 0b0e 4801 |H | Short_Literal 0x1 0b0f 4801 |H | Short_Literal 0x1 0b10 e00b | | Load 0x0,0xb 0b11 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b12 035b | [ | Declare_Type Array,Constrained 0b13 0337 | 7 | Declare_Variable Array 0b14 e409 | | Load 0x2,0x9 0b15 e00b | | Load 0x0,0xb 0b16 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0b17 e00b | | Load 0x0,0xb 0b18 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b19 0119 | | Execute Any,Check_In_Formal_Type 0b1a 4801 |H | Short_Literal 0x1 0b1b 00da | | Load_Top At_Offset_2 0b1c 01d6 | | Execute Vector,Field_Write 0b1d 6006 |` | Indirect_Literal Discrete,0xb24,{0x00000000, 0x00008131} 0b1e e00c | | Load 0x0,0xc 0b1f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0b20 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0b21 0000 0000 | | .XXX[0x3] 0b23 0000 | | 0b24 0000 0000 | | .LITERAL {0x00000000, 0x00008131} 0b28 0000 0000 | | .LITERAL {0x00000000, 0x00008130} 0b2c 0000 0000 | | .BLANK 0000[0x4] 0b30 ; -------------------------------------------------------------------------------------- 0b30 ; SUBPROGRAM 0b30 ; -------------------------------------------------------------------------------------- 0b30 0b33 | 3 | .CONST 0x0b33 ; Address of begin 0b31 0b43 | C | .CONST 0x0b43 ; Address of exception handler 0b32 0001 | | .CONST 0x0001 ; Number of locals 0b33 BODY_0b30: 0b33 INIT_0b30: 0b33 e402 | | Load 0x2,0x2 0b34 0120 | | Execute Any,Is_Value 0b35 6803 |h | Jump_Zero 0xb39 0b36 e001 | | Load 0x0,0x1 0b37 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0b38 7801 |x | Jump 0xb3a 0b39 e402 | | Load 0x2,0x2 0b3a e5fe | | Load 0x2,-0x2 0b3b e001 | | Load 0x0,0x1 0b3c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b3d 011e | | Execute Any,Convert 0b3e e001 | | Load 0x0,0x1 0b3f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0b40 c5fe | | Store 0x2,-0x2 0b41 c402 | | Store 0x2,0x2 0b42 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0b43 TRAP_0b30: 0b43 0007 | | Action Break_Optional 0b44 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0b45 0000 0000 | | .XXX[0x3] 0b47 0000 | | 0b48 ; -------------------------------------------------------------------------------------- 0b48 ; SUBPROGRAM 0b48 ; -------------------------------------------------------------------------------------- 0b48 0b53 | S | .CONST 0x0b53 ; Address of begin 0b49 0b64 | d | .CONST 0x0b64 ; Address of exception handler 0b4a 0003 | | .CONST 0x0003 ; Number of locals 0b4b INIT_0b48: 0b4b 480a |H | Short_Literal 0xa 0b4c 4820 |H | Short_Literal 0x20 0b4d e9ff | | Load 0x4,-0x1 0b4e e00a | | Load 0x0,0xa 0b4f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0b50 e00a | | Load 0x0,0xa 0b51 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0b52 00e3 | | Load_Encached Natural_Cache 0b53 BODY_0b48: 0b53 00d9 | | Load_Top At_Offset_1 0b54 01dc | | Execute Vector,Last 0b55 00da | | Load_Top At_Offset_2 0b56 01dc | | Execute Vector,Last 0b57 00db | | Load_Top At_Offset_3 0b58 01cf | | Execute Vector,Slice_Read 0b59 00e2 | | Load_Encached Integer_Cache 0b5a 00e0 | | Load_Encached Standard_Cache 0b5b 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0b5c 0059 | Y | Store_Top Discrete,At_Offset_1 0b5d 00d8 | | Load_Top At_Offset_0 0b5e 00d9 | | Load_Top At_Offset_1 0b5f 09ff | | Execute_Immediate Binary_Scale,-0x1 0b60 0901 | | Execute_Immediate Binary_Scale,0x1 0b61 027e | ~ | Execute Discrete,Not_Equal 0b62 a9fd | | Store_Unchecked 0x4,-0x3 0b63 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0b64 TRAP_0b48: 0b64 010e | | Execute Exception,Is_Constraint_Error 0b65 680a |h | Jump_Zero 0xb70 0b66 e00d | | Load 0x0,0xd 0b67 180e | | Execute Package,Field_Execute,Field_Number 0xe 0b68 4806 |H | Short_Literal 0x6 0b69 0092 0bc7 | | Action Push_String_Extended,0xbc7 ; "Unexpected output found during compilation success check" 0b6b e00e | | Load 0x0,0xe 0b6c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0b6d 4801 |H | Short_Literal 0x1 0b6e a9fd | | Store_Unchecked 0x4,-0x3 0b6f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0b70 0100 | | Execute Exception,Raise 0b71 0000 0000 | | .BLANK 0000[0x7] 0b78 ; -------------------------------------------------------------------------------------- 0b78 ; SUBPROGRAM 0b78 ; -------------------------------------------------------------------------------------- 0b78 0b7b | { | .CONST 0x0b7b ; Address of begin 0b79 0004 | | .CONST 0x0004 ; Address of exception handler 0b7a 0001 | | .CONST 0x0001 ; Number of locals 0b7b BODY_0b78: 0b7b INIT_0b78: 0b7b 08e2 | | Execute_Immediate Raise,0xe2 0b7c 0000 0000 | | .BLANK 0000[0x4] 0b80 ; -------------------------------------------------------------------------------------- 0b80 ; SUBPROGRAM 0b80 ; -------------------------------------------------------------------------------------- 0b80 0b83 | | .CONST 0x0b83 ; Address of begin 0b81 0004 | | .CONST 0x0004 ; Address of exception handler 0b82 0001 | | .CONST 0x0001 ; Number of locals 0b83 BODY_0b80: 0b83 INIT_0b80: 0b83 08e2 | | Execute_Immediate Raise,0xe2 0b84 0000 0000 | | .BLANK 0000[0x4] 0b88 ; -------------------------------------------------------------------------------------- 0b88 ; SUBPROGRAM 0b88 ; -------------------------------------------------------------------------------------- 0b88 0b8b | | .CONST 0x0b8b ; Address of begin 0b89 0ba2 | | .CONST 0x0ba2 ; Address of exception handler 0b8a 0001 | | .CONST 0x0001 ; Number of locals 0b8b BODY_0b88: 0b8b INIT_0b88: 0b8b e00d | | Load 0x0,0xd 0b8c 180e | | Execute Package,Field_Execute,Field_Number 0xe 0b8d 4801 |H | Short_Literal 0x1 0b8e 0092 0bc6 | | Action Push_String_Extended,0xbc6 ; "Resetting temp file" 0b90 e00e | | Load 0x0,0xe 0b91 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0b92 e604 | | Load 0x3,0x4 0b93 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0b94 c402 | | Store 0x2,0x2 0b95 e402 | | Load 0x2,0x2 0b96 4801 |H | Short_Literal 0x1 0b97 e005 | | Load 0x0,0x5 0b98 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0b99 c402 | | Store 0x2,0x2 0b9a e00d | | Load 0x0,0xd 0b9b 180e | | Execute Package,Field_Execute,Field_Number 0xe 0b9c 4801 |H | Short_Literal 0x1 0b9d 0092 0bc8 | | Action Push_String_Extended,0xbc8 ; "Reusing existing temporary file." 0b9f e00e | | Load 0x0,0xe 0ba0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0ba1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ba2 TRAP_0b88: 0ba2 0007 | | Action Break_Optional 0ba3 4800 |H | Short_Literal 0x0 0ba4 e604 | | Load 0x3,0x4 0ba5 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0ba6 4800 |H | Short_Literal 0x0 0ba7 e602 | | Load 0x3,0x2 0ba8 e604 | | Load 0x3,0x4 0ba9 e21d | | Load 0x1,0x1d 0baa 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0bab 8410 | | Call 0x2,0x10 0bac 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0bad ; -------------------------------------------------------------------------------------- 0bad ; STRING TABLE 0bad ; -------------------------------------------------------------------------------------- 0bad 003a | : | .STRTAB 0x003a->0x0bca ; "Destroying invalid connection" 0bae 0055 | U | .STRTAB 0x0055->0x0bd8 ; "Set_Remote_Directory" 0baf 0067 | g | .STRTAB 0x0067->0x0be2 ; "Reusing existing directory." 0bb0 0080 | | .STRTAB 0x0080->0x0bf0 ; "Put" 0bb1 0081 | | .STRTAB 0x0081->0x0bf1 ; "put" 0bb2 0082 | | .STRTAB 0x0082->0x0bf3 ; "Get" 0bb3 0083 | | .STRTAB 0x0083->0x0bf4 ; "get" 0bb4 0084 | | .STRTAB 0x0084->0x0bf6 ; "Execute_Command" 0bb5 0091 | | .STRTAB 0x0091->0x0bfd ; "execute_command" 0bb6 009e | | .STRTAB 0x009e->0x0c05 ; "VMS" 0bb7 009f | | .STRTAB 0x009f->0x0c06 ; "Unit_Update_Time" 0bb8 00ad | | .STRTAB 0x00ad->0x0c0e ; "Unit_update_time" 0bb9 00bb | | .STRTAB 0x00bb->0x0c16 ; "file_exists" 0bba 00c4 | | .STRTAB 0x00c4->0x0c1c ; "Successfully determined the existence of remote file \x22" 0bbb 00f8 | | .STRTAB 0x00f8->0x0c37 ; "\x22." 0bbc 00f8 | | .STRTAB 0x00f8->0x0c38 ; "Initialized Job_Record for job" 0bbd 0114 | | .STRTAB 0x0114->0x0c47 ; ", task" 0bbe 0118 | | .STRTAB 0x0118->0x0c4a ; "Finalizing Job_Record" 0bbf 012b | + | .STRTAB 0x012b->0x0c54 ; "Deleting temporary file for process" 0bc0 014c | L | .STRTAB 0x014c->0x0c66 ; "write sys$output $status" 0bc1 0162 | b | .STRTAB 0x0162->0x0c72 ; "!Machine.Temporary.Rcf_Output_" 0bc2 017e | ~ | .STRTAB 0x017e->0x0c81 ; "Created temp file " 0bc3 018e | | .STRTAB 0x018e->0x0c8a ; "Created temporary file " 0bc4 01a3 | | .STRTAB 0x01a3->0x0c95 ; "Close temp file" 0bc5 01b0 | | .STRTAB 0x01b0->0x0c9d ; "Reset temp file" 0bc6 01bd | | .STRTAB 0x01bd->0x0ca4 ; "Resetting temp file" 0bc7 01ce | | .STRTAB 0x01ce->0x0cae ; "Unexpected output found during compilation success check" 0bc8 0204 | | .STRTAB 0x0204->0x0cca ; "Reusing existing temporary file." 0bc9 0222 | " | .STREND 0x0222->0x0cda 0bca 4465 7374 |Dest| .STRTAB_STRINGS 0cda 0000 0000 | | .BLANK 0000[0x6] 0ce0 ; -------------------------------------------------------------------------------------- 0ce0 ; Debug Table 0ce0 ; -------------------------------------------------------------------------------------- 0ce0 0004 000d | | .DEBUG4 0x0004,0x000d,0x4e9d,0x0000,0x0001,0x0000 0ce6 0000 0000 | | .BLANK 0000[0x11a]