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

⟦dee3b4e03⟧

    Length: 9216 (0x2400)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da

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 1170       | p  |		.CONST	0x1170								; 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 800a       |    |		.CONST	0x800a								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00f4       |    |		.CONST	0x00f4								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0039       | 9  |		.CONST	0x0039								; Number of locals
000b			INIT_0008:
000b 029a 00fb  |    |		Declare_Subprogram	INIT_00f8,For_Outer_Call,Visible,Unelaborated
000d 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated
000f 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated
0011 029a 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call,Visible,Unelaborated
0013 029a 026b  |   k|		Declare_Subprogram	INIT_0268,For_Outer_Call,Visible,Unelaborated
0015 029a 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call,Visible,Unelaborated
0017 029a 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call,Visible,Unelaborated
0019 029a 032b  |   +|		Declare_Subprogram	INIT_0328,For_Outer_Call,Visible,Unelaborated
001b 029a 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call,Visible,Unelaborated
001d 029a 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call,Visible,Unelaborated
001f 029a 035b  |   [|		Declare_Subprogram	INIT_0358,For_Outer_Call,Visible,Unelaborated
0021 029a 03cb  |    |		Declare_Subprogram	INIT_03c8,For_Outer_Call,Visible,Unelaborated
0023 029a 03db  |    |		Declare_Subprogram	INIT_03d8,For_Outer_Call,Visible,Unelaborated
0025 029a 0473  |   s|		Declare_Subprogram	INIT_0470,For_Outer_Call,Visible,Unelaborated
0027 029a 050b  |    |		Declare_Subprogram	INIT_0508,For_Outer_Call,Visible,Unelaborated
0029 029a 0573  |   s|		Declare_Subprogram	INIT_0570,For_Outer_Call,Visible,Unelaborated
002b 029a 05d3  |    |		Declare_Subprogram	INIT_05d0,For_Outer_Call,Visible,Unelaborated
002d 029a 0623  |   #|		Declare_Subprogram	INIT_0620,For_Outer_Call,Visible,Unelaborated
002f 029a 067b  |   {|		Declare_Subprogram	INIT_0678,For_Outer_Call,Visible,Unelaborated
0031 029a 06f3  |    |		Declare_Subprogram	INIT_06f0,For_Outer_Call,Visible,Unelaborated
0033 029a 06fb  |    |		Declare_Subprogram	INIT_06f8,For_Outer_Call,Visible,Unelaborated
0035 029a 070b  |    |		Declare_Subprogram	INIT_0708,For_Outer_Call,Visible,Unelaborated
0037 029a 071b  |    |		Declare_Subprogram	INIT_0718,For_Outer_Call,Visible,Unelaborated
0039 029a 0723  |   #|		Declare_Subprogram	INIT_0720,For_Outer_Call,Visible,Unelaborated
003b 029a 078b  |    |		Declare_Subprogram	INIT_0788,For_Outer_Call,Visible,Unelaborated
003d 029a 08ab  |    |		Declare_Subprogram	INIT_08a8,For_Outer_Call,Visible,Unelaborated
003f 029a 0903  |    |		Declare_Subprogram	INIT_0900,For_Outer_Call,Visible,Unelaborated
0041 00bf       |    |		Action	Accept_Activation
0042 0092 0f38  |   8|		Action	Push_String_Extended,0xf38					; "Rcf."
0044 0092 0f39  |   9|		Action	Push_String_Extended,0xf39					; "<error>"
0046 029d 095b  |   [|		Declare_Subprogram	INIT_0958,For_Outer_Call
0048 4800       |H   |		Short_Literal	0x0
0049 e001       |    |		Load	0x0,0x1
004a 02a0       |    |		Declare_Subprogram	Null_Subprogram
004b 038e       |    |		Declare_Type	Package,Defined
004c 0387       |    |		Declare_Variable	Package
004d 4800       |H   |		Short_Literal	0x0
004e e002       |    |		Load	0x0,0x2
004f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0050 038e       |    |		Declare_Type	Package,Defined
0051 0387       |    |		Declare_Variable	Package
0052 4800       |H   |		Short_Literal	0x0
0053 e003       |    |		Load	0x0,0x3
0054 02a0       |    |		Declare_Subprogram	Null_Subprogram
0055 038e       |    |		Declare_Type	Package,Defined
0056 0387       |    |		Declare_Variable	Package
0057 4800       |H   |		Short_Literal	0x0
0058 e004       |    |		Load	0x0,0x4
0059 02a0       |    |		Declare_Subprogram	Null_Subprogram
005a 038e       |    |		Declare_Type	Package,Defined
005b 0387       |    |		Declare_Variable	Package
005c 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
005d 00c7       |    |		Action	Elaborate_Subprogram
005e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
005f 00c7       |    |		Action	Elaborate_Subprogram
0060 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0061 00c7       |    |		Action	Elaborate_Subprogram
0062 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0063 00c7       |    |		Action	Elaborate_Subprogram
0064 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0065 00c7       |    |		Action	Elaborate_Subprogram
0066 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0067 00c7       |    |		Action	Elaborate_Subprogram
0068 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0069 00c7       |    |		Action	Elaborate_Subprogram
006a 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
006b 00c7       |    |		Action	Elaborate_Subprogram
006c 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
006d 00c7       |    |		Action	Elaborate_Subprogram
006e 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
006f 00c7       |    |		Action	Elaborate_Subprogram
0070 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0071 00c7       |    |		Action	Elaborate_Subprogram
0072 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0073 00c7       |    |		Action	Elaborate_Subprogram
0074 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0075 00c7       |    |		Action	Elaborate_Subprogram
0076 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
0077 00c7       |    |		Action	Elaborate_Subprogram
0078 029d 0a23  |   #|		Declare_Subprogram	INIT_0a20,For_Outer_Call
007a 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
007b 00c7       |    |		Action	Elaborate_Subprogram
007c 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
007d 00c7       |    |		Action	Elaborate_Subprogram
007e 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
007f 00c7       |    |		Action	Elaborate_Subprogram
0080 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0081 00c7       |    |		Action	Elaborate_Subprogram
0082 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0083 00c7       |    |		Action	Elaborate_Subprogram
0084 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0085 00c7       |    |		Action	Elaborate_Subprogram
0086 029d 0a33  |   3|		Declare_Subprogram	INIT_0a30,For_Outer_Call
0088 029d 0a43  |   C|		Declare_Subprogram	INIT_0a40,For_Outer_Call
008a 029d 0a53  |   S|		Declare_Subprogram	INIT_0a50,For_Outer_Call
008c 029d 0a63  |   c|		Declare_Subprogram	INIT_0a60,For_Outer_Call
008e 029d 0a73  |   s|		Declare_Subprogram	INIT_0a70,For_Outer_Call
0090 029d 0a8b  |    |		Declare_Subprogram	INIT_0a88,For_Outer_Call
0092 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
0093 00c7       |    |		Action	Elaborate_Subprogram
0094 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0095 00c7       |    |		Action	Elaborate_Subprogram
0096 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0097 00c7       |    |		Action	Elaborate_Subprogram
0098 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
0099 00c7       |    |		Action	Elaborate_Subprogram
009a 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
009b 00c7       |    |		Action	Elaborate_Subprogram
009c 029d 0b43  |   C|		Declare_Subprogram	INIT_0b40,For_Outer_Call
009e 029d 0b7b  |   {|		Declare_Subprogram	INIT_0b78,For_Outer_Call
00a0 029d 0bb3  |    |		Declare_Subprogram	INIT_0bb0,For_Outer_Call
00a2 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
00a3 00c7       |    |		Action	Elaborate_Subprogram
00a4 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
00a5 00c7       |    |		Action	Elaborate_Subprogram
00a6 029d 0beb  |    |		Declare_Subprogram	INIT_0be8,For_Outer_Call
00a8 e005       |    |		Load	0x0,0x5
00a9 e006       |    |		Load	0x0,0x6
00aa e007       |    |		Load	0x0,0x7
00ab e008       |    |		Load	0x0,0x8
00ac e009       |    |		Load	0x0,0x9
00ad e00a       |    |		Load	0x0,0xa
00ae e00b       |    |		Load	0x0,0xb
00af e00c       |    |		Load	0x0,0xc
00b0 e00d       |    |		Load	0x0,0xd
00b1 e00e       |    |		Load	0x0,0xe
00b2 e00f       |    |		Load	0x0,0xf
00b3 e010       |    |		Load	0x0,0x10
00b4 1d38       | 8  |		Execute_Immediate	Reference_Lex_1,0x38
00b5 e011       |    |		Load	0x0,0x11
00b6 e012       |    |		Load	0x0,0x12
00b7 e013       |    |		Load	0x0,0x13
00b8 e014       |    |		Load	0x0,0x14
00b9 e015       |    |		Load	0x0,0x15
00ba e016       |    |		Load	0x0,0x16
00bb e017       |    |		Load	0x0,0x17
00bc e018       |    |		Load	0x0,0x18
00bd e019       |    |		Load	0x0,0x19
00be 4816       |H   |		Short_Literal	0x16
00bf e22b       | +  |		Load	0x1,0x2b
00c0 020e       |    |		Execute	Module,Augment_Imports
00c1 e22b       | +  |		Load	0x1,0x2b
00c2 020f       |    |		Execute	Module,Activate
00c3 e006       |    |		Load	0x0,0x6
00c4 e005       |    |		Load	0x0,0x5
00c5 e007       |    |		Load	0x0,0x7
00c6 e00b       |    |		Load	0x0,0xb
00c7 e00c       |    |		Load	0x0,0xc
00c8 e00d       |    |		Load	0x0,0xd
00c9 e00a       |    |		Load	0x0,0xa
00ca e01a       |    |		Load	0x0,0x1a
00cb e00f       |    |		Load	0x0,0xf
00cc e014       |    |		Load	0x0,0x14
00cd 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
00ce 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
00cf e01b       |    |		Load	0x0,0x1b
00d0 e015       |    |		Load	0x0,0x15
00d1 1d38       | 8  |		Execute_Immediate	Reference_Lex_1,0x38
00d2 e01c       |    |		Load	0x0,0x1c
00d3 1d37       | 7  |		Execute_Immediate	Reference_Lex_1,0x37
00d4 e018       |    |		Load	0x0,0x18
00d5 4812       |H   |		Short_Literal	0x12
00d6 e22c       | ,  |		Load	0x1,0x2c
00d7 020e       |    |		Execute	Module,Augment_Imports
00d8 e22c       | ,  |		Load	0x1,0x2c
00d9 020f       |    |		Execute	Module,Activate
00da e007       |    |		Load	0x0,0x7
00db e00d       |    |		Load	0x0,0xd
00dc e00f       |    |		Load	0x0,0xf
00dd e005       |    |		Load	0x0,0x5
00de e013       |    |		Load	0x0,0x13
00df e01d       |    |		Load	0x0,0x1d
00e0 e00c       |    |		Load	0x0,0xc
00e1 e018       |    |		Load	0x0,0x18
00e2 e006       |    |		Load	0x0,0x6
00e3 e014       |    |		Load	0x0,0x14
00e4 480a       |H   |		Short_Literal	0xa
00e5 e22d       | -  |		Load	0x1,0x2d
00e6 020e       |    |		Execute	Module,Augment_Imports
00e7 e22d       | -  |		Load	0x1,0x2d
00e8 020f       |    |		Execute	Module,Activate
00e9 e007       |    |		Load	0x0,0x7
00ea e005       |    |		Load	0x0,0x5
00eb e00d       |    |		Load	0x0,0xd
00ec e006       |    |		Load	0x0,0x6
00ed e00f       |    |		Load	0x0,0xf
00ee e013       |    |		Load	0x0,0x13
00ef 4806       |H   |		Short_Literal	0x6
00f0 e22e       | .  |		Load	0x1,0x2e
00f1 020e       |    |		Execute	Module,Augment_Imports
00f2 e22e       | .  |		Load	0x1,0x2e
00f3 020f       |    |		Execute	Module,Activate
00f4			BODY_0008:
00f4 00bc       |    |		Action	Signal_Activated
00f5 00bb       |    |		Action	Signal_Completion
00f6 0000 0000  |    |		.XXX[0x2]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 0107       |    |		.CONST	0x0107								; Address of begin
00f9 014a       | J  |		.CONST	0x014a								; Address of exception handler
00fa 0004       |    |		.CONST	0x0004								; Number of locals
00fb			INIT_00f8:
00fb 0092 0f3a  |   :|		Action	Push_String_Extended,0xf3a					; "Create_Secondary"
00fd e005       |    |		Load	0x0,0x5
00fe 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00ff 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0100 e006       |    |		Load	0x0,0x6
0101 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0102 02c7       |    |		Declare_Variable	Any
0103 e5fa       |    |		Load	0x2,-0x6
0104 e006       |    |		Load	0x0,0x6
0105 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0106 a404       |    |		Store_Unchecked	0x2,0x4
0107			BODY_00f8:
0107 00d8       |    |		Load_Top	At_Offset_0
0108 e228       | (  |		Load	0x1,0x28
0109 0092 0f3b  |   ;|		Action	Push_String_Extended,0xf3b					; "Primary_Unit"
010b e5ff       |    |		Load	0x2,-0x1
010c e00b       |    |		Load	0x0,0xb
010d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
010e 01cc       |    |		Execute	Vector,Catenate
010f 0092 0f3c  |   <|		Action	Push_String_Extended,0xf3c					; "command"
0111 01cc       |    |		Execute	Vector,Catenate
0112 e5fe       |    |		Load	0x2,-0x2
0113 e00b       |    |		Load	0x0,0xb
0114 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0115 01cc       |    |		Execute	Vector,Catenate
0116 0092 0f3d  |   =|		Action	Push_String_Extended,0xf3d					; "secondary_text"
0118 01cc       |    |		Execute	Vector,Catenate
0119 e5fd       |    |		Load	0x2,-0x3
011a e00b       |    |		Load	0x0,0xb
011b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
011c 01cc       |    |		Execute	Vector,Catenate
011d 0092 0f3e  |   >|		Action	Push_String_Extended,0xf3e					; "Remote_Name"
011f 01cc       |    |		Execute	Vector,Catenate
0120 e5fc       |    |		Load	0x2,-0x4
0121 e00b       |    |		Load	0x0,0xb
0122 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0123 01cc       |    |		Execute	Vector,Catenate
0124 0092 0f3f  |   ?|		Action	Push_String_Extended,0xf3f					; "Process_primary => "
0126 01cc       |    |		Execute	Vector,Catenate
0127 e5fb       |    |		Load	0x2,-0x5
0128 00e1       |    |		Load_Encached	Boolean_Cache
0129 011c       |    |		Execute	Any,Convert_Unchecked
012a 1c01       |    |		Execute_Immediate	Run_Utility,0x1
012b 01cc       |    |		Execute	Vector,Catenate
012c 0092 0f40  |   @|		Action	Push_String_Extended,0xf40					; ", Response"
012e 01cc       |    |		Execute	Vector,Catenate
012f e5fa       |    |		Load	0x2,-0x6
0130 e00b       |    |		Load	0x0,0xb
0131 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0132 01cc       |    |		Execute	Vector,Catenate
0133 e402       |    |		Load	0x2,0x2
0134 e00b       |    |		Load	0x0,0xb
0135 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0136 00d8       |    |		Load_Top	At_Offset_0
0137 e00c       |    |		Load	0x0,0xc
0138 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0139 00d9       |    |		Load_Top	At_Offset_1
013a 00d9       |    |		Load_Top	At_Offset_1
013b e5fb       |    |		Load	0x2,-0x5
013c e5fc       |    |		Load	0x2,-0x4
013d e5fd       |    |		Load	0x2,-0x3
013e e5fe       |    |		Load	0x2,-0x2
013f e5ff       |    |		Load	0x2,-0x1
0140 e22d       | -  |		Load	0x1,0x2d
0141 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0142 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0143 00d8       |    |		Load_Top	At_Offset_0
0144 e228       | (  |		Load	0x1,0x28
0145 e402       |    |		Load	0x2,0x2
0146 e403       |    |		Load	0x2,0x3
0147 e00b       |    |		Load	0x0,0xb
0148 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0149 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
014a			TRAP_00f8:
014a e005       |    |		Load	0x0,0x5
014b 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
014c 010f       |    |		Execute	Exception,Equal
014d 6807       |h   |		Jump_Zero	0x155
014e 00d9       |    |		Load_Top	At_Offset_1
014f e228       | (  |		Load	0x1,0x28
0150 e402       |    |		Load	0x2,0x2
0151 e403       |    |		Load	0x2,0x3
0152 e00b       |    |		Load	0x0,0xb
0153 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0154 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0155 4884       |H   |		Short_Literal	0x84
0156 010f       |    |		Execute	Exception,Equal
0157 6807       |h   |		Jump_Zero	0x15f
0158 00d9       |    |		Load_Top	At_Offset_1
0159 e228       | (  |		Load	0x1,0x28
015a e402       |    |		Load	0x2,0x2
015b e403       |    |		Load	0x2,0x3
015c e00b       |    |		Load	0x0,0xb
015d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
015e 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
015f 00d9       |    |		Load_Top	At_Offset_1
0160 e228       | (  |		Load	0x1,0x28
0161 e402       |    |		Load	0x2,0x2
0162 e403       |    |		Load	0x2,0x3
0163 e00b       |    |		Load	0x0,0xb
0164 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0165 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0166 0000 0000  |    |		.XXX[0x2]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 0177       | w  |		.CONST	0x0177								; Address of begin
0169 0199       |    |		.CONST	0x0199								; Address of exception handler
016a 0004       |    |		.CONST	0x0004								; Number of locals
016b			INIT_0168:
016b 0092 0f41  |   A|		Action	Push_String_Extended,0xf41					; "Remove_Secondary"
016d e005       |    |		Load	0x0,0x5
016e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
016f 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0170 e006       |    |		Load	0x0,0x6
0171 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0172 02c7       |    |		Declare_Variable	Any
0173 e5fe       |    |		Load	0x2,-0x2
0174 e006       |    |		Load	0x0,0x6
0175 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0176 a404       |    |		Store_Unchecked	0x2,0x4
0177			BODY_0168:
0177 00d8       |    |		Load_Top	At_Offset_0
0178 e228       | (  |		Load	0x1,0x28
0179 0092 0f42  |   B|		Action	Push_String_Extended,0xf42					; "secondary_referencer"
017b e5ff       |    |		Load	0x2,-0x1
017c e00b       |    |		Load	0x0,0xb
017d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
017e 01cc       |    |		Execute	Vector,Catenate
017f 0092 0f43  |   C|		Action	Push_String_Extended,0xf43					; "Response"
0181 01cc       |    |		Execute	Vector,Catenate
0182 e5fe       |    |		Load	0x2,-0x2
0183 e00b       |    |		Load	0x0,0xb
0184 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0185 01cc       |    |		Execute	Vector,Catenate
0186 e402       |    |		Load	0x2,0x2
0187 e00b       |    |		Load	0x0,0xb
0188 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0189 00d8       |    |		Load_Top	At_Offset_0
018a e00c       |    |		Load	0x0,0xc
018b 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
018c 00d9       |    |		Load_Top	At_Offset_1
018d 00d9       |    |		Load_Top	At_Offset_1
018e e5ff       |    |		Load	0x2,-0x1
018f e22d       | -  |		Load	0x1,0x2d
0190 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0191 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0192 00d8       |    |		Load_Top	At_Offset_0
0193 e228       | (  |		Load	0x1,0x28
0194 e402       |    |		Load	0x2,0x2
0195 e403       |    |		Load	0x2,0x3
0196 e00b       |    |		Load	0x0,0xb
0197 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0198 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0199			TRAP_0168:
0199 e005       |    |		Load	0x0,0x5
019a 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
019b 010f       |    |		Execute	Exception,Equal
019c 6807       |h   |		Jump_Zero	0x1a4
019d 00d9       |    |		Load_Top	At_Offset_1
019e e228       | (  |		Load	0x1,0x28
019f e402       |    |		Load	0x2,0x2
01a0 e403       |    |		Load	0x2,0x3
01a1 e00b       |    |		Load	0x0,0xb
01a2 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01a3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01a4 4884       |H   |		Short_Literal	0x84
01a5 010f       |    |		Execute	Exception,Equal
01a6 6807       |h   |		Jump_Zero	0x1ae
01a7 00d9       |    |		Load_Top	At_Offset_1
01a8 e228       | (  |		Load	0x1,0x28
01a9 e402       |    |		Load	0x2,0x2
01aa e403       |    |		Load	0x2,0x3
01ab e00b       |    |		Load	0x0,0xb
01ac 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
01ad 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01ae 00d9       |    |		Load_Top	At_Offset_1
01af e228       | (  |		Load	0x1,0x28
01b0 e402       |    |		Load	0x2,0x2
01b1 e403       |    |		Load	0x2,0x3
01b2 e00b       |    |		Load	0x0,0xb
01b3 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01b4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01b5 0000 0000  |    |		.XXX[0x3]
01b7 0000       |    |
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01c7       |    |		.CONST	0x01c7								; Address of begin
01b9 01e9       |    |		.CONST	0x01e9								; Address of exception handler
01ba 0004       |    |		.CONST	0x0004								; Number of locals
01bb			INIT_01b8:
01bb 0092 0f44  |   D|		Action	Push_String_Extended,0xf44					; "Show_Secondary"
01bd e005       |    |		Load	0x0,0x5
01be 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01bf 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
01c0 e006       |    |		Load	0x0,0x6
01c1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01c2 02c7       |    |		Declare_Variable	Any
01c3 e5fe       |    |		Load	0x2,-0x2
01c4 e006       |    |		Load	0x0,0x6
01c5 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
01c6 a404       |    |		Store_Unchecked	0x2,0x4
01c7			BODY_01b8:
01c7 00d8       |    |		Load_Top	At_Offset_0
01c8 e228       | (  |		Load	0x1,0x28
01c9 0092 0f3b  |   ;|		Action	Push_String_Extended,0xf3b					; "Primary_Unit"
01cb e5ff       |    |		Load	0x2,-0x1
01cc e00b       |    |		Load	0x0,0xb
01cd 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01ce 01cc       |    |		Execute	Vector,Catenate
01cf 0092 0f43  |   C|		Action	Push_String_Extended,0xf43					; "Response"
01d1 01cc       |    |		Execute	Vector,Catenate
01d2 e5fe       |    |		Load	0x2,-0x2
01d3 e00b       |    |		Load	0x0,0xb
01d4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01d5 01cc       |    |		Execute	Vector,Catenate
01d6 e402       |    |		Load	0x2,0x2
01d7 e00b       |    |		Load	0x0,0xb
01d8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01d9 00d8       |    |		Load_Top	At_Offset_0
01da e00c       |    |		Load	0x0,0xc
01db 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01dc 00d9       |    |		Load_Top	At_Offset_1
01dd 00d9       |    |		Load_Top	At_Offset_1
01de e5ff       |    |		Load	0x2,-0x1
01df e22d       | -  |		Load	0x1,0x2d
01e0 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01e1 005a       | Z  |		Store_Top	Discrete,At_Offset_2
01e2 00d8       |    |		Load_Top	At_Offset_0
01e3 e228       | (  |		Load	0x1,0x28
01e4 e402       |    |		Load	0x2,0x2
01e5 e403       |    |		Load	0x2,0x3
01e6 e00b       |    |		Load	0x0,0xb
01e7 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01e8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01e9			TRAP_01b8:
01e9 e005       |    |		Load	0x0,0x5
01ea 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
01eb 010f       |    |		Execute	Exception,Equal
01ec 6807       |h   |		Jump_Zero	0x1f4
01ed 00d9       |    |		Load_Top	At_Offset_1
01ee e228       | (  |		Load	0x1,0x28
01ef e402       |    |		Load	0x2,0x2
01f0 e403       |    |		Load	0x2,0x3
01f1 e00b       |    |		Load	0x0,0xb
01f2 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01f3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01f4 4884       |H   |		Short_Literal	0x84
01f5 010f       |    |		Execute	Exception,Equal
01f6 6807       |h   |		Jump_Zero	0x1fe
01f7 00d9       |    |		Load_Top	At_Offset_1
01f8 e228       | (  |		Load	0x1,0x28
01f9 e402       |    |		Load	0x2,0x2
01fa e403       |    |		Load	0x2,0x3
01fb e00b       |    |		Load	0x0,0xb
01fc 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
01fd 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01fe 00d9       |    |		Load_Top	At_Offset_1
01ff e228       | (  |		Load	0x1,0x28
0200 e402       |    |		Load	0x2,0x2
0201 e403       |    |		Load	0x2,0x3
0202 e00b       |    |		Load	0x0,0xb
0203 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0204 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0205 0000 0000  |    |		.XXX[0x3]
0207 0000       |    |
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 0217       |    |		.CONST	0x0217								; Address of begin
0209 024b       | K  |		.CONST	0x024b								; Address of exception handler
020a 0004       |    |		.CONST	0x0004								; Number of locals
020b			INIT_0208:
020b 0092 0f45  |   E|		Action	Push_String_Extended,0xf45					; "Edit_Secondary"
020d e005       |    |		Load	0x0,0x5
020e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
020f 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0210 e006       |    |		Load	0x0,0x6
0211 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0212 02c7       |    |		Declare_Variable	Any
0213 e5fc       |    |		Load	0x2,-0x4
0214 e006       |    |		Load	0x0,0x6
0215 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0216 a404       |    |		Store_Unchecked	0x2,0x4
0217			BODY_0208:
0217 00d8       |    |		Load_Top	At_Offset_0
0218 e228       | (  |		Load	0x1,0x28
0219 0092 0f42  |   B|		Action	Push_String_Extended,0xf42					; "secondary_referencer"
021b e5ff       |    |		Load	0x2,-0x1
021c e00b       |    |		Load	0x0,0xb
021d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
021e 01cc       |    |		Execute	Vector,Catenate
021f 0092 0f46  |   F|		Action	Push_String_Extended,0xf46					; "In_Place => "
0221 01cc       |    |		Execute	Vector,Catenate
0222 e5fe       |    |		Load	0x2,-0x2
0223 00e1       |    |		Load_Encached	Boolean_Cache
0224 011c       |    |		Execute	Any,Convert_Unchecked
0225 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0226 01cc       |    |		Execute	Vector,Catenate
0227 0092 0f47  |   G|		Action	Push_String_Extended,0xf47					; ", Visible => "
0229 01cc       |    |		Execute	Vector,Catenate
022a e5fd       |    |		Load	0x2,-0x3
022b 00e1       |    |		Load_Encached	Boolean_Cache
022c 011c       |    |		Execute	Any,Convert_Unchecked
022d 1c01       |    |		Execute_Immediate	Run_Utility,0x1
022e 01cc       |    |		Execute	Vector,Catenate
022f 0092 0f40  |   @|		Action	Push_String_Extended,0xf40					; ", Response"
0231 01cc       |    |		Execute	Vector,Catenate
0232 e5fc       |    |		Load	0x2,-0x4
0233 e00b       |    |		Load	0x0,0xb
0234 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0235 01cc       |    |		Execute	Vector,Catenate
0236 e402       |    |		Load	0x2,0x2
0237 e00b       |    |		Load	0x0,0xb
0238 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0239 00d8       |    |		Load_Top	At_Offset_0
023a e00c       |    |		Load	0x0,0xc
023b 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
023c 00d9       |    |		Load_Top	At_Offset_1
023d 00d9       |    |		Load_Top	At_Offset_1
023e e5fd       |    |		Load	0x2,-0x3
023f e5fe       |    |		Load	0x2,-0x2
0240 e5ff       |    |		Load	0x2,-0x1
0241 e22d       | -  |		Load	0x1,0x2d
0242 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0243 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0244 00d8       |    |		Load_Top	At_Offset_0
0245 e228       | (  |		Load	0x1,0x28
0246 e402       |    |		Load	0x2,0x2
0247 e403       |    |		Load	0x2,0x3
0248 e00b       |    |		Load	0x0,0xb
0249 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
024a 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
024b			TRAP_0208:
024b e005       |    |		Load	0x0,0x5
024c 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
024d 010f       |    |		Execute	Exception,Equal
024e 6807       |h   |		Jump_Zero	0x256
024f 00d9       |    |		Load_Top	At_Offset_1
0250 e228       | (  |		Load	0x1,0x28
0251 e402       |    |		Load	0x2,0x2
0252 e403       |    |		Load	0x2,0x3
0253 e00b       |    |		Load	0x0,0xb
0254 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0255 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0256 4884       |H   |		Short_Literal	0x84
0257 010f       |    |		Execute	Exception,Equal
0258 6807       |h   |		Jump_Zero	0x260
0259 00d9       |    |		Load_Top	At_Offset_1
025a e228       | (  |		Load	0x1,0x28
025b e402       |    |		Load	0x2,0x2
025c e403       |    |		Load	0x2,0x3
025d e00b       |    |		Load	0x0,0xb
025e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
025f 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0260 00d9       |    |		Load_Top	At_Offset_1
0261 e228       | (  |		Load	0x1,0x28
0262 e402       |    |		Load	0x2,0x2
0263 e403       |    |		Load	0x2,0x3
0264 e00b       |    |		Load	0x0,0xb
0265 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0266 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0267 0000       |    |		.XXX[0x1]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0277       | w  |		.CONST	0x0277								; Address of begin
0269 02a2       |    |		.CONST	0x02a2								; Address of exception handler
026a 0004       |    |		.CONST	0x0004								; Number of locals
026b			INIT_0268:
026b 0092 0f48  |   H|		Action	Push_String_Extended,0xf48					; "Set_Process_Primary"
026d e005       |    |		Load	0x0,0x5
026e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
026f 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0270 e006       |    |		Load	0x0,0x6
0271 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0272 02c7       |    |		Declare_Variable	Any
0273 e5fd       |    |		Load	0x2,-0x3
0274 e006       |    |		Load	0x0,0x6
0275 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0276 a404       |    |		Store_Unchecked	0x2,0x4
0277			BODY_0268:
0277 00d8       |    |		Load_Top	At_Offset_0
0278 e228       | (  |		Load	0x1,0x28
0279 0092 0f3b  |   ;|		Action	Push_String_Extended,0xf3b					; "Primary_Unit"
027b e5ff       |    |		Load	0x2,-0x1
027c e00b       |    |		Load	0x0,0xb
027d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
027e 01cc       |    |		Execute	Vector,Catenate
027f 0092 0f49  |   I|		Action	Push_String_Extended,0xf49					; ", Value => "
0281 01cc       |    |		Execute	Vector,Catenate
0282 e5fe       |    |		Load	0x2,-0x2
0283 00e1       |    |		Load_Encached	Boolean_Cache
0284 011c       |    |		Execute	Any,Convert_Unchecked
0285 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0286 01cc       |    |		Execute	Vector,Catenate
0287 0092 0f40  |   @|		Action	Push_String_Extended,0xf40					; ", Response"
0289 01cc       |    |		Execute	Vector,Catenate
028a e5fd       |    |		Load	0x2,-0x3
028b e00b       |    |		Load	0x0,0xb
028c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
028d 01cc       |    |		Execute	Vector,Catenate
028e e402       |    |		Load	0x2,0x2
028f e00b       |    |		Load	0x0,0xb
0290 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0291 00d8       |    |		Load_Top	At_Offset_0
0292 e00c       |    |		Load	0x0,0xc
0293 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0294 00d9       |    |		Load_Top	At_Offset_1
0295 00d9       |    |		Load_Top	At_Offset_1
0296 e5fe       |    |		Load	0x2,-0x2
0297 e5ff       |    |		Load	0x2,-0x1
0298 e22d       | -  |		Load	0x1,0x2d
0299 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
029a 005a       | Z  |		Store_Top	Discrete,At_Offset_2
029b 00d8       |    |		Load_Top	At_Offset_0
029c e228       | (  |		Load	0x1,0x28
029d e402       |    |		Load	0x2,0x2
029e e403       |    |		Load	0x2,0x3
029f e00b       |    |		Load	0x0,0xb
02a0 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02a1 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
02a2			TRAP_0268:
02a2 e005       |    |		Load	0x0,0x5
02a3 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
02a4 010f       |    |		Execute	Exception,Equal
02a5 6807       |h   |		Jump_Zero	0x2ad
02a6 00d9       |    |		Load_Top	At_Offset_1
02a7 e228       | (  |		Load	0x1,0x28
02a8 e402       |    |		Load	0x2,0x2
02a9 e403       |    |		Load	0x2,0x3
02aa e00b       |    |		Load	0x0,0xb
02ab 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02ac 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
02ad 4884       |H   |		Short_Literal	0x84
02ae 010f       |    |		Execute	Exception,Equal
02af 6807       |h   |		Jump_Zero	0x2b7
02b0 00d9       |    |		Load_Top	At_Offset_1
02b1 e228       | (  |		Load	0x1,0x28
02b2 e402       |    |		Load	0x2,0x2
02b3 e403       |    |		Load	0x2,0x3
02b4 e00b       |    |		Load	0x0,0xb
02b5 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
02b6 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
02b7 00d9       |    |		Load_Top	At_Offset_1
02b8 e228       | (  |		Load	0x1,0x28
02b9 e402       |    |		Load	0x2,0x2
02ba e403       |    |		Load	0x2,0x3
02bb e00b       |    |		Load	0x0,0xb
02bc 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
02bd 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
02be 0000 0000  |    |		.XXX[0x2]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02cf       |    |		.CONST	0x02cf								; Address of begin
02c1 02f7       |    |		.CONST	0x02f7								; Address of exception handler
02c2 0004       |    |		.CONST	0x0004								; Number of locals
02c3			INIT_02c0:
02c3 0092 0f4a  |   J|		Action	Push_String_Extended,0xf4a					; "Set_Secondary_Command"
02c5 e005       |    |		Load	0x0,0x5
02c6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02c7 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
02c8 e006       |    |		Load	0x0,0x6
02c9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02ca 02c7       |    |		Declare_Variable	Any
02cb e5fd       |    |		Load	0x2,-0x3
02cc e006       |    |		Load	0x0,0x6
02cd 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
02ce a404       |    |		Store_Unchecked	0x2,0x4
02cf			BODY_02c0:
02cf 00d8       |    |		Load_Top	At_Offset_0
02d0 e228       | (  |		Load	0x1,0x28
02d1 0092 0f4b  |   K|		Action	Push_String_Extended,0xf4b					; "Command => "
02d3 e5ff       |    |		Load	0x2,-0x1
02d4 01cc       |    |		Execute	Vector,Catenate
02d5 0092 0f4c  |   L|		Action	Push_String_Extended,0xf4c					; ", Secondary_referencer"
02d7 01cc       |    |		Execute	Vector,Catenate
02d8 e5fe       |    |		Load	0x2,-0x2
02d9 e00b       |    |		Load	0x0,0xb
02da 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02db 01cc       |    |		Execute	Vector,Catenate
02dc 0092 0f40  |   @|		Action	Push_String_Extended,0xf40					; ", Response"
02de 01cc       |    |		Execute	Vector,Catenate
02df e5fd       |    |		Load	0x2,-0x3
02e0 e00b       |    |		Load	0x0,0xb
02e1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02e2 01cc       |    |		Execute	Vector,Catenate
02e3 e402       |    |		Load	0x2,0x2
02e4 e00b       |    |		Load	0x0,0xb
02e5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02e6 00d8       |    |		Load_Top	At_Offset_0
02e7 e00c       |    |		Load	0x0,0xc
02e8 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02e9 00d9       |    |		Load_Top	At_Offset_1
02ea 00d9       |    |		Load_Top	At_Offset_1
02eb e5fe       |    |		Load	0x2,-0x2
02ec e5ff       |    |		Load	0x2,-0x1
02ed e22d       | -  |		Load	0x1,0x2d
02ee 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02ef 005a       | Z  |		Store_Top	Discrete,At_Offset_2
02f0 00d8       |    |		Load_Top	At_Offset_0
02f1 e228       | (  |		Load	0x1,0x28
02f2 e402       |    |		Load	0x2,0x2
02f3 e403       |    |		Load	0x2,0x3
02f4 e00b       |    |		Load	0x0,0xb
02f5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02f6 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
02f7			TRAP_02c0:
02f7 e005       |    |		Load	0x0,0x5
02f8 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
02f9 010f       |    |		Execute	Exception,Equal
02fa 6807       |h   |		Jump_Zero	0x302
02fb 00d9       |    |		Load_Top	At_Offset_1
02fc e228       | (  |		Load	0x1,0x28
02fd e402       |    |		Load	0x2,0x2
02fe e403       |    |		Load	0x2,0x3
02ff e00b       |    |		Load	0x0,0xb
0300 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0301 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0302 4884       |H   |		Short_Literal	0x84
0303 010f       |    |		Execute	Exception,Equal
0304 6807       |h   |		Jump_Zero	0x30c
0305 00d9       |    |		Load_Top	At_Offset_1
0306 e228       | (  |		Load	0x1,0x28
0307 e402       |    |		Load	0x2,0x2
0308 e403       |    |		Load	0x2,0x3
0309 e00b       |    |		Load	0x0,0xb
030a 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
030b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
030c 00d9       |    |		Load_Top	At_Offset_1
030d e228       | (  |		Load	0x1,0x28
030e e402       |    |		Load	0x2,0x2
030f e403       |    |		Load	0x2,0x3
0310 e00b       |    |		Load	0x0,0xb
0311 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0312 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0313 0000 0000  |    |		.BLANK	0000[0x5]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 031b       |    |		.CONST	0x031b								; Address of begin
0319 0004       |    |		.CONST	0x0004								; Address of exception handler
031a 0001       |    |		.CONST	0x0001								; Number of locals
031b			BODY_0318:
031b			INIT_0318:
031b e5fd       |    |		Load	0x2,-0x3
031c e5fe       |    |		Load	0x2,-0x2
031d e5ff       |    |		Load	0x2,-0x1
031e e22b       | +  |		Load	0x1,0x2b
031f 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0320 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0321 0000 0000  |    |		.BLANK	0000[0x7]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b       | +  |		.CONST	0x032b								; Address of begin
0329 0004       |    |		.CONST	0x0004								; Address of exception handler
032a 0001       |    |		.CONST	0x0001								; Number of locals
032b			BODY_0328:
032b			INIT_0328:
032b e5fa       |    |		Load	0x2,-0x6
032c e5fb       |    |		Load	0x2,-0x5
032d e5fc       |    |		Load	0x2,-0x4
032e e5fd       |    |		Load	0x2,-0x3
032f e5fe       |    |		Load	0x2,-0x2
0330 e5ff       |    |		Load	0x2,-0x1
0331 e22b       | +  |		Load	0x1,0x2b
0332 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0333 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0334 0000 0000  |    |		.BLANK	0000[0x4]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033b       | ;  |		.CONST	0x033b								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 0001       |    |		.CONST	0x0001								; Number of locals
033b			BODY_0338:
033b			INIT_0338:
033b e5fb       |    |		Load	0x2,-0x5
033c e5fc       |    |		Load	0x2,-0x4
033d e5fd       |    |		Load	0x2,-0x3
033e e5fe       |    |		Load	0x2,-0x2
033f e5ff       |    |		Load	0x2,-0x1
0340 e22b       | +  |		Load	0x1,0x2b
0341 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0342 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0343 0000 0000  |    |		.BLANK	0000[0x5]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034b       | K  |		.CONST	0x034b								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0001       |    |		.CONST	0x0001								; Number of locals
034b			BODY_0348:
034b			INIT_0348:
034b e5fd       |    |		Load	0x2,-0x3
034c e5fe       |    |		Load	0x2,-0x2
034d e5ff       |    |		Load	0x2,-0x1
034e e22b       | +  |		Load	0x1,0x2b
034f 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0350 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0351 0000 0000  |    |		.BLANK	0000[0x7]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 036f       | o  |		.CONST	0x036f								; Address of begin
0359 03a5       |    |		.CONST	0x03a5								; Address of exception handler
035a 0006       |    |		.CONST	0x0006								; Number of locals
035b			INIT_0358:
035b 0092 0f4d  |   M|		Action	Push_String_Extended,0xf4d					; "Link"
035d e005       |    |		Load	0x0,0x5
035e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
035f 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0360 e006       |    |		Load	0x0,0x6
0361 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0362 02c7       |    |		Declare_Variable	Any
0363 e5fc       |    |		Load	0x2,-0x4
0364 e006       |    |		Load	0x0,0x6
0365 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0366 a404       |    |		Store_Unchecked	0x2,0x4
0367 e007       |    |		Load	0x0,0x7
0368 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0369 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
036a 02c7       |    |		Declare_Variable	Any
036b 00d8       |    |		Load_Top	At_Offset_0
036c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
036d 029f 0c13  |    |		Declare_Subprogram	INIT_0c10,For_Call
036f			BODY_0358:
036f 00da       |    |		Load_Top	At_Offset_2
0370 e228       | (  |		Load	0x1,0x28
0371 0092 0f4e  |   N|		Action	Push_String_Extended,0xf4e					; "Main_Unit"
0373 e5ff       |    |		Load	0x2,-0x1
0374 e00b       |    |		Load	0x0,0xb
0375 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0376 01cc       |    |		Execute	Vector,Catenate
0377 0092 0f4f  |   O|		Action	Push_String_Extended,0xf4f					; "Make_Uncoded_Units => "
0379 01cc       |    |		Execute	Vector,Catenate
037a e5fe       |    |		Load	0x2,-0x2
037b 00e1       |    |		Load_Encached	Boolean_Cache
037c 011c       |    |		Execute	Any,Convert_Unchecked
037d 1c01       |    |		Execute_Immediate	Run_Utility,0x1
037e 01cc       |    |		Execute	Vector,Catenate
037f 0092 0f50  |   P|		Action	Push_String_Extended,0xf50					; ", Executable_Name"
0381 01cc       |    |		Execute	Vector,Catenate
0382 e5fd       |    |		Load	0x2,-0x3
0383 e00b       |    |		Load	0x0,0xb
0384 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0385 01cc       |    |		Execute	Vector,Catenate
0386 0092 0f43  |   C|		Action	Push_String_Extended,0xf43					; "Response"
0388 01cc       |    |		Execute	Vector,Catenate
0389 e5fc       |    |		Load	0x2,-0x4
038a e00b       |    |		Load	0x0,0xb
038b 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
038c 01cc       |    |		Execute	Vector,Catenate
038d e402       |    |		Load	0x2,0x2
038e e00b       |    |		Load	0x0,0xb
038f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0390 00da       |    |		Load_Top	At_Offset_2
0391 4800       |H   |		Short_Literal	0x0
0392 e5ff       |    |		Load	0x2,-0x1
0393 e00d       |    |		Load	0x0,0xd
0394 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0395 c405       |    |		Store	0x2,0x5
0396 8406       |    |		Call	0x2,0x6
0397 00db       |    |		Load_Top	At_Offset_3
0398 00db       |    |		Load_Top	At_Offset_3
0399 e5fd       |    |		Load	0x2,-0x3
039a e5fe       |    |		Load	0x2,-0x2
039b e405       |    |		Load	0x2,0x5
039c 822a       | *  |		Call	0x1,0x2a
039d c403       |    |		Store	0x2,0x3
039e 00da       |    |		Load_Top	At_Offset_2
039f e228       | (  |		Load	0x1,0x28
03a0 e402       |    |		Load	0x2,0x2
03a1 e403       |    |		Load	0x2,0x3
03a2 e00b       |    |		Load	0x0,0xb
03a3 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03a4 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03a5			TRAP_0358:
03a5 e005       |    |		Load	0x0,0x5
03a6 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
03a7 010f       |    |		Execute	Exception,Equal
03a8 6807       |h   |		Jump_Zero	0x3b0
03a9 00db       |    |		Load_Top	At_Offset_3
03aa e228       | (  |		Load	0x1,0x28
03ab e402       |    |		Load	0x2,0x2
03ac e403       |    |		Load	0x2,0x3
03ad e00b       |    |		Load	0x0,0xb
03ae 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03af 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03b0 4884       |H   |		Short_Literal	0x84
03b1 010f       |    |		Execute	Exception,Equal
03b2 6807       |h   |		Jump_Zero	0x3ba
03b3 00db       |    |		Load_Top	At_Offset_3
03b4 e228       | (  |		Load	0x1,0x28
03b5 e402       |    |		Load	0x2,0x2
03b6 e403       |    |		Load	0x2,0x3
03b7 e00b       |    |		Load	0x0,0xb
03b8 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03b9 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03ba 00db       |    |		Load_Top	At_Offset_3
03bb e228       | (  |		Load	0x1,0x28
03bc e402       |    |		Load	0x2,0x2
03bd e403       |    |		Load	0x2,0x3
03be e00b       |    |		Load	0x0,0xb
03bf 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03c0 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03c1 0000 0000  |    |		.BLANK	0000[0x7]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb       |    |		.CONST	0x03cb								; Address of begin
03c9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ca 0001       |    |		.CONST	0x0001								; Number of locals
03cb			BODY_03c8:
03cb			INIT_03c8:
03cb e5fc       |    |		Load	0x2,-0x4
03cc e5fd       |    |		Load	0x2,-0x3
03cd e5fe       |    |		Load	0x2,-0x2
03ce e5ff       |    |		Load	0x2,-0x1
03cf e22b       | +  |		Load	0x1,0x2b
03d0 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03d1 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03d2 0000 0000  |    |		.BLANK	0000[0x6]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 0401       |    |		.CONST	0x0401								; Address of begin
03d9 044a       | J  |		.CONST	0x044a								; Address of exception handler
03da 000b       |    |		.CONST	0x000b								; Number of locals
03db			INIT_03d8:
03db 0092 0f51  |   Q|		Action	Push_String_Extended,0xf51					; "Show_Remote_Unit_Name"
03dd e005       |    |		Load	0x0,0x5
03de 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03df 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
03e0 e006       |    |		Load	0x0,0x6
03e1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03e2 02c7       |    |		Declare_Variable	Any
03e3 e5fe       |    |		Load	0x2,-0x2
03e4 e006       |    |		Load	0x0,0x6
03e5 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
03e6 a404       |    |		Store_Unchecked	0x2,0x4
03e7 00e1       |    |		Load_Encached	Boolean_Cache
03e8 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
03e9 00e2       |    |		Load_Encached	Integer_Cache
03ea e007       |    |		Load	0x0,0x7
03eb 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03ec 02c7       |    |		Declare_Variable	Any
03ed 00d8       |    |		Load_Top	At_Offset_0
03ee 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03ef e007       |    |		Load	0x0,0x7
03f0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03f1 02c7       |    |		Declare_Variable	Any
03f2 00d8       |    |		Load_Top	At_Offset_0
03f3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03f4 e007       |    |		Load	0x0,0x7
03f5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03f6 02c7       |    |		Declare_Variable	Any
03f7 00d8       |    |		Load_Top	At_Offset_0
03f8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03f9 e007       |    |		Load	0x0,0x7
03fa 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03fb 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
03fc 02c7       |    |		Declare_Variable	Any
03fd 00d8       |    |		Load_Top	At_Offset_0
03fe 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03ff 029f 0c6b  |   k|		Declare_Subprogram	INIT_0c68,For_Call
0401			BODY_03d8:
0401 e404       |    |		Load	0x2,0x4
0402 e228       | (  |		Load	0x1,0x28
0403 0092 0f52  |   R|		Action	Push_String_Extended,0xf52					; "Unit"
0405 e5ff       |    |		Load	0x2,-0x1
0406 e00b       |    |		Load	0x0,0xb
0407 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0408 01cc       |    |		Execute	Vector,Catenate
0409 0092 0f43  |   C|		Action	Push_String_Extended,0xf43					; "Response"
040b 01cc       |    |		Execute	Vector,Catenate
040c e5fe       |    |		Load	0x2,-0x2
040d e00b       |    |		Load	0x0,0xb
040e 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
040f 01cc       |    |		Execute	Vector,Catenate
0410 e402       |    |		Load	0x2,0x2
0411 e00b       |    |		Load	0x0,0xb
0412 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0413 e404       |    |		Load	0x2,0x4
0414 e00c       |    |		Load	0x0,0xc
0415 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0416 e404       |    |		Load	0x2,0x4
0417 4800       |H   |		Short_Literal	0x0
0418 e5ff       |    |		Load	0x2,-0x1
0419 e00d       |    |		Load	0x0,0xd
041a 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
041b c40a       |    |		Store	0x2,0xa
041c 00d9       |    |		Load_Top	At_Offset_1
041d e007       |    |		Load	0x0,0x7
041e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
041f 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0420 6813       |h   |		Jump_Zero	0x434
0421 e404       |    |		Load	0x2,0x4
0422 4801       |H   |		Short_Literal	0x1
0423 4801       |H   |		Short_Literal	0x1
0424 e00f       |    |		Load	0x0,0xf
0425 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0426 0334       | 4  |		Declare_Variable	Array,With_Constraint
0427 e5ff       |    |		Load	0x2,-0x1
0428 e00f       |    |		Load	0x0,0xf
0429 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
042a e00f       |    |		Load	0x0,0xf
042b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
042c 0119       |    |		Execute	Any,Check_In_Formal_Type
042d 4801       |H   |		Short_Literal	0x1
042e 00da       |    |		Load_Top	At_Offset_2
042f 01d6       |    |		Execute	Vector,Field_Write
0430 6037       |`7  |		Indirect_Literal	Discrete,0x468,{0x00000000, 0x0000882b}
0431 e005       |    |		Load	0x0,0x5
0432 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0433 780f       |x   |		Jump	0x443
0434 00cf       |    |		Action	Mark_Auxiliary
0435 7807       |x   |		Jump	0x43d
0436 840b       |    |		Call	0x2,0xb
0437 00da       |    |		Load_Top	At_Offset_2
0438 e007       |    |		Load	0x0,0x7
0439 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
043a 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
043b c40a       |    |		Store	0x2,0xa
043c 00c9       |    |		Action	Pop_Auxiliary_Loop
043d 00da       |    |		Load_Top	At_Offset_2
043e e007       |    |		Load	0x0,0x7
043f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0440 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0441 6ff4       |o   |		Jump_Zero	0x436
0442 00ce       |    |		Action	Pop_Auxiliary
0443 e404       |    |		Load	0x2,0x4
0444 e228       | (  |		Load	0x1,0x28
0445 e402       |    |		Load	0x2,0x2
0446 e403       |    |		Load	0x2,0x3
0447 e00b       |    |		Load	0x0,0xb
0448 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0449 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
044a			TRAP_03d8:
044a e005       |    |		Load	0x0,0x5
044b 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
044c 010f       |    |		Execute	Exception,Equal
044d 6807       |h   |		Jump_Zero	0x455
044e e404       |    |		Load	0x2,0x4
044f e228       | (  |		Load	0x1,0x28
0450 e402       |    |		Load	0x2,0x2
0451 e403       |    |		Load	0x2,0x3
0452 e00b       |    |		Load	0x0,0xb
0453 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0454 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0455 4884       |H   |		Short_Literal	0x84
0456 010f       |    |		Execute	Exception,Equal
0457 6807       |h   |		Jump_Zero	0x45f
0458 e404       |    |		Load	0x2,0x4
0459 e228       | (  |		Load	0x1,0x28
045a e402       |    |		Load	0x2,0x2
045b e403       |    |		Load	0x2,0x3
045c e00b       |    |		Load	0x0,0xb
045d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
045e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
045f e404       |    |		Load	0x2,0x4
0460 e228       | (  |		Load	0x1,0x28
0461 e402       |    |		Load	0x2,0x2
0462 e403       |    |		Load	0x2,0x3
0463 e00b       |    |		Load	0x0,0xb
0464 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0465 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0466 0000 0000  |    |		.XXX[0x2]
0468 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000882b}
046c 0000 0000  |    |		.BLANK	0000[0x4]
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0491       |    |		.CONST	0x0491								; Address of begin
0471 04e6       |    |		.CONST	0x04e6								; Address of exception handler
0472 0008       |    |		.CONST	0x0008								; Number of locals
0473			INIT_0470:
0473 0092 0f53  |   S|		Action	Push_String_Extended,0xf53					; "Show_Units"
0475 e005       |    |		Load	0x0,0x5
0476 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0477 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0478 e006       |    |		Load	0x0,0x6
0479 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
047a 02c7       |    |		Declare_Variable	Any
047b e5fc       |    |		Load	0x2,-0x4
047c e006       |    |		Load	0x0,0x6
047d 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
047e a404       |    |		Store_Unchecked	0x2,0x4
047f e007       |    |		Load	0x0,0x7
0480 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0481 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0482 02c7       |    |		Declare_Variable	Any
0483 00d8       |    |		Load_Top	At_Offset_0
0484 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0485 e007       |    |		Load	0x0,0x7
0486 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0487 02c7       |    |		Declare_Variable	Any
0488 00d8       |    |		Load_Top	At_Offset_0
0489 1c00       |    |		Execute_Immediate	Run_Utility,0x0
048a e007       |    |		Load	0x0,0x7
048b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
048c 02c7       |    |		Declare_Variable	Any
048d 00d8       |    |		Load_Top	At_Offset_0
048e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
048f 029f 0cc3  |    |		Declare_Subprogram	INIT_0cc0,For_Call
0491			BODY_0470:
0491 e404       |    |		Load	0x2,0x4
0492 e228       | (  |		Load	0x1,0x28
0493 0092 0f52  |   R|		Action	Push_String_Extended,0xf52					; "Unit"
0495 e5ff       |    |		Load	0x2,-0x1
0496 e00b       |    |		Load	0x0,0xb
0497 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0498 01cc       |    |		Execute	Vector,Catenate
0499 0092 0f54  |   T|		Action	Push_String_Extended,0xf54					; "Remote_Name => "
049b 01cc       |    |		Execute	Vector,Catenate
049c e5fe       |    |		Load	0x2,-0x2
049d 00e1       |    |		Load_Encached	Boolean_Cache
049e 011c       |    |		Execute	Any,Convert_Unchecked
049f 1c01       |    |		Execute_Immediate	Run_Utility,0x1
04a0 01cc       |    |		Execute	Vector,Catenate
04a1 0092 0f55  |   U|		Action	Push_String_Extended,0xf55					; ", Consistency => "
04a3 01cc       |    |		Execute	Vector,Catenate
04a4 e5fd       |    |		Load	0x2,-0x3
04a5 00e1       |    |		Load_Encached	Boolean_Cache
04a6 011c       |    |		Execute	Any,Convert_Unchecked
04a7 1c01       |    |		Execute_Immediate	Run_Utility,0x1
04a8 01cc       |    |		Execute	Vector,Catenate
04a9 0092 0f40  |   @|		Action	Push_String_Extended,0xf40					; ", Response"
04ab 01cc       |    |		Execute	Vector,Catenate
04ac e5fc       |    |		Load	0x2,-0x4
04ad e00b       |    |		Load	0x0,0xb
04ae 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
04af 01cc       |    |		Execute	Vector,Catenate
04b0 e402       |    |		Load	0x2,0x2
04b1 e00b       |    |		Load	0x0,0xb
04b2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04b3 e404       |    |		Load	0x2,0x4
04b4 e00c       |    |		Load	0x0,0xc
04b5 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04b6 e404       |    |		Load	0x2,0x4
04b7 4801       |H   |		Short_Literal	0x1
04b8 e5ff       |    |		Load	0x2,-0x1
04b9 e00d       |    |		Load	0x0,0xd
04ba 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
04bb c405       |    |		Store	0x2,0x5
04bc e404       |    |		Load	0x2,0x4
04bd 4801       |H   |		Short_Literal	0x1
04be e404       |    |		Load	0x2,0x4
04bf 4801       |H   |		Short_Literal	0x1
04c0 e405       |    |		Load	0x2,0x5
04c1 e00d       |    |		Load	0x0,0xd
04c2 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
04c3 e00d       |    |		Load	0x0,0xd
04c4 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
04c5 c407       |    |		Store	0x2,0x7
04c6 e404       |    |		Load	0x2,0x4
04c7 00da       |    |		Load_Top	At_Offset_2
04c8 e00c       |    |		Load	0x0,0xc
04c9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04ca 00cf       |    |		Action	Mark_Auxiliary
04cb 780d       |x   |		Jump	0x4d9
04cc e404       |    |		Load	0x2,0x4
04cd 4801       |H   |		Short_Literal	0x1
04ce e405       |    |		Load	0x2,0x5
04cf e00d       |    |		Load	0x0,0xd
04d0 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
04d1 c406       |    |		Store	0x2,0x6
04d2 8408       |    |		Call	0x2,0x8
04d3 e405       |    |		Load	0x2,0x5
04d4 e007       |    |		Load	0x0,0x7
04d5 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
04d6 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
04d7 c405       |    |		Store	0x2,0x5
04d8 00c9       |    |		Action	Pop_Auxiliary_Loop
04d9 e405       |    |		Load	0x2,0x5
04da e007       |    |		Load	0x0,0x7
04db 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
04dc 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
04dd 6fee       |o   |		Jump_Zero	0x4cc
04de 00ce       |    |		Action	Pop_Auxiliary
04df e404       |    |		Load	0x2,0x4
04e0 e228       | (  |		Load	0x1,0x28
04e1 e402       |    |		Load	0x2,0x2
04e2 e403       |    |		Load	0x2,0x3
04e3 e00b       |    |		Load	0x0,0xb
04e4 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
04e5 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
04e6			TRAP_0470:
04e6 e005       |    |		Load	0x0,0x5
04e7 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
04e8 010f       |    |		Execute	Exception,Equal
04e9 6807       |h   |		Jump_Zero	0x4f1
04ea e404       |    |		Load	0x2,0x4
04eb e228       | (  |		Load	0x1,0x28
04ec e402       |    |		Load	0x2,0x2
04ed e403       |    |		Load	0x2,0x3
04ee e00b       |    |		Load	0x0,0xb
04ef 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
04f0 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
04f1 4884       |H   |		Short_Literal	0x84
04f2 010f       |    |		Execute	Exception,Equal
04f3 6807       |h   |		Jump_Zero	0x4fb
04f4 e404       |    |		Load	0x2,0x4
04f5 e228       | (  |		Load	0x1,0x28
04f6 e402       |    |		Load	0x2,0x2
04f7 e403       |    |		Load	0x2,0x3
04f8 e00b       |    |		Load	0x0,0xb
04f9 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
04fa 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
04fb e404       |    |		Load	0x2,0x4
04fc e228       | (  |		Load	0x1,0x28
04fd e402       |    |		Load	0x2,0x2
04fe e403       |    |		Load	0x2,0x3
04ff e00b       |    |		Load	0x0,0xb
0500 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0501 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0502 0000 0000  |    |		.BLANK	0000[0x6]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 0517       |    |		.CONST	0x0517								; Address of begin
0509 054d       | M  |		.CONST	0x054d								; Address of exception handler
050a 0004       |    |		.CONST	0x0004								; Number of locals
050b			INIT_0508:
050b 0092 0f56  |   V|		Action	Push_String_Extended,0xf56					; "Set_Unit_Option"
050d e005       |    |		Load	0x0,0x5
050e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
050f 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0510 e006       |    |		Load	0x0,0x6
0511 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0512 02c7       |    |		Declare_Variable	Any
0513 e5fc       |    |		Load	0x2,-0x4
0514 e006       |    |		Load	0x0,0x6
0515 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0516 a404       |    |		Store_Unchecked	0x2,0x4
0517			BODY_0508:
0517 00d8       |    |		Load_Top	At_Offset_0
0518 e228       | (  |		Load	0x1,0x28
0519 0092 0f57  |   W|		Action	Push_String_Extended,0xf57					; "Option_Switch"
051b e5ff       |    |		Load	0x2,-0x1
051c e00b       |    |		Load	0x0,0xb
051d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
051e 01cc       |    |		Execute	Vector,Catenate
051f 0092 0f58  |   X|		Action	Push_String_Extended,0xf58					; ", switch_Value"
0521 01cc       |    |		Execute	Vector,Catenate
0522 e5fe       |    |		Load	0x2,-0x2
0523 00e1       |    |		Load_Encached	Boolean_Cache
0524 011c       |    |		Execute	Any,Convert_Unchecked
0525 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0526 e00b       |    |		Load	0x0,0xb
0527 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0528 01cc       |    |		Execute	Vector,Catenate
0529 0092 0f59  |   Y|		Action	Push_String_Extended,0xf59					; ", Units"
052b 01cc       |    |		Execute	Vector,Catenate
052c e5fd       |    |		Load	0x2,-0x3
052d e00b       |    |		Load	0x0,0xb
052e 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
052f 01cc       |    |		Execute	Vector,Catenate
0530 0092 0f40  |   @|		Action	Push_String_Extended,0xf40					; ", Response"
0532 01cc       |    |		Execute	Vector,Catenate
0533 e5fc       |    |		Load	0x2,-0x4
0534 e00b       |    |		Load	0x0,0xb
0535 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0536 01cc       |    |		Execute	Vector,Catenate
0537 e402       |    |		Load	0x2,0x2
0538 e00b       |    |		Load	0x0,0xb
0539 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
053a 00d8       |    |		Load_Top	At_Offset_0
053b e00c       |    |		Load	0x0,0xc
053c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
053d e005       |    |		Load	0x0,0x5
053e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
053f 00d9       |    |		Load_Top	At_Offset_1
0540 e5fd       |    |		Load	0x2,-0x3
0541 e5fe       |    |		Load	0x2,-0x2
0542 e5ff       |    |		Load	0x2,-0x1
0543 e22e       | .  |		Load	0x1,0x2e
0544 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0545 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0546 00d8       |    |		Load_Top	At_Offset_0
0547 e228       | (  |		Load	0x1,0x28
0548 e402       |    |		Load	0x2,0x2
0549 e403       |    |		Load	0x2,0x3
054a e00b       |    |		Load	0x0,0xb
054b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
054c 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
054d			TRAP_0508:
054d e005       |    |		Load	0x0,0x5
054e 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
054f 010f       |    |		Execute	Exception,Equal
0550 6807       |h   |		Jump_Zero	0x558
0551 00d9       |    |		Load_Top	At_Offset_1
0552 e228       | (  |		Load	0x1,0x28
0553 e402       |    |		Load	0x2,0x2
0554 e403       |    |		Load	0x2,0x3
0555 e00b       |    |		Load	0x0,0xb
0556 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0557 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0558 4884       |H   |		Short_Literal	0x84
0559 010f       |    |		Execute	Exception,Equal
055a 6807       |h   |		Jump_Zero	0x562
055b 00d9       |    |		Load_Top	At_Offset_1
055c e228       | (  |		Load	0x1,0x28
055d e402       |    |		Load	0x2,0x2
055e e403       |    |		Load	0x2,0x3
055f e00b       |    |		Load	0x0,0xb
0560 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0561 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0562 00d9       |    |		Load_Top	At_Offset_1
0563 e228       | (  |		Load	0x1,0x28
0564 e402       |    |		Load	0x2,0x2
0565 e403       |    |		Load	0x2,0x3
0566 e00b       |    |		Load	0x0,0xb
0567 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0568 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0569 0000 0000  |    |		.BLANK	0000[0x7]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 057f       |    |		.CONST	0x057f								; Address of begin
0571 05b2       |    |		.CONST	0x05b2								; Address of exception handler
0572 0004       |    |		.CONST	0x0004								; Number of locals
0573			INIT_0570:
0573 0092 0f56  |   V|		Action	Push_String_Extended,0xf56					; "Set_Unit_Option"
0575 e005       |    |		Load	0x0,0x5
0576 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0577 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0578 e006       |    |		Load	0x0,0x6
0579 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
057a 02c7       |    |		Declare_Variable	Any
057b e5fc       |    |		Load	0x2,-0x4
057c e006       |    |		Load	0x0,0x6
057d 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
057e a404       |    |		Store_Unchecked	0x2,0x4
057f			BODY_0570:
057f 00d8       |    |		Load_Top	At_Offset_0
0580 e228       | (  |		Load	0x1,0x28
0581 0092 0f57  |   W|		Action	Push_String_Extended,0xf57					; "Option_Switch"
0583 e5ff       |    |		Load	0x2,-0x1
0584 e00b       |    |		Load	0x0,0xb
0585 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0586 01cc       |    |		Execute	Vector,Catenate
0587 0092 0f5a  |   Z|		Action	Push_String_Extended,0xf5a					; ", Switch_Value"
0589 01cc       |    |		Execute	Vector,Catenate
058a e5fe       |    |		Load	0x2,-0x2
058b e00b       |    |		Load	0x0,0xb
058c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
058d 01cc       |    |		Execute	Vector,Catenate
058e 0092 0f59  |   Y|		Action	Push_String_Extended,0xf59					; ", Units"
0590 01cc       |    |		Execute	Vector,Catenate
0591 e5fd       |    |		Load	0x2,-0x3
0592 e00b       |    |		Load	0x0,0xb
0593 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0594 01cc       |    |		Execute	Vector,Catenate
0595 0092 0f40  |   @|		Action	Push_String_Extended,0xf40					; ", Response"
0597 01cc       |    |		Execute	Vector,Catenate
0598 e5fc       |    |		Load	0x2,-0x4
0599 e00b       |    |		Load	0x0,0xb
059a 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
059b 01cc       |    |		Execute	Vector,Catenate
059c e402       |    |		Load	0x2,0x2
059d e00b       |    |		Load	0x0,0xb
059e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
059f 00d8       |    |		Load_Top	At_Offset_0
05a0 e00c       |    |		Load	0x0,0xc
05a1 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
05a2 e005       |    |		Load	0x0,0x5
05a3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05a4 00d9       |    |		Load_Top	At_Offset_1
05a5 e5fd       |    |		Load	0x2,-0x3
05a6 e5fe       |    |		Load	0x2,-0x2
05a7 e5ff       |    |		Load	0x2,-0x1
05a8 e22e       | .  |		Load	0x1,0x2e
05a9 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05aa 005a       | Z  |		Store_Top	Discrete,At_Offset_2
05ab 00d8       |    |		Load_Top	At_Offset_0
05ac e228       | (  |		Load	0x1,0x28
05ad e402       |    |		Load	0x2,0x2
05ae e403       |    |		Load	0x2,0x3
05af e00b       |    |		Load	0x0,0xb
05b0 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
05b1 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
05b2			TRAP_0570:
05b2 e005       |    |		Load	0x0,0x5
05b3 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
05b4 010f       |    |		Execute	Exception,Equal
05b5 6807       |h   |		Jump_Zero	0x5bd
05b6 00d9       |    |		Load_Top	At_Offset_1
05b7 e228       | (  |		Load	0x1,0x28
05b8 e402       |    |		Load	0x2,0x2
05b9 e403       |    |		Load	0x2,0x3
05ba e00b       |    |		Load	0x0,0xb
05bb 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
05bc 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
05bd 4884       |H   |		Short_Literal	0x84
05be 010f       |    |		Execute	Exception,Equal
05bf 6807       |h   |		Jump_Zero	0x5c7
05c0 00d9       |    |		Load_Top	At_Offset_1
05c1 e228       | (  |		Load	0x1,0x28
05c2 e402       |    |		Load	0x2,0x2
05c3 e403       |    |		Load	0x2,0x3
05c4 e00b       |    |		Load	0x0,0xb
05c5 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
05c6 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
05c7 00d9       |    |		Load_Top	At_Offset_1
05c8 e228       | (  |		Load	0x1,0x28
05c9 e402       |    |		Load	0x2,0x2
05ca e403       |    |		Load	0x2,0x3
05cb e00b       |    |		Load	0x0,0xb
05cc 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05cd 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
05ce 0000 0000  |    |		.XXX[0x2]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05df       |    |		.CONST	0x05df								; Address of begin
05d1 0602       |    |		.CONST	0x0602								; Address of exception handler
05d2 0004       |    |		.CONST	0x0004								; Number of locals
05d3			INIT_05d0:
05d3 0092 0f5b  |   [|		Action	Push_String_Extended,0xf5b					; "Display_Unit_Options"
05d5 e005       |    |		Load	0x0,0x5
05d6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05d7 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
05d8 e006       |    |		Load	0x0,0x6
05d9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05da 02c7       |    |		Declare_Variable	Any
05db e5fe       |    |		Load	0x2,-0x2
05dc e006       |    |		Load	0x0,0x6
05dd 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
05de a404       |    |		Store_Unchecked	0x2,0x4
05df			BODY_05d0:
05df 00d8       |    |		Load_Top	At_Offset_0
05e0 e228       | (  |		Load	0x1,0x28
05e1 0092 0f5c  |   \|		Action	Push_String_Extended,0xf5c					; "Units"
05e3 e5ff       |    |		Load	0x2,-0x1
05e4 e00b       |    |		Load	0x0,0xb
05e5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
05e6 01cc       |    |		Execute	Vector,Catenate
05e7 0092 0f43  |   C|		Action	Push_String_Extended,0xf43					; "Response"
05e9 01cc       |    |		Execute	Vector,Catenate
05ea e5fe       |    |		Load	0x2,-0x2
05eb e00b       |    |		Load	0x0,0xb
05ec 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
05ed 01cc       |    |		Execute	Vector,Catenate
05ee e402       |    |		Load	0x2,0x2
05ef e00b       |    |		Load	0x0,0xb
05f0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05f1 00d8       |    |		Load_Top	At_Offset_0
05f2 e00c       |    |		Load	0x0,0xc
05f3 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
05f4 e005       |    |		Load	0x0,0x5
05f5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05f6 00d9       |    |		Load_Top	At_Offset_1
05f7 e5ff       |    |		Load	0x2,-0x1
05f8 e22e       | .  |		Load	0x1,0x2e
05f9 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
05fa 005a       | Z  |		Store_Top	Discrete,At_Offset_2
05fb 00d8       |    |		Load_Top	At_Offset_0
05fc e228       | (  |		Load	0x1,0x28
05fd e402       |    |		Load	0x2,0x2
05fe e403       |    |		Load	0x2,0x3
05ff e00b       |    |		Load	0x0,0xb
0600 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0601 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0602			TRAP_05d0:
0602 e005       |    |		Load	0x0,0x5
0603 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0604 010f       |    |		Execute	Exception,Equal
0605 6807       |h   |		Jump_Zero	0x60d
0606 00d9       |    |		Load_Top	At_Offset_1
0607 e228       | (  |		Load	0x1,0x28
0608 e402       |    |		Load	0x2,0x2
0609 e403       |    |		Load	0x2,0x3
060a e00b       |    |		Load	0x0,0xb
060b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
060c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
060d 4884       |H   |		Short_Literal	0x84
060e 010f       |    |		Execute	Exception,Equal
060f 6807       |h   |		Jump_Zero	0x617
0610 00d9       |    |		Load_Top	At_Offset_1
0611 e228       | (  |		Load	0x1,0x28
0612 e402       |    |		Load	0x2,0x2
0613 e403       |    |		Load	0x2,0x3
0614 e00b       |    |		Load	0x0,0xb
0615 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0616 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0617 00d9       |    |		Load_Top	At_Offset_1
0618 e228       | (  |		Load	0x1,0x28
0619 e402       |    |		Load	0x2,0x2
061a e403       |    |		Load	0x2,0x3
061b e00b       |    |		Load	0x0,0xb
061c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
061d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
061e 0000 0000  |    |		.XXX[0x2]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 062f       | /  |		.CONST	0x062f								; Address of begin
0621 065a       | Z  |		.CONST	0x065a								; Address of exception handler
0622 0004       |    |		.CONST	0x0004								; Number of locals
0623			INIT_0620:
0623 0092 0f5d  |   ]|		Action	Push_String_Extended,0xf5d					; "Remove_Unit_Option"
0625 e005       |    |		Load	0x0,0x5
0626 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0627 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0628 e006       |    |		Load	0x0,0x6
0629 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
062a 02c7       |    |		Declare_Variable	Any
062b e5fd       |    |		Load	0x2,-0x3
062c e006       |    |		Load	0x0,0x6
062d 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
062e a404       |    |		Store_Unchecked	0x2,0x4
062f			BODY_0620:
062f 00d8       |    |		Load_Top	At_Offset_0
0630 e228       | (  |		Load	0x1,0x28
0631 0092 0f57  |   W|		Action	Push_String_Extended,0xf57					; "Option_Switch"
0633 e5ff       |    |		Load	0x2,-0x1
0634 e00b       |    |		Load	0x0,0xb
0635 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0636 01cc       |    |		Execute	Vector,Catenate
0637 0092 0f59  |   Y|		Action	Push_String_Extended,0xf59					; ", Units"
0639 01cc       |    |		Execute	Vector,Catenate
063a e5fe       |    |		Load	0x2,-0x2
063b e00b       |    |		Load	0x0,0xb
063c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
063d 01cc       |    |		Execute	Vector,Catenate
063e 0092 0f40  |   @|		Action	Push_String_Extended,0xf40					; ", Response"
0640 01cc       |    |		Execute	Vector,Catenate
0641 e5fd       |    |		Load	0x2,-0x3
0642 e00b       |    |		Load	0x0,0xb
0643 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0644 01cc       |    |		Execute	Vector,Catenate
0645 e402       |    |		Load	0x2,0x2
0646 e00b       |    |		Load	0x0,0xb
0647 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0648 00d8       |    |		Load_Top	At_Offset_0
0649 e00c       |    |		Load	0x0,0xc
064a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
064b e005       |    |		Load	0x0,0x5
064c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
064d 00d9       |    |		Load_Top	At_Offset_1
064e e5fe       |    |		Load	0x2,-0x2
064f e5ff       |    |		Load	0x2,-0x1
0650 e22e       | .  |		Load	0x1,0x2e
0651 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0652 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0653 00d8       |    |		Load_Top	At_Offset_0
0654 e228       | (  |		Load	0x1,0x28
0655 e402       |    |		Load	0x2,0x2
0656 e403       |    |		Load	0x2,0x3
0657 e00b       |    |		Load	0x0,0xb
0658 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0659 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
065a			TRAP_0620:
065a e005       |    |		Load	0x0,0x5
065b 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
065c 010f       |    |		Execute	Exception,Equal
065d 6807       |h   |		Jump_Zero	0x665
065e 00d9       |    |		Load_Top	At_Offset_1
065f e228       | (  |		Load	0x1,0x28
0660 e402       |    |		Load	0x2,0x2
0661 e403       |    |		Load	0x2,0x3
0662 e00b       |    |		Load	0x0,0xb
0663 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0664 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0665 4884       |H   |		Short_Literal	0x84
0666 010f       |    |		Execute	Exception,Equal
0667 6807       |h   |		Jump_Zero	0x66f
0668 00d9       |    |		Load_Top	At_Offset_1
0669 e228       | (  |		Load	0x1,0x28
066a e402       |    |		Load	0x2,0x2
066b e403       |    |		Load	0x2,0x3
066c e00b       |    |		Load	0x0,0xb
066d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
066e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
066f 00d9       |    |		Load_Top	At_Offset_1
0670 e228       | (  |		Load	0x1,0x28
0671 e402       |    |		Load	0x2,0x2
0672 e403       |    |		Load	0x2,0x3
0673 e00b       |    |		Load	0x0,0xb
0674 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0675 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0676 0000 0000  |    |		.XXX[0x2]
0678 ; --------------------------------------------------------------------------------------
0678 ; SUBPROGRAM
0678 ; --------------------------------------------------------------------------------------
0678 0691       |    |		.CONST	0x0691								; Address of begin
0679 06d0       |    |		.CONST	0x06d0								; Address of exception handler
067a 0007       |    |		.CONST	0x0007								; Number of locals
067b			INIT_0678:
067b 0092 0f5e  |   ^|		Action	Push_String_Extended,0xf5e					; "Refresh_View"
067d e005       |    |		Load	0x0,0x5
067e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
067f 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0680 e006       |    |		Load	0x0,0x6
0681 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0682 02c7       |    |		Declare_Variable	Any
0683 e5fd       |    |		Load	0x2,-0x3
0684 e006       |    |		Load	0x0,0x6
0685 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0686 a404       |    |		Store_Unchecked	0x2,0x4
0687 e007       |    |		Load	0x0,0x7
0688 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0689 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
068a 02c7       |    |		Declare_Variable	Any
068b 00d8       |    |		Load_Top	At_Offset_0
068c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
068d 00e1       |    |		Load_Encached	Boolean_Cache
068e 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
068f 029f 0cfb  |    |		Declare_Subprogram	INIT_0cf8,For_Call
0691			BODY_0678:
0691 00db       |    |		Load_Top	At_Offset_3
0692 e228       | (  |		Load	0x1,0x28
0693 0092 0f5f  |   _|		Action	Push_String_Extended,0xf5f					; "View"
0695 e5ff       |    |		Load	0x2,-0x1
0696 e00b       |    |		Load	0x0,0xb
0697 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0698 01cc       |    |		Execute	Vector,Catenate
0699 0092 0f60  |   `|		Action	Push_String_Extended,0xf60					; ", Retain_History => "
069b 01cc       |    |		Execute	Vector,Catenate
069c e5fe       |    |		Load	0x2,-0x2
069d 00e1       |    |		Load_Encached	Boolean_Cache
069e 011c       |    |		Execute	Any,Convert_Unchecked
069f 1c01       |    |		Execute_Immediate	Run_Utility,0x1
06a0 01cc       |    |		Execute	Vector,Catenate
06a1 0092 0f40  |   @|		Action	Push_String_Extended,0xf40					; ", Response"
06a3 01cc       |    |		Execute	Vector,Catenate
06a4 e5fd       |    |		Load	0x2,-0x3
06a5 e00b       |    |		Load	0x0,0xb
06a6 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
06a7 01cc       |    |		Execute	Vector,Catenate
06a8 e402       |    |		Load	0x2,0x2
06a9 e00b       |    |		Load	0x0,0xb
06aa 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06ab 00db       |    |		Load_Top	At_Offset_3
06ac e00c       |    |		Load	0x0,0xc
06ad 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
06ae 00db       |    |		Load_Top	At_Offset_3
06af 0092 0f5f  |   _|		Action	Push_String_Extended,0xf5f					; "View"
06b1 e5ff       |    |		Load	0x2,-0x1
06b2 e00c       |    |		Load	0x0,0xc
06b3 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
06b4 00db       |    |		Load_Top	At_Offset_3
06b5 4801       |H   |		Short_Literal	0x1
06b6 e5ff       |    |		Load	0x2,-0x1
06b7 e00d       |    |		Load	0x0,0xd
06b8 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
06b9 c405       |    |		Store	0x2,0x5
06ba 00cf       |    |		Action	Mark_Auxiliary
06bb 7807       |x   |		Jump	0x6c3
06bc 8407       |    |		Call	0x2,0x7
06bd 00db       |    |		Load_Top	At_Offset_3
06be e007       |    |		Load	0x0,0x7
06bf 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
06c0 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
06c1 c405       |    |		Store	0x2,0x5
06c2 00c9       |    |		Action	Pop_Auxiliary_Loop
06c3 00db       |    |		Load_Top	At_Offset_3
06c4 e007       |    |		Load	0x0,0x7
06c5 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
06c6 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
06c7 6ff4       |o   |		Jump_Zero	0x6bc
06c8 00ce       |    |		Action	Pop_Auxiliary
06c9 00db       |    |		Load_Top	At_Offset_3
06ca e228       | (  |		Load	0x1,0x28
06cb e402       |    |		Load	0x2,0x2
06cc e403       |    |		Load	0x2,0x3
06cd e00b       |    |		Load	0x0,0xb
06ce 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
06cf 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
06d0			TRAP_0678:
06d0 e005       |    |		Load	0x0,0x5
06d1 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
06d2 010f       |    |		Execute	Exception,Equal
06d3 6807       |h   |		Jump_Zero	0x6db
06d4 e404       |    |		Load	0x2,0x4
06d5 e228       | (  |		Load	0x1,0x28
06d6 e402       |    |		Load	0x2,0x2
06d7 e403       |    |		Load	0x2,0x3
06d8 e00b       |    |		Load	0x0,0xb
06d9 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
06da 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
06db 4884       |H   |		Short_Literal	0x84
06dc 010f       |    |		Execute	Exception,Equal
06dd 6807       |h   |		Jump_Zero	0x6e5
06de e404       |    |		Load	0x2,0x4
06df e228       | (  |		Load	0x1,0x28
06e0 e402       |    |		Load	0x2,0x2
06e1 e403       |    |		Load	0x2,0x3
06e2 e00b       |    |		Load	0x0,0xb
06e3 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
06e4 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
06e5 e404       |    |		Load	0x2,0x4
06e6 e228       | (  |		Load	0x1,0x28
06e7 e402       |    |		Load	0x2,0x2
06e8 e403       |    |		Load	0x2,0x3
06e9 e00b       |    |		Load	0x0,0xb
06ea 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
06eb 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
06ec 0000 0000  |    |		.BLANK	0000[0x4]
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 06f3       |    |		.CONST	0x06f3								; Address of begin
06f1 0004       |    |		.CONST	0x0004								; Address of exception handler
06f2 0001       |    |		.CONST	0x0001								; Number of locals
06f3			BODY_06f0:
06f3			INIT_06f0:
06f3 00db       |    |		Load_Top	At_Offset_3
06f4 00db       |    |		Load_Top	At_Offset_3
06f5 e22c       | ,  |		Load	0x1,0x2c
06f6 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
06f7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 06fb       |    |		.CONST	0x06fb								; Address of begin
06f9 0004       |    |		.CONST	0x0004								; Address of exception handler
06fa 0001       |    |		.CONST	0x0001								; Number of locals
06fb			BODY_06f8:
06fb			INIT_06f8:
06fb e5fc       |    |		Load	0x2,-0x4
06fc e5fd       |    |		Load	0x2,-0x3
06fd e5fe       |    |		Load	0x2,-0x2
06fe e5ff       |    |		Load	0x2,-0x1
06ff e22c       | ,  |		Load	0x1,0x2c
0700 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0701 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0702 0000 0000  |    |		.BLANK	0000[0x6]
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 070b       |    |		.CONST	0x070b								; Address of begin
0709 0004       |    |		.CONST	0x0004								; Address of exception handler
070a 0001       |    |		.CONST	0x0001								; Number of locals
070b			BODY_0708:
070b			INIT_0708:
070b e5fb       |    |		Load	0x2,-0x5
070c e5fc       |    |		Load	0x2,-0x4
070d e5fd       |    |		Load	0x2,-0x3
070e e5fe       |    |		Load	0x2,-0x2
070f e5ff       |    |		Load	0x2,-0x1
0710 e22c       | ,  |		Load	0x1,0x2c
0711 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0712 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0713 0000 0000  |    |		.BLANK	0000[0x5]
0718 ; --------------------------------------------------------------------------------------
0718 ; SUBPROGRAM
0718 ; --------------------------------------------------------------------------------------
0718 071b       |    |		.CONST	0x071b								; Address of begin
0719 0004       |    |		.CONST	0x0004								; Address of exception handler
071a 0001       |    |		.CONST	0x0001								; Number of locals
071b			BODY_0718:
071b			INIT_0718:
071b 00db       |    |		Load_Top	At_Offset_3
071c 00db       |    |		Load_Top	At_Offset_3
071d e22c       | ,  |		Load	0x1,0x2c
071e 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
071f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0737       | 7  |		.CONST	0x0737								; Address of begin
0721 076b       | k  |		.CONST	0x076b								; Address of exception handler
0722 0006       |    |		.CONST	0x0006								; Number of locals
0723			INIT_0720:
0723 0092 0f61  |   a|		Action	Push_String_Extended,0xf61					; "Show_Remote_Information"
0725 e005       |    |		Load	0x0,0x5
0726 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0727 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0728 e006       |    |		Load	0x0,0x6
0729 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
072a 02c7       |    |		Declare_Variable	Any
072b e5fe       |    |		Load	0x2,-0x2
072c e006       |    |		Load	0x0,0x6
072d 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
072e a404       |    |		Store_Unchecked	0x2,0x4
072f e007       |    |		Load	0x0,0x7
0730 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0731 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0732 02c7       |    |		Declare_Variable	Any
0733 00d8       |    |		Load_Top	At_Offset_0
0734 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0735 029f 0d8b  |    |		Declare_Subprogram	INIT_0d88,For_Call
0737			BODY_0720:
0737 00da       |    |		Load_Top	At_Offset_2
0738 e228       | (  |		Load	0x1,0x28
0739 0092 0f5f  |   _|		Action	Push_String_Extended,0xf5f					; "View"
073b e5ff       |    |		Load	0x2,-0x1
073c e00b       |    |		Load	0x0,0xb
073d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
073e 01cc       |    |		Execute	Vector,Catenate
073f 0092 0f43  |   C|		Action	Push_String_Extended,0xf43					; "Response"
0741 01cc       |    |		Execute	Vector,Catenate
0742 e5fe       |    |		Load	0x2,-0x2
0743 e00b       |    |		Load	0x0,0xb
0744 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0745 01cc       |    |		Execute	Vector,Catenate
0746 e402       |    |		Load	0x2,0x2
0747 e00b       |    |		Load	0x0,0xb
0748 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0749 00da       |    |		Load_Top	At_Offset_2
074a e00c       |    |		Load	0x0,0xc
074b 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
074c 00da       |    |		Load_Top	At_Offset_2
074d 4801       |H   |		Short_Literal	0x1
074e e5ff       |    |		Load	0x2,-0x1
074f e00d       |    |		Load	0x0,0xd
0750 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0751 c405       |    |		Store	0x2,0x5
0752 00cf       |    |		Action	Mark_Auxiliary
0753 7807       |x   |		Jump	0x75b
0754 8406       |    |		Call	0x2,0x6
0755 00da       |    |		Load_Top	At_Offset_2
0756 e007       |    |		Load	0x0,0x7
0757 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0758 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0759 c405       |    |		Store	0x2,0x5
075a 00c9       |    |		Action	Pop_Auxiliary_Loop
075b 00da       |    |		Load_Top	At_Offset_2
075c e007       |    |		Load	0x0,0x7
075d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
075e 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
075f 6ff4       |o   |		Jump_Zero	0x754
0760 00ce       |    |		Action	Pop_Auxiliary
0761 4801       |H   |		Short_Literal	0x1
0762 e016       |    |		Load	0x0,0x16
0763 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
0764 00da       |    |		Load_Top	At_Offset_2
0765 e228       | (  |		Load	0x1,0x28
0766 e402       |    |		Load	0x2,0x2
0767 e403       |    |		Load	0x2,0x3
0768 e00b       |    |		Load	0x0,0xb
0769 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
076a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
076b			TRAP_0720:
076b e005       |    |		Load	0x0,0x5
076c 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
076d 010f       |    |		Execute	Exception,Equal
076e 6807       |h   |		Jump_Zero	0x776
076f 00db       |    |		Load_Top	At_Offset_3
0770 e228       | (  |		Load	0x1,0x28
0771 e402       |    |		Load	0x2,0x2
0772 e403       |    |		Load	0x2,0x3
0773 e00b       |    |		Load	0x0,0xb
0774 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0775 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0776 4884       |H   |		Short_Literal	0x84
0777 010f       |    |		Execute	Exception,Equal
0778 6807       |h   |		Jump_Zero	0x780
0779 00db       |    |		Load_Top	At_Offset_3
077a e228       | (  |		Load	0x1,0x28
077b e402       |    |		Load	0x2,0x2
077c e403       |    |		Load	0x2,0x3
077d e00b       |    |		Load	0x0,0xb
077e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
077f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0780 00db       |    |		Load_Top	At_Offset_3
0781 e228       | (  |		Load	0x1,0x28
0782 e402       |    |		Load	0x2,0x2
0783 e403       |    |		Load	0x2,0x3
0784 e00b       |    |		Load	0x0,0xb
0785 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0786 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0787 0000       |    |		.XXX[0x1]
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 07a1       |    |		.CONST	0x07a1								; Address of begin
0789 085b       | [  |		.CONST	0x085b								; Address of exception handler
078a 0006       |    |		.CONST	0x0006								; Number of locals
078b			INIT_0788:
078b 0092 0f62  |   b|		Action	Push_String_Extended,0xf62					; "Execute_Remote_Command"
078d e005       |    |		Load	0x0,0x5
078e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
078f 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0790 e006       |    |		Load	0x0,0x6
0791 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0792 02c7       |    |		Declare_Variable	Any
0793 e5f9       |    |		Load	0x2,-0x7
0794 e006       |    |		Load	0x0,0x6
0795 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0796 a404       |    |		Store_Unchecked	0x2,0x4
0797 e008       |    |		Load	0x0,0x8
0798 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0799 02c7       |    |		Declare_Variable	Any
079a 00d8       |    |		Load_Top	At_Offset_0
079b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
079c e01e       |    |		Load	0x0,0x1e
079d 1b62       | b  |		Execute	Package,Field_Read,Field_Number 0x62
079e 02c7       |    |		Declare_Variable	Any
079f 00d8       |    |		Load_Top	At_Offset_0
07a0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07a1			BODY_0788:
07a1 00da       |    |		Load_Top	At_Offset_2
07a2 e228       | (  |		Load	0x1,0x28
07a3 0092 0f63  |   c|		Action	Push_String_Extended,0xf63					; "remote_command"
07a5 e5ff       |    |		Load	0x2,-0x1
07a6 e00b       |    |		Load	0x0,0xb
07a7 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07a8 01cc       |    |		Execute	Vector,Catenate
07a9 0092 0f64  |   d|		Action	Push_String_Extended,0xf64					; ", remote_machine"
07ab 01cc       |    |		Execute	Vector,Catenate
07ac e5fe       |    |		Load	0x2,-0x2
07ad e00b       |    |		Load	0x0,0xb
07ae 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07af 01cc       |    |		Execute	Vector,Catenate
07b0 0092 0f65  |   e|		Action	Push_String_Extended,0xf65					; ", remote_username"
07b2 01cc       |    |		Execute	Vector,Catenate
07b3 e5fd       |    |		Load	0x2,-0x3
07b4 e00b       |    |		Load	0x0,0xb
07b5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07b6 01cc       |    |		Execute	Vector,Catenate
07b7 0092 0f66  |   f|		Action	Push_String_Extended,0xf66					; ", remote_password"
07b9 01cc       |    |		Execute	Vector,Catenate
07ba e5fc       |    |		Load	0x2,-0x4
07bb e00b       |    |		Load	0x0,0xb
07bc 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07bd 01cc       |    |		Execute	Vector,Catenate
07be 0092 0f67  |   g|		Action	Push_String_Extended,0xf67					; ", remote_directory"
07c0 01cc       |    |		Execute	Vector,Catenate
07c1 e5fb       |    |		Load	0x2,-0x5
07c2 e00b       |    |		Load	0x0,0xb
07c3 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07c4 01cc       |    |		Execute	Vector,Catenate
07c5 0092 0f68  |   h|		Action	Push_String_Extended,0xf68					; ", The_Key"
07c7 01cc       |    |		Execute	Vector,Catenate
07c8 e5fa       |    |		Load	0x2,-0x6
07c9 e00b       |    |		Load	0x0,0xb
07ca 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07cb 01cc       |    |		Execute	Vector,Catenate
07cc 0092 0f40  |   @|		Action	Push_String_Extended,0xf40					; ", Response"
07ce 01cc       |    |		Execute	Vector,Catenate
07cf e5f9       |    |		Load	0x2,-0x7
07d0 e00b       |    |		Load	0x0,0xb
07d1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
07d2 01cc       |    |		Execute	Vector,Catenate
07d3 e402       |    |		Load	0x2,0x2
07d4 e00b       |    |		Load	0x0,0xb
07d5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07d6 00da       |    |		Load_Top	At_Offset_2
07d7 e00c       |    |		Load	0x0,0xc
07d8 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
07d9 e5fa       |    |		Load	0x2,-0x6
07da 8234       | 4  |		Call	0x1,0x34
07db e01f       |    |		Load	0x0,0x1f
07dc 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
07dd e01e       |    |		Load	0x0,0x1e
07de 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
07df c406       |    |		Store	0x2,0x6
07e0 e005       |    |		Load	0x0,0x5
07e1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
07e2 00da       |    |		Load_Top	At_Offset_2
07e3 0120       |    |		Execute	Any,Is_Value
07e4 6803       |h   |		Jump_Zero	0x7e8
07e5 e008       |    |		Load	0x0,0x8
07e6 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
07e7 7801       |x   |		Jump	0x7e9
07e8 00da       |    |		Load_Top	At_Offset_2
07e9 4800       |H   |		Short_Literal	0x0
07ea e5fc       |    |		Load	0x2,-0x4
07eb 8233       | 3  |		Call	0x1,0x33
07ec e5fd       |    |		Load	0x2,-0x3
07ed 8232       | 2  |		Call	0x1,0x32
07ee e5fe       |    |		Load	0x2,-0x2
07ef 8231       | 1  |		Call	0x1,0x31
07f0 00ea       |    |		Load_Encached	Null_String_Cache
07f1 00ea       |    |		Load_Encached	Null_String_Cache
07f2 e5fb       |    |		Load	0x2,-0x5
07f3 8230       | 0  |		Call	0x1,0x30
07f4 e406       |    |		Load	0x2,0x6
07f5 e01e       |    |		Load	0x0,0x1e
07f6 18b8       |    |		Execute	Package,Field_Execute,Field_Number 0xb8
07f7 e406       |    |		Load	0x2,0x6
07f8 e008       |    |		Load	0x0,0x8
07f9 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
07fa c405       |    |		Store	0x2,0x5
07fb c403       |    |		Store	0x2,0x3
07fc 00db       |    |		Load_Top	At_Offset_3
07fd 6815       |h   |		Jump_Zero	0x813
07fe e006       |    |		Load	0x0,0x6
07ff 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0800 4801       |H   |		Short_Literal	0x1
0801 4801       |H   |		Short_Literal	0x1
0802 e00f       |    |		Load	0x0,0xf
0803 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0804 0334       | 4  |		Declare_Variable	Array,With_Constraint
0805 e5fe       |    |		Load	0x2,-0x2
0806 e00f       |    |		Load	0x0,0xf
0807 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0808 e00f       |    |		Load	0x0,0xf
0809 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
080a 0119       |    |		Execute	Any,Check_In_Formal_Type
080b 4801       |H   |		Short_Literal	0x1
080c 00da       |    |		Load_Top	At_Offset_2
080d 01d6       |    |		Execute	Vector,Field_Write
080e 6091       |`   |		Indirect_Literal	Discrete,0x8a0,{0x00000000, 0x00008803}
080f e005       |    |		Load	0x0,0x5
0810 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0811 e020       |    |		Load	0x0,0x20
0812 0257       | W  |		Execute	Discrete,Raise
0813 e005       |    |		Load	0x0,0x5
0814 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0815 4801       |H   |		Short_Literal	0x1
0816 4801       |H   |		Short_Literal	0x1
0817 4800       |H   |		Short_Literal	0x0
0818 4800       |H   |		Short_Literal	0x0
0819 00ea       |    |		Load_Encached	Null_String_Cache
081a e405       |    |		Load	0x2,0x5
081b e5ff       |    |		Load	0x2,-0x1
081c e008       |    |		Load	0x0,0x8
081d 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
081e c403       |    |		Store	0x2,0x3
081f 00db       |    |		Load_Top	At_Offset_3
0820 6815       |h   |		Jump_Zero	0x836
0821 e006       |    |		Load	0x0,0x6
0822 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0823 4801       |H   |		Short_Literal	0x1
0824 4801       |H   |		Short_Literal	0x1
0825 e00f       |    |		Load	0x0,0xf
0826 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0827 0334       | 4  |		Declare_Variable	Array,With_Constraint
0828 e5ff       |    |		Load	0x2,-0x1
0829 e00f       |    |		Load	0x0,0xf
082a 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
082b e00f       |    |		Load	0x0,0xf
082c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
082d 0119       |    |		Execute	Any,Check_In_Formal_Type
082e 4801       |H   |		Short_Literal	0x1
082f 00da       |    |		Load_Top	At_Offset_2
0830 01d6       |    |		Execute	Vector,Field_Write
0831 606a       |`j  |		Indirect_Literal	Discrete,0x89c,{0x00000000, 0x0000885c}
0832 e005       |    |		Load	0x0,0x5
0833 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0834 e020       |    |		Load	0x0,0x20
0835 0257       | W  |		Execute	Discrete,Raise
0836 e005       |    |		Load	0x0,0x5
0837 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0838 4800       |H   |		Short_Literal	0x0
0839 00db       |    |		Load_Top	At_Offset_3
083a e008       |    |		Load	0x0,0x8
083b 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
083c c403       |    |		Store	0x2,0x3
083d 00db       |    |		Load_Top	At_Offset_3
083e 6815       |h   |		Jump_Zero	0x854
083f e006       |    |		Load	0x0,0x6
0840 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0841 4801       |H   |		Short_Literal	0x1
0842 4801       |H   |		Short_Literal	0x1
0843 e00f       |    |		Load	0x0,0xf
0844 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0845 0334       | 4  |		Declare_Variable	Array,With_Constraint
0846 e5fe       |    |		Load	0x2,-0x2
0847 e00f       |    |		Load	0x0,0xf
0848 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0849 e00f       |    |		Load	0x0,0xf
084a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
084b 0119       |    |		Execute	Any,Check_In_Formal_Type
084c 4801       |H   |		Short_Literal	0x1
084d 00da       |    |		Load_Top	At_Offset_2
084e 01d6       |    |		Execute	Vector,Field_Write
084f 6048       |`H  |		Indirect_Literal	Discrete,0x898,{0x00000000, 0x0000880f}
0850 e005       |    |		Load	0x0,0x5
0851 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0852 e020       |    |		Load	0x0,0x20
0853 0257       | W  |		Execute	Discrete,Raise
0854 00da       |    |		Load_Top	At_Offset_2
0855 e228       | (  |		Load	0x1,0x28
0856 e402       |    |		Load	0x2,0x2
0857 e403       |    |		Load	0x2,0x3
0858 e00b       |    |		Load	0x0,0xb
0859 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
085a 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
085b			TRAP_0788:
085b e020       |    |		Load	0x0,0x20
085c 010f       |    |		Execute	Exception,Equal
085d 680e       |h   |		Jump_Zero	0x86c
085e e005       |    |		Load	0x0,0x5
085f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0860 4800       |H   |		Short_Literal	0x0
0861 e405       |    |		Load	0x2,0x5
0862 e008       |    |		Load	0x0,0x8
0863 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
0864 c403       |    |		Store	0x2,0x3
0865 00db       |    |		Load_Top	At_Offset_3
0866 e228       | (  |		Load	0x1,0x28
0867 e402       |    |		Load	0x2,0x2
0868 e403       |    |		Load	0x2,0x3
0869 e00b       |    |		Load	0x0,0xb
086a 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
086b 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
086c e021       | !  |		Load	0x0,0x21
086d 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
086e 010f       |    |		Execute	Exception,Equal
086f 681b       |h   |		Jump_Zero	0x88b
0870 e006       |    |		Load	0x0,0x6
0871 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0872 4801       |H   |		Short_Literal	0x1
0873 4801       |H   |		Short_Literal	0x1
0874 e00f       |    |		Load	0x0,0xf
0875 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0876 0334       | 4  |		Declare_Variable	Array,With_Constraint
0877 e5fa       |    |		Load	0x2,-0x6
0878 8234       | 4  |		Call	0x1,0x34
0879 e00f       |    |		Load	0x0,0xf
087a 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
087b e00f       |    |		Load	0x0,0xf
087c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
087d 0119       |    |		Execute	Any,Check_In_Formal_Type
087e 4801       |H   |		Short_Literal	0x1
087f 00da       |    |		Load_Top	At_Offset_2
0880 01d6       |    |		Execute	Vector,Field_Write
0881 6012       |`   |		Indirect_Literal	Discrete,0x894,{0x00000000, 0x00008891}
0882 e005       |    |		Load	0x0,0x5
0883 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0884 00db       |    |		Load_Top	At_Offset_3
0885 e228       | (  |		Load	0x1,0x28
0886 e402       |    |		Load	0x2,0x2
0887 e403       |    |		Load	0x2,0x3
0888 e00b       |    |		Load	0x0,0xb
0889 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
088a 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
088b 00db       |    |		Load_Top	At_Offset_3
088c e228       | (  |		Load	0x1,0x28
088d e402       |    |		Load	0x2,0x2
088e e403       |    |		Load	0x2,0x3
088f e00b       |    |		Load	0x0,0xb
0890 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0891 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
0892 0000 0000  |    |		.XXX[0x2]
0894 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008891}
0898 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000880f}
089c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000885c}
08a0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008803}
08a4 0000 0000  |    |		.BLANK	0000[0x4]
08a8 ; --------------------------------------------------------------------------------------
08a8 ; SUBPROGRAM
08a8 ; --------------------------------------------------------------------------------------
08a8 08b7       |    |		.CONST	0x08b7								; Address of begin
08a9 08dd       |    |		.CONST	0x08dd								; Address of exception handler
08aa 0004       |    |		.CONST	0x0004								; Number of locals
08ab			INIT_08a8:
08ab 0092 0f69  |   i|		Action	Push_String_Extended,0xf69					; "Collapse_secondary_referencers"
08ad e005       |    |		Load	0x0,0x5
08ae 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08af 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
08b0 e006       |    |		Load	0x0,0x6
08b1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08b2 02c7       |    |		Declare_Variable	Any
08b3 e5fe       |    |		Load	0x2,-0x2
08b4 e006       |    |		Load	0x0,0x6
08b5 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
08b6 a404       |    |		Store_Unchecked	0x2,0x4
08b7			BODY_08a8:
08b7 00d8       |    |		Load_Top	At_Offset_0
08b8 e228       | (  |		Load	0x1,0x28
08b9 0092 0f6a  |   j|		Action	Push_String_Extended,0xf6a					; "directory => "
08bb e5ff       |    |		Load	0x2,-0x1
08bc 01cc       |    |		Execute	Vector,Catenate
08bd 0092 0f40  |   @|		Action	Push_String_Extended,0xf40					; ", Response"
08bf 01cc       |    |		Execute	Vector,Catenate
08c0 e5fe       |    |		Load	0x2,-0x2
08c1 e00b       |    |		Load	0x0,0xb
08c2 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
08c3 01cc       |    |		Execute	Vector,Catenate
08c4 e402       |    |		Load	0x2,0x2
08c5 e00b       |    |		Load	0x0,0xb
08c6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
08c7 00d8       |    |		Load_Top	At_Offset_0
08c8 e00c       |    |		Load	0x0,0xc
08c9 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
08ca e005       |    |		Load	0x0,0x5
08cb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08cc 00d9       |    |		Load_Top	At_Offset_1
08cd e5ff       |    |		Load	0x2,-0x1
08ce e013       |    |		Load	0x0,0x13
08cf 1883       |    |		Execute	Package,Field_Execute,Field_Number 0x83
08d0 005a       | Z  |		Store_Top	Discrete,At_Offset_2
08d1 00d9       |    |		Load_Top	At_Offset_1
08d2 6803       |h   |		Jump_Zero	0x8d6
08d3 e005       |    |		Load	0x0,0x5
08d4 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
08d5 0257       | W  |		Execute	Discrete,Raise
08d6 00d8       |    |		Load_Top	At_Offset_0
08d7 e228       | (  |		Load	0x1,0x28
08d8 e402       |    |		Load	0x2,0x2
08d9 e403       |    |		Load	0x2,0x3
08da e00b       |    |		Load	0x0,0xb
08db 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
08dc 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08dd			TRAP_08a8:
08dd e005       |    |		Load	0x0,0x5
08de 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
08df 010f       |    |		Execute	Exception,Equal
08e0 6807       |h   |		Jump_Zero	0x8e8
08e1 00d9       |    |		Load_Top	At_Offset_1
08e2 e228       | (  |		Load	0x1,0x28
08e3 e402       |    |		Load	0x2,0x2
08e4 e403       |    |		Load	0x2,0x3
08e5 e00b       |    |		Load	0x0,0xb
08e6 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
08e7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08e8 4884       |H   |		Short_Literal	0x84
08e9 010f       |    |		Execute	Exception,Equal
08ea 6807       |h   |		Jump_Zero	0x8f2
08eb 00d9       |    |		Load_Top	At_Offset_1
08ec e228       | (  |		Load	0x1,0x28
08ed e402       |    |		Load	0x2,0x2
08ee e403       |    |		Load	0x2,0x3
08ef e00b       |    |		Load	0x0,0xb
08f0 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
08f1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08f2 00d9       |    |		Load_Top	At_Offset_1
08f3 e228       | (  |		Load	0x1,0x28
08f4 e402       |    |		Load	0x2,0x2
08f5 e403       |    |		Load	0x2,0x3
08f6 e00b       |    |		Load	0x0,0xb
08f7 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
08f8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08f9 0000 0000  |    |		.BLANK	0000[0x7]
0900 ; --------------------------------------------------------------------------------------
0900 ; SUBPROGRAM
0900 ; --------------------------------------------------------------------------------------
0900 090f       |    |		.CONST	0x090f								; Address of begin
0901 0935       | 5  |		.CONST	0x0935								; Address of exception handler
0902 0004       |    |		.CONST	0x0004								; Number of locals
0903			INIT_0900:
0903 0092 0f6b  |   k|		Action	Push_String_Extended,0xf6b					; "Expand_secondary_referencers"
0905 e005       |    |		Load	0x0,0x5
0906 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0907 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0908 e006       |    |		Load	0x0,0x6
0909 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
090a 02c7       |    |		Declare_Variable	Any
090b e5fe       |    |		Load	0x2,-0x2
090c e006       |    |		Load	0x0,0x6
090d 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
090e a404       |    |		Store_Unchecked	0x2,0x4
090f			BODY_0900:
090f 00d8       |    |		Load_Top	At_Offset_0
0910 e228       | (  |		Load	0x1,0x28
0911 0092 0f6a  |   j|		Action	Push_String_Extended,0xf6a					; "directory => "
0913 e5ff       |    |		Load	0x2,-0x1
0914 01cc       |    |		Execute	Vector,Catenate
0915 0092 0f40  |   @|		Action	Push_String_Extended,0xf40					; ", Response"
0917 01cc       |    |		Execute	Vector,Catenate
0918 e5fe       |    |		Load	0x2,-0x2
0919 e00b       |    |		Load	0x0,0xb
091a 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
091b 01cc       |    |		Execute	Vector,Catenate
091c e402       |    |		Load	0x2,0x2
091d e00b       |    |		Load	0x0,0xb
091e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
091f 00d8       |    |		Load_Top	At_Offset_0
0920 e00c       |    |		Load	0x0,0xc
0921 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0922 e005       |    |		Load	0x0,0x5
0923 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0924 00d9       |    |		Load_Top	At_Offset_1
0925 e5ff       |    |		Load	0x2,-0x1
0926 e013       |    |		Load	0x0,0x13
0927 1882       |    |		Execute	Package,Field_Execute,Field_Number 0x82
0928 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0929 00d9       |    |		Load_Top	At_Offset_1
092a 6803       |h   |		Jump_Zero	0x92e
092b e005       |    |		Load	0x0,0x5
092c 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
092d 0257       | W  |		Execute	Discrete,Raise
092e 00d8       |    |		Load_Top	At_Offset_0
092f e228       | (  |		Load	0x1,0x28
0930 e402       |    |		Load	0x2,0x2
0931 e403       |    |		Load	0x2,0x3
0932 e00b       |    |		Load	0x0,0xb
0933 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0934 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0935			TRAP_0900:
0935 e005       |    |		Load	0x0,0x5
0936 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0937 010f       |    |		Execute	Exception,Equal
0938 6807       |h   |		Jump_Zero	0x940
0939 00d9       |    |		Load_Top	At_Offset_1
093a e228       | (  |		Load	0x1,0x28
093b e402       |    |		Load	0x2,0x2
093c e403       |    |		Load	0x2,0x3
093d e00b       |    |		Load	0x0,0xb
093e 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
093f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0940 4884       |H   |		Short_Literal	0x84
0941 010f       |    |		Execute	Exception,Equal
0942 6807       |h   |		Jump_Zero	0x94a
0943 00d9       |    |		Load_Top	At_Offset_1
0944 e228       | (  |		Load	0x1,0x28
0945 e402       |    |		Load	0x2,0x2
0946 e403       |    |		Load	0x2,0x3
0947 e00b       |    |		Load	0x0,0xb
0948 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0949 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
094a 00d9       |    |		Load_Top	At_Offset_1
094b e228       | (  |		Load	0x1,0x28
094c e402       |    |		Load	0x2,0x2
094d e403       |    |		Load	0x2,0x3
094e e00b       |    |		Load	0x0,0xb
094f 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0950 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0951 0000 0000  |    |		.BLANK	0000[0x7]
0958 ; --------------------------------------------------------------------------------------
0958 ; SUBPROGRAM
0958 ; --------------------------------------------------------------------------------------
0958 0980       |    |		.CONST	0x0980								; Address of begin
0959 0004       |    |		.CONST	0x0004								; Address of exception handler
095a 000b       |    |		.CONST	0x000b								; Number of locals
095b			INIT_0958:
095b e022       | "  |		Load	0x0,0x22
095c e023       | #  |		Load	0x0,0x23
095d e007       |    |		Load	0x0,0x7
095e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
095f e024       | $  |		Load	0x0,0x24
0960 0387       |    |		Declare_Variable	Package
0961 00d8       |    |		Load_Top	At_Offset_0
0962 020f       |    |		Execute	Module,Activate
0963 00d8       |    |		Load_Top	At_Offset_0
0964 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0965 e007       |    |		Load	0x0,0x7
0966 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0967 02c7       |    |		Declare_Variable	Any
0968 00d8       |    |		Load_Top	At_Offset_0
0969 1c00       |    |		Execute_Immediate	Run_Utility,0x0
096a e007       |    |		Load	0x0,0x7
096b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
096c 02c7       |    |		Declare_Variable	Any
096d 00d8       |    |		Load_Top	At_Offset_0
096e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
096f e007       |    |		Load	0x0,0x7
0970 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0971 02c7       |    |		Declare_Variable	Any
0972 00d8       |    |		Load_Top	At_Offset_0
0973 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0974 00e1       |    |		Load_Encached	Boolean_Cache
0975 e007       |    |		Load	0x0,0x7
0976 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0977 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0978 02c7       |    |		Declare_Variable	Any
0979 e5ff       |    |		Load	0x2,-0x1
097a a408       |    |		Store_Unchecked	0x2,0x8
097b 00e1       |    |		Load_Encached	Boolean_Cache
097c 029f 0e0b  |    |		Declare_Subprogram	INIT_0e08,For_Call
097e 029f 0e23  |   #|		Declare_Subprogram	INIT_0e20,For_Call
0980			BODY_0958:
0980 00cf       |    |		Action	Mark_Auxiliary
0981 7886       |x   |		Jump	0xa08
0982 e5fc       |    |		Load	0x2,-0x4
0983 4800       |H   |		Short_Literal	0x0
0984 e408       |    |		Load	0x2,0x8
0985 e00d       |    |		Load	0x0,0xd
0986 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0987 c404       |    |		Store	0x2,0x4
0988 e404       |    |		Load	0x2,0x4
0989 840b       |    |		Call	0x2,0xb
098a 7013       |p   |		Jump_Nonzero	0x99e
098b e5fc       |    |		Load	0x2,-0x4
098c 4801       |H   |		Short_Literal	0x1
098d 4801       |H   |		Short_Literal	0x1
098e e00f       |    |		Load	0x0,0xf
098f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0990 0334       | 4  |		Declare_Variable	Array,With_Constraint
0991 e404       |    |		Load	0x2,0x4
0992 e00f       |    |		Load	0x0,0xf
0993 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0994 e00f       |    |		Load	0x0,0xf
0995 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0996 0119       |    |		Execute	Any,Check_In_Formal_Type
0997 4801       |H   |		Short_Literal	0x1
0998 00da       |    |		Load_Top	At_Offset_2
0999 01d6       |    |		Execute	Vector,Field_Write
099a 607d       |`}  |		Indirect_Literal	Discrete,0xa18,{0x00000000, 0x00008853}
099b e005       |    |		Load	0x0,0x5
099c 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
099d 7864       |xd  |		Jump	0xa02
099e e5fc       |    |		Load	0x2,-0x4
099f 4801       |H   |		Short_Literal	0x1
09a0 e404       |    |		Load	0x2,0x4
09a1 e00d       |    |		Load	0x0,0xd
09a2 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
09a3 c406       |    |		Store	0x2,0x6
09a4 e404       |    |		Load	0x2,0x4
09a5 e00d       |    |		Load	0x0,0xd
09a6 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
09a7 c405       |    |		Store	0x2,0x5
09a8 e405       |    |		Load	0x2,0x5
09a9 e007       |    |		Load	0x0,0x7
09aa 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
09ab 6802       |h   |		Jump_Zero	0x9ae
09ac e404       |    |		Load	0x2,0x4
09ad c405       |    |		Store	0x2,0x5
09ae 00e1       |    |		Load_Encached	Boolean_Cache
09af e403       |    |		Load	0x2,0x3
09b0 e405       |    |		Load	0x2,0x5
09b1 840a       |    |		Call	0x2,0xa
09b2 c403       |    |		Store	0x2,0x3
09b3 c407       |    |		Store	0x2,0x7
09b4 e407       |    |		Load	0x2,0x7
09b5 704c       |pL  |		Jump_Nonzero	0xa02
09b6 e5fc       |    |		Load	0x2,-0x4
09b7 e406       |    |		Load	0x2,0x6
09b8 e00d       |    |		Load	0x0,0xd
09b9 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
09ba e5fd       |    |		Load	0x2,-0x3
09bb e405       |    |		Load	0x2,0x5
09bc e00d       |    |		Load	0x0,0xd
09bd 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
09be e01b       |    |		Load	0x0,0x1b
09bf 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
09c0 a409       |    |		Store_Unchecked	0x2,0x9
09c1 e005       |    |		Load	0x0,0x5
09c2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
09c3 e5fc       |    |		Load	0x2,-0x4
09c4 e5fe       |    |		Load	0x2,-0x2
09c5 e5fc       |    |		Load	0x2,-0x4
09c6 e406       |    |		Load	0x2,0x6
09c7 e00d       |    |		Load	0x0,0xd
09c8 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
09c9 e5fd       |    |		Load	0x2,-0x3
09ca e405       |    |		Load	0x2,0x5
09cb e019       |    |		Load	0x0,0x19
09cc 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
09cd c5fb       |    |		Store	0x2,-0x5
09ce e5fb       |    |		Load	0x2,-0x5
09cf 7020       |p   |		Jump_Nonzero	0x9f0
09d0 e5fc       |    |		Load	0x2,-0x4
09d1 4801       |H   |		Short_Literal	0x1
09d2 4801       |H   |		Short_Literal	0x1
09d3 e00f       |    |		Load	0x0,0xf
09d4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
09d5 0334       | 4  |		Declare_Variable	Array,With_Constraint
09d6 e405       |    |		Load	0x2,0x5
09d7 e00d       |    |		Load	0x0,0xd
09d8 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
09d9 e00f       |    |		Load	0x0,0xf
09da 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
09db 0119       |    |		Execute	Any,Check_In_Formal_Type
09dc 4801       |H   |		Short_Literal	0x1
09dd 00da       |    |		Load_Top	At_Offset_2
09de 01d6       |    |		Execute	Vector,Field_Write
09df 6034       |`4  |		Indirect_Literal	Discrete,0xa14,{0x00000000, 0x00008827}
09e0 e005       |    |		Load	0x0,0x5
09e1 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
09e2 00db       |    |		Load_Top	At_Offset_3
09e3 681e       |h   |		Jump_Zero	0xa02
09e4 e5fc       |    |		Load	0x2,-0x4
09e5 e406       |    |		Load	0x2,0x6
09e6 e00d       |    |		Load	0x0,0xd
09e7 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
09e8 e5fd       |    |		Load	0x2,-0x3
09e9 e405       |    |		Load	0x2,0x5
09ea e00d       |    |		Load	0x0,0xd
09eb 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
09ec e01b       |    |		Load	0x0,0x1b
09ed 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
09ee a409       |    |		Store_Unchecked	0x2,0x9
09ef 7812       |x   |		Jump	0xa02
09f0 e5fc       |    |		Load	0x2,-0x4
09f1 4801       |H   |		Short_Literal	0x1
09f2 4801       |H   |		Short_Literal	0x1
09f3 e00f       |    |		Load	0x0,0xf
09f4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
09f5 0334       | 4  |		Declare_Variable	Array,With_Constraint
09f6 e405       |    |		Load	0x2,0x5
09f7 e00d       |    |		Load	0x0,0xd
09f8 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
09f9 e00f       |    |		Load	0x0,0xf
09fa 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
09fb 0119       |    |		Execute	Any,Check_In_Formal_Type
09fc 4801       |H   |		Short_Literal	0x1
09fd 00da       |    |		Load_Top	At_Offset_2
09fe 01d6       |    |		Execute	Vector,Field_Write
09ff 6010       |`   |		Indirect_Literal	Discrete,0xa10,{0x00000000, 0x0000880d}
0a00 e005       |    |		Load	0x0,0x5
0a01 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0a02 e408       |    |		Load	0x2,0x8
0a03 e007       |    |		Load	0x0,0x7
0a04 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a05 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0a06 c408       |    |		Store	0x2,0x8
0a07 00c9       |    |		Action	Pop_Auxiliary_Loop
0a08 e408       |    |		Load	0x2,0x8
0a09 e007       |    |		Load	0x0,0x7
0a0a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a0b 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0a0c 6f75       |ou  |		Jump_Zero	0x982
0a0d 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0a0e 0000 0000  |    |		.XXX[0x2]
0a10 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000880d}
0a14 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008827}
0a18 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008853}
0a1c 0000 0000  |    |		.BLANK	0000[0x4]
0a20 ; --------------------------------------------------------------------------------------
0a20 ; SUBPROGRAM
0a20 ; --------------------------------------------------------------------------------------
0a20 0a27       | '  |		.CONST	0x0a27								; Address of begin
0a21 0004       |    |		.CONST	0x0004								; Address of exception handler
0a22 0003       |    |		.CONST	0x0003								; Number of locals
0a23			INIT_0a20:
0a23 029f 0e43  |   C|		Declare_Subprogram	INIT_0e40,For_Call
0a25 029f 0e5b  |   [|		Declare_Subprogram	INIT_0e58,For_Call
0a27			BODY_0a20:
0a27 e5fd       |    |		Load	0x2,-0x3
0a28 7002       |p   |		Jump_Nonzero	0xa2b
0a29 8402       |    |		Call	0x2,0x2
0a2a 7801       |x   |		Jump	0xa2c
0a2b 8403       |    |		Call	0x2,0x3
0a2c 0831       | 1  |		Execute_Immediate	Raise,0x31
0a2d 0000 0000  |    |		.XXX[0x3]
0a2f 0000       |    |
0a30 ; --------------------------------------------------------------------------------------
0a30 ; SUBPROGRAM
0a30 ; --------------------------------------------------------------------------------------
0a30 0a33       | 3  |		.CONST	0x0a33								; Address of begin
0a31 0004       |    |		.CONST	0x0004								; Address of exception handler
0a32 0001       |    |		.CONST	0x0001								; Number of locals
0a33			BODY_0a30:
0a33			INIT_0a30:
0a33 4801       |H   |		Short_Literal	0x1
0a34 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0a36 e5ff       |    |		Load	0x2,-0x1
0a37 e015       |    |		Load	0x0,0x15
0a38 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0a39 6803       |h   |		Jump_Zero	0xa3d
0a3a e025       | %  |		Load	0x0,0x25
0a3b 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0a3c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a3d 00da       |    |		Load_Top	At_Offset_2
0a3e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a3f 0000       |    |		.XXX[0x1]
0a40 ; --------------------------------------------------------------------------------------
0a40 ; SUBPROGRAM
0a40 ; --------------------------------------------------------------------------------------
0a40 0a43       | C  |		.CONST	0x0a43								; Address of begin
0a41 0004       |    |		.CONST	0x0004								; Address of exception handler
0a42 0001       |    |		.CONST	0x0001								; Number of locals
0a43			BODY_0a40:
0a43			INIT_0a40:
0a43 4801       |H   |		Short_Literal	0x1
0a44 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0a46 e5ff       |    |		Load	0x2,-0x1
0a47 e015       |    |		Load	0x0,0x15
0a48 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0a49 6803       |h   |		Jump_Zero	0xa4d
0a4a e025       | %  |		Load	0x0,0x25
0a4b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0a4c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a4d 00da       |    |		Load_Top	At_Offset_2
0a4e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a4f 0000       |    |		.XXX[0x1]
0a50 ; --------------------------------------------------------------------------------------
0a50 ; SUBPROGRAM
0a50 ; --------------------------------------------------------------------------------------
0a50 0a53       | S  |		.CONST	0x0a53								; Address of begin
0a51 0004       |    |		.CONST	0x0004								; Address of exception handler
0a52 0001       |    |		.CONST	0x0001								; Number of locals
0a53			BODY_0a50:
0a53			INIT_0a50:
0a53 4801       |H   |		Short_Literal	0x1
0a54 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0a56 e5ff       |    |		Load	0x2,-0x1
0a57 e015       |    |		Load	0x0,0x15
0a58 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0a59 6803       |h   |		Jump_Zero	0xa5d
0a5a e025       | %  |		Load	0x0,0x25
0a5b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a5c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a5d 00da       |    |		Load_Top	At_Offset_2
0a5e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a5f 0000       |    |		.XXX[0x1]
0a60 ; --------------------------------------------------------------------------------------
0a60 ; SUBPROGRAM
0a60 ; --------------------------------------------------------------------------------------
0a60 0a63       | c  |		.CONST	0x0a63								; Address of begin
0a61 0004       |    |		.CONST	0x0004								; Address of exception handler
0a62 0001       |    |		.CONST	0x0001								; Number of locals
0a63			BODY_0a60:
0a63			INIT_0a60:
0a63 4801       |H   |		Short_Literal	0x1
0a64 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0a66 e5ff       |    |		Load	0x2,-0x1
0a67 e015       |    |		Load	0x0,0x15
0a68 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0a69 6803       |h   |		Jump_Zero	0xa6d
0a6a e025       | %  |		Load	0x0,0x25
0a6b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0a6c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a6d 00da       |    |		Load_Top	At_Offset_2
0a6e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a6f 0000       |    |		.XXX[0x1]
0a70 ; --------------------------------------------------------------------------------------
0a70 ; SUBPROGRAM
0a70 ; --------------------------------------------------------------------------------------
0a70 0a73       | s  |		.CONST	0x0a73								; Address of begin
0a71 0004       |    |		.CONST	0x0004								; Address of exception handler
0a72 0001       |    |		.CONST	0x0001								; Number of locals
0a73			BODY_0a70:
0a73			INIT_0a70:
0a73 4801       |H   |		Short_Literal	0x1
0a74 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0a76 e5ff       |    |		Load	0x2,-0x1
0a77 e015       |    |		Load	0x0,0x15
0a78 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0a79 6805       |h   |		Jump_Zero	0xa7f
0a7a 0092 0f6d  |   m|		Action	Push_String_Extended,0xf6d					; "$"
0a7c e014       |    |		Load	0x0,0x14
0a7d 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0a7e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a7f 00da       |    |		Load_Top	At_Offset_2
0a80 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a81 0000 0000  |    |		.BLANK	0000[0x7]
0a88 ; --------------------------------------------------------------------------------------
0a88 ; SUBPROGRAM
0a88 ; --------------------------------------------------------------------------------------
0a88 0a9a       |    |		.CONST	0x0a9a								; Address of begin
0a89 0004       |    |		.CONST	0x0004								; Address of exception handler
0a8a 0005       |    |		.CONST	0x0005								; Number of locals
0a8b			INIT_0a88:
0a8b 00e1       |    |		Load_Encached	Boolean_Cache
0a8c 4820       |H   |		Short_Literal	0x20
0a8d e5fd       |    |		Load	0x2,-0x3
0a8e e015       |    |		Load	0x0,0x15
0a8f 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0a90 01db       |    |		Execute	Vector,Length
0a91 0f00       |    |		Execute_Immediate	Equal,0x0
0a92 00e1       |    |		Load_Encached	Boolean_Cache
0a93 03f1       |    |		Declare_Variable	Discrete,With_Value
0a94 e5fa       |    |		Load	0x2,-0x6
0a95 e014       |    |		Load	0x0,0x14
0a96 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0a97 03f1       |    |		Declare_Variable	Discrete,With_Value
0a98 029f 0e73  |   s|		Declare_Subprogram	INIT_0e70,For_Call
0a9a			BODY_0a88:
0a9a e5f8       |    |		Load	0x2,-0x8
0a9b e5ff       |    |		Load	0x2,-0x1
0a9c e00c       |    |		Load	0x0,0xc
0a9d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0a9e e5f8       |    |		Load	0x2,-0x8
0a9f e5ff       |    |		Load	0x2,-0x1
0aa0 e00c       |    |		Load	0x0,0xc
0aa1 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0aa2 e5fc       |    |		Load	0x2,-0x4
0aa3 e5fb       |    |		Load	0x2,-0x5
0aa4 e5fd       |    |		Load	0x2,-0x3
0aa5 e5fe       |    |		Load	0x2,-0x2
0aa6 e5ff       |    |		Load	0x2,-0x1
0aa7 e00d       |    |		Load	0x0,0xd
0aa8 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0aa9 e01b       |    |		Load	0x0,0x1b
0aaa 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0aab a402       |    |		Store_Unchecked	0x2,0x2
0aac 8405       |    |		Call	0x2,0x5
0aad e5f8       |    |		Load	0x2,-0x8
0aae 4801       |H   |		Short_Literal	0x1
0aaf 4801       |H   |		Short_Literal	0x1
0ab0 e00f       |    |		Load	0x0,0xf
0ab1 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0ab2 0334       | 4  |		Declare_Variable	Array,With_Constraint
0ab3 e5ff       |    |		Load	0x2,-0x1
0ab4 e00f       |    |		Load	0x0,0xf
0ab5 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0ab6 e00f       |    |		Load	0x0,0xf
0ab7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0ab8 0119       |    |		Execute	Any,Check_In_Formal_Type
0ab9 4801       |H   |		Short_Literal	0x1
0aba 00da       |    |		Load_Top	At_Offset_2
0abb 01d6       |    |		Execute	Vector,Field_Write
0abc 607b       |`{  |		Indirect_Literal	Discrete,0xb38,{0x00000000, 0x00008826}
0abd e005       |    |		Load	0x0,0x5
0abe 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0abf 00db       |    |		Load_Top	At_Offset_3
0ac0 680f       |h   |		Jump_Zero	0xad0
0ac1 00da       |    |		Load_Top	At_Offset_2
0ac2 6803       |h   |		Jump_Zero	0xac6
0ac3 4800       |H   |		Short_Literal	0x0
0ac4 a402       |    |		Store_Unchecked	0x2,0x2
0ac5 780a       |x   |		Jump	0xad0
0ac6 e5fc       |    |		Load	0x2,-0x4
0ac7 e5fb       |    |		Load	0x2,-0x5
0ac8 e5fd       |    |		Load	0x2,-0x3
0ac9 e5fe       |    |		Load	0x2,-0x2
0aca e5ff       |    |		Load	0x2,-0x1
0acb e00d       |    |		Load	0x0,0xd
0acc 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0acd e01b       |    |		Load	0x0,0x1b
0ace 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0acf a402       |    |		Store_Unchecked	0x2,0x2
0ad0 e5f8       |    |		Load	0x2,-0x8
0ad1 e006       |    |		Load	0x0,0x6
0ad2 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
0ad3 e5ff       |    |		Load	0x2,-0x1
0ad4 e007       |    |		Load	0x0,0x7
0ad5 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0ad6 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0ad7 8220       |    |		Call	0x1,0x20
0ad8 00da       |    |		Load_Top	At_Offset_2
0ad9 6819       |h   |		Jump_Zero	0xaf3
0ada 00d9       |    |		Load_Top	At_Offset_1
0adb 0f03       |    |		Execute_Immediate	Equal,0x3
0adc 6816       |h   |		Jump_Zero	0xaf3
0add e5f8       |    |		Load	0x2,-0x8
0ade 4801       |H   |		Short_Literal	0x1
0adf 4801       |H   |		Short_Literal	0x1
0ae0 e00f       |    |		Load	0x0,0xf
0ae1 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0ae2 0334       | 4  |		Declare_Variable	Array,With_Constraint
0ae3 0092 0f6e  |   n|		Action	Push_String_Extended,0xf6e					; "null remote directory"
0ae5 e00f       |    |		Load	0x0,0xf
0ae6 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0ae7 e00f       |    |		Load	0x0,0xf
0ae8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0ae9 0119       |    |		Execute	Any,Check_In_Formal_Type
0aea 4801       |H   |		Short_Literal	0x1
0aeb 00da       |    |		Load_Top	At_Offset_2
0aec 01d6       |    |		Execute	Vector,Field_Write
0aed 6046       |`F  |		Indirect_Literal	Discrete,0xb34,{0x00000000, 0x0000881e}
0aee e005       |    |		Load	0x0,0x5
0aef 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0af0 4802       |H   |		Short_Literal	0x2
0af1 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0af2 781a       |x   |		Jump	0xb0d
0af3 00db       |    |		Load_Top	At_Offset_3
0af4 7018       |p   |		Jump_Nonzero	0xb0d
0af5 00d9       |    |		Load_Top	At_Offset_1
0af6 0f03       |    |		Execute_Immediate	Equal,0x3
0af7 6815       |h   |		Jump_Zero	0xb0d
0af8 e5f8       |    |		Load	0x2,-0x8
0af9 4801       |H   |		Short_Literal	0x1
0afa 4801       |H   |		Short_Literal	0x1
0afb e00f       |    |		Load	0x0,0xf
0afc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0afd 0334       | 4  |		Declare_Variable	Array,With_Constraint
0afe 0092 0f6f  |   o|		Action	Push_String_Extended,0xf6f					; "error during postprocess command"
0b00 e00f       |    |		Load	0x0,0xf
0b01 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0b02 e00f       |    |		Load	0x0,0xf
0b03 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0b04 0119       |    |		Execute	Any,Check_In_Formal_Type
0b05 4801       |H   |		Short_Literal	0x1
0b06 00da       |    |		Load_Top	At_Offset_2
0b07 01d6       |    |		Execute	Vector,Field_Write
0b08 602b       |`+  |		Indirect_Literal	Discrete,0xb34,{0x00000000, 0x0000881e}
0b09 e005       |    |		Load	0x0,0x5
0b0a 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0b0b 4802       |H   |		Short_Literal	0x2
0b0c 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0b0d 00d9       |    |		Load_Top	At_Offset_1
0b0e 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
0b0f 6821       |h!  |		Jump_Zero	0xb31
0b10 e5f8       |    |		Load	0x2,-0x8
0b11 4800       |H   |		Short_Literal	0x0
0b12 e5ff       |    |		Load	0x2,-0x1
0b13 e00d       |    |		Load	0x0,0xd
0b14 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0b15 0092 0f70  |   p|		Action	Push_String_Extended,0xf70					; ".??'c(Ada)"
0b17 01cc       |    |		Execute	Vector,Catenate
0b18 e00d       |    |		Load	0x0,0xd
0b19 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0b1a e007       |    |		Load	0x0,0x7
0b1b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0b1c 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0b1d 7013       |p   |		Jump_Nonzero	0xb31
0b1e 4800       |H   |		Short_Literal	0x0
0b1f 4801       |H   |		Short_Literal	0x1
0b20 4800       |H   |		Short_Literal	0x0
0b21 4801       |H   |		Short_Literal	0x1
0b22 e5f8       |    |		Load	0x2,-0x8
0b23 e00d       |    |		Load	0x0,0xd
0b24 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0b25 e006       |    |		Load	0x0,0x6
0b26 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
0b27 4800       |H   |		Short_Literal	0x0
0b28 0092 0f71  |   q|		Action	Push_String_Extended,0xf71					; "<WORLDS>"
0b2a e404       |    |		Load	0x2,0x4
0b2b 4803       |H   |		Short_Literal	0x3
0b2c e5ff       |    |		Load	0x2,-0x1
0b2d e00d       |    |		Load	0x0,0xd
0b2e 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0b2f e014       |    |		Load	0x0,0x14
0b30 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0b31 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
0b32 0000 0000  |    |		.XXX[0x2]
0b34 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000881e}
0b38 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008826}
0b3c 0000 0000  |    |		.BLANK	0000[0x4]
0b40 ; --------------------------------------------------------------------------------------
0b40 ; SUBPROGRAM
0b40 ; --------------------------------------------------------------------------------------
0b40 0b4b       | K  |		.CONST	0x0b4b								; Address of begin
0b41 0004       |    |		.CONST	0x0004								; Address of exception handler
0b42 0002       |    |		.CONST	0x0002								; Number of locals
0b43			INIT_0b40:
0b43 00db       |    |		Load_Top	At_Offset_3
0b44 e5fe       |    |		Load	0x2,-0x2
0b45 e5ff       |    |		Load	0x2,-0x1
0b46 e00d       |    |		Load	0x0,0xd
0b47 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0b48 e5ff       |    |		Load	0x2,-0x1
0b49 e01c       |    |		Load	0x0,0x1c
0b4a 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0b4b			BODY_0b40:
0b4b 00d8       |    |		Load_Top	At_Offset_0
0b4c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0b4d 7003       |p   |		Jump_Nonzero	0xb51
0b4e 00d8       |    |		Load_Top	At_Offset_0
0b4f 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b50 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0b51 e5fe       |    |		Load	0x2,-0x2
0b52 4801       |H   |		Short_Literal	0x1
0b53 4802       |H   |		Short_Literal	0x2
0b54 e00f       |    |		Load	0x0,0xf
0b55 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0b56 0334       | 4  |		Declare_Variable	Array,With_Constraint
0b57 e5ff       |    |		Load	0x2,-0x1
0b58 e00f       |    |		Load	0x0,0xf
0b59 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0b5a e00f       |    |		Load	0x0,0xf
0b5b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0b5c 0119       |    |		Execute	Any,Check_In_Formal_Type
0b5d 4801       |H   |		Short_Literal	0x1
0b5e 00da       |    |		Load_Top	At_Offset_2
0b5f 01d6       |    |		Execute	Vector,Field_Write
0b60 00da       |    |		Load_Top	At_Offset_2
0b61 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0b62 e005       |    |		Load	0x0,0x5
0b63 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0b64 e00f       |    |		Load	0x0,0xf
0b65 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0b66 0119       |    |		Execute	Any,Check_In_Formal_Type
0b67 4802       |H   |		Short_Literal	0x2
0b68 00da       |    |		Load_Top	At_Offset_2
0b69 01d6       |    |		Execute	Vector,Field_Write
0b6a 6005       |`   |		Indirect_Literal	Discrete,0xb70,{0x00000000, 0x00008809}
0b6b e005       |    |		Load	0x0,0x5
0b6c 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0b6d 00ea       |    |		Load_Encached	Null_String_Cache
0b6e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0b6f 0000       |    |		.XXX[0x1]
0b70 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008809}
0b74 0000 0000  |    |		.BLANK	0000[0x4]
0b78 ; --------------------------------------------------------------------------------------
0b78 ; SUBPROGRAM
0b78 ; --------------------------------------------------------------------------------------
0b78 0b83       |    |		.CONST	0x0b83								; Address of begin
0b79 0004       |    |		.CONST	0x0004								; Address of exception handler
0b7a 0002       |    |		.CONST	0x0002								; Number of locals
0b7b			INIT_0b78:
0b7b 00db       |    |		Load_Top	At_Offset_3
0b7c e5fe       |    |		Load	0x2,-0x2
0b7d e5ff       |    |		Load	0x2,-0x1
0b7e e00d       |    |		Load	0x0,0xd
0b7f 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0b80 e5ff       |    |		Load	0x2,-0x1
0b81 e01c       |    |		Load	0x0,0x1c
0b82 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0b83			BODY_0b78:
0b83 00d8       |    |		Load_Top	At_Offset_0
0b84 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0b85 7003       |p   |		Jump_Nonzero	0xb89
0b86 00d8       |    |		Load_Top	At_Offset_0
0b87 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b88 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0b89 e5fe       |    |		Load	0x2,-0x2
0b8a 4801       |H   |		Short_Literal	0x1
0b8b 4802       |H   |		Short_Literal	0x2
0b8c e00f       |    |		Load	0x0,0xf
0b8d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0b8e 0334       | 4  |		Declare_Variable	Array,With_Constraint
0b8f e5ff       |    |		Load	0x2,-0x1
0b90 e00f       |    |		Load	0x0,0xf
0b91 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0b92 e00f       |    |		Load	0x0,0xf
0b93 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0b94 0119       |    |		Execute	Any,Check_In_Formal_Type
0b95 4801       |H   |		Short_Literal	0x1
0b96 00da       |    |		Load_Top	At_Offset_2
0b97 01d6       |    |		Execute	Vector,Field_Write
0b98 00da       |    |		Load_Top	At_Offset_2
0b99 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0b9a e005       |    |		Load	0x0,0x5
0b9b 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0b9c e00f       |    |		Load	0x0,0xf
0b9d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0b9e 0119       |    |		Execute	Any,Check_In_Formal_Type
0b9f 4802       |H   |		Short_Literal	0x2
0ba0 00da       |    |		Load_Top	At_Offset_2
0ba1 01d6       |    |		Execute	Vector,Field_Write
0ba2 6005       |`   |		Indirect_Literal	Discrete,0xba8,{0x00000000, 0x00008807}
0ba3 e005       |    |		Load	0x0,0x5
0ba4 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0ba5 00ea       |    |		Load_Encached	Null_String_Cache
0ba6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0ba7 0000       |    |		.XXX[0x1]
0ba8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008807}
0bac 0000 0000  |    |		.BLANK	0000[0x4]
0bb0 ; --------------------------------------------------------------------------------------
0bb0 ; SUBPROGRAM
0bb0 ; --------------------------------------------------------------------------------------
0bb0 0bbb       |    |		.CONST	0x0bbb								; Address of begin
0bb1 0004       |    |		.CONST	0x0004								; Address of exception handler
0bb2 0002       |    |		.CONST	0x0002								; Number of locals
0bb3			INIT_0bb0:
0bb3 00db       |    |		Load_Top	At_Offset_3
0bb4 e5fe       |    |		Load	0x2,-0x2
0bb5 e5ff       |    |		Load	0x2,-0x1
0bb6 e00d       |    |		Load	0x0,0xd
0bb7 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0bb8 e5ff       |    |		Load	0x2,-0x1
0bb9 e01c       |    |		Load	0x0,0x1c
0bba 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0bbb			BODY_0bb0:
0bbb 00d8       |    |		Load_Top	At_Offset_0
0bbc 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0bbd 7003       |p   |		Jump_Nonzero	0xbc1
0bbe 00d8       |    |		Load_Top	At_Offset_0
0bbf 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0bc0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0bc1 e5fe       |    |		Load	0x2,-0x2
0bc2 4801       |H   |		Short_Literal	0x1
0bc3 4802       |H   |		Short_Literal	0x2
0bc4 e00f       |    |		Load	0x0,0xf
0bc5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0bc6 0334       | 4  |		Declare_Variable	Array,With_Constraint
0bc7 e5ff       |    |		Load	0x2,-0x1
0bc8 e00f       |    |		Load	0x0,0xf
0bc9 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0bca e00f       |    |		Load	0x0,0xf
0bcb 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0bcc 0119       |    |		Execute	Any,Check_In_Formal_Type
0bcd 4801       |H   |		Short_Literal	0x1
0bce 00da       |    |		Load_Top	At_Offset_2
0bcf 01d6       |    |		Execute	Vector,Field_Write
0bd0 00da       |    |		Load_Top	At_Offset_2
0bd1 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0bd2 e005       |    |		Load	0x0,0x5
0bd3 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0bd4 e00f       |    |		Load	0x0,0xf
0bd5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0bd6 0119       |    |		Execute	Any,Check_In_Formal_Type
0bd7 4802       |H   |		Short_Literal	0x2
0bd8 00da       |    |		Load_Top	At_Offset_2
0bd9 01d6       |    |		Execute	Vector,Field_Write
0bda 6005       |`   |		Indirect_Literal	Discrete,0xbe0,{0x00000000, 0x00008808}
0bdb e005       |    |		Load	0x0,0x5
0bdc 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0bdd 00ea       |    |		Load_Encached	Null_String_Cache
0bde 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0bdf 0000       |    |		.XXX[0x1]
0be0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008808}
0be4 0000 0000  |    |		.BLANK	0000[0x4]
0be8 ; --------------------------------------------------------------------------------------
0be8 ; SUBPROGRAM
0be8 ; --------------------------------------------------------------------------------------
0be8 0bfd       |    |		.CONST	0x0bfd								; Address of begin
0be9 0004       |    |		.CONST	0x0004								; Address of exception handler
0bea 0005       |    |		.CONST	0x0005								; Number of locals
0beb			INIT_0be8:
0beb 00e1       |    |		Load_Encached	Boolean_Cache
0bec e007       |    |		Load	0x0,0x7
0bed 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
0bee 0322       | "  |		Declare_Variable	Record
0bef 00d8       |    |		Load_Top	At_Offset_0
0bf0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0bf1 e007       |    |		Load	0x0,0x7
0bf2 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0bf3 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0bf4 02c7       |    |		Declare_Variable	Any
0bf5 e5fe       |    |		Load	0x2,-0x2
0bf6 4800       |H   |		Short_Literal	0x0
0bf7 e5ff       |    |		Load	0x2,-0x1
0bf8 e00d       |    |		Load	0x0,0xd
0bf9 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0bfa a404       |    |		Store_Unchecked	0x2,0x4
0bfb 029f 0ebb  |    |		Declare_Subprogram	INIT_0eb8,For_Call
0bfd			BODY_0be8:
0bfd 00cf       |    |		Action	Mark_Auxiliary
0bfe 7807       |x   |		Jump	0xc06
0bff 8405       |    |		Call	0x2,0x5
0c00 00da       |    |		Load_Top	At_Offset_2
0c01 e007       |    |		Load	0x0,0x7
0c02 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c03 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0c04 c404       |    |		Store	0x2,0x4
0c05 00c9       |    |		Action	Pop_Auxiliary_Loop
0c06 00da       |    |		Load_Top	At_Offset_2
0c07 e007       |    |		Load	0x0,0x7
0c08 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c09 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0c0a 6ff4       |o   |		Jump_Zero	0xbff
0c0b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0c0c 0000 0000  |    |		.BLANK	0000[0x4]
0c10 ; --------------------------------------------------------------------------------------
0c10 ; SUBPROGRAM
0c10 ; --------------------------------------------------------------------------------------
0c10 0c13       |    |		.CONST	0x0c13								; Address of begin
0c11 0004       |    |		.CONST	0x0004								; Address of exception handler
0c12 0001       |    |		.CONST	0x0001								; Number of locals
0c13			BODY_0c10:
0c13			INIT_0c10:
0c13 e404       |    |		Load	0x2,0x4
0c14 e00c       |    |		Load	0x0,0xc
0c15 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0c16 e405       |    |		Load	0x2,0x5
0c17 e007       |    |		Load	0x0,0x7
0c18 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c19 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0c1a 681f       |h   |		Jump_Zero	0xc3a
0c1b e404       |    |		Load	0x2,0x4
0c1c 4801       |H   |		Short_Literal	0x1
0c1d 4802       |H   |		Short_Literal	0x2
0c1e e00f       |    |		Load	0x0,0xf
0c1f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0c20 0334       | 4  |		Declare_Variable	Array,With_Constraint
0c21 e5ff       |    |		Load	0x2,-0x1
0c22 e00f       |    |		Load	0x0,0xf
0c23 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0c24 e00f       |    |		Load	0x0,0xf
0c25 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c26 0119       |    |		Execute	Any,Check_In_Formal_Type
0c27 4801       |H   |		Short_Literal	0x1
0c28 00da       |    |		Load_Top	At_Offset_2
0c29 01d6       |    |		Execute	Vector,Field_Write
0c2a 0092 0f72  |   r|		Action	Push_String_Extended,0xf72					; "Expression does not name a linkable object"
0c2c e00f       |    |		Load	0x0,0xf
0c2d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0c2e e00f       |    |		Load	0x0,0xf
0c2f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c30 0119       |    |		Execute	Any,Check_In_Formal_Type
0c31 4802       |H   |		Short_Literal	0x2
0c32 00da       |    |		Load_Top	At_Offset_2
0c33 01d6       |    |		Execute	Vector,Field_Write
0c34 602f       |`/  |		Indirect_Literal	Discrete,0xc64,{0x00000000, 0x00008814}
0c35 e005       |    |		Load	0x0,0x5
0c36 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0c37 e005       |    |		Load	0x0,0x5
0c38 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0c39 0257       | W  |		Execute	Discrete,Raise
0c3a e5fd       |    |		Load	0x2,-0x3
0c3b 01db       |    |		Execute	Vector,Length
0c3c 6824       |h$  |		Jump_Zero	0xc61
0c3d e404       |    |		Load	0x2,0x4
0c3e 4800       |H   |		Short_Literal	0x0
0c3f e5ff       |    |		Load	0x2,-0x1
0c40 e00d       |    |		Load	0x0,0xd
0c41 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0c42 e007       |    |		Load	0x0,0x7
0c43 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0c44 681c       |h   |		Jump_Zero	0xc61
0c45 e404       |    |		Load	0x2,0x4
0c46 4801       |H   |		Short_Literal	0x1
0c47 4802       |H   |		Short_Literal	0x2
0c48 e00f       |    |		Load	0x0,0xf
0c49 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0c4a 0334       | 4  |		Declare_Variable	Array,With_Constraint
0c4b e5ff       |    |		Load	0x2,-0x1
0c4c e00f       |    |		Load	0x0,0xf
0c4d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0c4e e00f       |    |		Load	0x0,0xf
0c4f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c50 0119       |    |		Execute	Any,Check_In_Formal_Type
0c51 4801       |H   |		Short_Literal	0x1
0c52 00da       |    |		Load_Top	At_Offset_2
0c53 01d6       |    |		Execute	Vector,Field_Write
0c54 0092 0f73  |   s|		Action	Push_String_Extended,0xf73					; "Expression names more than one object, but an executable name was specified"
0c56 e00f       |    |		Load	0x0,0xf
0c57 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0c58 e00f       |    |		Load	0x0,0xf
0c59 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c5a 0119       |    |		Execute	Any,Check_In_Formal_Type
0c5b 4802       |H   |		Short_Literal	0x2
0c5c 00da       |    |		Load_Top	At_Offset_2
0c5d 01d6       |    |		Execute	Vector,Field_Write
0c5e 6005       |`   |		Indirect_Literal	Discrete,0xc64,{0x00000000, 0x00008814}
0c5f e005       |    |		Load	0x0,0x5
0c60 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0c61 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0c62 0000 0000  |    |		.XXX[0x2]
0c64 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008814}
0c68 ; --------------------------------------------------------------------------------------
0c68 ; SUBPROGRAM
0c68 ; --------------------------------------------------------------------------------------
0c68 0c6d       | m  |		.CONST	0x0c6d								; Address of begin
0c69 0cb1       |    |		.CONST	0x0cb1								; Address of exception handler
0c6a 0002       |    |		.CONST	0x0002								; Number of locals
0c6b			INIT_0c68:
0c6b 029f 0ee3  |    |		Declare_Subprogram	INIT_0ee0,For_Call
0c6d			BODY_0c68:
0c6d e404       |    |		Load	0x2,0x4
0c6e 4801       |H   |		Short_Literal	0x1
0c6f e40a       |    |		Load	0x2,0xa
0c70 e00d       |    |		Load	0x0,0xd
0c71 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0c72 c407       |    |		Store	0x2,0x7
0c73 e404       |    |		Load	0x2,0x4
0c74 4801       |H   |		Short_Literal	0x1
0c75 e407       |    |		Load	0x2,0x7
0c76 e00d       |    |		Load	0x0,0xd
0c77 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0c78 c409       |    |		Store	0x2,0x9
0c79 e404       |    |		Load	0x2,0x4
0c7a e409       |    |		Load	0x2,0x9
0c7b e00c       |    |		Load	0x0,0xc
0c7c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0c7d e407       |    |		Load	0x2,0x7
0c7e e00d       |    |		Load	0x0,0xd
0c7f 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0c80 702e       |p.  |		Jump_Nonzero	0xcaf
0c81 e005       |    |		Load	0x0,0x5
0c82 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0c83 00e2       |    |		Load_Encached	Integer_Cache
0c84 00e1       |    |		Load_Encached	Boolean_Cache
0c85 e408       |    |		Load	0x2,0x8
0c86 0120       |    |		Execute	Any,Is_Value
0c87 6803       |h   |		Jump_Zero	0xc8b
0c88 e007       |    |		Load	0x0,0x7
0c89 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0c8a 7801       |x   |		Jump	0xc8c
0c8b e408       |    |		Load	0x2,0x8
0c8c e404       |    |		Load	0x2,0x4
0c8d e407       |    |		Load	0x2,0x7
0c8e e013       |    |		Load	0x0,0x13
0c8f 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0c90 c408       |    |		Store	0x2,0x8
0c91 c405       |    |		Store	0x2,0x5
0c92 c406       |    |		Store	0x2,0x6
0c93 c403       |    |		Store	0x2,0x3
0c94 e403       |    |		Load	0x2,0x3
0c95 0f00       |    |		Execute_Immediate	Equal,0x0
0c96 0f00       |    |		Execute_Immediate	Equal,0x0
0c97 e405       |    |		Load	0x2,0x5
0c98 0f00       |    |		Execute_Immediate	Equal,0x0
0c99 0278       | x  |		Execute	Discrete,Or
0c9a 6814       |h   |		Jump_Zero	0xcaf
0c9b e404       |    |		Load	0x2,0x4
0c9c 4801       |H   |		Short_Literal	0x1
0c9d 4801       |H   |		Short_Literal	0x1
0c9e e00f       |    |		Load	0x0,0xf
0c9f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0ca0 0334       | 4  |		Declare_Variable	Array,With_Constraint
0ca1 e407       |    |		Load	0x2,0x7
0ca2 e00d       |    |		Load	0x0,0xd
0ca3 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0ca4 e00f       |    |		Load	0x0,0xf
0ca5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0ca6 0119       |    |		Execute	Any,Check_In_Formal_Type
0ca7 4801       |H   |		Short_Literal	0x1
0ca8 00da       |    |		Load_Top	At_Offset_2
0ca9 01d6       |    |		Execute	Vector,Field_Write
0caa 600d       |`   |		Indirect_Literal	Discrete,0xcb8,{0x00000000, 0x0000889d}
0cab e005       |    |		Load	0x0,0x5
0cac 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0cad 00cc       |    |		Action	Pop_Block
0cae 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0caf 8602       |    |		Call	0x3,0x2
0cb0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0cb1			TRAP_0c68:
0cb1 e012       |    |		Load	0x0,0x12
0cb2 010f       |    |		Execute	Exception,Equal
0cb3 6801       |h   |		Jump_Zero	0xcb5
0cb4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0cb5 0100       |    |		Execute	Exception,Raise
0cb6 0000 0000  |    |		.XXX[0x2]
0cb8 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000889d}
0cbc 0000 0000  |    |		.BLANK	0000[0x4]
0cc0 ; --------------------------------------------------------------------------------------
0cc0 ; SUBPROGRAM
0cc0 ; --------------------------------------------------------------------------------------
0cc0 0cc6       |    |		.CONST	0x0cc6								; Address of begin
0cc1 0004       |    |		.CONST	0x0004								; Address of exception handler
0cc2 0002       |    |		.CONST	0x0002								; Number of locals
0cc3			INIT_0cc0:
0cc3 e406       |    |		Load	0x2,0x6
0cc4 e00d       |    |		Load	0x0,0xd
0cc5 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0cc6			BODY_0cc0:
0cc6 e404       |    |		Load	0x2,0x4
0cc7 4801       |H   |		Short_Literal	0x1
0cc8 4801       |H   |		Short_Literal	0x1
0cc9 e00f       |    |		Load	0x0,0xf
0cca 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0ccb 0334       | 4  |		Declare_Variable	Array,With_Constraint
0ccc e406       |    |		Load	0x2,0x6
0ccd e00d       |    |		Load	0x0,0xd
0cce 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0ccf e00f       |    |		Load	0x0,0xf
0cd0 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0cd1 0119       |    |		Execute	Any,Check_In_Formal_Type
0cd2 4801       |H   |		Short_Literal	0x1
0cd3 00da       |    |		Load_Top	At_Offset_2
0cd4 01d6       |    |		Execute	Vector,Field_Write
0cd5 601a       |`   |		Indirect_Literal	Discrete,0xcf0,{0x00000000, 0x0000886c}
0cd6 e005       |    |		Load	0x0,0x5
0cd7 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0cd8 e5fe       |    |		Load	0x2,-0x2
0cd9 6809       |h   |		Jump_Zero	0xce3
0cda 4801       |H   |		Short_Literal	0x1
0cdb 4801       |H   |		Short_Literal	0x1
0cdc 4800       |H   |		Short_Literal	0x0
0cdd 4801       |H   |		Short_Literal	0x1
0cde e5fc       |    |		Load	0x2,-0x4
0cdf e00d       |    |		Load	0x0,0xd
0ce0 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0ce1 00d9       |    |		Load_Top	At_Offset_1
0ce2 8219       |    |		Call	0x1,0x19
0ce3 e5fd       |    |		Load	0x2,-0x3
0ce4 680a       |h   |		Jump_Zero	0xcef
0ce5 4801       |H   |		Short_Literal	0x1
0ce6 4801       |H   |		Short_Literal	0x1
0ce7 4800       |H   |		Short_Literal	0x0
0ce8 4801       |H   |		Short_Literal	0x1
0ce9 e5fc       |    |		Load	0x2,-0x4
0cea e00d       |    |		Load	0x0,0xd
0ceb 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0cec 4800       |H   |		Short_Literal	0x0
0ced 00da       |    |		Load_Top	At_Offset_2
0cee 8213       |    |		Call	0x1,0x13
0cef 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0cf0 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000886c}
0cf4 0000 0000  |    |		.BLANK	0000[0x4]
0cf8 ; --------------------------------------------------------------------------------------
0cf8 ; SUBPROGRAM
0cf8 ; --------------------------------------------------------------------------------------
0cf8 0d1e       |    |		.CONST	0x0d1e								; Address of begin
0cf9 0d5e       | ^  |		.CONST	0x0d5e								; Address of exception handler
0cfa 0006       |    |		.CONST	0x0006								; Number of locals
0cfb			INIT_0cf8:
0cfb e007       |    |		Load	0x0,0x7
0cfc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0cfd 02c7       |    |		Declare_Variable	Any
0cfe e404       |    |		Load	0x2,0x4
0cff 4801       |H   |		Short_Literal	0x1
0d00 e404       |    |		Load	0x2,0x4
0d01 4801       |H   |		Short_Literal	0x1
0d02 e405       |    |		Load	0x2,0x5
0d03 e00d       |    |		Load	0x0,0xd
0d04 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0d05 e00d       |    |		Load	0x0,0xd
0d06 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0d07 a602       |    |		Store_Unchecked	0x3,0x2
0d08 00d8       |    |		Load_Top	At_Offset_0
0d09 e00d       |    |		Load	0x0,0xd
0d0a 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0d0b e007       |    |		Load	0x0,0x7
0d0c 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
0d0d 0322       | "  |		Declare_Variable	Record
0d0e e404       |    |		Load	0x2,0x4
0d0f 00db       |    |		Load_Top	At_Offset_3
0d10 e00d       |    |		Load	0x0,0xd
0d11 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0d12 00d9       |    |		Load_Top	At_Offset_1
0d13 017d       | }  |		Execute	Record,Structure_Write
0d14 e404       |    |		Load	0x2,0x4
0d15 00d9       |    |		Load_Top	At_Offset_1
0d16 e602       |    |		Load	0x3,0x2
0d17 e01c       |    |		Load	0x0,0x1c
0d18 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0d19 e404       |    |		Load	0x2,0x4
0d1a 00da       |    |		Load_Top	At_Offset_2
0d1b e602       |    |		Load	0x3,0x2
0d1c e01c       |    |		Load	0x0,0x1c
0d1d 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0d1e			BODY_0cf8:
0d1e e005       |    |		Load	0x0,0x5
0d1f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d20 00e1       |    |		Load_Encached	Boolean_Cache
0d21 e404       |    |		Load	0x2,0x4
0d22 e604       |    |		Load	0x3,0x4
0d23 e602       |    |		Load	0x3,0x2
0d24 e026       | &  |		Load	0x0,0x26
0d25 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0d26 c406       |    |		Store	0x2,0x6
0d27 c403       |    |		Store	0x2,0x3
0d28 e406       |    |		Load	0x2,0x6
0d29 7011       |p   |		Jump_Nonzero	0xd3b
0d2a 4801       |H   |		Short_Literal	0x1
0d2b 4801       |H   |		Short_Literal	0x1
0d2c e00f       |    |		Load	0x0,0xf
0d2d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0d2e 0334       | 4  |		Declare_Variable	Array,With_Constraint
0d2f e602       |    |		Load	0x3,0x2
0d30 e00f       |    |		Load	0x0,0xf
0d31 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0d32 e00f       |    |		Load	0x0,0xf
0d33 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0d34 0119       |    |		Execute	Any,Check_In_Formal_Type
0d35 4801       |H   |		Short_Literal	0x1
0d36 00da       |    |		Load_Top	At_Offset_2
0d37 01d6       |    |		Execute	Vector,Field_Write
0d38 6047       |`G  |		Indirect_Literal	Discrete,0xd80,{0x00000000, 0x0000882a}
0d39 e005       |    |		Load	0x0,0x5
0d3a 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0d3b e005       |    |		Load	0x0,0x5
0d3c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d3d e404       |    |		Load	0x2,0x4
0d3e 4801       |H   |		Short_Literal	0x1
0d3f 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0d41 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0d43 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0d45 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0d47 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0d49 e5fe       |    |		Load	0x2,-0x2
0d4a e604       |    |		Load	0x3,0x4
0d4b 00ea       |    |		Load_Encached	Null_String_Cache
0d4c 00ea       |    |		Load_Encached	Null_String_Cache
0d4d 4801       |H   |		Short_Literal	0x1
0d4e e606       |    |		Load	0x3,0x6
0d4f 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0d50 e606       |    |		Load	0x3,0x6
0d51 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0d52 01cf       |    |		Execute	Vector,Slice_Read
0d53 4801       |H   |		Short_Literal	0x1
0d54 e605       |    |		Load	0x3,0x5
0d55 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0d56 e605       |    |		Load	0x3,0x5
0d57 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0d58 01cf       |    |		Execute	Vector,Slice_Read
0d59 e602       |    |		Load	0x3,0x2
0d5a e01c       |    |		Load	0x0,0x1c
0d5b 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0d5c c403       |    |		Store	0x2,0x3
0d5d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0d5e			TRAP_0cf8:
0d5e e005       |    |		Load	0x0,0x5
0d5f 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0d60 010f       |    |		Execute	Exception,Equal
0d61 6801       |h   |		Jump_Zero	0xd63
0d62 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0d63 e006       |    |		Load	0x0,0x6
0d64 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0d65 4801       |H   |		Short_Literal	0x1
0d66 4801       |H   |		Short_Literal	0x1
0d67 e00f       |    |		Load	0x0,0xf
0d68 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0d69 0334       | 4  |		Declare_Variable	Array,With_Constraint
0d6a 0092 0f74  |   t|		Action	Push_String_Extended,0xf74					; "Unexpected exception caught while refreshing "
0d6c e602       |    |		Load	0x3,0x2
0d6d e00d       |    |		Load	0x0,0xd
0d6e 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0d6f 01cc       |    |		Execute	Vector,Catenate
0d70 e00f       |    |		Load	0x0,0xf
0d71 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0d72 e00f       |    |		Load	0x0,0xf
0d73 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0d74 0119       |    |		Execute	Any,Check_In_Formal_Type
0d75 4801       |H   |		Short_Literal	0x1
0d76 00da       |    |		Load_Top	At_Offset_2
0d77 01d6       |    |		Execute	Vector,Field_Write
0d78 6003       |`   |		Indirect_Literal	Discrete,0xd7c,{0x00000000, 0x00008859}
0d79 e005       |    |		Load	0x0,0x5
0d7a 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0d7b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0d7c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008859}
0d80 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000882a}
0d84 0000 0000  |    |		.BLANK	0000[0x4]
0d88 ; --------------------------------------------------------------------------------------
0d88 ; SUBPROGRAM
0d88 ; --------------------------------------------------------------------------------------
0d88 0d98       |    |		.CONST	0x0d98								; Address of begin
0d89 0dee       |    |		.CONST	0x0dee								; Address of exception handler
0d8a 0002       |    |		.CONST	0x0002								; Number of locals
0d8b			INIT_0d88:
0d8b e007       |    |		Load	0x0,0x7
0d8c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0d8d 02c7       |    |		Declare_Variable	Any
0d8e e404       |    |		Load	0x2,0x4
0d8f 4801       |H   |		Short_Literal	0x1
0d90 e404       |    |		Load	0x2,0x4
0d91 4801       |H   |		Short_Literal	0x1
0d92 e405       |    |		Load	0x2,0x5
0d93 e00d       |    |		Load	0x0,0xd
0d94 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0d95 e00d       |    |		Load	0x0,0xd
0d96 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0d97 a602       |    |		Store_Unchecked	0x3,0x2
0d98			BODY_0d88:
0d98 e404       |    |		Load	0x2,0x4
0d99 00d9       |    |		Load_Top	At_Offset_1
0d9a e00c       |    |		Load	0x0,0xc
0d9b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0d9c 4801       |H   |		Short_Literal	0x1
0d9d e016       |    |		Load	0x0,0x16
0d9e 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
0d9f e404       |    |		Load	0x2,0x4
0da0 4801       |H   |		Short_Literal	0x1
0da1 4801       |H   |		Short_Literal	0x1
0da2 e00f       |    |		Load	0x0,0xf
0da3 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0da4 0334       | 4  |		Declare_Variable	Array,With_Constraint
0da5 00da       |    |		Load_Top	At_Offset_2
0da6 e00f       |    |		Load	0x0,0xf
0da7 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0da8 e00f       |    |		Load	0x0,0xf
0da9 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0daa 0119       |    |		Execute	Any,Check_In_Formal_Type
0dab 4801       |H   |		Short_Literal	0x1
0dac 00da       |    |		Load_Top	At_Offset_2
0dad 01d6       |    |		Execute	Vector,Field_Write
0dae 6051       |`Q  |		Indirect_Literal	Discrete,0xe00,{0x00000000, 0x0000888e}
0daf e005       |    |		Load	0x0,0x5
0db0 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0db1 e404       |    |		Load	0x2,0x4
0db2 4801       |H   |		Short_Literal	0x1
0db3 4801       |H   |		Short_Literal	0x1
0db4 e00f       |    |		Load	0x0,0xf
0db5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0db6 0334       | 4  |		Declare_Variable	Array,With_Constraint
0db7 e404       |    |		Load	0x2,0x4
0db8 00db       |    |		Load_Top	At_Offset_3
0db9 8238       | 8  |		Call	0x1,0x38
0dba e00f       |    |		Load	0x0,0xf
0dbb 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0dbc e00f       |    |		Load	0x0,0xf
0dbd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0dbe 0119       |    |		Execute	Any,Check_In_Formal_Type
0dbf 4801       |H   |		Short_Literal	0x1
0dc0 00da       |    |		Load_Top	At_Offset_2
0dc1 01d6       |    |		Execute	Vector,Field_Write
0dc2 6039       |`9  |		Indirect_Literal	Discrete,0xdfc,{0x00000000, 0x00008843}
0dc3 e005       |    |		Load	0x0,0x5
0dc4 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0dc5 e404       |    |		Load	0x2,0x4
0dc6 4801       |H   |		Short_Literal	0x1
0dc7 4801       |H   |		Short_Literal	0x1
0dc8 e00f       |    |		Load	0x0,0xf
0dc9 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0dca 0334       | 4  |		Declare_Variable	Array,With_Constraint
0dcb e404       |    |		Load	0x2,0x4
0dcc 00db       |    |		Load_Top	At_Offset_3
0dcd 8237       | 7  |		Call	0x1,0x37
0dce e00f       |    |		Load	0x0,0xf
0dcf 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0dd0 e00f       |    |		Load	0x0,0xf
0dd1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0dd2 0119       |    |		Execute	Any,Check_In_Formal_Type
0dd3 4801       |H   |		Short_Literal	0x1
0dd4 00da       |    |		Load_Top	At_Offset_2
0dd5 01d6       |    |		Execute	Vector,Field_Write
0dd6 6021       |`!  |		Indirect_Literal	Discrete,0xdf8,{0x00000000, 0x00008842}
0dd7 e005       |    |		Load	0x0,0x5
0dd8 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0dd9 e404       |    |		Load	0x2,0x4
0dda 4801       |H   |		Short_Literal	0x1
0ddb 4801       |H   |		Short_Literal	0x1
0ddc e00f       |    |		Load	0x0,0xf
0ddd 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0dde 0334       | 4  |		Declare_Variable	Array,With_Constraint
0ddf e404       |    |		Load	0x2,0x4
0de0 00db       |    |		Load_Top	At_Offset_3
0de1 8236       | 6  |		Call	0x1,0x36
0de2 e00f       |    |		Load	0x0,0xf
0de3 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0de4 e00f       |    |		Load	0x0,0xf
0de5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0de6 0119       |    |		Execute	Any,Check_In_Formal_Type
0de7 4801       |H   |		Short_Literal	0x1
0de8 00da       |    |		Load_Top	At_Offset_2
0de9 01d6       |    |		Execute	Vector,Field_Write
0dea 6009       |`   |		Indirect_Literal	Discrete,0xdf4,{0x00000000, 0x00008844}
0deb e005       |    |		Load	0x0,0x5
0dec 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0ded 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0dee			TRAP_0d88:
0dee e005       |    |		Load	0x0,0x5
0def 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0df0 010f       |    |		Execute	Exception,Equal
0df1 6801       |h   |		Jump_Zero	0xdf3
0df2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0df3 0100       |    |		Execute	Exception,Raise
0df4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008844}
0df8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008842}
0dfc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008843}
0e00 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000888e}
0e04 0000 0000  |    |		.BLANK	0000[0x4]
0e08 ; --------------------------------------------------------------------------------------
0e08 ; SUBPROGRAM
0e08 ; --------------------------------------------------------------------------------------
0e08 0e0b       |    |		.CONST	0x0e0b								; Address of begin
0e09 0004       |    |		.CONST	0x0004								; Address of exception handler
0e0a 0001       |    |		.CONST	0x0001								; Number of locals
0e0b			BODY_0e08:
0e0b			INIT_0e08:
0e0b 00da       |    |		Load_Top	At_Offset_2
0e0c e7fe       |    |		Load	0x3,-0x2
0e0d e402       |    |		Load	0x2,0x2
0e0e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0e0f 6803       |h   |		Jump_Zero	0xe13
0e10 4801       |H   |		Short_Literal	0x1
0e11 a7fd       |    |		Store_Unchecked	0x3,-0x3
0e12 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0e13 4800       |H   |		Short_Literal	0x0
0e14 a7fd       |    |		Store_Unchecked	0x3,-0x3
0e15 00db       |    |		Load_Top	At_Offset_3
0e16 00db       |    |		Load_Top	At_Offset_3
0e17 e402       |    |		Load	0x2,0x2
0e18 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0e19 c7fe       |    |		Store	0x3,-0x2
0e1a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0e1b 0000 0000  |    |		.BLANK	0000[0x5]
0e20 ; --------------------------------------------------------------------------------------
0e20 ; SUBPROGRAM
0e20 ; --------------------------------------------------------------------------------------
0e20 0e23       | #  |		.CONST	0x0e23								; Address of begin
0e21 0004       |    |		.CONST	0x0004								; Address of exception handler
0e22 0001       |    |		.CONST	0x0001								; Number of locals
0e23			BODY_0e20:
0e23			INIT_0e20:
0e23 00da       |    |		Load_Top	At_Offset_2
0e24 e007       |    |		Load	0x0,0x7
0e25 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0e26 7016       |p   |		Jump_Nonzero	0xe3d
0e27 00da       |    |		Load_Top	At_Offset_2
0e28 e00d       |    |		Load	0x0,0xd
0e29 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0e2a 6810       |h   |		Jump_Zero	0xe3b
0e2b 00da       |    |		Load_Top	At_Offset_2
0e2c e00d       |    |		Load	0x0,0xd
0e2d 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
0e2e 700a       |p   |		Jump_Nonzero	0xe39
0e2f 00da       |    |		Load_Top	At_Offset_2
0e30 e00d       |    |		Load	0x0,0xd
0e31 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0e32 7004       |p   |		Jump_Nonzero	0xe37
0e33 00da       |    |		Load_Top	At_Offset_2
0e34 e00d       |    |		Load	0x0,0xd
0e35 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
0e36 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0e37 4801       |H   |		Short_Literal	0x1
0e38 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0e39 4800       |H   |		Short_Literal	0x0
0e3a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0e3b 4800       |H   |		Short_Literal	0x0
0e3c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0e3d 4800       |H   |		Short_Literal	0x0
0e3e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0e3f 0000       |    |		.XXX[0x1]
0e40 ; --------------------------------------------------------------------------------------
0e40 ; SUBPROGRAM
0e40 ; --------------------------------------------------------------------------------------
0e40 0e4c       | L  |		.CONST	0x0e4c								; Address of begin
0e41 0004       |    |		.CONST	0x0004								; Address of exception handler
0e42 0002       |    |		.CONST	0x0002								; Number of locals
0e43			INIT_0e40:
0e43 e5fc       |    |		Load	0x2,-0x4
0e44 00d8       |    |		Load_Top	At_Offset_0
0e45 e5ff       |    |		Load	0x2,-0x1
0e46 e00d       |    |		Load	0x0,0xd
0e47 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0e48 e5fe       |    |		Load	0x2,-0x2
0e49 e5ff       |    |		Load	0x2,-0x1
0e4a e013       |    |		Load	0x0,0x13
0e4b 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0e4c			BODY_0e40:
0e4c 00d8       |    |		Load_Top	At_Offset_0
0e4d 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0e4e 7004       |p   |		Jump_Nonzero	0xe53
0e4f 00d8       |    |		Load_Top	At_Offset_0
0e50 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e51 00cb       |    |		Action	Pop_Block_With_Result
0e52 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0e53 e005       |    |		Load	0x0,0x5
0e54 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0e55 0257       | W  |		Execute	Discrete,Raise
0e56 0000 0000  |    |		.XXX[0x2]
0e58 ; --------------------------------------------------------------------------------------
0e58 ; SUBPROGRAM
0e58 ; --------------------------------------------------------------------------------------
0e58 0e5f       | _  |		.CONST	0x0e5f								; Address of begin
0e59 0004       |    |		.CONST	0x0004								; Address of exception handler
0e5a 0002       |    |		.CONST	0x0002								; Number of locals
0e5b			INIT_0e58:
0e5b e5fc       |    |		Load	0x2,-0x4
0e5c e5fe       |    |		Load	0x2,-0x2
0e5d e013       |    |		Load	0x0,0x13
0e5e 1871       | q  |		Execute	Package,Field_Execute,Field_Number 0x71
0e5f			BODY_0e58:
0e5f 00d8       |    |		Load_Top	At_Offset_0
0e60 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0e61 7004       |p   |		Jump_Nonzero	0xe66
0e62 00d8       |    |		Load_Top	At_Offset_0
0e63 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e64 00cb       |    |		Action	Pop_Block_With_Result
0e65 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0e66 e005       |    |		Load	0x0,0x5
0e67 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0e68 0257       | W  |		Execute	Discrete,Raise
0e69 0000 0000  |    |		.BLANK	0000[0x7]
0e70 ; --------------------------------------------------------------------------------------
0e70 ; SUBPROGRAM
0e70 ; --------------------------------------------------------------------------------------
0e70 0e73       | s  |		.CONST	0x0e73								; Address of begin
0e71 0e91       |    |		.CONST	0x0e91								; Address of exception handler
0e72 0001       |    |		.CONST	0x0001								; Number of locals
0e73			BODY_0e70:
0e73			INIT_0e70:
0e73 e5f8       |    |		Load	0x2,-0x8
0e74 e5fd       |    |		Load	0x2,-0x3
0e75 e5ff       |    |		Load	0x2,-0x1
0e76 e00c       |    |		Load	0x0,0xc
0e77 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0e78 e005       |    |		Load	0x0,0x5
0e79 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0e7a e5f8       |    |		Load	0x2,-0x8
0e7b 4801       |H   |		Short_Literal	0x1
0e7c 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0e7e 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0e80 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0e82 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0e84 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0e86 e5f9       |    |		Load	0x2,-0x7
0e87 e5fb       |    |		Load	0x2,-0x5
0e88 e5fc       |    |		Load	0x2,-0x4
0e89 00ea       |    |		Load_Encached	Null_String_Cache
0e8a e5fd       |    |		Load	0x2,-0x3
0e8b e5fe       |    |		Load	0x2,-0x2
0e8c e5ff       |    |		Load	0x2,-0x1
0e8d e01c       |    |		Load	0x0,0x1c
0e8e 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0e8f c5f7       |    |		Store	0x2,-0x9
0e90 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0e91			TRAP_0e70:
0e91 e005       |    |		Load	0x0,0x5
0e92 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0e93 010f       |    |		Execute	Exception,Equal
0e94 681b       |h   |		Jump_Zero	0xeb0
0e95 4801       |H   |		Short_Literal	0x1
0e96 a403       |    |		Store_Unchecked	0x2,0x3
0e97 e005       |    |		Load	0x0,0x5
0e98 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0e99 e5f8       |    |		Load	0x2,-0x8
0e9a 4801       |H   |		Short_Literal	0x1
0e9b 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0e9d 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0e9f 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0ea1 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0ea3 0092 0f6c  |   l|		Action	Push_String_Extended,0xf6c					; "<DEFAULT>"
0ea5 e5f9       |    |		Load	0x2,-0x7
0ea6 e5fb       |    |		Load	0x2,-0x5
0ea7 e5fc       |    |		Load	0x2,-0x4
0ea8 00ea       |    |		Load_Encached	Null_String_Cache
0ea9 00ea       |    |		Load_Encached	Null_String_Cache
0eaa e5fe       |    |		Load	0x2,-0x2
0eab e5ff       |    |		Load	0x2,-0x1
0eac e01c       |    |		Load	0x0,0x1c
0ead 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0eae c5f7       |    |		Store	0x2,-0x9
0eaf 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0eb0 0100       |    |		Execute	Exception,Raise
0eb1 0000 0000  |    |		.BLANK	0000[0x7]
0eb8 ; --------------------------------------------------------------------------------------
0eb8 ; SUBPROGRAM
0eb8 ; --------------------------------------------------------------------------------------
0eb8 0ec7       |    |		.CONST	0x0ec7								; Address of begin
0eb9 0004       |    |		.CONST	0x0004								; Address of exception handler
0eba 0003       |    |		.CONST	0x0003								; Number of locals
0ebb			INIT_0eb8:
0ebb e007       |    |		Load	0x0,0x7
0ebc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0ebd 02c7       |    |		Declare_Variable	Any
0ebe e5fe       |    |		Load	0x2,-0x2
0ebf 4800       |H   |		Short_Literal	0x0
0ec0 e404       |    |		Load	0x2,0x4
0ec1 e00d       |    |		Load	0x0,0xd
0ec2 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0ec3 a602       |    |		Store_Unchecked	0x3,0x2
0ec4 00d8       |    |		Load_Top	At_Offset_0
0ec5 e00d       |    |		Load	0x0,0xd
0ec6 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0ec7			BODY_0eb8:
0ec7 e5fe       |    |		Load	0x2,-0x2
0ec8 00da       |    |		Load_Top	At_Offset_2
0ec9 e00d       |    |		Load	0x0,0xd
0eca 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0ecb e403       |    |		Load	0x2,0x3
0ecc 017d       | }  |		Execute	Record,Structure_Write
0ecd e403       |    |		Load	0x2,0x3
0ece 00d9       |    |		Load_Top	At_Offset_1
0ecf e007       |    |		Load	0x0,0x7
0ed0 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0ed1 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0ed2 e01b       |    |		Load	0x0,0x1b
0ed3 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0ed4 a402       |    |		Store_Unchecked	0x2,0x2
0ed5 e402       |    |		Load	0x2,0x2
0ed6 6808       |h   |		Jump_Zero	0xedf
0ed7 e403       |    |		Load	0x2,0x3
0ed8 00d9       |    |		Load_Top	At_Offset_1
0ed9 e007       |    |		Load	0x0,0x7
0eda 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0edb 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0edc e01b       |    |		Load	0x0,0x1b
0edd 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0ede a402       |    |		Store_Unchecked	0x2,0x2
0edf 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0ee0 ; --------------------------------------------------------------------------------------
0ee0 ; SUBPROGRAM
0ee0 ; --------------------------------------------------------------------------------------
0ee0 0ee8       |    |		.CONST	0x0ee8								; Address of begin
0ee1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ee2 0002       |    |		.CONST	0x0002								; Number of locals
0ee3			INIT_0ee0:
0ee3 e404       |    |		Load	0x2,0x4
0ee4 e405       |    |		Load	0x2,0x5
0ee5 e407       |    |		Load	0x2,0x7
0ee6 e409       |    |		Load	0x2,0x9
0ee7 822f       | /  |		Call	0x1,0x2f
0ee8			BODY_0ee0:
0ee8 4801       |H   |		Short_Literal	0x1
0ee9 e229       | )  |		Load	0x1,0x29
0eea 00da       |    |		Load_Top	At_Offset_2
0eeb e015       |    |		Load	0x0,0x15
0eec 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0eed 7043       |pC  |		Jump_Nonzero	0xf31
0eee e405       |    |		Load	0x2,0x5
0eef 6826       |h&  |		Jump_Zero	0xf16
0ef0 e404       |    |		Load	0x2,0x4
0ef1 4801       |H   |		Short_Literal	0x1
0ef2 4803       |H   |		Short_Literal	0x3
0ef3 e00f       |    |		Load	0x0,0xf
0ef4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0ef5 0334       | 4  |		Declare_Variable	Array,With_Constraint
0ef6 e407       |    |		Load	0x2,0x7
0ef7 e00d       |    |		Load	0x0,0xd
0ef8 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0ef9 e00f       |    |		Load	0x0,0xf
0efa 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0efb 0119       |    |		Execute	Any,Check_In_Formal_Type
0efc 4801       |H   |		Short_Literal	0x1
0efd 00da       |    |		Load_Top	At_Offset_2
0efe 01d6       |    |		Execute	Vector,Field_Write
0eff 00da       |    |		Load_Top	At_Offset_2
0f00 e00f       |    |		Load	0x0,0xf
0f01 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0f02 e00f       |    |		Load	0x0,0xf
0f03 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0f04 0119       |    |		Execute	Any,Check_In_Formal_Type
0f05 4802       |H   |		Short_Literal	0x2
0f06 00da       |    |		Load_Top	At_Offset_2
0f07 01d6       |    |		Execute	Vector,Field_Write
0f08 0092 0f75  |   u|		Action	Push_String_Extended,0xf75					; "secondary "
0f0a e00f       |    |		Load	0x0,0xf
0f0b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0f0c e00f       |    |		Load	0x0,0xf
0f0d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0f0e 0119       |    |		Execute	Any,Check_In_Formal_Type
0f0f 4803       |H   |		Short_Literal	0x3
0f10 00da       |    |		Load_Top	At_Offset_2
0f11 01d6       |    |		Execute	Vector,Field_Write
0f12 6021       |`!  |		Indirect_Literal	Discrete,0xf34,{0x00000000, 0x00008845}
0f13 e005       |    |		Load	0x0,0x5
0f14 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0f15 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0f16 e404       |    |		Load	0x2,0x4
0f17 4801       |H   |		Short_Literal	0x1
0f18 4802       |H   |		Short_Literal	0x2
0f19 e00f       |    |		Load	0x0,0xf
0f1a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0f1b 0334       | 4  |		Declare_Variable	Array,With_Constraint
0f1c e407       |    |		Load	0x2,0x7
0f1d e00d       |    |		Load	0x0,0xd
0f1e 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0f1f e00f       |    |		Load	0x0,0xf
0f20 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0f21 0119       |    |		Execute	Any,Check_In_Formal_Type
0f22 4801       |H   |		Short_Literal	0x1
0f23 00da       |    |		Load_Top	At_Offset_2
0f24 01d6       |    |		Execute	Vector,Field_Write
0f25 00da       |    |		Load_Top	At_Offset_2
0f26 e00f       |    |		Load	0x0,0xf
0f27 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0f28 e00f       |    |		Load	0x0,0xf
0f29 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0f2a 0119       |    |		Execute	Any,Check_In_Formal_Type
0f2b 4802       |H   |		Short_Literal	0x2
0f2c 00da       |    |		Load_Top	At_Offset_2
0f2d 01d6       |    |		Execute	Vector,Field_Write
0f2e 6005       |`   |		Indirect_Literal	Discrete,0xf34,{0x00000000, 0x00008845}
0f2f e005       |    |		Load	0x0,0x5
0f30 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0f31 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0f32 0000 0000  |    |		.XXX[0x2]
0f34 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008845}
0f38 ; --------------------------------------------------------------------------------------
0f38 ; STRING TABLE
0f38 ; --------------------------------------------------------------------------------------
0f38 007e       | ~  |		.STRTAB	0x007e->0x0f77							; "Rcf."
0f39 0080       |    |		.STRTAB	0x0080->0x0f79							; "<error>"
0f3a 0085       |    |		.STRTAB	0x0085->0x0f7c							; "Create_Secondary"
0f3b 0093       |    |		.STRTAB	0x0093->0x0f84							; "Primary_Unit"
0f3c 009d       |    |		.STRTAB	0x009d->0x0f8a							; "command"
0f3d 00a2       |    |		.STRTAB	0x00a2->0x0f8e							; "secondary_text"
0f3e 00ae       |    |		.STRTAB	0x00ae->0x0f95							; "Remote_Name"
0f3f 00b7       |    |		.STRTAB	0x00b7->0x0f9a							; "Process_primary => "
0f40 00c8       |    |		.STRTAB	0x00c8->0x0fa4							; ", Response"
0f41 00d0       |    |		.STRTAB	0x00d0->0x0fa9							; "Remove_Secondary"
0f42 00de       |    |		.STRTAB	0x00de->0x0fb1							; "secondary_referencer"
0f43 00f0       |    |		.STRTAB	0x00f0->0x0fbb							; "Response"
0f44 00f6       |    |		.STRTAB	0x00f6->0x0fbf							; "Show_Secondary"
0f45 0102       |    |		.STRTAB	0x0102->0x0fc6							; "Edit_Secondary"
0f46 010e       |    |		.STRTAB	0x010e->0x0fcd							; "In_Place => "
0f47 0118       |    |		.STRTAB	0x0118->0x0fd3							; ", Visible => "
0f48 0123       | #  |		.STRTAB	0x0123->0x0fd9							; "Set_Process_Primary"
0f49 0134       | 4  |		.STRTAB	0x0134->0x0fe3							; ", Value => "
0f4a 013d       | =  |		.STRTAB	0x013d->0x0fe8							; "Set_Secondary_Command"
0f4b 0150       | P  |		.STRTAB	0x0150->0x0ff3							; "Command => "
0f4c 0159       | Y  |		.STRTAB	0x0159->0x0ff8							; ", Secondary_referencer"
0f4d 016d       | m  |		.STRTAB	0x016d->0x1003							; "Link"
0f4e 016f       | o  |		.STRTAB	0x016f->0x1005							; "Main_Unit"
0f4f 0176       | v  |		.STRTAB	0x0176->0x100a							; "Make_Uncoded_Units => "
0f50 018a       |    |		.STRTAB	0x018a->0x1015							; ", Executable_Name"
0f51 0199       |    |		.STRTAB	0x0199->0x101d							; "Show_Remote_Unit_Name"
0f52 01ac       |    |		.STRTAB	0x01ac->0x1028							; "Unit"
0f53 01ae       |    |		.STRTAB	0x01ae->0x102a							; "Show_Units"
0f54 01b6       |    |		.STRTAB	0x01b6->0x102f							; "Remote_Name => "
0f55 01c3       |    |		.STRTAB	0x01c3->0x1036							; ", Consistency => "
0f56 01d2       |    |		.STRTAB	0x01d2->0x103f							; "Set_Unit_Option"
0f57 01df       |    |		.STRTAB	0x01df->0x1046							; "Option_Switch"
0f58 01ea       |    |		.STRTAB	0x01ea->0x104d							; ", switch_Value"
0f59 01f6       |    |		.STRTAB	0x01f6->0x1054							; ", Units"
0f5a 01fb       |    |		.STRTAB	0x01fb->0x1057							; ", Switch_Value"
0f5b 0207       |    |		.STRTAB	0x0207->0x105e							; "Display_Unit_Options"
0f5c 0219       |    |		.STRTAB	0x0219->0x1068							; "Units"
0f5d 021c       |    |		.STRTAB	0x021c->0x106b							; "Remove_Unit_Option"
0f5e 022c       | ,  |		.STRTAB	0x022c->0x1074							; "Refresh_View"
0f5f 0236       | 6  |		.STRTAB	0x0236->0x107a							; "View"
0f60 0238       | 8  |		.STRTAB	0x0238->0x107c							; ", Retain_History => "
0f61 024a       | J  |		.STRTAB	0x024a->0x1086							; "Show_Remote_Information"
0f62 025f       | _  |		.STRTAB	0x025f->0x1091							; "Execute_Remote_Command"
0f63 0273       | s  |		.STRTAB	0x0273->0x109c							; "remote_command"
0f64 027f       |    |		.STRTAB	0x027f->0x10a3							; ", remote_machine"
0f65 028d       |    |		.STRTAB	0x028d->0x10ab							; ", remote_username"
0f66 029c       |    |		.STRTAB	0x029c->0x10b4							; ", remote_password"
0f67 02ab       |    |		.STRTAB	0x02ab->0x10bc							; ", remote_directory"
0f68 02bb       |    |		.STRTAB	0x02bb->0x10c5							; ", The_Key"
0f69 02c2       |    |		.STRTAB	0x02c2->0x10ca							; "Collapse_secondary_referencers"
0f6a 02de       |    |		.STRTAB	0x02de->0x10d9							; "directory => "
0f6b 02e9       |    |		.STRTAB	0x02e9->0x10df							; "Expand_secondary_referencers"
0f6c 0303       |    |		.STRTAB	0x0303->0x10ed							; "<DEFAULT>"
0f6d 030a       |    |		.STRTAB	0x030a->0x10f2							; "$"
0f6e 0309       |    |		.STRTAB	0x0309->0x10f2							; "null remote directory"
0f6f 031c       |    |		.STRTAB	0x031c->0x10fd							; "error during postprocess command"
0f70 033a       | :  |		.STRTAB	0x033a->0x110d							; ".??'c(Ada)"
0f71 0342       | B  |		.STRTAB	0x0342->0x1112							; "<WORLDS>"
0f72 0348       | H  |		.STRTAB	0x0348->0x1116							; "Expression does not name a linkable object"
0f73 0370       | p  |		.STRTAB	0x0370->0x112b							; "Expression names more than one object, but an executable name was specified"
0f74 03b9       |    |		.STRTAB	0x03b9->0x1150							; "Unexpected exception caught while refreshing "
0f75 03e4       |    |		.STRTAB	0x03e4->0x1167							; "secondary "
0f76 03ec       |    |		.STREND 0x03ec->0x116c
0f77 5263 662e  |Rcf.|		.STRTAB_STRINGS
116c 0000 0000  |    |		.BLANK	0000[0x4]
1170 ; --------------------------------------------------------------------------------------
1170 ; Debug Table
1170 ; --------------------------------------------------------------------------------------
1170 0004 000c  |    |		.DEBUG4	0x0004,0x000c,0x1693,0x0000,0x0001,0x0000
1176 0790 5391  |  S |		.XXX[0x8]
1178 d311 5211  |  R |
117a 4e94 1315  |N   |
117c 5351 4000  |SQ@ |
117e 0000 0000  |    |		.BLANK	0000[0x7]
1185 0020 0000  |    |		.XXX[0x14]
1187 0780 0000  |    |
1189 0200 0000  |    |
118b 2000 0000  |    |
118d 9800 0000  |    |
118f 0080 0000  |    |
1191 0f2a 2aa1  | ** |
1193 22a2 a422  |"  "|
1195 9d28 262a  | (&*|
1197 a6a2 8000  |    |
1199 0000 0000  |    |		.BLANK	0000[0x7]
11a0 0040 0000  | @  |		.XXX[0x13]
11a2 0f00 0000  |    |
11a4 0100 0000  |    |
11a6 4000 0001  |@   |
11a8 3000 0000  |0   |
11aa 0100 0000  |    |
11ac 1e58 3a45  | X:E|
11ae 4344 5245  |CDRE|
11b0 3a50 4c55  |:PLU|
11b2 4d45       |ME  |
11b3 0000 0000  |    |		.BLANK	0000[0x8]
11bb 0080 0000  |    |		.XXX[0x13]
11bd 1e00 0000  |    |
11bf 0200 0000  |    |
11c1 8000 0002  |    |
11c3 6000 0000  |`   |
11c5 0200 0000  |    |
11c7 3cb2 748a  |< t |
11c9 8688 a48a  |    |
11cb 74a0 98aa  |t   |
11cd 9a8a       |    |
11ce 0000 0000  |    |		.BLANK	0000[0x8]
11d6 0100 0000  |    |		.XXX[0x13]
11d8 3c00 0000  |<   |
11da 0400 0001  |    |
11dc 0000 0004  |    |
11de c000 0000  |    |
11e0 0400 0000  |    |
11e2 7951 0525  |yQ %|
11e4 3131 14e8  |11  |
11e6 e941 3155  | A1U|
11e8 3514       |5   |
11e9 0000 0000  |    |		.BLANK	0000[0x8]
11f1 0200 0000  |    |		.XXX[0xf]
11f3 7800 0000  |x   |
11f5 0800 0002  |    |
11f7 0000 0009  |    |
11f9 8000 0000  |    |
11fb 0800 0000  |    |
11fd f282 927a  |   z|
11ff 327a       |2z  |