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

⟦54faa1f8a⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦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 0470       | p  |		.CONST	0x0470								; 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 8002       |    |		.CONST	0x8002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0020       |    |		.CONST	0x0020								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0012       |    |		.CONST	0x0012								; Number of locals
000b			INIT_0008:
000b 029a 002b  |   +|		Declare_Subprogram	INIT_0028,For_Outer_Call,Visible,Unelaborated
000d 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated
000f 029a 018b  |    |		Declare_Subprogram	INIT_0188,For_Outer_Call,Visible,Unelaborated
0011 029a 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Visible,Unelaborated
0013 00bf       |    |		Action	Accept_Activation
0014 029d 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call
0016 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0017 00c7       |    |		Action	Elaborate_Subprogram
0018 029d 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call
001a 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
001b 00c7       |    |		Action	Elaborate_Subprogram
001c 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
001d 00c7       |    |		Action	Elaborate_Subprogram
001e 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
001f 00c7       |    |		Action	Elaborate_Subprogram
0020			BODY_0008:
0020 00bc       |    |		Action	Signal_Activated
0021 00bb       |    |		Action	Signal_Completion
0022 0000 0000  |    |		.BLANK	0000[0x6]
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 003f       | ?  |		.CONST	0x003f								; Address of begin
0029 006a       | j  |		.CONST	0x006a								; Address of exception handler
002a 0006       |    |		.CONST	0x0006								; Number of locals
002b			INIT_0028:
002b e001       |    |		Load	0x0,0x1
002c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
002d 02c7       |    |		Declare_Variable	Any
002e e5fc       |    |		Load	0x2,-0x4
002f e001       |    |		Load	0x0,0x1
0030 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0031 a402       |    |		Store_Unchecked	0x2,0x2
0032 0092 03ef  |    |		Action	Push_String_Extended,0x3ef					; "Build_Remote_Library"
0034 e002       |    |		Load	0x0,0x2
0035 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0036 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0037 e003       |    |		Load	0x0,0x3
0038 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0039 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
003a 02c7       |    |		Declare_Variable	Any
003b 00d8       |    |		Load_Top	At_Offset_0
003c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
003d 029f 027b  |   {|		Declare_Subprogram	INIT_0278,For_Call
003f			BODY_0028:
003f e402       |    |		Load	0x2,0x2
0040 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
0042 0092 03f1  |    |		Action	Push_String_Extended,0x3f1					; "View"
0044 e5ff       |    |		Load	0x2,-0x1
0045 e004       |    |		Load	0x0,0x4
0046 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0047 01cc       |    |		Execute	Vector,Catenate
0048 0092 03f2  |    |		Action	Push_String_Extended,0x3f2					; "Response"
004a 01cc       |    |		Execute	Vector,Catenate
004b e5fc       |    |		Load	0x2,-0x4
004c e004       |    |		Load	0x0,0x4
004d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
004e 01cc       |    |		Execute	Vector,Catenate
004f e403       |    |		Load	0x2,0x3
0050 e004       |    |		Load	0x0,0x4
0051 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0052 e402       |    |		Load	0x2,0x2
0053 e005       |    |		Load	0x0,0x5
0054 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0055 e402       |    |		Load	0x2,0x2
0056 0092 03f1  |    |		Action	Push_String_Extended,0x3f1					; "View"
0058 e5ff       |    |		Load	0x2,-0x1
0059 e005       |    |		Load	0x0,0x5
005a 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
005b e402       |    |		Load	0x2,0x2
005c 4801       |H   |		Short_Literal	0x1
005d e5ff       |    |		Load	0x2,-0x1
005e e006       |    |		Load	0x0,0x6
005f 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0060 c405       |    |		Store	0x2,0x5
0061 8406       |    |		Call	0x2,0x6
0062 e402       |    |		Load	0x2,0x2
0063 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
0065 e403       |    |		Load	0x2,0x3
0066 e404       |    |		Load	0x2,0x4
0067 e004       |    |		Load	0x0,0x4
0068 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0069 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
006a			TRAP_0028:
006a e002       |    |		Load	0x0,0x2
006b 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
006c 010f       |    |		Execute	Exception,Equal
006d 6808       |h   |		Jump_Zero	0x76
006e e402       |    |		Load	0x2,0x2
006f 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
0071 e403       |    |		Load	0x2,0x3
0072 e404       |    |		Load	0x2,0x4
0073 e004       |    |		Load	0x0,0x4
0074 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0075 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0076 4884       |H   |		Short_Literal	0x84
0077 010f       |    |		Execute	Exception,Equal
0078 6808       |h   |		Jump_Zero	0x81
0079 e402       |    |		Load	0x2,0x2
007a 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
007c e403       |    |		Load	0x2,0x3
007d e404       |    |		Load	0x2,0x4
007e e004       |    |		Load	0x0,0x4
007f 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0080 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0081 e402       |    |		Load	0x2,0x2
0082 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
0084 e403       |    |		Load	0x2,0x3
0085 e404       |    |		Load	0x2,0x4
0086 e004       |    |		Load	0x0,0x4
0087 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0088 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0089 0000 0000  |    |		.BLANK	0000[0x7]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 00b6       |    |		.CONST	0x00b6								; Address of begin
0091 0162       | b  |		.CONST	0x0162								; Address of exception handler
0092 000a       |    |		.CONST	0x000a								; Number of locals
0093			INIT_0090:
0093 0092 03f3  |    |		Action	Push_String_Extended,0x3f3					; "Rebuild_Remote_Library"
0095 e002       |    |		Load	0x0,0x2
0096 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0097 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0098 e001       |    |		Load	0x0,0x1
0099 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
009a 02c7       |    |		Declare_Variable	Any
009b e5fb       |    |		Load	0x2,-0x5
009c e001       |    |		Load	0x0,0x1
009d 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
009e a404       |    |		Store_Unchecked	0x2,0x4
009f e003       |    |		Load	0x0,0x3
00a0 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
00a1 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
00a2 02c7       |    |		Declare_Variable	Any
00a3 00d8       |    |		Load_Top	At_Offset_0
00a4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00a5 e003       |    |		Load	0x0,0x3
00a6 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00a7 02c7       |    |		Declare_Variable	Any
00a8 00d8       |    |		Load_Top	At_Offset_0
00a9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00aa e003       |    |		Load	0x0,0x3
00ab 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
00ac 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00ad 02c7       |    |		Declare_Variable	Any
00ae 00d8       |    |		Load_Top	At_Offset_0
00af 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00b0 029f 029b  |    |		Declare_Subprogram	INIT_0298,For_Call
00b2 029f 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Call
00b4 029f 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Call
00b6			BODY_0090:
00b6 e404       |    |		Load	0x2,0x4
00b7 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
00b9 0092 03f1  |    |		Action	Push_String_Extended,0x3f1					; "View"
00bb e5ff       |    |		Load	0x2,-0x1
00bc e004       |    |		Load	0x0,0x4
00bd 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00be 01cc       |    |		Execute	Vector,Catenate
00bf 0092 03f2  |    |		Action	Push_String_Extended,0x3f2					; "Response"
00c1 01cc       |    |		Execute	Vector,Catenate
00c2 e5fb       |    |		Load	0x2,-0x5
00c3 e004       |    |		Load	0x0,0x4
00c4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00c5 01cc       |    |		Execute	Vector,Catenate
00c6 e402       |    |		Load	0x2,0x2
00c7 e004       |    |		Load	0x0,0x4
00c8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00c9 e404       |    |		Load	0x2,0x4
00ca e005       |    |		Load	0x0,0x5
00cb 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00cc e404       |    |		Load	0x2,0x4
00cd 0092 03f1  |    |		Action	Push_String_Extended,0x3f1					; "View"
00cf e5ff       |    |		Load	0x2,-0x1
00d0 e005       |    |		Load	0x0,0x5
00d1 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00d2 e404       |    |		Load	0x2,0x4
00d3 4801       |H   |		Short_Literal	0x1
00d4 e5ff       |    |		Load	0x2,-0x1
00d5 e006       |    |		Load	0x0,0x6
00d6 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
00d7 8409       |    |		Call	0x2,0x9
00d8 c407       |    |		Store	0x2,0x7
00d9 e405       |    |		Load	0x2,0x5
00da 0120       |    |		Execute	Any,Is_Value
00db 6804       |h   |		Jump_Zero	0xe0
00dc e003       |    |		Load	0x0,0x3
00dd 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
00de 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
00df 7801       |x   |		Jump	0xe1
00e0 e405       |    |		Load	0x2,0x5
00e1 e007       |    |		Load	0x0,0x7
00e2 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00e3 e008       |    |		Load	0x0,0x8
00e4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00e5 e407       |    |		Load	0x2,0x7
00e6 e003       |    |		Load	0x0,0x3
00e7 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
00e8 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00e9 c405       |    |		Store	0x2,0x5
00ea e405       |    |		Load	0x2,0x5
00eb e003       |    |		Load	0x0,0x3
00ec 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
00ed 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00ee 6815       |h   |		Jump_Zero	0x104
00ef e001       |    |		Load	0x0,0x1
00f0 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00f1 4801       |H   |		Short_Literal	0x1
00f2 4801       |H   |		Short_Literal	0x1
00f3 e009       |    |		Load	0x0,0x9
00f4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00f5 035b       | [  |		Declare_Type	Array,Constrained
00f6 0337       | 7  |		Declare_Variable	Array
00f7 e5ff       |    |		Load	0x2,-0x1
00f8 e009       |    |		Load	0x0,0x9
00f9 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00fa e009       |    |		Load	0x0,0x9
00fb 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00fc 0119       |    |		Execute	Any,Check_In_Formal_Type
00fd 4801       |H   |		Short_Literal	0x1
00fe 00da       |    |		Load_Top	At_Offset_2
00ff 01d6       |    |		Execute	Vector,Field_Write
0100 6083       |`   |		Indirect_Literal	Discrete,0x184,{0x00000000, 0x0000882b}
0101 e002       |    |		Load	0x0,0x2
0102 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0103 781b       |x   |		Jump	0x11f
0104 0092 03f4  |    |		Action	Push_String_Extended,0x3f4					; "<PROFILE>"
0106 4800       |H   |		Short_Literal	0x0
0107 0092 03f5  |    |		Action	Push_String_Extended,0x3f5					; "<ALL_WORLDS>"
0109 4802       |H   |		Short_Literal	0x2
010a e405       |    |		Load	0x2,0x5
010b 840a       |    |		Call	0x2,0xa
010c e00a       |    |		Load	0x0,0xa
010d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
010e e405       |    |		Load	0x2,0x5
010f 0120       |    |		Execute	Any,Is_Value
0110 6804       |h   |		Jump_Zero	0x115
0111 e003       |    |		Load	0x0,0x3
0112 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
0113 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0114 7801       |x   |		Jump	0x116
0115 e405       |    |		Load	0x2,0x5
0116 e007       |    |		Load	0x0,0x7
0117 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0118 e008       |    |		Load	0x0,0x8
0119 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
011a e407       |    |		Load	0x2,0x7
011b e003       |    |		Load	0x0,0x3
011c 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
011d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
011e c405       |    |		Store	0x2,0x5
011f 00cf       |    |		Action	Mark_Auxiliary
0120 7816       |x   |		Jump	0x137
0121 e405       |    |		Load	0x2,0x5
0122 e003       |    |		Load	0x0,0x3
0123 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
0124 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0125 c406       |    |		Store	0x2,0x6
0126 e406       |    |		Load	0x2,0x6
0127 e003       |    |		Load	0x0,0x3
0128 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0129 7007       |p   |		Jump_Nonzero	0x131
012a e403       |    |		Load	0x2,0x3
012b e404       |    |		Load	0x2,0x4
012c e5fc       |    |		Load	0x2,-0x4
012d e5fd       |    |		Load	0x2,-0x3
012e e406       |    |		Load	0x2,0x6
012f 8408       |    |		Call	0x2,0x8
0130 c403       |    |		Store	0x2,0x3
0131 e405       |    |		Load	0x2,0x5
0132 e003       |    |		Load	0x0,0x3
0133 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
0134 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0135 c405       |    |		Store	0x2,0x5
0136 00c9       |    |		Action	Pop_Auxiliary_Loop
0137 e405       |    |		Load	0x2,0x5
0138 e003       |    |		Load	0x0,0x3
0139 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
013a 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
013b 6fe5       |o   |		Jump_Zero	0x121
013c 00ce       |    |		Action	Pop_Auxiliary
013d e5fe       |    |		Load	0x2,-0x2
013e 681b       |h   |		Jump_Zero	0x15a
013f e405       |    |		Load	0x2,0x5
0140 0120       |    |		Execute	Any,Is_Value
0141 6804       |h   |		Jump_Zero	0x146
0142 e003       |    |		Load	0x0,0x3
0143 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
0144 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0145 7801       |x   |		Jump	0x147
0146 e405       |    |		Load	0x2,0x5
0147 e007       |    |		Load	0x0,0x7
0148 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0149 e008       |    |		Load	0x0,0x8
014a 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
014b e407       |    |		Load	0x2,0x7
014c e003       |    |		Load	0x0,0x3
014d 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
014e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
014f c405       |    |		Store	0x2,0x5
0150 e5fb       |    |		Load	0x2,-0x5
0151 4800       |H   |		Short_Literal	0x0
0152 0092 03f6  |    |		Action	Push_String_Extended,0x3f6					; "<All_WORLDS>"
0154 4803       |H   |		Short_Literal	0x3
0155 4802       |H   |		Short_Literal	0x2
0156 e405       |    |		Load	0x2,0x5
0157 840a       |    |		Call	0x2,0xa
0158 e00a       |    |		Load	0x0,0xa
0159 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
015a e404       |    |		Load	0x2,0x4
015b 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
015d e402       |    |		Load	0x2,0x2
015e e403       |    |		Load	0x2,0x3
015f e004       |    |		Load	0x0,0x4
0160 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0161 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0162			TRAP_0090:
0162 e002       |    |		Load	0x0,0x2
0163 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0164 010f       |    |		Execute	Exception,Equal
0165 6808       |h   |		Jump_Zero	0x16e
0166 e404       |    |		Load	0x2,0x4
0167 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
0169 e402       |    |		Load	0x2,0x2
016a e403       |    |		Load	0x2,0x3
016b e004       |    |		Load	0x0,0x4
016c 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
016d 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
016e 4884       |H   |		Short_Literal	0x84
016f 010f       |    |		Execute	Exception,Equal
0170 6808       |h   |		Jump_Zero	0x179
0171 e404       |    |		Load	0x2,0x4
0172 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
0174 e402       |    |		Load	0x2,0x2
0175 e403       |    |		Load	0x2,0x3
0176 e004       |    |		Load	0x0,0x4
0177 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0178 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0179 e404       |    |		Load	0x2,0x4
017a 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
017c e402       |    |		Load	0x2,0x2
017d e403       |    |		Load	0x2,0x3
017e e004       |    |		Load	0x0,0x4
017f 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0180 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0181 0000 0000  |    |		.XXX[0x3]
0183 0000       |    |
0184 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000882b}
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 0198       |    |		.CONST	0x0198								; Address of begin
0189 01be       |    |		.CONST	0x01be								; Address of exception handler
018a 0005       |    |		.CONST	0x0005								; Number of locals
018b			INIT_0188:
018b 0092 03f7  |    |		Action	Push_String_Extended,0x3f7					; "Destroy_Remote_Library"
018d e002       |    |		Load	0x0,0x2
018e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
018f 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0190 e001       |    |		Load	0x0,0x1
0191 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0192 02c7       |    |		Declare_Variable	Any
0193 e5fe       |    |		Load	0x2,-0x2
0194 e001       |    |		Load	0x0,0x1
0195 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0196 a404       |    |		Store_Unchecked	0x2,0x4
0197 00e1       |    |		Load_Encached	Boolean_Cache
0198			BODY_0188:
0198 00d9       |    |		Load_Top	At_Offset_1
0199 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
019b 0092 03f1  |    |		Action	Push_String_Extended,0x3f1					; "View"
019d e5ff       |    |		Load	0x2,-0x1
019e e004       |    |		Load	0x0,0x4
019f 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01a0 01cc       |    |		Execute	Vector,Catenate
01a1 0092 03f2  |    |		Action	Push_String_Extended,0x3f2					; "Response"
01a3 01cc       |    |		Execute	Vector,Catenate
01a4 e5fe       |    |		Load	0x2,-0x2
01a5 e004       |    |		Load	0x0,0x4
01a6 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01a7 01cc       |    |		Execute	Vector,Catenate
01a8 e402       |    |		Load	0x2,0x2
01a9 e004       |    |		Load	0x0,0x4
01aa 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01ab 00d9       |    |		Load_Top	At_Offset_1
01ac e005       |    |		Load	0x0,0x5
01ad 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01ae 00d9       |    |		Load_Top	At_Offset_1
01af 00da       |    |		Load_Top	At_Offset_2
01b0 4800       |H   |		Short_Literal	0x0
01b1 e5ff       |    |		Load	0x2,-0x1
01b2 e006       |    |		Load	0x0,0x6
01b3 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
01b4 8212       |    |		Call	0x1,0x12
01b5 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
01b6 00d9       |    |		Load_Top	At_Offset_1
01b7 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
01b9 e402       |    |		Load	0x2,0x2
01ba e403       |    |		Load	0x2,0x3
01bb e004       |    |		Load	0x0,0x4
01bc 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01bd 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01be			TRAP_0188:
01be e002       |    |		Load	0x0,0x2
01bf 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
01c0 010f       |    |		Execute	Exception,Equal
01c1 6808       |h   |		Jump_Zero	0x1ca
01c2 00da       |    |		Load_Top	At_Offset_2
01c3 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
01c5 e402       |    |		Load	0x2,0x2
01c6 e403       |    |		Load	0x2,0x3
01c7 e004       |    |		Load	0x0,0x4
01c8 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01c9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01ca 4884       |H   |		Short_Literal	0x84
01cb 010f       |    |		Execute	Exception,Equal
01cc 6808       |h   |		Jump_Zero	0x1d5
01cd 00da       |    |		Load_Top	At_Offset_2
01ce 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
01d0 e402       |    |		Load	0x2,0x2
01d1 e403       |    |		Load	0x2,0x3
01d2 e004       |    |		Load	0x0,0x4
01d3 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
01d4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01d5 00da       |    |		Load_Top	At_Offset_2
01d6 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
01d8 e402       |    |		Load	0x2,0x2
01d9 e403       |    |		Load	0x2,0x3
01da e004       |    |		Load	0x0,0x4
01db 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01dc 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01dd 0000 0000  |    |		.XXX[0x3]
01df 0000       |    |
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01ef       |    |		.CONST	0x01ef								; Address of begin
01e1 0218       |    |		.CONST	0x0218								; Address of exception handler
01e2 0004       |    |		.CONST	0x0004								; Number of locals
01e3			INIT_01e0:
01e3 0092 03f8  |    |		Action	Push_String_Extended,0x3f8					; "Refresh_Remote_Imports"
01e5 e002       |    |		Load	0x0,0x2
01e6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01e7 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
01e8 e001       |    |		Load	0x0,0x1
01e9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ea 02c7       |    |		Declare_Variable	Any
01eb e5fe       |    |		Load	0x2,-0x2
01ec e001       |    |		Load	0x0,0x1
01ed 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
01ee a404       |    |		Store_Unchecked	0x2,0x4
01ef			BODY_01e0:
01ef 00d8       |    |		Load_Top	At_Offset_0
01f0 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
01f2 0092 03f1  |    |		Action	Push_String_Extended,0x3f1					; "View"
01f4 e5ff       |    |		Load	0x2,-0x1
01f5 e004       |    |		Load	0x0,0x4
01f6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01f7 01cc       |    |		Execute	Vector,Catenate
01f8 0092 03f2  |    |		Action	Push_String_Extended,0x3f2					; "Response"
01fa 01cc       |    |		Execute	Vector,Catenate
01fb e5fe       |    |		Load	0x2,-0x2
01fc e004       |    |		Load	0x0,0x4
01fd 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01fe 01cc       |    |		Execute	Vector,Catenate
01ff e402       |    |		Load	0x2,0x2
0200 e004       |    |		Load	0x0,0x4
0201 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0202 00d8       |    |		Load_Top	At_Offset_0
0203 e005       |    |		Load	0x0,0x5
0204 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0205 00d8       |    |		Load_Top	At_Offset_0
0206 0092 03f9  |    |		Action	Push_String_Extended,0x3f9					; "<WARN>"
0208 4800       |H   |		Short_Literal	0x0
0209 4800       |H   |		Short_Literal	0x0
020a e5ff       |    |		Load	0x2,-0x1
020b e00b       |    |		Load	0x0,0xb
020c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
020d e5ff       |    |		Load	0x2,-0x1
020e e00c       |    |		Load	0x0,0xc
020f 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0210 00d8       |    |		Load_Top	At_Offset_0
0211 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
0213 e402       |    |		Load	0x2,0x2
0214 e403       |    |		Load	0x2,0x3
0215 e004       |    |		Load	0x0,0x4
0216 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0217 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0218			TRAP_01e0:
0218 e002       |    |		Load	0x0,0x2
0219 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
021a 010f       |    |		Execute	Exception,Equal
021b 6808       |h   |		Jump_Zero	0x224
021c 00d9       |    |		Load_Top	At_Offset_1
021d 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
021f e402       |    |		Load	0x2,0x2
0220 e403       |    |		Load	0x2,0x3
0221 e004       |    |		Load	0x0,0x4
0222 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0223 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0224 4884       |H   |		Short_Literal	0x84
0225 010f       |    |		Execute	Exception,Equal
0226 6808       |h   |		Jump_Zero	0x22f
0227 00d9       |    |		Load_Top	At_Offset_1
0228 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
022a e402       |    |		Load	0x2,0x2
022b e403       |    |		Load	0x2,0x3
022c e004       |    |		Load	0x0,0x4
022d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
022e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
022f 00d9       |    |		Load_Top	At_Offset_1
0230 0092 03f0  |    |		Action	Push_String_Extended,0x3f0					; "Rcf."
0232 e402       |    |		Load	0x2,0x2
0233 e403       |    |		Load	0x2,0x3
0234 e004       |    |		Load	0x0,0x4
0235 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0236 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0237 0000       |    |		.XXX[0x1]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0254       | T  |		.CONST	0x0254								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0009       |    |		.CONST	0x0009								; Number of locals
023b			INIT_0238:
023b 00e1       |    |		Load_Encached	Boolean_Cache
023c e003       |    |		Load	0x0,0x3
023d 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
023e 0322       | "  |		Declare_Variable	Record
023f e5fc       |    |		Load	0x2,-0x4
0240 e5ff       |    |		Load	0x2,-0x1
0241 e006       |    |		Load	0x0,0x6
0242 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0243 00d9       |    |		Load_Top	At_Offset_1
0244 017d       | }  |		Execute	Record,Structure_Write
0245 e002       |    |		Load	0x0,0x2
0246 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0247 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0248 e002       |    |		Load	0x0,0x2
0249 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
024a 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
024b e5fc       |    |		Load	0x2,-0x4
024c e5ff       |    |		Load	0x2,-0x1
024d 800d       |    |		Call	0x0,0xd
024e 029f 0313  |    |		Declare_Subprogram	INIT_0310,For_Call
0250 029f 0343  |   C|		Declare_Subprogram	INIT_0340,For_Call
0252 029f 0373  |   s|		Declare_Subprogram	INIT_0370,For_Call
0254			BODY_0238:
0254 4800       |H   |		Short_Literal	0x0
0255 a5fb       |    |		Store_Unchecked	0x2,-0x5
0256 8409       |    |		Call	0x2,0x9
0257 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 026e       | n  |		.CONST	0x026e								; Address of begin
0259 0004       |    |		.CONST	0x0004								; Address of exception handler
025a 0006       |    |		.CONST	0x0006								; Number of locals
025b			INIT_0258:
025b 00e1       |    |		Load_Encached	Boolean_Cache
025c e003       |    |		Load	0x0,0x3
025d 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
025e 0322       | "  |		Declare_Variable	Record
025f e5fe       |    |		Load	0x2,-0x2
0260 e5ff       |    |		Load	0x2,-0x1
0261 e006       |    |		Load	0x0,0x6
0262 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0263 00d9       |    |		Load_Top	At_Offset_1
0264 017d       | }  |		Execute	Record,Structure_Write
0265 e002       |    |		Load	0x0,0x2
0266 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0267 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0268 e002       |    |		Load	0x0,0x2
0269 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
026a 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
026b e5fe       |    |		Load	0x2,-0x2
026c e5ff       |    |		Load	0x2,-0x1
026d 800d       |    |		Call	0x0,0xd
026e			BODY_0258:
026e 00db       |    |		Load_Top	At_Offset_3
026f e5ff       |    |		Load	0x2,-0x1
0270 e006       |    |		Load	0x0,0x6
0271 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0272 e00e       |    |		Load	0x0,0xe
0273 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0274 a402       |    |		Store_Unchecked	0x2,0x2
0275 e402       |    |		Load	0x2,0x2
0276 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0277 0000       |    |		.XXX[0x1]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0288       |    |		.CONST	0x0288								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0002       |    |		.CONST	0x0002								; Number of locals
027b			INIT_0278:
027b e003       |    |		Load	0x0,0x3
027c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
027d 02c7       |    |		Declare_Variable	Any
027e e402       |    |		Load	0x2,0x2
027f 4801       |H   |		Short_Literal	0x1
0280 e402       |    |		Load	0x2,0x2
0281 4801       |H   |		Short_Literal	0x1
0282 e405       |    |		Load	0x2,0x5
0283 e006       |    |		Load	0x0,0x6
0284 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0285 e006       |    |		Load	0x0,0x6
0286 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0287 a602       |    |		Store_Unchecked	0x3,0x2
0288			BODY_0278:
0288 e002       |    |		Load	0x0,0x2
0289 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
028a e402       |    |		Load	0x2,0x2
028b e5fd       |    |		Load	0x2,-0x3
028c e5fe       |    |		Load	0x2,-0x2
028d e602       |    |		Load	0x3,0x2
028e 8211       |    |		Call	0x1,0x11
028f c404       |    |		Store	0x2,0x4
0290 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0291 0000 0000  |    |		.BLANK	0000[0x7]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029c       |    |		.CONST	0x029c								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 0002       |    |		.CONST	0x0002								; Number of locals
029b			INIT_0298:
029b 00e1       |    |		Load_Encached	Boolean_Cache
029c			BODY_0298:
029c e404       |    |		Load	0x2,0x4
029d e406       |    |		Load	0x2,0x6
029e 8212       |    |		Call	0x1,0x12
029f 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
02a0 00d8       |    |		Load_Top	At_Offset_0
02a1 6808       |h   |		Jump_Zero	0x2aa
02a2 e002       |    |		Load	0x0,0x2
02a3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02a4 e404       |    |		Load	0x2,0x4
02a5 e7fd       |    |		Load	0x3,-0x3
02a6 e7fe       |    |		Load	0x3,-0x2
02a7 e406       |    |		Load	0x2,0x6
02a8 8211       |    |		Call	0x1,0x11
02a9 c7fb       |    |		Store	0x3,-0x5
02aa 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
02ab 0000 0000  |    |		.BLANK	0000[0x5]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02c6       |    |		.CONST	0x02c6								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0005       |    |		.CONST	0x0005								; Number of locals
02b3			INIT_02b0:
02b3 e003       |    |		Load	0x0,0x3
02b4 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
02b5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02b6 02c7       |    |		Declare_Variable	Any
02b7 00d8       |    |		Load_Top	At_Offset_0
02b8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02b9 e003       |    |		Load	0x0,0x3
02ba 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02bb 02c7       |    |		Declare_Variable	Any
02bc 00d8       |    |		Load_Top	At_Offset_0
02bd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02be e003       |    |		Load	0x0,0x3
02bf 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02c0 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
02c1 02c7       |    |		Declare_Variable	Any
02c2 e7ff       |    |		Load	0x3,-0x1
02c3 a604       |    |		Store_Unchecked	0x3,0x4
02c4 029f 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Call
02c6			BODY_02b0:
02c6 00db       |    |		Load_Top	At_Offset_3
02c7 0120       |    |		Execute	Any,Is_Value
02c8 6804       |h   |		Jump_Zero	0x2cd
02c9 e003       |    |		Load	0x0,0x3
02ca 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
02cb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02cc 7801       |x   |		Jump	0x2ce
02cd 00db       |    |		Load_Top	At_Offset_3
02ce e007       |    |		Load	0x0,0x7
02cf 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02d0 e008       |    |		Load	0x0,0x8
02d1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02d2 e003       |    |		Load	0x0,0x3
02d3 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
02d4 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02d5 c602       |    |		Store	0x3,0x2
02d6 00cf       |    |		Action	Mark_Auxiliary
02d7 7807       |x   |		Jump	0x2df
02d8 8605       |    |		Call	0x3,0x5
02d9 00da       |    |		Load_Top	At_Offset_2
02da e003       |    |		Load	0x0,0x3
02db 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02dc 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
02dd c604       |    |		Store	0x3,0x4
02de 00c9       |    |		Action	Pop_Auxiliary_Loop
02df 00da       |    |		Load_Top	At_Offset_2
02e0 e003       |    |		Load	0x0,0x3
02e1 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02e2 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
02e3 6ff4       |o   |		Jump_Zero	0x2d8
02e4 00ce       |    |		Action	Pop_Auxiliary
02e5 00db       |    |		Load_Top	At_Offset_3
02e6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02e7 0000       |    |		.XXX[0x1]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02fa       |    |		.CONST	0x02fa								; Address of begin
02e9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ea 0005       |    |		.CONST	0x0005								; Number of locals
02eb			INIT_02e8:
02eb e003       |    |		Load	0x0,0x3
02ec 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02ed 02c7       |    |		Declare_Variable	Any
02ee 00d8       |    |		Load_Top	At_Offset_0
02ef 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02f0 e003       |    |		Load	0x0,0x3
02f1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02f2 e003       |    |		Load	0x0,0x3
02f3 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
02f4 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
02f5 02c7       |    |		Declare_Variable	Any
02f6 e7ff       |    |		Load	0x3,-0x1
02f7 a604       |    |		Store_Unchecked	0x3,0x4
02f8 029f 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Call
02fa			BODY_02e8:
02fa 00d9       |    |		Load_Top	At_Offset_1
02fb e003       |    |		Load	0x0,0x3
02fc 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
02fd 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
02fe c602       |    |		Store	0x3,0x2
02ff 0092 03fa  |    |		Action	Push_String_Extended,0x3fa					; "["
0301 e602       |    |		Load	0x3,0x2
0302 e003       |    |		Load	0x0,0x3
0303 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0304 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0305 8605       |    |		Call	0x3,0x5
0306 01cc       |    |		Execute	Vector,Catenate
0307 0092 03fb  |    |		Action	Push_String_Extended,0x3fb					; "]"
0309 01cc       |    |		Execute	Vector,Catenate
030a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
030b 0000 0000  |    |		.BLANK	0000[0x5]
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 4801       |H   |		Short_Literal	0x1
0314 0092 03fc  |    |		Action	Push_String_Extended,0x3fc					; "<DEFAULT>"
0316 e5fe       |    |		Load	0x2,-0x2
0317 e00f       |    |		Load	0x0,0xf
0318 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0319 6804       |h   |		Jump_Zero	0x31e
031a e5fc       |    |		Load	0x2,-0x4
031b 00db       |    |		Load_Top	At_Offset_3
031c 8010       |    |		Call	0x0,0x10
031d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
031e e002       |    |		Load	0x0,0x2
031f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0320 e5fc       |    |		Load	0x2,-0x4
0321 00d8       |    |		Load_Top	At_Offset_0
0322 e7ff       |    |		Load	0x3,-0x1
0323 e006       |    |		Load	0x0,0x6
0324 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0325 e5fe       |    |		Load	0x2,-0x2
0326 e7ff       |    |		Load	0x3,-0x1
0327 e011       |    |		Load	0x0,0x11
0328 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0329 c405       |    |		Store	0x2,0x5
032a 4800       |H   |		Short_Literal	0x0
032b e405       |    |		Load	0x2,0x5
032c e002       |    |		Load	0x0,0x2
032d 1847       | G  |		Execute	Package,Field_Execute,Field_Number 0x47
032e 7006       |p   |		Jump_Nonzero	0x335
032f e001       |    |		Load	0x0,0x1
0330 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0331 4806       |H   |		Short_Literal	0x6
0332 e405       |    |		Load	0x2,0x5
0333 e002       |    |		Load	0x0,0x2
0334 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0335 e5fe       |    |		Load	0x2,-0x2
0336 0335       | 5  |		Declare_Variable	Array,Duplicate
0337 00cd       |    |		Action	Spare6_Action
0338 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0339 0000 0000  |    |		.BLANK	0000[0x7]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0343       | C  |		.CONST	0x0343								; Address of begin
0341 0004       |    |		.CONST	0x0004								; Address of exception handler
0342 0001       |    |		.CONST	0x0001								; Number of locals
0343			BODY_0340:
0343			INIT_0340:
0343 4801       |H   |		Short_Literal	0x1
0344 0092 03fc  |    |		Action	Push_String_Extended,0x3fc					; "<DEFAULT>"
0346 e5fd       |    |		Load	0x2,-0x3
0347 e00f       |    |		Load	0x0,0xf
0348 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0349 6804       |h   |		Jump_Zero	0x34e
034a e5fc       |    |		Load	0x2,-0x4
034b 00db       |    |		Load_Top	At_Offset_3
034c 8012       |    |		Call	0x0,0x12
034d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
034e e002       |    |		Load	0x0,0x2
034f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0350 e5fc       |    |		Load	0x2,-0x4
0351 00d8       |    |		Load_Top	At_Offset_0
0352 e7ff       |    |		Load	0x3,-0x1
0353 e006       |    |		Load	0x0,0x6
0354 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0355 e5fd       |    |		Load	0x2,-0x3
0356 e7ff       |    |		Load	0x3,-0x1
0357 e011       |    |		Load	0x0,0x11
0358 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0359 c404       |    |		Store	0x2,0x4
035a 4800       |H   |		Short_Literal	0x0
035b e404       |    |		Load	0x2,0x4
035c e002       |    |		Load	0x0,0x2
035d 1847       | G  |		Execute	Package,Field_Execute,Field_Number 0x47
035e 7006       |p   |		Jump_Nonzero	0x365
035f e001       |    |		Load	0x0,0x1
0360 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0361 4806       |H   |		Short_Literal	0x6
0362 e404       |    |		Load	0x2,0x4
0363 e002       |    |		Load	0x0,0x2
0364 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0365 e5fd       |    |		Load	0x2,-0x3
0366 0335       | 5  |		Declare_Variable	Array,Duplicate
0367 00cd       |    |		Action	Spare6_Action
0368 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0369 0000 0000  |    |		.BLANK	0000[0x7]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0377       | w  |		.CONST	0x0377								; Address of begin
0371 0004       |    |		.CONST	0x0004								; Address of exception handler
0372 0003       |    |		.CONST	0x0003								; Number of locals
0373			INIT_0370:
0373 e5ff       |    |		Load	0x2,-0x1
0374 8407       |    |		Call	0x2,0x7
0375 e5ff       |    |		Load	0x2,-0x1
0376 8408       |    |		Call	0x2,0x8
0377			BODY_0370:
0377 e001       |    |		Load	0x0,0x1
0378 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0379 4801       |H   |		Short_Literal	0x1
037a 4801       |H   |		Short_Literal	0x1
037b e009       |    |		Load	0x0,0x9
037c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
037d 035b       | [  |		Declare_Type	Array,Constrained
037e 0337       | 7  |		Declare_Variable	Array
037f 0092 03fd  |    |		Action	Push_String_Extended,0x3fd					; "WARNING:  All referencers must have remote imports refreshed."
0381 e009       |    |		Load	0x0,0x9
0382 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0383 e009       |    |		Load	0x0,0x9
0384 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0385 0119       |    |		Execute	Any,Check_In_Formal_Type
0386 4801       |H   |		Short_Literal	0x1
0387 00da       |    |		Load_Top	At_Offset_2
0388 01d6       |    |		Execute	Vector,Field_Write
0389 602a       |`*  |		Indirect_Literal	Discrete,0x3b4,{0x00000000, 0x00008857}
038a e002       |    |		Load	0x0,0x2
038b 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
038c e406       |    |		Load	0x2,0x6
038d e403       |    |		Load	0x2,0x3
038e 00da       |    |		Load_Top	At_Offset_2
038f e602       |    |		Load	0x3,0x2
0390 e5ff       |    |		Load	0x2,-0x1
0391 e006       |    |		Load	0x0,0x6
0392 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0393 e00e       |    |		Load	0x0,0xe
0394 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0395 a402       |    |		Store_Unchecked	0x2,0x2
0396 e402       |    |		Load	0x2,0x2
0397 681b       |h   |		Jump_Zero	0x3b3
0398 e5fc       |    |		Load	0x2,-0x4
0399 0092 03f9  |    |		Action	Push_String_Extended,0x3f9					; "<WARN>"
039b 4800       |H   |		Short_Literal	0x0
039c 4800       |H   |		Short_Literal	0x0
039d e5ff       |    |		Load	0x2,-0x1
039e e006       |    |		Load	0x0,0x6
039f 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
03a0 e00b       |    |		Load	0x0,0xb
03a1 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03a2 e5ff       |    |		Load	0x2,-0x1
03a3 e006       |    |		Load	0x0,0x6
03a4 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
03a5 e00c       |    |		Load	0x0,0xc
03a6 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
03a7 4801       |H   |		Short_Literal	0x1
03a8 4801       |H   |		Short_Literal	0x1
03a9 4800       |H   |		Short_Literal	0x0
03aa 4801       |H   |		Short_Literal	0x1
03ab e5fc       |    |		Load	0x2,-0x4
03ac e006       |    |		Load	0x0,0x6
03ad 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
03ae 0092 03f5  |    |		Action	Push_String_Extended,0x3f5					; "<ALL_WORLDS>"
03b0 e5ff       |    |		Load	0x2,-0x1
03b1 e013       |    |		Load	0x0,0x13
03b2 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03b3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03b4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008857}
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb       |    |		.CONST	0x03bb								; Address of begin
03b9 03cb       |    |		.CONST	0x03cb								; Address of exception handler
03ba 0001       |    |		.CONST	0x0001								; Number of locals
03bb			BODY_03b8:
03bb			INIT_03b8:
03bb e404       |    |		Load	0x2,0x4
03bc 4801       |H   |		Short_Literal	0x1
03bd e604       |    |		Load	0x3,0x4
03be e006       |    |		Load	0x0,0x6
03bf 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
03c0 c603       |    |		Store	0x3,0x3
03c1 e404       |    |		Load	0x2,0x4
03c2 e603       |    |		Load	0x3,0x3
03c3 e005       |    |		Load	0x0,0x5
03c4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03c5 e603       |    |		Load	0x3,0x3
03c6 e602       |    |		Load	0x3,0x2
03c7 e003       |    |		Load	0x0,0x3
03c8 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
03c9 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03ca 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03cb			TRAP_03b8:
03cb 0007       |    |		Action	Break_Optional
03cc 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03cd 0000 0000  |    |		.XXX[0x3]
03cf 0000       |    |
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d3       |    |		.CONST	0x03d3								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0001       |    |		.CONST	0x0001								; Number of locals
03d3			BODY_03d0:
03d3			INIT_03d0:
03d3 e604       |    |		Load	0x3,0x4
03d4 e003       |    |		Load	0x0,0x3
03d5 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
03d6 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
03d7 c604       |    |		Store	0x3,0x4
03d8 e604       |    |		Load	0x3,0x4
03d9 e003       |    |		Load	0x0,0x3
03da 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
03db 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03dc 6802       |h   |		Jump_Zero	0x3df
03dd 00da       |    |		Load_Top	At_Offset_2
03de 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03df e604       |    |		Load	0x3,0x4
03e0 e003       |    |		Load	0x0,0x3
03e1 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
03e2 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
03e3 c602       |    |		Store	0x3,0x2
03e4 00da       |    |		Load_Top	At_Offset_2
03e5 0092 03fe  |    |		Action	Push_String_Extended,0x3fe					; ","
03e7 01cc       |    |		Execute	Vector,Catenate
03e8 e602       |    |		Load	0x3,0x2
03e9 e003       |    |		Load	0x0,0x3
03ea 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03eb 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
03ec 01cc       |    |		Execute	Vector,Catenate
03ed 8605       |    |		Call	0x3,0x5
03ee 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ef ; --------------------------------------------------------------------------------------
03ef ; STRING TABLE
03ef ; --------------------------------------------------------------------------------------
03ef 0022       | "  |		.STRTAB	0x0022->0x0400							; "Build_Remote_Library"
03f0 0034       | 4  |		.STRTAB	0x0034->0x040a							; "Rcf."
03f1 0036       | 6  |		.STRTAB	0x0036->0x040c							; "View"
03f2 0038       | 8  |		.STRTAB	0x0038->0x040e							; "Response"
03f3 003e       | >  |		.STRTAB	0x003e->0x0412							; "Rebuild_Remote_Library"
03f4 0052       | R  |		.STRTAB	0x0052->0x041d							; "<PROFILE>"
03f5 0059       | Y  |		.STRTAB	0x0059->0x0421							; "<ALL_WORLDS>"
03f6 0063       | c  |		.STRTAB	0x0063->0x0427							; "<All_WORLDS>"
03f7 006d       | m  |		.STRTAB	0x006d->0x042d							; "Destroy_Remote_Library"
03f8 0081       |    |		.STRTAB	0x0081->0x0438							; "Refresh_Remote_Imports"
03f9 0095       |    |		.STRTAB	0x0095->0x0443							; "<WARN>"
03fa 0099       |    |		.STRTAB	0x0099->0x0446							; "["
03fb 0098       |    |		.STRTAB	0x0098->0x0447							; "]"
03fc 0097       |    |		.STRTAB	0x0097->0x0447							; "<DEFAULT>"
03fd 009e       |    |		.STRTAB	0x009e->0x044c							; "WARNING:  All referencers must have remote imports refreshed."
03fe 00d9       |    |		.STRTAB	0x00d9->0x046a							; ","
03ff 00d8       |    |		.STREND 0x00d8->0x046b
0400 4275 696c  |Buil|		.STRTAB_STRINGS
046b 0000 0000  |    |		.BLANK	0000[0x5]
0470 ; --------------------------------------------------------------------------------------
0470 ; Debug Table
0470 ; --------------------------------------------------------------------------------------
0470 0004 000d  |    |		.DEBUG4	0x0004,0x000d,0xf6b1,0x0000,0x0001,0x0000
0476 0000 0040  |   @|		.XXX[0x13]
0478 005b e0da  | [  |
047a 8000 0002  |    |
047c 004a 500e  | JP |
047e 0000 3731  |  71|
0480 005b e4da  | [  |
0482 8000 000a  |    |
0484 005b e0da  | [  |
0486 0000 0000  |    |
0488 2d28       |-(  |
0489 0000 0000  |    |		.BLANK	0000[0x4]
048d 0004 2d28  |  -(|		.XXX[0x2]
048f 0000 0000  |    |		.BLANK	0000[0x4]
0493 0004 2d28  |  -(|		.XXX[0x2]
0495 0000 0000  |    |		.BLANK	0000[0x4]
0499 0004 2d28  |  -(|		.XXX[0x2]
049b 0000 0000  |    |		.BLANK	0000[0x4]
049f 0004 2d28  |  -(|		.XXX[0x2]
04a1 0000 0000  |    |		.BLANK	0000[0x4]
04a5 0004 2d28  |  -(|		.XXX[0x2]
04a7 0000 0000  |    |		.BLANK	0000[0x4]
04ab 0004 2d28  |  -(|		.XXX[0x2]
04ad 0000 0000  |    |		.BLANK	0000[0x6]
04b3 004d 2cd4  | M, |		.XXX[0x6]
04b5 0000 0000  |    |
04b7 004d 2db5  | M- |
04b9 0000 0000  |    |		.BLANK	0000[0x9]
04c2 6768 63b7  |ghc |		.XXX[0x7]
04c4 ac21 4000  | !@ |
04c6 1aec 6009  |  ` |
04c8 a562       | b  |
04c9 0000 0000  |    |		.BLANK	0000[0x4]
04cd 0004 d2d5  |    |		.XXX[0x25]
04cf 5000 0000  |P   |
04d1 0000 0000  |    |
04d3 4000 0000  |@   |
04d5 0000 2169  |  !i|
04d7 8000 0000  |    |
04d9 0004 d3cc  |    |
04db 7802 6971  |x iq|
04dd b000 0000  |    |
04df 0000 0000  |    |
04e1 2000 0000  |    |
04e3 0000 10b4  |    |
04e5 c000 0000  |    |
04e7 0002 69e9  |  i |
04e9 3c00 10b5  |<   |
04eb 7802 6906  |x i |
04ed 7802 6b37  |x k7|
04ef f800 10b5  |    |
04f1 7800       |x   |
04f2 0000 0000  |    |		.BLANK	0000[0x4]
04f6 10b5 7802  |  x |		.XXX[0xe]
04f8 691e 7802  |i x |
04fa 6b3d f800  |k=  |
04fc 10b5 7800  |  x |
04fe 0000 0002  |    |
0500 6b40 fc00  |k@  |
0502 10b5 7800  |  x |
0504 0000 0000  |    |		.BLANK	0000[0x4]
0508 10b5 7800  |  x |		.XXX[0x2]
050a 0000 0000  |    |		.BLANK	0000[0x5]
050f 0001 34ca  |  4 |		.XXX[0x7]
0511 6800 0000  |h   |
0513 0001 34dc  |  4 |
0515 0400       |    |
0516 0000 0000  |    |		.BLANK	0000[0x8]
051e 01c9 ba0f  |    |		.XXX[0x8]
0520 b036 8580  | 6  |
0522 0068 6500  | he |
0524 2698 6b00  |& k |
0526 0000 0000  |    |		.BLANK	0000[0x4]
052a 1360 cb00  | `  |		.XXX[0xa]
052c 0000 0000  |    |
052e 0000 0d80  |    |
0530 0000 0000  |    |
0532 0085 ac80  |    |
0534 0000 0000  |    |		.BLANK	0000[0x4]
0538 09b2 1e60  |   `|		.XXX[0x8]
053a 09a6 a7e0  |    |
053c 0000 0000  |    |
053e 09a6 c400  |    |
0540 0000 0000  |    |		.BLANK	0000[0x8]
0548 000d 6cd8  |  l |		.XXX[0x8]
054a 7d7d 542c  |}}T,|
054c 0003 4328  |  C(|
054e 0134 cdec  | 4  |
0550 0000 0000  |    |		.BLANK	0000[0x4]
0554 009a a55a  |   Z|		.XXX[0xa]
0556 0000 0000  |    |
0558 0000 0024  |   $|
055a 0000 0000  |    |
055c 0004 2d64  |  -d|
055e 0000 0000  |    |		.BLANK	0000[0x4]
0562 004d 530d  | MS |		.XXX[0xa]
0564 0000 0000  |    |
0566 0000 0012  |    |
0568 0000 0000  |    |
056a 0002 16b2  |    |
056c 0000 0000  |    |		.BLANK	0000[0x4]
0570 0026 c1c6  | &  |		.XXX[0xa]
0572 0000 0000  |    |
0574 0000 001b  |    |
0576 0000 0000  |    |
0578 0001 0b59  |   Y|
057a 0000 0000  |    |		.BLANK	0000[0x4]
057e 0001 0b5c  |   \|		.XXX[0x21]
0580 8026 7f66  | & f|
0582 8026 b82f  | & /|
0584 8001 0b5c  |   \|
0586 8000 0000  |    |
0588 0000 0000  |    |
058a 0001 0b5c  |   \|
058c 8000 0000  |    |
058e 0000 0000  |    |
0590 0001 0b5c  |   \|
0592 8026 8b74  | & t|
0594 8026 a746  | & F|
0596 8001 0b5c  |   \|
0598 8000 0000  |    |
059a 0000 0000  |    |
059c 0001 0b5c  |   \|
059e 8000       |    |
059f 0000 0000  |    |		.BLANK	0000[0x5]
05a4 0013 4ef9  |  N |		.XXX[0x3]
05a6 8000       |    |
05a7 0000 0000  |    |		.BLANK	0000[0xc]
05b3 1a7a 00ed  | z  |		.XXX[0x16]
05b5 eca8 5000  |  P |
05b7 0684 3802  |  8 |
05b9 69d1 1000  |i   |
05bb 0000 0000  |    |
05bd 0000 0001  |    |
05bf 34f1 9c00  |4   |
05c1 0000 0000  |    |
05c3 0000 0800  |    |
05c5 0000 0000  |    |
05c7 085a e400  | Z  |
05c9 0000 0000  |    |		.BLANK	0000[0x4]
05cd 085a e400  | Z  |		.XXX[0x2]
05cf 0000 0000  |    |		.BLANK	0000[0x4]
05d3 085a e400  | Z  |		.XXX[0x2]
05d5 0000 0000  |    |		.BLANK	0000[0x4]
05d9 085a e400  | Z  |		.XXX[0x2]
05db 0000 0000  |    |		.BLANK	0000[0x4]
05df 085a e400  | Z  |		.XXX[0x2]
05e1 0000 0000  |    |		.BLANK	0000[0x4]
05e5 085a e401  | Z  |		.XXX[0x16]
05e7 34a7 c001  |4   |
05e9 3517 a000  |5   |
05eb 085a e401  | Z  |
05ed 34a3 4001  |4 @ |
05ef 3513 2000  |5   |
05f1 9bb7 8200  |    |
05f3 0000 0000  |    |
05f5 0000 1800  |    |
05f7 0000 0000  |    |
05f9 042d 7200  | -r |
05fb 0000 0000  |    |		.BLANK	0000[0x4]
05ff 042d       | -  |		.XXX[0x1]