|
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: 11264 (0x2c00)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_08f0ad
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 1248 | H | .CONST 0x1248 ; 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 000a | | .CONST 0x000a ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0046 | F | .CONST 0x0046 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001f | | .CONST 0x001f ; Number of locals
000b INIT_0008:
000b 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated
000d 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated
000f 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated
0011 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated
0013 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated
0015 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated
0017 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated
0019 029a 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call,Visible,Unelaborated
001b 029a 0383 | | Declare_Subprogram INIT_0380,For_Outer_Call,Visible,Unelaborated
001d 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated
001f 00bf | | Action Accept_Activation
0020 0092 0caa | | Action Push_String_Extended,0xcaa ; "rs6000_aix_vads"
0022 029d 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call
0024 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0025 00c7 | | Action Elaborate_Subprogram
0026 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0027 00c7 | | Action Elaborate_Subprogram
0028 029d 03bb | | Declare_Subprogram INIT_03b8,For_Outer_Call
002a 1d0d | | Execute_Immediate Reference_Lex_1,0xd
002b 00c7 | | Action Elaborate_Subprogram
002c 1d0e | | Execute_Immediate Reference_Lex_1,0xe
002d 00c7 | | Action Elaborate_Subprogram
002e 1d0f | | Execute_Immediate Reference_Lex_1,0xf
002f 00c7 | | Action Elaborate_Subprogram
0030 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0031 00c7 | | Action Elaborate_Subprogram
0032 029d 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call
0034 029d 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call
0036 029d 05c3 | | Declare_Subprogram INIT_05c0,For_Outer_Call
0038 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0039 00c7 | | Action Elaborate_Subprogram
003a 029d 06b3 | | Declare_Subprogram INIT_06b0,For_Outer_Call
003c 029d 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call
003e 029d 0803 | | Declare_Subprogram INIT_0800,For_Outer_Call
0040 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0041 00c7 | | Action Elaborate_Subprogram
0042 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0043 00c7 | | Action Elaborate_Subprogram
0044 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0045 00c7 | | Action Elaborate_Subprogram
0046 BODY_0008:
0046 00bc | | Action Signal_Activated
0047 00bb | | Action Signal_Completion
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 0058 | X | .CONST 0x0058 ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0004 | | .CONST 0x0004 ; Number of locals
004b INIT_0048:
004b e002 | | Load 0x0,0x2
004c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
004d 02c7 | | Declare_Variable Any
004e 00db | | Load_Top At_Offset_3
004f a402 | | Store_Unchecked 0x2,0x2
0050 e002 | | Load 0x0,0x2
0051 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0052 e002 | | Load 0x0,0x2
0053 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0054 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0055 02c7 | | Declare_Variable Any
0056 00d8 | | Load_Top At_Offset_0
0057 1c00 | | Execute_Immediate Run_Utility,0x0
0058 BODY_0048:
0058 00da | | Load_Top At_Offset_2
0059 8219 | | Call 0x1,0x19
005a 6802 |h | Jump_Zero 0x5d
005b 00da | | Load_Top At_Offset_2
005c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
005d e002 | | Load 0x0,0x2
005e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
005f 00d9 | | Load_Top At_Offset_1
0060 0120 | | Execute Any,Is_Value
0061 6804 |h | Jump_Zero 0x66
0062 e002 | | Load 0x0,0x2
0063 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0064 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0065 7801 |x | Jump 0x67
0066 00d9 | | Load_Top At_Offset_1
0067 e402 | | Load 0x2,0x2
0068 e002 | | Load 0x0,0x2
0069 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
006a 181c | | Execute Package,Field_Execute,Field_Number 0x1c
006b c404 | | Store 0x2,0x4
006c 005a | Z | Store_Top Discrete,At_Offset_2
006d 00d9 | | Load_Top At_Offset_1
006e 6803 |h | Jump_Zero 0x72
006f e002 | | Load 0x0,0x2
0070 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0071 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0072 00d8 | | Load_Top At_Offset_0
0073 e002 | | Load 0x0,0x2
0074 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0075 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0076 c402 | | Store 0x2,0x2
0077 00da | | Load_Top At_Offset_2
0078 8219 | | Call 0x1,0x19
0079 6802 |h | Jump_Zero 0x7c
007a 00da | | Load_Top At_Offset_2
007b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
007c e002 | | Load 0x0,0x2
007d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
007e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
007f 0000 | | .XXX[0x1]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 008b | | .CONST 0x008b ; Address of begin
0081 0004 | | .CONST 0x0004 ; Address of exception handler
0082 0003 | | .CONST 0x0003 ; Number of locals
0083 INIT_0080:
0083 e002 | | Load 0x0,0x2
0084 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0085 02c7 | | Declare_Variable Any
0086 00d8 | | Load_Top At_Offset_0
0087 1c00 | | Execute_Immediate Run_Utility,0x0
0088 e002 | | Load 0x0,0x2
0089 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
008a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
008b BODY_0080:
008b e002 | | Load 0x0,0x2
008c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
008d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
008e 00da | | Load_Top At_Offset_2
008f 0120 | | Execute Any,Is_Value
0090 6803 |h | Jump_Zero 0x94
0091 e002 | | Load 0x0,0x2
0092 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0093 7801 |x | Jump 0x95
0094 00da | | Load_Top At_Offset_2
0095 601e |` | Indirect_Literal Discrete,0xb4,{0x00000000, 0x00004000}
0096 e003 | | Load 0x0,0x3
0097 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0098 e004 | | Load 0x0,0x4
0099 1811 | | Execute Package,Field_Execute,Field_Number 0x11
009a e002 | | Load 0x0,0x2
009b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
009c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
009d e5ff | | Load 0x2,-0x1
009e e002 | | Load 0x0,0x2
009f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00a0 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
00a1 c402 | | Store 0x2,0x2
00a2 0059 | Y | Store_Top Discrete,At_Offset_1
00a3 00d8 | | Load_Top At_Offset_0
00a4 680c |h | Jump_Zero 0xb1
00a5 e005 | | Load 0x0,0x5
00a6 180e | | Execute Package,Field_Execute,Field_Number 0xe
00a7 4806 |H | Short_Literal 0x6
00a8 e5ff | | Load 0x2,-0x1
00a9 0092 0cab | | Action Push_String_Extended,0xcab ; " not found"
00ab 01cc | | Execute Vector,Catenate
00ac e006 | | Load 0x0,0x6
00ad 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00ae e002 | | Load 0x0,0x2
00af 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00b0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00b1 00d9 | | Load_Top At_Offset_1
00b2 820d | | Call 0x1,0xd
00b3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00b4 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00c3 | | .CONST 0x00c3 ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0003 | | .CONST 0x0003 ; Number of locals
00bb INIT_00b8:
00bb e002 | | Load 0x0,0x2
00bc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00bd 02c7 | | Declare_Variable Any
00be 00d8 | | Load_Top At_Offset_0
00bf 1c00 | | Execute_Immediate Run_Utility,0x0
00c0 e002 | | Load 0x0,0x2
00c1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00c2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00c3 BODY_00b8:
00c3 e002 | | Load 0x0,0x2
00c4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00c5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00c6 00da | | Load_Top At_Offset_2
00c7 0120 | | Execute Any,Is_Value
00c8 6803 |h | Jump_Zero 0xcc
00c9 e002 | | Load 0x0,0x2
00ca 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00cb 7801 |x | Jump 0xcd
00cc 00da | | Load_Top At_Offset_2
00cd 67e6 |g | Indirect_Literal Discrete,0xb4,{0x00000000, 0x00004000}
00ce e003 | | Load 0x0,0x3
00cf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00d0 e004 | | Load 0x0,0x4
00d1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00d2 e002 | | Load 0x0,0x2
00d3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00d4 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00d5 e5ff | | Load 0x2,-0x1
00d6 e002 | | Load 0x0,0x2
00d7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00d8 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
00d9 c402 | | Store 0x2,0x2
00da 0059 | Y | Store_Top Discrete,At_Offset_1
00db 00d8 | | Load_Top At_Offset_0
00dc 6803 |h | Jump_Zero 0xe0
00dd e002 | | Load 0x0,0x2
00de 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00e0 00d9 | | Load_Top At_Offset_1
00e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00e2 0000 0000 | | .BLANK 0000[0x6]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb | | .CONST 0x00eb ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0001 | | .CONST 0x0001 ; Number of locals
00eb BODY_00e8:
00eb INIT_00e8:
00eb 4800 |H | Short_Literal 0x0
00ec 00ca | | Action Exit_Nullary_Function
00ed 0000 0000 | | .XXX[0x3]
00ef 0000 | |
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 0102 | | .CONST 0x0102 ; Address of begin
00f1 01a7 | | .CONST 0x01a7 ; Address of exception handler
00f2 0005 | | .CONST 0x0005 ; Number of locals
00f3 INIT_00f0:
00f3 e002 | | Load 0x0,0x2
00f4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00f5 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00f6 02c7 | | Declare_Variable Any
00f7 e5fc | | Load 0x2,-0x4
00f8 a402 | | Store_Unchecked 0x2,0x2
00f9 e002 | | Load 0x0,0x2
00fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00fb e002 | | Load 0x0,0x2
00fc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00fd 02c7 | | Declare_Variable Any
00fe 00d8 | | Load_Top At_Offset_0
00ff 1c00 | | Execute_Immediate Run_Utility,0x0
0100 029f 08d3 | | Declare_Subprogram INIT_08d0,For_Call
0102 BODY_00f0:
0102 e5fd | | Load 0x2,-0x3
0103 682f |h/ | Jump_Zero 0x133
0104 e005 | | Load 0x0,0x5
0105 180e | | Execute Package,Field_Execute,Field_Number 0xe
0106 4809 |H | Short_Literal 0x9
0107 0092 0cac | | Action Push_String_Extended,0xcac ; "Add_Remote_Imports (To_View"
0109 e5ff | | Load 0x2,-0x1
010a e002 | | Load 0x0,0x2
010b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
010c 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
010d 8218 | | Call 0x1,0x18
010e 01cc | | Execute Vector,Catenate
010f 0092 0cad | | Action Push_String_Extended,0xcad ; ")"
0111 01cc | | Execute Vector,Catenate
0112 e006 | | Load 0x0,0x6
0113 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0114 00cf | | Action Mark_Auxiliary
0115 7812 |x | Jump 0x128
0116 e005 | | Load 0x0,0x5
0117 180e | | Execute Package,Field_Execute,Field_Number 0xe
0118 4809 |H | Short_Literal 0x9
0119 0092 0cae | | Action Push_String_Extended,0xcae ; ". Imported_View => "
011b e402 | | Load 0x2,0x2
011c e002 | | Load 0x0,0x2
011d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
011e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
011f 01cc | | Execute Vector,Catenate
0120 e006 | | Load 0x0,0x6
0121 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0122 e402 | | Load 0x2,0x2
0123 e002 | | Load 0x0,0x2
0124 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0125 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0126 c402 | | Store 0x2,0x2
0127 00c9 | | Action Pop_Auxiliary_Loop
0128 e402 | | Load 0x2,0x2
0129 e002 | | Load 0x0,0x2
012a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
012b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
012c 6fe9 |o | Jump_Zero 0x116
012d 00ce | | Action Pop_Auxiliary
012e e5fc | | Load 0x2,-0x4
012f e002 | | Load 0x0,0x2
0130 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0131 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0132 c5fc | | Store 0x2,-0x4
0133 e5fb | | Load 0x2,-0x5
0134 e5fd | | Load 0x2,-0x3
0135 e5fe | | Load 0x2,-0x2
0136 e5ff | | Load 0x2,-0x1
0137 821b | | Call 0x1,0x1b
0138 c5fb | | Store 0x2,-0x5
0139 4801 |H | Short_Literal 0x1
013a e5fb | | Load 0x2,-0x5
013b e007 | | Load 0x0,0x7
013c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
013d 680c |h | Jump_Zero 0x14a
013e e005 | | Load 0x0,0x5
013f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0140 4805 |H | Short_Literal 0x5
0141 e5fb | | Load 0x2,-0x5
0142 e007 | | Load 0x0,0x7
0143 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0144 e006 | | Load 0x0,0x6
0145 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0146 e5fb | | Load 0x2,-0x5
0147 e007 | | Load 0x0,0x7
0148 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0149 c5fb | | Store 0x2,-0x5
014a 00cf | | Action Mark_Auxiliary
014b 7855 |xU | Jump 0x1a1
014c e002 | | Load 0x0,0x2
014d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
014e 00db | | Load_Top At_Offset_3
014f 0120 | | Execute Any,Is_Value
0150 6803 |h | Jump_Zero 0x154
0151 e002 | | Load 0x0,0x2
0152 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0153 7801 |x | Jump 0x155
0154 00db | | Load_Top At_Offset_3
0155 e5fc | | Load 0x2,-0x4
0156 e002 | | Load 0x0,0x2
0157 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0158 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0159 c404 | | Store 0x2,0x4
015a c403 | | Store 0x2,0x3
015b 00db | | Load_Top At_Offset_3
015c 6817 |h | Jump_Zero 0x174
015d e5fb | | Load 0x2,-0x5
015e 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0160 4802 |H | Short_Literal 0x2
0161 0092 0cb0 | | Action Push_String_Extended,0xcb0 ; "Can't get object for "
0163 e5fc | | Load 0x2,-0x4
0164 e002 | | Load 0x0,0x2
0165 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0166 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0167 01cc | | Execute Vector,Catenate
0168 0092 0cb1 | | Action Push_String_Extended,0xcb1 ; ". Error Status = "
016a 01cc | | Execute Vector,Catenate
016b e403 | | Load 0x2,0x3
016c e002 | | Load 0x0,0x2
016d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
016e 011c | | Execute Any,Convert_Unchecked
016f 1c01 | | Execute_Immediate Run_Utility,0x1
0170 01cc | | Execute Vector,Catenate
0171 8215 | | Call 0x1,0x15
0172 c5fb | | Store 0x2,-0x5
0173 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0174 e5fd | | Load 0x2,-0x3
0175 680c |h | Jump_Zero 0x182
0176 e005 | | Load 0x0,0x5
0177 180e | | Execute Package,Field_Execute,Field_Number 0xe
0178 4809 |H | Short_Literal 0x9
0179 0092 0cae | | Action Push_String_Extended,0xcae ; ". Imported_View => "
017b e404 | | Load 0x2,0x4
017c e002 | | Load 0x0,0x2
017d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
017e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
017f 01cc | | Execute Vector,Catenate
0180 e006 | | Load 0x0,0x6
0181 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0182 e5fb | | Load 0x2,-0x5
0183 e5fd | | Load 0x2,-0x3
0184 e5fe | | Load 0x2,-0x2
0185 e5ff | | Load 0x2,-0x1
0186 e404 | | Load 0x2,0x4
0187 821c | | Call 0x1,0x1c
0188 c5fb | | Store 0x2,-0x5
0189 4801 |H | Short_Literal 0x1
018a e5fb | | Load 0x2,-0x5
018b e007 | | Load 0x0,0x7
018c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
018d 680c |h | Jump_Zero 0x19a
018e e005 | | Load 0x0,0x5
018f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0190 4805 |H | Short_Literal 0x5
0191 e5fb | | Load 0x2,-0x5
0192 e007 | | Load 0x0,0x7
0193 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0194 e006 | | Load 0x0,0x6
0195 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0196 e5fb | | Load 0x2,-0x5
0197 e007 | | Load 0x0,0x7
0198 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0199 c5fb | | Store 0x2,-0x5
019a 8405 | | Call 0x2,0x5
019b e5fc | | Load 0x2,-0x4
019c e002 | | Load 0x0,0x2
019d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
019e 181d | | Execute Package,Field_Execute,Field_Number 0x1d
019f c5fc | | Store 0x2,-0x4
01a0 00c9 | | Action Pop_Auxiliary_Loop
01a1 e5fc | | Load 0x2,-0x4
01a2 e002 | | Load 0x0,0x2
01a3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01a4 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01a5 6fa6 |o | Jump_Zero 0x14c
01a6 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01a7 TRAP_00f0:
01a7 0007 | | Action Break_Optional
01a8 e5fb | | Load 0x2,-0x5
01a9 0092 0cb2 | | Action Push_String_Extended,0xcb2 ; "Add_Remote_Imports"
01ab 8216 | | Call 0x1,0x16
01ac c5fb | | Store 0x2,-0x5
01ad 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01ae 0000 0000 | | .XXX[0x2]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01bf | | .CONST 0x01bf ; Address of begin
01b1 0253 | S | .CONST 0x0253 ; Address of exception handler
01b2 0004 | | .CONST 0x0004 ; Number of locals
01b3 INIT_01b0:
01b3 00da | | Load_Top At_Offset_2
01b4 e002 | | Load 0x0,0x2
01b5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01b6 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
01b7 e002 | | Load 0x0,0x2
01b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01b9 02c7 | | Declare_Variable Any
01ba 00d8 | | Load_Top At_Offset_0
01bb 1c00 | | Execute_Immediate Run_Utility,0x0
01bc 4801 |H | Short_Literal 0x1
01bd e5ff | | Load 0x2,-0x1
01be 8008 | | Call 0x0,0x8
01bf BODY_01b0:
01bf e5fc | | Load 0x2,-0x4
01c0 6816 |h | Jump_Zero 0x1d7
01c1 e005 | | Load 0x0,0x5
01c2 180e | | Execute Package,Field_Execute,Field_Number 0xe
01c3 4809 |H | Short_Literal 0x9
01c4 0092 0cb3 | | Action Push_String_Extended,0xcb3 ; "Remove_Remote_Imports (View_To_Remove"
01c6 e402 | | Load 0x2,0x2
01c7 8218 | | Call 0x1,0x18
01c8 01cc | | Execute Vector,Catenate
01c9 0092 0cb4 | | Action Push_String_Extended,0xcb4 ; ", From_View"
01cb 01cc | | Execute Vector,Catenate
01cc e5fe | | Load 0x2,-0x2
01cd e002 | | Load 0x0,0x2
01ce 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01cf 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
01d0 8218 | | Call 0x1,0x18
01d1 01cc | | Execute Vector,Catenate
01d2 0092 0cad | | Action Push_String_Extended,0xcad ; ")"
01d4 01cc | | Execute Vector,Catenate
01d5 e006 | | Load 0x0,0x6
01d6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01d7 4801 |H | Short_Literal 0x1
01d8 00d9 | | Load_Top At_Offset_1
01d9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01da e007 | | Load 0x0,0x7
01db 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01dc 6814 |h | Jump_Zero 0x1f1
01dd e005 | | Load 0x0,0x5
01de 180e | | Execute Package,Field_Execute,Field_Number 0xe
01df 4805 |H | Short_Literal 0x5
01e0 00da | | Load_Top At_Offset_2
01e1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01e2 e007 | | Load 0x0,0x7
01e3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01e4 e006 | | Load 0x0,0x6
01e5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01e6 e5fb | | Load 0x2,-0x5
01e7 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
01e9 4802 |H | Short_Literal 0x2
01ea 0092 0cb5 | | Action Push_String_Extended,0xcb5 ; "Can't get import closure for view "
01ec e402 | | Load 0x2,0x2
01ed 01cc | | Execute Vector,Catenate
01ee 8215 | | Call 0x1,0x15
01ef c5fb | | Store 0x2,-0x5
01f0 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01f1 e5fb | | Load 0x2,-0x5
01f2 e5fc | | Load 0x2,-0x4
01f3 e5fd | | Load 0x2,-0x3
01f4 e5fe | | Load 0x2,-0x2
01f5 e5ff | | Load 0x2,-0x1
01f6 821d | | Call 0x1,0x1d
01f7 c5fb | | Store 0x2,-0x5
01f8 4801 |H | Short_Literal 0x1
01f9 e5fb | | Load 0x2,-0x5
01fa e007 | | Load 0x0,0x7
01fb 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01fc 6813 |h | Jump_Zero 0x210
01fd e005 | | Load 0x0,0x5
01fe 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ff 4805 |H | Short_Literal 0x5
0200 e5fb | | Load 0x2,-0x5
0201 e007 | | Load 0x0,0x7
0202 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0203 e006 | | Load 0x0,0x6
0204 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0205 e5fb | | Load 0x2,-0x5
0206 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0208 4802 |H | Short_Literal 0x2
0209 0092 0cb6 | | Action Push_String_Extended,0xcb6 ; "Can't remove remote import for "
020b e402 | | Load 0x2,0x2
020c 01cc | | Execute Vector,Catenate
020d 8215 | | Call 0x1,0x15
020e c5fb | | Store 0x2,-0x5
020f 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0210 00cf | | Action Mark_Auxiliary
0211 00d9 | | Load_Top At_Offset_1
0212 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0213 4801 |H | Short_Literal 0x1
0214 0263 | c | Execute Discrete,Above_Bound
0215 703c |p< | Jump_Nonzero 0x252
0216 00d8 | | Load_Top At_Offset_0
0217 e404 | | Load 0x2,0x4
0218 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0219 01d7 | | Execute Vector,Field_Read
021a c403 | | Store 0x2,0x3
021b e5fc | | Load 0x2,-0x4
021c 6813 |h | Jump_Zero 0x230
021d e005 | | Load 0x0,0x5
021e 180e | | Execute Package,Field_Execute,Field_Number 0xe
021f 480a |H | Short_Literal 0xa
0220 0092 0cb7 | | Action Push_String_Extended,0xcb7 ; ". Imported_Closure ("
0222 00db | | Load_Top At_Offset_3
0223 00e0 | | Load_Encached Standard_Cache
0224 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0225 01cc | | Execute Vector,Catenate
0226 0092 0cb8 | | Action Push_String_Extended,0xcb8 ; ") => "
0228 01cc | | Execute Vector,Catenate
0229 e403 | | Load 0x2,0x3
022a e002 | | Load 0x0,0x2
022b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
022c 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
022d 01cc | | Execute Vector,Catenate
022e e006 | | Load 0x0,0x6
022f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0230 e403 | | Load 0x2,0x3
0231 e5fe | | Load 0x2,-0x2
0232 012f | / | Execute Any,Equal
0233 701c |p | Jump_Nonzero 0x250
0234 e403 | | Load 0x2,0x3
0235 e5ff | | Load 0x2,-0x1
0236 012f | / | Execute Any,Equal
0237 7018 |p | Jump_Nonzero 0x250
0238 e5fb | | Load 0x2,-0x5
0239 e5fc | | Load 0x2,-0x4
023a e5fd | | Load 0x2,-0x3
023b e5fe | | Load 0x2,-0x2
023c e403 | | Load 0x2,0x3
023d 821f | | Call 0x1,0x1f
023e c5fb | | Store 0x2,-0x5
023f 4801 |H | Short_Literal 0x1
0240 e5fb | | Load 0x2,-0x5
0241 e007 | | Load 0x0,0x7
0242 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0243 680c |h | Jump_Zero 0x250
0244 e005 | | Load 0x0,0x5
0245 180e | | Execute Package,Field_Execute,Field_Number 0xe
0246 4805 |H | Short_Literal 0x5
0247 e5fb | | Load 0x2,-0x5
0248 e007 | | Load 0x0,0x7
0249 1819 | | Execute Package,Field_Execute,Field_Number 0x19
024a e006 | | Load 0x0,0x6
024b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
024c e5fb | | Load 0x2,-0x5
024d e007 | | Load 0x0,0x7
024e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
024f c5fb | | Store 0x2,-0x5
0250 00c8 | | Action Pop_Auxiliary_Range
0251 3fc4 |? | Loop_Increasing 0x216
0252 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0253 TRAP_01b0:
0253 0007 | | Action Break_Optional
0254 e5fb | | Load 0x2,-0x5
0255 0092 0cb9 | | Action Push_String_Extended,0xcb9 ; "Remove_Remote_Imports"
0257 8216 | | Call 0x1,0x16
0258 c5fb | | Store 0x2,-0x5
0259 4505 |E | Exit_Suprogram New_Top_Offset 0x5
025a 0000 0000 | | .BLANK 0000[0x6]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0285 | | .CONST 0x0285 ; Address of begin
0261 02e9 | | .CONST 0x02e9 ; Address of exception handler
0262 000a | | .CONST 0x000a ; Number of locals
0263 INIT_0260:
0263 e009 | | Load 0x0,0x9
0264 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0265 02c7 | | Declare_Variable Any
0266 00d8 | | Load_Top At_Offset_0
0267 1c00 | | Execute_Immediate Run_Utility,0x0
0268 e007 | | Load 0x0,0x7
0269 1b0f | | Execute Package,Field_Read,Field_Number 0xf
026a 02c7 | | Declare_Variable Any
026b 00d8 | | Load_Top At_Offset_0
026c 1c00 | | Execute_Immediate Run_Utility,0x0
026d 00e1 | | Load_Encached Boolean_Cache
026e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
026f 00e1 | | Load_Encached Boolean_Cache
0270 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0271 0092 0cba | | Action Push_String_Extended,0xcba ; "/"
0273 e5ff | | Load 0x2,-0x1
0274 0092 0cbb | | Action Push_String_Extended,0xcbb ; "/ada.lib"
0276 01cc | | Execute Vector,Catenate
0277 0007 | | Action Break_Optional
0278 0092 0cbc | | Action Push_String_Extended,0xcbc ; "mkdir -p "
027a e5ff | | Load 0x2,-0x1
027b 01cc | | Execute Vector,Catenate
027c 0007 | | Action Break_Optional
027d e00a | | Load 0x0,0xa
027e 0092 0cbd | | Action Push_String_Extended,0xcbd ; "a.mklib -f "
0280 01cc | | Execute Vector,Catenate
0281 e5ff | | Load 0x2,-0x1
0282 01cc | | Execute Vector,Catenate
0283 029f 094b | K| Declare_Subprogram INIT_0948,For_Call
0285 BODY_0260:
0285 e5fd | | Load 0x2,-0x3
0286 6813 |h | Jump_Zero 0x29a
0287 e005 | | Load 0x0,0x5
0288 180e | | Execute Package,Field_Execute,Field_Number 0xe
0289 4809 |H | Short_Literal 0x9
028a 0092 0cbe | | Action Push_String_Extended,0xcbe ; "Create_Remote_Directory (Remote_Directory"
028c e5ff | | Load 0x2,-0x1
028d 8218 | | Call 0x1,0x18
028e 01cc | | Execute Vector,Catenate
028f 0092 0cbf | | Action Push_String_Extended,0xcbf ; ", Remote_Machine"
0291 01cc | | Execute Vector,Catenate
0292 e5fe | | Load 0x2,-0x2
0293 8218 | | Call 0x1,0x18
0294 01cc | | Execute Vector,Catenate
0295 0092 0cad | | Action Push_String_Extended,0xcad ; ")"
0297 01cc | | Execute Vector,Catenate
0298 e006 | | Load 0x0,0x6
0299 1813 | | Execute Package,Field_Execute,Field_Number 0x13
029a e005 | | Load 0x0,0x5
029b 180e | | Execute Package,Field_Execute,Field_Number 0xe
029c 4801 |H | Short_Literal 0x1
029d 0092 0cc0 | | Action Push_String_Extended,0xcc0 ; "Creating remote directory"
029f e5ff | | Load 0x2,-0x1
02a0 8218 | | Call 0x1,0x18
02a1 01cc | | Execute Vector,Catenate
02a2 e006 | | Load 0x0,0x6
02a3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02a4 4801 |H | Short_Literal 0x1
02a5 e5ff | | Load 0x2,-0x1
02a6 e406 | | Load 0x2,0x6
02a7 e00b | | Load 0x0,0xb
02a8 181d | | Execute Package,Field_Execute,Field_Number 0x1d
02a9 0e01 | | Execute_Immediate Not_Equal,0x1
02aa 6809 |h | Jump_Zero 0x2b4
02ab e5fc | | Load 0x2,-0x4
02ac 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
02ae 4802 |H | Short_Literal 0x2
02af 0092 0cc1 | | Action Push_String_Extended,0xcc1 ; "Remote_Directory string must begin with a \x22/\x22 character"
02b1 8215 | | Call 0x1,0x15
02b2 c5fc | | Store 0x2,-0x4
02b3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02b4 e5fc | | Load 0x2,-0x4
02b5 e402 | | Load 0x2,0x2
02b6 0120 | | Execute Any,Is_Value
02b7 6803 |h | Jump_Zero 0x2bb
02b8 e009 | | Load 0x0,0x9
02b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02ba 7801 |x | Jump 0x2bc
02bb e402 | | Load 0x2,0x2
02bc e5fd | | Load 0x2,-0x3
02bd e00c | | Load 0x0,0xc
02be 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02bf e00c | | Load 0x0,0xc
02c0 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02c1 e5fe | | Load 0x2,-0x2
02c2 e217 | | Load 0x1,0x17
02c3 e009 | | Load 0x0,0x9
02c4 180f | | Execute Package,Field_Execute,Field_Number 0xf
02c5 c402 | | Store 0x2,0x2
02c6 c5fc | | Store 0x2,-0x4
02c7 4801 |H | Short_Literal 0x1
02c8 e5fc | | Load 0x2,-0x4
02c9 e007 | | Load 0x0,0x7
02ca 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02cb 6815 |h | Jump_Zero 0x2e1
02cc e5fd | | Load 0x2,-0x3
02cd 6808 |h | Jump_Zero 0x2d6
02ce e005 | | Load 0x0,0x5
02cf 180e | | Execute Package,Field_Execute,Field_Number 0xe
02d0 4805 |H | Short_Literal 0x5
02d1 e5fc | | Load 0x2,-0x4
02d2 e007 | | Load 0x0,0x7
02d3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02d4 e006 | | Load 0x0,0x6
02d5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02d6 e5fc | | Load 0x2,-0x4
02d7 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
02d9 4802 |H | Short_Literal 0x2
02da 0092 0cc2 | | Action Push_String_Extended,0xcc2 ; "Can't acquire connection to "
02dc e5fe | | Load 0x2,-0x2
02dd 01cc | | Execute Vector,Catenate
02de 8215 | | Call 0x1,0x15
02df c5fc | | Store 0x2,-0x4
02e0 7801 |x | Jump 0x2e2
02e1 840a | | Call 0x2,0xa
02e2 e403 | | Load 0x2,0x3
02e3 e5fd | | Load 0x2,-0x3
02e4 e402 | | Load 0x2,0x2
02e5 e009 | | Load 0x0,0x9
02e6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02e7 c403 | | Store 0x2,0x3
02e8 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02e9 TRAP_0260:
02e9 0007 | | Action Break_Optional
02ea e5fc | | Load 0x2,-0x4
02eb 0092 0cc3 | | Action Push_String_Extended,0xcc3 ; "Create_Remote_Directory"
02ed 8216 | | Call 0x1,0x16
02ee c5fc | | Store 0x2,-0x4
02ef 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 0326 | & | .CONST 0x0326 ; Address of begin
02f1 0379 | y | .CONST 0x0379 ; Address of exception handler
02f2 000b | | .CONST 0x000b ; Number of locals
02f3 INIT_02f0:
02f3 e009 | | Load 0x0,0x9
02f4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02f5 02c7 | | Declare_Variable Any
02f6 00d8 | | Load_Top At_Offset_0
02f7 1c00 | | Execute_Immediate Run_Utility,0x0
02f8 00e1 | | Load_Encached Boolean_Cache
02f9 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
02fa e007 | | Load 0x0,0x7
02fb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02fc 02c7 | | Declare_Variable Any
02fd 00d8 | | Load_Top At_Offset_0
02fe 1c00 | | Execute_Immediate Run_Utility,0x0
02ff e5fe | | Load 0x2,-0x2
0300 0092 0cbb | | Action Push_String_Extended,0xcbb ; "/ada.lib"
0302 01cc | | Execute Vector,Catenate
0303 0007 | | Action Break_Optional
0304 0092 0cc4 | | Action Push_String_Extended,0xcc4 ; "chmod -R 777 "
0306 e5fe | | Load 0x2,-0x2
0307 01cc | | Execute Vector,Catenate
0308 0007 | | Action Break_Optional
0309 e00a | | Load 0x0,0xa
030a 0092 0cc5 | | Action Push_String_Extended,0xcc5 ; "a.rmlib -f "
030c 01cc | | Execute Vector,Catenate
030d e5fe | | Load 0x2,-0x2
030e 01cc | | Execute Vector,Catenate
030f 0007 | | Action Break_Optional
0310 0092 0cc6 | | Action Push_String_Extended,0xcc6 ; "rm -f "
0312 e5fe | | Load 0x2,-0x2
0313 01cc | | Execute Vector,Catenate
0314 0092 0cc7 | | Action Push_String_Extended,0xcc7 ; "/*"
0316 01cc | | Execute Vector,Catenate
0317 0007 | | Action Break_Optional
0318 0092 0cc6 | | Action Push_String_Extended,0xcc6 ; "rm -f "
031a e5fe | | Load 0x2,-0x2
031b 01cc | | Execute Vector,Catenate
031c 0092 0cc8 | | Action Push_String_Extended,0xcc8 ; "/.options*"
031e 01cc | | Execute Vector,Catenate
031f 0007 | | Action Break_Optional
0320 0092 0cc9 | | Action Push_String_Extended,0xcc9 ; "rmdir "
0322 e5fe | | Load 0x2,-0x2
0323 01cc | | Execute Vector,Catenate
0324 029f 0a63 | c| Declare_Subprogram INIT_0a60,For_Call
0326 BODY_02f0:
0326 e5fc | | Load 0x2,-0x4
0327 6813 |h | Jump_Zero 0x33b
0328 e005 | | Load 0x0,0x5
0329 180e | | Execute Package,Field_Execute,Field_Number 0xe
032a 4809 |H | Short_Literal 0x9
032b 0092 0cca | | Action Push_String_Extended,0xcca ; "Destroy_Remote_Library (Remote_Directory"
032d e5fe | | Load 0x2,-0x2
032e 8218 | | Call 0x1,0x18
032f 01cc | | Execute Vector,Catenate
0330 0092 0cbf | | Action Push_String_Extended,0xcbf ; ", Remote_Machine"
0332 01cc | | Execute Vector,Catenate
0333 e5fd | | Load 0x2,-0x3
0334 8218 | | Call 0x1,0x18
0335 01cc | | Execute Vector,Catenate
0336 0092 0cad | | Action Push_String_Extended,0xcad ; ")"
0338 01cc | | Execute Vector,Catenate
0339 e006 | | Load 0x0,0x6
033a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
033b e005 | | Load 0x0,0x5
033c 180e | | Execute Package,Field_Execute,Field_Number 0xe
033d 4801 |H | Short_Literal 0x1
033e 0092 0ccb | | Action Push_String_Extended,0xccb ; "Destroying Ada library in remote directory = "
0340 e5fe | | Load 0x2,-0x2
0341 01cc | | Execute Vector,Catenate
0342 e006 | | Load 0x0,0x6
0343 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0344 e5fb | | Load 0x2,-0x5
0345 e402 | | Load 0x2,0x2
0346 0120 | | Execute Any,Is_Value
0347 6803 |h | Jump_Zero 0x34b
0348 e009 | | Load 0x0,0x9
0349 1b0e | | Execute Package,Field_Read,Field_Number 0xe
034a 7801 |x | Jump 0x34c
034b e402 | | Load 0x2,0x2
034c e5fc | | Load 0x2,-0x4
034d e00c | | Load 0x0,0xc
034e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
034f e00c | | Load 0x0,0xc
0350 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0351 e5fd | | Load 0x2,-0x3
0352 e217 | | Load 0x1,0x17
0353 e009 | | Load 0x0,0x9
0354 180f | | Execute Package,Field_Execute,Field_Number 0xf
0355 c402 | | Store 0x2,0x2
0356 c5fb | | Store 0x2,-0x5
0357 4801 |H | Short_Literal 0x1
0358 e5fb | | Load 0x2,-0x5
0359 e007 | | Load 0x0,0x7
035a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
035b 6815 |h | Jump_Zero 0x371
035c e5fc | | Load 0x2,-0x4
035d 6808 |h | Jump_Zero 0x366
035e e005 | | Load 0x0,0x5
035f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0360 4805 |H | Short_Literal 0x5
0361 e5fb | | Load 0x2,-0x5
0362 e007 | | Load 0x0,0x7
0363 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0364 e006 | | Load 0x0,0x6
0365 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0366 e5fb | | Load 0x2,-0x5
0367 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0369 4802 |H | Short_Literal 0x2
036a 0092 0cc2 | | Action Push_String_Extended,0xcc2 ; "Can't acquire connection to "
036c e5fd | | Load 0x2,-0x3
036d 01cc | | Execute Vector,Catenate
036e 8215 | | Call 0x1,0x15
036f c5fb | | Store 0x2,-0x5
0370 7801 |x | Jump 0x372
0371 840b | | Call 0x2,0xb
0372 e404 | | Load 0x2,0x4
0373 e5fc | | Load 0x2,-0x4
0374 e402 | | Load 0x2,0x2
0375 e009 | | Load 0x0,0x9
0376 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0377 c404 | | Store 0x2,0x4
0378 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0379 TRAP_02f0:
0379 0007 | | Action Break_Optional
037a e5fb | | Load 0x2,-0x5
037b 0092 0ccc | | Action Push_String_Extended,0xccc ; "Destroy_Remote_Library"
037d 8216 | | Call 0x1,0x16
037e c5fb | | Store 0x2,-0x5
037f 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0383 | | .CONST 0x0383 ; Address of begin
0381 0004 | | .CONST 0x0004 ; Address of exception handler
0382 0001 | | .CONST 0x0001 ; Number of locals
0383 BODY_0380:
0383 INIT_0380:
0383 e5fc | | Load 0x2,-0x4
0384 e5fe | | Load 0x2,-0x2
0385 e5ff | | Load 0x2,-0x1
0386 e5fd | | Load 0x2,-0x3
0387 e007 | | Load 0x0,0x7
0388 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0389 c5fc | | Store 0x2,-0x4
038a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
038b 0000 0000 | | .BLANK 0000[0x5]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393 | | .CONST 0x0393 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0001 | | .CONST 0x0001 ; Number of locals
0393 BODY_0390:
0393 INIT_0390:
0393 00db | | Load_Top At_Offset_3
0394 0092 0ccd | | Action Push_String_Extended,0xccd ; "Unhandled exception "
0396 4802 |H | Short_Literal 0x2
0397 4800 |H | Short_Literal 0x0
0398 4801 |H | Short_Literal 0x1
0399 e00d | | Load 0x0,0xd
039a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
039b 0092 0cce | | Action Push_String_Extended,0xcce ; " caught in "
039d 01cc | | Execute Vector,Catenate
039e e5ff | | Load 0x2,-0x1
039f 01cc | | Execute Vector,Catenate
03a0 8215 | | Call 0x1,0x15
03a1 c5fe | | Store 0x2,-0x2
03a2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03a3 0000 0000 | | .BLANK 0000[0x5]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab | | .CONST 0x03ab ; Address of begin
03a9 0004 | | .CONST 0x0004 ; Address of exception handler
03aa 0001 | | .CONST 0x0001 ; Number of locals
03ab BODY_03a8:
03ab INIT_03a8:
03ab 0092 0ccf | | Action Push_String_Extended,0xccf ; " => \x22"
03ad 00db | | Load_Top At_Offset_3
03ae 01cc | | Execute Vector,Catenate
03af 0092 0cd0 | | Action Push_String_Extended,0xcd0 ; "\x22"
03b1 01cc | | Execute Vector,Catenate
03b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03b3 0000 0000 | | .BLANK 0000[0x5]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03c1 | | .CONST 0x03c1 ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 0002 | | .CONST 0x0002 ; Number of locals
03bb INIT_03b8:
03bb 00da | | Load_Top At_Offset_2
03bc e002 | | Load 0x0,0x2
03bd 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
03be e002 | | Load 0x0,0x2
03bf 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
03c0 03f1 | | Declare_Variable Discrete,With_Value
03c1 BODY_03b8:
03c1 00d8 | | Load_Top At_Offset_0
03c2 e00e | | Load 0x0,0xe
03c3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03c4 027f | | Execute Discrete,Equal
03c5 700c |p | Jump_Nonzero 0x3d2
03c6 00d8 | | Load_Top At_Offset_0
03c7 e00e | | Load 0x0,0xe
03c8 1812 | | Execute Package,Field_Execute,Field_Number 0x12
03c9 027f | | Execute Discrete,Equal
03ca 7005 |p | Jump_Nonzero 0x3d0
03cb 00d8 | | Load_Top At_Offset_0
03cc e00e | | Load 0x0,0xe
03cd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03ce 027f | | Execute Discrete,Equal
03cf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03d0 4801 |H | Short_Literal 0x1
03d1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03d2 4801 |H | Short_Literal 0x1
03d3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03d4 0000 0000 | | .BLANK 0000[0x4]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03fd | | .CONST 0x03fd ; Address of begin
03d9 0503 | | .CONST 0x0503 ; Address of exception handler
03da 0009 | | .CONST 0x0009 ; Number of locals
03db INIT_03d8:
03db 00db | | Load_Top At_Offset_3
03dc e002 | | Load 0x0,0x2
03dd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03de 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
03df e005 | | Load 0x0,0x5
03e0 180e | | Execute Package,Field_Execute,Field_Number 0xe
03e1 00d9 | | Load_Top At_Offset_1
03e2 e00f | | Load 0x0,0xf
03e3 1814 | | Execute Package,Field_Execute,Field_Number 0x14
03e4 00d8 | | Load_Top At_Offset_0
03e5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03e6 0007 | | Action Break_Optional
03e7 0092 0cd1 | | Action Push_String_Extended,0xcd1 ; "cd "
03e9 00d9 | | Load_Top At_Offset_1
03ea 01cc | | Execute Vector,Catenate
03eb 0007 | | Action Break_Optional
03ec e00a | | Load 0x0,0xa
03ed 0092 0cd2 | | Action Push_String_Extended,0xcd2 ; "a.path -L "
03ef 01cc | | Execute Vector,Catenate
03f0 0007 | | Action Break_Optional
03f1 00d8 | | Load_Top At_Offset_0
03f2 00db | | Load_Top At_Offset_3
03f3 01cc | | Execute Vector,Catenate
03f4 0092 0cd3 | | Action Push_String_Extended,0xcd3 ; " -i "
03f6 01cc | | Execute Vector,Catenate
03f7 e5ff | | Load 0x2,-0x1
03f8 01cc | | Execute Vector,Catenate
03f9 0007 | | Action Break_Optional
03fa 00e1 | | Load_Encached Boolean_Cache
03fb 029f 0bbb | | Declare_Subprogram INIT_0bb8,For_Call
03fd BODY_03d8:
03fd e5fc | | Load 0x2,-0x4
03fe 6813 |h | Jump_Zero 0x412
03ff e005 | | Load 0x0,0x5
0400 180e | | Execute Package,Field_Execute,Field_Number 0xe
0401 4809 |H | Short_Literal 0x9
0402 0092 0cd4 | | Action Push_String_Extended,0xcd4 ; "Do_Import (Remote_Import_Directory"
0404 e5ff | | Load 0x2,-0x1
0405 8218 | | Call 0x1,0x18
0406 01cc | | Execute Vector,Catenate
0407 0092 0cd5 | | Action Push_String_Extended,0xcd5 ; ", To_View"
0409 01cc | | Execute Vector,Catenate
040a e402 | | Load 0x2,0x2
040b 8218 | | Call 0x1,0x18
040c 01cc | | Execute Vector,Catenate
040d 0092 0cad | | Action Push_String_Extended,0xcad ; ")"
040f 01cc | | Execute Vector,Catenate
0410 e006 | | Load 0x0,0x6
0411 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0412 4801 |H | Short_Literal 0x1
0413 e403 | | Load 0x2,0x3
0414 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0415 e007 | | Load 0x0,0x7
0416 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0417 6816 |h | Jump_Zero 0x42e
0418 e5fc | | Load 0x2,-0x4
0419 6809 |h | Jump_Zero 0x423
041a e005 | | Load 0x0,0x5
041b 180e | | Execute Package,Field_Execute,Field_Number 0xe
041c 4805 |H | Short_Literal 0x5
041d e403 | | Load 0x2,0x3
041e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
041f e007 | | Load 0x0,0x7
0420 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0421 e006 | | Load 0x0,0x6
0422 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0423 e5fb | | Load 0x2,-0x5
0424 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0426 4802 |H | Short_Literal 0x2
0427 0092 0cd6 | | Action Push_String_Extended,0xcd6 ; "Can't get remote directory name for view "
0429 e402 | | Load 0x2,0x2
042a 01cc | | Execute Vector,Catenate
042b 8215 | | Call 0x1,0x15
042c c5fb | | Store 0x2,-0x5
042d 4505 |E | Exit_Suprogram New_Top_Offset 0x5
042e 4820 |H | Short_Literal 0x20
042f e404 | | Load 0x2,0x4
0430 e00b | | Load 0x0,0xb
0431 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0432 01db | | Execute Vector,Length
0433 700d |p | Jump_Nonzero 0x441
0434 e005 | | Load 0x0,0x5
0435 180e | | Execute Package,Field_Execute,Field_Number 0xe
0436 4806 |H | Short_Literal 0x6
0437 0092 0cd7 | | Action Push_String_Extended,0xcd7 ; "Name of remote directory for view "
0439 e402 | | Load 0x2,0x2
043a 01cc | | Execute Vector,Catenate
043b 0092 0cd8 | | Action Push_String_Extended,0xcd8 ; " is null"
043d 01cc | | Execute Vector,Catenate
043e e006 | | Load 0x0,0x6
043f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0440 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0441 4820 |H | Short_Literal 0x20
0442 e5ff | | Load 0x2,-0x1
0443 e00b | | Load 0x0,0xb
0444 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0445 01db | | Execute Vector,Length
0446 700d |p | Jump_Nonzero 0x454
0447 e005 | | Load 0x0,0x5
0448 180e | | Execute Package,Field_Execute,Field_Number 0xe
0449 4806 |H | Short_Literal 0x6
044a 0092 0cd9 | | Action Push_String_Extended,0xcd9 ; "Name of remote library to be imported into view "
044c e402 | | Load 0x2,0x2
044d 01cc | | Execute Vector,Catenate
044e 0092 0cd8 | | Action Push_String_Extended,0xcd8 ; " is null"
0450 01cc | | Execute Vector,Catenate
0451 e006 | | Load 0x0,0x6
0452 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0453 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0454 e5fc | | Load 0x2,-0x4
0455 680a |h | Jump_Zero 0x460
0456 e005 | | Load 0x0,0x5
0457 180e | | Execute Package,Field_Execute,Field_Number 0xe
0458 480a |H | Short_Literal 0xa
0459 0092 0cda | | Action Push_String_Extended,0xcda ; "Set_Directory_Command"
045b e405 | | Load 0x2,0x5
045c 8218 | | Call 0x1,0x18
045d 01cc | | Execute Vector,Catenate
045e e006 | | Load 0x0,0x6
045f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0460 e5fb | | Load 0x2,-0x5
0461 e5fc | | Load 0x2,-0x4
0462 4801 |H | Short_Literal 0x1
0463 4800 |H | Short_Literal 0x0
0464 4800 |H | Short_Literal 0x0
0465 00ea | | Load_Encached Null_String_Cache
0466 e5fd | | Load 0x2,-0x3
0467 e405 | | Load 0x2,0x5
0468 e009 | | Load 0x0,0x9
0469 1815 | | Execute Package,Field_Execute,Field_Number 0x15
046a c5fb | | Store 0x2,-0x5
046b 4801 |H | Short_Literal 0x1
046c e5fb | | Load 0x2,-0x5
046d e007 | | Load 0x0,0x7
046e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
046f 681d |h | Jump_Zero 0x48d
0470 e5fc | | Load 0x2,-0x4
0471 6808 |h | Jump_Zero 0x47a
0472 e005 | | Load 0x0,0x5
0473 180e | | Execute Package,Field_Execute,Field_Number 0xe
0474 4806 |H | Short_Literal 0x6
0475 e5fb | | Load 0x2,-0x5
0476 e007 | | Load 0x0,0x7
0477 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0478 e006 | | Load 0x0,0x6
0479 1813 | | Execute Package,Field_Execute,Field_Number 0x13
047a e005 | | Load 0x0,0x5
047b 180e | | Execute Package,Field_Execute,Field_Number 0xe
047c 4806 |H | Short_Literal 0x6
047d 0092 0cdb | | Action Push_String_Extended,0xcdb ; "Can't add import "
047f e5ff | | Load 0x2,-0x1
0480 01cc | | Execute Vector,Catenate
0481 0092 0cdc | | Action Push_String_Extended,0xcdc ; " to nonexistent remote library "
0483 01cc | | Execute Vector,Catenate
0484 e404 | | Load 0x2,0x4
0485 01cc | | Execute Vector,Catenate
0486 e006 | | Load 0x0,0x6
0487 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0488 e5fb | | Load 0x2,-0x5
0489 e007 | | Load 0x0,0x7
048a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
048b c5fb | | Store 0x2,-0x5
048c 4505 |E | Exit_Suprogram New_Top_Offset 0x5
048d 00e1 | | Load_Encached Boolean_Cache
048e e5fb | | Load 0x2,-0x5
048f e5fc | | Load 0x2,-0x4
0490 e5fd | | Load 0x2,-0x3
0491 e5ff | | Load 0x2,-0x1
0492 e009 | | Load 0x0,0x9
0493 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0494 c5fb | | Store 0x2,-0x5
0495 005a | Z | Store_Top Discrete,At_Offset_2
0496 4801 |H | Short_Literal 0x1
0497 e5fb | | Load 0x2,-0x5
0498 e007 | | Load 0x0,0x7
0499 1817 | | Execute Package,Field_Execute,Field_Number 0x17
049a 681b |h | Jump_Zero 0x4b6
049b e5fc | | Load 0x2,-0x4
049c 6808 |h | Jump_Zero 0x4a5
049d e005 | | Load 0x0,0x5
049e 180e | | Execute Package,Field_Execute,Field_Number 0xe
049f 4806 |H | Short_Literal 0x6
04a0 e5fb | | Load 0x2,-0x5
04a1 e007 | | Load 0x0,0x7
04a2 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04a3 e006 | | Load 0x0,0x6
04a4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04a5 e005 | | Load 0x0,0x5
04a6 180e | | Execute Package,Field_Execute,Field_Number 0xe
04a7 4806 |H | Short_Literal 0x6
04a8 0092 0cdd | | Action Push_String_Extended,0xcdd ; "Can't tell whether remote Ada library \x22"
04aa e5ff | | Load 0x2,-0x1
04ab 01cc | | Execute Vector,Catenate
04ac 0092 0cde | | Action Push_String_Extended,0xcde ; "\x22 exists"
04ae 01cc | | Execute Vector,Catenate
04af e006 | | Load 0x0,0x6
04b0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04b1 e5fb | | Load 0x2,-0x5
04b2 e007 | | Load 0x0,0x7
04b3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04b4 c5fb | | Store 0x2,-0x5
04b5 4505 |E | Exit_Suprogram New_Top_Offset 0x5
04b6 00d9 | | Load_Top At_Offset_1
04b7 700f |p | Jump_Nonzero 0x4c7
04b8 e005 | | Load 0x0,0x5
04b9 180e | | Execute Package,Field_Execute,Field_Number 0xe
04ba 4806 |H | Short_Literal 0x6
04bb 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Can't import nonexistent remote library "
04bd e5ff | | Load 0x2,-0x1
04be 01cc | | Execute Vector,Catenate
04bf 0092 0ce0 | | Action Push_String_Extended,0xce0 ; " into library "
04c1 01cc | | Execute Vector,Catenate
04c2 e404 | | Load 0x2,0x4
04c3 01cc | | Execute Vector,Catenate
04c4 e006 | | Load 0x0,0x6
04c5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04c6 4505 |E | Exit_Suprogram New_Top_Offset 0x5
04c7 00e1 | | Load_Encached Boolean_Cache
04c8 e5ff | | Load 0x2,-0x1
04c9 8409 | | Call 0x2,0x9
04ca 005a | Z | Store_Top Discrete,At_Offset_2
04cb 00d9 | | Load_Top At_Offset_1
04cc 7035 |p5 | Jump_Nonzero 0x502
04cd e5fc | | Load 0x2,-0x4
04ce 680a |h | Jump_Zero 0x4d9
04cf e005 | | Load 0x0,0x5
04d0 180e | | Execute Package,Field_Execute,Field_Number 0xe
04d1 480a |H | Short_Literal 0xa
04d2 0092 0ce1 | | Action Push_String_Extended,0xce1 ; "Add_Import_Command"
04d4 e407 | | Load 0x2,0x7
04d5 8218 | | Call 0x1,0x18
04d6 01cc | | Execute Vector,Catenate
04d7 e006 | | Load 0x0,0x6
04d8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04d9 e5fb | | Load 0x2,-0x5
04da e5fc | | Load 0x2,-0x4
04db 4801 |H | Short_Literal 0x1
04dc 4800 |H | Short_Literal 0x0
04dd 4800 |H | Short_Literal 0x0
04de 00ea | | Load_Encached Null_String_Cache
04df e5fd | | Load 0x2,-0x3
04e0 e407 | | Load 0x2,0x7
04e1 e009 | | Load 0x0,0x9
04e2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04e3 c5fb | | Store 0x2,-0x5
04e4 4801 |H | Short_Literal 0x1
04e5 e5fb | | Load 0x2,-0x5
04e6 e007 | | Load 0x0,0x7
04e7 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04e8 6819 |h | Jump_Zero 0x502
04e9 e5fc | | Load 0x2,-0x4
04ea 6808 |h | Jump_Zero 0x4f3
04eb e005 | | Load 0x0,0x5
04ec 180e | | Execute Package,Field_Execute,Field_Number 0xe
04ed 4805 |H | Short_Literal 0x5
04ee e5fb | | Load 0x2,-0x5
04ef e007 | | Load 0x0,0x7
04f0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04f1 e006 | | Load 0x0,0x6
04f2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04f3 e5fb | | Load 0x2,-0x5
04f4 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
04f6 4802 |H | Short_Literal 0x2
04f7 0092 0cdb | | Action Push_String_Extended,0xcdb ; "Can't add import "
04f9 e5ff | | Load 0x2,-0x1
04fa 01cc | | Execute Vector,Catenate
04fb 0092 0ce2 | | Action Push_String_Extended,0xce2 ; " to remote library "
04fd 01cc | | Execute Vector,Catenate
04fe e404 | | Load 0x2,0x4
04ff 01cc | | Execute Vector,Catenate
0500 8215 | | Call 0x1,0x15
0501 c5fb | | Store 0x2,-0x5
0502 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0503 TRAP_03d8:
0503 0007 | | Action Break_Optional
0504 e5fb | | Load 0x2,-0x5
0505 0092 0ce3 | | Action Push_String_Extended,0xce3 ; "Do_Import"
0507 8216 | | Call 0x1,0x16
0508 c5fb | | Store 0x2,-0x5
0509 4505 |E | Exit_Suprogram New_Top_Offset 0x5
050a 0000 0000 | | .BLANK 0000[0x6]
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 0527 | ' | .CONST 0x0527 ; Address of begin
0511 0004 | | .CONST 0x0004 ; Address of exception handler
0512 0006 | | .CONST 0x0006 ; Number of locals
0513 INIT_0510:
0513 00da | | Load_Top At_Offset_2
0514 e002 | | Load 0x0,0x2
0515 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0516 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0517 e005 | | Load 0x0,0x5
0518 180e | | Execute Package,Field_Execute,Field_Number 0xe
0519 00d9 | | Load_Top At_Offset_1
051a e00f | | Load 0x0,0xf
051b 1814 | | Execute Package,Field_Execute,Field_Number 0x14
051c 00d8 | | Load_Top At_Offset_0
051d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
051e 0007 | | Action Break_Optional
051f e002 | | Load 0x0,0x2
0520 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0521 02c7 | | Declare_Variable Any
0522 00d8 | | Load_Top At_Offset_0
0523 1c00 | | Execute_Immediate Run_Utility,0x0
0524 4801 |H | Short_Literal 0x1
0525 e5ff | | Load 0x2,-0x1
0526 8010 | | Call 0x0,0x10
0527 BODY_0510:
0527 e5fd | | Load 0x2,-0x3
0528 680d |h | Jump_Zero 0x536
0529 e005 | | Load 0x0,0x5
052a 180e | | Execute Package,Field_Execute,Field_Number 0xe
052b 4809 |H | Short_Literal 0x9
052c 0092 0ce4 | | Action Push_String_Extended,0xce4 ; "Refresh_Referencers (To_View"
052e e402 | | Load 0x2,0x2
052f 8218 | | Call 0x1,0x18
0530 01cc | | Execute Vector,Catenate
0531 0092 0cad | | Action Push_String_Extended,0xcad ; ")"
0533 01cc | | Execute Vector,Catenate
0534 e006 | | Load 0x0,0x6
0535 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0536 4801 |H | Short_Literal 0x1
0537 e403 | | Load 0x2,0x3
0538 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0539 e007 | | Load 0x0,0x7
053a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
053b 6816 |h | Jump_Zero 0x552
053c e5fd | | Load 0x2,-0x3
053d 6809 |h | Jump_Zero 0x547
053e e005 | | Load 0x0,0x5
053f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0540 4805 |H | Short_Literal 0x5
0541 e403 | | Load 0x2,0x3
0542 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0543 e007 | | Load 0x0,0x7
0544 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0545 e006 | | Load 0x0,0x6
0546 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0547 e5fc | | Load 0x2,-0x4
0548 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
054a 4802 |H | Short_Literal 0x2
054b 0092 0cd6 | | Action Push_String_Extended,0xcd6 ; "Can't get remote directory name for view "
054d e402 | | Load 0x2,0x2
054e 01cc | | Execute Vector,Catenate
054f 8215 | | Call 0x1,0x15
0550 c5fc | | Store 0x2,-0x4
0551 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0552 4801 |H | Short_Literal 0x1
0553 00d9 | | Load_Top At_Offset_1
0554 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0555 e007 | | Load 0x0,0x7
0556 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0557 6816 |h | Jump_Zero 0x56e
0558 e5fd | | Load 0x2,-0x3
0559 6809 |h | Jump_Zero 0x563
055a e005 | | Load 0x0,0x5
055b 180e | | Execute Package,Field_Execute,Field_Number 0xe
055c 4805 |H | Short_Literal 0x5
055d 00da | | Load_Top At_Offset_2
055e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
055f e007 | | Load 0x0,0x7
0560 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0561 e006 | | Load 0x0,0x6
0562 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0563 e5fc | | Load 0x2,-0x4
0564 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0566 4802 |H | Short_Literal 0x2
0567 0092 0ce5 | | Action Push_String_Extended,0xce5 ; "Can't get referencers for view "
0569 e402 | | Load 0x2,0x2
056a 01cc | | Execute Vector,Catenate
056b 8215 | | Call 0x1,0x15
056c c5fc | | Store 0x2,-0x4
056d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
056e 00cf | | Action Mark_Auxiliary
056f 00d9 | | Load_Top At_Offset_1
0570 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0571 4801 |H | Short_Literal 0x1
0572 0263 | c | Execute Discrete,Above_Bound
0573 7049 |pI | Jump_Nonzero 0x5bd
0574 00d8 | | Load_Top At_Offset_0
0575 e406 | | Load 0x2,0x6
0576 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0577 01d7 | | Execute Vector,Field_Read
0578 c405 | | Store 0x2,0x5
0579 e5fd | | Load 0x2,-0x3
057a 6818 |h | Jump_Zero 0x593
057b e005 | | Load 0x0,0x5
057c 180e | | Execute Package,Field_Execute,Field_Number 0xe
057d 480a |H | Short_Literal 0xa
057e 0092 0ce6 | | Action Push_String_Extended,0xce6 ; ". Referencers ("
0580 00db | | Load_Top At_Offset_3
0581 00e0 | | Load_Encached Standard_Cache
0582 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0583 01cc | | Execute Vector,Catenate
0584 0092 0ce7 | | Action Push_String_Extended,0xce7 ; ", "
0586 01cc | | Execute Vector,Catenate
0587 e402 | | Load 0x2,0x2
0588 01cc | | Execute Vector,Catenate
0589 0092 0cb8 | | Action Push_String_Extended,0xcb8 ; ") => "
058b 01cc | | Execute Vector,Catenate
058c e405 | | Load 0x2,0x5
058d e002 | | Load 0x0,0x2
058e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
058f 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0590 01cc | | Execute Vector,Catenate
0591 e006 | | Load 0x0,0x6
0592 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0593 e405 | | Load 0x2,0x5
0594 e5ff | | Load 0x2,-0x1
0595 012f | / | Execute Any,Equal
0596 7024 |p$ | Jump_Nonzero 0x5bb
0597 e5fc | | Load 0x2,-0x4
0598 e5fd | | Load 0x2,-0x3
0599 e5fe | | Load 0x2,-0x2
059a e405 | | Load 0x2,0x5
059b e404 | | Load 0x2,0x4
059c 821a | | Call 0x1,0x1a
059d c5fc | | Store 0x2,-0x4
059e 4801 |H | Short_Literal 0x1
059f e5fc | | Load 0x2,-0x4
05a0 e007 | | Load 0x0,0x7
05a1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
05a2 6818 |h | Jump_Zero 0x5bb
05a3 e005 | | Load 0x0,0x5
05a4 180e | | Execute Package,Field_Execute,Field_Number 0xe
05a5 4806 |H | Short_Literal 0x6
05a6 e5fc | | Load 0x2,-0x4
05a7 e007 | | Load 0x0,0x7
05a8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
05a9 e006 | | Load 0x0,0x6
05aa 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05ab e005 | | Load 0x0,0x5
05ac 180e | | Execute Package,Field_Execute,Field_Number 0xe
05ad 4806 |H | Short_Literal 0x6
05ae 0092 0ce8 | | Action Push_String_Extended,0xce8 ; "Can't add remote import for "
05b0 e405 | | Load 0x2,0x5
05b1 e002 | | Load 0x0,0x2
05b2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05b3 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
05b4 01cc | | Execute Vector,Catenate
05b5 e006 | | Load 0x0,0x6
05b6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05b7 e5fc | | Load 0x2,-0x4
05b8 e007 | | Load 0x0,0x7
05b9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05ba c5fc | | Store 0x2,-0x4
05bb 00c8 | | Action Pop_Auxiliary_Range
05bc 3fb7 |? | Loop_Increasing 0x574
05bd 4504 |E | Exit_Suprogram New_Top_Offset 0x4
05be 0000 0000 | | .XXX[0x2]
05c0 ; --------------------------------------------------------------------------------------
05c0 ; SUBPROGRAM
05c0 ; --------------------------------------------------------------------------------------
05c0 05d7 | | .CONST 0x05d7 ; Address of begin
05c1 0004 | | .CONST 0x0004 ; Address of exception handler
05c2 0006 | | .CONST 0x0006 ; Number of locals
05c3 INIT_05c0:
05c3 00da | | Load_Top At_Offset_2
05c4 e002 | | Load 0x0,0x2
05c5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05c6 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
05c7 e005 | | Load 0x0,0x5
05c8 180e | | Execute Package,Field_Execute,Field_Number 0xe
05c9 00d9 | | Load_Top At_Offset_1
05ca e00f | | Load 0x0,0xf
05cb 1814 | | Execute Package,Field_Execute,Field_Number 0x14
05cc 00d8 | | Load_Top At_Offset_0
05cd 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
05ce 0007 | | Action Break_Optional
05cf e002 | | Load 0x0,0x2
05d0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05d1 02c7 | | Declare_Variable Any
05d2 00d8 | | Load_Top At_Offset_0
05d3 1c00 | | Execute_Immediate Run_Utility,0x0
05d4 4801 |H | Short_Literal 0x1
05d5 e5fe | | Load 0x2,-0x2
05d6 8010 | | Call 0x0,0x10
05d7 BODY_05c0:
05d7 e5fc | | Load 0x2,-0x4
05d8 6816 |h | Jump_Zero 0x5ef
05d9 e005 | | Load 0x0,0x5
05da 180e | | Execute Package,Field_Execute,Field_Number 0xe
05db 4809 |H | Short_Literal 0x9
05dc 0092 0ce9 | | Action Push_String_Extended,0xce9 ; "Add_Remote_Import (Imported_View"
05de e402 | | Load 0x2,0x2
05df 8218 | | Call 0x1,0x18
05e0 01cc | | Execute Vector,Catenate
05e1 0092 0cd5 | | Action Push_String_Extended,0xcd5 ; ", To_View"
05e3 01cc | | Execute Vector,Catenate
05e4 e5fe | | Load 0x2,-0x2
05e5 e002 | | Load 0x0,0x2
05e6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05e7 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
05e8 8218 | | Call 0x1,0x18
05e9 01cc | | Execute Vector,Catenate
05ea 0092 0cad | | Action Push_String_Extended,0xcad ; ")"
05ec 01cc | | Execute Vector,Catenate
05ed e006 | | Load 0x0,0x6
05ee 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05ef 4801 |H | Short_Literal 0x1
05f0 e403 | | Load 0x2,0x3
05f1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05f2 e007 | | Load 0x0,0x7
05f3 1817 | | Execute Package,Field_Execute,Field_Number 0x17
05f4 6816 |h | Jump_Zero 0x60b
05f5 e5fc | | Load 0x2,-0x4
05f6 6809 |h | Jump_Zero 0x600
05f7 e005 | | Load 0x0,0x5
05f8 180e | | Execute Package,Field_Execute,Field_Number 0xe
05f9 4805 |H | Short_Literal 0x5
05fa e403 | | Load 0x2,0x3
05fb 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05fc e007 | | Load 0x0,0x7
05fd 1819 | | Execute Package,Field_Execute,Field_Number 0x19
05fe e006 | | Load 0x0,0x6
05ff 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0600 e5fb | | Load 0x2,-0x5
0601 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0603 4802 |H | Short_Literal 0x2
0604 0092 0cea | | Action Push_String_Extended,0xcea ; "Can't get remote directory name for imported view "
0606 e402 | | Load 0x2,0x2
0607 01cc | | Execute Vector,Catenate
0608 8215 | | Call 0x1,0x15
0609 c5fb | | Store 0x2,-0x5
060a 4505 |E | Exit_Suprogram New_Top_Offset 0x5
060b 4801 |H | Short_Literal 0x1
060c 00d9 | | Load_Top At_Offset_1
060d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
060e e007 | | Load 0x0,0x7
060f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0610 6819 |h | Jump_Zero 0x62a
0611 e5fc | | Load 0x2,-0x4
0612 6809 |h | Jump_Zero 0x61c
0613 e005 | | Load 0x0,0x5
0614 180e | | Execute Package,Field_Execute,Field_Number 0xe
0615 4805 |H | Short_Literal 0x5
0616 00da | | Load_Top At_Offset_2
0617 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0618 e007 | | Load 0x0,0x7
0619 1819 | | Execute Package,Field_Execute,Field_Number 0x19
061a e006 | | Load 0x0,0x6
061b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
061c e5fb | | Load 0x2,-0x5
061d 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
061f 4802 |H | Short_Literal 0x2
0620 0092 0ce5 | | Action Push_String_Extended,0xce5 ; "Can't get referencers for view "
0622 e5fe | | Load 0x2,-0x2
0623 e002 | | Load 0x0,0x2
0624 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0625 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0626 01cc | | Execute Vector,Catenate
0627 8215 | | Call 0x1,0x15
0628 c5fb | | Store 0x2,-0x5
0629 4505 |E | Exit_Suprogram New_Top_Offset 0x5
062a e5ff | | Load 0x2,-0x1
062b e5fe | | Load 0x2,-0x2
062c 012f | / | Execute Any,Equal
062d 6801 |h | Jump_Zero 0x62f
062e 4505 |E | Exit_Suprogram New_Top_Offset 0x5
062f e5fb | | Load 0x2,-0x5
0630 e5fc | | Load 0x2,-0x4
0631 e5fd | | Load 0x2,-0x3
0632 e5fe | | Load 0x2,-0x2
0633 e404 | | Load 0x2,0x4
0634 821a | | Call 0x1,0x1a
0635 c5fb | | Store 0x2,-0x5
0636 4801 |H | Short_Literal 0x1
0637 e5fb | | Load 0x2,-0x5
0638 e007 | | Load 0x0,0x7
0639 1817 | | Execute Package,Field_Execute,Field_Number 0x17
063a 6818 |h | Jump_Zero 0x653
063b e005 | | Load 0x0,0x5
063c 180e | | Execute Package,Field_Execute,Field_Number 0xe
063d 4806 |H | Short_Literal 0x6
063e e5fb | | Load 0x2,-0x5
063f e007 | | Load 0x0,0x7
0640 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0641 e006 | | Load 0x0,0x6
0642 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0643 e005 | | Load 0x0,0x5
0644 180e | | Execute Package,Field_Execute,Field_Number 0xe
0645 4806 |H | Short_Literal 0x6
0646 0092 0ce8 | | Action Push_String_Extended,0xce8 ; "Can't add remote import for "
0648 e5fe | | Load 0x2,-0x2
0649 e002 | | Load 0x0,0x2
064a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
064b 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
064c 01cc | | Execute Vector,Catenate
064d e006 | | Load 0x0,0x6
064e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
064f e5fb | | Load 0x2,-0x5
0650 e007 | | Load 0x0,0x7
0651 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0652 c5fb | | Store 0x2,-0x5
0653 00cf | | Action Mark_Auxiliary
0654 00d9 | | Load_Top At_Offset_1
0655 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0656 4801 |H | Short_Literal 0x1
0657 0263 | c | Execute Discrete,Above_Bound
0658 7050 |pP | Jump_Nonzero 0x6a9
0659 00d8 | | Load_Top At_Offset_0
065a e406 | | Load 0x2,0x6
065b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
065c 01d7 | | Execute Vector,Field_Read
065d c405 | | Store 0x2,0x5
065e e5fc | | Load 0x2,-0x4
065f 681b |h | Jump_Zero 0x67b
0660 e005 | | Load 0x0,0x5
0661 180e | | Execute Package,Field_Execute,Field_Number 0xe
0662 480a |H | Short_Literal 0xa
0663 0092 0ce6 | | Action Push_String_Extended,0xce6 ; ". Referencers ("
0665 00db | | Load_Top At_Offset_3
0666 00e0 | | Load_Encached Standard_Cache
0667 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0668 01cc | | Execute Vector,Catenate
0669 0092 0ce7 | | Action Push_String_Extended,0xce7 ; ", "
066b 01cc | | Execute Vector,Catenate
066c e5fe | | Load 0x2,-0x2
066d e002 | | Load 0x0,0x2
066e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
066f 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0670 01cc | | Execute Vector,Catenate
0671 0092 0cb8 | | Action Push_String_Extended,0xcb8 ; ") => "
0673 01cc | | Execute Vector,Catenate
0674 e405 | | Load 0x2,0x5
0675 e002 | | Load 0x0,0x2
0676 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0677 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0678 01cc | | Execute Vector,Catenate
0679 e006 | | Load 0x0,0x6
067a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
067b e405 | | Load 0x2,0x5
067c e5ff | | Load 0x2,-0x1
067d 012f | / | Execute Any,Equal
067e 7028 |p( | Jump_Nonzero 0x6a7
067f e405 | | Load 0x2,0x5
0680 e5fe | | Load 0x2,-0x2
0681 012f | / | Execute Any,Equal
0682 7024 |p$ | Jump_Nonzero 0x6a7
0683 e5fb | | Load 0x2,-0x5
0684 e5fc | | Load 0x2,-0x4
0685 e5fd | | Load 0x2,-0x3
0686 e405 | | Load 0x2,0x5
0687 e404 | | Load 0x2,0x4
0688 821a | | Call 0x1,0x1a
0689 c5fb | | Store 0x2,-0x5
068a 4801 |H | Short_Literal 0x1
068b e5fb | | Load 0x2,-0x5
068c e007 | | Load 0x0,0x7
068d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
068e 6818 |h | Jump_Zero 0x6a7
068f e005 | | Load 0x0,0x5
0690 180e | | Execute Package,Field_Execute,Field_Number 0xe
0691 4806 |H | Short_Literal 0x6
0692 e5fb | | Load 0x2,-0x5
0693 e007 | | Load 0x0,0x7
0694 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0695 e006 | | Load 0x0,0x6
0696 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0697 e005 | | Load 0x0,0x5
0698 180e | | Execute Package,Field_Execute,Field_Number 0xe
0699 4806 |H | Short_Literal 0x6
069a 0092 0ce8 | | Action Push_String_Extended,0xce8 ; "Can't add remote import for "
069c e405 | | Load 0x2,0x5
069d e002 | | Load 0x0,0x2
069e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
069f 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
06a0 01cc | | Execute Vector,Catenate
06a1 e006 | | Load 0x0,0x6
06a2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06a3 e5fb | | Load 0x2,-0x5
06a4 e007 | | Load 0x0,0x7
06a5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
06a6 c5fb | | Store 0x2,-0x5
06a7 00c8 | | Action Pop_Auxiliary_Range
06a8 3fb0 |? | Loop_Increasing 0x659
06a9 4505 |E | Exit_Suprogram New_Top_Offset 0x5
06aa 0000 0000 | | .BLANK 0000[0x6]
06b0 ; --------------------------------------------------------------------------------------
06b0 ; SUBPROGRAM
06b0 ; --------------------------------------------------------------------------------------
06b0 06da | | .CONST 0x06da ; Address of begin
06b1 0004 | | .CONST 0x0004 ; Address of exception handler
06b2 000a | | .CONST 0x000a ; Number of locals
06b3 INIT_06b0:
06b3 00da | | Load_Top At_Offset_2
06b4 e002 | | Load 0x0,0x2
06b5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06b6 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
06b7 e005 | | Load 0x0,0x5
06b8 180e | | Execute Package,Field_Execute,Field_Number 0xe
06b9 00d9 | | Load_Top At_Offset_1
06ba e00f | | Load 0x0,0xf
06bb 1814 | | Execute Package,Field_Execute,Field_Number 0x14
06bc 00d8 | | Load_Top At_Offset_0
06bd 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06be 0007 | | Action Break_Optional
06bf 00e1 | | Load_Encached Boolean_Cache
06c0 e5fe | | Load 0x2,-0x2
06c1 e002 | | Load 0x0,0x2
06c2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06c3 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
06c4 e005 | | Load 0x0,0x5
06c5 180e | | Execute Package,Field_Execute,Field_Number 0xe
06c6 00d9 | | Load_Top At_Offset_1
06c7 e00f | | Load 0x0,0xf
06c8 1814 | | Execute Package,Field_Execute,Field_Number 0x14
06c9 00d8 | | Load_Top At_Offset_0
06ca 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06cb 0007 | | Action Break_Optional
06cc e00a | | Load 0x0,0xa
06cd 0092 0cd2 | | Action Push_String_Extended,0xcd2 ; "a.path -L "
06cf 01cc | | Execute Vector,Catenate
06d0 0007 | | Action Break_Optional
06d1 00d8 | | Load_Top At_Offset_0
06d2 00da | | Load_Top At_Offset_2
06d3 01cc | | Execute Vector,Catenate
06d4 0092 0ceb | | Action Push_String_Extended,0xceb ; " -r "
06d6 01cc | | Execute Vector,Catenate
06d7 e404 | | Load 0x2,0x4
06d8 01cc | | Execute Vector,Catenate
06d9 0007 | | Action Break_Optional
06da BODY_06b0:
06da e5fc | | Load 0x2,-0x4
06db 6813 |h | Jump_Zero 0x6ef
06dc e005 | | Load 0x0,0x5
06dd 180e | | Execute Package,Field_Execute,Field_Number 0xe
06de 4809 |H | Short_Literal 0x9
06df 0092 0cec | | Action Push_String_Extended,0xcec ; "Remove_Remote_Import (View_To_Remove"
06e1 e402 | | Load 0x2,0x2
06e2 8218 | | Call 0x1,0x18
06e3 01cc | | Execute Vector,Catenate
06e4 0092 0cb4 | | Action Push_String_Extended,0xcb4 ; ", From_View"
06e6 01cc | | Execute Vector,Catenate
06e7 e406 | | Load 0x2,0x6
06e8 8218 | | Call 0x1,0x18
06e9 01cc | | Execute Vector,Catenate
06ea 0092 0cad | | Action Push_String_Extended,0xcad ; ")"
06ec 01cc | | Execute Vector,Catenate
06ed e006 | | Load 0x0,0x6
06ee 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06ef 4801 |H | Short_Literal 0x1
06f0 e403 | | Load 0x2,0x3
06f1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06f2 e007 | | Load 0x0,0x7
06f3 1817 | | Execute Package,Field_Execute,Field_Number 0x17
06f4 6816 |h | Jump_Zero 0x70b
06f5 e5fc | | Load 0x2,-0x4
06f6 6809 |h | Jump_Zero 0x700
06f7 e005 | | Load 0x0,0x5
06f8 180e | | Execute Package,Field_Execute,Field_Number 0xe
06f9 4805 |H | Short_Literal 0x5
06fa e403 | | Load 0x2,0x3
06fb 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06fc e007 | | Load 0x0,0x7
06fd 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06fe e006 | | Load 0x0,0x6
06ff 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0700 e5fb | | Load 0x2,-0x5
0701 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0703 4802 |H | Short_Literal 0x2
0704 0092 0cea | | Action Push_String_Extended,0xcea ; "Can't get remote directory name for imported view "
0706 e402 | | Load 0x2,0x2
0707 01cc | | Execute Vector,Catenate
0708 8215 | | Call 0x1,0x15
0709 c5fb | | Store 0x2,-0x5
070a 4505 |E | Exit_Suprogram New_Top_Offset 0x5
070b 4801 |H | Short_Literal 0x1
070c e407 | | Load 0x2,0x7
070d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
070e e007 | | Load 0x0,0x7
070f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0710 6816 |h | Jump_Zero 0x727
0711 e5fc | | Load 0x2,-0x4
0712 6809 |h | Jump_Zero 0x71c
0713 e005 | | Load 0x0,0x5
0714 180e | | Execute Package,Field_Execute,Field_Number 0xe
0715 4805 |H | Short_Literal 0x5
0716 e407 | | Load 0x2,0x7
0717 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0718 e007 | | Load 0x0,0x7
0719 1819 | | Execute Package,Field_Execute,Field_Number 0x19
071a e006 | | Load 0x0,0x6
071b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
071c e5fb | | Load 0x2,-0x5
071d 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
071f 4802 |H | Short_Literal 0x2
0720 0092 0cd6 | | Action Push_String_Extended,0xcd6 ; "Can't get remote directory name for view "
0722 e406 | | Load 0x2,0x6
0723 01cc | | Execute Vector,Catenate
0724 8215 | | Call 0x1,0x15
0725 c5fb | | Store 0x2,-0x5
0726 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0727 00da | | Load_Top At_Offset_2
0728 01db | | Execute Vector,Length
0729 7015 |p | Jump_Nonzero 0x73f
072a e005 | | Load 0x0,0x5
072b 180e | | Execute Package,Field_Execute,Field_Number 0xe
072c 4806 |H | Short_Literal 0x6
072d 0092 0ced | | Action Push_String_Extended,0xced ; "Remote directory name for view "
072f e406 | | Load 0x2,0x6
0730 01cc | | Execute Vector,Catenate
0731 0092 0cd8 | | Action Push_String_Extended,0xcd8 ; " is null"
0733 01cc | | Execute Vector,Catenate
0734 e006 | | Load 0x0,0x6
0735 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0736 e5fb | | Load 0x2,-0x5
0737 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0739 4802 |H | Short_Literal 0x2
073a 0092 0cee | | Action Push_String_Extended,0xcee ; "Insufficient remote library information"
073c 8215 | | Call 0x1,0x15
073d c5fb | | Store 0x2,-0x5
073e 4505 |E | Exit_Suprogram New_Top_Offset 0x5
073f e404 | | Load 0x2,0x4
0740 01db | | Execute Vector,Length
0741 7015 |p | Jump_Nonzero 0x757
0742 e005 | | Load 0x0,0x5
0743 180e | | Execute Package,Field_Execute,Field_Number 0xe
0744 4806 |H | Short_Literal 0x6
0745 0092 0cef | | Action Push_String_Extended,0xcef ; "Remote directory name for imported view "
0747 e402 | | Load 0x2,0x2
0748 01cc | | Execute Vector,Catenate
0749 0092 0cd8 | | Action Push_String_Extended,0xcd8 ; " is null"
074b 01cc | | Execute Vector,Catenate
074c e006 | | Load 0x0,0x6
074d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
074e e5fb | | Load 0x2,-0x5
074f 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0751 4802 |H | Short_Literal 0x2
0752 0092 0cee | | Action Push_String_Extended,0xcee ; "Insufficient remote library information"
0754 8215 | | Call 0x1,0x15
0755 c5fb | | Store 0x2,-0x5
0756 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0757 00e1 | | Load_Encached Boolean_Cache
0758 e5fb | | Load 0x2,-0x5
0759 e5fc | | Load 0x2,-0x4
075a e5fd | | Load 0x2,-0x3
075b e408 | | Load 0x2,0x8
075c e009 | | Load 0x0,0x9
075d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
075e c5fb | | Store 0x2,-0x5
075f c405 | | Store 0x2,0x5
0760 4801 |H | Short_Literal 0x1
0761 e5fb | | Load 0x2,-0x5
0762 e007 | | Load 0x0,0x7
0763 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0764 6818 |h | Jump_Zero 0x77d
0765 e5fc | | Load 0x2,-0x4
0766 6808 |h | Jump_Zero 0x76f
0767 e005 | | Load 0x0,0x5
0768 180e | | Execute Package,Field_Execute,Field_Number 0xe
0769 4805 |H | Short_Literal 0x5
076a e5fb | | Load 0x2,-0x5
076b e007 | | Load 0x0,0x7
076c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
076d e006 | | Load 0x0,0x6
076e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
076f e5fb | | Load 0x2,-0x5
0770 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0772 4802 |H | Short_Literal 0x2
0773 0092 0cf0 | | Action Push_String_Extended,0xcf0 ; "Can't tell whether remote directory \x22"
0775 e408 | | Load 0x2,0x8
0776 01cc | | Execute Vector,Catenate
0777 0092 0cf1 | | Action Push_String_Extended,0xcf1 ; "\x22 exists, so can't remove its import"
0779 01cc | | Execute Vector,Catenate
077a 8215 | | Call 0x1,0x15
077b c5fb | | Store 0x2,-0x5
077c 4505 |E | Exit_Suprogram New_Top_Offset 0x5
077d e405 | | Load 0x2,0x5
077e 7012 |p | Jump_Nonzero 0x791
077f e005 | | Load 0x0,0x5
0780 180e | | Execute Package,Field_Execute,Field_Number 0xe
0781 4806 |H | Short_Literal 0x6
0782 0092 0cf2 | | Action Push_String_Extended,0xcf2 ; "Remote directory \x22"
0784 e408 | | Load 0x2,0x8
0785 01cc | | Execute Vector,Catenate
0786 0092 0cf3 | | Action Push_String_Extended,0xcf3 ; "\x22 doesn't exist for view "
0788 01cc | | Execute Vector,Catenate
0789 e406 | | Load 0x2,0x6
078a 01cc | | Execute Vector,Catenate
078b 0092 0cf4 | | Action Push_String_Extended,0xcf4 ; ", so we can't remove its import"
078d 01cc | | Execute Vector,Catenate
078e e006 | | Load 0x0,0x6
078f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0790 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0791 e5fc | | Load 0x2,-0x4
0792 6810 |h | Jump_Zero 0x7a3
0793 e005 | | Load 0x0,0x5
0794 180e | | Execute Package,Field_Execute,Field_Number 0xe
0795 480a |H | Short_Literal 0xa
0796 0092 0cf5 | | Action Push_String_Extended,0xcf5 ; "Remove_Import_Command"
0798 00db | | Load_Top At_Offset_3
0799 8218 | | Call 0x1,0x18
079a 01cc | | Execute Vector,Catenate
079b 0092 0cf6 | | Action Push_String_Extended,0xcf6 ; ", View_To_Remove"
079d 01cc | | Execute Vector,Catenate
079e e402 | | Load 0x2,0x2
079f 8218 | | Call 0x1,0x18
07a0 01cc | | Execute Vector,Catenate
07a1 e006 | | Load 0x0,0x6
07a2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07a3 e5fb | | Load 0x2,-0x5
07a4 e5fc | | Load 0x2,-0x4
07a5 4801 |H | Short_Literal 0x1
07a6 4800 |H | Short_Literal 0x0
07a7 4800 |H | Short_Literal 0x0
07a8 00ea | | Load_Encached Null_String_Cache
07a9 e5fd | | Load 0x2,-0x3
07aa e40a | | Load 0x2,0xa
07ab e009 | | Load 0x0,0x9
07ac 1815 | | Execute Package,Field_Execute,Field_Number 0x15
07ad c5fb | | Store 0x2,-0x5
07ae 4801 |H | Short_Literal 0x1
07af e5fb | | Load 0x2,-0x5
07b0 e007 | | Load 0x0,0x7
07b1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
07b2 6819 |h | Jump_Zero 0x7cc
07b3 e5fc | | Load 0x2,-0x4
07b4 6808 |h | Jump_Zero 0x7bd
07b5 e005 | | Load 0x0,0x5
07b6 180e | | Execute Package,Field_Execute,Field_Number 0xe
07b7 4805 |H | Short_Literal 0x5
07b8 e5fb | | Load 0x2,-0x5
07b9 e007 | | Load 0x0,0x7
07ba 1819 | | Execute Package,Field_Execute,Field_Number 0x19
07bb e006 | | Load 0x0,0x6
07bc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07bd e5fb | | Load 0x2,-0x5
07be 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
07c0 4802 |H | Short_Literal 0x2
07c1 0092 0cf7 | | Action Push_String_Extended,0xcf7 ; "Can't remove remote import "
07c3 e402 | | Load 0x2,0x2
07c4 01cc | | Execute Vector,Catenate
07c5 0092 0cf8 | | Action Push_String_Extended,0xcf8 ; " from view "
07c7 01cc | | Execute Vector,Catenate
07c8 e406 | | Load 0x2,0x6
07c9 01cc | | Execute Vector,Catenate
07ca 8215 | | Call 0x1,0x15
07cb c5fb | | Store 0x2,-0x5
07cc 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07cd 0000 0000 | | .XXX[0x3]
07cf 0000 | |
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07d6 | | .CONST 0x07d6 ; Address of begin
07d1 0004 | | .CONST 0x0004 ; Address of exception handler
07d2 0002 | | .CONST 0x0002 ; Number of locals
07d3 INIT_07d0:
07d3 4801 |H | Short_Literal 0x1
07d4 e5fe | | Load 0x2,-0x2
07d5 8008 | | Call 0x0,0x8
07d6 BODY_07d0:
07d6 4801 |H | Short_Literal 0x1
07d7 00d9 | | Load_Top At_Offset_1
07d8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07d9 e007 | | Load 0x0,0x7
07da 1817 | | Execute Package,Field_Execute,Field_Number 0x17
07db 6817 |h | Jump_Zero 0x7f3
07dc e005 | | Load 0x0,0x5
07dd 180e | | Execute Package,Field_Execute,Field_Number 0xe
07de 4805 |H | Short_Literal 0x5
07df 00da | | Load_Top At_Offset_2
07e0 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07e1 e007 | | Load 0x0,0x7
07e2 1819 | | Execute Package,Field_Execute,Field_Number 0x19
07e3 e006 | | Load 0x0,0x6
07e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07e5 e5fb | | Load 0x2,-0x5
07e6 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
07e8 4802 |H | Short_Literal 0x2
07e9 0092 0cb5 | | Action Push_String_Extended,0xcb5 ; "Can't get import closure for view "
07eb e5fe | | Load 0x2,-0x2
07ec e002 | | Load 0x0,0x2
07ed 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07ee 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
07ef 01cc | | Execute Vector,Catenate
07f0 8215 | | Call 0x1,0x15
07f1 c5fb | | Store 0x2,-0x5
07f2 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07f3 00d8 | | Load_Top At_Offset_0
07f4 e5ff | | Load 0x2,-0x1
07f5 8011 | | Call 0x0,0x11
07f6 7007 |p | Jump_Nonzero 0x7fe
07f7 e5fb | | Load 0x2,-0x5
07f8 e5fc | | Load 0x2,-0x4
07f9 e5fd | | Load 0x2,-0x3
07fa e5fe | | Load 0x2,-0x2
07fb e5ff | | Load 0x2,-0x1
07fc 821d | | Call 0x1,0x1d
07fd c5fb | | Store 0x2,-0x5
07fe 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07ff 0000 | | .XXX[0x1]
0800 ; --------------------------------------------------------------------------------------
0800 ; SUBPROGRAM
0800 ; --------------------------------------------------------------------------------------
0800 080f | | .CONST 0x080f ; Address of begin
0801 0004 | | .CONST 0x0004 ; Address of exception handler
0802 0004 | | .CONST 0x0004 ; Number of locals
0803 INIT_0800:
0803 00da | | Load_Top At_Offset_2
0804 e002 | | Load 0x0,0x2
0805 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0806 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0807 e002 | | Load 0x0,0x2
0808 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0809 02c7 | | Declare_Variable Any
080a 00d8 | | Load_Top At_Offset_0
080b 1c00 | | Execute_Immediate Run_Utility,0x0
080c 4801 |H | Short_Literal 0x1
080d e5fe | | Load 0x2,-0x2
080e 8010 | | Call 0x0,0x10
080f BODY_0800:
080f e5fc | | Load 0x2,-0x4
0810 6816 |h | Jump_Zero 0x827
0811 e005 | | Load 0x0,0x5
0812 180e | | Execute Package,Field_Execute,Field_Number 0xe
0813 4809 |H | Short_Literal 0x9
0814 0092 0cf9 | | Action Push_String_Extended,0xcf9 ; "Remove_All_Remote_Imports (View_To_Remove"
0816 e402 | | Load 0x2,0x2
0817 8218 | | Call 0x1,0x18
0818 01cc | | Execute Vector,Catenate
0819 0092 0cb4 | | Action Push_String_Extended,0xcb4 ; ", From_View"
081b 01cc | | Execute Vector,Catenate
081c e5fe | | Load 0x2,-0x2
081d e002 | | Load 0x0,0x2
081e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
081f 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0820 8218 | | Call 0x1,0x18
0821 01cc | | Execute Vector,Catenate
0822 0092 0cad | | Action Push_String_Extended,0xcad ; ")"
0824 01cc | | Execute Vector,Catenate
0825 e006 | | Load 0x0,0x6
0826 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0827 4801 |H | Short_Literal 0x1
0828 00d9 | | Load_Top At_Offset_1
0829 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
082a e007 | | Load 0x0,0x7
082b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
082c 6819 |h | Jump_Zero 0x846
082d e5fc | | Load 0x2,-0x4
082e 6809 |h | Jump_Zero 0x838
082f e005 | | Load 0x0,0x5
0830 180e | | Execute Package,Field_Execute,Field_Number 0xe
0831 4805 |H | Short_Literal 0x5
0832 00da | | Load_Top At_Offset_2
0833 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0834 e007 | | Load 0x0,0x7
0835 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0836 e006 | | Load 0x0,0x6
0837 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0838 e5fb | | Load 0x2,-0x5
0839 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
083b 4802 |H | Short_Literal 0x2
083c 0092 0ce5 | | Action Push_String_Extended,0xce5 ; "Can't get referencers for view "
083e e5fe | | Load 0x2,-0x2
083f e002 | | Load 0x0,0x2
0840 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0841 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0842 01cc | | Execute Vector,Catenate
0843 8215 | | Call 0x1,0x15
0844 c5fb | | Store 0x2,-0x5
0845 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0846 e5fb | | Load 0x2,-0x5
0847 e5fc | | Load 0x2,-0x4
0848 e5fd | | Load 0x2,-0x3
0849 e5fe | | Load 0x2,-0x2
084a e5ff | | Load 0x2,-0x1
084b 821e | | Call 0x1,0x1e
084c c5fb | | Store 0x2,-0x5
084d 4801 |H | Short_Literal 0x1
084e e5fb | | Load 0x2,-0x5
084f e007 | | Load 0x0,0x7
0850 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0851 681d |h | Jump_Zero 0x86f
0852 e005 | | Load 0x0,0x5
0853 180e | | Execute Package,Field_Execute,Field_Number 0xe
0854 4806 |H | Short_Literal 0x6
0855 e5fb | | Load 0x2,-0x5
0856 e007 | | Load 0x0,0x7
0857 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0858 e006 | | Load 0x0,0x6
0859 1813 | | Execute Package,Field_Execute,Field_Number 0x13
085a e005 | | Load 0x0,0x5
085b 180e | | Execute Package,Field_Execute,Field_Number 0xe
085c 4806 |H | Short_Literal 0x6
085d 0092 0cfa | | Action Push_String_Extended,0xcfa ; "Remote library for "
085f e402 | | Load 0x2,0x2
0860 01cc | | Execute Vector,Catenate
0861 0092 0cfb | | Action Push_String_Extended,0xcfb ; " isn't on search list for "
0863 01cc | | Execute Vector,Catenate
0864 e5fe | | Load 0x2,-0x2
0865 e002 | | Load 0x0,0x2
0866 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0867 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0868 01cc | | Execute Vector,Catenate
0869 e006 | | Load 0x0,0x6
086a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
086b e5fb | | Load 0x2,-0x5
086c e007 | | Load 0x0,0x7
086d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
086e c5fb | | Store 0x2,-0x5
086f 00cf | | Action Mark_Auxiliary
0870 00d9 | | Load_Top At_Offset_1
0871 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0872 4801 |H | Short_Literal 0x1
0873 0263 | c | Execute Discrete,Above_Bound
0874 7055 |pU | Jump_Nonzero 0x8ca
0875 00d8 | | Load_Top At_Offset_0
0876 e404 | | Load 0x2,0x4
0877 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0878 01d7 | | Execute Vector,Field_Read
0879 c403 | | Store 0x2,0x3
087a e5fc | | Load 0x2,-0x4
087b 681b |h | Jump_Zero 0x897
087c e005 | | Load 0x0,0x5
087d 180e | | Execute Package,Field_Execute,Field_Number 0xe
087e 480a |H | Short_Literal 0xa
087f 0092 0ce6 | | Action Push_String_Extended,0xce6 ; ". Referencers ("
0881 00db | | Load_Top At_Offset_3
0882 00e0 | | Load_Encached Standard_Cache
0883 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0884 01cc | | Execute Vector,Catenate
0885 0092 0ce7 | | Action Push_String_Extended,0xce7 ; ", "
0887 01cc | | Execute Vector,Catenate
0888 e5fe | | Load 0x2,-0x2
0889 e002 | | Load 0x0,0x2
088a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
088b 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
088c 01cc | | Execute Vector,Catenate
088d 0092 0cb8 | | Action Push_String_Extended,0xcb8 ; ") => "
088f 01cc | | Execute Vector,Catenate
0890 e403 | | Load 0x2,0x3
0891 e002 | | Load 0x0,0x2
0892 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0893 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0894 01cc | | Execute Vector,Catenate
0895 e006 | | Load 0x0,0x6
0896 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0897 e403 | | Load 0x2,0x3
0898 e5ff | | Load 0x2,-0x1
0899 012f | / | Execute Any,Equal
089a 702d |p- | Jump_Nonzero 0x8c8
089b e403 | | Load 0x2,0x3
089c e5fe | | Load 0x2,-0x2
089d 012f | / | Execute Any,Equal
089e 7029 |p) | Jump_Nonzero 0x8c8
089f e5fb | | Load 0x2,-0x5
08a0 e5fc | | Load 0x2,-0x4
08a1 e5fd | | Load 0x2,-0x3
08a2 e403 | | Load 0x2,0x3
08a3 e5ff | | Load 0x2,-0x1
08a4 821e | | Call 0x1,0x1e
08a5 c5fb | | Store 0x2,-0x5
08a6 4801 |H | Short_Literal 0x1
08a7 e5fb | | Load 0x2,-0x5
08a8 e007 | | Load 0x0,0x7
08a9 1817 | | Execute Package,Field_Execute,Field_Number 0x17
08aa 681d |h | Jump_Zero 0x8c8
08ab e005 | | Load 0x0,0x5
08ac 180e | | Execute Package,Field_Execute,Field_Number 0xe
08ad 4806 |H | Short_Literal 0x6
08ae e5fb | | Load 0x2,-0x5
08af e007 | | Load 0x0,0x7
08b0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
08b1 e006 | | Load 0x0,0x6
08b2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08b3 e005 | | Load 0x0,0x5
08b4 180e | | Execute Package,Field_Execute,Field_Number 0xe
08b5 4806 |H | Short_Literal 0x6
08b6 0092 0cfa | | Action Push_String_Extended,0xcfa ; "Remote library for "
08b8 e402 | | Load 0x2,0x2
08b9 01cc | | Execute Vector,Catenate
08ba 0092 0cfb | | Action Push_String_Extended,0xcfb ; " isn't on search list for "
08bc 01cc | | Execute Vector,Catenate
08bd e403 | | Load 0x2,0x3
08be e002 | | Load 0x0,0x2
08bf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
08c0 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
08c1 01cc | | Execute Vector,Catenate
08c2 e006 | | Load 0x0,0x6
08c3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08c4 e5fb | | Load 0x2,-0x5
08c5 e007 | | Load 0x0,0x7
08c6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08c7 c5fb | | Store 0x2,-0x5
08c8 00c8 | | Action Pop_Auxiliary_Range
08c9 3fab |? | Loop_Increasing 0x875
08ca 4505 |E | Exit_Suprogram New_Top_Offset 0x5
08cb 0000 0000 | | .BLANK 0000[0x5]
08d0 ; --------------------------------------------------------------------------------------
08d0 ; SUBPROGRAM
08d0 ; --------------------------------------------------------------------------------------
08d0 08db | | .CONST 0x08db ; Address of begin
08d1 0004 | | .CONST 0x0004 ; Address of exception handler
08d2 0003 | | .CONST 0x0003 ; Number of locals
08d3 INIT_08d0:
08d3 e002 | | Load 0x0,0x2
08d4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08d5 02c7 | | Declare_Variable Any
08d6 00d8 | | Load_Top At_Offset_0
08d7 1c00 | | Execute_Immediate Run_Utility,0x0
08d8 4801 |H | Short_Literal 0x1
08d9 e404 | | Load 0x2,0x4
08da 8008 | | Call 0x0,0x8
08db BODY_08d0:
08db 4801 |H | Short_Literal 0x1
08dc 00d9 | | Load_Top At_Offset_1
08dd 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08de e007 | | Load 0x0,0x7
08df 1817 | | Execute Package,Field_Execute,Field_Number 0x17
08e0 6818 |h | Jump_Zero 0x8f9
08e1 e005 | | Load 0x0,0x5
08e2 180e | | Execute Package,Field_Execute,Field_Number 0xe
08e3 4805 |H | Short_Literal 0x5
08e4 00da | | Load_Top At_Offset_2
08e5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08e6 e007 | | Load 0x0,0x7
08e7 1819 | | Execute Package,Field_Execute,Field_Number 0x19
08e8 e006 | | Load 0x0,0x6
08e9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08ea e5fb | | Load 0x2,-0x5
08eb 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
08ed 4802 |H | Short_Literal 0x2
08ee 0092 0cb5 | | Action Push_String_Extended,0xcb5 ; "Can't get import closure for view "
08f0 e404 | | Load 0x2,0x4
08f1 e002 | | Load 0x0,0x2
08f2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
08f3 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
08f4 01cc | | Execute Vector,Catenate
08f5 8215 | | Call 0x1,0x15
08f6 c5fb | | Store 0x2,-0x5
08f7 00cc | | Action Pop_Block
08f8 4504 |E | Exit_Suprogram New_Top_Offset 0x4
08f9 00cf | | Action Mark_Auxiliary
08fa 00d9 | | Load_Top At_Offset_1
08fb 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08fc 4801 |H | Short_Literal 0x1
08fd 0263 | c | Execute Discrete,Above_Bound
08fe 7044 |pD | Jump_Nonzero 0x943
08ff 00d8 | | Load_Top At_Offset_0
0900 e603 | | Load 0x3,0x3
0901 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0902 01d7 | | Execute Vector,Field_Read
0903 c602 | | Store 0x3,0x2
0904 e5fd | | Load 0x2,-0x3
0905 681b |h | Jump_Zero 0x921
0906 e005 | | Load 0x0,0x5
0907 180e | | Execute Package,Field_Execute,Field_Number 0xe
0908 480a |H | Short_Literal 0xa
0909 0092 0cfc | | Action Push_String_Extended,0xcfc ; ". Import_Closure ("
090b 00db | | Load_Top At_Offset_3
090c 00e0 | | Load_Encached Standard_Cache
090d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
090e 01cc | | Execute Vector,Catenate
090f 0092 0ce7 | | Action Push_String_Extended,0xce7 ; ", "
0911 01cc | | Execute Vector,Catenate
0912 e404 | | Load 0x2,0x4
0913 e002 | | Load 0x0,0x2
0914 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0915 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0916 01cc | | Execute Vector,Catenate
0917 0092 0cb8 | | Action Push_String_Extended,0xcb8 ; ") => "
0919 01cc | | Execute Vector,Catenate
091a e602 | | Load 0x3,0x2
091b e002 | | Load 0x0,0x2
091c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
091d 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
091e 01cc | | Execute Vector,Catenate
091f e006 | | Load 0x0,0x6
0920 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0921 e602 | | Load 0x3,0x2
0922 e5ff | | Load 0x2,-0x1
0923 012f | / | Execute Any,Equal
0924 701c |p | Jump_Nonzero 0x941
0925 e602 | | Load 0x3,0x2
0926 e404 | | Load 0x2,0x4
0927 012f | / | Execute Any,Equal
0928 7018 |p | Jump_Nonzero 0x941
0929 e5fb | | Load 0x2,-0x5
092a e5fd | | Load 0x2,-0x3
092b e5fe | | Load 0x2,-0x2
092c e5ff | | Load 0x2,-0x1
092d e602 | | Load 0x3,0x2
092e 821c | | Call 0x1,0x1c
092f c5fb | | Store 0x2,-0x5
0930 4801 |H | Short_Literal 0x1
0931 e5fb | | Load 0x2,-0x5
0932 e007 | | Load 0x0,0x7
0933 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0934 680c |h | Jump_Zero 0x941
0935 e005 | | Load 0x0,0x5
0936 180e | | Execute Package,Field_Execute,Field_Number 0xe
0937 4805 |H | Short_Literal 0x5
0938 e5fb | | Load 0x2,-0x5
0939 e007 | | Load 0x0,0x7
093a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
093b e006 | | Load 0x0,0x6
093c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
093d e5fb | | Load 0x2,-0x5
093e e007 | | Load 0x0,0x7
093f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0940 c5fb | | Store 0x2,-0x5
0941 00c8 | | Action Pop_Auxiliary_Range
0942 3fbc |? | Loop_Increasing 0x8ff
0943 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0944 0000 0000 | | .BLANK 0000[0x4]
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 094b | K | .CONST 0x094b ; Address of begin
0949 0a56 | V | .CONST 0x0a56 ; Address of exception handler
094a 0001 | | .CONST 0x0001 ; Number of locals
094b BODY_0948:
094b INIT_0948:
094b 00e1 | | Load_Encached Boolean_Cache
094c e5fc | | Load 0x2,-0x4
094d e5fd | | Load 0x2,-0x3
094e e402 | | Load 0x2,0x2
094f e407 | | Load 0x2,0x7
0950 e009 | | Load 0x0,0x9
0951 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0952 c5fc | | Store 0x2,-0x4
0953 c405 | | Store 0x2,0x5
0954 4801 |H | Short_Literal 0x1
0955 e5fc | | Load 0x2,-0x4
0956 e007 | | Load 0x0,0x7
0957 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0958 6824 |h$ | Jump_Zero 0x97d
0959 e5fd | | Load 0x2,-0x3
095a 6808 |h | Jump_Zero 0x963
095b e005 | | Load 0x0,0x5
095c 180e | | Execute Package,Field_Execute,Field_Number 0xe
095d 4805 |H | Short_Literal 0x5
095e e5fc | | Load 0x2,-0x4
095f e007 | | Load 0x0,0x7
0960 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0961 e006 | | Load 0x0,0x6
0962 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0963 e5fc | | Load 0x2,-0x4
0964 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0966 4802 |H | Short_Literal 0x2
0967 0092 0cfd | | Action Push_String_Extended,0xcfd ; "Can't tell whether Ada library \x22"
0969 e407 | | Load 0x2,0x7
096a 01cc | | Execute Vector,Catenate
096b 0092 0cfe | | Action Push_String_Extended,0xcfe ; "\x22 exists on machine \x22"
096d 01cc | | Execute Vector,Catenate
096e e5fe | | Load 0x2,-0x2
096f 01cc | | Execute Vector,Catenate
0970 0092 0cd0 | | Action Push_String_Extended,0xcd0 ; "\x22"
0972 01cc | | Execute Vector,Catenate
0973 8215 | | Call 0x1,0x15
0974 c5fc | | Store 0x2,-0x4
0975 e403 | | Load 0x2,0x3
0976 e5fd | | Load 0x2,-0x3
0977 e402 | | Load 0x2,0x2
0978 e009 | | Load 0x0,0x9
0979 1811 | | Execute Package,Field_Execute,Field_Number 0x11
097a c403 | | Store 0x2,0x3
097b 00cc | | Action Pop_Block
097c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
097d e405 | | Load 0x2,0x5
097e 6814 |h | Jump_Zero 0x993
097f e005 | | Load 0x0,0x5
0980 180e | | Execute Package,Field_Execute,Field_Number 0xe
0981 4806 |H | Short_Literal 0x6
0982 0092 0cff | | Action Push_String_Extended,0xcff ; "An Ada library already exists in remote directory \x22"
0984 e5ff | | Load 0x2,-0x1
0985 01cc | | Execute Vector,Catenate
0986 0092 0cd0 | | Action Push_String_Extended,0xcd0 ; "\x22"
0988 01cc | | Execute Vector,Catenate
0989 e006 | | Load 0x0,0x6
098a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
098b e403 | | Load 0x2,0x3
098c e5fd | | Load 0x2,-0x3
098d e402 | | Load 0x2,0x2
098e e009 | | Load 0x0,0x9
098f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0990 c403 | | Store 0x2,0x3
0991 00cc | | Action Pop_Block
0992 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0993 00e1 | | Load_Encached Boolean_Cache
0994 e5fc | | Load 0x2,-0x4
0995 e5fd | | Load 0x2,-0x3
0996 e402 | | Load 0x2,0x2
0997 e5ff | | Load 0x2,-0x1
0998 e009 | | Load 0x0,0x9
0999 1818 | | Execute Package,Field_Execute,Field_Number 0x18
099a c5fc | | Store 0x2,-0x4
099b c404 | | Store 0x2,0x4
099c 4801 |H | Short_Literal 0x1
099d e5fc | | Load 0x2,-0x4
099e e007 | | Load 0x0,0x7
099f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
09a0 6824 |h$ | Jump_Zero 0x9c5
09a1 e5fd | | Load 0x2,-0x3
09a2 6808 |h | Jump_Zero 0x9ab
09a3 e005 | | Load 0x0,0x5
09a4 180e | | Execute Package,Field_Execute,Field_Number 0xe
09a5 4805 |H | Short_Literal 0x5
09a6 e5fc | | Load 0x2,-0x4
09a7 e007 | | Load 0x0,0x7
09a8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
09a9 e006 | | Load 0x0,0x6
09aa 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09ab e5fc | | Load 0x2,-0x4
09ac 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
09ae 4802 |H | Short_Literal 0x2
09af 0092 0d00 | | Action Push_String_Extended,0xd00 ; "Can't tell whether directory \x22"
09b1 e5ff | | Load 0x2,-0x1
09b2 01cc | | Execute Vector,Catenate
09b3 0092 0cfe | | Action Push_String_Extended,0xcfe ; "\x22 exists on machine \x22"
09b5 01cc | | Execute Vector,Catenate
09b6 e5fe | | Load 0x2,-0x2
09b7 01cc | | Execute Vector,Catenate
09b8 0092 0cd0 | | Action Push_String_Extended,0xcd0 ; "\x22"
09ba 01cc | | Execute Vector,Catenate
09bb 8215 | | Call 0x1,0x15
09bc c5fc | | Store 0x2,-0x4
09bd e403 | | Load 0x2,0x3
09be e5fd | | Load 0x2,-0x3
09bf e402 | | Load 0x2,0x2
09c0 e009 | | Load 0x0,0x9
09c1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
09c2 c403 | | Store 0x2,0x3
09c3 00cc | | Action Pop_Block
09c4 4504 |E | Exit_Suprogram New_Top_Offset 0x4
09c5 e404 | | Load 0x2,0x4
09c6 6814 |h | Jump_Zero 0x9db
09c7 e005 | | Load 0x0,0x5
09c8 180e | | Execute Package,Field_Execute,Field_Number 0xe
09c9 4806 |H | Short_Literal 0x6
09ca 0092 0d01 | | Action Push_String_Extended,0xd01 ; "Directory \x22"
09cc e5ff | | Load 0x2,-0x1
09cd 01cc | | Execute Vector,Catenate
09ce 0092 0d02 | | Action Push_String_Extended,0xd02 ; "\x22 already exists"
09d0 01cc | | Execute Vector,Catenate
09d1 e006 | | Load 0x0,0x6
09d2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09d3 e005 | | Load 0x0,0x5
09d4 180e | | Execute Package,Field_Execute,Field_Number 0xe
09d5 4802 |H | Short_Literal 0x2
09d6 0092 0d03 | | Action Push_String_Extended,0xd03 ; "Using an existing directory"
09d8 e006 | | Load 0x0,0x6
09d9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09da 7847 |xG | Jump 0xa22
09db e005 | | Load 0x0,0x5
09dc 180e | | Execute Package,Field_Execute,Field_Number 0xe
09dd 4802 |H | Short_Literal 0x2
09de 0092 0d04 | | Action Push_String_Extended,0xd04 ; "Creating the new remote directory \x22"
09e0 e5ff | | Load 0x2,-0x1
09e1 01cc | | Execute Vector,Catenate
09e2 0092 0cd0 | | Action Push_String_Extended,0xcd0 ; "\x22"
09e4 01cc | | Execute Vector,Catenate
09e5 e006 | | Load 0x0,0x6
09e6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09e7 e5fd | | Load 0x2,-0x3
09e8 680a |h | Jump_Zero 0x9f3
09e9 e005 | | Load 0x0,0x5
09ea 180e | | Execute Package,Field_Execute,Field_Number 0xe
09eb 480a |H | Short_Literal 0xa
09ec 0092 0d05 | | Action Push_String_Extended,0xd05 ; "Create_Dir_Command"
09ee e408 | | Load 0x2,0x8
09ef 8218 | | Call 0x1,0x18
09f0 01cc | | Execute Vector,Catenate
09f1 e006 | | Load 0x0,0x6
09f2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09f3 e5fc | | Load 0x2,-0x4
09f4 e5fd | | Load 0x2,-0x3
09f5 4801 |H | Short_Literal 0x1
09f6 4800 |H | Short_Literal 0x0
09f7 4800 |H | Short_Literal 0x0
09f8 00ea | | Load_Encached Null_String_Cache
09f9 e402 | | Load 0x2,0x2
09fa e408 | | Load 0x2,0x8
09fb e009 | | Load 0x0,0x9
09fc 1815 | | Execute Package,Field_Execute,Field_Number 0x15
09fd c5fc | | Store 0x2,-0x4
09fe 4801 |H | Short_Literal 0x1
09ff e5fc | | Load 0x2,-0x4
0a00 e007 | | Load 0x0,0x7
0a01 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0a02 681f |h | Jump_Zero 0xa22
0a03 e5fd | | Load 0x2,-0x3
0a04 6808 |h | Jump_Zero 0xa0d
0a05 e005 | | Load 0x0,0x5
0a06 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a07 4805 |H | Short_Literal 0x5
0a08 e5fc | | Load 0x2,-0x4
0a09 e007 | | Load 0x0,0x7
0a0a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0a0b e006 | | Load 0x0,0x6
0a0c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a0d e5fc | | Load 0x2,-0x4
0a0e 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0a10 4802 |H | Short_Literal 0x2
0a11 0092 0d06 | | Action Push_String_Extended,0xd06 ; "Can't create remote directory \x22"
0a13 e5ff | | Load 0x2,-0x1
0a14 01cc | | Execute Vector,Catenate
0a15 0092 0cd0 | | Action Push_String_Extended,0xcd0 ; "\x22"
0a17 01cc | | Execute Vector,Catenate
0a18 8215 | | Call 0x1,0x15
0a19 c5fc | | Store 0x2,-0x4
0a1a e403 | | Load 0x2,0x3
0a1b e5fd | | Load 0x2,-0x3
0a1c e402 | | Load 0x2,0x2
0a1d e009 | | Load 0x0,0x9
0a1e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a1f c403 | | Store 0x2,0x3
0a20 00cc | | Action Pop_Block
0a21 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0a22 e5fd | | Load 0x2,-0x3
0a23 680a |h | Jump_Zero 0xa2e
0a24 e005 | | Load 0x0,0x5
0a25 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a26 480a |H | Short_Literal 0xa
0a27 0092 0d07 | | Action Push_String_Extended,0xd07 ; "Create_Ada_Lib_Command"
0a29 e409 | | Load 0x2,0x9
0a2a 8218 | | Call 0x1,0x18
0a2b 01cc | | Execute Vector,Catenate
0a2c e006 | | Load 0x0,0x6
0a2d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a2e e5fc | | Load 0x2,-0x4
0a2f e5fd | | Load 0x2,-0x3
0a30 4801 |H | Short_Literal 0x1
0a31 4800 |H | Short_Literal 0x0
0a32 4800 |H | Short_Literal 0x0
0a33 00ea | | Load_Encached Null_String_Cache
0a34 e402 | | Load 0x2,0x2
0a35 e409 | | Load 0x2,0x9
0a36 e009 | | Load 0x0,0x9
0a37 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0a38 c5fc | | Store 0x2,-0x4
0a39 4801 |H | Short_Literal 0x1
0a3a e5fc | | Load 0x2,-0x4
0a3b e007 | | Load 0x0,0x7
0a3c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0a3d 6817 |h | Jump_Zero 0xa55
0a3e e5fd | | Load 0x2,-0x3
0a3f 6808 |h | Jump_Zero 0xa48
0a40 e005 | | Load 0x0,0x5
0a41 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a42 4805 |H | Short_Literal 0x5
0a43 e5fc | | Load 0x2,-0x4
0a44 e007 | | Load 0x0,0x7
0a45 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0a46 e006 | | Load 0x0,0x6
0a47 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a48 e5fc | | Load 0x2,-0x4
0a49 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0a4b 4802 |H | Short_Literal 0x2
0a4c 0092 0d08 | | Action Push_String_Extended,0xd08 ; "Can't create an Ada library in remote directory \x22"
0a4e e5ff | | Load 0x2,-0x1
0a4f 01cc | | Execute Vector,Catenate
0a50 0092 0cd0 | | Action Push_String_Extended,0xcd0 ; "\x22"
0a52 01cc | | Execute Vector,Catenate
0a53 8215 | | Call 0x1,0x15
0a54 c5fc | | Store 0x2,-0x4
0a55 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a56 TRAP_0948:
0a56 0007 | | Action Break_Optional
0a57 e403 | | Load 0x2,0x3
0a58 e5fd | | Load 0x2,-0x3
0a59 e402 | | Load 0x2,0x2
0a5a e009 | | Load 0x0,0x9
0a5b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a5c c403 | | Store 0x2,0x3
0a5d 00d8 | | Load_Top At_Offset_0
0a5e 0101 | | Execute Exception,Reraise
0a5f 0000 | | .XXX[0x1]
0a60 ; --------------------------------------------------------------------------------------
0a60 ; SUBPROGRAM
0a60 ; --------------------------------------------------------------------------------------
0a60 0a65 | e | .CONST 0x0a65 ; Address of begin
0a61 0bad | | .CONST 0x0bad ; Address of exception handler
0a62 0002 | | .CONST 0x0002 ; Number of locals
0a63 INIT_0a60:
0a63 029f 0c23 | #| Declare_Subprogram INIT_0c20,For_Call
0a65 BODY_0a60:
0a65 00e1 | | Load_Encached Boolean_Cache
0a66 e5fb | | Load 0x2,-0x5
0a67 e5fc | | Load 0x2,-0x4
0a68 e402 | | Load 0x2,0x2
0a69 e405 | | Load 0x2,0x5
0a6a e009 | | Load 0x0,0x9
0a6b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0a6c c5fb | | Store 0x2,-0x5
0a6d c403 | | Store 0x2,0x3
0a6e 4801 |H | Short_Literal 0x1
0a6f e5fb | | Load 0x2,-0x5
0a70 e007 | | Load 0x0,0x7
0a71 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0a72 6824 |h$ | Jump_Zero 0xa97
0a73 e5fc | | Load 0x2,-0x4
0a74 6808 |h | Jump_Zero 0xa7d
0a75 e005 | | Load 0x0,0x5
0a76 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a77 4805 |H | Short_Literal 0x5
0a78 e5fb | | Load 0x2,-0x5
0a79 e007 | | Load 0x0,0x7
0a7a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0a7b e006 | | Load 0x0,0x6
0a7c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a7d e5fb | | Load 0x2,-0x5
0a7e 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0a80 4802 |H | Short_Literal 0x2
0a81 0092 0d09 | | Action Push_String_Extended,0xd09 ; "Can't tell whether Ada library exists in directory \x22"
0a83 e5fe | | Load 0x2,-0x2
0a84 01cc | | Execute Vector,Catenate
0a85 0092 0d0a | | Action Push_String_Extended,0xd0a ; "\x22 on machine \x22"
0a87 01cc | | Execute Vector,Catenate
0a88 e5fd | | Load 0x2,-0x3
0a89 01cc | | Execute Vector,Catenate
0a8a 0092 0cd0 | | Action Push_String_Extended,0xcd0 ; "\x22"
0a8c 01cc | | Execute Vector,Catenate
0a8d 8215 | | Call 0x1,0x15
0a8e c5fb | | Store 0x2,-0x5
0a8f e404 | | Load 0x2,0x4
0a90 e5fc | | Load 0x2,-0x4
0a91 e402 | | Load 0x2,0x2
0a92 e009 | | Load 0x0,0x9
0a93 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a94 c404 | | Store 0x2,0x4
0a95 00cc | | Action Pop_Block
0a96 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0a97 e403 | | Load 0x2,0x3
0a98 701e |p | Jump_Nonzero 0xab7
0a99 e005 | | Load 0x0,0x5
0a9a 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a9b 4805 |H | Short_Literal 0x5
0a9c 0092 0d0b | | Action Push_String_Extended,0xd0b ; "There is no remote Ada library in directory \x22"
0a9e e5fe | | Load 0x2,-0x2
0a9f 01cc | | Execute Vector,Catenate
0aa0 0092 0d0c | | Action Push_String_Extended,0xd0c ; "\x22 on machine "
0aa2 01cc | | Execute Vector,Catenate
0aa3 e5fd | | Load 0x2,-0x3
0aa4 01cc | | Execute Vector,Catenate
0aa5 e006 | | Load 0x0,0x6
0aa6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0aa7 e5fb | | Load 0x2,-0x5
0aa8 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0aaa 4802 |H | Short_Literal 0x2
0aab 0092 0d0d | | Action Push_String_Extended,0xd0d ; "Can't destroy remote library"
0aad 8215 | | Call 0x1,0x15
0aae c5fb | | Store 0x2,-0x5
0aaf e404 | | Load 0x2,0x4
0ab0 e5fc | | Load 0x2,-0x4
0ab1 e402 | | Load 0x2,0x2
0ab2 e009 | | Load 0x0,0x9
0ab3 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0ab4 c404 | | Store 0x2,0x4
0ab5 00cc | | Action Pop_Block
0ab6 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0ab7 8602 | | Call 0x3,0x2
0ab8 e5fc | | Load 0x2,-0x4
0ab9 680a |h | Jump_Zero 0xac4
0aba e005 | | Load 0x0,0x5
0abb 180e | | Execute Package,Field_Execute,Field_Number 0xe
0abc 480a |H | Short_Literal 0xa
0abd 0092 0d0e | | Action Push_String_Extended,0xd0e ; "Executing command"
0abf e406 | | Load 0x2,0x6
0ac0 8218 | | Call 0x1,0x18
0ac1 01cc | | Execute Vector,Catenate
0ac2 e006 | | Load 0x0,0x6
0ac3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ac4 e5fb | | Load 0x2,-0x5
0ac5 e5fc | | Load 0x2,-0x4
0ac6 4801 |H | Short_Literal 0x1
0ac7 4800 |H | Short_Literal 0x0
0ac8 4800 |H | Short_Literal 0x0
0ac9 00ea | | Load_Encached Null_String_Cache
0aca e402 | | Load 0x2,0x2
0acb e406 | | Load 0x2,0x6
0acc e009 | | Load 0x0,0x9
0acd 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0ace c5fb | | Store 0x2,-0x5
0acf 4801 |H | Short_Literal 0x1
0ad0 e5fb | | Load 0x2,-0x5
0ad1 e007 | | Load 0x0,0x7
0ad2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0ad3 6815 |h | Jump_Zero 0xae9
0ad4 e5fc | | Load 0x2,-0x4
0ad5 6808 |h | Jump_Zero 0xade
0ad6 e005 | | Load 0x0,0x5
0ad7 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ad8 4805 |H | Short_Literal 0x5
0ad9 e5fb | | Load 0x2,-0x5
0ada e007 | | Load 0x0,0x7
0adb 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0adc e006 | | Load 0x0,0x6
0add 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ade e5fb | | Load 0x2,-0x5
0adf 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0ae1 4802 |H | Short_Literal 0x2
0ae2 0092 0d0f | | Action Push_String_Extended,0xd0f ; "Can't unprotect "
0ae4 e5fe | | Load 0x2,-0x2
0ae5 01cc | | Execute Vector,Catenate
0ae6 8215 | | Call 0x1,0x15
0ae7 c5fb | | Store 0x2,-0x5
0ae8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ae9 e5fc | | Load 0x2,-0x4
0aea 680a |h | Jump_Zero 0xaf5
0aeb e005 | | Load 0x0,0x5
0aec 180e | | Execute Package,Field_Execute,Field_Number 0xe
0aed 480a |H | Short_Literal 0xa
0aee 0092 0d0e | | Action Push_String_Extended,0xd0e ; "Executing command"
0af0 e407 | | Load 0x2,0x7
0af1 8218 | | Call 0x1,0x18
0af2 01cc | | Execute Vector,Catenate
0af3 e006 | | Load 0x0,0x6
0af4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0af5 e5fb | | Load 0x2,-0x5
0af6 e5fc | | Load 0x2,-0x4
0af7 4801 |H | Short_Literal 0x1
0af8 4800 |H | Short_Literal 0x0
0af9 4800 |H | Short_Literal 0x0
0afa 00ea | | Load_Encached Null_String_Cache
0afb e402 | | Load 0x2,0x2
0afc e407 | | Load 0x2,0x7
0afd e009 | | Load 0x0,0x9
0afe 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0aff c5fb | | Store 0x2,-0x5
0b00 4801 |H | Short_Literal 0x1
0b01 e5fb | | Load 0x2,-0x5
0b02 e007 | | Load 0x0,0x7
0b03 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b04 6815 |h | Jump_Zero 0xb1a
0b05 e5fc | | Load 0x2,-0x4
0b06 6808 |h | Jump_Zero 0xb0f
0b07 e005 | | Load 0x0,0x5
0b08 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b09 4805 |H | Short_Literal 0x5
0b0a e5fb | | Load 0x2,-0x5
0b0b e007 | | Load 0x0,0x7
0b0c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0b0d e006 | | Load 0x0,0x6
0b0e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b0f e5fb | | Load 0x2,-0x5
0b10 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0b12 4802 |H | Short_Literal 0x2
0b13 0092 0d10 | | Action Push_String_Extended,0xd10 ; "Can't destroy the remote Ada library "
0b15 e5fe | | Load 0x2,-0x2
0b16 01cc | | Execute Vector,Catenate
0b17 8215 | | Call 0x1,0x15
0b18 c5fb | | Store 0x2,-0x5
0b19 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b1a e5fc | | Load 0x2,-0x4
0b1b 680a |h | Jump_Zero 0xb26
0b1c e005 | | Load 0x0,0x5
0b1d 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b1e 480a |H | Short_Literal 0xa
0b1f 0092 0d0e | | Action Push_String_Extended,0xd0e ; "Executing command"
0b21 e408 | | Load 0x2,0x8
0b22 8218 | | Call 0x1,0x18
0b23 01cc | | Execute Vector,Catenate
0b24 e006 | | Load 0x0,0x6
0b25 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b26 e5fb | | Load 0x2,-0x5
0b27 e5fc | | Load 0x2,-0x4
0b28 4801 |H | Short_Literal 0x1
0b29 4800 |H | Short_Literal 0x0
0b2a 4800 |H | Short_Literal 0x0
0b2b 00ea | | Load_Encached Null_String_Cache
0b2c e402 | | Load 0x2,0x2
0b2d e408 | | Load 0x2,0x8
0b2e e009 | | Load 0x0,0x9
0b2f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0b30 c5fb | | Store 0x2,-0x5
0b31 4801 |H | Short_Literal 0x1
0b32 e5fb | | Load 0x2,-0x5
0b33 e007 | | Load 0x0,0x7
0b34 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b35 6815 |h | Jump_Zero 0xb4b
0b36 e5fc | | Load 0x2,-0x4
0b37 6808 |h | Jump_Zero 0xb40
0b38 e005 | | Load 0x0,0x5
0b39 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b3a 4806 |H | Short_Literal 0x6
0b3b e5fb | | Load 0x2,-0x5
0b3c e007 | | Load 0x0,0x7
0b3d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0b3e e006 | | Load 0x0,0x6
0b3f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b40 e5fb | | Load 0x2,-0x5
0b41 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0b43 4801 |H | Short_Literal 0x1
0b44 0092 0d11 | | Action Push_String_Extended,0xd11 ; "Can't destroy the files in remote directory "
0b46 e5fe | | Load 0x2,-0x2
0b47 01cc | | Execute Vector,Catenate
0b48 8215 | | Call 0x1,0x15
0b49 c5fb | | Store 0x2,-0x5
0b4a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b4b e5fc | | Load 0x2,-0x4
0b4c 680a |h | Jump_Zero 0xb57
0b4d e005 | | Load 0x0,0x5
0b4e 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b4f 480a |H | Short_Literal 0xa
0b50 0092 0d0e | | Action Push_String_Extended,0xd0e ; "Executing command"
0b52 e409 | | Load 0x2,0x9
0b53 8218 | | Call 0x1,0x18
0b54 01cc | | Execute Vector,Catenate
0b55 e006 | | Load 0x0,0x6
0b56 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b57 e5fb | | Load 0x2,-0x5
0b58 e5fc | | Load 0x2,-0x4
0b59 4801 |H | Short_Literal 0x1
0b5a 4800 |H | Short_Literal 0x0
0b5b 4800 |H | Short_Literal 0x0
0b5c 00ea | | Load_Encached Null_String_Cache
0b5d e402 | | Load 0x2,0x2
0b5e e409 | | Load 0x2,0x9
0b5f e009 | | Load 0x0,0x9
0b60 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0b61 c5fb | | Store 0x2,-0x5
0b62 4801 |H | Short_Literal 0x1
0b63 e5fb | | Load 0x2,-0x5
0b64 e007 | | Load 0x0,0x7
0b65 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b66 6815 |h | Jump_Zero 0xb7c
0b67 e5fc | | Load 0x2,-0x4
0b68 6808 |h | Jump_Zero 0xb71
0b69 e005 | | Load 0x0,0x5
0b6a 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b6b 4806 |H | Short_Literal 0x6
0b6c e5fb | | Load 0x2,-0x5
0b6d e007 | | Load 0x0,0x7
0b6e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0b6f e006 | | Load 0x0,0x6
0b70 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b71 e5fb | | Load 0x2,-0x5
0b72 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0b74 4801 |H | Short_Literal 0x1
0b75 0092 0d12 | | Action Push_String_Extended,0xd12 ; "Can't destroy the '.options' file in remote directory "
0b77 e5fe | | Load 0x2,-0x2
0b78 01cc | | Execute Vector,Catenate
0b79 8215 | | Call 0x1,0x15
0b7a c5fb | | Store 0x2,-0x5
0b7b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b7c e5fc | | Load 0x2,-0x4
0b7d 680a |h | Jump_Zero 0xb88
0b7e e005 | | Load 0x0,0x5
0b7f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b80 480a |H | Short_Literal 0xa
0b81 0092 0d0e | | Action Push_String_Extended,0xd0e ; "Executing command"
0b83 e40a | | Load 0x2,0xa
0b84 8218 | | Call 0x1,0x18
0b85 01cc | | Execute Vector,Catenate
0b86 e006 | | Load 0x0,0x6
0b87 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b88 e5fb | | Load 0x2,-0x5
0b89 e5fc | | Load 0x2,-0x4
0b8a 4801 |H | Short_Literal 0x1
0b8b 4800 |H | Short_Literal 0x0
0b8c 4800 |H | Short_Literal 0x0
0b8d 00ea | | Load_Encached Null_String_Cache
0b8e e402 | | Load 0x2,0x2
0b8f e40a | | Load 0x2,0xa
0b90 e009 | | Load 0x0,0x9
0b91 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0b92 c5fb | | Store 0x2,-0x5
0b93 4801 |H | Short_Literal 0x1
0b94 e5fb | | Load 0x2,-0x5
0b95 e007 | | Load 0x0,0x7
0b96 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b97 6814 |h | Jump_Zero 0xbac
0b98 e5fc | | Load 0x2,-0x4
0b99 6808 |h | Jump_Zero 0xba2
0b9a e005 | | Load 0x0,0x5
0b9b 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b9c 4806 |H | Short_Literal 0x6
0b9d e5fb | | Load 0x2,-0x5
0b9e e007 | | Load 0x0,0x7
0b9f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0ba0 e006 | | Load 0x0,0x6
0ba1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ba2 e5fb | | Load 0x2,-0x5
0ba3 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0ba5 4801 |H | Short_Literal 0x1
0ba6 0092 0d13 | | Action Push_String_Extended,0xd13 ; "Can't destroy the remote directory "
0ba8 e5fe | | Load 0x2,-0x2
0ba9 01cc | | Execute Vector,Catenate
0baa 8215 | | Call 0x1,0x15
0bab c5fb | | Store 0x2,-0x5
0bac 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0bad TRAP_0a60:
0bad 0007 | | Action Break_Optional
0bae e404 | | Load 0x2,0x4
0baf e5fc | | Load 0x2,-0x4
0bb0 e402 | | Load 0x2,0x2
0bb1 e009 | | Load 0x0,0x9
0bb2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0bb3 c404 | | Store 0x2,0x4
0bb4 00d8 | | Load_Top At_Offset_0
0bb5 0101 | | Execute Exception,Reraise
0bb6 0000 0000 | | .XXX[0x2]
0bb8 ; --------------------------------------------------------------------------------------
0bb8 ; SUBPROGRAM
0bb8 ; --------------------------------------------------------------------------------------
0bb8 0bca | | .CONST 0x0bca ; Address of begin
0bb9 0004 | | .CONST 0x0004 ; Address of exception handler
0bba 0003 | | .CONST 0x0003 ; Number of locals
0bbb INIT_0bb8:
0bbb e007 | | Load 0x0,0x7
0bbc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bbd 02c7 | | Declare_Variable Any
0bbe 00d8 | | Load_Top At_Offset_0
0bbf 1c00 | | Execute_Immediate Run_Utility,0x0
0bc0 e00a | | Load 0x0,0xa
0bc1 0092 0d14 | | Action Push_String_Extended,0xd14 ; "a.path>a.path_temp;egrep -s "
0bc3 01cc | | Execute Vector,Catenate
0bc4 e7ff | | Load 0x3,-0x1
0bc5 01cc | | Execute Vector,Catenate
0bc6 0092 0d15 | | Action Push_String_Extended,0xd15 ; " a.path_temp"
0bc8 01cc | | Execute Vector,Catenate
0bc9 0007 | | Action Break_Optional
0bca BODY_0bb8:
0bca e5fc | | Load 0x2,-0x4
0bcb 680d |h | Jump_Zero 0xbd9
0bcc e005 | | Load 0x0,0x5
0bcd 180e | | Execute Package,Field_Execute,Field_Number 0xe
0bce 4809 |H | Short_Literal 0x9
0bcf 0092 0d16 | | Action Push_String_Extended,0xd16 ; "Import_Exists (Remote_View"
0bd1 e7ff | | Load 0x3,-0x1
0bd2 8218 | | Call 0x1,0x18
0bd3 01cc | | Execute Vector,Catenate
0bd4 0092 0cad | | Action Push_String_Extended,0xcad ; ")"
0bd6 01cc | | Execute Vector,Catenate
0bd7 e006 | | Load 0x0,0x6
0bd8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0bd9 4800 |H | Short_Literal 0x0
0bda a7fe | | Store_Unchecked 0x3,-0x2
0bdb e5fc | | Load 0x2,-0x4
0bdc 680a |h | Jump_Zero 0xbe7
0bdd e005 | | Load 0x0,0x5
0bde 180e | | Execute Package,Field_Execute,Field_Number 0xe
0bdf 480a |H | Short_Literal 0xa
0be0 0092 0d17 | | Action Push_String_Extended,0xd17 ; "Import_Exists_Command"
0be2 00db | | Load_Top At_Offset_3
0be3 8218 | | Call 0x1,0x18
0be4 01cc | | Execute Vector,Catenate
0be5 e006 | | Load 0x0,0x6
0be6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0be7 00d9 | | Load_Top At_Offset_1
0be8 e5fc | | Load 0x2,-0x4
0be9 4801 |H | Short_Literal 0x1
0bea 4800 |H | Short_Literal 0x0
0beb 4800 |H | Short_Literal 0x0
0bec 00ea | | Load_Encached Null_String_Cache
0bed e5fd | | Load 0x2,-0x3
0bee e603 | | Load 0x3,0x3
0bef e009 | | Load 0x0,0x9
0bf0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0bf1 c602 | | Store 0x3,0x2
0bf2 4801 |H | Short_Literal 0x1
0bf3 00da | | Load_Top At_Offset_2
0bf4 e007 | | Load 0x0,0x7
0bf5 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0bf6 6817 |h | Jump_Zero 0xc0e
0bf7 e5fc | | Load 0x2,-0x4
0bf8 6814 |h | Jump_Zero 0xc0d
0bf9 e005 | | Load 0x0,0x5
0bfa 180e | | Execute Package,Field_Execute,Field_Number 0xe
0bfb 480a |H | Short_Literal 0xa
0bfc 00db | | Load_Top At_Offset_3
0bfd e007 | | Load 0x0,0x7
0bfe 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0bff e006 | | Load 0x0,0x6
0c00 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c01 e005 | | Load 0x0,0x5
0c02 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c03 4802 |H | Short_Literal 0x2
0c04 0092 0d18 | | Action Push_String_Extended,0xd18 ; "View \x22"
0c06 e7ff | | Load 0x3,-0x1
0c07 01cc | | Execute Vector,Catenate
0c08 0092 0d19 | | Action Push_String_Extended,0xd19 ; "\x22 has not yet been imported"
0c0a 01cc | | Execute Vector,Catenate
0c0b e006 | | Load 0x0,0x6
0c0c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c0d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c0e e5fc | | Load 0x2,-0x4
0c0f 680c |h | Jump_Zero 0xc1c
0c10 e005 | | Load 0x0,0x5
0c11 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c12 4802 |H | Short_Literal 0x2
0c13 0092 0d18 | | Action Push_String_Extended,0xd18 ; "View \x22"
0c15 e7ff | | Load 0x3,-0x1
0c16 01cc | | Execute Vector,Catenate
0c17 0092 0d1a | | Action Push_String_Extended,0xd1a ; "\x22 was previously imported"
0c19 01cc | | Execute Vector,Catenate
0c1a e006 | | Load 0x0,0x6
0c1b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c1c 4801 |H | Short_Literal 0x1
0c1d a7fe | | Store_Unchecked 0x3,-0x2
0c1e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c1f 0000 | | .XXX[0x1]
0c20 ; --------------------------------------------------------------------------------------
0c20 ; SUBPROGRAM
0c20 ; --------------------------------------------------------------------------------------
0c20 0c2b | + | .CONST 0x0c2b ; Address of begin
0c21 0004 | | .CONST 0x0004 ; Address of exception handler
0c22 0003 | | .CONST 0x0003 ; Number of locals
0c23 INIT_0c20:
0c23 e002 | | Load 0x0,0x2
0c24 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c25 02c7 | | Declare_Variable Any
0c26 00d8 | | Load_Top At_Offset_0
0c27 1c00 | | Execute_Immediate Run_Utility,0x0
0c28 4801 |H | Short_Literal 0x1
0c29 e5ff | | Load 0x2,-0x1
0c2a 8010 | | Call 0x0,0x10
0c2b BODY_0c20:
0c2b 4801 |H | Short_Literal 0x1
0c2c 00d9 | | Load_Top At_Offset_1
0c2d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0c2e e007 | | Load 0x0,0x7
0c2f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c30 6821 |h! | Jump_Zero 0xc52
0c31 e5fc | | Load 0x2,-0x4
0c32 6809 |h | Jump_Zero 0xc3c
0c33 e005 | | Load 0x0,0x5
0c34 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c35 4805 |H | Short_Literal 0x5
0c36 00da | | Load_Top At_Offset_2
0c37 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0c38 e007 | | Load 0x0,0x7
0c39 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0c3a e006 | | Load 0x0,0x6
0c3b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c3c e5fb | | Load 0x2,-0x5
0c3d 0092 0caf | | Action Push_String_Extended,0xcaf ; "Library_Extensions Error"
0c3f 4802 |H | Short_Literal 0x2
0c40 0092 0ce5 | | Action Push_String_Extended,0xce5 ; "Can't get referencers for view "
0c42 e5ff | | Load 0x2,-0x1
0c43 e002 | | Load 0x0,0x2
0c44 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c45 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0c46 01cc | | Execute Vector,Catenate
0c47 8215 | | Call 0x1,0x15
0c48 c5fb | | Store 0x2,-0x5
0c49 e404 | | Load 0x2,0x4
0c4a e5fc | | Load 0x2,-0x4
0c4b e402 | | Load 0x2,0x2
0c4c e009 | | Load 0x0,0x9
0c4d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0c4e c404 | | Store 0x2,0x4
0c4f 00cc | | Action Pop_Block
0c50 00cc | | Action Pop_Block
0c51 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0c52 00cf | | Action Mark_Auxiliary
0c53 00d9 | | Load_Top At_Offset_1
0c54 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0c55 4801 |H | Short_Literal 0x1
0c56 0263 | c | Execute Discrete,Above_Bound
0c57 7051 |pQ | Jump_Nonzero 0xca9
0c58 00d8 | | Load_Top At_Offset_0
0c59 e803 | | Load 0x4,0x3
0c5a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c5b 01d7 | | Execute Vector,Field_Read
0c5c c802 | | Store 0x4,0x2
0c5d e5fc | | Load 0x2,-0x4
0c5e 681b |h | Jump_Zero 0xc7a
0c5f e005 | | Load 0x0,0x5
0c60 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c61 480a |H | Short_Literal 0xa
0c62 0092 0ce6 | | Action Push_String_Extended,0xce6 ; ". Referencers ("
0c64 00db | | Load_Top At_Offset_3
0c65 00e0 | | Load_Encached Standard_Cache
0c66 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c67 01cc | | Execute Vector,Catenate
0c68 0092 0ce7 | | Action Push_String_Extended,0xce7 ; ", "
0c6a 01cc | | Execute Vector,Catenate
0c6b e5ff | | Load 0x2,-0x1
0c6c e002 | | Load 0x0,0x2
0c6d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c6e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0c6f 01cc | | Execute Vector,Catenate
0c70 0092 0cb8 | | Action Push_String_Extended,0xcb8 ; ") => "
0c72 01cc | | Execute Vector,Catenate
0c73 e802 | | Load 0x4,0x2
0c74 e002 | | Load 0x0,0x2
0c75 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c76 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0c77 01cc | | Execute Vector,Catenate
0c78 e006 | | Load 0x0,0x6
0c79 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c7a e802 | | Load 0x4,0x2
0c7b e5ff | | Load 0x2,-0x1
0c7c 012f | / | Execute Any,Equal
0c7d 7029 |p) | Jump_Nonzero 0xca7
0c7e e5fb | | Load 0x2,-0x5
0c7f e5fc | | Load 0x2,-0x4
0c80 e402 | | Load 0x2,0x2
0c81 e802 | | Load 0x4,0x2
0c82 e5ff | | Load 0x2,-0x1
0c83 8212 | | Call 0x1,0x12
0c84 c5fb | | Store 0x2,-0x5
0c85 4801 |H | Short_Literal 0x1
0c86 e5fb | | Load 0x2,-0x5
0c87 e007 | | Load 0x0,0x7
0c88 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c89 681d |h | Jump_Zero 0xca7
0c8a e005 | | Load 0x0,0x5
0c8b 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c8c 4806 |H | Short_Literal 0x6
0c8d e5fb | | Load 0x2,-0x5
0c8e e007 | | Load 0x0,0x7
0c8f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0c90 e006 | | Load 0x0,0x6
0c91 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c92 e005 | | Load 0x0,0x5
0c93 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c94 4806 |H | Short_Literal 0x6
0c95 0092 0cf7 | | Action Push_String_Extended,0xcf7 ; "Can't remove remote import "
0c97 e5fe | | Load 0x2,-0x2
0c98 01cc | | Execute Vector,Catenate
0c99 0092 0d1b | | Action Push_String_Extended,0xd1b ; " from "
0c9b 01cc | | Execute Vector,Catenate
0c9c e802 | | Load 0x4,0x2
0c9d e002 | | Load 0x0,0x2
0c9e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c9f 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0ca0 01cc | | Execute Vector,Catenate
0ca1 e006 | | Load 0x0,0x6
0ca2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ca3 e5fb | | Load 0x2,-0x5
0ca4 e007 | | Load 0x0,0x7
0ca5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0ca6 c5fb | | Store 0x2,-0x5
0ca7 00c8 | | Action Pop_Auxiliary_Range
0ca8 3faf |? | Loop_Increasing 0xc58
0ca9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0caa ; --------------------------------------------------------------------------------------
0caa ; STRING TABLE
0caa ; --------------------------------------------------------------------------------------
0caa 00e6 | | .STRTAB 0x00e6->0x0d1d ; "rs6000_aix_vads"
0cab 00f3 | | .STRTAB 0x00f3->0x0d24 ; " not found"
0cac 00fb | | .STRTAB 0x00fb->0x0d29 ; "Add_Remote_Imports (To_View"
0cad 0114 | | .STRTAB 0x0114->0x0d37 ; ")"
0cae 0113 | | .STRTAB 0x0113->0x0d37 ; ". Imported_View => "
0caf 0124 | $ | .STRTAB 0x0124->0x0d41 ; "Library_Extensions Error"
0cb0 013a | : | .STRTAB 0x013a->0x0d4d ; "Can't get object for "
0cb1 014d | M | .STRTAB 0x014d->0x0d57 ; ". Error Status = "
0cb2 015d | ] | .STRTAB 0x015d->0x0d60 ; "Add_Remote_Imports"
0cb3 016d | m | .STRTAB 0x016d->0x0d69 ; "Remove_Remote_Imports (View_To_Remove"
0cb4 0190 | | .STRTAB 0x0190->0x0d7c ; ", From_View"
0cb5 0199 | | .STRTAB 0x0199->0x0d81 ; "Can't get import closure for view "
0cb6 01b9 | | .STRTAB 0x01b9->0x0d92 ; "Can't remove remote import for "
0cb7 01d6 | | .STRTAB 0x01d6->0x0da2 ; ". Imported_Closure ("
0cb8 01e8 | | .STRTAB 0x01e8->0x0dac ; ") => "
0cb9 01eb | | .STRTAB 0x01eb->0x0dae ; "Remove_Remote_Imports"
0cba 01fe | | .STRTAB 0x01fe->0x0db9 ; "/"
0cbb 01fd | | .STRTAB 0x01fd->0x0db9 ; "/ada.lib"
0cbc 0203 | | .STRTAB 0x0203->0x0dbd ; "mkdir -p "
0cbd 020a | | .STRTAB 0x020a->0x0dc2 ; "a.mklib -f "
0cbe 0213 | | .STRTAB 0x0213->0x0dc7 ; "Create_Remote_Directory (Remote_Directory"
0cbf 023a | : | .STRTAB 0x023a->0x0ddc ; ", Remote_Machine"
0cc0 0248 | H | .STRTAB 0x0248->0x0de4 ; "Creating remote directory"
0cc1 025f | _ | .STRTAB 0x025f->0x0df0 ; "Remote_Directory string must begin with a \x22/\x22 character"
0cc2 0294 | | .STRTAB 0x0294->0x0e0c ; "Can't acquire connection to "
0cc3 02ae | | .STRTAB 0x02ae->0x0e1a ; "Create_Remote_Directory"
0cc4 02c3 | | .STRTAB 0x02c3->0x0e25 ; "chmod -R 777 "
0cc5 02ce | | .STRTAB 0x02ce->0x0e2c ; "a.rmlib -f "
0cc6 02d7 | | .STRTAB 0x02d7->0x0e31 ; "rm -f "
0cc7 02db | | .STRTAB 0x02db->0x0e34 ; "/*"
0cc8 02db | | .STRTAB 0x02db->0x0e35 ; "/.options*"
0cc9 02e3 | | .STRTAB 0x02e3->0x0e3a ; "rmdir "
0cca 02e7 | | .STRTAB 0x02e7->0x0e3d ; "Destroy_Remote_Library (Remote_Directory"
0ccb 030d | | .STRTAB 0x030d->0x0e51 ; "Destroying Ada library in remote directory = "
0ccc 0338 | 8 | .STRTAB 0x0338->0x0e68 ; "Destroy_Remote_Library"
0ccd 034c | L | .STRTAB 0x034c->0x0e73 ; "Unhandled exception "
0cce 035e | ^ | .STRTAB 0x035e->0x0e7d ; " caught in "
0ccf 0367 | g | .STRTAB 0x0367->0x0e82 ; " => \x22"
0cd0 036a | j | .STRTAB 0x036a->0x0e85 ; "\x22"
0cd1 0369 | i | .STRTAB 0x0369->0x0e85 ; "cd "
0cd2 036a | j | .STRTAB 0x036a->0x0e87 ; "a.path -L "
0cd3 0372 | r | .STRTAB 0x0372->0x0e8c ; " -i "
0cd4 0374 | t | .STRTAB 0x0374->0x0e8e ; "Do_Import (Remote_Import_Directory"
0cd5 0394 | | .STRTAB 0x0394->0x0e9f ; ", To_View"
0cd6 039b | | .STRTAB 0x039b->0x0ea3 ; "Can't get remote directory name for view "
0cd7 03c2 | | .STRTAB 0x03c2->0x0eb8 ; "Name of remote directory for view "
0cd8 03e2 | | .STRTAB 0x03e2->0x0ec9 ; " is null"
0cd9 03e8 | | .STRTAB 0x03e8->0x0ecd ; "Name of remote library to be imported into view "
0cda 0416 | | .STRTAB 0x0416->0x0ee5 ; "Set_Directory_Command"
0cdb 0429 | ) | .STRTAB 0x0429->0x0eef ; "Can't add import "
0cdc 0438 | 8 | .STRTAB 0x0438->0x0ef8 ; " to nonexistent remote library "
0cdd 0455 | U | .STRTAB 0x0455->0x0f07 ; "Can't tell whether remote Ada library \x22"
0cde 047a | z | .STRTAB 0x047a->0x0f1b ; "\x22 exists"
0cdf 0480 | | .STRTAB 0x0480->0x0f1f ; "Can't import nonexistent remote library "
0ce0 04a6 | | .STRTAB 0x04a6->0x0f33 ; " into library "
0ce1 04b2 | | .STRTAB 0x04b2->0x0f3a ; "Add_Import_Command"
0ce2 04c2 | | .STRTAB 0x04c2->0x0f43 ; " to remote library "
0ce3 04d3 | | .STRTAB 0x04d3->0x0f4c ; "Do_Import"
0ce4 04da | | .STRTAB 0x04da->0x0f51 ; "Refresh_Referencers (To_View"
0ce5 04f4 | | .STRTAB 0x04f4->0x0f5f ; "Can't get referencers for view "
0ce6 0511 | | .STRTAB 0x0511->0x0f6e ; ". Referencers ("
0ce7 051e | | .STRTAB 0x051e->0x0f76 ; ", "
0ce8 051e | | .STRTAB 0x051e->0x0f77 ; "Can't add remote import for "
0ce9 0538 | 8 | .STRTAB 0x0538->0x0f85 ; "Add_Remote_Import (Imported_View"
0cea 0556 | V | .STRTAB 0x0556->0x0f95 ; "Can't get remote directory name for imported view "
0ceb 0586 | | .STRTAB 0x0586->0x0fae ; " -r "
0cec 0588 | | .STRTAB 0x0588->0x0fb0 ; "Remove_Remote_Import (View_To_Remove"
0ced 05aa | | .STRTAB 0x05aa->0x0fc2 ; "Remote directory name for view "
0cee 05c7 | | .STRTAB 0x05c7->0x0fd1 ; "Insufficient remote library information"
0cef 05ec | | .STRTAB 0x05ec->0x0fe5 ; "Remote directory name for imported view "
0cf0 0612 | | .STRTAB 0x0612->0x0ff9 ; "Can't tell whether remote directory \x22"
0cf1 0635 | 5 | .STRTAB 0x0635->0x100b ; "\x22 exists, so can't remove its import"
0cf2 0657 | W | .STRTAB 0x0657->0x101d ; "Remote directory \x22"
0cf3 0667 | g | .STRTAB 0x0667->0x1026 ; "\x22 doesn't exist for view "
0cf4 067e | ~ | .STRTAB 0x067e->0x1033 ; ", so we can't remove its import"
0cf5 069b | | .STRTAB 0x069b->0x1042 ; "Remove_Import_Command"
0cf6 06ae | | .STRTAB 0x06ae->0x104d ; ", View_To_Remove"
0cf7 06bc | | .STRTAB 0x06bc->0x1055 ; "Can't remove remote import "
0cf8 06d5 | | .STRTAB 0x06d5->0x1062 ; " from view "
0cf9 06de | | .STRTAB 0x06de->0x1068 ; "Remove_All_Remote_Imports (View_To_Remove"
0cfa 0705 | | .STRTAB 0x0705->0x107c ; "Remote library for "
0cfb 0716 | | .STRTAB 0x0716->0x1086 ; " isn't on search list for "
0cfc 072e | . | .STRTAB 0x072e->0x1093 ; ". Import_Closure ("
0cfd 073e | > | .STRTAB 0x073e->0x109c ; "Can't tell whether Ada library \x22"
0cfe 075c | \ | .STRTAB 0x075c->0x10ac ; "\x22 exists on machine \x22"
0cff 076f | o | .STRTAB 0x076f->0x10b6 ; "An Ada library already exists in remote directory \x22"
0d00 07a0 | | .STRTAB 0x07a0->0x10d0 ; "Can't tell whether directory \x22"
0d01 07bc | | .STRTAB 0x07bc->0x10df ; "Directory \x22"
0d02 07c5 | | .STRTAB 0x07c5->0x10e4 ; "\x22 already exists"
0d03 07d3 | | .STRTAB 0x07d3->0x10ec ; "Using an existing directory"
0d04 07ec | | .STRTAB 0x07ec->0x10fa ; "Creating the new remote directory \x22"
0d05 080d | | .STRTAB 0x080d->0x110b ; "Create_Dir_Command"
0d06 081d | | .STRTAB 0x081d->0x1114 ; "Can't create remote directory \x22"
0d07 083a | : | .STRTAB 0x083a->0x1124 ; "Create_Ada_Lib_Command"
0d08 084e | N | .STRTAB 0x084e->0x112f ; "Can't create an Ada library in remote directory \x22"
0d09 087d | } | .STRTAB 0x087d->0x1147 ; "Can't tell whether Ada library exists in directory \x22"
0d0a 08af | | .STRTAB 0x08af->0x1161 ; "\x22 on machine \x22"
0d0b 08bb | | .STRTAB 0x08bb->0x1168 ; "There is no remote Ada library in directory \x22"
0d0c 08e6 | | .STRTAB 0x08e6->0x117f ; "\x22 on machine "
0d0d 08f1 | | .STRTAB 0x08f1->0x1185 ; "Can't destroy remote library"
0d0e 090b | | .STRTAB 0x090b->0x1193 ; "Executing command"
0d0f 091a | | .STRTAB 0x091a->0x119c ; "Can't unprotect "
0d10 0928 | ( | .STRTAB 0x0928->0x11a4 ; "Can't destroy the remote Ada library "
0d11 094b | K | .STRTAB 0x094b->0x11b6 ; "Can't destroy the files in remote directory "
0d12 0975 | u | .STRTAB 0x0975->0x11cc ; "Can't destroy the '.options' file in remote directory "
0d13 09a9 | | .STRTAB 0x09a9->0x11e7 ; "Can't destroy the remote directory "
0d14 09ca | | .STRTAB 0x09ca->0x11f9 ; "a.path>a.path_temp;egrep -s "
0d15 09e4 | | .STRTAB 0x09e4->0x1207 ; " a.path_temp"
0d16 09ee | | .STRTAB 0x09ee->0x120d ; "Import_Exists (Remote_View"
0d17 0a06 | | .STRTAB 0x0a06->0x121a ; "Import_Exists_Command"
0d18 0a19 | | .STRTAB 0x0a19->0x1224 ; "View \x22"
0d19 0a1d | | .STRTAB 0x0a1d->0x1227 ; "\x22 has not yet been imported"
0d1a 0a36 | 6 | .STRTAB 0x0a36->0x1235 ; "\x22 was previously imported"
0d1b 0a4d | M | .STRTAB 0x0a4d->0x1241 ; " from "
0d1c 0a51 | Q | .STREND 0x0a51->0x1244
0d1d 7273 3630 |rs60| .STRTAB_STRINGS
1245 0000 0000 | | .XXX[0x3]
1247 0000 | |
1248 ; --------------------------------------------------------------------------------------
1248 ; Debug Table
1248 ; --------------------------------------------------------------------------------------
1248 0004 0009 | | .DEBUG4 0x0004,0x0009,0x9254,0x0000,0x0001,0x0019
124e 000b 12b2 | | .DBG4T 0x000b,0x12b2,0x8000,0x8000
1252 0020 12c8 | | .DBG4T 0x0020,0x12c8,0x8000,0x8000
1256 004b 12f0 | K | .DBG4T 0x004b,0x12f0,0x0002,0x0000
125a 0083 12fe | | .DBG4T 0x0083,0x12fe,0x0002,0x0000
125e 00bb 1307 | | .DBG4T 0x00bb,0x1307,0x0002,0x0000
1262 00eb 130f | | .DBG4T 0x00eb,0x130f,0x0002,0x0000
1266 00f3 1312 | | .DBG4T 0x00f3,0x1312,0x0001,0x4000
126a 01b3 1347 | G| .DBG4T 0x01b3,0x1347,0x0001,0x0000
126e 0263 1361 | c a| .DBG4T 0x0263,0x1361,0x0001,0x0000
1272 02f3 1379 | y| .DBG4T 0x02f3,0x1379,0x0001,0x0000
1276 0383 138f | | .DBG4T 0x0383,0x138f,0x0001,0x0000
127a 0393 1392 | | .DBG4T 0x0393,0x1392,0x0001,0x0000
127e 03ab 1395 | | .DBG4T 0x03ab,0x1395,0x0002,0x0000
1282 03bb 1398 | | .DBG4T 0x03bb,0x1398,0x0002,0x0000
1286 03db 139c | | .DBG4T 0x03db,0x139c,0x0001,0x0000
128a 0513 13d0 | | .DBG4T 0x0513,0x13d0,0x0001,0x0000
128e 05c3 13ed | | .DBG4T 0x05c3,0x13ed,0x0001,0x0000
1292 06b3 1411 | | .DBG4T 0x06b3,0x1411,0x0001,0x0000
1296 07d3 1440 | @| .DBG4T 0x07d3,0x1440,0x0001,0x0000
129a 0803 1449 | I| .DBG4T 0x0803,0x1449,0x0001,0x0000
129e 08d3 1464 | d| .DBG4T 0x08d3,0x1464,0x0004,0x0000
12a2 094b 1475 | K u| .DBG4T 0x094b,0x1475,0x0004,0x0000
12a6 0a63 149f | c | .DBG4T 0x0a63,0x149f,0x0004,0x0000
12aa 0bbb 14d3 | | .DBG4T 0x0bbb,0x14d3,0x0001,0x0000
12ae 0c23 14e4 | # | .DBG4T 0x0c23,0x14e4,0x0004,0x0000
12b2 ; --------------------------------------------------------------------------------------
12b2 ; Debug chain
12b2 ; --------------------------------------------------------------------------------------
12b2 000a 0000 | | .DBGLEN 0x000a,0x0000
12b4 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d
12be 0003 0004 | | .XXX[0xa]
12c0 0005 0006 | |
12c2 0007 0008 | |
12c4 0009 000a | |
12c6 000b 000c | |
12c8 ; --------------------------------------------------------------------------------------
12c8 ; Debug chain
12c8 ; --------------------------------------------------------------------------------------
12c8 0013 0000 | | .DBGLEN 0x0013,0x0000
12ca 0020 0022 | "| .DBGLNO 0x0020,0x0022,0x0024,0x0026,0x0028,0x002a,0x002c,0x002e,0x0030,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040,0x0042,0x0044
12dd 0005 0009 | | .XXX[0x13]
12df 000a 000b | |
12e1 000c 000d | |
12e3 000e 000f | |
12e5 0010 0011 | |
12e7 0012 0013 | |
12e9 0014 0015 | |
12eb 0016 0017 | |
12ed 0018 0019 | |
12ef 001a | |
12f0 ; --------------------------------------------------------------------------------------
12f0 ; Debug chain
12f0 ; --------------------------------------------------------------------------------------
12f0 0003 0009 | | .DBGLEN 0x0003,0x0009
12f2 004b 0050 | K P| .DBGLNO 0x004b,0x0050,0x0052,0x0058,0x005b,0x005d,0x006d,0x006f,0x0072,0x0077,0x007a,0x007c
12fe ; --------------------------------------------------------------------------------------
12fe ; Debug chain
12fe ; --------------------------------------------------------------------------------------
12fe 0002 0005 | | .DBGLEN 0x0002,0x0005
1300 0083 0088 | | .DBGLNO 0x0083,0x0088,0x008b,0x00a3,0x00a5,0x00ae,0x00b1
1307 ; --------------------------------------------------------------------------------------
1307 ; Debug chain
1307 ; --------------------------------------------------------------------------------------
1307 0002 0004 | | .DBGLEN 0x0002,0x0004
1309 00bb 00c0 | | .DBGLNO 0x00bb,0x00c0,0x00c3,0x00db,0x00dd,0x00e0
130f ; --------------------------------------------------------------------------------------
130f ; Debug chain
130f ; --------------------------------------------------------------------------------------
130f 0000 0001 | | .DBGLEN 0x0000,0x0001
1311 00eb | | .DBGLNO 0x00eb
1312 ; --------------------------------------------------------------------------------------
1312 ; Debug chain
1312 ; --------------------------------------------------------------------------------------
1312 0003 0018 | | .DBGLEN 0x0003,0x0018
1314 00f3 00f9 | | .DBGLNO 0x00f3,0x00f9,0x00fb,0x0102,0x0104,0x0116,0x0122,0x0128,0x012e,0x0133,0x0139,0x013e,0x0146,0x014c,0x015b,0x015d,0x0173,0x0174,0x0176,0x0182,0x0189,0x018e,0x0196,0x019a,0x019b,0x01a1,0x01a8
132f 0001 0002 | | .XXX[0x18]
1331 0004 0005 | |
1333 0003 0006 | |
1335 0007 0008 | |
1337 0009 000a | |
1339 000c 000d | |
133b 000e 000f | |
133d 0010 0011 | |
133f 0012 0013 | |
1341 0014 0015 | |
1343 0016 0017 | |
1345 000b 0018 | |
1347 ; --------------------------------------------------------------------------------------
1347 ; Debug chain
1347 ; --------------------------------------------------------------------------------------
1347 0003 0015 | | .DBGLEN 0x0003,0x0015
1349 01b3 01b7 | | .DBGLNO 0x01b3,0x01b7,0x01bc,0x01bf,0x01c1,0x01d7,0x01dd,0x01e6,0x01f0,0x01f1,0x01f8,0x01fd,0x0205,0x020f,0x0211,0x0216,0x021b,0x021d,0x0230,0x0238,0x023f,0x0244,0x024c,0x0254
1361 ; --------------------------------------------------------------------------------------
1361 ; Debug chain
1361 ; --------------------------------------------------------------------------------------
1361 0008 000e | | .DBGLEN 0x0008,0x000e
1363 0263 0268 | c h| .DBGLNO 0x0263,0x0268,0x026d,0x026f,0x0271,0x0273,0x0278,0x027d,0x0285,0x0287,0x029a,0x02a4,0x02ab,0x02b3,0x02b4,0x02c7,0x02cc,0x02ce,0x02d6,0x02e1,0x02e2,0x02ea
1379 ; --------------------------------------------------------------------------------------
1379 ; Debug chain
1379 ; --------------------------------------------------------------------------------------
1379 0009 000b | | .DBGLEN 0x0009,0x000b
137b 02f3 02f8 | | .DBGLNO 0x02f3,0x02f8,0x02fa,0x02ff,0x0304,0x0309,0x0310,0x0318,0x0320,0x0326,0x0328,0x033b,0x0344,0x0357,0x035c,0x035e,0x0366,0x0371,0x0372,0x037a
138f ; --------------------------------------------------------------------------------------
138f ; Debug chain
138f ; --------------------------------------------------------------------------------------
138f 0000 0001 | | .DBGLEN 0x0000,0x0001
1391 0383 | | .DBGLNO 0x0383
1392 ; --------------------------------------------------------------------------------------
1392 ; Debug chain
1392 ; --------------------------------------------------------------------------------------
1392 0000 0001 | | .DBGLEN 0x0000,0x0001
1394 0393 | | .DBGLNO 0x0393
1395 ; --------------------------------------------------------------------------------------
1395 ; Debug chain
1395 ; --------------------------------------------------------------------------------------
1395 0000 0001 | | .DBGLEN 0x0000,0x0001
1397 03ab | | .DBGLNO 0x03ab
1398 ; --------------------------------------------------------------------------------------
1398 ; Debug chain
1398 ; --------------------------------------------------------------------------------------
1398 0001 0001 | | .DBGLEN 0x0001,0x0001
139a 03bb 03c1 | | .DBGLNO 0x03bb,0x03c1
139c ; --------------------------------------------------------------------------------------
139c ; Debug chain
139c ; --------------------------------------------------------------------------------------
139c 0008 002a | *| .DBGLEN 0x0008,0x002a
139e 03db 03df | | .DBGLNO 0x03db,0x03df,0x03e4,0x03e7,0x03ec,0x03f1,0x03fa,0x03fb,0x03fd,0x03ff,0x0412,0x0418,0x041a,0x0423,0x042d,0x042e,0x0434,0x0440,0x0441,0x0447,0x0453,0x0454,0x0456,0x0460,0x046b,0x0470,0x0472,0x047a,0x0488,0x048c,0x048d,0x0496,0x049b,0x049d,0x04a5,0x04b1,0x04b5,0x04b6,0x04b8,0x04c6,0x04c7,0x04cb,0x04cd,0x04cf,0x04d9,0x04e4,0x04e9,0x04eb,0x04f3,0x0504
13d0 ; --------------------------------------------------------------------------------------
13d0 ; Debug chain
13d0 ; --------------------------------------------------------------------------------------
13d0 0005 0016 | | .DBGLEN 0x0005,0x0016
13d2 0513 0517 | | .DBGLNO 0x0513,0x0517,0x051c,0x051f,0x0524,0x0527,0x0529,0x0536,0x053c,0x053e,0x0547,0x0551,0x0552,0x0558,0x055a,0x0563,0x056d,0x056f,0x0574,0x0579,0x057b,0x0593,0x0597,0x059e,0x05a3,0x05ab,0x05b7
13ed ; --------------------------------------------------------------------------------------
13ed ; Debug chain
13ed ; --------------------------------------------------------------------------------------
13ed 0005 001d | | .DBGLEN 0x0005,0x001d
13ef 05c3 05c7 | | .DBGLNO 0x05c3,0x05c7,0x05cc,0x05cf,0x05d4,0x05d7,0x05d9,0x05ef,0x05f5,0x05f7,0x0600,0x060a,0x060b,0x0611,0x0613,0x061c,0x0629,0x062a,0x062e,0x062f,0x0636,0x063b,0x0643,0x064f,0x0654,0x0659,0x065e,0x0660,0x067b,0x0683,0x068a,0x068f,0x0697,0x06a3
1411 ; --------------------------------------------------------------------------------------
1411 ; Debug chain
1411 ; --------------------------------------------------------------------------------------
1411 0009 0024 | $| .DBGLEN 0x0009,0x0024
1413 06b3 06b7 | | .DBGLNO 0x06b3,0x06b7,0x06bc,0x06bf,0x06c0,0x06c4,0x06c9,0x06cc,0x06d1,0x06da,0x06dc,0x06ef,0x06f5,0x06f7,0x0700,0x070a,0x070b,0x0711,0x0713,0x071c,0x0726,0x0727,0x072a,0x0736,0x073e,0x073f,0x0742,0x074e,0x0756,0x0757,0x0760,0x0765,0x0767,0x076f,0x077c,0x077d,0x077f,0x0790,0x0791,0x0793,0x07a3,0x07ae,0x07b3,0x07b5,0x07bd
1440 ; --------------------------------------------------------------------------------------
1440 ; Debug chain
1440 ; --------------------------------------------------------------------------------------
1440 0001 0006 | | .DBGLEN 0x0001,0x0006
1442 07d3 07d6 | | .DBGLNO 0x07d3,0x07d6,0x07dc,0x07e5,0x07f2,0x07f3,0x07f7
1449 ; --------------------------------------------------------------------------------------
1449 ; Debug chain
1449 ; --------------------------------------------------------------------------------------
1449 0003 0016 | | .DBGLEN 0x0003,0x0016
144b 0803 0807 | | .DBGLNO 0x0803,0x0807,0x080c,0x080f,0x0811,0x0827,0x082d,0x082f,0x0838,0x0845,0x0846,0x084d,0x0852,0x085a,0x086b,0x0870,0x0875,0x087a,0x087c,0x0897,0x089f,0x08a6,0x08ab,0x08b3,0x08c4
1464 ; --------------------------------------------------------------------------------------
1464 ; Debug chain
1464 ; --------------------------------------------------------------------------------------
1464 0002 000d | | .DBGLEN 0x0002,0x000d
1466 08d3 08d8 | | .DBGLNO 0x08d3,0x08d8,0x08db,0x08e1,0x08ea,0x08f7,0x08fa,0x08ff,0x0904,0x0906,0x0921,0x0929,0x0930,0x0935,0x093d
1475 ; --------------------------------------------------------------------------------------
1475 ; Debug chain
1475 ; --------------------------------------------------------------------------------------
1475 0000 0028 | (| .DBGLEN 0x0000,0x0028
1477 094b 0954 | K T| .DBGLNO 0x094b,0x0954,0x0959,0x095b,0x0963,0x0975,0x097b,0x097d,0x097f,0x098b,0x0991,0x0993,0x099c,0x09a1,0x09a3,0x09ab,0x09bd,0x09c3,0x09c5,0x09c7,0x09d3,0x09db,0x09e7,0x09e9,0x09f3,0x09fe,0x0a03,0x0a05,0x0a0d,0x0a1a,0x0a20,0x0a22,0x0a24,0x0a2e,0x0a39,0x0a3e,0x0a40,0x0a48,0x0a57,0x0a5d
149f ; --------------------------------------------------------------------------------------
149f ; Debug chain
149f ; --------------------------------------------------------------------------------------
149f 0000 0032 | 2| .DBGLEN 0x0000,0x0032
14a1 0a65 0a6e | e n| .DBGLNO 0x0a65,0x0a6e,0x0a73,0x0a75,0x0a7d,0x0a8f,0x0a95,0x0a97,0x0a99,0x0aa7,0x0aaf,0x0ab5,0x0ab7,0x0ab8,0x0aba,0x0ac4,0x0acf,0x0ad4,0x0ad6,0x0ade,0x0ae9,0x0aeb,0x0af5,0x0b00,0x0b05,0x0b07,0x0b0f,0x0b1a,0x0b1c,0x0b26,0x0b31,0x0b36,0x0b38,0x0b40,0x0b4b,0x0b4d,0x0b57,0x0b62,0x0b67,0x0b69,0x0b71,0x0b7c,0x0b7e,0x0b88,0x0b93,0x0b98,0x0b9a,0x0ba2,0x0bae,0x0bb4
14d3 ; --------------------------------------------------------------------------------------
14d3 ; Debug chain
14d3 ; --------------------------------------------------------------------------------------
14d3 0002 000d | | .DBGLEN 0x0002,0x000d
14d5 0bbb 0bc0 | | .DBGLNO 0x0bbb,0x0bc0,0x0bca,0x0bcc,0x0bd9,0x0bdb,0x0bdd,0x0be7,0x0bf2,0x0bf7,0x0bf9,0x0c01,0x0c0e,0x0c10,0x0c1c
14e4 ; --------------------------------------------------------------------------------------
14e4 ; Debug chain
14e4 ; --------------------------------------------------------------------------------------
14e4 0002 0010 | | .DBGLEN 0x0002,0x0010
14e6 0c23 0c28 | # (| .DBGLNO 0x0c23,0x0c28,0x0c2b,0x0c31,0x0c33,0x0c3c,0x0c49,0x0c4f,0x0c53,0x0c58,0x0c5d,0x0c5f,0x0c7a,0x0c7e,0x0c85,0x0c8a,0x0c92,0x0ca3
14f8 0000 0000 | | .BLANK 0000[0x108]