|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 13312 (0x3400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_1e5cd8
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 15c0 | | .CONST 0x15c0 ; 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 000c | | .CONST 0x000c ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0040 | @ | .CONST 0x0040 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0022 | " | .CONST 0x0022 ; Number of locals
000b INIT_0008:
000b 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated
000d 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated
000f 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated
0011 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated
0013 00bf | | Action Accept_Activation
0014 00e1 | | Load_Encached Boolean_Cache
0015 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0016 0092 0f0b | | Action Push_String_Extended,0xf0b ; "/usr/lib/alsycomp/cifo"
0018 0092 0f0c | | Action Push_String_Extended,0xf0c ; "/usr/lib/alsycomp/posix"
001a 0092 0f0d | | Action Push_String_Extended,0xf0d ; "!TARGETS.I386_UNIX_ALS_XT.TARGET_INTERFACE.CIFO"
001c 0092 0f0e | | Action Push_String_Extended,0xf0e ; "!TARGETS.I386_UNIX_ALS_XT.TARGET_INTERFACE.POSIX"
001e 029d 031b | | Declare_Subprogram INIT_0318,For_Outer_Call
0020 029d 0333 | 3| Declare_Subprogram INIT_0330,For_Outer_Call
0022 029d 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call
0024 029d 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call
0026 029d 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call
0028 029d 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call
002a 029d 041b | | Declare_Subprogram INIT_0418,For_Outer_Call
002c 029d 048b | | Declare_Subprogram INIT_0488,For_Outer_Call
002e 029d 04c3 | | Declare_Subprogram INIT_04c0,For_Outer_Call
0030 029d 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call
0032 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0033 00c7 | | Action Elaborate_Subprogram
0034 029d 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call
0036 029d 075b | [| Declare_Subprogram INIT_0758,For_Outer_Call
0038 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0039 00c7 | | Action Elaborate_Subprogram
003a 1d0e | | Execute_Immediate Reference_Lex_1,0xe
003b 00c7 | | Action Elaborate_Subprogram
003c 029d 0963 | c| Declare_Subprogram INIT_0960,For_Outer_Call
003e 1d10 | | Execute_Immediate Reference_Lex_1,0x10
003f 00c7 | | Action Elaborate_Subprogram
0040 BODY_0008:
0040 00bc | | Action Signal_Activated
0041 00bb | | Action Signal_Completion
0042 0000 0000 | | .BLANK 0000[0x6]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 008e | | .CONST 0x008e ; Address of begin
0049 00df | | .CONST 0x00df ; Address of exception handler
004a 0013 | | .CONST 0x0013 ; Number of locals
004b INIT_0048:
004b e001 | | Load 0x0,0x1
004c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
004d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
004e 02c7 | | Declare_Variable Any
004f 00d8 | | Load_Top At_Offset_0
0050 1c00 | | Execute_Immediate Run_Utility,0x0
0051 e002 | | Load 0x0,0x2
0052 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0053 02c7 | | Declare_Variable Any
0054 00d8 | | Load_Top At_Offset_0
0055 1c00 | | Execute_Immediate Run_Utility,0x0
0056 e5fc | | Load 0x2,-0x4
0057 e5fd | | Load 0x2,-0x3
0058 8003 | | Call 0x0,0x3
0059 00e1 | | Load_Encached Boolean_Cache
005a 00e1 | | Load_Encached Boolean_Cache
005b 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
005c 00e1 | | Load_Encached Boolean_Cache
005d 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
005e e004 | | Load 0x0,0x4
005f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0060 02c7 | | Declare_Variable Any
0061 00d8 | | Load_Top At_Offset_0
0062 1c00 | | Execute_Immediate Run_Utility,0x0
0063 e004 | | Load 0x0,0x4
0064 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0065 02c7 | | Declare_Variable Any
0066 00d8 | | Load_Top At_Offset_0
0067 1c00 | | Execute_Immediate Run_Utility,0x0
0068 e004 | | Load 0x0,0x4
0069 1b0f | | Execute Package,Field_Read,Field_Number 0xf
006a 02c7 | | Declare_Variable Any
006b e004 | | Load 0x0,0x4
006c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
006d a40a | | Store_Unchecked 0x2,0xa
006e e001 | | Load 0x0,0x1
006f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0070 0322 | " | Declare_Variable Record
0071 00d8 | | Load_Top At_Offset_0
0072 1c00 | | Execute_Immediate Run_Utility,0x0
0073 e001 | | Load 0x0,0x1
0074 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0075 0322 | " | Declare_Variable Record
0076 00d8 | | Load_Top At_Offset_0
0077 1c00 | | Execute_Immediate Run_Utility,0x0
0078 e001 | | Load 0x0,0x1
0079 1b13 | | Execute Package,Field_Read,Field_Number 0x13
007a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
007b 02c7 | | Declare_Variable Any
007c 00d8 | | Load_Top At_Offset_0
007d 1c00 | | Execute_Immediate Run_Utility,0x0
007e e001 | | Load 0x0,0x1
007f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0080 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0081 02c7 | | Declare_Variable Any
0082 00d8 | | Load_Top At_Offset_0
0083 1c00 | | Execute_Immediate Run_Utility,0x0
0084 029f 0a13 | | Declare_Subprogram INIT_0a10,For_Call
0086 029f 0a4b | K| Declare_Subprogram INIT_0a48,For_Call
0088 029f 0abb | | Declare_Subprogram INIT_0ab8,For_Call
008a 029f 0bf3 | | Declare_Subprogram INIT_0bf0,For_Call
008c 029f 0c23 | #| Declare_Subprogram INIT_0c20,For_Call
008e BODY_0048:
008e 00be | | Action Activate_Tasks
008f e005 | | Load 0x0,0x5
0090 7002 |p | Jump_Nonzero 0x93
0091 e5fb | | Load 0x2,-0x5
0092 681e |h | Jump_Zero 0xb1
0093 e006 | | Load 0x0,0x6
0094 180e | | Execute Package,Field_Execute,Field_Number 0xe
0095 4809 |H | Short_Literal 0x9
0096 0092 0f0f | | Action Push_String_Extended,0xf0f ; "#~Batch_Import_Units (How_Many =>"
0098 e5fe | | Load 0x2,-0x2
0099 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
009a 00e0 | | Load_Encached Standard_Cache
009b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
009c 01cc | | Execute Vector,Catenate
009d 0092 0f10 | | Action Push_String_Extended,0xf10 ; ", Into_View"
009f 01cc | | Execute Vector,Catenate
00a0 e5fd | | Load 0x2,-0x3
00a1 e004 | | Load 0x0,0x4
00a2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00a3 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
00a4 8007 | | Call 0x0,0x7
00a5 01cc | | Execute Vector,Catenate
00a6 0092 0f11 | | Action Push_String_Extended,0xf11 ; ", Remote_Directory"
00a8 01cc | | Execute Vector,Catenate
00a9 e5fc | | Load 0x2,-0x4
00aa 8007 | | Call 0x0,0x7
00ab 01cc | | Execute Vector,Catenate
00ac 0092 0f12 | | Action Push_String_Extended,0xf12 ; ")"
00ae 01cc | | Execute Vector,Catenate
00af e008 | | Load 0x0,0x8
00b0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00b1 e404 | | Load 0x2,0x4
00b2 01db | | Execute Vector,Length
00b3 700d |p | Jump_Nonzero 0xc1
00b4 e5fa | | Load 0x2,-0x6
00b5 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
00b7 4802 |H | Short_Literal 0x2
00b8 0092 0f14 | | Action Push_String_Extended,0xf14 ; "Can't derive a family name from the remote pathname "
00ba e5fc | | Load 0x2,-0x4
00bb 8009 | | Call 0x0,0x9
00bc 01cc | | Execute Vector,Catenate
00bd e00a | | Load 0x0,0xa
00be 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00bf c5fa | | Store 0x2,-0x6
00c0 4506 |E | Exit_Suprogram New_Top_Offset 0x6
00c1 e402 | | Load 0x2,0x2
00c2 4802 |H | Short_Literal 0x2
00c3 e5fd | | Load 0x2,-0x3
00c4 e001 | | Load 0x0,0x1
00c5 180e | | Execute Package,Field_Execute,Field_Number 0xe
00c6 e001 | | Load 0x0,0x1
00c7 1b13 | | Execute Package,Field_Read,Field_Number 0x13
00c8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00c9 c402 | | Store 0x2,0x2
00ca 00cf | | Action Mark_Auxiliary
00cb e5fe | | Load 0x2,-0x2
00cc 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00cd 01dc | | Execute Vector,Last
00ce 4801 |H | Short_Literal 0x1
00cf 0263 | c | Execute Discrete,Above_Bound
00d0 7003 |p | Jump_Nonzero 0xd4
00d1 8413 | | Call 0x2,0x13
00d2 00c8 | | Action Pop_Auxiliary_Range
00d3 3ffd |? | Loop_Increasing 0xd1
00d4 00ce | | Action Pop_Auxiliary
00d5 e406 | | Load 0x2,0x6
00d6 7004 |p | Jump_Nonzero 0xdb
00d7 0092 0f15 | | Action Push_String_Extended,0xf15 ; "quit"
00d9 e5ff | | Load 0x2,-0x1
00da 8217 | | Call 0x1,0x17
00db e402 | | Load 0x2,0x2
00dc 8412 | | Call 0x2,0x12
00dd c402 | | Store 0x2,0x2
00de 4506 |E | Exit_Suprogram New_Top_Offset 0x6
00df TRAP_0048:
00df 0007 | | Action Break_Optional
00e0 e402 | | Load 0x2,0x2
00e1 8412 | | Call 0x2,0x12
00e2 c402 | | Store 0x2,0x2
00e3 e5fa | | Load 0x2,-0x6
00e4 0092 0f16 | | Action Push_String_Extended,0xf16 ; "Batch_Import_Units"
00e6 e00a | | Load 0x0,0xa
00e7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00e8 c5fa | | Store 0x2,-0x6
00e9 4506 |E | Exit_Suprogram New_Top_Offset 0x6
00ea 0000 0000 | | .BLANK 0000[0x6]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 0102 | | .CONST 0x0102 ; Address of begin
00f1 013d | = | .CONST 0x013d ; Address of exception handler
00f2 0005 | | .CONST 0x0005 ; Number of locals
00f3 INIT_00f0:
00f3 e001 | | Load 0x0,0x1
00f4 1b13 | | Execute Package,Field_Read,Field_Number 0x13
00f5 1b13 | | Execute Package,Field_Read,Field_Number 0x13
00f6 02c7 | | Declare_Variable Any
00f7 00d8 | | Load_Top At_Offset_0
00f8 1c00 | | Execute_Immediate Run_Utility,0x0
00f9 e004 | | Load 0x0,0x4
00fa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00fb 02c7 | | Declare_Variable Any
00fc 00d8 | | Load_Top At_Offset_0
00fd 1c00 | | Execute_Immediate Run_Utility,0x0
00fe 029f 0c63 | c| Declare_Subprogram INIT_0c60,For_Call
0100 029f 0c93 | | Declare_Subprogram INIT_0c90,For_Call
0102 BODY_00f0:
0102 00be | | Action Activate_Tasks
0103 e005 | | Load 0x0,0x5
0104 7002 |p | Jump_Nonzero 0x107
0105 e5fb | | Load 0x2,-0x5
0106 681e |h | Jump_Zero 0x125
0107 e006 | | Load 0x0,0x6
0108 180e | | Execute Package,Field_Execute,Field_Number 0xe
0109 4809 |H | Short_Literal 0x9
010a 0092 0f17 | | Action Push_String_Extended,0xf17 ; "#~Import_Units (How_Many =>"
010c e5ff | | Load 0x2,-0x1
010d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
010e 00e0 | | Load_Encached Standard_Cache
010f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0110 01cc | | Execute Vector,Catenate
0111 0092 0f10 | | Action Push_String_Extended,0xf10 ; ", Into_View"
0113 01cc | | Execute Vector,Catenate
0114 e5fe | | Load 0x2,-0x2
0115 e004 | | Load 0x0,0x4
0116 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0117 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0118 8007 | | Call 0x0,0x7
0119 01cc | | Execute Vector,Catenate
011a 0092 0f11 | | Action Push_String_Extended,0xf11 ; ", Remote_Directory"
011c 01cc | | Execute Vector,Catenate
011d e5fd | | Load 0x2,-0x3
011e 8007 | | Call 0x0,0x7
011f 01cc | | Execute Vector,Catenate
0120 0092 0f12 | | Action Push_String_Extended,0xf12 ; ")"
0122 01cc | | Execute Vector,Catenate
0123 e008 | | Load 0x0,0x8
0124 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0125 00db | | Load_Top At_Offset_3
0126 4802 |H | Short_Literal 0x2
0127 e5fe | | Load 0x2,-0x2
0128 e001 | | Load 0x0,0x1
0129 180e | | Execute Package,Field_Execute,Field_Number 0xe
012a e001 | | Load 0x0,0x1
012b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
012c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
012d c402 | | Store 0x2,0x2
012e 00cf | | Action Mark_Auxiliary
012f e5ff | | Load 0x2,-0x1
0130 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0131 01dc | | Execute Vector,Last
0132 4801 |H | Short_Literal 0x1
0133 0263 | c | Execute Discrete,Above_Bound
0134 7003 |p | Jump_Nonzero 0x138
0135 8405 | | Call 0x2,0x5
0136 00c8 | | Action Pop_Auxiliary_Range
0137 3ffd |? | Loop_Increasing 0x135
0138 00ce | | Action Pop_Auxiliary
0139 00db | | Load_Top At_Offset_3
013a 8404 | | Call 0x2,0x4
013b c402 | | Store 0x2,0x2
013c 4506 |E | Exit_Suprogram New_Top_Offset 0x6
013d TRAP_00f0:
013d 0007 | | Action Break_Optional
013e e402 | | Load 0x2,0x2
013f 8404 | | Call 0x2,0x4
0140 c402 | | Store 0x2,0x2
0141 e5fa | | Load 0x2,-0x6
0142 0092 0f18 | | Action Push_String_Extended,0xf18 ; "Import_Units"
0144 e00a | | Load 0x0,0xa
0145 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0146 c5fa | | Store 0x2,-0x6
0147 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0175 | u | .CONST 0x0175 ; Address of begin
0149 01e8 | | .CONST 0x01e8 ; Address of exception handler
014a 000a | | .CONST 0x000a ; Number of locals
014b INIT_0148:
014b e006 | | Load 0x0,0x6
014c 180e | | Execute Package,Field_Execute,Field_Number 0xe
014d 00db | | Load_Top At_Offset_3
014e e00b | | Load 0x0,0xb
014f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0150 4801 |H | Short_Literal 0x1
0151 00d9 | | Load_Top At_Offset_1
0152 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0153 00da | | Load_Top At_Offset_2
0154 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0155 01cf | | Execute Vector,Slice_Read
0156 0007 | | Action Break_Optional
0157 00d8 | | Load_Top At_Offset_0
0158 e006 | | Load 0x0,0x6
0159 180e | | Execute Package,Field_Execute,Field_Number 0xe
015a e5ff | | Load 0x2,-0x1
015b e00c | | Load 0x0,0xc
015c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
015d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
015e 8003 | | Call 0x0,0x3
015f e004 | | Load 0x0,0x4
0160 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0161 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0162 02c7 | | Declare_Variable Any
0163 e5fe | | Load 0x2,-0x2
0164 a405 | | Store_Unchecked 0x2,0x5
0165 e004 | | Load 0x0,0x4
0166 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0167 02c7 | | Declare_Variable Any
0168 00d8 | | Load_Top At_Offset_0
0169 1c00 | | Execute_Immediate Run_Utility,0x0
016a e004 | | Load 0x0,0x4
016b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
016c e00d | | Load 0x0,0xd
016d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
016e 02c7 | | Declare_Variable Any
016f 00d8 | | Load_Top At_Offset_0
0170 1c00 | | Execute_Immediate Run_Utility,0x0
0171 00e1 | | Load_Encached Boolean_Cache
0172 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0173 029f 0cd3 | | Declare_Subprogram INIT_0cd0,For_Call
0175 BODY_0148:
0175 e005 | | Load 0x0,0x5
0176 7002 |p | Jump_Nonzero 0x179
0177 e5fc | | Load 0x2,-0x4
0178 6813 |h | Jump_Zero 0x18c
0179 e006 | | Load 0x0,0x6
017a 180e | | Execute Package,Field_Execute,Field_Number 0xe
017b 4809 |H | Short_Literal 0x9
017c 0092 0f19 | | Action Push_String_Extended,0xf19 ; "#~Perform_Remote_Import (Host_View"
017e e5ff | | Load 0x2,-0x1
017f 8007 | | Call 0x0,0x7
0180 01cc | | Execute Vector,Catenate
0181 0092 0f1a | | Action Push_String_Extended,0xf1a ; ", Remote_Machine"
0183 01cc | | Execute Vector,Catenate
0184 e5fd | | Load 0x2,-0x3
0185 8007 | | Call 0x0,0x7
0186 01cc | | Execute Vector,Catenate
0187 0092 0f12 | | Action Push_String_Extended,0xf12 ; ")"
0189 01cc | | Execute Vector,Catenate
018a e008 | | Load 0x0,0x8
018b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
018c e5fc | | Load 0x2,-0x4
018d e402 | | Load 0x2,0x2
018e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
018f 800e | | Call 0x0,0xe
0190 680c |h | Jump_Zero 0x19d
0191 e5fb | | Load 0x2,-0x5
0192 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
0194 4802 |H | Short_Literal 0x2
0195 0092 0f1b | | Action Push_String_Extended,0xf1b ; "Can't get remote directory name for view "
0197 e5ff | | Load 0x2,-0x1
0198 01cc | | Execute Vector,Catenate
0199 e00a | | Load 0x0,0xa
019a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
019b c5fb | | Store 0x2,-0x5
019c 4505 |E | Exit_Suprogram New_Top_Offset 0x5
019d e404 | | Load 0x2,0x4
019e 01db | | Execute Vector,Length
019f 700d |p | Jump_Nonzero 0x1ad
01a0 e5fb | | Load 0x2,-0x5
01a1 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
01a3 4802 |H | Short_Literal 0x2
01a4 0092 0f14 | | Action Push_String_Extended,0xf14 ; "Can't derive a family name from the remote pathname "
01a6 e403 | | Load 0x2,0x3
01a7 8009 | | Call 0x0,0x9
01a8 01cc | | Execute Vector,Catenate
01a9 e00a | | Load 0x0,0xa
01aa 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01ab c5fb | | Store 0x2,-0x5
01ac 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01ad e405 | | Load 0x2,0x5
01ae e004 | | Load 0x0,0x4
01af 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01b0 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01b1 6801 |h | Jump_Zero 0x1b3
01b2 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01b3 e006 | | Load 0x0,0x6
01b4 180e | | Execute Package,Field_Execute,Field_Number 0xe
01b5 4804 |H | Short_Literal 0x4
01b6 0092 0f1c | | Action Push_String_Extended,0xf1c ; "Executing Perform_Remote_Import"
01b8 e008 | | Load 0x0,0x8
01b9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01ba 00cf | | Action Mark_Auxiliary
01bb 7826 |x& | Jump 0x1e2
01bc e004 | | Load 0x0,0x4
01bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01be e406 | | Load 0x2,0x6
01bf 0120 | | Execute Any,Is_Value
01c0 6803 |h | Jump_Zero 0x1c4
01c1 e004 | | Load 0x0,0x4
01c2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01c3 7801 |x | Jump 0x1c5
01c4 e406 | | Load 0x2,0x6
01c5 e405 | | Load 0x2,0x5
01c6 e004 | | Load 0x0,0x4
01c7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01c8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01c9 c406 | | Store 0x2,0x6
01ca c407 | | Store 0x2,0x7
01cb e407 | | Load 0x2,0x7
01cc 680e |h | Jump_Zero 0x1db
01cd e006 | | Load 0x0,0x6
01ce 180e | | Execute Package,Field_Execute,Field_Number 0xe
01cf 4806 |H | Short_Literal 0x6
01d0 0092 0f1d | | Action Push_String_Extended,0xf1d ; "Can't get imported view from iterator. Error Status = "
01d2 e407 | | Load 0x2,0x7
01d3 e004 | | Load 0x0,0x4
01d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d5 011c | | Execute Any,Convert_Unchecked
01d6 1c01 | | Execute_Immediate Run_Utility,0x1
01d7 01cc | | Execute Vector,Catenate
01d8 e008 | | Load 0x0,0x8
01d9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01da 7801 |x | Jump 0x1dc
01db 840a | | Call 0x2,0xa
01dc e405 | | Load 0x2,0x5
01dd e004 | | Load 0x0,0x4
01de 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01df 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01e0 c405 | | Store 0x2,0x5
01e1 00c9 | | Action Pop_Auxiliary_Loop
01e2 e405 | | Load 0x2,0x5
01e3 e004 | | Load 0x0,0x4
01e4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01e5 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01e6 6fd5 |o | Jump_Zero 0x1bc
01e7 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01e8 TRAP_0148:
01e8 0007 | | Action Break_Optional
01e9 e5fb | | Load 0x2,-0x5
01ea 0092 0f1e | | Action Push_String_Extended,0xf1e ; "Perform_Remote_Import"
01ec e00a | | Load 0x0,0xa
01ed 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01ee c5fb | | Store 0x2,-0x5
01ef 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 0222 | " | .CONST 0x0222 ; Address of begin
01f1 0310 | | .CONST 0x0310 ; Address of exception handler
01f2 000b | | .CONST 0x000b ; Number of locals
01f3 INIT_01f0:
01f3 e004 | | Load 0x0,0x4
01f4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01f5 02c7 | | Declare_Variable Any
01f6 e006 | | Load 0x0,0x6
01f7 180e | | Execute Package,Field_Execute,Field_Number 0xe
01f8 e5fe | | Load 0x2,-0x2
01f9 e00c | | Load 0x0,0xc
01fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01fb 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
01fc a402 | | Store_Unchecked 0x2,0x2
01fd e5fc | | Load 0x2,-0x4
01fe 00d9 | | Load_Top At_Offset_1
01ff 8003 | | Call 0x0,0x3
0200 e5ff | | Load 0x2,-0x1
0201 e004 | | Load 0x0,0x4
0202 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0203 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0204 00d8 | | Load_Top At_Offset_0
0205 e004 | | Load 0x0,0x4
0206 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0207 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0208 e004 | | Load 0x0,0x4
0209 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
020a 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
020b e00f | | Load 0x0,0xf
020c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
020d 00da | | Load_Top At_Offset_2
020e 0092 0f1f | | Action Push_String_Extended,0xf1f ; "/imports"
0210 01cc | | Execute Vector,Catenate
0211 0007 | | Action Break_Optional
0212 00d8 | | Load_Top At_Offset_0
0213 0092 0f20 | | Action Push_String_Extended,0xf20 ; "/"
0215 01cc | | Execute Vector,Catenate
0216 00da | | Load_Top At_Offset_2
0217 01cc | | Execute Vector,Catenate
0218 0007 | | Action Break_Optional
0219 00e1 | | Load_Encached Boolean_Cache
021a e00d | | Load 0x0,0xd
021b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
021c 02c7 | | Declare_Variable Any
021d e5fb | | Load 0x2,-0x5
021e a409 | | Store_Unchecked 0x2,0x9
021f 00e1 | | Load_Encached Boolean_Cache
0220 029f 0d63 | c| Declare_Subprogram INIT_0d60,For_Call
0222 BODY_01f0:
0222 e005 | | Load 0x0,0x5
0223 7002 |p | Jump_Nonzero 0x226
0224 e5f9 | | Load 0x2,-0x7
0225 6827 |h' | Jump_Zero 0x24d
0226 e006 | | Load 0x0,0x6
0227 180e | | Execute Package,Field_Execute,Field_Number 0xe
0228 4809 |H | Short_Literal 0x9
0229 0092 0f21 | !| Action Push_String_Extended,0xf21 ; "#~Remove_Remote_Import (View_To_Remove"
022b e404 | | Load 0x2,0x4
022c 8007 | | Call 0x0,0x7
022d 01cc | | Execute Vector,Catenate
022e 0092 0f22 | "| Action Push_String_Extended,0xf22 ; ", From_View"
0230 01cc | | Execute Vector,Catenate
0231 e5fe | | Load 0x2,-0x2
0232 8007 | | Call 0x0,0x7
0233 01cc | | Execute Vector,Catenate
0234 0092 0f1a | | Action Push_String_Extended,0xf1a ; ", Remote_Machine"
0236 01cc | | Execute Vector,Catenate
0237 e5fd | | Load 0x2,-0x3
0238 8007 | | Call 0x0,0x7
0239 01cc | | Execute Vector,Catenate
023a 0092 0f11 | | Action Push_String_Extended,0xf11 ; ", Remote_Directory"
023c 01cc | | Execute Vector,Catenate
023d e5fc | | Load 0x2,-0x4
023e 8007 | | Call 0x0,0x7
023f 01cc | | Execute Vector,Catenate
0240 0092 0f23 | #| Action Push_String_Extended,0xf23 ; ", Destroying_Library => "
0242 01cc | | Execute Vector,Catenate
0243 e5fa | | Load 0x2,-0x6
0244 00e1 | | Load_Encached Boolean_Cache
0245 011c | | Execute Any,Convert_Unchecked
0246 1c01 | | Execute_Immediate Run_Utility,0x1
0247 01cc | | Execute Vector,Catenate
0248 0092 0f12 | | Action Push_String_Extended,0xf12 ; ")"
024a 01cc | | Execute Vector,Catenate
024b e008 | | Load 0x0,0x8
024c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
024d e403 | | Load 0x2,0x3
024e 01db | | Execute Vector,Length
024f 700d |p | Jump_Nonzero 0x25d
0250 e5f8 | | Load 0x2,-0x8
0251 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
0253 4802 |H | Short_Literal 0x2
0254 0092 0f14 | | Action Push_String_Extended,0xf14 ; "Can't derive a family name from the remote pathname "
0256 e5fc | | Load 0x2,-0x4
0257 8009 | | Call 0x0,0x9
0258 01cc | | Execute Vector,Catenate
0259 e00a | | Load 0x0,0xa
025a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
025b c5f8 | | Store 0x2,-0x8
025c 4508 |E | Exit_Suprogram New_Top_Offset 0x8
025d e006 | | Load 0x0,0x6
025e 180e | | Execute Package,Field_Execute,Field_Number 0xe
025f 4804 |H | Short_Literal 0x4
0260 0092 0f24 | $| Action Push_String_Extended,0xf24 ; "Executing Remove_Remote_Import"
0262 e008 | | Load 0x0,0x8
0263 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0264 e5fa | | Load 0x2,-0x6
0265 7028 |p( | Jump_Nonzero 0x28e
0266 e5f8 | | Load 0x2,-0x8
0267 00db | | Load_Top At_Offset_3
0268 0120 | | Execute Any,Is_Value
0269 6803 |h | Jump_Zero 0x26d
026a e00d | | Load 0x0,0xd
026b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
026c 7801 |x | Jump 0x26e
026d 00db | | Load_Top At_Offset_3
026e e005 | | Load 0x0,0x5
026f 7002 |p | Jump_Nonzero 0x272
0270 e5f9 | | Load 0x2,-0x7
0271 7801 |x | Jump 0x273
0272 4801 |H | Short_Literal 0x1
0273 e010 | | Load 0x0,0x10
0274 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0275 e010 | | Load 0x0,0x10
0276 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0277 e5fd | | Load 0x2,-0x3
0278 0092 0f25 | %| Action Push_String_Extended,0xf25 ; "I386_Unix_Als_Xt"
027a e00d | | Load 0x0,0xd
027b 180f | | Execute Package,Field_Execute,Field_Number 0xf
027c c409 | | Store 0x2,0x9
027d c5f8 | | Store 0x2,-0x8
027e e5f9 | | Load 0x2,-0x7
027f e5f8 | | Load 0x2,-0x8
0280 800e | | Call 0x0,0xe
0281 680c |h | Jump_Zero 0x28e
0282 e5f8 | | Load 0x2,-0x8
0283 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
0285 4802 |H | Short_Literal 0x2
0286 0092 0f26 | &| Action Push_String_Extended,0xf26 ; "Can't acquire a connection to "
0288 e5fd | | Load 0x2,-0x3
0289 01cc | | Execute Vector,Catenate
028a e00a | | Load 0x0,0xa
028b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
028c c5f8 | | Store 0x2,-0x8
028d 4508 |E | Exit_Suprogram New_Top_Offset 0x8
028e 4801 |H | Short_Literal 0x1
028f e5ff | | Load 0x2,-0x1
0290 8011 | | Call 0x0,0x11
0291 e403 | | Load 0x2,0x3
0292 e00f | | Load 0x0,0xf
0293 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0294 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0295 e5f8 | | Load 0x2,-0x8
0296 e5f9 | | Load 0x2,-0x7
0297 e409 | | Load 0x2,0x9
0298 e5fc | | Load 0x2,-0x4
0299 e402 | | Load 0x2,0x2
029a e5ff | | Load 0x2,-0x1
029b 8222 | " | Call 0x1,0x22
029c c5f8 | | Store 0x2,-0x8
029d e5f9 | | Load 0x2,-0x7
029e e5f8 | | Load 0x2,-0x8
029f 800e | | Call 0x0,0xe
02a0 680a |h | Jump_Zero 0x2ab
02a1 e5f8 | | Load 0x2,-0x8
02a2 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
02a4 4802 |H | Short_Literal 0x2
02a5 0092 0f27 | '| Action Push_String_Extended,0xf27 ; "Can't remove the imported units"
02a7 e00a | | Load 0x0,0xa
02a8 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02a9 c5f8 | | Store 0x2,-0x8
02aa 4508 |E | Exit_Suprogram New_Top_Offset 0x8
02ab 00d9 | | Load_Top At_Offset_1
02ac 6801 |h | Jump_Zero 0x2ae
02ad 4508 |E | Exit_Suprogram New_Top_Offset 0x8
02ae 00e1 | | Load_Encached Boolean_Cache
02af e5f8 | | Load 0x2,-0x8
02b0 e5f9 | | Load 0x2,-0x7
02b1 e409 | | Load 0x2,0x9
02b2 e407 | | Load 0x2,0x7
02b3 8012 | | Call 0x0,0x12
02b4 c5f8 | | Store 0x2,-0x8
02b5 c408 | | Store 0x2,0x8
02b6 4802 |H | Short_Literal 0x2
02b7 e5f8 | | Load 0x2,-0x8
02b8 e013 | | Load 0x0,0x13
02b9 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02ba 6801 |h | Jump_Zero 0x2bc
02bb 4508 |E | Exit_Suprogram New_Top_Offset 0x8
02bc 00db | | Load_Top At_Offset_3
02bd 6843 |hC | Jump_Zero 0x301
02be e5fa | | Load 0x2,-0x6
02bf 6801 |h | Jump_Zero 0x2c1
02c0 7801 |x | Jump 0x2c2
02c1 840b | | Call 0x2,0xb
02c2 e006 | | Load 0x0,0x6
02c3 180e | | Execute Package,Field_Execute,Field_Number 0xe
02c4 4802 |H | Short_Literal 0x2
02c5 0092 0f28 | (| Action Push_String_Extended,0xf28 ; "Removing imported library, which was copied from another family"
02c7 e008 | | Load 0x0,0x8
02c8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02c9 e006 | | Load 0x0,0x6
02ca 180e | | Execute Package,Field_Execute,Field_Number 0xe
02cb 4804 |H | Short_Literal 0x4
02cc 0092 0f29 | )| Action Push_String_Extended,0xf29 ; "Erasing copied remote library "
02ce e407 | | Load 0x2,0x7
02cf 8009 | | Call 0x0,0x9
02d0 01cc | | Execute Vector,Catenate
02d1 e008 | | Load 0x0,0x8
02d2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02d3 e5f8 | | Load 0x2,-0x8
02d4 e5f9 | | Load 0x2,-0x7
02d5 e409 | | Load 0x2,0x9
02d6 0092 0f2a | *| Action Push_String_Extended,0xf2a ; "ada lib_manager\x5c("
02d8 e403 | | Load 0x2,0x3
02d9 01cc | | Execute Vector,Catenate
02da 0092 0f2b | +| Action Push_String_Extended,0xf2b ; "\x5c).erase libraries="
02dc 01cc | | Execute Vector,Catenate
02dd e407 | | Load 0x2,0x7
02de 01cc | | Execute Vector,Catenate
02df 0092 0f2c | ,| Action Push_String_Extended,0xf2c ; " confirm=no"
02e1 01cc | | Execute Vector,Catenate
02e2 8014 | | Call 0x0,0x14
02e3 c5f8 | | Store 0x2,-0x8
02e4 e5f9 | | Load 0x2,-0x7
02e5 e5f8 | | Load 0x2,-0x8
02e6 800e | | Call 0x0,0xe
02e7 6812 |h | Jump_Zero 0x2fa
02e8 e006 | | Load 0x0,0x6
02e9 180e | | Execute Package,Field_Execute,Field_Number 0xe
02ea 4807 |H | Short_Literal 0x7
02eb 0092 0f2d | -| Action Push_String_Extended,0xf2d ; "Can't remove copied library "
02ed e407 | | Load 0x2,0x7
02ee 8009 | | Call 0x0,0x9
02ef 01cc | | Execute Vector,Catenate
02f0 0092 0f2e | .| Action Push_String_Extended,0xf2e ; ". "
02f2 01cc | | Execute Vector,Catenate
02f3 e5f8 | | Load 0x2,-0x8
02f4 e013 | | Load 0x0,0x13
02f5 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02f6 01cc | | Execute Vector,Catenate
02f7 e008 | | Load 0x0,0x8
02f8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02f9 4508 |E | Exit_Suprogram New_Top_Offset 0x8
02fa e5f8 | | Load 0x2,-0x8
02fb e5f9 | | Load 0x2,-0x7
02fc e409 | | Load 0x2,0x9
02fd e5fc | | Load 0x2,-0x4
02fe 8219 | | Call 0x1,0x19
02ff c5f8 | | Store 0x2,-0x8
0300 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0301 e006 | | Load 0x0,0x6
0302 180e | | Execute Package,Field_Execute,Field_Number 0xe
0303 4806 |H | Short_Literal 0x6
0304 e404 | | Load 0x2,0x4
0305 0092 0f2f | /| Action Push_String_Extended,0xf2f ; " isn't remotely imported into "
0307 01cc | | Execute Vector,Catenate
0308 e5fe | | Load 0x2,-0x2
0309 01cc | | Execute Vector,Catenate
030a 0092 0f30 | 0| Action Push_String_Extended,0xf30 ; ", so it can't be removed as an import"
030c 01cc | | Execute Vector,Catenate
030d e008 | | Load 0x0,0x8
030e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
030f 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0310 TRAP_01f0:
0310 0007 | | Action Break_Optional
0311 e5f8 | | Load 0x2,-0x8
0312 0092 0f31 | 1| Action Push_String_Extended,0xf31 ; "Remove_Remote_Import"
0314 e00a | | Load 0x0,0xa
0315 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0316 c5f8 | | Store 0x2,-0x8
0317 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 031b | | .CONST 0x031b ; Address of begin
0319 0004 | | .CONST 0x0004 ; Address of exception handler
031a 0001 | | .CONST 0x0001 ; Number of locals
031b BODY_0318:
031b INIT_0318:
031b e005 | | Load 0x0,0x5
031c 680b |h | Jump_Zero 0x328
031d 00da | | Load_Top At_Offset_2
031e 0092 0f32 | 2| Action Push_String_Extended,0xf32 ; "list"
0320 01df | | Execute Vector,Equal
0321 6803 |h | Jump_Zero 0x325
0322 0092 0f33 | 3| Action Push_String_Extended,0xf33 ; " detail=brief"
0324 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0325 0092 0f34 | 4| Action Push_String_Extended,0xf34 ; " detail=full"
0327 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0328 0092 0f33 | 3| Action Push_String_Extended,0xf33 ; " detail=brief"
032a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
032b 0000 0000 | | .BLANK 0000[0x5]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0333 | 3 | .CONST 0x0333 ; Address of begin
0331 0004 | | .CONST 0x0004 ; Address of exception handler
0332 0001 | | .CONST 0x0001 ; Number of locals
0333 BODY_0330:
0333 INIT_0330:
0333 e005 | | Load 0x0,0x5
0334 680c |h | Jump_Zero 0x341
0335 e006 | | Load 0x0,0x6
0336 180e | | Execute Package,Field_Execute,Field_Number 0xe
0337 480a |H | Short_Literal 0xa
0338 0092 0f35 | 5| Action Push_String_Extended,0xf35 ; "#~Batch file <= \x22"
033a e5fe | | Load 0x2,-0x2
033b 01cc | | Execute Vector,Catenate
033c 0092 0f36 | 6| Action Push_String_Extended,0xf36 ; "\x22"
033e 01cc | | Execute Vector,Catenate
033f e008 | | Load 0x0,0x8
0340 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0341 00db | | Load_Top At_Offset_3
0342 00db | | Load_Top At_Offset_3
0343 e015 | | Load 0x0,0x15
0344 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0345 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0346 0000 0000 | | .XXX[0x2]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034e | N | .CONST 0x034e ; Address of begin
0349 0004 | | .CONST 0x0004 ; Address of exception handler
034a 0003 | | .CONST 0x0003 ; Number of locals
034b INIT_0348:
034b 00e1 | | Load_Encached Boolean_Cache
034c e004 | | Load 0x0,0x4
034d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
034e BODY_0348:
034e e004 | | Load 0x0,0x4
034f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0350 00e1 | | Load_Encached Boolean_Cache
0351 600e |` | Indirect_Literal Discrete,0x360,{0x00000000, 0x00004000}
0352 e016 | | Load 0x0,0x16
0353 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0354 e5ff | | Load 0x2,-0x1
0355 e004 | | Load 0x0,0x4
0356 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0357 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0358 005b | [ | Store_Top Discrete,At_Offset_3
0359 0059 | Y | Store_Top Discrete,At_Offset_1
035a 00d8 | | Load_Top At_Offset_0
035b 6802 |h | Jump_Zero 0x35e
035c 4800 |H | Short_Literal 0x0
035d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
035e 00d9 | | Load_Top At_Offset_1
035f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0360 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0364 0000 0000 | | .BLANK 0000[0x4]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036b | k | .CONST 0x036b ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0001 | | .CONST 0x0001 ; Number of locals
036b BODY_0368:
036b INIT_0368:
036b e005 | | Load 0x0,0x5
036c 681f |h | Jump_Zero 0x38c
036d e211 | | Load 0x1,0x11
036e 681d |h | Jump_Zero 0x38c
036f e5fc | | Load 0x2,-0x4
0370 e5fd | | Load 0x2,-0x3
0371 e5fe | | Load 0x2,-0x2
0372 0092 0f37 | 7| Action Push_String_Extended,0xf37 ; "ada unit_manager\x5c("
0374 e5ff | | Load 0x2,-0x1
0375 01cc | | Execute Vector,Catenate
0376 0092 0f38 | 8| Action Push_String_Extended,0xf38 ; "/adalib,read\x5c).list units=* link=yes"
0378 01cc | | Execute Vector,Catenate
0379 0092 0f32 | 2| Action Push_String_Extended,0xf32 ; "list"
037b 8216 | | Call 0x1,0x16
037c 01cc | | Execute Vector,Catenate
037d 8014 | | Call 0x0,0x14
037e c5fc | | Store 0x2,-0x4
037f e5fd | | Load 0x2,-0x3
0380 e5fc | | Load 0x2,-0x4
0381 800e | | Call 0x0,0xe
0382 6809 |h | Jump_Zero 0x38c
0383 e5fc | | Load 0x2,-0x4
0384 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
0386 4802 |H | Short_Literal 0x2
0387 0092 0f39 | 9| Action Push_String_Extended,0xf39 ; "Can't list the units"
0389 e00a | | Load 0x0,0xa
038a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
038b c5fc | | Store 0x2,-0x4
038c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
038d 0000 0000 | | .XXX[0x3]
038f 0000 | |
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 039b | | .CONST 0x039b ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0003 | | .CONST 0x0003 ; Number of locals
0393 INIT_0390:
0393 e004 | | Load 0x0,0x4
0394 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0395 e004 | | Load 0x0,0x4
0396 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0397 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0398 02c7 | | Declare_Variable Any
0399 00d8 | | Load_Top At_Offset_0
039a 1c00 | | Execute_Immediate Run_Utility,0x0
039b BODY_0390:
039b e004 | | Load 0x0,0x4
039c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
039d 00d9 | | Load_Top At_Offset_1
039e 0120 | | Execute Any,Is_Value
039f 6804 |h | Jump_Zero 0x3a4
03a0 e004 | | Load 0x0,0x4
03a1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03a2 1b11 | | Execute Package,Field_Read,Field_Number 0x11
03a3 7801 |x | Jump 0x3a5
03a4 00d9 | | Load_Top At_Offset_1
03a5 604e |`N | Indirect_Literal Discrete,0x3f4,{0x00000000, 0x00004000}
03a6 e016 | | Load 0x0,0x16
03a7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03a8 4800 |H | Short_Literal 0x0
03a9 e5ff | | Load 0x2,-0x1
03aa e004 | | Load 0x0,0x4
03ab 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03ac 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03ad c403 | | Store 0x2,0x3
03ae 005a | Z | Store_Top Discrete,At_Offset_2
03af 00d9 | | Load_Top At_Offset_1
03b0 6818 |h | Jump_Zero 0x3c9
03b1 e5fd | | Load 0x2,-0x3
03b2 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
03b4 4802 |H | Short_Literal 0x2
03b5 0092 0f3a | :| Action Push_String_Extended,0xf3a ; "Can't get default context for "
03b7 e5ff | | Load 0x2,-0x1
03b8 e004 | | Load 0x0,0x4
03b9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03ba 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
03bb 01cc | | Execute Vector,Catenate
03bc 0092 0f3b | ;| Action Push_String_Extended,0xf3b ; ". Error Status = "
03be 01cc | | Execute Vector,Catenate
03bf e402 | | Load 0x2,0x2
03c0 e004 | | Load 0x0,0x4
03c1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03c2 011c | | Execute Any,Convert_Unchecked
03c3 1c01 | | Execute_Immediate Run_Utility,0x1
03c4 01cc | | Execute Vector,Catenate
03c5 e00a | | Load 0x0,0xa
03c6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
03c7 c5fd | | Store 0x2,-0x3
03c8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03c9 e017 | | Load 0x0,0x17
03ca 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03cb e004 | | Load 0x0,0x4
03cc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03cd 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03ce c5fe | | Store 0x2,-0x2
03cf e004 | | Load 0x0,0x4
03d0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03d1 e017 | | Load 0x0,0x17
03d2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03d3 00da | | Load_Top At_Offset_2
03d4 e004 | | Load 0x0,0x4
03d5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03d6 1814 | | Execute Package,Field_Execute,Field_Number 0x14
03d7 005a | Z | Store_Top Discrete,At_Offset_2
03d8 00d9 | | Load_Top At_Offset_1
03d9 6818 |h | Jump_Zero 0x3f2
03da e5fd | | Load 0x2,-0x3
03db 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
03dd 4802 |H | Short_Literal 0x2
03de 0092 0f3c | <| Action Push_String_Extended,0xf3c ; "Can't set default context to "
03e0 e5ff | | Load 0x2,-0x1
03e1 e004 | | Load 0x0,0x4
03e2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03e3 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
03e4 01cc | | Execute Vector,Catenate
03e5 0092 0f3b | ;| Action Push_String_Extended,0xf3b ; ". Error Status = "
03e7 01cc | | Execute Vector,Catenate
03e8 e402 | | Load 0x2,0x2
03e9 e004 | | Load 0x0,0x4
03ea 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03eb 011c | | Execute Any,Convert_Unchecked
03ec 1c01 | | Execute_Immediate Run_Utility,0x1
03ed 01cc | | Execute Vector,Catenate
03ee e00a | | Load 0x0,0xa
03ef 1812 | | Execute Package,Field_Execute,Field_Number 0x12
03f0 c5fd | | Store 0x2,-0x3
03f1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03f2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03f3 0000 | | .XXX[0x1]
03f4 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03fd | | .CONST 0x03fd ; Address of begin
03f9 0004 | | .CONST 0x0004 ; Address of exception handler
03fa 0002 | | .CONST 0x0002 ; Number of locals
03fb INIT_03f8:
03fb e004 | | Load 0x0,0x4
03fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03fd BODY_03f8:
03fd e004 | | Load 0x0,0x4
03fe 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ff e017 | | Load 0x0,0x17
0400 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0401 e5ff | | Load 0x2,-0x1
0402 e004 | | Load 0x0,0x4
0403 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0404 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0405 0059 | Y | Store_Top Discrete,At_Offset_1
0406 00d8 | | Load_Top At_Offset_0
0407 680d |h | Jump_Zero 0x415
0408 e006 | | Load 0x0,0x6
0409 180e | | Execute Package,Field_Execute,Field_Number 0xe
040a 4805 |H | Short_Literal 0x5
040b 0092 0f3d | =| Action Push_String_Extended,0xf3d ; "Can't restore default context. Error Status = "
040d 00db | | Load_Top At_Offset_3
040e e004 | | Load 0x0,0x4
040f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0410 011c | | Execute Any,Convert_Unchecked
0411 1c01 | | Execute_Immediate Run_Utility,0x1
0412 01cc | | Execute Vector,Catenate
0413 e008 | | Load 0x0,0x8
0414 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0415 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0416 0000 0000 | | .XXX[0x2]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 042f | / | .CONST 0x042f ; Address of begin
0419 0004 | | .CONST 0x0004 ; Address of exception handler
041a 0005 | | .CONST 0x0005 ; Number of locals
041b INIT_0418:
041b e004 | | Load 0x0,0x4
041c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
041d 1b18 | | Execute Package,Field_Read,Field_Number 0x18
041e 02c7 | | Declare_Variable Any
041f 00d8 | | Load_Top At_Offset_0
0420 1c00 | | Execute_Immediate Run_Utility,0x0
0421 e013 | | Load 0x0,0x13
0422 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0423 02c7 | | Declare_Variable Any
0424 00d8 | | Load_Top At_Offset_0
0425 1c00 | | Execute_Immediate Run_Utility,0x0
0426 e004 | | Load 0x0,0x4
0427 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0428 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0429 02c7 | | Declare_Variable Any
042a 00d8 | | Load_Top At_Offset_0
042b 1c00 | | Execute_Immediate Run_Utility,0x0
042c e004 | | Load 0x0,0x4
042d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
042e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
042f BODY_0418:
042f 00da | | Load_Top At_Offset_2
0430 00da | | Load_Top At_Offset_2
0431 e5ff | | Load 0x2,-0x1
0432 821a | | Call 0x1,0x1a
0433 c404 | | Store 0x2,0x4
0434 c403 | | Store 0x2,0x3
0435 4802 |H | Short_Literal 0x2
0436 00db | | Load_Top At_Offset_3
0437 e013 | | Load 0x0,0x13
0438 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0439 680f |h | Jump_Zero 0x449
043a e006 | | Load 0x0,0x6
043b 180e | | Execute Package,Field_Execute,Field_Number 0xe
043c 4805 |H | Short_Literal 0x5
043d 0092 0f3e | >| Action Push_String_Extended,0xf3e ; "#~"
043f e403 | | Load 0x2,0x3
0440 e013 | | Load 0x0,0x13
0441 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0442 01cc | | Execute Vector,Catenate
0443 e008 | | Load 0x0,0x8
0444 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0445 e004 | | Load 0x0,0x4
0446 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0447 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0448 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0449 e004 | | Load 0x0,0x4
044a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
044b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
044c e402 | | Load 0x2,0x2
044d 0120 | | Execute Any,Is_Value
044e 6804 |h | Jump_Zero 0x453
044f e004 | | Load 0x0,0x4
0450 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0451 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0452 7801 |x | Jump 0x454
0453 e402 | | Load 0x2,0x2
0454 602b |`+ | Indirect_Literal Discrete,0x480,{0x00000000, 0x00004000}
0455 e016 | | Load 0x0,0x16
0456 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0457 e017 | | Load 0x0,0x17
0458 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0459 e018 | | Load 0x0,0x18
045a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
045b 4801 |H | Short_Literal 0x1
045c 4800 |H | Short_Literal 0x0
045d e017 | | Load 0x0,0x17
045e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
045f e004 | | Load 0x0,0x4
0460 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0461 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0462 0092 0f3f | ?| Action Push_String_Extended,0xf3f ; "_"
0464 e5ff | | Load 0x2,-0x1
0465 e004 | | Load 0x0,0x4
0466 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0467 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0468 01cc | | Execute Vector,Catenate
0469 0092 0f40 | @| Action Push_String_Extended,0xf40 ; ".State.Exports"
046b 01cc | | Execute Vector,Catenate
046c e004 | | Load 0x0,0x4
046d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
046e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
046f c402 | | Store 0x2,0x2
0470 0059 | Y | Store_Top Discrete,At_Offset_1
0471 00d8 | | Load_Top At_Offset_0
0472 6806 |h | Jump_Zero 0x479
0473 00d9 | | Load_Top At_Offset_1
0474 821b | | Call 0x1,0x1b
0475 e004 | | Load 0x0,0x4
0476 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0477 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0478 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0479 00d9 | | Load_Top At_Offset_1
047a 821b | | Call 0x1,0x1b
047b 00db | | Load_Top At_Offset_3
047c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
047d 0000 0000 | | .XXX[0x3]
047f 0000 | |
0480 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0484 0000 0000 | | .BLANK 0000[0x4]
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 04a0 | | .CONST 0x04a0 ; Address of begin
0489 0004 | | .CONST 0x0004 ; Address of exception handler
048a 0005 | | .CONST 0x0005 ; Number of locals
048b INIT_0488:
048b e004 | | Load 0x0,0x4
048c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
048d 1b18 | | Execute Package,Field_Read,Field_Number 0x18
048e 02c7 | | Declare_Variable Any
048f e006 | | Load 0x0,0x6
0490 180e | | Execute Package,Field_Execute,Field_Number 0xe
0491 e5ff | | Load 0x2,-0x1
0492 e00c | | Load 0x0,0xc
0493 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0494 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0495 821c | | Call 0x1,0x1c
0496 a402 | | Store_Unchecked 0x2,0x2
0497 e004 | | Load 0x0,0x4
0498 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0499 02c7 | | Declare_Variable Any
049a 00d8 | | Load_Top At_Offset_0
049b 1c00 | | Execute_Immediate Run_Utility,0x0
049c e004 | | Load 0x0,0x4
049d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
049e 029f 0dab | | Declare_Subprogram INIT_0da8,For_Call
04a0 BODY_0488:
04a0 00cf | | Action Mark_Auxiliary
04a1 7818 |x | Jump 0x4ba
04a2 e004 | | Load 0x0,0x4
04a3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04a4 e403 | | Load 0x2,0x3
04a5 0120 | | Execute Any,Is_Value
04a6 6803 |h | Jump_Zero 0x4aa
04a7 e004 | | Load 0x0,0x4
04a8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04a9 7801 |x | Jump 0x4ab
04aa e403 | | Load 0x2,0x3
04ab e402 | | Load 0x2,0x2
04ac e004 | | Load 0x0,0x4
04ad 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04ae 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
04af c403 | | Store 0x2,0x3
04b0 005b | [ | Store_Top Discrete,At_Offset_3
04b1 00da | | Load_Top At_Offset_2
04b2 7001 |p | Jump_Nonzero 0x4b4
04b3 8405 | | Call 0x2,0x5
04b4 e402 | | Load 0x2,0x2
04b5 e004 | | Load 0x0,0x4
04b6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04b7 181d | | Execute Package,Field_Execute,Field_Number 0x1d
04b8 c402 | | Store 0x2,0x2
04b9 00c9 | | Action Pop_Auxiliary_Loop
04ba e402 | | Load 0x2,0x2
04bb e004 | | Load 0x0,0x4
04bc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04bd 181e | | Execute Package,Field_Execute,Field_Number 0x1e
04be 6fe3 |o | Jump_Zero 0x4a2
04bf 4505 |E | Exit_Suprogram New_Top_Offset 0x5
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04cd | | .CONST 0x04cd ; Address of begin
04c1 0004 | | .CONST 0x0004 ; Address of exception handler
04c2 0003 | | .CONST 0x0003 ; Number of locals
04c3 INIT_04c0:
04c3 0092 0f41 | A| Action Push_String_Extended,0xf41 ; "test -d "
04c5 00db | | Load_Top At_Offset_3
04c6 01cc | | Execute Vector,Catenate
04c7 0007 | | Action Break_Optional
04c8 e013 | | Load 0x0,0x13
04c9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04ca 02c7 | | Declare_Variable Any
04cb 00d8 | | Load_Top At_Offset_0
04cc 1c00 | | Execute_Immediate Run_Utility,0x0
04cd BODY_04c0:
04cd 00d8 | | Load_Top At_Offset_0
04ce e5fd | | Load 0x2,-0x3
04cf e5fe | | Load 0x2,-0x2
04d0 e402 | | Load 0x2,0x2
04d1 8014 | | Call 0x0,0x14
04d2 c403 | | Store 0x2,0x3
04d3 4802 |H | Short_Literal 0x2
04d4 00d9 | | Load_Top At_Offset_1
04d5 e013 | | Load 0x0,0x13
04d6 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04d7 6820 |h | Jump_Zero 0x4f8
04d8 e005 | | Load 0x0,0x5
04d9 680b |h | Jump_Zero 0x4e5
04da e006 | | Load 0x0,0x6
04db 180e | | Execute Package,Field_Execute,Field_Number 0xe
04dc 4802 |H | Short_Literal 0x2
04dd 0092 0f3e | >| Action Push_String_Extended,0xf3e ; "#~"
04df 00db | | Load_Top At_Offset_3
04e0 e013 | | Load 0x0,0x13
04e1 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04e2 01cc | | Execute Vector,Catenate
04e3 e008 | | Load 0x0,0x8
04e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04e5 e005 | | Load 0x0,0x5
04e6 7002 |p | Jump_Nonzero 0x4e9
04e7 e5fd | | Load 0x2,-0x3
04e8 680d |h | Jump_Zero 0x4f6
04e9 e006 | | Load 0x0,0x6
04ea 180e | | Execute Package,Field_Execute,Field_Number 0xe
04eb 4802 |H | Short_Literal 0x2
04ec 0092 0f42 | B| Action Push_String_Extended,0xf42 ; "#~The remote directory "
04ee e5ff | | Load 0x2,-0x1
04ef 8009 | | Call 0x0,0x9
04f0 01cc | | Execute Vector,Catenate
04f1 0092 0f43 | C| Action Push_String_Extended,0xf43 ; " does not exist"
04f3 01cc | | Execute Vector,Catenate
04f4 e008 | | Load 0x0,0x8
04f5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04f6 4800 |H | Short_Literal 0x0
04f7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
04f8 e005 | | Load 0x0,0x5
04f9 7002 |p | Jump_Nonzero 0x4fc
04fa e5fd | | Load 0x2,-0x3
04fb 680d |h | Jump_Zero 0x509
04fc e006 | | Load 0x0,0x6
04fd 180e | | Execute Package,Field_Execute,Field_Number 0xe
04fe 4802 |H | Short_Literal 0x2
04ff 0092 0f42 | B| Action Push_String_Extended,0xf42 ; "#~The remote directory "
0501 e5ff | | Load 0x2,-0x1
0502 8009 | | Call 0x0,0x9
0503 01cc | | Execute Vector,Catenate
0504 0092 0f44 | D| Action Push_String_Extended,0xf44 ; " exists"
0506 01cc | | Execute Vector,Catenate
0507 e008 | | Load 0x0,0x8
0508 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0509 4801 |H | Short_Literal 0x1
050a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
050b 0000 0000 | | .BLANK 0000[0x5]
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 054d | M | .CONST 0x054d ; Address of begin
0511 0004 | | .CONST 0x0004 ; Address of exception handler
0512 000c | | .CONST 0x000c ; Number of locals
0513 INIT_0510:
0513 e5fd | | Load 0x2,-0x3
0514 e006 | | Load 0x0,0x6
0515 180e | | Execute Package,Field_Execute,Field_Number 0xe
0516 e5fe | | Load 0x2,-0x2
0517 e00c | | Load 0x0,0xc
0518 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0519 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
051a 8003 | | Call 0x0,0x3
051b e004 | | Load 0x0,0x4
051c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
051d 02c7 | | Declare_Variable Any
051e e006 | | Load 0x0,0x6
051f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0520 e5ff | | Load 0x2,-0x1
0521 e00c | | Load 0x0,0xc
0522 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0523 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0524 a403 | | Store_Unchecked 0x2,0x3
0525 e006 | | Load 0x0,0x6
0526 180e | | Execute Package,Field_Execute,Field_Number 0xe
0527 e5ff | | Load 0x2,-0x1
0528 e00b | | Load 0x0,0xb
0529 1814 | | Execute Package,Field_Execute,Field_Number 0x14
052a 4801 |H | Short_Literal 0x1
052b 00d9 | | Load_Top At_Offset_1
052c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
052d 00da | | Load_Top At_Offset_2
052e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
052f 01cf | | Execute Vector,Slice_Read
0530 e00f | | Load 0x0,0xf
0531 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0532 00d8 | | Load_Top At_Offset_0
0533 00db | | Load_Top At_Offset_3
0534 8003 | | Call 0x0,0x3
0535 e5ff | | Load 0x2,-0x1
0536 e004 | | Load 0x0,0x4
0537 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0538 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0539 e004 | | Load 0x0,0x4
053a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
053b 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
053c e00f | | Load 0x0,0xf
053d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
053e 00da | | Load_Top At_Offset_2
053f 0092 0f45 | E| Action Push_String_Extended,0xf45 ; "/adalib/export.set"
0541 01cc | | Execute Vector,Catenate
0542 0007 | | Action Break_Optional
0543 e402 | | Load 0x2,0x2
0544 0092 0f46 | F| Action Push_String_Extended,0xf46 ; "/imports/"
0546 01cc | | Execute Vector,Catenate
0547 00da | | Load_Top At_Offset_2
0548 01cc | | Execute Vector,Catenate
0549 0007 | | Action Break_Optional
054a 00e1 | | Load_Encached Boolean_Cache
054b 00e1 | | Load_Encached Boolean_Cache
054c 00e1 | | Load_Encached Boolean_Cache
054d BODY_0510:
054d e005 | | Load 0x0,0x5
054e 7002 |p | Jump_Nonzero 0x551
054f e5fb | | Load 0x2,-0x5
0550 6819 |h | Jump_Zero 0x56a
0551 e006 | | Load 0x0,0x6
0552 180e | | Execute Package,Field_Execute,Field_Number 0xe
0553 4809 |H | Short_Literal 0x9
0554 0092 0f47 | G| Action Push_String_Extended,0xf47 ; "#~Copy_Adalib (Imported_View"
0556 e5ff | | Load 0x2,-0x1
0557 8007 | | Call 0x0,0x7
0558 01cc | | Execute Vector,Catenate
0559 0092 0f48 | H| Action Push_String_Extended,0xf48 ; ", Host_View"
055b 01cc | | Execute Vector,Catenate
055c e5fe | | Load 0x2,-0x2
055d 8007 | | Call 0x0,0x7
055e 01cc | | Execute Vector,Catenate
055f 0092 0f49 | I| Action Push_String_Extended,0xf49 ; ", Into_Remote_Dir"
0561 01cc | | Execute Vector,Catenate
0562 e5fd | | Load 0x2,-0x3
0563 8007 | | Call 0x0,0x7
0564 01cc | | Execute Vector,Catenate
0565 0092 0f12 | | Action Push_String_Extended,0xf12 ; ")"
0567 01cc | | Execute Vector,Catenate
0568 e008 | | Load 0x0,0x8
0569 1813 | | Execute Package,Field_Execute,Field_Number 0x13
056a e5fb | | Load 0x2,-0x5
056b e404 | | Load 0x2,0x4
056c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
056d 800e | | Call 0x0,0xe
056e 680c |h | Jump_Zero 0x57b
056f e5fa | | Load 0x2,-0x6
0570 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
0572 4802 |H | Short_Literal 0x2
0573 0092 0f4a | J| Action Push_String_Extended,0xf4a ; "Can't get remote directory name for imported view "
0575 e5ff | | Load 0x2,-0x1
0576 01cc | | Execute Vector,Catenate
0577 e00a | | Load 0x0,0xa
0578 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0579 c5fa | | Store 0x2,-0x6
057a 4506 |E | Exit_Suprogram New_Top_Offset 0x6
057b e402 | | Load 0x2,0x2
057c 01db | | Execute Vector,Length
057d 700d |p | Jump_Nonzero 0x58b
057e e5fa | | Load 0x2,-0x6
057f 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
0581 4802 |H | Short_Literal 0x2
0582 0092 0f14 | | Action Push_String_Extended,0xf14 ; "Can't derive a family name from the remote pathname "
0584 e5fd | | Load 0x2,-0x3
0585 8009 | | Call 0x0,0x9
0586 01cc | | Execute Vector,Catenate
0587 e00a | | Load 0x0,0xa
0588 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0589 c5fa | | Store 0x2,-0x6
058a 4506 |E | Exit_Suprogram New_Top_Offset 0x6
058b e406 | | Load 0x2,0x6
058c 01db | | Execute Vector,Length
058d 700d |p | Jump_Nonzero 0x59b
058e e5fa | | Load 0x2,-0x6
058f 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
0591 4802 |H | Short_Literal 0x2
0592 0092 0f14 | | Action Push_String_Extended,0xf14 ; "Can't derive a family name from the remote pathname "
0594 e405 | | Load 0x2,0x5
0595 8009 | | Call 0x0,0x9
0596 01cc | | Execute Vector,Catenate
0597 e00a | | Load 0x0,0xa
0598 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0599 c5fa | | Store 0x2,-0x6
059a 4506 |E | Exit_Suprogram New_Top_Offset 0x6
059b e006 | | Load 0x0,0x6
059c 180e | | Execute Package,Field_Execute,Field_Number 0xe
059d 4804 |H | Short_Literal 0x4
059e 0092 0f4b | K| Action Push_String_Extended,0xf4b ; "Executing Copy_Adalib"
05a0 e008 | | Load 0x0,0x8
05a1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05a2 e5fb | | Load 0x2,-0x5
05a3 e5fc | | Load 0x2,-0x4
05a4 e409 | | Load 0x2,0x9
05a5 821e | | Call 0x1,0x1e
05a6 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
05a7 00d8 | | Load_Top At_Offset_0
05a8 6817 |h | Jump_Zero 0x5c0
05a9 e005 | | Load 0x0,0x5
05aa 7002 |p | Jump_Nonzero 0x5ad
05ab e5fb | | Load 0x2,-0x5
05ac 6812 |h | Jump_Zero 0x5bf
05ad e006 | | Load 0x0,0x6
05ae 180e | | Execute Package,Field_Execute,Field_Number 0xe
05af 4802 |H | Short_Literal 0x2
05b0 0092 0f4c | L| Action Push_String_Extended,0xf4c ; "#~The units in "
05b2 e407 | | Load 0x2,0x7
05b3 e00f | | Load 0x0,0xf
05b4 1814 | | Execute Package,Field_Execute,Field_Number 0x14
05b5 8009 | | Call 0x0,0x9
05b6 01cc | | Execute Vector,Catenate
05b7 0092 0f4d | M| Action Push_String_Extended,0xf4d ; " have already been copied into "
05b9 01cc | | Execute Vector,Catenate
05ba e5fd | | Load 0x2,-0x3
05bb 8009 | | Call 0x0,0x9
05bc 01cc | | Execute Vector,Catenate
05bd e008 | | Load 0x0,0x8
05be 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05bf 4506 |E | Exit_Suprogram New_Top_Offset 0x6
05c0 e5fb | | Load 0x2,-0x5
05c1 e5fc | | Load 0x2,-0x4
05c2 e402 | | Load 0x2,0x2
05c3 0092 0f1f | | Action Push_String_Extended,0xf1f ; "/imports"
05c5 01cc | | Execute Vector,Catenate
05c6 821e | | Call 0x1,0x1e
05c7 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
05c8 00d9 | | Load_Top At_Offset_1
05c9 700f |p | Jump_Nonzero 0x5d9
05ca e5fa | | Load 0x2,-0x6
05cb e5fb | | Load 0x2,-0x5
05cc e5fc | | Load 0x2,-0x4
05cd e402 | | Load 0x2,0x2
05ce 0092 0f1f | | Action Push_String_Extended,0xf1f ; "/imports"
05d0 01cc | | Execute Vector,Catenate
05d1 8019 | | Call 0x0,0x19
05d2 c5fa | | Store 0x2,-0x6
05d3 4802 |H | Short_Literal 0x2
05d4 e5fa | | Load 0x2,-0x6
05d5 e013 | | Load 0x0,0x13
05d6 1817 | | Execute Package,Field_Execute,Field_Number 0x17
05d7 6801 |h | Jump_Zero 0x5d9
05d8 4506 |E | Exit_Suprogram New_Top_Offset 0x6
05d9 e5fa | | Load 0x2,-0x6
05da e5fb | | Load 0x2,-0x5
05db e5fc | | Load 0x2,-0x4
05dc e405 | | Load 0x2,0x5
05dd 8219 | | Call 0x1,0x19
05de c5fa | | Store 0x2,-0x6
05df e5fb | | Load 0x2,-0x5
05e0 e5fc | | Load 0x2,-0x4
05e1 e408 | | Load 0x2,0x8
05e2 821e | | Call 0x1,0x1e
05e3 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
05e4 00da | | Load_Top At_Offset_2
05e5 7050 |pP | Jump_Nonzero 0x636
05e6 e5fa | | Load 0x2,-0x6
05e7 e5fb | | Load 0x2,-0x5
05e8 e5fc | | Load 0x2,-0x4
05e9 e405 | | Load 0x2,0x5
05ea e5ff | | Load 0x2,-0x1
05eb 821d | | Call 0x1,0x1d
05ec c5fa | | Store 0x2,-0x6
05ed e5fb | | Load 0x2,-0x5
05ee e5fa | | Load 0x2,-0x6
05ef 800e | | Call 0x0,0xe
05f0 680a |h | Jump_Zero 0x5fb
05f1 e5fa | | Load 0x2,-0x6
05f2 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
05f4 4802 |H | Short_Literal 0x2
05f5 0092 0f4e | N| Action Push_String_Extended,0xf4e ; "Can't fetch the link's exports"
05f7 e00a | | Load 0x0,0xa
05f8 1812 | | Execute Package,Field_Execute,Field_Number 0x12
05f9 c5fa | | Store 0x2,-0x6
05fa 4506 |E | Exit_Suprogram New_Top_Offset 0x6
05fb e006 | | Load 0x0,0x6
05fc 180e | | Execute Package,Field_Execute,Field_Number 0xe
05fd 4804 |H | Short_Literal 0x4
05fe 0092 0f4f | O| Action Push_String_Extended,0xf4f ; "Creating export set for remote library "
0600 e405 | | Load 0x2,0x5
0601 8009 | | Call 0x0,0x9
0602 01cc | | Execute Vector,Catenate
0603 e008 | | Load 0x0,0x8
0604 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0605 e5fa | | Load 0x2,-0x6
0606 e5fb | | Load 0x2,-0x5
0607 e5fc | | Load 0x2,-0x4
0608 0092 0f2a | *| Action Push_String_Extended,0xf2a ; "ada lib_manager\x5c("
060a e406 | | Load 0x2,0x6
060b 01cc | | Execute Vector,Catenate
060c 0092 0f50 | P| Action Push_String_Extended,0xf50 ; "\x5c).copy from="
060e 01cc | | Execute Vector,Catenate
060f e405 | | Load 0x2,0x5
0610 01cc | | Execute Vector,Catenate
0611 0092 0f51 | Q| Action Push_String_Extended,0xf51 ; "/adalib to="
0613 01cc | | Execute Vector,Catenate
0614 e408 | | Load 0x2,0x8
0615 01cc | | Execute Vector,Catenate
0616 0092 0f52 | R| Action Push_String_Extended,0xf52 ; " mode=export"
0618 01cc | | Execute Vector,Catenate
0619 00ea | | Load_Encached Null_String_Cache
061a 8216 | | Call 0x1,0x16
061b 01cc | | Execute Vector,Catenate
061c 8014 | | Call 0x0,0x14
061d c5fa | | Store 0x2,-0x6
061e e5fb | | Load 0x2,-0x5
061f e5fa | | Load 0x2,-0x6
0620 800e | | Call 0x0,0xe
0621 6814 |h | Jump_Zero 0x636
0622 e006 | | Load 0x0,0x6
0623 180e | | Execute Package,Field_Execute,Field_Number 0xe
0624 4807 |H | Short_Literal 0x7
0625 0092 0f53 | S| Action Push_String_Extended,0xf53 ; "Can't create the export set for "
0627 e405 | | Load 0x2,0x5
0628 e00f | | Load 0x0,0xf
0629 1814 | | Execute Package,Field_Execute,Field_Number 0x14
062a 8009 | | Call 0x0,0x9
062b 01cc | | Execute Vector,Catenate
062c 0092 0f2e | .| Action Push_String_Extended,0xf2e ; ". "
062e 01cc | | Execute Vector,Catenate
062f e5fa | | Load 0x2,-0x6
0630 e013 | | Load 0x0,0x13
0631 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0632 01cc | | Execute Vector,Catenate
0633 e008 | | Load 0x0,0x8
0634 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0635 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0636 e006 | | Load 0x0,0x6
0637 180e | | Execute Package,Field_Execute,Field_Number 0xe
0638 4804 |H | Short_Literal 0x4
0639 0092 0f54 | T| Action Push_String_Extended,0xf54 ; "Copying export set "
063b e408 | | Load 0x2,0x8
063c 8009 | | Call 0x0,0x9
063d 01cc | | Execute Vector,Catenate
063e 0092 0f55 | U| Action Push_String_Extended,0xf55 ; " into remote library "
0640 01cc | | Execute Vector,Catenate
0641 e409 | | Load 0x2,0x9
0642 8009 | | Call 0x0,0x9
0643 01cc | | Execute Vector,Catenate
0644 e008 | | Load 0x0,0x8
0645 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0646 e5fa | | Load 0x2,-0x6
0647 e5fb | | Load 0x2,-0x5
0648 e5fc | | Load 0x2,-0x4
0649 0092 0f2a | *| Action Push_String_Extended,0xf2a ; "ada lib_manager\x5c("
064b e402 | | Load 0x2,0x2
064c 01cc | | Execute Vector,Catenate
064d 0092 0f50 | P| Action Push_String_Extended,0xf50 ; "\x5c).copy from="
064f 01cc | | Execute Vector,Catenate
0650 e408 | | Load 0x2,0x8
0651 01cc | | Execute Vector,Catenate
0652 0092 0f56 | V| Action Push_String_Extended,0xf56 ; " to="
0654 01cc | | Execute Vector,Catenate
0655 e409 | | Load 0x2,0x9
0656 01cc | | Execute Vector,Catenate
0657 0092 0f57 | W| Action Push_String_Extended,0xf57 ; " mode=import"
0659 01cc | | Execute Vector,Catenate
065a 00ea | | Load_Encached Null_String_Cache
065b 8216 | | Call 0x1,0x16
065c 01cc | | Execute Vector,Catenate
065d 8014 | | Call 0x0,0x14
065e c5fa | | Store 0x2,-0x6
065f e5fb | | Load 0x2,-0x5
0660 e5fa | | Load 0x2,-0x6
0661 800e | | Call 0x0,0xe
0662 6812 |h | Jump_Zero 0x675
0663 e006 | | Load 0x0,0x6
0664 180e | | Execute Package,Field_Execute,Field_Number 0xe
0665 4807 |H | Short_Literal 0x7
0666 0092 0f58 | X| Action Push_String_Extended,0xf58 ; "Can't copy the export set for "
0668 e5ff | | Load 0x2,-0x1
0669 8009 | | Call 0x0,0x9
066a 01cc | | Execute Vector,Catenate
066b 0092 0f2e | .| Action Push_String_Extended,0xf2e ; ". "
066d 01cc | | Execute Vector,Catenate
066e e5fa | | Load 0x2,-0x6
066f e013 | | Load 0x0,0x13
0670 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0671 01cc | | Execute Vector,Catenate
0672 e008 | | Load 0x0,0x8
0673 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0674 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0675 e5fa | | Load 0x2,-0x6
0676 e5fb | | Load 0x2,-0x5
0677 e5fc | | Load 0x2,-0x4
0678 e5fd | | Load 0x2,-0x3
0679 8219 | | Call 0x1,0x19
067a c5fa | | Store 0x2,-0x6
067b 4506 |E | Exit_Suprogram New_Top_Offset 0x6
067c 0000 0000 | | .BLANK 0000[0x4]
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 06a8 | | .CONST 0x06a8 ; Address of begin
0681 0004 | | .CONST 0x0004 ; Address of exception handler
0682 0008 | | .CONST 0x0008 ; Number of locals
0683 INIT_0680:
0683 00da | | Load_Top At_Offset_2
0684 e004 | | Load 0x0,0x4
0685 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0686 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0687 e00f | | Load 0x0,0xf
0688 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0689 00db | | Load_Top At_Offset_3
068a e004 | | Load 0x0,0x4
068b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
068c 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
068d e5fc | | Load 0x2,-0x4
068e 0092 0f59 | Y| Action Push_String_Extended,0xf59 ; "/adalib"
0690 01cc | | Execute Vector,Catenate
0691 0007 | | Action Break_Optional
0692 e001 | | Load 0x0,0x1
0693 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0694 0322 | " | Declare_Variable Record
0695 00d8 | | Load_Top At_Offset_0
0696 1c00 | | Execute_Immediate Run_Utility,0x0
0697 e001 | | Load 0x0,0x1
0698 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0699 0322 | " | Declare_Variable Record
069a 00d8 | | Load_Top At_Offset_0
069b 1c00 | | Execute_Immediate Run_Utility,0x0
069c e001 | | Load 0x0,0x1
069d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
069e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
069f 02c7 | | Declare_Variable Any
06a0 00d8 | | Load_Top At_Offset_0
06a1 1c00 | | Execute_Immediate Run_Utility,0x0
06a2 e001 | | Load 0x0,0x1
06a3 1b13 | | Execute Package,Field_Read,Field_Number 0x13
06a4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
06a5 02c7 | | Declare_Variable Any
06a6 00d8 | | Load_Top At_Offset_0
06a7 1c00 | | Execute_Immediate Run_Utility,0x0
06a8 BODY_0680:
06a8 e005 | | Load 0x0,0x5
06a9 7002 |p | Jump_Nonzero 0x6ac
06aa e5f9 | | Load 0x2,-0x7
06ab 6822 |h" | Jump_Zero 0x6ce
06ac e006 | | Load 0x0,0x6
06ad 180e | | Execute Package,Field_Execute,Field_Number 0xe
06ae 4809 |H | Short_Literal 0x9
06af 0092 0f5a | Z| Action Push_String_Extended,0xf5a ; "#~Import_Predefined_Unit (Imported_Unit"
06b1 e403 | | Load 0x2,0x3
06b2 8007 | | Call 0x0,0x7
06b3 01cc | | Execute Vector,Catenate
06b4 0092 0f10 | | Action Push_String_Extended,0xf10 ; ", Into_View"
06b6 01cc | | Execute Vector,Catenate
06b7 e5fe | | Load 0x2,-0x2
06b8 e004 | | Load 0x0,0x4
06b9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06ba 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
06bb 8007 | | Call 0x0,0x7
06bc 01cc | | Execute Vector,Catenate
06bd 0092 0f11 | | Action Push_String_Extended,0xf11 ; ", Remote_Directory"
06bf 01cc | | Execute Vector,Catenate
06c0 e5fc | | Load 0x2,-0x4
06c1 8007 | | Call 0x0,0x7
06c2 01cc | | Execute Vector,Catenate
06c3 0092 0f5b | [| Action Push_String_Extended,0xf5b ; ", Remote_Predef"
06c5 01cc | | Execute Vector,Catenate
06c6 e5fb | | Load 0x2,-0x5
06c7 8007 | | Call 0x0,0x7
06c8 01cc | | Execute Vector,Catenate
06c9 0092 0f12 | | Action Push_String_Extended,0xf12 ; ")"
06cb 01cc | | Execute Vector,Catenate
06cc e008 | | Load 0x0,0x8
06cd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06ce e5ff | | Load 0x2,-0x1
06cf e405 | | Load 0x2,0x5
06d0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
06d1 e5ff | | Load 0x2,-0x1
06d2 e405 | | Load 0x2,0x5
06d3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
06d4 e002 | | Load 0x0,0x2
06d5 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06d6 e405 | | Load 0x2,0x5
06d7 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
06d8 00d8 | | Load_Top At_Offset_0
06d9 0120 | | Execute Any,Is_Value
06da 6804 |h | Jump_Zero 0x6df
06db e001 | | Load 0x0,0x1
06dc 1b13 | | Execute Package,Field_Read,Field_Number 0x13
06dd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
06de 7801 |x | Jump 0x6e0
06df 00d8 | | Load_Top At_Offset_0
06e0 00da | | Load_Top At_Offset_2
06e1 0120 | | Execute Any,Is_Value
06e2 6804 |h | Jump_Zero 0x6e7
06e3 e001 | | Load 0x0,0x1
06e4 1b13 | | Execute Package,Field_Read,Field_Number 0x13
06e5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
06e6 7801 |x | Jump 0x6e8
06e7 00da | | Load_Top At_Offset_2
06e8 e406 | | Load 0x2,0x6
06e9 e405 | | Load 0x2,0x5
06ea e5fd | | Load 0x2,-0x3
06eb e001 | | Load 0x0,0x1
06ec 1b13 | | Execute Package,Field_Read,Field_Number 0x13
06ed 181b | | Execute Package,Field_Execute,Field_Number 0x1b
06ee 00d1 | | Pop_Control Pop_Count_1
06ef c407 | | Store 0x2,0x7
06f0 c408 | | Store 0x2,0x8
06f1 00d9 | | Load_Top At_Offset_1
06f2 e001 | | Load 0x0,0x1
06f3 1b13 | | Execute Package,Field_Read,Field_Number 0x13
06f4 181d | | Execute Package,Field_Execute,Field_Number 0x1d
06f5 7016 |p | Jump_Nonzero 0x70c
06f6 e005 | | Load 0x0,0x5
06f7 7002 |p | Jump_Nonzero 0x6fa
06f8 e5f9 | | Load 0x2,-0x7
06f9 6811 |h | Jump_Zero 0x70b
06fa e006 | | Load 0x0,0x6
06fb 180e | | Execute Package,Field_Execute,Field_Number 0xe
06fc 4802 |H | Short_Literal 0x2
06fd 0092 0f5c | \| Action Push_String_Extended,0xf5c ; "#~Reusing predefined link unit "
06ff e403 | | Load 0x2,0x3
0700 01cc | | Execute Vector,Catenate
0701 0092 0f5d | ]| Action Push_String_Extended,0xf5d ; " in view "
0703 01cc | | Execute Vector,Catenate
0704 e5fe | | Load 0x2,-0x2
0705 e004 | | Load 0x0,0x4
0706 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0707 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0708 01cc | | Execute Vector,Catenate
0709 e008 | | Load 0x0,0x8
070a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
070b 4508 |E | Exit_Suprogram New_Top_Offset 0x8
070c e006 | | Load 0x0,0x6
070d 180e | | Execute Package,Field_Execute,Field_Number 0xe
070e 4804 |H | Short_Literal 0x4
070f 0092 0f5e | ^| Action Push_String_Extended,0xf5e ; "Acquiring link to "
0711 e402 | | Load 0x2,0x2
0712 8009 | | Call 0x0,0x9
0713 01cc | | Execute Vector,Catenate
0714 0092 0f5f | _| Action Push_String_Extended,0xf5f ; " from "
0716 01cc | | Execute Vector,Catenate
0717 e5fb | | Load 0x2,-0x5
0718 8009 | | Call 0x0,0x9
0719 01cc | | Execute Vector,Catenate
071a 0092 0f55 | U| Action Push_String_Extended,0xf55 ; " into remote library "
071c 01cc | | Execute Vector,Catenate
071d e5fc | | Load 0x2,-0x4
071e 8009 | | Call 0x0,0x9
071f 01cc | | Execute Vector,Catenate
0720 e008 | | Load 0x0,0x8
0721 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0722 e5f8 | | Load 0x2,-0x8
0723 e5f9 | | Load 0x2,-0x7
0724 e5fa | | Load 0x2,-0x6
0725 0092 0f37 | 7| Action Push_String_Extended,0xf37 ; "ada unit_manager\x5c("
0727 e404 | | Load 0x2,0x4
0728 01cc | | Execute Vector,Catenate
0729 0092 0f60 | `| Action Push_String_Extended,0xf60 ; ",update\x5c).acquire units="
072b 01cc | | Execute Vector,Catenate
072c e402 | | Load 0x2,0x2
072d 01cc | | Execute Vector,Catenate
072e 0092 0f61 | a| Action Push_String_Extended,0xf61 ; " from="
0730 01cc | | Execute Vector,Catenate
0731 e5fb | | Load 0x2,-0x5
0732 01cc | | Execute Vector,Catenate
0733 00ea | | Load_Encached Null_String_Cache
0734 8216 | | Call 0x1,0x16
0735 01cc | | Execute Vector,Catenate
0736 8014 | | Call 0x0,0x14
0737 c5f8 | | Store 0x2,-0x8
0738 e5f9 | | Load 0x2,-0x7
0739 e5f8 | | Load 0x2,-0x8
073a 800e | | Call 0x0,0xe
073b 680c |h | Jump_Zero 0x748
073c e006 | | Load 0x0,0x6
073d 180e | | Execute Package,Field_Execute,Field_Number 0xe
073e 4807 |H | Short_Literal 0x7
073f 0092 0f62 | b| Action Push_String_Extended,0xf62 ; "Can't acquire the predefined link. "
0741 e5f8 | | Load 0x2,-0x8
0742 e013 | | Load 0x0,0x13
0743 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0744 01cc | | Execute Vector,Catenate
0745 e008 | | Load 0x0,0x8
0746 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0747 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0748 e5f8 | | Load 0x2,-0x8
0749 e5f9 | | Load 0x2,-0x7
074a e5fa | | Load 0x2,-0x6
074b e5fc | | Load 0x2,-0x4
074c 8219 | | Call 0x1,0x19
074d c5f8 | | Store 0x2,-0x8
074e 00d8 | | Load_Top At_Offset_0
074f e405 | | Load 0x2,0x5
0750 e5fd | | Load 0x2,-0x3
0751 e001 | | Load 0x0,0x1
0752 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0753 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0754 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0755 0000 0000 | | .XXX[0x3]
0757 0000 | |
0758 ; --------------------------------------------------------------------------------------
0758 ; SUBPROGRAM
0758 ; --------------------------------------------------------------------------------------
0758 07b8 | | .CONST 0x07b8 ; Address of begin
0759 0004 | | .CONST 0x0004 ; Address of exception handler
075a 0014 | | .CONST 0x0014 ; Number of locals
075b INIT_0758:
075b 00da | | Load_Top At_Offset_2
075c e004 | | Load 0x0,0x4
075d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
075e 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
075f e00f | | Load 0x0,0xf
0760 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0761 00db | | Load_Top At_Offset_3
0762 e004 | | Load 0x0,0x4
0763 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0764 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0765 e004 | | Load 0x0,0x4
0766 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0767 02c7 | | Declare_Variable Any
0768 e006 | | Load 0x0,0x6
0769 180e | | Execute Package,Field_Execute,Field_Number 0xe
076a e5ff | | Load 0x2,-0x1
076b e00c | | Load 0x0,0xc
076c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
076d 1820 | | Execute Package,Field_Execute,Field_Number 0x20
076e a404 | | Store_Unchecked 0x2,0x4
076f 00d8 | | Load_Top At_Offset_0
0770 e004 | | Load 0x0,0x4
0771 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0772 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0773 00d8 | | Load_Top At_Offset_0
0774 e004 | | Load 0x0,0x4
0775 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0776 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0777 e004 | | Load 0x0,0x4
0778 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0779 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
077a e00f | | Load 0x0,0xf
077b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
077c e006 | | Load 0x0,0x6
077d 180e | | Execute Package,Field_Execute,Field_Number 0xe
077e 00da | | Load_Top At_Offset_2
077f e00b | | Load 0x0,0xb
0780 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0781 00d8 | | Load_Top At_Offset_0
0782 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0783 0007 | | Action Break_Optional
0784 00d8 | | Load_Top At_Offset_0
0785 0092 0f59 | Y| Action Push_String_Extended,0xf59 ; "/adalib"
0787 01cc | | Execute Vector,Catenate
0788 0007 | | Action Break_Optional
0789 e5fc | | Load 0x2,-0x4
078a 0092 0f59 | Y| Action Push_String_Extended,0xf59 ; "/adalib"
078c 01cc | | Execute Vector,Catenate
078d 0007 | | Action Break_Optional
078e e001 | | Load 0x0,0x1
078f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0790 0322 | " | Declare_Variable Record
0791 00d8 | | Load_Top At_Offset_0
0792 1c00 | | Execute_Immediate Run_Utility,0x0
0793 e001 | | Load 0x0,0x1
0794 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0795 0322 | " | Declare_Variable Record
0796 00d8 | | Load_Top At_Offset_0
0797 1c00 | | Execute_Immediate Run_Utility,0x0
0798 e001 | | Load 0x0,0x1
0799 1b13 | | Execute Package,Field_Read,Field_Number 0x13
079a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
079b 02c7 | | Declare_Variable Any
079c 00d8 | | Load_Top At_Offset_0
079d 1c00 | | Execute_Immediate Run_Utility,0x0
079e e001 | | Load 0x0,0x1
079f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
07a0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
07a1 02c7 | | Declare_Variable Any
07a2 00d8 | | Load_Top At_Offset_0
07a3 1c00 | | Execute_Immediate Run_Utility,0x0
07a4 e002 | | Load 0x0,0x2
07a5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07a6 02c7 | | Declare_Variable Any
07a7 00d8 | | Load_Top At_Offset_0
07a8 1c00 | | Execute_Immediate Run_Utility,0x0
07a9 e5fc | | Load 0x2,-0x4
07aa e5fe | | Load 0x2,-0x2
07ab 8003 | | Call 0x0,0x3
07ac e408 | | Load 0x2,0x8
07ad e404 | | Load 0x2,0x4
07ae 8003 | | Call 0x0,0x3
07af 00e1 | | Load_Encached Boolean_Cache
07b0 00e1 | | Load_Encached Boolean_Cache
07b1 00db | | Load_Top At_Offset_3
07b2 0092 0f46 | F| Action Push_String_Extended,0xf46 ; "/imports/"
07b4 01cc | | Execute Vector,Catenate
07b5 e406 | | Load 0x2,0x6
07b6 01cc | | Execute Vector,Catenate
07b7 0007 | | Action Break_Optional
07b8 BODY_0758:
07b8 e005 | | Load 0x0,0x5
07b9 7002 |p | Jump_Nonzero 0x7bc
07ba e5fa | | Load 0x2,-0x6
07bb 681c |h | Jump_Zero 0x7d8
07bc e006 | | Load 0x0,0x6
07bd 180e | | Execute Package,Field_Execute,Field_Number 0xe
07be 4809 |H | Short_Literal 0x9
07bf 0092 0f63 | c| Action Push_String_Extended,0xf63 ; "#~Import_A_Unit (Imported_Unit"
07c1 e403 | | Load 0x2,0x3
07c2 8007 | | Call 0x0,0x7
07c3 01cc | | Execute Vector,Catenate
07c4 0092 0f10 | | Action Push_String_Extended,0xf10 ; ", Into_View"
07c6 01cc | | Execute Vector,Catenate
07c7 e5fe | | Load 0x2,-0x2
07c8 e004 | | Load 0x0,0x4
07c9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07ca 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
07cb 8007 | | Call 0x0,0x7
07cc 01cc | | Execute Vector,Catenate
07cd 0092 0f11 | | Action Push_String_Extended,0xf11 ; ", Remote_Directory"
07cf 01cc | | Execute Vector,Catenate
07d0 e5fc | | Load 0x2,-0x4
07d1 8007 | | Call 0x0,0x7
07d2 01cc | | Execute Vector,Catenate
07d3 0092 0f12 | | Action Push_String_Extended,0xf12 ; ")"
07d5 01cc | | Execute Vector,Catenate
07d6 e008 | | Load 0x0,0x8
07d7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07d8 e5fa | | Load 0x2,-0x6
07d9 e407 | | Load 0x2,0x7
07da 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07db 800e | | Call 0x0,0xe
07dc 680c |h | Jump_Zero 0x7e9
07dd e5f9 | | Load 0x2,-0x7
07de 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
07e0 4802 |H | Short_Literal 0x2
07e1 0092 0f4a | J| Action Push_String_Extended,0xf4a ; "Can't get remote directory name for imported view "
07e3 e405 | | Load 0x2,0x5
07e4 01cc | | Execute Vector,Catenate
07e5 e00a | | Load 0x0,0xa
07e6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
07e7 c5f9 | | Store 0x2,-0x7
07e8 4507 |E | Exit_Suprogram New_Top_Offset 0x7
07e9 e410 | | Load 0x2,0x10
07ea 01db | | Execute Vector,Length
07eb 700d |p | Jump_Nonzero 0x7f9
07ec e5f9 | | Load 0x2,-0x7
07ed 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
07ef 4802 |H | Short_Literal 0x2
07f0 0092 0f14 | | Action Push_String_Extended,0xf14 ; "Can't derive a family name from the remote pathname "
07f2 e5fc | | Load 0x2,-0x4
07f3 8009 | | Call 0x0,0x9
07f4 01cc | | Execute Vector,Catenate
07f5 e00a | | Load 0x0,0xa
07f6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
07f7 c5f9 | | Store 0x2,-0x7
07f8 4507 |E | Exit_Suprogram New_Top_Offset 0x7
07f9 00db | | Load_Top At_Offset_3
07fa 01db | | Execute Vector,Length
07fb 700d |p | Jump_Nonzero 0x809
07fc e5f9 | | Load 0x2,-0x7
07fd 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
07ff 4802 |H | Short_Literal 0x2
0800 0092 0f14 | | Action Push_String_Extended,0xf14 ; "Can't derive a family name from the remote pathname "
0802 e408 | | Load 0x2,0x8
0803 8009 | | Call 0x0,0x9
0804 01cc | | Execute Vector,Catenate
0805 e00a | | Load 0x0,0xa
0806 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0807 c5f9 | | Store 0x2,-0x7
0808 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0809 4801 |H | Short_Literal 0x1
080a e411 | | Load 0x2,0x11
080b e410 | | Load 0x2,0x10
080c e00f | | Load 0x0,0xf
080d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
080e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
080f e5ff | | Load 0x2,-0x1
0810 e40b | | Load 0x2,0xb
0811 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0812 e404 | | Load 0x2,0x4
0813 e40b | | Load 0x2,0xb
0814 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0815 e002 | | Load 0x0,0x2
0816 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0817 e40b | | Load 0x2,0xb
0818 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0819 e40e | | Load 0x2,0xe
081a 0120 | | Execute Any,Is_Value
081b 6804 |h | Jump_Zero 0x820
081c e001 | | Load 0x0,0x1
081d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
081e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
081f 7801 |x | Jump 0x821
0820 e40e | | Load 0x2,0xe
0821 e40d | | Load 0x2,0xd
0822 0120 | | Execute Any,Is_Value
0823 6804 |h | Jump_Zero 0x828
0824 e001 | | Load 0x0,0x1
0825 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0826 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0827 7801 |x | Jump 0x829
0828 e40d | | Load 0x2,0xd
0829 e40c | | Load 0x2,0xc
082a e40b | | Load 0x2,0xb
082b e5fd | | Load 0x2,-0x3
082c e001 | | Load 0x0,0x1
082d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
082e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
082f 00d1 | | Pop_Control Pop_Count_1
0830 c40d | | Store 0x2,0xd
0831 c40e | | Store 0x2,0xe
0832 e40d | | Load 0x2,0xd
0833 e001 | | Load 0x0,0x1
0834 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0835 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0836 7087 |p | Jump_Nonzero 0x8be
0837 e40c | | Load 0x2,0xc
0838 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0839 e404 | | Load 0x2,0x4
083a 012f | / | Execute Any,Equal
083b 702b |p+ | Jump_Nonzero 0x867
083c e006 | | Load 0x0,0x6
083d 180e | | Execute Package,Field_Execute,Field_Number 0xe
083e 4806 |H | Short_Literal 0x6
083f 0092 0f64 | d| Action Push_String_Extended,0xf64 ; "Can't acquire link to "
0841 e403 | | Load 0x2,0x3
0842 01cc | | Execute Vector,Catenate
0843 e008 | | Load 0x0,0x8
0844 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0845 e006 | | Load 0x0,0x6
0846 180e | | Execute Package,Field_Execute,Field_Number 0xe
0847 4806 |H | Short_Literal 0x6
0848 0092 0f65 | e| Action Push_String_Extended,0xf65 ; "A link to "
084a e402 | | Load 0x2,0x2
084b e00f | | Load 0x0,0xf
084c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
084d 01cc | | Execute Vector,Catenate
084e 0092 0f66 | f| Action Push_String_Extended,0xf66 ; " already exists, but it came from view "
0850 01cc | | Execute Vector,Catenate
0851 e40c | | Load 0x2,0xc
0852 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0853 e004 | | Load 0x0,0x4
0854 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0855 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0856 01cc | | Execute Vector,Catenate
0857 0092 0f67 | g| Action Push_String_Extended,0xf67 ; ", acquired on "
0859 01cc | | Execute Vector,Catenate
085a 4800 |H | Short_Literal 0x0
085b 4800 |H | Short_Literal 0x0
085c 4800 |H | Short_Literal 0x0
085d e40c | | Load 0x2,0xc
085e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
085f e01a | | Load 0x0,0x1a
0860 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0861 e01a | | Load 0x0,0x1a
0862 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0863 01cc | | Execute Vector,Catenate
0864 e008 | | Load 0x0,0x8
0865 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0866 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0867 00d9 | | Load_Top At_Offset_1
0868 683f |h? | Jump_Zero 0x8a8
0869 e5ff | | Load 0x2,-0x1
086a e00a | | Load 0x0,0xa
086b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
086c c40f | | Store 0x2,0xf
086d e40c | | Load 0x2,0xc
086e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
086f e40f | | Load 0x2,0xf
0870 e002 | | Load 0x0,0x2
0871 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0872 681f |h | Jump_Zero 0x892
0873 e006 | | Load 0x0,0x6
0874 180e | | Execute Package,Field_Execute,Field_Number 0xe
0875 4802 |H | Short_Literal 0x2
0876 0092 0f68 | h| Action Push_String_Extended,0xf68 ; "Imported unit "
0878 e403 | | Load 0x2,0x3
0879 01cc | | Execute Vector,Catenate
087a 0092 0f69 | i| Action Push_String_Extended,0xf69 ; " was recompiled or changed, so we must reacquire it"
087c 01cc | | Execute Vector,Catenate
087d e008 | | Load 0x0,0x8
087e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
087f e004 | | Load 0x0,0x4
0880 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0881 e40c | | Load 0x2,0xc
0882 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0883 e004 | | Load 0x0,0x4
0884 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0885 e40c | | Load 0x2,0xc
0886 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0887 e01a | | Load 0x0,0x1a
0888 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0889 e40c | | Load 0x2,0xc
088a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
088b e40d | | Load 0x2,0xd
088c e40c | | Load 0x2,0xc
088d e5fd | | Load 0x2,-0x3
088e e001 | | Load 0x0,0x1
088f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0890 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0891 782c |x, | Jump 0x8be
0892 e005 | | Load 0x0,0x5
0893 7002 |p | Jump_Nonzero 0x896
0894 e5fa | | Load 0x2,-0x6
0895 6811 |h | Jump_Zero 0x8a7
0896 e006 | | Load 0x0,0x6
0897 180e | | Execute Package,Field_Execute,Field_Number 0xe
0898 4802 |H | Short_Literal 0x2
0899 0092 0f6a | j| Action Push_String_Extended,0xf6a ; "#~Reusing link unit "
089b e403 | | Load 0x2,0x3
089c 01cc | | Execute Vector,Catenate
089d 0092 0f5d | ]| Action Push_String_Extended,0xf5d ; " in view "
089f 01cc | | Execute Vector,Catenate
08a0 e5fe | | Load 0x2,-0x2
08a1 e004 | | Load 0x0,0x4
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 e008 | | Load 0x0,0x8
08a6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08a7 4507 |E | Exit_Suprogram New_Top_Offset 0x7
08a8 e005 | | Load 0x0,0x5
08a9 7002 |p | Jump_Nonzero 0x8ac
08aa e5fa | | Load 0x2,-0x6
08ab 6811 |h | Jump_Zero 0x8bd
08ac e006 | | Load 0x0,0x6
08ad 180e | | Execute Package,Field_Execute,Field_Number 0xe
08ae 4802 |H | Short_Literal 0x2
08af 0092 0f6a | j| Action Push_String_Extended,0xf6a ; "#~Reusing link unit "
08b1 e403 | | Load 0x2,0x3
08b2 01cc | | Execute Vector,Catenate
08b3 0092 0f5d | ]| Action Push_String_Extended,0xf5d ; " in view "
08b5 01cc | | Execute Vector,Catenate
08b6 e5fe | | Load 0x2,-0x2
08b7 e004 | | Load 0x0,0x4
08b8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
08b9 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
08ba 01cc | | Execute Vector,Catenate
08bb e008 | | Load 0x0,0x8
08bc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08bd 4507 |E | Exit_Suprogram New_Top_Offset 0x7
08be 00d9 | | Load_Top At_Offset_1
08bf 6830 |h0 | Jump_Zero 0x8f0
08c0 e006 | | Load 0x0,0x6
08c1 180e | | Execute Package,Field_Execute,Field_Number 0xe
08c2 4804 |H | Short_Literal 0x4
08c3 0092 0f5e | ^| Action Push_String_Extended,0xf5e ; "Acquiring link to "
08c5 e402 | | Load 0x2,0x2
08c6 8009 | | Call 0x0,0x9
08c7 01cc | | Execute Vector,Catenate
08c8 0092 0f5f | _| Action Push_String_Extended,0xf5f ; " from "
08ca 01cc | | Execute Vector,Catenate
08cb e408 | | Load 0x2,0x8
08cc 8009 | | Call 0x0,0x9
08cd 01cc | | Execute Vector,Catenate
08ce 0092 0f55 | U| Action Push_String_Extended,0xf55 ; " into remote library "
08d0 01cc | | Execute Vector,Catenate
08d1 e5fc | | Load 0x2,-0x4
08d2 8009 | | Call 0x0,0x9
08d3 01cc | | Execute Vector,Catenate
08d4 e008 | | Load 0x0,0x8
08d5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08d6 e5f9 | | Load 0x2,-0x7
08d7 e5fa | | Load 0x2,-0x6
08d8 e5fb | | Load 0x2,-0x5
08d9 0092 0f37 | 7| Action Push_String_Extended,0xf37 ; "ada unit_manager\x5c("
08db e40a | | Load 0x2,0xa
08dc 01cc | | Execute Vector,Catenate
08dd 0092 0f60 | `| Action Push_String_Extended,0xf60 ; ",update\x5c).acquire units="
08df 01cc | | Execute Vector,Catenate
08e0 e402 | | Load 0x2,0x2
08e1 01cc | | Execute Vector,Catenate
08e2 0092 0f61 | a| Action Push_String_Extended,0xf61 ; " from="
08e4 01cc | | Execute Vector,Catenate
08e5 e409 | | Load 0x2,0x9
08e6 01cc | | Execute Vector,Catenate
08e7 0092 0f6b | k| Action Push_String_Extended,0xf6b ; " overwrite=yes"
08e9 01cc | | Execute Vector,Catenate
08ea 00ea | | Load_Encached Null_String_Cache
08eb 8216 | | Call 0x1,0x16
08ec 01cc | | Execute Vector,Catenate
08ed 8014 | | Call 0x0,0x14
08ee c5f9 | | Store 0x2,-0x7
08ef 784c |xL | Jump 0x93c
08f0 e5fa | | Load 0x2,-0x6
08f1 e5fb | | Load 0x2,-0x5
08f2 00da | | Load_Top At_Offset_2
08f3 821e | | Call 0x1,0x1e
08f4 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
08f5 00da | | Load_Top At_Offset_2
08f6 7016 |p | Jump_Nonzero 0x90d
08f7 e5f9 | | Load 0x2,-0x7
08f8 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
08fa 4802 |H | Short_Literal 0x2
08fb 0092 0f6c | l| Action Push_String_Extended,0xf6c ; "Can't acquire the link "
08fd e402 | | Load 0x2,0x2
08fe e00f | | Load 0x0,0xf
08ff 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0900 01cc | | Execute Vector,Catenate
0901 0092 0f6d | m| Action Push_String_Extended,0xf6d ; " because remote import directory "
0903 01cc | | Execute Vector,Catenate
0904 e414 | | Load 0x2,0x14
0905 01cc | | Execute Vector,Catenate
0906 0092 0f6e | n| Action Push_String_Extended,0xf6e ; " doesn't exist"
0908 01cc | | Execute Vector,Catenate
0909 e00a | | Load 0x0,0xa
090a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
090b c5f9 | | Store 0x2,-0x7
090c 4507 |E | Exit_Suprogram New_Top_Offset 0x7
090d e006 | | Load 0x0,0x6
090e 180e | | Execute Package,Field_Execute,Field_Number 0xe
090f 4804 |H | Short_Literal 0x4
0910 0092 0f5e | ^| Action Push_String_Extended,0xf5e ; "Acquiring link to "
0912 e402 | | Load 0x2,0x2
0913 8009 | | Call 0x0,0x9
0914 01cc | | Execute Vector,Catenate
0915 0092 0f5f | _| Action Push_String_Extended,0xf5f ; " from "
0917 01cc | | Execute Vector,Catenate
0918 00db | | Load_Top At_Offset_3
0919 8009 | | Call 0x0,0x9
091a 01cc | | Execute Vector,Catenate
091b 0092 0f55 | U| Action Push_String_Extended,0xf55 ; " into remote library "
091d 01cc | | Execute Vector,Catenate
091e e5fc | | Load 0x2,-0x4
091f 8009 | | Call 0x0,0x9
0920 01cc | | Execute Vector,Catenate
0921 e008 | | Load 0x0,0x8
0922 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0923 e5f9 | | Load 0x2,-0x7
0924 e5fa | | Load 0x2,-0x6
0925 e5fb | | Load 0x2,-0x5
0926 0092 0f37 | 7| Action Push_String_Extended,0xf37 ; "ada unit_manager\x5c("
0928 e40a | | Load 0x2,0xa
0929 01cc | | Execute Vector,Catenate
092a 0092 0f60 | `| Action Push_String_Extended,0xf60 ; ",update\x5c).acquire units="
092c 01cc | | Execute Vector,Catenate
092d e402 | | Load 0x2,0x2
092e 01cc | | Execute Vector,Catenate
092f 0092 0f61 | a| Action Push_String_Extended,0xf61 ; " from="
0931 01cc | | Execute Vector,Catenate
0932 e414 | | Load 0x2,0x14
0933 01cc | | Execute Vector,Catenate
0934 0092 0f6f | o| Action Push_String_Extended,0xf6f ; " kind=all by=copy overwrite=yes"
0936 01cc | | Execute Vector,Catenate
0937 00ea | | Load_Encached Null_String_Cache
0938 8216 | | Call 0x1,0x16
0939 01cc | | Execute Vector,Catenate
093a 8014 | | Call 0x0,0x14
093b c5f9 | | Store 0x2,-0x7
093c e5fa | | Load 0x2,-0x6
093d e5f9 | | Load 0x2,-0x7
093e 800e | | Call 0x0,0xe
093f 680c |h | Jump_Zero 0x94c
0940 e006 | | Load 0x0,0x6
0941 180e | | Execute Package,Field_Execute,Field_Number 0xe
0942 4807 |H | Short_Literal 0x7
0943 0092 0f70 | p| Action Push_String_Extended,0xf70 ; "Can't acquire the prerequisite link. "
0945 e5f9 | | Load 0x2,-0x7
0946 e013 | | Load 0x0,0x13
0947 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0948 01cc | | Execute Vector,Catenate
0949 e008 | | Load 0x0,0x8
094a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
094b 4507 |E | Exit_Suprogram New_Top_Offset 0x7
094c e5f9 | | Load 0x2,-0x7
094d e5fa | | Load 0x2,-0x6
094e e5fb | | Load 0x2,-0x5
094f e5fc | | Load 0x2,-0x4
0950 8219 | | Call 0x1,0x19
0951 c5f9 | | Store 0x2,-0x7
0952 e40e | | Load 0x2,0xe
0953 e40b | | Load 0x2,0xb
0954 e5fd | | Load 0x2,-0x3
0955 e001 | | Load 0x0,0x1
0956 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0957 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0958 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0959 0000 0000 | | .BLANK 0000[0x7]
0960 ; --------------------------------------------------------------------------------------
0960 ; SUBPROGRAM
0960 ; --------------------------------------------------------------------------------------
0960 0981 | | .CONST 0x0981 ; Address of begin
0961 0a04 | | .CONST 0x0a04 ; Address of exception handler
0962 0007 | | .CONST 0x0007 ; Number of locals
0963 INIT_0960:
0963 e001 | | Load 0x0,0x1
0964 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0965 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0966 02c7 | | Declare_Variable Any
0967 00d8 | | Load_Top At_Offset_0
0968 1c00 | | Execute_Immediate Run_Utility,0x0
0969 e001 | | Load 0x0,0x1
096a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
096b 0322 | " | Declare_Variable Record
096c 00d8 | | Load_Top At_Offset_0
096d 1c00 | | Execute_Immediate Run_Utility,0x0
096e e001 | | Load 0x0,0x1
096f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0970 0322 | " | Declare_Variable Record
0971 00d8 | | Load_Top At_Offset_0
0972 1c00 | | Execute_Immediate Run_Utility,0x0
0973 e001 | | Load 0x0,0x1
0974 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0975 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0976 02c7 | | Declare_Variable Any
0977 00d8 | | Load_Top At_Offset_0
0978 1c00 | | Execute_Immediate Run_Utility,0x0
0979 e001 | | Load 0x0,0x1
097a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
097b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
097c 02c7 | | Declare_Variable Any
097d 00d8 | | Load_Top At_Offset_0
097e 1c00 | | Execute_Immediate Run_Utility,0x0
097f 029f 0ddb | | Declare_Subprogram INIT_0dd8,For_Call
0981 BODY_0960:
0981 00be | | Action Activate_Tasks
0982 e402 | | Load 0x2,0x2
0983 4802 |H | Short_Literal 0x2
0984 e5fe | | Load 0x2,-0x2
0985 e001 | | Load 0x0,0x1
0986 180e | | Execute Package,Field_Execute,Field_Number 0xe
0987 e001 | | Load 0x0,0x1
0988 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0989 1819 | | Execute Package,Field_Execute,Field_Number 0x19
098a c402 | | Store 0x2,0x2
098b e5ff | | Load 0x2,-0x1
098c e403 | | Load 0x2,0x3
098d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
098e 00cf | | Action Mark_Auxiliary
098f 00da | | Load_Top At_Offset_2
0990 0120 | | Execute Any,Is_Value
0991 6804 |h | Jump_Zero 0x996
0992 e001 | | Load 0x0,0x1
0993 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0994 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0995 7801 |x | Jump 0x997
0996 00da | | Load_Top At_Offset_2
0997 e405 | | Load 0x2,0x5
0998 0120 | | Execute Any,Is_Value
0999 6804 |h | Jump_Zero 0x99e
099a e001 | | Load 0x0,0x1
099b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
099c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
099d 7801 |x | Jump 0x99f
099e e405 | | Load 0x2,0x5
099f e404 | | Load 0x2,0x4
09a0 e403 | | Load 0x2,0x3
09a1 e402 | | Load 0x2,0x2
09a2 e001 | | Load 0x0,0x1
09a3 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09a4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
09a5 00d1 | | Pop_Control Pop_Count_1
09a6 c405 | | Store 0x2,0x5
09a7 c406 | | Store 0x2,0x6
09a8 00db | | Load_Top At_Offset_3
09a9 e001 | | Load 0x0,0x1
09aa 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09ab 181d | | Execute Package,Field_Execute,Field_Number 0x1d
09ac 6801 |h | Jump_Zero 0x9ae
09ad 7851 |xQ | Jump 0x9ff
09ae e006 | | Load 0x0,0x6
09af 180e | | Execute Package,Field_Execute,Field_Number 0xe
09b0 4804 |H | Short_Literal 0x4
09b1 0092 0f71 | q| Action Push_String_Extended,0xf71 ; "Erasing link to "
09b3 e404 | | Load 0x2,0x4
09b4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09b5 e004 | | Load 0x0,0x4
09b6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
09b7 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
09b8 e00f | | Load 0x0,0xf
09b9 1815 | | Execute Package,Field_Execute,Field_Number 0x15
09ba 8009 | | Call 0x0,0x9
09bb 01cc | | Execute Vector,Catenate
09bc 0092 0f72 | r| Action Push_String_Extended,0xf72 ; " from remote library "
09be 01cc | | Execute Vector,Catenate
09bf e5fd | | Load 0x2,-0x3
09c0 8009 | | Call 0x0,0x9
09c1 01cc | | Execute Vector,Catenate
09c2 e008 | | Load 0x0,0x8
09c3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09c4 e5fa | | Load 0x2,-0x6
09c5 e5fb | | Load 0x2,-0x5
09c6 e5fc | | Load 0x2,-0x4
09c7 0092 0f37 | 7| Action Push_String_Extended,0xf37 ; "ada unit_manager\x5c("
09c9 e5fd | | Load 0x2,-0x3
09ca 01cc | | Execute Vector,Catenate
09cb 0092 0f73 | s| Action Push_String_Extended,0xf73 ; "/adalib,update\x5c).erase units="
09cd 01cc | | Execute Vector,Catenate
09ce e404 | | Load 0x2,0x4
09cf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09d0 e004 | | Load 0x0,0x4
09d1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
09d2 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
09d3 e00f | | Load 0x0,0xf
09d4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
09d5 01cc | | Execute Vector,Catenate
09d6 0092 0f74 | t| Action Push_String_Extended,0xf74 ; " confirm=no kind=spec"
09d8 01cc | | Execute Vector,Catenate
09d9 8014 | | Call 0x0,0x14
09da c5fa | | Store 0x2,-0x6
09db e5fb | | Load 0x2,-0x5
09dc e5fa | | Load 0x2,-0x6
09dd 800e | | Call 0x0,0xe
09de 680c |h | Jump_Zero 0x9eb
09df e006 | | Load 0x0,0x6
09e0 180e | | Execute Package,Field_Execute,Field_Number 0xe
09e1 4807 |H | Short_Literal 0x7
09e2 0092 0f75 | u| Action Push_String_Extended,0xf75 ; "Can't remove the remote link. "
09e4 e5fa | | Load 0x2,-0x6
09e5 e013 | | Load 0x0,0x13
09e6 1819 | | Execute Package,Field_Execute,Field_Number 0x19
09e7 01cc | | Execute Vector,Catenate
09e8 e008 | | Load 0x0,0x8
09e9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09ea 7814 |x | Jump 0x9ff
09eb e004 | | Load 0x0,0x4
09ec 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09ed e404 | | Load 0x2,0x4
09ee 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
09ef e004 | | Load 0x0,0x4
09f0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09f1 e404 | | Load 0x2,0x4
09f2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
09f3 e01a | | Load 0x0,0x1a
09f4 181a | | Execute Package,Field_Execute,Field_Number 0x1a
09f5 e404 | | Load 0x2,0x4
09f6 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
09f7 00db | | Load_Top At_Offset_3
09f8 e404 | | Load 0x2,0x4
09f9 e402 | | Load 0x2,0x2
09fa e001 | | Load 0x0,0x1
09fb 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09fc 181c | | Execute Package,Field_Execute,Field_Number 0x1c
09fd 00c9 | | Action Pop_Auxiliary_Loop
09fe 7f90 | | Jump 0x98f
09ff 00ce | | Action Pop_Auxiliary
0a00 e402 | | Load 0x2,0x2
0a01 8407 | | Call 0x2,0x7
0a02 c402 | | Store 0x2,0x2
0a03 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0a04 TRAP_0960:
0a04 0007 | | Action Break_Optional
0a05 e402 | | Load 0x2,0x2
0a06 8407 | | Call 0x2,0x7
0a07 c402 | | Store 0x2,0x2
0a08 e5fa | | Load 0x2,-0x6
0a09 0092 0f76 | v| Action Push_String_Extended,0xf76 ; "Remove_Imported_Units"
0a0b e00a | | Load 0x0,0xa
0a0c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a0d c5fa | | Store 0x2,-0x6
0a0e 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0a0f 0000 | | .XXX[0x1]
0a10 ; --------------------------------------------------------------------------------------
0a10 ; SUBPROGRAM
0a10 ; --------------------------------------------------------------------------------------
0a10 0a13 | | .CONST 0x0a13 ; Address of begin
0a11 0004 | | .CONST 0x0004 ; Address of exception handler
0a12 0001 | | .CONST 0x0001 ; Number of locals
0a13 BODY_0a10:
0a13 INIT_0a10:
0a13 e406 | | Load 0x2,0x6
0a14 6825 |h% | Jump_Zero 0xa3a
0a15 0092 0f77 | w| Action Push_String_Extended,0xf77 ; "unit_manager "
0a17 e5fc | | Load 0x2,-0x4
0a18 01cc | | Execute Vector,Catenate
0a19 0092 0f78 | x| Action Push_String_Extended,0xf78 ; "/adalib update"
0a1b 01cc | | Execute Vector,Catenate
0a1c e5ff | | Load 0x2,-0x1
0a1d 8217 | | Call 0x1,0x17
0a1e e405 | | Load 0x2,0x5
0a1f 7008 |p | Jump_Nonzero 0xa28
0a20 0092 0f79 | y| Action Push_String_Extended,0xf79 ; "default.acquire kind=all"
0a22 e5ff | | Load 0x2,-0x1
0a23 8217 | | Call 0x1,0x17
0a24 0092 0f7a | z| Action Push_String_Extended,0xf7a ; "default.acquire by=copy"
0a26 e5ff | | Load 0x2,-0x1
0a27 8217 | | Call 0x1,0x17
0a28 0092 0f7b | {| Action Push_String_Extended,0xf7b ; "default.acquire overwrite=yes"
0a2a e5ff | | Load 0x2,-0x1
0a2b 8217 | | Call 0x1,0x17
0a2c 0092 0f7c | || Action Push_String_Extended,0xf7c ; "default.acquire"
0a2e 00ea | | Load_Encached Null_String_Cache
0a2f 8216 | | Call 0x1,0x16
0a30 01cc | | Execute Vector,Catenate
0a31 e5ff | | Load 0x2,-0x1
0a32 8217 | | Call 0x1,0x17
0a33 4800 |H | Short_Literal 0x0
0a34 a406 | | Store_Unchecked 0x2,0x6
0a35 4801 |H | Short_Literal 0x1
0a36 a407 | | Store_Unchecked 0x2,0x7
0a37 e409 | | Load 0x2,0x9
0a38 c40a | | Store 0x2,0xa
0a39 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a3a e409 | | Load 0x2,0x9
0a3b e40a | | Load 0x2,0xa
0a3c 012f | / | Execute Any,Equal
0a3d 6803 |h | Jump_Zero 0xa41
0a3e 4800 |H | Short_Literal 0x0
0a3f a407 | | Store_Unchecked 0x2,0x7
0a40 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a41 4801 |H | Short_Literal 0x1
0a42 a407 | | Store_Unchecked 0x2,0x7
0a43 e409 | | Load 0x2,0x9
0a44 c40a | | Store 0x2,0xa
0a45 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a46 0000 0000 | | .XXX[0x2]
0a48 ; --------------------------------------------------------------------------------------
0a48 ; SUBPROGRAM
0a48 ; --------------------------------------------------------------------------------------
0a48 0a55 | U | .CONST 0x0a55 ; Address of begin
0a49 0004 | | .CONST 0x0004 ; Address of exception handler
0a4a 0003 | | .CONST 0x0003 ; Number of locals
0a4b INIT_0a48:
0a4b 00da | | Load_Top At_Offset_2
0a4c e004 | | Load 0x0,0x4
0a4d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a4e 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0a4f e00f | | Load 0x0,0xf
0a50 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0a51 00db | | Load_Top At_Offset_3
0a52 e004 | | Load 0x0,0x4
0a53 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a54 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0a55 BODY_0a48:
0a55 e005 | | Load 0x0,0x5
0a56 6813 |h | Jump_Zero 0xa6a
0a57 e006 | | Load 0x0,0x6
0a58 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a59 4809 |H | Short_Literal 0x9
0a5a 0092 0f7d | }| Action Push_String_Extended,0xf7d ; "#~Batch_Import_Predefined_Unit (Imported_Unit"
0a5c 00db | | Load_Top At_Offset_3
0a5d 8007 | | Call 0x0,0x7
0a5e 01cc | | Execute Vector,Catenate
0a5f 0092 0f5b | [| Action Push_String_Extended,0xf5b ; ", Remote_Predef"
0a61 01cc | | Execute Vector,Catenate
0a62 e7fe | | Load 0x3,-0x2
0a63 8007 | | Call 0x0,0x7
0a64 01cc | | Execute Vector,Catenate
0a65 0092 0f12 | | Action Push_String_Extended,0xf12 ; ")"
0a67 01cc | | Execute Vector,Catenate
0a68 e008 | | Load 0x0,0x8
0a69 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a6a e7ff | | Load 0x3,-0x1
0a6b e40b | | Load 0x2,0xb
0a6c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0a6d e7ff | | Load 0x3,-0x1
0a6e e40b | | Load 0x2,0xb
0a6f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0a70 e002 | | Load 0x0,0x2
0a71 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0a72 e40b | | Load 0x2,0xb
0a73 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0a74 e40e | | Load 0x2,0xe
0a75 0120 | | Execute Any,Is_Value
0a76 6804 |h | Jump_Zero 0xa7b
0a77 e001 | | Load 0x0,0x1
0a78 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0a79 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a7a 7801 |x | Jump 0xa7c
0a7b e40e | | Load 0x2,0xe
0a7c e40d | | Load 0x2,0xd
0a7d 0120 | | Execute Any,Is_Value
0a7e 6804 |h | Jump_Zero 0xa83
0a7f e001 | | Load 0x0,0x1
0a80 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0a81 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a82 7801 |x | Jump 0xa84
0a83 e40d | | Load 0x2,0xd
0a84 e40c | | Load 0x2,0xc
0a85 e40b | | Load 0x2,0xb
0a86 e402 | | Load 0x2,0x2
0a87 e001 | | Load 0x0,0x1
0a88 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0a89 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0a8a 00d1 | | Pop_Control Pop_Count_1
0a8b c40d | | Store 0x2,0xd
0a8c c40e | | Store 0x2,0xe
0a8d e40d | | Load 0x2,0xd
0a8e e001 | | Load 0x0,0x1
0a8f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0a90 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0a91 700c |p | Jump_Nonzero 0xa9e
0a92 e005 | | Load 0x0,0x5
0a93 6809 |h | Jump_Zero 0xa9d
0a94 e006 | | Load 0x0,0x6
0a95 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a96 4802 |H | Short_Literal 0x2
0a97 0092 0f5c | \| Action Push_String_Extended,0xf5c ; "#~Reusing predefined link unit "
0a99 00db | | Load_Top At_Offset_3
0a9a 01cc | | Execute Vector,Catenate
0a9b e008 | | Load 0x0,0x8
0a9c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a9d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0a9e 840f | | Call 0x2,0xf
0a9f e407 | | Load 0x2,0x7
0aa0 6806 |h | Jump_Zero 0xaa7
0aa1 0092 0f7e | ~| Action Push_String_Extended,0xf7e ; "default.acquire from="
0aa3 e7fe | | Load 0x3,-0x2
0aa4 01cc | | Execute Vector,Catenate
0aa5 e5ff | | Load 0x2,-0x1
0aa6 8217 | | Call 0x1,0x17
0aa7 0092 0f7f | | Action Push_String_Extended,0xf7f ; "acquire units="
0aa9 00da | | Load_Top At_Offset_2
0aaa 01cc | | Execute Vector,Catenate
0aab e5ff | | Load 0x2,-0x1
0aac 8217 | | Call 0x1,0x17
0aad e40e | | Load 0x2,0xe
0aae e40b | | Load 0x2,0xb
0aaf e402 | | Load 0x2,0x2
0ab0 e001 | | Load 0x0,0x1
0ab1 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0ab2 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0ab3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0ab4 0000 0000 | | .BLANK 0000[0x4]
0ab8 ; --------------------------------------------------------------------------------------
0ab8 ; SUBPROGRAM
0ab8 ; --------------------------------------------------------------------------------------
0ab8 0af3 | | .CONST 0x0af3 ; Address of begin
0ab9 0004 | | .CONST 0x0004 ; Address of exception handler
0aba 000b | | .CONST 0x000b ; Number of locals
0abb INIT_0ab8:
0abb 00da | | Load_Top At_Offset_2
0abc e004 | | Load 0x0,0x4
0abd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0abe 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0abf e00f | | Load 0x0,0xf
0ac0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0ac1 00db | | Load_Top At_Offset_3
0ac2 e004 | | Load 0x0,0x4
0ac3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0ac4 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0ac5 e004 | | Load 0x0,0x4
0ac6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ac7 02c7 | | Declare_Variable Any
0ac8 e006 | | Load 0x0,0x6
0ac9 180e | | Execute Package,Field_Execute,Field_Number 0xe
0aca e7ff | | Load 0x3,-0x1
0acb e00c | | Load 0x0,0xc
0acc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0acd 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0ace a604 | | Store_Unchecked 0x3,0x4
0acf 00d8 | | Load_Top At_Offset_0
0ad0 e004 | | Load 0x0,0x4
0ad1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0ad2 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0ad3 00d8 | | Load_Top At_Offset_0
0ad4 e004 | | Load 0x0,0x4
0ad5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0ad6 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0ad7 e004 | | Load 0x0,0x4
0ad8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0ad9 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0ada e00f | | Load 0x0,0xf
0adb 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0adc e006 | | Load 0x0,0x6
0add 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ade 00da | | Load_Top At_Offset_2
0adf e00b | | Load 0x0,0xb
0ae0 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0ae1 00d8 | | Load_Top At_Offset_0
0ae2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ae3 0007 | | Action Break_Optional
0ae4 00d8 | | Load_Top At_Offset_0
0ae5 0092 0f59 | Y| Action Push_String_Extended,0xf59 ; "/adalib"
0ae7 01cc | | Execute Vector,Catenate
0ae8 0007 | | Action Break_Optional
0ae9 00d9 | | Load_Top At_Offset_1
0aea e604 | | Load 0x3,0x4
0aeb 8003 | | Call 0x0,0x3
0aec e404 | | Load 0x2,0x4
0aed 0092 0f46 | F| Action Push_String_Extended,0xf46 ; "/imports/"
0aef 01cc | | Execute Vector,Catenate
0af0 e606 | | Load 0x3,0x6
0af1 01cc | | Execute Vector,Catenate
0af2 0007 | | Action Break_Optional
0af3 BODY_0ab8:
0af3 e005 | | Load 0x0,0x5
0af4 680d |h | Jump_Zero 0xb02
0af5 e006 | | Load 0x0,0x6
0af6 180e | | Execute Package,Field_Execute,Field_Number 0xe
0af7 4809 |H | Short_Literal 0x9
0af8 0092 0f80 | | Action Push_String_Extended,0xf80 ; "#~Batch_Import_A_Unit (Imported_Unit"
0afa e603 | | Load 0x3,0x3
0afb 8007 | | Call 0x0,0x7
0afc 01cc | | Execute Vector,Catenate
0afd 0092 0f12 | | Action Push_String_Extended,0xf12 ; ")"
0aff 01cc | | Execute Vector,Catenate
0b00 e008 | | Load 0x0,0x8
0b01 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b02 e5fb | | Load 0x2,-0x5
0b03 e607 | | Load 0x3,0x7
0b04 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0b05 800e | | Call 0x0,0xe
0b06 680c |h | Jump_Zero 0xb13
0b07 e5fa | | Load 0x2,-0x6
0b08 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
0b0a 4802 |H | Short_Literal 0x2
0b0b 0092 0f4a | J| Action Push_String_Extended,0xf4a ; "Can't get remote directory name for imported view "
0b0d e605 | | Load 0x3,0x5
0b0e 01cc | | Execute Vector,Catenate
0b0f e00a | | Load 0x0,0xa
0b10 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0b11 c5fa | | Store 0x2,-0x6
0b12 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0b13 00d9 | | Load_Top At_Offset_1
0b14 01db | | Execute Vector,Length
0b15 700d |p | Jump_Nonzero 0xb23
0b16 e5fa | | Load 0x2,-0x6
0b17 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
0b19 4802 |H | Short_Literal 0x2
0b1a 0092 0f14 | | Action Push_String_Extended,0xf14 ; "Can't derive a family name from the remote pathname "
0b1c e608 | | Load 0x3,0x8
0b1d 8009 | | Call 0x0,0x9
0b1e 01cc | | Execute Vector,Catenate
0b1f e00a | | Load 0x0,0xa
0b20 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0b21 c5fa | | Store 0x2,-0x6
0b22 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0b23 4801 |H | Short_Literal 0x1
0b24 00da | | Load_Top At_Offset_2
0b25 e404 | | Load 0x2,0x4
0b26 e00f | | Load 0x0,0xf
0b27 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0b28 a405 | | Store_Unchecked 0x2,0x5
0b29 e7ff | | Load 0x3,-0x1
0b2a e40b | | Load 0x2,0xb
0b2b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0b2c e604 | | Load 0x3,0x4
0b2d e40b | | Load 0x2,0xb
0b2e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0b2f e002 | | Load 0x0,0x2
0b30 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0b31 e40b | | Load 0x2,0xb
0b32 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0b33 e40e | | Load 0x2,0xe
0b34 0120 | | Execute Any,Is_Value
0b35 6804 |h | Jump_Zero 0xb3a
0b36 e001 | | Load 0x0,0x1
0b37 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b38 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b39 7801 |x | Jump 0xb3b
0b3a e40e | | Load 0x2,0xe
0b3b e40d | | Load 0x2,0xd
0b3c 0120 | | Execute Any,Is_Value
0b3d 6804 |h | Jump_Zero 0xb42
0b3e e001 | | Load 0x0,0x1
0b3f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b40 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b41 7801 |x | Jump 0xb43
0b42 e40d | | Load 0x2,0xd
0b43 e40c | | Load 0x2,0xc
0b44 e40b | | Load 0x2,0xb
0b45 e402 | | Load 0x2,0x2
0b46 e001 | | Load 0x0,0x1
0b47 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b48 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0b49 00d1 | | Pop_Control Pop_Count_1
0b4a c40d | | Store 0x2,0xd
0b4b c40e | | Store 0x2,0xe
0b4c e40d | | Load 0x2,0xd
0b4d e001 | | Load 0x0,0x1
0b4e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b4f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0b50 7076 |pv | Jump_Nonzero 0xbc7
0b51 e40c | | Load 0x2,0xc
0b52 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b53 e604 | | Load 0x3,0x4
0b54 012f | / | Execute Any,Equal
0b55 702b |p+ | Jump_Nonzero 0xb81
0b56 e006 | | Load 0x0,0x6
0b57 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b58 4806 |H | Short_Literal 0x6
0b59 0092 0f64 | d| Action Push_String_Extended,0xf64 ; "Can't acquire link to "
0b5b e603 | | Load 0x3,0x3
0b5c 01cc | | Execute Vector,Catenate
0b5d e008 | | Load 0x0,0x8
0b5e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b5f e006 | | Load 0x0,0x6
0b60 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b61 4806 |H | Short_Literal 0x6
0b62 0092 0f65 | e| Action Push_String_Extended,0xf65 ; "A link to "
0b64 e602 | | Load 0x3,0x2
0b65 e00f | | Load 0x0,0xf
0b66 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0b67 01cc | | Execute Vector,Catenate
0b68 0092 0f66 | f| Action Push_String_Extended,0xf66 ; " already exists, but it came from view "
0b6a 01cc | | Execute Vector,Catenate
0b6b e40c | | Load 0x2,0xc
0b6c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b6d e004 | | Load 0x0,0x4
0b6e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0b6f 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0b70 01cc | | Execute Vector,Catenate
0b71 0092 0f67 | g| Action Push_String_Extended,0xf67 ; ", acquired on "
0b73 01cc | | Execute Vector,Catenate
0b74 4800 |H | Short_Literal 0x0
0b75 4800 |H | Short_Literal 0x0
0b76 4800 |H | Short_Literal 0x0
0b77 e40c | | Load 0x2,0xc
0b78 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b79 e01a | | Load 0x0,0x1a
0b7a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0b7b e01a | | Load 0x0,0x1a
0b7c 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0b7d 01cc | | Execute Vector,Catenate
0b7e e008 | | Load 0x0,0x8
0b7f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b80 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0b81 e405 | | Load 0x2,0x5
0b82 6838 |h8 | Jump_Zero 0xbbb
0b83 e7ff | | Load 0x3,-0x1
0b84 e00a | | Load 0x0,0xa
0b85 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0b86 c403 | | Store 0x2,0x3
0b87 e40c | | Load 0x2,0xc
0b88 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b89 e403 | | Load 0x2,0x3
0b8a e002 | | Load 0x0,0x2
0b8b 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0b8c 6822 |h" | Jump_Zero 0xbaf
0b8d e006 | | Load 0x0,0x6
0b8e 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b8f 4802 |H | Short_Literal 0x2
0b90 0092 0f68 | h| Action Push_String_Extended,0xf68 ; "Imported unit "
0b92 e603 | | Load 0x3,0x3
0b93 01cc | | Execute Vector,Catenate
0b94 0092 0f81 | | Action Push_String_Extended,0xf81 ; " was recompiled or changed, "
0b96 01cc | | Execute Vector,Catenate
0b97 0092 0f82 | | Action Push_String_Extended,0xf82 ; "so we must reacquire it"
0b99 01cc | | Execute Vector,Catenate
0b9a e008 | | Load 0x0,0x8
0b9b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b9c e004 | | Load 0x0,0x4
0b9d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b9e e40c | | Load 0x2,0xc
0b9f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0ba0 e004 | | Load 0x0,0x4
0ba1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0ba2 e40c | | Load 0x2,0xc
0ba3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0ba4 e01a | | Load 0x0,0x1a
0ba5 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0ba6 e40c | | Load 0x2,0xc
0ba7 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0ba8 e40d | | Load 0x2,0xd
0ba9 e40c | | Load 0x2,0xc
0baa e402 | | Load 0x2,0x2
0bab e001 | | Load 0x0,0x1
0bac 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0bad 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0bae 7818 |x | Jump 0xbc7
0baf e005 | | Load 0x0,0x5
0bb0 6809 |h | Jump_Zero 0xbba
0bb1 e006 | | Load 0x0,0x6
0bb2 180e | | Execute Package,Field_Execute,Field_Number 0xe
0bb3 4802 |H | Short_Literal 0x2
0bb4 0092 0f6a | j| Action Push_String_Extended,0xf6a ; "#~Reusing link unit "
0bb6 e603 | | Load 0x3,0x3
0bb7 01cc | | Execute Vector,Catenate
0bb8 e008 | | Load 0x0,0x8
0bb9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0bba 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0bbb e005 | | Load 0x0,0x5
0bbc 6809 |h | Jump_Zero 0xbc6
0bbd e006 | | Load 0x0,0x6
0bbe 180e | | Execute Package,Field_Execute,Field_Number 0xe
0bbf 4802 |H | Short_Literal 0x2
0bc0 0092 0f6a | j| Action Push_String_Extended,0xf6a ; "#~Reusing link unit "
0bc2 e603 | | Load 0x3,0x3
0bc3 01cc | | Execute Vector,Catenate
0bc4 e008 | | Load 0x0,0x8
0bc5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0bc6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0bc7 840f | | Call 0x2,0xf
0bc8 e405 | | Load 0x2,0x5
0bc9 680f |h | Jump_Zero 0xbd9
0bca e407 | | Load 0x2,0x7
0bcb 6806 |h | Jump_Zero 0xbd2
0bcc 0092 0f7e | ~| Action Push_String_Extended,0xf7e ; "default.acquire from="
0bce 00db | | Load_Top At_Offset_3
0bcf 01cc | | Execute Vector,Catenate
0bd0 e5ff | | Load 0x2,-0x1
0bd1 8217 | | Call 0x1,0x17
0bd2 0092 0f7f | | Action Push_String_Extended,0xf7f ; "acquire units="
0bd4 e602 | | Load 0x3,0x2
0bd5 01cc | | Execute Vector,Catenate
0bd6 e5ff | | Load 0x2,-0x1
0bd7 8217 | | Call 0x1,0x17
0bd8 780e |x | Jump 0xbe7
0bd9 e407 | | Load 0x2,0x7
0bda 6806 |h | Jump_Zero 0xbe1
0bdb 0092 0f7e | ~| Action Push_String_Extended,0xf7e ; "default.acquire from="
0bdd 00d9 | | Load_Top At_Offset_1
0bde 01cc | | Execute Vector,Catenate
0bdf e5ff | | Load 0x2,-0x1
0be0 8217 | | Call 0x1,0x17
0be1 0092 0f7f | | Action Push_String_Extended,0xf7f ; "acquire units="
0be3 e602 | | Load 0x3,0x2
0be4 01cc | | Execute Vector,Catenate
0be5 e5ff | | Load 0x2,-0x1
0be6 8217 | | Call 0x1,0x17
0be7 e40e | | Load 0x2,0xe
0be8 e40b | | Load 0x2,0xb
0be9 e402 | | Load 0x2,0x2
0bea e001 | | Load 0x0,0x1
0beb 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0bec 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0bed 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0bee 0000 0000 | | .XXX[0x2]
0bf0 ; --------------------------------------------------------------------------------------
0bf0 ; SUBPROGRAM
0bf0 ; --------------------------------------------------------------------------------------
0bf0 0bf3 | | .CONST 0x0bf3 ; Address of begin
0bf1 0c1b | | .CONST 0x0c1b ; Address of exception handler
0bf2 0001 | | .CONST 0x0001 ; Number of locals
0bf3 BODY_0bf0:
0bf3 INIT_0bf0:
0bf3 00da | | Load_Top At_Offset_2
0bf4 e001 | | Load 0x0,0x1
0bf5 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0bf6 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0bf7 c7ff | | Store 0x3,-0x1
0bf8 e005 | | Load 0x0,0x5
0bf9 6820 |h | Jump_Zero 0xc1a
0bfa 00da | | Load_Top At_Offset_2
0bfb 4800 |H | Short_Literal 0x0
0bfc e5fd | | Load 0x2,-0x3
0bfd e001 | | Load 0x0,0x1
0bfe 180e | | Execute Package,Field_Execute,Field_Number 0xe
0bff e001 | | Load 0x0,0x1
0c00 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0c01 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0c02 c7ff | | Store 0x3,-0x1
0c03 e006 | | Load 0x0,0x6
0c04 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c05 4802 |H | Short_Literal 0x2
0c06 0092 0f83 | | Action Push_String_Extended,0xf83 ; "#~Link table "
0c08 e5fd | | Load 0x2,-0x3
0c09 e001 | | Load 0x0,0x1
0c0a 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c0b 01cc | | Execute Vector,Catenate
0c0c 0092 0f84 | | Action Push_String_Extended,0xf84 ; " contains:"
0c0e 01cc | | Execute Vector,Catenate
0c0f e008 | | Load 0x0,0x8
0c10 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c11 00da | | Load_Top At_Offset_2
0c12 e001 | | Load 0x0,0x1
0c13 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0c14 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0c15 00da | | Load_Top At_Offset_2
0c16 e001 | | Load 0x0,0x1
0c17 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0c18 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0c19 c7ff | | Store 0x3,-0x1
0c1a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c1b TRAP_0bf0:
0c1b 0007 | | Action Break_Optional
0c1c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c1d 0000 0000 | | .XXX[0x3]
0c1f 0000 | |
0c20 ; --------------------------------------------------------------------------------------
0c20 ; SUBPROGRAM
0c20 ; --------------------------------------------------------------------------------------
0c20 0c25 | % | .CONST 0x0c25 ; Address of begin
0c21 0c4f | O | .CONST 0x0c4f ; Address of exception handler
0c22 0002 | | .CONST 0x0002 ; Number of locals
0c23 INIT_0c20:
0c23 029f 0e0b | | Declare_Subprogram INIT_0e08,For_Call
0c25 BODY_0c20:
0c25 e416 | | Load 0x2,0x16
0c26 e5fe | | Load 0x2,-0x2
0c27 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c28 01d7 | | Execute Vector,Field_Read
0c29 c408 | | Store 0x2,0x8
0c2a e408 | | Load 0x2,0x8
0c2b e00c | | Load 0x0,0xc
0c2c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c2d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0c2e 6802 |h | Jump_Zero 0xc31
0c2f 8602 | | Call 0x3,0x2
0c30 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c31 e006 | | Load 0x0,0x6
0c32 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c33 e408 | | Load 0x2,0x8
0c34 e00c | | Load 0x0,0xc
0c35 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c36 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0c37 c409 | | Store 0x2,0x9
0c38 e408 | | Load 0x2,0x8
0c39 8411 | | Call 0x2,0x11
0c3a e5fb | | Load 0x2,-0x5
0c3b e5fa | | Load 0x2,-0x6
0c3c 800e | | Call 0x0,0xe
0c3d 6810 |h | Jump_Zero 0xc4e
0c3e e006 | | Load 0x0,0x6
0c3f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c40 4806 |H | Short_Literal 0x6
0c41 0092 0f85 | | Action Push_String_Extended,0xf85 ; "Can't import the prerequisite unit "
0c43 e408 | | Load 0x2,0x8
0c44 e004 | | Load 0x0,0x4
0c45 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c46 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0c47 01cc | | Execute Vector,Catenate
0c48 e008 | | Load 0x0,0x8
0c49 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c4a e5fa | | Load 0x2,-0x6
0c4b e013 | | Load 0x0,0x13
0c4c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c4d c5fa | | Store 0x2,-0x6
0c4e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c4f TRAP_0c20:
0c4f 0007 | | Action Break_Optional
0c50 e006 | | Load 0x0,0x6
0c51 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c52 4806 |H | Short_Literal 0x6
0c53 4800 |H | Short_Literal 0x0
0c54 4801 |H | Short_Literal 0x1
0c55 e01b | | Load 0x0,0x1b
0c56 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0c57 0092 0f86 | | Action Push_String_Extended,0xf86 ; " caught in Import_Units"
0c59 01cc | | Execute Vector,Catenate
0c5a e008 | | Load 0x0,0x8
0c5b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c5c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c5d 0000 0000 | | .XXX[0x3]
0c5f 0000 | |
0c60 ; --------------------------------------------------------------------------------------
0c60 ; SUBPROGRAM
0c60 ; --------------------------------------------------------------------------------------
0c60 0c63 | c | .CONST 0x0c63 ; Address of begin
0c61 0c8b | | .CONST 0x0c8b ; Address of exception handler
0c62 0001 | | .CONST 0x0001 ; Number of locals
0c63 BODY_0c60:
0c63 INIT_0c60:
0c63 00da | | Load_Top At_Offset_2
0c64 e001 | | Load 0x0,0x1
0c65 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0c66 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0c67 c7ff | | Store 0x3,-0x1
0c68 e005 | | Load 0x0,0x5
0c69 6820 |h | Jump_Zero 0xc8a
0c6a 00da | | Load_Top At_Offset_2
0c6b 4800 |H | Short_Literal 0x0
0c6c e5fe | | Load 0x2,-0x2
0c6d e001 | | Load 0x0,0x1
0c6e 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c6f e001 | | Load 0x0,0x1
0c70 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0c71 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0c72 c7ff | | Store 0x3,-0x1
0c73 e006 | | Load 0x0,0x6
0c74 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c75 4802 |H | Short_Literal 0x2
0c76 0092 0f83 | | Action Push_String_Extended,0xf83 ; "#~Link table "
0c78 e5fe | | Load 0x2,-0x2
0c79 e001 | | Load 0x0,0x1
0c7a 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c7b 01cc | | Execute Vector,Catenate
0c7c 0092 0f84 | | Action Push_String_Extended,0xf84 ; " contains:"
0c7e 01cc | | Execute Vector,Catenate
0c7f e008 | | Load 0x0,0x8
0c80 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c81 00da | | Load_Top At_Offset_2
0c82 e001 | | Load 0x0,0x1
0c83 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0c84 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0c85 00da | | Load_Top At_Offset_2
0c86 e001 | | Load 0x0,0x1
0c87 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0c88 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0c89 c7ff | | Store 0x3,-0x1
0c8a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c8b TRAP_0c60:
0c8b 0007 | | Action Break_Optional
0c8c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c8d 0000 0000 | | .XXX[0x3]
0c8f 0000 | |
0c90 ; --------------------------------------------------------------------------------------
0c90 ; SUBPROGRAM
0c90 ; --------------------------------------------------------------------------------------
0c90 0c95 | | .CONST 0x0c95 ; Address of begin
0c91 0cbf | | .CONST 0x0cbf ; Address of exception handler
0c92 0002 | | .CONST 0x0002 ; Number of locals
0c93 INIT_0c90:
0c93 029f 0e93 | | Declare_Subprogram INIT_0e90,For_Call
0c95 BODY_0c90:
0c95 e408 | | Load 0x2,0x8
0c96 e5ff | | Load 0x2,-0x1
0c97 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c98 01d7 | | Execute Vector,Field_Read
0c99 c403 | | Store 0x2,0x3
0c9a e403 | | Load 0x2,0x3
0c9b e00c | | Load 0x0,0xc
0c9c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c9d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0c9e 6802 |h | Jump_Zero 0xca1
0c9f 8602 | | Call 0x3,0x2
0ca0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ca1 e5fa | | Load 0x2,-0x6
0ca2 e5fb | | Load 0x2,-0x5
0ca3 e5fc | | Load 0x2,-0x4
0ca4 e5fd | | Load 0x2,-0x3
0ca5 e402 | | Load 0x2,0x2
0ca6 e5fe | | Load 0x2,-0x2
0ca7 e403 | | Load 0x2,0x3
0ca8 8221 | ! | Call 0x1,0x21
0ca9 c5fa | | Store 0x2,-0x6
0caa e5fb | | Load 0x2,-0x5
0cab e5fa | | Load 0x2,-0x6
0cac 800e | | Call 0x0,0xe
0cad 6810 |h | Jump_Zero 0xcbe
0cae e006 | | Load 0x0,0x6
0caf 180e | | Execute Package,Field_Execute,Field_Number 0xe
0cb0 4806 |H | Short_Literal 0x6
0cb1 0092 0f85 | | Action Push_String_Extended,0xf85 ; "Can't import the prerequisite unit "
0cb3 e403 | | Load 0x2,0x3
0cb4 e004 | | Load 0x0,0x4
0cb5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0cb6 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0cb7 01cc | | Execute Vector,Catenate
0cb8 e008 | | Load 0x0,0x8
0cb9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0cba e5fa | | Load 0x2,-0x6
0cbb e013 | | Load 0x0,0x13
0cbc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0cbd c5fa | | Store 0x2,-0x6
0cbe 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0cbf TRAP_0c90:
0cbf 0007 | | Action Break_Optional
0cc0 e006 | | Load 0x0,0x6
0cc1 180e | | Execute Package,Field_Execute,Field_Number 0xe
0cc2 4806 |H | Short_Literal 0x6
0cc3 4800 |H | Short_Literal 0x0
0cc4 4801 |H | Short_Literal 0x1
0cc5 e01b | | Load 0x0,0x1b
0cc6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0cc7 0092 0f86 | | Action Push_String_Extended,0xf86 ; " caught in Import_Units"
0cc9 01cc | | Execute Vector,Catenate
0cca e008 | | Load 0x0,0x8
0ccb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ccc 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ccd 0000 0000 | | .XXX[0x3]
0ccf 0000 | |
0cd0 ; --------------------------------------------------------------------------------------
0cd0 ; SUBPROGRAM
0cd0 ; --------------------------------------------------------------------------------------
0cd0 0cd9 | | .CONST 0x0cd9 ; Address of begin
0cd1 0004 | | .CONST 0x0004 ; Address of exception handler
0cd2 0003 | | .CONST 0x0003 ; Number of locals
0cd3 INIT_0cd0:
0cd3 e406 | | Load 0x2,0x6
0cd4 e004 | | Load 0x0,0x4
0cd5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0cd6 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0cd7 e406 | | Load 0x2,0x6
0cd8 8011 | | Call 0x0,0x11
0cd9 BODY_0cd0:
0cd9 00d8 | | Load_Top At_Offset_0
0cda 01db | | Execute Vector,Length
0cdb 700d |p | Jump_Nonzero 0xce9
0cdc e006 | | Load 0x0,0x6
0cdd 180e | | Execute Package,Field_Execute,Field_Number 0xe
0cde 4806 |H | Short_Literal 0x6
0cdf 0092 0f87 | | Action Push_String_Extended,0xf87 ; "Imported view "
0ce1 e602 | | Load 0x3,0x2
0ce2 01cc | | Execute Vector,Catenate
0ce3 0092 0f88 | | Action Push_String_Extended,0xf88 ; " has no remote family name. Same family assumed"
0ce5 01cc | | Execute Vector,Catenate
0ce6 e008 | | Load 0x0,0x8
0ce7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ce8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ce9 4801 |H | Short_Literal 0x1
0cea e404 | | Load 0x2,0x4
0ceb 00da | | Load_Top At_Offset_2
0cec e00f | | Load 0x0,0xf
0ced 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0cee 680f |h | Jump_Zero 0xcfe
0cef e005 | | Load 0x0,0x5
0cf0 680c |h | Jump_Zero 0xcfd
0cf1 e006 | | Load 0x0,0x6
0cf2 180e | | Execute Package,Field_Execute,Field_Number 0xe
0cf3 4802 |H | Short_Literal 0x2
0cf4 0092 0f89 | | Action Push_String_Extended,0xf89 ; "#~Skipping view "
0cf6 e602 | | Load 0x3,0x2
0cf7 01cc | | Execute Vector,Catenate
0cf8 0092 0f8a | | Action Push_String_Extended,0xf8a ; " in importer's family"
0cfa 01cc | | Execute Vector,Catenate
0cfb e008 | | Load 0x0,0x8
0cfc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0cfd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0cfe e406 | | Load 0x2,0x6
0cff 8218 | | Call 0x1,0x18
0d00 7010 |p | Jump_Nonzero 0xd11
0d01 e006 | | Load 0x0,0x6
0d02 180e | | Execute Package,Field_Execute,Field_Number 0xe
0d03 4807 |H | Short_Literal 0x7
0d04 0092 0f8b | | Action Push_String_Extended,0xf8b ; "Can only import view \x22"
0d06 e602 | | Load 0x3,0x2
0d07 01cc | | Execute Vector,Catenate
0d08 0092 0f8c | | Action Push_String_Extended,0xf8c ; "\x22 from another family "
0d0a 01cc | | Execute Vector,Catenate
0d0b 0092 0f8d | | Action Push_String_Extended,0xf8d ; "if it is a release view"
0d0d 01cc | | Execute Vector,Catenate
0d0e e008 | | Load 0x0,0x8
0d0f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0d10 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0d11 e409 | | Load 0x2,0x9
0d12 702b |p+ | Jump_Nonzero 0xd3e
0d13 e5fb | | Load 0x2,-0x5
0d14 e408 | | Load 0x2,0x8
0d15 0120 | | Execute Any,Is_Value
0d16 6803 |h | Jump_Zero 0xd1a
0d17 e00d | | Load 0x0,0xd
0d18 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d19 7801 |x | Jump 0xd1b
0d1a e408 | | Load 0x2,0x8
0d1b e005 | | Load 0x0,0x5
0d1c 7002 |p | Jump_Nonzero 0xd1f
0d1d e5fc | | Load 0x2,-0x4
0d1e 7801 |x | Jump 0xd20
0d1f 4801 |H | Short_Literal 0x1
0d20 e010 | | Load 0x0,0x10
0d21 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0d22 e010 | | Load 0x0,0x10
0d23 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0d24 e5fd | | Load 0x2,-0x3
0d25 0092 0f25 | %| Action Push_String_Extended,0xf25 ; "I386_Unix_Als_Xt"
0d27 e00d | | Load 0x0,0xd
0d28 180f | | Execute Package,Field_Execute,Field_Number 0xf
0d29 c408 | | Store 0x2,0x8
0d2a c5fb | | Store 0x2,-0x5
0d2b e5fc | | Load 0x2,-0x4
0d2c e5fb | | Load 0x2,-0x5
0d2d 800e | | Call 0x0,0xe
0d2e 680d |h | Jump_Zero 0xd3c
0d2f e5fb | | Load 0x2,-0x5
0d30 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
0d32 4802 |H | Short_Literal 0x2
0d33 0092 0f26 | &| Action Push_String_Extended,0xf26 ; "Can't acquire a connection to "
0d35 e5fd | | Load 0x2,-0x3
0d36 01cc | | Execute Vector,Catenate
0d37 e00a | | Load 0x0,0xa
0d38 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0d39 c5fb | | Store 0x2,-0x5
0d3a 00cc | | Action Pop_Block
0d3b 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0d3c 4801 |H | Short_Literal 0x1
0d3d a409 | | Store_Unchecked 0x2,0x9
0d3e e5fb | | Load 0x2,-0x5
0d3f e5fc | | Load 0x2,-0x4
0d40 e408 | | Load 0x2,0x8
0d41 e403 | | Load 0x2,0x3
0d42 e5ff | | Load 0x2,-0x1
0d43 e602 | | Load 0x3,0x2
0d44 821f | | Call 0x1,0x1f
0d45 c5fb | | Store 0x2,-0x5
0d46 e5fc | | Load 0x2,-0x4
0d47 e5fb | | Load 0x2,-0x5
0d48 800e | | Call 0x0,0xe
0d49 6812 |h | Jump_Zero 0xd5c
0d4a e5fb | | Load 0x2,-0x5
0d4b 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
0d4d 4802 |H | Short_Literal 0x2
0d4e 0092 0f8e | | Action Push_String_Extended,0xf8e ; "Can't copy adalib for "
0d50 e602 | | Load 0x3,0x2
0d51 01cc | | Execute Vector,Catenate
0d52 0092 0f8f | | Action Push_String_Extended,0xf8f ; " to "
0d54 01cc | | Execute Vector,Catenate
0d55 e5ff | | Load 0x2,-0x1
0d56 01cc | | Execute Vector,Catenate
0d57 e00a | | Load 0x0,0xa
0d58 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0d59 c5fb | | Store 0x2,-0x5
0d5a 00cc | | Action Pop_Block
0d5b 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0d5c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0d5d 0000 0000 | | .XXX[0x3]
0d5f 0000 | |
0d60 ; --------------------------------------------------------------------------------------
0d60 ; SUBPROGRAM
0d60 ; --------------------------------------------------------------------------------------
0d60 0d6c | l | .CONST 0x0d6c ; Address of begin
0d61 0004 | | .CONST 0x0004 ; Address of exception handler
0d62 0003 | | .CONST 0x0003 ; Number of locals
0d63 INIT_0d60:
0d63 4800 |H | Short_Literal 0x0
0d64 e5ff | | Load 0x2,-0x1
0d65 e01c | | Load 0x0,0x1c
0d66 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d67 e004 | | Load 0x0,0x4
0d68 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d69 02c7 | | Declare_Variable Any
0d6a 00d8 | | Load_Top At_Offset_0
0d6b 1c00 | | Execute_Immediate Run_Utility,0x0
0d6c BODY_0d60:
0d6c 4801 |H | Short_Literal 0x1
0d6d 00da | | Load_Top At_Offset_2
0d6e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0d6f e013 | | Load 0x0,0x13
0d70 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0d71 6805 |h | Jump_Zero 0xd77
0d72 00d9 | | Load_Top At_Offset_1
0d73 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0d74 c5f8 | | Store 0x2,-0x8
0d75 00cc | | Action Pop_Block
0d76 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0d77 00cf | | Action Mark_Auxiliary
0d78 00da | | Load_Top At_Offset_2
0d79 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0d7a 01dc | | Execute Vector,Last
0d7b 4801 |H | Short_Literal 0x1
0d7c 0263 | c | Execute Discrete,Above_Bound
0d7d 7029 |p) | Jump_Nonzero 0xda7
0d7e 00d8 | | Load_Top At_Offset_0
0d7f e602 | | Load 0x3,0x2
0d80 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0d81 01d7 | | Execute Vector,Field_Read
0d82 c603 | | Store 0x3,0x3
0d83 e005 | | Load 0x0,0x5
0d84 6813 |h | Jump_Zero 0xd98
0d85 e006 | | Load 0x0,0x6
0d86 180e | | Execute Package,Field_Execute,Field_Number 0xe
0d87 4802 |H | Short_Literal 0x2
0d88 0092 0f90 | | Action Push_String_Extended,0xf90 ; "#~ Referencer"
0d8a 00db | | Load_Top At_Offset_3
0d8b 00e0 | | Load_Encached Standard_Cache
0d8c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d8d 01cc | | Execute Vector,Catenate
0d8e 0092 0f91 | | Action Push_String_Extended,0xf91 ; ": "
0d90 01cc | | Execute Vector,Catenate
0d91 e603 | | Load 0x3,0x3
0d92 e004 | | Load 0x0,0x4
0d93 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0d94 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0d95 01cc | | Execute Vector,Catenate
0d96 e008 | | Load 0x0,0x8
0d97 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0d98 00db | | Load_Top At_Offset_3
0d99 e402 | | Load 0x2,0x2
0d9a 012f | / | Execute Any,Equal
0d9b 7009 |p | Jump_Nonzero 0xda5
0d9c 4801 |H | Short_Literal 0x1
0d9d e603 | | Load 0x3,0x3
0d9e 8011 | | Call 0x0,0x11
0d9f e403 | | Load 0x2,0x3
0da0 e00f | | Load 0x0,0xf
0da1 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0da2 6802 |h | Jump_Zero 0xda5
0da3 00cc | | Action Pop_Block
0da4 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0da5 00c8 | | Action Pop_Auxiliary_Range
0da6 3fd7 |? | Loop_Increasing 0xd7e
0da7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0da8 ; --------------------------------------------------------------------------------------
0da8 ; SUBPROGRAM
0da8 ; --------------------------------------------------------------------------------------
0da8 0db1 | | .CONST 0x0db1 ; Address of begin
0da9 0004 | | .CONST 0x0004 ; Address of exception handler
0daa 0002 | | .CONST 0x0002 ; Number of locals
0dab INIT_0da8:
0dab e403 | | Load 0x2,0x3
0dac e004 | | Load 0x0,0x4
0dad 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0dae 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0daf e00f | | Load 0x0,0xf
0db0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0db1 BODY_0da8:
0db1 e5fb | | Load 0x2,-0x5
0db2 e5fc | | Load 0x2,-0x4
0db3 e5fd | | Load 0x2,-0x3
0db4 0092 0f37 | 7| Action Push_String_Extended,0xf37 ; "ada unit_manager\x5c("
0db6 e5fe | | Load 0x2,-0x2
0db7 01cc | | Execute Vector,Catenate
0db8 0092 0f92 | | Action Push_String_Extended,0xf92 ; "/adalib,update\x5c).fetch unit="
0dba 01cc | | Execute Vector,Catenate
0dbb e602 | | Load 0x3,0x2
0dbc 01cc | | Execute Vector,Catenate
0dbd 0092 0f93 | | Action Push_String_Extended,0xf93 ; " kind=body set=closure"
0dbf 01cc | | Execute Vector,Catenate
0dc0 00ea | | Load_Encached Null_String_Cache
0dc1 8216 | | Call 0x1,0x16
0dc2 01cc | | Execute Vector,Catenate
0dc3 8014 | | Call 0x0,0x14
0dc4 c5fb | | Store 0x2,-0x5
0dc5 e5fc | | Load 0x2,-0x4
0dc6 e5fb | | Load 0x2,-0x5
0dc7 800e | | Call 0x0,0xe
0dc8 680b |h | Jump_Zero 0xdd4
0dc9 e5fb | | Load 0x2,-0x5
0dca 0092 0f13 | | Action Push_String_Extended,0xf13 ; "Library_Extensions Error"
0dcc 4802 |H | Short_Literal 0x2
0dcd 0092 0f94 | | Action Push_String_Extended,0xf94 ; "Can't fetch the closure for exported unit "
0dcf e602 | | Load 0x3,0x2
0dd0 01cc | | Execute Vector,Catenate
0dd1 e00a | | Load 0x0,0xa
0dd2 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0dd3 c5fb | | Store 0x2,-0x5
0dd4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0dd5 0000 0000 | | .XXX[0x3]
0dd7 0000 | |
0dd8 ; --------------------------------------------------------------------------------------
0dd8 ; SUBPROGRAM
0dd8 ; --------------------------------------------------------------------------------------
0dd8 0ddb | | .CONST 0x0ddb ; Address of begin
0dd9 0e03 | | .CONST 0x0e03 ; Address of exception handler
0dda 0001 | | .CONST 0x0001 ; Number of locals
0ddb BODY_0dd8:
0ddb INIT_0dd8:
0ddb 00da | | Load_Top At_Offset_2
0ddc e001 | | Load 0x0,0x1
0ddd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0dde 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0ddf c7ff | | Store 0x3,-0x1
0de0 e005 | | Load 0x0,0x5
0de1 6820 |h | Jump_Zero 0xe02
0de2 00da | | Load_Top At_Offset_2
0de3 4800 |H | Short_Literal 0x0
0de4 e5fe | | Load 0x2,-0x2
0de5 e001 | | Load 0x0,0x1
0de6 180e | | Execute Package,Field_Execute,Field_Number 0xe
0de7 e001 | | Load 0x0,0x1
0de8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0de9 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0dea c7ff | | Store 0x3,-0x1
0deb e006 | | Load 0x0,0x6
0dec 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ded 4802 |H | Short_Literal 0x2
0dee 0092 0f83 | | Action Push_String_Extended,0xf83 ; "#~Link table "
0df0 e5fe | | Load 0x2,-0x2
0df1 e001 | | Load 0x0,0x1
0df2 180e | | Execute Package,Field_Execute,Field_Number 0xe
0df3 01cc | | Execute Vector,Catenate
0df4 0092 0f84 | | Action Push_String_Extended,0xf84 ; " contains:"
0df6 01cc | | Execute Vector,Catenate
0df7 e008 | | Load 0x0,0x8
0df8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0df9 00da | | Load_Top At_Offset_2
0dfa e001 | | Load 0x0,0x1
0dfb 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0dfc 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0dfd 00da | | Load_Top At_Offset_2
0dfe e001 | | Load 0x0,0x1
0dff 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e00 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0e01 c7ff | | Store 0x3,-0x1
0e02 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0e03 TRAP_0dd8:
0e03 0007 | | Action Break_Optional
0e04 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0e05 0000 0000 | | .XXX[0x3]
0e07 0000 | |
0e08 ; --------------------------------------------------------------------------------------
0e08 ; SUBPROGRAM
0e08 ; --------------------------------------------------------------------------------------
0e08 0e0f | | .CONST 0x0e0f ; Address of begin
0e09 0004 | | .CONST 0x0004 ; Address of exception handler
0e0a 0002 | | .CONST 0x0002 ; Number of locals
0e0b INIT_0e08:
0e0b e408 | | Load 0x2,0x8
0e0c e004 | | Load 0x0,0x4
0e0d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0e0e 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0e0f BODY_0e08:
0e0f 00d8 | | Load_Top At_Offset_0
0e10 01db | | Execute Vector,Length
0e11 0c30 | 0 | Execute_Immediate Greater_Equal,0x30
0e12 6833 |h3 | Jump_Zero 0xe46
0e13 4801 |H | Short_Literal 0x1
0e14 e214 | | Load 0x1,0x14
0e15 00da | | Load_Top At_Offset_2
0e16 01dd | | Execute Vector,First
0e17 00db | | Load_Top At_Offset_3
0e18 01dd | | Execute Vector,First
0e19 0a2e | . | Execute_Immediate Plus,0x2e
0e1a 00d8 | | Load_Top At_Offset_0
0e1b 00e2 | | Load_Encached Integer_Cache
0e1c 0260 | ` | Execute Discrete,In_Type
0e1d 7001 |p | Jump_Nonzero 0xe1f
0e1e 0801 | | Execute_Immediate Raise,0x1
0e1f e802 | | Load 0x4,0x2
0e20 01cf | | Execute Vector,Slice_Read
0e21 e00f | | Load 0x0,0xf
0e22 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0e23 6822 |h" | Jump_Zero 0xe46
0e24 e006 | | Load 0x0,0x6
0e25 180e | | Execute Package,Field_Execute,Field_Number 0xe
0e26 e214 | | Load 0x1,0x14
0e27 e00c | | Load 0x0,0xc
0e28 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e29 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0e2a c409 | | Store 0x2,0x9
0e2b e212 | | Load 0x1,0x12
0e2c e408 | | Load 0x2,0x8
0e2d 8410 | | Call 0x2,0x10
0e2e e5fb | | Load 0x2,-0x5
0e2f e5fa | | Load 0x2,-0x6
0e30 800e | | Call 0x0,0xe
0e31 6813 |h | Jump_Zero 0xe45
0e32 e006 | | Load 0x0,0x6
0e33 180e | | Execute Package,Field_Execute,Field_Number 0xe
0e34 4806 |H | Short_Literal 0x6
0e35 0092 0f85 | | Action Push_String_Extended,0xf85 ; "Can't import the prerequisite unit "
0e37 e408 | | Load 0x2,0x8
0e38 e004 | | Load 0x0,0x4
0e39 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0e3a 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0e3b 01cc | | Execute Vector,Catenate
0e3c 0092 0f95 | | Action Push_String_Extended,0xf95 ; " from the CIFO library"
0e3e 01cc | | Execute Vector,Catenate
0e3f e008 | | Load 0x0,0x8
0e40 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e41 e5fa | | Load 0x2,-0x6
0e42 e013 | | Load 0x0,0x13
0e43 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e44 c5fa | | Store 0x2,-0x6
0e45 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0e46 00d8 | | Load_Top At_Offset_0
0e47 01db | | Execute Vector,Length
0e48 0c31 | 1 | Execute_Immediate Greater_Equal,0x31
0e49 6833 |h3 | Jump_Zero 0xe7d
0e4a 4801 |H | Short_Literal 0x1
0e4b e215 | | Load 0x1,0x15
0e4c 00da | | Load_Top At_Offset_2
0e4d 01dd | | Execute Vector,First
0e4e 00db | | Load_Top At_Offset_3
0e4f 01dd | | Execute Vector,First
0e50 0a2f | / | Execute_Immediate Plus,0x2f
0e51 00d8 | | Load_Top At_Offset_0
0e52 00e2 | | Load_Encached Integer_Cache
0e53 0260 | ` | Execute Discrete,In_Type
0e54 7001 |p | Jump_Nonzero 0xe56
0e55 0801 | | Execute_Immediate Raise,0x1
0e56 e802 | | Load 0x4,0x2
0e57 01cf | | Execute Vector,Slice_Read
0e58 e00f | | Load 0x0,0xf
0e59 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0e5a 6822 |h" | Jump_Zero 0xe7d
0e5b e006 | | Load 0x0,0x6
0e5c 180e | | Execute Package,Field_Execute,Field_Number 0xe
0e5d e215 | | Load 0x1,0x15
0e5e e00c | | Load 0x0,0xc
0e5f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e60 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0e61 c409 | | Store 0x2,0x9
0e62 e213 | | Load 0x1,0x13
0e63 e408 | | Load 0x2,0x8
0e64 8410 | | Call 0x2,0x10
0e65 e5fb | | Load 0x2,-0x5
0e66 e5fa | | Load 0x2,-0x6
0e67 800e | | Call 0x0,0xe
0e68 6813 |h | Jump_Zero 0xe7c
0e69 e006 | | Load 0x0,0x6
0e6a 180e | | Execute Package,Field_Execute,Field_Number 0xe
0e6b 4806 |H | Short_Literal 0x6
0e6c 0092 0f85 | | Action Push_String_Extended,0xf85 ; "Can't import the prerequisite unit "
0e6e e408 | | Load 0x2,0x8
0e6f e004 | | Load 0x0,0x4
0e70 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0e71 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0e72 01cc | | Execute Vector,Catenate
0e73 0092 0f96 | | Action Push_String_Extended,0xf96 ; " from the POSIX library"
0e75 01cc | | Execute Vector,Catenate
0e76 e008 | | Load 0x0,0x8
0e77 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e78 e5fa | | Load 0x2,-0x6
0e79 e013 | | Load 0x0,0x13
0e7a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e7b c5fa | | Store 0x2,-0x6
0e7c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0e7d e005 | | Load 0x0,0x5
0e7e 6809 |h | Jump_Zero 0xe88
0e7f e006 | | Load 0x0,0x6
0e80 180e | | Execute Package,Field_Execute,Field_Number 0xe
0e81 4802 |H | Short_Literal 0x2
0e82 0092 0f97 | | Action Push_String_Extended,0xf97 ; "#~Skipping predefined unit "
0e84 00db | | Load_Top At_Offset_3
0e85 01cc | | Execute Vector,Catenate
0e86 e008 | | Load 0x0,0x8
0e87 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e88 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0e89 0000 0000 | | .BLANK 0000[0x7]
0e90 ; --------------------------------------------------------------------------------------
0e90 ; SUBPROGRAM
0e90 ; --------------------------------------------------------------------------------------
0e90 0e97 | | .CONST 0x0e97 ; Address of begin
0e91 0004 | | .CONST 0x0004 ; Address of exception handler
0e92 0002 | | .CONST 0x0002 ; Number of locals
0e93 INIT_0e90:
0e93 e403 | | Load 0x2,0x3
0e94 e004 | | Load 0x0,0x4
0e95 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0e96 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0e97 BODY_0e90:
0e97 00d8 | | Load_Top At_Offset_0
0e98 01db | | Execute Vector,Length
0e99 0c30 | 0 | Execute_Immediate Greater_Equal,0x30
0e9a 6830 |h0 | Jump_Zero 0xecb
0e9b 4801 |H | Short_Literal 0x1
0e9c e214 | | Load 0x1,0x14
0e9d 00da | | Load_Top At_Offset_2
0e9e 01dd | | Execute Vector,First
0e9f 00db | | Load_Top At_Offset_3
0ea0 01dd | | Execute Vector,First
0ea1 0a2e | . | Execute_Immediate Plus,0x2e
0ea2 00d8 | | Load_Top At_Offset_0
0ea3 00e2 | | Load_Encached Integer_Cache
0ea4 0260 | ` | Execute Discrete,In_Type
0ea5 7001 |p | Jump_Nonzero 0xea7
0ea6 0801 | | Execute_Immediate Raise,0x1
0ea7 e802 | | Load 0x4,0x2
0ea8 01cf | | Execute Vector,Slice_Read
0ea9 e00f | | Load 0x0,0xf
0eaa 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0eab 681f |h | Jump_Zero 0xecb
0eac e5fa | | Load 0x2,-0x6
0ead e5fb | | Load 0x2,-0x5
0eae e5fc | | Load 0x2,-0x4
0eaf e212 | | Load 0x1,0x12
0eb0 e5fd | | Load 0x2,-0x3
0eb1 e402 | | Load 0x2,0x2
0eb2 e5fe | | Load 0x2,-0x2
0eb3 e403 | | Load 0x2,0x3
0eb4 8220 | | Call 0x1,0x20
0eb5 c5fa | | Store 0x2,-0x6
0eb6 e5fb | | Load 0x2,-0x5
0eb7 e5fa | | Load 0x2,-0x6
0eb8 800e | | Call 0x0,0xe
0eb9 6810 |h | Jump_Zero 0xeca
0eba e006 | | Load 0x0,0x6
0ebb 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ebc 4806 |H | Short_Literal 0x6
0ebd 0092 0f85 | | Action Push_String_Extended,0xf85 ; "Can't import the prerequisite unit "
0ebf e403 | | Load 0x2,0x3
0ec0 e004 | | Load 0x0,0x4
0ec1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0ec2 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0ec3 01cc | | Execute Vector,Catenate
0ec4 e008 | | Load 0x0,0x8
0ec5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ec6 e5fa | | Load 0x2,-0x6
0ec7 e013 | | Load 0x0,0x13
0ec8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0ec9 c5fa | | Store 0x2,-0x6
0eca 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ecb 00d8 | | Load_Top At_Offset_0
0ecc 01db | | Execute Vector,Length
0ecd 0c31 | 1 | Execute_Immediate Greater_Equal,0x31
0ece 6830 |h0 | Jump_Zero 0xeff
0ecf 4801 |H | Short_Literal 0x1
0ed0 e215 | | Load 0x1,0x15
0ed1 00da | | Load_Top At_Offset_2
0ed2 01dd | | Execute Vector,First
0ed3 00db | | Load_Top At_Offset_3
0ed4 01dd | | Execute Vector,First
0ed5 0a2f | / | Execute_Immediate Plus,0x2f
0ed6 00d8 | | Load_Top At_Offset_0
0ed7 00e2 | | Load_Encached Integer_Cache
0ed8 0260 | ` | Execute Discrete,In_Type
0ed9 7001 |p | Jump_Nonzero 0xedb
0eda 0801 | | Execute_Immediate Raise,0x1
0edb e802 | | Load 0x4,0x2
0edc 01cf | | Execute Vector,Slice_Read
0edd e00f | | Load 0x0,0xf
0ede 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0edf 681f |h | Jump_Zero 0xeff
0ee0 e5fa | | Load 0x2,-0x6
0ee1 e5fb | | Load 0x2,-0x5
0ee2 e5fc | | Load 0x2,-0x4
0ee3 e213 | | Load 0x1,0x13
0ee4 e5fd | | Load 0x2,-0x3
0ee5 e402 | | Load 0x2,0x2
0ee6 e5fe | | Load 0x2,-0x2
0ee7 e403 | | Load 0x2,0x3
0ee8 8220 | | Call 0x1,0x20
0ee9 c5fa | | Store 0x2,-0x6
0eea e5fb | | Load 0x2,-0x5
0eeb e5fa | | Load 0x2,-0x6
0eec 800e | | Call 0x0,0xe
0eed 6810 |h | Jump_Zero 0xefe
0eee e006 | | Load 0x0,0x6
0eef 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ef0 4806 |H | Short_Literal 0x6
0ef1 0092 0f85 | | Action Push_String_Extended,0xf85 ; "Can't import the prerequisite unit "
0ef3 e403 | | Load 0x2,0x3
0ef4 e004 | | Load 0x0,0x4
0ef5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0ef6 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0ef7 01cc | | Execute Vector,Catenate
0ef8 e008 | | Load 0x0,0x8
0ef9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0efa e5fa | | Load 0x2,-0x6
0efb e013 | | Load 0x0,0x13
0efc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0efd c5fa | | Store 0x2,-0x6
0efe 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0eff e005 | | Load 0x0,0x5
0f00 6809 |h | Jump_Zero 0xf0a
0f01 e006 | | Load 0x0,0x6
0f02 180e | | Execute Package,Field_Execute,Field_Number 0xe
0f03 4802 |H | Short_Literal 0x2
0f04 0092 0f97 | | Action Push_String_Extended,0xf97 ; "#~Skipping predefined unit "
0f06 00db | | Load_Top At_Offset_3
0f07 01cc | | Execute Vector,Catenate
0f08 e008 | | Load 0x0,0x8
0f09 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f0a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0f0b ; --------------------------------------------------------------------------------------
0f0b ; STRING TABLE
0f0b ; --------------------------------------------------------------------------------------
0f0b 011c | | .STRTAB 0x011c->0x0f99 ; "/usr/lib/alsycomp/cifo"
0f0c 0130 | 0 | .STRTAB 0x0130->0x0fa4 ; "/usr/lib/alsycomp/posix"
0f0d 0145 | E | .STRTAB 0x0145->0x0faf ; "!TARGETS.I386_UNIX_ALS_XT.TARGET_INTERFACE.CIFO"
0f0e 0172 | r | .STRTAB 0x0172->0x0fc7 ; "!TARGETS.I386_UNIX_ALS_XT.TARGET_INTERFACE.POSIX"
0f0f 01a0 | | .STRTAB 0x01a0->0x0fdf ; "#~Batch_Import_Units (How_Many =>"
0f10 01bf | | .STRTAB 0x01bf->0x0fef ; ", Into_View"
0f11 01c8 | | .STRTAB 0x01c8->0x0ff5 ; ", Remote_Directory"
0f12 01d8 | | .STRTAB 0x01d8->0x0ffe ; ")"
0f13 01d7 | | .STRTAB 0x01d7->0x0ffe ; "Library_Extensions Error"
0f14 01ed | | .STRTAB 0x01ed->0x100a ; "Can't derive a family name from the remote pathname "
0f15 021f | | .STRTAB 0x021f->0x1024 ; "quit"
0f16 0221 | ! | .STRTAB 0x0221->0x1026 ; "Batch_Import_Units"
0f17 0231 | 1 | .STRTAB 0x0231->0x102f ; "#~Import_Units (How_Many =>"
0f18 024a | J | .STRTAB 0x024a->0x103d ; "Import_Units"
0f19 0254 | T | .STRTAB 0x0254->0x1043 ; "#~Perform_Remote_Import (Host_View"
0f1a 0274 | t | .STRTAB 0x0274->0x1054 ; ", Remote_Machine"
0f1b 0282 | | .STRTAB 0x0282->0x105c ; "Can't get remote directory name for view "
0f1c 02a9 | | .STRTAB 0x02a9->0x1070 ; "Executing Perform_Remote_Import"
0f1d 02c6 | | .STRTAB 0x02c6->0x1080 ; "Can't get imported view from iterator. Error Status = "
0f1e 02fb | | .STRTAB 0x02fb->0x109b ; "Perform_Remote_Import"
0f1f 030e | | .STRTAB 0x030e->0x10a6 ; "/imports"
0f20 0314 | | .STRTAB 0x0314->0x10aa ; "/"
0f21 0313 | | .STRTAB 0x0313->0x10aa ; "#~Remove_Remote_Import (View_To_Remove"
0f22 0337 | 7 | .STRTAB 0x0337->0x10bd ; ", From_View"
0f23 0340 | @ | .STRTAB 0x0340->0x10c3 ; ", Destroying_Library => "
0f24 0356 | V | .STRTAB 0x0356->0x10cf ; "Executing Remove_Remote_Import"
0f25 0372 | r | .STRTAB 0x0372->0x10de ; "I386_Unix_Als_Xt"
0f26 0380 | | .STRTAB 0x0380->0x10e6 ; "Can't acquire a connection to "
0f27 039c | | .STRTAB 0x039c->0x10f5 ; "Can't remove the imported units"
0f28 03b9 | | .STRTAB 0x03b9->0x1104 ; "Removing imported library, which was copied from another family"
0f29 03f6 | | .STRTAB 0x03f6->0x1124 ; "Erasing copied remote library "
0f2a 0412 | | .STRTAB 0x0412->0x1133 ; "ada lib_manager\x5c("
0f2b 0421 | ! | .STRTAB 0x0421->0x113b ; "\x5c).erase libraries="
0f2c 0432 | 2 | .STRTAB 0x0432->0x1145 ; " confirm=no"
0f2d 043b | ; | .STRTAB 0x043b->0x114a ; "Can't remove copied library "
0f2e 0455 | U | .STRTAB 0x0455->0x1158 ; ". "
0f2f 0456 | V | .STRTAB 0x0456->0x115a ; " isn't remotely imported into "
0f30 0472 | r | .STRTAB 0x0472->0x1169 ; ", so it can't be removed as an import"
0f31 0495 | | .STRTAB 0x0495->0x117b ; "Remove_Remote_Import"
0f32 04a7 | | .STRTAB 0x04a7->0x1185 ; "list"
0f33 04a9 | | .STRTAB 0x04a9->0x1187 ; " detail=brief"
0f34 04b4 | | .STRTAB 0x04b4->0x118e ; " detail=full"
0f35 04be | | .STRTAB 0x04be->0x1194 ; "#~Batch file <= \x22"
0f36 04cd | | .STRTAB 0x04cd->0x119c ; "\x22"
0f37 04cc | | .STRTAB 0x04cc->0x119d ; "ada unit_manager\x5c("
0f38 04dc | | .STRTAB 0x04dc->0x11a6 ; "/adalib,read\x5c).list units=* link=yes"
0f39 04fe | | .STRTAB 0x04fe->0x11b8 ; "Can't list the units"
0f3a 0510 | | .STRTAB 0x0510->0x11c2 ; "Can't get default context for "
0f3b 052c | , | .STRTAB 0x052c->0x11d1 ; ". Error Status = "
0f3c 053d | = | .STRTAB 0x053d->0x11da ; "Can't set default context to "
0f3d 0558 | X | .STRTAB 0x0558->0x11e9 ; "Can't restore default context. Error Status = "
0f3e 0585 | | .STRTAB 0x0585->0x1200 ; "#~"
0f3f 0585 | | .STRTAB 0x0585->0x1201 ; "_"
0f40 0584 | | .STRTAB 0x0584->0x1202 ; ".State.Exports"
0f41 0590 | | .STRTAB 0x0590->0x1209 ; "test -d "
0f42 0596 | | .STRTAB 0x0596->0x120d ; "#~The remote directory "
0f43 05ab | | .STRTAB 0x05ab->0x1218 ; " does not exist"
0f44 05b8 | | .STRTAB 0x05b8->0x1220 ; " exists"
0f45 05bd | | .STRTAB 0x05bd->0x1223 ; "/adalib/export.set"
0f46 05cd | | .STRTAB 0x05cd->0x122c ; "/imports/"
0f47 05d4 | | .STRTAB 0x05d4->0x1231 ; "#~Copy_Adalib (Imported_View"
0f48 05ee | | .STRTAB 0x05ee->0x123f ; ", Host_View"
0f49 05f7 | | .STRTAB 0x05f7->0x1244 ; ", Into_Remote_Dir"
0f4a 0606 | | .STRTAB 0x0606->0x124d ; "Can't get remote directory name for imported view "
0f4b 0636 | 6 | .STRTAB 0x0636->0x1266 ; "Executing Copy_Adalib"
0f4c 0649 | I | .STRTAB 0x0649->0x1270 ; "#~The units in "
0f4d 0656 | V | .STRTAB 0x0656->0x1278 ; " have already been copied into "
0f4e 0673 | s | .STRTAB 0x0673->0x1287 ; "Can't fetch the link's exports"
0f4f 068f | | .STRTAB 0x068f->0x1296 ; "Creating export set for remote library "
0f50 06b4 | | .STRTAB 0x06b4->0x12aa ; "\x5c).copy from="
0f51 06bf | | .STRTAB 0x06bf->0x12b0 ; "/adalib to="
0f52 06c8 | | .STRTAB 0x06c8->0x12b6 ; " mode=export"
0f53 06d2 | | .STRTAB 0x06d2->0x12bc ; "Can't create the export set for "
0f54 06f0 | | .STRTAB 0x06f0->0x12cc ; "Copying export set "
0f55 0701 | | .STRTAB 0x0701->0x12d5 ; " into remote library "
0f56 0714 | | .STRTAB 0x0714->0x12e0 ; " to="
0f57 0716 | | .STRTAB 0x0716->0x12e2 ; " mode=import"
0f58 0720 | | .STRTAB 0x0720->0x12e8 ; "Can't copy the export set for "
0f59 073c | < | .STRTAB 0x073c->0x12f7 ; "/adalib"
0f5a 0741 | A | .STRTAB 0x0741->0x12fa ; "#~Import_Predefined_Unit (Imported_Unit"
0f5b 0766 | f | .STRTAB 0x0766->0x130e ; ", Remote_Predef"
0f5c 0773 | s | .STRTAB 0x0773->0x1315 ; "#~Reusing predefined link unit "
0f5d 0790 | | .STRTAB 0x0790->0x1325 ; " in view "
0f5e 0797 | | .STRTAB 0x0797->0x1329 ; "Acquiring link to "
0f5f 07a7 | | .STRTAB 0x07a7->0x1332 ; " from "
0f60 07ab | | .STRTAB 0x07ab->0x1335 ; ",update\x5c).acquire units="
0f61 07c1 | | .STRTAB 0x07c1->0x1341 ; " from="
0f62 07c5 | | .STRTAB 0x07c5->0x1344 ; "Can't acquire the predefined link. "
0f63 07e7 | | .STRTAB 0x07e7->0x1356 ; "#~Import_A_Unit (Imported_Unit"
0f64 0803 | | .STRTAB 0x0803->0x1365 ; "Can't acquire link to "
0f65 0817 | | .STRTAB 0x0817->0x1370 ; "A link to "
0f66 081f | | .STRTAB 0x081f->0x1375 ; " already exists, but it came from view "
0f67 0844 | D | .STRTAB 0x0844->0x1389 ; ", acquired on "
0f68 0850 | P | .STRTAB 0x0850->0x1390 ; "Imported unit "
0f69 085c | \ | .STRTAB 0x085c->0x1397 ; " was recompiled or changed, so we must reacquire it"
0f6a 088d | | .STRTAB 0x088d->0x13b0 ; "#~Reusing link unit "
0f6b 089f | | .STRTAB 0x089f->0x13ba ; " overwrite=yes"
0f6c 08ab | | .STRTAB 0x08ab->0x13c1 ; "Can't acquire the link "
0f6d 08c0 | | .STRTAB 0x08c0->0x13cd ; " because remote import directory "
0f6e 08df | | .STRTAB 0x08df->0x13dd ; " doesn't exist"
0f6f 08eb | | .STRTAB 0x08eb->0x13e4 ; " kind=all by=copy overwrite=yes"
0f70 0908 | | .STRTAB 0x0908->0x13f4 ; "Can't acquire the prerequisite link. "
0f71 092c | , | .STRTAB 0x092c->0x1407 ; "Erasing link to "
0f72 093a | : | .STRTAB 0x093a->0x140f ; " from remote library "
0f73 094d | M | .STRTAB 0x094d->0x1419 ; "/adalib,update\x5c).erase units="
0f74 0968 | h | .STRTAB 0x0968->0x1428 ; " confirm=no kind=spec"
0f75 097b | { | .STRTAB 0x097b->0x1432 ; "Can't remove the remote link. "
0f76 0998 | | .STRTAB 0x0998->0x1442 ; "Remove_Imported_Units"
0f77 09ab | | .STRTAB 0x09ab->0x144c ; "unit_manager "
0f78 09b6 | | .STRTAB 0x09b6->0x1453 ; "/adalib update"
0f79 09c2 | | .STRTAB 0x09c2->0x145a ; "default.acquire kind=all"
0f7a 09d8 | | .STRTAB 0x09d8->0x1466 ; "default.acquire by=copy"
0f7b 09ed | | .STRTAB 0x09ed->0x1471 ; "default.acquire overwrite=yes"
0f7c 0a08 | | .STRTAB 0x0a08->0x1480 ; "default.acquire"
0f7d 0a15 | | .STRTAB 0x0a15->0x1487 ; "#~Batch_Import_Predefined_Unit (Imported_Unit"
0f7e 0a40 | @ | .STRTAB 0x0a40->0x149e ; "default.acquire from="
0f7f 0a53 | S | .STRTAB 0x0a53->0x14a8 ; "acquire units="
0f80 0a5f | _ | .STRTAB 0x0a5f->0x14af ; "#~Batch_Import_A_Unit (Imported_Unit"
0f81 0a81 | | .STRTAB 0x0a81->0x14c1 ; " was recompiled or changed, "
0f82 0a9b | | .STRTAB 0x0a9b->0x14cf ; "so we must reacquire it"
0f83 0ab0 | | .STRTAB 0x0ab0->0x14db ; "#~Link table "
0f84 0abb | | .STRTAB 0x0abb->0x14e1 ; " contains:"
0f85 0ac3 | | .STRTAB 0x0ac3->0x14e6 ; "Can't import the prerequisite unit "
0f86 0ae4 | | .STRTAB 0x0ae4->0x14f8 ; " caught in Import_Units"
0f87 0af9 | | .STRTAB 0x0af9->0x1503 ; "Imported view "
0f88 0b05 | | .STRTAB 0x0b05->0x150a ; " has no remote family name. Same family assumed"
0f89 0b33 | 3 | .STRTAB 0x0b33->0x1522 ; "#~Skipping view "
0f8a 0b41 | A | .STRTAB 0x0b41->0x152a ; " in importer's family"
0f8b 0b54 | T | .STRTAB 0x0b54->0x1535 ; "Can only import view \x22"
0f8c 0b68 | h | .STRTAB 0x0b68->0x1540 ; "\x22 from another family "
0f8d 0b7c | | | .STRTAB 0x0b7c->0x154b ; "if it is a release view"
0f8e 0b91 | | .STRTAB 0x0b91->0x1556 ; "Can't copy adalib for "
0f8f 0ba5 | | .STRTAB 0x0ba5->0x1561 ; " to "
0f90 0ba7 | | .STRTAB 0x0ba7->0x1563 ; "#~ Referencer"
0f91 0bb3 | | .STRTAB 0x0bb3->0x156a ; ": "
0f92 0bb3 | | .STRTAB 0x0bb3->0x156b ; "/adalib,update\x5c).fetch unit="
0f93 0bcd | | .STRTAB 0x0bcd->0x1579 ; " kind=body set=closure"
0f94 0be1 | | .STRTAB 0x0be1->0x1584 ; "Can't fetch the closure for exported unit "
0f95 0c09 | | .STRTAB 0x0c09->0x1599 ; " from the CIFO library"
0f96 0c1d | | .STRTAB 0x0c1d->0x15a4 ; " from the POSIX library"
0f97 0c32 | 2 | .STRTAB 0x0c32->0x15b0 ; "#~Skipping predefined unit "
0f98 0c4b | K | .STREND 0x0c4b->0x15bd
0f99 2f75 7372 |/usr| .STRTAB_STRINGS
15be 0000 0000 | | .XXX[0x2]
15c0 ; --------------------------------------------------------------------------------------
15c0 ; Debug Table
15c0 ; --------------------------------------------------------------------------------------
15c0 0004 0003 | | .DEBUG4 0x0004,0x0003,0xb90c,0x0000,0x0001,0x0020
15c6 000b 1646 | F| .DBG4T 0x000b,0x1646,0x0000,0x0000
15ca 0014 164c | L| .DBG4T 0x0014,0x164c,0x0000,0x0000
15ce 004b 1664 | K d| .DBG4T 0x004b,0x1664,0x0001,0x0000
15d2 00f3 1684 | | .DBG4T 0x00f3,0x1684,0x0001,0x0000
15d6 014b 1691 | K | .DBG4T 0x014b,0x1691,0x0001,0x4000
15da 01f3 16bf | | .DBG4T 0x01f3,0x16bf,0x0001,0x0000
15de 031b 16ec | | .DBG4T 0x031b,0x16ec,0x0002,0x0000
15e2 0333 16f3 | 3 | .DBG4T 0x0333,0x16f3,0x0001,0x0000
15e6 034b 16f8 | K | .DBG4T 0x034b,0x16f8,0x0002,0x0000
15ea 036b 1700 | k | .DBG4T 0x036b,0x1700,0x0001,0x0000
15ee 0393 1706 | | .DBG4T 0x0393,0x1706,0x0001,0x0000
15f2 03fb 1713 | | .DBG4T 0x03fb,0x1713,0x0001,0x0000
15f6 041b 1719 | | .DBG4T 0x041b,0x1719,0x0002,0x0000
15fa 048b 1729 | )| .DBG4T 0x048b,0x1729,0x0001,0x4000
15fe 04c3 1738 | 8| .DBG4T 0x04c3,0x1738,0x0002,0x0000
1602 0513 1746 | F| .DBG4T 0x0513,0x1746,0x0001,0x0000
1606 0683 177b | {| .DBG4T 0x0683,0x177b,0x0001,0x0000
160a 075b 1794 | [ | .DBG4T 0x075b,0x1794,0x0001,0x0000
160e 0963 17d9 | c | .DBG4T 0x0963,0x17d9,0x0001,0x4000
1612 0a13 1803 | | .DBG4T 0x0a13,0x1803,0x0001,0x0000
1616 0a4b 1813 | K | .DBG4T 0x0a4b,0x1813,0x0001,0x0000
161a 0abb 1826 | &| .DBG4T 0x0abb,0x1826,0x0001,0x0000
161e 0bf3 185b | [| .DBG4T 0x0bf3,0x185b,0x0001,0x0000
1622 0c23 1864 | # d| .DBG4T 0x0c23,0x1864,0x0004,0x0000
1626 0c63 186f | c o| .DBG4T 0x0c63,0x186f,0x0001,0x0000
162a 0c93 1878 | x| .DBG4T 0x0c93,0x1878,0x0004,0x0000
162e 0cd3 1882 | | .DBG4T 0x0cd3,0x1882,0x0004,0x0000
1632 0d63 1897 | c | .DBG4T 0x0d63,0x1897,0x0004,0x0000
1636 0dab 18a4 | | .DBG4T 0x0dab,0x18a4,0x0004,0x0000
163a 0ddb 18aa | | .DBG4T 0x0ddb,0x18aa,0x0001,0x0000
163e 0e0b 18b3 | | .DBG4T 0x0e0b,0x18b3,0x0004,0x0000
1642 0e93 18c4 | | .DBG4T 0x0e93,0x18c4,0x0004,0x0000
1646 ; --------------------------------------------------------------------------------------
1646 ; Debug chain
1646 ; --------------------------------------------------------------------------------------
1646 0004 0000 | | .DBGLEN 0x0004,0x0000
1648 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011
164c ; --------------------------------------------------------------------------------------
164c ; Debug chain
164c ; --------------------------------------------------------------------------------------
164c 0016 0000 | | .DBGLEN 0x0016,0x0000
164e 0014 0016 | | .DBGLNO 0x0014,0x0016,0x0018,0x001a,0x001c,0x001e,0x0020,0x0022,0x0024,0x0026,0x0028,0x002a,0x002c,0x002e,0x0030,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e
1664 ; --------------------------------------------------------------------------------------
1664 ; Debug chain
1664 ; --------------------------------------------------------------------------------------
1664 0011 000d | | .DBGLEN 0x0011,0x000d
1666 004b 0051 | K Q| .DBGLNO 0x004b,0x0051,0x0056,0x0059,0x005a,0x005c,0x005e,0x0063,0x0068,0x006e,0x0073,0x0078,0x007e,0x0084,0x0086,0x0088,0x008a,0x008f,0x0093,0x00b1,0x00b4,0x00c0,0x00c1,0x00cb,0x00d1,0x00d5,0x00d7,0x00db,0x00e0,0x00e3
1684 ; --------------------------------------------------------------------------------------
1684 ; Debug chain
1684 ; --------------------------------------------------------------------------------------
1684 0003 0008 | | .DBGLEN 0x0003,0x0008
1686 00f3 00f9 | | .DBGLNO 0x00f3,0x00f9,0x00fe,0x0103,0x0107,0x0125,0x012f,0x0135,0x0139,0x013e,0x0141
1691 ; --------------------------------------------------------------------------------------
1691 ; Debug chain
1691 ; --------------------------------------------------------------------------------------
1691 0008 0012 | | .DBGLEN 0x0008,0x0012
1693 014b 0150 | K P| .DBGLNO 0x014b,0x0150,0x0157,0x015f,0x0165,0x016a,0x016c,0x0171,0x0175,0x0179,0x018c,0x0191,0x019c,0x019d,0x01a0,0x01ac,0x01ad,0x01b2,0x01b3,0x01bc,0x01cb,0x01cd,0x01db,0x01dc,0x01e2,0x01e9
16ad 0001 0002 | | .XXX[0x12]
16af 0003 0004 | |
16b1 0005 0006 | |
16b3 0007 0008 | |
16b5 0009 000a | |
16b7 000b 000d | |
16b9 000e 000f | |
16bb 0010 0011 | |
16bd 000c 0012 | |
16bf ; --------------------------------------------------------------------------------------
16bf ; Debug chain
16bf ; --------------------------------------------------------------------------------------
16bf 0009 0022 | "| .DBGLEN 0x0009,0x0022
16c1 01f3 01fd | | .DBGLNO 0x01f3,0x01fd,0x0200,0x0204,0x020d,0x0212,0x0219,0x021a,0x021f,0x0222,0x0226,0x024d,0x0250,0x025c,0x025d,0x0264,0x0266,0x027e,0x0282,0x028d,0x028e,0x0295,0x029d,0x02a1,0x02aa,0x02ab,0x02ad,0x02ae,0x02b6,0x02bb,0x02bc,0x02be,0x02c0,0x02c1,0x02c2,0x02c9,0x02d3,0x02e4,0x02e8,0x02f9,0x02fa,0x0301,0x0311
16ec ; --------------------------------------------------------------------------------------
16ec ; Debug chain
16ec ; --------------------------------------------------------------------------------------
16ec 0000 0005 | | .DBGLEN 0x0000,0x0005
16ee 031b 031d | | .DBGLNO 0x031b,0x031d,0x0322,0x0325,0x0328
16f3 ; --------------------------------------------------------------------------------------
16f3 ; Debug chain
16f3 ; --------------------------------------------------------------------------------------
16f3 0000 0003 | | .DBGLEN 0x0000,0x0003
16f5 0333 0335 | 3 5| .DBGLNO 0x0333,0x0335,0x0341
16f8 ; --------------------------------------------------------------------------------------
16f8 ; Debug chain
16f8 ; --------------------------------------------------------------------------------------
16f8 0002 0004 | | .DBGLEN 0x0002,0x0004
16fa 034b 034c | K L| .DBGLNO 0x034b,0x034c,0x034e,0x035a,0x035c,0x035e
1700 ; --------------------------------------------------------------------------------------
1700 ; Debug chain
1700 ; --------------------------------------------------------------------------------------
1700 0000 0004 | | .DBGLEN 0x0000,0x0004
1702 036b 036f | k o| .DBGLNO 0x036b,0x036f,0x037f,0x0383
1706 ; --------------------------------------------------------------------------------------
1706 ; Debug chain
1706 ; --------------------------------------------------------------------------------------
1706 0002 0009 | | .DBGLEN 0x0002,0x0009
1708 0393 0395 | | .DBGLNO 0x0393,0x0395,0x039b,0x03af,0x03b1,0x03c8,0x03c9,0x03cf,0x03d8,0x03da,0x03f1
1713 ; --------------------------------------------------------------------------------------
1713 ; Debug chain
1713 ; --------------------------------------------------------------------------------------
1713 0001 0003 | | .DBGLEN 0x0001,0x0003
1715 03fb 03fd | | .DBGLNO 0x03fb,0x03fd,0x0406,0x0408
1719 ; --------------------------------------------------------------------------------------
1719 ; Debug chain
1719 ; --------------------------------------------------------------------------------------
1719 0004 000a | | .DBGLEN 0x0004,0x000a
171b 041b 0421 | !| .DBGLNO 0x041b,0x0421,0x0426,0x042c,0x042f,0x0435,0x043a,0x0445,0x0449,0x0471,0x0473,0x0475,0x0479,0x047b
1729 ; --------------------------------------------------------------------------------------
1729 ; Debug chain
1729 ; --------------------------------------------------------------------------------------
1729 0003 0005 | | .DBGLEN 0x0003,0x0005
172b 048b 0497 | | .DBGLNO 0x048b,0x0497,0x049c,0x04a2,0x04b1,0x04b3,0x04b4,0x04ba
1733 0002 0003 | | .XXX[0x5]
1735 0004 0005 | |
1737 0001 | |
1738 ; --------------------------------------------------------------------------------------
1738 ; Debug chain
1738 ; --------------------------------------------------------------------------------------
1738 0002 000a | | .DBGLEN 0x0002,0x000a
173a 04c3 04c8 | | .DBGLNO 0x04c3,0x04c8,0x04cd,0x04d3,0x04d8,0x04da,0x04e5,0x04e9,0x04f6,0x04f8,0x04fc,0x0509
1746 ; --------------------------------------------------------------------------------------
1746 ; Debug chain
1746 ; --------------------------------------------------------------------------------------
1746 000b 0028 | (| .DBGLEN 0x000b,0x0028
1748 0513 051b | | .DBGLNO 0x0513,0x051b,0x0525,0x052a,0x0532,0x0535,0x053e,0x0543,0x054a,0x054b,0x054c,0x054d,0x0551,0x056a,0x056f,0x057a,0x057b,0x057e,0x058a,0x058b,0x058e,0x059a,0x059b,0x05a2,0x05a7,0x05a9,0x05ad,0x05bf,0x05c0,0x05c8,0x05ca,0x05d3,0x05d8,0x05d9,0x05df,0x05e4,0x05e6,0x05ed,0x05f1,0x05fa,0x05fb,0x0605,0x061e,0x0622,0x0635,0x0636,0x0646,0x065f,0x0663,0x0674,0x0675
177b ; --------------------------------------------------------------------------------------
177b ; Debug chain
177b ; --------------------------------------------------------------------------------------
177b 0007 0010 | | .DBGLEN 0x0007,0x0010
177d 0683 0689 | | .DBGLNO 0x0683,0x0689,0x068d,0x0692,0x0697,0x069c,0x06a2,0x06a8,0x06ac,0x06ce,0x06d1,0x06d4,0x06d8,0x06f1,0x06f6,0x06fa,0x070b,0x070c,0x0722,0x0738,0x073c,0x0748,0x074e
1794 ; --------------------------------------------------------------------------------------
1794 ; Debug chain
1794 ; --------------------------------------------------------------------------------------
1794 0013 0030 | 0| .DBGLEN 0x0013,0x0030
1796 075b 0761 | [ a| .DBGLNO 0x075b,0x0761,0x0765,0x076f,0x0773,0x077c,0x0781,0x0784,0x0789,0x078e,0x0793,0x0798,0x079e,0x07a4,0x07a9,0x07ac,0x07af,0x07b0,0x07b1,0x07b8,0x07bc,0x07d8,0x07dd,0x07e8,0x07e9,0x07ec,0x07f8,0x07f9,0x07fc,0x0808,0x0809,0x080f,0x0812,0x0815,0x0819,0x0832,0x0837,0x083c,0x0845,0x0866,0x0867,0x0869,0x086d,0x0873,0x087f,0x0883,0x0887,0x088b,0x0892,0x0896,0x08a7,0x08a8,0x08ac,0x08bd,0x08be,0x08c0,0x08d6,0x08f0,0x08f5,0x08f7,0x090c,0x090d,0x0923,0x093c,0x0940,0x094c,0x0952
17d9 ; --------------------------------------------------------------------------------------
17d9 ; Debug chain
17d9 ; --------------------------------------------------------------------------------------
17d9 0006 0011 | | .DBGLEN 0x0006,0x0011
17db 0963 0969 | c i| .DBGLNO 0x0963,0x0969,0x096e,0x0973,0x0979,0x097f,0x0982,0x098b,0x098f,0x09a8,0x09ad,0x09ae,0x09c4,0x09db,0x09df,0x09ea,0x09eb,0x09ef,0x09f3,0x09f7,0x0a00,0x0a05,0x0a08
17f2 0001 0002 | | .XXX[0x11]
17f4 0004 0005 | |
17f6 0006 0007 | |
17f8 0008 0009 | |
17fa 000a 000b | |
17fc 000c 000d | |
17fe 000e 000f | |
1800 0010 0011 | |
1802 0012 | |
1803 ; --------------------------------------------------------------------------------------
1803 ; Debug chain
1803 ; --------------------------------------------------------------------------------------
1803 0000 000e | | .DBGLEN 0x0000,0x000e
1805 0a13 0a15 | | .DBGLNO 0x0a13,0x0a15,0x0a1e,0x0a20,0x0a24,0x0a28,0x0a2c,0x0a33,0x0a35,0x0a37,0x0a3a,0x0a3e,0x0a41,0x0a43
1813 ; --------------------------------------------------------------------------------------
1813 ; Debug chain
1813 ; --------------------------------------------------------------------------------------
1813 0002 000f | | .DBGLEN 0x0002,0x000f
1815 0a4b 0a51 | K Q| .DBGLNO 0x0a4b,0x0a51,0x0a55,0x0a57,0x0a6a,0x0a6d,0x0a70,0x0a74,0x0a8d,0x0a92,0x0a94,0x0a9d,0x0a9e,0x0a9f,0x0aa1,0x0aa7,0x0aad
1826 ; --------------------------------------------------------------------------------------
1826 ; Debug chain
1826 ; --------------------------------------------------------------------------------------
1826 000a 0029 | )| .DBGLEN 0x000a,0x0029
1828 0abb 0ac1 | | .DBGLNO 0x0abb,0x0ac1,0x0ac5,0x0acf,0x0ad3,0x0adc,0x0ae1,0x0ae4,0x0ae9,0x0aec,0x0af3,0x0af5,0x0b02,0x0b07,0x0b12,0x0b13,0x0b16,0x0b22,0x0b23,0x0b29,0x0b2c,0x0b2f,0x0b33,0x0b4c,0x0b51,0x0b56,0x0b5f,0x0b80,0x0b81,0x0b83,0x0b87,0x0b8d,0x0b9c,0x0ba0,0x0ba4,0x0ba8,0x0baf,0x0bb1,0x0bba,0x0bbb,0x0bbd,0x0bc6,0x0bc7,0x0bc8,0x0bca,0x0bcc,0x0bd2,0x0bd9,0x0bdb,0x0be1,0x0be7
185b ; --------------------------------------------------------------------------------------
185b ; Debug chain
185b ; --------------------------------------------------------------------------------------
185b 0000 0007 | | .DBGLEN 0x0000,0x0007
185d 0bf3 0bf8 | | .DBGLNO 0x0bf3,0x0bf8,0x0bfa,0x0c03,0x0c11,0x0c15,0x0c1c
1864 ; --------------------------------------------------------------------------------------
1864 ; Debug chain
1864 ; --------------------------------------------------------------------------------------
1864 0000 0009 | | .DBGLEN 0x0000,0x0009
1866 0c25 0c2a | % *| .DBGLNO 0x0c25,0x0c2a,0x0c2f,0x0c31,0x0c38,0x0c3a,0x0c3e,0x0c4a,0x0c50
186f ; --------------------------------------------------------------------------------------
186f ; Debug chain
186f ; --------------------------------------------------------------------------------------
186f 0000 0007 | | .DBGLEN 0x0000,0x0007
1871 0c63 0c68 | c h| .DBGLNO 0x0c63,0x0c68,0x0c6a,0x0c73,0x0c81,0x0c85,0x0c8c
1878 ; --------------------------------------------------------------------------------------
1878 ; Debug chain
1878 ; --------------------------------------------------------------------------------------
1878 0000 0008 | | .DBGLEN 0x0000,0x0008
187a 0c95 0c9a | | .DBGLNO 0x0c95,0x0c9a,0x0c9f,0x0ca1,0x0caa,0x0cae,0x0cba,0x0cc0
1882 ; --------------------------------------------------------------------------------------
1882 ; Debug chain
1882 ; --------------------------------------------------------------------------------------
1882 0002 0011 | | .DBGLEN 0x0002,0x0011
1884 0cd3 0cd7 | | .DBGLNO 0x0cd3,0x0cd7,0x0cd9,0x0cdc,0x0ce9,0x0cef,0x0cf1,0x0cfe,0x0d01,0x0d11,0x0d13,0x0d2b,0x0d2f,0x0d3a,0x0d3c,0x0d3e,0x0d46,0x0d4a,0x0d5a
1897 ; --------------------------------------------------------------------------------------
1897 ; Debug chain
1897 ; --------------------------------------------------------------------------------------
1897 0002 0009 | | .DBGLEN 0x0002,0x0009
1899 0d63 0d67 | c g| .DBGLNO 0x0d63,0x0d67,0x0d6c,0x0d72,0x0d75,0x0d78,0x0d7e,0x0d83,0x0d85,0x0d98,0x0da3
18a4 ; --------------------------------------------------------------------------------------
18a4 ; Debug chain
18a4 ; --------------------------------------------------------------------------------------
18a4 0001 0003 | | .DBGLEN 0x0001,0x0003
18a6 0dab 0db1 | | .DBGLNO 0x0dab,0x0db1,0x0dc5,0x0dc9
18aa ; --------------------------------------------------------------------------------------
18aa ; Debug chain
18aa ; --------------------------------------------------------------------------------------
18aa 0000 0007 | | .DBGLEN 0x0000,0x0007
18ac 0ddb 0de0 | | .DBGLNO 0x0ddb,0x0de0,0x0de2,0x0deb,0x0df9,0x0dfd,0x0e04
18b3 ; --------------------------------------------------------------------------------------
18b3 ; Debug chain
18b3 ; --------------------------------------------------------------------------------------
18b3 0001 000e | | .DBGLEN 0x0001,0x000e
18b5 0e0b 0e0f | | .DBGLNO 0x0e0b,0x0e0f,0x0e24,0x0e2b,0x0e2e,0x0e32,0x0e41,0x0e46,0x0e5b,0x0e62,0x0e65,0x0e69,0x0e78,0x0e7d,0x0e7f
18c4 ; --------------------------------------------------------------------------------------
18c4 ; Debug chain
18c4 ; --------------------------------------------------------------------------------------
18c4 0001 000c | | .DBGLEN 0x0001,0x000c
18c6 0e93 0e97 | | .DBGLNO 0x0e93,0x0e97,0x0eac,0x0eb6,0x0eba,0x0ec6,0x0ecb,0x0ee0,0x0eea,0x0eee,0x0efa,0x0eff,0x0f01
18d3 0000 0000 | | .BLANK 0000[0x12d]