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