|
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: 10240 (0x2800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c0fe
└─⟦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 12d0 | | .CONST 0x12d0 ; 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 800b | | .CONST 0x800b ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00c2 | | .CONST 0x00c2 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 003a | : | .CONST 0x003a ; Number of locals 000b INIT_0008: 000b 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated 000d 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated 000f 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated 0011 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated 0013 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated 0015 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated 0017 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 0019 029a 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call,Visible,Unelaborated 001b 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated 001d 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated 001f 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 0021 029a 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Visible,Unelaborated 0023 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated 0025 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated 0027 029a 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call,Visible,Unelaborated 0029 029a 0483 | | Declare_Subprogram INIT_0480,For_Outer_Call,Visible,Unelaborated 002b 029a 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Visible,Unelaborated 002d 029a 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call,Visible,Unelaborated 002f 00bf | | Action Accept_Activation 0030 00e1 | | Load_Encached Boolean_Cache 0031 0266 | f | Execute Discrete,Bounds 0032 00e8 | | Load_Encached Character_Cache 0033 02a0 | | Declare_Subprogram Null_Subprogram 0034 4801 |H | Short_Literal 0x1 0035 035d | ] | Declare_Type Array,Defined 0036 00d8 | | Load_Top At_Offset_0 0037 0337 | 7 | Declare_Variable Array 0038 00d8 | | Load_Top At_Offset_0 0039 0335 | 5 | Declare_Variable Array,Duplicate 003a 00cd | | Action Spare6_Action 003b 482d |H- | Short_Literal 0x2d 003c 4800 |H | Short_Literal 0x0 003d 00da | | Load_Top At_Offset_2 003e 01d6 | | Execute Vector,Field_Write 003f 484b |HK | Short_Literal 0x4b 0040 4801 |H | Short_Literal 0x1 0041 00da | | Load_Top At_Offset_2 0042 01d6 | | Execute Vector,Field_Write 0043 00d9 | | Load_Top At_Offset_1 0044 01d4 | | Execute Vector,Structure_Write 0045 00e1 | | Load_Encached Boolean_Cache 0046 0266 | f | Execute Discrete,Bounds 0047 00e8 | | Load_Encached Character_Cache 0048 02a0 | | Declare_Subprogram Null_Subprogram 0049 4801 |H | Short_Literal 0x1 004a 035d | ] | Declare_Type Array,Defined 004b 00d8 | | Load_Top At_Offset_0 004c 0337 | 7 | Declare_Variable Array 004d 00d8 | | Load_Top At_Offset_0 004e 0335 | 5 | Declare_Variable Array,Duplicate 004f 00cd | | Action Spare6_Action 0050 482d |H- | Short_Literal 0x2d 0051 4800 |H | Short_Literal 0x0 0052 00da | | Load_Top At_Offset_2 0053 01d6 | | Execute Vector,Field_Write 0054 4850 |HP | Short_Literal 0x50 0055 4801 |H | Short_Literal 0x1 0056 00da | | Load_Top At_Offset_2 0057 01d6 | | Execute Vector,Field_Write 0058 00d9 | | Load_Top At_Offset_1 0059 01d4 | | Execute Vector,Structure_Write 005a e002 | | Load 0x0,0x2 005b 00e2 | | Load_Encached Integer_Cache 005c 029f 054b | K| Declare_Subprogram INIT_0548,For_Call 005e 4802 |H | Short_Literal 0x2 005f 032d | - | Declare_Type Record,Defined 0060 00e4 | | Load_Encached Positive_Cache 0061 0266 | f | Execute Discrete,Bounds 0062 00da | | Load_Top At_Offset_2 0063 029f 055b | [| Declare_Subprogram INIT_0558,For_Call 0065 4801 |H | Short_Literal 0x1 0066 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 0067 e003 | | Load 0x0,0x3 0068 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0069 029d 0583 | | Declare_Subprogram INIT_0580,For_Outer_Call 006b 029b 059b | | Declare_Subprogram INIT_0598,For_Outer_Call,Unelaborated 006d 029d 05bb | | Declare_Subprogram INIT_05b8,For_Outer_Call 006f 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0070 00c7 | | Action Elaborate_Subprogram 0071 029d 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call 0073 029d 060b | | Declare_Subprogram INIT_0608,For_Outer_Call 0075 029d 066b | k| Declare_Subprogram INIT_0668,For_Outer_Call 0077 029d 0673 | s| Declare_Subprogram INIT_0670,For_Outer_Call 0079 029d 069b | | Declare_Subprogram INIT_0698,For_Outer_Call 007b 029d 06b3 | | Declare_Subprogram INIT_06b0,For_Outer_Call 007d 029b 06d3 | | Declare_Subprogram INIT_06d0,For_Outer_Call,Unelaborated 007f 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0080 00c7 | | Action Elaborate_Subprogram 0081 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0082 00c7 | | Action Elaborate_Subprogram 0083 029d 076b | k| Declare_Subprogram INIT_0768,For_Outer_Call 0085 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0086 00c7 | | Action Elaborate_Subprogram 0087 029d 080b | | Declare_Subprogram INIT_0808,For_Outer_Call 0089 1d0f | | Execute_Immediate Reference_Lex_1,0xf 008a 00c7 | | Action Elaborate_Subprogram 008b 029d 0833 | 3| Declare_Subprogram INIT_0830,For_Outer_Call 008d 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 008e 00c6 | | Action Check_Subprogram_Elaborated 008f 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 0090 0092 100a | | Action Push_String_Extended,0x100a ; "Selected contents of " 0092 0093 0000 | | push_full_address 0x0 0094 6093 |` | Indirect_Literal Discrete,0x128,{0x80000000, 0x00100000} 0095 0273 | s | Execute Discrete,Plus 0096 e004 | | Load 0x0,0x4 0097 0273 | s | Execute Discrete,Plus 0098 e005 | | Load 0x0,0x5 0099 0273 | s | Execute Discrete,Plus 009a 4800 |H | Short_Literal 0x0 009b 0007 | | Action Break_Optional 009c 1d10 | | Execute_Immediate Reference_Lex_1,0x10 009d 00c7 | | Action Elaborate_Subprogram 009e 1d13 | | Execute_Immediate Reference_Lex_1,0x13 009f 00c7 | | Action Elaborate_Subprogram 00a0 1d15 | | Execute_Immediate Reference_Lex_1,0x15 00a1 00c7 | | Action Elaborate_Subprogram 00a2 1d11 | | Execute_Immediate Reference_Lex_1,0x11 00a3 00c7 | | Action Elaborate_Subprogram 00a4 1d12 | | Execute_Immediate Reference_Lex_1,0x12 00a5 00c7 | | Action Elaborate_Subprogram 00a6 1d14 | | Execute_Immediate Reference_Lex_1,0x14 00a7 00c7 | | Action Elaborate_Subprogram 00a8 1d16 | | Execute_Immediate Reference_Lex_1,0x16 00a9 00c7 | | Action Elaborate_Subprogram 00aa 1d17 | | Execute_Immediate Reference_Lex_1,0x17 00ab 00c7 | | Action Elaborate_Subprogram 00ac 1d18 | | Execute_Immediate Reference_Lex_1,0x18 00ad 00c7 | | Action Elaborate_Subprogram 00ae 1d19 | | Execute_Immediate Reference_Lex_1,0x19 00af 00c7 | | Action Elaborate_Subprogram 00b0 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 00b1 00c7 | | Action Elaborate_Subprogram 00b2 029d 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call 00b4 029d 08f3 | | Declare_Subprogram INIT_08f0,For_Outer_Call 00b6 029d 0923 | #| Declare_Subprogram INIT_0920,For_Outer_Call 00b8 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 00b9 00c7 | | Action Elaborate_Subprogram 00ba 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00bb 00c7 | | Action Elaborate_Subprogram 00bc 029d 0953 | S| Declare_Subprogram INIT_0950,For_Outer_Call 00be 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 00bf 00c7 | | Action Elaborate_Subprogram 00c0 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 00c1 00c7 | | Action Elaborate_Subprogram 00c2 BODY_0008: 00c2 00bc | | Action Signal_Activated 00c3 00bb | | Action Signal_Completion 00c4 0000 0000 | | .BLANK 0000[0x4] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00d6 | | .CONST 0x00d6 ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0006 | | .CONST 0x0006 ; Number of locals 00cb INIT_00c8: 00cb 00da | | Load_Top At_Offset_2 00cc 822c | , | Call 0x1,0x2c 00cd e006 | | Load 0x0,0x6 00ce 0007 | | Action Break_Optional 00cf e007 | | Load 0x0,0x7 00d0 0007 | | Action Break_Optional 00d1 e002 | | Load 0x0,0x2 00d2 0322 | " | Declare_Variable Record 00d3 00d8 | | Load_Top At_Offset_0 00d4 1c00 | | Execute_Immediate Run_Utility,0x0 00d5 00e2 | | Load_Encached Integer_Cache 00d6 BODY_00c8: 00d6 e5fb | | Load 0x2,-0x5 00d7 6807 |h | Jump_Zero 0xdf 00d8 e007 | | Load 0x0,0x7 00d9 4802 |H | Short_Literal 0x2 00da e5ff | | Load 0x2,-0x1 00db 822e | . | Call 0x1,0x2e 00dc 8008 | | Call 0x0,0x8 00dd 0033 | 3 | Store_Top Heap_Access,At_Offset_3 00de 7806 |x | Jump 0xe5 00df e007 | | Load 0x0,0x7 00e0 4801 |H | Short_Literal 0x1 00e1 e5ff | | Load 0x2,-0x1 00e2 822e | . | Call 0x1,0x2e 00e3 8008 | | Call 0x0,0x8 00e4 0033 | 3 | Store_Top Heap_Access,At_Offset_3 00e5 00da | | Load_Top At_Offset_2 00e6 8009 | | Call 0x0,0x9 00e7 683a |h: | Jump_Zero 0x122 00e8 e006 | | Load 0x0,0x6 00e9 4800 |H | Short_Literal 0x0 00ea e5fe | | Load 0x2,-0x2 00eb 800a | | Call 0x0,0xa 00ec c403 | | Store 0x2,0x3 00ed 00db | | Load_Top At_Offset_3 00ee 800b | | Call 0x0,0xb 00ef 682e |h. | Jump_Zero 0x11e 00f0 00cf | | Action Mark_Auxiliary 00f1 7824 |x$ | Jump 0x116 00f2 00da | | Load_Top At_Offset_2 00f3 e403 | | Load 0x2,0x3 00f4 800c | | Call 0x0,0xc 00f5 00d1 | | Pop_Control Pop_Count_1 00f6 e403 | | Load 0x2,0x3 00f7 800d | | Call 0x0,0xd 00f8 7020 |p | Jump_Nonzero 0x119 00f9 e403 | | Load 0x2,0x3 00fa 800e | | Call 0x0,0xe 00fb 6819 |h | Jump_Zero 0x115 00fc e225 | % | Load 0x1,0x25 00fd e5fd | | Load 0x2,-0x3 00fe e402 | | Load 0x2,0x2 00ff e405 | | Load 0x2,0x5 0100 822d | - | Call 0x1,0x2d 0101 6811 |h | Jump_Zero 0x113 0102 00da | | Load_Top At_Offset_2 0103 4800 |H | Short_Literal 0x0 0104 e404 | | Load 0x2,0x4 0105 800f | | Call 0x0,0xf 0106 00d1 | | Pop_Control Pop_Count_1 0107 00da | | Load_Top At_Offset_2 0108 e404 | | Load 0x2,0x4 0109 822b | + | Call 0x1,0x2b 010a 00d1 | | Pop_Control Pop_Count_1 010b 00e3 | | Load_Encached Natural_Cache 010c 6017 |` | Indirect_Literal Discrete,0x124,{0x00000000, 0x7fffffff} 010d e403 | | Load 0x2,0x3 010e e404 | | Load 0x2,0x4 010f 8010 | | Call 0x0,0x10 0110 005a | Z | Store_Top Discrete,At_Offset_2 0111 00db | | Load_Top At_Offset_3 0112 8011 | | Call 0x0,0x11 0113 e403 | | Load 0x2,0x3 0114 8012 | | Call 0x0,0x12 0115 00c9 | | Action Pop_Auxiliary_Loop 0116 e403 | | Load 0x2,0x3 0117 800d | | Call 0x0,0xd 0118 6fd9 |o | Jump_Zero 0xf2 0119 00ce | | Action Pop_Auxiliary 011a 00db | | Load_Top At_Offset_3 011b 4800 |H | Short_Literal 0x0 011c 8013 | | Call 0x0,0x13 011d c403 | | Store 0x2,0x3 011e 00da | | Load_Top At_Offset_2 011f 4801 |H | Short_Literal 0x1 0120 8014 | | Call 0x0,0x14 0121 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0122 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0123 0000 | | .XXX[0x1] 0124 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0128 8000 0000 | | .LITERAL {0x80000000, 0x00100000} 012c 0000 0000 | | .BLANK 0000[0x4] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0135 | 5 | .CONST 0x0135 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0002 | | .CONST 0x0002 ; Number of locals 0133 INIT_0130: 0133 e006 | | Load 0x0,0x6 0134 0007 | | Action Break_Optional 0135 BODY_0130: 0135 00d8 | | Load_Top At_Offset_0 0136 e5fa | | Load 0x2,-0x6 0137 e5fb | | Load 0x2,-0x5 0138 e5fc | | Load 0x2,-0x4 0139 e5fd | | Load 0x2,-0x3 013a e5fe | | Load 0x2,-0x2 013b e5ff | | Load 0x2,-0x1 013c 8230 | 0 | Call 0x1,0x30 013d 0031 | 1 | Store_Top Heap_Access,At_Offset_1 013e 00d8 | | Load_Top At_Offset_0 013f 800b | | Call 0x0,0xb 0140 6804 |h | Jump_Zero 0x145 0141 00d8 | | Load_Top At_Offset_0 0142 4800 |H | Short_Literal 0x0 0143 8013 | | Call 0x0,0x13 0144 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0145 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0146 0000 0000 | | .XXX[0x2] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 0155 | U | .CONST 0x0155 ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0005 | | .CONST 0x0005 ; Number of locals 014b INIT_0148: 014b e006 | | Load 0x0,0x6 014c 0007 | | Action Break_Optional 014d e015 | | Load 0x0,0x15 014e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 014f 02c7 | | Declare_Variable Any 0150 00d8 | | Load_Top At_Offset_0 0151 1c00 | | Execute_Immediate Run_Utility,0x0 0152 00e1 | | Load_Encached Boolean_Cache 0153 029f 099b | | Declare_Subprogram INIT_0998,For_Call 0155 BODY_0148: 0155 00da | | Load_Top At_Offset_2 0156 00ea | | Load_Encached Null_String_Cache 0157 e5ff | | Load 0x2,-0x1 0158 4800 |H | Short_Literal 0x0 0159 e015 | | Load 0x0,0x15 015a 1815 | | Execute Package,Field_Execute,Field_Number 0x15 015b c403 | | Store 0x2,0x3 015c 00cf | | Action Mark_Auxiliary 015d 7802 |x | Jump 0x160 015e 8405 | | Call 0x2,0x5 015f 00c9 | | Action Pop_Auxiliary_Loop 0160 00db | | Load_Top At_Offset_3 0161 e015 | | Load 0x0,0x15 0162 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0163 6ffa |o | Jump_Zero 0x15e 0164 00ce | | Action Pop_Auxiliary 0165 00da | | Load_Top At_Offset_2 0166 e015 | | Load 0x0,0x15 0167 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0168 c403 | | Store 0x2,0x3 0169 00db | | Load_Top At_Offset_3 016a 800b | | Call 0x0,0xb 016b 6804 |h | Jump_Zero 0x170 016c 00db | | Load_Top At_Offset_3 016d 4800 |H | Short_Literal 0x0 016e 8013 | | Call 0x0,0x13 016f c402 | | Store 0x2,0x2 0170 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0171 0000 0000 | | .BLANK 0000[0x7] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017b | { | .CONST 0x017b ; Address of begin 0179 0004 | | .CONST 0x0004 ; Address of exception handler 017a 0001 | | .CONST 0x0001 ; Number of locals 017b BODY_0178: 017b INIT_0178: 017b 4801 |H | Short_Literal 0x1 017c e5fd | | Load 0x2,-0x3 017d e5fe | | Load 0x2,-0x2 017e e5ff | | Load 0x2,-0x1 017f 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 0180 e234 | 4 | Load 0x1,0x34 0181 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 0182 822f | / | Call 0x1,0x2f 0183 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0184 0000 0000 | | .BLANK 0000[0x4] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 019e | | .CONST 0x019e ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0006 | | .CONST 0x0006 ; Number of locals 018b INIT_0188: 018b 029f 09fb | | Declare_Subprogram INIT_09f8,For_Call 018d 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 018e 00c6 | | Action Check_Subprogram_Elaborated 018f 4802 |H | Short_Literal 0x2 0190 4802 |H | Short_Literal 0x2 0191 0099 | | Action Reference_Dynamic 0192 0092 100b | | Action Push_String_Extended,0x100b ; "Contents of selected files in" 0194 0093 0000 | | push_full_address 0x0 0196 6015 |` | Indirect_Literal Discrete,0x1ac,{0x80000000, 0x000c0000} 0197 0273 | s | Execute Discrete,Plus 0198 e004 | | Load 0x0,0x4 0199 0273 | s | Execute Discrete,Plus 019a e016 | | Load 0x0,0x16 019b 0273 | s | Execute Discrete,Plus 019c 4806 |H | Short_Literal 0x6 019d 0007 | | Action Break_Optional 019e BODY_0188: 019e 4800 |H | Short_Literal 0x0 019f 4800 |H | Short_Literal 0x0 01a0 e5fe | | Load 0x2,-0x2 01a1 e5ff | | Load 0x2,-0x1 01a2 4803 |H | Short_Literal 0x3 01a3 4802 |H | Short_Literal 0x2 01a4 0099 | | Action Reference_Dynamic 01a5 e404 | | Load 0x2,0x4 01a6 4805 |H | Short_Literal 0x5 01a7 4802 |H | Short_Literal 0x2 01a8 0099 | | Action Reference_Dynamic 01a9 822f | / | Call 0x1,0x2f 01aa 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01ab 0000 | | .XXX[0x1] 01ac 8000 0000 | | .LITERAL {0x80000000, 0x000c0000} 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01d2 | | .CONST 0x01d2 ; Address of begin 01b1 0004 | | .CONST 0x0004 ; Address of exception handler 01b2 000c | | .CONST 0x000c ; Number of locals 01b3 INIT_01b0: 01b3 029f 0a13 | | Declare_Subprogram INIT_0a10,For_Call 01b5 029f 0a23 | #| Declare_Subprogram INIT_0a20,For_Call 01b7 029f 0a4b | K| Declare_Subprogram INIT_0a48,For_Call 01b9 029f 0a8b | | Declare_Subprogram INIT_0a88,For_Call 01bb 029f 0aab | | Declare_Subprogram INIT_0aa8,For_Call 01bd 029f 0aeb | | Declare_Subprogram INIT_0ae8,For_Call 01bf 029f 0b03 | | Declare_Subprogram INIT_0b00,For_Call 01c1 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 01c2 00c6 | | Action Check_Subprogram_Elaborated 01c3 4808 |H | Short_Literal 0x8 01c4 4802 |H | Short_Literal 0x2 01c5 0099 | | Action Reference_Dynamic 01c6 0092 100b | | Action Push_String_Extended,0x100b ; "Contents of selected files in" 01c8 0093 0000 | | push_full_address 0x0 01ca 6015 |` | Indirect_Literal Discrete,0x1e0,{0x80000000, 0x000b0000} 01cb 0273 | s | Execute Discrete,Plus 01cc e004 | | Load 0x0,0x4 01cd 0273 | s | Execute Discrete,Plus 01ce e017 | | Load 0x0,0x17 01cf 0273 | s | Execute Discrete,Plus 01d0 480c |H | Short_Literal 0xc 01d1 0007 | | Action Break_Optional 01d2 BODY_01b0: 01d2 4800 |H | Short_Literal 0x0 01d3 4800 |H | Short_Literal 0x0 01d4 e5fe | | Load 0x2,-0x2 01d5 e5ff | | Load 0x2,-0x1 01d6 4809 |H | Short_Literal 0x9 01d7 4802 |H | Short_Literal 0x2 01d8 0099 | | Action Reference_Dynamic 01d9 e40a | | Load 0x2,0xa 01da 480b |H | Short_Literal 0xb 01db 4802 |H | Short_Literal 0x2 01dc 0099 | | Action Reference_Dynamic 01dd 822f | / | Call 0x1,0x2f 01de 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01df 0000 | | .XXX[0x1] 01e0 8000 0000 | | .LITERAL {0x80000000, 0x000b0000} 01e4 0000 0000 | | .BLANK 0000[0x4] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01fe | | .CONST 0x01fe ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0006 | | .CONST 0x0006 ; Number of locals 01eb INIT_01e8: 01eb 029f 0b3b | ;| Declare_Subprogram INIT_0b38,For_Call 01ed 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 01ee 00c6 | | Action Check_Subprogram_Elaborated 01ef 4802 |H | Short_Literal 0x2 01f0 4802 |H | Short_Literal 0x2 01f1 0099 | | Action Reference_Dynamic 01f2 0092 100c | | Action Push_String_Extended,0x100c ; "Deleted files in" 01f4 0093 0000 | | push_full_address 0x0 01f6 6015 |` | Indirect_Literal Discrete,0x20c,{0x80000000, 0x000f0000} 01f7 0273 | s | Execute Discrete,Plus 01f8 e004 | | Load 0x0,0x4 01f9 0273 | s | Execute Discrete,Plus 01fa e018 | | Load 0x0,0x18 01fb 0273 | s | Execute Discrete,Plus 01fc 4806 |H | Short_Literal 0x6 01fd 0007 | | Action Break_Optional 01fe BODY_01e8: 01fe 4801 |H | Short_Literal 0x1 01ff e5fd | | Load 0x2,-0x3 0200 e5fe | | Load 0x2,-0x2 0201 e5ff | | Load 0x2,-0x1 0202 4803 |H | Short_Literal 0x3 0203 4802 |H | Short_Literal 0x2 0204 0099 | | Action Reference_Dynamic 0205 e404 | | Load 0x2,0x4 0206 4805 |H | Short_Literal 0x5 0207 4802 |H | Short_Literal 0x2 0208 0099 | | Action Reference_Dynamic 0209 822f | / | Call 0x1,0x2f 020a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 020b 0000 | | .XXX[0x1] 020c 8000 0000 | | .LITERAL {0x80000000, 0x000f0000} 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0226 | & | .CONST 0x0226 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0006 | | .CONST 0x0006 ; Number of locals 0213 INIT_0210: 0213 029f 0b4b | K| Declare_Subprogram INIT_0b48,For_Call 0215 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0216 00c6 | | Action Check_Subprogram_Elaborated 0217 4802 |H | Short_Literal 0x2 0218 4802 |H | Short_Literal 0x2 0219 0099 | | Action Reference_Dynamic 021a 0092 100d | | Action Push_String_Extended,0x100d ; "Selected contents of" 021c 0093 0000 | | push_full_address 0x0 021e 6015 |` | Indirect_Literal Discrete,0x234,{0x80000000, 0x00090000} 021f 0273 | s | Execute Discrete,Plus 0220 e004 | | Load 0x0,0x4 0221 0273 | s | Execute Discrete,Plus 0222 e019 | | Load 0x0,0x19 0223 0273 | s | Execute Discrete,Plus 0224 4806 |H | Short_Literal 0x6 0225 0007 | | Action Break_Optional 0226 BODY_0210: 0226 4800 |H | Short_Literal 0x0 0227 4800 |H | Short_Literal 0x0 0228 e5fd | | Load 0x2,-0x3 0229 e5ff | | Load 0x2,-0x1 022a 4803 |H | Short_Literal 0x3 022b 4802 |H | Short_Literal 0x2 022c 0099 | | Action Reference_Dynamic 022d e404 | | Load 0x2,0x4 022e 4805 |H | Short_Literal 0x5 022f 4802 |H | Short_Literal 0x2 0230 0099 | | Action Reference_Dynamic 0231 822f | / | Call 0x1,0x2f 0232 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0233 0000 | | .XXX[0x1] 0234 8000 0000 | | .LITERAL {0x80000000, 0x00090000} 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 0293 | | .CONST 0x0293 ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 001d | | .CONST 0x001d ; Number of locals 023b INIT_0238: 023b 4800 |H | Short_Literal 0x0 023c 4809 |H | Short_Literal 0x9 023d 029f 0b93 | | Declare_Subprogram INIT_0b90,For_Call 023f 03fd | | Declare_Type Discrete,Defined 0240 4818 |H | Short_Literal 0x18 0241 03cc | | Declare_Type Access,Incomplete,Accesses_Protected 0242 00e1 | | Load_Encached Boolean_Cache 0243 00e2 | | Load_Encached Integer_Cache 0244 00e2 | | Load_Encached Integer_Cache 0245 e002 | | Load 0x0,0x2 0246 e403 | | Load 0x2,0x3 0247 029f 0bbb | | Declare_Subprogram INIT_0bb8,For_Call 0249 4805 |H | Short_Literal 0x5 024a 032d | - | Declare_Type Record,Defined 024b 00d8 | | Load_Top At_Offset_0 024c 02a0 | | Declare_Subprogram Null_Subprogram 024d 00db | | Load_Top At_Offset_3 024e 03c7 | | Complete_Type Access,By_Defining 024f 00e3 | | Load_Encached Natural_Cache 0250 0266 | f | Execute Discrete,Bounds 0251 00db | | Load_Top At_Offset_3 0252 02a0 | | Declare_Subprogram Null_Subprogram 0253 4801 |H | Short_Literal 0x1 0254 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 0255 00da | | Load_Top At_Offset_2 0256 0007 | | Action Break_Optional 0257 00e2 | | Load_Encached Integer_Cache 0258 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0259 029f 0bcb | | Declare_Subprogram INIT_0bc8,For_Call 025b 029f 0bf3 | | Declare_Subprogram INIT_0bf0,For_Call 025d 029f 0c1b | | Declare_Subprogram INIT_0c18,For_Call 025f 029f 0c4b | K| Declare_Subprogram INIT_0c48,For_Call 0261 029f 0cb3 | | Declare_Subprogram INIT_0cb0,For_Call 0263 a01a | | Store_Unchecked 0x0,0x1a 0264 00c6 | | Action Check_Subprogram_Elaborated 0265 e402 | | Load 0x2,0x2 0266 e403 | | Load 0x2,0x3 0267 e405 | | Load 0x2,0x5 0268 480a |H | Short_Literal 0xa 0269 4802 |H | Short_Literal 0x2 026a 0099 | | Action Reference_Dynamic 026b 480b |H | Short_Literal 0xb 026c 4802 |H | Short_Literal 0x2 026d 0099 | | Action Reference_Dynamic 026e 480c |H | Short_Literal 0xc 026f 4802 |H | Short_Literal 0x2 0270 0099 | | Action Reference_Dynamic 0271 0092 100e | | Action Push_String_Extended,0x100e ; "Index Name Size Date Kind" 0273 00ea | | Load_Encached Null_String_Cache 0274 00ea | | Load_Encached Null_String_Cache 0275 0093 0000 | | push_full_address 0x0 0277 6038 |`8 | Indirect_Literal Discrete,0x2b0,{0x80000000, 0x000e0000} 0278 0273 | s | Execute Discrete,Plus 0279 e004 | | Load 0x0,0x4 027a 0273 | s | Execute Discrete,Plus 027b e01b | | Load 0x0,0x1b 027c 0273 | s | Execute Discrete,Plus 027d 4817 |H | Short_Literal 0x17 027e 0007 | | Action Break_Optional 027f 029f 0cc3 | | Declare_Subprogram INIT_0cc0,For_Call 0281 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0282 00c6 | | Action Check_Subprogram_Elaborated 0283 4818 |H | Short_Literal 0x18 0284 4802 |H | Short_Literal 0x2 0285 0099 | | Action Reference_Dynamic 0286 0092 100f | | Action Push_String_Extended,0x100f ; "Displaying selected items in" 0288 0093 0000 | | push_full_address 0x0 028a 6021 |`! | Indirect_Literal Discrete,0x2ac,{0x80000000, 0x000d0000} 028b 0273 | s | Execute Discrete,Plus 028c e004 | | Load 0x0,0x4 028d 0273 | s | Execute Discrete,Plus 028e e01c | | Load 0x0,0x1c 028f 0273 | s | Execute Discrete,Plus 0290 481c |H | Short_Literal 0x1c 0291 029f 0ce3 | | Declare_Subprogram INIT_0ce0,For_Call 0293 BODY_0238: 0293 4801 |H | Short_Literal 0x1 0294 e5fd | | Load 0x2,-0x3 0295 0092 1010 | | Action Push_String_Extended,0x1010 ; "st" 0297 e01d | | Load 0x0,0x1d 0298 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0299 0c01 | | Execute_Immediate Greater_Equal,0x1 029a 4800 |H | Short_Literal 0x0 029b e5fe | | Load 0x2,-0x2 029c e5ff | | Load 0x2,-0x1 029d 4819 |H | Short_Literal 0x19 029e 4802 |H | Short_Literal 0x2 029f 0099 | | Action Reference_Dynamic 02a0 e41a | | Load 0x2,0x1a 02a1 481b |H | Short_Literal 0x1b 02a2 4802 |H | Short_Literal 0x2 02a3 0099 | | Action Reference_Dynamic 02a4 822f | / | Call 0x1,0x2f 02a5 e407 | | Load 0x2,0x7 02a6 0c01 | | Execute_Immediate Greater_Equal,0x1 02a7 6801 |h | Jump_Zero 0x2a9 02a8 841d | | Call 0x2,0x1d 02a9 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02aa 0000 0000 | | .XXX[0x2] 02ac 8000 0000 | | .LITERAL {0x80000000, 0x000d0000} 02b0 8000 0000 | | .LITERAL {0x80000000, 0x000e0000} 02b4 0000 0000 | | .BLANK 0000[0x4] 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02ce | | .CONST 0x02ce ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0006 | | .CONST 0x0006 ; Number of locals 02bb INIT_02b8: 02bb 029f 0d1b | | Declare_Subprogram INIT_0d18,For_Call 02bd 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 02be 00c6 | | Action Check_Subprogram_Elaborated 02bf 4802 |H | Short_Literal 0x2 02c0 4802 |H | Short_Literal 0x2 02c1 0099 | | Action Reference_Dynamic 02c2 0092 1011 | | Action Push_String_Extended,0x1011 ; "Deleting files from" 02c4 0093 0000 | | push_full_address 0x0 02c6 6015 |` | Indirect_Literal Discrete,0x2dc,{0x80000000, 0x00080000} 02c7 0273 | s | Execute Discrete,Plus 02c8 e004 | | Load 0x0,0x4 02c9 0273 | s | Execute Discrete,Plus 02ca e01e | | Load 0x0,0x1e 02cb 0273 | s | Execute Discrete,Plus 02cc 4806 |H | Short_Literal 0x6 02cd 0007 | | Action Break_Optional 02ce BODY_02b8: 02ce 4800 |H | Short_Literal 0x0 02cf e5fd | | Load 0x2,-0x3 02d0 e5fe | | Load 0x2,-0x2 02d1 e5ff | | Load 0x2,-0x1 02d2 4803 |H | Short_Literal 0x3 02d3 4802 |H | Short_Literal 0x2 02d4 0099 | | Action Reference_Dynamic 02d5 e404 | | Load 0x2,0x4 02d6 4805 |H | Short_Literal 0x5 02d7 4802 |H | Short_Literal 0x2 02d8 0099 | | Action Reference_Dynamic 02d9 822f | / | Call 0x1,0x2f 02da 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02db 0000 | | .XXX[0x1] 02dc 8000 0000 | | .LITERAL {0x80000000, 0x00080000} 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02f6 | | .CONST 0x02f6 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0006 | | .CONST 0x0006 ; Number of locals 02e3 INIT_02e0: 02e3 029f 0d2b | +| Declare_Subprogram INIT_0d28,For_Call 02e5 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 02e6 00c6 | | Action Check_Subprogram_Elaborated 02e7 4802 |H | Short_Literal 0x2 02e8 4802 |H | Short_Literal 0x2 02e9 0099 | | Action Reference_Dynamic 02ea 0092 1012 | | Action Push_String_Extended,0x1012 ; "Undeleting files in" 02ec 0093 0000 | | push_full_address 0x0 02ee 6015 |` | Indirect_Literal Discrete,0x304,{0x80000000, 0x00070000} 02ef 0273 | s | Execute Discrete,Plus 02f0 e004 | | Load 0x0,0x4 02f1 0273 | s | Execute Discrete,Plus 02f2 e01f | | Load 0x0,0x1f 02f3 0273 | s | Execute Discrete,Plus 02f4 4806 |H | Short_Literal 0x6 02f5 0007 | | Action Break_Optional 02f6 BODY_02e0: 02f6 4801 |H | Short_Literal 0x1 02f7 4800 |H | Short_Literal 0x0 02f8 e5fe | | Load 0x2,-0x2 02f9 e5ff | | Load 0x2,-0x1 02fa 4803 |H | Short_Literal 0x3 02fb 4802 |H | Short_Literal 0x2 02fc 0099 | | Action Reference_Dynamic 02fd e404 | | Load 0x2,0x4 02fe 4805 |H | Short_Literal 0x5 02ff 4802 |H | Short_Literal 0x2 0300 0099 | | Action Reference_Dynamic 0301 822f | / | Call 0x1,0x2f 0302 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0303 0000 | | .XXX[0x1] 0304 8000 0000 | | .LITERAL {0x80000000, 0x00070000} 0308 ; -------------------------------------------------------------------------------------- 0308 ; SUBPROGRAM 0308 ; -------------------------------------------------------------------------------------- 0308 0321 | ! | .CONST 0x0321 ; Address of begin 0309 0004 | | .CONST 0x0004 ; Address of exception handler 030a 0007 | | .CONST 0x0007 ; Number of locals 030b INIT_0308: 030b 4865 |He | Short_Literal 0x65 030c e003 | | Load 0x0,0x3 030d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 030e 029f 0d3b | ;| Declare_Subprogram INIT_0d38,For_Call 0310 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0311 00c6 | | Action Check_Subprogram_Elaborated 0312 4803 |H | Short_Literal 0x3 0313 4802 |H | Short_Literal 0x2 0314 0099 | | Action Reference_Dynamic 0315 0092 1013 | | Action Push_String_Extended,0x1013 ; "Removing duplicates from" 0317 0093 0000 | | push_full_address 0x0 0319 6016 |` | Indirect_Literal Discrete,0x330,{0x80000000, 0x00060000} 031a 0273 | s | Execute Discrete,Plus 031b e004 | | Load 0x0,0x4 031c 0273 | s | Execute Discrete,Plus 031d e020 | | Load 0x0,0x20 031e 0273 | s | Execute Discrete,Plus 031f 4807 |H | Short_Literal 0x7 0320 0007 | | Action Break_Optional 0321 BODY_0308: 0321 4800 |H | Short_Literal 0x0 0322 e5fd | | Load 0x2,-0x3 0323 e5fe | | Load 0x2,-0x2 0324 e5ff | | Load 0x2,-0x1 0325 4804 |H | Short_Literal 0x4 0326 4802 |H | Short_Literal 0x2 0327 0099 | | Action Reference_Dynamic 0328 e405 | | Load 0x2,0x5 0329 4806 |H | Short_Literal 0x6 032a 4802 |H | Short_Literal 0x2 032b 0099 | | Action Reference_Dynamic 032c 822f | / | Call 0x1,0x2f 032d 4504 |E | Exit_Suprogram New_Top_Offset 0x4 032e 0000 0000 | | .XXX[0x2] 0330 8000 0000 | | .LITERAL {0x80000000, 0x00060000} 0334 0000 0000 | | .BLANK 0000[0x4] 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 0353 | S | .CONST 0x0353 ; Address of begin 0339 0004 | | .CONST 0x0004 ; Address of exception handler 033a 0008 | | .CONST 0x0008 ; Number of locals 033b INIT_0338: 033b 00da | | Load_Top At_Offset_2 033c 822c | , | Call 0x1,0x2c 033d e5fe | | Load 0x2,-0x2 033e e01d | | Load 0x0,0x1d 033f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0340 029f 0d63 | c| Declare_Subprogram INIT_0d60,For_Call 0342 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0343 00c6 | | Action Check_Subprogram_Elaborated 0344 4804 |H | Short_Literal 0x4 0345 4802 |H | Short_Literal 0x2 0346 0099 | | Action Reference_Dynamic 0347 0092 1014 | | Action Push_String_Extended,0x1014 ; "Renaming selected entries in" 0349 0093 0000 | | push_full_address 0x0 034b 6014 |` | Indirect_Literal Discrete,0x360,{0x80000000, 0x00050000} 034c 0273 | s | Execute Discrete,Plus 034d e004 | | Load 0x0,0x4 034e 0273 | s | Execute Discrete,Plus 034f e021 | ! | Load 0x0,0x21 0350 0273 | s | Execute Discrete,Plus 0351 4808 |H | Short_Literal 0x8 0352 0007 | | Action Break_Optional 0353 BODY_0338: 0353 4800 |H | Short_Literal 0x0 0354 4800 |H | Short_Literal 0x0 0355 e5fd | | Load 0x2,-0x3 0356 e5ff | | Load 0x2,-0x1 0357 4805 |H | Short_Literal 0x5 0358 4802 |H | Short_Literal 0x2 0359 0099 | | Action Reference_Dynamic 035a e406 | | Load 0x2,0x6 035b 4807 |H | Short_Literal 0x7 035c 4802 |H | Short_Literal 0x2 035d 0099 | | Action Reference_Dynamic 035e 822f | / | Call 0x1,0x2f 035f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0360 8000 0000 | | .LITERAL {0x80000000, 0x00050000} 0364 0000 0000 | | .BLANK 0000[0x4] 0368 ; -------------------------------------------------------------------------------------- 0368 ; SUBPROGRAM 0368 ; -------------------------------------------------------------------------------------- 0368 0380 | | .CONST 0x0380 ; Address of begin 0369 0004 | | .CONST 0x0004 ; Address of exception handler 036a 0007 | | .CONST 0x0007 ; Number of locals 036b INIT_0368: 036b e007 | | Load 0x0,0x7 036c 0007 | | Action Break_Optional 036d 029f 0d83 | | Declare_Subprogram INIT_0d80,For_Call 036f 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0370 00c6 | | Action Check_Subprogram_Elaborated 0371 4803 |H | Short_Literal 0x3 0372 4802 |H | Short_Literal 0x2 0373 0099 | | Action Reference_Dynamic 0374 0092 1015 | | Action Push_String_Extended,0x1015 ; "Copying selected files from" 0376 0093 0000 | | push_full_address 0x0 0378 6027 |`' | Indirect_Literal Discrete,0x3a0,{0x80000000, 0x00040000} 0379 0273 | s | Execute Discrete,Plus 037a e004 | | Load 0x0,0x4 037b 0273 | s | Execute Discrete,Plus 037c e022 | " | Load 0x0,0x22 037d 0273 | s | Execute Discrete,Plus 037e 4807 |H | Short_Literal 0x7 037f 0007 | | Action Break_Optional 0380 BODY_0368: 0380 e5fb | | Load 0x2,-0x5 0381 6806 |h | Jump_Zero 0x388 0382 e007 | | Load 0x0,0x7 0383 4802 |H | Short_Literal 0x2 0384 e5fe | | Load 0x2,-0x2 0385 8008 | | Call 0x0,0x8 0386 c402 | | Store 0x2,0x2 0387 7805 |x | Jump 0x38d 0388 e007 | | Load 0x0,0x7 0389 4801 |H | Short_Literal 0x1 038a e5fe | | Load 0x2,-0x2 038b 8008 | | Call 0x0,0x8 038c c402 | | Store 0x2,0x2 038d 4800 |H | Short_Literal 0x0 038e e5fc | | Load 0x2,-0x4 038f e5fd | | Load 0x2,-0x3 0390 e5ff | | Load 0x2,-0x1 0391 4804 |H | Short_Literal 0x4 0392 4802 |H | Short_Literal 0x2 0393 0099 | | Action Reference_Dynamic 0394 e405 | | Load 0x2,0x5 0395 4806 |H | Short_Literal 0x6 0396 4802 |H | Short_Literal 0x2 0397 0099 | | Action Reference_Dynamic 0398 822f | / | Call 0x1,0x2f 0399 e402 | | Load 0x2,0x2 039a 4801 |H | Short_Literal 0x1 039b 8014 | | Call 0x0,0x14 039c c402 | | Store 0x2,0x2 039d 4506 |E | Exit_Suprogram New_Top_Offset 0x6 039e 0000 0000 | | .XXX[0x2] 03a0 8000 0000 | | .LITERAL {0x80000000, 0x00040000} 03a4 0000 0000 | | .BLANK 0000[0x4] 03a8 ; -------------------------------------------------------------------------------------- 03a8 ; SUBPROGRAM 03a8 ; -------------------------------------------------------------------------------------- 03a8 03c3 | | .CONST 0x03c3 ; Address of begin 03a9 0004 | | .CONST 0x0004 ; Address of exception handler 03aa 0009 | | .CONST 0x0009 ; Number of locals 03ab INIT_03a8: 03ab 4800 |H | Short_Literal 0x0 03ac e5fb | | Load 0x2,-0x5 03ad e5ff | | Load 0x2,-0x1 03ae 8232 | 2 | Call 0x1,0x32 03af 4800 |H | Short_Literal 0x0 03b0 e5fb | | Load 0x2,-0x5 03b1 e5fe | | Load 0x2,-0x2 03b2 8232 | 2 | Call 0x1,0x32 03b3 00d9 | | Load_Top At_Offset_1 03b4 01dd | | Execute Vector,First 03b5 00e2 | | Load_Encached Integer_Cache 03b6 03f1 | | Declare_Variable Discrete,With_Value 03b7 00d9 | | Load_Top At_Offset_1 03b8 01dd | | Execute Vector,First 03b9 00e2 | | Load_Encached Integer_Cache 03ba 03f1 | | Declare_Variable Discrete,With_Value 03bb e007 | | Load 0x0,0x7 03bc 0007 | | Action Break_Optional 03bd 00d8 | | Load_Top At_Offset_0 03be 0007 | | Action Break_Optional 03bf 029f 0d93 | | Declare_Subprogram INIT_0d90,For_Call 03c1 029f 0db3 | | Declare_Subprogram INIT_0db0,For_Call 03c3 BODY_03a8: 03c3 e5fd | | Load 0x2,-0x3 03c4 680c |h | Jump_Zero 0x3d1 03c5 e007 | | Load 0x0,0x7 03c6 4800 |H | Short_Literal 0x0 03c7 e5ff | | Load 0x2,-0x1 03c8 822e | . | Call 0x1,0x2e 03c9 8008 | | Call 0x0,0x8 03ca c406 | | Store 0x2,0x6 03cb e007 | | Load 0x0,0x7 03cc 4800 |H | Short_Literal 0x0 03cd e5fe | | Load 0x2,-0x2 03ce 822e | . | Call 0x1,0x2e 03cf 8008 | | Call 0x0,0x8 03d0 0033 | 3 | Store_Top Heap_Access,At_Offset_3 03d1 00cf | | Action Mark_Auxiliary 03d2 e404 | | Load 0x2,0x4 03d3 e402 | | Load 0x2,0x2 03d4 01dc | | Execute Vector,Last 03d5 027d | } | Execute Discrete,Greater 03d6 6810 |h | Jump_Zero 0x3e7 03d7 e405 | | Load 0x2,0x5 03d8 e403 | | Load 0x2,0x3 03d9 01dc | | Execute Vector,Last 03da 027d | } | Execute Discrete,Greater 03db 7098 |p | Jump_Nonzero 0x474 03dc 0092 1016 | | Action Push_String_Extended,0x1016 ; "is not" 03de e405 | | Load 0x2,0x5 03df e403 | | Load 0x2,0x3 03e0 01d5 | | Execute Vector,Field_Reference 03e1 4801 |H | Short_Literal 0x1 03e2 8408 | | Call 0x2,0x8 03e3 e405 | | Load 0x2,0x5 03e4 0a01 | | Execute_Immediate Plus,0x1 03e5 c405 | | Store 0x2,0x5 03e6 788b |x | Jump 0x472 03e7 e405 | | Load 0x2,0x5 03e8 e403 | | Load 0x2,0x3 03e9 01dc | | Execute Vector,Last 03ea 027d | } | Execute Discrete,Greater 03eb 680b |h | Jump_Zero 0x3f7 03ec 0092 1016 | | Action Push_String_Extended,0x1016 ; "is not" 03ee e404 | | Load 0x2,0x4 03ef e402 | | Load 0x2,0x2 03f0 01d5 | | Execute Vector,Field_Reference 03f1 4802 |H | Short_Literal 0x2 03f2 8408 | | Call 0x2,0x8 03f3 e404 | | Load 0x2,0x4 03f4 0a01 | | Execute_Immediate Plus,0x1 03f5 c404 | | Store 0x2,0x4 03f6 787b |x{ | Jump 0x472 03f7 e404 | | Load 0x2,0x4 03f8 e402 | | Load 0x2,0x2 03f9 01d5 | | Execute Vector,Field_Reference 03fa 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 03fb 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 03fc e023 | # | Load 0x0,0x23 03fd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03fe e405 | | Load 0x2,0x5 03ff e403 | | Load 0x2,0x3 0400 01d5 | | Execute Vector,Field_Reference 0401 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0402 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0403 e023 | # | Load 0x0,0x23 0404 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0405 01df | | Execute Vector,Equal 0406 6846 |hF | Jump_Zero 0x44d 0407 e404 | | Load 0x2,0x4 0408 e402 | | Load 0x2,0x2 0409 01d5 | | Execute Vector,Field_Reference 040a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 040b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 040c e405 | | Load 0x2,0x5 040d e403 | | Load 0x2,0x3 040e 01d5 | | Execute Vector,Field_Reference 040f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0410 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0411 027e | ~ | Execute Discrete,Not_Equal 0412 6808 |h | Jump_Zero 0x41b 0413 0092 1017 | | Action Push_String_Extended,0x1017 ; "'s size is different" 0415 e405 | | Load 0x2,0x5 0416 e403 | | Load 0x2,0x3 0417 01d5 | | Execute Vector,Field_Reference 0418 4801 |H | Short_Literal 0x1 0419 8408 | | Call 0x2,0x8 041a 782b |x+ | Jump 0x446 041b e5fc | | Load 0x2,-0x4 041c 7014 |p | Jump_Nonzero 0x431 041d e404 | | Load 0x2,0x4 041e e402 | | Load 0x2,0x2 041f 01d5 | | Execute Vector,Field_Reference 0420 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0421 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0422 e405 | | Load 0x2,0x5 0423 e403 | | Load 0x2,0x3 0424 01d5 | | Execute Vector,Field_Reference 0425 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0426 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0427 012e | . | Execute Any,Not_Equal 0428 6808 |h | Jump_Zero 0x431 0429 0092 1018 | | Action Push_String_Extended,0x1018 ; "'s create date is different" 042b e405 | | Load 0x2,0x5 042c e403 | | Load 0x2,0x3 042d 01d5 | | Execute Vector,Field_Reference 042e 4801 |H | Short_Literal 0x1 042f 8408 | | Call 0x2,0x8 0430 7815 |x | Jump 0x446 0431 e5fd | | Load 0x2,-0x3 0432 6813 |h | Jump_Zero 0x446 0433 e406 | | Load 0x2,0x6 0434 e404 | | Load 0x2,0x4 0435 e402 | | Load 0x2,0x2 0436 01d5 | | Execute Vector,Field_Reference 0437 8409 | | Call 0x2,0x9 0438 e407 | | Load 0x2,0x7 0439 e405 | | Load 0x2,0x5 043a e403 | | Load 0x2,0x3 043b 01d5 | | Execute Vector,Field_Reference 043c 8409 | | Call 0x2,0x9 043d 01de | | Execute Vector,Not_Equal 043e 6807 |h | Jump_Zero 0x446 043f 0092 1019 | | Action Push_String_Extended,0x1019 ; "'s contents is different" 0441 e405 | | Load 0x2,0x5 0442 e403 | | Load 0x2,0x3 0443 01d5 | | Execute Vector,Field_Reference 0444 4801 |H | Short_Literal 0x1 0445 8408 | | Call 0x2,0x8 0446 e404 | | Load 0x2,0x4 0447 0a01 | | Execute_Immediate Plus,0x1 0448 c404 | | Store 0x2,0x4 0449 e405 | | Load 0x2,0x5 044a 0a01 | | Execute_Immediate Plus,0x1 044b c405 | | Store 0x2,0x5 044c 7825 |x% | Jump 0x472 044d e404 | | Load 0x2,0x4 044e e402 | | Load 0x2,0x2 044f 01d5 | | Execute Vector,Field_Reference 0450 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0451 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0452 e023 | # | Load 0x0,0x23 0453 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0454 e405 | | Load 0x2,0x5 0455 e403 | | Load 0x2,0x3 0456 01d5 | | Execute Vector,Field_Reference 0457 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0458 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0459 e023 | # | Load 0x0,0x23 045a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 045b 01c1 | | Execute Vector,Less 045c 680b |h | Jump_Zero 0x468 045d 0092 1016 | | Action Push_String_Extended,0x1016 ; "is not" 045f e404 | | Load 0x2,0x4 0460 e402 | | Load 0x2,0x2 0461 01d5 | | Execute Vector,Field_Reference 0462 4802 |H | Short_Literal 0x2 0463 8408 | | Call 0x2,0x8 0464 e404 | | Load 0x2,0x4 0465 0a01 | | Execute_Immediate Plus,0x1 0466 c404 | | Store 0x2,0x4 0467 780a |x | Jump 0x472 0468 0092 1016 | | Action Push_String_Extended,0x1016 ; "is not" 046a e405 | | Load 0x2,0x5 046b e403 | | Load 0x2,0x3 046c 01d5 | | Execute Vector,Field_Reference 046d 4801 |H | Short_Literal 0x1 046e 8408 | | Call 0x2,0x8 046f e405 | | Load 0x2,0x5 0470 0a01 | | Execute_Immediate Plus,0x1 0471 c405 | | Store 0x2,0x5 0472 00c9 | | Action Pop_Auxiliary_Loop 0473 7f5e | ^ | Jump 0x3d2 0474 00ce | | Action Pop_Auxiliary 0475 e5fd | | Load 0x2,-0x3 0476 6808 |h | Jump_Zero 0x47f 0477 00db | | Load_Top At_Offset_3 0478 4801 |H | Short_Literal 0x1 0479 8014 | | Call 0x0,0x14 047a c406 | | Store 0x2,0x6 047b 00da | | Load_Top At_Offset_2 047c 4801 |H | Short_Literal 0x1 047d 8014 | | Call 0x0,0x14 047e 0033 | 3 | Store_Top Heap_Access,At_Offset_3 047f 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0480 ; -------------------------------------------------------------------------------------- 0480 ; SUBPROGRAM 0480 ; -------------------------------------------------------------------------------------- 0480 04a6 | | .CONST 0x04a6 ; Address of begin 0481 0004 | | .CONST 0x0004 ; Address of exception handler 0482 000b | | .CONST 0x000b ; Number of locals 0483 INIT_0480: 0483 e007 | | Load 0x0,0x7 0484 0007 | | Action Break_Optional 0485 e5fe | | Load 0x2,-0x2 0486 822c | , | Call 0x1,0x2c 0487 e5fb | | Load 0x2,-0x5 0488 01dd | | Execute Vector,First 0489 e5fb | | Load 0x2,-0x5 048a 01d7 | | Execute Vector,Field_Read 048b e01d | | Load 0x0,0x1d 048c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 048d 00d8 | | Load_Top At_Offset_0 048e 0f4b | K | Execute_Immediate Equal,0x4b 048f 0007 | | Action Break_Optional 0490 00d9 | | Load_Top At_Offset_1 0491 0f50 | P | Execute_Immediate Equal,0x50 0492 0007 | | Action Break_Optional 0493 029f 0de3 | | Declare_Subprogram INIT_0de0,For_Call 0495 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0496 00c6 | | Action Check_Subprogram_Elaborated 0497 4807 |H | Short_Literal 0x7 0498 4802 |H | Short_Literal 0x2 0499 0099 | | Action Reference_Dynamic 049a 0092 101a | | Action Push_String_Extended,0x101a ; "Gathering selected files from" 049c 0093 0000 | | push_full_address 0x0 049e 603d |`= | Indirect_Literal Discrete,0x4dc,{0x80000000, 0x00030000} 049f 0273 | s | Execute Discrete,Plus 04a0 e004 | | Load 0x0,0x4 04a1 0273 | s | Execute Discrete,Plus 04a2 e024 | $ | Load 0x0,0x24 04a3 0273 | s | Execute Discrete,Plus 04a4 480b |H | Short_Literal 0xb 04a5 0007 | | Action Break_Optional 04a6 BODY_0480: 04a6 e5fc | | Load 0x2,-0x4 04a7 6806 |h | Jump_Zero 0x4ae 04a8 e007 | | Load 0x0,0x7 04a9 4802 |H | Short_Literal 0x2 04aa e5fe | | Load 0x2,-0x2 04ab 8008 | | Call 0x0,0x8 04ac c402 | | Store 0x2,0x2 04ad 7805 |x | Jump 0x4b3 04ae e007 | | Load 0x0,0x7 04af 4801 |H | Short_Literal 0x1 04b0 e5fe | | Load 0x2,-0x2 04b1 8008 | | Call 0x0,0x8 04b2 c402 | | Store 0x2,0x2 04b3 e403 | | Load 0x2,0x3 04b4 0092 101b | | Action Push_String_Extended,0x101b ; "?" 04b6 01df | | Execute Vector,Equal 04b7 680d |h | Jump_Zero 0x4c5 04b8 4800 |H | Short_Literal 0x0 04b9 4800 |H | Short_Literal 0x0 04ba e5fd | | Load 0x2,-0x3 04bb e5ff | | Load 0x2,-0x1 04bc 4808 |H | Short_Literal 0x8 04bd 4802 |H | Short_Literal 0x2 04be 0099 | | Action Reference_Dynamic 04bf e409 | | Load 0x2,0x9 04c0 480a |H | Short_Literal 0xa 04c1 4802 |H | Short_Literal 0x2 04c2 0099 | | Action Reference_Dynamic 04c3 822f | / | Call 0x1,0x2f 04c4 7810 |x | Jump 0x4d5 04c5 4800 |H | Short_Literal 0x0 04c6 4800 |H | Short_Literal 0x0 04c7 e5fd | | Load 0x2,-0x3 04c8 483a |H: | Short_Literal 0x3a 04c9 e5ff | | Load 0x2,-0x1 04ca 01cb | | Execute Vector,Append 04cb e403 | | Load 0x2,0x3 04cc 01cc | | Execute Vector,Catenate 04cd 4808 |H | Short_Literal 0x8 04ce 4802 |H | Short_Literal 0x2 04cf 0099 | | Action Reference_Dynamic 04d0 e409 | | Load 0x2,0x9 04d1 480a |H | Short_Literal 0xa 04d2 4802 |H | Short_Literal 0x2 04d3 0099 | | Action Reference_Dynamic 04d4 822f | / | Call 0x1,0x2f 04d5 e402 | | Load 0x2,0x2 04d6 4801 |H | Short_Literal 0x1 04d7 8014 | | Call 0x0,0x14 04d8 c402 | | Store 0x2,0x2 04d9 4507 |E | Exit_Suprogram New_Top_Offset 0x7 04da 0000 0000 | | .XXX[0x2] 04dc 8000 0000 | | .LITERAL {0x80000000, 0x00030000} 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; SUBPROGRAM 04e0 ; -------------------------------------------------------------------------------------- 04e0 04fa | | .CONST 0x04fa ; Address of begin 04e1 0004 | | .CONST 0x0004 ; Address of exception handler 04e2 0007 | | .CONST 0x0007 ; Number of locals 04e3 INIT_04e0: 04e3 e5fa | | Load 0x2,-0x6 04e4 00db | | Load_Top At_Offset_3 04e5 822c | , | Call 0x1,0x2c 04e6 8238 | 8 | Call 0x1,0x38 04e7 029f 0e13 | | Declare_Subprogram INIT_0e10,For_Call 04e9 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 04ea 00c6 | | Action Check_Subprogram_Elaborated 04eb 4803 |H | Short_Literal 0x3 04ec 4802 |H | Short_Literal 0x2 04ed 0099 | | Action Reference_Dynamic 04ee 0092 101c | | Action Push_String_Extended,0x101c ; "Spreading selected files from " 04f0 0093 0000 | | push_full_address 0x0 04f2 6015 |` | Indirect_Literal Discrete,0x508,{0x80000000, 0x00020000} 04f3 0273 | s | Execute Discrete,Plus 04f4 e004 | | Load 0x0,0x4 04f5 0273 | s | Execute Discrete,Plus 04f6 e025 | % | Load 0x0,0x25 04f7 0273 | s | Execute Discrete,Plus 04f8 4807 |H | Short_Literal 0x7 04f9 0007 | | Action Break_Optional 04fa BODY_04e0: 04fa 4800 |H | Short_Literal 0x0 04fb e5fc | | Load 0x2,-0x4 04fc e5fd | | Load 0x2,-0x3 04fd e5ff | | Load 0x2,-0x1 04fe 4804 |H | Short_Literal 0x4 04ff 4802 |H | Short_Literal 0x2 0500 0099 | | Action Reference_Dynamic 0501 e405 | | Load 0x2,0x5 0502 4806 |H | Short_Literal 0x6 0503 4802 |H | Short_Literal 0x2 0504 0099 | | Action Reference_Dynamic 0505 822f | / | Call 0x1,0x2f 0506 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0507 0000 | | .XXX[0x1] 0508 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 050c 0000 0000 | | .BLANK 0000[0x4] 0510 ; -------------------------------------------------------------------------------------- 0510 ; SUBPROGRAM 0510 ; -------------------------------------------------------------------------------------- 0510 052a | * | .CONST 0x052a ; Address of begin 0511 0004 | | .CONST 0x0004 ; Address of exception handler 0512 0008 | | .CONST 0x0008 ; Number of locals 0513 INIT_0510: 0513 00da | | Load_Top At_Offset_2 0514 822c | , | Call 0x1,0x2c 0515 e026 | & | Load 0x0,0x26 0516 0007 | | Action Break_Optional 0517 029f 0e7b | {| Declare_Subprogram INIT_0e78,For_Call 0519 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 051a 00c6 | | Action Check_Subprogram_Elaborated 051b 4804 |H | Short_Literal 0x4 051c 4802 |H | Short_Literal 0x2 051d 0099 | | Action Reference_Dynamic 051e 0092 101d | | Action Push_String_Extended,0x101d ; "Transfering selected files from " 0520 0093 0000 | | push_full_address 0x0 0522 601d |` | Indirect_Literal Discrete,0x540,{0x80000000, 0x00010000} 0523 0273 | s | Execute Discrete,Plus 0524 e004 | | Load 0x0,0x4 0525 0273 | s | Execute Discrete,Plus 0526 e027 | ' | Load 0x0,0x27 0527 0273 | s | Execute Discrete,Plus 0528 4808 |H | Short_Literal 0x8 0529 0007 | | Action Break_Optional 052a BODY_0510: 052a e026 | & | Load 0x0,0x26 052b 4801 |H | Short_Literal 0x1 052c 8028 | ( | Call 0x0,0x28 052d c403 | | Store 0x2,0x3 052e 4800 |H | Short_Literal 0x0 052f e5fc | | Load 0x2,-0x4 0530 e5fd | | Load 0x2,-0x3 0531 e5ff | | Load 0x2,-0x1 0532 4805 |H | Short_Literal 0x5 0533 4802 |H | Short_Literal 0x2 0534 0099 | | Action Reference_Dynamic 0535 e406 | | Load 0x2,0x6 0536 4807 |H | Short_Literal 0x7 0537 4802 |H | Short_Literal 0x2 0538 0099 | | Action Reference_Dynamic 0539 822f | / | Call 0x1,0x2f 053a e403 | | Load 0x2,0x3 053b 8029 | ) | Call 0x0,0x29 053c c403 | | Store 0x2,0x3 053d 4505 |E | Exit_Suprogram New_Top_Offset 0x5 053e 0000 0000 | | .XXX[0x2] 0540 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0544 0000 0000 | | .BLANK 0000[0x4] 0548 ; -------------------------------------------------------------------------------------- 0548 ; SUBPROGRAM 0548 ; -------------------------------------------------------------------------------------- 0548 054b | K | .CONST 0x054b ; Address of begin 0549 0004 | | .CONST 0x0004 ; Address of exception handler 054a 0001 | | .CONST 0x0001 ; Number of locals 054b BODY_0548: 054b INIT_0548: 054b 4601 |F | Jump_Case 0x2 054c 7801 |x | Jump 0x54e ; case 0x0 054d 7804 |x | Jump 0x552 ; case 0x1 054e 00da | | Load_Top At_Offset_2 054f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0550 1c00 | | Execute_Immediate Run_Utility,0x0 0551 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0552 00da | | Load_Top At_Offset_2 0553 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0554 1c01 | | Execute_Immediate Run_Utility,0x1 0555 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0556 0000 0000 | | .XXX[0x2] 0558 ; -------------------------------------------------------------------------------------- 0558 ; SUBPROGRAM 0558 ; -------------------------------------------------------------------------------------- 0558 055b | [ | .CONST 0x055b ; Address of begin 0559 0004 | | .CONST 0x0004 ; Address of exception handler 055a 0001 | | .CONST 0x0001 ; Number of locals 055b BODY_0558: 055b INIT_0558: 055b 4605 |F | Jump_Case 0x6 055c 7804 |x | Jump 0x561 ; case 0x0 055d 7810 |x | Jump 0x56e ; case 0x1 055e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 055f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0560 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0561 00da | | Load_Top At_Offset_2 ; case 0x5 0562 01dc | | Execute Vector,Last 0563 00db | | Load_Top At_Offset_3 0564 01dd | | Execute Vector,First 0565 0263 | c | Execute Discrete,Above_Bound 0566 7006 |p | Jump_Nonzero 0x56d 0567 00d8 | | Load_Top At_Offset_0 0568 e5ff | | Load 0x2,-0x1 0569 01d5 | | Execute Vector,Field_Reference 056a 1c00 | | Execute_Immediate Run_Utility,0x0 056b 0a01 | | Execute_Immediate Plus,0x1 056c 7ff8 | | Jump 0x565 056d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 056e 00da | | Load_Top At_Offset_2 056f 01dc | | Execute Vector,Last 0570 00db | | Load_Top At_Offset_3 0571 01dd | | Execute Vector,First 0572 0263 | c | Execute Discrete,Above_Bound 0573 7006 |p | Jump_Nonzero 0x57a 0574 00d8 | | Load_Top At_Offset_0 0575 e5ff | | Load 0x2,-0x1 0576 01d7 | | Execute Vector,Field_Read 0577 1c01 | | Execute_Immediate Run_Utility,0x1 0578 0a01 | | Execute_Immediate Plus,0x1 0579 7ff8 | | Jump 0x572 057a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 057b 0000 0000 | | .BLANK 0000[0x5] 0580 ; -------------------------------------------------------------------------------------- 0580 ; SUBPROGRAM 0580 ; -------------------------------------------------------------------------------------- 0580 0583 | | .CONST 0x0583 ; Address of begin 0581 0004 | | .CONST 0x0004 ; Address of exception handler 0582 0001 | | .CONST 0x0001 ; Number of locals 0583 BODY_0580: 0583 INIT_0580: 0583 00db | | Load_Top At_Offset_3 0584 e225 | % | Load 0x1,0x25 0585 022f | / | Execute Access,Equal 0586 7009 |p | Jump_Nonzero 0x590 0587 4801 |H | Short_Literal 0x1 0588 e5fe | | Load 0x2,-0x2 0589 e5ff | | Load 0x2,-0x1 058a e003 | | Load 0x0,0x3 058b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 058c e003 | | Load 0x0,0x3 058d 181a | | Execute Package,Field_Execute,Field_Number 0x1a 058e 0f00 | | Execute_Immediate Equal,0x0 058f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0590 4800 |H | Short_Literal 0x0 0591 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0592 0000 0000 | | .BLANK 0000[0x6] 0598 ; -------------------------------------------------------------------------------------- 0598 ; SUBPROGRAM 0598 ; -------------------------------------------------------------------------------------- 0598 05a1 | | .CONST 0x05a1 ; Address of begin 0599 0004 | | .CONST 0x0004 ; Address of exception handler 059a 0004 | | .CONST 0x0004 ; Number of locals 059b INIT_0598: 059b e5fa | | Load 0x2,-0x6 059c 0007 | | Action Break_Optional 059d e003 | | Load 0x0,0x3 059e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 059f 029f 0eb3 | | Declare_Subprogram INIT_0eb0,For_Call 05a1 BODY_0598: 05a1 00da | | Load_Top At_Offset_2 05a2 e225 | % | Load 0x1,0x25 05a3 022f | / | Execute Access,Equal 05a4 6804 |h | Jump_Zero 0x5a9 05a5 4865 |He | Short_Literal 0x65 05a6 e003 | | Load 0x0,0x3 05a7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05a8 003b | ; | Store_Top Access,At_Offset_3 05a9 00cf | | Action Mark_Auxiliary 05aa 7802 |x | Jump 0x5ad 05ab 8404 | | Call 0x2,0x4 05ac 00c9 | | Action Pop_Auxiliary_Loop 05ad e5fb | | Load 0x2,-0x5 05ae 85fe | | Call 0x2,-0x2 05af 6ffb |o | Jump_Zero 0x5ab 05b0 00ce | | Action Pop_Auxiliary 05b1 00da | | Load_Top At_Offset_2 05b2 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6 05b3 0000 0000 | | .BLANK 0000[0x5] 05b8 ; -------------------------------------------------------------------------------------- 05b8 ; SUBPROGRAM 05b8 ; -------------------------------------------------------------------------------------- 05b8 05c1 | | .CONST 0x05c1 ; Address of begin 05b9 0004 | | .CONST 0x0004 ; Address of exception handler 05ba 0003 | | .CONST 0x0003 ; Number of locals 05bb INIT_05b8: 05bb 00da | | Load_Top At_Offset_2 05bc 01dd | | Execute Vector,First 05bd 00e2 | | Load_Encached Integer_Cache 05be 03f1 | | Declare_Variable Discrete,With_Value 05bf 00e2 | | Load_Encached Integer_Cache 05c0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 05c1 BODY_05b8: 05c1 00cf | | Action Mark_Auxiliary 05c2 e5ff | | Load 0x2,-0x1 05c3 01d9 | | Execute Vector,Reverse_Bounds 05c4 0263 | c | Execute Discrete,Above_Bound 05c5 701f |p | Jump_Nonzero 0x5e5 05c6 00d8 | | Load_Top At_Offset_0 05c7 e5ff | | Load 0x2,-0x1 05c8 01d7 | | Execute Vector,Field_Read 05c9 0f20 | | Execute_Immediate Equal,0x20 05ca 6818 |h | Jump_Zero 0x5e3 05cb e402 | | Load 0x2,0x2 05cc 00d9 | | Load_Top At_Offset_1 05cd 027f | | Execute Discrete,Equal 05ce 6804 |h | Jump_Zero 0x5d3 05cf 00d8 | | Load_Top At_Offset_0 05d0 0a01 | | Execute_Immediate Plus,0x1 05d1 c402 | | Store 0x2,0x2 05d2 7810 |x | Jump 0x5e3 05d3 00db | | Load_Top At_Offset_3 05d4 0a01 | | Execute_Immediate Plus,0x1 05d5 c403 | | Store 0x2,0x3 05d6 00db | | Load_Top At_Offset_3 05d7 e5fe | | Load 0x2,-0x2 05d8 027f | | Execute Discrete,Equal 05d9 6806 |h | Jump_Zero 0x5e0 05da e402 | | Load 0x2,0x2 05db 00d9 | | Load_Top At_Offset_1 05dc 0aff | | Execute_Immediate Plus,-0x1 05dd e5ff | | Load 0x2,-0x1 05de 01cf | | Execute Vector,Slice_Read 05df 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05e0 00d8 | | Load_Top At_Offset_0 05e1 0a01 | | Execute_Immediate Plus,0x1 05e2 c402 | | Store 0x2,0x2 05e3 00c8 | | Action Pop_Auxiliary_Range 05e4 3fe1 |? | Loop_Increasing 0x5c6 05e5 00ce | | Action Pop_Auxiliary 05e6 00d8 | | Load_Top At_Offset_0 05e7 0a01 | | Execute_Immediate Plus,0x1 05e8 0059 | Y | Store_Top Discrete,At_Offset_1 05e9 00d8 | | Load_Top At_Offset_0 05ea e5fe | | Load 0x2,-0x2 05eb 027f | | Execute Discrete,Equal 05ec 6806 |h | Jump_Zero 0x5f3 05ed 00d9 | | Load_Top At_Offset_1 05ee e5ff | | Load 0x2,-0x1 05ef 01dc | | Execute Vector,Last 05f0 e5ff | | Load 0x2,-0x1 05f1 01cf | | Execute Vector,Slice_Read 05f2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05f3 00ea | | Load_Encached Null_String_Cache 05f4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05f5 0000 0000 | | .XXX[0x3] 05f7 0000 | | 05f8 ; -------------------------------------------------------------------------------------- 05f8 ; SUBPROGRAM 05f8 ; -------------------------------------------------------------------------------------- 05f8 05fb | | .CONST 0x05fb ; Address of begin 05f9 0004 | | .CONST 0x0004 ; Address of exception handler 05fa 0001 | | .CONST 0x0001 ; Number of locals 05fb BODY_05f8: 05fb INIT_05f8: 05fb 4800 |H | Short_Literal 0x0 05fc 4801 |H | Short_Literal 0x1 05fd 4803 |H | Short_Literal 0x3 05fe e5ff | | Load 0x2,-0x1 05ff e02a | * | Load 0x0,0x2a 0600 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0601 e02a | * | Load 0x0,0x2a 0602 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0603 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0604 0000 0000 | | .BLANK 0000[0x4] 0608 ; -------------------------------------------------------------------------------------- 0608 ; SUBPROGRAM 0608 ; -------------------------------------------------------------------------------------- 0608 061c | | .CONST 0x061c ; Address of begin 0609 0004 | | .CONST 0x0004 ; Address of exception handler 060a 0002 | | .CONST 0x0002 ; Number of locals 060b INIT_0608: 060b 4801 |H | Short_Literal 0x1 060c 4820 |H | Short_Literal 0x20 060d 00e9 | | Load_Encached String_Cache 060e 035b | [ | Declare_Type Array,Constrained 060f 0337 | 7 | Declare_Variable Array 0610 00d8 | | Load_Top At_Offset_0 0611 0335 | 5 | Declare_Variable Array,Duplicate 0612 00cd | | Action Spare6_Action 0613 4820 |H | Short_Literal 0x20 0614 4801 |H | Short_Literal 0x1 0615 4820 |H | Short_Literal 0x20 0616 00d9 | | Load_Top At_Offset_1 0617 e403 | | Load 0x2,0x3 0618 01d6 | | Execute Vector,Field_Write 0619 3ffb |? | Loop_Increasing 0x615 061a 00d9 | | Load_Top At_Offset_1 061b 01d4 | | Execute Vector,Structure_Write 061c BODY_0608: 061c e5fe | | Load 0x2,-0x2 061d 01db | | Execute Vector,Length 061e 6803 |h | Jump_Zero 0x622 061f e5fe | | Load 0x2,-0x2 0620 e015 | | Load 0x0,0x15 0621 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 0622 00db | | Load_Top At_Offset_3 0623 802b | + | Call 0x0,0x2b 0624 6804 |h | Jump_Zero 0x629 0625 482a |H* | Short_Literal 0x2a 0626 e015 | | Load 0x0,0x15 0627 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 0628 7803 |x | Jump 0x62c 0629 4820 |H | Short_Literal 0x20 062a e015 | | Load 0x0,0x15 062b 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 062c 480a |H | Short_Literal 0xa 062d 4805 |H | Short_Literal 0x5 062e e5ff | | Load 0x2,-0x1 062f 802c | , | Call 0x0,0x2c 0630 e015 | | Load 0x0,0x15 0631 186c | l | Execute Package,Field_Execute,Field_Number 0x6c 0632 0092 101e | | Action Push_String_Extended,0x101e ; ": " 0634 e015 | | Load 0x0,0x15 0635 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 0636 e5fd | | Load 0x2,-0x3 0637 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0638 e023 | # | Load 0x0,0x23 0639 1813 | | Execute Package,Field_Execute,Field_Number 0x13 063a 4801 |H | Short_Literal 0x1 063b e5fd | | Load 0x2,-0x3 063c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 063d e023 | # | Load 0x0,0x23 063e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 063f 00db | | Load_Top At_Offset_3 0640 01ce | | Execute Vector,Slice_Write 0641 00d8 | | Load_Top At_Offset_0 0642 e015 | | Load 0x0,0x15 0643 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 0644 480a |H | Short_Literal 0xa 0645 4808 |H | Short_Literal 0x8 0646 e5fd | | Load 0x2,-0x3 0647 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0648 e015 | | Load 0x0,0x15 0649 186c | l | Execute Package,Field_Execute,Field_Number 0x6c 064a 4820 |H | Short_Literal 0x20 064b e015 | | Load 0x0,0x15 064c 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 064d e5fd | | Load 0x2,-0x3 064e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 064f 8229 | ) | Call 0x1,0x29 0650 e015 | | Load 0x0,0x15 0651 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 0652 4820 |H | Short_Literal 0x20 0653 e015 | | Load 0x0,0x15 0654 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 0655 e5fd | | Load 0x2,-0x3 0656 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0657 e220 | | Load 0x1,0x20 0658 01d7 | | Execute Vector,Field_Read 0659 e015 | | Load 0x0,0x15 065a 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 065b e5fd | | Load 0x2,-0x3 065c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 065d e222 | " | Load 0x1,0x22 065e 01d7 | | Execute Vector,Field_Read 065f e015 | | Load 0x0,0x15 0660 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 0661 4801 |H | Short_Literal 0x1 0662 e015 | | Load 0x0,0x15 0663 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0664 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0665 0000 0000 | | .XXX[0x3] 0667 0000 | | 0668 ; -------------------------------------------------------------------------------------- 0668 ; SUBPROGRAM 0668 ; -------------------------------------------------------------------------------------- 0668 066b | k | .CONST 0x066b ; Address of begin 0669 0004 | | .CONST 0x0004 ; Address of exception handler 066a 0001 | | .CONST 0x0001 ; Number of locals 066b BODY_0668: 066b INIT_0668: 066b 00db | | Load_Top At_Offset_3 066c 00ea | | Load_Encached Null_String_Cache 066d e5ff | | Load 0x2,-0x1 066e 822a | * | Call 0x1,0x2a 066f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0670 ; -------------------------------------------------------------------------------------- 0670 ; SUBPROGRAM 0670 ; -------------------------------------------------------------------------------------- 0670 067a | z | .CONST 0x067a ; Address of begin 0671 0004 | | .CONST 0x0004 ; Address of exception handler 0672 0002 | | .CONST 0x0002 ; Number of locals 0673 INIT_0670: 0673 4801 |H | Short_Literal 0x1 0674 00db | | Load_Top At_Offset_3 0675 483a |H: | Short_Literal 0x3a 0676 e01d | | Load 0x0,0x1d 0677 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0678 00e2 | | Load_Encached Integer_Cache 0679 03f1 | | Declare_Variable Discrete,With_Value 067a BODY_0670: 067a 00d8 | | Load_Top At_Offset_0 067b 0c01 | | Execute_Immediate Greater_Equal,0x1 067c 6811 |h | Jump_Zero 0x68e 067d 4820 |H | Short_Literal 0x20 067e 00d9 | | Load_Top At_Offset_1 067f 0a01 | | Execute_Immediate Plus,0x1 0680 00d8 | | Load_Top At_Offset_0 0681 00e2 | | Load_Encached Integer_Cache 0682 0260 | ` | Execute Discrete,In_Type 0683 7001 |p | Jump_Nonzero 0x685 0684 0801 | | Execute_Immediate Raise,0x1 0685 e5ff | | Load 0x2,-0x1 0686 01dc | | Execute Vector,Last 0687 e5ff | | Load 0x2,-0x1 0688 01cf | | Execute Vector,Slice_Read 0689 e01d | | Load 0x0,0x1d 068a 181c | | Execute Package,Field_Execute,Field_Number 0x1c 068b e01d | | Load 0x0,0x1d 068c 1814 | | Execute Package,Field_Execute,Field_Number 0x14 068d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 068e 0092 101b | | Action Push_String_Extended,0x101b ; "?" 0690 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0691 0000 0000 | | .BLANK 0000[0x7] 0698 ; -------------------------------------------------------------------------------------- 0698 ; SUBPROGRAM 0698 ; -------------------------------------------------------------------------------------- 0698 069f | | .CONST 0x069f ; Address of begin 0699 0004 | | .CONST 0x0004 ; Address of exception handler 069a 0002 | | .CONST 0x0002 ; Number of locals 069b INIT_0698: 069b 00da | | Load_Top At_Offset_2 069c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 069d e023 | # | Load 0x0,0x23 069e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 069f BODY_0698: 069f 00d8 | | Load_Top At_Offset_0 06a0 e5fe | | Load 0x2,-0x2 06a1 e02d | - | Load 0x0,0x2d 06a2 1812 | | Execute Package,Field_Execute,Field_Number 0x12 06a3 6805 |h | Jump_Zero 0x6a9 06a4 00d8 | | Load_Top At_Offset_0 06a5 e5fd | | Load 0x2,-0x3 06a6 e02d | - | Load 0x0,0x2d 06a7 1812 | | Execute Package,Field_Execute,Field_Number 0x12 06a8 6804 |h | Jump_Zero 0x6ad 06a9 e5fc | | Load 0x2,-0x4 06aa 00d9 | | Load_Top At_Offset_1 06ab 8226 | & | Call 0x1,0x26 06ac 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 06ad 4801 |H | Short_Literal 0x1 06ae 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 06af 0000 | | .XXX[0x1] 06b0 ; -------------------------------------------------------------------------------------- 06b0 ; SUBPROGRAM 06b0 ; -------------------------------------------------------------------------------------- 06b0 06ba | | .CONST 0x06ba ; Address of begin 06b1 0004 | | .CONST 0x0004 ; Address of exception handler 06b2 0002 | | .CONST 0x0002 ; Number of locals 06b3 INIT_06b0: 06b3 4801 |H | Short_Literal 0x1 06b4 00db | | Load_Top At_Offset_3 06b5 483a |H: | Short_Literal 0x3a 06b6 e01d | | Load 0x0,0x1d 06b7 181e | | Execute Package,Field_Execute,Field_Number 0x1e 06b8 00e2 | | Load_Encached Integer_Cache 06b9 03f1 | | Declare_Variable Discrete,With_Value 06ba BODY_06b0: 06ba 00d8 | | Load_Top At_Offset_0 06bb 0c01 | | Execute_Immediate Greater_Equal,0x1 06bc 680c |h | Jump_Zero 0x6c9 06bd 00db | | Load_Top At_Offset_3 06be 01dd | | Execute Vector,First 06bf 00d9 | | Load_Top At_Offset_1 06c0 0aff | | Execute_Immediate Plus,-0x1 06c1 00d8 | | Load_Top At_Offset_0 06c2 00e2 | | Load_Encached Integer_Cache 06c3 0260 | ` | Execute Discrete,In_Type 06c4 7001 |p | Jump_Nonzero 0x6c6 06c5 0801 | | Execute_Immediate Raise,0x1 06c6 e5ff | | Load 0x2,-0x1 06c7 01cf | | Execute Vector,Slice_Read 06c8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06c9 00db | | Load_Top At_Offset_3 06ca 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06cb 0000 0000 | | .BLANK 0000[0x5] 06d0 ; -------------------------------------------------------------------------------------- 06d0 ; SUBPROGRAM 06d0 ; -------------------------------------------------------------------------------------- 06d0 06e9 | | .CONST 0x06e9 ; Address of begin 06d1 0004 | | .CONST 0x0004 ; Address of exception handler 06d2 0009 | | .CONST 0x0009 ; Number of locals 06d3 INIT_06d0: 06d3 e5fc | | Load 0x2,-0x4 06d4 822c | , | Call 0x1,0x2c 06d5 e007 | | Load 0x0,0x7 06d6 0007 | | Action Break_Optional 06d7 e002 | | Load 0x0,0x2 06d8 0322 | " | Declare_Variable Record 06d9 00d8 | | Load_Top At_Offset_0 06da 1c00 | | Execute_Immediate Run_Utility,0x0 06db e02e | . | Load 0x0,0x2e 06dc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06dd 1b18 | | Execute Package,Field_Read,Field_Number 0x18 06de 02c7 | | Declare_Variable Any 06df 00d8 | | Load_Top At_Offset_0 06e0 1c00 | | Execute_Immediate Run_Utility,0x0 06e1 e02e | . | Load 0x0,0x2e 06e2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06e3 1b0f | | Execute Package,Field_Read,Field_Number 0xf 06e4 00e3 | | Load_Encached Natural_Cache 06e5 029f 0ecb | | Declare_Subprogram INIT_0ec8,For_Call 06e7 029f 0ee3 | | Declare_Subprogram INIT_0ee0,For_Call 06e9 BODY_06d0: 06e9 e02e | . | Load 0x0,0x2e 06ea 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06eb 1b0f | | Execute Package,Field_Read,Field_Number 0xf 06ec e405 | | Load 0x2,0x5 06ed 6072 |`r | Indirect_Literal Discrete,0x760,{0x00000000, 0x00004000} 06ee e02f | / | Load 0x0,0x2f 06ef 1b0e | | Execute Package,Field_Read,Field_Number 0xe 06f0 e030 | 0 | Load 0x0,0x30 06f1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 06f2 e031 | 1 | Load 0x0,0x31 06f3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 06f4 4801 |H | Short_Literal 0x1 06f5 4800 |H | Short_Literal 0x0 06f6 e030 | 0 | Load 0x0,0x30 06f7 1811 | | Execute Package,Field_Execute,Field_Number 0x11 06f8 e02e | . | Load 0x0,0x2e 06f9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06fa 1816 | | Execute Package,Field_Execute,Field_Number 0x16 06fb e5fc | | Load 0x2,-0x4 06fc 822e | . | Call 0x1,0x2e 06fd e02e | . | Load 0x0,0x2e 06fe 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06ff 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0700 c405 | | Store 0x2,0x5 0701 c406 | | Store 0x2,0x6 0702 00cf | | Action Mark_Auxiliary 0703 7853 |xS | Jump 0x757 0704 e007 | | Load 0x0,0x7 0705 4800 |H | Short_Literal 0x0 0706 e405 | | Load 0x2,0x5 0707 e02e | . | Load 0x0,0x2e 0708 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0709 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 070a 8008 | | Call 0x0,0x8 070b c403 | | Store 0x2,0x3 070c e403 | | Load 0x2,0x3 070d 8009 | | Call 0x0,0x9 070e 6842 |hB | Jump_Zero 0x751 070f e5fe | | Load 0x2,-0x2 0710 01db | | Execute Vector,Length 0711 680a |h | Jump_Zero 0x71c 0712 4820 |H | Short_Literal 0x20 0713 e5fe | | Load 0x2,-0x2 0714 01cb | | Execute Vector,Append 0715 e405 | | Load 0x2,0x5 0716 e02e | . | Load 0x0,0x2e 0717 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0718 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0719 01cc | | Execute Vector,Catenate 071a e015 | | Load 0x0,0x15 071b 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 071c 00cf | | Action Mark_Auxiliary 071d 782b |x+ | Jump 0x749 071e e404 | | Load 0x2,0x4 071f e5f9 | | Load 0x2,-0x7 0720 e402 | | Load 0x2,0x2 0721 e403 | | Load 0x2,0x3 0722 8032 | 2 | Call 0x0,0x32 0723 00d1 | | Pop_Control Pop_Count_1 0724 e404 | | Load 0x2,0x4 0725 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0726 e023 | # | Load 0x0,0x23 0727 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0728 e5fb | | Load 0x2,-0x5 0729 e02d | - | Load 0x0,0x2d 072a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 072b 701a |p | Jump_Nonzero 0x746 072c e403 | | Load 0x2,0x3 072d 802c | , | Call 0x0,0x2c 072e c407 | | Store 0x2,0x7 072f e404 | | Load 0x2,0x4 0730 e403 | | Load 0x2,0x3 0731 85fd | | Call 0x2,-0x3 0732 00d1 | | Pop_Control Pop_Count_1 0733 e5fa | | Load 0x2,-0x6 0734 6811 |h | Jump_Zero 0x746 0735 e404 | | Load 0x2,0x4 0736 8408 | | Call 0x2,0x8 0737 680e |h | Jump_Zero 0x746 0738 e403 | | Load 0x2,0x3 0739 8011 | | Call 0x0,0x11 073a e407 | | Load 0x2,0x7 073b e403 | | Load 0x2,0x3 073c 8409 | | Call 0x2,0x9 073d e407 | | Load 0x2,0x7 073e 0a01 | | Execute_Immediate Plus,0x1 073f 00d8 | | Load_Top At_Offset_0 0740 00e2 | | Load_Encached Integer_Cache 0741 0260 | ` | Execute Discrete,In_Type 0742 7001 |p | Jump_Nonzero 0x744 0743 0801 | | Execute_Immediate Raise,0x1 0744 e403 | | Load 0x2,0x3 0745 8033 | 3 | Call 0x0,0x33 0746 e403 | | Load 0x2,0x3 0747 8011 | | Call 0x0,0x11 0748 00c9 | | Action Pop_Auxiliary_Loop 0749 e403 | | Load 0x2,0x3 074a 8034 | 4 | Call 0x0,0x34 074b 6fd2 |o | Jump_Zero 0x71e 074c 00ce | | Action Pop_Auxiliary 074d e403 | | Load 0x2,0x3 074e 4801 |H | Short_Literal 0x1 074f 8014 | | Call 0x0,0x14 0750 c403 | | Store 0x2,0x3 0751 e405 | | Load 0x2,0x5 0752 e02e | . | Load 0x0,0x2e 0753 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0754 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0755 c405 | | Store 0x2,0x5 0756 00c9 | | Action Pop_Auxiliary_Loop 0757 e405 | | Load 0x2,0x5 0758 e02e | . | Load 0x0,0x2e 0759 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 075a 181e | | Execute Package,Field_Execute,Field_Number 0x1e 075b 6fa8 |o | Jump_Zero 0x704 075c 4508 |E | Exit_Suprogram New_Top_Offset 0x8 075d 0000 0000 | | .XXX[0x3] 075f 0000 | | 0760 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0764 0000 0000 | | .BLANK 0000[0x4] 0768 ; -------------------------------------------------------------------------------------- 0768 ; SUBPROGRAM 0768 ; -------------------------------------------------------------------------------------- 0768 077f | | .CONST 0x077f ; Address of begin 0769 0004 | | .CONST 0x0004 ; Address of exception handler 076a 0008 | | .CONST 0x0008 ; Number of locals 076b INIT_0768: 076b 00da | | Load_Top At_Offset_2 076c 822c | , | Call 0x1,0x2c 076d e02e | . | Load 0x0,0x2e 076e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 076f 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0770 02c7 | | Declare_Variable Any 0771 00d8 | | Load_Top At_Offset_0 0772 1c00 | | Execute_Immediate Run_Utility,0x0 0773 e02e | . | Load 0x0,0x2e 0774 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0775 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0776 e007 | | Load 0x0,0x7 0777 0007 | | Action Break_Optional 0778 e002 | | Load 0x0,0x2 0779 0322 | " | Declare_Variable Record 077a 00d8 | | Load_Top At_Offset_0 077b 1c00 | | Execute_Immediate Run_Utility,0x0 077c 00e2 | | Load_Encached Integer_Cache 077d 00e2 | | Load_Encached Integer_Cache 077e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 077f BODY_0768: 077f e02e | . | Load 0x0,0x2e 0780 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0781 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0782 e403 | | Load 0x2,0x3 0783 67dc |g | Indirect_Literal Discrete,0x760,{0x00000000, 0x00004000} 0784 e02f | / | Load 0x0,0x2f 0785 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0786 e030 | 0 | Load 0x0,0x30 0787 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0788 e031 | 1 | Load 0x0,0x31 0789 1811 | | Execute Package,Field_Execute,Field_Number 0x11 078a 4801 |H | Short_Literal 0x1 078b 4800 |H | Short_Literal 0x0 078c e030 | 0 | Load 0x0,0x30 078d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 078e e02e | . | Load 0x0,0x2e 078f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0790 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0791 e5ff | | Load 0x2,-0x1 0792 822e | . | Call 0x1,0x2e 0793 e02e | . | Load 0x0,0x2e 0794 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0795 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0796 c403 | | Store 0x2,0x3 0797 c404 | | Store 0x2,0x4 0798 e5f9 | | Load 0x2,-0x7 0799 800b | | Call 0x0,0xb 079a 7018 |p | Jump_Nonzero 0x7b3 079b e403 | | Load 0x2,0x3 079c e02e | . | Load 0x0,0x2e 079d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 079e 181e | | Execute Package,Field_Execute,Field_Number 0x1e 079f 7013 |p | Jump_Nonzero 0x7b3 07a0 e5fa | | Load 0x2,-0x6 07a1 7011 |p | Jump_Nonzero 0x7b3 07a2 e5fb | | Load 0x2,-0x5 07a3 6806 |h | Jump_Zero 0x7aa 07a4 e006 | | Load 0x0,0x6 07a5 4802 |H | Short_Literal 0x2 07a6 e5fe | | Load 0x2,-0x2 07a7 800a | | Call 0x0,0xa 07a8 c5f9 | | Store 0x2,-0x7 07a9 7805 |x | Jump 0x7af 07aa e006 | | Load 0x0,0x6 07ab 4801 |H | Short_Literal 0x1 07ac e5fe | | Load 0x2,-0x2 07ad 800a | | Call 0x0,0xa 07ae c5f9 | | Store 0x2,-0x7 07af e5f9 | | Load 0x2,-0x7 07b0 800b | | Call 0x0,0xb 07b1 7001 |p | Jump_Nonzero 0x7b3 07b2 4507 |E | Exit_Suprogram New_Top_Offset 0x7 07b3 00cf | | Action Mark_Auxiliary 07b4 7843 |xC | Jump 0x7f8 07b5 e007 | | Load 0x0,0x7 07b6 4800 |H | Short_Literal 0x0 07b7 e403 | | Load 0x2,0x3 07b8 e02e | . | Load 0x0,0x2e 07b9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 07ba 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 07bb 8008 | | Call 0x0,0x8 07bc c405 | | Store 0x2,0x5 07bd e405 | | Load 0x2,0x5 07be 8009 | | Call 0x0,0x9 07bf 6832 |h2 | Jump_Zero 0x7f2 07c0 00cf | | Action Mark_Auxiliary 07c1 7828 |x( | Jump 0x7ea 07c2 e406 | | Load 0x2,0x6 07c3 4800 |H | Short_Literal 0x0 07c4 e405 | | Load 0x2,0x5 07c5 800f | | Call 0x0,0xf 07c6 00d1 | | Pop_Control Pop_Count_1 07c7 e405 | | Load 0x2,0x5 07c8 8035 | 5 | Call 0x0,0x35 07c9 681f |h | Jump_Zero 0x7e9 07ca e225 | % | Load 0x1,0x25 07cb e5fd | | Load 0x2,-0x3 07cc e402 | | Load 0x2,0x2 07cd e406 | | Load 0x2,0x6 07ce 822d | - | Call 0x1,0x2d 07cf 6817 |h | Jump_Zero 0x7e7 07d0 e406 | | Load 0x2,0x6 07d1 e405 | | Load 0x2,0x5 07d2 822b | + | Call 0x1,0x2b 07d3 00d1 | | Pop_Control Pop_Count_1 07d4 e5fa | | Load 0x2,-0x6 07d5 700c |p | Jump_Nonzero 0x7e2 07d6 e406 | | Load 0x2,0x6 07d7 e5f9 | | Load 0x2,-0x7 07d8 800c | | Call 0x0,0xc 07d9 00d1 | | Pop_Control Pop_Count_1 07da 00e3 | | Load_Encached Natural_Cache 07db 6024 |`$ | Indirect_Literal Discrete,0x800,{0x00000000, 0x7fffffff} 07dc e5f9 | | Load 0x2,-0x7 07dd e405 | | Load 0x2,0x5 07de 8036 | 6 | Call 0x0,0x36 07df c407 | | Store 0x2,0x7 07e0 e5f9 | | Load 0x2,-0x7 07e1 8012 | | Call 0x0,0x12 07e2 00da | | Load_Top At_Offset_2 07e3 e406 | | Load 0x2,0x6 07e4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07e5 0273 | s | Execute Discrete,Plus 07e6 005b | [ | Store_Top Discrete,At_Offset_3 07e7 e405 | | Load 0x2,0x5 07e8 8011 | | Call 0x0,0x11 07e9 00c9 | | Action Pop_Auxiliary_Loop 07ea e405 | | Load 0x2,0x5 07eb 8034 | 4 | Call 0x0,0x34 07ec 6fd5 |o | Jump_Zero 0x7c2 07ed 00ce | | Action Pop_Auxiliary 07ee e405 | | Load 0x2,0x5 07ef 4801 |H | Short_Literal 0x1 07f0 8014 | | Call 0x0,0x14 07f1 c405 | | Store 0x2,0x5 07f2 e403 | | Load 0x2,0x3 07f3 e02e | . | Load 0x0,0x2e 07f4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 07f5 181d | | Execute Package,Field_Execute,Field_Number 0x1d 07f6 c403 | | Store 0x2,0x3 07f7 00c9 | | Action Pop_Auxiliary_Loop 07f8 e403 | | Load 0x2,0x3 07f9 e02e | . | Load 0x0,0x2e 07fa 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 07fb 181e | | Execute Package,Field_Execute,Field_Number 0x1e 07fc 6fb8 |o | Jump_Zero 0x7b5 07fd 4507 |E | Exit_Suprogram New_Top_Offset 0x7 07fe 0000 0000 | | .XXX[0x2] 0800 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0804 0000 0000 | | .BLANK 0000[0x4] 0808 ; -------------------------------------------------------------------------------------- 0808 ; SUBPROGRAM 0808 ; -------------------------------------------------------------------------------------- 0808 0813 | | .CONST 0x0813 ; Address of begin 0809 0004 | | .CONST 0x0004 ; Address of exception handler 080a 0002 | | .CONST 0x0002 ; Number of locals 080b INIT_0808: 080b 4801 |H | Short_Literal 0x1 080c 00db | | Load_Top At_Offset_3 080d 0092 101f | | Action Push_String_Extended,0x101f ; "--" 080f e01d | | Load 0x0,0x1d 0810 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0811 00e2 | | Load_Encached Integer_Cache 0812 03f1 | | Declare_Variable Discrete,With_Value 0813 BODY_0808: 0813 00d8 | | Load_Top At_Offset_0 0814 0c01 | | Execute_Immediate Greater_Equal,0x1 0815 680f |h | Jump_Zero 0x825 0816 4820 |H | Short_Literal 0x20 0817 e5ff | | Load 0x2,-0x1 0818 01dd | | Execute Vector,First 0819 00da | | Load_Top At_Offset_2 081a 0aff | | Execute_Immediate Plus,-0x1 081b 00d8 | | Load_Top At_Offset_0 081c 00e2 | | Load_Encached Integer_Cache 081d 0260 | ` | Execute Discrete,In_Type 081e 7001 |p | Jump_Nonzero 0x820 081f 0801 | | Execute_Immediate Raise,0x1 0820 e5ff | | Load 0x2,-0x1 0821 01cf | | Execute Vector,Slice_Read 0822 e01d | | Load 0x0,0x1d 0823 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0824 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0825 4820 |H | Short_Literal 0x20 0826 e5ff | | Load 0x2,-0x1 0827 e01d | | Load 0x0,0x1d 0828 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0829 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 082a 0000 0000 | | .BLANK 0000[0x6] 0830 ; -------------------------------------------------------------------------------------- 0830 ; SUBPROGRAM 0830 ; -------------------------------------------------------------------------------------- 0830 0864 | d | .CONST 0x0864 ; Address of begin 0831 0004 | | .CONST 0x0004 ; Address of exception handler 0832 0011 | | .CONST 0x0011 ; Number of locals 0833 INIT_0830: 0833 4801 |H | Short_Literal 0x1 0834 00db | | Load_Top At_Offset_3 0835 482f |H/ | Short_Literal 0x2f 0836 e01d | | Load 0x0,0x1d 0837 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0838 00e2 | | Load_Encached Integer_Cache 0839 03f1 | | Declare_Variable Discrete,With_Value 083a 4801 |H | Short_Literal 0x1 083b 6080 |` | Indirect_Literal Discrete,0x8bc,{0x00000000, 0x00000bb8} 083c e224 | $ | Load 0x1,0x24 083d 035b | [ | Declare_Type Array,Constrained 083e 0337 | 7 | Declare_Variable Array 083f 00d8 | | Load_Top At_Offset_0 0840 1c00 | | Execute_Immediate Run_Utility,0x0 0841 00e2 | | Load_Encached Integer_Cache 0842 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0843 029f 0f63 | c| Declare_Subprogram INIT_0f60,For_Call 0845 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0846 00c6 | | Action Check_Subprogram_Elaborated 0847 4805 |H | Short_Literal 0x5 0848 4802 |H | Short_Literal 0x2 0849 0099 | | Action Reference_Dynamic 084a 0092 1020 | | Action Push_String_Extended,0x1020 ; "Collecting file data from" 084c 0093 0000 | | push_full_address 0x0 084e 6069 |`i | Indirect_Literal Discrete,0x8b8,{0x80000000, 0x00120000} 084f 0273 | s | Execute Discrete,Plus 0850 e004 | | Load 0x0,0x4 0851 0273 | s | Execute Discrete,Plus 0852 e037 | 7 | Load 0x0,0x37 0853 0273 | s | Execute Discrete,Plus 0854 4809 |H | Short_Literal 0x9 0855 0007 | | Action Break_Optional 0856 029f 0f7b | {| Declare_Subprogram INIT_0f78,For_Call 0858 a038 | 8 | Store_Unchecked 0x0,0x38 0859 00c6 | | Action Check_Subprogram_Elaborated 085a e223 | # | Load 0x1,0x23 085b 00e4 | | Load_Encached Positive_Cache 085c e224 | $ | Load 0x1,0x24 085d 480a |H | Short_Literal 0xa 085e 4802 |H | Short_Literal 0x2 085f 0099 | | Action Reference_Dynamic 0860 e039 | 9 | Load 0x0,0x39 0861 e03a | : | Load 0x0,0x3a 0862 4811 |H | Short_Literal 0x11 0863 0007 | | Action Break_Optional 0864 BODY_0830: 0864 e402 | | Load 0x2,0x2 0865 700d |p | Jump_Nonzero 0x873 0866 e5fd | | Load 0x2,-0x3 0867 e5fe | | Load 0x2,-0x2 0868 00ea | | Load_Encached Null_String_Cache 0869 e5ff | | Load 0x2,-0x1 086a 4806 |H | Short_Literal 0x6 086b 4802 |H | Short_Literal 0x2 086c 0099 | | Action Reference_Dynamic 086d e407 | | Load 0x2,0x7 086e 4808 |H | Short_Literal 0x8 086f 4802 |H | Short_Literal 0x2 0870 0099 | | Action Reference_Dynamic 0871 822f | / | Call 0x1,0x2f 0872 7820 |x | Jump 0x893 0873 e5fd | | Load 0x2,-0x3 0874 e5fe | | Load 0x2,-0x2 0875 e402 | | Load 0x2,0x2 0876 0a01 | | Execute_Immediate Plus,0x1 0877 00d8 | | Load_Top At_Offset_0 0878 00e2 | | Load_Encached Integer_Cache 0879 0260 | ` | Execute Discrete,In_Type 087a 7001 |p | Jump_Nonzero 0x87c 087b 0801 | | Execute_Immediate Raise,0x1 087c e5ff | | Load 0x2,-0x1 087d 01dc | | Execute Vector,Last 087e e5ff | | Load 0x2,-0x1 087f 01cf | | Execute Vector,Slice_Read 0880 e5ff | | Load 0x2,-0x1 0881 01dd | | Execute Vector,First 0882 e402 | | Load 0x2,0x2 0883 0aff | | Execute_Immediate Plus,-0x1 0884 00d8 | | Load_Top At_Offset_0 0885 00e2 | | Load_Encached Integer_Cache 0886 0260 | ` | Execute Discrete,In_Type 0887 7001 |p | Jump_Nonzero 0x889 0888 0801 | | Execute_Immediate Raise,0x1 0889 e5ff | | Load 0x2,-0x1 088a 01cf | | Execute Vector,Slice_Read 088b 4806 |H | Short_Literal 0x6 088c 4802 |H | Short_Literal 0x2 088d 0099 | | Action Reference_Dynamic 088e e407 | | Load 0x2,0x7 088f 4808 |H | Short_Literal 0x8 0890 4802 |H | Short_Literal 0x2 0891 0099 | | Action Reference_Dynamic 0892 822f | / | Call 0x1,0x2f 0893 4820 |H | Short_Literal 0x20 0894 4800 |H | Short_Literal 0x0 0895 480a |H | Short_Literal 0xa 0896 e404 | | Load 0x2,0x4 0897 e01d | | Load 0x0,0x1d 0898 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0899 0092 1021 | !| Action Push_String_Extended,0x1021 ; " files selected." 089b 01cc | | Execute Vector,Catenate 089c e015 | | Load 0x0,0x15 089d 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 089e e403 | | Load 0x2,0x3 089f 4801 |H | Short_Literal 0x1 08a0 e404 | | Load 0x2,0x4 08a1 00da | | Load_Top At_Offset_2 08a2 035b | [ | Declare_Type Array,Constrained 08a3 00d0 | | Action Swap_Control 08a4 01cd | | Execute Vector,Slice_Reference 08a5 00d8 | | Load_Top At_Offset_0 08a6 e40b | | Load 0x2,0xb 08a7 e40c | | Load 0x2,0xc 08a8 e40d | | Load 0x2,0xd 08a9 480e |H | Short_Literal 0xe 08aa 4802 |H | Short_Literal 0x2 08ab 0099 | | Action Reference_Dynamic 08ac 480f |H | Short_Literal 0xf 08ad 4802 |H | Short_Literal 0x2 08ae 0099 | | Action Reference_Dynamic 08af 8038 | 8 | Call 0x0,0x38 08b0 00d2 | | Pop_Control Pop_Count_2 08b1 4801 |H | Short_Literal 0x1 08b2 e404 | | Load 0x2,0x4 08b3 e403 | | Load 0x2,0x3 08b4 01cf | | Execute Vector,Slice_Read 08b5 e224 | $ | Load 0x1,0x24 08b6 01c6 | | Execute Vector,Convert_To_Formal 08b7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 08b8 8000 0000 | | .LITERAL {0x80000000, 0x00120000} 08bc 0000 0000 | | .LITERAL {0x00000000, 0x00000bb8} 08c0 ; -------------------------------------------------------------------------------------- 08c0 ; SUBPROGRAM 08c0 ; -------------------------------------------------------------------------------------- 08c0 08ca | | .CONST 0x08ca ; Address of begin 08c1 0004 | | .CONST 0x0004 ; Address of exception handler 08c2 0002 | | .CONST 0x0002 ; Number of locals 08c3 INIT_08c0: 08c3 4801 |H | Short_Literal 0x1 08c4 00db | | Load_Top At_Offset_3 08c5 e5fe | | Load 0x2,-0x2 08c6 e01d | | Load 0x0,0x1d 08c7 181d | | Execute Package,Field_Execute,Field_Number 0x1d 08c8 00e2 | | Load_Encached Integer_Cache 08c9 03f1 | | Declare_Variable Discrete,With_Value 08ca BODY_08c0: 08ca 00d8 | | Load_Top At_Offset_0 08cb 0c01 | | Execute_Immediate Greater_Equal,0x1 08cc 681f |h | Jump_Zero 0x8ec 08cd 00db | | Load_Top At_Offset_3 08ce 01dd | | Execute Vector,First 08cf 00d9 | | Load_Top At_Offset_1 08d0 0aff | | Execute_Immediate Plus,-0x1 08d1 00d8 | | Load_Top At_Offset_0 08d2 00e2 | | Load_Encached Integer_Cache 08d3 0260 | ` | Execute Discrete,In_Type 08d4 7001 |p | Jump_Nonzero 0x8d6 08d5 0801 | | Execute_Immediate Raise,0x1 08d6 e5ff | | Load 0x2,-0x1 08d7 01cf | | Execute Vector,Slice_Read 08d8 e5fd | | Load 0x2,-0x3 08d9 01cc | | Execute Vector,Catenate 08da e5fd | | Load 0x2,-0x3 08db e5fe | | Load 0x2,-0x2 08dc 00db | | Load_Top At_Offset_3 08dd e5fe | | Load 0x2,-0x2 08de 01db | | Execute Vector,Length 08df 0273 | s | Execute Discrete,Plus 08e0 00d8 | | Load_Top At_Offset_0 08e1 00e2 | | Load_Encached Integer_Cache 08e2 0260 | ` | Execute Discrete,In_Type 08e3 7001 |p | Jump_Nonzero 0x8e5 08e4 0801 | | Execute_Immediate Raise,0x1 08e5 e5ff | | Load 0x2,-0x1 08e6 01dc | | Execute Vector,Last 08e7 e5ff | | Load 0x2,-0x1 08e8 01cf | | Execute Vector,Slice_Read 08e9 8237 | 7 | Call 0x1,0x37 08ea 01cc | | Execute Vector,Catenate 08eb 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 08ec 00db | | Load_Top At_Offset_3 08ed 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 08ee 0000 0000 | | .XXX[0x2] 08f0 ; -------------------------------------------------------------------------------------- 08f0 ; SUBPROGRAM 08f0 ; -------------------------------------------------------------------------------------- 08f0 08fa | | .CONST 0x08fa ; Address of begin 08f1 0004 | | .CONST 0x0004 ; Address of exception handler 08f2 0002 | | .CONST 0x0002 ; Number of locals 08f3 INIT_08f0: 08f3 4801 |H | Short_Literal 0x1 08f4 00db | | Load_Top At_Offset_3 08f5 482e |H. | Short_Literal 0x2e 08f6 e01d | | Load 0x0,0x1d 08f7 1820 | | Execute Package,Field_Execute,Field_Number 0x20 08f8 00e2 | | Load_Encached Integer_Cache 08f9 03f1 | | Declare_Variable Discrete,With_Value 08fa BODY_08f0: 08fa 00d8 | | Load_Top At_Offset_0 08fb 0c01 | | Execute_Immediate Greater_Equal,0x1 08fc 681e |h | Jump_Zero 0x91b 08fd 00d8 | | Load_Top At_Offset_0 08fe 0a01 | | Execute_Immediate Plus,0x1 08ff 00d8 | | Load_Top At_Offset_0 0900 00e2 | | Load_Encached Integer_Cache 0901 0260 | ` | Execute Discrete,In_Type 0902 7001 |p | Jump_Nonzero 0x904 0903 0801 | | Execute_Immediate Raise,0x1 0904 e5ff | | Load 0x2,-0x1 0905 01dc | | Execute Vector,Last 0906 e5ff | | Load 0x2,-0x1 0907 01cf | | Execute Vector,Slice_Read 0908 e5fe | | Load 0x2,-0x2 0909 01cc | | Execute Vector,Catenate 090a e5fe | | Load 0x2,-0x2 090b 0092 1022 | "| Action Push_String_Extended,0x1022 ; "." 090d e5ff | | Load 0x2,-0x1 090e 01dd | | Execute Vector,First 090f e402 | | Load 0x2,0x2 0910 0aff | | Execute_Immediate Plus,-0x1 0911 00d8 | | Load_Top At_Offset_0 0912 00e2 | | Load_Encached Integer_Cache 0913 0260 | ` | Execute Discrete,In_Type 0914 7001 |p | Jump_Nonzero 0x916 0915 0801 | | Execute_Immediate Raise,0x1 0916 e5ff | | Load 0x2,-0x1 0917 01cf | | Execute Vector,Slice_Read 0918 8237 | 7 | Call 0x1,0x37 0919 01cc | | Execute Vector,Catenate 091a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 091b 00db | | Load_Top At_Offset_3 091c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 091d 0000 0000 | | .XXX[0x3] 091f 0000 | | 0920 ; -------------------------------------------------------------------------------------- 0920 ; SUBPROGRAM 0920 ; -------------------------------------------------------------------------------------- 0920 092a | * | .CONST 0x092a ; Address of begin 0921 0004 | | .CONST 0x0004 ; Address of exception handler 0922 0002 | | .CONST 0x0002 ; Number of locals 0923 INIT_0920: 0923 4801 |H | Short_Literal 0x1 0924 00db | | Load_Top At_Offset_3 0925 e5fe | | Load 0x2,-0x2 0926 e01d | | Load 0x0,0x1d 0927 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0928 00e2 | | Load_Encached Integer_Cache 0929 03f1 | | Declare_Variable Discrete,With_Value 092a BODY_0920: 092a 00d8 | | Load_Top At_Offset_0 092b 0c01 | | Execute_Immediate Greater_Equal,0x1 092c 6820 |h | Jump_Zero 0x94d 092d 482e |H. | Short_Literal 0x2e 092e 0092 1022 | "| Action Push_String_Extended,0x1022 ; "." 0930 e5fe | | Load 0x2,-0x2 0931 00db | | Load_Top At_Offset_3 0932 e5fe | | Load 0x2,-0x2 0933 01db | | Execute Vector,Length 0934 0273 | s | Execute Discrete,Plus 0935 00d8 | | Load_Top At_Offset_0 0936 00e2 | | Load_Encached Integer_Cache 0937 0260 | ` | Execute Discrete,In_Type 0938 7001 |p | Jump_Nonzero 0x93a 0939 0801 | | Execute_Immediate Raise,0x1 093a e5ff | | Load 0x2,-0x1 093b 01dc | | Execute Vector,Last 093c e5ff | | Load 0x2,-0x1 093d 01cf | | Execute Vector,Slice_Read 093e 8237 | 7 | Call 0x1,0x37 093f 01cb | | Execute Vector,Append 0940 e5ff | | Load 0x2,-0x1 0941 01dd | | Execute Vector,First 0942 00da | | Load_Top At_Offset_2 0943 0aff | | Execute_Immediate Plus,-0x1 0944 00d8 | | Load_Top At_Offset_0 0945 00e2 | | Load_Encached Integer_Cache 0946 0260 | ` | Execute Discrete,In_Type 0947 7001 |p | Jump_Nonzero 0x949 0948 0801 | | Execute_Immediate Raise,0x1 0949 e5ff | | Load 0x2,-0x1 094a 01cf | | Execute Vector,Slice_Read 094b 01cc | | Execute Vector,Catenate 094c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 094d 00db | | Load_Top At_Offset_3 094e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 094f 0000 | | .XXX[0x1] 0950 ; -------------------------------------------------------------------------------------- 0950 ; SUBPROGRAM 0950 ; -------------------------------------------------------------------------------------- 0950 095a | Z | .CONST 0x095a ; Address of begin 0951 0004 | | .CONST 0x0004 ; Address of exception handler 0952 0002 | | .CONST 0x0002 ; Number of locals 0953 INIT_0950: 0953 4801 |H | Short_Literal 0x1 0954 00db | | Load_Top At_Offset_3 0955 482e |H. | Short_Literal 0x2e 0956 e01d | | Load 0x0,0x1d 0957 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0958 00e2 | | Load_Encached Integer_Cache 0959 03f1 | | Declare_Variable Discrete,With_Value 095a BODY_0950: 095a 00db | | Load_Top At_Offset_3 095b 01dd | | Execute Vector,First 095c e5ff | | Load 0x2,-0x1 095d 01d7 | | Execute Vector,Field_Read 095e 0f3a | : | Execute_Immediate Equal,0x3a 095f 6810 |h | Jump_Zero 0x970 0960 00d8 | | Load_Top At_Offset_0 0961 0c01 | | Execute_Immediate Greater_Equal,0x1 0962 680b |h | Jump_Zero 0x96e 0963 4801 |H | Short_Literal 0x1 0964 0092 1023 | #| Action Push_String_Extended,0x1023 ; ".XFER" 0966 00da | | Load_Top At_Offset_2 0967 e5ff | | Load 0x2,-0x1 0968 01dc | | Execute Vector,Last 0969 e5ff | | Load 0x2,-0x1 096a 01cf | | Execute Vector,Slice_Read 096b e01d | | Load 0x0,0x1d 096c 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 096d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 096e 4800 |H | Short_Literal 0x0 096f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0970 00d8 | | Load_Top At_Offset_0 0971 7004 |p | Jump_Nonzero 0x976 0972 00db | | Load_Top At_Offset_3 0973 01dd | | Execute Vector,First 0974 0aff | | Execute_Immediate Plus,-0x1 0975 0059 | Y | Store_Top Discrete,At_Offset_1 0976 00d8 | | Load_Top At_Offset_0 0977 0a05 | | Execute_Immediate Plus,0x5 0978 e5ff | | Load 0x2,-0x1 0979 01dc | | Execute Vector,Last 097a 027c | | | Execute Discrete,Less 097b 6816 |h | Jump_Zero 0x992 097c 4801 |H | Short_Literal 0x1 097d 0092 1024 | $| Action Push_String_Extended,0x1024 ; "XFER_" 097f 00da | | Load_Top At_Offset_2 0980 0a01 | | Execute_Immediate Plus,0x1 0981 00d8 | | Load_Top At_Offset_0 0982 00e2 | | Load_Encached Integer_Cache 0983 0260 | ` | Execute Discrete,In_Type 0984 7001 |p | Jump_Nonzero 0x986 0985 0801 | | Execute_Immediate Raise,0x1 0986 00db | | Load_Top At_Offset_3 0987 0a05 | | Execute_Immediate Plus,0x5 0988 00d8 | | Load_Top At_Offset_0 0989 00e2 | | Load_Encached Integer_Cache 098a 0260 | ` | Execute Discrete,In_Type 098b 7001 |p | Jump_Nonzero 0x98d 098c 0801 | | Execute_Immediate Raise,0x1 098d e5ff | | Load 0x2,-0x1 098e 01cf | | Execute Vector,Slice_Read 098f e01d | | Load 0x0,0x1d 0990 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0991 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0992 4800 |H | Short_Literal 0x0 0993 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0994 0000 0000 | | .BLANK 0000[0x4] 0998 ; -------------------------------------------------------------------------------------- 0998 ; SUBPROGRAM 0998 ; -------------------------------------------------------------------------------------- 0998 09b1 | | .CONST 0x09b1 ; Address of begin 0999 0004 | | .CONST 0x0004 ; Address of exception handler 099a 0005 | | .CONST 0x0005 ; Number of locals 099b INIT_0998: 099b e403 | | Load 0x2,0x3 099c e015 | | Load 0x0,0x15 099d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 099e 8231 | 1 | Call 0x1,0x31 099f 00d8 | | Load_Top At_Offset_0 09a0 01dd | | Execute Vector,First 09a1 00e2 | | Load_Encached Integer_Cache 09a2 03f1 | | Declare_Variable Discrete,With_Value 09a3 4801 |H | Short_Literal 0x1 09a4 00da | | Load_Top At_Offset_2 09a5 483a |H: | Short_Literal 0x3a 09a6 e01d | | Load 0x0,0x1d 09a7 181e | | Execute Package,Field_Execute,Field_Number 0x1e 09a8 00e2 | | Load_Encached Integer_Cache 09a9 03f1 | | Declare_Variable Discrete,With_Value 09aa 4801 |H | Short_Literal 0x1 09ab 00db | | Load_Top At_Offset_3 09ac 482f |H/ | Short_Literal 0x2f 09ad e01d | | Load 0x0,0x1d 09ae 181e | | Execute Package,Field_Execute,Field_Number 0x1e 09af 00e2 | | Load_Encached Integer_Cache 09b0 03f1 | | Declare_Variable Discrete,With_Value 09b1 BODY_0998: 09b1 00db | | Load_Top At_Offset_3 09b2 0092 1025 | %| Action Push_String_Extended,0x1025 ; "//" 09b4 01df | | Execute Vector,Equal 09b5 6807 |h | Jump_Zero 0x9bd 09b6 e402 | | Load 0x2,0x2 09b7 800b | | Call 0x0,0xb 09b8 6803 |h | Jump_Zero 0x9bc 09b9 4802 |H | Short_Literal 0x2 09ba e402 | | Load 0x2,0x2 09bb 803b | ; | Call 0x0,0x3b 09bc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09bd 00db | | Load_Top At_Offset_3 09be 01db | | Execute Vector,Length 09bf 6831 |h1 | Jump_Zero 0x9f1 09c0 00da | | Load_Top At_Offset_2 09c1 e602 | | Load 0x3,0x2 09c2 01d7 | | Execute Vector,Field_Read 09c3 0f2a | * | Execute_Immediate Equal,0x2a 09c4 a404 | | Store_Unchecked 0x2,0x4 09c5 e404 | | Load 0x2,0x4 09c6 6803 |h | Jump_Zero 0x9ca 09c7 00da | | Load_Top At_Offset_2 09c8 0a01 | | Execute_Immediate Plus,0x1 09c9 005b | [ | Store_Top Discrete,At_Offset_3 09ca 00d8 | | Load_Top At_Offset_0 09cb 7004 |p | Jump_Nonzero 0x9d0 09cc 00db | | Load_Top At_Offset_3 09cd 01dc | | Execute Vector,Last 09ce 0a01 | | Execute_Immediate Plus,0x1 09cf 0059 | Y | Store_Top Discrete,At_Offset_1 09d0 e402 | | Load 0x2,0x2 09d1 e5fc | | Load 0x2,-0x4 09d2 e5fd | | Load 0x2,-0x3 09d3 e404 | | Load 0x2,0x4 09d4 4820 |H | Short_Literal 0x20 09d5 e605 | | Load 0x3,0x5 09d6 0a01 | | Execute_Immediate Plus,0x1 09d7 00d8 | | Load_Top At_Offset_0 09d8 00e2 | | Load_Encached Integer_Cache 09d9 0260 | ` | Execute Discrete,In_Type 09da 7001 |p | Jump_Nonzero 0x9dc 09db 0801 | | Execute_Immediate Raise,0x1 09dc e602 | | Load 0x3,0x2 09dd 01dc | | Execute Vector,Last 09de e602 | | Load 0x3,0x2 09df 01cf | | Execute Vector,Slice_Read 09e0 e01d | | Load 0x0,0x1d 09e1 181c | | Execute Package,Field_Execute,Field_Number 0x1c 09e2 e01d | | Load 0x0,0x1d 09e3 1814 | | Execute Package,Field_Execute,Field_Number 0x14 09e4 e5fe | | Load 0x2,-0x2 09e5 e603 | | Load 0x3,0x3 09e6 e605 | | Load 0x3,0x5 09e7 0aff | | Execute_Immediate Plus,-0x1 09e8 00d8 | | Load_Top At_Offset_0 09e9 00e2 | | Load_Encached Integer_Cache 09ea 0260 | ` | Execute Discrete,In_Type 09eb 7001 |p | Jump_Nonzero 0x9ed 09ec 0801 | | Execute_Immediate Raise,0x1 09ed e602 | | Load 0x3,0x2 09ee 01cf | | Execute Vector,Slice_Read 09ef 8230 | 0 | Call 0x1,0x30 09f0 c402 | | Store 0x2,0x2 09f1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09f2 0000 0000 | | .BLANK 0000[0x6] 09f8 ; -------------------------------------------------------------------------------------- 09f8 ; SUBPROGRAM 09f8 ; -------------------------------------------------------------------------------------- 09f8 09fb | | .CONST 0x09fb ; Address of begin 09f9 0004 | | .CONST 0x0004 ; Address of exception handler 09fa 0001 | | .CONST 0x0001 ; Number of locals 09fb BODY_09f8: 09fb INIT_09f8: 09fb 00db | | Load_Top At_Offset_3 09fc 00db | | Load_Top At_Offset_3 09fd 822b | + | Call 0x1,0x2b 09fe 00d1 | | Pop_Control Pop_Count_1 09ff 00cf | | Action Mark_Auxiliary 0a00 7805 |x | Jump 0xa06 0a01 00db | | Load_Top At_Offset_3 0a02 803c | < | Call 0x0,0x3c 0a03 e015 | | Load 0x0,0x15 0a04 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0a05 00c9 | | Action Pop_Auxiliary_Loop 0a06 00db | | Load_Top At_Offset_3 0a07 803d | = | Call 0x0,0x3d 0a08 6ff8 |o | Jump_Zero 0xa01 0a09 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0a0a 0000 0000 | | .BLANK 0000[0x6] 0a10 ; -------------------------------------------------------------------------------------- 0a10 ; SUBPROGRAM 0a10 ; -------------------------------------------------------------------------------------- 0a10 0a13 | | .CONST 0x0a13 ; Address of begin 0a11 0004 | | .CONST 0x0004 ; Address of exception handler 0a12 0001 | | .CONST 0x0001 ; Number of locals 0a13 BODY_0a10: 0a13 INIT_0a10: 0a13 0092 1026 | &| Action Push_String_Extended,0x1026 ; "Version" 0a15 00db | | Load_Top At_Offset_3 0a16 00e0 | | Load_Encached Standard_Cache 0a17 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0a18 01cc | | Execute Vector,Catenate 0a19 e015 | | Load 0x0,0x15 0a1a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0a1b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0a1c 0000 0000 | | .BLANK 0000[0x4] 0a20 ; -------------------------------------------------------------------------------------- 0a20 ; SUBPROGRAM 0a20 ; -------------------------------------------------------------------------------------- 0a20 0a23 | # | .CONST 0x0a23 ; Address of begin 0a21 0004 | | .CONST 0x0004 ; Address of exception handler 0a22 0001 | | .CONST 0x0001 ; Number of locals 0a23 BODY_0a20: 0a23 INIT_0a20: 0a23 0092 1027 | '| Action Push_String_Extended,0x1027 ; "Allow operator to enter CLI immediately : " 0a25 00db | | Load_Top At_Offset_3 0a26 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0a27 803e | > | Call 0x0,0x3e 0a28 01cc | | Execute Vector,Catenate 0a29 e015 | | Load 0x0,0x15 0a2a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0a2b 0092 1028 | (| Action Push_String_Extended,0x1028 ; "Allow editing of configuration : " 0a2d 00db | | Load_Top At_Offset_3 0a2e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0a2f 803e | > | Call 0x0,0x3e 0a30 01cc | | Execute Vector,Catenate 0a31 e015 | | Load 0x0,0x15 0a32 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0a33 0092 1029 | )| Action Push_String_Extended,0x1029 ; "Allow operator to enter CLI prior to starting cluster: " 0a35 00db | | Load_Top At_Offset_3 0a36 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0a37 803e | > | Call 0x0,0x3e 0a38 01cc | | Execute Vector,Catenate 0a39 e015 | | Load 0x0,0x15 0a3a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0a3b 0092 102a | *| Action Push_String_Extended,0x102a ; "Load Kernel Layer subsystems only : " 0a3d 00db | | Load_Top At_Offset_3 0a3e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0a3f 803e | > | Call 0x0,0x3e 0a40 01cc | | Execute Vector,Catenate 0a41 e015 | | Load 0x0,0x15 0a42 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0a43 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0a44 0000 0000 | | .BLANK 0000[0x4] 0a48 ; -------------------------------------------------------------------------------------- 0a48 ; SUBPROGRAM 0a48 ; -------------------------------------------------------------------------------------- 0a48 0a60 | ` | .CONST 0x0a60 ; Address of begin 0a49 0004 | | .CONST 0x0004 ; Address of exception handler 0a4a 0002 | | .CONST 0x0002 ; Number of locals 0a4b INIT_0a48: 0a4b 483a |H: | Short_Literal 0x3a 0a4c 00db | | Load_Top At_Offset_3 0a4d e7ff | | Load 0x3,-0x1 0a4e 01db | | Execute Vector,Length 0a4f 4814 |H | Short_Literal 0x14 0a50 00e9 | | Load_Encached String_Cache 0a51 035b | [ | Declare_Type Array,Constrained 0a52 0337 | 7 | Declare_Variable Array 0a53 4814 |H | Short_Literal 0x14 0a54 00d9 | | Load_Top At_Offset_1 0a55 01dd | | Execute Vector,First 0a56 0263 | c | Execute Discrete,Above_Bound 0a57 7005 |p | Jump_Nonzero 0xa5d 0a58 4820 |H | Short_Literal 0x20 0a59 00d9 | | Load_Top At_Offset_1 0a5a e604 | | Load 0x3,0x4 0a5b 01d6 | | Execute Vector,Field_Write 0a5c 3ffb |? | Loop_Increasing 0xa58 0a5d 01cc | | Execute Vector,Catenate 0a5e 01cb | | Execute Vector,Append 0a5f 0007 | | Action Break_Optional 0a60 BODY_0a48: 0a60 e7fe | | Load 0x3,-0x2 0a61 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0a62 0f01 | | Execute_Immediate Equal,0x1 0a63 6807 |h | Jump_Zero 0xa6b 0a64 00d8 | | Load_Top At_Offset_0 0a65 0092 102b | +| Action Push_String_Extended,0x102b ; "<FROM STANDARD>" 0a67 01cc | | Execute Vector,Catenate 0a68 e015 | | Load 0x0,0x15 0a69 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0a6a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a6b e7fe | | Load 0x3,-0x2 0a6c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0a6d 0f01 | | Execute_Immediate Equal,0x1 0a6e 680c |h | Jump_Zero 0xa7b 0a6f 485d |H] | Short_Literal 0x5d 0a70 485b |H[ | Short_Literal 0x5b 0a71 00da | | Load_Top At_Offset_2 0a72 01cb | | Execute Vector,Append 0a73 e7fe | | Load 0x3,-0x2 0a74 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0a75 803f | ? | Call 0x0,0x3f 0a76 01cc | | Execute Vector,Catenate 0a77 01cb | | Execute Vector,Append 0a78 e015 | | Load 0x0,0x15 0a79 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0a7a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a7b 00d8 | | Load_Top At_Offset_0 0a7c e7fe | | Load 0x3,-0x2 0a7d 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0a7e 803f | ? | Call 0x0,0x3f 0a7f 01cc | | Execute Vector,Catenate 0a80 e015 | | Load 0x0,0x15 0a81 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0a82 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a83 0000 0000 | | .BLANK 0000[0x5] 0a88 ; -------------------------------------------------------------------------------------- 0a88 ; SUBPROGRAM 0a88 ; -------------------------------------------------------------------------------------- 0a88 0a8b | | .CONST 0x0a8b ; Address of begin 0a89 0004 | | .CONST 0x0004 ; Address of exception handler 0a8a 0001 | | .CONST 0x0001 ; Number of locals 0a8b BODY_0a88: 0a8b INIT_0a88: 0a8b 0092 102c | ,| Action Push_String_Extended,0x102c ; "Test" 0a8d 00db | | Load_Top At_Offset_3 0a8e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0a8f 803e | > | Call 0x0,0x3e 0a90 01cc | | Execute Vector,Catenate 0a91 e015 | | Load 0x0,0x15 0a92 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0a93 00da | | Load_Top At_Offset_2 0a94 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0a95 0092 102d | -| Action Push_String_Extended,0x102d ; "Test Microcode" 0a97 8404 | | Call 0x2,0x4 0a98 0092 102e | .| Action Push_String_Extended,0x102e ; "Passes: " 0a9a 00db | | Load_Top At_Offset_3 0a9b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0a9c 00e0 | | Load_Encached Standard_Cache 0a9d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0a9e 01cc | | Execute Vector,Catenate 0a9f e015 | | Load 0x0,0x15 0aa0 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0aa1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0aa2 0000 0000 | | .BLANK 0000[0x6] 0aa8 ; -------------------------------------------------------------------------------------- 0aa8 ; SUBPROGRAM 0aa8 ; -------------------------------------------------------------------------------------- 0aa8 0aab | | .CONST 0x0aab ; Address of begin 0aa9 0004 | | .CONST 0x0004 ; Address of exception handler 0aaa 0001 | | .CONST 0x0001 ; Number of locals 0aab BODY_0aa8: 0aab INIT_0aa8: 0aab 0092 102f | /| Action Push_String_Extended,0x102f ; "Autoboot Kernel Debugger : " 0aad 00db | | Load_Top At_Offset_3 0aae 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0aaf 803e | > | Call 0x0,0x3e 0ab0 01cc | | Execute Vector,Catenate 0ab1 e015 | | Load 0x0,0x15 0ab2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0ab3 0092 1030 | 0| Action Push_String_Extended,0x1030 ; "Enable remote Kernel Debugging : " 0ab5 00db | | Load_Top At_Offset_3 0ab6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0ab7 803e | > | Call 0x0,0x3e 0ab8 01cc | | Execute Vector,Catenate 0ab9 e015 | | Load 0x0,0x15 0aba 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0abb 0092 1031 | 1| Action Push_String_Extended,0x1031 ; "Require operator for Kernel Debugging : " 0abd 00db | | Load_Top At_Offset_3 0abe 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0abf 803e | > | Call 0x0,0x3e 0ac0 01cc | | Execute Vector,Catenate 0ac1 e015 | | Load 0x0,0x15 0ac2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0ac3 0092 1032 | 2| Action Push_String_Extended,0x1032 ; "Enable remote Environment Debugging : " 0ac5 00db | | Load_Top At_Offset_3 0ac6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0ac7 803e | > | Call 0x0,0x3e 0ac8 01cc | | Execute Vector,Catenate 0ac9 e015 | | Load 0x0,0x15 0aca 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0acb 0092 1033 | 3| Action Push_String_Extended,0x1033 ; "Require operator for Environment Debugging: " 0acd 00db | | Load_Top At_Offset_3 0ace 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0acf 803e | > | Call 0x0,0x3e 0ad0 01cc | | Execute Vector,Catenate 0ad1 e015 | | Load 0x0,0x15 0ad2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0ad3 0092 1034 | 4| Action Push_String_Extended,0x1034 ; "Autoboot EEDB : " 0ad5 00db | | Load_Top At_Offset_3 0ad6 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0ad7 803e | > | Call 0x0,0x3e 0ad8 01cc | | Execute Vector,Catenate 0ad9 e015 | | Load 0x0,0x15 0ada 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0adb 0092 1035 | 5| Action Push_String_Extended,0x1035 ; "Autoboot Kernel : " 0add 00db | | Load_Top At_Offset_3 0ade 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0adf 803e | > | Call 0x0,0x3e 0ae0 01cc | | Execute Vector,Catenate 0ae1 e015 | | Load 0x0,0x15 0ae2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0ae3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0ae4 0000 0000 | | .BLANK 0000[0x4] 0ae8 ; -------------------------------------------------------------------------------------- 0ae8 ; SUBPROGRAM 0ae8 ; -------------------------------------------------------------------------------------- 0ae8 0aeb | | .CONST 0x0aeb ; Address of begin 0ae9 0004 | | .CONST 0x0004 ; Address of exception handler 0aea 0001 | | .CONST 0x0001 ; Number of locals 0aeb BODY_0ae8: 0aeb INIT_0ae8: 0aeb 00cf | | Action Mark_Auxiliary 0aec e040 | @ | Load 0x0,0x40 0aed 0265 | e | Execute Discrete,Reverse_Bounds 0aee 0007 | | Action Break_Optional 0aef 00d8 | | Load_Top At_Offset_0 0af0 e7ff | | Load 0x3,-0x1 0af1 01d5 | | Execute Vector,Field_Reference 0af2 00d9 | | Load_Top At_Offset_1 0af3 e040 | @ | Load 0x0,0x40 0af4 011c | | Execute Any,Convert_Unchecked 0af5 1c01 | | Execute_Immediate Run_Utility,0x1 0af6 8404 | | Call 0x2,0x4 0af7 00c8 | | Action Pop_Auxiliary_Range 0af8 3ff6 |? | Loop_Increasing 0xaef 0af9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0afa 0000 0000 | | .BLANK 0000[0x6] 0b00 ; -------------------------------------------------------------------------------------- 0b00 ; SUBPROGRAM 0b00 ; -------------------------------------------------------------------------------------- 0b00 0b08 | | .CONST 0x0b08 ; Address of begin 0b01 0004 | | .CONST 0x0004 ; Address of exception handler 0b02 0004 | | .CONST 0x0004 ; Number of locals 0b03 INIT_0b00: 0b03 e041 | A | Load 0x0,0x41 0b04 0322 | " | Declare_Variable Record 0b05 00e2 | | Load_Encached Integer_Cache 0b06 e042 | B | Load 0x0,0x42 0b07 0337 | 7 | Declare_Variable Array 0b08 BODY_0b00: 0b08 e7fe | | Load 0x3,-0x2 0b09 e7ff | | Load 0x3,-0x1 0b0a 822b | + | Call 0x1,0x2b 0b0b 00d1 | | Pop_Control Pop_Count_1 0b0c e7fe | | Load 0x3,-0x2 0b0d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0b0e 00d9 | | Load_Top At_Offset_1 0b0f 01db | | Execute Vector,Length 0b10 027b | { | Execute Discrete,Greater_Equal 0b11 681e |h | Jump_Zero 0xb30 0b12 00e3 | | Load_Encached Natural_Cache 0b13 00d9 | | Load_Top At_Offset_1 0b14 e7ff | | Load 0x3,-0x1 0b15 8043 | C | Call 0x0,0x43 0b16 00d1 | | Pop_Control Pop_Count_1 0b17 005a | Z | Store_Top Discrete,At_Offset_2 0b18 00d8 | | Load_Top At_Offset_0 0b19 8044 | D | Call 0x0,0x44 0b1a 00db | | Load_Top At_Offset_3 0b1b 017d | } | Execute Record,Structure_Write 0b1c 00da | | Load_Top At_Offset_2 0b1d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b1e 8402 | | Call 0x2,0x2 0b1f 00da | | Load_Top At_Offset_2 0b20 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0b21 8403 | | Call 0x2,0x3 0b22 00da | | Load_Top At_Offset_2 0b23 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0b24 8405 | | Call 0x2,0x5 0b25 00da | | Load_Top At_Offset_2 0b26 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0b27 8406 | | Call 0x2,0x6 0b28 00da | | Load_Top At_Offset_2 0b29 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0b2a 0092 1036 | 6| Action Push_String_Extended,0x1036 ; "Microcode" 0b2c 8404 | | Call 0x2,0x4 0b2d 00da | | Load_Top At_Offset_2 0b2e 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0b2f 8407 | | Call 0x2,0x7 0b30 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0b31 0000 0000 | | .BLANK 0000[0x7] 0b38 ; -------------------------------------------------------------------------------------- 0b38 ; SUBPROGRAM 0b38 ; -------------------------------------------------------------------------------------- 0b38 0b3b | ; | .CONST 0x0b3b ; Address of begin 0b39 0004 | | .CONST 0x0004 ; Address of exception handler 0b3a 0001 | | .CONST 0x0001 ; Number of locals 0b3b BODY_0b38: 0b3b INIT_0b38: 0b3b 00da | | Load_Top At_Offset_2 0b3c 802b | + | Call 0x0,0x2b 0b3d 6804 |h | Jump_Zero 0xb42 0b3e 00db | | Load_Top At_Offset_3 0b3f 00db | | Load_Top At_Offset_3 0b40 822b | + | Call 0x1,0x2b 0b41 00d1 | | Pop_Control Pop_Count_1 0b42 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0b43 0000 0000 | | .BLANK 0000[0x5] 0b48 ; -------------------------------------------------------------------------------------- 0b48 ; SUBPROGRAM 0b48 ; -------------------------------------------------------------------------------------- 0b48 0b64 | d | .CONST 0x0b64 ; Address of begin 0b49 0004 | | .CONST 0x0004 ; Address of exception handler 0b4a 000a | | .CONST 0x000a ; Number of locals 0b4b INIT_0b48: 0b4b 00e2 | | Load_Encached Integer_Cache 0b4c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0b4d e7fe | | Load 0x3,-0x2 0b4e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0b4f 00e2 | | Load_Encached Integer_Cache 0b50 03f1 | | Declare_Variable Discrete,With_Value 0b51 00e2 | | Load_Encached Integer_Cache 0b52 4801 |H | Short_Literal 0x1 0b53 4810 |H | Short_Literal 0x10 0b54 e045 | E | Load 0x0,0x45 0b55 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0b56 035b | [ | Declare_Type Array,Constrained 0b57 0337 | 7 | Declare_Variable Array 0b58 029f 0f8b | | Declare_Subprogram INIT_0f88,For_Call 0b5a e046 | F | Load 0x0,0x46 0b5b 190f | | Execute Package,Field_Reference,Field_Number 0xf 0b5c 00c6 | | Action Check_Subprogram_Elaborated 0b5d 4806 |H | Short_Literal 0x6 0b5e 4803 |H | Short_Literal 0x3 0b5f 0099 | | Action Reference_Dynamic 0b60 e047 | G | Load 0x0,0x47 0b61 e048 | H | Load 0x0,0x48 0b62 480a |H | Short_Literal 0xa 0b63 0007 | | Action Break_Optional 0b64 BODY_0b48: 0b64 e603 | | Load 0x3,0x3 0b65 e5fe | | Load 0x2,-0x2 0b66 027d | } | Execute Discrete,Greater 0b67 6802 |h | Jump_Zero 0xb6a 0b68 e5fe | | Load 0x2,-0x2 0b69 a603 | | Store_Unchecked 0x3,0x3 0b6a 00cf | | Action Mark_Auxiliary 0b6b 781a |x | Jump 0xb86 0b6c 00e3 | | Load_Encached Natural_Cache 0b6d e605 | | Load 0x3,0x5 0b6e e7ff | | Load 0x3,-0x1 0b6f 8043 | C | Call 0x0,0x43 0b70 00d1 | | Pop_Control Pop_Count_1 0b71 c604 | | Store 0x3,0x4 0b72 4801 |H | Short_Literal 0x1 0b73 4801 |H | Short_Literal 0x1 0b74 4810 |H | Short_Literal 0x10 0b75 4801 |H | Short_Literal 0x1 0b76 e604 | | Load 0x3,0x4 0b77 e605 | | Load 0x3,0x5 0b78 01cf | | Execute Vector,Slice_Read 0b79 4807 |H | Short_Literal 0x7 0b7a 4803 |H | Short_Literal 0x3 0b7b 0099 | | Action Reference_Dynamic 0b7c 4808 |H | Short_Literal 0x8 0b7d 4803 |H | Short_Literal 0x3 0b7e 0099 | | Action Reference_Dynamic 0b7f e046 | F | Load 0x0,0x46 0b80 180f | | Execute Package,Field_Execute,Field_Number 0xf 0b81 e602 | | Load 0x3,0x2 0b82 e604 | | Load 0x3,0x4 0b83 0273 | s | Execute Discrete,Plus 0b84 c602 | | Store 0x3,0x2 0b85 00c9 | | Action Pop_Auxiliary_Loop 0b86 e602 | | Load 0x3,0x2 0b87 e603 | | Load 0x3,0x3 0b88 027c | | | Execute Discrete,Less 0b89 77e2 |w | Jump_Nonzero 0xb6c 0b8a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0b8b 0000 0000 | | .BLANK 0000[0x5] 0b90 ; -------------------------------------------------------------------------------------- 0b90 ; SUBPROGRAM 0b90 ; -------------------------------------------------------------------------------------- 0b90 0b93 | | .CONST 0x0b93 ; Address of begin 0b91 0004 | | .CONST 0x0004 ; Address of exception handler 0b92 0001 | | .CONST 0x0001 ; Number of locals 0b93 BODY_0b90: 0b93 INIT_0b90: 0b93 4607 |F | Jump_Case 0x8 0b94 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0b95 7807 |x | Jump 0xb9d ; case 0x1 0b96 780a |x | Jump 0xba1 ; case 0x2 0b97 780e |x | Jump 0xba6 ; case 0x3 0b98 7811 |x | Jump 0xbaa ; case 0x4 0b99 7812 |x | Jump 0xbac ; case 0x5 0b9a 7813 |x | Jump 0xbae ; case 0x6 0b9b 7816 |x | Jump 0xbb2 ; case 0x7 0b9c 4302 |C | .XXX[0x1] 0b9d 00da | | Load_Top At_Offset_2 0b9e 0091 1000 | | Action Push_String_Extended_Indexed,0x1000 ; "INDEX" 0ba0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0ba1 00db | | Load_Top At_Offset_3 0ba2 00db | | Load_Top At_Offset_3 0ba3 00e0 | | Load_Encached Standard_Cache 0ba4 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0ba5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0ba6 00da | | Load_Top At_Offset_2 0ba7 00e0 | | Load_Encached Standard_Cache 0ba8 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0ba9 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0baa 00db | | Load_Top At_Offset_3 0bab 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0bac 00db | | Load_Top At_Offset_3 0bad 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0bae e402 | | Load 0x2,0x2 0baf 00dc | | Load_Top At_Offset_4 0bb0 0267 | g | Execute Discrete,Predecessor 0bb1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0bb2 e402 | | Load 0x2,0x2 0bb3 00dc | | Load_Top At_Offset_4 0bb4 0268 | h | Execute Discrete,Successor 0bb5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0bb6 0000 0000 | | .XXX[0x2] 0bb8 ; -------------------------------------------------------------------------------------- 0bb8 ; SUBPROGRAM 0bb8 ; -------------------------------------------------------------------------------------- 0bb8 0bbb | | .CONST 0x0bbb ; Address of begin 0bb9 0004 | | .CONST 0x0004 ; Address of exception handler 0bba 0001 | | .CONST 0x0001 ; Number of locals 0bbb BODY_0bb8: 0bbb INIT_0bb8: 0bbb 4601 |F | Jump_Case 0x2 0bbc 7801 |x | Jump 0xbbe ; case 0x0 0bbd 7804 |x | Jump 0xbc2 ; case 0x1 0bbe 00da | | Load_Top At_Offset_2 0bbf 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0bc0 1c00 | | Execute_Immediate Run_Utility,0x0 0bc1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0bc2 00da | | Load_Top At_Offset_2 0bc3 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0bc4 1c01 | | Execute_Immediate Run_Utility,0x1 0bc5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0bc6 0000 0000 | | .XXX[0x2] 0bc8 ; -------------------------------------------------------------------------------------- 0bc8 ; SUBPROGRAM 0bc8 ; -------------------------------------------------------------------------------------- 0bc8 0bd8 | | .CONST 0x0bd8 ; Address of begin 0bc9 0004 | | .CONST 0x0004 ; Address of exception handler 0bca 0003 | | .CONST 0x0003 ; Number of locals 0bcb INIT_0bc8: 0bcb 00da | | Load_Top At_Offset_2 0bcc 0227 | ' | Execute Access,All_Reference 0bcd 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0bce 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0bcf e023 | # | Load 0x0,0x23 0bd0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0bd1 4801 |H | Short_Literal 0x1 0bd2 00d9 | | Load_Top At_Offset_1 0bd3 482e |H. | Short_Literal 0x2e 0bd4 e01d | | Load 0x0,0x1d 0bd5 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0bd6 00e2 | | Load_Encached Integer_Cache 0bd7 03f1 | | Declare_Variable Discrete,With_Value 0bd8 BODY_0bc8: 0bd8 00d8 | | Load_Top At_Offset_0 0bd9 0c01 | | Execute_Immediate Greater_Equal,0x1 0bda 680c |h | Jump_Zero 0xbe7 0bdb 00d9 | | Load_Top At_Offset_1 0bdc 01dd | | Execute Vector,First 0bdd 00d9 | | Load_Top At_Offset_1 0bde 0aff | | Execute_Immediate Plus,-0x1 0bdf 00d8 | | Load_Top At_Offset_0 0be0 00e2 | | Load_Encached Integer_Cache 0be1 0260 | ` | Execute Discrete,In_Type 0be2 7001 |p | Jump_Nonzero 0xbe4 0be3 0801 | | Execute_Immediate Raise,0x1 0be4 00db | | Load_Top At_Offset_3 0be5 01cf | | Execute Vector,Slice_Read 0be6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0be7 00d9 | | Load_Top At_Offset_1 0be8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0be9 0000 0000 | | .BLANK 0000[0x7] 0bf0 ; -------------------------------------------------------------------------------------- 0bf0 ; SUBPROGRAM 0bf0 ; -------------------------------------------------------------------------------------- 0bf0 0c00 | | .CONST 0x0c00 ; Address of begin 0bf1 0004 | | .CONST 0x0004 ; Address of exception handler 0bf2 0003 | | .CONST 0x0003 ; Number of locals 0bf3 INIT_0bf0: 0bf3 00da | | Load_Top At_Offset_2 0bf4 0227 | ' | Execute Access,All_Reference 0bf5 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0bf6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0bf7 e023 | # | Load 0x0,0x23 0bf8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0bf9 4801 |H | Short_Literal 0x1 0bfa 00d9 | | Load_Top At_Offset_1 0bfb 482e |H. | Short_Literal 0x2e 0bfc e01d | | Load 0x0,0x1d 0bfd 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0bfe 00e2 | | Load_Encached Integer_Cache 0bff 03f1 | | Declare_Variable Discrete,With_Value 0c00 BODY_0bf0: 0c00 00d8 | | Load_Top At_Offset_0 0c01 0c01 | | Execute_Immediate Greater_Equal,0x1 0c02 680c |h | Jump_Zero 0xc0f 0c03 00d8 | | Load_Top At_Offset_0 0c04 0a01 | | Execute_Immediate Plus,0x1 0c05 00d8 | | Load_Top At_Offset_0 0c06 00e2 | | Load_Encached Integer_Cache 0c07 0260 | ` | Execute Discrete,In_Type 0c08 7001 |p | Jump_Nonzero 0xc0a 0c09 0801 | | Execute_Immediate Raise,0x1 0c0a 00da | | Load_Top At_Offset_2 0c0b 01dc | | Execute Vector,Last 0c0c 00db | | Load_Top At_Offset_3 0c0d 01cf | | Execute Vector,Slice_Read 0c0e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c0f 00ea | | Load_Encached Null_String_Cache 0c10 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c11 0000 0000 | | .BLANK 0000[0x7] 0c18 ; -------------------------------------------------------------------------------------- 0c18 ; SUBPROGRAM 0c18 ; -------------------------------------------------------------------------------------- 0c18 0c1b | | .CONST 0x0c1b ; Address of begin 0c19 0004 | | .CONST 0x0004 ; Address of exception handler 0c1a 0001 | | .CONST 0x0001 ; Number of locals 0c1b BODY_0c18: 0c1b INIT_0c18: 0c1b 00da | | Load_Top At_Offset_2 0c1c 4609 |F | Jump_Case 0xa 0c1d 780c |x | Jump 0xc2a ; case 0x0 0c1e 780e |x | Jump 0xc2d ; case 0x1 0c1f 7810 |x | Jump 0xc30 ; case 0x2 0c20 7812 |x | Jump 0xc33 ; case 0x3 0c21 7814 |x | Jump 0xc36 ; case 0x4 0c22 7816 |x | Jump 0xc39 ; case 0x5 0c23 7818 |x | Jump 0xc3c ; case 0x6 0c24 781a |x | Jump 0xc3f ; case 0x7 0c25 781c |x | Jump 0xc42 ; case 0x8 0c26 7800 |x | Jump 0xc27 ; case 0x9 0c27 0092 1037 | 7| Action Push_String_Extended,0x1037 ; "Sts" 0c29 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c2a 0092 1038 | 8| Action Push_String_Extended,0x1038 ; "Index" 0c2c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c2d 0092 1039 | 9| Action Push_String_Extended,0x1039 ; "Offset" 0c2f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c30 0092 103a | :| Action Push_String_Extended,0x103a ; "File Name" 0c32 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c33 0092 103b | ;| Action Push_String_Extended,0x103b ; "Root Name" 0c35 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c36 0092 103c | <| Action Push_String_Extended,0x103c ; "Ext." 0c38 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c39 0092 103d | =| Action Push_String_Extended,0x103d ; "Size" 0c3b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c3c 0092 103e | >| Action Push_String_Extended,0x103e ; "Created" 0c3e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c3f 0092 103f | ?| Action Push_String_Extended,0x103f ; "Type" 0c41 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c42 0092 1026 | &| Action Push_String_Extended,0x1026 ; "Version" 0c44 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c45 0000 0000 | | .XXX[0x3] 0c47 0000 | | 0c48 ; -------------------------------------------------------------------------------------- 0c48 ; SUBPROGRAM 0c48 ; -------------------------------------------------------------------------------------- 0c48 0c4b | K | .CONST 0x0c4b ; Address of begin 0c49 0004 | | .CONST 0x0004 ; Address of exception handler 0c4a 0001 | | .CONST 0x0001 ; Number of locals 0c4b BODY_0c48: 0c4b INIT_0c48: 0c4b 00db | | Load_Top At_Offset_3 0c4c 4609 |F | Jump_Case 0xa 0c4d 7813 |x | Jump 0xc61 ; case 0x0 0c4e 781b |x | Jump 0xc6a ; case 0x1 0c4f 7823 |x# | Jump 0xc73 ; case 0x2 0c50 7829 |x) | Jump 0xc7a ; case 0x3 0c51 782b |x+ | Jump 0xc7d ; case 0x4 0c52 782d |x- | Jump 0xc80 ; case 0x5 0c53 7836 |x6 | Jump 0xc8a ; case 0x6 0c54 783b |x; | Jump 0xc90 ; case 0x7 0c55 784d |xM | Jump 0xca3 ; case 0x8 0c56 7800 |x | Jump 0xc57 ; case 0x9 0c57 00da | | Load_Top At_Offset_2 0c58 0227 | ' | Execute Access,All_Reference 0c59 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c5a 6803 |h | Jump_Zero 0xc5e 0c5b 0092 1040 | @| Action Push_String_Extended,0x1040 ; "XX" 0c5d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0c5e 0092 1041 | A| Action Push_String_Extended,0x1041 ; "OK" 0c60 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0c61 4820 |H | Short_Literal 0x20 0c62 4805 |H | Short_Literal 0x5 0c63 480a |H | Short_Literal 0xa 0c64 e7ff | | Load 0x3,-0x1 0c65 0227 | ' | Execute Access,All_Reference 0c66 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c67 e01d | | Load 0x0,0x1d 0c68 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0c69 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0c6a 4820 |H | Short_Literal 0x20 0c6b 4807 |H | Short_Literal 0x7 0c6c 480a |H | Short_Literal 0xa 0c6d e7ff | | Load 0x3,-0x1 0c6e 0227 | ' | Execute Access,All_Reference 0c6f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0c70 e01d | | Load 0x0,0x1d 0c71 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0c72 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0c73 00da | | Load_Top At_Offset_2 0c74 0227 | ' | Execute Access,All_Reference 0c75 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0c76 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0c77 e023 | # | Load 0x0,0x23 0c78 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0c79 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0c7a 00da | | Load_Top At_Offset_2 0c7b 8408 | | Call 0x2,0x8 0c7c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0c7d 00da | | Load_Top At_Offset_2 0c7e 8409 | | Call 0x2,0x9 0c7f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0c80 4820 |H | Short_Literal 0x20 0c81 4807 |H | Short_Literal 0x7 0c82 480a |H | Short_Literal 0xa 0c83 e7ff | | Load 0x3,-0x1 0c84 0227 | ' | Execute Access,All_Reference 0c85 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0c86 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c87 e01d | | Load 0x0,0x1d 0c88 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0c89 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0c8a 00da | | Load_Top At_Offset_2 0c8b 0227 | ' | Execute Access,All_Reference 0c8c 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0c8d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0c8e 8229 | ) | Call 0x1,0x29 0c8f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0c90 00da | | Load_Top At_Offset_2 0c91 0227 | ' | Execute Access,All_Reference 0c92 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0c93 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0c94 6803 |h | Jump_Zero 0xc98 0c95 0092 1042 | B| Action Push_String_Extended,0x1042 ; "KRNL" 0c97 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0c98 00da | | Load_Top At_Offset_2 0c99 0227 | ' | Execute Access,All_Reference 0c9a 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0c9b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0c9c 6803 |h | Jump_Zero 0xca0 0c9d 0092 1043 | C| Action Push_String_Extended,0x1043 ; "PRGM" 0c9f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0ca0 0092 1044 | D| Action Push_String_Extended,0x1044 ; "OTHR" 0ca2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0ca3 4820 |H | Short_Literal 0x20 0ca4 00db | | Load_Top At_Offset_3 0ca5 0227 | ' | Execute Access,All_Reference 0ca6 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0ca7 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0ca8 00e0 | | Load_Encached Standard_Cache 0ca9 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0caa e01d | | Load 0x0,0x1d 0cab 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0cac 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0cad 0000 0000 | | .XXX[0x3] 0caf 0000 | | 0cb0 ; -------------------------------------------------------------------------------------- 0cb0 ; SUBPROGRAM 0cb0 ; -------------------------------------------------------------------------------------- 0cb0 0cb3 | | .CONST 0x0cb3 ; Address of begin 0cb1 0004 | | .CONST 0x0004 ; Address of exception handler 0cb2 0001 | | .CONST 0x0001 ; Number of locals 0cb3 BODY_0cb0: 0cb3 INIT_0cb0: 0cb3 e7fd | | Load 0x3,-0x3 0cb4 e049 | I | Load 0x0,0x49 0cb5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0cb6 0119 | | Execute Any,Check_In_Formal_Type 0cb7 e7fe | | Load 0x3,-0x2 0cb8 e7ff | | Load 0x3,-0x1 0cb9 e04a | J | Load 0x0,0x4a 0cba 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0cbb 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0cbc 0000 0000 | | .BLANK 0000[0x4] 0cc0 ; -------------------------------------------------------------------------------------- 0cc0 ; SUBPROGRAM 0cc0 ; -------------------------------------------------------------------------------------- 0cc0 0cc3 | | .CONST 0x0cc3 ; Address of begin 0cc1 0004 | | .CONST 0x0004 ; Address of exception handler 0cc2 0001 | | .CONST 0x0001 ; Number of locals 0cc3 BODY_0cc0: 0cc3 INIT_0cc0: 0cc3 e407 | | Load 0x2,0x7 0cc4 0a01 | | Execute_Immediate Plus,0x1 0cc5 c407 | | Store 0x2,0x7 0cc6 e404 | | Load 0x2,0x4 0cc7 0322 | " | Declare_Variable Record 0cc8 00d8 | | Load_Top At_Offset_0 0cc9 1c01 | | Execute_Immediate Run_Utility,0x1 0cca 00db | | Load_Top At_Offset_3 0ccb 802b | + | Call 0x0,0x2b 0ccc 00d9 | | Load_Top At_Offset_1 0ccd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0cce 00db | | Load_Top At_Offset_3 0ccf 802c | , | Call 0x0,0x2c 0cd0 00d9 | | Load_Top At_Offset_1 0cd1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0cd2 00db | | Load_Top At_Offset_3 0cd3 804b | K | Call 0x0,0x4b 0cd4 00d9 | | Load_Top At_Offset_1 0cd5 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0cd6 e7fe | | Load 0x3,-0x2 0cd7 00d9 | | Load_Top At_Offset_1 0cd8 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0cd9 e406 | | Load 0x2,0x6 0cda 00d9 | | Load_Top At_Offset_1 0cdb 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0cdc e403 | | Load 0x2,0x3 0cdd 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0cde a406 | | Store_Unchecked 0x2,0x6 0cdf 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0ce0 ; -------------------------------------------------------------------------------------- 0ce0 ; SUBPROGRAM 0ce0 ; -------------------------------------------------------------------------------------- 0ce0 0ce8 | | .CONST 0x0ce8 ; Address of begin 0ce1 0004 | | .CONST 0x0004 ; Address of exception handler 0ce2 0002 | | .CONST 0x0002 ; Number of locals 0ce3 INIT_0ce0: 0ce3 4801 |H | Short_Literal 0x1 0ce4 e407 | | Load 0x2,0x7 0ce5 e405 | | Load 0x2,0x5 0ce6 035b | [ | Declare_Type Array,Constrained 0ce7 0337 | 7 | Declare_Variable Array 0ce8 BODY_0ce0: 0ce8 00cf | | Action Mark_Auxiliary 0ce9 00d9 | | Load_Top At_Offset_1 0cea 01da | | Execute Vector,Bounds 0ceb 0264 | d | Execute Discrete,Below_Bound 0cec 700a |p | Jump_Nonzero 0xcf7 0ced e406 | | Load 0x2,0x6 0cee 00d9 | | Load_Top At_Offset_1 0cef e602 | | Load 0x3,0x2 0cf0 01d6 | | Execute Vector,Field_Write 0cf1 e406 | | Load 0x2,0x6 0cf2 0227 | ' | Execute Access,All_Reference 0cf3 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0cf4 a406 | | Store_Unchecked 0x2,0x6 0cf5 00c8 | | Action Pop_Auxiliary_Range 0cf6 37f6 |7 | Loop_Decreasing 0xced 0cf7 00ce | | Action Pop_Auxiliary 0cf8 0092 1045 | E| Action Push_String_Extended,0x1045 ; "<DEFAULT>" 0cfa e5fc | | Load 0x2,-0x4 0cfb e5fd | | Load 0x2,-0x3 0cfc 00db | | Load_Top At_Offset_3 0cfd e40d | | Load 0x2,0xd 0cfe e40e | | Load 0x2,0xe 0cff e40f | | Load 0x2,0xf 0d00 4810 |H | Short_Literal 0x10 0d01 4802 |H | Short_Literal 0x2 0d02 0099 | | Action Reference_Dynamic 0d03 4811 |H | Short_Literal 0x11 0d04 4802 |H | Short_Literal 0x2 0d05 0099 | | Action Reference_Dynamic 0d06 4812 |H | Short_Literal 0x12 0d07 4802 |H | Short_Literal 0x2 0d08 0099 | | Action Reference_Dynamic 0d09 e413 | | Load 0x2,0x13 0d0a e414 | | Load 0x2,0x14 0d0b e415 | | Load 0x2,0x15 0d0c 4816 |H | Short_Literal 0x16 0d0d 4802 |H | Short_Literal 0x2 0d0e 0099 | | Action Reference_Dynamic 0d0f 801a | | Call 0x0,0x1a 0d10 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0d11 0000 0000 | | .BLANK 0000[0x7] 0d18 ; -------------------------------------------------------------------------------------- 0d18 ; SUBPROGRAM 0d18 ; -------------------------------------------------------------------------------------- 0d18 0d1b | | .CONST 0x0d1b ; Address of begin 0d19 0004 | | .CONST 0x0004 ; Address of exception handler 0d1a 0001 | | .CONST 0x0001 ; Number of locals 0d1b BODY_0d18: 0d1b INIT_0d18: 0d1b 00da | | Load_Top At_Offset_2 0d1c 804c | L | Call 0x0,0x4c 0d1d 00db | | Load_Top At_Offset_3 0d1e 00db | | Load_Top At_Offset_3 0d1f 822b | + | Call 0x1,0x2b 0d20 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d21 0000 0000 | | .BLANK 0000[0x7] 0d28 ; -------------------------------------------------------------------------------------- 0d28 ; SUBPROGRAM 0d28 ; -------------------------------------------------------------------------------------- 0d28 0d2b | + | .CONST 0x0d2b ; Address of begin 0d29 0004 | | .CONST 0x0004 ; Address of exception handler 0d2a 0001 | | .CONST 0x0001 ; Number of locals 0d2b BODY_0d28: 0d2b INIT_0d28: 0d2b 00da | | Load_Top At_Offset_2 0d2c 802b | + | Call 0x0,0x2b 0d2d 6806 |h | Jump_Zero 0xd34 0d2e 00da | | Load_Top At_Offset_2 0d2f 804d | M | Call 0x0,0x4d 0d30 00db | | Load_Top At_Offset_3 0d31 00db | | Load_Top At_Offset_3 0d32 822b | + | Call 0x1,0x2b 0d33 00d1 | | Pop_Control Pop_Count_1 0d34 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d35 0000 0000 | | .XXX[0x3] 0d37 0000 | | 0d38 ; -------------------------------------------------------------------------------------- 0d38 ; SUBPROGRAM 0d38 ; -------------------------------------------------------------------------------------- 0d38 0d47 | G | .CONST 0x0d47 ; Address of begin 0d39 0004 | | .CONST 0x0004 ; Address of exception handler 0d3a 0003 | | .CONST 0x0003 ; Number of locals 0d3b INIT_0d38: 0d3b 00db | | Load_Top At_Offset_3 0d3c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0d3d e023 | # | Load 0x0,0x23 0d3e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0d3f e003 | | Load 0x0,0x3 0d40 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0d41 4801 |H | Short_Literal 0x1 0d42 e402 | | Load 0x2,0x2 0d43 00db | | Load_Top At_Offset_3 0d44 e003 | | Load 0x0,0x3 0d45 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0d46 0039 | 9 | Store_Top Access,At_Offset_1 0d47 BODY_0d38: 0d47 e003 | | Load 0x0,0x3 0d48 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d49 00d9 | | Load_Top At_Offset_1 0d4a e003 | | Load 0x0,0x3 0d4b 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0d4c 7007 |p | Jump_Nonzero 0xd54 0d4d e7ff | | Load 0x3,-0x1 0d4e 804c | L | Call 0x0,0x4c 0d4f e7fe | | Load 0x3,-0x2 0d50 e7ff | | Load 0x3,-0x1 0d51 822b | + | Call 0x1,0x2b 0d52 00d1 | | Pop_Control Pop_Count_1 0d53 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d54 4801 |H | Short_Literal 0x1 0d55 e402 | | Load 0x2,0x2 0d56 00db | | Load_Top At_Offset_3 0d57 e003 | | Load 0x0,0x3 0d58 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0d59 0039 | 9 | Store_Top Access,At_Offset_1 0d5a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d5b 0000 0000 | | .BLANK 0000[0x5] 0d60 ; -------------------------------------------------------------------------------------- 0d60 ; SUBPROGRAM 0d60 ; -------------------------------------------------------------------------------------- 0d60 0d63 | c | .CONST 0x0d63 ; Address of begin 0d61 0004 | | .CONST 0x0004 ; Address of exception handler 0d62 0001 | | .CONST 0x0001 ; Number of locals 0d63 BODY_0d60: 0d63 INIT_0d60: 0d63 00db | | Load_Top At_Offset_3 0d64 0092 1046 | F| Action Push_String_Extended,0x1046 ; "XXX" 0d66 e7ff | | Load 0x3,-0x1 0d67 822a | * | Call 0x1,0x2a 0d68 00d1 | | Pop_Control Pop_Count_1 0d69 00db | | Load_Top At_Offset_3 0d6a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0d6b e023 | # | Load 0x0,0x23 0d6c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0d6d e403 | | Load 0x2,0x3 0d6e e402 | | Load 0x2,0x2 0d6f e02d | - | Load 0x0,0x2d 0d70 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0d71 00db | | Load_Top At_Offset_3 0d72 804e | N | Call 0x0,0x4e 0d73 00da | | Load_Top At_Offset_2 0d74 804f | O | Call 0x0,0x4f 0d75 e7fe | | Load 0x3,-0x2 0d76 017d | } | Execute Record,Structure_Write 0d77 00db | | Load_Top At_Offset_3 0d78 0092 1047 | G| Action Push_String_Extended,0x1047 ; "==>" 0d7a e7ff | | Load 0x3,-0x1 0d7b 822a | * | Call 0x1,0x2a 0d7c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d7d 0000 0000 | | .XXX[0x3] 0d7f 0000 | | 0d80 ; -------------------------------------------------------------------------------------- 0d80 ; SUBPROGRAM 0d80 ; -------------------------------------------------------------------------------------- 0d80 0d84 | | .CONST 0x0d84 ; Address of begin 0d81 0004 | | .CONST 0x0004 ; Address of exception handler 0d82 0002 | | .CONST 0x0002 ; Number of locals 0d83 INIT_0d80: 0d83 00e2 | | Load_Encached Integer_Cache 0d84 BODY_0d80: 0d84 e7fe | | Load 0x3,-0x2 0d85 e7ff | | Load 0x3,-0x1 0d86 822b | + | Call 0x1,0x2b 0d87 00d1 | | Pop_Control Pop_Count_1 0d88 00e2 | | Load_Encached Integer_Cache 0d89 e402 | | Load 0x2,0x2 0d8a e7ff | | Load 0x3,-0x1 0d8b 8050 | P | Call 0x0,0x50 0d8c 0059 | Y | Store_Top Discrete,At_Offset_1 0d8d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d8e 0000 0000 | | .XXX[0x2] 0d90 ; -------------------------------------------------------------------------------------- 0d90 ; SUBPROGRAM 0d90 ; -------------------------------------------------------------------------------------- 0d90 0d93 | | .CONST 0x0d93 ; Address of begin 0d91 0004 | | .CONST 0x0004 ; Address of exception handler 0d92 0001 | | .CONST 0x0001 ; Number of locals 0d93 BODY_0d90: 0d93 INIT_0d90: 0d93 e049 | I | Load 0x0,0x49 0d94 180e | | Execute Package,Field_Execute,Field_Number 0xe 0d95 4807 |H | Short_Literal 0x7 0d96 e7fe | | Load 0x3,-0x2 0d97 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0d98 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0d99 e023 | # | Load 0x0,0x23 0d9a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0d9b 0092 1048 | H| Action Push_String_Extended,0x1048 ; " " 0d9d 01cc | | Execute Vector,Catenate 0d9e e7fd | | Load 0x3,-0x3 0d9f 01cc | | Execute Vector,Catenate 0da0 0092 1049 | I| Action Push_String_Extended,0x1049 ; " in file " 0da2 01cc | | Execute Vector,Catenate 0da3 4820 |H | Short_Literal 0x20 0da4 4800 |H | Short_Literal 0x0 0da5 480a |H | Short_Literal 0xa 0da6 e7ff | | Load 0x3,-0x1 0da7 e01d | | Load 0x0,0x1d 0da8 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0da9 01cc | | Execute Vector,Catenate 0daa e04a | J | Load 0x0,0x4a 0dab 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0dac 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0dad 0000 0000 | | .XXX[0x3] 0daf 0000 | | 0db0 ; -------------------------------------------------------------------------------------- 0db0 ; SUBPROGRAM 0db0 ; -------------------------------------------------------------------------------------- 0db0 0dc0 | | .CONST 0x0dc0 ; Address of begin 0db1 0004 | | .CONST 0x0004 ; Address of exception handler 0db2 0004 | | .CONST 0x0004 ; Number of locals 0db3 INIT_0db0: 0db3 4801 |H | Short_Literal 0x1 0db4 00db | | Load_Top At_Offset_3 0db5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0db6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0db7 e045 | E | Load 0x0,0x45 0db8 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0db9 035b | [ | Declare_Type Array,Constrained 0dba 0337 | 7 | Declare_Variable Array 0dbb e002 | | Load 0x0,0x2 0dbc 0322 | " | Declare_Variable Record 0dbd 00d8 | | Load_Top At_Offset_0 0dbe 1c00 | | Execute_Immediate Run_Utility,0x0 0dbf 00e2 | | Load_Encached Integer_Cache 0dc0 BODY_0db0: 0dc0 e7ff | | Load 0x3,-0x1 0dc1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0dc2 e7fe | | Load 0x3,-0x2 0dc3 8033 | 3 | Call 0x0,0x33 0dc4 00d9 | | Load_Top At_Offset_1 0dc5 4800 |H | Short_Literal 0x0 0dc6 e7fe | | Load 0x3,-0x2 0dc7 800f | | Call 0x0,0xf 0dc8 00d1 | | Pop_Control Pop_Count_1 0dc9 00e3 | | Load_Encached Natural_Cache 0dca 00db | | Load_Top At_Offset_3 0dcb e7fe | | Load 0x3,-0x2 0dcc 8043 | C | Call 0x0,0x43 0dcd 00d1 | | Pop_Control Pop_Count_1 0dce 0059 | Y | Store_Top Discrete,At_Offset_1 0dcf e7fe | | Load 0x3,-0x2 0dd0 8011 | | Call 0x0,0x11 0dd1 4801 |H | Short_Literal 0x1 0dd2 00d9 | | Load_Top At_Offset_1 0dd3 e602 | | Load 0x3,0x2 0dd4 01cf | | Execute Vector,Slice_Read 0dd5 e045 | E | Load 0x0,0x45 0dd6 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0dd7 01c6 | | Execute Vector,Convert_To_Formal 0dd8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0dd9 0000 0000 | | .BLANK 0000[0x7] 0de0 ; -------------------------------------------------------------------------------------- 0de0 ; SUBPROGRAM 0de0 ; -------------------------------------------------------------------------------------- 0de0 0de4 | | .CONST 0x0de4 ; Address of begin 0de1 0004 | | .CONST 0x0004 ; Address of exception handler 0de2 0002 | | .CONST 0x0002 ; Number of locals 0de3 INIT_0de0: 0de3 00e2 | | Load_Encached Integer_Cache 0de4 BODY_0de0: 0de4 e7fe | | Load 0x3,-0x2 0de5 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0de6 4f9d |O | Short_Literal -0x63 0de7 027f | | Execute Discrete,Equal 0de8 681b |h | Jump_Zero 0xe04 0de9 e7fe | | Load 0x3,-0x2 0dea 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0deb 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0dec e5fa | | Load 0x2,-0x6 0ded e7fe | | Load 0x3,-0x2 0dee 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0def e023 | # | Load 0x0,0x23 0df0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0df1 8239 | 9 | Call 0x1,0x39 0df2 e023 | # | Load 0x0,0x23 0df3 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0df4 e7fe | | Load 0x3,-0x2 0df5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0df6 e405 | | Load 0x2,0x5 0df7 e7fe | | Load 0x3,-0x2 0df8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0df9 e406 | | Load 0x2,0x6 0dfa e7fe | | Load 0x3,-0x2 0dfb 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0dfc 4801 |H | Short_Literal 0x1 0dfd e7fe | | Load 0x3,-0x2 0dfe 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0dff e7fe | | Load 0x3,-0x2 0e00 4800 |H | Short_Literal 0x0 0e01 e402 | | Load 0x2,0x2 0e02 800f | | Call 0x0,0xf 0e03 00d1 | | Pop_Control Pop_Count_1 0e04 00e2 | | Load_Encached Integer_Cache 0e05 e402 | | Load 0x2,0x2 0e06 e7ff | | Load 0x3,-0x1 0e07 8050 | P | Call 0x0,0x50 0e08 0059 | Y | Store_Top Discrete,At_Offset_1 0e09 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0e0a 0000 0000 | | .BLANK 0000[0x6] 0e10 ; -------------------------------------------------------------------------------------- 0e10 ; SUBPROGRAM 0e10 ; -------------------------------------------------------------------------------------- 0e10 0e2d | - | .CONST 0x0e2d ; Address of begin 0e11 0004 | | .CONST 0x0004 ; Address of exception handler 0e12 0007 | | .CONST 0x0007 ; Number of locals 0e13 INIT_0e10: 0e13 e051 | Q | Load 0x0,0x51 0e14 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0e15 02c7 | | Declare_Variable Any 0e16 00d8 | | Load_Top At_Offset_0 0e17 1c00 | | Execute_Immediate Run_Utility,0x0 0e18 4801 |H | Short_Literal 0x1 0e19 e7fe | | Load 0x3,-0x2 0e1a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0e1b e045 | E | Load 0x0,0x45 0e1c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0e1d 035b | [ | Declare_Type Array,Constrained 0e1e 0337 | 7 | Declare_Variable Array 0e1f 00e3 | | Load_Encached Natural_Cache 0e20 e7fe | | Load 0x3,-0x2 0e21 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0e22 e023 | # | Load 0x0,0x23 0e23 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0e24 e5fa | | Load 0x2,-0x6 0e25 00d9 | | Load_Top At_Offset_1 0e26 8238 | 8 | Call 0x1,0x38 0e27 e5fe | | Load 0x2,-0x2 0e28 e402 | | Load 0x2,0x2 0e29 e02d | - | Load 0x0,0x2d 0e2a 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0e2b e007 | | Load 0x0,0x7 0e2c 0007 | | Action Break_Optional 0e2d BODY_0e10: 0e2d 00da | | Load_Top At_Offset_2 0e2e 0092 104a | J| Action Push_String_Extended,0x104a ; " => " 0e30 01cc | | Execute Vector,Catenate 0e31 00da | | Load_Top At_Offset_2 0e32 01cc | | Execute Vector,Catenate 0e33 e015 | | Load 0x0,0x15 0e34 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0e35 e5fb | | Load 0x2,-0x5 0e36 681d |h | Jump_Zero 0xe54 0e37 e007 | | Load 0x0,0x7 0e38 4801 |H | Short_Literal 0x1 0e39 00db | | Load_Top At_Offset_3 0e3a 8008 | | Call 0x0,0x8 0e3b 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0e3c e7fe | | Load 0x3,-0x2 0e3d 4800 |H | Short_Literal 0x0 0e3e 00da | | Load_Top At_Offset_2 0e3f 800f | | Call 0x0,0xf 0e40 00d1 | | Pop_Control Pop_Count_1 0e41 00e3 | | Load_Encached Natural_Cache 0e42 e603 | | Load 0x3,0x3 0e43 e7ff | | Load 0x3,-0x1 0e44 8043 | C | Call 0x0,0x43 0e45 00d1 | | Pop_Control Pop_Count_1 0e46 c604 | | Store 0x3,0x4 0e47 4801 |H | Short_Literal 0x1 0e48 e604 | | Load 0x3,0x4 0e49 e603 | | Load 0x3,0x3 0e4a 01cf | | Execute Vector,Slice_Read 0e4b 00d9 | | Load_Top At_Offset_1 0e4c 8052 | R | Call 0x0,0x52 0e4d 00d8 | | Load_Top At_Offset_0 0e4e 8011 | | Call 0x0,0x11 0e4f 00d8 | | Load_Top At_Offset_0 0e50 4801 |H | Short_Literal 0x1 0e51 8014 | | Call 0x0,0x14 0e52 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0e53 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0e54 e602 | | Load 0x3,0x2 0e55 e02f | / | Load 0x0,0x2f 0e56 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0e57 e02e | . | Load 0x0,0x2e 0e58 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0e59 e02e | . | Load 0x0,0x2e 0e5a 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0e5b 00ea | | Load_Encached Null_String_Cache 0e5c e606 | | Load 0x3,0x6 0e5d 4801 |H | Short_Literal 0x1 0e5e e051 | Q | Load 0x0,0x51 0e5f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e60 c602 | | Store 0x3,0x2 0e61 00e3 | | Load_Encached Natural_Cache 0e62 e603 | | Load 0x3,0x3 0e63 e7ff | | Load 0x3,-0x1 0e64 8043 | C | Call 0x0,0x43 0e65 00d1 | | Pop_Control Pop_Count_1 0e66 c604 | | Store 0x3,0x4 0e67 4801 |H | Short_Literal 0x1 0e68 e604 | | Load 0x3,0x4 0e69 e603 | | Load 0x3,0x3 0e6a 01cf | | Execute Vector,Slice_Read 0e6b e602 | | Load 0x3,0x2 0e6c e051 | Q | Load 0x0,0x51 0e6d 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0e6e e602 | | Load 0x3,0x2 0e6f e051 | Q | Load 0x0,0x51 0e70 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0e71 c602 | | Store 0x3,0x2 0e72 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0e73 0000 0000 | | .BLANK 0000[0x5] 0e78 ; -------------------------------------------------------------------------------------- 0e78 ; SUBPROGRAM 0e78 ; -------------------------------------------------------------------------------------- 0e78 0e8e | | .CONST 0x0e8e ; Address of begin 0e79 0004 | | .CONST 0x0004 ; Address of exception handler 0e7a 0006 | | .CONST 0x0006 ; Number of locals 0e7b INIT_0e78: 0e7b e053 | S | Load 0x0,0x53 0e7c 0007 | | Action Break_Optional 0e7d 4801 |H | Short_Literal 0x1 0e7e e7fe | | Load 0x3,-0x2 0e7f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0e80 e045 | E | Load 0x0,0x45 0e81 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0e82 035b | [ | Declare_Type Array,Constrained 0e83 0337 | 7 | Declare_Variable Array 0e84 00e3 | | Load_Encached Natural_Cache 0e85 e7fe | | Load 0x3,-0x2 0e86 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0e87 e023 | # | Load 0x0,0x23 0e88 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0e89 00d8 | | Load_Top At_Offset_0 0e8a e5fe | | Load 0x2,-0x2 0e8b e402 | | Load 0x2,0x2 0e8c e02d | - | Load 0x0,0x2d 0e8d 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0e8e BODY_0e78: 0e8e 00d9 | | Load_Top At_Offset_1 0e8f 0092 104a | J| Action Push_String_Extended,0x104a ; " => " 0e91 01cc | | Execute Vector,Catenate 0e92 00d9 | | Load_Top At_Offset_1 0e93 01cc | | Execute Vector,Catenate 0e94 e015 | | Load 0x0,0x15 0e95 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0e96 e053 | S | Load 0x0,0x53 0e97 00d9 | | Load_Top At_Offset_1 0e98 e403 | | Load 0x2,0x3 0e99 8054 | T | Call 0x0,0x54 0e9a c602 | | Store 0x3,0x2 0e9b 00e3 | | Load_Encached Natural_Cache 0e9c e603 | | Load 0x3,0x3 0e9d e7ff | | Load 0x3,-0x1 0e9e 8043 | C | Call 0x0,0x43 0e9f 00d1 | | Pop_Control Pop_Count_1 0ea0 005b | [ | Store_Top Discrete,At_Offset_3 0ea1 4801 |H | Short_Literal 0x1 0ea2 00db | | Load_Top At_Offset_3 0ea3 e603 | | Load 0x3,0x3 0ea4 01cf | | Execute Vector,Slice_Read 0ea5 e602 | | Load 0x3,0x2 0ea6 8055 | U | Call 0x0,0x55 0ea7 e602 | | Load 0x3,0x2 0ea8 8056 | V | Call 0x0,0x56 0ea9 c602 | | Store 0x3,0x2 0eaa 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0eab 0000 0000 | | .BLANK 0000[0x5] 0eb0 ; -------------------------------------------------------------------------------------- 0eb0 ; SUBPROGRAM 0eb0 ; -------------------------------------------------------------------------------------- 0eb0 0eb5 | | .CONST 0x0eb5 ; Address of begin 0eb1 0004 | | .CONST 0x0004 ; Address of exception handler 0eb2 0002 | | .CONST 0x0002 ; Number of locals 0eb3 INIT_0eb0: 0eb3 e5fb | | Load 0x2,-0x5 0eb4 85fd | | Call 0x2,-0x3 0eb5 BODY_0eb0: 0eb5 4801 |H | Short_Literal 0x1 0eb6 0092 104b | K| Action Push_String_Extended,0x104b ; "LOAD" 0eb8 4801 |H | Short_Literal 0x1 0eb9 00db | | Load_Top At_Offset_3 0eba 8228 | ( | Call 0x1,0x28 0ebb e01d | | Load 0x0,0x1d 0ebc 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0ebd 6808 |h | Jump_Zero 0xec6 0ebe 4801 |H | Short_Literal 0x1 0ebf e402 | | Load 0x2,0x2 0ec0 4802 |H | Short_Literal 0x2 0ec1 00db | | Load_Top At_Offset_3 0ec2 8228 | ( | Call 0x1,0x28 0ec3 e003 | | Load 0x0,0x3 0ec4 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0ec5 a403 | | Store_Unchecked 0x2,0x3 0ec6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ec7 0000 | | .XXX[0x1] 0ec8 ; -------------------------------------------------------------------------------------- 0ec8 ; SUBPROGRAM 0ec8 ; -------------------------------------------------------------------------------------- 0ec8 0ecf | | .CONST 0x0ecf ; Address of begin 0ec9 0004 | | .CONST 0x0004 ; Address of exception handler 0eca 0002 | | .CONST 0x0002 ; Number of locals 0ecb INIT_0ec8: 0ecb 00da | | Load_Top At_Offset_2 0ecc 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0ecd e023 | # | Load 0x0,0x23 0ece 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0ecf BODY_0ec8: 0ecf 4801 |H | Short_Literal 0x1 0ed0 00d9 | | Load_Top At_Offset_1 0ed1 0092 104c | L| Action Push_String_Extended,0x104c ; ".MLOAD" 0ed3 e01d | | Load 0x0,0x1d 0ed4 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0ed5 00d9 | | Load_Top At_Offset_1 0ed6 01dc | | Execute Vector,Last 0ed7 0afb | | Execute_Immediate Plus,-0x5 0ed8 027f | | Execute Discrete,Equal 0ed9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0eda 0000 0000 | | .BLANK 0000[0x6] 0ee0 ; -------------------------------------------------------------------------------------- 0ee0 ; SUBPROGRAM 0ee0 ; -------------------------------------------------------------------------------------- 0ee0 0f06 | | .CONST 0x0f06 ; Address of begin 0ee1 0004 | | .CONST 0x0004 ; Address of exception handler 0ee2 0009 | | .CONST 0x0009 ; Number of locals 0ee3 INIT_0ee0: 0ee3 4818 |H | Short_Literal 0x18 0ee4 03cc | | Declare_Type Access,Incomplete,Accesses_Protected 0ee5 481e |H | Short_Literal 0x1e 0ee6 e023 | # | Load 0x0,0x23 0ee7 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ee8 1c07 | | Execute_Immediate Run_Utility,0x7 0ee9 00d9 | | Load_Top At_Offset_1 0eea 029f 0fa3 | | Declare_Subprogram INIT_0fa0,For_Call 0eec 4802 |H | Short_Literal 0x2 0eed 032d | - | Declare_Type Record,Defined 0eee 00d8 | | Load_Top At_Offset_0 0eef 02a0 | | Declare_Subprogram Null_Subprogram 0ef0 00db | | Load_Top At_Offset_3 0ef1 03c7 | | Complete_Type Access,By_Defining 0ef2 00d9 | | Load_Top At_Offset_1 0ef3 0007 | | Action Break_Optional 0ef4 00da | | Load_Top At_Offset_2 0ef5 0007 | | Action Break_Optional 0ef6 e002 | | Load 0x0,0x2 0ef7 0322 | " | Declare_Variable Record 0ef8 00d8 | | Load_Top At_Offset_0 0ef9 1c00 | | Execute_Immediate Run_Utility,0x0 0efa 00d8 | | Load_Top At_Offset_0 0efb 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0efc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0efd 0007 | | Action Break_Optional 0efe 00d8 | | Load_Top At_Offset_0 0eff e023 | # | Load 0x0,0x23 0f00 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0f01 1c08 | | Execute_Immediate Run_Utility,0x8 0f02 00d8 | | Load_Top At_Offset_0 0f03 1c00 | | Execute_Immediate Run_Utility,0x0 0f04 029f 0fbb | | Declare_Subprogram INIT_0fb8,For_Call 0f06 BODY_0ee0: 0f06 e7fe | | Load 0x3,-0x2 0f07 e7ff | | Load 0x3,-0x1 0f08 8033 | 3 | Call 0x0,0x33 0f09 00db | | Load_Top At_Offset_3 0f0a 4801 |H | Short_Literal 0x1 0f0b e7ff | | Load 0x3,-0x1 0f0c 800f | | Call 0x0,0xf 0f0d 00d1 | | Pop_Control Pop_Count_1 0f0e 00db | | Load_Top At_Offset_3 0f0f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0f10 00da | | Load_Top At_Offset_2 0f11 016d | m | Execute Variant_Record,Structure_Write 0f12 00cf | | Action Mark_Auxiliary 0f13 7802 |x | Jump 0xf16 0f14 8609 | | Call 0x3,0x9 0f15 00c9 | | Action Pop_Auxiliary_Loop 0f16 e7ff | | Load 0x3,-0x1 0f17 803d | = | Call 0x0,0x3d 0f18 6ffb |o | Jump_Zero 0xf14 0f19 00ce | | Action Pop_Auxiliary 0f1a e7ff | | Load 0x3,-0x1 0f1b 8011 | | Call 0x0,0x11 0f1c 00cf | | Action Mark_Auxiliary 0f1d 783f |x? | Jump 0xf5d 0f1e e606 | | Load 0x3,0x6 0f1f e5f9 | | Load 0x2,-0x7 0f20 e604 | | Load 0x3,0x4 0f21 0227 | ' | Execute Access,All_Reference 0f22 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0f23 e023 | # | Load 0x0,0x23 0f24 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0f25 e7ff | | Load 0x3,-0x1 0f26 8032 | 2 | Call 0x0,0x32 0f27 00d1 | | Pop_Control Pop_Count_1 0f28 e606 | | Load 0x3,0x6 0f29 8057 | W | Call 0x0,0x57 0f2a 6824 |h$ | Jump_Zero 0xf4f 0f2b e7fe | | Load 0x3,-0x2 0f2c e7ff | | Load 0x3,-0x1 0f2d 8033 | 3 | Call 0x0,0x33 0f2e e606 | | Load 0x3,0x6 0f2f e5f9 | | Load 0x2,-0x7 0f30 e604 | | Load 0x3,0x4 0f31 0227 | ' | Execute Access,All_Reference 0f32 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0f33 e023 | # | Load 0x0,0x23 0f34 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0f35 e7ff | | Load 0x3,-0x1 0f36 8032 | 2 | Call 0x0,0x32 0f37 00d1 | | Pop_Control Pop_Count_1 0f38 e606 | | Load 0x3,0x6 0f39 8057 | W | Call 0x0,0x57 0f3a 6814 |h | Jump_Zero 0xf4f 0f3b e049 | I | Load 0x0,0x49 0f3c 180e | | Execute Package,Field_Execute,Field_Number 0xe 0f3d 4807 |H | Short_Literal 0x7 0f3e e604 | | Load 0x3,0x4 0f3f 0227 | ' | Execute Access,All_Reference 0f40 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0f41 e023 | # | Load 0x0,0x23 0f42 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0f43 0092 104d | M| Action Push_String_Extended,0x104d ; ", referenced by " 0f45 01cc | | Execute Vector,Catenate 0f46 e608 | | Load 0x3,0x8 0f47 e023 | # | Load 0x0,0x23 0f48 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0f49 01cc | | Execute Vector,Catenate 0f4a 0092 104e | N| Action Push_String_Extended,0x104e ; ", is not in file" 0f4c 01cc | | Execute Vector,Catenate 0f4d e04a | J | Load 0x0,0x4a 0f4e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0f4f e606 | | Load 0x3,0x6 0f50 8057 | W | Call 0x0,0x57 0f51 7004 |p | Jump_Nonzero 0xf56 0f52 e606 | | Load 0x3,0x6 0f53 e7ff | | Load 0x3,-0x1 0f54 85fd | | Call 0x2,-0x3 0f55 00d1 | | Pop_Control Pop_Count_1 0f56 e7ff | | Load 0x3,-0x1 0f57 8011 | | Call 0x0,0x11 0f58 e604 | | Load 0x3,0x4 0f59 0227 | ' | Execute Access,All_Reference 0f5a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0f5b a604 | | Store_Unchecked 0x3,0x4 0f5c 00c9 | | Action Pop_Auxiliary_Loop 0f5d e604 | | Load 0x3,0x4 0f5e 77bf |w | Jump_Nonzero 0xf1e 0f5f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0f60 ; -------------------------------------------------------------------------------------- 0f60 ; SUBPROGRAM 0f60 ; -------------------------------------------------------------------------------------- 0f60 0f63 | c | .CONST 0x0f63 ; Address of begin 0f61 0004 | | .CONST 0x0004 ; Address of exception handler 0f62 0001 | | .CONST 0x0001 ; Number of locals 0f63 BODY_0f60: 0f63 INIT_0f60: 0f63 e404 | | Load 0x2,0x4 0f64 0a01 | | Execute_Immediate Plus,0x1 0f65 c404 | | Store 0x2,0x4 0f66 e223 | # | Load 0x1,0x23 0f67 0322 | " | Declare_Variable Record 0f68 00d8 | | Load_Top At_Offset_0 0f69 1c01 | | Execute_Immediate Run_Utility,0x1 0f6a e7fe | | Load 0x3,-0x2 0f6b 00d9 | | Load_Top At_Offset_1 0f6c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0f6d 00db | | Load_Top At_Offset_3 0f6e 802c | , | Call 0x0,0x2c 0f6f 00d9 | | Load_Top At_Offset_1 0f70 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0f71 e404 | | Load 0x2,0x4 0f72 e403 | | Load 0x2,0x3 0f73 01d6 | | Execute Vector,Field_Write 0f74 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0f75 0000 0000 | | .XXX[0x3] 0f77 0000 | | 0f78 ; -------------------------------------------------------------------------------------- 0f78 ; SUBPROGRAM 0f78 ; -------------------------------------------------------------------------------------- 0f78 0f7b | { | .CONST 0x0f7b ; Address of begin 0f79 0004 | | .CONST 0x0004 ; Address of exception handler 0f7a 0001 | | .CONST 0x0001 ; Number of locals 0f7b BODY_0f78: 0f7b INIT_0f78: 0f7b 00da | | Load_Top At_Offset_2 0f7c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0f7d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0f7e e023 | # | Load 0x0,0x23 0f7f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0f80 e7fe | | Load 0x3,-0x2 0f81 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0f82 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0f83 e023 | # | Load 0x0,0x23 0f84 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0f85 01c1 | | Execute Vector,Less 0f86 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0f87 0000 | | .XXX[0x1] 0f88 ; -------------------------------------------------------------------------------------- 0f88 ; SUBPROGRAM 0f88 ; -------------------------------------------------------------------------------------- 0f88 0f8b | | .CONST 0x0f8b ; Address of begin 0f89 0004 | | .CONST 0x0004 ; Address of exception handler 0f8a 0001 | | .CONST 0x0001 ; Number of locals 0f8b BODY_0f88: 0f8b INIT_0f88: 0f8b 4830 |H0 | Short_Literal 0x30 0f8c 4804 |H | Short_Literal 0x4 0f8d e602 | | Load 0x3,0x2 0f8e 00d8 | | Load_Top At_Offset_0 0f8f e046 | F | Load 0x0,0x46 0f90 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0f91 0260 | ` | Execute Discrete,In_Type 0f92 7001 |p | Jump_Nonzero 0xf94 0f93 0801 | | Execute_Immediate Raise,0x1 0f94 e046 | F | Load 0x0,0x46 0f95 180e | | Execute Package,Field_Execute,Field_Number 0xe 0f96 00db | | Load_Top At_Offset_3 0f97 01cc | | Execute Vector,Catenate 0f98 e015 | | Load 0x0,0x15 0f99 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0f9a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0f9b 0000 0000 | | .BLANK 0000[0x5] 0fa0 ; -------------------------------------------------------------------------------------- 0fa0 ; SUBPROGRAM 0fa0 ; -------------------------------------------------------------------------------------- 0fa0 0fa3 | | .CONST 0x0fa3 ; Address of begin 0fa1 0004 | | .CONST 0x0004 ; Address of exception handler 0fa2 0001 | | .CONST 0x0001 ; Number of locals 0fa3 BODY_0fa0: 0fa3 INIT_0fa0: 0fa3 4601 |F | Jump_Case 0x2 0fa4 7801 |x | Jump 0xfa6 ; case 0x0 0fa5 7807 |x | Jump 0xfad ; case 0x1 0fa6 00da | | Load_Top At_Offset_2 0fa7 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0fa8 0125 | % | Execute Any,Set_Constraint 0fa9 00da | | Load_Top At_Offset_2 0faa 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0fab 1c00 | | Execute_Immediate Run_Utility,0x0 0fac 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0fad 00da | | Load_Top At_Offset_2 0fae 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0faf 0125 | % | Execute Any,Set_Constraint 0fb0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0fb1 0000 0000 | | .BLANK 0000[0x7] 0fb8 ; -------------------------------------------------------------------------------------- 0fb8 ; SUBPROGRAM 0fb8 ; -------------------------------------------------------------------------------------- 0fb8 0fbd | | .CONST 0x0fbd ; Address of begin 0fb9 0004 | | .CONST 0x0004 ; Address of exception handler 0fba 0002 | | .CONST 0x0002 ; Number of locals 0fbb INIT_0fb8: 0fbb e7ff | | Load 0x3,-0x1 0fbc 803c | < | Call 0x0,0x3c 0fbd BODY_0fb8: 0fbd 4801 |H | Short_Literal 0x1 0fbe 0092 104b | K| Action Push_String_Extended,0x104b ; "LOAD" 0fc0 4801 |H | Short_Literal 0x1 0fc1 00db | | Load_Top At_Offset_3 0fc2 8228 | ( | Call 0x1,0x28 0fc3 e01d | | Load 0x0,0x1d 0fc4 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0fc5 6839 |h9 | Jump_Zero 0xfff 0fc6 e605 | | Load 0x3,0x5 0fc7 701a |p | Jump_Nonzero 0xfe2 0fc8 e603 | | Load 0x3,0x3 0fc9 0322 | " | Declare_Variable Record 0fca 00d8 | | Load_Top At_Offset_0 0fcb 1c01 | | Execute_Immediate Run_Utility,0x1 0fcc e607 | | Load 0x3,0x7 0fcd 00d8 | | Load_Top At_Offset_0 0fce 00e3 | | Load_Encached Natural_Cache 0fcf 0260 | ` | Execute Discrete,In_Type 0fd0 7001 |p | Jump_Nonzero 0xfd2 0fd1 0801 | | Execute_Immediate Raise,0x1 0fd2 4802 |H | Short_Literal 0x2 0fd3 00db | | Load_Top At_Offset_3 0fd4 8228 | ( | Call 0x1,0x28 0fd5 e023 | # | Load 0x0,0x23 0fd6 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0fd7 00d9 | | Load_Top At_Offset_1 0fd8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0fd9 e602 | | Load 0x3,0x2 0fda 00d9 | | Load_Top At_Offset_1 0fdb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0fdc e602 | | Load 0x3,0x2 0fdd 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0fde a605 | | Store_Unchecked 0x3,0x5 0fdf e605 | | Load 0x3,0x5 0fe0 a604 | | Store_Unchecked 0x3,0x4 0fe1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0fe2 e603 | | Load 0x3,0x3 0fe3 0322 | " | Declare_Variable Record 0fe4 00d8 | | Load_Top At_Offset_0 0fe5 1c01 | | Execute_Immediate Run_Utility,0x1 0fe6 e607 | | Load 0x3,0x7 0fe7 00d8 | | Load_Top At_Offset_0 0fe8 00e3 | | Load_Encached Natural_Cache 0fe9 0260 | ` | Execute Discrete,In_Type 0fea 7001 |p | Jump_Nonzero 0xfec 0feb 0801 | | Execute_Immediate Raise,0x1 0fec 4802 |H | Short_Literal 0x2 0fed 00db | | Load_Top At_Offset_3 0fee 8228 | ( | Call 0x1,0x28 0fef e023 | # | Load 0x0,0x23 0ff0 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0ff1 00d9 | | Load_Top At_Offset_1 0ff2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0ff3 e602 | | Load 0x3,0x2 0ff4 00d9 | | Load_Top At_Offset_1 0ff5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0ff6 e602 | | Load 0x3,0x2 0ff7 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0ff8 e605 | | Load 0x3,0x5 0ff9 0227 | ' | Execute Access,All_Reference 0ffa 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0ffb e605 | | Load 0x3,0x5 0ffc 0227 | ' | Execute Access,All_Reference 0ffd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0ffe a605 | | Store_Unchecked 0x3,0x5 0fff 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1000 ; -------------------------------------------------------------------------------------- 1000 ; STRING TABLE 1000 ; -------------------------------------------------------------------------------------- 1000 00a0 | | .STRTAB 0x00a0->0x1050 ; "INDEX" 1001 00a3 | | .STRTAB 0x00a3->0x1052 ; "OFFSET" 1002 00a7 | | .STRTAB 0x00a7->0x1055 ; "NAME" 1003 00a9 | | .STRTAB 0x00a9->0x1057 ; "ROOTNAME" 1004 00af | | .STRTAB 0x00af->0x105b ; "EXTENSION" 1005 00b6 | | .STRTAB 0x00b6->0x1060 ; "SIZE" 1006 00b8 | | .STRTAB 0x00b8->0x1062 ; "DATE" 1007 00ba | | .STRTAB 0x00ba->0x1064 ; "KIND_FIELD" 1008 00c2 | | .STRTAB 0x00c2->0x1069 ; "VERSION" 1009 00c7 | | .STRTAB 0x00c7->0x106c ; "STATUS" 100a 00cb | | .STRTAB 0x00cb->0x106f ; "Selected contents of " 100b 00de | | .STRTAB 0x00de->0x107a ; "Contents of selected files in" 100c 00f9 | | .STRTAB 0x00f9->0x1088 ; "Deleted files in" 100d 0107 | | .STRTAB 0x0107->0x1090 ; "Selected contents of" 100e 0119 | | .STRTAB 0x0119->0x109a ; "Index Name Size Date Kind" 100f 0130 | 0 | .STRTAB 0x0130->0x10a7 ; "Displaying selected items in" 1010 014a | J | .STRTAB 0x014a->0x10b5 ; "st" 1011 014a | J | .STRTAB 0x014a->0x10b6 ; "Deleting files from" 1012 015b | [ | .STRTAB 0x015b->0x10bf ; "Undeleting files in" 1013 016c | l | .STRTAB 0x016c->0x10c9 ; "Removing duplicates from" 1014 0182 | | .STRTAB 0x0182->0x10d5 ; "Renaming selected entries in" 1015 019c | | .STRTAB 0x019c->0x10e3 ; "Copying selected files from" 1016 01b5 | | .STRTAB 0x01b5->0x10f0 ; "is not" 1017 01b9 | | .STRTAB 0x01b9->0x10f3 ; "'s size is different" 1018 01cb | | .STRTAB 0x01cb->0x10fd ; "'s create date is different" 1019 01e4 | | .STRTAB 0x01e4->0x110b ; "'s contents is different" 101a 01fa | | .STRTAB 0x01fa->0x1117 ; "Gathering selected files from" 101b 0215 | | .STRTAB 0x0215->0x1125 ; "?" 101c 0214 | | .STRTAB 0x0214->0x1126 ; "Spreading selected files from " 101d 0230 | 0 | .STRTAB 0x0230->0x1135 ; "Transfering selected files from " 101e 024e | N | .STRTAB 0x024e->0x1145 ; ": " 101f 024e | N | .STRTAB 0x024e->0x1146 ; "--" 1020 024e | N | .STRTAB 0x024e->0x1147 ; "Collecting file data from" 1021 0265 | e | .STRTAB 0x0265->0x1153 ; " files selected." 1022 0273 | s | .STRTAB 0x0273->0x115b ; "." 1023 0272 | r | .STRTAB 0x0272->0x115c ; ".XFER" 1024 0275 | u | .STRTAB 0x0275->0x115e ; "XFER_" 1025 0278 | x | .STRTAB 0x0278->0x1161 ; "//" 1026 0278 | x | .STRTAB 0x0278->0x1162 ; "Version" 1027 027d | } | .STRTAB 0x027d->0x1165 ; "Allow operator to enter CLI immediately : " 1028 02b2 | | .STRTAB 0x02b2->0x1181 ; "Allow editing of configuration : " 1029 02e7 | | .STRTAB 0x02e7->0x119c ; "Allow operator to enter CLI prior to starting cluster: " 102a 031c | | .STRTAB 0x031c->0x11b8 ; "Load Kernel Layer subsystems only : " 102b 0351 | Q | .STRTAB 0x0351->0x11d3 ; "<FROM STANDARD>" 102c 035e | ^ | .STRTAB 0x035e->0x11db ; "Test" 102d 0360 | ` | .STRTAB 0x0360->0x11dd ; "Test Microcode" 102e 036c | l | .STRTAB 0x036c->0x11e4 ; "Passes: " 102f 0372 | r | .STRTAB 0x0372->0x11e8 ; "Autoboot Kernel Debugger : " 1030 039c | | .STRTAB 0x039c->0x11fe ; "Enable remote Kernel Debugging : " 1031 03c6 | | .STRTAB 0x03c6->0x1214 ; "Require operator for Kernel Debugging : " 1032 03f0 | | .STRTAB 0x03f0->0x122a ; "Enable remote Environment Debugging : " 1033 041a | | .STRTAB 0x041a->0x1240 ; "Require operator for Environment Debugging: " 1034 0444 | D | .STRTAB 0x0444->0x1256 ; "Autoboot EEDB : " 1035 046e | n | .STRTAB 0x046e->0x126c ; "Autoboot Kernel : " 1036 0498 | | .STRTAB 0x0498->0x1282 ; "Microcode" 1037 049f | | .STRTAB 0x049f->0x1286 ; "Sts" 1038 04a0 | | .STRTAB 0x04a0->0x1288 ; "Index" 1039 04a3 | | .STRTAB 0x04a3->0x128a ; "Offset" 103a 04a7 | | .STRTAB 0x04a7->0x128d ; "File Name" 103b 04ae | | .STRTAB 0x04ae->0x1292 ; "Root Name" 103c 04b5 | | .STRTAB 0x04b5->0x1296 ; "Ext." 103d 04b7 | | .STRTAB 0x04b7->0x1298 ; "Size" 103e 04b9 | | .STRTAB 0x04b9->0x129a ; "Created" 103f 04be | | .STRTAB 0x04be->0x129e ; "Type" 1040 04c0 | | .STRTAB 0x04c0->0x12a0 ; "XX" 1041 04c0 | | .STRTAB 0x04c0->0x12a1 ; "OK" 1042 04c0 | | .STRTAB 0x04c0->0x12a2 ; "KRNL" 1043 04c2 | | .STRTAB 0x04c2->0x12a4 ; "PRGM" 1044 04c4 | | .STRTAB 0x04c4->0x12a6 ; "OTHR" 1045 04c6 | | .STRTAB 0x04c6->0x12a8 ; "<DEFAULT>" 1046 04cd | | .STRTAB 0x04cd->0x12ac ; "XXX" 1047 04ce | | .STRTAB 0x04ce->0x12ae ; "==>" 1048 04cf | | .STRTAB 0x04cf->0x12af ; " " 1049 04ce | | .STRTAB 0x04ce->0x12b0 ; " in file " 104a 04d5 | | .STRTAB 0x04d5->0x12b4 ; " => " 104b 04d7 | | .STRTAB 0x04d7->0x12b6 ; "LOAD" 104c 04d9 | | .STRTAB 0x04d9->0x12b8 ; ".MLOAD" 104d 04dd | | .STRTAB 0x04dd->0x12bb ; ", referenced by " 104e 04eb | | .STRTAB 0x04eb->0x12c3 ; ", is not in file" 104f 04f9 | | .STREND 0x04f9->0x12cb 1050 494e 4445 |INDE| .STRTAB_STRINGS 12cc 0000 0000 | | .BLANK 0000[0x4] 12d0 ; -------------------------------------------------------------------------------------- 12d0 ; Debug Table 12d0 ; -------------------------------------------------------------------------------------- 12d0 0004 0011 | | .DEBUG4 0x0004,0x0011,0xf222,0x0000,0x0001,0x0000 12d6 0000 0000 | | .BLANK 0000[0x12a]