|
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: 5120 (0x1400)
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 09b8 | | .CONST 0x09b8 ; 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 8005 | | .CONST 0x8005 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0098 | | .CONST 0x0098 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0041 | A | .CONST 0x0041 ; 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 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
003f c21a | | Store 0x1,0x1a
0040 00c4 | | Action Make_Default
0041 00d1 | | Pop_Control Pop_Count_1
0042 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated
0044 c238 | 8 | Store 0x1,0x38
0045 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated
0047 c239 | 9 | Store 0x1,0x39
0048 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated
004a c23a | : | Store 0x1,0x3a
004b 029a 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Visible,Unelaborated
004d c23b | ; | Store 0x1,0x3b
004e 029a 0383 | | Declare_Subprogram INIT_0380,For_Outer_Call,Visible,Unelaborated
0050 c22d | - | Store 0x1,0x2d
0051 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated
0053 c23c | < | Store 0x1,0x3c
0054 029a 04b3 | | Declare_Subprogram INIT_04b0,For_Outer_Call,Visible,Unelaborated
0056 c23d | = | Store 0x1,0x3d
0057 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated
0059 c230 | 0 | Store 0x1,0x30
005a 029a 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call,Visible,Unelaborated
005c c231 | 1 | Store 0x1,0x31
005d 029a 069b | | Declare_Subprogram INIT_0698,For_Outer_Call,Visible,Unelaborated
005f c23e | > | Store 0x1,0x3e
0060 e001 | | Load 0x0,0x1
0061 1bc9 | | Execute Package,Field_Read,Field_Number 0xc9
0062 4802 |H | Short_Literal 0x2
0063 4800 |H | Short_Literal 0x0
0064 4801 |H | Short_Literal 0x1
0065 4803 |H | Short_Literal 0x3
0066 0318 | | Declare_Type Variant_Record,Incomplete
0067 029f 0723 | #| Declare_Subprogram INIT_0720,For_Call
0069 00d9 | | Load_Top At_Offset_1
006a 012a | * | Execute Any,Change_Utility
006b c23f | ? | Store 0x1,0x3f
006c 00d8 | | Load_Top At_Offset_0
006d 02a0 | | Declare_Subprogram Null_Subprogram
006e e21a | | Load 0x1,0x1a
006f 03a3 | | Complete_Type Heap_Access,By_Defining
0070 e21a | | Load 0x1,0x1a
0071 0129 | ) | Execute Any,Make_Visible
0072 c237 | 7 | Store 0x1,0x37
0073 00bf | | Action Accept_Activation
0074 4801 |H | Short_Literal 0x1
0075 e002 | | Load 0x0,0x2
0076 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0077 4801 |H | Short_Literal 0x1
0078 e003 | | Load 0x0,0x3
0079 1b2d | - | Execute Package,Field_Read,Field_Number 0x2d
007a 029f 0723 | #| Declare_Subprogram INIT_0720,For_Call
007c 4802 |H | Short_Literal 0x2
007d 4800 |H | Short_Literal 0x0
007e e23f | ? | Load 0x1,0x3f
007f 0307 | | Complete_Type Variant_Record,By_Defining
0080 029d 075b | [| Declare_Subprogram INIT_0758,For_Outer_Call
0082 029d 077b | {| Declare_Subprogram INIT_0778,For_Outer_Call
0084 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
0085 00c7 | | Action Elaborate_Subprogram
0086 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39
0087 00c7 | | Action Elaborate_Subprogram
0088 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
0089 00c7 | | Action Elaborate_Subprogram
008a 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b
008b 00c7 | | Action Elaborate_Subprogram
008c 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
008d 00c7 | | Action Elaborate_Subprogram
008e 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c
008f 00c7 | | Action Elaborate_Subprogram
0090 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d
0091 00c7 | | Action Elaborate_Subprogram
0092 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
0093 00c7 | | Action Elaborate_Subprogram
0094 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
0095 00c7 | | Action Elaborate_Subprogram
0096 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e
0097 00c7 | | Action Elaborate_Subprogram
0098 BODY_0008:
0098 00bc | | Action Signal_Activated
0099 00bb | | Action Signal_Completion
009a 0000 0000 | | .BLANK 0000[0x6]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00b4 | | .CONST 0x00b4 ; Address of begin
00a1 0142 | B | .CONST 0x0142 ; Address of exception handler
00a2 0005 | | .CONST 0x0005 ; Number of locals
00a3 INIT_00a0:
00a3 e002 | | Load 0x0,0x2
00a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a5 02c7 | | Declare_Variable Any
00a6 00d8 | | Load_Top At_Offset_0
00a7 1c00 | | Execute_Immediate Run_Utility,0x0
00a8 e003 | | Load 0x0,0x3
00a9 1b2d | - | Execute Package,Field_Read,Field_Number 0x2d
00aa 0322 | " | Declare_Variable Record
00ab 00d8 | | Load_Top At_Offset_0
00ac 1c00 | | Execute_Immediate Run_Utility,0x0
00ad e004 | | Load 0x0,0x4
00ae 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00af 02c7 | | Declare_Variable Any
00b0 00d8 | | Load_Top At_Offset_0
00b1 1c00 | | Execute_Immediate Run_Utility,0x0
00b2 e005 | | Load 0x0,0x5
00b3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b4 BODY_00a0:
00b4 4800 |H | Short_Literal 0x0
00b5 a5f9 | | Store_Unchecked 0x2,-0x7
00b6 e21a | | Load 0x1,0x1a
00b7 a5fa | | Store_Unchecked 0x2,-0x6
00b8 e006 | | Load 0x0,0x6
00b9 180e | | Execute Package,Field_Execute,Field_Number 0xe
00ba 4801 |H | Short_Literal 0x1
00bb 0092 0832 | 2| Action Push_String_Extended,0x832 ; "Acquire (Remote_Machine => \x22"
00bd e5fe | | Load 0x2,-0x2
00be 01cc | | Execute Vector,Catenate
00bf 0092 0833 | 3| Action Push_String_Extended,0x833 ; "\x22, Username => \x22"
00c1 01cc | | Execute Vector,Catenate
00c2 e5fd | | Load 0x2,-0x3
00c3 01cc | | Execute Vector,Catenate
00c4 0092 0834 | 4| Action Push_String_Extended,0x834 ; "\x22, Password => ???"
00c6 01cc | | Execute Vector,Catenate
00c7 0092 0835 | 5| Action Push_String_Extended,0x835 ; ", Trace_Command => "
00c9 01cc | | Execute Vector,Catenate
00ca e5fb | | Load 0x2,-0x5
00cb 00e1 | | Load_Encached Boolean_Cache
00cc 011c | | Execute Any,Convert_Unchecked
00cd 1c01 | | Execute_Immediate Run_Utility,0x1
00ce 01cc | | Execute Vector,Catenate
00cf 0092 0836 | 6| Action Push_String_Extended,0x836 ; ")."
00d1 01cc | | Execute Vector,Catenate
00d2 e007 | | Load 0x0,0x7
00d3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00d4 e5ff | | Load 0x2,-0x1
00d5 e001 | | Load 0x0,0x1
00d6 18ca | | Execute Package,Field_Execute,Field_Number 0xca
00d7 0f01 | | Execute_Immediate Equal,0x1
00d8 7044 |pD | Jump_Nonzero 0x11d
00d9 e5ff | | Load 0x2,-0x1
00da e001 | | Load 0x0,0x1
00db 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
00dc 00db | | Load_Top At_Offset_3
00dd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00de 00d9 | | Load_Top At_Offset_1
00df 00db | | Load_Top At_Offset_3
00e0 e5fb | | Load 0x2,-0x5
00e1 e5fc | | Load 0x2,-0x4
00e2 e5fd | | Load 0x2,-0x3
00e3 e5fe | | Load 0x2,-0x2
00e4 8241 | A | Call 0x1,0x41
00e5 e5fc | | Load 0x2,-0x4
00e6 e5fd | | Load 0x2,-0x3
00e7 e5fe | | Load 0x2,-0x2
00e8 8240 | @ | Call 0x1,0x40
00e9 e5fe | | Load 0x2,-0x2
00ea e003 | | Load 0x0,0x3
00eb 181e | | Execute Package,Field_Execute,Field_Number 0x1e
00ec 00d1 | | Pop_Control Pop_Count_1
00ed c404 | | Store 0x2,0x4
00ee 4802 |H | Short_Literal 0x2
00ef 00da | | Load_Top At_Offset_2
00f0 e004 | | Load 0x0,0x4
00f1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00f2 681e |h | Jump_Zero 0x111
00f3 4801 |H | Short_Literal 0x1
00f4 4802 |H | Short_Literal 0x2
00f5 e008 | | Load 0x0,0x8
00f6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00f7 0334 | 4 | Declare_Variable Array,With_Constraint
00f8 e5fe | | Load 0x2,-0x2
00f9 e008 | | Load 0x0,0x8
00fa 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00fb e008 | | Load 0x0,0x8
00fc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00fd 0119 | | Execute Any,Check_In_Formal_Type
00fe 4801 |H | Short_Literal 0x1
00ff 00da | | Load_Top At_Offset_2
0100 01d6 | | Execute Vector,Field_Write
0101 00da | | Load_Top At_Offset_2
0102 e004 | | Load 0x0,0x4
0103 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0104 e008 | | Load 0x0,0x8
0105 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0106 e008 | | Load 0x0,0x8
0107 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0108 0119 | | Execute Any,Check_In_Formal_Type
0109 4802 |H | Short_Literal 0x2
010a 00da | | Load_Top At_Offset_2
010b 01d6 | | Execute Vector,Field_Write
010c 6083 |` | Indirect_Literal Discrete,0x190,{0x00000000, 0x0000812a}
010d e005 | | Load 0x0,0x5
010e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
010f a5f9 | | Store_Unchecked 0x2,-0x7
0110 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0111 4800 |H | Short_Literal 0x0
0112 e23f | ? | Load 0x1,0x3f
0113 1c08 | | Execute_Immediate Run_Utility,0x8
0114 00db | | Load_Top At_Offset_3
0115 00d9 | | Load_Top At_Offset_1
0116 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0117 e21a | | Load 0x1,0x1a
0118 e009 | | Load 0x0,0x9
0119 180d | | Execute Package,Field_Execute,Field_Number 0xd
011a 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
011b a5fa | | Store_Unchecked 0x2,-0x6
011c 4506 |E | Exit_Suprogram New_Top_Offset 0x6
011d e005 | | Load 0x0,0x5
011e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011f e402 | | Load 0x2,0x2
0120 e5fb | | Load 0x2,-0x5
0121 e5fc | | Load 0x2,-0x4
0122 e5fd | | Load 0x2,-0x3
0123 e5fe | | Load 0x2,-0x2
0124 8241 | A | Call 0x1,0x41
0125 e5fc | | Load 0x2,-0x4
0126 e5fd | | Load 0x2,-0x3
0127 e5fe | | Load 0x2,-0x2
0128 8240 | @ | Call 0x1,0x40
0129 e5fe | | Load 0x2,-0x2
012a e002 | | Load 0x0,0x2
012b 180e | | Execute Package,Field_Execute,Field_Number 0xe
012c c402 | | Store 0x2,0x2
012d 0059 | Y | Store_Top Discrete,At_Offset_1
012e 00d8 | | Load_Top At_Offset_0
012f 6803 |h | Jump_Zero 0x133
0130 00d8 | | Load_Top At_Offset_0
0131 a5f9 | | Store_Unchecked 0x2,-0x7
0132 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0133 4801 |H | Short_Literal 0x1
0134 e23f | ? | Load 0x1,0x3f
0135 1c08 | | Execute_Immediate Run_Utility,0x8
0136 e402 | | Load 0x2,0x2
0137 e23f | ? | Load 0x1,0x3f
0138 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
0139 0119 | | Execute Any,Check_In_Formal_Type
013a 00d9 | | Load_Top At_Offset_1
013b 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
013c e21a | | Load 0x1,0x1a
013d e009 | | Load 0x0,0x9
013e 180d | | Execute Package,Field_Execute,Field_Number 0xd
013f 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0140 a5fa | | Store_Unchecked 0x2,-0x6
0141 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0142 TRAP_00a0:
0142 e00a | | Load 0x0,0xa
0143 010f | | Execute Exception,Equal
0144 6807 |h | Jump_Zero 0x14c
0145 e008 | | Load 0x0,0x8
0146 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0147 6044 |`D | Indirect_Literal Discrete,0x18c,{0x00000000, 0x000081cd}
0148 e005 | | Load 0x0,0x5
0149 1813 | | Execute Package,Field_Execute,Field_Number 0x13
014a a5f9 | | Store_Unchecked 0x2,-0x7
014b 4506 |E | Exit_Suprogram New_Top_Offset 0x6
014c e00b | | Load 0x0,0xb
014d 010f | | Execute Exception,Equal
014e 6807 |h | Jump_Zero 0x156
014f e008 | | Load 0x0,0x8
0150 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0151 6036 |`6 | Indirect_Literal Discrete,0x188,{0x00000000, 0x000081ce}
0152 e005 | | Load 0x0,0x5
0153 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0154 a5f9 | | Store_Unchecked 0x2,-0x7
0155 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0156 e00c | | Load 0x0,0xc
0157 010f | | Execute Exception,Equal
0158 6807 |h | Jump_Zero 0x160
0159 e008 | | Load 0x0,0x8
015a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
015b 6028 |`( | Indirect_Literal Discrete,0x184,{0x00000000, 0x000081cf}
015c e005 | | Load 0x0,0x5
015d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
015e a5f9 | | Store_Unchecked 0x2,-0x7
015f 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0160 4801 |H | Short_Literal 0x1
0161 4802 |H | Short_Literal 0x2
0162 e008 | | Load 0x0,0x8
0163 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0164 0334 | 4 | Declare_Variable Array,With_Constraint
0165 0092 0837 | 7| Action Push_String_Extended,0x837 ; "Acquire"
0167 e008 | | Load 0x0,0x8
0168 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0169 e008 | | Load 0x0,0x8
016a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
016b 0119 | | Execute Any,Check_In_Formal_Type
016c 4801 |H | Short_Literal 0x1
016d 00da | | Load_Top At_Offset_2
016e 01d6 | | Execute Vector,Field_Write
016f 4800 |H | Short_Literal 0x0
0170 4801 |H | Short_Literal 0x1
0171 e00d | | Load 0x0,0xd
0172 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0173 e008 | | Load 0x0,0x8
0174 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0175 e008 | | Load 0x0,0x8
0176 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0177 0119 | | Execute Any,Check_In_Formal_Type
0178 4802 |H | Short_Literal 0x2
0179 00da | | Load_Top At_Offset_2
017a 01d6 | | Execute Vector,Field_Write
017b 6004 |` | Indirect_Literal Discrete,0x180,{0x00000000, 0x0000812d}
017c e005 | | Load 0x0,0x5
017d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
017e a5f9 | | Store_Unchecked 0x2,-0x7
017f 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0180 0000 0000 | | .LITERAL {0x00000000, 0x0000812d}
0184 0000 0000 | | .LITERAL {0x00000000, 0x000081cf}
0188 0000 0000 | | .LITERAL {0x00000000, 0x000081ce}
018c 0000 0000 | | .LITERAL {0x00000000, 0x000081cd}
0190 0000 0000 | | .LITERAL {0x00000000, 0x0000812a}
0194 0000 0000 | | .BLANK 0000[0x4]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 01ac | | .CONST 0x01ac ; Address of begin
0199 0248 | H | .CONST 0x0248 ; Address of exception handler
019a 0005 | | .CONST 0x0005 ; Number of locals
019b INIT_0198:
019b e002 | | Load 0x0,0x2
019c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
019d 02c7 | | Declare_Variable Any
019e 00d8 | | Load_Top At_Offset_0
019f 1c00 | | Execute_Immediate Run_Utility,0x0
01a0 e003 | | Load 0x0,0x3
01a1 1b2d | - | Execute Package,Field_Read,Field_Number 0x2d
01a2 0322 | " | Declare_Variable Record
01a3 00d8 | | Load_Top At_Offset_0
01a4 1c00 | | Execute_Immediate Run_Utility,0x0
01a5 e004 | | Load 0x0,0x4
01a6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01a7 02c7 | | Declare_Variable Any
01a8 00d8 | | Load_Top At_Offset_0
01a9 1c00 | | Execute_Immediate Run_Utility,0x0
01aa e005 | | Load 0x0,0x5
01ab 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ac BODY_0198:
01ac 4800 |H | Short_Literal 0x0
01ad a5f7 | | Store_Unchecked 0x2,-0x9
01ae e21a | | Load 0x1,0x1a
01af a5f8 | | Store_Unchecked 0x2,-0x8
01b0 e006 | | Load 0x0,0x6
01b1 180e | | Execute Package,Field_Execute,Field_Number 0xe
01b2 4801 |H | Short_Literal 0x1
01b3 0092 0838 | 8| Action Push_String_Extended,0x838 ; "Acquire (Set_Directory => \x22"
01b5 e5fe | | Load 0x2,-0x2
01b6 01cc | | Execute Vector,Catenate
01b7 0092 0839 | 9| Action Push_String_Extended,0x839 ; "\x22, Set_Library => \x22"
01b9 01cc | | Execute Vector,Catenate
01ba e5fd | | Load 0x2,-0x3
01bb 01cc | | Execute Vector,Catenate
01bc 0092 083a | :| Action Push_String_Extended,0x83a ; "\x22, Remote_Machine => \x22"
01be 01cc | | Execute Vector,Catenate
01bf e5fc | | Load 0x2,-0x4
01c0 01cc | | Execute Vector,Catenate
01c1 0092 0833 | 3| Action Push_String_Extended,0x833 ; "\x22, Username => \x22"
01c3 01cc | | Execute Vector,Catenate
01c4 e5fb | | Load 0x2,-0x5
01c5 01cc | | Execute Vector,Catenate
01c6 0092 0834 | 4| Action Push_String_Extended,0x834 ; "\x22, Password => ???"
01c8 01cc | | Execute Vector,Catenate
01c9 0092 0835 | 5| Action Push_String_Extended,0x835 ; ", Trace_Command => "
01cb 01cc | | Execute Vector,Catenate
01cc e5f9 | | Load 0x2,-0x7
01cd 00e1 | | Load_Encached Boolean_Cache
01ce 011c | | Execute Any,Convert_Unchecked
01cf 1c01 | | Execute_Immediate Run_Utility,0x1
01d0 01cc | | Execute Vector,Catenate
01d1 0092 0836 | 6| Action Push_String_Extended,0x836 ; ")."
01d3 01cc | | Execute Vector,Catenate
01d4 e007 | | Load 0x0,0x7
01d5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01d6 e5ff | | Load 0x2,-0x1
01d7 e001 | | Load 0x0,0x1
01d8 18ca | | Execute Package,Field_Execute,Field_Number 0xca
01d9 0f01 | | Execute_Immediate Equal,0x1
01da 7046 |pF | Jump_Nonzero 0x221
01db e5ff | | Load 0x2,-0x1
01dc e001 | | Load 0x0,0x1
01dd 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
01de 00db | | Load_Top At_Offset_3
01df 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01e0 00d9 | | Load_Top At_Offset_1
01e1 00db | | Load_Top At_Offset_3
01e2 e5f9 | | Load 0x2,-0x7
01e3 e5fa | | Load 0x2,-0x6
01e4 e5fb | | Load 0x2,-0x5
01e5 e5fc | | Load 0x2,-0x4
01e6 8241 | A | Call 0x1,0x41
01e7 e5fa | | Load 0x2,-0x6
01e8 e5fb | | Load 0x2,-0x5
01e9 e5fc | | Load 0x2,-0x4
01ea 8240 | @ | Call 0x1,0x40
01eb e5fc | | Load 0x2,-0x4
01ec e5fd | | Load 0x2,-0x3
01ed e5fe | | Load 0x2,-0x2
01ee e003 | | Load 0x0,0x3
01ef 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01f0 00d1 | | Pop_Control Pop_Count_1
01f1 c404 | | Store 0x2,0x4
01f2 4802 |H | Short_Literal 0x2
01f3 00da | | Load_Top At_Offset_2
01f4 e004 | | Load 0x0,0x4
01f5 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01f6 681e |h | Jump_Zero 0x215
01f7 4801 |H | Short_Literal 0x1
01f8 4802 |H | Short_Literal 0x2
01f9 e008 | | Load 0x0,0x8
01fa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01fb 0334 | 4 | Declare_Variable Array,With_Constraint
01fc e5fc | | Load 0x2,-0x4
01fd e008 | | Load 0x0,0x8
01fe 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01ff e008 | | Load 0x0,0x8
0200 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0201 0119 | | Execute Any,Check_In_Formal_Type
0202 4801 |H | Short_Literal 0x1
0203 00da | | Load_Top At_Offset_2
0204 01d6 | | Execute Vector,Field_Write
0205 00da | | Load_Top At_Offset_2
0206 e004 | | Load 0x0,0x4
0207 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0208 e008 | | Load 0x0,0x8
0209 1810 | | Execute Package,Field_Execute,Field_Number 0x10
020a e008 | | Load 0x0,0x8
020b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
020c 0119 | | Execute Any,Check_In_Formal_Type
020d 4802 |H | Short_Literal 0x2
020e 00da | | Load_Top At_Offset_2
020f 01d6 | | Execute Vector,Field_Write
0210 677f |g | Indirect_Literal Discrete,0x190,{0x00000000, 0x0000812a}
0211 e005 | | Load 0x0,0x5
0212 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0213 a5f7 | | Store_Unchecked 0x2,-0x9
0214 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0215 4800 |H | Short_Literal 0x0
0216 e23f | ? | Load 0x1,0x3f
0217 1c08 | | Execute_Immediate Run_Utility,0x8
0218 00db | | Load_Top At_Offset_3
0219 00d9 | | Load_Top At_Offset_1
021a 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
021b e21a | | Load 0x1,0x1a
021c e009 | | Load 0x0,0x9
021d 180d | | Execute Package,Field_Execute,Field_Number 0xd
021e 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
021f a5f8 | | Store_Unchecked 0x2,-0x8
0220 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0221 e005 | | Load 0x0,0x5
0222 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0223 e402 | | Load 0x2,0x2
0224 e5f9 | | Load 0x2,-0x7
0225 e5fa | | Load 0x2,-0x6
0226 e5fb | | Load 0x2,-0x5
0227 e5fc | | Load 0x2,-0x4
0228 8241 | A | Call 0x1,0x41
0229 e5fa | | Load 0x2,-0x6
022a e5fb | | Load 0x2,-0x5
022b e5fc | | Load 0x2,-0x4
022c 8240 | @ | Call 0x1,0x40
022d e5fc | | Load 0x2,-0x4
022e e5fd | | Load 0x2,-0x3
022f e5fe | | Load 0x2,-0x2
0230 e002 | | Load 0x0,0x2
0231 180f | | Execute Package,Field_Execute,Field_Number 0xf
0232 c402 | | Store 0x2,0x2
0233 0059 | Y | Store_Top Discrete,At_Offset_1
0234 00d8 | | Load_Top At_Offset_0
0235 6803 |h | Jump_Zero 0x239
0236 00d8 | | Load_Top At_Offset_0
0237 a5f7 | | Store_Unchecked 0x2,-0x9
0238 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0239 4801 |H | Short_Literal 0x1
023a e23f | ? | Load 0x1,0x3f
023b 1c08 | | Execute_Immediate Run_Utility,0x8
023c e402 | | Load 0x2,0x2
023d e23f | ? | Load 0x1,0x3f
023e 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
023f 0119 | | Execute Any,Check_In_Formal_Type
0240 00d9 | | Load_Top At_Offset_1
0241 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0242 e21a | | Load 0x1,0x1a
0243 e009 | | Load 0x0,0x9
0244 180d | | Execute Package,Field_Execute,Field_Number 0xd
0245 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0246 a5f8 | | Store_Unchecked 0x2,-0x8
0247 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0248 TRAP_0198:
0248 e00a | | Load 0x0,0xa
0249 010f | | Execute Exception,Equal
024a 6807 |h | Jump_Zero 0x252
024b e008 | | Load 0x0,0x8
024c 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
024d 673e |g> | Indirect_Literal Discrete,0x18c,{0x00000000, 0x000081cd}
024e e005 | | Load 0x0,0x5
024f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0250 a5f7 | | Store_Unchecked 0x2,-0x9
0251 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0252 e00b | | Load 0x0,0xb
0253 010f | | Execute Exception,Equal
0254 6807 |h | Jump_Zero 0x25c
0255 e008 | | Load 0x0,0x8
0256 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0257 6730 |g0 | Indirect_Literal Discrete,0x188,{0x00000000, 0x000081ce}
0258 e005 | | Load 0x0,0x5
0259 1813 | | Execute Package,Field_Execute,Field_Number 0x13
025a a5f7 | | Store_Unchecked 0x2,-0x9
025b 4508 |E | Exit_Suprogram New_Top_Offset 0x8
025c e00c | | Load 0x0,0xc
025d 010f | | Execute Exception,Equal
025e 6807 |h | Jump_Zero 0x266
025f e008 | | Load 0x0,0x8
0260 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0261 6722 |g" | Indirect_Literal Discrete,0x184,{0x00000000, 0x000081cf}
0262 e005 | | Load 0x0,0x5
0263 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0264 a5f7 | | Store_Unchecked 0x2,-0x9
0265 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0266 4801 |H | Short_Literal 0x1
0267 4802 |H | Short_Literal 0x2
0268 e008 | | Load 0x0,0x8
0269 1b0f | | Execute Package,Field_Read,Field_Number 0xf
026a 0334 | 4 | Declare_Variable Array,With_Constraint
026b 0092 083b | ;| Action Push_String_Extended,0x83b ; "Acquire (Directory)"
026d e008 | | Load 0x0,0x8
026e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
026f e008 | | Load 0x0,0x8
0270 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0271 0119 | | Execute Any,Check_In_Formal_Type
0272 4801 |H | Short_Literal 0x1
0273 00da | | Load_Top At_Offset_2
0274 01d6 | | Execute Vector,Field_Write
0275 4800 |H | Short_Literal 0x0
0276 4801 |H | Short_Literal 0x1
0277 e00d | | Load 0x0,0xd
0278 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0279 e008 | | Load 0x0,0x8
027a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
027b e008 | | Load 0x0,0x8
027c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
027d 0119 | | Execute Any,Check_In_Formal_Type
027e 4802 |H | Short_Literal 0x2
027f 00da | | Load_Top At_Offset_2
0280 01d6 | | Execute Vector,Field_Write
0281 66fe |f | Indirect_Literal Discrete,0x180,{0x00000000, 0x0000812d}
0282 e005 | | Load 0x0,0x5
0283 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0284 a5f7 | | Store_Unchecked 0x2,-0x9
0285 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0286 0000 0000 | | .XXX[0x2]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 0290 | | .CONST 0x0290 ; Address of begin
0289 02d9 | | .CONST 0x02d9 ; Address of exception handler
028a 0002 | | .CONST 0x0002 ; Number of locals
028b INIT_0288:
028b e004 | | Load 0x0,0x4
028c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
028d 02c7 | | Declare_Variable Any
028e 00d8 | | Load_Top At_Offset_0
028f 1c00 | | Execute_Immediate Run_Utility,0x0
0290 BODY_0288:
0290 4800 |H | Short_Literal 0x0
0291 a5fd | | Store_Unchecked 0x2,-0x3
0292 e006 | | Load 0x0,0x6
0293 180e | | Execute Package,Field_Execute,Field_Number 0xe
0294 4801 |H | Short_Literal 0x1
0295 0092 083c | <| Action Push_String_Extended,0x83c ; "Release (Trace_Command => "
0297 e5fe | | Load 0x2,-0x2
0298 00e1 | | Load_Encached Boolean_Cache
0299 011c | | Execute Any,Convert_Unchecked
029a 1c01 | | Execute_Immediate Run_Utility,0x1
029b 01cc | | Execute Vector,Catenate
029c 0092 0836 | 6| Action Push_String_Extended,0x836 ; ")."
029e 01cc | | Execute Vector,Catenate
029f e007 | | Load 0x0,0x7
02a0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02a1 00db | | Load_Top At_Offset_3
02a2 0217 | | Execute Heap_Access,All_Reference
02a3 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
02a4 0f01 | | Execute_Immediate Equal,0x1
02a5 7025 |p% | Jump_Nonzero 0x2cb
02a6 00db | | Load_Top At_Offset_3
02a7 0219 | | Execute Heap_Access,All_Read
02a8 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
02a9 00d9 | | Load_Top At_Offset_1
02aa 00d9 | | Load_Top At_Offset_1
02ab 4801 |H | Short_Literal 0x1
02ac e003 | | Load 0x0,0x3
02ad 1820 | | Execute Package,Field_Execute,Field_Number 0x20
02ae 00d1 | | Pop_Control Pop_Count_1
02af c402 | | Store 0x2,0x2
02b0 00d1 | | Pop_Control Pop_Count_1
02b1 4802 |H | Short_Literal 0x2
02b2 00d9 | | Load_Top At_Offset_1
02b3 e004 | | Load 0x0,0x4
02b4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02b5 6814 |h | Jump_Zero 0x2ca
02b6 4801 |H | Short_Literal 0x1
02b7 4801 |H | Short_Literal 0x1
02b8 e008 | | Load 0x0,0x8
02b9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02ba 0334 | 4 | Declare_Variable Array,With_Constraint
02bb 00d9 | | Load_Top At_Offset_1
02bc e004 | | Load 0x0,0x4
02bd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02be e008 | | Load 0x0,0x8
02bf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02c0 e008 | | Load 0x0,0x8
02c1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02c2 0119 | | Execute Any,Check_In_Formal_Type
02c3 4801 |H | Short_Literal 0x1
02c4 00da | | Load_Top At_Offset_2
02c5 01d6 | | Execute Vector,Field_Write
02c6 6039 |`9 | Indirect_Literal Discrete,0x300,{0x00000000, 0x00008135}
02c7 e005 | | Load 0x0,0x5
02c8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02c9 a5fd | | Store_Unchecked 0x2,-0x3
02ca 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02cb 00db | | Load_Top At_Offset_3
02cc 0219 | | Execute Heap_Access,All_Read
02cd e005 | | Load 0x0,0x5
02ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02cf 00d9 | | Load_Top At_Offset_1
02d0 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
02d1 e5fe | | Load 0x2,-0x2
02d2 e002 | | Load 0x0,0x2
02d3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02d4 00da | | Load_Top At_Offset_2
02d5 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
02d6 c5fd | | Store 0x2,-0x3
02d7 00d1 | | Pop_Control Pop_Count_1
02d8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02d9 TRAP_0288:
02d9 0007 | | Action Break_Optional
02da 4801 |H | Short_Literal 0x1
02db 4802 |H | Short_Literal 0x2
02dc e008 | | Load 0x0,0x8
02dd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02de 0334 | 4 | Declare_Variable Array,With_Constraint
02df 0092 083d | =| Action Push_String_Extended,0x83d ; "Release"
02e1 e008 | | Load 0x0,0x8
02e2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02e3 e008 | | Load 0x0,0x8
02e4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02e5 0119 | | Execute Any,Check_In_Formal_Type
02e6 4801 |H | Short_Literal 0x1
02e7 00da | | Load_Top At_Offset_2
02e8 01d6 | | Execute Vector,Field_Write
02e9 4800 |H | Short_Literal 0x0
02ea 4801 |H | Short_Literal 0x1
02eb e00d | | Load 0x0,0xd
02ec 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02ed e008 | | Load 0x0,0x8
02ee 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02ef e008 | | Load 0x0,0x8
02f0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02f1 0119 | | Execute Any,Check_In_Formal_Type
02f2 4802 |H | Short_Literal 0x2
02f3 00da | | Load_Top At_Offset_2
02f4 01d6 | | Execute Vector,Field_Write
02f5 6006 |` | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x0000812d}
02f6 e005 | | Load 0x0,0x5
02f7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02f8 a5fd | | Store_Unchecked 0x2,-0x3
02f9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02fa 0000 0000 | | .XXX[0x2]
02fc 0000 0000 | | .LITERAL {0x00000000, 0x0000812d}
0300 0000 0000 | | .LITERAL {0x00000000, 0x00008135}
0304 0000 0000 | | .BLANK 0000[0x4]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 0310 | | .CONST 0x0310 ; Address of begin
0309 0359 | Y | .CONST 0x0359 ; Address of exception handler
030a 0002 | | .CONST 0x0002 ; Number of locals
030b INIT_0308:
030b e004 | | Load 0x0,0x4
030c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
030d 02c7 | | Declare_Variable Any
030e 00d8 | | Load_Top At_Offset_0
030f 1c00 | | Execute_Immediate Run_Utility,0x0
0310 BODY_0308:
0310 4800 |H | Short_Literal 0x0
0311 a5fd | | Store_Unchecked 0x2,-0x3
0312 e006 | | Load 0x0,0x6
0313 180e | | Execute Package,Field_Execute,Field_Number 0xe
0314 4801 |H | Short_Literal 0x1
0315 0092 083e | >| Action Push_String_Extended,0x83e ; "Destroy (Trace_Command => "
0317 e5fe | | Load 0x2,-0x2
0318 00e1 | | Load_Encached Boolean_Cache
0319 011c | | Execute Any,Convert_Unchecked
031a 1c01 | | Execute_Immediate Run_Utility,0x1
031b 01cc | | Execute Vector,Catenate
031c 0092 0836 | 6| Action Push_String_Extended,0x836 ; ")."
031e 01cc | | Execute Vector,Catenate
031f e007 | | Load 0x0,0x7
0320 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0321 00db | | Load_Top At_Offset_3
0322 0217 | | Execute Heap_Access,All_Reference
0323 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0324 0f01 | | Execute_Immediate Equal,0x1
0325 7025 |p% | Jump_Nonzero 0x34b
0326 00db | | Load_Top At_Offset_3
0327 0219 | | Execute Heap_Access,All_Read
0328 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0329 00d9 | | Load_Top At_Offset_1
032a 00d9 | | Load_Top At_Offset_1
032b 4801 |H | Short_Literal 0x1
032c e003 | | Load 0x0,0x3
032d 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
032e 00d1 | | Pop_Control Pop_Count_1
032f c402 | | Store 0x2,0x2
0330 00d1 | | Pop_Control Pop_Count_1
0331 4802 |H | Short_Literal 0x2
0332 00d9 | | Load_Top At_Offset_1
0333 e004 | | Load 0x0,0x4
0334 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0335 6814 |h | Jump_Zero 0x34a
0336 4801 |H | Short_Literal 0x1
0337 4801 |H | Short_Literal 0x1
0338 e008 | | Load 0x0,0x8
0339 1b0f | | Execute Package,Field_Read,Field_Number 0xf
033a 0334 | 4 | Declare_Variable Array,With_Constraint
033b 00d9 | | Load_Top At_Offset_1
033c e004 | | Load 0x0,0x4
033d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
033e e008 | | Load 0x0,0x8
033f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0340 e008 | | Load 0x0,0x8
0341 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0342 0119 | | Execute Any,Check_In_Formal_Type
0343 4801 |H | Short_Literal 0x1
0344 00da | | Load_Top At_Offset_2
0345 01d6 | | Execute Vector,Field_Write
0346 6035 |`5 | Indirect_Literal Discrete,0x37c,{0x00000000, 0x0000812f}
0347 e005 | | Load 0x0,0x5
0348 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0349 a5fd | | Store_Unchecked 0x2,-0x3
034a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
034b 00db | | Load_Top At_Offset_3
034c 0219 | | Execute Heap_Access,All_Read
034d e005 | | Load 0x0,0x5
034e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
034f 00d9 | | Load_Top At_Offset_1
0350 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0351 e5fe | | Load 0x2,-0x2
0352 e002 | | Load 0x0,0x2
0353 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0354 00da | | Load_Top At_Offset_2
0355 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0356 c5fd | | Store 0x2,-0x3
0357 00d1 | | Pop_Control Pop_Count_1
0358 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0359 TRAP_0308:
0359 0007 | | Action Break_Optional
035a 4801 |H | Short_Literal 0x1
035b 4802 |H | Short_Literal 0x2
035c e008 | | Load 0x0,0x8
035d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
035e 0334 | 4 | Declare_Variable Array,With_Constraint
035f 0092 083f | ?| Action Push_String_Extended,0x83f ; "Destroy"
0361 e008 | | Load 0x0,0x8
0362 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0363 e008 | | Load 0x0,0x8
0364 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0365 0119 | | Execute Any,Check_In_Formal_Type
0366 4801 |H | Short_Literal 0x1
0367 00da | | Load_Top At_Offset_2
0368 01d6 | | Execute Vector,Field_Write
0369 4800 |H | Short_Literal 0x0
036a 4801 |H | Short_Literal 0x1
036b e00d | | Load 0x0,0xd
036c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
036d e008 | | Load 0x0,0x8
036e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
036f e008 | | Load 0x0,0x8
0370 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0371 0119 | | Execute Any,Check_In_Formal_Type
0372 4802 |H | Short_Literal 0x2
0373 00da | | Load_Top At_Offset_2
0374 01d6 | | Execute Vector,Field_Write
0375 6786 |g | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x0000812d}
0376 e005 | | Load 0x0,0x5
0377 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0378 a5fd | | Store_Unchecked 0x2,-0x3
0379 4503 |E | Exit_Suprogram New_Top_Offset 0x3
037a 0000 0000 | | .XXX[0x2]
037c 0000 0000 | | .LITERAL {0x00000000, 0x0000812f}
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0388 | | .CONST 0x0388 ; Address of begin
0381 03e4 | | .CONST 0x03e4 ; Address of exception handler
0382 0002 | | .CONST 0x0002 ; Number of locals
0383 INIT_0380:
0383 e004 | | Load 0x0,0x4
0384 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0385 02c7 | | Declare_Variable Any
0386 00d8 | | Load_Top At_Offset_0
0387 1c00 | | Execute_Immediate Run_Utility,0x0
0388 BODY_0380:
0388 4800 |H | Short_Literal 0x0
0389 a5fb | | Store_Unchecked 0x2,-0x5
038a e006 | | Load 0x0,0x6
038b 180e | | Execute Package,Field_Execute,Field_Number 0xe
038c 4801 |H | Short_Literal 0x1
038d 0092 0840 | @| Action Push_String_Extended,0x840 ; "Set_Remote_Directory (Set_Directory => \x22"
038f e5ff | | Load 0x2,-0x1
0390 01cc | | Execute Vector,Catenate
0391 0092 0839 | 9| Action Push_String_Extended,0x839 ; "\x22, Set_Library => \x22"
0393 01cc | | Execute Vector,Catenate
0394 e5fd | | Load 0x2,-0x3
0395 01cc | | Execute Vector,Catenate
0396 0092 0841 | A| Action Push_String_Extended,0x841 ; "\x22, Trace_Command => "
0398 01cc | | Execute Vector,Catenate
0399 e5fc | | Load 0x2,-0x4
039a 00e1 | | Load_Encached Boolean_Cache
039b 011c | | Execute Any,Convert_Unchecked
039c 1c01 | | Execute_Immediate Run_Utility,0x1
039d 01cc | | Execute Vector,Catenate
039e 0092 0836 | 6| Action Push_String_Extended,0x836 ; ")."
03a0 01cc | | Execute Vector,Catenate
03a1 e007 | | Load 0x0,0x7
03a2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03a3 e5fe | | Load 0x2,-0x2
03a4 0217 | | Execute Heap_Access,All_Reference
03a5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
03a6 0f01 | | Execute_Immediate Equal,0x1
03a7 7030 |p0 | Jump_Nonzero 0x3d8
03a8 00d8 | | Load_Top At_Offset_0
03a9 e5fc | | Load 0x2,-0x4
03aa e5fd | | Load 0x2,-0x3
03ab e5fe | | Load 0x2,-0x2
03ac 0217 | | Execute Heap_Access,All_Reference
03ad 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
03ae e5ff | | Load 0x2,-0x1
03af e003 | | Load 0x0,0x3
03b0 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
03b1 c402 | | Store 0x2,0x2
03b2 4802 |H | Short_Literal 0x2
03b3 00d9 | | Load_Top At_Offset_1
03b4 e004 | | Load 0x0,0x4
03b5 1817 | | Execute Package,Field_Execute,Field_Number 0x17
03b6 6820 |h | Jump_Zero 0x3d7
03b7 4801 |H | Short_Literal 0x1
03b8 4801 |H | Short_Literal 0x1
03b9 e008 | | Load 0x0,0x8
03ba 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03bb 0334 | 4 | Declare_Variable Array,With_Constraint
03bc 0092 0842 | B| Action Push_String_Extended,0x842 ; "Command \x22"
03be e5ff | | Load 0x2,-0x1
03bf 01cc | | Execute Vector,Catenate
03c0 0092 0843 | C| Action Push_String_Extended,0x843 ; "\x22 failed to set remote directory."
03c2 01cc | | Execute Vector,Catenate
03c3 0092 0844 | D| Action Push_String_Extended,0x844 ; " Got bad status code = "
03c5 01cc | | Execute Vector,Catenate
03c6 00da | | Load_Top At_Offset_2
03c7 e004 | | Load 0x0,0x4
03c8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03c9 01cc | | Execute Vector,Catenate
03ca e008 | | Load 0x0,0x8
03cb 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03cc e008 | | Load 0x0,0x8
03cd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03ce 0119 | | Execute Any,Check_In_Formal_Type
03cf 4801 |H | Short_Literal 0x1
03d0 00da | | Load_Top At_Offset_2
03d1 01d6 | | Execute Vector,Field_Write
03d2 4807 |H | Short_Literal 0x7
03d3 6038 |`8 | Indirect_Literal Discrete,0x40c,{0x00000000, 0x00008128}
03d4 e005 | | Load 0x0,0x5
03d5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
03d6 a5fb | | Store_Unchecked 0x2,-0x5
03d7 4505 |E | Exit_Suprogram New_Top_Offset 0x5
03d8 e005 | | Load 0x0,0x5
03d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03da e5fc | | Load 0x2,-0x4
03db e5fd | | Load 0x2,-0x3
03dc e5fe | | Load 0x2,-0x2
03dd 0217 | | Execute Heap_Access,All_Reference
03de 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
03df e5ff | | Load 0x2,-0x1
03e0 e002 | | Load 0x0,0x2
03e1 1812 | | Execute Package,Field_Execute,Field_Number 0x12
03e2 c5fb | | Store 0x2,-0x5
03e3 4505 |E | Exit_Suprogram New_Top_Offset 0x5
03e4 TRAP_0380:
03e4 0007 | | Action Break_Optional
03e5 4801 |H | Short_Literal 0x1
03e6 4802 |H | Short_Literal 0x2
03e7 e008 | | Load 0x0,0x8
03e8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03e9 0334 | 4 | Declare_Variable Array,With_Constraint
03ea 0092 0845 | E| Action Push_String_Extended,0x845 ; "Set_Remote_Directory"
03ec e008 | | Load 0x0,0x8
03ed 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03ee e008 | | Load 0x0,0x8
03ef 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03f0 0119 | | Execute Any,Check_In_Formal_Type
03f1 4801 |H | Short_Literal 0x1
03f2 00da | | Load_Top At_Offset_2
03f3 01d6 | | Execute Vector,Field_Write
03f4 4800 |H | Short_Literal 0x0
03f5 4801 |H | Short_Literal 0x1
03f6 e00d | | Load 0x0,0xd
03f7 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03f8 e008 | | Load 0x0,0x8
03f9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03fa e008 | | Load 0x0,0x8
03fb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03fc 0119 | | Execute Any,Check_In_Formal_Type
03fd 4802 |H | Short_Literal 0x2
03fe 00da | | Load_Top At_Offset_2
03ff 01d6 | | Execute Vector,Field_Write
0400 6007 |` | Indirect_Literal Discrete,0x408,{0x00000000, 0x0000812d}
0401 e005 | | Load 0x0,0x5
0402 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0403 a5fb | | Store_Unchecked 0x2,-0x5
0404 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0405 0000 0000 | | .XXX[0x3]
0407 0000 | |
0408 0000 0000 | | .LITERAL {0x00000000, 0x0000812d}
040c 0000 0000 | | .LITERAL {0x00000000, 0x00008128}
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 041a | | .CONST 0x041a ; Address of begin
0411 0485 | | .CONST 0x0485 ; Address of exception handler
0412 0003 | | .CONST 0x0003 ; Number of locals
0413 INIT_0410:
0413 e004 | | Load 0x0,0x4
0414 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0415 02c7 | | Declare_Variable Any
0416 00d8 | | Load_Top At_Offset_0
0417 1c00 | | Execute_Immediate Run_Utility,0x0
0418 e003 | | Load 0x0,0x3
0419 1b0d | | Execute Package,Field_Read,Field_Number 0xd
041a BODY_0410:
041a 4800 |H | Short_Literal 0x0
041b a5fa | | Store_Unchecked 0x2,-0x6
041c e006 | | Load 0x0,0x6
041d 180e | | Execute Package,Field_Execute,Field_Number 0xe
041e 4801 |H | Short_Literal 0x1
041f 0092 0846 | F| Action Push_String_Extended,0x846 ; "Put (Host_File_Name => \x22"
0421 e5ff | | Load 0x2,-0x1
0422 01cc | | Execute Vector,Catenate
0423 0092 0847 | G| Action Push_String_Extended,0x847 ; "\x22, Target_File_Name => \x22"
0425 01cc | | Execute Vector,Catenate
0426 e5fe | | Load 0x2,-0x2
0427 01cc | | Execute Vector,Catenate
0428 0092 0841 | A| Action Push_String_Extended,0x841 ; "\x22, Trace_Command => "
042a 01cc | | Execute Vector,Catenate
042b e5fb | | Load 0x2,-0x5
042c 00e1 | | Load_Encached Boolean_Cache
042d 011c | | Execute Any,Convert_Unchecked
042e 1c01 | | Execute_Immediate Run_Utility,0x1
042f 01cc | | Execute Vector,Catenate
0430 0092 0836 | 6| Action Push_String_Extended,0x836 ; ")."
0432 01cc | | Execute Vector,Catenate
0433 e007 | | Load 0x0,0x7
0434 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0435 e5fd | | Load 0x2,-0x3
0436 0217 | | Execute Heap_Access,All_Reference
0437 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0438 0f01 | | Execute_Immediate Equal,0x1
0439 703e |p> | Jump_Nonzero 0x478
043a e5fc | | Load 0x2,-0x4
043b 7003 |p | Jump_Nonzero 0x43f
043c 4800 |H | Short_Literal 0x0
043d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
043e 7802 |x | Jump 0x441
043f 4801 |H | Short_Literal 0x1
0440 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0441 00d9 | | Load_Top At_Offset_1
0442 e5fb | | Load 0x2,-0x5
0443 00da | | Load_Top At_Offset_2
0444 e5fd | | Load 0x2,-0x3
0445 0217 | | Execute Heap_Access,All_Reference
0446 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
0447 e5fe | | Load 0x2,-0x2
0448 e5ff | | Load 0x2,-0x1
0449 e003 | | Load 0x0,0x3
044a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
044b c402 | | Store 0x2,0x2
044c 4802 |H | Short_Literal 0x2
044d 00da | | Load_Top At_Offset_2
044e e004 | | Load 0x0,0x4
044f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0450 6826 |h& | Jump_Zero 0x477
0451 4801 |H | Short_Literal 0x1
0452 4803 |H | Short_Literal 0x3
0453 e008 | | Load 0x0,0x8
0454 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0455 0334 | 4 | Declare_Variable Array,With_Constraint
0456 e5ff | | Load 0x2,-0x1
0457 e008 | | Load 0x0,0x8
0458 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0459 e008 | | Load 0x0,0x8
045a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
045b 0119 | | Execute Any,Check_In_Formal_Type
045c 4801 |H | Short_Literal 0x1
045d 00da | | Load_Top At_Offset_2
045e 01d6 | | Execute Vector,Field_Write
045f e5fe | | Load 0x2,-0x2
0460 e008 | | Load 0x0,0x8
0461 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0462 e008 | | Load 0x0,0x8
0463 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0464 0119 | | Execute Any,Check_In_Formal_Type
0465 4802 |H | Short_Literal 0x2
0466 00da | | Load_Top At_Offset_2
0467 01d6 | | Execute Vector,Field_Write
0468 00da | | Load_Top At_Offset_2
0469 e004 | | Load 0x0,0x4
046a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
046b e008 | | Load 0x0,0x8
046c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
046d e008 | | Load 0x0,0x8
046e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
046f 0119 | | Execute Any,Check_In_Formal_Type
0470 4803 |H | Short_Literal 0x3
0471 00da | | Load_Top At_Offset_2
0472 01d6 | | Execute Vector,Field_Write
0473 6034 |`4 | Indirect_Literal Discrete,0x4a8,{0x00000000, 0x00008134}
0474 e005 | | Load 0x0,0x5
0475 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0476 a5fa | | Store_Unchecked 0x2,-0x6
0477 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0478 e005 | | Load 0x0,0x5
0479 1b0d | | Execute Package,Field_Read,Field_Number 0xd
047a e5fb | | Load 0x2,-0x5
047b e5fc | | Load 0x2,-0x4
047c e5fd | | Load 0x2,-0x3
047d 0217 | | Execute Heap_Access,All_Reference
047e 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
047f e5fe | | Load 0x2,-0x2
0480 e5ff | | Load 0x2,-0x1
0481 e002 | | Load 0x0,0x2
0482 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0483 c5fa | | Store 0x2,-0x6
0484 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0485 TRAP_0410:
0485 0007 | | Action Break_Optional
0486 4801 |H | Short_Literal 0x1
0487 4802 |H | Short_Literal 0x2
0488 e008 | | Load 0x0,0x8
0489 1b0f | | Execute Package,Field_Read,Field_Number 0xf
048a 0334 | 4 | Declare_Variable Array,With_Constraint
048b 0092 0848 | H| Action Push_String_Extended,0x848 ; "Put"
048d e008 | | Load 0x0,0x8
048e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
048f e008 | | Load 0x0,0x8
0490 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0491 0119 | | Execute Any,Check_In_Formal_Type
0492 4801 |H | Short_Literal 0x1
0493 00da | | Load_Top At_Offset_2
0494 01d6 | | Execute Vector,Field_Write
0495 4800 |H | Short_Literal 0x0
0496 4801 |H | Short_Literal 0x1
0497 e00d | | Load 0x0,0xd
0498 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0499 e008 | | Load 0x0,0x8
049a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
049b e008 | | Load 0x0,0x8
049c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
049d 0119 | | Execute Any,Check_In_Formal_Type
049e 4802 |H | Short_Literal 0x2
049f 00da | | Load_Top At_Offset_2
04a0 01d6 | | Execute Vector,Field_Write
04a1 6766 |gf | Indirect_Literal Discrete,0x408,{0x00000000, 0x0000812d}
04a2 e005 | | Load 0x0,0x5
04a3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04a4 a5fa | | Store_Unchecked 0x2,-0x6
04a5 4506 |E | Exit_Suprogram New_Top_Offset 0x6
04a6 0000 0000 | | .XXX[0x2]
04a8 0000 0000 | | .LITERAL {0x00000000, 0x00008134}
04ac 0000 0000 | | .BLANK 0000[0x4]
04b0 ; --------------------------------------------------------------------------------------
04b0 ; SUBPROGRAM
04b0 ; --------------------------------------------------------------------------------------
04b0 04ba | | .CONST 0x04ba ; Address of begin
04b1 0525 | % | .CONST 0x0525 ; Address of exception handler
04b2 0003 | | .CONST 0x0003 ; Number of locals
04b3 INIT_04b0:
04b3 e004 | | Load 0x0,0x4
04b4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04b5 02c7 | | Declare_Variable Any
04b6 00d8 | | Load_Top At_Offset_0
04b7 1c00 | | Execute_Immediate Run_Utility,0x0
04b8 e003 | | Load 0x0,0x3
04b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ba BODY_04b0:
04ba 4800 |H | Short_Literal 0x0
04bb a5fa | | Store_Unchecked 0x2,-0x6
04bc e006 | | Load 0x0,0x6
04bd 180e | | Execute Package,Field_Execute,Field_Number 0xe
04be 4801 |H | Short_Literal 0x1
04bf 0092 0849 | I| Action Push_String_Extended,0x849 ; "Get (Host_File_Name => \x22"
04c1 e5ff | | Load 0x2,-0x1
04c2 01cc | | Execute Vector,Catenate
04c3 0092 0847 | G| Action Push_String_Extended,0x847 ; "\x22, Target_File_Name => \x22"
04c5 01cc | | Execute Vector,Catenate
04c6 e5fe | | Load 0x2,-0x2
04c7 01cc | | Execute Vector,Catenate
04c8 0092 0841 | A| Action Push_String_Extended,0x841 ; "\x22, Trace_Command => "
04ca 01cc | | Execute Vector,Catenate
04cb e5fb | | Load 0x2,-0x5
04cc 00e1 | | Load_Encached Boolean_Cache
04cd 011c | | Execute Any,Convert_Unchecked
04ce 1c01 | | Execute_Immediate Run_Utility,0x1
04cf 01cc | | Execute Vector,Catenate
04d0 0092 0836 | 6| Action Push_String_Extended,0x836 ; ")."
04d2 01cc | | Execute Vector,Catenate
04d3 e007 | | Load 0x0,0x7
04d4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04d5 e5fd | | Load 0x2,-0x3
04d6 0217 | | Execute Heap_Access,All_Reference
04d7 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04d8 0f01 | | Execute_Immediate Equal,0x1
04d9 703e |p> | Jump_Nonzero 0x518
04da e5fc | | Load 0x2,-0x4
04db 7003 |p | Jump_Nonzero 0x4df
04dc 4800 |H | Short_Literal 0x0
04dd 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
04de 7802 |x | Jump 0x4e1
04df 4801 |H | Short_Literal 0x1
04e0 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
04e1 00d9 | | Load_Top At_Offset_1
04e2 4801 |H | Short_Literal 0x1
04e3 00da | | Load_Top At_Offset_2
04e4 e5fd | | Load 0x2,-0x3
04e5 0217 | | Execute Heap_Access,All_Reference
04e6 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
04e7 e5fe | | Load 0x2,-0x2
04e8 e5ff | | Load 0x2,-0x1
04e9 e003 | | Load 0x0,0x3
04ea 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
04eb c402 | | Store 0x2,0x2
04ec 4802 |H | Short_Literal 0x2
04ed 00da | | Load_Top At_Offset_2
04ee e004 | | Load 0x0,0x4
04ef 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04f0 6826 |h& | Jump_Zero 0x517
04f1 4801 |H | Short_Literal 0x1
04f2 4803 |H | Short_Literal 0x3
04f3 e008 | | Load 0x0,0x8
04f4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04f5 0334 | 4 | Declare_Variable Array,With_Constraint
04f6 e5ff | | Load 0x2,-0x1
04f7 e008 | | Load 0x0,0x8
04f8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04f9 e008 | | Load 0x0,0x8
04fa 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04fb 0119 | | Execute Any,Check_In_Formal_Type
04fc 4801 |H | Short_Literal 0x1
04fd 00da | | Load_Top At_Offset_2
04fe 01d6 | | Execute Vector,Field_Write
04ff e5fe | | Load 0x2,-0x2
0500 e008 | | Load 0x0,0x8
0501 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0502 e008 | | Load 0x0,0x8
0503 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0504 0119 | | Execute Any,Check_In_Formal_Type
0505 4802 |H | Short_Literal 0x2
0506 00da | | Load_Top At_Offset_2
0507 01d6 | | Execute Vector,Field_Write
0508 00da | | Load_Top At_Offset_2
0509 e004 | | Load 0x0,0x4
050a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
050b e008 | | Load 0x0,0x8
050c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
050d e008 | | Load 0x0,0x8
050e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
050f 0119 | | Execute Any,Check_In_Formal_Type
0510 4803 |H | Short_Literal 0x3
0511 00da | | Load_Top At_Offset_2
0512 01d6 | | Execute Vector,Field_Write
0513 6038 |`8 | Indirect_Literal Discrete,0x54c,{0x00000000, 0x00008133}
0514 e005 | | Load 0x0,0x5
0515 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0516 a5fa | | Store_Unchecked 0x2,-0x6
0517 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0518 e005 | | Load 0x0,0x5
0519 1b0d | | Execute Package,Field_Read,Field_Number 0xd
051a e5fb | | Load 0x2,-0x5
051b e5fc | | Load 0x2,-0x4
051c e5fd | | Load 0x2,-0x3
051d 0217 | | Execute Heap_Access,All_Reference
051e 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
051f e5fe | | Load 0x2,-0x2
0520 e5ff | | Load 0x2,-0x1
0521 e002 | | Load 0x0,0x2
0522 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0523 c5fa | | Store 0x2,-0x6
0524 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0525 TRAP_04b0:
0525 0007 | | Action Break_Optional
0526 4801 |H | Short_Literal 0x1
0527 4802 |H | Short_Literal 0x2
0528 e008 | | Load 0x0,0x8
0529 1b0f | | Execute Package,Field_Read,Field_Number 0xf
052a 0334 | 4 | Declare_Variable Array,With_Constraint
052b 0092 084a | J| Action Push_String_Extended,0x84a ; "Get"
052d e008 | | Load 0x0,0x8
052e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
052f e008 | | Load 0x0,0x8
0530 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0531 0119 | | Execute Any,Check_In_Formal_Type
0532 4801 |H | Short_Literal 0x1
0533 00da | | Load_Top At_Offset_2
0534 01d6 | | Execute Vector,Field_Write
0535 4800 |H | Short_Literal 0x0
0536 4801 |H | Short_Literal 0x1
0537 e00d | | Load 0x0,0xd
0538 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0539 e008 | | Load 0x0,0x8
053a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
053b e008 | | Load 0x0,0x8
053c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
053d 0119 | | Execute Any,Check_In_Formal_Type
053e 4802 |H | Short_Literal 0x2
053f 00da | | Load_Top At_Offset_2
0540 01d6 | | Execute Vector,Field_Write
0541 6006 |` | Indirect_Literal Discrete,0x548,{0x00000000, 0x0000812d}
0542 e005 | | Load 0x0,0x5
0543 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0544 a5fa | | Store_Unchecked 0x2,-0x6
0545 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0546 0000 0000 | | .XXX[0x2]
0548 0000 0000 | | .LITERAL {0x00000000, 0x0000812d}
054c 0000 0000 | | .LITERAL {0x00000000, 0x00008133}
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0558 | X | .CONST 0x0558 ; Address of begin
0551 05cf | | .CONST 0x05cf ; Address of exception handler
0552 0002 | | .CONST 0x0002 ; Number of locals
0553 INIT_0550:
0553 e004 | | Load 0x0,0x4
0554 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0555 02c7 | | Declare_Variable Any
0556 00d8 | | Load_Top At_Offset_0
0557 1c00 | | Execute_Immediate Run_Utility,0x0
0558 BODY_0550:
0558 4800 |H | Short_Literal 0x0
0559 a5f8 | | Store_Unchecked 0x2,-0x8
055a e006 | | Load 0x0,0x6
055b 180e | | Execute Package,Field_Execute,Field_Number 0xe
055c 4801 |H | Short_Literal 0x1
055d 0092 084b | K| Action Push_String_Extended,0x84b ; "Execute_Command (Command_Line => \x22"
055f e5ff | | Load 0x2,-0x1
0560 01cc | | Execute Vector,Catenate
0561 0092 084c | L| Action Push_String_Extended,0x84c ; "\x22, Error_Pattern => \x22"
0563 01cc | | Execute Vector,Catenate
0564 e5fd | | Load 0x2,-0x3
0565 01cc | | Execute Vector,Catenate
0566 0092 084d | M| Action Push_String_Extended,0x84d ; "\x22, Parse_Error_Output => "
0568 01cc | | Execute Vector,Catenate
0569 e5fc | | Load 0x2,-0x4
056a 00e1 | | Load_Encached Boolean_Cache
056b 011c | | Execute Any,Convert_Unchecked
056c 1c01 | | Execute_Immediate Run_Utility,0x1
056d 01cc | | Execute Vector,Catenate
056e 0092 084e | N| Action Push_String_Extended,0x84e ; ", Parse_Standard_Output => "
0570 01cc | | Execute Vector,Catenate
0571 e5fb | | Load 0x2,-0x5
0572 00e1 | | Load_Encached Boolean_Cache
0573 011c | | Execute Any,Convert_Unchecked
0574 1c01 | | Execute_Immediate Run_Utility,0x1
0575 01cc | | Execute Vector,Catenate
0576 0092 084f | O| Action Push_String_Extended,0x84f ; ", Show_Parsed_Output => "
0578 01cc | | Execute Vector,Catenate
0579 e5fa | | Load 0x2,-0x6
057a 00e1 | | Load_Encached Boolean_Cache
057b 011c | | Execute Any,Convert_Unchecked
057c 1c01 | | Execute_Immediate Run_Utility,0x1
057d 01cc | | Execute Vector,Catenate
057e 0092 0835 | 5| Action Push_String_Extended,0x835 ; ", Trace_Command => "
0580 01cc | | Execute Vector,Catenate
0581 e5f9 | | Load 0x2,-0x7
0582 00e1 | | Load_Encached Boolean_Cache
0583 011c | | Execute Any,Convert_Unchecked
0584 1c01 | | Execute_Immediate Run_Utility,0x1
0585 01cc | | Execute Vector,Catenate
0586 0092 0836 | 6| Action Push_String_Extended,0x836 ; ")."
0588 01cc | | Execute Vector,Catenate
0589 e007 | | Load 0x0,0x7
058a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
058b e5fe | | Load 0x2,-0x2
058c 0217 | | Execute Heap_Access,All_Reference
058d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
058e 0f01 | | Execute_Immediate Equal,0x1
058f 7030 |p0 | Jump_Nonzero 0x5c0
0590 00d8 | | Load_Top At_Offset_0
0591 e5f9 | | Load 0x2,-0x7
0592 e5fa | | Load 0x2,-0x6
0593 e5fb | | Load 0x2,-0x5
0594 e5fc | | Load 0x2,-0x4
0595 e5fd | | Load 0x2,-0x3
0596 e5fe | | Load 0x2,-0x2
0597 0217 | | Execute Heap_Access,All_Reference
0598 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
0599 e5ff | | Load 0x2,-0x1
059a e003 | | Load 0x0,0x3
059b 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
059c c402 | | Store 0x2,0x2
059d 4802 |H | Short_Literal 0x2
059e 00d9 | | Load_Top At_Offset_1
059f e004 | | Load 0x0,0x4
05a0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
05a1 681d |h | Jump_Zero 0x5bf
05a2 4801 |H | Short_Literal 0x1
05a3 4802 |H | Short_Literal 0x2
05a4 e008 | | Load 0x0,0x8
05a5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05a6 0334 | 4 | Declare_Variable Array,With_Constraint
05a7 e5ff | | Load 0x2,-0x1
05a8 e008 | | Load 0x0,0x8
05a9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05aa e008 | | Load 0x0,0x8
05ab 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05ac 0119 | | Execute Any,Check_In_Formal_Type
05ad 4801 |H | Short_Literal 0x1
05ae 00da | | Load_Top At_Offset_2
05af 01d6 | | Execute Vector,Field_Write
05b0 00d9 | | Load_Top At_Offset_1
05b1 e004 | | Load 0x0,0x4
05b2 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05b3 e008 | | Load 0x0,0x8
05b4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05b5 e008 | | Load 0x0,0x8
05b6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05b7 0119 | | Execute Any,Check_In_Formal_Type
05b8 4802 |H | Short_Literal 0x2
05b9 00da | | Load_Top At_Offset_2
05ba 01d6 | | Execute Vector,Field_Write
05bb 6034 |`4 | Indirect_Literal Discrete,0x5f0,{0x00000000, 0x00008132}
05bc e005 | | Load 0x0,0x5
05bd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05be a5f8 | | Store_Unchecked 0x2,-0x8
05bf 4508 |E | Exit_Suprogram New_Top_Offset 0x8
05c0 e005 | | Load 0x0,0x5
05c1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05c2 e5f9 | | Load 0x2,-0x7
05c3 e5fa | | Load 0x2,-0x6
05c4 e5fb | | Load 0x2,-0x5
05c5 e5fc | | Load 0x2,-0x4
05c6 e5fd | | Load 0x2,-0x3
05c7 e5fe | | Load 0x2,-0x2
05c8 0217 | | Execute Heap_Access,All_Reference
05c9 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
05ca e5ff | | Load 0x2,-0x1
05cb e002 | | Load 0x0,0x2
05cc 1815 | | Execute Package,Field_Execute,Field_Number 0x15
05cd c5f8 | | Store 0x2,-0x8
05ce 4508 |E | Exit_Suprogram New_Top_Offset 0x8
05cf TRAP_0550:
05cf 0007 | | Action Break_Optional
05d0 4801 |H | Short_Literal 0x1
05d1 4802 |H | Short_Literal 0x2
05d2 e008 | | Load 0x0,0x8
05d3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05d4 0334 | 4 | Declare_Variable Array,With_Constraint
05d5 0092 0850 | P| Action Push_String_Extended,0x850 ; "Execute_Command"
05d7 e008 | | Load 0x0,0x8
05d8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05d9 e008 | | Load 0x0,0x8
05da 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05db 0119 | | Execute Any,Check_In_Formal_Type
05dc 4801 |H | Short_Literal 0x1
05dd 00da | | Load_Top At_Offset_2
05de 01d6 | | Execute Vector,Field_Write
05df 4800 |H | Short_Literal 0x0
05e0 4801 |H | Short_Literal 0x1
05e1 e00d | | Load 0x0,0xd
05e2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
05e3 e008 | | Load 0x0,0x8
05e4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05e5 e008 | | Load 0x0,0x8
05e6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05e7 0119 | | Execute Any,Check_In_Formal_Type
05e8 4802 |H | Short_Literal 0x2
05e9 00da | | Load_Top At_Offset_2
05ea 01d6 | | Execute Vector,Field_Write
05eb 675c |g\ | Indirect_Literal Discrete,0x548,{0x00000000, 0x0000812d}
05ec e005 | | Load 0x0,0x5
05ed 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05ee a5f8 | | Store_Unchecked 0x2,-0x8
05ef 4508 |E | Exit_Suprogram New_Top_Offset 0x8
05f0 0000 0000 | | .LITERAL {0x00000000, 0x00008132}
05f4 0000 0000 | | .BLANK 0000[0x4]
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 0600 | | .CONST 0x0600 ; Address of begin
05f9 0669 | i | .CONST 0x0669 ; Address of exception handler
05fa 0002 | | .CONST 0x0002 ; Number of locals
05fb INIT_05f8:
05fb e004 | | Load 0x0,0x4
05fc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05fd 02c7 | | Declare_Variable Any
05fe 00d8 | | Load_Top At_Offset_0
05ff 1c00 | | Execute_Immediate Run_Utility,0x0
0600 BODY_05f8:
0600 4800 |H | Short_Literal 0x0
0601 a5fc | | Store_Unchecked 0x2,-0x4
0602 4800 |H | Short_Literal 0x0
0603 4801 |H | Short_Literal 0x1
0604 4801 |H | Short_Literal 0x1
0605 608e |` | Indirect_Literal Discrete,0x694,{0x00000000, 0x0000076d}
0606 e00e | | Load 0x0,0xe
0607 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0608 c5fb | | Store 0x2,-0x5
0609 e006 | | Load 0x0,0x6
060a 180e | | Execute Package,Field_Execute,Field_Number 0xe
060b 4801 |H | Short_Literal 0x1
060c 0092 0851 | Q| Action Push_String_Extended,0x851 ; "Unit_Update_Time (Target_File_Name => \x22"
060e e5ff | | Load 0x2,-0x1
060f 01cc | | Execute Vector,Catenate
0610 0092 0841 | A| Action Push_String_Extended,0x841 ; "\x22, Trace_Command => "
0612 01cc | | Execute Vector,Catenate
0613 e5fd | | Load 0x2,-0x3
0614 00e1 | | Load_Encached Boolean_Cache
0615 011c | | Execute Any,Convert_Unchecked
0616 1c01 | | Execute_Immediate Run_Utility,0x1
0617 01cc | | Execute Vector,Catenate
0618 0092 0836 | 6| Action Push_String_Extended,0x836 ; ")."
061a 01cc | | Execute Vector,Catenate
061b e007 | | Load 0x0,0x7
061c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
061d e5fe | | Load 0x2,-0x2
061e 0217 | | Execute Heap_Access,All_Reference
061f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0620 0f01 | | Execute_Immediate Equal,0x1
0621 7034 |p4 | Jump_Nonzero 0x656
0622 e5fb | | Load 0x2,-0x5
0623 0120 | | Execute Any,Is_Value
0624 6803 |h | Jump_Zero 0x628
0625 e00e | | Load 0x0,0xe
0626 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0627 7801 |x | Jump 0x629
0628 e5fb | | Load 0x2,-0x5
0629 00d9 | | Load_Top At_Offset_1
062a e5fd | | Load 0x2,-0x3
062b e5fe | | Load 0x2,-0x2
062c 0217 | | Execute Heap_Access,All_Reference
062d 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
062e e5ff | | Load 0x2,-0x1
062f e003 | | Load 0x0,0x3
0630 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0631 c402 | | Store 0x2,0x2
0632 c5fb | | Store 0x2,-0x5
0633 4802 |H | Short_Literal 0x2
0634 00d9 | | Load_Top At_Offset_1
0635 e004 | | Load 0x0,0x4
0636 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0637 681d |h | Jump_Zero 0x655
0638 4801 |H | Short_Literal 0x1
0639 4802 |H | Short_Literal 0x2
063a e008 | | Load 0x0,0x8
063b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
063c 0334 | 4 | Declare_Variable Array,With_Constraint
063d e5ff | | Load 0x2,-0x1
063e e008 | | Load 0x0,0x8
063f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0640 e008 | | Load 0x0,0x8
0641 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0642 0119 | | Execute Any,Check_In_Formal_Type
0643 4801 |H | Short_Literal 0x1
0644 00da | | Load_Top At_Offset_2
0645 01d6 | | Execute Vector,Field_Write
0646 00d9 | | Load_Top At_Offset_1
0647 e004 | | Load 0x0,0x4
0648 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0649 e008 | | Load 0x0,0x8
064a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
064b e008 | | Load 0x0,0x8
064c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
064d 0119 | | Execute Any,Check_In_Formal_Type
064e 4802 |H | Short_Literal 0x2
064f 00da | | Load_Top At_Offset_2
0650 01d6 | | Execute Vector,Field_Write
0651 603e |`> | Indirect_Literal Discrete,0x690,{0x00000000, 0x00008137}
0652 e005 | | Load 0x0,0x5
0653 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0654 a5fc | | Store_Unchecked 0x2,-0x4
0655 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0656 e5fb | | Load 0x2,-0x5
0657 0120 | | Execute Any,Is_Value
0658 6803 |h | Jump_Zero 0x65c
0659 e00e | | Load 0x0,0xe
065a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
065b 7801 |x | Jump 0x65d
065c e5fb | | Load 0x2,-0x5
065d e005 | | Load 0x0,0x5
065e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
065f e5fd | | Load 0x2,-0x3
0660 e5fe | | Load 0x2,-0x2
0661 0217 | | Execute Heap_Access,All_Reference
0662 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0663 e5ff | | Load 0x2,-0x1
0664 e002 | | Load 0x0,0x2
0665 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0666 c5fc | | Store 0x2,-0x4
0667 c5fb | | Store 0x2,-0x5
0668 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0669 TRAP_05f8:
0669 0007 | | Action Break_Optional
066a 4801 |H | Short_Literal 0x1
066b 4802 |H | Short_Literal 0x2
066c e008 | | Load 0x0,0x8
066d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
066e 0334 | 4 | Declare_Variable Array,With_Constraint
066f 0092 0852 | R| Action Push_String_Extended,0x852 ; "Unit_Update_Time"
0671 e008 | | Load 0x0,0x8
0672 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0673 e008 | | Load 0x0,0x8
0674 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0675 0119 | | Execute Any,Check_In_Formal_Type
0676 4801 |H | Short_Literal 0x1
0677 00da | | Load_Top At_Offset_2
0678 01d6 | | Execute Vector,Field_Write
0679 4800 |H | Short_Literal 0x0
067a 4801 |H | Short_Literal 0x1
067b e00d | | Load 0x0,0xd
067c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
067d e008 | | Load 0x0,0x8
067e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
067f e008 | | Load 0x0,0x8
0680 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0681 0119 | | Execute Any,Check_In_Formal_Type
0682 4802 |H | Short_Literal 0x2
0683 00da | | Load_Top At_Offset_2
0684 01d6 | | Execute Vector,Field_Write
0685 6006 |` | Indirect_Literal Discrete,0x68c,{0x00000000, 0x0000812d}
0686 e005 | | Load 0x0,0x5
0687 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0688 a5fc | | Store_Unchecked 0x2,-0x4
0689 4504 |E | Exit_Suprogram New_Top_Offset 0x4
068a 0000 0000 | | .XXX[0x2]
068c 0000 0000 | | .LITERAL {0x00000000, 0x0000812d}
0690 0000 0000 | | .LITERAL {0x00000000, 0x00008137}
0694 0000 0000 | | .LITERAL {0x00000000, 0x0000076d}
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 06a0 | | .CONST 0x06a0 ; Address of begin
0699 06f8 | | .CONST 0x06f8 ; Address of exception handler
069a 0002 | | .CONST 0x0002 ; Number of locals
069b INIT_0698:
069b e004 | | Load 0x0,0x4
069c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
069d 02c7 | | Declare_Variable Any
069e 00d8 | | Load_Top At_Offset_0
069f 1c00 | | Execute_Immediate Run_Utility,0x0
06a0 BODY_0698:
06a0 4800 |H | Short_Literal 0x0
06a1 a5fc | | Store_Unchecked 0x2,-0x4
06a2 4800 |H | Short_Literal 0x0
06a3 a5fb | | Store_Unchecked 0x2,-0x5
06a4 e006 | | Load 0x0,0x6
06a5 180e | | Execute Package,Field_Execute,Field_Number 0xe
06a6 4801 |H | Short_Literal 0x1
06a7 0092 0853 | S| Action Push_String_Extended,0x853 ; "File_Exists (The_File => \x22"
06a9 e5ff | | Load 0x2,-0x1
06aa 01cc | | Execute Vector,Catenate
06ab 0092 0841 | A| Action Push_String_Extended,0x841 ; "\x22, Trace_Command => "
06ad 01cc | | Execute Vector,Catenate
06ae e5fd | | Load 0x2,-0x3
06af 00e1 | | Load_Encached Boolean_Cache
06b0 011c | | Execute Any,Convert_Unchecked
06b1 1c01 | | Execute_Immediate Run_Utility,0x1
06b2 01cc | | Execute Vector,Catenate
06b3 0092 0836 | 6| Action Push_String_Extended,0x836 ; ")."
06b5 01cc | | Execute Vector,Catenate
06b6 e007 | | Load 0x0,0x7
06b7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06b8 e5fe | | Load 0x2,-0x2
06b9 0217 | | Execute Heap_Access,All_Reference
06ba 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06bb 0f01 | | Execute_Immediate Equal,0x1
06bc 702e |p. | Jump_Nonzero 0x6eb
06bd 00e1 | | Load_Encached Boolean_Cache
06be 00d9 | | Load_Top At_Offset_1
06bf e5fd | | Load 0x2,-0x3
06c0 e5fe | | Load 0x2,-0x2
06c1 0217 | | Execute Heap_Access,All_Reference
06c2 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
06c3 e5ff | | Load 0x2,-0x1
06c4 e003 | | Load 0x0,0x3
06c5 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
06c6 c402 | | Store 0x2,0x2
06c7 c5fb | | Store 0x2,-0x5
06c8 4802 |H | Short_Literal 0x2
06c9 00d9 | | Load_Top At_Offset_1
06ca e004 | | Load 0x0,0x4
06cb 1817 | | Execute Package,Field_Execute,Field_Number 0x17
06cc 681d |h | Jump_Zero 0x6ea
06cd 4801 |H | Short_Literal 0x1
06ce 4802 |H | Short_Literal 0x2
06cf e008 | | Load 0x0,0x8
06d0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06d1 0334 | 4 | Declare_Variable Array,With_Constraint
06d2 e5ff | | Load 0x2,-0x1
06d3 e008 | | Load 0x0,0x8
06d4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
06d5 e008 | | Load 0x0,0x8
06d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06d7 0119 | | Execute Any,Check_In_Formal_Type
06d8 4801 |H | Short_Literal 0x1
06d9 00da | | Load_Top At_Offset_2
06da 01d6 | | Execute Vector,Field_Write
06db 00d9 | | Load_Top At_Offset_1
06dc e004 | | Load 0x0,0x4
06dd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
06de e008 | | Load 0x0,0x8
06df 1810 | | Execute Package,Field_Execute,Field_Number 0x10
06e0 e008 | | Load 0x0,0x8
06e1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06e2 0119 | | Execute Any,Check_In_Formal_Type
06e3 4802 |H | Short_Literal 0x2
06e4 00da | | Load_Top At_Offset_2
06e5 01d6 | | Execute Vector,Field_Write
06e6 6035 |`5 | Indirect_Literal Discrete,0x71c,{0x00000000, 0x00008162}
06e7 e005 | | Load 0x0,0x5
06e8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06e9 a5fc | | Store_Unchecked 0x2,-0x4
06ea 4504 |E | Exit_Suprogram New_Top_Offset 0x4
06eb 00e1 | | Load_Encached Boolean_Cache
06ec e005 | | Load 0x0,0x5
06ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06ee e5fd | | Load 0x2,-0x3
06ef e5fe | | Load 0x2,-0x2
06f0 0217 | | Execute Heap_Access,All_Reference
06f1 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
06f2 e5ff | | Load 0x2,-0x1
06f3 e002 | | Load 0x0,0x2
06f4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
06f5 c5fc | | Store 0x2,-0x4
06f6 c5fb | | Store 0x2,-0x5
06f7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
06f8 TRAP_0698:
06f8 0007 | | Action Break_Optional
06f9 4801 |H | Short_Literal 0x1
06fa 4802 |H | Short_Literal 0x2
06fb e008 | | Load 0x0,0x8
06fc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06fd 0334 | 4 | Declare_Variable Array,With_Constraint
06fe 0092 0854 | T| Action Push_String_Extended,0x854 ; "File Exists"
0700 e008 | | Load 0x0,0x8
0701 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0702 e008 | | Load 0x0,0x8
0703 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0704 0119 | | Execute Any,Check_In_Formal_Type
0705 4801 |H | Short_Literal 0x1
0706 00da | | Load_Top At_Offset_2
0707 01d6 | | Execute Vector,Field_Write
0708 4800 |H | Short_Literal 0x0
0709 4801 |H | Short_Literal 0x1
070a e00d | | Load 0x0,0xd
070b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
070c e008 | | Load 0x0,0x8
070d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
070e e008 | | Load 0x0,0x8
070f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0710 0119 | | Execute Any,Check_In_Formal_Type
0711 4802 |H | Short_Literal 0x2
0712 00da | | Load_Top At_Offset_2
0713 01d6 | | Execute Vector,Field_Write
0714 6777 |gw | Indirect_Literal Discrete,0x68c,{0x00000000, 0x0000812d}
0715 e005 | | Load 0x0,0x5
0716 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0717 a5fc | | Store_Unchecked 0x2,-0x4
0718 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0719 0000 0000 | | .XXX[0x3]
071b 0000 | |
071c 0000 0000 | | .LITERAL {0x00000000, 0x00008162}
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0723 | # | .CONST 0x0723 ; Address of begin
0721 0004 | | .CONST 0x0004 ; Address of exception handler
0722 0001 | | .CONST 0x0001 ; Number of locals
0723 BODY_0720:
0723 BODY_0720:
0723 INIT_0720:
0723 INIT_0720:
0723 4608 |F | Jump_Case 0x9
0724 7808 |x | Jump 0x72d ; case 0x0
0725 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0726 782c |x, | Jump 0x753 ; case 0x2
0727 782b |x+ | Jump 0x753 ; case 0x3
0728 782a |x* | Jump 0x753 ; case 0x4
0729 7829 |x) | Jump 0x753 ; case 0x5
072a 7810 |x | Jump 0x73b ; case 0x6
072b 7816 |x | Jump 0x742 ; case 0x7
072c 781f |x | Jump 0x74c ; case 0x8
072d 00da | | Load_Top At_Offset_2
072e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
072f 0f01 | | Execute_Immediate Equal,0x1
0730 7004 |p | Jump_Nonzero 0x735
0731 00da | | Load_Top At_Offset_2
0732 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
0733 1c00 | | Execute_Immediate Run_Utility,0x0
0734 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0735 00da | | Load_Top At_Offset_2
0736 2202 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x2
0737 00da | | Load_Top At_Offset_2
0738 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
0739 1c00 | | Execute_Immediate Run_Utility,0x0
073a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
073b 00db | | Load_Top At_Offset_3
073c 0f01 | | Execute_Immediate Equal,0x1
073d 7002 |p | Jump_Nonzero 0x740
073e 4802 |H | Short_Literal 0x2
073f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0740 4801 |H | Short_Literal 0x1
0741 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0742 00db | | Load_Top At_Offset_3
0743 e5fe | | Load 0x2,-0x2
0744 0f01 | | Execute_Immediate Equal,0x1
0745 7002 |p | Jump_Nonzero 0x748
0746 4802 |H | Short_Literal 0x2
0747 7801 |x | Jump 0x749
0748 4801 |H | Short_Literal 0x1
0749 e5ff | | Load 0x2,-0x1
074a 031b | | Declare_Type Variant_Record,Constrained
074b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
074c 00db | | Load_Top At_Offset_3
074d e5fe | | Load 0x2,-0x2
074e e5ff | | Load 0x2,-0x1
074f 1c06 | | Execute_Immediate Run_Utility,0x6
0750 e5ff | | Load 0x2,-0x1
0751 02fc | | Declare_Variable Variant_Record,With_Constraint
0752 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0753 0869 | i | Execute_Immediate Raise,0x69
0754 0000 0000 | | .BLANK 0000[0x4]
0758 ; --------------------------------------------------------------------------------------
0758 ; SUBPROGRAM
0758 ; --------------------------------------------------------------------------------------
0758 075d | ] | .CONST 0x075d ; Address of begin
0759 0004 | | .CONST 0x0004 ; Address of exception handler
075a 0002 | | .CONST 0x0002 ; Number of locals
075b INIT_0758:
075b 029f 079b | | Declare_Subprogram INIT_0798,For_Call
075d BODY_0758:
075d 00db | | Load_Top At_Offset_3
075e 01db | | Execute Vector,Length
075f 7002 |p | Jump_Nonzero 0x762
0760 e00a | | Load 0x0,0xa
0761 0257 | W | Execute Discrete,Raise
0762 4820 |H | Short_Literal 0x20
0763 e5fe | | Load 0x2,-0x2
0764 e00f | | Load 0x0,0xf
0765 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0766 01db | | Execute Vector,Length
0767 7002 |p | Jump_Nonzero 0x76a
0768 8402 | | Call 0x2,0x2
0769 7808 |x | Jump 0x772
076a 4820 |H | Short_Literal 0x20
076b e5fd | | Load 0x2,-0x3
076c e00f | | Load 0x0,0xf
076d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
076e 01db | | Execute Vector,Length
076f 7002 |p | Jump_Nonzero 0x772
0770 e00c | | Load 0x0,0xc
0771 0257 | W | Execute Discrete,Raise
0772 e5fe | | Load 0x2,-0x2
0773 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0774 0000 0000 | | .BLANK 0000[0x4]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 077d | } | .CONST 0x077d ; Address of begin
0779 0004 | | .CONST 0x0004 ; Address of exception handler
077a 0002 | | .CONST 0x0002 ; Number of locals
077b INIT_0778:
077b 029f 07eb | | Declare_Subprogram INIT_07e8,For_Call
077d BODY_0778:
077d 00db | | Load_Top At_Offset_3
077e 01db | | Execute Vector,Length
077f 7002 |p | Jump_Nonzero 0x782
0780 e00a | | Load 0x0,0xa
0781 0257 | W | Execute Discrete,Raise
0782 4820 |H | Short_Literal 0x20
0783 e5fe | | Load 0x2,-0x2
0784 e00f | | Load 0x0,0xf
0785 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0786 01db | | Execute Vector,Length
0787 7002 |p | Jump_Nonzero 0x78a
0788 8402 | | Call 0x2,0x2
0789 7808 |x | Jump 0x792
078a 4820 |H | Short_Literal 0x20
078b e5fd | | Load 0x2,-0x3
078c e00f | | Load 0x0,0xf
078d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
078e 01db | | Execute Vector,Length
078f 7002 |p | Jump_Nonzero 0x792
0790 e00c | | Load 0x0,0xc
0791 0257 | W | Execute Discrete,Raise
0792 e5fd | | Load 0x2,-0x3
0793 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0794 0000 0000 | | .BLANK 0000[0x4]
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 07d5 | | .CONST 0x07d5 ; Address of begin
0799 0004 | | .CONST 0x0004 ; Address of exception handler
079a 0003 | | .CONST 0x0003 ; Number of locals
079b INIT_0798:
079b e006 | | Load 0x0,0x6
079c 180e | | Execute Package,Field_Execute,Field_Number 0xe
079d e006 | | Load 0x0,0x6
079e 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
079f e006 | | Load 0x0,0x6
07a0 180e | | Execute Package,Field_Execute,Field_Number 0xe
07a1 e006 | | Load 0x0,0x6
07a2 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
07a3 e006 | | Load 0x0,0x6
07a4 180e | | Execute Package,Field_Execute,Field_Number 0xe
07a5 e006 | | Load 0x0,0x6
07a6 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
07a7 e006 | | Load 0x0,0x6
07a8 180e | | Execute Package,Field_Execute,Field_Number 0xe
07a9 e006 | | Load 0x0,0x6
07aa 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
07ab e006 | | Load 0x0,0x6
07ac 180e | | Execute Package,Field_Execute,Field_Number 0xe
07ad e006 | | Load 0x0,0x6
07ae 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
07af e006 | | Load 0x0,0x6
07b0 180e | | Execute Package,Field_Execute,Field_Number 0xe
07b1 e006 | | Load 0x0,0x6
07b2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
07b3 e006 | | Load 0x0,0x6
07b4 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
07b5 e5ff | | Load 0x2,-0x1
07b6 e010 | | Load 0x0,0x10
07b7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07b8 e006 | | Load 0x0,0x6
07b9 180e | | Execute Package,Field_Execute,Field_Number 0xe
07ba e006 | | Load 0x0,0x6
07bb 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
07bc e006 | | Load 0x0,0x6
07bd 180e | | Execute Package,Field_Execute,Field_Number 0xe
07be e006 | | Load 0x0,0x6
07bf 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
07c0 e006 | | Load 0x0,0x6
07c1 180e | | Execute Package,Field_Execute,Field_Number 0xe
07c2 e006 | | Load 0x0,0x6
07c3 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
07c4 e006 | | Load 0x0,0x6
07c5 180e | | Execute Package,Field_Execute,Field_Number 0xe
07c6 e006 | | Load 0x0,0x6
07c7 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
07c8 e006 | | Load 0x0,0x6
07c9 180e | | Execute Package,Field_Execute,Field_Number 0xe
07ca e006 | | Load 0x0,0x6
07cb 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
07cc e006 | | Load 0x0,0x6
07cd 180e | | Execute Package,Field_Execute,Field_Number 0xe
07ce e006 | | Load 0x0,0x6
07cf 1817 | | Execute Package,Field_Execute,Field_Number 0x17
07d0 e006 | | Load 0x0,0x6
07d1 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
07d2 e5ff | | Load 0x2,-0x1
07d3 e010 | | Load 0x0,0x10
07d4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
07d5 BODY_0798:
07d5 00d9 | | Load_Top At_Offset_1
07d6 01db | | Execute Vector,Length
07d7 7002 |p | Jump_Nonzero 0x7da
07d8 e00b | | Load 0x0,0xb
07d9 0257 | W | Execute Discrete,Raise
07da 00d8 | | Load_Top At_Offset_0
07db 01db | | Execute Vector,Length
07dc 7002 |p | Jump_Nonzero 0x7df
07dd e00c | | Load 0x0,0xc
07de 0257 | W | Execute Discrete,Raise
07df 00d9 | | Load_Top At_Offset_1
07e0 00cb | | Action Pop_Block_With_Result
07e1 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
07e2 0000 0000 | | .BLANK 0000[0x6]
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 0825 | % | .CONST 0x0825 ; Address of begin
07e9 0004 | | .CONST 0x0004 ; Address of exception handler
07ea 0003 | | .CONST 0x0003 ; Number of locals
07eb INIT_07e8:
07eb e006 | | Load 0x0,0x6
07ec 180e | | Execute Package,Field_Execute,Field_Number 0xe
07ed e006 | | Load 0x0,0x6
07ee 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
07ef e006 | | Load 0x0,0x6
07f0 180e | | Execute Package,Field_Execute,Field_Number 0xe
07f1 e006 | | Load 0x0,0x6
07f2 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
07f3 e006 | | Load 0x0,0x6
07f4 180e | | Execute Package,Field_Execute,Field_Number 0xe
07f5 e006 | | Load 0x0,0x6
07f6 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
07f7 e006 | | Load 0x0,0x6
07f8 180e | | Execute Package,Field_Execute,Field_Number 0xe
07f9 e006 | | Load 0x0,0x6
07fa 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
07fb e006 | | Load 0x0,0x6
07fc 180e | | Execute Package,Field_Execute,Field_Number 0xe
07fd e006 | | Load 0x0,0x6
07fe 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
07ff e006 | | Load 0x0,0x6
0800 180e | | Execute Package,Field_Execute,Field_Number 0xe
0801 e006 | | Load 0x0,0x6
0802 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0803 e006 | | Load 0x0,0x6
0804 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0805 e5ff | | Load 0x2,-0x1
0806 e010 | | Load 0x0,0x10
0807 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0808 e006 | | Load 0x0,0x6
0809 180e | | Execute Package,Field_Execute,Field_Number 0xe
080a e006 | | Load 0x0,0x6
080b 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
080c e006 | | Load 0x0,0x6
080d 180e | | Execute Package,Field_Execute,Field_Number 0xe
080e e006 | | Load 0x0,0x6
080f 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0810 e006 | | Load 0x0,0x6
0811 180e | | Execute Package,Field_Execute,Field_Number 0xe
0812 e006 | | Load 0x0,0x6
0813 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0814 e006 | | Load 0x0,0x6
0815 180e | | Execute Package,Field_Execute,Field_Number 0xe
0816 e006 | | Load 0x0,0x6
0817 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0818 e006 | | Load 0x0,0x6
0819 180e | | Execute Package,Field_Execute,Field_Number 0xe
081a e006 | | Load 0x0,0x6
081b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
081c e006 | | Load 0x0,0x6
081d 180e | | Execute Package,Field_Execute,Field_Number 0xe
081e e006 | | Load 0x0,0x6
081f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0820 e006 | | Load 0x0,0x6
0821 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0822 e5ff | | Load 0x2,-0x1
0823 e010 | | Load 0x0,0x10
0824 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0825 BODY_07e8:
0825 00d9 | | Load_Top At_Offset_1
0826 01db | | Execute Vector,Length
0827 7002 |p | Jump_Nonzero 0x82a
0828 e00b | | Load 0x0,0xb
0829 0257 | W | Execute Discrete,Raise
082a 00d8 | | Load_Top At_Offset_0
082b 01db | | Execute Vector,Length
082c 7002 |p | Jump_Nonzero 0x82f
082d e00c | | Load 0x0,0xc
082e 0257 | W | Execute Discrete,Raise
082f 00d8 | | Load_Top At_Offset_0
0830 00cb | | Action Pop_Block_With_Result
0831 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0832 ; --------------------------------------------------------------------------------------
0832 ; STRING TABLE
0832 ; --------------------------------------------------------------------------------------
0832 0048 | H | .STRTAB 0x0048->0x0856 ; "Acquire (Remote_Machine => \x22"
0833 0062 | b | .STRTAB 0x0062->0x0864 ; "\x22, Username => \x22"
0834 0070 | p | .STRTAB 0x0070->0x086c ; "\x22, Password => ???"
0835 0080 | | .STRTAB 0x0080->0x0875 ; ", Trace_Command => "
0836 0091 | | .STRTAB 0x0091->0x087e ; ")."
0837 0091 | | .STRTAB 0x0091->0x087f ; "Acquire"
0838 0096 | | .STRTAB 0x0096->0x0883 ; "Acquire (Set_Directory => \x22"
0839 00af | | .STRTAB 0x00af->0x0890 ; "\x22, Set_Library => \x22"
083a 00c0 | | .STRTAB 0x00c0->0x089a ; "\x22, Remote_Machine => \x22"
083b 00d4 | | .STRTAB 0x00d4->0x08a5 ; "Acquire (Directory)"
083c 00e5 | | .STRTAB 0x00e5->0x08ae ; "Release (Trace_Command => "
083d 00fd | | .STRTAB 0x00fd->0x08bb ; "Release"
083e 0102 | | .STRTAB 0x0102->0x08bf ; "Destroy (Trace_Command => "
083f 011a | | .STRTAB 0x011a->0x08cc ; "Destroy"
0840 011f | | .STRTAB 0x011f->0x08cf ; "Set_Remote_Directory (Set_Directory => \x22"
0841 0145 | E | .STRTAB 0x0145->0x08e3 ; "\x22, Trace_Command => "
0842 0157 | W | .STRTAB 0x0157->0x08ed ; "Command \x22"
0843 015e | ^ | .STRTAB 0x015e->0x08f2 ; "\x22 failed to set remote directory."
0844 017d | } | .STRTAB 0x017d->0x0902 ; " Got bad status code = "
0845 0193 | | .STRTAB 0x0193->0x090e ; "Set_Remote_Directory"
0846 01a5 | | .STRTAB 0x01a5->0x0918 ; "Put (Host_File_Name => \x22"
0847 01bb | | .STRTAB 0x01bb->0x0924 ; "\x22, Target_File_Name => \x22"
0848 01d1 | | .STRTAB 0x01d1->0x0930 ; "Put"
0849 01d2 | | .STRTAB 0x01d2->0x0932 ; "Get (Host_File_Name => \x22"
084a 01e8 | | .STRTAB 0x01e8->0x093e ; "Get"
084b 01e9 | | .STRTAB 0x01e9->0x093f ; "Execute_Command (Command_Line => \x22"
084c 0209 | | .STRTAB 0x0209->0x0950 ; "\x22, Error_Pattern => \x22"
084d 021c | | .STRTAB 0x021c->0x095b ; "\x22, Parse_Error_Output => "
084e 0233 | 3 | .STRTAB 0x0233->0x0967 ; ", Parse_Standard_Output => "
084f 024c | L | .STRTAB 0x024c->0x0975 ; ", Show_Parsed_Output => "
0850 0262 | b | .STRTAB 0x0262->0x0981 ; "Execute_Command"
0851 026f | o | .STRTAB 0x026f->0x0988 ; "Unit_Update_Time (Target_File_Name => \x22"
0852 0294 | | .STRTAB 0x0294->0x099c ; "Unit_Update_Time"
0853 02a2 | | .STRTAB 0x02a2->0x09a4 ; "File_Exists (The_File => \x22"
0854 02ba | | .STRTAB 0x02ba->0x09b1 ; "File Exists"
0855 02c3 | | .STREND 0x02c3->0x09b6
0856 4163 7175 |Acqu| .STRTAB_STRINGS
09b7 0000 | | .XXX[0x1]
09b8 ; --------------------------------------------------------------------------------------
09b8 ; Debug Table
09b8 ; --------------------------------------------------------------------------------------
09b8 0004 000c | | .DEBUG4 0x0004,0x000c,0x2df6,0x0000,0x0001,0x0000
09be 0000 0000 | | .BLANK 0000[0x42]