|
|
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 - metrics - download
Length: 10240 (0x2800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0bf8df
└─⟦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 For_Outer_Call,Visible,Unelaborated,INIT_00c8
000d 029a 0133 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0130
000f 029a 014b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0148
0011 029a 017b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0178
0013 029a 018b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0188
0015 029a 01b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b0
0017 029a 01eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01e8
0019 029a 0213 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0210
001b 029a 023b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0238
001d 029a 02bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02b8
001f 029a 02e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02e0
0021 029a 030b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0308
0023 029a 033b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0338
0025 029a 036b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0368
0027 029a 03ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03a8
0029 029a 0483 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0480
002b 029a 04e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_04e0
002d 029a 0513 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0510
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 For_Call,INIT_0548
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 For_Call,INIT_0558
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 For_Outer_Call,INIT_0580
006b 029b 059b | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0598
006d 029d 05bb | | Declare_Subprogram For_Outer_Call,INIT_05b8
006f 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
0070 00c7 | | Action Elaborate_Subprogram
0071 029d 05fb | | Declare_Subprogram For_Outer_Call,INIT_05f8
0073 029d 060b | | Declare_Subprogram For_Outer_Call,INIT_0608
0075 029d 066b | k| Declare_Subprogram For_Outer_Call,INIT_0668
0077 029d 0673 | s| Declare_Subprogram For_Outer_Call,INIT_0670
0079 029d 069b | | Declare_Subprogram For_Outer_Call,INIT_0698
007b 029d 06b3 | | Declare_Subprogram For_Outer_Call,INIT_06b0
007d 029b 06d3 | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_06d0
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 For_Outer_Call,INIT_0768
0085 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0086 00c7 | | Action Elaborate_Subprogram
0087 029d 080b | | Declare_Subprogram For_Outer_Call,INIT_0808
0089 1d0f | | Execute_Immediate Reference_Lex_1,0xf
008a 00c7 | | Action Elaborate_Subprogram
008b 029d 0833 | 3| Declare_Subprogram For_Outer_Call,INIT_0830
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 | | PushFullAddress InMicrocode
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 For_Outer_Call,INIT_08c0
00b4 029d 08f3 | | Declare_Subprogram For_Outer_Call,INIT_08f0
00b6 029d 0923 | #| Declare_Subprogram For_Outer_Call,INIT_0920
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 For_Outer_Call,INIT_0950
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_Subprogram 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_Subprogram 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 For_Call,INIT_0998
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_Subprogram 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_Subprogram 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 For_Call,INIT_09f8
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 | | PushFullAddress InMicrocode
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_Subprogram 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 For_Call,INIT_0a10
01b5 029f 0a23 | #| Declare_Subprogram For_Call,INIT_0a20
01b7 029f 0a4b | K| Declare_Subprogram For_Call,INIT_0a48
01b9 029f 0a8b | | Declare_Subprogram For_Call,INIT_0a88
01bb 029f 0aab | | Declare_Subprogram For_Call,INIT_0aa8
01bd 029f 0aeb | | Declare_Subprogram For_Call,INIT_0ae8
01bf 029f 0b03 | | Declare_Subprogram For_Call,INIT_0b00
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 | | PushFullAddress InMicrocode
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_Subprogram 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 For_Call,INIT_0b38
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 | | PushFullAddress InMicrocode
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_Subprogram 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 For_Call,INIT_0b48
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 | | PushFullAddress InMicrocode
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_Subprogram 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 For_Call,INIT_0b90
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 For_Call,INIT_0bb8
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 For_Call,INIT_0bc8
025b 029f 0bf3 | | Declare_Subprogram For_Call,INIT_0bf0
025d 029f 0c1b | | Declare_Subprogram For_Call,INIT_0c18
025f 029f 0c4b | K| Declare_Subprogram For_Call,INIT_0c48
0261 029f 0cb3 | | Declare_Subprogram For_Call,INIT_0cb0
0263 a01a | | Reference 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 | | PushFullAddress InMicrocode
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 For_Call,INIT_0cc0
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 | | PushFullAddress InMicrocode
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 For_Call,INIT_0ce0
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_Subprogram 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 For_Call,INIT_0d18
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 | | PushFullAddress InMicrocode
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_Subprogram 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 For_Call,INIT_0d28
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 | | PushFullAddress InMicrocode
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_Subprogram 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 For_Call,INIT_0d38
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 | | PushFullAddress InMicrocode
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_Subprogram 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 For_Call,INIT_0d60
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 | | PushFullAddress InMicrocode
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_Subprogram 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 For_Call,INIT_0d80
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 | | PushFullAddress InMicrocode
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_Subprogram 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 For_Call,INIT_0d90
03c1 029f 0db3 | | Declare_Subprogram For_Call,INIT_0db0
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_Subprogram 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 For_Call,INIT_0de0
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 | | PushFullAddress InMicrocode
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_Subprogram 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 For_Call,INIT_0e10
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 | | PushFullAddress InMicrocode
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_Subprogram 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 For_Call,INIT_0e78
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 | | PushFullAddress InMicrocode
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_Subprogram 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 0x1
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,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,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 0x5
055c 7804 |x | Jump 0x561 ; case 0x0
055d 7810 |x | Jump 0x56e ; case 0x1
055e 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x2
055f 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x3
0560 4302 |C | Exit_Subprogram From_Utility,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,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,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_Result,0x2
0590 4800 |H | Short_Literal 0x0
0591 4402 |D | Exit_Subprogram With_Result,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 For_Call,INIT_0eb0
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_Result,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_Result,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_Result,0x2
05f3 00ea | | Load_Encached Null_String_Cache
05f4 4402 |D | Exit_Subprogram With_Result,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_Result,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_Subprogram 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_Subprogram 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_Result,0x1
068e 0092 101b | | Action Push_String_Extended,0x101b ; "?"
0690 4401 |D | Exit_Subprogram With_Result,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_Result,0x4
06ad 4801 |H | Short_Literal 0x1
06ae 4404 |D | Exit_Subprogram With_Result,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_Result,0x1
06c9 00db | | Load_Top At_Offset_3
06ca 4401 |D | Exit_Subprogram With_Result,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 For_Call,INIT_0ec8
06e7 029f 0ee3 | | Declare_Subprogram For_Call,INIT_0ee0
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_Subprogram 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_Subprogram 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_Subprogram 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_Result,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_Result,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 For_Call,INIT_0f60
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 | | PushFullAddress InMicrocode
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 For_Call,INIT_0f78
0858 a038 | 8 | Reference 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_Result,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_Result,0x3
08ec 00db | | Load_Top At_Offset_3
08ed 4403 |D | Exit_Subprogram With_Result,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_Result,0x2
091b 00db | | Load_Top At_Offset_3
091c 4402 |D | Exit_Subprogram With_Result,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_Result,0x2
094d 00db | | Load_Top At_Offset_3
094e 4402 |D | Exit_Subprogram With_Result,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_Result,0x1
096e 4800 |H | Short_Literal 0x0
096f 4401 |D | Exit_Subprogram With_Result,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_Result,0x1
0992 4800 |H | Short_Literal 0x0
0993 4401 |D | Exit_Subprogram With_Result,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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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 For_Call,INIT_0f88
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_Subprogram 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 0x7
0b94 4302 |C | Exit_Subprogram From_Utility,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,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,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,0x1
0baa 00db | | Load_Top At_Offset_3
0bab 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0bac 00db | | Load_Top At_Offset_3
0bad 4202 |B | Exit_Subprogram From_Utility,With_Result,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,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,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 0x1
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,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,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_Result,0x1
0be7 00d9 | | Load_Top At_Offset_1
0be8 4401 |D | Exit_Subprogram With_Result,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_Result,0x1
0c0f 00ea | | Load_Encached Null_String_Cache
0c10 4401 |D | Exit_Subprogram With_Result,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 0x9
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_Result,0x1
0c2a 0092 1038 | 8| Action Push_String_Extended,0x1038 ; "Index"
0c2c 4401 |D | Exit_Subprogram With_Result,0x1
0c2d 0092 1039 | 9| Action Push_String_Extended,0x1039 ; "Offset"
0c2f 4401 |D | Exit_Subprogram With_Result,0x1
0c30 0092 103a | :| Action Push_String_Extended,0x103a ; "File Name"
0c32 4401 |D | Exit_Subprogram With_Result,0x1
0c33 0092 103b | ;| Action Push_String_Extended,0x103b ; "Root Name"
0c35 4401 |D | Exit_Subprogram With_Result,0x1
0c36 0092 103c | <| Action Push_String_Extended,0x103c ; "Ext."
0c38 4401 |D | Exit_Subprogram With_Result,0x1
0c39 0092 103d | =| Action Push_String_Extended,0x103d ; "Size"
0c3b 4401 |D | Exit_Subprogram With_Result,0x1
0c3c 0092 103e | >| Action Push_String_Extended,0x103e ; "Created"
0c3e 4401 |D | Exit_Subprogram With_Result,0x1
0c3f 0092 103f | ?| Action Push_String_Extended,0x103f ; "Type"
0c41 4401 |D | Exit_Subprogram With_Result,0x1
0c42 0092 1026 | &| Action Push_String_Extended,0x1026 ; "Version"
0c44 4401 |D | Exit_Subprogram With_Result,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 0x9
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_Result,0x2
0c5e 0092 1041 | A| Action Push_String_Extended,0x1041 ; "OK"
0c60 4402 |D | Exit_Subprogram With_Result,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_Result,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_Result,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_Result,0x2
0c7a 00da | | Load_Top At_Offset_2
0c7b 8408 | | Call 0x2,0x8
0c7c 4402 |D | Exit_Subprogram With_Result,0x2
0c7d 00da | | Load_Top At_Offset_2
0c7e 8409 | | Call 0x2,0x9
0c7f 4402 |D | Exit_Subprogram With_Result,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_Result,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_Result,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_Result,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_Result,0x2
0ca0 0092 1044 | D| Action Push_String_Extended,0x1044 ; "OTHR"
0ca2 4402 |D | Exit_Subprogram With_Result,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_Result,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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Result,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 0x79d
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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Result,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 For_Call,INIT_0fa0
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 For_Call,INIT_0fb8
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_Subprogram 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_Subprogram 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_Result,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_Subprogram 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 0x1
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,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,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_Subprogram 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_Subprogram 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"
; "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"
; "is not"
; "is not"
; "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"
; "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"
; "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[0x29]
12ff 00c4 c0c0 | | .XXX[0x1d]
1301 d8d8 d000 | |
1303 00c0 c0c0 | |
1305 d0c4 d800 | |
1307 00c0 c0c0 | |
1309 c0c0 c000 | |
130b 00c0 c0c0 | |
130d c0c0 d4cc | |
130f d8dc c8d0 | |
1311 00c0 d0dc | |
1313 dcd8 c0c0 | |
1315 d4c4 c0cc | |
1317 00c0 c0dc | |
1319 c8c0 cc00 | |
131b 80c0 | |
131c 0000 0000 | | .BLANK 0000[0x32]
134e 8080 8080 | | .XXX[0x3]
1350 80c0 | |
1351 0000 0000 | | .BLANK 0000[0x29]
137a 0080 c400 | | .XXX[0x4]
137c 80c0 0080 | |
137e 0000 0000 | | .BLANK 0000[0x4f]
13cd 0084 f185 | | .XXX[0x33]
13cf c98d a0f8 | |
13d1 297d 7cb9 |)}| |
13d3 4d65 3511 |Me5 |
13d5 1518 8080 | |
13d7 8080 8080 | |
13d9 80d8 dcc0 | |
13db d4d8 d8e4 | |
13dd e0d0 8080 | |
13df 80c8 dcc0 | |
13e1 8080 80c0 | |
13e3 8080 8080 | |
13e5 80c4 c0c0 | |
13e7 d8d0 d080 | |
13e9 80dc dce4 | |
13eb c080 8080 | |
13ed 8080 8180 | |
13ef 28c0 2400 |( $ |
13f1 0000 0000 | |
13f3 02c8 7800 | x |
13f5 0028 0000 | ( |
13f7 02c8 7800 | x |
13f9 0054 0000 | T |
13fb 02c8 7800 | x |
13fd 007c 0000 | | |
13ff 02c8 | |