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