|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦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 05d0 | | .CONST 0x05d0 ; 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 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 006e | n | .CONST 0x006e ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0055 | U | .CONST 0x0055 ; Number of locals
000b INIT_0008:
000b 00c4 | | Action Make_Default
000c 00c4 | | Action Make_Default
000d 00c4 | | Action Make_Default
000e 00c4 | | Action Make_Default
000f 00c4 | | Action Make_Default
0010 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 00c4 | | Action Make_Default
0013 00c4 | | Action Make_Default
0014 00c4 | | Action Make_Default
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 00c4 | | Action Make_Default
0027 00c4 | | Action Make_Default
0028 00c4 | | Action Make_Default
0029 00c4 | | Action Make_Default
002a 00c4 | | Action Make_Default
002b 00c4 | | Action Make_Default
002c 00c4 | | Action Make_Default
002d 00c4 | | Action Make_Default
002e 00c4 | | Action Make_Default
002f 00c4 | | Action Make_Default
0030 00c4 | | Action Make_Default
0031 00c4 | | Action Make_Default
0032 00c4 | | Action Make_Default
0033 00c4 | | Action Make_Default
0034 00c4 | | Action Make_Default
0035 00c4 | | Action Make_Default
0036 00c4 | | Action Make_Default
0037 00c4 | | Action Make_Default
0038 00c4 | | Action Make_Default
0039 00c4 | | Action Make_Default
003a 00c4 | | Action Make_Default
003b 00c4 | | Action Make_Default
003c 00c4 | | Action Make_Default
003d 00c4 | | Action Make_Default
003e 00c4 | | Action Make_Default
003f 00c4 | | Action Make_Default
0040 00c4 | | Action Make_Default
0041 00c4 | | Action Make_Default
0042 00c4 | | Action Make_Default
0043 00c4 | | Action Make_Default
0044 00c4 | | Action Make_Default
0045 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated
0047 c240 | @ | Store 0x1,0x40
0048 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated
004a c246 | F | Store 0x1,0x46
004b 00bf | | Action Accept_Activation
004c 029d 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call
004e 029d 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call
0050 029d 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call
0052 029d 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call
0054 029d 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call
0056 029d 019b | | Declare_Subprogram INIT_0198,For_Outer_Call
0058 029d 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call
005a 029d 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call
005c 029d 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call
005e 029d 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call
0060 029d 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call
0062 029d 029b | | Declare_Subprogram INIT_0298,For_Outer_Call
0064 029d 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call
0066 029d 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call
0068 029d 0313 | | Declare_Subprogram INIT_0310,For_Outer_Call
006a 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40
006b 00c7 | | Action Elaborate_Subprogram
006c 1d46 | F | Execute_Immediate Reference_Lex_1,0x46
006d 00c7 | | Action Elaborate_Subprogram
006e BODY_0008:
006e 00bc | | Action Signal_Activated
006f 00bb | | Action Signal_Completion
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 007e | ~ | .CONST 0x007e ; Address of begin
0071 0094 | | .CONST 0x0094 ; Address of exception handler
0072 0004 | | .CONST 0x0004 ; Number of locals
0073 INIT_0070:
0073 00da | | Load_Top At_Offset_2
0074 e001 | | Load 0x0,0x1
0075 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0076 e002 | | Load 0x0,0x2
0077 1b37 | 7 | Execute Package,Field_Read,Field_Number 0x37
0078 011e | | Execute Any,Convert
0079 00d8 | | Load_Top At_Offset_0
007a e002 | | Load 0x0,0x2
007b 1861 | a | Execute Package,Field_Execute,Field_Number 0x61
007c e003 | | Load 0x0,0x3
007d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
007e BODY_0070:
007e 00cf | | Action Mark_Auxiliary
007f 00da | | Load_Top At_Offset_2
0080 01d9 | | Execute Vector,Reverse_Bounds
0081 0263 | c | Execute Discrete,Above_Bound
0082 7010 |p | Jump_Nonzero 0x93
0083 00db | | Load_Top At_Offset_3
0084 e5fe | | Load 0x2,-0x2
0085 00da | | Load_Top At_Offset_2
0086 e403 | | Load 0x2,0x3
0087 01d7 | | Execute Vector,Field_Read
0088 e5ff | | Load 0x2,-0x1
0089 8255 | U | Call 0x1,0x55
008a c404 | | Store 0x2,0x4
008b 00db | | Load_Top At_Offset_3
008c 6804 |h | Jump_Zero 0x91
008d 00db | | Load_Top At_Offset_3
008e a5fd | | Store_Unchecked 0x2,-0x3
008f 00d2 | | Pop_Control Pop_Count_2
0090 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0091 00c8 | | Action Pop_Auxiliary_Range
0092 3ff0 |? | Loop_Increasing 0x83
0093 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0094 TRAP_0070:
0094 0007 | | Action Break_Optional
0095 e5fe | | Load 0x2,-0x2
0096 0092 0525 | %| Action Push_String_Extended,0x525 ; "Associated_Files.Check_Files"
0098 e004 | | Load 0x0,0x4
0099 180f | | Execute Package,Field_Execute,Field_Number 0xf
009a e005 | | Load 0x0,0x5
009b 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
009c 6007 |` | Indirect_Literal Discrete,0xa4,{0x00000000, 0x0000813b}
009d e003 | | Load 0x0,0x3
009e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
009f a5fd | | Store_Unchecked 0x2,-0x3
00a0 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00a1 0000 0000 | | .XXX[0x3]
00a3 0000 | |
00a4 0000 0000 | | .LITERAL {0x00000000, 0x0000813b}
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ae | | .CONST 0x00ae ; Address of begin
00a9 011e | | .CONST 0x011e ; Address of exception handler
00aa 0002 | | .CONST 0x0002 ; Number of locals
00ab INIT_00a8:
00ab e003 | | Load 0x0,0x3
00ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ad 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00ae BODY_00a8:
00ae 00db | | Load_Top At_Offset_3
00af e5fd | | Load 0x2,-0x3
00b0 e5fe | | Load 0x2,-0x2
00b1 e5f3 | | Load 0x2,-0xd
00b2 e5fa | | Load 0x2,-0x6
00b3 e5f9 | | Load 0x2,-0x7
00b4 e5f8 | | Load 0x2,-0x8
00b5 e5fb | | Load 0x2,-0x5
00b6 e5fc | | Load 0x2,-0x4
00b7 e006 | | Load 0x0,0x6
00b8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00b9 7019 |p | Jump_Nonzero 0xd3
00ba e5f4 | | Load 0x2,-0xc
00bb 4801 |H | Short_Literal 0x1
00bc 4801 |H | Short_Literal 0x1
00bd e005 | | Load 0x0,0x5
00be 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00bf 0334 | 4 | Declare_Variable Array,With_Constraint
00c0 e5fc | | Load 0x2,-0x4
00c1 e007 | | Load 0x0,0x7
00c2 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
00c3 e005 | | Load 0x0,0x5
00c4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00c5 0119 | | Execute Any,Check_In_Formal_Type
00c6 4801 |H | Short_Literal 0x1
00c7 00da | | Load_Top At_Offset_2
00c8 01d6 | | Execute Vector,Field_Write
00c9 6066 |`f | Indirect_Literal Discrete,0x130,{0x00000000, 0x000081c3}
00ca e003 | | Load 0x0,0x3
00cb 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
00cc e005 | | Load 0x0,0x5
00cd 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
00ce 6061 |`a | Indirect_Literal Discrete,0x130,{0x00000000, 0x000081c3}
00cf e003 | | Load 0x0,0x3
00d0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00d1 a5f2 | | Store_Unchecked 0x2,-0xe
00d2 450d |E | Exit_Suprogram New_Top_Offset 0xd
00d3 e5f4 | | Load 0x2,-0xc
00d4 e5f5 | | Load 0x2,-0xb
00d5 e5f6 | | Load 0x2,-0xa
00d6 e5fc | | Load 0x2,-0x4
00d7 e5fd | | Load 0x2,-0x3
00d8 e5fe | | Load 0x2,-0x2
00d9 e5ff | | Load 0x2,-0x1
00da 8252 | R | Call 0x1,0x52
00db 4802 |H | Short_Literal 0x2
00dc e5fd | | Load 0x2,-0x3
00dd 01d7 | | Execute Vector,Field_Read
00de 7014 |p | Jump_Nonzero 0xf3
00df 00d8 | | Load_Top At_Offset_0
00e0 e5f3 | | Load 0x2,-0xd
00e1 e5f4 | | Load 0x2,-0xc
00e2 e5f5 | | Load 0x2,-0xb
00e3 e5f6 | | Load 0x2,-0xa
00e4 e5f7 | | Load 0x2,-0x9
00e5 e5fa | | Load 0x2,-0x6
00e6 e5fb | | Load 0x2,-0x5
00e7 e5ff | | Load 0x2,-0x1
00e8 e008 | | Load 0x0,0x8
00e9 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
00ea e008 | | Load 0x0,0x8
00eb 1879 | y | Execute Package,Field_Execute,Field_Number 0x79
00ec e5fc | | Load 0x2,-0x4
00ed e5fd | | Load 0x2,-0x3
00ee e5fe | | Load 0x2,-0x2
00ef e5ff | | Load 0x2,-0x1
00f0 8254 | T | Call 0x1,0x54
00f1 c5f3 | | Store 0x2,-0xd
00f2 0059 | Y | Store_Top Discrete,At_Offset_1
00f3 00d8 | | Load_Top At_Offset_0
00f4 6803 |h | Jump_Zero 0xf8
00f5 00d8 | | Load_Top At_Offset_0
00f6 a5f2 | | Store_Unchecked 0x2,-0xe
00f7 450d |E | Exit_Suprogram New_Top_Offset 0xd
00f8 00db | | Load_Top At_Offset_3
00f9 e5fd | | Load 0x2,-0x3
00fa e5fe | | Load 0x2,-0x2
00fb e5f3 | | Load 0x2,-0xd
00fc e5fa | | Load 0x2,-0x6
00fd e5f9 | | Load 0x2,-0x7
00fe e5f8 | | Load 0x2,-0x8
00ff e5fb | | Load 0x2,-0x5
0100 e5fc | | Load 0x2,-0x4
0101 e006 | | Load 0x0,0x6
0102 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0103 7019 |p | Jump_Nonzero 0x11d
0104 e5f4 | | Load 0x2,-0xc
0105 4801 |H | Short_Literal 0x1
0106 4801 |H | Short_Literal 0x1
0107 e005 | | Load 0x0,0x5
0108 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0109 0334 | 4 | Declare_Variable Array,With_Constraint
010a e5fc | | Load 0x2,-0x4
010b e007 | | Load 0x0,0x7
010c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
010d e005 | | Load 0x0,0x5
010e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
010f 0119 | | Execute Any,Check_In_Formal_Type
0110 4801 |H | Short_Literal 0x1
0111 00da | | Load_Top At_Offset_2
0112 01d6 | | Execute Vector,Field_Write
0113 6018 |` | Indirect_Literal Discrete,0x12c,{0x00000000, 0x000081c4}
0114 e003 | | Load 0x0,0x3
0115 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0116 e005 | | Load 0x0,0x5
0117 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0118 6013 |` | Indirect_Literal Discrete,0x12c,{0x00000000, 0x000081c4}
0119 e003 | | Load 0x0,0x3
011a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
011b a5f2 | | Store_Unchecked 0x2,-0xe
011c 450d |E | Exit_Suprogram New_Top_Offset 0xd
011d 450d |E | Exit_Suprogram New_Top_Offset 0xd
011e TRAP_00a8:
011e 0007 | | Action Break_Optional
011f e5f4 | | Load 0x2,-0xc
0120 0092 0526 | &| Action Push_String_Extended,0x526 ; "Associated_Files.Destroy_And_Retrieve"
0122 e004 | | Load 0x0,0x4
0123 180f | | Execute Package,Field_Execute,Field_Number 0xf
0124 e005 | | Load 0x0,0x5
0125 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0126 677d |g} | Indirect_Literal Discrete,0xa4,{0x00000000, 0x0000813b}
0127 e003 | | Load 0x0,0x3
0128 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0129 a5f2 | | Store_Unchecked 0x2,-0xe
012a 450d |E | Exit_Suprogram New_Top_Offset 0xd
012b 0000 | | .XXX[0x1]
012c 0000 0000 | | .LITERAL {0x00000000, 0x000081c4}
0130 0000 0000 | | .LITERAL {0x00000000, 0x000081c3}
0134 0000 0000 | | .BLANK 0000[0x4]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b | ; | .CONST 0x013b ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0001 | | .CONST 0x0001 ; Number of locals
013b BODY_0138:
013b INIT_0138:
013b 00da | | Load_Top At_Offset_2
013c e002 | | Load 0x0,0x2
013d 1b15 | | Execute Package,Field_Read,Field_Number 0x15
013e 011c | | Execute Any,Convert_Unchecked
013f 1c01 | | Execute_Immediate Run_Utility,0x1
0140 e008 | | Load 0x0,0x8
0141 1bc6 | | Execute Package,Field_Read,Field_Number 0xc6
0142 1c02 | | Execute_Immediate Run_Utility,0x2
0143 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0144 0000 0000 | | .BLANK 0000[0x4]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b 00da | | Load_Top At_Offset_2
014c e008 | | Load 0x0,0x8
014d 1bc6 | | Execute Package,Field_Read,Field_Number 0xc6
014e 011c | | Execute Any,Convert_Unchecked
014f 1c01 | | Execute_Immediate Run_Utility,0x1
0150 e002 | | Load 0x0,0x2
0151 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0152 1c02 | | Execute_Immediate Run_Utility,0x2
0153 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0154 0000 0000 | | .BLANK 0000[0x4]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b | [ | .CONST 0x015b ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0001 | | .CONST 0x0001 ; Number of locals
015b BODY_0158:
015b INIT_0158:
015b 00da | | Load_Top At_Offset_2
015c e002 | | Load 0x0,0x2
015d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
015e 011c | | Execute Any,Convert_Unchecked
015f 1c01 | | Execute_Immediate Run_Utility,0x1
0160 e008 | | Load 0x0,0x8
0161 1bc4 | | Execute Package,Field_Read,Field_Number 0xc4
0162 1c02 | | Execute_Immediate Run_Utility,0x2
0163 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0164 0000 0000 | | .BLANK 0000[0x4]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b | k | .CONST 0x016b ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0001 | | .CONST 0x0001 ; Number of locals
016b BODY_0168:
016b INIT_0168:
016b 00db | | Load_Top At_Offset_3
016c 0092 0527 | '| Action Push_String_Extended,0x527 ; ".<"
016e 01cc | | Execute Vector,Catenate
016f 00db | | Load_Top At_Offset_3
0170 e002 | | Load 0x0,0x2
0171 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0172 01cc | | Execute Vector,Catenate
0173 0092 0528 | (| Action Push_String_Extended,0x528 ; ">"
0175 01cc | | Execute Vector,Catenate
0176 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0177 0000 | | .XXX[0x1]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 0190 | | .CONST 0x0190 ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0008 | | .CONST 0x0008 ; Number of locals
017b INIT_0178:
017b e5fd | | Load 0x2,-0x3
017c e009 | | Load 0x0,0x9
017d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
017e 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
017f e5fd | | Load 0x2,-0x3
0180 e009 | | Load 0x0,0x9
0181 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0182 1844 | D | Execute Package,Field_Execute,Field_Number 0x44
0183 e5ff | | Load 0x2,-0x1
0184 e002 | | Load 0x0,0x2
0185 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
0186 e5ff | | Load 0x2,-0x1
0187 e002 | | Load 0x0,0x2
0188 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0189 e5ff | | Load 0x2,-0x1
018a e002 | | Load 0x0,0x2
018b 1848 | H | Execute Package,Field_Execute,Field_Number 0x48
018c 029f 0393 | | Declare_Subprogram INIT_0390,For_Call
018e 029f 03cb | | Declare_Subprogram INIT_03c8,For_Call
0190 BODY_0178:
0190 8408 | | Call 0x2,0x8
0191 0831 | 1 | Execute_Immediate Raise,0x31
0192 0000 0000 | | .BLANK 0000[0x6]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 01a4 | | .CONST 0x01a4 ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0003 | | .CONST 0x0003 ; Number of locals
019b INIT_0198:
019b 00da | | Load_Top At_Offset_2
019c e002 | | Load 0x0,0x2
019d 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
019e 4800 |H | Short_Literal 0x0
019f 00d9 | | Load_Top At_Offset_1
01a0 0092 0529 | )| Action Push_String_Extended,0x529 ; "&"
01a2 e00a | | Load 0x0,0xa
01a3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01a4 BODY_0198:
01a4 00d9 | | Load_Top At_Offset_1
01a5 01dd | | Execute Vector,First
01a6 00d9 | | Load_Top At_Offset_1
01a7 0aff | | Execute_Immediate Plus,-0x1
01a8 00db | | Load_Top At_Offset_3
01a9 01cf | | Execute Vector,Slice_Read
01aa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01ab 0000 0000 | | .BLANK 0000[0x5]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01bc | | .CONST 0x01bc ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0003 | | .CONST 0x0003 ; Number of locals
01b3 INIT_01b0:
01b3 00da | | Load_Top At_Offset_2
01b4 e002 | | Load 0x0,0x2
01b5 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
01b6 4800 |H | Short_Literal 0x0
01b7 00d9 | | Load_Top At_Offset_1
01b8 0092 0529 | )| Action Push_String_Extended,0x529 ; "&"
01ba e00a | | Load 0x0,0xa
01bb 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01bc BODY_01b0:
01bc 00d8 | | Load_Top At_Offset_0
01bd 0a01 | | Execute_Immediate Plus,0x1
01be 00d8 | | Load_Top At_Offset_0
01bf 00e2 | | Load_Encached Integer_Cache
01c0 0260 | ` | Execute Discrete,In_Type
01c1 7001 |p | Jump_Nonzero 0x1c3
01c2 0801 | | Execute_Immediate Raise,0x1
01c3 00da | | Load_Top At_Offset_2
01c4 01dc | | Execute Vector,Last
01c5 00db | | Load_Top At_Offset_3
01c6 01cf | | Execute Vector,Slice_Read
01c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d2 | | .CONST 0x01d2 ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0002 | | .CONST 0x0002 ; Number of locals
01cb INIT_01c8:
01cb e002 | | Load 0x0,0x2
01cc 1b37 | 7 | Execute Package,Field_Read,Field_Number 0x37
01cd 02c7 | | Declare_Variable Any
01ce 00db | | Load_Top At_Offset_3
01cf e001 | | Load 0x0,0x1
01d0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01d1 a402 | | Store_Unchecked 0x2,0x2
01d2 BODY_01c8:
01d2 e5fe | | Load 0x2,-0x2
01d3 e002 | | Load 0x0,0x2
01d4 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
01d5 4602 |F | Jump_Case 0x3
01d6 7805 |x | Jump 0x1dc ; case 0x0
01d7 7809 |x | Jump 0x1e1 ; case 0x1
01d8 7800 |x | Jump 0x1d9 ; case 0x2
01d9 e5fe | | Load 0x2,-0x2
01da 824d | M | Call 0x1,0x4d
01db 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
01dc e5fd | | Load 0x2,-0x3
01dd e5fe | | Load 0x2,-0x2
01de 00da | | Load_Top At_Offset_2
01df 824b | K | Call 0x1,0x4b
01e0 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
01e1 e5fc | | Load 0x2,-0x4
01e2 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
01e3 0000 0000 | | .BLANK 0000[0x5]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01fb | | .CONST 0x01fb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0005 | | .CONST 0x0005 ; Number of locals
01eb INIT_01e8:
01eb e002 | | Load 0x0,0x2
01ec 1b37 | 7 | Execute Package,Field_Read,Field_Number 0x37
01ed 02c7 | | Declare_Variable Any
01ee 00db | | Load_Top At_Offset_3
01ef e001 | | Load 0x0,0x1
01f0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01f1 a402 | | Store_Unchecked 0x2,0x2
01f2 00d8 | | Load_Top At_Offset_0
01f3 e002 | | Load 0x0,0x2
01f4 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
01f5 00d9 | | Load_Top At_Offset_1
01f6 e002 | | Load 0x0,0x2
01f7 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
01f8 00da | | Load_Top At_Offset_2
01f9 e002 | | Load 0x0,0x2
01fa 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
01fb BODY_01e8:
01fb e5fd | | Load 0x2,-0x3
01fc 01db | | Execute Vector,Length
01fd 7002 |p | Jump_Nonzero 0x200
01fe e5fe | | Load 0x2,-0x2
01ff 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0200 e5fe | | Load 0x2,-0x2
0201 01dd | | Execute Vector,First
0202 e5fe | | Load 0x2,-0x2
0203 01dc | | Execute Vector,Last
0204 00db | | Load_Top At_Offset_3
0205 01db | | Execute Vector,Length
0206 0272 | r | Execute Discrete,Minus
0207 00d8 | | Load_Top At_Offset_0
0208 00e2 | | Load_Encached Integer_Cache
0209 0260 | ` | Execute Discrete,In_Type
020a 7001 |p | Jump_Nonzero 0x20c
020b 0801 | | Execute_Immediate Raise,0x1
020c e5fe | | Load 0x2,-0x2
020d 01cf | | Execute Vector,Slice_Read
020e e5fd | | Load 0x2,-0x3
020f 01dd | | Execute Vector,First
0210 e403 | | Load 0x2,0x3
0211 01db | | Execute Vector,Length
0212 0273 | s | Execute Discrete,Plus
0213 00d8 | | Load_Top At_Offset_0
0214 00e2 | | Load_Encached Integer_Cache
0215 0260 | ` | Execute Discrete,In_Type
0216 7001 |p | Jump_Nonzero 0x218
0217 0801 | | Execute_Immediate Raise,0x1
0218 e5fd | | Load 0x2,-0x3
0219 01dc | | Execute Vector,Last
021a e5fd | | Load 0x2,-0x3
021b 01cf | | Execute Vector,Slice_Read
021c 01cc | | Execute Vector,Catenate
021d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
021e 0000 0000 | | .XXX[0x2]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 022f | / | .CONST 0x022f ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0004 | | .CONST 0x0004 ; Number of locals
0223 INIT_0220:
0223 e008 | | Load 0x0,0x8
0224 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
0225 0322 | " | Declare_Variable Record
0226 e5fe | | Load 0x2,-0x2
0227 e008 | | Load 0x0,0x8
0228 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0229 00d9 | | Load_Top At_Offset_1
022a 017d | } | Execute Record,Structure_Write
022b 00db | | Load_Top At_Offset_3
022c 824c | L | Call 0x1,0x4c
022d 029f 03fb | | Declare_Subprogram INIT_03f8,For_Call
022f BODY_0220:
022f e5ff | | Load 0x2,-0x1
0230 e002 | | Load 0x0,0x2
0231 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0232 e5ff | | Load 0x2,-0x1
0233 e002 | | Load 0x0,0x2
0234 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0235 0279 | y | Execute Discrete,And
0236 6801 |h | Jump_Zero 0x238
0237 8404 | | Call 0x2,0x4
0238 00d9 | | Load_Top At_Offset_1
0239 e5fb | | Load 0x2,-0x5
023a e5fe | | Load 0x2,-0x2
023b 824f | O | Call 0x1,0x4f
023c e5fc | | Load 0x2,-0x4
023d e5fd | | Load 0x2,-0x3
023e e5ff | | Load 0x2,-0x1
023f e5fe | | Load 0x2,-0x2
0240 824e | N | Call 0x1,0x4e
0241 e5ff | | Load 0x2,-0x1
0242 e002 | | Load 0x0,0x2
0243 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0244 e402 | | Load 0x2,0x2
0245 e008 | | Load 0x0,0x8
0246 187c | | | Execute Package,Field_Execute,Field_Number 0x7c
0247 01cc | | Execute Vector,Catenate
0248 e402 | | Load 0x2,0x2
0249 e008 | | Load 0x0,0x8
024a 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
024b 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
024c 0000 0000 | | .BLANK 0000[0x4]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 026e | n | .CONST 0x026e ; Address of begin
0251 0285 | | .CONST 0x0285 ; Address of exception handler
0252 0006 | | .CONST 0x0006 ; Number of locals
0253 INIT_0250:
0253 00da | | Load_Top At_Offset_2
0254 e001 | | Load 0x0,0x1
0255 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0256 e002 | | Load 0x0,0x2
0257 1b37 | 7 | Execute Package,Field_Read,Field_Number 0x37
0258 011e | | Execute Any,Convert
0259 00d8 | | Load_Top At_Offset_0
025a e002 | | Load 0x0,0x2
025b 1861 | a | Execute Package,Field_Execute,Field_Number 0x61
025c 00e3 | | Load_Encached Natural_Cache
025d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
025e 4801 |H | Short_Literal 0x1
025f 00da | | Load_Top At_Offset_2
0260 01db | | Execute Vector,Length
0261 00d8 | | Load_Top At_Offset_0
0262 00e2 | | Load_Encached Integer_Cache
0263 0260 | ` | Execute Discrete,In_Type
0264 7001 |p | Jump_Nonzero 0x266
0265 0801 | | Execute_Immediate Raise,0x1
0266 e002 | | Load 0x0,0x2
0267 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36
0268 035b | [ | Declare_Type Array,Constrained
0269 0337 | 7 | Declare_Variable Array
026a 00d8 | | Load_Top At_Offset_0
026b 1c00 | | Execute_Immediate Run_Utility,0x0
026c 029f 041b | | Declare_Subprogram INIT_0418,For_Call
026e BODY_0250:
026e 4802 |H | Short_Literal 0x2
026f e5fd | | Load 0x2,-0x3
0270 01d7 | | Execute Vector,Field_Read
0271 6802 |h | Jump_Zero 0x274
0272 00db | | Load_Top At_Offset_3
0273 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
0274 00cf | | Action Mark_Auxiliary
0275 e403 | | Load 0x2,0x3
0276 01d9 | | Execute Vector,Reverse_Bounds
0277 0263 | c | Execute Discrete,Above_Bound
0278 7003 |p | Jump_Nonzero 0x27c
0279 8406 | | Call 0x2,0x6
027a 00c8 | | Action Pop_Auxiliary_Range
027b 3ffd |? | Loop_Increasing 0x279
027c 00ce | | Action Pop_Auxiliary
027d 4801 |H | Short_Literal 0x1
027e 00db | | Load_Top At_Offset_3
027f 00db | | Load_Top At_Offset_3
0280 01cf | | Execute Vector,Slice_Read
0281 e002 | | Load 0x0,0x2
0282 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36
0283 01c6 | | Execute Vector,Convert_To_Formal
0284 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
0285 TRAP_0250:
0285 0007 | | Action Break_Optional
0286 e5f8 | | Load 0x2,-0x8
0287 0092 052a | *| Action Push_String_Extended,0x52a ; "Associated_Files.Filter"
0289 e004 | | Load 0x0,0x4
028a 180f | | Execute Package,Field_Execute,Field_Number 0xf
028b 4801 |H | Short_Literal 0x1
028c 4800 |H | Short_Literal 0x0
028d e405 | | Load 0x2,0x5
028e 01cf | | Execute Vector,Slice_Read
028f e002 | | Load 0x0,0x2
0290 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36
0291 01c6 | | Execute Vector,Convert_To_Formal
0292 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
0293 0000 0000 | | .BLANK 0000[0x5]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 02a6 | | .CONST 0x02a6 ; Address of begin
0299 02af | | .CONST 0x02af ; Address of exception handler
029a 0003 | | .CONST 0x0003 ; Number of locals
029b INIT_0298:
029b e5f9 | | Load 0x2,-0x7
029c e5fa | | Load 0x2,-0x6
029d e5fb | | Load 0x2,-0x5
029e e5fc | | Load 0x2,-0x4
029f 4800 |H | Short_Literal 0x0
02a0 e5fd | | Load 0x2,-0x3
02a1 e5fe | | Load 0x2,-0x2
02a2 e5ff | | Load 0x2,-0x1
02a3 8251 | Q | Call 0x1,0x51
02a4 029f 0463 | c| Declare_Subprogram INIT_0460,For_Call
02a6 BODY_0298:
02a6 00cf | | Action Mark_Auxiliary
02a7 00da | | Load_Top At_Offset_2
02a8 01d9 | | Execute Vector,Reverse_Bounds
02a9 0263 | c | Execute Discrete,Above_Bound
02aa 7003 |p | Jump_Nonzero 0x2ae
02ab 8403 | | Call 0x2,0x3
02ac 00c8 | | Action Pop_Auxiliary_Range
02ad 3ffd |? | Loop_Increasing 0x2ab
02ae 4508 |E | Exit_Suprogram New_Top_Offset 0x8
02af TRAP_0298:
02af 0007 | | Action Break_Optional
02b0 e5f9 | | Load 0x2,-0x7
02b1 0092 052b | +| Action Push_String_Extended,0x52b ; "Associated_Files.Filter_And_Destroy"
02b3 e004 | | Load 0x0,0x4
02b4 180f | | Execute Package,Field_Execute,Field_Number 0xf
02b5 4508 |E | Exit_Suprogram New_Top_Offset 0x8
02b6 0000 0000 | | .XXX[0x2]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb | | .CONST 0x02bb ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0001 | | .CONST 0x0001 ; Number of locals
02bb BODY_02b8:
02bb INIT_02b8:
02bb 00da | | Load_Top At_Offset_2
02bc 0f01 | | Execute_Immediate Equal,0x1
02bd 6802 |h | Jump_Zero 0x2c0
02be 4801 |H | Short_Literal 0x1
02bf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02c0 4800 |H | Short_Literal 0x0
02c1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02c2 0000 0000 | | .BLANK 0000[0x6]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02f0 | | .CONST 0x02f0 ; Address of begin
02c9 02fe | | .CONST 0x02fe ; Address of exception handler
02ca 0008 | | .CONST 0x0008 ; Number of locals
02cb INIT_02c8:
02cb e5f6 | | Load 0x2,-0xa
02cc e5f7 | | Load 0x2,-0x9
02cd e5f8 | | Load 0x2,-0x8
02ce e5fc | | Load 0x2,-0x4
02cf 4801 |H | Short_Literal 0x1
02d0 e5fd | | Load 0x2,-0x3
02d1 e5fe | | Load 0x2,-0x2
02d2 e5ff | | Load 0x2,-0x1
02d3 8251 | Q | Call 0x1,0x51
02d4 e003 | | Load 0x0,0x3
02d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02d7 e009 | | Load 0x0,0x9
02d8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02d9 02c7 | | Declare_Variable Any
02da e5f6 | | Load 0x2,-0xa
02db 4800 |H | Short_Literal 0x0
02dc e5fc | | Load 0x2,-0x4
02dd e007 | | Load 0x0,0x7
02de 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02df a404 | | Store_Unchecked 0x2,0x4
02e0 e5f6 | | Load 0x2,-0xa
02e1 00d9 | | Load_Top At_Offset_1
02e2 e007 | | Load 0x0,0x7
02e3 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
02e4 00e1 | | Load_Encached Boolean_Cache
02e5 03f1 | | Declare_Variable Discrete,With_Value
02e6 e5f6 | | Load 0x2,-0xa
02e7 00da | | Load_Top At_Offset_2
02e8 e007 | | Load 0x0,0x7
02e9 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
02ea 00e1 | | Load_Encached Boolean_Cache
02eb 03f1 | | Declare_Variable Discrete,With_Value
02ec 029f 047b | {| Declare_Subprogram INIT_0478,For_Call
02ee 029f 04e3 | | Declare_Subprogram INIT_04e0,For_Call
02f0 BODY_02c8:
02f0 00cf | | Action Mark_Auxiliary
02f1 e402 | | Load 0x2,0x2
02f2 01d9 | | Execute Vector,Reverse_Bounds
02f3 0263 | c | Execute Discrete,Above_Bound
02f4 7003 |p | Jump_Nonzero 0x2f8
02f5 8407 | | Call 0x2,0x7
02f6 00c8 | | Action Pop_Auxiliary_Range
02f7 3ffd |? | Loop_Increasing 0x2f5
02f8 00ce | | Action Pop_Auxiliary
02f9 e5f9 | | Load 0x2,-0x7
02fa 01db | | Execute Vector,Length
02fb 6801 |h | Jump_Zero 0x2fd
02fc 8408 | | Call 0x2,0x8
02fd 450b |E | Exit_Suprogram New_Top_Offset 0xb
02fe TRAP_02c8:
02fe 0007 | | Action Break_Optional
02ff e5f6 | | Load 0x2,-0xa
0300 0092 052c | ,| Action Push_String_Extended,0x52c ; "Associated_Files.Filter_And_Retrieve"
0302 e004 | | Load 0x0,0x4
0303 180f | | Execute Package,Field_Execute,Field_Number 0xf
0304 e005 | | Load 0x0,0x5
0305 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0306 6005 |` | Indirect_Literal Discrete,0x30c,{0x00000000, 0x0000813b}
0307 e003 | | Load 0x0,0x3
0308 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0309 a5f4 | | Store_Unchecked 0x2,-0xc
030a 450b |E | Exit_Suprogram New_Top_Offset 0xb
030b 0000 | | .XXX[0x1]
030c 0000 0000 | | .LITERAL {0x00000000, 0x0000813b}
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313 | | .CONST 0x0313 ; Address of begin
0311 037b | { | .CONST 0x037b ; Address of exception handler
0312 0001 | | .CONST 0x0001 ; Number of locals
0313 BODY_0310:
0313 INIT_0310:
0313 00db | | Load_Top At_Offset_3
0314 e002 | | Load 0x0,0x2
0315 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0316 6863 |hc | Jump_Zero 0x37a
0317 e5fd | | Load 0x2,-0x3
0318 e5fe | | Load 0x2,-0x2
0319 e002 | | Load 0x0,0x2
031a 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
031b e5ff | | Load 0x2,-0x1
031c e00b | | Load 0x0,0xb
031d 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
031e 7028 |p( | Jump_Nonzero 0x347
031f e00c | | Load 0x0,0xc
0320 180e | | Execute Package,Field_Execute,Field_Number 0xe
0321 4801 |H | Short_Literal 0x1
0322 4802 |H | Short_Literal 0x2
0323 e005 | | Load 0x0,0x5
0324 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0325 0334 | 4 | Declare_Variable Array,With_Constraint
0326 e5fe | | Load 0x2,-0x2
0327 e002 | | Load 0x0,0x2
0328 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0329 e005 | | Load 0x0,0x5
032a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
032b e005 | | Load 0x0,0x5
032c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
032d 0119 | | Execute Any,Check_In_Formal_Type
032e 4801 |H | Short_Literal 0x1
032f 00da | | Load_Top At_Offset_2
0330 01d6 | | Execute Vector,Field_Write
0331 e5fe | | Load 0x2,-0x2
0332 e002 | | Load 0x0,0x2
0333 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0334 e005 | | Load 0x0,0x5
0335 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0336 e005 | | Load 0x0,0x5
0337 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0338 0119 | | Execute Any,Check_In_Formal_Type
0339 4802 |H | Short_Literal 0x2
033a 00da | | Load_Top At_Offset_2
033b 01d6 | | Execute Vector,Field_Write
033c 4806 |H | Short_Literal 0x6
033d 604e |`N | Indirect_Literal Discrete,0x38c,{0x00000000, 0x0000814a}
033e e003 | | Load 0x0,0x3
033f 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0340 e005 | | Load 0x0,0x5
0341 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0342 6049 |`I | Indirect_Literal Discrete,0x38c,{0x00000000, 0x0000814a}
0343 e003 | | Load 0x0,0x3
0344 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0345 a5fc | | Store_Unchecked 0x2,-0x4
0346 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0347 00db | | Load_Top At_Offset_3
0348 e002 | | Load 0x0,0x2
0349 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
034a 682f |h/ | Jump_Zero 0x37a
034b e5fd | | Load 0x2,-0x3
034c e5fe | | Load 0x2,-0x2
034d e002 | | Load 0x0,0x2
034e 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
034f e5ff | | Load 0x2,-0x1
0350 e00b | | Load 0x0,0xb
0351 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0352 7027 |p' | Jump_Nonzero 0x37a
0353 e00c | | Load 0x0,0xc
0354 180e | | Execute Package,Field_Execute,Field_Number 0xe
0355 4801 |H | Short_Literal 0x1
0356 4802 |H | Short_Literal 0x2
0357 e005 | | Load 0x0,0x5
0358 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0359 0334 | 4 | Declare_Variable Array,With_Constraint
035a e5fe | | Load 0x2,-0x2
035b e002 | | Load 0x0,0x2
035c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
035d e005 | | Load 0x0,0x5
035e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
035f e005 | | Load 0x0,0x5
0360 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0361 0119 | | Execute Any,Check_In_Formal_Type
0362 4801 |H | Short_Literal 0x1
0363 00da | | Load_Top At_Offset_2
0364 01d6 | | Execute Vector,Field_Write
0365 e5fe | | Load 0x2,-0x2
0366 e002 | | Load 0x0,0x2
0367 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0368 e005 | | Load 0x0,0x5
0369 1810 | | Execute Package,Field_Execute,Field_Number 0x10
036a e005 | | Load 0x0,0x5
036b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
036c 0119 | | Execute Any,Check_In_Formal_Type
036d 4802 |H | Short_Literal 0x2
036e 00da | | Load_Top At_Offset_2
036f 01d6 | | Execute Vector,Field_Write
0370 4806 |H | Short_Literal 0x6
0371 6016 |` | Indirect_Literal Discrete,0x388,{0x00000000, 0x0000814b}
0372 e003 | | Load 0x0,0x3
0373 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0374 e005 | | Load 0x0,0x5
0375 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0376 6011 |` | Indirect_Literal Discrete,0x388,{0x00000000, 0x0000814b}
0377 e003 | | Load 0x0,0x3
0378 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0379 a5fc | | Store_Unchecked 0x2,-0x4
037a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
037b TRAP_0310:
037b 0007 | | Action Break_Optional
037c e5fd | | Load 0x2,-0x3
037d 0092 052d | -| Action Push_String_Extended,0x52d ; "Associated_Files.Check_File"
037f e004 | | Load 0x0,0x4
0380 180f | | Execute Package,Field_Execute,Field_Number 0xf
0381 e005 | | Load 0x0,0x5
0382 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0383 6788 |g | Indirect_Literal Discrete,0x30c,{0x00000000, 0x0000813b}
0384 e003 | | Load 0x0,0x3
0385 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0386 a5fc | | Store_Unchecked 0x2,-0x4
0387 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0388 0000 0000 | | .LITERAL {0x00000000, 0x0000814b}
038c 0000 0000 | | .LITERAL {0x00000000, 0x0000814a}
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 03a3 | | .CONST 0x03a3 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0003 | | .CONST 0x0003 ; Number of locals
0393 INIT_0390:
0393 4800 |H | Short_Literal 0x0
0394 00db | | Load_Top At_Offset_3
0395 0092 052e | .| Action Push_String_Extended,0x52e ; "."
0397 e00a | | Load 0x0,0xa
0398 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0399 00e3 | | Load_Encached Natural_Cache
039a 03f1 | | Declare_Variable Discrete,With_Value
039b 4800 |H | Short_Literal 0x0
039c e7ff | | Load 0x3,-0x1
039d 0092 052e | .| Action Push_String_Extended,0x52e ; "."
039f e00a | | Load 0x0,0xa
03a0 181f | | Execute Package,Field_Execute,Field_Number 0x1f
03a1 00e3 | | Load_Encached Natural_Cache
03a2 03f1 | | Declare_Variable Discrete,With_Value
03a3 BODY_0390:
03a3 e404 | | Load 0x2,0x4
03a4 01db | | Execute Vector,Length
03a5 0f00 | | Execute_Immediate Equal,0x0
03a6 00da | | Load_Top At_Offset_2
03a7 0f00 | | Execute_Immediate Equal,0x0
03a8 0278 | x | Execute Discrete,Or
03a9 6802 |h | Jump_Zero 0x3ac
03aa e7ff | | Load 0x3,-0x1
03ab 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03ac e7ff | | Load 0x3,-0x1
03ad 01dd | | Execute Vector,First
03ae 00da | | Load_Top At_Offset_2
03af 0aff | | Execute_Immediate Plus,-0x1
03b0 e7ff | | Load 0x3,-0x1
03b1 01cf | | Execute Vector,Slice_Read
03b2 e404 | | Load 0x2,0x4
03b3 01cc | | Execute Vector,Catenate
03b4 00d9 | | Load_Top At_Offset_1
03b5 0a01 | | Execute_Immediate Plus,0x1
03b6 00d8 | | Load_Top At_Offset_0
03b7 00e2 | | Load_Encached Integer_Cache
03b8 0260 | ` | Execute Discrete,In_Type
03b9 7001 |p | Jump_Nonzero 0x3bb
03ba 0801 | | Execute_Immediate Raise,0x1
03bb e7ff | | Load 0x3,-0x1
03bc 01dc | | Execute Vector,Last
03bd e7ff | | Load 0x3,-0x1
03be 01cf | | Execute Vector,Slice_Read
03bf 01cc | | Execute Vector,Catenate
03c0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03c1 0000 0000 | | .BLANK 0000[0x7]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03d6 | | .CONST 0x03d6 ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0003 | | .CONST 0x0003 ; Number of locals
03cb INIT_03c8:
03cb e403 | | Load 0x2,0x3
03cc 8407 | | Call 0x2,0x7
03cd 4800 |H | Short_Literal 0x0
03ce 00d9 | | Load_Top At_Offset_1
03cf 0092 052f | /| Action Push_String_Extended,0x52f ; "'"
03d1 e00a | | Load 0x0,0xa
03d2 181d | | Execute Package,Field_Execute,Field_Number 0x1d
03d3 0aff | | Execute_Immediate Plus,-0x1
03d4 00e2 | | Load_Encached Integer_Cache
03d5 03f1 | | Declare_Variable Discrete,With_Value
03d6 BODY_03c8:
03d6 00d8 | | Load_Top At_Offset_0
03d7 0d00 | | Execute_Immediate Less,0x0
03d8 6803 |h | Jump_Zero 0x3dc
03d9 00d9 | | Load_Top At_Offset_1
03da 01dc | | Execute Vector,Last
03db 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
03dc 4801 |H | Short_Literal 0x1
03dd e402 | | Load 0x2,0x2
03de 0092 0530 | 0| Action Push_String_Extended,0x530 ; "'spec"
03e0 e00a | | Load 0x0,0xa
03e1 181d | | Execute Package,Field_Execute,Field_Number 0x1d
03e2 0c01 | | Execute_Immediate Greater_Equal,0x1
03e3 6809 |h | Jump_Zero 0x3ed
03e4 00d9 | | Load_Top At_Offset_1
03e5 01dd | | Execute Vector,First
03e6 00d9 | | Load_Top At_Offset_1
03e7 00db | | Load_Top At_Offset_3
03e8 01cf | | Execute Vector,Slice_Read
03e9 e405 | | Load 0x2,0x5
03ea 01cc | | Execute Vector,Catenate
03eb 00cb | | Action Pop_Block_With_Result
03ec 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
03ed 00d9 | | Load_Top At_Offset_1
03ee 01dd | | Execute Vector,First
03ef 00d9 | | Load_Top At_Offset_1
03f0 00db | | Load_Top At_Offset_3
03f1 01cf | | Execute Vector,Slice_Read
03f2 e406 | | Load 0x2,0x6
03f3 01cc | | Execute Vector,Catenate
03f4 00cb | | Action Pop_Block_With_Result
03f5 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
03f6 0000 0000 | | .XXX[0x2]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 0405 | | .CONST 0x0405 ; Address of begin
03f9 0004 | | .CONST 0x0004 ; Address of exception handler
03fa 0002 | | .CONST 0x0002 ; Number of locals
03fb INIT_03f8:
03fb e5f8 | | Load 0x2,-0x8
03fc e5f9 | | Load 0x2,-0x7
03fd e5fd | | Load 0x2,-0x3
03fe e5ff | | Load 0x2,-0x1
03ff e002 | | Load 0x0,0x2
0400 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0401 e5fe | | Load 0x2,-0x2
0402 e5fa | | Load 0x2,-0x6
0403 e00b | | Load 0x0,0xb
0404 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0405 BODY_03f8:
0405 00d8 | | Load_Top At_Offset_0
0406 01db | | Execute Vector,Length
0407 680a |h | Jump_Zero 0x412
0408 e403 | | Load 0x2,0x3
0409 e5fb | | Load 0x2,-0x5
040a e5fe | | Load 0x2,-0x2
040b 824f | O | Call 0x1,0x4f
040c 00d9 | | Load_Top At_Offset_1
040d e402 | | Load 0x2,0x2
040e e008 | | Load 0x0,0x8
040f 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
0410 00cb | | Action Pop_Block_With_Result
0411 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
0412 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0413 0000 0000 | | .BLANK 0000[0x5]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 0422 | " | .CONST 0x0422 ; Address of begin
0419 0004 | | .CONST 0x0004 ; Address of exception handler
041a 0002 | | .CONST 0x0002 ; Number of locals
041b INIT_0418:
041b e002 | | Load 0x0,0x2
041c 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
041d 02c7 | | Declare_Variable Any
041e e409 | | Load 0x2,0x9
041f e403 | | Load 0x2,0x3
0420 01d7 | | Execute Vector,Field_Read
0421 a602 | | Store_Unchecked 0x3,0x2
0422 BODY_0418:
0422 e5fc | | Load 0x2,-0x4
0423 6816 |h | Jump_Zero 0x43a
0424 00d8 | | Load_Top At_Offset_0
0425 e002 | | Load 0x0,0x2
0426 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0427 8249 | I | Call 0x1,0x49
0428 e5fd | | Load 0x2,-0x3
0429 01d7 | | Execute Vector,Field_Read
042a 680f |h | Jump_Zero 0x43a
042b e5fe | | Load 0x2,-0x2
042c 0f03 | | Execute_Immediate Equal,0x3
042d 7015 |p | Jump_Nonzero 0x443
042e 00d8 | | Load_Top At_Offset_0
042f e002 | | Load 0x0,0x2
0430 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0431 0f03 | | Execute_Immediate Equal,0x3
0432 7010 |p | Jump_Nonzero 0x443
0433 e5fe | | Load 0x2,-0x2
0434 00d9 | | Load_Top At_Offset_1
0435 e002 | | Load 0x0,0x2
0436 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0437 8247 | G | Call 0x1,0x47
0438 027f | | Execute Discrete,Equal
0439 7009 |p | Jump_Nonzero 0x443
043a e5fc | | Load 0x2,-0x4
043b 701f |p | Jump_Nonzero 0x45b
043c 00d8 | | Load_Top At_Offset_0
043d e002 | | Load 0x0,0x2
043e 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
043f 8249 | I | Call 0x1,0x49
0440 e5fd | | Load 0x2,-0x3
0441 01d7 | | Execute Vector,Field_Read
0442 6818 |h | Jump_Zero 0x45b
0443 e5fc | | Load 0x2,-0x4
0444 680f |h | Jump_Zero 0x454
0445 00d8 | | Load_Top At_Offset_0
0446 e002 | | Load 0x0,0x2
0447 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0448 680b |h | Jump_Zero 0x454
0449 e5f8 | | Load 0x2,-0x8
044a e5f9 | | Load 0x2,-0x7
044b e5fb | | Load 0x2,-0x5
044c 00db | | Load_Top At_Offset_3
044d e002 | | Load 0x0,0x2
044e 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
044f e5ff | | Load 0x2,-0x1
0450 e5fa | | Load 0x2,-0x6
0451 e00b | | Load 0x0,0xb
0452 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0453 6807 |h | Jump_Zero 0x45b
0454 e404 | | Load 0x2,0x4
0455 0a01 | | Execute_Immediate Plus,0x1
0456 c404 | | Store 0x2,0x4
0457 00d8 | | Load_Top At_Offset_0
0458 e404 | | Load 0x2,0x4
0459 e405 | | Load 0x2,0x5
045a 01d6 | | Execute Vector,Field_Write
045b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
045c 0000 0000 | | .BLANK 0000[0x4]
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 046b | k | .CONST 0x046b ; Address of begin
0461 0473 | s | .CONST 0x0473 ; Address of exception handler
0462 0002 | | .CONST 0x0002 ; Number of locals
0463 INIT_0460:
0463 e5fc | | Load 0x2,-0x4
0464 e009 | | Load 0x0,0x9
0465 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0466 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0467 e406 | | Load 0x2,0x6
0468 e402 | | Load 0x2,0x2
0469 01d7 | | Execute Vector,Field_Read
046a 824a | J | Call 0x1,0x4a
046b BODY_0460:
046b 00ea | | Load_Encached Null_String_Cache
046c 0092 0531 | 1| Action Push_String_Extended,0x531 ; "<WORLDS>"
046e 4801 |H | Short_Literal 0x1
046f 00db | | Load_Top At_Offset_3
0470 e00d | | Load 0x0,0xd
0471 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0472 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0473 TRAP_0460:
0473 0007 | | Action Break_Optional
0474 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0475 0000 0000 | | .XXX[0x3]
0477 0000 | |
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 0491 | | .CONST 0x0491 ; Address of begin
0479 0004 | | .CONST 0x0004 ; Address of exception handler
047a 0004 | | .CONST 0x0004 ; Number of locals
047b INIT_0478:
047b e002 | | Load 0x0,0x2
047c 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
047d 02c7 | | Declare_Variable Any
047e e40b | | Load 0x2,0xb
047f e402 | | Load 0x2,0x2
0480 01d7 | | Execute Vector,Field_Read
0481 a602 | | Store_Unchecked 0x3,0x2
0482 e5fc | | Load 0x2,-0x4
0483 e009 | | Load 0x0,0x9
0484 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0485 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0486 00d9 | | Load_Top At_Offset_1
0487 824a | J | Call 0x1,0x4a
0488 e5f6 | | Load 0x2,-0xa
0489 e5f7 | | Load 0x2,-0x9
048a e5f8 | | Load 0x2,-0x8
048b e5fa | | Load 0x2,-0x6
048c e5fb | | Load 0x2,-0x5
048d e5fc | | Load 0x2,-0x4
048e e5ff | | Load 0x2,-0x1
048f e602 | | Load 0x3,0x2
0490 8250 | P | Call 0x1,0x50
0491 BODY_0478:
0491 4801 |H | Short_Literal 0x1
0492 0092 0532 | 2| Action Push_String_Extended,0x532 ; "exe"
0494 e602 | | Load 0x3,0x2
0495 e002 | | Load 0x0,0x2
0496 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0497 e00a | | Load 0x0,0xa
0498 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0499 6804 |h | Jump_Zero 0x49e
049a e5f9 | | Load 0x2,-0x7
049b 01db | | Execute Vector,Length
049c 6801 |h | Jump_Zero 0x49e
049d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
049e e405 | | Load 0x2,0x5
049f 681f |h | Jump_Zero 0x4bf
04a0 e00c | | Load 0x0,0xc
04a1 180e | | Execute Package,Field_Execute,Field_Number 0xe
04a2 4801 |H | Short_Literal 0x1
04a3 4801 |H | Short_Literal 0x1
04a4 e005 | | Load 0x0,0x5
04a5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04a6 0334 | 4 | Declare_Variable Array,With_Constraint
04a7 0092 0533 | 3| Action Push_String_Extended,0x533 ; "Not retrieving host file \x22"
04a9 e603 | | Load 0x3,0x3
04aa 01cc | | Execute Vector,Catenate
04ab 0092 0534 | 4| Action Push_String_Extended,0x534 ; "\x22 from remote file \x22"
04ad 01cc | | Execute Vector,Catenate
04ae 00db | | Load_Top At_Offset_3
04af 01cc | | Execute Vector,Catenate
04b0 0092 0535 | 5| Action Push_String_Extended,0x535 ; "\x22"
04b2 01cc | | Execute Vector,Catenate
04b3 e005 | | Load 0x0,0x5
04b4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04b5 e005 | | Load 0x0,0x5
04b6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04b7 0119 | | Execute Any,Check_In_Formal_Type
04b8 4801 |H | Short_Literal 0x1
04b9 00da | | Load_Top At_Offset_2
04ba 01d6 | | Execute Vector,Field_Write
04bb 601c |` | Indirect_Literal Discrete,0x4d8,{0x00000000, 0x0000818f}
04bc e003 | | Load 0x0,0x3
04bd 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
04be 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04bf e003 | | Load 0x0,0x3
04c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04c1 e406 | | Load 0x2,0x6
04c2 e602 | | Load 0x3,0x2
04c3 e002 | | Load 0x0,0x2
04c4 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
04c5 8253 | S | Call 0x1,0x53
04c6 e5f5 | | Load 0x2,-0xb
04c7 e604 | | Load 0x3,0x4
04c8 e603 | | Load 0x3,0x3
04c9 e00e | | Load 0x0,0xe
04ca 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
04cb c403 | | Store 0x2,0x3
04cc e403 | | Load 0x2,0x3
04cd 6808 |h | Jump_Zero 0x4d6
04ce e5f6 | | Load 0x2,-0xa
04cf 4806 |H | Short_Literal 0x6
04d0 e403 | | Load 0x2,0x3
04d1 e003 | | Load 0x0,0x3
04d2 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
04d3 00cc | | Action Pop_Block
04d4 00d2 | | Pop_Control Pop_Count_2
04d5 7e22 |~" | Jump 0x2f8
04d6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04d7 0000 | | .XXX[0x1]
04d8 0000 0000 | | .LITERAL {0x00000000, 0x0000818f}
04dc 0000 0000 | | .BLANK 0000[0x4]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04f2 | | .CONST 0x04f2 ; Address of begin
04e1 0004 | | .CONST 0x0004 ; Address of exception handler
04e2 0003 | | .CONST 0x0003 ; Number of locals
04e3 INIT_04e0:
04e3 e5fc | | Load 0x2,-0x4
04e4 e009 | | Load 0x0,0x9
04e5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04e6 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
04e7 0092 0536 | 6| Action Push_String_Extended,0x536 ; ".<EXE>"
04e9 01cc | | Execute Vector,Catenate
04ea 0007 | | Action Break_Optional
04eb e5fa | | Load 0x2,-0x6
04ec e5f9 | | Load 0x2,-0x7
04ed e5ff | | Load 0x2,-0x1
04ee e008 | | Load 0x0,0x8
04ef 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
04f0 e008 | | Load 0x0,0x8
04f1 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
04f2 BODY_04e0:
04f2 e405 | | Load 0x2,0x5
04f3 681f |h | Jump_Zero 0x513
04f4 e00c | | Load 0x0,0xc
04f5 180e | | Execute Package,Field_Execute,Field_Number 0xe
04f6 4801 |H | Short_Literal 0x1
04f7 4801 |H | Short_Literal 0x1
04f8 e005 | | Load 0x0,0x5
04f9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04fa 0334 | 4 | Declare_Variable Array,With_Constraint
04fb 0092 0533 | 3| Action Push_String_Extended,0x533 ; "Not retrieving host file \x22"
04fd e602 | | Load 0x3,0x2
04fe 01cc | | Execute Vector,Catenate
04ff 0092 0537 | 7| Action Push_String_Extended,0x537 ; "\x22 from remote executable \x22"
0501 01cc | | Execute Vector,Catenate
0502 00db | | Load_Top At_Offset_3
0503 01cc | | Execute Vector,Catenate
0504 0092 0535 | 5| Action Push_String_Extended,0x535 ; "\x22"
0506 01cc | | Execute Vector,Catenate
0507 e005 | | Load 0x0,0x5
0508 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0509 e005 | | Load 0x0,0x5
050a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
050b 0119 | | Execute Any,Check_In_Formal_Type
050c 4801 |H | Short_Literal 0x1
050d 00da | | Load_Top At_Offset_2
050e 01d6 | | Execute Vector,Field_Write
050f 67c8 |g | Indirect_Literal Discrete,0x4d8,{0x00000000, 0x0000818f}
0510 e003 | | Load 0x0,0x3
0511 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0512 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0513 e003 | | Load 0x0,0x3
0514 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0515 e406 | | Load 0x2,0x6
0516 4801 |H | Short_Literal 0x1
0517 e5f5 | | Load 0x2,-0xb
0518 e603 | | Load 0x3,0x3
0519 e602 | | Load 0x3,0x2
051a e00e | | Load 0x0,0xe
051b 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
051c c403 | | Store 0x2,0x3
051d e403 | | Load 0x2,0x3
051e 6805 |h | Jump_Zero 0x524
051f e5f6 | | Load 0x2,-0xa
0520 4806 |H | Short_Literal 0x6
0521 e403 | | Load 0x2,0x3
0522 e003 | | Load 0x0,0x3
0523 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0524 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0525 ; --------------------------------------------------------------------------------------
0525 ; STRING TABLE
0525 ; --------------------------------------------------------------------------------------
0525 0028 | ( | .STRTAB 0x0028->0x0539 ; "Associated_Files.Check_Files"
0526 0042 | B | .STRTAB 0x0042->0x0547 ; "Associated_Files.Destroy_And_Retrieve"
0527 0065 | e | .STRTAB 0x0065->0x0559 ; ".<"
0528 0065 | e | .STRTAB 0x0065->0x055a ; ">"
0529 0064 | d | .STRTAB 0x0064->0x055b ; "&"
052a 0063 | c | .STRTAB 0x0063->0x055b ; "Associated_Files.Filter"
052b 0078 | x | .STRTAB 0x0078->0x0567 ; "Associated_Files.Filter_And_Destroy"
052c 0099 | | .STRTAB 0x0099->0x0578 ; "Associated_Files.Filter_And_Retrieve"
052d 00bb | | .STRTAB 0x00bb->0x058a ; "Associated_Files.Check_File"
052e 00d4 | | .STRTAB 0x00d4->0x0598 ; "."
052f 00d3 | | .STRTAB 0x00d3->0x0598 ; "'"
0530 00d2 | | .STRTAB 0x00d2->0x0599 ; "'spec"
0531 00d5 | | .STRTAB 0x00d5->0x059b ; "<WORLDS>"
0532 00db | | .STRTAB 0x00db->0x059f ; "exe"
0533 00dc | | .STRTAB 0x00dc->0x05a1 ; "Not retrieving host file \x22"
0534 00f4 | | .STRTAB 0x00f4->0x05ae ; "\x22 from remote file \x22"
0535 0106 | | .STRTAB 0x0106->0x05b8 ; "\x22"
0536 0105 | | .STRTAB 0x0105->0x05b8 ; ".<EXE>"
0537 0109 | | .STRTAB 0x0109->0x05bb ; "\x22 from remote executable \x22"
0538 0121 | ! | .STREND 0x0121->0x05c8
0539 4173 736f |Asso| .STRTAB_STRINGS
05c9 0000 0000 | | .BLANK 0000[0x7]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; Debug Table
05d0 ; --------------------------------------------------------------------------------------
05d0 0004 000c | | .DEBUG4 0x0004,0x000c,0x2dc0,0x0000,0x0001,0x0000
05d6 0000 0000 | | .BLANK 0000[0x2a]