DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦49f783148⟧

    Length: 7168 (0x1c00)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_e2acbc

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦this⟧ 

Disassembly

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 0ab8       |    |		.CONST	0x0ab8								; 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 0006       |    |		.CONST	0x0006								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0094       |    |		.CONST	0x0094								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0032       | 2  |		.CONST	0x0032								; Number of locals
000b			INIT_0008:
000b 00c4       |    |		Action	Make_Default
000c 00c4       |    |		Action	Make_Default
000d 00c4       |    |		Action	Make_Default
000e 00c4       |    |		Action	Make_Default
000f 00c4       |    |		Action	Make_Default
0010 00c4       |    |		Action	Make_Default
0011 00c4       |    |		Action	Make_Default
0012 00c4       |    |		Action	Make_Default
0013 00c4       |    |		Action	Make_Default
0014 00c4       |    |		Action	Make_Default
0015 00c4       |    |		Action	Make_Default
0016 00c4       |    |		Action	Make_Default
0017 00c4       |    |		Action	Make_Default
0018 00c4       |    |		Action	Make_Default
0019 00c4       |    |		Action	Make_Default
001a 00c4       |    |		Action	Make_Default
001b 00c4       |    |		Action	Make_Default
001c 00c4       |    |		Action	Make_Default
001d 00c4       |    |		Action	Make_Default
001e 00c4       |    |		Action	Make_Default
001f e001       |    |		Load	0x0,0x1
0020 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
0021 c21f       |    |		Store	0x1,0x1f
0022 e002       |    |		Load	0x0,0x2
0023 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
0024 c220       |    |		Store	0x1,0x20
0025 e003       |    |		Load	0x0,0x3
0026 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
0027 c20f       |    |		Store	0x1,0xf
0028 e004       |    |		Load	0x0,0x4
0029 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
002a c21e       |    |		Store	0x1,0x1e
002b e005       |    |		Load	0x0,0x5
002c 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
002d c211       |    |		Store	0x1,0x11
002e e006       |    |		Load	0x0,0x6
002f 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
0030 c212       |    |		Store	0x1,0x12
0031 e007       |    |		Load	0x0,0x7
0032 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
0033 c213       |    |		Store	0x1,0x13
0034 e008       |    |		Load	0x0,0x8
0035 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
0036 c214       |    |		Store	0x1,0x14
0037 e009       |    |		Load	0x0,0x9
0038 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
0039 c215       |    |		Store	0x1,0x15
003a e00a       |    |		Load	0x0,0xa
003b 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
003c c216       |    |		Store	0x1,0x16
003d e00b       |    |		Load	0x0,0xb
003e 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
003f c217       |    |		Store	0x1,0x17
0040 e00c       |    |		Load	0x0,0xc
0041 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
0042 c218       |    |		Store	0x1,0x18
0043 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated
0045 c219       |    |		Store	0x1,0x19
0046 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated
0048 c21a       |    |		Store	0x1,0x1a
0049 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated
004b c21b       |    |		Store	0x1,0x1b
004c 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated
004e c21d       |    |		Store	0x1,0x1d
004f 00bf       |    |		Action	Accept_Activation
0050 0092 07d4  |    |		Action	Push_String_Extended,0x7d4					; "alib_list"
0052 0092 07d5  |    |		Action	Push_String_Extended,0x7d5					; "alib.list"
0054 0092 07d6  |    |		Action	Push_String_Extended,0x7d6					; "working"
0056 029d 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call
0058 029d 0323  |   #|		Declare_Subprogram	INIT_0320,For_Outer_Call
005a 029d 0333  |   3|		Declare_Subprogram	INIT_0330,For_Outer_Call
005c 029d 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call
005e 029d 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Outer_Call
0060 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
0061 00c7       |    |		Action	Elaborate_Subprogram
0062 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
0063 00c7       |    |		Action	Elaborate_Subprogram
0064 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
0065 00c7       |    |		Action	Elaborate_Subprogram
0066 029d 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Outer_Call
0068 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0069 00c7       |    |		Action	Elaborate_Subprogram
006a 029d 0473  |   s|		Declare_Subprogram	INIT_0470,For_Outer_Call
006c 029d 04f3  |    |		Declare_Subprogram	INIT_04f0,For_Outer_Call
006e 029d 053b  |   ;|		Declare_Subprogram	INIT_0538,For_Outer_Call
0070 029d 0553  |   S|		Declare_Subprogram	INIT_0550,For_Outer_Call
0072 029d 061b  |    |		Declare_Subprogram	INIT_0618,For_Outer_Call
0074 029d 0633  |   3|		Declare_Subprogram	INIT_0630,For_Outer_Call
0076 029d 0653  |   S|		Declare_Subprogram	INIT_0650,For_Outer_Call
0078 029d 0693  |    |		Declare_Subprogram	INIT_0690,For_Outer_Call
007a 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
007b 00c7       |    |		Action	Elaborate_Subprogram
007c 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
007d 00c7       |    |		Action	Elaborate_Subprogram
007e 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
007f 00c7       |    |		Action	Elaborate_Subprogram
0080 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0081 00c7       |    |		Action	Elaborate_Subprogram
0082 e00d       |    |		Load	0x0,0xd
0083 02a5       |    |		Declare_Subprogram	For_Outer_Call,With_Address
0084 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0085 00c7       |    |		Action	Elaborate_Subprogram
0086 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0087 00c7       |    |		Action	Elaborate_Subprogram
0088 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0089 00c7       |    |		Action	Elaborate_Subprogram
008a 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
008b 00c7       |    |		Action	Elaborate_Subprogram
008c 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
008d 00c7       |    |		Action	Elaborate_Subprogram
008e 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
008f 00c7       |    |		Action	Elaborate_Subprogram
0090 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0091 00c7       |    |		Action	Elaborate_Subprogram
0092 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
0093 00c7       |    |		Action	Elaborate_Subprogram
0094			BODY_0008:
0094 00bc       |    |		Action	Signal_Activated
0095 00bb       |    |		Action	Signal_Completion
0096 0000 0000  |    |		.XXX[0x2]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00b6       |    |		.CONST	0x00b6								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0006       |    |		.CONST	0x0006								; Number of locals
009b			INIT_0098:
009b e00e       |    |		Load	0x0,0xe
009c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
009d 02c7       |    |		Declare_Variable	Any
009e 00d8       |    |		Load_Top	At_Offset_0
009f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00a0 e00f       |    |		Load	0x0,0xf
00a1 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00a2 02c7       |    |		Declare_Variable	Any
00a3 00d8       |    |		Load_Top	At_Offset_0
00a4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00a5 e5fd       |    |		Load	0x2,-0x3
00a6 0092 07d7  |    |		Action	Push_String_Extended,0x7d7					; "/"
00a8 01cc       |    |		Execute	Vector,Catenate
00a9 e5fe       |    |		Load	0x2,-0x2
00aa 01cc       |    |		Execute	Vector,Catenate
00ab 0007       |    |		Action	Break_Optional
00ac e010       |    |		Load	0x0,0x10
00ad 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00ae 02c7       |    |		Declare_Variable	Any
00af e5ff       |    |		Load	0x2,-0x1
00b0 e011       |    |		Load	0x0,0x11
00b1 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00b2 a405       |    |		Store_Unchecked	0x2,0x5
00b3 00d8       |    |		Load_Top	At_Offset_0
00b4 e012       |    |		Load	0x0,0x12
00b5 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00b6			BODY_0098:
00b6 e013       |    |		Load	0x0,0x13
00b7 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00b8 4801       |H   |		Short_Literal	0x1
00b9 0092 07d8  |    |		Action	Push_String_Extended,0x7d8					; "Transferring "
00bb e5ff       |    |		Load	0x2,-0x1
00bc 01cc       |    |		Execute	Vector,Catenate
00bd 0092 07d9  |    |		Action	Push_String_Extended,0x7d9					; " to "
00bf 01cc       |    |		Execute	Vector,Catenate
00c0 e404       |    |		Load	0x2,0x4
00c1 01cc       |    |		Execute	Vector,Catenate
00c2 0092 07da  |    |		Action	Push_String_Extended,0x7da					; "."
00c4 01cc       |    |		Execute	Vector,Catenate
00c5 e014       |    |		Load	0x0,0x14
00c6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00c7 e5fb       |    |		Load	0x2,-0x5
00c8 e402       |    |		Load	0x2,0x2
00c9 0120       |    |		Execute	Any,Is_Value
00ca 6803       |h   |		Jump_Zero	0xce
00cb e00e       |    |		Load	0x0,0xe
00cc 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00cd 7801       |x   |		Jump	0xcf
00ce e402       |    |		Load	0x2,0x2
00cf 00da       |    |		Load_Top	At_Offset_2
00d0 e015       |    |		Load	0x0,0x15
00d1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00d2 e015       |    |		Load	0x0,0x15
00d3 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00d4 e5fc       |    |		Load	0x2,-0x4
00d5 0092 07db  |    |		Action	Push_String_Extended,0x7db					; "Rs6000_Aix_Ibm"
00d7 e00e       |    |		Load	0x0,0xe
00d8 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00d9 c402       |    |		Store	0x2,0x2
00da c5fb       |    |		Store	0x2,-0x5
00db 4801       |H   |		Short_Literal	0x1
00dc e5fb       |    |		Load	0x2,-0x5
00dd e00f       |    |		Load	0x0,0xf
00de 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00df 6813       |h   |		Jump_Zero	0xf3
00e0 e013       |    |		Load	0x0,0x13
00e1 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00e2 4805       |H   |		Short_Literal	0x5
00e3 e5fb       |    |		Load	0x2,-0x5
00e4 e00f       |    |		Load	0x0,0xf
00e5 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
00e6 e014       |    |		Load	0x0,0x14
00e7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00e8 e5fb       |    |		Load	0x2,-0x5
00e9 4802       |H   |		Short_Literal	0x2
00ea 0092 07dc  |    |		Action	Push_String_Extended,0x7dc					; "Unable to acquire connection to "
00ec e5fc       |    |		Load	0x2,-0x4
00ed 01cc       |    |		Execute	Vector,Catenate
00ee 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
00f0 8225       | %  |		Call	0x1,0x25
00f1 c5fb       |    |		Store	0x2,-0x5
00f2 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
00f3 e5fb       |    |		Load	0x2,-0x5
00f4 4800       |H   |		Short_Literal	0x0
00f5 4800       |H   |		Short_Literal	0x0
00f6 e402       |    |		Load	0x2,0x2
00f7 e404       |    |		Load	0x2,0x4
00f8 e5ff       |    |		Load	0x2,-0x1
00f9 e00e       |    |		Load	0x0,0xe
00fa 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00fb c5fb       |    |		Store	0x2,-0x5
00fc 4801       |H   |		Short_Literal	0x1
00fd e5fb       |    |		Load	0x2,-0x5
00fe e00f       |    |		Load	0x0,0xf
00ff 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0100 681c       |h   |		Jump_Zero	0x11d
0101 e013       |    |		Load	0x0,0x13
0102 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0103 4805       |H   |		Short_Literal	0x5
0104 e5fb       |    |		Load	0x2,-0x5
0105 e00f       |    |		Load	0x0,0xf
0106 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0107 e014       |    |		Load	0x0,0x14
0108 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0109 e5fb       |    |		Load	0x2,-0x5
010a 4802       |H   |		Short_Literal	0x2
010b 0092 07de  |    |		Action	Push_String_Extended,0x7de					; "Unable to transfer "
010d e5ff       |    |		Load	0x2,-0x1
010e 01cc       |    |		Execute	Vector,Catenate
010f 0092 07d9  |    |		Action	Push_String_Extended,0x7d9					; " to "
0111 01cc       |    |		Execute	Vector,Catenate
0112 e5fe       |    |		Load	0x2,-0x2
0113 01cc       |    |		Execute	Vector,Catenate
0114 0092 07df  |    |		Action	Push_String_Extended,0x7df					; " on "
0116 01cc       |    |		Execute	Vector,Catenate
0117 e5fc       |    |		Load	0x2,-0x4
0118 01cc       |    |		Execute	Vector,Catenate
0119 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
011b 8225       | %  |		Call	0x1,0x25
011c c5fb       |    |		Store	0x2,-0x5
011d 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
011e 0000 0000  |    |		.XXX[0x2]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 013e       | >  |		.CONST	0x013e								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0006       |    |		.CONST	0x0006								; Number of locals
0123			INIT_0120:
0123 e00e       |    |		Load	0x0,0xe
0124 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0125 02c7       |    |		Declare_Variable	Any
0126 00d8       |    |		Load_Top	At_Offset_0
0127 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0128 e00f       |    |		Load	0x0,0xf
0129 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
012a 02c7       |    |		Declare_Variable	Any
012b 00d8       |    |		Load_Top	At_Offset_0
012c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
012d e5fd       |    |		Load	0x2,-0x3
012e 0092 07d7  |    |		Action	Push_String_Extended,0x7d7					; "/"
0130 01cc       |    |		Execute	Vector,Catenate
0131 e5fe       |    |		Load	0x2,-0x2
0132 01cc       |    |		Execute	Vector,Catenate
0133 0007       |    |		Action	Break_Optional
0134 e010       |    |		Load	0x0,0x10
0135 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0136 02c7       |    |		Declare_Variable	Any
0137 e5ff       |    |		Load	0x2,-0x1
0138 e011       |    |		Load	0x0,0x11
0139 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
013a a405       |    |		Store_Unchecked	0x2,0x5
013b 00d8       |    |		Load_Top	At_Offset_0
013c e012       |    |		Load	0x0,0x12
013d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
013e			BODY_0120:
013e e013       |    |		Load	0x0,0x13
013f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0140 4801       |H   |		Short_Literal	0x1
0141 0092 07e0  |    |		Action	Push_String_Extended,0x7e0					; "Uploading "
0143 e5ff       |    |		Load	0x2,-0x1
0144 01cc       |    |		Execute	Vector,Catenate
0145 0092 07e1  |    |		Action	Push_String_Extended,0x7e1					; " from "
0147 01cc       |    |		Execute	Vector,Catenate
0148 e404       |    |		Load	0x2,0x4
0149 01cc       |    |		Execute	Vector,Catenate
014a 0092 07da  |    |		Action	Push_String_Extended,0x7da					; "."
014c 01cc       |    |		Execute	Vector,Catenate
014d e014       |    |		Load	0x0,0x14
014e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
014f e5fb       |    |		Load	0x2,-0x5
0150 e402       |    |		Load	0x2,0x2
0151 0120       |    |		Execute	Any,Is_Value
0152 6803       |h   |		Jump_Zero	0x156
0153 e00e       |    |		Load	0x0,0xe
0154 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0155 7801       |x   |		Jump	0x157
0156 e402       |    |		Load	0x2,0x2
0157 00da       |    |		Load_Top	At_Offset_2
0158 e015       |    |		Load	0x0,0x15
0159 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
015a e015       |    |		Load	0x0,0x15
015b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
015c e5fc       |    |		Load	0x2,-0x4
015d 0092 07db  |    |		Action	Push_String_Extended,0x7db					; "Rs6000_Aix_Ibm"
015f e00e       |    |		Load	0x0,0xe
0160 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0161 c402       |    |		Store	0x2,0x2
0162 c5fb       |    |		Store	0x2,-0x5
0163 4801       |H   |		Short_Literal	0x1
0164 e5fb       |    |		Load	0x2,-0x5
0165 e00f       |    |		Load	0x0,0xf
0166 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0167 6813       |h   |		Jump_Zero	0x17b
0168 e013       |    |		Load	0x0,0x13
0169 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
016a 4805       |H   |		Short_Literal	0x5
016b e5fb       |    |		Load	0x2,-0x5
016c e00f       |    |		Load	0x0,0xf
016d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
016e e014       |    |		Load	0x0,0x14
016f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0170 e5fb       |    |		Load	0x2,-0x5
0171 4802       |H   |		Short_Literal	0x2
0172 0092 07dc  |    |		Action	Push_String_Extended,0x7dc					; "Unable to acquire connection to "
0174 e5fc       |    |		Load	0x2,-0x4
0175 01cc       |    |		Execute	Vector,Catenate
0176 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
0178 8225       | %  |		Call	0x1,0x25
0179 c5fb       |    |		Store	0x2,-0x5
017a 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
017b e5fb       |    |		Load	0x2,-0x5
017c 4800       |H   |		Short_Literal	0x0
017d 4800       |H   |		Short_Literal	0x0
017e e402       |    |		Load	0x2,0x2
017f e404       |    |		Load	0x2,0x4
0180 e5ff       |    |		Load	0x2,-0x1
0181 e00e       |    |		Load	0x0,0xe
0182 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0183 c5fb       |    |		Store	0x2,-0x5
0184 4801       |H   |		Short_Literal	0x1
0185 e5fb       |    |		Load	0x2,-0x5
0186 e00f       |    |		Load	0x0,0xf
0187 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0188 681c       |h   |		Jump_Zero	0x1a5
0189 e013       |    |		Load	0x0,0x13
018a 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
018b 4805       |H   |		Short_Literal	0x5
018c e5fb       |    |		Load	0x2,-0x5
018d e00f       |    |		Load	0x0,0xf
018e 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
018f e014       |    |		Load	0x0,0x14
0190 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0191 e5fb       |    |		Load	0x2,-0x5
0192 4802       |H   |		Short_Literal	0x2
0193 0092 07e2  |    |		Action	Push_String_Extended,0x7e2					; "Unable to upload "
0195 e5ff       |    |		Load	0x2,-0x1
0196 01cc       |    |		Execute	Vector,Catenate
0197 0092 07d9  |    |		Action	Push_String_Extended,0x7d9					; " to "
0199 01cc       |    |		Execute	Vector,Catenate
019a e5fe       |    |		Load	0x2,-0x2
019b 01cc       |    |		Execute	Vector,Catenate
019c 0092 07e1  |    |		Action	Push_String_Extended,0x7e1					; " from "
019e 01cc       |    |		Execute	Vector,Catenate
019f e5fc       |    |		Load	0x2,-0x4
01a0 01cc       |    |		Execute	Vector,Catenate
01a1 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
01a3 8225       | %  |		Call	0x1,0x25
01a4 c5fb       |    |		Store	0x2,-0x5
01a5 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
01a6 0000 0000  |    |		.XXX[0x2]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01bf       |    |		.CONST	0x01bf								; Address of begin
01a9 0248       | H  |		.CONST	0x0248								; Address of exception handler
01aa 0006       |    |		.CONST	0x0006								; Number of locals
01ab			INIT_01a8:
01ab e010       |    |		Load	0x0,0x10
01ac 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01ad 02c7       |    |		Declare_Variable	Any
01ae 00d8       |    |		Load_Top	At_Offset_0
01af 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01b0 e010       |    |		Load	0x0,0x10
01b1 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01b2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01b3 e00f       |    |		Load	0x0,0xf
01b4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01b5 02c7       |    |		Declare_Variable	Any
01b6 00d8       |    |		Load_Top	At_Offset_0
01b7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01b8 e016       |    |		Load	0x0,0x16
01b9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ba 02c7       |    |		Declare_Variable	Any
01bb 00d8       |    |		Load_Top	At_Offset_0
01bc 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01bd 029f 06cb  |    |		Declare_Subprogram	INIT_06c8,For_Call
01bf			BODY_01a8:
01bf e013       |    |		Load	0x0,0x13
01c0 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01c1 4801       |H   |		Short_Literal	0x1
01c2 0092 07e3  |    |		Action	Push_String_Extended,0x7e3					; "Building list file for Host_View = "
01c4 e5ff       |    |		Load	0x2,-0x1
01c5 01cc       |    |		Execute	Vector,Catenate
01c6 0092 07e4  |    |		Action	Push_String_Extended,0x7e4					; ", and target library = "
01c8 01cc       |    |		Execute	Vector,Catenate
01c9 e5fd       |    |		Load	0x2,-0x3
01ca 01cc       |    |		Execute	Vector,Catenate
01cb 0092 07d7  |    |		Action	Push_String_Extended,0x7d7					; "/"
01cd 01cc       |    |		Execute	Vector,Catenate
01ce e5fc       |    |		Load	0x2,-0x4
01cf 01cc       |    |		Execute	Vector,Catenate
01d0 e014       |    |		Load	0x0,0x14
01d1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01d2 e5ff       |    |		Load	0x2,-0x1
01d3 01db       |    |		Execute	Vector,Length
01d4 7009       |p   |		Jump_Nonzero	0x1de
01d5 e5fa       |    |		Load	0x2,-0x6
01d6 4802       |H   |		Short_Literal	0x2
01d7 0092 07e5  |    |		Action	Push_String_Extended,0x7e5					; "A null Host_View was supplied to Remote_Library_Integration.Build_List_File"
01d9 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
01db 8225       | %  |		Call	0x1,0x25
01dc c5fa       |    |		Store	0x2,-0x6
01dd 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
01de e010       |    |		Load	0x0,0x10
01df 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01e0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01e1 e402       |    |		Load	0x2,0x2
01e2 0120       |    |		Execute	Any,Is_Value
01e3 6803       |h   |		Jump_Zero	0x1e7
01e4 e010       |    |		Load	0x0,0x10
01e5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01e6 7801       |x   |		Jump	0x1e8
01e7 e402       |    |		Load	0x2,0x2
01e8 6067       |`g  |		Indirect_Literal	Discrete,0x250,{0x00000000, 0x00004000}
01e9 e017       |    |		Load	0x0,0x17
01ea 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01eb e018       |    |		Load	0x0,0x18
01ec 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01ed e010       |    |		Load	0x0,0x10
01ee 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01ef 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01f0 e5fb       |    |		Load	0x2,-0x5
01f1 e010       |    |		Load	0x0,0x10
01f2 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01f3 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
01f4 c402       |    |		Store	0x2,0x2
01f5 c403       |    |		Store	0x2,0x3
01f6 00db       |    |		Load_Top	At_Offset_3
01f7 460e       |F   |		Jump_Case	0xf
01f8 7823       |x#  |		Jump	0x21c								; case 0x0
01f9 780d       |x   |		Jump	0x207								; case 0x1
01fa 780c       |x   |		Jump	0x207								; case 0x2
01fb 7828       |x(  |		Jump	0x224								; case 0x3
01fc 780a       |x   |		Jump	0x207								; case 0x4
01fd 7809       |x   |		Jump	0x207								; case 0x5
01fe 7808       |x   |		Jump	0x207								; case 0x6
01ff 7807       |x   |		Jump	0x207								; case 0x7
0200 7806       |x   |		Jump	0x207								; case 0x8
0201 7805       |x   |		Jump	0x207								; case 0x9
0202 7804       |x   |		Jump	0x207								; case 0xa
0203 7803       |x   |		Jump	0x207								; case 0xb
0204 7802       |x   |		Jump	0x207								; case 0xc
0205 7801       |x   |		Jump	0x207								; case 0xd
0206 7800       |x   |		Jump	0x207								; case 0xe
0207 e5fa       |    |		Load	0x2,-0x6
0208 4802       |H   |		Short_Literal	0x2
0209 0092 07e6  |    |		Action	Push_String_Extended,0x7e6					; "Unable to resolve "
020b e5fb       |    |		Load	0x2,-0x5
020c 01cc       |    |		Execute	Vector,Catenate
020d 0092 07e7  |    |		Action	Push_String_Extended,0x7e7					; ". Status ="
020f 01cc       |    |		Execute	Vector,Catenate
0210 e403       |    |		Load	0x2,0x3
0211 e010       |    |		Load	0x0,0x10
0212 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0213 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0214 011c       |    |		Execute	Any,Convert_Unchecked
0215 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0216 01cc       |    |		Execute	Vector,Catenate
0217 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
0219 8225       | %  |		Call	0x1,0x25
021a c5fa       |    |		Store	0x2,-0x6
021b 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
021c 00d9       |    |		Load_Top	At_Offset_1
021d 00ea       |    |		Load_Encached	Null_String_Cache
021e e5fb       |    |		Load	0x2,-0x5
021f 4801       |H   |		Short_Literal	0x1
0220 e016       |    |		Load	0x0,0x16
0221 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0222 c405       |    |		Store	0x2,0x5
0223 7807       |x   |		Jump	0x22b
0224 00d9       |    |		Load_Top	At_Offset_1
0225 00ea       |    |		Load_Encached	Null_String_Cache
0226 e5fb       |    |		Load	0x2,-0x5
0227 4801       |H   |		Short_Literal	0x1
0228 e016       |    |		Load	0x0,0x16
0229 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
022a c405       |    |		Store	0x2,0x5
022b 0092 07e8  |    |		Action	Push_String_Extended,0x7e8					; "-- Host_View => "
022d e5ff       |    |		Load	0x2,-0x1
022e 01cc       |    |		Execute	Vector,Catenate
022f 00da       |    |		Load_Top	At_Offset_2
0230 e016       |    |		Load	0x0,0x16
0231 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
0232 e5fc       |    |		Load	0x2,-0x4
0233 01db       |    |		Execute	Vector,Length
0234 7005       |p   |		Jump_Nonzero	0x23a
0235 e223       | #  |		Load	0x1,0x23
0236 00da       |    |		Load_Top	At_Offset_2
0237 e016       |    |		Load	0x0,0x16
0238 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
0239 7804       |x   |		Jump	0x23e
023a e5fc       |    |		Load	0x2,-0x4
023b 00da       |    |		Load_Top	At_Offset_2
023c e016       |    |		Load	0x0,0x16
023d 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
023e 0092 07e9  |    |		Action	Push_String_Extended,0x7e9					; "/usr/lpp/ada/lib/libada"
0240 00da       |    |		Load_Top	At_Offset_2
0241 e016       |    |		Load	0x0,0x16
0242 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
0243 00d9       |    |		Load_Top	At_Offset_1
0244 e016       |    |		Load	0x0,0x16
0245 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0246 c405       |    |		Store	0x2,0x5
0247 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0248			TRAP_01a8:
0248 0007       |    |		Action	Break_Optional
0249 e5fa       |    |		Load	0x2,-0x6
024a 0092 07ea  |    |		Action	Push_String_Extended,0x7ea					; "Build_List_File"
024c 8226       | &  |		Call	0x1,0x26
024d c5fa       |    |		Store	0x2,-0x6
024e 8406       |    |		Call	0x2,0x6
024f 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0250 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0254 0000 0000  |    |		.BLANK	0000[0x4]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 027e       | ~  |		.CONST	0x027e								; Address of begin
0259 0303       |    |		.CONST	0x0303								; Address of exception handler
025a 0007       |    |		.CONST	0x0007								; Number of locals
025b			INIT_0258:
025b e00e       |    |		Load	0x0,0xe
025c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
025d 02c7       |    |		Declare_Variable	Any
025e 00d8       |    |		Load_Top	At_Offset_0
025f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0260 e00f       |    |		Load	0x0,0xf
0261 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0262 02c7       |    |		Declare_Variable	Any
0263 00d8       |    |		Load_Top	At_Offset_0
0264 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0265 0092 07eb  |    |		Action	Push_String_Extended,0x7eb					; "PATH=$PATH:/usr/bin/ada ; export PATH ; /usr/bin/ada/alibinit -p 100000 -L "
0267 e5fe       |    |		Load	0x2,-0x2
0268 01cc       |    |		Execute	Vector,Catenate
0269 0092 07ec  |    |		Action	Push_String_Extended,0x7ec					; "/alib.list"
026b 01cc       |    |		Execute	Vector,Catenate
026c 0007       |    |		Action	Break_Optional
026d e5ff       |    |		Load	0x2,-0x1
026e 0092 07ed  |    |		Action	Push_String_Extended,0x7ed					; ".State.Tool_State."
0270 01cc       |    |		Execute	Vector,Catenate
0271 e221       | !  |		Load	0x1,0x21
0272 01cc       |    |		Execute	Vector,Catenate
0273 0007       |    |		Action	Break_Optional
0274 e010       |    |		Load	0x0,0x10
0275 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0276 02c7       |    |		Declare_Variable	Any
0277 e5ff       |    |		Load	0x2,-0x1
0278 e011       |    |		Load	0x0,0x11
0279 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
027a a406       |    |		Store_Unchecked	0x2,0x6
027b 00d8       |    |		Load_Top	At_Offset_0
027c e012       |    |		Load	0x0,0x12
027d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
027e			BODY_0258:
027e e013       |    |		Load	0x0,0x13
027f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0280 4801       |H   |		Short_Literal	0x1
0281 0092 07ee  |    |		Action	Push_String_Extended,0x7ee					; "Creating remote program library = "
0283 e5fd       |    |		Load	0x2,-0x3
0284 01cc       |    |		Execute	Vector,Catenate
0285 e014       |    |		Load	0x0,0x14
0286 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0287 e5fb       |    |		Load	0x2,-0x5
0288 00db       |    |		Load_Top	At_Offset_3
0289 e5fd       |    |		Load	0x2,-0x3
028a e5fe       |    |		Load	0x2,-0x2
028b e5fc       |    |		Load	0x2,-0x4
028c e5ff       |    |		Load	0x2,-0x1
028d 821b       |    |		Call	0x1,0x1b
028e c5fb       |    |		Store	0x2,-0x5
028f 4801       |H   |		Short_Literal	0x1
0290 e5fb       |    |		Load	0x2,-0x5
0291 e00f       |    |		Load	0x0,0xf
0292 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0293 6811       |h   |		Jump_Zero	0x2a5
0294 e013       |    |		Load	0x0,0x13
0295 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0296 4805       |H   |		Short_Literal	0x5
0297 e5fb       |    |		Load	0x2,-0x5
0298 e00f       |    |		Load	0x0,0xf
0299 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
029a e014       |    |		Load	0x0,0x14
029b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
029c e5fb       |    |		Load	0x2,-0x5
029d 4802       |H   |		Short_Literal	0x2
029e 0092 07ef  |    |		Action	Push_String_Extended,0x7ef					; "Unable to create the remote library list file."
02a0 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
02a2 8225       | %  |		Call	0x1,0x25
02a3 c5fb       |    |		Store	0x2,-0x5
02a4 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
02a5 e5fb       |    |		Load	0x2,-0x5
02a6 e5fc       |    |		Load	0x2,-0x4
02a7 e5fe       |    |		Load	0x2,-0x2
02a8 e222       | "  |		Load	0x1,0x22
02a9 e405       |    |		Load	0x2,0x5
02aa 8219       |    |		Call	0x1,0x19
02ab c5fb       |    |		Store	0x2,-0x5
02ac e5fb       |    |		Load	0x2,-0x5
02ad e402       |    |		Load	0x2,0x2
02ae 0120       |    |		Execute	Any,Is_Value
02af 6803       |h   |		Jump_Zero	0x2b3
02b0 e00e       |    |		Load	0x0,0xe
02b1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02b2 7801       |x   |		Jump	0x2b4
02b3 e402       |    |		Load	0x2,0x2
02b4 00da       |    |		Load_Top	At_Offset_2
02b5 e015       |    |		Load	0x0,0x15
02b6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02b7 e015       |    |		Load	0x0,0x15
02b8 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02b9 e5fc       |    |		Load	0x2,-0x4
02ba 00ea       |    |		Load_Encached	Null_String_Cache
02bb 0092 07f0  |    |		Action	Push_String_Extended,0x7f0					; "cd "
02bd e5fe       |    |		Load	0x2,-0x2
02be 01cc       |    |		Execute	Vector,Catenate
02bf 0092 07db  |    |		Action	Push_String_Extended,0x7db					; "Rs6000_Aix_Ibm"
02c1 e00e       |    |		Load	0x0,0xe
02c2 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
02c3 c402       |    |		Store	0x2,0x2
02c4 c5fb       |    |		Store	0x2,-0x5
02c5 4801       |H   |		Short_Literal	0x1
02c6 e5fb       |    |		Load	0x2,-0x5
02c7 e00f       |    |		Load	0x0,0xf
02c8 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
02c9 6813       |h   |		Jump_Zero	0x2dd
02ca e013       |    |		Load	0x0,0x13
02cb 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02cc 4805       |H   |		Short_Literal	0x5
02cd e5fb       |    |		Load	0x2,-0x5
02ce e00f       |    |		Load	0x0,0xf
02cf 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02d0 e014       |    |		Load	0x0,0x14
02d1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02d2 e5fb       |    |		Load	0x2,-0x5
02d3 4802       |H   |		Short_Literal	0x2
02d4 0092 07dc  |    |		Action	Push_String_Extended,0x7dc					; "Unable to acquire connection to "
02d6 e5fc       |    |		Load	0x2,-0x4
02d7 01cc       |    |		Execute	Vector,Catenate
02d8 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
02da 8225       | %  |		Call	0x1,0x25
02db c5fb       |    |		Store	0x2,-0x5
02dc 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
02dd e5fb       |    |		Load	0x2,-0x5
02de 4800       |H   |		Short_Literal	0x0
02df 4801       |H   |		Short_Literal	0x1
02e0 4800       |H   |		Short_Literal	0x0
02e1 4800       |H   |		Short_Literal	0x0
02e2 00ea       |    |		Load_Encached	Null_String_Cache
02e3 e402       |    |		Load	0x2,0x2
02e4 e404       |    |		Load	0x2,0x4
02e5 e00e       |    |		Load	0x0,0xe
02e6 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
02e7 c5fb       |    |		Store	0x2,-0x5
02e8 4801       |H   |		Short_Literal	0x1
02e9 e5fb       |    |		Load	0x2,-0x5
02ea e00f       |    |		Load	0x0,0xf
02eb 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
02ec 6815       |h   |		Jump_Zero	0x302
02ed e013       |    |		Load	0x0,0x13
02ee 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02ef 4805       |H   |		Short_Literal	0x5
02f0 e5fb       |    |		Load	0x2,-0x5
02f1 e00f       |    |		Load	0x0,0xf
02f2 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02f3 e014       |    |		Load	0x0,0x14
02f4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02f5 e5fb       |    |		Load	0x2,-0x5
02f6 4802       |H   |		Short_Literal	0x2
02f7 0092 07f1  |    |		Action	Push_String_Extended,0x7f1					; "Unable to create the remote program library, "
02f9 e5fd       |    |		Load	0x2,-0x3
02fa 01cc       |    |		Execute	Vector,Catenate
02fb 0092 07da  |    |		Action	Push_String_Extended,0x7da					; "."
02fd 01cc       |    |		Execute	Vector,Catenate
02fe 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
0300 8225       | %  |		Call	0x1,0x25
0301 c5fb       |    |		Store	0x2,-0x5
0302 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0303			TRAP_0258:
0303 0007       |    |		Action	Break_Optional
0304 e5fb       |    |		Load	0x2,-0x5
0305 0092 07f2  |    |		Action	Push_String_Extended,0x7f2					; "Create_Program_Library"
0307 8226       | &  |		Call	0x1,0x26
0308 c5fb       |    |		Store	0x2,-0x5
0309 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
030a 0000 0000  |    |		.BLANK	0000[0x6]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313       |    |		.CONST	0x0313								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0001       |    |		.CONST	0x0001								; Number of locals
0313			BODY_0310:
0313			INIT_0310:
0313 00da       |    |		Load_Top	At_Offset_2
0314 01db       |    |		Execute	Vector,Length
0315 7002       |p   |		Jump_Nonzero	0x318
0316 e223       | #  |		Load	0x1,0x23
0317 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0318 00da       |    |		Load_Top	At_Offset_2
0319 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
031a 0000 0000  |    |		.BLANK	0000[0x6]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0323       | #  |		.CONST	0x0323								; Address of begin
0321 0004       |    |		.CONST	0x0004								; Address of exception handler
0322 0001       |    |		.CONST	0x0001								; Number of locals
0323			BODY_0320:
0323			INIT_0320:
0323 e5fc       |    |		Load	0x2,-0x4
0324 e5fd       |    |		Load	0x2,-0x3
0325 e5fe       |    |		Load	0x2,-0x2
0326 e5ff       |    |		Load	0x2,-0x1
0327 e00f       |    |		Load	0x0,0xf
0328 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0329 c5fc       |    |		Store	0x2,-0x4
032a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
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 00db       |    |		Load_Top	At_Offset_3
0334 4802       |H   |		Short_Literal	0x2
0335 4800       |H   |		Short_Literal	0x0
0336 4801       |H   |		Short_Literal	0x1
0337 e019       |    |		Load	0x0,0x19
0338 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0339 0092 07f3  |    |		Action	Push_String_Extended,0x7f3					; " caught in "
033b 01cc       |    |		Execute	Vector,Catenate
033c e5ff       |    |		Load	0x2,-0x1
033d 01cc       |    |		Execute	Vector,Catenate
033e 0092 07da  |    |		Action	Push_String_Extended,0x7da					; "."
0340 01cc       |    |		Execute	Vector,Catenate
0341 0092 07f4  |    |		Action	Push_String_Extended,0x7f4					; "Unhandled Exception"
0343 8225       | %  |		Call	0x1,0x25
0344 c5fe       |    |		Store	0x2,-0x2
0345 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0346 0000 0000  |    |		.XXX[0x2]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 035b       | [  |		.CONST	0x035b								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0005       |    |		.CONST	0x0005								; Number of locals
034b			INIT_0348:
034b e010       |    |		Load	0x0,0x10
034c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
034d e010       |    |		Load	0x0,0x10
034e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
034f 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0350 02c7       |    |		Declare_Variable	Any
0351 00d8       |    |		Load_Top	At_Offset_0
0352 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0353 e010       |    |		Load	0x0,0x10
0354 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0355 02c7       |    |		Declare_Variable	Any
0356 00d8       |    |		Load_Top	At_Offset_0
0357 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0358 e010       |    |		Load	0x0,0x10
0359 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
035a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
035b			BODY_0348:
035b e010       |    |		Load	0x0,0x10
035c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
035d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
035e 00da       |    |		Load_Top	At_Offset_2
035f 0120       |    |		Execute	Any,Is_Value
0360 6803       |h   |		Jump_Zero	0x364
0361 e010       |    |		Load	0x0,0x10
0362 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0363 7801       |x   |		Jump	0x365
0364 00da       |    |		Load_Top	At_Offset_2
0365 607a       |`z  |		Indirect_Literal	Discrete,0x3e0,{0x00000000, 0x00004000}
0366 e017       |    |		Load	0x0,0x17
0367 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0368 e018       |    |		Load	0x0,0x18
0369 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
036a e010       |    |		Load	0x0,0x10
036b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
036c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
036d e5ff       |    |		Load	0x2,-0x1
036e e010       |    |		Load	0x0,0x10
036f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0370 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0371 c404       |    |		Store	0x2,0x4
0372 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0373 00d8       |    |		Load_Top	At_Offset_0
0374 6818       |h   |		Jump_Zero	0x38d
0375 e5fd       |    |		Load	0x2,-0x3
0376 4802       |H   |		Short_Literal	0x2
0377 0092 07f5  |    |		Action	Push_String_Extended,0x7f5					; "Unable to resolve"
0379 e5ff       |    |		Load	0x2,-0x1
037a 01cc       |    |		Execute	Vector,Catenate
037b 0092 07f6  |    |		Action	Push_String_Extended,0x7f6					; ".  "
037d 01cc       |    |		Execute	Vector,Catenate
037e 0092 07f7  |    |		Action	Push_String_Extended,0x7f7					; "Name Status = "
0380 01cc       |    |		Execute	Vector,Catenate
0381 00db       |    |		Load_Top	At_Offset_3
0382 e010       |    |		Load	0x0,0x10
0383 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0384 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0385 011c       |    |		Execute	Any,Convert_Unchecked
0386 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0387 01cc       |    |		Execute	Vector,Catenate
0388 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
038a 8225       | %  |		Call	0x1,0x25
038b c5fd       |    |		Store	0x2,-0x3
038c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
038d e010       |    |		Load	0x0,0x10
038e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
038f 00db       |    |		Load_Top	At_Offset_3
0390 0120       |    |		Execute	Any,Is_Value
0391 6804       |h   |		Jump_Zero	0x396
0392 e010       |    |		Load	0x0,0x10
0393 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0394 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0395 7801       |x   |		Jump	0x397
0396 00db       |    |		Load_Top	At_Offset_3
0397 6048       |`H  |		Indirect_Literal	Discrete,0x3e0,{0x00000000, 0x00004000}
0398 e017       |    |		Load	0x0,0x17
0399 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
039a 4800       |H   |		Short_Literal	0x0
039b e404       |    |		Load	0x2,0x4
039c e010       |    |		Load	0x0,0x10
039d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
039e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
039f c403       |    |		Store	0x2,0x3
03a0 c402       |    |		Store	0x2,0x2
03a1 00db       |    |		Load_Top	At_Offset_3
03a2 6814       |h   |		Jump_Zero	0x3b7
03a3 e5fd       |    |		Load	0x2,-0x3
03a4 4802       |H   |		Short_Literal	0x2
03a5 0092 07f8  |    |		Action	Push_String_Extended,0x7f8					; "Unable to get default context for "
03a7 e5ff       |    |		Load	0x2,-0x1
03a8 01cc       |    |		Execute	Vector,Catenate
03a9 0092 07f9  |    |		Action	Push_String_Extended,0x7f9					; ".  Error Status = "
03ab 01cc       |    |		Execute	Vector,Catenate
03ac e402       |    |		Load	0x2,0x2
03ad e010       |    |		Load	0x0,0x10
03ae 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03af 011c       |    |		Execute	Any,Convert_Unchecked
03b0 1c01       |    |		Execute_Immediate	Run_Utility,0x1
03b1 01cc       |    |		Execute	Vector,Catenate
03b2 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
03b4 8225       | %  |		Call	0x1,0x25
03b5 c5fd       |    |		Store	0x2,-0x3
03b6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03b7 e018       |    |		Load	0x0,0x18
03b8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03b9 e010       |    |		Load	0x0,0x10
03ba 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03bb 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03bc c5fe       |    |		Store	0x2,-0x2
03bd e010       |    |		Load	0x0,0x10
03be 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03bf e018       |    |		Load	0x0,0x18
03c0 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03c1 e403       |    |		Load	0x2,0x3
03c2 e010       |    |		Load	0x0,0x10
03c3 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03c4 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03c5 c402       |    |		Store	0x2,0x2
03c6 00db       |    |		Load_Top	At_Offset_3
03c7 6814       |h   |		Jump_Zero	0x3dc
03c8 e5fd       |    |		Load	0x2,-0x3
03c9 4802       |H   |		Short_Literal	0x2
03ca 0092 07fa  |    |		Action	Push_String_Extended,0x7fa					; "Unable to default context to "
03cc e5ff       |    |		Load	0x2,-0x1
03cd 01cc       |    |		Execute	Vector,Catenate
03ce 0092 07f9  |    |		Action	Push_String_Extended,0x7f9					; ".  Error Status = "
03d0 01cc       |    |		Execute	Vector,Catenate
03d1 e402       |    |		Load	0x2,0x2
03d2 e010       |    |		Load	0x0,0x10
03d3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03d4 011c       |    |		Execute	Any,Convert_Unchecked
03d5 1c01       |    |		Execute_Immediate	Run_Utility,0x1
03d6 01cc       |    |		Execute	Vector,Catenate
03d7 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
03d9 8225       | %  |		Call	0x1,0x25
03da c5fd       |    |		Store	0x2,-0x3
03db 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03dc 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03dd 0000 0000  |    |		.XXX[0x3]
03df 0000       |    |
03e0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
03e4 0000 0000  |    |		.BLANK	0000[0x4]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03ed       |    |		.CONST	0x03ed								; Address of begin
03e9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ea 0002       |    |		.CONST	0x0002								; Number of locals
03eb			INIT_03e8:
03eb e010       |    |		Load	0x0,0x10
03ec 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03ed			BODY_03e8:
03ed e010       |    |		Load	0x0,0x10
03ee 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03ef e018       |    |		Load	0x0,0x18
03f0 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03f1 e5ff       |    |		Load	0x2,-0x1
03f2 e010       |    |		Load	0x0,0x10
03f3 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03f4 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03f5 0059       | Y  |		Store_Top	Discrete,At_Offset_1
03f6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03f7 0000       |    |		.XXX[0x1]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 040a       |    |		.CONST	0x040a								; Address of begin
03f9 0465       | e  |		.CONST	0x0465								; Address of exception handler
03fa 0004       |    |		.CONST	0x0004								; Number of locals
03fb			INIT_03f8:
03fb e00e       |    |		Load	0x0,0xe
03fc 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
03fd 02c7       |    |		Declare_Variable	Any
03fe 00d8       |    |		Load_Top	At_Offset_0
03ff 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0400 e00f       |    |		Load	0x0,0xf
0401 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0402 02c7       |    |		Declare_Variable	Any
0403 00d8       |    |		Load_Top	At_Offset_0
0404 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0405 0092 07fb  |    |		Action	Push_String_Extended,0x7fb					; "mkdir "
0407 e5ff       |    |		Load	0x2,-0x1
0408 01cc       |    |		Execute	Vector,Catenate
0409 0007       |    |		Action	Break_Optional
040a			BODY_03f8:
040a e013       |    |		Load	0x0,0x13
040b 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
040c 4801       |H   |		Short_Literal	0x1
040d 0092 07fc  |    |		Action	Push_String_Extended,0x7fc					; "Creating remote directory = "
040f e5ff       |    |		Load	0x2,-0x1
0410 01cc       |    |		Execute	Vector,Catenate
0411 e014       |    |		Load	0x0,0x14
0412 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0413 e5fc       |    |		Load	0x2,-0x4
0414 00db       |    |		Load_Top	At_Offset_3
0415 0120       |    |		Execute	Any,Is_Value
0416 6803       |h   |		Jump_Zero	0x41a
0417 e00e       |    |		Load	0x0,0xe
0418 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0419 7801       |x   |		Jump	0x41b
041a 00db       |    |		Load_Top	At_Offset_3
041b e5fd       |    |		Load	0x2,-0x3
041c e015       |    |		Load	0x0,0x15
041d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
041e e015       |    |		Load	0x0,0x15
041f 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0420 e5fe       |    |		Load	0x2,-0x2
0421 0092 07db  |    |		Action	Push_String_Extended,0x7db					; "Rs6000_Aix_Ibm"
0423 e00e       |    |		Load	0x0,0xe
0424 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0425 c402       |    |		Store	0x2,0x2
0426 c5fc       |    |		Store	0x2,-0x4
0427 4801       |H   |		Short_Literal	0x1
0428 e5fc       |    |		Load	0x2,-0x4
0429 e00f       |    |		Load	0x0,0xf
042a 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
042b 6813       |h   |		Jump_Zero	0x43f
042c e013       |    |		Load	0x0,0x13
042d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
042e 4805       |H   |		Short_Literal	0x5
042f e5fc       |    |		Load	0x2,-0x4
0430 e00f       |    |		Load	0x0,0xf
0431 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0432 e014       |    |		Load	0x0,0x14
0433 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0434 e5fc       |    |		Load	0x2,-0x4
0435 4802       |H   |		Short_Literal	0x2
0436 0092 07dc  |    |		Action	Push_String_Extended,0x7dc					; "Unable to acquire connection to "
0438 e5fe       |    |		Load	0x2,-0x2
0439 01cc       |    |		Execute	Vector,Catenate
043a 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
043c 8225       | %  |		Call	0x1,0x25
043d c5fc       |    |		Store	0x2,-0x4
043e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
043f e5fc       |    |		Load	0x2,-0x4
0440 4800       |H   |		Short_Literal	0x0
0441 4801       |H   |		Short_Literal	0x1
0442 4800       |H   |		Short_Literal	0x0
0443 4800       |H   |		Short_Literal	0x0
0444 00ea       |    |		Load_Encached	Null_String_Cache
0445 e402       |    |		Load	0x2,0x2
0446 e404       |    |		Load	0x2,0x4
0447 e00e       |    |		Load	0x0,0xe
0448 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0449 c5fc       |    |		Store	0x2,-0x4
044a 4801       |H   |		Short_Literal	0x1
044b e5fc       |    |		Load	0x2,-0x4
044c e00f       |    |		Load	0x0,0xf
044d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
044e 6815       |h   |		Jump_Zero	0x464
044f e013       |    |		Load	0x0,0x13
0450 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0451 4805       |H   |		Short_Literal	0x5
0452 e5fc       |    |		Load	0x2,-0x4
0453 e00f       |    |		Load	0x0,0xf
0454 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0455 e014       |    |		Load	0x0,0x14
0456 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0457 e5fc       |    |		Load	0x2,-0x4
0458 4802       |H   |		Short_Literal	0x2
0459 0092 07fd  |    |		Action	Push_String_Extended,0x7fd					; "Unable to create the remote directory, "
045b e5ff       |    |		Load	0x2,-0x1
045c 01cc       |    |		Execute	Vector,Catenate
045d 0092 07da  |    |		Action	Push_String_Extended,0x7da					; "."
045f 01cc       |    |		Execute	Vector,Catenate
0460 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
0462 8225       | %  |		Call	0x1,0x25
0463 c5fc       |    |		Store	0x2,-0x4
0464 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0465			TRAP_03f8:
0465 0007       |    |		Action	Break_Optional
0466 e5fc       |    |		Load	0x2,-0x4
0467 0092 07fe  |    |		Action	Push_String_Extended,0x7fe					; "Create_Remote_Directory"
0469 8226       | &  |		Call	0x1,0x26
046a c5fc       |    |		Store	0x2,-0x4
046b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
046c 0000 0000  |    |		.BLANK	0000[0x4]
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0482       |    |		.CONST	0x0482								; Address of begin
0471 04e5       |    |		.CONST	0x04e5								; Address of exception handler
0472 0004       |    |		.CONST	0x0004								; Number of locals
0473			INIT_0470:
0473 e00e       |    |		Load	0x0,0xe
0474 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0475 02c7       |    |		Declare_Variable	Any
0476 00d8       |    |		Load_Top	At_Offset_0
0477 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0478 e00f       |    |		Load	0x0,0xf
0479 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
047a 02c7       |    |		Declare_Variable	Any
047b 00d8       |    |		Load_Top	At_Offset_0
047c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
047d 0092 07ff  |    |		Action	Push_String_Extended,0x7ff					; "rm -r "
047f e5ff       |    |		Load	0x2,-0x1
0480 01cc       |    |		Execute	Vector,Catenate
0481 0007       |    |		Action	Break_Optional
0482			BODY_0470:
0482 e013       |    |		Load	0x0,0x13
0483 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0484 4801       |H   |		Short_Literal	0x1
0485 0092 0800  |    |		Action	Push_String_Extended,0x800					; "Destroying Remote Directory = "
0487 e5ff       |    |		Load	0x2,-0x1
0488 01cc       |    |		Execute	Vector,Catenate
0489 e014       |    |		Load	0x0,0x14
048a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
048b e5fc       |    |		Load	0x2,-0x4
048c 00db       |    |		Load_Top	At_Offset_3
048d 0120       |    |		Execute	Any,Is_Value
048e 6803       |h   |		Jump_Zero	0x492
048f e00e       |    |		Load	0x0,0xe
0490 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0491 7801       |x   |		Jump	0x493
0492 00db       |    |		Load_Top	At_Offset_3
0493 e5fd       |    |		Load	0x2,-0x3
0494 e015       |    |		Load	0x0,0x15
0495 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0496 e015       |    |		Load	0x0,0x15
0497 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0498 e5fe       |    |		Load	0x2,-0x2
0499 00ea       |    |		Load_Encached	Null_String_Cache
049a 0092 07f0  |    |		Action	Push_String_Extended,0x7f0					; "cd "
049c e5ff       |    |		Load	0x2,-0x1
049d 01cc       |    |		Execute	Vector,Catenate
049e 0092 0801  |    |		Action	Push_String_Extended,0x801					; "/.."
04a0 01cc       |    |		Execute	Vector,Catenate
04a1 0092 07db  |    |		Action	Push_String_Extended,0x7db					; "Rs6000_Aix_Ibm"
04a3 e00e       |    |		Load	0x0,0xe
04a4 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
04a5 c402       |    |		Store	0x2,0x2
04a6 c5fc       |    |		Store	0x2,-0x4
04a7 4801       |H   |		Short_Literal	0x1
04a8 e5fc       |    |		Load	0x2,-0x4
04a9 e00f       |    |		Load	0x0,0xf
04aa 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
04ab 6813       |h   |		Jump_Zero	0x4bf
04ac e013       |    |		Load	0x0,0x13
04ad 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
04ae 4805       |H   |		Short_Literal	0x5
04af e5fc       |    |		Load	0x2,-0x4
04b0 e00f       |    |		Load	0x0,0xf
04b1 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
04b2 e014       |    |		Load	0x0,0x14
04b3 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04b4 e5fc       |    |		Load	0x2,-0x4
04b5 4802       |H   |		Short_Literal	0x2
04b6 0092 07dc  |    |		Action	Push_String_Extended,0x7dc					; "Unable to acquire connection to "
04b8 e5fe       |    |		Load	0x2,-0x2
04b9 01cc       |    |		Execute	Vector,Catenate
04ba 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
04bc 8225       | %  |		Call	0x1,0x25
04bd c5fc       |    |		Store	0x2,-0x4
04be 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04bf e5fc       |    |		Load	0x2,-0x4
04c0 4800       |H   |		Short_Literal	0x0
04c1 4801       |H   |		Short_Literal	0x1
04c2 4800       |H   |		Short_Literal	0x0
04c3 4800       |H   |		Short_Literal	0x0
04c4 00ea       |    |		Load_Encached	Null_String_Cache
04c5 e402       |    |		Load	0x2,0x2
04c6 e404       |    |		Load	0x2,0x4
04c7 e00e       |    |		Load	0x0,0xe
04c8 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
04c9 c5fc       |    |		Store	0x2,-0x4
04ca 4801       |H   |		Short_Literal	0x1
04cb e5fc       |    |		Load	0x2,-0x4
04cc e00f       |    |		Load	0x0,0xf
04cd 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
04ce 6815       |h   |		Jump_Zero	0x4e4
04cf e013       |    |		Load	0x0,0x13
04d0 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
04d1 4805       |H   |		Short_Literal	0x5
04d2 e5fc       |    |		Load	0x2,-0x4
04d3 e00f       |    |		Load	0x0,0xf
04d4 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
04d5 e014       |    |		Load	0x0,0x14
04d6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04d7 e5fc       |    |		Load	0x2,-0x4
04d8 4802       |H   |		Short_Literal	0x2
04d9 0092 0802  |    |		Action	Push_String_Extended,0x802					; "Unable to destroy the remote directory/library, "
04db e5ff       |    |		Load	0x2,-0x1
04dc 01cc       |    |		Execute	Vector,Catenate
04dd 0092 07da  |    |		Action	Push_String_Extended,0x7da					; "."
04df 01cc       |    |		Execute	Vector,Catenate
04e0 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
04e2 8225       | %  |		Call	0x1,0x25
04e3 c5fc       |    |		Store	0x2,-0x4
04e4 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04e5			TRAP_0470:
04e5 0007       |    |		Action	Break_Optional
04e6 e5fc       |    |		Load	0x2,-0x4
04e7 0092 0803  |    |		Action	Push_String_Extended,0x803					; "Destroy_Remote_Library"
04e9 8226       | &  |		Call	0x1,0x26
04ea c5fc       |    |		Store	0x2,-0x4
04eb 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04ec 0000 0000  |    |		.BLANK	0000[0x4]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f8       |    |		.CONST	0x04f8								; Address of begin
04f1 0530       | 0  |		.CONST	0x0530								; Address of exception handler
04f2 0002       |    |		.CONST	0x0002								; Number of locals
04f3			INIT_04f0:
04f3 e00e       |    |		Load	0x0,0xe
04f4 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
04f5 02c7       |    |		Declare_Variable	Any
04f6 00d8       |    |		Load_Top	At_Offset_0
04f7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04f8			BODY_04f0:
04f8 4800       |H   |		Short_Literal	0x0
04f9 a5fb       |    |		Store_Unchecked	0x2,-0x5
04fa e5fc       |    |		Load	0x2,-0x4
04fb 00d9       |    |		Load_Top	At_Offset_1
04fc 0120       |    |		Execute	Any,Is_Value
04fd 6803       |h   |		Jump_Zero	0x501
04fe e00e       |    |		Load	0x0,0xe
04ff 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0500 7801       |x   |		Jump	0x502
0501 00d9       |    |		Load_Top	At_Offset_1
0502 e5fd       |    |		Load	0x2,-0x3
0503 e015       |    |		Load	0x0,0x15
0504 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0505 e015       |    |		Load	0x0,0x15
0506 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0507 e5fe       |    |		Load	0x2,-0x2
0508 0092 07db  |    |		Action	Push_String_Extended,0x7db					; "Rs6000_Aix_Ibm"
050a e00e       |    |		Load	0x0,0xe
050b 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
050c c402       |    |		Store	0x2,0x2
050d c5fc       |    |		Store	0x2,-0x4
050e 4801       |H   |		Short_Literal	0x1
050f e5fc       |    |		Load	0x2,-0x4
0510 e00f       |    |		Load	0x0,0xf
0511 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0512 6813       |h   |		Jump_Zero	0x526
0513 e013       |    |		Load	0x0,0x13
0514 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0515 4805       |H   |		Short_Literal	0x5
0516 e5fc       |    |		Load	0x2,-0x4
0517 e00f       |    |		Load	0x0,0xf
0518 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0519 e014       |    |		Load	0x0,0x14
051a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
051b e5fc       |    |		Load	0x2,-0x4
051c 4802       |H   |		Short_Literal	0x2
051d 0092 07dc  |    |		Action	Push_String_Extended,0x7dc					; "Unable to acquire connection to "
051f e5fe       |    |		Load	0x2,-0x2
0520 01cc       |    |		Execute	Vector,Catenate
0521 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
0523 8225       | %  |		Call	0x1,0x25
0524 c5fc       |    |		Store	0x2,-0x4
0525 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0526 00e1       |    |		Load_Encached	Boolean_Cache
0527 e5fc       |    |		Load	0x2,-0x4
0528 4800       |H   |		Short_Literal	0x0
0529 00db       |    |		Load_Top	At_Offset_3
052a e5ff       |    |		Load	0x2,-0x1
052b e00e       |    |		Load	0x0,0xe
052c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
052d c5fc       |    |		Store	0x2,-0x4
052e c5fb       |    |		Store	0x2,-0x5
052f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0530			TRAP_04f0:
0530 0007       |    |		Action	Break_Optional
0531 e5fc       |    |		Load	0x2,-0x4
0532 0092 0804  |    |		Action	Push_String_Extended,0x804					; "File_Exists"
0534 8226       | &  |		Call	0x1,0x26
0535 c5fc       |    |		Store	0x2,-0x4
0536 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0537 0000       |    |		.XXX[0x1]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 053b       | ;  |		.CONST	0x053b								; Address of begin
0539 0544       | D  |		.CONST	0x0544								; Address of exception handler
053a 0001       |    |		.CONST	0x0001								; Number of locals
053b			BODY_0538:
053b			INIT_0538:
053b 00e1       |    |		Load_Encached	Boolean_Cache
053c e5fc       |    |		Load	0x2,-0x4
053d e5fd       |    |		Load	0x2,-0x3
053e e5ff       |    |		Load	0x2,-0x1
053f e5fe       |    |		Load	0x2,-0x2
0540 822b       | +  |		Call	0x1,0x2b
0541 c5fc       |    |		Store	0x2,-0x4
0542 c5fb       |    |		Store	0x2,-0x5
0543 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0544			TRAP_0538:
0544 0007       |    |		Action	Break_Optional
0545 e5fc       |    |		Load	0x2,-0x4
0546 0092 0805  |    |		Action	Push_String_Extended,0x805					; "Directory_Exists"
0548 8226       | &  |		Call	0x1,0x26
0549 c5fc       |    |		Store	0x2,-0x4
054a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
054b 0000 0000  |    |		.BLANK	0000[0x5]
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 059e       |    |		.CONST	0x059e								; Address of begin
0551 060f       |    |		.CONST	0x060f								; Address of exception handler
0552 0010       |    |		.CONST	0x0010								; Number of locals
0553			INIT_0550:
0553 e010       |    |		Load	0x0,0x10
0554 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0555 02c7       |    |		Declare_Variable	Any
0556 00d8       |    |		Load_Top	At_Offset_0
0557 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0558 e010       |    |		Load	0x0,0x10
0559 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
055a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
055b e00f       |    |		Load	0x0,0xf
055c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
055d 02c7       |    |		Declare_Variable	Any
055e 00d8       |    |		Load_Top	At_Offset_0
055f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0560 e016       |    |		Load	0x0,0x16
0561 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0562 02c7       |    |		Declare_Variable	Any
0563 00d8       |    |		Load_Top	At_Offset_0
0564 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0565 e01a       |    |		Load	0x0,0x1a
0566 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0567 02c7       |    |		Declare_Variable	Any
0568 00d8       |    |		Load_Top	At_Offset_0
0569 1c00       |    |		Execute_Immediate	Run_Utility,0x0
056a e010       |    |		Load	0x0,0x10
056b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
056c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
056d 02c7       |    |		Declare_Variable	Any
056e 00d8       |    |		Load_Top	At_Offset_0
056f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0570 e013       |    |		Load	0x0,0x13
0571 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0572 e5ff       |    |		Load	0x2,-0x1
0573 e01b       |    |		Load	0x0,0x1b
0574 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0575 e013       |    |		Load	0x0,0x13
0576 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0577 e5ff       |    |		Load	0x2,-0x1
0578 e01b       |    |		Load	0x0,0x1b
0579 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
057a e013       |    |		Load	0x0,0x13
057b 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
057c e5ff       |    |		Load	0x2,-0x1
057d e01b       |    |		Load	0x0,0x1b
057e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
057f 4801       |H   |		Short_Literal	0x1
0580 00db       |    |		Load_Top	At_Offset_3
0581 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0582 e408       |    |		Load	0x2,0x8
0583 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0584 01cf       |    |		Execute	Vector,Slice_Read
0585 0007       |    |		Action	Break_Optional
0586 4801       |H   |		Short_Literal	0x1
0587 00db       |    |		Load_Top	At_Offset_3
0588 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0589 e409       |    |		Load	0x2,0x9
058a 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
058b 01cf       |    |		Execute	Vector,Slice_Read
058c 0007       |    |		Action	Break_Optional
058d 4801       |H   |		Short_Literal	0x1
058e 00db       |    |		Load_Top	At_Offset_3
058f 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0590 e40a       |    |		Load	0x2,0xa
0591 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0592 01cf       |    |		Execute	Vector,Slice_Read
0593 0007       |    |		Action	Break_Optional
0594 e5ff       |    |		Load	0x2,-0x1
0595 0092 07ed  |    |		Action	Push_String_Extended,0x7ed					; ".State.Tool_State."
0597 01cc       |    |		Execute	Vector,Catenate
0598 e221       | !  |		Load	0x1,0x21
0599 01cc       |    |		Execute	Vector,Catenate
059a 0007       |    |		Action	Break_Optional
059b 00e1       |    |		Load_Encached	Boolean_Cache
059c 029f 06db  |    |		Declare_Subprogram	INIT_06d8,For_Call
059e			BODY_0550:
059e e013       |    |		Load	0x0,0x13
059f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05a0 4801       |H   |		Short_Literal	0x1
05a1 0092 0806  |    |		Action	Push_String_Extended,0x806					; "Refreshing imports for target library = "
05a3 e40c       |    |		Load	0x2,0xc
05a4 01cc       |    |		Execute	Vector,Catenate
05a5 0092 07d7  |    |		Action	Push_String_Extended,0x7d7					; "/"
05a7 01cc       |    |		Execute	Vector,Catenate
05a8 e40d       |    |		Load	0x2,0xd
05a9 01cc       |    |		Execute	Vector,Catenate
05aa e014       |    |		Load	0x0,0x14
05ab 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05ac e5ff       |    |		Load	0x2,-0x1
05ad 01db       |    |		Execute	Vector,Length
05ae 7009       |p   |		Jump_Nonzero	0x5b8
05af e5fd       |    |		Load	0x2,-0x3
05b0 4802       |H   |		Short_Literal	0x2
05b1 0092 0807  |    |		Action	Push_String_Extended,0x807					; "A null Host_View was supplied to Remote_Library_Integration.Refresh_Imports"
05b3 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
05b5 8225       | %  |		Call	0x1,0x25
05b6 c5fd       |    |		Store	0x2,-0x3
05b7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05b8 e5fd       |    |		Load	0x2,-0x3
05b9 e407       |    |		Load	0x2,0x7
05ba e5ff       |    |		Load	0x2,-0x1
05bb 8227       | '  |		Call	0x1,0x27
05bc c407       |    |		Store	0x2,0x7
05bd c5fd       |    |		Store	0x2,-0x3
05be e010       |    |		Load	0x0,0x10
05bf 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05c0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05c1 e402       |    |		Load	0x2,0x2
05c2 0120       |    |		Execute	Any,Is_Value
05c3 6803       |h   |		Jump_Zero	0x5c7
05c4 e010       |    |		Load	0x0,0x10
05c5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05c6 7801       |x   |		Jump	0x5c8
05c7 e402       |    |		Load	0x2,0x2
05c8 604b       |`K  |		Indirect_Literal	Discrete,0x614,{0x00000000, 0x00004000}
05c9 e017       |    |		Load	0x0,0x17
05ca 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05cb e018       |    |		Load	0x0,0x18
05cc 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
05cd e010       |    |		Load	0x0,0x10
05ce 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05cf 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05d0 e40e       |    |		Load	0x2,0xe
05d1 e010       |    |		Load	0x0,0x10
05d2 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05d3 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
05d4 c402       |    |		Store	0x2,0x2
05d5 c403       |    |		Store	0x2,0x3
05d6 8410       |    |		Call	0x2,0x10
05d7 4801       |H   |		Short_Literal	0x1
05d8 e5fd       |    |		Load	0x2,-0x3
05d9 e00f       |    |		Load	0x0,0xf
05da 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
05db 680a       |h   |		Jump_Zero	0x5e6
05dc e013       |    |		Load	0x0,0x13
05dd 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05de 4805       |H   |		Short_Literal	0x5
05df 0092 0808  |    |		Action	Push_String_Extended,0x808					; "Unable to update remote imports."
05e1 e014       |    |		Load	0x0,0x14
05e2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05e3 e407       |    |		Load	0x2,0x7
05e4 8228       | (  |		Call	0x1,0x28
05e5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05e6 e40c       |    |		Load	0x2,0xc
05e7 01db       |    |		Execute	Vector,Length
05e8 6823       |h#  |		Jump_Zero	0x60c
05e9 00e1       |    |		Load_Encached	Boolean_Cache
05ea e5fd       |    |		Load	0x2,-0x3
05eb e5fe       |    |		Load	0x2,-0x2
05ec e40c       |    |		Load	0x2,0xc
05ed e40b       |    |		Load	0x2,0xb
05ee 822c       | ,  |		Call	0x1,0x2c
05ef c5fd       |    |		Store	0x2,-0x3
05f0 005a       | Z  |		Store_Top	Discrete,At_Offset_2
05f1 00d9       |    |		Load_Top	At_Offset_1
05f2 6808       |h   |		Jump_Zero	0x5fb
05f3 e5fd       |    |		Load	0x2,-0x3
05f4 e40b       |    |		Load	0x2,0xb
05f5 e40c       |    |		Load	0x2,0xc
05f6 e222       | "  |		Load	0x1,0x22
05f7 e40e       |    |		Load	0x2,0xe
05f8 8219       |    |		Call	0x1,0x19
05f9 c5fd       |    |		Store	0x2,-0x3
05fa 7811       |x   |		Jump	0x60c
05fb e013       |    |		Load	0x0,0x13
05fc 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05fd 4806       |H   |		Short_Literal	0x6
05fe e5ff       |    |		Load	0x2,-0x1
05ff 0092 0809  |    |		Action	Push_String_Extended,0x809					; " has not been built on the target."
0601 01cc       |    |		Execute	Vector,Catenate
0602 0092 080a  |    |		Action	Push_String_Extended,0x80a					; " Will not attempt to download "
0604 01cc       |    |		Execute	Vector,Catenate
0605 e40e       |    |		Load	0x2,0xe
0606 01cc       |    |		Execute	Vector,Catenate
0607 0092 07da  |    |		Action	Push_String_Extended,0x7da					; "."
0609 01cc       |    |		Execute	Vector,Catenate
060a e014       |    |		Load	0x0,0x14
060b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
060c e407       |    |		Load	0x2,0x7
060d 8228       | (  |		Call	0x1,0x28
060e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
060f			TRAP_0550:
060f 0007       |    |		Action	Break_Optional
0610 e407       |    |		Load	0x2,0x7
0611 8228       | (  |		Call	0x1,0x28
0612 00d8       |    |		Load_Top	At_Offset_0
0613 0101       |    |		Execute	Exception,Reraise
0614 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 0629       | )  |		.CONST	0x0629								; Address of begin
0619 0004       |    |		.CONST	0x0004								; Address of exception handler
061a 0003       |    |		.CONST	0x0003								; Number of locals
061b			INIT_0618:
061b 00da       |    |		Load_Top	At_Offset_2
061c 0092 07ed  |    |		Action	Push_String_Extended,0x7ed					; ".State.Tool_State."
061e 01cc       |    |		Execute	Vector,Catenate
061f e221       | !  |		Load	0x1,0x21
0620 01cc       |    |		Execute	Vector,Catenate
0621 0007       |    |		Action	Break_Optional
0622 e5fe       |    |		Load	0x2,-0x2
0623 0092 07d7  |    |		Action	Push_String_Extended,0x7d7					; "/"
0625 01cc       |    |		Execute	Vector,Catenate
0626 e222       | "  |		Load	0x1,0x22
0627 01cc       |    |		Execute	Vector,Catenate
0628 0007       |    |		Action	Break_Optional
0629			BODY_0618:
0629 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
062a 0000 0000  |    |		.BLANK	0000[0x6]
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 0639       | 9  |		.CONST	0x0639								; Address of begin
0631 0004       |    |		.CONST	0x0004								; Address of exception handler
0632 0002       |    |		.CONST	0x0002								; Number of locals
0633			INIT_0630:
0633 00da       |    |		Load_Top	At_Offset_2
0634 e010       |    |		Load	0x0,0x10
0635 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0636 e010       |    |		Load	0x0,0x10
0637 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
0638 03f1       |    |		Declare_Variable	Discrete,With_Value
0639			BODY_0630:
0639 00d8       |    |		Load_Top	At_Offset_0
063a e01c       |    |		Load	0x0,0x1c
063b 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
063c 027f       |    |		Execute	Discrete,Equal
063d 700c       |p   |		Jump_Nonzero	0x64a
063e 00d8       |    |		Load_Top	At_Offset_0
063f e01c       |    |		Load	0x0,0x1c
0640 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0641 027f       |    |		Execute	Discrete,Equal
0642 7005       |p   |		Jump_Nonzero	0x648
0643 00d8       |    |		Load_Top	At_Offset_0
0644 e01c       |    |		Load	0x0,0x1c
0645 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0646 027f       |    |		Execute	Discrete,Equal
0647 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0648 4801       |H   |		Short_Literal	0x1
0649 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
064a 4801       |H   |		Short_Literal	0x1
064b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
064c 0000 0000  |    |		.BLANK	0000[0x4]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0663       | c  |		.CONST	0x0663								; Address of begin
0651 0004       |    |		.CONST	0x0004								; Address of exception handler
0652 0005       |    |		.CONST	0x0005								; Number of locals
0653			INIT_0650:
0653 e010       |    |		Load	0x0,0x10
0654 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0655 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0656 e010       |    |		Load	0x0,0x10
0657 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0658 02c7       |    |		Declare_Variable	Any
0659 e5ff       |    |		Load	0x2,-0x1
065a a403       |    |		Store_Unchecked	0x2,0x3
065b e010       |    |		Load	0x0,0x10
065c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
065d e010       |    |		Load	0x0,0x10
065e 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
065f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0660 02c7       |    |		Declare_Variable	Any
0661 00d8       |    |		Load_Top	At_Offset_0
0662 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0663			BODY_0650:
0663 00da       |    |		Load_Top	At_Offset_2
0664 822f       | /  |		Call	0x1,0x2f
0665 6802       |h   |		Jump_Zero	0x668
0666 00da       |    |		Load_Top	At_Offset_2
0667 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0668 e010       |    |		Load	0x0,0x10
0669 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
066a 00d9       |    |		Load_Top	At_Offset_1
066b 0120       |    |		Execute	Any,Is_Value
066c 6804       |h   |		Jump_Zero	0x671
066d e010       |    |		Load	0x0,0x10
066e 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
066f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0670 7801       |x   |		Jump	0x672
0671 00d9       |    |		Load_Top	At_Offset_1
0672 e403       |    |		Load	0x2,0x3
0673 e010       |    |		Load	0x0,0x10
0674 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0675 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0676 c405       |    |		Store	0x2,0x5
0677 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0678 00d9       |    |		Load_Top	At_Offset_1
0679 6803       |h   |		Jump_Zero	0x67d
067a e010       |    |		Load	0x0,0x10
067b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
067c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
067d 00d8       |    |		Load_Top	At_Offset_0
067e e010       |    |		Load	0x0,0x10
067f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0680 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0681 c403       |    |		Store	0x2,0x3
0682 00da       |    |		Load_Top	At_Offset_2
0683 822f       | /  |		Call	0x1,0x2f
0684 6802       |h   |		Jump_Zero	0x687
0685 00da       |    |		Load_Top	At_Offset_2
0686 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0687 e010       |    |		Load	0x0,0x10
0688 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0689 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
068a 0000 0000  |    |		.BLANK	0000[0x6]
0690 ; --------------------------------------------------------------------------------------
0690 ; SUBPROGRAM
0690 ; --------------------------------------------------------------------------------------
0690 069b       |    |		.CONST	0x069b								; Address of begin
0691 0004       |    |		.CONST	0x0004								; Address of exception handler
0692 0003       |    |		.CONST	0x0003								; Number of locals
0693			INIT_0690:
0693 e010       |    |		Load	0x0,0x10
0694 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0695 02c7       |    |		Declare_Variable	Any
0696 00d8       |    |		Load_Top	At_Offset_0
0697 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0698 e010       |    |		Load	0x0,0x10
0699 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
069a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
069b			BODY_0690:
069b e010       |    |		Load	0x0,0x10
069c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
069d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
069e 00da       |    |		Load_Top	At_Offset_2
069f 0120       |    |		Execute	Any,Is_Value
06a0 6803       |h   |		Jump_Zero	0x6a4
06a1 e010       |    |		Load	0x0,0x10
06a2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
06a3 7801       |x   |		Jump	0x6a5
06a4 00da       |    |		Load_Top	At_Offset_2
06a5 601e       |`   |		Indirect_Literal	Discrete,0x6c4,{0x00000000, 0x00004000}
06a6 e017       |    |		Load	0x0,0x17
06a7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06a8 e018       |    |		Load	0x0,0x18
06a9 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
06aa e010       |    |		Load	0x0,0x10
06ab 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
06ac 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
06ad e5ff       |    |		Load	0x2,-0x1
06ae e010       |    |		Load	0x0,0x10
06af 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
06b0 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
06b1 c402       |    |		Store	0x2,0x2
06b2 0059       | Y  |		Store_Top	Discrete,At_Offset_1
06b3 00d8       |    |		Load_Top	At_Offset_0
06b4 680c       |h   |		Jump_Zero	0x6c1
06b5 e013       |    |		Load	0x0,0x13
06b6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
06b7 4806       |H   |		Short_Literal	0x6
06b8 e5ff       |    |		Load	0x2,-0x1
06b9 0092 080b  |    |		Action	Push_String_Extended,0x80b					; " does not exist"
06bb 01cc       |    |		Execute	Vector,Catenate
06bc e014       |    |		Load	0x0,0x14
06bd 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06be e010       |    |		Load	0x0,0x10
06bf 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
06c0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06c1 00d9       |    |		Load_Top	At_Offset_1
06c2 8230       | 0  |		Call	0x1,0x30
06c3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06c4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06cb       |    |		.CONST	0x06cb								; Address of begin
06c9 06d0       |    |		.CONST	0x06d0								; Address of exception handler
06ca 0001       |    |		.CONST	0x0001								; Number of locals
06cb			BODY_06c8:
06cb			INIT_06c8:
06cb e405       |    |		Load	0x2,0x5
06cc e016       |    |		Load	0x0,0x16
06cd 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
06ce c405       |    |		Store	0x2,0x5
06cf 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
06d0			TRAP_06c8:
06d0 0007       |    |		Action	Break_Optional
06d1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
06d2 0000 0000  |    |		.BLANK	0000[0x6]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; SUBPROGRAM
06d8 ; --------------------------------------------------------------------------------------
06d8 06e1       |    |		.CONST	0x06e1								; Address of begin
06d9 074d       | M  |		.CONST	0x074d								; Address of exception handler
06da 0004       |    |		.CONST	0x0004								; Number of locals
06db			INIT_06d8:
06db 029f 075b  |   [|		Declare_Subprogram	INIT_0758,For_Call
06dd 029f 0783  |    |		Declare_Subprogram	INIT_0780,For_Call
06df 029f 07ab  |    |		Declare_Subprogram	INIT_07a8,For_Call
06e1			BODY_06d8:
06e1 e403       |    |		Load	0x2,0x3
06e2 460e       |F   |		Jump_Case	0xf
06e3 7826       |x&  |		Jump	0x70a								; case 0x0
06e4 780d       |x   |		Jump	0x6f2								; case 0x1
06e5 780c       |x   |		Jump	0x6f2								; case 0x2
06e6 7825       |x%  |		Jump	0x70c								; case 0x3
06e7 780a       |x   |		Jump	0x6f2								; case 0x4
06e8 7809       |x   |		Jump	0x6f2								; case 0x5
06e9 7808       |x   |		Jump	0x6f2								; case 0x6
06ea 7807       |x   |		Jump	0x6f2								; case 0x7
06eb 7806       |x   |		Jump	0x6f2								; case 0x8
06ec 7805       |x   |		Jump	0x6f2								; case 0x9
06ed 7804       |x   |		Jump	0x6f2								; case 0xa
06ee 7803       |x   |		Jump	0x6f2								; case 0xb
06ef 7802       |x   |		Jump	0x6f2								; case 0xc
06f0 7801       |x   |		Jump	0x6f2								; case 0xd
06f1 7800       |x   |		Jump	0x6f2								; case 0xe
06f2 e5fd       |    |		Load	0x2,-0x3
06f3 4802       |H   |		Short_Literal	0x2
06f4 0092 07e6  |    |		Action	Push_String_Extended,0x7e6					; "Unable to resolve "
06f6 e40e       |    |		Load	0x2,0xe
06f7 01cc       |    |		Execute	Vector,Catenate
06f8 0092 07e7  |    |		Action	Push_String_Extended,0x7e7					; ". Status ="
06fa 01cc       |    |		Execute	Vector,Catenate
06fb e403       |    |		Load	0x2,0x3
06fc e010       |    |		Load	0x0,0x10
06fd 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
06fe 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
06ff 011c       |    |		Execute	Any,Convert_Unchecked
0700 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0701 01cc       |    |		Execute	Vector,Catenate
0702 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
0704 8225       | %  |		Call	0x1,0x25
0705 c5fd       |    |		Store	0x2,-0x3
0706 e407       |    |		Load	0x2,0x7
0707 8228       | (  |		Call	0x1,0x28
0708 00cc       |    |		Action	Pop_Block
0709 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
070a 8602       |    |		Call	0x3,0x2
070b 7801       |x   |		Jump	0x70d
070c 8603       |    |		Call	0x3,0x3
070d e5fd       |    |		Load	0x2,-0x3
070e e406       |    |		Load	0x2,0x6
070f e013       |    |		Load	0x0,0x13
0710 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0711 4801       |H   |		Short_Literal	0x1
0712 e5ff       |    |		Load	0x2,-0x1
0713 e01a       |    |		Load	0x0,0x1a
0714 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0715 c406       |    |		Store	0x2,0x6
0716 c5fd       |    |		Store	0x2,-0x3
0717 0092 07e8  |    |		Action	Push_String_Extended,0x7e8					; "-- Host_View => "
0719 e5ff       |    |		Load	0x2,-0x1
071a 01cc       |    |		Execute	Vector,Catenate
071b e405       |    |		Load	0x2,0x5
071c e016       |    |		Load	0x0,0x16
071d 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
071e e40d       |    |		Load	0x2,0xd
071f 01db       |    |		Execute	Vector,Length
0720 7005       |p   |		Jump_Nonzero	0x726
0721 e223       | #  |		Load	0x1,0x23
0722 e405       |    |		Load	0x2,0x5
0723 e016       |    |		Load	0x0,0x16
0724 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
0725 7804       |x   |		Jump	0x72a
0726 e40d       |    |		Load	0x2,0xd
0727 e405       |    |		Load	0x2,0x5
0728 e016       |    |		Load	0x0,0x16
0729 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
072a 4801       |H   |		Short_Literal	0x1
072b e5fd       |    |		Load	0x2,-0x3
072c e00f       |    |		Load	0x0,0xf
072d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
072e 680b       |h   |		Jump_Zero	0x73a
072f e013       |    |		Load	0x0,0x13
0730 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0731 4807       |H   |		Short_Literal	0x7
0732 0092 080c  |    |		Action	Push_String_Extended,0x80c					; "Get remote imports failed"
0734 e014       |    |		Load	0x0,0x14
0735 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0736 e407       |    |		Load	0x2,0x7
0737 8228       | (  |		Call	0x1,0x28
0738 00cc       |    |		Action	Pop_Block
0739 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
073a 00cf       |    |		Action	Mark_Auxiliary
073b 7802       |x   |		Jump	0x73e
073c 8604       |    |		Call	0x3,0x4
073d 00c9       |    |		Action	Pop_Auxiliary_Loop
073e e406       |    |		Load	0x2,0x6
073f e01a       |    |		Load	0x0,0x1a
0740 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0741 6ffa       |o   |		Jump_Zero	0x73c
0742 00ce       |    |		Action	Pop_Auxiliary
0743 0092 07e9  |    |		Action	Push_String_Extended,0x7e9					; "/usr/lpp/ada/lib/libada"
0745 e405       |    |		Load	0x2,0x5
0746 e016       |    |		Load	0x0,0x16
0747 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
0748 e405       |    |		Load	0x2,0x5
0749 e016       |    |		Load	0x0,0x16
074a 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
074b c405       |    |		Store	0x2,0x5
074c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
074d			TRAP_06d8:
074d 0007       |    |		Action	Break_Optional
074e e405       |    |		Load	0x2,0x5
074f e016       |    |		Load	0x0,0x16
0750 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0751 c405       |    |		Store	0x2,0x5
0752 00d8       |    |		Load_Top	At_Offset_0
0753 0101       |    |		Execute	Exception,Reraise
0754 0000 0000  |    |		.BLANK	0000[0x4]
0758 ; --------------------------------------------------------------------------------------
0758 ; SUBPROGRAM
0758 ; --------------------------------------------------------------------------------------
0758 075b       | [  |		.CONST	0x075b								; Address of begin
0759 0763       | c  |		.CONST	0x0763								; Address of exception handler
075a 0001       |    |		.CONST	0x0001								; Number of locals
075b			BODY_0758:
075b			INIT_0758:
075b e405       |    |		Load	0x2,0x5
075c 00ea       |    |		Load_Encached	Null_String_Cache
075d e40e       |    |		Load	0x2,0xe
075e 4801       |H   |		Short_Literal	0x1
075f e016       |    |		Load	0x0,0x16
0760 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0761 c405       |    |		Store	0x2,0x5
0762 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0763			TRAP_0758:
0763 0007       |    |		Action	Break_Optional
0764 e013       |    |		Load	0x0,0x13
0765 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0766 4807       |H   |		Short_Literal	0x7
0767 0092 080d  |    |		Action	Push_String_Extended,0x80d					; "Unable to open "
0769 e40e       |    |		Load	0x2,0xe
076a 01cc       |    |		Execute	Vector,Catenate
076b e014       |    |		Load	0x0,0x14
076c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
076d e5fd       |    |		Load	0x2,-0x3
076e 4802       |H   |		Short_Literal	0x2
076f 0092 080e  |    |		Action	Push_String_Extended,0x80e					; "Refresh imports failed "
0771 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
0773 8225       | %  |		Call	0x1,0x25
0774 c5fd       |    |		Store	0x2,-0x3
0775 e407       |    |		Load	0x2,0x7
0776 8228       | (  |		Call	0x1,0x28
0777 00cc       |    |		Action	Pop_Block
0778 00cc       |    |		Action	Pop_Block
0779 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
077a 0000 0000  |    |		.BLANK	0000[0x6]
0780 ; --------------------------------------------------------------------------------------
0780 ; SUBPROGRAM
0780 ; --------------------------------------------------------------------------------------
0780 0783       |    |		.CONST	0x0783								; Address of begin
0781 078b       |    |		.CONST	0x078b								; Address of exception handler
0782 0001       |    |		.CONST	0x0001								; Number of locals
0783			BODY_0780:
0783			INIT_0780:
0783 e405       |    |		Load	0x2,0x5
0784 00ea       |    |		Load_Encached	Null_String_Cache
0785 e40e       |    |		Load	0x2,0xe
0786 4801       |H   |		Short_Literal	0x1
0787 e016       |    |		Load	0x0,0x16
0788 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0789 c405       |    |		Store	0x2,0x5
078a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
078b			TRAP_0780:
078b 0007       |    |		Action	Break_Optional
078c e013       |    |		Load	0x0,0x13
078d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
078e 4807       |H   |		Short_Literal	0x7
078f 0092 080f  |    |		Action	Push_String_Extended,0x80f					; "Unable to create "
0791 e40e       |    |		Load	0x2,0xe
0792 01cc       |    |		Execute	Vector,Catenate
0793 e014       |    |		Load	0x0,0x14
0794 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0795 e5fd       |    |		Load	0x2,-0x3
0796 4802       |H   |		Short_Literal	0x2
0797 0092 0810  |    |		Action	Push_String_Extended,0x810					; "Refresh imports failed"
0799 0092 07dd  |    |		Action	Push_String_Extended,0x7dd					; "Remote_Operation_Error"
079b 8225       | %  |		Call	0x1,0x25
079c c5fd       |    |		Store	0x2,-0x3
079d e407       |    |		Load	0x2,0x7
079e 8228       | (  |		Call	0x1,0x28
079f 00cc       |    |		Action	Pop_Block
07a0 00cc       |    |		Action	Pop_Block
07a1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
07a2 0000 0000  |    |		.BLANK	0000[0x6]
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07b5       |    |		.CONST	0x07b5								; Address of begin
07a9 0004       |    |		.CONST	0x0004								; Address of exception handler
07aa 0003       |    |		.CONST	0x0003								; Number of locals
07ab			INIT_07a8:
07ab e406       |    |		Load	0x2,0x6
07ac e01a       |    |		Load	0x0,0x1a
07ad 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
07ae e40c       |    |		Load	0x2,0xc
07af 0092 07d7  |    |		Action	Push_String_Extended,0x7d7					; "/"
07b1 01cc       |    |		Execute	Vector,Catenate
07b2 e40d       |    |		Load	0x2,0xd
07b3 01cc       |    |		Execute	Vector,Catenate
07b4 0007       |    |		Action	Break_Optional
07b5			BODY_07a8:
07b5 4801       |H   |		Short_Literal	0x1
07b6 00d9       |    |		Load_Top	At_Offset_1
07b7 00db       |    |		Load_Top	At_Offset_3
07b8 e01d       |    |		Load	0x0,0x1d
07b9 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
07ba 7014       |p   |		Jump_Nonzero	0x7cf
07bb 00d9       |    |		Load_Top	At_Offset_1
07bc 01db       |    |		Execute	Vector,Length
07bd 6811       |h   |		Jump_Zero	0x7cf
07be 00d9       |    |		Load_Top	At_Offset_1
07bf 01dc       |    |		Execute	Vector,Last
07c0 00da       |    |		Load_Top	At_Offset_2
07c1 01d7       |    |		Execute	Vector,Field_Read
07c2 0f2f       | /  |		Execute_Immediate	Equal,0x2f
07c3 6807       |h   |		Jump_Zero	0x7cb
07c4 00d9       |    |		Load_Top	At_Offset_1
07c5 e223       | #  |		Load	0x1,0x23
07c6 01cc       |    |		Execute	Vector,Catenate
07c7 e405       |    |		Load	0x2,0x5
07c8 e016       |    |		Load	0x0,0x16
07c9 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
07ca 7804       |x   |		Jump	0x7cf
07cb 00d9       |    |		Load_Top	At_Offset_1
07cc e405       |    |		Load	0x2,0x5
07cd e016       |    |		Load	0x0,0x16
07ce 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
07cf e406       |    |		Load	0x2,0x6
07d0 e01a       |    |		Load	0x0,0x1a
07d1 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
07d2 c406       |    |		Store	0x2,0x6
07d3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07d4 ; --------------------------------------------------------------------------------------
07d4 ; STRING TABLE
07d4 ; --------------------------------------------------------------------------------------
07d4 007c       | |  |		.STRTAB	0x007c->0x0812							; "alib_list"
07d5 0083       |    |		.STRTAB	0x0083->0x0816							; "alib.list"
07d6 008a       |    |		.STRTAB	0x008a->0x081b							; "working"
07d7 008f       |    |		.STRTAB	0x008f->0x081e							; "/"
07d8 008e       |    |		.STRTAB	0x008e->0x081f							; "Transferring "
07d9 0099       |    |		.STRTAB	0x0099->0x0825							; " to "
07da 009b       |    |		.STRTAB	0x009b->0x0827							; "."
07db 009a       |    |		.STRTAB	0x009a->0x0828							; "Rs6000_Aix_Ibm"
07dc 00a6       |    |		.STRTAB	0x00a6->0x082f							; "Unable to acquire connection to "
07dd 00c4       |    |		.STRTAB	0x00c4->0x083f							; "Remote_Operation_Error"
07de 00d8       |    |		.STRTAB	0x00d8->0x084a							; "Unable to transfer "
07df 00e9       |    |		.STRTAB	0x00e9->0x0853							; " on "
07e0 00eb       |    |		.STRTAB	0x00eb->0x0855							; "Uploading "
07e1 00f3       |    |		.STRTAB	0x00f3->0x085a							; " from "
07e2 00f7       |    |		.STRTAB	0x00f7->0x085d							; "Unable to upload "
07e3 0106       |    |		.STRTAB	0x0106->0x0866							; "Building list file for Host_View = "
07e4 0127       | '  |		.STRTAB	0x0127->0x0877							; ", and target library = "
07e5 013c       | <  |		.STRTAB	0x013c->0x0883							; "A null Host_View was supplied to Remote_Library_Integration.Build_List_File"
07e6 0185       |    |		.STRTAB	0x0185->0x08a8							; "Unable to resolve "
07e7 0195       |    |		.STRTAB	0x0195->0x08b1							; ". Status ="
07e8 019d       |    |		.STRTAB	0x019d->0x08b6							; "-- Host_View => "
07e9 01ab       |    |		.STRTAB	0x01ab->0x08be							; "/usr/lpp/ada/lib/libada"
07ea 01c0       |    |		.STRTAB	0x01c0->0x08ca							; "Build_List_File"
07eb 01cd       |    |		.STRTAB	0x01cd->0x08d1							; "PATH=$PATH:/usr/bin/ada ; export PATH ; /usr/bin/ada/alibinit -p 100000 -L "
07ec 0216       |    |		.STRTAB	0x0216->0x08f7							; "/alib.list"
07ed 021e       |    |		.STRTAB	0x021e->0x08fc							; ".State.Tool_State."
07ee 022e       | .  |		.STRTAB	0x022e->0x0905							; "Creating remote program library = "
07ef 024e       | N  |		.STRTAB	0x024e->0x0916							; "Unable to create the remote library list file."
07f0 027a       | z  |		.STRTAB	0x027a->0x092d							; "cd "
07f1 027b       | {  |		.STRTAB	0x027b->0x092e							; "Unable to create the remote program library, "
07f2 02a6       |    |		.STRTAB	0x02a6->0x0945							; "Create_Program_Library"
07f3 02ba       |    |		.STRTAB	0x02ba->0x0950							; " caught in "
07f4 02c3       |    |		.STRTAB	0x02c3->0x0955							; "Unhandled Exception"
07f5 02d4       |    |		.STRTAB	0x02d4->0x095f							; "Unable to resolve"
07f6 02e3       |    |		.STRTAB	0x02e3->0x0967							; ".  "
07f7 02e4       |    |		.STRTAB	0x02e4->0x0969							; "Name Status = "
07f8 02f0       |    |		.STRTAB	0x02f0->0x0970							; "Unable to get default context for "
07f9 0310       |    |		.STRTAB	0x0310->0x0981							; ".  Error Status = "
07fa 0320       |    |		.STRTAB	0x0320->0x098a							; "Unable to default context to "
07fb 033b       | ;  |		.STRTAB	0x033b->0x0998							; "mkdir "
07fc 033f       | ?  |		.STRTAB	0x033f->0x099b							; "Creating remote directory = "
07fd 0359       | Y  |		.STRTAB	0x0359->0x09a9							; "Unable to create the remote directory, "
07fe 037e       | ~  |		.STRTAB	0x037e->0x09bd							; "Create_Remote_Directory"
07ff 0393       |    |		.STRTAB	0x0393->0x09c8							; "rm -r "
0800 0397       |    |		.STRTAB	0x0397->0x09cb							; "Destroying Remote Directory = "
0801 03b3       |    |		.STRTAB	0x03b3->0x09da							; "/.."
0802 03b4       |    |		.STRTAB	0x03b4->0x09dc							; "Unable to destroy the remote directory/library, "
0803 03e2       |    |		.STRTAB	0x03e2->0x09f4							; "Destroy_Remote_Library"
0804 03f6       |    |		.STRTAB	0x03f6->0x09ff							; "File_Exists"
0805 03ff       |    |		.STRTAB	0x03ff->0x0a04							; "Directory_Exists"
0806 040d       |    |		.STRTAB	0x040d->0x0a0c							; "Refreshing imports for target library = "
0807 0433       | 3  |		.STRTAB	0x0433->0x0a20							; "A null Host_View was supplied to Remote_Library_Integration.Refresh_Imports"
0808 047c       | |  |		.STRTAB	0x047c->0x0a46							; "Unable to update remote imports."
0809 049a       |    |		.STRTAB	0x049a->0x0a56							; " has not been built on the target."
080a 04ba       |    |		.STRTAB	0x04ba->0x0a67							; " Will not attempt to download "
080b 04d6       |    |		.STRTAB	0x04d6->0x0a76							; " does not exist"
080c 04e3       |    |		.STRTAB	0x04e3->0x0a7d							; "Get remote imports failed"
080d 04fa       |    |		.STRTAB	0x04fa->0x0a8a							; "Unable to open "
080e 0507       |    |		.STRTAB	0x0507->0x0a91							; "Refresh imports failed "
080f 051c       |    |		.STRTAB	0x051c->0x0a9d							; "Unable to create "
0810 052b       | +  |		.STRTAB	0x052b->0x0aa5							; "Refresh imports failed"
0811 053f       | ?  |		.STREND 0x053f->0x0ab0
0812 616c 6962  |alib|		.STRTAB_STRINGS
0ab1 0000 0000  |    |		.BLANK	0000[0x7]
0ab8 ; --------------------------------------------------------------------------------------
0ab8 ; Debug Table
0ab8 ; --------------------------------------------------------------------------------------
0ab8 0004 0003  |    |		.DEBUG4	0x0004,0x0003,0x466c,0x0000,0x0001,0x0019
0abe 000b 0b22  |   "|		.DBG4T	0x000b,0x0b22,0x8000,0x0000
0ac2 0050 0b34  | P 4|		.DBG4T	0x0050,0x0b34,0x8000,0x8000
0ac6 009b 0b7a  |   z|		.DBG4T	0x009b,0x0b7a,0x0001,0x0000
0aca 0123 0b8b  | #  |		.DBG4T	0x0123,0x0b8b,0x0001,0x0000
0ace 01ab 0b9c  |    |		.DBG4T	0x01ab,0x0b9c,0x0001,0x4000
0ad2 025b 0bc6  | [  |		.DBG4T	0x025b,0x0bc6,0x0001,0x0000
0ad6 0313 0bdf  |    |		.DBG4T	0x0313,0x0bdf,0x0002,0x0000
0ada 0323 0be4  | #  |		.DBG4T	0x0323,0x0be4,0x0001,0x0000
0ade 0333 0be7  | 3  |		.DBG4T	0x0333,0x0be7,0x0001,0x0000
0ae2 034b 0bea  | K  |		.DBG4T	0x034b,0x0bea,0x0001,0x0000
0ae6 03eb 0bfd  |    |		.DBG4T	0x03eb,0x0bfd,0x0001,0x0000
0aea 03fb 0c01  |    |		.DBG4T	0x03fb,0x0c01,0x0001,0x0000
0aee 0473 0c11  | s  |		.DBG4T	0x0473,0x0c11,0x0001,0x0000
0af2 04f3 0c21  |   !|		.DBG4T	0x04f3,0x0c21,0x0001,0x0000
0af6 053b 0c2c  | ; ,|		.DBG4T	0x053b,0x0c2c,0x0001,0x0000
0afa 0553 0c30  | S 0|		.DBG4T	0x0553,0x0c30,0x0001,0x0000
0afe 061b 0c53  |   S|		.DBG4T	0x061b,0x0c53,0x0001,0x0000
0b02 0633 0c58  | 3 X|		.DBG4T	0x0633,0x0c58,0x0002,0x0000
0b06 0653 0c5c  | S \|		.DBG4T	0x0653,0x0c5c,0x0002,0x0000
0b0a 0693 0c6b  |   k|		.DBG4T	0x0693,0x0c6b,0x0002,0x0000
0b0e 06cb 0c74  |   t|		.DBG4T	0x06cb,0x0c74,0x0004,0x0000
0b12 06db 0c78  |   x|		.DBG4T	0x06db,0x0c78,0x0004,0x4000
0b16 075b 0ca4  | [  |		.DBG4T	0x075b,0x0ca4,0x0004,0x0000
0b1a 0783 0cab  |    |		.DBG4T	0x0783,0x0cab,0x0004,0x0000
0b1e 07ab 0cb2  |    |		.DBG4T	0x07ab,0x0cb2,0x0004,0x0000
0b22 ; --------------------------------------------------------------------------------------
0b22 ; Debug chain
0b22 ; --------------------------------------------------------------------------------------
0b22 0010 0000  |    |		.DBGLEN	0x0010,0x0000
0b24 001f 0022  |   "|		.DBGLNO	0x001f,0x0022,0x0025,0x0028,0x002b,0x002e,0x0031,0x0034,0x0037,0x003a,0x003d,0x0040,0x0043,0x0046,0x0049,0x004c
0b34 ; --------------------------------------------------------------------------------------
0b34 ; Debug chain
0b34 ; --------------------------------------------------------------------------------------
0b34 0022 0000  | "  |		.DBGLEN	0x0022,0x0000
0b36 0050 0052  | P R|		.DBGLNO	0x0050,0x0052,0x0054,0x0056,0x0058,0x005a,0x005c,0x005e,0x0060,0x0062,0x0064,0x0066,0x0068,0x006a,0x006c,0x006e,0x0070,0x0072,0x0074,0x0076,0x0078,0x007a,0x007c,0x007e,0x0080,0x0082,0x0084,0x0086,0x0088,0x008a,0x008c,0x008e,0x0090,0x0092
0b58 0005 0006  |    |		.XXX[0x22]
0b5a 0007 0008  |    |
0b5c 0009 000a  |    |
0b5e 000b 000c  |    |
0b60 000d 000e  |    |
0b62 000f 0010  |    |
0b64 0011 0012  |    |
0b66 0013 0014  |    |
0b68 0015 0016  |    |
0b6a 0017 0018  |    |
0b6c 0019 001a  |    |
0b6e 001b 001c  |    |
0b70 001d 001e  |    |
0b72 001f 0020  |    |
0b74 0021 0022  | ! "|
0b76 0023 0024  | # $|
0b78 0025 0026  | % &|
0b7a ; --------------------------------------------------------------------------------------
0b7a ; Debug chain
0b7a ; --------------------------------------------------------------------------------------
0b7a 0005 000a  |    |		.DBGLEN	0x0005,0x000a
0b7c 009b 00a0  |    |		.DBGLNO	0x009b,0x00a0,0x00a5,0x00ac,0x00b3,0x00b6,0x00c7,0x00db,0x00e0,0x00e8,0x00f2,0x00f3,0x00fc,0x0101,0x0109
0b8b ; --------------------------------------------------------------------------------------
0b8b ; Debug chain
0b8b ; --------------------------------------------------------------------------------------
0b8b 0005 000a  |    |		.DBGLEN	0x0005,0x000a
0b8d 0123 0128  | # (|		.DBGLNO	0x0123,0x0128,0x012d,0x0134,0x013b,0x013e,0x014f,0x0163,0x0168,0x0170,0x017a,0x017b,0x0184,0x0189,0x0191
0b9c ; --------------------------------------------------------------------------------------
0b9c ; Debug chain
0b9c ; --------------------------------------------------------------------------------------
0b9c 0004 0012  |    |		.DBGLEN	0x0004,0x0012
0b9e 01ab 01b0  |    |		.DBGLNO	0x01ab,0x01b0,0x01b3,0x01b8,0x01bf,0x01d2,0x01d5,0x01dd,0x01de,0x01f6,0x0207,0x021b,0x021c,0x0224,0x022b,0x0232,0x0235,0x023a,0x023e,0x0243,0x0249,0x024e
0bb4 0001 0002  |    |		.XXX[0x12]
0bb6 0003 0004  |    |
0bb8 0005 0006  |    |
0bba 0009 000a  |    |
0bbc 0007 0008  |    |
0bbe 000b 000c  |    |
0bc0 000d 000e  |    |
0bc2 000f 0010  |    |
0bc4 0011 0012  |    |
0bc6 ; --------------------------------------------------------------------------------------
0bc6 ; Debug chain
0bc6 ; --------------------------------------------------------------------------------------
0bc6 0006 0011  |    |		.DBGLEN	0x0006,0x0011
0bc8 025b 0260  | [ `|		.DBGLNO	0x025b,0x0260,0x0265,0x026d,0x0274,0x027b,0x027e,0x0287,0x028f,0x0294,0x029c,0x02a4,0x02a5,0x02ac,0x02c5,0x02ca,0x02d2,0x02dc,0x02dd,0x02e8,0x02ed,0x02f5,0x0304
0bdf ; --------------------------------------------------------------------------------------
0bdf ; Debug chain
0bdf ; --------------------------------------------------------------------------------------
0bdf 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0be1 0313 0316  |    |		.DBGLNO	0x0313,0x0316,0x0318
0be4 ; --------------------------------------------------------------------------------------
0be4 ; Debug chain
0be4 ; --------------------------------------------------------------------------------------
0be4 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0be6 0323       | #  |		.DBGLNO	0x0323
0be7 ; --------------------------------------------------------------------------------------
0be7 ; Debug chain
0be7 ; --------------------------------------------------------------------------------------
0be7 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0be9 0333       | 3  |		.DBGLNO	0x0333
0bea ; --------------------------------------------------------------------------------------
0bea ; Debug chain
0bea ; --------------------------------------------------------------------------------------
0bea 0004 000d  |    |		.DBGLEN	0x0004,0x000d
0bec 034b 034d  | K M|		.DBGLNO	0x034b,0x034d,0x0353,0x0358,0x035b,0x0373,0x0375,0x038c,0x038d,0x03a1,0x03a3,0x03b6,0x03b7,0x03bd,0x03c6,0x03c8,0x03db
0bfd ; --------------------------------------------------------------------------------------
0bfd ; Debug chain
0bfd ; --------------------------------------------------------------------------------------
0bfd 0001 0001  |    |		.DBGLEN	0x0001,0x0001
0bff 03eb 03ed  |    |		.DBGLNO	0x03eb,0x03ed
0c01 ; --------------------------------------------------------------------------------------
0c01 ; Debug chain
0c01 ; --------------------------------------------------------------------------------------
0c01 0003 000b  |    |		.DBGLEN	0x0003,0x000b
0c03 03fb 0400  |    |		.DBGLNO	0x03fb,0x0400,0x0405,0x040a,0x0413,0x0427,0x042c,0x0434,0x043e,0x043f,0x044a,0x044f,0x0457,0x0466
0c11 ; --------------------------------------------------------------------------------------
0c11 ; Debug chain
0c11 ; --------------------------------------------------------------------------------------
0c11 0003 000b  |    |		.DBGLEN	0x0003,0x000b
0c13 0473 0478  | s x|		.DBGLNO	0x0473,0x0478,0x047d,0x0482,0x048b,0x04a7,0x04ac,0x04b4,0x04be,0x04bf,0x04ca,0x04cf,0x04d7,0x04e6
0c21 ; --------------------------------------------------------------------------------------
0c21 ; Debug chain
0c21 ; --------------------------------------------------------------------------------------
0c21 0001 0008  |    |		.DBGLEN	0x0001,0x0008
0c23 04f3 04f8  |    |		.DBGLNO	0x04f3,0x04f8,0x04fa,0x050e,0x0513,0x051b,0x0525,0x0526,0x0531
0c2c ; --------------------------------------------------------------------------------------
0c2c ; Debug chain
0c2c ; --------------------------------------------------------------------------------------
0c2c 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0c2e 053b 0545  | ; E|		.DBGLNO	0x053b,0x0545
0c30 ; --------------------------------------------------------------------------------------
0c30 ; Debug chain
0c30 ; --------------------------------------------------------------------------------------
0c30 000e 0013  |    |		.DBGLEN	0x000e,0x0013
0c32 0553 0558  | S X|		.DBGLNO	0x0553,0x0558,0x055b,0x0560,0x0565,0x056a,0x0570,0x0575,0x057a,0x057f,0x0586,0x058d,0x0594,0x059b,0x059e,0x05ac,0x05af,0x05b7,0x05b8,0x05be,0x05d6,0x05d7,0x05dc,0x05e3,0x05e5,0x05e6,0x05e9,0x05f1,0x05f3,0x05fb,0x060c,0x0610,0x0612
0c53 ; --------------------------------------------------------------------------------------
0c53 ; Debug chain
0c53 ; --------------------------------------------------------------------------------------
0c53 0002 0001  |    |		.DBGLEN	0x0002,0x0001
0c55 061b 0622  |   "|		.DBGLNO	0x061b,0x0622,0x0629
0c58 ; --------------------------------------------------------------------------------------
0c58 ; Debug chain
0c58 ; --------------------------------------------------------------------------------------
0c58 0001 0001  |    |		.DBGLEN	0x0001,0x0001
0c5a 0633 0639  | 3 9|		.DBGLNO	0x0633,0x0639
0c5c ; --------------------------------------------------------------------------------------
0c5c ; Debug chain
0c5c ; --------------------------------------------------------------------------------------
0c5c 0004 0009  |    |		.DBGLEN	0x0004,0x0009
0c5e 0653 0656  | S V|		.DBGLNO	0x0653,0x0656,0x065b,0x065d,0x0663,0x0666,0x0668,0x0678,0x067a,0x067d,0x0682,0x0685,0x0687
0c6b ; --------------------------------------------------------------------------------------
0c6b ; Debug chain
0c6b ; --------------------------------------------------------------------------------------
0c6b 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0c6d 0693 0698  |    |		.DBGLNO	0x0693,0x0698,0x069b,0x06b3,0x06b5,0x06be,0x06c1
0c74 ; --------------------------------------------------------------------------------------
0c74 ; Debug chain
0c74 ; --------------------------------------------------------------------------------------
0c74 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0c76 06cb 06d1  |    |		.DBGLNO	0x06cb,0x06d1
0c78 ; --------------------------------------------------------------------------------------
0c78 ; Debug chain
0c78 ; --------------------------------------------------------------------------------------
0c78 0000 0015  |    |		.DBGLEN	0x0000,0x0015
0c7a 06e1 06f2  |    |		.DBGLNO	0x06e1,0x06f2,0x0706,0x0708,0x070a,0x070c,0x070d,0x0717,0x071e,0x0721,0x0726,0x072a,0x072f,0x0736,0x0738,0x073c,0x073e,0x0743,0x0748,0x074e,0x0752
0c8f 0001 0004  |    |		.XXX[0x15]
0c91 0005 0006  |    |
0c93 0002 0003  |    |
0c95 0007 0008  |    |
0c97 0009 000a  |    |
0c99 000b 000c  |    |
0c9b 000d 000e  |    |
0c9d 000f 0011  |    |
0c9f 0010 0012  |    |
0ca1 0013 0014  |    |
0ca3 0015       |    |
0ca4 ; --------------------------------------------------------------------------------------
0ca4 ; Debug chain
0ca4 ; --------------------------------------------------------------------------------------
0ca4 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0ca6 075b 0764  | [ d|		.DBGLNO	0x075b,0x0764,0x076d,0x0775,0x0777
0cab ; --------------------------------------------------------------------------------------
0cab ; Debug chain
0cab ; --------------------------------------------------------------------------------------
0cab 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0cad 0783 078c  |    |		.DBGLNO	0x0783,0x078c,0x0795,0x079d,0x079f
0cb2 ; --------------------------------------------------------------------------------------
0cb2 ; Debug chain
0cb2 ; --------------------------------------------------------------------------------------
0cb2 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0cb4 07ab 07ae  |    |		.DBGLNO	0x07ab,0x07ae,0x07b5,0x07bb,0x07be,0x07c4,0x07cb,0x07cf
0cbc 0000 0000  |    |		.BLANK	0000[0x144]