|
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_1614eb
└─⟦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 1290 | | .CONST 0x1290 ; 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 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Visible,Unelaborated 001b 029a 039b | | Declare_Subprogram INIT_0398,For_Outer_Call,Visible,Unelaborated 001d 029a 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call,Visible,Unelaborated 001f 00bf | | Action Accept_Activation 0020 0092 0cda | | Action Push_String_Extended,0xcda ; "mc68k_bare_vads" 0022 029d 03c3 | | Declare_Subprogram INIT_03c0,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 03d3 | | Declare_Subprogram INIT_03d0,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 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call 0034 029d 052b | +| Declare_Subprogram INIT_0528,For_Outer_Call 0036 029d 05db | | Declare_Subprogram INIT_05d8,For_Outer_Call 0038 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0039 00c7 | | Action Elaborate_Subprogram 003a 029d 06cb | | Declare_Subprogram INIT_06c8,For_Outer_Call 003c 029d 07eb | | Declare_Subprogram INIT_07e8,For_Outer_Call 003e 029d 081b | | Declare_Subprogram INIT_0818,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 0cdb | | Action Push_String_Extended,0xcdb ; " 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 08eb | | Declare_Subprogram INIT_08e8,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 0cdc | | Action Push_String_Extended,0xcdc ; "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 0cdd | | Action Push_String_Extended,0xcdd ; ")" 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 0cde | | Action Push_String_Extended,0xcde ; ". 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 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0160 4802 |H | Short_Literal 0x2 0161 0092 0ce0 | | Action Push_String_Extended,0xce0 ; "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 0ce1 | | Action Push_String_Extended,0xce1 ; ". 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 0cde | | Action Push_String_Extended,0xcde ; ". 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 0ce2 | | Action Push_String_Extended,0xce2 ; "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 0ce3 | | Action Push_String_Extended,0xce3 ; "Remove_Remote_Imports (View_To_Remove" 01c6 e402 | | Load 0x2,0x2 01c7 8218 | | Call 0x1,0x18 01c8 01cc | | Execute Vector,Catenate 01c9 0092 0ce4 | | Action Push_String_Extended,0xce4 ; ", 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 0cdd | | Action Push_String_Extended,0xcdd ; ")" 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 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 01e9 4802 |H | Short_Literal 0x2 01ea 0092 0ce5 | | Action Push_String_Extended,0xce5 ; "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 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0208 4802 |H | Short_Literal 0x2 0209 0092 0ce6 | | Action Push_String_Extended,0xce6 ; "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 0ce7 | | Action Push_String_Extended,0xce7 ; ". 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 0ce8 | | Action Push_String_Extended,0xce8 ; ") => " 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 0ce9 | | Action Push_String_Extended,0xce9 ; "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 0297 | | .CONST 0x0297 ; Address of begin 0261 02fb | | .CONST 0x02fb ; 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 0cea | | Action Push_String_Extended,0xcea ; "/" 0273 e5ff | | Load 0x2,-0x1 0274 0092 0ceb | | Action Push_String_Extended,0xceb ; "/ada.lib" 0276 01cc | | Execute Vector,Catenate 0277 0007 | | Action Break_Optional 0278 0092 0cec | | Action Push_String_Extended,0xcec ; "mkdir -p " 027a e5ff | | Load 0x2,-0x1 027b 01cc | | Execute Vector,Catenate 027c 0007 | | Action Break_Optional 027d e00a | | Load 0x0,0xa 027e 0092 0ced | | Action Push_String_Extended,0xced ; "a.mklib -t " 0280 01cc | | Execute Vector,Catenate 0281 e00b | | Load 0x0,0xb 0282 01cc | | Execute Vector,Catenate 0283 0092 0cee | | Action Push_String_Extended,0xcee ; " -f " 0285 01cc | | Execute Vector,Catenate 0286 e5ff | | Load 0x2,-0x1 0287 01cc | | Execute Vector,Catenate 0288 0092 0cef | | Action Push_String_Extended,0xcef ; "; cd " 028a 01cc | | Execute Vector,Catenate 028b e5ff | | Load 0x2,-0x1 028c 01cc | | Execute Vector,Catenate 028d 0092 0cf0 | | Action Push_String_Extended,0xcf0 ; "; " 028f 01cc | | Execute Vector,Catenate 0290 e00c | | Load 0x0,0xc 0291 01cc | | Execute Vector,Catenate 0292 0092 0cf1 | | Action Push_String_Extended,0xcf1 ; "; cd .." 0294 01cc | | Execute Vector,Catenate 0295 029f 0963 | c| Declare_Subprogram INIT_0960,For_Call 0297 BODY_0260: 0297 e5fd | | Load 0x2,-0x3 0298 6813 |h | Jump_Zero 0x2ac 0299 e005 | | Load 0x0,0x5 029a 180e | | Execute Package,Field_Execute,Field_Number 0xe 029b 4809 |H | Short_Literal 0x9 029c 0092 0cf2 | | Action Push_String_Extended,0xcf2 ; "Create_Remote_Directory (Remote_Directory" 029e e5ff | | Load 0x2,-0x1 029f 8218 | | Call 0x1,0x18 02a0 01cc | | Execute Vector,Catenate 02a1 0092 0cf3 | | Action Push_String_Extended,0xcf3 ; ", Remote_Machine" 02a3 01cc | | Execute Vector,Catenate 02a4 e5fe | | Load 0x2,-0x2 02a5 8218 | | Call 0x1,0x18 02a6 01cc | | Execute Vector,Catenate 02a7 0092 0cdd | | Action Push_String_Extended,0xcdd ; ")" 02a9 01cc | | Execute Vector,Catenate 02aa e006 | | Load 0x0,0x6 02ab 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02ac e005 | | Load 0x0,0x5 02ad 180e | | Execute Package,Field_Execute,Field_Number 0xe 02ae 4801 |H | Short_Literal 0x1 02af 0092 0cf4 | | Action Push_String_Extended,0xcf4 ; "Creating remote directory" 02b1 e5ff | | Load 0x2,-0x1 02b2 8218 | | Call 0x1,0x18 02b3 01cc | | Execute Vector,Catenate 02b4 e006 | | Load 0x0,0x6 02b5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02b6 4801 |H | Short_Literal 0x1 02b7 e5ff | | Load 0x2,-0x1 02b8 e406 | | Load 0x2,0x6 02b9 e00d | | Load 0x0,0xd 02ba 181d | | Execute Package,Field_Execute,Field_Number 0x1d 02bb 0e01 | | Execute_Immediate Not_Equal,0x1 02bc 6809 |h | Jump_Zero 0x2c6 02bd e5fc | | Load 0x2,-0x4 02be 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 02c0 4802 |H | Short_Literal 0x2 02c1 0092 0cf5 | | Action Push_String_Extended,0xcf5 ; "Remote_Directory string must begin with a \x22/\x22 character" 02c3 8215 | | Call 0x1,0x15 02c4 c5fc | | Store 0x2,-0x4 02c5 4504 |E | Exit_Suprogram New_Top_Offset 0x4 02c6 e5fc | | Load 0x2,-0x4 02c7 e402 | | Load 0x2,0x2 02c8 0120 | | Execute Any,Is_Value 02c9 6803 |h | Jump_Zero 0x2cd 02ca e009 | | Load 0x0,0x9 02cb 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02cc 7801 |x | Jump 0x2ce 02cd e402 | | Load 0x2,0x2 02ce e5fd | | Load 0x2,-0x3 02cf e00e | | Load 0x0,0xe 02d0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02d1 e00e | | Load 0x0,0xe 02d2 1812 | | Execute Package,Field_Execute,Field_Number 0x12 02d3 e5fe | | Load 0x2,-0x2 02d4 e217 | | Load 0x1,0x17 02d5 e009 | | Load 0x0,0x9 02d6 180f | | Execute Package,Field_Execute,Field_Number 0xf 02d7 c402 | | Store 0x2,0x2 02d8 c5fc | | Store 0x2,-0x4 02d9 4801 |H | Short_Literal 0x1 02da e5fc | | Load 0x2,-0x4 02db e007 | | Load 0x0,0x7 02dc 1817 | | Execute Package,Field_Execute,Field_Number 0x17 02dd 6815 |h | Jump_Zero 0x2f3 02de e5fd | | Load 0x2,-0x3 02df 6808 |h | Jump_Zero 0x2e8 02e0 e005 | | Load 0x0,0x5 02e1 180e | | Execute Package,Field_Execute,Field_Number 0xe 02e2 4805 |H | Short_Literal 0x5 02e3 e5fc | | Load 0x2,-0x4 02e4 e007 | | Load 0x0,0x7 02e5 1819 | | Execute Package,Field_Execute,Field_Number 0x19 02e6 e006 | | Load 0x0,0x6 02e7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02e8 e5fc | | Load 0x2,-0x4 02e9 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 02eb 4802 |H | Short_Literal 0x2 02ec 0092 0cf6 | | Action Push_String_Extended,0xcf6 ; "Can't acquire connection to " 02ee e5fe | | Load 0x2,-0x2 02ef 01cc | | Execute Vector,Catenate 02f0 8215 | | Call 0x1,0x15 02f1 c5fc | | Store 0x2,-0x4 02f2 7801 |x | Jump 0x2f4 02f3 840a | | Call 0x2,0xa 02f4 e403 | | Load 0x2,0x3 02f5 e5fd | | Load 0x2,-0x3 02f6 e402 | | Load 0x2,0x2 02f7 e009 | | Load 0x0,0x9 02f8 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02f9 c403 | | Store 0x2,0x3 02fa 4504 |E | Exit_Suprogram New_Top_Offset 0x4 02fb TRAP_0260: 02fb 0007 | | Action Break_Optional 02fc e5fc | | Load 0x2,-0x4 02fd 0092 0cf7 | | Action Push_String_Extended,0xcf7 ; "Create_Remote_Directory" 02ff 8216 | | Call 0x1,0x16 0300 c5fc | | Store 0x2,-0x4 0301 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0302 0000 0000 | | .BLANK 0000[0x6] 0308 ; -------------------------------------------------------------------------------------- 0308 ; SUBPROGRAM 0308 ; -------------------------------------------------------------------------------------- 0308 033e | > | .CONST 0x033e ; Address of begin 0309 0391 | | .CONST 0x0391 ; Address of exception handler 030a 000b | | .CONST 0x000b ; Number of locals 030b INIT_0308: 030b e009 | | Load 0x0,0x9 030c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 030d 02c7 | | Declare_Variable Any 030e 00d8 | | Load_Top At_Offset_0 030f 1c00 | | Execute_Immediate Run_Utility,0x0 0310 00e1 | | Load_Encached Boolean_Cache 0311 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0312 e007 | | Load 0x0,0x7 0313 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0314 02c7 | | Declare_Variable Any 0315 00d8 | | Load_Top At_Offset_0 0316 1c00 | | Execute_Immediate Run_Utility,0x0 0317 e5fe | | Load 0x2,-0x2 0318 0092 0ceb | | Action Push_String_Extended,0xceb ; "/ada.lib" 031a 01cc | | Execute Vector,Catenate 031b 0007 | | Action Break_Optional 031c 0092 0cf8 | | Action Push_String_Extended,0xcf8 ; "chmod -R 777 " 031e e5fe | | Load 0x2,-0x2 031f 01cc | | Execute Vector,Catenate 0320 0007 | | Action Break_Optional 0321 e00a | | Load 0x0,0xa 0322 0092 0cf9 | | Action Push_String_Extended,0xcf9 ; "a.rmlib -f " 0324 01cc | | Execute Vector,Catenate 0325 e5fe | | Load 0x2,-0x2 0326 01cc | | Execute Vector,Catenate 0327 0007 | | Action Break_Optional 0328 0092 0cfa | | Action Push_String_Extended,0xcfa ; "rm -f " 032a e5fe | | Load 0x2,-0x2 032b 01cc | | Execute Vector,Catenate 032c 0092 0cfb | | Action Push_String_Extended,0xcfb ; "/*" 032e 01cc | | Execute Vector,Catenate 032f 0007 | | Action Break_Optional 0330 0092 0cfa | | Action Push_String_Extended,0xcfa ; "rm -f " 0332 e5fe | | Load 0x2,-0x2 0333 01cc | | Execute Vector,Catenate 0334 0092 0cfc | | Action Push_String_Extended,0xcfc ; "/.options*" 0336 01cc | | Execute Vector,Catenate 0337 0007 | | Action Break_Optional 0338 0092 0cfd | | Action Push_String_Extended,0xcfd ; "rmdir " 033a e5fe | | Load 0x2,-0x2 033b 01cc | | Execute Vector,Catenate 033c 029f 0a93 | | Declare_Subprogram INIT_0a90,For_Call 033e BODY_0308: 033e e5fc | | Load 0x2,-0x4 033f 6813 |h | Jump_Zero 0x353 0340 e005 | | Load 0x0,0x5 0341 180e | | Execute Package,Field_Execute,Field_Number 0xe 0342 4809 |H | Short_Literal 0x9 0343 0092 0cfe | | Action Push_String_Extended,0xcfe ; "Destroy_Remote_Library (Remote_Directory" 0345 e5fe | | Load 0x2,-0x2 0346 8218 | | Call 0x1,0x18 0347 01cc | | Execute Vector,Catenate 0348 0092 0cf3 | | Action Push_String_Extended,0xcf3 ; ", Remote_Machine" 034a 01cc | | Execute Vector,Catenate 034b e5fd | | Load 0x2,-0x3 034c 8218 | | Call 0x1,0x18 034d 01cc | | Execute Vector,Catenate 034e 0092 0cdd | | Action Push_String_Extended,0xcdd ; ")" 0350 01cc | | Execute Vector,Catenate 0351 e006 | | Load 0x0,0x6 0352 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0353 e005 | | Load 0x0,0x5 0354 180e | | Execute Package,Field_Execute,Field_Number 0xe 0355 4801 |H | Short_Literal 0x1 0356 0092 0cff | | Action Push_String_Extended,0xcff ; "Destroying Ada library in remote directory = " 0358 e5fe | | Load 0x2,-0x2 0359 01cc | | Execute Vector,Catenate 035a e006 | | Load 0x0,0x6 035b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 035c e5fb | | Load 0x2,-0x5 035d e402 | | Load 0x2,0x2 035e 0120 | | Execute Any,Is_Value 035f 6803 |h | Jump_Zero 0x363 0360 e009 | | Load 0x0,0x9 0361 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0362 7801 |x | Jump 0x364 0363 e402 | | Load 0x2,0x2 0364 e5fc | | Load 0x2,-0x4 0365 e00e | | Load 0x0,0xe 0366 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0367 e00e | | Load 0x0,0xe 0368 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0369 e5fd | | Load 0x2,-0x3 036a e217 | | Load 0x1,0x17 036b e009 | | Load 0x0,0x9 036c 180f | | Execute Package,Field_Execute,Field_Number 0xf 036d c402 | | Store 0x2,0x2 036e c5fb | | Store 0x2,-0x5 036f 4801 |H | Short_Literal 0x1 0370 e5fb | | Load 0x2,-0x5 0371 e007 | | Load 0x0,0x7 0372 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0373 6815 |h | Jump_Zero 0x389 0374 e5fc | | Load 0x2,-0x4 0375 6808 |h | Jump_Zero 0x37e 0376 e005 | | Load 0x0,0x5 0377 180e | | Execute Package,Field_Execute,Field_Number 0xe 0378 4805 |H | Short_Literal 0x5 0379 e5fb | | Load 0x2,-0x5 037a e007 | | Load 0x0,0x7 037b 1819 | | Execute Package,Field_Execute,Field_Number 0x19 037c e006 | | Load 0x0,0x6 037d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 037e e5fb | | Load 0x2,-0x5 037f 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0381 4802 |H | Short_Literal 0x2 0382 0092 0cf6 | | Action Push_String_Extended,0xcf6 ; "Can't acquire connection to " 0384 e5fd | | Load 0x2,-0x3 0385 01cc | | Execute Vector,Catenate 0386 8215 | | Call 0x1,0x15 0387 c5fb | | Store 0x2,-0x5 0388 7801 |x | Jump 0x38a 0389 840b | | Call 0x2,0xb 038a e404 | | Load 0x2,0x4 038b e5fc | | Load 0x2,-0x4 038c e402 | | Load 0x2,0x2 038d e009 | | Load 0x0,0x9 038e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 038f c404 | | Store 0x2,0x4 0390 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0391 TRAP_0308: 0391 0007 | | Action Break_Optional 0392 e5fb | | Load 0x2,-0x5 0393 0092 0d00 | | Action Push_String_Extended,0xd00 ; "Destroy_Remote_Library" 0395 8216 | | Call 0x1,0x16 0396 c5fb | | Store 0x2,-0x5 0397 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0398 ; -------------------------------------------------------------------------------------- 0398 ; SUBPROGRAM 0398 ; -------------------------------------------------------------------------------------- 0398 039b | | .CONST 0x039b ; Address of begin 0399 0004 | | .CONST 0x0004 ; Address of exception handler 039a 0001 | | .CONST 0x0001 ; Number of locals 039b BODY_0398: 039b INIT_0398: 039b e5fc | | Load 0x2,-0x4 039c e5fe | | Load 0x2,-0x2 039d e5ff | | Load 0x2,-0x1 039e e5fd | | Load 0x2,-0x3 039f e007 | | Load 0x0,0x7 03a0 181a | | Execute Package,Field_Execute,Field_Number 0x1a 03a1 c5fc | | Store 0x2,-0x4 03a2 4504 |E | Exit_Suprogram New_Top_Offset 0x4 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 00db | | Load_Top At_Offset_3 03ac 0092 0d01 | | Action Push_String_Extended,0xd01 ; "Unhandled exception " 03ae 4802 |H | Short_Literal 0x2 03af 4800 |H | Short_Literal 0x0 03b0 4801 |H | Short_Literal 0x1 03b1 e00f | | Load 0x0,0xf 03b2 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03b3 0092 0d02 | | Action Push_String_Extended,0xd02 ; " caught in " 03b5 01cc | | Execute Vector,Catenate 03b6 e5ff | | Load 0x2,-0x1 03b7 01cc | | Execute Vector,Catenate 03b8 8215 | | Call 0x1,0x15 03b9 c5fe | | Store 0x2,-0x2 03ba 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03bb 0000 0000 | | .BLANK 0000[0x5] 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; SUBPROGRAM 03c0 ; -------------------------------------------------------------------------------------- 03c0 03c3 | | .CONST 0x03c3 ; Address of begin 03c1 0004 | | .CONST 0x0004 ; Address of exception handler 03c2 0001 | | .CONST 0x0001 ; Number of locals 03c3 BODY_03c0: 03c3 INIT_03c0: 03c3 0092 0d03 | | Action Push_String_Extended,0xd03 ; " => \x22" 03c5 00db | | Load_Top At_Offset_3 03c6 01cc | | Execute Vector,Catenate 03c7 0092 0d04 | | Action Push_String_Extended,0xd04 ; "\x22" 03c9 01cc | | Execute Vector,Catenate 03ca 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03cb 0000 0000 | | .BLANK 0000[0x5] 03d0 ; -------------------------------------------------------------------------------------- 03d0 ; SUBPROGRAM 03d0 ; -------------------------------------------------------------------------------------- 03d0 03d9 | | .CONST 0x03d9 ; Address of begin 03d1 0004 | | .CONST 0x0004 ; Address of exception handler 03d2 0002 | | .CONST 0x0002 ; Number of locals 03d3 INIT_03d0: 03d3 00da | | Load_Top At_Offset_2 03d4 e002 | | Load 0x0,0x2 03d5 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 03d6 e002 | | Load 0x0,0x2 03d7 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 03d8 03f1 | | Declare_Variable Discrete,With_Value 03d9 BODY_03d0: 03d9 00d8 | | Load_Top At_Offset_0 03da e010 | | Load 0x0,0x10 03db 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03dc 027f | | Execute Discrete,Equal 03dd 700c |p | Jump_Nonzero 0x3ea 03de 00d8 | | Load_Top At_Offset_0 03df e010 | | Load 0x0,0x10 03e0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 03e1 027f | | Execute Discrete,Equal 03e2 7005 |p | Jump_Nonzero 0x3e8 03e3 00d8 | | Load_Top At_Offset_0 03e4 e010 | | Load 0x0,0x10 03e5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03e6 027f | | Execute Discrete,Equal 03e7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03e8 4801 |H | Short_Literal 0x1 03e9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03ea 4801 |H | Short_Literal 0x1 03eb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03ec 0000 0000 | | .BLANK 0000[0x4] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 0415 | | .CONST 0x0415 ; Address of begin 03f1 051b | | .CONST 0x051b ; Address of exception handler 03f2 0009 | | .CONST 0x0009 ; Number of locals 03f3 INIT_03f0: 03f3 00db | | Load_Top At_Offset_3 03f4 e002 | | Load 0x0,0x2 03f5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 03f6 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 03f7 e005 | | Load 0x0,0x5 03f8 180e | | Execute Package,Field_Execute,Field_Number 0xe 03f9 00d9 | | Load_Top At_Offset_1 03fa e011 | | Load 0x0,0x11 03fb 1814 | | Execute Package,Field_Execute,Field_Number 0x14 03fc 00d8 | | Load_Top At_Offset_0 03fd 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 03fe 0007 | | Action Break_Optional 03ff 0092 0d05 | | Action Push_String_Extended,0xd05 ; "cd " 0401 00d9 | | Load_Top At_Offset_1 0402 01cc | | Execute Vector,Catenate 0403 0007 | | Action Break_Optional 0404 e00a | | Load 0x0,0xa 0405 0092 0d06 | | Action Push_String_Extended,0xd06 ; "a.path -L " 0407 01cc | | Execute Vector,Catenate 0408 0007 | | Action Break_Optional 0409 00d8 | | Load_Top At_Offset_0 040a 00db | | Load_Top At_Offset_3 040b 01cc | | Execute Vector,Catenate 040c 0092 0d07 | | Action Push_String_Extended,0xd07 ; " -i " 040e 01cc | | Execute Vector,Catenate 040f e5ff | | Load 0x2,-0x1 0410 01cc | | Execute Vector,Catenate 0411 0007 | | Action Break_Optional 0412 00e1 | | Load_Encached Boolean_Cache 0413 029f 0beb | | Declare_Subprogram INIT_0be8,For_Call 0415 BODY_03f0: 0415 e5fc | | Load 0x2,-0x4 0416 6813 |h | Jump_Zero 0x42a 0417 e005 | | Load 0x0,0x5 0418 180e | | Execute Package,Field_Execute,Field_Number 0xe 0419 4809 |H | Short_Literal 0x9 041a 0092 0d08 | | Action Push_String_Extended,0xd08 ; "Do_Import (Remote_Import_Directory" 041c e5ff | | Load 0x2,-0x1 041d 8218 | | Call 0x1,0x18 041e 01cc | | Execute Vector,Catenate 041f 0092 0d09 | | Action Push_String_Extended,0xd09 ; ", To_View" 0421 01cc | | Execute Vector,Catenate 0422 e402 | | Load 0x2,0x2 0423 8218 | | Call 0x1,0x18 0424 01cc | | Execute Vector,Catenate 0425 0092 0cdd | | Action Push_String_Extended,0xcdd ; ")" 0427 01cc | | Execute Vector,Catenate 0428 e006 | | Load 0x0,0x6 0429 1813 | | Execute Package,Field_Execute,Field_Number 0x13 042a 4801 |H | Short_Literal 0x1 042b e403 | | Load 0x2,0x3 042c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 042d e007 | | Load 0x0,0x7 042e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 042f 6816 |h | Jump_Zero 0x446 0430 e5fc | | Load 0x2,-0x4 0431 6809 |h | Jump_Zero 0x43b 0432 e005 | | Load 0x0,0x5 0433 180e | | Execute Package,Field_Execute,Field_Number 0xe 0434 4805 |H | Short_Literal 0x5 0435 e403 | | Load 0x2,0x3 0436 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0437 e007 | | Load 0x0,0x7 0438 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0439 e006 | | Load 0x0,0x6 043a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 043b e5fb | | Load 0x2,-0x5 043c 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 043e 4802 |H | Short_Literal 0x2 043f 0092 0d0a | | Action Push_String_Extended,0xd0a ; "Can't get remote directory name for view " 0441 e402 | | Load 0x2,0x2 0442 01cc | | Execute Vector,Catenate 0443 8215 | | Call 0x1,0x15 0444 c5fb | | Store 0x2,-0x5 0445 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0446 4820 |H | Short_Literal 0x20 0447 e404 | | Load 0x2,0x4 0448 e00d | | Load 0x0,0xd 0449 181c | | Execute Package,Field_Execute,Field_Number 0x1c 044a 01db | | Execute Vector,Length 044b 700d |p | Jump_Nonzero 0x459 044c e005 | | Load 0x0,0x5 044d 180e | | Execute Package,Field_Execute,Field_Number 0xe 044e 4806 |H | Short_Literal 0x6 044f 0092 0d0b | | Action Push_String_Extended,0xd0b ; "Name of remote directory for view " 0451 e402 | | Load 0x2,0x2 0452 01cc | | Execute Vector,Catenate 0453 0092 0d0c | | Action Push_String_Extended,0xd0c ; " is null" 0455 01cc | | Execute Vector,Catenate 0456 e006 | | Load 0x0,0x6 0457 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0458 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0459 4820 |H | Short_Literal 0x20 045a e5ff | | Load 0x2,-0x1 045b e00d | | Load 0x0,0xd 045c 181c | | Execute Package,Field_Execute,Field_Number 0x1c 045d 01db | | Execute Vector,Length 045e 700d |p | Jump_Nonzero 0x46c 045f e005 | | Load 0x0,0x5 0460 180e | | Execute Package,Field_Execute,Field_Number 0xe 0461 4806 |H | Short_Literal 0x6 0462 0092 0d0d | | Action Push_String_Extended,0xd0d ; "Name of remote library to be imported into view " 0464 e402 | | Load 0x2,0x2 0465 01cc | | Execute Vector,Catenate 0466 0092 0d0c | | Action Push_String_Extended,0xd0c ; " is null" 0468 01cc | | Execute Vector,Catenate 0469 e006 | | Load 0x0,0x6 046a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 046b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 046c e5fc | | Load 0x2,-0x4 046d 680a |h | Jump_Zero 0x478 046e e005 | | Load 0x0,0x5 046f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0470 480a |H | Short_Literal 0xa 0471 0092 0d0e | | Action Push_String_Extended,0xd0e ; "Set_Directory_Command" 0473 e405 | | Load 0x2,0x5 0474 8218 | | Call 0x1,0x18 0475 01cc | | Execute Vector,Catenate 0476 e006 | | Load 0x0,0x6 0477 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0478 e5fb | | Load 0x2,-0x5 0479 e5fc | | Load 0x2,-0x4 047a 4801 |H | Short_Literal 0x1 047b 4800 |H | Short_Literal 0x0 047c 4800 |H | Short_Literal 0x0 047d 00ea | | Load_Encached Null_String_Cache 047e e5fd | | Load 0x2,-0x3 047f e405 | | Load 0x2,0x5 0480 e009 | | Load 0x0,0x9 0481 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0482 c5fb | | Store 0x2,-0x5 0483 4801 |H | Short_Literal 0x1 0484 e5fb | | Load 0x2,-0x5 0485 e007 | | Load 0x0,0x7 0486 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0487 681d |h | Jump_Zero 0x4a5 0488 e5fc | | Load 0x2,-0x4 0489 6808 |h | Jump_Zero 0x492 048a e005 | | Load 0x0,0x5 048b 180e | | Execute Package,Field_Execute,Field_Number 0xe 048c 4806 |H | Short_Literal 0x6 048d e5fb | | Load 0x2,-0x5 048e e007 | | Load 0x0,0x7 048f 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0490 e006 | | Load 0x0,0x6 0491 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0492 e005 | | Load 0x0,0x5 0493 180e | | Execute Package,Field_Execute,Field_Number 0xe 0494 4806 |H | Short_Literal 0x6 0495 0092 0d0f | | Action Push_String_Extended,0xd0f ; "Can't add import " 0497 e5ff | | Load 0x2,-0x1 0498 01cc | | Execute Vector,Catenate 0499 0092 0d10 | | Action Push_String_Extended,0xd10 ; " to nonexistent remote library " 049b 01cc | | Execute Vector,Catenate 049c e404 | | Load 0x2,0x4 049d 01cc | | Execute Vector,Catenate 049e e006 | | Load 0x0,0x6 049f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04a0 e5fb | | Load 0x2,-0x5 04a1 e007 | | Load 0x0,0x7 04a2 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04a3 c5fb | | Store 0x2,-0x5 04a4 4505 |E | Exit_Suprogram New_Top_Offset 0x5 04a5 00e1 | | Load_Encached Boolean_Cache 04a6 e5fb | | Load 0x2,-0x5 04a7 e5fc | | Load 0x2,-0x4 04a8 e5fd | | Load 0x2,-0x3 04a9 e5ff | | Load 0x2,-0x1 04aa e009 | | Load 0x0,0x9 04ab 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04ac c5fb | | Store 0x2,-0x5 04ad 005a | Z | Store_Top Discrete,At_Offset_2 04ae 4801 |H | Short_Literal 0x1 04af e5fb | | Load 0x2,-0x5 04b0 e007 | | Load 0x0,0x7 04b1 1817 | | Execute Package,Field_Execute,Field_Number 0x17 04b2 681b |h | Jump_Zero 0x4ce 04b3 e5fc | | Load 0x2,-0x4 04b4 6808 |h | Jump_Zero 0x4bd 04b5 e005 | | Load 0x0,0x5 04b6 180e | | Execute Package,Field_Execute,Field_Number 0xe 04b7 4806 |H | Short_Literal 0x6 04b8 e5fb | | Load 0x2,-0x5 04b9 e007 | | Load 0x0,0x7 04ba 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04bb e006 | | Load 0x0,0x6 04bc 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04bd e005 | | Load 0x0,0x5 04be 180e | | Execute Package,Field_Execute,Field_Number 0xe 04bf 4806 |H | Short_Literal 0x6 04c0 0092 0d11 | | Action Push_String_Extended,0xd11 ; "Can't tell whether remote Ada library \x22" 04c2 e5ff | | Load 0x2,-0x1 04c3 01cc | | Execute Vector,Catenate 04c4 0092 0d12 | | Action Push_String_Extended,0xd12 ; "\x22 exists" 04c6 01cc | | Execute Vector,Catenate 04c7 e006 | | Load 0x0,0x6 04c8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04c9 e5fb | | Load 0x2,-0x5 04ca e007 | | Load 0x0,0x7 04cb 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04cc c5fb | | Store 0x2,-0x5 04cd 4505 |E | Exit_Suprogram New_Top_Offset 0x5 04ce 00d9 | | Load_Top At_Offset_1 04cf 700f |p | Jump_Nonzero 0x4df 04d0 e005 | | Load 0x0,0x5 04d1 180e | | Execute Package,Field_Execute,Field_Number 0xe 04d2 4806 |H | Short_Literal 0x6 04d3 0092 0d13 | | Action Push_String_Extended,0xd13 ; "Can't import nonexistent remote library " 04d5 e5ff | | Load 0x2,-0x1 04d6 01cc | | Execute Vector,Catenate 04d7 0092 0d14 | | Action Push_String_Extended,0xd14 ; " into library " 04d9 01cc | | Execute Vector,Catenate 04da e404 | | Load 0x2,0x4 04db 01cc | | Execute Vector,Catenate 04dc e006 | | Load 0x0,0x6 04dd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04de 4505 |E | Exit_Suprogram New_Top_Offset 0x5 04df 00e1 | | Load_Encached Boolean_Cache 04e0 e5ff | | Load 0x2,-0x1 04e1 8409 | | Call 0x2,0x9 04e2 005a | Z | Store_Top Discrete,At_Offset_2 04e3 00d9 | | Load_Top At_Offset_1 04e4 7035 |p5 | Jump_Nonzero 0x51a 04e5 e5fc | | Load 0x2,-0x4 04e6 680a |h | Jump_Zero 0x4f1 04e7 e005 | | Load 0x0,0x5 04e8 180e | | Execute Package,Field_Execute,Field_Number 0xe 04e9 480a |H | Short_Literal 0xa 04ea 0092 0d15 | | Action Push_String_Extended,0xd15 ; "Add_Import_Command" 04ec e407 | | Load 0x2,0x7 04ed 8218 | | Call 0x1,0x18 04ee 01cc | | Execute Vector,Catenate 04ef e006 | | Load 0x0,0x6 04f0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04f1 e5fb | | Load 0x2,-0x5 04f2 e5fc | | Load 0x2,-0x4 04f3 4801 |H | Short_Literal 0x1 04f4 4800 |H | Short_Literal 0x0 04f5 4800 |H | Short_Literal 0x0 04f6 00ea | | Load_Encached Null_String_Cache 04f7 e5fd | | Load 0x2,-0x3 04f8 e407 | | Load 0x2,0x7 04f9 e009 | | Load 0x0,0x9 04fa 1815 | | Execute Package,Field_Execute,Field_Number 0x15 04fb c5fb | | Store 0x2,-0x5 04fc 4801 |H | Short_Literal 0x1 04fd e5fb | | Load 0x2,-0x5 04fe e007 | | Load 0x0,0x7 04ff 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0500 6819 |h | Jump_Zero 0x51a 0501 e5fc | | Load 0x2,-0x4 0502 6808 |h | Jump_Zero 0x50b 0503 e005 | | Load 0x0,0x5 0504 180e | | Execute Package,Field_Execute,Field_Number 0xe 0505 4805 |H | Short_Literal 0x5 0506 e5fb | | Load 0x2,-0x5 0507 e007 | | Load 0x0,0x7 0508 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0509 e006 | | Load 0x0,0x6 050a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 050b e5fb | | Load 0x2,-0x5 050c 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 050e 4802 |H | Short_Literal 0x2 050f 0092 0d0f | | Action Push_String_Extended,0xd0f ; "Can't add import " 0511 e5ff | | Load 0x2,-0x1 0512 01cc | | Execute Vector,Catenate 0513 0092 0d16 | | Action Push_String_Extended,0xd16 ; " to remote library " 0515 01cc | | Execute Vector,Catenate 0516 e404 | | Load 0x2,0x4 0517 01cc | | Execute Vector,Catenate 0518 8215 | | Call 0x1,0x15 0519 c5fb | | Store 0x2,-0x5 051a 4505 |E | Exit_Suprogram New_Top_Offset 0x5 051b TRAP_03f0: 051b 0007 | | Action Break_Optional 051c e5fb | | Load 0x2,-0x5 051d 0092 0d17 | | Action Push_String_Extended,0xd17 ; "Do_Import" 051f 8216 | | Call 0x1,0x16 0520 c5fb | | Store 0x2,-0x5 0521 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0522 0000 0000 | | .BLANK 0000[0x6] 0528 ; -------------------------------------------------------------------------------------- 0528 ; SUBPROGRAM 0528 ; -------------------------------------------------------------------------------------- 0528 053f | ? | .CONST 0x053f ; Address of begin 0529 0004 | | .CONST 0x0004 ; Address of exception handler 052a 0006 | | .CONST 0x0006 ; Number of locals 052b INIT_0528: 052b 00da | | Load_Top At_Offset_2 052c e002 | | Load 0x0,0x2 052d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 052e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 052f e005 | | Load 0x0,0x5 0530 180e | | Execute Package,Field_Execute,Field_Number 0xe 0531 00d9 | | Load_Top At_Offset_1 0532 e011 | | Load 0x0,0x11 0533 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0534 00d8 | | Load_Top At_Offset_0 0535 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0536 0007 | | Action Break_Optional 0537 e002 | | Load 0x0,0x2 0538 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0539 02c7 | | Declare_Variable Any 053a 00d8 | | Load_Top At_Offset_0 053b 1c00 | | Execute_Immediate Run_Utility,0x0 053c 4801 |H | Short_Literal 0x1 053d e5ff | | Load 0x2,-0x1 053e 8012 | | Call 0x0,0x12 053f BODY_0528: 053f e5fd | | Load 0x2,-0x3 0540 680d |h | Jump_Zero 0x54e 0541 e005 | | Load 0x0,0x5 0542 180e | | Execute Package,Field_Execute,Field_Number 0xe 0543 4809 |H | Short_Literal 0x9 0544 0092 0d18 | | Action Push_String_Extended,0xd18 ; "Refresh_Referencers (To_View" 0546 e402 | | Load 0x2,0x2 0547 8218 | | Call 0x1,0x18 0548 01cc | | Execute Vector,Catenate 0549 0092 0cdd | | Action Push_String_Extended,0xcdd ; ")" 054b 01cc | | Execute Vector,Catenate 054c e006 | | Load 0x0,0x6 054d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 054e 4801 |H | Short_Literal 0x1 054f e403 | | Load 0x2,0x3 0550 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0551 e007 | | Load 0x0,0x7 0552 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0553 6816 |h | Jump_Zero 0x56a 0554 e5fd | | Load 0x2,-0x3 0555 6809 |h | Jump_Zero 0x55f 0556 e005 | | Load 0x0,0x5 0557 180e | | Execute Package,Field_Execute,Field_Number 0xe 0558 4805 |H | Short_Literal 0x5 0559 e403 | | Load 0x2,0x3 055a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 055b e007 | | Load 0x0,0x7 055c 1819 | | Execute Package,Field_Execute,Field_Number 0x19 055d e006 | | Load 0x0,0x6 055e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 055f e5fc | | Load 0x2,-0x4 0560 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0562 4802 |H | Short_Literal 0x2 0563 0092 0d0a | | Action Push_String_Extended,0xd0a ; "Can't get remote directory name for view " 0565 e402 | | Load 0x2,0x2 0566 01cc | | Execute Vector,Catenate 0567 8215 | | Call 0x1,0x15 0568 c5fc | | Store 0x2,-0x4 0569 4504 |E | Exit_Suprogram New_Top_Offset 0x4 056a 4801 |H | Short_Literal 0x1 056b 00d9 | | Load_Top At_Offset_1 056c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 056d e007 | | Load 0x0,0x7 056e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 056f 6816 |h | Jump_Zero 0x586 0570 e5fd | | Load 0x2,-0x3 0571 6809 |h | Jump_Zero 0x57b 0572 e005 | | Load 0x0,0x5 0573 180e | | Execute Package,Field_Execute,Field_Number 0xe 0574 4805 |H | Short_Literal 0x5 0575 00da | | Load_Top At_Offset_2 0576 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0577 e007 | | Load 0x0,0x7 0578 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0579 e006 | | Load 0x0,0x6 057a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 057b e5fc | | Load 0x2,-0x4 057c 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 057e 4802 |H | Short_Literal 0x2 057f 0092 0d19 | | Action Push_String_Extended,0xd19 ; "Can't get referencers for view " 0581 e402 | | Load 0x2,0x2 0582 01cc | | Execute Vector,Catenate 0583 8215 | | Call 0x1,0x15 0584 c5fc | | Store 0x2,-0x4 0585 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0586 00cf | | Action Mark_Auxiliary 0587 00d9 | | Load_Top At_Offset_1 0588 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0589 4801 |H | Short_Literal 0x1 058a 0263 | c | Execute Discrete,Above_Bound 058b 7049 |pI | Jump_Nonzero 0x5d5 058c 00d8 | | Load_Top At_Offset_0 058d e406 | | Load 0x2,0x6 058e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 058f 01d7 | | Execute Vector,Field_Read 0590 c405 | | Store 0x2,0x5 0591 e5fd | | Load 0x2,-0x3 0592 6818 |h | Jump_Zero 0x5ab 0593 e005 | | Load 0x0,0x5 0594 180e | | Execute Package,Field_Execute,Field_Number 0xe 0595 480a |H | Short_Literal 0xa 0596 0092 0d1a | | Action Push_String_Extended,0xd1a ; ". Referencers (" 0598 00db | | Load_Top At_Offset_3 0599 00e0 | | Load_Encached Standard_Cache 059a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 059b 01cc | | Execute Vector,Catenate 059c 0092 0d1b | | Action Push_String_Extended,0xd1b ; ", " 059e 01cc | | Execute Vector,Catenate 059f e402 | | Load 0x2,0x2 05a0 01cc | | Execute Vector,Catenate 05a1 0092 0ce8 | | Action Push_String_Extended,0xce8 ; ") => " 05a3 01cc | | Execute Vector,Catenate 05a4 e405 | | Load 0x2,0x5 05a5 e002 | | Load 0x0,0x2 05a6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 05a7 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 05a8 01cc | | Execute Vector,Catenate 05a9 e006 | | Load 0x0,0x6 05aa 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05ab e405 | | Load 0x2,0x5 05ac e5ff | | Load 0x2,-0x1 05ad 012f | / | Execute Any,Equal 05ae 7024 |p$ | Jump_Nonzero 0x5d3 05af e5fc | | Load 0x2,-0x4 05b0 e5fd | | Load 0x2,-0x3 05b1 e5fe | | Load 0x2,-0x2 05b2 e405 | | Load 0x2,0x5 05b3 e404 | | Load 0x2,0x4 05b4 821a | | Call 0x1,0x1a 05b5 c5fc | | Store 0x2,-0x4 05b6 4801 |H | Short_Literal 0x1 05b7 e5fc | | Load 0x2,-0x4 05b8 e007 | | Load 0x0,0x7 05b9 1817 | | Execute Package,Field_Execute,Field_Number 0x17 05ba 6818 |h | Jump_Zero 0x5d3 05bb e005 | | Load 0x0,0x5 05bc 180e | | Execute Package,Field_Execute,Field_Number 0xe 05bd 4806 |H | Short_Literal 0x6 05be e5fc | | Load 0x2,-0x4 05bf e007 | | Load 0x0,0x7 05c0 1819 | | Execute Package,Field_Execute,Field_Number 0x19 05c1 e006 | | Load 0x0,0x6 05c2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05c3 e005 | | Load 0x0,0x5 05c4 180e | | Execute Package,Field_Execute,Field_Number 0xe 05c5 4806 |H | Short_Literal 0x6 05c6 0092 0d1c | | Action Push_String_Extended,0xd1c ; "Can't add remote import for " 05c8 e405 | | Load 0x2,0x5 05c9 e002 | | Load 0x0,0x2 05ca 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 05cb 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 05cc 01cc | | Execute Vector,Catenate 05cd e006 | | Load 0x0,0x6 05ce 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05cf e5fc | | Load 0x2,-0x4 05d0 e007 | | Load 0x0,0x7 05d1 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05d2 c5fc | | Store 0x2,-0x4 05d3 00c8 | | Action Pop_Auxiliary_Range 05d4 3fb7 |? | Loop_Increasing 0x58c 05d5 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05d6 0000 0000 | | .XXX[0x2] 05d8 ; -------------------------------------------------------------------------------------- 05d8 ; SUBPROGRAM 05d8 ; -------------------------------------------------------------------------------------- 05d8 05ef | | .CONST 0x05ef ; Address of begin 05d9 0004 | | .CONST 0x0004 ; Address of exception handler 05da 0006 | | .CONST 0x0006 ; Number of locals 05db INIT_05d8: 05db 00da | | Load_Top At_Offset_2 05dc e002 | | Load 0x0,0x2 05dd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 05de 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 05df e005 | | Load 0x0,0x5 05e0 180e | | Execute Package,Field_Execute,Field_Number 0xe 05e1 00d9 | | Load_Top At_Offset_1 05e2 e011 | | Load 0x0,0x11 05e3 1814 | | Execute Package,Field_Execute,Field_Number 0x14 05e4 00d8 | | Load_Top At_Offset_0 05e5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 05e6 0007 | | Action Break_Optional 05e7 e002 | | Load 0x0,0x2 05e8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 05e9 02c7 | | Declare_Variable Any 05ea 00d8 | | Load_Top At_Offset_0 05eb 1c00 | | Execute_Immediate Run_Utility,0x0 05ec 4801 |H | Short_Literal 0x1 05ed e5fe | | Load 0x2,-0x2 05ee 8012 | | Call 0x0,0x12 05ef BODY_05d8: 05ef e5fc | | Load 0x2,-0x4 05f0 6816 |h | Jump_Zero 0x607 05f1 e005 | | Load 0x0,0x5 05f2 180e | | Execute Package,Field_Execute,Field_Number 0xe 05f3 4809 |H | Short_Literal 0x9 05f4 0092 0d1d | | Action Push_String_Extended,0xd1d ; "Add_Remote_Import (Imported_View" 05f6 e402 | | Load 0x2,0x2 05f7 8218 | | Call 0x1,0x18 05f8 01cc | | Execute Vector,Catenate 05f9 0092 0d09 | | Action Push_String_Extended,0xd09 ; ", To_View" 05fb 01cc | | Execute Vector,Catenate 05fc e5fe | | Load 0x2,-0x2 05fd e002 | | Load 0x0,0x2 05fe 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 05ff 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0600 8218 | | Call 0x1,0x18 0601 01cc | | Execute Vector,Catenate 0602 0092 0cdd | | Action Push_String_Extended,0xcdd ; ")" 0604 01cc | | Execute Vector,Catenate 0605 e006 | | Load 0x0,0x6 0606 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0607 4801 |H | Short_Literal 0x1 0608 e403 | | Load 0x2,0x3 0609 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 060a e007 | | Load 0x0,0x7 060b 1817 | | Execute Package,Field_Execute,Field_Number 0x17 060c 6816 |h | Jump_Zero 0x623 060d e5fc | | Load 0x2,-0x4 060e 6809 |h | Jump_Zero 0x618 060f e005 | | Load 0x0,0x5 0610 180e | | Execute Package,Field_Execute,Field_Number 0xe 0611 4805 |H | Short_Literal 0x5 0612 e403 | | Load 0x2,0x3 0613 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0614 e007 | | Load 0x0,0x7 0615 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0616 e006 | | Load 0x0,0x6 0617 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0618 e5fb | | Load 0x2,-0x5 0619 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 061b 4802 |H | Short_Literal 0x2 061c 0092 0d1e | | Action Push_String_Extended,0xd1e ; "Can't get remote directory name for imported view " 061e e402 | | Load 0x2,0x2 061f 01cc | | Execute Vector,Catenate 0620 8215 | | Call 0x1,0x15 0621 c5fb | | Store 0x2,-0x5 0622 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0623 4801 |H | Short_Literal 0x1 0624 00d9 | | Load_Top At_Offset_1 0625 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0626 e007 | | Load 0x0,0x7 0627 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0628 6819 |h | Jump_Zero 0x642 0629 e5fc | | Load 0x2,-0x4 062a 6809 |h | Jump_Zero 0x634 062b e005 | | Load 0x0,0x5 062c 180e | | Execute Package,Field_Execute,Field_Number 0xe 062d 4805 |H | Short_Literal 0x5 062e 00da | | Load_Top At_Offset_2 062f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0630 e007 | | Load 0x0,0x7 0631 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0632 e006 | | Load 0x0,0x6 0633 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0634 e5fb | | Load 0x2,-0x5 0635 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0637 4802 |H | Short_Literal 0x2 0638 0092 0d19 | | Action Push_String_Extended,0xd19 ; "Can't get referencers for view " 063a e5fe | | Load 0x2,-0x2 063b e002 | | Load 0x0,0x2 063c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 063d 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 063e 01cc | | Execute Vector,Catenate 063f 8215 | | Call 0x1,0x15 0640 c5fb | | Store 0x2,-0x5 0641 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0642 e5ff | | Load 0x2,-0x1 0643 e5fe | | Load 0x2,-0x2 0644 012f | / | Execute Any,Equal 0645 6801 |h | Jump_Zero 0x647 0646 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0647 e5fb | | Load 0x2,-0x5 0648 e5fc | | Load 0x2,-0x4 0649 e5fd | | Load 0x2,-0x3 064a e5fe | | Load 0x2,-0x2 064b e404 | | Load 0x2,0x4 064c 821a | | Call 0x1,0x1a 064d c5fb | | Store 0x2,-0x5 064e 4801 |H | Short_Literal 0x1 064f e5fb | | Load 0x2,-0x5 0650 e007 | | Load 0x0,0x7 0651 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0652 6818 |h | Jump_Zero 0x66b 0653 e005 | | Load 0x0,0x5 0654 180e | | Execute Package,Field_Execute,Field_Number 0xe 0655 4806 |H | Short_Literal 0x6 0656 e5fb | | Load 0x2,-0x5 0657 e007 | | Load 0x0,0x7 0658 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0659 e006 | | Load 0x0,0x6 065a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 065b e005 | | Load 0x0,0x5 065c 180e | | Execute Package,Field_Execute,Field_Number 0xe 065d 4806 |H | Short_Literal 0x6 065e 0092 0d1c | | Action Push_String_Extended,0xd1c ; "Can't add remote import for " 0660 e5fe | | Load 0x2,-0x2 0661 e002 | | Load 0x0,0x2 0662 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0663 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0664 01cc | | Execute Vector,Catenate 0665 e006 | | Load 0x0,0x6 0666 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0667 e5fb | | Load 0x2,-0x5 0668 e007 | | Load 0x0,0x7 0669 1810 | | Execute Package,Field_Execute,Field_Number 0x10 066a c5fb | | Store 0x2,-0x5 066b 00cf | | Action Mark_Auxiliary 066c 00d9 | | Load_Top At_Offset_1 066d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 066e 4801 |H | Short_Literal 0x1 066f 0263 | c | Execute Discrete,Above_Bound 0670 7050 |pP | Jump_Nonzero 0x6c1 0671 00d8 | | Load_Top At_Offset_0 0672 e406 | | Load 0x2,0x6 0673 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0674 01d7 | | Execute Vector,Field_Read 0675 c405 | | Store 0x2,0x5 0676 e5fc | | Load 0x2,-0x4 0677 681b |h | Jump_Zero 0x693 0678 e005 | | Load 0x0,0x5 0679 180e | | Execute Package,Field_Execute,Field_Number 0xe 067a 480a |H | Short_Literal 0xa 067b 0092 0d1a | | Action Push_String_Extended,0xd1a ; ". Referencers (" 067d 00db | | Load_Top At_Offset_3 067e 00e0 | | Load_Encached Standard_Cache 067f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0680 01cc | | Execute Vector,Catenate 0681 0092 0d1b | | Action Push_String_Extended,0xd1b ; ", " 0683 01cc | | Execute Vector,Catenate 0684 e5fe | | Load 0x2,-0x2 0685 e002 | | Load 0x0,0x2 0686 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0687 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0688 01cc | | Execute Vector,Catenate 0689 0092 0ce8 | | Action Push_String_Extended,0xce8 ; ") => " 068b 01cc | | Execute Vector,Catenate 068c e405 | | Load 0x2,0x5 068d e002 | | Load 0x0,0x2 068e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 068f 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0690 01cc | | Execute Vector,Catenate 0691 e006 | | Load 0x0,0x6 0692 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0693 e405 | | Load 0x2,0x5 0694 e5ff | | Load 0x2,-0x1 0695 012f | / | Execute Any,Equal 0696 7028 |p( | Jump_Nonzero 0x6bf 0697 e405 | | Load 0x2,0x5 0698 e5fe | | Load 0x2,-0x2 0699 012f | / | Execute Any,Equal 069a 7024 |p$ | Jump_Nonzero 0x6bf 069b e5fb | | Load 0x2,-0x5 069c e5fc | | Load 0x2,-0x4 069d e5fd | | Load 0x2,-0x3 069e e405 | | Load 0x2,0x5 069f e404 | | Load 0x2,0x4 06a0 821a | | Call 0x1,0x1a 06a1 c5fb | | Store 0x2,-0x5 06a2 4801 |H | Short_Literal 0x1 06a3 e5fb | | Load 0x2,-0x5 06a4 e007 | | Load 0x0,0x7 06a5 1817 | | Execute Package,Field_Execute,Field_Number 0x17 06a6 6818 |h | Jump_Zero 0x6bf 06a7 e005 | | Load 0x0,0x5 06a8 180e | | Execute Package,Field_Execute,Field_Number 0xe 06a9 4806 |H | Short_Literal 0x6 06aa e5fb | | Load 0x2,-0x5 06ab e007 | | Load 0x0,0x7 06ac 1819 | | Execute Package,Field_Execute,Field_Number 0x19 06ad e006 | | Load 0x0,0x6 06ae 1813 | | Execute Package,Field_Execute,Field_Number 0x13 06af e005 | | Load 0x0,0x5 06b0 180e | | Execute Package,Field_Execute,Field_Number 0xe 06b1 4806 |H | Short_Literal 0x6 06b2 0092 0d1c | | Action Push_String_Extended,0xd1c ; "Can't add remote import for " 06b4 e405 | | Load 0x2,0x5 06b5 e002 | | Load 0x0,0x2 06b6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06b7 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 06b8 01cc | | Execute Vector,Catenate 06b9 e006 | | Load 0x0,0x6 06ba 1813 | | Execute Package,Field_Execute,Field_Number 0x13 06bb e5fb | | Load 0x2,-0x5 06bc e007 | | Load 0x0,0x7 06bd 1810 | | Execute Package,Field_Execute,Field_Number 0x10 06be c5fb | | Store 0x2,-0x5 06bf 00c8 | | Action Pop_Auxiliary_Range 06c0 3fb0 |? | Loop_Increasing 0x671 06c1 4505 |E | Exit_Suprogram New_Top_Offset 0x5 06c2 0000 0000 | | .BLANK 0000[0x6] 06c8 ; -------------------------------------------------------------------------------------- 06c8 ; SUBPROGRAM 06c8 ; -------------------------------------------------------------------------------------- 06c8 06f2 | | .CONST 0x06f2 ; Address of begin 06c9 0004 | | .CONST 0x0004 ; Address of exception handler 06ca 000a | | .CONST 0x000a ; Number of locals 06cb INIT_06c8: 06cb 00da | | Load_Top At_Offset_2 06cc e002 | | Load 0x0,0x2 06cd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06ce 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 06cf e005 | | Load 0x0,0x5 06d0 180e | | Execute Package,Field_Execute,Field_Number 0xe 06d1 00d9 | | Load_Top At_Offset_1 06d2 e011 | | Load 0x0,0x11 06d3 1814 | | Execute Package,Field_Execute,Field_Number 0x14 06d4 00d8 | | Load_Top At_Offset_0 06d5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 06d6 0007 | | Action Break_Optional 06d7 00e1 | | Load_Encached Boolean_Cache 06d8 e5fe | | Load 0x2,-0x2 06d9 e002 | | Load 0x0,0x2 06da 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06db 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 06dc e005 | | Load 0x0,0x5 06dd 180e | | Execute Package,Field_Execute,Field_Number 0xe 06de 00d9 | | Load_Top At_Offset_1 06df e011 | | Load 0x0,0x11 06e0 1814 | | Execute Package,Field_Execute,Field_Number 0x14 06e1 00d8 | | Load_Top At_Offset_0 06e2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 06e3 0007 | | Action Break_Optional 06e4 e00a | | Load 0x0,0xa 06e5 0092 0d06 | | Action Push_String_Extended,0xd06 ; "a.path -L " 06e7 01cc | | Execute Vector,Catenate 06e8 0007 | | Action Break_Optional 06e9 00d8 | | Load_Top At_Offset_0 06ea 00da | | Load_Top At_Offset_2 06eb 01cc | | Execute Vector,Catenate 06ec 0092 0d1f | | Action Push_String_Extended,0xd1f ; " -r " 06ee 01cc | | Execute Vector,Catenate 06ef e404 | | Load 0x2,0x4 06f0 01cc | | Execute Vector,Catenate 06f1 0007 | | Action Break_Optional 06f2 BODY_06c8: 06f2 e5fc | | Load 0x2,-0x4 06f3 6813 |h | Jump_Zero 0x707 06f4 e005 | | Load 0x0,0x5 06f5 180e | | Execute Package,Field_Execute,Field_Number 0xe 06f6 4809 |H | Short_Literal 0x9 06f7 0092 0d20 | | Action Push_String_Extended,0xd20 ; "Remove_Remote_Import (View_To_Remove" 06f9 e402 | | Load 0x2,0x2 06fa 8218 | | Call 0x1,0x18 06fb 01cc | | Execute Vector,Catenate 06fc 0092 0ce4 | | Action Push_String_Extended,0xce4 ; ", From_View" 06fe 01cc | | Execute Vector,Catenate 06ff e406 | | Load 0x2,0x6 0700 8218 | | Call 0x1,0x18 0701 01cc | | Execute Vector,Catenate 0702 0092 0cdd | | Action Push_String_Extended,0xcdd ; ")" 0704 01cc | | Execute Vector,Catenate 0705 e006 | | Load 0x0,0x6 0706 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0707 4801 |H | Short_Literal 0x1 0708 e403 | | Load 0x2,0x3 0709 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 070a e007 | | Load 0x0,0x7 070b 1817 | | Execute Package,Field_Execute,Field_Number 0x17 070c 6816 |h | Jump_Zero 0x723 070d e5fc | | Load 0x2,-0x4 070e 6809 |h | Jump_Zero 0x718 070f e005 | | Load 0x0,0x5 0710 180e | | Execute Package,Field_Execute,Field_Number 0xe 0711 4805 |H | Short_Literal 0x5 0712 e403 | | Load 0x2,0x3 0713 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0714 e007 | | Load 0x0,0x7 0715 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0716 e006 | | Load 0x0,0x6 0717 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0718 e5fb | | Load 0x2,-0x5 0719 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 071b 4802 |H | Short_Literal 0x2 071c 0092 0d1e | | Action Push_String_Extended,0xd1e ; "Can't get remote directory name for imported view " 071e e402 | | Load 0x2,0x2 071f 01cc | | Execute Vector,Catenate 0720 8215 | | Call 0x1,0x15 0721 c5fb | | Store 0x2,-0x5 0722 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0723 4801 |H | Short_Literal 0x1 0724 e407 | | Load 0x2,0x7 0725 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0726 e007 | | Load 0x0,0x7 0727 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0728 6816 |h | Jump_Zero 0x73f 0729 e5fc | | Load 0x2,-0x4 072a 6809 |h | Jump_Zero 0x734 072b e005 | | Load 0x0,0x5 072c 180e | | Execute Package,Field_Execute,Field_Number 0xe 072d 4805 |H | Short_Literal 0x5 072e e407 | | Load 0x2,0x7 072f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0730 e007 | | Load 0x0,0x7 0731 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0732 e006 | | Load 0x0,0x6 0733 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0734 e5fb | | Load 0x2,-0x5 0735 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0737 4802 |H | Short_Literal 0x2 0738 0092 0d0a | | Action Push_String_Extended,0xd0a ; "Can't get remote directory name for view " 073a e406 | | Load 0x2,0x6 073b 01cc | | Execute Vector,Catenate 073c 8215 | | Call 0x1,0x15 073d c5fb | | Store 0x2,-0x5 073e 4505 |E | Exit_Suprogram New_Top_Offset 0x5 073f 00da | | Load_Top At_Offset_2 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 0d21 | !| Action Push_String_Extended,0xd21 ; "Remote directory name for view " 0747 e406 | | Load 0x2,0x6 0748 01cc | | Execute Vector,Catenate 0749 0092 0d0c | | Action Push_String_Extended,0xd0c ; " 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 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0751 4802 |H | Short_Literal 0x2 0752 0092 0d22 | "| Action Push_String_Extended,0xd22 ; "Insufficient remote library information" 0754 8215 | | Call 0x1,0x15 0755 c5fb | | Store 0x2,-0x5 0756 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0757 e404 | | Load 0x2,0x4 0758 01db | | Execute Vector,Length 0759 7015 |p | Jump_Nonzero 0x76f 075a e005 | | Load 0x0,0x5 075b 180e | | Execute Package,Field_Execute,Field_Number 0xe 075c 4806 |H | Short_Literal 0x6 075d 0092 0d23 | #| Action Push_String_Extended,0xd23 ; "Remote directory name for imported view " 075f e402 | | Load 0x2,0x2 0760 01cc | | Execute Vector,Catenate 0761 0092 0d0c | | Action Push_String_Extended,0xd0c ; " is null" 0763 01cc | | Execute Vector,Catenate 0764 e006 | | Load 0x0,0x6 0765 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0766 e5fb | | Load 0x2,-0x5 0767 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0769 4802 |H | Short_Literal 0x2 076a 0092 0d22 | "| Action Push_String_Extended,0xd22 ; "Insufficient remote library information" 076c 8215 | | Call 0x1,0x15 076d c5fb | | Store 0x2,-0x5 076e 4505 |E | Exit_Suprogram New_Top_Offset 0x5 076f 00e1 | | Load_Encached Boolean_Cache 0770 e5fb | | Load 0x2,-0x5 0771 e5fc | | Load 0x2,-0x4 0772 e5fd | | Load 0x2,-0x3 0773 e408 | | Load 0x2,0x8 0774 e009 | | Load 0x0,0x9 0775 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0776 c5fb | | Store 0x2,-0x5 0777 c405 | | Store 0x2,0x5 0778 4801 |H | Short_Literal 0x1 0779 e5fb | | Load 0x2,-0x5 077a e007 | | Load 0x0,0x7 077b 1817 | | Execute Package,Field_Execute,Field_Number 0x17 077c 6818 |h | Jump_Zero 0x795 077d e5fc | | Load 0x2,-0x4 077e 6808 |h | Jump_Zero 0x787 077f e005 | | Load 0x0,0x5 0780 180e | | Execute Package,Field_Execute,Field_Number 0xe 0781 4805 |H | Short_Literal 0x5 0782 e5fb | | Load 0x2,-0x5 0783 e007 | | Load 0x0,0x7 0784 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0785 e006 | | Load 0x0,0x6 0786 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0787 e5fb | | Load 0x2,-0x5 0788 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 078a 4802 |H | Short_Literal 0x2 078b 0092 0d24 | $| Action Push_String_Extended,0xd24 ; "Can't tell whether remote directory \x22" 078d e408 | | Load 0x2,0x8 078e 01cc | | Execute Vector,Catenate 078f 0092 0d25 | %| Action Push_String_Extended,0xd25 ; "\x22 exists, so can't remove its import" 0791 01cc | | Execute Vector,Catenate 0792 8215 | | Call 0x1,0x15 0793 c5fb | | Store 0x2,-0x5 0794 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0795 e405 | | Load 0x2,0x5 0796 7012 |p | Jump_Nonzero 0x7a9 0797 e005 | | Load 0x0,0x5 0798 180e | | Execute Package,Field_Execute,Field_Number 0xe 0799 4806 |H | Short_Literal 0x6 079a 0092 0d26 | &| Action Push_String_Extended,0xd26 ; "Remote directory \x22" 079c e408 | | Load 0x2,0x8 079d 01cc | | Execute Vector,Catenate 079e 0092 0d27 | '| Action Push_String_Extended,0xd27 ; "\x22 doesn't exist for view " 07a0 01cc | | Execute Vector,Catenate 07a1 e406 | | Load 0x2,0x6 07a2 01cc | | Execute Vector,Catenate 07a3 0092 0d28 | (| Action Push_String_Extended,0xd28 ; ", so we can't remove its import" 07a5 01cc | | Execute Vector,Catenate 07a6 e006 | | Load 0x0,0x6 07a7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07a8 4505 |E | Exit_Suprogram New_Top_Offset 0x5 07a9 e5fc | | Load 0x2,-0x4 07aa 6810 |h | Jump_Zero 0x7bb 07ab e005 | | Load 0x0,0x5 07ac 180e | | Execute Package,Field_Execute,Field_Number 0xe 07ad 480a |H | Short_Literal 0xa 07ae 0092 0d29 | )| Action Push_String_Extended,0xd29 ; "Remove_Import_Command" 07b0 00db | | Load_Top At_Offset_3 07b1 8218 | | Call 0x1,0x18 07b2 01cc | | Execute Vector,Catenate 07b3 0092 0d2a | *| Action Push_String_Extended,0xd2a ; ", View_To_Remove" 07b5 01cc | | Execute Vector,Catenate 07b6 e402 | | Load 0x2,0x2 07b7 8218 | | Call 0x1,0x18 07b8 01cc | | Execute Vector,Catenate 07b9 e006 | | Load 0x0,0x6 07ba 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07bb e5fb | | Load 0x2,-0x5 07bc e5fc | | Load 0x2,-0x4 07bd 4801 |H | Short_Literal 0x1 07be 4800 |H | Short_Literal 0x0 07bf 4800 |H | Short_Literal 0x0 07c0 00ea | | Load_Encached Null_String_Cache 07c1 e5fd | | Load 0x2,-0x3 07c2 e40a | | Load 0x2,0xa 07c3 e009 | | Load 0x0,0x9 07c4 1815 | | Execute Package,Field_Execute,Field_Number 0x15 07c5 c5fb | | Store 0x2,-0x5 07c6 4801 |H | Short_Literal 0x1 07c7 e5fb | | Load 0x2,-0x5 07c8 e007 | | Load 0x0,0x7 07c9 1817 | | Execute Package,Field_Execute,Field_Number 0x17 07ca 6819 |h | Jump_Zero 0x7e4 07cb e5fc | | Load 0x2,-0x4 07cc 6808 |h | Jump_Zero 0x7d5 07cd e005 | | Load 0x0,0x5 07ce 180e | | Execute Package,Field_Execute,Field_Number 0xe 07cf 4805 |H | Short_Literal 0x5 07d0 e5fb | | Load 0x2,-0x5 07d1 e007 | | Load 0x0,0x7 07d2 1819 | | Execute Package,Field_Execute,Field_Number 0x19 07d3 e006 | | Load 0x0,0x6 07d4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07d5 e5fb | | Load 0x2,-0x5 07d6 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 07d8 4802 |H | Short_Literal 0x2 07d9 0092 0d2b | +| Action Push_String_Extended,0xd2b ; "Can't remove remote import " 07db e402 | | Load 0x2,0x2 07dc 01cc | | Execute Vector,Catenate 07dd 0092 0d2c | ,| Action Push_String_Extended,0xd2c ; " from view " 07df 01cc | | Execute Vector,Catenate 07e0 e406 | | Load 0x2,0x6 07e1 01cc | | Execute Vector,Catenate 07e2 8215 | | Call 0x1,0x15 07e3 c5fb | | Store 0x2,-0x5 07e4 4505 |E | Exit_Suprogram New_Top_Offset 0x5 07e5 0000 0000 | | .XXX[0x3] 07e7 0000 | | 07e8 ; -------------------------------------------------------------------------------------- 07e8 ; SUBPROGRAM 07e8 ; -------------------------------------------------------------------------------------- 07e8 07ee | | .CONST 0x07ee ; Address of begin 07e9 0004 | | .CONST 0x0004 ; Address of exception handler 07ea 0002 | | .CONST 0x0002 ; Number of locals 07eb INIT_07e8: 07eb 4801 |H | Short_Literal 0x1 07ec e5fe | | Load 0x2,-0x2 07ed 8008 | | Call 0x0,0x8 07ee BODY_07e8: 07ee 4801 |H | Short_Literal 0x1 07ef 00d9 | | Load_Top At_Offset_1 07f0 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 07f1 e007 | | Load 0x0,0x7 07f2 1817 | | Execute Package,Field_Execute,Field_Number 0x17 07f3 6817 |h | Jump_Zero 0x80b 07f4 e005 | | Load 0x0,0x5 07f5 180e | | Execute Package,Field_Execute,Field_Number 0xe 07f6 4805 |H | Short_Literal 0x5 07f7 00da | | Load_Top At_Offset_2 07f8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 07f9 e007 | | Load 0x0,0x7 07fa 1819 | | Execute Package,Field_Execute,Field_Number 0x19 07fb e006 | | Load 0x0,0x6 07fc 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07fd e5fb | | Load 0x2,-0x5 07fe 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0800 4802 |H | Short_Literal 0x2 0801 0092 0ce5 | | Action Push_String_Extended,0xce5 ; "Can't get import closure for view " 0803 e5fe | | Load 0x2,-0x2 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 01cc | | Execute Vector,Catenate 0808 8215 | | Call 0x1,0x15 0809 c5fb | | Store 0x2,-0x5 080a 4505 |E | Exit_Suprogram New_Top_Offset 0x5 080b 00d8 | | Load_Top At_Offset_0 080c e5ff | | Load 0x2,-0x1 080d 8013 | | Call 0x0,0x13 080e 7007 |p | Jump_Nonzero 0x816 080f e5fb | | Load 0x2,-0x5 0810 e5fc | | Load 0x2,-0x4 0811 e5fd | | Load 0x2,-0x3 0812 e5fe | | Load 0x2,-0x2 0813 e5ff | | Load 0x2,-0x1 0814 821d | | Call 0x1,0x1d 0815 c5fb | | Store 0x2,-0x5 0816 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0817 0000 | | .XXX[0x1] 0818 ; -------------------------------------------------------------------------------------- 0818 ; SUBPROGRAM 0818 ; -------------------------------------------------------------------------------------- 0818 0827 | ' | .CONST 0x0827 ; Address of begin 0819 0004 | | .CONST 0x0004 ; Address of exception handler 081a 0004 | | .CONST 0x0004 ; Number of locals 081b INIT_0818: 081b 00da | | Load_Top At_Offset_2 081c e002 | | Load 0x0,0x2 081d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 081e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 081f e002 | | Load 0x0,0x2 0820 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0821 02c7 | | Declare_Variable Any 0822 00d8 | | Load_Top At_Offset_0 0823 1c00 | | Execute_Immediate Run_Utility,0x0 0824 4801 |H | Short_Literal 0x1 0825 e5fe | | Load 0x2,-0x2 0826 8012 | | Call 0x0,0x12 0827 BODY_0818: 0827 e5fc | | Load 0x2,-0x4 0828 6816 |h | Jump_Zero 0x83f 0829 e005 | | Load 0x0,0x5 082a 180e | | Execute Package,Field_Execute,Field_Number 0xe 082b 4809 |H | Short_Literal 0x9 082c 0092 0d2d | -| Action Push_String_Extended,0xd2d ; "Remove_All_Remote_Imports (View_To_Remove" 082e e402 | | Load 0x2,0x2 082f 8218 | | Call 0x1,0x18 0830 01cc | | Execute Vector,Catenate 0831 0092 0ce4 | | Action Push_String_Extended,0xce4 ; ", From_View" 0833 01cc | | Execute Vector,Catenate 0834 e5fe | | Load 0x2,-0x2 0835 e002 | | Load 0x0,0x2 0836 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0837 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0838 8218 | | Call 0x1,0x18 0839 01cc | | Execute Vector,Catenate 083a 0092 0cdd | | Action Push_String_Extended,0xcdd ; ")" 083c 01cc | | Execute Vector,Catenate 083d e006 | | Load 0x0,0x6 083e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 083f 4801 |H | Short_Literal 0x1 0840 00d9 | | Load_Top At_Offset_1 0841 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0842 e007 | | Load 0x0,0x7 0843 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0844 6819 |h | Jump_Zero 0x85e 0845 e5fc | | Load 0x2,-0x4 0846 6809 |h | Jump_Zero 0x850 0847 e005 | | Load 0x0,0x5 0848 180e | | Execute Package,Field_Execute,Field_Number 0xe 0849 4805 |H | Short_Literal 0x5 084a 00da | | Load_Top At_Offset_2 084b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 084c e007 | | Load 0x0,0x7 084d 1819 | | Execute Package,Field_Execute,Field_Number 0x19 084e e006 | | Load 0x0,0x6 084f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0850 e5fb | | Load 0x2,-0x5 0851 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0853 4802 |H | Short_Literal 0x2 0854 0092 0d19 | | Action Push_String_Extended,0xd19 ; "Can't get referencers for view " 0856 e5fe | | Load 0x2,-0x2 0857 e002 | | Load 0x0,0x2 0858 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0859 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 085a 01cc | | Execute Vector,Catenate 085b 8215 | | Call 0x1,0x15 085c c5fb | | Store 0x2,-0x5 085d 4505 |E | Exit_Suprogram New_Top_Offset 0x5 085e e5fb | | Load 0x2,-0x5 085f e5fc | | Load 0x2,-0x4 0860 e5fd | | Load 0x2,-0x3 0861 e5fe | | Load 0x2,-0x2 0862 e5ff | | Load 0x2,-0x1 0863 821e | | Call 0x1,0x1e 0864 c5fb | | Store 0x2,-0x5 0865 4801 |H | Short_Literal 0x1 0866 e5fb | | Load 0x2,-0x5 0867 e007 | | Load 0x0,0x7 0868 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0869 681d |h | Jump_Zero 0x887 086a e005 | | Load 0x0,0x5 086b 180e | | Execute Package,Field_Execute,Field_Number 0xe 086c 4806 |H | Short_Literal 0x6 086d e5fb | | Load 0x2,-0x5 086e e007 | | Load 0x0,0x7 086f 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0870 e006 | | Load 0x0,0x6 0871 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0872 e005 | | Load 0x0,0x5 0873 180e | | Execute Package,Field_Execute,Field_Number 0xe 0874 4806 |H | Short_Literal 0x6 0875 0092 0d2e | .| Action Push_String_Extended,0xd2e ; "Remote library for " 0877 e402 | | Load 0x2,0x2 0878 01cc | | Execute Vector,Catenate 0879 0092 0d2f | /| Action Push_String_Extended,0xd2f ; " isn't on search list for " 087b 01cc | | Execute Vector,Catenate 087c e5fe | | Load 0x2,-0x2 087d e002 | | Load 0x0,0x2 087e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 087f 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0880 01cc | | Execute Vector,Catenate 0881 e006 | | Load 0x0,0x6 0882 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0883 e5fb | | Load 0x2,-0x5 0884 e007 | | Load 0x0,0x7 0885 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0886 c5fb | | Store 0x2,-0x5 0887 00cf | | Action Mark_Auxiliary 0888 00d9 | | Load_Top At_Offset_1 0889 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 088a 4801 |H | Short_Literal 0x1 088b 0263 | c | Execute Discrete,Above_Bound 088c 7055 |pU | Jump_Nonzero 0x8e2 088d 00d8 | | Load_Top At_Offset_0 088e e404 | | Load 0x2,0x4 088f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0890 01d7 | | Execute Vector,Field_Read 0891 c403 | | Store 0x2,0x3 0892 e5fc | | Load 0x2,-0x4 0893 681b |h | Jump_Zero 0x8af 0894 e005 | | Load 0x0,0x5 0895 180e | | Execute Package,Field_Execute,Field_Number 0xe 0896 480a |H | Short_Literal 0xa 0897 0092 0d1a | | Action Push_String_Extended,0xd1a ; ". Referencers (" 0899 00db | | Load_Top At_Offset_3 089a 00e0 | | Load_Encached Standard_Cache 089b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 089c 01cc | | Execute Vector,Catenate 089d 0092 0d1b | | Action Push_String_Extended,0xd1b ; ", " 089f 01cc | | Execute Vector,Catenate 08a0 e5fe | | Load 0x2,-0x2 08a1 e002 | | Load 0x0,0x2 08a2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08a3 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 08a4 01cc | | Execute Vector,Catenate 08a5 0092 0ce8 | | Action Push_String_Extended,0xce8 ; ") => " 08a7 01cc | | Execute Vector,Catenate 08a8 e403 | | Load 0x2,0x3 08a9 e002 | | Load 0x0,0x2 08aa 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08ab 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 08ac 01cc | | Execute Vector,Catenate 08ad e006 | | Load 0x0,0x6 08ae 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08af e403 | | Load 0x2,0x3 08b0 e5ff | | Load 0x2,-0x1 08b1 012f | / | Execute Any,Equal 08b2 702d |p- | Jump_Nonzero 0x8e0 08b3 e403 | | Load 0x2,0x3 08b4 e5fe | | Load 0x2,-0x2 08b5 012f | / | Execute Any,Equal 08b6 7029 |p) | Jump_Nonzero 0x8e0 08b7 e5fb | | Load 0x2,-0x5 08b8 e5fc | | Load 0x2,-0x4 08b9 e5fd | | Load 0x2,-0x3 08ba e403 | | Load 0x2,0x3 08bb e5ff | | Load 0x2,-0x1 08bc 821e | | Call 0x1,0x1e 08bd c5fb | | Store 0x2,-0x5 08be 4801 |H | Short_Literal 0x1 08bf e5fb | | Load 0x2,-0x5 08c0 e007 | | Load 0x0,0x7 08c1 1817 | | Execute Package,Field_Execute,Field_Number 0x17 08c2 681d |h | Jump_Zero 0x8e0 08c3 e005 | | Load 0x0,0x5 08c4 180e | | Execute Package,Field_Execute,Field_Number 0xe 08c5 4806 |H | Short_Literal 0x6 08c6 e5fb | | Load 0x2,-0x5 08c7 e007 | | Load 0x0,0x7 08c8 1819 | | Execute Package,Field_Execute,Field_Number 0x19 08c9 e006 | | Load 0x0,0x6 08ca 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08cb e005 | | Load 0x0,0x5 08cc 180e | | Execute Package,Field_Execute,Field_Number 0xe 08cd 4806 |H | Short_Literal 0x6 08ce 0092 0d2e | .| Action Push_String_Extended,0xd2e ; "Remote library for " 08d0 e402 | | Load 0x2,0x2 08d1 01cc | | Execute Vector,Catenate 08d2 0092 0d2f | /| Action Push_String_Extended,0xd2f ; " isn't on search list for " 08d4 01cc | | Execute Vector,Catenate 08d5 e403 | | Load 0x2,0x3 08d6 e002 | | Load 0x0,0x2 08d7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08d8 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 08d9 01cc | | Execute Vector,Catenate 08da e006 | | Load 0x0,0x6 08db 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08dc e5fb | | Load 0x2,-0x5 08dd e007 | | Load 0x0,0x7 08de 1810 | | Execute Package,Field_Execute,Field_Number 0x10 08df c5fb | | Store 0x2,-0x5 08e0 00c8 | | Action Pop_Auxiliary_Range 08e1 3fab |? | Loop_Increasing 0x88d 08e2 4505 |E | Exit_Suprogram New_Top_Offset 0x5 08e3 0000 0000 | | .BLANK 0000[0x5] 08e8 ; -------------------------------------------------------------------------------------- 08e8 ; SUBPROGRAM 08e8 ; -------------------------------------------------------------------------------------- 08e8 08f3 | | .CONST 0x08f3 ; Address of begin 08e9 0004 | | .CONST 0x0004 ; Address of exception handler 08ea 0003 | | .CONST 0x0003 ; Number of locals 08eb INIT_08e8: 08eb e002 | | Load 0x0,0x2 08ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf 08ed 02c7 | | Declare_Variable Any 08ee 00d8 | | Load_Top At_Offset_0 08ef 1c00 | | Execute_Immediate Run_Utility,0x0 08f0 4801 |H | Short_Literal 0x1 08f1 e404 | | Load 0x2,0x4 08f2 8008 | | Call 0x0,0x8 08f3 BODY_08e8: 08f3 4801 |H | Short_Literal 0x1 08f4 00d9 | | Load_Top At_Offset_1 08f5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 08f6 e007 | | Load 0x0,0x7 08f7 1817 | | Execute Package,Field_Execute,Field_Number 0x17 08f8 6818 |h | Jump_Zero 0x911 08f9 e005 | | Load 0x0,0x5 08fa 180e | | Execute Package,Field_Execute,Field_Number 0xe 08fb 4805 |H | Short_Literal 0x5 08fc 00da | | Load_Top At_Offset_2 08fd 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 08fe e007 | | Load 0x0,0x7 08ff 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0900 e006 | | Load 0x0,0x6 0901 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0902 e5fb | | Load 0x2,-0x5 0903 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0905 4802 |H | Short_Literal 0x2 0906 0092 0ce5 | | Action Push_String_Extended,0xce5 ; "Can't get import closure for view " 0908 e404 | | Load 0x2,0x4 0909 e002 | | Load 0x0,0x2 090a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 090b 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 090c 01cc | | Execute Vector,Catenate 090d 8215 | | Call 0x1,0x15 090e c5fb | | Store 0x2,-0x5 090f 00cc | | Action Pop_Block 0910 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0911 00cf | | Action Mark_Auxiliary 0912 00d9 | | Load_Top At_Offset_1 0913 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0914 4801 |H | Short_Literal 0x1 0915 0263 | c | Execute Discrete,Above_Bound 0916 7044 |pD | Jump_Nonzero 0x95b 0917 00d8 | | Load_Top At_Offset_0 0918 e603 | | Load 0x3,0x3 0919 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 091a 01d7 | | Execute Vector,Field_Read 091b c602 | | Store 0x3,0x2 091c e5fd | | Load 0x2,-0x3 091d 681b |h | Jump_Zero 0x939 091e e005 | | Load 0x0,0x5 091f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0920 480a |H | Short_Literal 0xa 0921 0092 0d30 | 0| Action Push_String_Extended,0xd30 ; ". Import_Closure (" 0923 00db | | Load_Top At_Offset_3 0924 00e0 | | Load_Encached Standard_Cache 0925 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0926 01cc | | Execute Vector,Catenate 0927 0092 0d1b | | Action Push_String_Extended,0xd1b ; ", " 0929 01cc | | Execute Vector,Catenate 092a e404 | | Load 0x2,0x4 092b e002 | | Load 0x0,0x2 092c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 092d 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 092e 01cc | | Execute Vector,Catenate 092f 0092 0ce8 | | Action Push_String_Extended,0xce8 ; ") => " 0931 01cc | | Execute Vector,Catenate 0932 e602 | | Load 0x3,0x2 0933 e002 | | Load 0x0,0x2 0934 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0935 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0936 01cc | | Execute Vector,Catenate 0937 e006 | | Load 0x0,0x6 0938 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0939 e602 | | Load 0x3,0x2 093a e5ff | | Load 0x2,-0x1 093b 012f | / | Execute Any,Equal 093c 701c |p | Jump_Nonzero 0x959 093d e602 | | Load 0x3,0x2 093e e404 | | Load 0x2,0x4 093f 012f | / | Execute Any,Equal 0940 7018 |p | Jump_Nonzero 0x959 0941 e5fb | | Load 0x2,-0x5 0942 e5fd | | Load 0x2,-0x3 0943 e5fe | | Load 0x2,-0x2 0944 e5ff | | Load 0x2,-0x1 0945 e602 | | Load 0x3,0x2 0946 821c | | Call 0x1,0x1c 0947 c5fb | | Store 0x2,-0x5 0948 4801 |H | Short_Literal 0x1 0949 e5fb | | Load 0x2,-0x5 094a e007 | | Load 0x0,0x7 094b 1817 | | Execute Package,Field_Execute,Field_Number 0x17 094c 680c |h | Jump_Zero 0x959 094d e005 | | Load 0x0,0x5 094e 180e | | Execute Package,Field_Execute,Field_Number 0xe 094f 4805 |H | Short_Literal 0x5 0950 e5fb | | Load 0x2,-0x5 0951 e007 | | Load 0x0,0x7 0952 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0953 e006 | | Load 0x0,0x6 0954 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0955 e5fb | | Load 0x2,-0x5 0956 e007 | | Load 0x0,0x7 0957 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0958 c5fb | | Store 0x2,-0x5 0959 00c8 | | Action Pop_Auxiliary_Range 095a 3fbc |? | Loop_Increasing 0x917 095b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 095c 0000 0000 | | .BLANK 0000[0x4] 0960 ; -------------------------------------------------------------------------------------- 0960 ; SUBPROGRAM 0960 ; -------------------------------------------------------------------------------------- 0960 0963 | c | .CONST 0x0963 ; Address of begin 0961 0a83 | | .CONST 0x0a83 ; Address of exception handler 0962 0001 | | .CONST 0x0001 ; Number of locals 0963 BODY_0960: 0963 INIT_0960: 0963 00e1 | | Load_Encached Boolean_Cache 0964 e5fc | | Load 0x2,-0x4 0965 e5fd | | Load 0x2,-0x3 0966 e402 | | Load 0x2,0x2 0967 e407 | | Load 0x2,0x7 0968 e009 | | Load 0x0,0x9 0969 1818 | | Execute Package,Field_Execute,Field_Number 0x18 096a c5fc | | Store 0x2,-0x4 096b c405 | | Store 0x2,0x5 096c 4801 |H | Short_Literal 0x1 096d e5fc | | Load 0x2,-0x4 096e e007 | | Load 0x0,0x7 096f 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0970 6824 |h$ | Jump_Zero 0x995 0971 e5fd | | Load 0x2,-0x3 0972 6808 |h | Jump_Zero 0x97b 0973 e005 | | Load 0x0,0x5 0974 180e | | Execute Package,Field_Execute,Field_Number 0xe 0975 4805 |H | Short_Literal 0x5 0976 e5fc | | Load 0x2,-0x4 0977 e007 | | Load 0x0,0x7 0978 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0979 e006 | | Load 0x0,0x6 097a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 097b e5fc | | Load 0x2,-0x4 097c 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 097e 4802 |H | Short_Literal 0x2 097f 0092 0d31 | 1| Action Push_String_Extended,0xd31 ; "Can't tell whether Ada library \x22" 0981 e407 | | Load 0x2,0x7 0982 01cc | | Execute Vector,Catenate 0983 0092 0d32 | 2| Action Push_String_Extended,0xd32 ; "\x22 exists on machine \x22" 0985 01cc | | Execute Vector,Catenate 0986 e5fe | | Load 0x2,-0x2 0987 01cc | | Execute Vector,Catenate 0988 0092 0d04 | | Action Push_String_Extended,0xd04 ; "\x22" 098a 01cc | | Execute Vector,Catenate 098b 8215 | | Call 0x1,0x15 098c c5fc | | Store 0x2,-0x4 098d e403 | | Load 0x2,0x3 098e e5fd | | Load 0x2,-0x3 098f e402 | | Load 0x2,0x2 0990 e009 | | Load 0x0,0x9 0991 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0992 c403 | | Store 0x2,0x3 0993 00cc | | Action Pop_Block 0994 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0995 e405 | | Load 0x2,0x5 0996 6814 |h | Jump_Zero 0x9ab 0997 e005 | | Load 0x0,0x5 0998 180e | | Execute Package,Field_Execute,Field_Number 0xe 0999 4806 |H | Short_Literal 0x6 099a 0092 0d33 | 3| Action Push_String_Extended,0xd33 ; "An Ada library already exists in remote directory \x22" 099c e5ff | | Load 0x2,-0x1 099d 01cc | | Execute Vector,Catenate 099e 0092 0d04 | | Action Push_String_Extended,0xd04 ; "\x22" 09a0 01cc | | Execute Vector,Catenate 09a1 e006 | | Load 0x0,0x6 09a2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 09a3 e403 | | Load 0x2,0x3 09a4 e5fd | | Load 0x2,-0x3 09a5 e402 | | Load 0x2,0x2 09a6 e009 | | Load 0x0,0x9 09a7 1811 | | Execute Package,Field_Execute,Field_Number 0x11 09a8 c403 | | Store 0x2,0x3 09a9 00cc | | Action Pop_Block 09aa 4504 |E | Exit_Suprogram New_Top_Offset 0x4 09ab 00e1 | | Load_Encached Boolean_Cache 09ac e5fc | | Load 0x2,-0x4 09ad e5fd | | Load 0x2,-0x3 09ae e402 | | Load 0x2,0x2 09af e5ff | | Load 0x2,-0x1 09b0 e009 | | Load 0x0,0x9 09b1 1818 | | Execute Package,Field_Execute,Field_Number 0x18 09b2 c5fc | | Store 0x2,-0x4 09b3 c404 | | Store 0x2,0x4 09b4 4801 |H | Short_Literal 0x1 09b5 e5fc | | Load 0x2,-0x4 09b6 e007 | | Load 0x0,0x7 09b7 1817 | | Execute Package,Field_Execute,Field_Number 0x17 09b8 6824 |h$ | Jump_Zero 0x9dd 09b9 e5fd | | Load 0x2,-0x3 09ba 6808 |h | Jump_Zero 0x9c3 09bb e005 | | Load 0x0,0x5 09bc 180e | | Execute Package,Field_Execute,Field_Number 0xe 09bd 4805 |H | Short_Literal 0x5 09be e5fc | | Load 0x2,-0x4 09bf e007 | | Load 0x0,0x7 09c0 1819 | | Execute Package,Field_Execute,Field_Number 0x19 09c1 e006 | | Load 0x0,0x6 09c2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 09c3 e5fc | | Load 0x2,-0x4 09c4 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 09c6 4802 |H | Short_Literal 0x2 09c7 0092 0d34 | 4| Action Push_String_Extended,0xd34 ; "Can't tell whether directory \x22" 09c9 e5ff | | Load 0x2,-0x1 09ca 01cc | | Execute Vector,Catenate 09cb 0092 0d32 | 2| Action Push_String_Extended,0xd32 ; "\x22 exists on machine \x22" 09cd 01cc | | Execute Vector,Catenate 09ce e5fe | | Load 0x2,-0x2 09cf 01cc | | Execute Vector,Catenate 09d0 0092 0d04 | | Action Push_String_Extended,0xd04 ; "\x22" 09d2 01cc | | Execute Vector,Catenate 09d3 8215 | | Call 0x1,0x15 09d4 c5fc | | Store 0x2,-0x4 09d5 e403 | | Load 0x2,0x3 09d6 e5fd | | Load 0x2,-0x3 09d7 e402 | | Load 0x2,0x2 09d8 e009 | | Load 0x0,0x9 09d9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 09da c403 | | Store 0x2,0x3 09db 00cc | | Action Pop_Block 09dc 4504 |E | Exit_Suprogram New_Top_Offset 0x4 09dd e404 | | Load 0x2,0x4 09de 6814 |h | Jump_Zero 0x9f3 09df e005 | | Load 0x0,0x5 09e0 180e | | Execute Package,Field_Execute,Field_Number 0xe 09e1 4806 |H | Short_Literal 0x6 09e2 0092 0d35 | 5| Action Push_String_Extended,0xd35 ; "Directory \x22" 09e4 e5ff | | Load 0x2,-0x1 09e5 01cc | | Execute Vector,Catenate 09e6 0092 0d36 | 6| Action Push_String_Extended,0xd36 ; "\x22 already exists" 09e8 01cc | | Execute Vector,Catenate 09e9 e006 | | Load 0x0,0x6 09ea 1813 | | Execute Package,Field_Execute,Field_Number 0x13 09eb e005 | | Load 0x0,0x5 09ec 180e | | Execute Package,Field_Execute,Field_Number 0xe 09ed 4802 |H | Short_Literal 0x2 09ee 0092 0d37 | 7| Action Push_String_Extended,0xd37 ; "Using an existing directory" 09f0 e006 | | Load 0x0,0x6 09f1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 09f2 7847 |xG | Jump 0xa3a 09f3 e005 | | Load 0x0,0x5 09f4 180e | | Execute Package,Field_Execute,Field_Number 0xe 09f5 4802 |H | Short_Literal 0x2 09f6 0092 0d38 | 8| Action Push_String_Extended,0xd38 ; "Creating the new remote directory \x22" 09f8 e5ff | | Load 0x2,-0x1 09f9 01cc | | Execute Vector,Catenate 09fa 0092 0d04 | | Action Push_String_Extended,0xd04 ; "\x22" 09fc 01cc | | Execute Vector,Catenate 09fd e006 | | Load 0x0,0x6 09fe 1813 | | Execute Package,Field_Execute,Field_Number 0x13 09ff e5fd | | Load 0x2,-0x3 0a00 680a |h | Jump_Zero 0xa0b 0a01 e005 | | Load 0x0,0x5 0a02 180e | | Execute Package,Field_Execute,Field_Number 0xe 0a03 480a |H | Short_Literal 0xa 0a04 0092 0d39 | 9| Action Push_String_Extended,0xd39 ; "Create_Dir_Command" 0a06 e408 | | Load 0x2,0x8 0a07 8218 | | Call 0x1,0x18 0a08 01cc | | Execute Vector,Catenate 0a09 e006 | | Load 0x0,0x6 0a0a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a0b e5fc | | Load 0x2,-0x4 0a0c e5fd | | Load 0x2,-0x3 0a0d 4801 |H | Short_Literal 0x1 0a0e 4800 |H | Short_Literal 0x0 0a0f 4800 |H | Short_Literal 0x0 0a10 00ea | | Load_Encached Null_String_Cache 0a11 e402 | | Load 0x2,0x2 0a12 e408 | | Load 0x2,0x8 0a13 e009 | | Load 0x0,0x9 0a14 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0a15 c5fc | | Store 0x2,-0x4 0a16 4801 |H | Short_Literal 0x1 0a17 e5fc | | Load 0x2,-0x4 0a18 e007 | | Load 0x0,0x7 0a19 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0a1a 681f |h | Jump_Zero 0xa3a 0a1b e5fd | | Load 0x2,-0x3 0a1c 6808 |h | Jump_Zero 0xa25 0a1d e005 | | Load 0x0,0x5 0a1e 180e | | Execute Package,Field_Execute,Field_Number 0xe 0a1f 4805 |H | Short_Literal 0x5 0a20 e5fc | | Load 0x2,-0x4 0a21 e007 | | Load 0x0,0x7 0a22 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0a23 e006 | | Load 0x0,0x6 0a24 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a25 e5fc | | Load 0x2,-0x4 0a26 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0a28 4802 |H | Short_Literal 0x2 0a29 0092 0d3a | :| Action Push_String_Extended,0xd3a ; "Can't create remote directory \x22" 0a2b e5ff | | Load 0x2,-0x1 0a2c 01cc | | Execute Vector,Catenate 0a2d 0092 0d04 | | Action Push_String_Extended,0xd04 ; "\x22" 0a2f 01cc | | Execute Vector,Catenate 0a30 8215 | | Call 0x1,0x15 0a31 c5fc | | Store 0x2,-0x4 0a32 e403 | | Load 0x2,0x3 0a33 e5fd | | Load 0x2,-0x3 0a34 e402 | | Load 0x2,0x2 0a35 e009 | | Load 0x0,0x9 0a36 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0a37 c403 | | Store 0x2,0x3 0a38 00cc | | Action Pop_Block 0a39 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0a3a e5fd | | Load 0x2,-0x3 0a3b 6814 |h | Jump_Zero 0xa50 0a3c e005 | | Load 0x0,0x5 0a3d 180e | | Execute Package,Field_Execute,Field_Number 0xe 0a3e 480a |H | Short_Literal 0xa 0a3f 0092 0d3b | ;| Action Push_String_Extended,0xd3b ; "Set_the_VADS_PATH_on" 0a41 e014 | | Load 0x0,0x14 0a42 8218 | | Call 0x1,0x18 0a43 01cc | | Execute Vector,Catenate 0a44 e006 | | Load 0x0,0x6 0a45 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a46 e005 | | Load 0x0,0x5 0a47 180e | | Execute Package,Field_Execute,Field_Number 0xe 0a48 480a |H | Short_Literal 0xa 0a49 0092 0d3c | <| Action Push_String_Extended,0xd3c ; "Create_Ada_Lib_Command" 0a4b e409 | | Load 0x2,0x9 0a4c 8218 | | Call 0x1,0x18 0a4d 01cc | | Execute Vector,Catenate 0a4e e006 | | Load 0x0,0x6 0a4f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a50 e5fc | | Load 0x2,-0x4 0a51 e5fd | | Load 0x2,-0x3 0a52 4801 |H | Short_Literal 0x1 0a53 4800 |H | Short_Literal 0x0 0a54 4800 |H | Short_Literal 0x0 0a55 00ea | | Load_Encached Null_String_Cache 0a56 e402 | | Load 0x2,0x2 0a57 e014 | | Load 0x0,0x14 0a58 e009 | | Load 0x0,0x9 0a59 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0a5a c5fc | | Store 0x2,-0x4 0a5b e5fc | | Load 0x2,-0x4 0a5c e5fd | | Load 0x2,-0x3 0a5d 4801 |H | Short_Literal 0x1 0a5e 4800 |H | Short_Literal 0x0 0a5f 4800 |H | Short_Literal 0x0 0a60 00ea | | Load_Encached Null_String_Cache 0a61 e402 | | Load 0x2,0x2 0a62 e409 | | Load 0x2,0x9 0a63 e009 | | Load 0x0,0x9 0a64 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0a65 c5fc | | Store 0x2,-0x4 0a66 4801 |H | Short_Literal 0x1 0a67 e5fc | | Load 0x2,-0x4 0a68 e007 | | Load 0x0,0x7 0a69 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0a6a 6817 |h | Jump_Zero 0xa82 0a6b e5fd | | Load 0x2,-0x3 0a6c 6808 |h | Jump_Zero 0xa75 0a6d e005 | | Load 0x0,0x5 0a6e 180e | | Execute Package,Field_Execute,Field_Number 0xe 0a6f 4805 |H | Short_Literal 0x5 0a70 e5fc | | Load 0x2,-0x4 0a71 e007 | | Load 0x0,0x7 0a72 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0a73 e006 | | Load 0x0,0x6 0a74 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a75 e5fc | | Load 0x2,-0x4 0a76 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0a78 4802 |H | Short_Literal 0x2 0a79 0092 0d3d | =| Action Push_String_Extended,0xd3d ; "Can't create an Ada library in remote directory \x22" 0a7b e5ff | | Load 0x2,-0x1 0a7c 01cc | | Execute Vector,Catenate 0a7d 0092 0d04 | | Action Push_String_Extended,0xd04 ; "\x22" 0a7f 01cc | | Execute Vector,Catenate 0a80 8215 | | Call 0x1,0x15 0a81 c5fc | | Store 0x2,-0x4 0a82 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a83 TRAP_0960: 0a83 0007 | | Action Break_Optional 0a84 e403 | | Load 0x2,0x3 0a85 e5fd | | Load 0x2,-0x3 0a86 e402 | | Load 0x2,0x2 0a87 e009 | | Load 0x0,0x9 0a88 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0a89 c403 | | Store 0x2,0x3 0a8a 00d8 | | Load_Top At_Offset_0 0a8b 0101 | | Execute Exception,Reraise 0a8c 0000 0000 | | .BLANK 0000[0x4] 0a90 ; -------------------------------------------------------------------------------------- 0a90 ; SUBPROGRAM 0a90 ; -------------------------------------------------------------------------------------- 0a90 0a95 | | .CONST 0x0a95 ; Address of begin 0a91 0bdd | | .CONST 0x0bdd ; Address of exception handler 0a92 0002 | | .CONST 0x0002 ; Number of locals 0a93 INIT_0a90: 0a93 029f 0c53 | S| Declare_Subprogram INIT_0c50,For_Call 0a95 BODY_0a90: 0a95 00e1 | | Load_Encached Boolean_Cache 0a96 e5fb | | Load 0x2,-0x5 0a97 e5fc | | Load 0x2,-0x4 0a98 e402 | | Load 0x2,0x2 0a99 e405 | | Load 0x2,0x5 0a9a e009 | | Load 0x0,0x9 0a9b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0a9c c5fb | | Store 0x2,-0x5 0a9d c403 | | Store 0x2,0x3 0a9e 4801 |H | Short_Literal 0x1 0a9f e5fb | | Load 0x2,-0x5 0aa0 e007 | | Load 0x0,0x7 0aa1 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0aa2 6824 |h$ | Jump_Zero 0xac7 0aa3 e5fc | | Load 0x2,-0x4 0aa4 6808 |h | Jump_Zero 0xaad 0aa5 e005 | | Load 0x0,0x5 0aa6 180e | | Execute Package,Field_Execute,Field_Number 0xe 0aa7 4805 |H | Short_Literal 0x5 0aa8 e5fb | | Load 0x2,-0x5 0aa9 e007 | | Load 0x0,0x7 0aaa 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0aab e006 | | Load 0x0,0x6 0aac 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0aad e5fb | | Load 0x2,-0x5 0aae 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0ab0 4802 |H | Short_Literal 0x2 0ab1 0092 0d3e | >| Action Push_String_Extended,0xd3e ; "Can't tell whether Ada library exists in directory \x22" 0ab3 e5fe | | Load 0x2,-0x2 0ab4 01cc | | Execute Vector,Catenate 0ab5 0092 0d3f | ?| Action Push_String_Extended,0xd3f ; "\x22 on machine \x22" 0ab7 01cc | | Execute Vector,Catenate 0ab8 e5fd | | Load 0x2,-0x3 0ab9 01cc | | Execute Vector,Catenate 0aba 0092 0d04 | | Action Push_String_Extended,0xd04 ; "\x22" 0abc 01cc | | Execute Vector,Catenate 0abd 8215 | | Call 0x1,0x15 0abe c5fb | | Store 0x2,-0x5 0abf e404 | | Load 0x2,0x4 0ac0 e5fc | | Load 0x2,-0x4 0ac1 e402 | | Load 0x2,0x2 0ac2 e009 | | Load 0x0,0x9 0ac3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0ac4 c404 | | Store 0x2,0x4 0ac5 00cc | | Action Pop_Block 0ac6 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0ac7 e403 | | Load 0x2,0x3 0ac8 701e |p | Jump_Nonzero 0xae7 0ac9 e005 | | Load 0x0,0x5 0aca 180e | | Execute Package,Field_Execute,Field_Number 0xe 0acb 4805 |H | Short_Literal 0x5 0acc 0092 0d40 | @| Action Push_String_Extended,0xd40 ; "There is no remote Ada library in directory \x22" 0ace e5fe | | Load 0x2,-0x2 0acf 01cc | | Execute Vector,Catenate 0ad0 0092 0d41 | A| Action Push_String_Extended,0xd41 ; "\x22 on machine " 0ad2 01cc | | Execute Vector,Catenate 0ad3 e5fd | | Load 0x2,-0x3 0ad4 01cc | | Execute Vector,Catenate 0ad5 e006 | | Load 0x0,0x6 0ad6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0ad7 e5fb | | Load 0x2,-0x5 0ad8 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0ada 4802 |H | Short_Literal 0x2 0adb 0092 0d42 | B| Action Push_String_Extended,0xd42 ; "Can't destroy remote library" 0add 8215 | | Call 0x1,0x15 0ade c5fb | | Store 0x2,-0x5 0adf e404 | | Load 0x2,0x4 0ae0 e5fc | | Load 0x2,-0x4 0ae1 e402 | | Load 0x2,0x2 0ae2 e009 | | Load 0x0,0x9 0ae3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0ae4 c404 | | Store 0x2,0x4 0ae5 00cc | | Action Pop_Block 0ae6 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0ae7 8602 | | Call 0x3,0x2 0ae8 e5fc | | Load 0x2,-0x4 0ae9 680a |h | Jump_Zero 0xaf4 0aea e005 | | Load 0x0,0x5 0aeb 180e | | Execute Package,Field_Execute,Field_Number 0xe 0aec 480a |H | Short_Literal 0xa 0aed 0092 0d43 | C| Action Push_String_Extended,0xd43 ; "Executing command" 0aef e406 | | Load 0x2,0x6 0af0 8218 | | Call 0x1,0x18 0af1 01cc | | Execute Vector,Catenate 0af2 e006 | | Load 0x0,0x6 0af3 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0af4 e5fb | | Load 0x2,-0x5 0af5 e5fc | | Load 0x2,-0x4 0af6 4801 |H | Short_Literal 0x1 0af7 4800 |H | Short_Literal 0x0 0af8 4800 |H | Short_Literal 0x0 0af9 00ea | | Load_Encached Null_String_Cache 0afa e402 | | Load 0x2,0x2 0afb e406 | | Load 0x2,0x6 0afc e009 | | Load 0x0,0x9 0afd 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0afe c5fb | | Store 0x2,-0x5 0aff 4801 |H | Short_Literal 0x1 0b00 e5fb | | Load 0x2,-0x5 0b01 e007 | | Load 0x0,0x7 0b02 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0b03 6815 |h | Jump_Zero 0xb19 0b04 e5fc | | Load 0x2,-0x4 0b05 6808 |h | Jump_Zero 0xb0e 0b06 e005 | | Load 0x0,0x5 0b07 180e | | Execute Package,Field_Execute,Field_Number 0xe 0b08 4805 |H | Short_Literal 0x5 0b09 e5fb | | Load 0x2,-0x5 0b0a e007 | | Load 0x0,0x7 0b0b 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0b0c e006 | | Load 0x0,0x6 0b0d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0b0e e5fb | | Load 0x2,-0x5 0b0f 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0b11 4802 |H | Short_Literal 0x2 0b12 0092 0d44 | D| Action Push_String_Extended,0xd44 ; "Can't unprotect " 0b14 e5fe | | Load 0x2,-0x2 0b15 01cc | | Execute Vector,Catenate 0b16 8215 | | Call 0x1,0x15 0b17 c5fb | | Store 0x2,-0x5 0b18 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0b19 e5fc | | Load 0x2,-0x4 0b1a 680a |h | Jump_Zero 0xb25 0b1b e005 | | Load 0x0,0x5 0b1c 180e | | Execute Package,Field_Execute,Field_Number 0xe 0b1d 480a |H | Short_Literal 0xa 0b1e 0092 0d43 | C| Action Push_String_Extended,0xd43 ; "Executing command" 0b20 e407 | | Load 0x2,0x7 0b21 8218 | | Call 0x1,0x18 0b22 01cc | | Execute Vector,Catenate 0b23 e006 | | Load 0x0,0x6 0b24 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0b25 e5fb | | Load 0x2,-0x5 0b26 e5fc | | Load 0x2,-0x4 0b27 4801 |H | Short_Literal 0x1 0b28 4800 |H | Short_Literal 0x0 0b29 4800 |H | Short_Literal 0x0 0b2a 00ea | | Load_Encached Null_String_Cache 0b2b e402 | | Load 0x2,0x2 0b2c e407 | | Load 0x2,0x7 0b2d e009 | | Load 0x0,0x9 0b2e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0b2f c5fb | | Store 0x2,-0x5 0b30 4801 |H | Short_Literal 0x1 0b31 e5fb | | Load 0x2,-0x5 0b32 e007 | | Load 0x0,0x7 0b33 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0b34 6815 |h | Jump_Zero 0xb4a 0b35 e5fc | | Load 0x2,-0x4 0b36 6808 |h | Jump_Zero 0xb3f 0b37 e005 | | Load 0x0,0x5 0b38 180e | | Execute Package,Field_Execute,Field_Number 0xe 0b39 4805 |H | Short_Literal 0x5 0b3a e5fb | | Load 0x2,-0x5 0b3b e007 | | Load 0x0,0x7 0b3c 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0b3d e006 | | Load 0x0,0x6 0b3e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0b3f e5fb | | Load 0x2,-0x5 0b40 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0b42 4802 |H | Short_Literal 0x2 0b43 0092 0d45 | E| Action Push_String_Extended,0xd45 ; "Can't destroy the remote Ada library " 0b45 e5fe | | Load 0x2,-0x2 0b46 01cc | | Execute Vector,Catenate 0b47 8215 | | Call 0x1,0x15 0b48 c5fb | | Store 0x2,-0x5 0b49 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0b4a e5fc | | Load 0x2,-0x4 0b4b 680a |h | Jump_Zero 0xb56 0b4c e005 | | Load 0x0,0x5 0b4d 180e | | Execute Package,Field_Execute,Field_Number 0xe 0b4e 480a |H | Short_Literal 0xa 0b4f 0092 0d43 | C| Action Push_String_Extended,0xd43 ; "Executing command" 0b51 e408 | | Load 0x2,0x8 0b52 8218 | | Call 0x1,0x18 0b53 01cc | | Execute Vector,Catenate 0b54 e006 | | Load 0x0,0x6 0b55 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0b56 e5fb | | Load 0x2,-0x5 0b57 e5fc | | Load 0x2,-0x4 0b58 4801 |H | Short_Literal 0x1 0b59 4800 |H | Short_Literal 0x0 0b5a 4800 |H | Short_Literal 0x0 0b5b 00ea | | Load_Encached Null_String_Cache 0b5c e402 | | Load 0x2,0x2 0b5d e408 | | Load 0x2,0x8 0b5e e009 | | Load 0x0,0x9 0b5f 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0b60 c5fb | | Store 0x2,-0x5 0b61 4801 |H | Short_Literal 0x1 0b62 e5fb | | Load 0x2,-0x5 0b63 e007 | | Load 0x0,0x7 0b64 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0b65 6815 |h | Jump_Zero 0xb7b 0b66 e5fc | | Load 0x2,-0x4 0b67 6808 |h | Jump_Zero 0xb70 0b68 e005 | | Load 0x0,0x5 0b69 180e | | Execute Package,Field_Execute,Field_Number 0xe 0b6a 4806 |H | Short_Literal 0x6 0b6b e5fb | | Load 0x2,-0x5 0b6c e007 | | Load 0x0,0x7 0b6d 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0b6e e006 | | Load 0x0,0x6 0b6f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0b70 e5fb | | Load 0x2,-0x5 0b71 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0b73 4801 |H | Short_Literal 0x1 0b74 0092 0d46 | F| Action Push_String_Extended,0xd46 ; "Can't destroy the files in remote directory " 0b76 e5fe | | Load 0x2,-0x2 0b77 01cc | | Execute Vector,Catenate 0b78 8215 | | Call 0x1,0x15 0b79 c5fb | | Store 0x2,-0x5 0b7a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0b7b e5fc | | Load 0x2,-0x4 0b7c 680a |h | Jump_Zero 0xb87 0b7d e005 | | Load 0x0,0x5 0b7e 180e | | Execute Package,Field_Execute,Field_Number 0xe 0b7f 480a |H | Short_Literal 0xa 0b80 0092 0d43 | C| Action Push_String_Extended,0xd43 ; "Executing command" 0b82 e409 | | Load 0x2,0x9 0b83 8218 | | Call 0x1,0x18 0b84 01cc | | Execute Vector,Catenate 0b85 e006 | | Load 0x0,0x6 0b86 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0b87 e5fb | | Load 0x2,-0x5 0b88 e5fc | | Load 0x2,-0x4 0b89 4801 |H | Short_Literal 0x1 0b8a 4800 |H | Short_Literal 0x0 0b8b 4800 |H | Short_Literal 0x0 0b8c 00ea | | Load_Encached Null_String_Cache 0b8d e402 | | Load 0x2,0x2 0b8e e409 | | Load 0x2,0x9 0b8f e009 | | Load 0x0,0x9 0b90 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0b91 c5fb | | Store 0x2,-0x5 0b92 4801 |H | Short_Literal 0x1 0b93 e5fb | | Load 0x2,-0x5 0b94 e007 | | Load 0x0,0x7 0b95 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0b96 6815 |h | Jump_Zero 0xbac 0b97 e5fc | | Load 0x2,-0x4 0b98 6808 |h | Jump_Zero 0xba1 0b99 e005 | | Load 0x0,0x5 0b9a 180e | | Execute Package,Field_Execute,Field_Number 0xe 0b9b 4806 |H | Short_Literal 0x6 0b9c e5fb | | Load 0x2,-0x5 0b9d e007 | | Load 0x0,0x7 0b9e 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0b9f e006 | | Load 0x0,0x6 0ba0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0ba1 e5fb | | Load 0x2,-0x5 0ba2 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0ba4 4801 |H | Short_Literal 0x1 0ba5 0092 0d47 | G| Action Push_String_Extended,0xd47 ; "Can't destroy the '.options' file in remote directory " 0ba7 e5fe | | Load 0x2,-0x2 0ba8 01cc | | Execute Vector,Catenate 0ba9 8215 | | Call 0x1,0x15 0baa c5fb | | Store 0x2,-0x5 0bab 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0bac e5fc | | Load 0x2,-0x4 0bad 680a |h | Jump_Zero 0xbb8 0bae e005 | | Load 0x0,0x5 0baf 180e | | Execute Package,Field_Execute,Field_Number 0xe 0bb0 480a |H | Short_Literal 0xa 0bb1 0092 0d43 | C| Action Push_String_Extended,0xd43 ; "Executing command" 0bb3 e40a | | Load 0x2,0xa 0bb4 8218 | | Call 0x1,0x18 0bb5 01cc | | Execute Vector,Catenate 0bb6 e006 | | Load 0x0,0x6 0bb7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0bb8 e5fb | | Load 0x2,-0x5 0bb9 e5fc | | Load 0x2,-0x4 0bba 4801 |H | Short_Literal 0x1 0bbb 4800 |H | Short_Literal 0x0 0bbc 4800 |H | Short_Literal 0x0 0bbd 00ea | | Load_Encached Null_String_Cache 0bbe e402 | | Load 0x2,0x2 0bbf e40a | | Load 0x2,0xa 0bc0 e009 | | Load 0x0,0x9 0bc1 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0bc2 c5fb | | Store 0x2,-0x5 0bc3 4801 |H | Short_Literal 0x1 0bc4 e5fb | | Load 0x2,-0x5 0bc5 e007 | | Load 0x0,0x7 0bc6 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0bc7 6814 |h | Jump_Zero 0xbdc 0bc8 e5fc | | Load 0x2,-0x4 0bc9 6808 |h | Jump_Zero 0xbd2 0bca e005 | | Load 0x0,0x5 0bcb 180e | | Execute Package,Field_Execute,Field_Number 0xe 0bcc 4806 |H | Short_Literal 0x6 0bcd e5fb | | Load 0x2,-0x5 0bce e007 | | Load 0x0,0x7 0bcf 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0bd0 e006 | | Load 0x0,0x6 0bd1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0bd2 e5fb | | Load 0x2,-0x5 0bd3 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0bd5 4801 |H | Short_Literal 0x1 0bd6 0092 0d48 | H| Action Push_String_Extended,0xd48 ; "Can't destroy the remote directory " 0bd8 e5fe | | Load 0x2,-0x2 0bd9 01cc | | Execute Vector,Catenate 0bda 8215 | | Call 0x1,0x15 0bdb c5fb | | Store 0x2,-0x5 0bdc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0bdd TRAP_0a90: 0bdd 0007 | | Action Break_Optional 0bde e404 | | Load 0x2,0x4 0bdf e5fc | | Load 0x2,-0x4 0be0 e402 | | Load 0x2,0x2 0be1 e009 | | Load 0x0,0x9 0be2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0be3 c404 | | Store 0x2,0x4 0be4 00d8 | | Load_Top At_Offset_0 0be5 0101 | | Execute Exception,Reraise 0be6 0000 0000 | | .XXX[0x2] 0be8 ; -------------------------------------------------------------------------------------- 0be8 ; SUBPROGRAM 0be8 ; -------------------------------------------------------------------------------------- 0be8 0bfa | | .CONST 0x0bfa ; Address of begin 0be9 0004 | | .CONST 0x0004 ; Address of exception handler 0bea 0003 | | .CONST 0x0003 ; Number of locals 0beb INIT_0be8: 0beb e007 | | Load 0x0,0x7 0bec 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0bed 02c7 | | Declare_Variable Any 0bee 00d8 | | Load_Top At_Offset_0 0bef 1c00 | | Execute_Immediate Run_Utility,0x0 0bf0 e00a | | Load 0x0,0xa 0bf1 0092 0d49 | I| Action Push_String_Extended,0xd49 ; "a.path>a.path_temp;egrep -s " 0bf3 01cc | | Execute Vector,Catenate 0bf4 e7ff | | Load 0x3,-0x1 0bf5 01cc | | Execute Vector,Catenate 0bf6 0092 0d4a | J| Action Push_String_Extended,0xd4a ; " a.path_temp" 0bf8 01cc | | Execute Vector,Catenate 0bf9 0007 | | Action Break_Optional 0bfa BODY_0be8: 0bfa e5fc | | Load 0x2,-0x4 0bfb 680d |h | Jump_Zero 0xc09 0bfc e005 | | Load 0x0,0x5 0bfd 180e | | Execute Package,Field_Execute,Field_Number 0xe 0bfe 4809 |H | Short_Literal 0x9 0bff 0092 0d4b | K| Action Push_String_Extended,0xd4b ; "Import_Exists (Remote_View" 0c01 e7ff | | Load 0x3,-0x1 0c02 8218 | | Call 0x1,0x18 0c03 01cc | | Execute Vector,Catenate 0c04 0092 0cdd | | Action Push_String_Extended,0xcdd ; ")" 0c06 01cc | | Execute Vector,Catenate 0c07 e006 | | Load 0x0,0x6 0c08 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0c09 4800 |H | Short_Literal 0x0 0c0a a7fe | | Store_Unchecked 0x3,-0x2 0c0b e5fc | | Load 0x2,-0x4 0c0c 680a |h | Jump_Zero 0xc17 0c0d e005 | | Load 0x0,0x5 0c0e 180e | | Execute Package,Field_Execute,Field_Number 0xe 0c0f 480a |H | Short_Literal 0xa 0c10 0092 0d4c | L| Action Push_String_Extended,0xd4c ; "Import_Exists_Command" 0c12 00db | | Load_Top At_Offset_3 0c13 8218 | | Call 0x1,0x18 0c14 01cc | | Execute Vector,Catenate 0c15 e006 | | Load 0x0,0x6 0c16 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0c17 00d9 | | Load_Top At_Offset_1 0c18 e5fc | | Load 0x2,-0x4 0c19 4801 |H | Short_Literal 0x1 0c1a 4800 |H | Short_Literal 0x0 0c1b 4800 |H | Short_Literal 0x0 0c1c 00ea | | Load_Encached Null_String_Cache 0c1d e5fd | | Load 0x2,-0x3 0c1e e603 | | Load 0x3,0x3 0c1f e009 | | Load 0x0,0x9 0c20 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0c21 c602 | | Store 0x3,0x2 0c22 4801 |H | Short_Literal 0x1 0c23 00da | | Load_Top At_Offset_2 0c24 e007 | | Load 0x0,0x7 0c25 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0c26 6817 |h | Jump_Zero 0xc3e 0c27 e5fc | | Load 0x2,-0x4 0c28 6814 |h | Jump_Zero 0xc3d 0c29 e005 | | Load 0x0,0x5 0c2a 180e | | Execute Package,Field_Execute,Field_Number 0xe 0c2b 480a |H | Short_Literal 0xa 0c2c 00db | | Load_Top At_Offset_3 0c2d e007 | | Load 0x0,0x7 0c2e 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0c2f e006 | | Load 0x0,0x6 0c30 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0c31 e005 | | Load 0x0,0x5 0c32 180e | | Execute Package,Field_Execute,Field_Number 0xe 0c33 4802 |H | Short_Literal 0x2 0c34 0092 0d4d | M| Action Push_String_Extended,0xd4d ; "View \x22" 0c36 e7ff | | Load 0x3,-0x1 0c37 01cc | | Execute Vector,Catenate 0c38 0092 0d4e | N| Action Push_String_Extended,0xd4e ; "\x22 has not yet been imported" 0c3a 01cc | | Execute Vector,Catenate 0c3b e006 | | Load 0x0,0x6 0c3c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0c3d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0c3e e5fc | | Load 0x2,-0x4 0c3f 680c |h | Jump_Zero 0xc4c 0c40 e005 | | Load 0x0,0x5 0c41 180e | | Execute Package,Field_Execute,Field_Number 0xe 0c42 4802 |H | Short_Literal 0x2 0c43 0092 0d4d | M| Action Push_String_Extended,0xd4d ; "View \x22" 0c45 e7ff | | Load 0x3,-0x1 0c46 01cc | | Execute Vector,Catenate 0c47 0092 0d4f | O| Action Push_String_Extended,0xd4f ; "\x22 was previously imported" 0c49 01cc | | Execute Vector,Catenate 0c4a e006 | | Load 0x0,0x6 0c4b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0c4c 4801 |H | Short_Literal 0x1 0c4d a7fe | | Store_Unchecked 0x3,-0x2 0c4e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0c4f 0000 | | .XXX[0x1] 0c50 ; -------------------------------------------------------------------------------------- 0c50 ; SUBPROGRAM 0c50 ; -------------------------------------------------------------------------------------- 0c50 0c5b | [ | .CONST 0x0c5b ; Address of begin 0c51 0004 | | .CONST 0x0004 ; Address of exception handler 0c52 0003 | | .CONST 0x0003 ; Number of locals 0c53 INIT_0c50: 0c53 e002 | | Load 0x0,0x2 0c54 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0c55 02c7 | | Declare_Variable Any 0c56 00d8 | | Load_Top At_Offset_0 0c57 1c00 | | Execute_Immediate Run_Utility,0x0 0c58 4801 |H | Short_Literal 0x1 0c59 e5ff | | Load 0x2,-0x1 0c5a 8012 | | Call 0x0,0x12 0c5b BODY_0c50: 0c5b 4801 |H | Short_Literal 0x1 0c5c 00d9 | | Load_Top At_Offset_1 0c5d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0c5e e007 | | Load 0x0,0x7 0c5f 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0c60 6821 |h! | Jump_Zero 0xc82 0c61 e5fc | | Load 0x2,-0x4 0c62 6809 |h | Jump_Zero 0xc6c 0c63 e005 | | Load 0x0,0x5 0c64 180e | | Execute Package,Field_Execute,Field_Number 0xe 0c65 4805 |H | Short_Literal 0x5 0c66 00da | | Load_Top At_Offset_2 0c67 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0c68 e007 | | Load 0x0,0x7 0c69 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0c6a e006 | | Load 0x0,0x6 0c6b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0c6c e5fb | | Load 0x2,-0x5 0c6d 0092 0cdf | | Action Push_String_Extended,0xcdf ; "Library_Extensions Error" 0c6f 4802 |H | Short_Literal 0x2 0c70 0092 0d19 | | Action Push_String_Extended,0xd19 ; "Can't get referencers for view " 0c72 e5ff | | Load 0x2,-0x1 0c73 e002 | | Load 0x0,0x2 0c74 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0c75 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0c76 01cc | | Execute Vector,Catenate 0c77 8215 | | Call 0x1,0x15 0c78 c5fb | | Store 0x2,-0x5 0c79 e404 | | Load 0x2,0x4 0c7a e5fc | | Load 0x2,-0x4 0c7b e402 | | Load 0x2,0x2 0c7c e009 | | Load 0x0,0x9 0c7d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0c7e c404 | | Store 0x2,0x4 0c7f 00cc | | Action Pop_Block 0c80 00cc | | Action Pop_Block 0c81 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0c82 00cf | | Action Mark_Auxiliary 0c83 00d9 | | Load_Top At_Offset_1 0c84 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0c85 4801 |H | Short_Literal 0x1 0c86 0263 | c | Execute Discrete,Above_Bound 0c87 7051 |pQ | Jump_Nonzero 0xcd9 0c88 00d8 | | Load_Top At_Offset_0 0c89 e803 | | Load 0x4,0x3 0c8a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0c8b 01d7 | | Execute Vector,Field_Read 0c8c c802 | | Store 0x4,0x2 0c8d e5fc | | Load 0x2,-0x4 0c8e 681b |h | Jump_Zero 0xcaa 0c8f e005 | | Load 0x0,0x5 0c90 180e | | Execute Package,Field_Execute,Field_Number 0xe 0c91 480a |H | Short_Literal 0xa 0c92 0092 0d1a | | Action Push_String_Extended,0xd1a ; ". Referencers (" 0c94 00db | | Load_Top At_Offset_3 0c95 00e0 | | Load_Encached Standard_Cache 0c96 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c97 01cc | | Execute Vector,Catenate 0c98 0092 0d1b | | Action Push_String_Extended,0xd1b ; ", " 0c9a 01cc | | Execute Vector,Catenate 0c9b e5ff | | Load 0x2,-0x1 0c9c e002 | | Load 0x0,0x2 0c9d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0c9e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0c9f 01cc | | Execute Vector,Catenate 0ca0 0092 0ce8 | | Action Push_String_Extended,0xce8 ; ") => " 0ca2 01cc | | Execute Vector,Catenate 0ca3 e802 | | Load 0x4,0x2 0ca4 e002 | | Load 0x0,0x2 0ca5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0ca6 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0ca7 01cc | | Execute Vector,Catenate 0ca8 e006 | | Load 0x0,0x6 0ca9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0caa e802 | | Load 0x4,0x2 0cab e5ff | | Load 0x2,-0x1 0cac 012f | / | Execute Any,Equal 0cad 7029 |p) | Jump_Nonzero 0xcd7 0cae e5fb | | Load 0x2,-0x5 0caf e5fc | | Load 0x2,-0x4 0cb0 e402 | | Load 0x2,0x2 0cb1 e802 | | Load 0x4,0x2 0cb2 e5ff | | Load 0x2,-0x1 0cb3 8212 | | Call 0x1,0x12 0cb4 c5fb | | Store 0x2,-0x5 0cb5 4801 |H | Short_Literal 0x1 0cb6 e5fb | | Load 0x2,-0x5 0cb7 e007 | | Load 0x0,0x7 0cb8 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0cb9 681d |h | Jump_Zero 0xcd7 0cba e005 | | Load 0x0,0x5 0cbb 180e | | Execute Package,Field_Execute,Field_Number 0xe 0cbc 4806 |H | Short_Literal 0x6 0cbd e5fb | | Load 0x2,-0x5 0cbe e007 | | Load 0x0,0x7 0cbf 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0cc0 e006 | | Load 0x0,0x6 0cc1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0cc2 e005 | | Load 0x0,0x5 0cc3 180e | | Execute Package,Field_Execute,Field_Number 0xe 0cc4 4806 |H | Short_Literal 0x6 0cc5 0092 0d2b | +| Action Push_String_Extended,0xd2b ; "Can't remove remote import " 0cc7 e5fe | | Load 0x2,-0x2 0cc8 01cc | | Execute Vector,Catenate 0cc9 0092 0d50 | P| Action Push_String_Extended,0xd50 ; " from " 0ccb 01cc | | Execute Vector,Catenate 0ccc e802 | | Load 0x4,0x2 0ccd e002 | | Load 0x0,0x2 0cce 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0ccf 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0cd0 01cc | | Execute Vector,Catenate 0cd1 e006 | | Load 0x0,0x6 0cd2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0cd3 e5fb | | Load 0x2,-0x5 0cd4 e007 | | Load 0x0,0x7 0cd5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0cd6 c5fb | | Store 0x2,-0x5 0cd7 00c8 | | Action Pop_Auxiliary_Range 0cd8 3faf |? | Loop_Increasing 0xc88 0cd9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0cda ; -------------------------------------------------------------------------------------- 0cda ; STRING TABLE 0cda ; -------------------------------------------------------------------------------------- 0cda 00f0 | | .STRTAB 0x00f0->0x0d52 ; "mc68k_bare_vads" 0cdb 00fd | | .STRTAB 0x00fd->0x0d59 ; " not found" 0cdc 0105 | | .STRTAB 0x0105->0x0d5e ; "Add_Remote_Imports (To_View" 0cdd 011e | | .STRTAB 0x011e->0x0d6c ; ")" 0cde 011d | | .STRTAB 0x011d->0x0d6c ; ". Imported_View => " 0cdf 012e | . | .STRTAB 0x012e->0x0d76 ; "Library_Extensions Error" 0ce0 0144 | D | .STRTAB 0x0144->0x0d82 ; "Can't get object for " 0ce1 0157 | W | .STRTAB 0x0157->0x0d8c ; ". Error Status = " 0ce2 0167 | g | .STRTAB 0x0167->0x0d95 ; "Add_Remote_Imports" 0ce3 0177 | w | .STRTAB 0x0177->0x0d9e ; "Remove_Remote_Imports (View_To_Remove" 0ce4 019a | | .STRTAB 0x019a->0x0db1 ; ", From_View" 0ce5 01a3 | | .STRTAB 0x01a3->0x0db6 ; "Can't get import closure for view " 0ce6 01c3 | | .STRTAB 0x01c3->0x0dc7 ; "Can't remove remote import for " 0ce7 01e0 | | .STRTAB 0x01e0->0x0dd7 ; ". Imported_Closure (" 0ce8 01f2 | | .STRTAB 0x01f2->0x0de1 ; ") => " 0ce9 01f5 | | .STRTAB 0x01f5->0x0de3 ; "Remove_Remote_Imports" 0cea 0208 | | .STRTAB 0x0208->0x0dee ; "/" 0ceb 0207 | | .STRTAB 0x0207->0x0dee ; "/ada.lib" 0cec 020d | | .STRTAB 0x020d->0x0df2 ; "mkdir -p " 0ced 0214 | | .STRTAB 0x0214->0x0df7 ; "a.mklib -t " 0cee 021d | | .STRTAB 0x021d->0x0dfc ; " -f " 0cef 021f | | .STRTAB 0x021f->0x0dfe ; "; cd " 0cf0 0222 | " | .STRTAB 0x0222->0x0e01 ; "; " 0cf1 0222 | " | .STRTAB 0x0222->0x0e02 ; "; cd .." 0cf2 0227 | ' | .STRTAB 0x0227->0x0e05 ; "Create_Remote_Directory (Remote_Directory" 0cf3 024e | N | .STRTAB 0x024e->0x0e1a ; ", Remote_Machine" 0cf4 025c | \ | .STRTAB 0x025c->0x0e22 ; "Creating remote directory" 0cf5 0273 | s | .STRTAB 0x0273->0x0e2e ; "Remote_Directory string must begin with a \x22/\x22 character" 0cf6 02a8 | | .STRTAB 0x02a8->0x0e4a ; "Can't acquire connection to " 0cf7 02c2 | | .STRTAB 0x02c2->0x0e58 ; "Create_Remote_Directory" 0cf8 02d7 | | .STRTAB 0x02d7->0x0e63 ; "chmod -R 777 " 0cf9 02e2 | | .STRTAB 0x02e2->0x0e6a ; "a.rmlib -f " 0cfa 02eb | | .STRTAB 0x02eb->0x0e6f ; "rm -f " 0cfb 02ef | | .STRTAB 0x02ef->0x0e72 ; "/*" 0cfc 02ef | | .STRTAB 0x02ef->0x0e73 ; "/.options*" 0cfd 02f7 | | .STRTAB 0x02f7->0x0e78 ; "rmdir " 0cfe 02fb | | .STRTAB 0x02fb->0x0e7b ; "Destroy_Remote_Library (Remote_Directory" 0cff 0321 | ! | .STRTAB 0x0321->0x0e8f ; "Destroying Ada library in remote directory = " 0d00 034c | L | .STRTAB 0x034c->0x0ea6 ; "Destroy_Remote_Library" 0d01 0360 | ` | .STRTAB 0x0360->0x0eb1 ; "Unhandled exception " 0d02 0372 | r | .STRTAB 0x0372->0x0ebb ; " caught in " 0d03 037b | { | .STRTAB 0x037b->0x0ec0 ; " => \x22" 0d04 037e | ~ | .STRTAB 0x037e->0x0ec3 ; "\x22" 0d05 037d | } | .STRTAB 0x037d->0x0ec3 ; "cd " 0d06 037e | ~ | .STRTAB 0x037e->0x0ec5 ; "a.path -L " 0d07 0386 | | .STRTAB 0x0386->0x0eca ; " -i " 0d08 0388 | | .STRTAB 0x0388->0x0ecc ; "Do_Import (Remote_Import_Directory" 0d09 03a8 | | .STRTAB 0x03a8->0x0edd ; ", To_View" 0d0a 03af | | .STRTAB 0x03af->0x0ee1 ; "Can't get remote directory name for view " 0d0b 03d6 | | .STRTAB 0x03d6->0x0ef6 ; "Name of remote directory for view " 0d0c 03f6 | | .STRTAB 0x03f6->0x0f07 ; " is null" 0d0d 03fc | | .STRTAB 0x03fc->0x0f0b ; "Name of remote library to be imported into view " 0d0e 042a | * | .STRTAB 0x042a->0x0f23 ; "Set_Directory_Command" 0d0f 043d | = | .STRTAB 0x043d->0x0f2d ; "Can't add import " 0d10 044c | L | .STRTAB 0x044c->0x0f36 ; " to nonexistent remote library " 0d11 0469 | i | .STRTAB 0x0469->0x0f45 ; "Can't tell whether remote Ada library \x22" 0d12 048e | | .STRTAB 0x048e->0x0f59 ; "\x22 exists" 0d13 0494 | | .STRTAB 0x0494->0x0f5d ; "Can't import nonexistent remote library " 0d14 04ba | | .STRTAB 0x04ba->0x0f71 ; " into library " 0d15 04c6 | | .STRTAB 0x04c6->0x0f78 ; "Add_Import_Command" 0d16 04d6 | | .STRTAB 0x04d6->0x0f81 ; " to remote library " 0d17 04e7 | | .STRTAB 0x04e7->0x0f8a ; "Do_Import" 0d18 04ee | | .STRTAB 0x04ee->0x0f8f ; "Refresh_Referencers (To_View" 0d19 0508 | | .STRTAB 0x0508->0x0f9d ; "Can't get referencers for view " 0d1a 0525 | % | .STRTAB 0x0525->0x0fac ; ". Referencers (" 0d1b 0532 | 2 | .STRTAB 0x0532->0x0fb4 ; ", " 0d1c 0532 | 2 | .STRTAB 0x0532->0x0fb5 ; "Can't add remote import for " 0d1d 054c | L | .STRTAB 0x054c->0x0fc3 ; "Add_Remote_Import (Imported_View" 0d1e 056a | j | .STRTAB 0x056a->0x0fd3 ; "Can't get remote directory name for imported view " 0d1f 059a | | .STRTAB 0x059a->0x0fec ; " -r " 0d20 059c | | .STRTAB 0x059c->0x0fee ; "Remove_Remote_Import (View_To_Remove" 0d21 05be | | .STRTAB 0x05be->0x1000 ; "Remote directory name for view " 0d22 05db | | .STRTAB 0x05db->0x100f ; "Insufficient remote library information" 0d23 0600 | | .STRTAB 0x0600->0x1023 ; "Remote directory name for imported view " 0d24 0626 | & | .STRTAB 0x0626->0x1037 ; "Can't tell whether remote directory \x22" 0d25 0649 | I | .STRTAB 0x0649->0x1049 ; "\x22 exists, so can't remove its import" 0d26 066b | k | .STRTAB 0x066b->0x105b ; "Remote directory \x22" 0d27 067b | { | .STRTAB 0x067b->0x1064 ; "\x22 doesn't exist for view " 0d28 0692 | | .STRTAB 0x0692->0x1071 ; ", so we can't remove its import" 0d29 06af | | .STRTAB 0x06af->0x1080 ; "Remove_Import_Command" 0d2a 06c2 | | .STRTAB 0x06c2->0x108b ; ", View_To_Remove" 0d2b 06d0 | | .STRTAB 0x06d0->0x1093 ; "Can't remove remote import " 0d2c 06e9 | | .STRTAB 0x06e9->0x10a0 ; " from view " 0d2d 06f2 | | .STRTAB 0x06f2->0x10a6 ; "Remove_All_Remote_Imports (View_To_Remove" 0d2e 0719 | | .STRTAB 0x0719->0x10ba ; "Remote library for " 0d2f 072a | * | .STRTAB 0x072a->0x10c4 ; " isn't on search list for " 0d30 0742 | B | .STRTAB 0x0742->0x10d1 ; ". Import_Closure (" 0d31 0752 | R | .STRTAB 0x0752->0x10da ; "Can't tell whether Ada library \x22" 0d32 0770 | p | .STRTAB 0x0770->0x10ea ; "\x22 exists on machine \x22" 0d33 0783 | | .STRTAB 0x0783->0x10f4 ; "An Ada library already exists in remote directory \x22" 0d34 07b4 | | .STRTAB 0x07b4->0x110e ; "Can't tell whether directory \x22" 0d35 07d0 | | .STRTAB 0x07d0->0x111d ; "Directory \x22" 0d36 07d9 | | .STRTAB 0x07d9->0x1122 ; "\x22 already exists" 0d37 07e7 | | .STRTAB 0x07e7->0x112a ; "Using an existing directory" 0d38 0800 | | .STRTAB 0x0800->0x1138 ; "Creating the new remote directory \x22" 0d39 0821 | ! | .STRTAB 0x0821->0x1149 ; "Create_Dir_Command" 0d3a 0831 | 1 | .STRTAB 0x0831->0x1152 ; "Can't create remote directory \x22" 0d3b 084e | N | .STRTAB 0x084e->0x1162 ; "Set_the_VADS_PATH_on" 0d3c 0860 | ` | .STRTAB 0x0860->0x116c ; "Create_Ada_Lib_Command" 0d3d 0874 | t | .STRTAB 0x0874->0x1177 ; "Can't create an Ada library in remote directory \x22" 0d3e 08a3 | | .STRTAB 0x08a3->0x118f ; "Can't tell whether Ada library exists in directory \x22" 0d3f 08d5 | | .STRTAB 0x08d5->0x11a9 ; "\x22 on machine \x22" 0d40 08e1 | | .STRTAB 0x08e1->0x11b0 ; "There is no remote Ada library in directory \x22" 0d41 090c | | .STRTAB 0x090c->0x11c7 ; "\x22 on machine " 0d42 0917 | | .STRTAB 0x0917->0x11cd ; "Can't destroy remote library" 0d43 0931 | 1 | .STRTAB 0x0931->0x11db ; "Executing command" 0d44 0940 | @ | .STRTAB 0x0940->0x11e4 ; "Can't unprotect " 0d45 094e | N | .STRTAB 0x094e->0x11ec ; "Can't destroy the remote Ada library " 0d46 0971 | q | .STRTAB 0x0971->0x11fe ; "Can't destroy the files in remote directory " 0d47 099b | | .STRTAB 0x099b->0x1214 ; "Can't destroy the '.options' file in remote directory " 0d48 09cf | | .STRTAB 0x09cf->0x122f ; "Can't destroy the remote directory " 0d49 09f0 | | .STRTAB 0x09f0->0x1241 ; "a.path>a.path_temp;egrep -s " 0d4a 0a0a | | .STRTAB 0x0a0a->0x124f ; " a.path_temp" 0d4b 0a14 | | .STRTAB 0x0a14->0x1255 ; "Import_Exists (Remote_View" 0d4c 0a2c | , | .STRTAB 0x0a2c->0x1262 ; "Import_Exists_Command" 0d4d 0a3f | ? | .STRTAB 0x0a3f->0x126c ; "View \x22" 0d4e 0a43 | C | .STRTAB 0x0a43->0x126f ; "\x22 has not yet been imported" 0d4f 0a5c | \ | .STRTAB 0x0a5c->0x127d ; "\x22 was previously imported" 0d50 0a73 | s | .STRTAB 0x0a73->0x1289 ; " from " 0d51 0a77 | w | .STREND 0x0a77->0x128c 0d52 6d63 3638 |mc68| .STRTAB_STRINGS 128d 0000 0000 | | .XXX[0x3] 128f 0000 | | 1290 ; -------------------------------------------------------------------------------------- 1290 ; Debug Table 1290 ; -------------------------------------------------------------------------------------- 1290 0004 0009 | | .DEBUG4 0x0004,0x0009,0x5fdc,0x0000,0x0001,0x0019 1296 000b 12fa | | .DBG4T 0x000b,0x12fa,0x8000,0x8000 129a 0020 1310 | | .DBG4T 0x0020,0x1310,0x8000,0x8000 129e 004b 1338 | K 8| .DBG4T 0x004b,0x1338,0x0002,0x0000 12a2 0083 1346 | F| .DBG4T 0x0083,0x1346,0x0002,0x0000 12a6 00bb 134f | O| .DBG4T 0x00bb,0x134f,0x0002,0x0000 12aa 00eb 1357 | W| .DBG4T 0x00eb,0x1357,0x0002,0x0000 12ae 00f3 135a | Z| .DBG4T 0x00f3,0x135a,0x0001,0x4000 12b2 01b3 138f | | .DBG4T 0x01b3,0x138f,0x0001,0x0000 12b6 0263 13a9 | c | .DBG4T 0x0263,0x13a9,0x0001,0x0000 12ba 030b 13c1 | | .DBG4T 0x030b,0x13c1,0x0001,0x0000 12be 039b 13d7 | | .DBG4T 0x039b,0x13d7,0x0001,0x0000 12c2 03ab 13da | | .DBG4T 0x03ab,0x13da,0x0001,0x0000 12c6 03c3 13dd | | .DBG4T 0x03c3,0x13dd,0x0002,0x0000 12ca 03d3 13e0 | | .DBG4T 0x03d3,0x13e0,0x0002,0x0000 12ce 03f3 13e4 | | .DBG4T 0x03f3,0x13e4,0x0001,0x0000 12d2 052b 1418 | + | .DBG4T 0x052b,0x1418,0x0001,0x0000 12d6 05db 1435 | 5| .DBG4T 0x05db,0x1435,0x0001,0x0000 12da 06cb 1459 | Y| .DBG4T 0x06cb,0x1459,0x0001,0x0000 12de 07eb 1488 | | .DBG4T 0x07eb,0x1488,0x0001,0x0000 12e2 081b 1491 | | .DBG4T 0x081b,0x1491,0x0001,0x0000 12e6 08eb 14ac | | .DBG4T 0x08eb,0x14ac,0x0004,0x0000 12ea 0963 14bd | c | .DBG4T 0x0963,0x14bd,0x0004,0x0000 12ee 0a93 14e9 | | .DBG4T 0x0a93,0x14e9,0x0004,0x0000 12f2 0beb 151d | | .DBG4T 0x0beb,0x151d,0x0001,0x0000 12f6 0c53 152e | S .| .DBG4T 0x0c53,0x152e,0x0004,0x0000 12fa ; -------------------------------------------------------------------------------------- 12fa ; Debug chain 12fa ; -------------------------------------------------------------------------------------- 12fa 000a 0000 | | .DBGLEN 0x000a,0x0000 12fc 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d 1306 0003 0004 | | .XXX[0xa] 1308 0005 0006 | | 130a 0007 0008 | | 130c 0009 000a | | 130e 000b 000c | | 1310 ; -------------------------------------------------------------------------------------- 1310 ; Debug chain 1310 ; -------------------------------------------------------------------------------------- 1310 0013 0000 | | .DBGLEN 0x0013,0x0000 1312 0020 0022 | "| .DBGLNO 0x0020,0x0022,0x0024,0x0026,0x0028,0x002a,0x002c,0x002e,0x0030,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040,0x0042,0x0044 1325 0005 0009 | | .XXX[0x13] 1327 000a 000b | | 1329 000c 000d | | 132b 000e 000f | | 132d 0010 0011 | | 132f 0012 0013 | | 1331 0014 0015 | | 1333 0016 0017 | | 1335 0018 0019 | | 1337 001a | | 1338 ; -------------------------------------------------------------------------------------- 1338 ; Debug chain 1338 ; -------------------------------------------------------------------------------------- 1338 0003 0009 | | .DBGLEN 0x0003,0x0009 133a 004b 0050 | K P| .DBGLNO 0x004b,0x0050,0x0052,0x0058,0x005b,0x005d,0x006d,0x006f,0x0072,0x0077,0x007a,0x007c 1346 ; -------------------------------------------------------------------------------------- 1346 ; Debug chain 1346 ; -------------------------------------------------------------------------------------- 1346 0002 0005 | | .DBGLEN 0x0002,0x0005 1348 0083 0088 | | .DBGLNO 0x0083,0x0088,0x008b,0x00a3,0x00a5,0x00ae,0x00b1 134f ; -------------------------------------------------------------------------------------- 134f ; Debug chain 134f ; -------------------------------------------------------------------------------------- 134f 0002 0004 | | .DBGLEN 0x0002,0x0004 1351 00bb 00c0 | | .DBGLNO 0x00bb,0x00c0,0x00c3,0x00db,0x00dd,0x00e0 1357 ; -------------------------------------------------------------------------------------- 1357 ; Debug chain 1357 ; -------------------------------------------------------------------------------------- 1357 0000 0001 | | .DBGLEN 0x0000,0x0001 1359 00eb | | .DBGLNO 0x00eb 135a ; -------------------------------------------------------------------------------------- 135a ; Debug chain 135a ; -------------------------------------------------------------------------------------- 135a 0003 0018 | | .DBGLEN 0x0003,0x0018 135c 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 1377 0001 0002 | | .XXX[0x18] 1379 0004 0005 | | 137b 0003 0006 | | 137d 0007 0008 | | 137f 0009 000a | | 1381 000c 000d | | 1383 000e 000f | | 1385 0010 0011 | | 1387 0012 0013 | | 1389 0014 0015 | | 138b 0016 0017 | | 138d 000b 0018 | | 138f ; -------------------------------------------------------------------------------------- 138f ; Debug chain 138f ; -------------------------------------------------------------------------------------- 138f 0003 0015 | | .DBGLEN 0x0003,0x0015 1391 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 13a9 ; -------------------------------------------------------------------------------------- 13a9 ; Debug chain 13a9 ; -------------------------------------------------------------------------------------- 13a9 0008 000e | | .DBGLEN 0x0008,0x000e 13ab 0263 0268 | c h| .DBGLNO 0x0263,0x0268,0x026d,0x026f,0x0271,0x0273,0x0278,0x027d,0x0297,0x0299,0x02ac,0x02b6,0x02bd,0x02c5,0x02c6,0x02d9,0x02de,0x02e0,0x02e8,0x02f3,0x02f4,0x02fc 13c1 ; -------------------------------------------------------------------------------------- 13c1 ; Debug chain 13c1 ; -------------------------------------------------------------------------------------- 13c1 0009 000b | | .DBGLEN 0x0009,0x000b 13c3 030b 0310 | | .DBGLNO 0x030b,0x0310,0x0312,0x0317,0x031c,0x0321,0x0328,0x0330,0x0338,0x033e,0x0340,0x0353,0x035c,0x036f,0x0374,0x0376,0x037e,0x0389,0x038a,0x0392 13d7 ; -------------------------------------------------------------------------------------- 13d7 ; Debug chain 13d7 ; -------------------------------------------------------------------------------------- 13d7 0000 0001 | | .DBGLEN 0x0000,0x0001 13d9 039b | | .DBGLNO 0x039b 13da ; -------------------------------------------------------------------------------------- 13da ; Debug chain 13da ; -------------------------------------------------------------------------------------- 13da 0000 0001 | | .DBGLEN 0x0000,0x0001 13dc 03ab | | .DBGLNO 0x03ab 13dd ; -------------------------------------------------------------------------------------- 13dd ; Debug chain 13dd ; -------------------------------------------------------------------------------------- 13dd 0000 0001 | | .DBGLEN 0x0000,0x0001 13df 03c3 | | .DBGLNO 0x03c3 13e0 ; -------------------------------------------------------------------------------------- 13e0 ; Debug chain 13e0 ; -------------------------------------------------------------------------------------- 13e0 0001 0001 | | .DBGLEN 0x0001,0x0001 13e2 03d3 03d9 | | .DBGLNO 0x03d3,0x03d9 13e4 ; -------------------------------------------------------------------------------------- 13e4 ; Debug chain 13e4 ; -------------------------------------------------------------------------------------- 13e4 0008 002a | *| .DBGLEN 0x0008,0x002a 13e6 03f3 03f7 | | .DBGLNO 0x03f3,0x03f7,0x03fc,0x03ff,0x0404,0x0409,0x0412,0x0413,0x0415,0x0417,0x042a,0x0430,0x0432,0x043b,0x0445,0x0446,0x044c,0x0458,0x0459,0x045f,0x046b,0x046c,0x046e,0x0478,0x0483,0x0488,0x048a,0x0492,0x04a0,0x04a4,0x04a5,0x04ae,0x04b3,0x04b5,0x04bd,0x04c9,0x04cd,0x04ce,0x04d0,0x04de,0x04df,0x04e3,0x04e5,0x04e7,0x04f1,0x04fc,0x0501,0x0503,0x050b,0x051c 1418 ; -------------------------------------------------------------------------------------- 1418 ; Debug chain 1418 ; -------------------------------------------------------------------------------------- 1418 0005 0016 | | .DBGLEN 0x0005,0x0016 141a 052b 052f | + /| .DBGLNO 0x052b,0x052f,0x0534,0x0537,0x053c,0x053f,0x0541,0x054e,0x0554,0x0556,0x055f,0x0569,0x056a,0x0570,0x0572,0x057b,0x0585,0x0587,0x058c,0x0591,0x0593,0x05ab,0x05af,0x05b6,0x05bb,0x05c3,0x05cf 1435 ; -------------------------------------------------------------------------------------- 1435 ; Debug chain 1435 ; -------------------------------------------------------------------------------------- 1435 0005 001d | | .DBGLEN 0x0005,0x001d 1437 05db 05df | | .DBGLNO 0x05db,0x05df,0x05e4,0x05e7,0x05ec,0x05ef,0x05f1,0x0607,0x060d,0x060f,0x0618,0x0622,0x0623,0x0629,0x062b,0x0634,0x0641,0x0642,0x0646,0x0647,0x064e,0x0653,0x065b,0x0667,0x066c,0x0671,0x0676,0x0678,0x0693,0x069b,0x06a2,0x06a7,0x06af,0x06bb 1459 ; -------------------------------------------------------------------------------------- 1459 ; Debug chain 1459 ; -------------------------------------------------------------------------------------- 1459 0009 0024 | $| .DBGLEN 0x0009,0x0024 145b 06cb 06cf | | .DBGLNO 0x06cb,0x06cf,0x06d4,0x06d7,0x06d8,0x06dc,0x06e1,0x06e4,0x06e9,0x06f2,0x06f4,0x0707,0x070d,0x070f,0x0718,0x0722,0x0723,0x0729,0x072b,0x0734,0x073e,0x073f,0x0742,0x074e,0x0756,0x0757,0x075a,0x0766,0x076e,0x076f,0x0778,0x077d,0x077f,0x0787,0x0794,0x0795,0x0797,0x07a8,0x07a9,0x07ab,0x07bb,0x07c6,0x07cb,0x07cd,0x07d5 1488 ; -------------------------------------------------------------------------------------- 1488 ; Debug chain 1488 ; -------------------------------------------------------------------------------------- 1488 0001 0006 | | .DBGLEN 0x0001,0x0006 148a 07eb 07ee | | .DBGLNO 0x07eb,0x07ee,0x07f4,0x07fd,0x080a,0x080b,0x080f 1491 ; -------------------------------------------------------------------------------------- 1491 ; Debug chain 1491 ; -------------------------------------------------------------------------------------- 1491 0003 0016 | | .DBGLEN 0x0003,0x0016 1493 081b 081f | | .DBGLNO 0x081b,0x081f,0x0824,0x0827,0x0829,0x083f,0x0845,0x0847,0x0850,0x085d,0x085e,0x0865,0x086a,0x0872,0x0883,0x0888,0x088d,0x0892,0x0894,0x08af,0x08b7,0x08be,0x08c3,0x08cb,0x08dc 14ac ; -------------------------------------------------------------------------------------- 14ac ; Debug chain 14ac ; -------------------------------------------------------------------------------------- 14ac 0002 000d | | .DBGLEN 0x0002,0x000d 14ae 08eb 08f0 | | .DBGLNO 0x08eb,0x08f0,0x08f3,0x08f9,0x0902,0x090f,0x0912,0x0917,0x091c,0x091e,0x0939,0x0941,0x0948,0x094d,0x0955 14bd ; -------------------------------------------------------------------------------------- 14bd ; Debug chain 14bd ; -------------------------------------------------------------------------------------- 14bd 0000 002a | *| .DBGLEN 0x0000,0x002a 14bf 0963 096c | c l| .DBGLNO 0x0963,0x096c,0x0971,0x0973,0x097b,0x098d,0x0993,0x0995,0x0997,0x09a3,0x09a9,0x09ab,0x09b4,0x09b9,0x09bb,0x09c3,0x09d5,0x09db,0x09dd,0x09df,0x09eb,0x09f3,0x09ff,0x0a01,0x0a0b,0x0a16,0x0a1b,0x0a1d,0x0a25,0x0a32,0x0a38,0x0a3a,0x0a3c,0x0a46,0x0a50,0x0a5b,0x0a66,0x0a6b,0x0a6d,0x0a75,0x0a84,0x0a8a 14e9 ; -------------------------------------------------------------------------------------- 14e9 ; Debug chain 14e9 ; -------------------------------------------------------------------------------------- 14e9 0000 0032 | 2| .DBGLEN 0x0000,0x0032 14eb 0a95 0a9e | | .DBGLNO 0x0a95,0x0a9e,0x0aa3,0x0aa5,0x0aad,0x0abf,0x0ac5,0x0ac7,0x0ac9,0x0ad7,0x0adf,0x0ae5,0x0ae7,0x0ae8,0x0aea,0x0af4,0x0aff,0x0b04,0x0b06,0x0b0e,0x0b19,0x0b1b,0x0b25,0x0b30,0x0b35,0x0b37,0x0b3f,0x0b4a,0x0b4c,0x0b56,0x0b61,0x0b66,0x0b68,0x0b70,0x0b7b,0x0b7d,0x0b87,0x0b92,0x0b97,0x0b99,0x0ba1,0x0bac,0x0bae,0x0bb8,0x0bc3,0x0bc8,0x0bca,0x0bd2,0x0bde,0x0be4 151d ; -------------------------------------------------------------------------------------- 151d ; Debug chain 151d ; -------------------------------------------------------------------------------------- 151d 0002 000d | | .DBGLEN 0x0002,0x000d 151f 0beb 0bf0 | | .DBGLNO 0x0beb,0x0bf0,0x0bfa,0x0bfc,0x0c09,0x0c0b,0x0c0d,0x0c17,0x0c22,0x0c27,0x0c29,0x0c31,0x0c3e,0x0c40,0x0c4c 152e ; -------------------------------------------------------------------------------------- 152e ; Debug chain 152e ; -------------------------------------------------------------------------------------- 152e 0002 0010 | | .DBGLEN 0x0002,0x0010 1530 0c53 0c58 | S X| .DBGLNO 0x0c53,0x0c58,0x0c5b,0x0c61,0x0c63,0x0c6c,0x0c79,0x0c7f,0x0c83,0x0c88,0x0c8d,0x0c8f,0x0caa,0x0cae,0x0cb5,0x0cba,0x0cc2,0x0cd3 1542 0000 0000 | | .BLANK 0000[0xbe]