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

⟦5e84346c1⟧

    Length: 6144 (0x1800)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c8f4

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0bf0       |    |		.CONST	0x0bf0								; 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 8008       |    |		.CONST	0x8008								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0115       |    |		.CONST	0x0115								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 002f       | /  |		.CONST	0x002f								; Number of locals
000b			INIT_0008:
000b 029a 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call,Visible,Unelaborated
000d 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated
000f 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated
0011 029a 015b  |   [|		Declare_Subprogram	INIT_0158,For_Outer_Call,Visible,Unelaborated
0013 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated
0015 029a 0193  |    |		Declare_Subprogram	INIT_0190,For_Outer_Call,Visible,Unelaborated
0017 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated
0019 029a 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Outer_Call,Visible,Unelaborated
001b 029a 022b  |   +|		Declare_Subprogram	INIT_0228,For_Outer_Call,Visible,Unelaborated
001d 029a 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call,Visible,Unelaborated
001f 029a 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call,Visible,Unelaborated
0021 029a 026b  |   k|		Declare_Subprogram	INIT_0268,For_Outer_Call,Visible,Unelaborated
0023 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated
0025 029a 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call,Visible,Unelaborated
0027 029a 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call,Visible,Unelaborated
0029 029a 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call,Visible,Unelaborated
002b 029a 0303  |    |		Declare_Subprogram	INIT_0300,For_Outer_Call,Visible,Unelaborated
002d 4800       |H   |		Short_Literal	0x0
002e 0093 0913  |    |		push_full_address	INIT_0910
0030 02a0       |    |		Declare_Subprogram	Null_Subprogram
0031 038f       |    |		Declare_Type	Package,Defined,Visible
0032 0386       |    |		Declare_Variable	Package,Visible
0033 4800       |H   |		Short_Literal	0x0
0034 0093 0753  |   S|		push_full_address	INIT_0750
0036 02a0       |    |		Declare_Subprogram	Null_Subprogram
0037 038f       |    |		Declare_Type	Package,Defined,Visible
0038 0386       |    |		Declare_Variable	Package,Visible
0039 4800       |H   |		Short_Literal	0x0
003a 0093 0653  |   S|		push_full_address	INIT_0650
003c 02a0       |    |		Declare_Subprogram	Null_Subprogram
003d 038f       |    |		Declare_Type	Package,Defined,Visible
003e 0386       |    |		Declare_Variable	Package,Visible
003f 4800       |H   |		Short_Literal	0x0
0040 0093 05a3  |    |		push_full_address	INIT_05a0
0042 02a0       |    |		Declare_Subprogram	Null_Subprogram
0043 038f       |    |		Declare_Type	Package,Defined,Visible
0044 0386       |    |		Declare_Variable	Package,Visible
0045 4800       |H   |		Short_Literal	0x0
0046 0093 04e3  |    |		push_full_address	INIT_04e0
0048 02a0       |    |		Declare_Subprogram	Null_Subprogram
0049 038f       |    |		Declare_Type	Package,Defined,Visible
004a 0386       |    |		Declare_Variable	Package,Visible
004b 4800       |H   |		Short_Literal	0x0
004c 0093 040b  |    |		push_full_address	INIT_0408
004e 02a0       |    |		Declare_Subprogram	Null_Subprogram
004f 038f       |    |		Declare_Type	Package,Defined,Visible
0050 0386       |    |		Declare_Variable	Package,Visible
0051 4800       |H   |		Short_Literal	0x0
0052 0093 0343  |   C|		push_full_address	INIT_0340
0054 02a0       |    |		Declare_Subprogram	Null_Subprogram
0055 038f       |    |		Declare_Type	Package,Defined,Visible
0056 0386       |    |		Declare_Variable	Package,Visible
0057 0093 0000  |    |		push_full_address	0x0
0059 60ca       |`   |		Indirect_Literal	Discrete,0x124,{0x80000000, 0x00010000}
005a 0273       | s  |		Execute	Discrete,Plus
005b 0129       | )  |		Execute	Any,Make_Visible
005c 00bf       |    |		Action	Accept_Activation
005d 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
005f e002       |    |		Load	0x0,0x2
0060 0007       |    |		Action	Break_Optional
0061 4800       |H   |		Short_Literal	0x0
0062 8003       |    |		Call	0x0,0x3
0063 0092 0adc  |    |		Action	Push_String_Extended,0xadc					; "Shut_down"
0065 0092 0add  |    |		Action	Push_String_Extended,0xadd					; "Query"
0067 0092 0ade  |    |		Action	Push_String_Extended,0xade					; "Query_reply"
0069 0092 0adf  |    |		Action	Push_String_Extended,0xadf					; "behavior_id"
006b 0092 0ae0  |    |		Action	Push_String_Extended,0xae0					; "behavior_class"
006d 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
006e 00c7       |    |		Action	Elaborate_Subprogram
006f 029d 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call
0071 029d 0333  |   3|		Declare_Subprogram	INIT_0330,For_Outer_Call
0073 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0074 00c7       |    |		Action	Elaborate_Subprogram
0075 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0076 00c7       |    |		Action	Elaborate_Subprogram
0077 e004       |    |		Load	0x0,0x4
0078 e005       |    |		Load	0x0,0x5
0079 a006       |    |		Store_Unchecked	0x0,0x6
007a a007       |    |		Store_Unchecked	0x0,0x7
007b e228       | (  |		Load	0x1,0x28
007c e227       | '  |		Load	0x1,0x27
007d a008       |    |		Store_Unchecked	0x0,0x8
007e 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
007f 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
0080 a009       |    |		Store_Unchecked	0x0,0x9
0081 e00a       |    |		Load	0x0,0xa
0082 e225       | %  |		Load	0x1,0x25
0083 a00b       |    |		Store_Unchecked	0x0,0xb
0084 e00c       |    |		Load	0x0,0xc
0085 a00d       |    |		Store_Unchecked	0x0,0xd
0086 480f       |H   |		Short_Literal	0xf
0087 e21f       |    |		Load	0x1,0x1f
0088 020e       |    |		Execute	Module,Augment_Imports
0089 e21f       |    |		Load	0x1,0x1f
008a 020f       |    |		Execute	Module,Activate
008b e004       |    |		Load	0x0,0x4
008c e005       |    |		Load	0x0,0x5
008d a00e       |    |		Store_Unchecked	0x0,0xe
008e a007       |    |		Store_Unchecked	0x0,0x7
008f e228       | (  |		Load	0x1,0x28
0090 e227       | '  |		Load	0x1,0x27
0091 a008       |    |		Store_Unchecked	0x0,0x8
0092 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
0093 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
0094 a009       |    |		Store_Unchecked	0x0,0x9
0095 e225       | %  |		Load	0x1,0x25
0096 a00f       |    |		Store_Unchecked	0x0,0xf
0097 a010       |    |		Store_Unchecked	0x0,0x10
0098 480d       |H   |		Short_Literal	0xd
0099 e220       |    |		Load	0x1,0x20
009a 020e       |    |		Execute	Module,Augment_Imports
009b e220       |    |		Load	0x1,0x20
009c 020f       |    |		Execute	Module,Activate
009d e005       |    |		Load	0x0,0x5
009e e004       |    |		Load	0x0,0x4
009f a006       |    |		Store_Unchecked	0x0,0x6
00a0 a007       |    |		Store_Unchecked	0x0,0x7
00a1 e228       | (  |		Load	0x1,0x28
00a2 e227       | '  |		Load	0x1,0x27
00a3 a008       |    |		Store_Unchecked	0x0,0x8
00a4 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
00a5 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
00a6 a009       |    |		Store_Unchecked	0x0,0x9
00a7 e225       | %  |		Load	0x1,0x25
00a8 480b       |H   |		Short_Literal	0xb
00a9 e221       | !  |		Load	0x1,0x21
00aa 020e       |    |		Execute	Module,Augment_Imports
00ab e221       | !  |		Load	0x1,0x21
00ac 020f       |    |		Execute	Module,Activate
00ad e005       |    |		Load	0x0,0x5
00ae e004       |    |		Load	0x0,0x4
00af a006       |    |		Store_Unchecked	0x0,0x6
00b0 a007       |    |		Store_Unchecked	0x0,0x7
00b1 e228       | (  |		Load	0x1,0x28
00b2 e227       | '  |		Load	0x1,0x27
00b3 a008       |    |		Store_Unchecked	0x0,0x8
00b4 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
00b5 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
00b6 a009       |    |		Store_Unchecked	0x0,0x9
00b7 e225       | %  |		Load	0x1,0x25
00b8 a00d       |    |		Store_Unchecked	0x0,0xd
00b9 480c       |H   |		Short_Literal	0xc
00ba e222       | "  |		Load	0x1,0x22
00bb 020e       |    |		Execute	Module,Augment_Imports
00bc e222       | "  |		Load	0x1,0x22
00bd 020f       |    |		Execute	Module,Activate
00be e005       |    |		Load	0x0,0x5
00bf e004       |    |		Load	0x0,0x4
00c0 a00e       |    |		Store_Unchecked	0x0,0xe
00c1 a007       |    |		Store_Unchecked	0x0,0x7
00c2 e228       | (  |		Load	0x1,0x28
00c3 e227       | '  |		Load	0x1,0x27
00c4 a008       |    |		Store_Unchecked	0x0,0x8
00c5 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
00c6 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
00c7 a009       |    |		Store_Unchecked	0x0,0x9
00c8 e225       | %  |		Load	0x1,0x25
00c9 480b       |H   |		Short_Literal	0xb
00ca e223       | #  |		Load	0x1,0x23
00cb 020e       |    |		Execute	Module,Augment_Imports
00cc e223       | #  |		Load	0x1,0x23
00cd 020f       |    |		Execute	Module,Activate
00ce e005       |    |		Load	0x0,0x5
00cf e004       |    |		Load	0x0,0x4
00d0 a006       |    |		Store_Unchecked	0x0,0x6
00d1 a007       |    |		Store_Unchecked	0x0,0x7
00d2 e228       | (  |		Load	0x1,0x28
00d3 e227       | '  |		Load	0x1,0x27
00d4 a008       |    |		Store_Unchecked	0x0,0x8
00d5 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
00d6 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
00d7 a009       |    |		Store_Unchecked	0x0,0x9
00d8 e225       | %  |		Load	0x1,0x25
00d9 480b       |H   |		Short_Literal	0xb
00da e224       | $  |		Load	0x1,0x24
00db 020e       |    |		Execute	Module,Augment_Imports
00dc e224       | $  |		Load	0x1,0x24
00dd 020f       |    |		Execute	Module,Activate
00de 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
00df 00c7       |    |		Action	Elaborate_Subprogram
00e0 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
00e1 00c7       |    |		Action	Elaborate_Subprogram
00e2 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
00e3 00c7       |    |		Action	Elaborate_Subprogram
00e4 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
00e5 00c7       |    |		Action	Elaborate_Subprogram
00e6 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
00e7 00c7       |    |		Action	Elaborate_Subprogram
00e8 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
00e9 00c7       |    |		Action	Elaborate_Subprogram
00ea 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
00eb 00c7       |    |		Action	Elaborate_Subprogram
00ec 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
00ed 00c7       |    |		Action	Elaborate_Subprogram
00ee 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
00ef 00c7       |    |		Action	Elaborate_Subprogram
00f0 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
00f1 00c7       |    |		Action	Elaborate_Subprogram
00f2 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
00f3 00c7       |    |		Action	Elaborate_Subprogram
00f4 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
00f5 00c7       |    |		Action	Elaborate_Subprogram
00f6 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
00f7 00c7       |    |		Action	Elaborate_Subprogram
00f8 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
00f9 00c7       |    |		Action	Elaborate_Subprogram
00fa e005       |    |		Load	0x0,0x5
00fb e004       |    |		Load	0x0,0x4
00fc a00d       |    |		Store_Unchecked	0x0,0xd
00fd a007       |    |		Store_Unchecked	0x0,0x7
00fe e228       | (  |		Load	0x1,0x28
00ff e227       | '  |		Load	0x1,0x27
0100 a008       |    |		Store_Unchecked	0x0,0x8
0101 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
0102 a006       |    |		Store_Unchecked	0x0,0x6
0103 e011       |    |		Load	0x0,0x11
0104 a012       |    |		Store_Unchecked	0x0,0x12
0105 a013       |    |		Store_Unchecked	0x0,0x13
0106 a014       |    |		Store_Unchecked	0x0,0x14
0107 a015       |    |		Store_Unchecked	0x0,0x15
0108 a016       |    |		Store_Unchecked	0x0,0x16
0109 a017       |    |		Store_Unchecked	0x0,0x17
010a a018       |    |		Store_Unchecked	0x0,0x18
010b a009       |    |		Store_Unchecked	0x0,0x9
010c e225       | %  |		Load	0x1,0x25
010d e019       |    |		Load	0x0,0x19
010e a01a       |    |		Store_Unchecked	0x0,0x1a
010f 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0110 4816       |H   |		Short_Literal	0x16
0111 e21e       |    |		Load	0x1,0x1e
0112 020e       |    |		Execute	Module,Augment_Imports
0113 e21e       |    |		Load	0x1,0x1e
0114 020f       |    |		Execute	Module,Activate
0115			BODY_0008:
0115 00bc       |    |		Action	Signal_Activated
0116 00bb       |    |		Action	Signal_Completion
0117 0000       |    |		.XXX[0x1]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b       |    |		.CONST	0x011b								; Address of begin
0119 0004       |    |		.CONST	0x0004								; Address of exception handler
011a 0001       |    |		.CONST	0x0001								; Number of locals
011b			BODY_0118:
011b			INIT_0118:
011b 4801       |H   |		Short_Literal	0x1
011c e226       | &  |		Load	0x1,0x26
011d e5ff       |    |		Load	0x2,-0x1
011e 8012       |    |		Call	0x0,0x12
011f 801b       |    |		Call	0x0,0x1b
0120 801c       |    |		Call	0x0,0x1c
0121 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0122 0000 0000  |    |		.XXX[0x2]
0124 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 0133       | 3  |		.CONST	0x0133								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0003       |    |		.CONST	0x0003								; Number of locals
012b			INIT_0128:
012b e004       |    |		Load	0x0,0x4
012c 0322       | "  |		Declare_Variable	Record
012d 00d8       |    |		Load_Top	At_Offset_0
012e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
012f e005       |    |		Load	0x0,0x5
0130 0322       | "  |		Declare_Variable	Record
0131 00d8       |    |		Load_Top	At_Offset_0
0132 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0133			BODY_0128:
0133 00d8       |    |		Load_Top	At_Offset_0
0134 4800       |H   |		Short_Literal	0x0
0135 801a       |    |		Call	0x0,0x1a
0136 00d1       |    |		Pop_Control	Pop_Count_1
0137 00d9       |    |		Load_Top	At_Offset_1
0138 00d9       |    |		Load_Top	At_Offset_1
0139 e226       | &  |		Load	0x1,0x26
013a e229       | )  |		Load	0x1,0x29
013b 8007       |    |		Call	0x0,0x7
013c 00d1       |    |		Pop_Control	Pop_Count_1
013d 00d9       |    |		Load_Top	At_Offset_1
013e e228       | (  |		Load	0x1,0x28
013f e227       | '  |		Load	0x1,0x27
0140 e5fe       |    |		Load	0x2,-0x2
0141 e5ff       |    |		Load	0x2,-0x1
0142 4800       |H   |		Short_Literal	0x0
0143 8008       |    |		Call	0x0,0x8
0144 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0145 0000 0000  |    |		.XXX[0x3]
0147 0000       |    |
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b       | K  |		.CONST	0x014b								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0001       |    |		.CONST	0x0001								; Number of locals
014b			BODY_0148:
014b			INIT_0148:
014b 00da       |    |		Load_Top	At_Offset_2
014c 820d       |    |		Call	0x1,0xd
014d 6804       |h   |		Jump_Zero	0x152
014e e229       | )  |		Load	0x1,0x29
014f 00db       |    |		Load_Top	At_Offset_3
0150 822e       | .  |		Call	0x1,0x2e
0151 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0152 4800       |H   |		Short_Literal	0x0
0153 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0154 0000 0000  |    |		.BLANK	0000[0x4]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015f       | _  |		.CONST	0x015f								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0002       |    |		.CONST	0x0002								; Number of locals
015b			INIT_0158:
015b e019       |    |		Load	0x0,0x19
015c 0322       | "  |		Declare_Variable	Record
015d 00d8       |    |		Load_Top	At_Offset_0
015e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
015f			BODY_0158:
015f 4801       |H   |		Short_Literal	0x1
0160 e5fd       |    |		Load	0x2,-0x3
0161 e5fe       |    |		Load	0x2,-0x2
0162 e5ff       |    |		Load	0x2,-0x1
0163 8213       |    |		Call	0x1,0x13
0164 00d9       |    |		Load_Top	At_Offset_1
0165 017d       | }  |		Execute	Record,Structure_Write
0166 00d8       |    |		Load_Top	At_Offset_0
0167 e5fa       |    |		Load	0x2,-0x6
0168 e5fb       |    |		Load	0x2,-0x5
0169 e5fc       |    |		Load	0x2,-0x4
016a 4801       |H   |		Short_Literal	0x1
016b 8214       |    |		Call	0x1,0x14
016c 00d1       |    |		Pop_Control	Pop_Count_1
016d 00d8       |    |		Load_Top	At_Offset_0
016e 4406       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x6
016f 0000       |    |		.XXX[0x1]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0177       | w  |		.CONST	0x0177								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0002       |    |		.CONST	0x0002								; Number of locals
0173			INIT_0170:
0173 e019       |    |		Load	0x0,0x19
0174 0322       | "  |		Declare_Variable	Record
0175 00d8       |    |		Load_Top	At_Offset_0
0176 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0177			BODY_0170:
0177 4802       |H   |		Short_Literal	0x2
0178 e5fd       |    |		Load	0x2,-0x3
0179 e5fe       |    |		Load	0x2,-0x2
017a e5ff       |    |		Load	0x2,-0x1
017b 8213       |    |		Call	0x1,0x13
017c 00d9       |    |		Load_Top	At_Offset_1
017d 017d       | }  |		Execute	Record,Structure_Write
017e 00d8       |    |		Load_Top	At_Offset_0
017f e5fa       |    |		Load	0x2,-0x6
0180 e5fb       |    |		Load	0x2,-0x5
0181 e5fc       |    |		Load	0x2,-0x4
0182 4801       |H   |		Short_Literal	0x1
0183 8214       |    |		Call	0x1,0x14
0184 00d1       |    |		Pop_Control	Pop_Count_1
0185 00d8       |    |		Load_Top	At_Offset_0
0186 e5f7       |    |		Load	0x2,-0x9
0187 e5f8       |    |		Load	0x2,-0x8
0188 e5f9       |    |		Load	0x2,-0x7
0189 4802       |H   |		Short_Literal	0x2
018a 8214       |    |		Call	0x1,0x14
018b 00d1       |    |		Pop_Control	Pop_Count_1
018c 00d8       |    |		Load_Top	At_Offset_0
018d 4409       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x9
018e 0000 0000  |    |		.XXX[0x2]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0197       |    |		.CONST	0x0197								; Address of begin
0191 0004       |    |		.CONST	0x0004								; Address of exception handler
0192 0002       |    |		.CONST	0x0002								; Number of locals
0193			INIT_0190:
0193 e019       |    |		Load	0x0,0x19
0194 0322       | "  |		Declare_Variable	Record
0195 00d8       |    |		Load_Top	At_Offset_0
0196 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0197			BODY_0190:
0197 4803       |H   |		Short_Literal	0x3
0198 e5fd       |    |		Load	0x2,-0x3
0199 e5fe       |    |		Load	0x2,-0x2
019a e5ff       |    |		Load	0x2,-0x1
019b 8213       |    |		Call	0x1,0x13
019c 00d9       |    |		Load_Top	At_Offset_1
019d 017d       | }  |		Execute	Record,Structure_Write
019e 00d8       |    |		Load_Top	At_Offset_0
019f e5fa       |    |		Load	0x2,-0x6
01a0 e5fb       |    |		Load	0x2,-0x5
01a1 e5fc       |    |		Load	0x2,-0x4
01a2 4801       |H   |		Short_Literal	0x1
01a3 8214       |    |		Call	0x1,0x14
01a4 00d1       |    |		Pop_Control	Pop_Count_1
01a5 00d8       |    |		Load_Top	At_Offset_0
01a6 e5f7       |    |		Load	0x2,-0x9
01a7 e5f8       |    |		Load	0x2,-0x8
01a8 e5f9       |    |		Load	0x2,-0x7
01a9 4802       |H   |		Short_Literal	0x2
01aa 8214       |    |		Call	0x1,0x14
01ab 00d1       |    |		Pop_Control	Pop_Count_1
01ac 00d8       |    |		Load_Top	At_Offset_0
01ad e5f4       |    |		Load	0x2,-0xc
01ae e5f5       |    |		Load	0x2,-0xb
01af e5f6       |    |		Load	0x2,-0xa
01b0 4803       |H   |		Short_Literal	0x3
01b1 8214       |    |		Call	0x1,0x14
01b2 00d1       |    |		Pop_Control	Pop_Count_1
01b3 00d8       |    |		Load_Top	At_Offset_0
01b4 440c       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0xc
01b5 0000 0000  |    |		.XXX[0x3]
01b7 0000       |    |
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01c7       |    |		.CONST	0x01c7								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0004       |    |		.CONST	0x0004								; Number of locals
01bb			INIT_01b8:
01bb e011       |    |		Load	0x0,0x11
01bc 0322       | "  |		Declare_Variable	Record
01bd 00d8       |    |		Load_Top	At_Offset_0
01be 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01bf e005       |    |		Load	0x0,0x5
01c0 0322       | "  |		Declare_Variable	Record
01c1 00d8       |    |		Load_Top	At_Offset_0
01c2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01c3 e004       |    |		Load	0x0,0x4
01c4 0322       | "  |		Declare_Variable	Record
01c5 00d8       |    |		Load_Top	At_Offset_0
01c6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01c7			BODY_01b8:
01c7 00d9       |    |		Load_Top	At_Offset_1
01c8 e5fc       |    |		Load	0x2,-0x4
01c9 0a01       |    |		Execute_Immediate	Plus,0x1
01ca 00d8       |    |		Load_Top	At_Offset_0
01cb e01d       |    |		Load	0x0,0x1d
01cc 0260       | `  |		Execute	Discrete,In_Type
01cd 7001       |p   |		Jump_Nonzero	0x1cf
01ce 0801       |    |		Execute_Immediate	Raise,0x1
01cf 801a       |    |		Call	0x0,0x1a
01d0 00d1       |    |		Pop_Control	Pop_Count_1
01d1 00da       |    |		Load_Top	At_Offset_2
01d2 e5fd       |    |		Load	0x2,-0x3
01d3 00ea       |    |		Load_Encached	Null_String_Cache
01d4 4800       |H   |		Short_Literal	0x0
01d5 e22d       | -  |		Load	0x1,0x2d
01d6 801e       |    |		Call	0x0,0x1e
01d7 00d1       |    |		Pop_Control	Pop_Count_1
01d8 00d9       |    |		Load_Top	At_Offset_1
01d9 4801       |H   |		Short_Literal	0x1
01da e402       |    |		Load	0x2,0x2
01db 8016       |    |		Call	0x0,0x16
01dc 00d1       |    |		Pop_Control	Pop_Count_1
01dd 00d8       |    |		Load_Top	At_Offset_0
01de 00da       |    |		Load_Top	At_Offset_2
01df e226       | &  |		Load	0x1,0x26
01e0 e22a       | *  |		Load	0x1,0x2a
01e1 8007       |    |		Call	0x0,0x7
01e2 00d1       |    |		Pop_Control	Pop_Count_1
01e3 00d8       |    |		Load_Top	At_Offset_0
01e4 e228       | (  |		Load	0x1,0x28
01e5 e227       | '  |		Load	0x1,0x27
01e6 e5fe       |    |		Load	0x2,-0x2
01e7 e5ff       |    |		Load	0x2,-0x1
01e8 4800       |H   |		Short_Literal	0x0
01e9 8008       |    |		Call	0x0,0x8
01ea 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
01eb 0000 0000  |    |		.BLANK	0000[0x5]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01fb       |    |		.CONST	0x01fb								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0003       |    |		.CONST	0x0003								; Number of locals
01f3			INIT_01f0:
01f3 e005       |    |		Load	0x0,0x5
01f4 0322       | "  |		Declare_Variable	Record
01f5 00d8       |    |		Load_Top	At_Offset_0
01f6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01f7 e004       |    |		Load	0x0,0x4
01f8 0322       | "  |		Declare_Variable	Record
01f9 00d8       |    |		Load_Top	At_Offset_0
01fa 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01fb			BODY_01f0:
01fb e5fb       |    |		Load	0x2,-0x5
01fc 8012       |    |		Call	0x0,0x12
01fd 00d9       |    |		Load_Top	At_Offset_1
01fe 017d       | }  |		Execute	Record,Structure_Write
01ff 00d8       |    |		Load_Top	At_Offset_0
0200 8013       |    |		Call	0x0,0x13
0201 00da       |    |		Load_Top	At_Offset_2
0202 017d       | }  |		Execute	Record,Structure_Write
0203 e5ff       |    |		Load	0x2,-0x1
0204 00da       |    |		Load_Top	At_Offset_2
0205 801f       |    |		Call	0x0,0x1f
0206 027d       | }  |		Execute	Discrete,Greater
0207 6802       |h   |		Jump_Zero	0x20a
0208 e225       | %  |		Load	0x1,0x25
0209 0257       | W  |		Execute	Discrete,Raise
020a 00d9       |    |		Load_Top	At_Offset_1
020b e5ff       |    |		Load	0x2,-0x1
020c 0a01       |    |		Execute_Immediate	Plus,0x1
020d 00d8       |    |		Load_Top	At_Offset_0
020e e01d       |    |		Load	0x0,0x1d
020f 0260       | `  |		Execute	Discrete,In_Type
0210 7001       |p   |		Jump_Nonzero	0x212
0211 0801       |    |		Execute_Immediate	Raise,0x1
0212 e5fc       |    |		Load	0x2,-0x4
0213 e5fe       |    |		Load	0x2,-0x2
0214 4800       |H   |		Short_Literal	0x0
0215 e5fd       |    |		Load	0x2,-0x3
0216 8020       |    |		Call	0x0,0x20
0217 8016       |    |		Call	0x0,0x16
0218 00d1       |    |		Pop_Control	Pop_Count_1
0219 00d8       |    |		Load_Top	At_Offset_0
021a 00da       |    |		Load_Top	At_Offset_2
021b 8017       |    |		Call	0x0,0x17
021c 00d1       |    |		Pop_Control	Pop_Count_1
021d e5fb       |    |		Load	0x2,-0x5
021e 00d9       |    |		Load_Top	At_Offset_1
021f 8018       |    |		Call	0x0,0x18
0220 00d1       |    |		Pop_Control	Pop_Count_1
0221 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0222 0000 0000  |    |		.BLANK	0000[0x6]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b       | +  |		.CONST	0x022b								; Address of begin
0229 0004       |    |		.CONST	0x0004								; Address of exception handler
022a 0001       |    |		.CONST	0x0001								; Number of locals
022b			BODY_0228:
022b			INIT_0228:
022b 4801       |H   |		Short_Literal	0x1
022c 00db       |    |		Load_Top	At_Offset_3
022d 8012       |    |		Call	0x0,0x12
022e 8013       |    |		Call	0x0,0x13
022f 8014       |    |		Call	0x0,0x14
0230 8009       |    |		Call	0x0,0x9
0231 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0232 0000 0000  |    |		.BLANK	0000[0x6]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b       | ;  |		.CONST	0x023b								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0001       |    |		.CONST	0x0001								; Number of locals
023b			BODY_0238:
023b			INIT_0238:
023b 00da       |    |		Load_Top	At_Offset_2
023c 8012       |    |		Call	0x0,0x12
023d 8013       |    |		Call	0x0,0x13
023e 801f       |    |		Call	0x0,0x1f
023f 0aff       |    |		Execute_Immediate	Plus,-0x1
0240 00d8       |    |		Load_Top	At_Offset_0
0241 e01d       |    |		Load	0x0,0x1d
0242 0260       | `  |		Execute	Discrete,In_Type
0243 7001       |p   |		Jump_Nonzero	0x245
0244 0801       |    |		Execute_Immediate	Raise,0x1
0245 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0246 0000 0000  |    |		.XXX[0x2]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024f       | O  |		.CONST	0x024f								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0002       |    |		.CONST	0x0002								; Number of locals
024b			INIT_0248:
024b e005       |    |		Load	0x0,0x5
024c 0322       | "  |		Declare_Variable	Record
024d 00d8       |    |		Load_Top	At_Offset_0
024e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
024f			BODY_0248:
024f 00db       |    |		Load_Top	At_Offset_3
0250 8012       |    |		Call	0x0,0x12
0251 8013       |    |		Call	0x0,0x13
0252 00d9       |    |		Load_Top	At_Offset_1
0253 017d       | }  |		Execute	Record,Structure_Write
0254 e5fe       |    |		Load	0x2,-0x2
0255 00d9       |    |		Load_Top	At_Offset_1
0256 801f       |    |		Call	0x0,0x1f
0257 027d       | }  |		Execute	Discrete,Greater
0258 6802       |h   |		Jump_Zero	0x25b
0259 e225       | %  |		Load	0x1,0x25
025a 0257       | W  |		Execute	Discrete,Raise
025b e5fe       |    |		Load	0x2,-0x2
025c 0a01       |    |		Execute_Immediate	Plus,0x1
025d 00d8       |    |		Load_Top	At_Offset_0
025e e01d       |    |		Load	0x0,0x1d
025f 0260       | `  |		Execute	Discrete,In_Type
0260 7001       |p   |		Jump_Nonzero	0x262
0261 0801       |    |		Execute_Immediate	Raise,0x1
0262 00d9       |    |		Load_Top	At_Offset_1
0263 8014       |    |		Call	0x0,0x14
0264 800f       |    |		Call	0x0,0xf
0265 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0266 0000 0000  |    |		.XXX[0x2]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026f       | o  |		.CONST	0x026f								; Address of begin
0269 0004       |    |		.CONST	0x0004								; Address of exception handler
026a 0002       |    |		.CONST	0x0002								; Number of locals
026b			INIT_0268:
026b e005       |    |		Load	0x0,0x5
026c 0322       | "  |		Declare_Variable	Record
026d 00d8       |    |		Load_Top	At_Offset_0
026e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
026f			BODY_0268:
026f 00db       |    |		Load_Top	At_Offset_3
0270 8012       |    |		Call	0x0,0x12
0271 8013       |    |		Call	0x0,0x13
0272 00d9       |    |		Load_Top	At_Offset_1
0273 017d       | }  |		Execute	Record,Structure_Write
0274 e5fe       |    |		Load	0x2,-0x2
0275 00d9       |    |		Load_Top	At_Offset_1
0276 801f       |    |		Call	0x0,0x1f
0277 027d       | }  |		Execute	Discrete,Greater
0278 6802       |h   |		Jump_Zero	0x27b
0279 e225       | %  |		Load	0x1,0x25
027a 0257       | W  |		Execute	Discrete,Raise
027b e5fe       |    |		Load	0x2,-0x2
027c 0a01       |    |		Execute_Immediate	Plus,0x1
027d 00d8       |    |		Load_Top	At_Offset_0
027e e01d       |    |		Load	0x0,0x1d
027f 0260       | `  |		Execute	Discrete,In_Type
0280 7001       |p   |		Jump_Nonzero	0x282
0281 0801       |    |		Execute_Immediate	Raise,0x1
0282 00d9       |    |		Load_Top	At_Offset_1
0283 8014       |    |		Call	0x0,0x14
0284 8010       |    |		Call	0x0,0x10
0285 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0286 0000 0000  |    |		.XXX[0x2]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028f       |    |		.CONST	0x028f								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0002       |    |		.CONST	0x0002								; Number of locals
028b			INIT_0288:
028b e005       |    |		Load	0x0,0x5
028c 0322       | "  |		Declare_Variable	Record
028d 00d8       |    |		Load_Top	At_Offset_0
028e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
028f			BODY_0288:
028f 00db       |    |		Load_Top	At_Offset_3
0290 8012       |    |		Call	0x0,0x12
0291 8013       |    |		Call	0x0,0x13
0292 00d9       |    |		Load_Top	At_Offset_1
0293 017d       | }  |		Execute	Record,Structure_Write
0294 e5fe       |    |		Load	0x2,-0x2
0295 00d9       |    |		Load_Top	At_Offset_1
0296 801f       |    |		Call	0x0,0x1f
0297 027d       | }  |		Execute	Discrete,Greater
0298 6802       |h   |		Jump_Zero	0x29b
0299 e225       | %  |		Load	0x1,0x25
029a 0257       | W  |		Execute	Discrete,Raise
029b e5fe       |    |		Load	0x2,-0x2
029c 0a01       |    |		Execute_Immediate	Plus,0x1
029d 00d8       |    |		Load_Top	At_Offset_0
029e e01d       |    |		Load	0x0,0x1d
029f 0260       | `  |		Execute	Discrete,In_Type
02a0 7001       |p   |		Jump_Nonzero	0x2a2
02a1 0801       |    |		Execute_Immediate	Raise,0x1
02a2 00d9       |    |		Load_Top	At_Offset_1
02a3 8014       |    |		Call	0x0,0x14
02a4 8009       |    |		Call	0x0,0x9
02a5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02a6 0000 0000  |    |		.XXX[0x2]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab       |    |		.CONST	0x02ab								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0001       |    |		.CONST	0x0001								; Number of locals
02ab			BODY_02a8:
02ab			INIT_02a8:
02ab 4801       |H   |		Short_Literal	0x1
02ac 00db       |    |		Load_Top	At_Offset_3
02ad 8012       |    |		Call	0x0,0x12
02ae 8021       | !  |		Call	0x0,0x21
02af e22a       | *  |		Load	0x1,0x2a
02b0 801c       |    |		Call	0x0,0x1c
02b1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b2 0000 0000  |    |		.BLANK	0000[0x6]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02c3       |    |		.CONST	0x02c3								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0003       |    |		.CONST	0x0003								; Number of locals
02bb			INIT_02b8:
02bb e005       |    |		Load	0x0,0x5
02bc 0322       | "  |		Declare_Variable	Record
02bd 00d8       |    |		Load_Top	At_Offset_0
02be 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02bf e004       |    |		Load	0x0,0x4
02c0 0322       | "  |		Declare_Variable	Record
02c1 00d8       |    |		Load_Top	At_Offset_0
02c2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02c3			BODY_02b8:
02c3 00d9       |    |		Load_Top	At_Offset_1
02c4 e5fc       |    |		Load	0x2,-0x4
02c5 00e0       |    |		Load_Encached	Standard_Cache
02c6 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02c7 4800       |H   |		Short_Literal	0x0
02c8 00ea       |    |		Load_Encached	Null_String_Cache
02c9 e22c       | ,  |		Load	0x1,0x2c
02ca 800d       |    |		Call	0x0,0xd
02cb 00d1       |    |		Pop_Control	Pop_Count_1
02cc 00d8       |    |		Load_Top	At_Offset_0
02cd 00da       |    |		Load_Top	At_Offset_2
02ce e226       | &  |		Load	0x1,0x26
02cf e22b       | +  |		Load	0x1,0x2b
02d0 8007       |    |		Call	0x0,0x7
02d1 00d1       |    |		Pop_Control	Pop_Count_1
02d2 00d8       |    |		Load_Top	At_Offset_0
02d3 e228       | (  |		Load	0x1,0x28
02d4 e5fd       |    |		Load	0x2,-0x3
02d5 e5fe       |    |		Load	0x2,-0x2
02d6 e5ff       |    |		Load	0x2,-0x1
02d7 4800       |H   |		Short_Literal	0x0
02d8 8008       |    |		Call	0x0,0x8
02d9 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
02da 0000 0000  |    |		.BLANK	0000[0x6]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e3       |    |		.CONST	0x02e3								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0001       |    |		.CONST	0x0001								; Number of locals
02e3			BODY_02e0:
02e3			INIT_02e0:
02e3 00da       |    |		Load_Top	At_Offset_2
02e4 8012       |    |		Call	0x0,0x12
02e5 8013       |    |		Call	0x0,0x13
02e6 801f       |    |		Call	0x0,0x1f
02e7 0e01       |    |		Execute_Immediate	Not_Equal,0x1
02e8 6802       |h   |		Jump_Zero	0x2eb
02e9 e225       | %  |		Load	0x1,0x25
02ea 0257       | W  |		Execute	Discrete,Raise
02eb 4801       |H   |		Short_Literal	0x1
02ec 00db       |    |		Load_Top	At_Offset_3
02ed 8012       |    |		Call	0x0,0x12
02ee 8013       |    |		Call	0x0,0x13
02ef 8014       |    |		Call	0x0,0x14
02f0 8009       |    |		Call	0x0,0x9
02f1 00e2       |    |		Load_Encached	Integer_Cache
02f2 00e0       |    |		Load_Encached	Standard_Cache
02f3 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02f4 00d8       |    |		Load_Top	At_Offset_0
02f5 00e3       |    |		Load_Encached	Natural_Cache
02f6 0260       | `  |		Execute	Discrete,In_Type
02f7 7001       |p   |		Jump_Nonzero	0x2f9
02f8 0801       |    |		Execute_Immediate	Raise,0x1
02f9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02fa 0000 0000  |    |		.BLANK	0000[0x6]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303       |    |		.CONST	0x0303								; Address of begin
0301 0004       |    |		.CONST	0x0004								; Address of exception handler
0302 0001       |    |		.CONST	0x0001								; Number of locals
0303			BODY_0300:
0303			INIT_0300:
0303 4801       |H   |		Short_Literal	0x1
0304 00db       |    |		Load_Top	At_Offset_3
0305 8012       |    |		Call	0x0,0x12
0306 8021       | !  |		Call	0x0,0x21
0307 e22b       | +  |		Load	0x1,0x2b
0308 801c       |    |		Call	0x0,0x1c
0309 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
030a 0000 0000  |    |		.BLANK	0000[0x6]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0317       |    |		.CONST	0x0317								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0002       |    |		.CONST	0x0002								; Number of locals
0313			INIT_0310:
0313 e004       |    |		Load	0x0,0x4
0314 0322       | "  |		Declare_Variable	Record
0315 00d8       |    |		Load_Top	At_Offset_0
0316 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0317			BODY_0310:
0317 00db       |    |		Load_Top	At_Offset_3
0318 8022       | "  |		Call	0x0,0x22
0319 7012       |p   |		Jump_Nonzero	0x32c
031a 00db       |    |		Load_Top	At_Offset_3
031b 8012       |    |		Call	0x0,0x12
031c 00d9       |    |		Load_Top	At_Offset_1
031d 017d       | }  |		Execute	Record,Structure_Write
031e 4801       |H   |		Short_Literal	0x1
031f e226       | &  |		Load	0x1,0x26
0320 00da       |    |		Load_Top	At_Offset_2
0321 801b       |    |		Call	0x0,0x1b
0322 801c       |    |		Call	0x0,0x1c
0323 6806       |h   |		Jump_Zero	0x32a
0324 4801       |H   |		Short_Literal	0x1
0325 e5fe       |    |		Load	0x2,-0x2
0326 00da       |    |		Load_Top	At_Offset_2
0327 8021       | !  |		Call	0x0,0x21
0328 801c       |    |		Call	0x0,0x1c
0329 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
032a 4800       |H   |		Short_Literal	0x0
032b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
032c 4800       |H   |		Short_Literal	0x0
032d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
032e 0000 0000  |    |		.XXX[0x2]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0333       | 3  |		.CONST	0x0333								; Address of begin
0331 0004       |    |		.CONST	0x0004								; Address of exception handler
0332 0001       |    |		.CONST	0x0001								; Number of locals
0333			BODY_0330:
0333			INIT_0330:
0333 00db       |    |		Load_Top	At_Offset_3
0334 00d8       |    |		Load_Top	At_Offset_0
0335 e01d       |    |		Load	0x0,0x1d
0336 0260       | `  |		Execute	Discrete,In_Type
0337 7001       |p   |		Jump_Nonzero	0x339
0338 0801       |    |		Execute_Immediate	Raise,0x1
0339 00db       |    |		Load_Top	At_Offset_3
033a 8012       |    |		Call	0x0,0x12
033b 8013       |    |		Call	0x0,0x13
033c 8014       |    |		Call	0x0,0x14
033d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
033e 0000 0000  |    |		.XXX[0x2]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0364       | d  |		.CONST	0x0364								; Address of begin
0341 0004       |    |		.CONST	0x0004								; Address of exception handler
0342 0016       |    |		.CONST	0x0016								; Number of locals
0343			INIT_0340:
0343 029a 036b  |   k|		Declare_Subprogram	INIT_0368,For_Outer_Call,Visible,Unelaborated
0345 029a 039b  |    |		Declare_Subprogram	INIT_0398,For_Outer_Call,Visible,Unelaborated
0347 029a 03a3  |    |		Declare_Subprogram	INIT_03a0,For_Outer_Call,Visible,Unelaborated
0349 029a 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Outer_Call,Visible,Unelaborated
034b 029a 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call,Visible,Unelaborated
034d 029a 0403  |    |		Declare_Subprogram	INIT_0400,For_Outer_Call,Visible,Unelaborated
034f 00bf       |    |		Action	Accept_Activation
0350 0092 0ae1  |    |		Action	Push_String_Extended,0xae1					; "Spy_Publication"
0352 0092 0ae2  |    |		Action	Push_String_Extended,0xae2					; "Spy_UnPublication"
0354 0092 0adf  |    |		Action	Push_String_Extended,0xadf					; "behavior_id"
0356 0092 0ae3  |    |		Action	Push_String_Extended,0xae3					; "spy_Id"
0358 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0359 00c7       |    |		Action	Elaborate_Subprogram
035a 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
035b 00c7       |    |		Action	Elaborate_Subprogram
035c 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
035d 00c7       |    |		Action	Elaborate_Subprogram
035e 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
035f 00c7       |    |		Action	Elaborate_Subprogram
0360 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0361 00c7       |    |		Action	Elaborate_Subprogram
0362 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0363 00c7       |    |		Action	Elaborate_Subprogram
0364			BODY_0340:
0364 00bc       |    |		Action	Signal_Activated
0365 00bb       |    |		Action	Signal_Completion
0366 0000 0000  |    |		.XXX[0x2]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 0373       | s  |		.CONST	0x0373								; Address of begin
0369 0004       |    |		.CONST	0x0004								; Address of exception handler
036a 0003       |    |		.CONST	0x0003								; Number of locals
036b			INIT_0368:
036b e001       |    |		Load	0x0,0x1
036c 0322       | "  |		Declare_Variable	Record
036d 00d8       |    |		Load_Top	At_Offset_0
036e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
036f e002       |    |		Load	0x0,0x2
0370 0322       | "  |		Declare_Variable	Record
0371 00d8       |    |		Load_Top	At_Offset_0
0372 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0373			BODY_0368:
0373 00d9       |    |		Load_Top	At_Offset_1
0374 e5fc       |    |		Load	0x2,-0x4
0375 00e0       |    |		Load_Encached	Standard_Cache
0376 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0377 4800       |H   |		Short_Literal	0x0
0378 00ea       |    |		Load_Encached	Null_String_Cache
0379 e216       |    |		Load	0x1,0x16
037a e5fd       |    |		Load	0x2,-0x3
037b 00e0       |    |		Load_Encached	Standard_Cache
037c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
037d 4800       |H   |		Short_Literal	0x0
037e 00ea       |    |		Load_Encached	Null_String_Cache
037f e215       |    |		Load	0x1,0x15
0380 8003       |    |		Call	0x0,0x3
0381 00d1       |    |		Pop_Control	Pop_Count_1
0382 00d8       |    |		Load_Top	At_Offset_0
0383 00da       |    |		Load_Top	At_Offset_2
0384 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
0386 e213       |    |		Load	0x1,0x13
0387 8004       |    |		Call	0x0,0x4
0388 00d1       |    |		Pop_Control	Pop_Count_1
0389 00d8       |    |		Load_Top	At_Offset_0
038a e005       |    |		Load	0x0,0x5
038b e006       |    |		Load	0x0,0x6
038c e5fe       |    |		Load	0x2,-0x2
038d e5ff       |    |		Load	0x2,-0x1
038e 4800       |H   |		Short_Literal	0x0
038f 8007       |    |		Call	0x0,0x7
0390 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0391 0000 0000  |    |		.BLANK	0000[0x7]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039b       |    |		.CONST	0x039b								; Address of begin
0399 0004       |    |		.CONST	0x0004								; Address of exception handler
039a 0001       |    |		.CONST	0x0001								; Number of locals
039b			BODY_0398:
039b			INIT_0398:
039b e213       |    |		Load	0x1,0x13
039c 00db       |    |		Load_Top	At_Offset_3
039d 8008       |    |		Call	0x0,0x8
039e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
039f 0000       |    |		.XXX[0x1]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3       |    |		.CONST	0x03a3								; Address of begin
03a1 03b0       |    |		.CONST	0x03b0								; Address of exception handler
03a2 0001       |    |		.CONST	0x0001								; Number of locals
03a3			BODY_03a0:
03a3			INIT_03a0:
03a3 4801       |H   |		Short_Literal	0x1
03a4 00db       |    |		Load_Top	At_Offset_3
03a5 8009       |    |		Call	0x0,0x9
03a6 800a       |    |		Call	0x0,0xa
03a7 00e2       |    |		Load_Encached	Integer_Cache
03a8 00e0       |    |		Load_Encached	Standard_Cache
03a9 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
03aa 00d8       |    |		Load_Top	At_Offset_0
03ab 00e3       |    |		Load_Encached	Natural_Cache
03ac 0260       | `  |		Execute	Discrete,In_Type
03ad 7001       |p   |		Jump_Nonzero	0x3af
03ae 0801       |    |		Execute_Immediate	Raise,0x1
03af 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03b0			TRAP_03a0:
03b0 0007       |    |		Action	Break_Optional
03b1 e00b       |    |		Load	0x0,0xb
03b2 0257       | W  |		Execute	Discrete,Raise
03b3 0000 0000  |    |		.BLANK	0000[0x5]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb       |    |		.CONST	0x03bb								; Address of begin
03b9 03c8       |    |		.CONST	0x03c8								; Address of exception handler
03ba 0001       |    |		.CONST	0x0001								; Number of locals
03bb			BODY_03b8:
03bb			INIT_03b8:
03bb 4802       |H   |		Short_Literal	0x2
03bc 00db       |    |		Load_Top	At_Offset_3
03bd 8009       |    |		Call	0x0,0x9
03be 800a       |    |		Call	0x0,0xa
03bf 00e2       |    |		Load_Encached	Integer_Cache
03c0 00e0       |    |		Load_Encached	Standard_Cache
03c1 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
03c2 00d8       |    |		Load_Top	At_Offset_0
03c3 00e3       |    |		Load_Encached	Natural_Cache
03c4 0260       | `  |		Execute	Discrete,In_Type
03c5 7001       |p   |		Jump_Nonzero	0x3c7
03c6 0801       |    |		Execute_Immediate	Raise,0x1
03c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03c8			TRAP_03b8:
03c8 0007       |    |		Action	Break_Optional
03c9 e00b       |    |		Load	0x0,0xb
03ca 0257       | W  |		Execute	Discrete,Raise
03cb 0000 0000  |    |		.BLANK	0000[0x5]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03db       |    |		.CONST	0x03db								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0003       |    |		.CONST	0x0003								; Number of locals
03d3			INIT_03d0:
03d3 e001       |    |		Load	0x0,0x1
03d4 0322       | "  |		Declare_Variable	Record
03d5 00d8       |    |		Load_Top	At_Offset_0
03d6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03d7 e002       |    |		Load	0x0,0x2
03d8 0322       | "  |		Declare_Variable	Record
03d9 00d8       |    |		Load_Top	At_Offset_0
03da 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03db			BODY_03d0:
03db 00d9       |    |		Load_Top	At_Offset_1
03dc e5fc       |    |		Load	0x2,-0x4
03dd 00e0       |    |		Load_Encached	Standard_Cache
03de 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03df 4800       |H   |		Short_Literal	0x0
03e0 00ea       |    |		Load_Encached	Null_String_Cache
03e1 e216       |    |		Load	0x1,0x16
03e2 e5fd       |    |		Load	0x2,-0x3
03e3 00e0       |    |		Load_Encached	Standard_Cache
03e4 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03e5 4800       |H   |		Short_Literal	0x0
03e6 00ea       |    |		Load_Encached	Null_String_Cache
03e7 e215       |    |		Load	0x1,0x15
03e8 8003       |    |		Call	0x0,0x3
03e9 00d1       |    |		Pop_Control	Pop_Count_1
03ea 00d8       |    |		Load_Top	At_Offset_0
03eb 00da       |    |		Load_Top	At_Offset_2
03ec 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
03ee e214       |    |		Load	0x1,0x14
03ef 8004       |    |		Call	0x0,0x4
03f0 00d1       |    |		Pop_Control	Pop_Count_1
03f1 00d8       |    |		Load_Top	At_Offset_0
03f2 e005       |    |		Load	0x0,0x5
03f3 e006       |    |		Load	0x0,0x6
03f4 e5fe       |    |		Load	0x2,-0x2
03f5 e5ff       |    |		Load	0x2,-0x1
03f6 4800       |H   |		Short_Literal	0x0
03f7 8007       |    |		Call	0x0,0x7
03f8 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
03f9 0000 0000  |    |		.BLANK	0000[0x7]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403       |    |		.CONST	0x0403								; Address of begin
0401 0004       |    |		.CONST	0x0004								; Address of exception handler
0402 0001       |    |		.CONST	0x0001								; Number of locals
0403			BODY_0400:
0403			INIT_0400:
0403 e214       |    |		Load	0x1,0x14
0404 00db       |    |		Load_Top	At_Offset_3
0405 8008       |    |		Call	0x0,0x8
0406 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0407 0000       |    |		.XXX[0x1]
0408 ; --------------------------------------------------------------------------------------
0408 ; SUBPROGRAM
0408 ; --------------------------------------------------------------------------------------
0408 0432       | 2  |		.CONST	0x0432								; Address of begin
0409 0004       |    |		.CONST	0x0004								; Address of exception handler
040a 0018       |    |		.CONST	0x0018								; Number of locals
040b			INIT_0408:
040b 029a 043b  |   ;|		Declare_Subprogram	INIT_0438,For_Outer_Call,Visible,Unelaborated
040d 029a 046b  |   k|		Declare_Subprogram	INIT_0468,For_Outer_Call,Visible,Unelaborated
040f 029a 0473  |   s|		Declare_Subprogram	INIT_0470,For_Outer_Call,Visible,Unelaborated
0411 029a 048b  |    |		Declare_Subprogram	INIT_0488,For_Outer_Call,Visible,Unelaborated
0413 029a 049b  |    |		Declare_Subprogram	INIT_0498,For_Outer_Call,Visible,Unelaborated
0415 029a 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Outer_Call,Visible,Unelaborated
0417 029a 04db  |    |		Declare_Subprogram	INIT_04d8,For_Outer_Call,Visible,Unelaborated
0419 00bf       |    |		Action	Accept_Activation
041a 0092 0ae4  |    |		Action	Push_String_Extended,0xae4					; "Notification_publication"
041c 0092 0ae5  |    |		Action	Push_String_Extended,0xae5					; "Notification_Unpublication"
041e 0092 0ae6  |    |		Action	Push_String_Extended,0xae6					; "Behavior_id"
0420 0092 0ae7  |    |		Action	Push_String_Extended,0xae7					; "Class"
0422 0092 0ae8  |    |		Action	Push_String_Extended,0xae8					; "method"
0424 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0425 00c7       |    |		Action	Elaborate_Subprogram
0426 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0427 00c7       |    |		Action	Elaborate_Subprogram
0428 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0429 00c7       |    |		Action	Elaborate_Subprogram
042a 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
042b 00c7       |    |		Action	Elaborate_Subprogram
042c 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
042d 00c7       |    |		Action	Elaborate_Subprogram
042e 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
042f 00c7       |    |		Action	Elaborate_Subprogram
0430 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0431 00c7       |    |		Action	Elaborate_Subprogram
0432			BODY_0408:
0432 00bc       |    |		Action	Signal_Activated
0433 00bb       |    |		Action	Signal_Completion
0434 0000 0000  |    |		.BLANK	0000[0x4]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 0443       | C  |		.CONST	0x0443								; Address of begin
0439 0004       |    |		.CONST	0x0004								; Address of exception handler
043a 0003       |    |		.CONST	0x0003								; Number of locals
043b			INIT_0438:
043b e001       |    |		Load	0x0,0x1
043c 0322       | "  |		Declare_Variable	Record
043d 00d8       |    |		Load_Top	At_Offset_0
043e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
043f e002       |    |		Load	0x0,0x2
0440 0322       | "  |		Declare_Variable	Record
0441 00d8       |    |		Load_Top	At_Offset_0
0442 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0443			BODY_0438:
0443 00d9       |    |		Load_Top	At_Offset_1
0444 e5fb       |    |		Load	0x2,-0x5
0445 4800       |H   |		Short_Literal	0x0
0446 00ea       |    |		Load_Encached	Null_String_Cache
0447 e218       |    |		Load	0x1,0x18
0448 e5fc       |    |		Load	0x2,-0x4
0449 4800       |H   |		Short_Literal	0x0
044a 00ea       |    |		Load_Encached	Null_String_Cache
044b e217       |    |		Load	0x1,0x17
044c e5fd       |    |		Load	0x2,-0x3
044d 00e0       |    |		Load_Encached	Standard_Cache
044e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
044f 4800       |H   |		Short_Literal	0x0
0450 00ea       |    |		Load_Encached	Null_String_Cache
0451 e216       |    |		Load	0x1,0x16
0452 8003       |    |		Call	0x0,0x3
0453 00d1       |    |		Pop_Control	Pop_Count_1
0454 00d8       |    |		Load_Top	At_Offset_0
0455 00da       |    |		Load_Top	At_Offset_2
0456 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
0458 e214       |    |		Load	0x1,0x14
0459 8004       |    |		Call	0x0,0x4
045a 00d1       |    |		Pop_Control	Pop_Count_1
045b 00d8       |    |		Load_Top	At_Offset_0
045c e005       |    |		Load	0x0,0x5
045d e006       |    |		Load	0x0,0x6
045e e5fe       |    |		Load	0x2,-0x2
045f e5ff       |    |		Load	0x2,-0x1
0460 4800       |H   |		Short_Literal	0x0
0461 8007       |    |		Call	0x0,0x7
0462 4405       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x5
0463 0000 0000  |    |		.BLANK	0000[0x5]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 046b       | k  |		.CONST	0x046b								; Address of begin
0469 0004       |    |		.CONST	0x0004								; Address of exception handler
046a 0001       |    |		.CONST	0x0001								; Number of locals
046b			BODY_0468:
046b			INIT_0468:
046b e214       |    |		Load	0x1,0x14
046c 00db       |    |		Load_Top	At_Offset_3
046d 8008       |    |		Call	0x0,0x8
046e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
046f 0000       |    |		.XXX[0x1]
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0473       | s  |		.CONST	0x0473								; Address of begin
0471 0480       |    |		.CONST	0x0480								; Address of exception handler
0472 0001       |    |		.CONST	0x0001								; Number of locals
0473			BODY_0470:
0473			INIT_0470:
0473 4801       |H   |		Short_Literal	0x1
0474 00db       |    |		Load_Top	At_Offset_3
0475 8009       |    |		Call	0x0,0x9
0476 800a       |    |		Call	0x0,0xa
0477 00e2       |    |		Load_Encached	Integer_Cache
0478 00e0       |    |		Load_Encached	Standard_Cache
0479 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
047a 00d8       |    |		Load_Top	At_Offset_0
047b 00e3       |    |		Load_Encached	Natural_Cache
047c 0260       | `  |		Execute	Discrete,In_Type
047d 7001       |p   |		Jump_Nonzero	0x47f
047e 0801       |    |		Execute_Immediate	Raise,0x1
047f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0480			TRAP_0470:
0480 0007       |    |		Action	Break_Optional
0481 e00b       |    |		Load	0x0,0xb
0482 0257       | W  |		Execute	Discrete,Raise
0483 0000 0000  |    |		.BLANK	0000[0x5]
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 048b       |    |		.CONST	0x048b								; Address of begin
0489 0490       |    |		.CONST	0x0490								; Address of exception handler
048a 0001       |    |		.CONST	0x0001								; Number of locals
048b			BODY_0488:
048b			INIT_0488:
048b 4802       |H   |		Short_Literal	0x2
048c 00db       |    |		Load_Top	At_Offset_3
048d 8009       |    |		Call	0x0,0x9
048e 800a       |    |		Call	0x0,0xa
048f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0490			TRAP_0488:
0490 0007       |    |		Action	Break_Optional
0491 e00b       |    |		Load	0x0,0xb
0492 0257       | W  |		Execute	Discrete,Raise
0493 0000 0000  |    |		.BLANK	0000[0x5]
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 049b       |    |		.CONST	0x049b								; Address of begin
0499 04a0       |    |		.CONST	0x04a0								; Address of exception handler
049a 0001       |    |		.CONST	0x0001								; Number of locals
049b			BODY_0498:
049b			INIT_0498:
049b 4803       |H   |		Short_Literal	0x3
049c 00db       |    |		Load_Top	At_Offset_3
049d 8009       |    |		Call	0x0,0x9
049e 800a       |    |		Call	0x0,0xa
049f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04a0			TRAP_0498:
04a0 0007       |    |		Action	Break_Optional
04a1 e00b       |    |		Load	0x0,0xb
04a2 0257       | W  |		Execute	Discrete,Raise
04a3 0000 0000  |    |		.BLANK	0000[0x5]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04b3       |    |		.CONST	0x04b3								; Address of begin
04a9 0004       |    |		.CONST	0x0004								; Address of exception handler
04aa 0003       |    |		.CONST	0x0003								; Number of locals
04ab			INIT_04a8:
04ab e001       |    |		Load	0x0,0x1
04ac 0322       | "  |		Declare_Variable	Record
04ad 00d8       |    |		Load_Top	At_Offset_0
04ae 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04af e002       |    |		Load	0x0,0x2
04b0 0322       | "  |		Declare_Variable	Record
04b1 00d8       |    |		Load_Top	At_Offset_0
04b2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04b3			BODY_04a8:
04b3 00d9       |    |		Load_Top	At_Offset_1
04b4 e5fb       |    |		Load	0x2,-0x5
04b5 4800       |H   |		Short_Literal	0x0
04b6 00ea       |    |		Load_Encached	Null_String_Cache
04b7 e218       |    |		Load	0x1,0x18
04b8 e5fc       |    |		Load	0x2,-0x4
04b9 4800       |H   |		Short_Literal	0x0
04ba 00ea       |    |		Load_Encached	Null_String_Cache
04bb e217       |    |		Load	0x1,0x17
04bc e5fd       |    |		Load	0x2,-0x3
04bd 00e0       |    |		Load_Encached	Standard_Cache
04be 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04bf 4800       |H   |		Short_Literal	0x0
04c0 00ea       |    |		Load_Encached	Null_String_Cache
04c1 e216       |    |		Load	0x1,0x16
04c2 8003       |    |		Call	0x0,0x3
04c3 00d1       |    |		Pop_Control	Pop_Count_1
04c4 00d8       |    |		Load_Top	At_Offset_0
04c5 00da       |    |		Load_Top	At_Offset_2
04c6 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
04c8 e215       |    |		Load	0x1,0x15
04c9 8004       |    |		Call	0x0,0x4
04ca 00d1       |    |		Pop_Control	Pop_Count_1
04cb 00d8       |    |		Load_Top	At_Offset_0
04cc e005       |    |		Load	0x0,0x5
04cd e006       |    |		Load	0x0,0x6
04ce e5fe       |    |		Load	0x2,-0x2
04cf e5ff       |    |		Load	0x2,-0x1
04d0 4800       |H   |		Short_Literal	0x0
04d1 8007       |    |		Call	0x0,0x7
04d2 4405       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x5
04d3 0000 0000  |    |		.BLANK	0000[0x5]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db       |    |		.CONST	0x04db								; Address of begin
04d9 0004       |    |		.CONST	0x0004								; Address of exception handler
04da 0001       |    |		.CONST	0x0001								; Number of locals
04db			BODY_04d8:
04db			INIT_04d8:
04db e215       |    |		Load	0x1,0x15
04dc 00db       |    |		Load_Top	At_Offset_3
04dd 8008       |    |		Call	0x0,0x8
04de 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04df 0000       |    |		.XXX[0x1]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 0504       |    |		.CONST	0x0504								; Address of begin
04e1 0004       |    |		.CONST	0x0004								; Address of exception handler
04e2 0016       |    |		.CONST	0x0016								; Number of locals
04e3			INIT_04e0:
04e3 029a 050b  |    |		Declare_Subprogram	INIT_0508,For_Outer_Call,Visible,Unelaborated
04e5 029a 053b  |   ;|		Declare_Subprogram	INIT_0538,For_Outer_Call,Visible,Unelaborated
04e7 029a 0543  |   C|		Declare_Subprogram	INIT_0540,For_Outer_Call,Visible,Unelaborated
04e9 029a 055b  |   [|		Declare_Subprogram	INIT_0558,For_Outer_Call,Visible,Unelaborated
04eb 029a 0573  |   s|		Declare_Subprogram	INIT_0570,For_Outer_Call,Visible,Unelaborated
04ed 029a 059b  |    |		Declare_Subprogram	INIT_0598,For_Outer_Call,Visible,Unelaborated
04ef 00bf       |    |		Action	Accept_Activation
04f0 0092 0ae9  |    |		Action	Push_String_Extended,0xae9					; "Filter_publication"
04f2 0092 0aea  |    |		Action	Push_String_Extended,0xaea					; "Filter_Unpublication"
04f4 0092 0adf  |    |		Action	Push_String_Extended,0xadf					; "behavior_id"
04f6 0092 0aeb  |    |		Action	Push_String_Extended,0xaeb					; "filter_id"
04f8 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
04f9 00c7       |    |		Action	Elaborate_Subprogram
04fa 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
04fb 00c7       |    |		Action	Elaborate_Subprogram
04fc 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
04fd 00c7       |    |		Action	Elaborate_Subprogram
04fe 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
04ff 00c7       |    |		Action	Elaborate_Subprogram
0500 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0501 00c7       |    |		Action	Elaborate_Subprogram
0502 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0503 00c7       |    |		Action	Elaborate_Subprogram
0504			BODY_04e0:
0504 00bc       |    |		Action	Signal_Activated
0505 00bb       |    |		Action	Signal_Completion
0506 0000 0000  |    |		.XXX[0x2]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 0513       |    |		.CONST	0x0513								; Address of begin
0509 0004       |    |		.CONST	0x0004								; Address of exception handler
050a 0003       |    |		.CONST	0x0003								; Number of locals
050b			INIT_0508:
050b e001       |    |		Load	0x0,0x1
050c 0322       | "  |		Declare_Variable	Record
050d 00d8       |    |		Load_Top	At_Offset_0
050e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
050f e002       |    |		Load	0x0,0x2
0510 0322       | "  |		Declare_Variable	Record
0511 00d8       |    |		Load_Top	At_Offset_0
0512 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0513			BODY_0508:
0513 00d9       |    |		Load_Top	At_Offset_1
0514 e5fc       |    |		Load	0x2,-0x4
0515 00e0       |    |		Load_Encached	Standard_Cache
0516 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0517 4800       |H   |		Short_Literal	0x0
0518 00ea       |    |		Load_Encached	Null_String_Cache
0519 e216       |    |		Load	0x1,0x16
051a e5fd       |    |		Load	0x2,-0x3
051b 00e0       |    |		Load_Encached	Standard_Cache
051c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
051d 4800       |H   |		Short_Literal	0x0
051e 00ea       |    |		Load_Encached	Null_String_Cache
051f e215       |    |		Load	0x1,0x15
0520 8003       |    |		Call	0x0,0x3
0521 00d1       |    |		Pop_Control	Pop_Count_1
0522 00d8       |    |		Load_Top	At_Offset_0
0523 00da       |    |		Load_Top	At_Offset_2
0524 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
0526 e213       |    |		Load	0x1,0x13
0527 8004       |    |		Call	0x0,0x4
0528 00d1       |    |		Pop_Control	Pop_Count_1
0529 00d8       |    |		Load_Top	At_Offset_0
052a e005       |    |		Load	0x0,0x5
052b e006       |    |		Load	0x0,0x6
052c e5fe       |    |		Load	0x2,-0x2
052d e5ff       |    |		Load	0x2,-0x1
052e 4800       |H   |		Short_Literal	0x0
052f 8007       |    |		Call	0x0,0x7
0530 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0531 0000 0000  |    |		.BLANK	0000[0x7]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 053b       | ;  |		.CONST	0x053b								; Address of begin
0539 0004       |    |		.CONST	0x0004								; Address of exception handler
053a 0001       |    |		.CONST	0x0001								; Number of locals
053b			BODY_0538:
053b			INIT_0538:
053b e213       |    |		Load	0x1,0x13
053c 00db       |    |		Load_Top	At_Offset_3
053d 8008       |    |		Call	0x0,0x8
053e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
053f 0000       |    |		.XXX[0x1]
0540 ; --------------------------------------------------------------------------------------
0540 ; SUBPROGRAM
0540 ; --------------------------------------------------------------------------------------
0540 0543       | C  |		.CONST	0x0543								; Address of begin
0541 0550       | P  |		.CONST	0x0550								; Address of exception handler
0542 0001       |    |		.CONST	0x0001								; Number of locals
0543			BODY_0540:
0543			INIT_0540:
0543 4801       |H   |		Short_Literal	0x1
0544 00db       |    |		Load_Top	At_Offset_3
0545 8009       |    |		Call	0x0,0x9
0546 800a       |    |		Call	0x0,0xa
0547 00e2       |    |		Load_Encached	Integer_Cache
0548 00e0       |    |		Load_Encached	Standard_Cache
0549 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
054a 00d8       |    |		Load_Top	At_Offset_0
054b 00e3       |    |		Load_Encached	Natural_Cache
054c 0260       | `  |		Execute	Discrete,In_Type
054d 7001       |p   |		Jump_Nonzero	0x54f
054e 0801       |    |		Execute_Immediate	Raise,0x1
054f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0550			TRAP_0540:
0550 0007       |    |		Action	Break_Optional
0551 e00b       |    |		Load	0x0,0xb
0552 0257       | W  |		Execute	Discrete,Raise
0553 0000 0000  |    |		.BLANK	0000[0x5]
0558 ; --------------------------------------------------------------------------------------
0558 ; SUBPROGRAM
0558 ; --------------------------------------------------------------------------------------
0558 055b       | [  |		.CONST	0x055b								; Address of begin
0559 0568       | h  |		.CONST	0x0568								; Address of exception handler
055a 0001       |    |		.CONST	0x0001								; Number of locals
055b			BODY_0558:
055b			INIT_0558:
055b 4802       |H   |		Short_Literal	0x2
055c 00db       |    |		Load_Top	At_Offset_3
055d 8009       |    |		Call	0x0,0x9
055e 800a       |    |		Call	0x0,0xa
055f 00e2       |    |		Load_Encached	Integer_Cache
0560 00e0       |    |		Load_Encached	Standard_Cache
0561 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0562 00d8       |    |		Load_Top	At_Offset_0
0563 00e3       |    |		Load_Encached	Natural_Cache
0564 0260       | `  |		Execute	Discrete,In_Type
0565 7001       |p   |		Jump_Nonzero	0x567
0566 0801       |    |		Execute_Immediate	Raise,0x1
0567 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0568			TRAP_0558:
0568 0007       |    |		Action	Break_Optional
0569 e00b       |    |		Load	0x0,0xb
056a 0257       | W  |		Execute	Discrete,Raise
056b 0000 0000  |    |		.BLANK	0000[0x5]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 057b       | {  |		.CONST	0x057b								; Address of begin
0571 0004       |    |		.CONST	0x0004								; Address of exception handler
0572 0003       |    |		.CONST	0x0003								; Number of locals
0573			INIT_0570:
0573 e001       |    |		Load	0x0,0x1
0574 0322       | "  |		Declare_Variable	Record
0575 00d8       |    |		Load_Top	At_Offset_0
0576 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0577 e002       |    |		Load	0x0,0x2
0578 0322       | "  |		Declare_Variable	Record
0579 00d8       |    |		Load_Top	At_Offset_0
057a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
057b			BODY_0570:
057b 00d9       |    |		Load_Top	At_Offset_1
057c e5fd       |    |		Load	0x2,-0x3
057d 00e0       |    |		Load_Encached	Standard_Cache
057e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
057f 4800       |H   |		Short_Literal	0x0
0580 00ea       |    |		Load_Encached	Null_String_Cache
0581 e215       |    |		Load	0x1,0x15
0582 800c       |    |		Call	0x0,0xc
0583 00d1       |    |		Pop_Control	Pop_Count_1
0584 00d8       |    |		Load_Top	At_Offset_0
0585 00da       |    |		Load_Top	At_Offset_2
0586 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
0588 e214       |    |		Load	0x1,0x14
0589 8004       |    |		Call	0x0,0x4
058a 00d1       |    |		Pop_Control	Pop_Count_1
058b 00d8       |    |		Load_Top	At_Offset_0
058c e005       |    |		Load	0x0,0x5
058d e006       |    |		Load	0x0,0x6
058e e5fe       |    |		Load	0x2,-0x2
058f e5ff       |    |		Load	0x2,-0x1
0590 4800       |H   |		Short_Literal	0x0
0591 8007       |    |		Call	0x0,0x7
0592 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0593 0000 0000  |    |		.BLANK	0000[0x5]
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 059b       |    |		.CONST	0x059b								; Address of begin
0599 0004       |    |		.CONST	0x0004								; Address of exception handler
059a 0001       |    |		.CONST	0x0001								; Number of locals
059b			BODY_0598:
059b			INIT_0598:
059b e214       |    |		Load	0x1,0x14
059c 00db       |    |		Load_Top	At_Offset_3
059d 8008       |    |		Call	0x0,0x8
059e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
059f 0000       |    |		.XXX[0x1]
05a0 ; --------------------------------------------------------------------------------------
05a0 ; SUBPROGRAM
05a0 ; --------------------------------------------------------------------------------------
05a0 05c4       |    |		.CONST	0x05c4								; Address of begin
05a1 0004       |    |		.CONST	0x0004								; Address of exception handler
05a2 0016       |    |		.CONST	0x0016								; Number of locals
05a3			INIT_05a0:
05a3 029a 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call,Visible,Unelaborated
05a5 029a 05f3  |    |		Declare_Subprogram	INIT_05f0,For_Outer_Call,Visible,Unelaborated
05a7 029a 05fb  |    |		Declare_Subprogram	INIT_05f8,For_Outer_Call,Visible,Unelaborated
05a9 029a 0613  |    |		Declare_Subprogram	INIT_0610,For_Outer_Call,Visible,Unelaborated
05ab 029a 0623  |   #|		Declare_Subprogram	INIT_0620,For_Outer_Call,Visible,Unelaborated
05ad 029a 064b  |   K|		Declare_Subprogram	INIT_0648,For_Outer_Call,Visible,Unelaborated
05af 00bf       |    |		Action	Accept_Activation
05b0 0092 0aec  |    |		Action	Push_String_Extended,0xaec					; "Class_Publication"
05b2 0092 0aed  |    |		Action	Push_String_Extended,0xaed					; "Class_UnPublication"
05b4 0092 0ae6  |    |		Action	Push_String_Extended,0xae6					; "Behavior_id"
05b6 0092 0aee  |    |		Action	Push_String_Extended,0xaee					; "Behavior_class"
05b8 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
05b9 00c7       |    |		Action	Elaborate_Subprogram
05ba 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
05bb 00c7       |    |		Action	Elaborate_Subprogram
05bc 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
05bd 00c7       |    |		Action	Elaborate_Subprogram
05be 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
05bf 00c7       |    |		Action	Elaborate_Subprogram
05c0 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
05c1 00c7       |    |		Action	Elaborate_Subprogram
05c2 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
05c3 00c7       |    |		Action	Elaborate_Subprogram
05c4			BODY_05a0:
05c4 00bc       |    |		Action	Signal_Activated
05c5 00bb       |    |		Action	Signal_Completion
05c6 0000 0000  |    |		.XXX[0x2]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05d3       |    |		.CONST	0x05d3								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0003       |    |		.CONST	0x0003								; Number of locals
05cb			INIT_05c8:
05cb e001       |    |		Load	0x0,0x1
05cc 0322       | "  |		Declare_Variable	Record
05cd 00d8       |    |		Load_Top	At_Offset_0
05ce 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05cf e002       |    |		Load	0x0,0x2
05d0 0322       | "  |		Declare_Variable	Record
05d1 00d8       |    |		Load_Top	At_Offset_0
05d2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05d3			BODY_05c8:
05d3 00d9       |    |		Load_Top	At_Offset_1
05d4 e5fc       |    |		Load	0x2,-0x4
05d5 4800       |H   |		Short_Literal	0x0
05d6 00ea       |    |		Load_Encached	Null_String_Cache
05d7 e216       |    |		Load	0x1,0x16
05d8 e5fd       |    |		Load	0x2,-0x3
05d9 00e0       |    |		Load_Encached	Standard_Cache
05da 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
05db 4800       |H   |		Short_Literal	0x0
05dc 00ea       |    |		Load_Encached	Null_String_Cache
05dd e215       |    |		Load	0x1,0x15
05de 8003       |    |		Call	0x0,0x3
05df 00d1       |    |		Pop_Control	Pop_Count_1
05e0 00d8       |    |		Load_Top	At_Offset_0
05e1 00da       |    |		Load_Top	At_Offset_2
05e2 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
05e4 e213       |    |		Load	0x1,0x13
05e5 8004       |    |		Call	0x0,0x4
05e6 00d1       |    |		Pop_Control	Pop_Count_1
05e7 00d8       |    |		Load_Top	At_Offset_0
05e8 e005       |    |		Load	0x0,0x5
05e9 e006       |    |		Load	0x0,0x6
05ea e5fe       |    |		Load	0x2,-0x2
05eb e5ff       |    |		Load	0x2,-0x1
05ec 4800       |H   |		Short_Literal	0x0
05ed 8007       |    |		Call	0x0,0x7
05ee 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
05ef 0000       |    |		.XXX[0x1]
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05f3       |    |		.CONST	0x05f3								; Address of begin
05f1 0004       |    |		.CONST	0x0004								; Address of exception handler
05f2 0001       |    |		.CONST	0x0001								; Number of locals
05f3			BODY_05f0:
05f3			INIT_05f0:
05f3 e213       |    |		Load	0x1,0x13
05f4 00db       |    |		Load_Top	At_Offset_3
05f5 8008       |    |		Call	0x0,0x8
05f6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05f7 0000       |    |		.XXX[0x1]
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 05fb       |    |		.CONST	0x05fb								; Address of begin
05f9 0608       |    |		.CONST	0x0608								; Address of exception handler
05fa 0001       |    |		.CONST	0x0001								; Number of locals
05fb			BODY_05f8:
05fb			INIT_05f8:
05fb 4801       |H   |		Short_Literal	0x1
05fc 00db       |    |		Load_Top	At_Offset_3
05fd 8009       |    |		Call	0x0,0x9
05fe 800a       |    |		Call	0x0,0xa
05ff 00e2       |    |		Load_Encached	Integer_Cache
0600 00e0       |    |		Load_Encached	Standard_Cache
0601 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0602 00d8       |    |		Load_Top	At_Offset_0
0603 00e3       |    |		Load_Encached	Natural_Cache
0604 0260       | `  |		Execute	Discrete,In_Type
0605 7001       |p   |		Jump_Nonzero	0x607
0606 0801       |    |		Execute_Immediate	Raise,0x1
0607 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0608			TRAP_05f8:
0608 0007       |    |		Action	Break_Optional
0609 e00b       |    |		Load	0x0,0xb
060a 0257       | W  |		Execute	Discrete,Raise
060b 0000 0000  |    |		.BLANK	0000[0x5]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0613       |    |		.CONST	0x0613								; Address of begin
0611 0618       |    |		.CONST	0x0618								; Address of exception handler
0612 0001       |    |		.CONST	0x0001								; Number of locals
0613			BODY_0610:
0613			INIT_0610:
0613 4802       |H   |		Short_Literal	0x2
0614 00db       |    |		Load_Top	At_Offset_3
0615 8009       |    |		Call	0x0,0x9
0616 800a       |    |		Call	0x0,0xa
0617 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0618			TRAP_0610:
0618 0007       |    |		Action	Break_Optional
0619 e00b       |    |		Load	0x0,0xb
061a 0257       | W  |		Execute	Discrete,Raise
061b 0000 0000  |    |		.BLANK	0000[0x5]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 062b       | +  |		.CONST	0x062b								; Address of begin
0621 0004       |    |		.CONST	0x0004								; Address of exception handler
0622 0003       |    |		.CONST	0x0003								; Number of locals
0623			INIT_0620:
0623 e001       |    |		Load	0x0,0x1
0624 0322       | "  |		Declare_Variable	Record
0625 00d8       |    |		Load_Top	At_Offset_0
0626 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0627 e002       |    |		Load	0x0,0x2
0628 0322       | "  |		Declare_Variable	Record
0629 00d8       |    |		Load_Top	At_Offset_0
062a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
062b			BODY_0620:
062b 00d9       |    |		Load_Top	At_Offset_1
062c e5fc       |    |		Load	0x2,-0x4
062d 4800       |H   |		Short_Literal	0x0
062e 00ea       |    |		Load_Encached	Null_String_Cache
062f e216       |    |		Load	0x1,0x16
0630 e5fd       |    |		Load	0x2,-0x3
0631 00e0       |    |		Load_Encached	Standard_Cache
0632 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0633 4800       |H   |		Short_Literal	0x0
0634 00ea       |    |		Load_Encached	Null_String_Cache
0635 e215       |    |		Load	0x1,0x15
0636 8003       |    |		Call	0x0,0x3
0637 00d1       |    |		Pop_Control	Pop_Count_1
0638 00d8       |    |		Load_Top	At_Offset_0
0639 00da       |    |		Load_Top	At_Offset_2
063a 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
063c e214       |    |		Load	0x1,0x14
063d 8004       |    |		Call	0x0,0x4
063e 00d1       |    |		Pop_Control	Pop_Count_1
063f 00d8       |    |		Load_Top	At_Offset_0
0640 e005       |    |		Load	0x0,0x5
0641 e006       |    |		Load	0x0,0x6
0642 e5fe       |    |		Load	0x2,-0x2
0643 e5ff       |    |		Load	0x2,-0x1
0644 4800       |H   |		Short_Literal	0x0
0645 8007       |    |		Call	0x0,0x7
0646 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0647 0000       |    |		.XXX[0x1]
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064b       | K  |		.CONST	0x064b								; Address of begin
0649 0004       |    |		.CONST	0x0004								; Address of exception handler
064a 0001       |    |		.CONST	0x0001								; Number of locals
064b			BODY_0648:
064b			INIT_0648:
064b e214       |    |		Load	0x1,0x14
064c 00db       |    |		Load_Top	At_Offset_3
064d 8008       |    |		Call	0x0,0x8
064e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
064f 0000       |    |		.XXX[0x1]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0680       |    |		.CONST	0x0680								; Address of begin
0651 0004       |    |		.CONST	0x0004								; Address of exception handler
0652 0019       |    |		.CONST	0x0019								; Number of locals
0653			INIT_0650:
0653 029a 068b  |    |		Declare_Subprogram	INIT_0688,For_Outer_Call,Visible,Unelaborated
0655 029a 06bb  |    |		Declare_Subprogram	INIT_06b8,For_Outer_Call,Visible,Unelaborated
0657 029a 06c3  |    |		Declare_Subprogram	INIT_06c0,For_Outer_Call,Visible,Unelaborated
0659 029a 06db  |    |		Declare_Subprogram	INIT_06d8,For_Outer_Call,Visible,Unelaborated
065b 029a 06eb  |    |		Declare_Subprogram	INIT_06e8,For_Outer_Call,Visible,Unelaborated
065d 029a 06fb  |    |		Declare_Subprogram	INIT_06f8,For_Outer_Call,Visible,Unelaborated
065f 029a 070b  |    |		Declare_Subprogram	INIT_0708,For_Outer_Call,Visible,Unelaborated
0661 029a 071b  |    |		Declare_Subprogram	INIT_0718,For_Outer_Call,Visible,Unelaborated
0663 029a 074b  |   K|		Declare_Subprogram	INIT_0748,For_Outer_Call,Visible,Unelaborated
0665 00bf       |    |		Action	Accept_Activation
0666 0092 0aef  |    |		Action	Push_String_Extended,0xaef					; "Class_Attribut_publication"
0668 0092 0af0  |    |		Action	Push_String_Extended,0xaf0					; "Class_Attribut_unpublication"
066a 0092 0adf  |    |		Action	Push_String_Extended,0xadf					; "behavior_id"
066c 0092 0ae0  |    |		Action	Push_String_Extended,0xae0					; "behavior_class"
066e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
066f 00c7       |    |		Action	Elaborate_Subprogram
0670 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0671 00c7       |    |		Action	Elaborate_Subprogram
0672 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0673 00c7       |    |		Action	Elaborate_Subprogram
0674 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0675 00c7       |    |		Action	Elaborate_Subprogram
0676 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0677 00c7       |    |		Action	Elaborate_Subprogram
0678 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0679 00c7       |    |		Action	Elaborate_Subprogram
067a 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
067b 00c7       |    |		Action	Elaborate_Subprogram
067c 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
067d 00c7       |    |		Action	Elaborate_Subprogram
067e 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
067f 00c7       |    |		Action	Elaborate_Subprogram
0680			BODY_0650:
0680 00bc       |    |		Action	Signal_Activated
0681 00bb       |    |		Action	Signal_Completion
0682 0000 0000  |    |		.BLANK	0000[0x6]
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 0693       |    |		.CONST	0x0693								; Address of begin
0689 0004       |    |		.CONST	0x0004								; Address of exception handler
068a 0003       |    |		.CONST	0x0003								; Number of locals
068b			INIT_0688:
068b e001       |    |		Load	0x0,0x1
068c 0322       | "  |		Declare_Variable	Record
068d 00d8       |    |		Load_Top	At_Offset_0
068e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
068f e002       |    |		Load	0x0,0x2
0690 0322       | "  |		Declare_Variable	Record
0691 00d8       |    |		Load_Top	At_Offset_0
0692 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0693			BODY_0688:
0693 00d8       |    |		Load_Top	At_Offset_0
0694 e5f9       |    |		Load	0x2,-0x7
0695 4800       |H   |		Short_Literal	0x0
0696 e5fb       |    |		Load	0x2,-0x5
0697 e5fa       |    |		Load	0x2,-0x6
0698 e5fc       |    |		Load	0x2,-0x4
0699 4800       |H   |		Short_Literal	0x0
069a 00ea       |    |		Load_Encached	Null_String_Cache
069b e219       |    |		Load	0x1,0x19
069c e5fd       |    |		Load	0x2,-0x3
069d 00e0       |    |		Load_Encached	Standard_Cache
069e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
069f 4800       |H   |		Short_Literal	0x0
06a0 00ea       |    |		Load_Encached	Null_String_Cache
06a1 e218       |    |		Load	0x1,0x18
06a2 8003       |    |		Call	0x0,0x3
06a3 00d1       |    |		Pop_Control	Pop_Count_1
06a4 00d9       |    |		Load_Top	At_Offset_1
06a5 00d9       |    |		Load_Top	At_Offset_1
06a6 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
06a8 e216       |    |		Load	0x1,0x16
06a9 8004       |    |		Call	0x0,0x4
06aa 00d1       |    |		Pop_Control	Pop_Count_1
06ab 00d9       |    |		Load_Top	At_Offset_1
06ac e005       |    |		Load	0x0,0x5
06ad e006       |    |		Load	0x0,0x6
06ae e5fe       |    |		Load	0x2,-0x2
06af e5ff       |    |		Load	0x2,-0x1
06b0 4800       |H   |		Short_Literal	0x0
06b1 8007       |    |		Call	0x0,0x7
06b2 4407       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x7
06b3 0000 0000  |    |		.BLANK	0000[0x5]
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06bb       |    |		.CONST	0x06bb								; Address of begin
06b9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ba 0001       |    |		.CONST	0x0001								; Number of locals
06bb			BODY_06b8:
06bb			INIT_06b8:
06bb e216       |    |		Load	0x1,0x16
06bc 00db       |    |		Load_Top	At_Offset_3
06bd 8008       |    |		Call	0x0,0x8
06be 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06bf 0000       |    |		.XXX[0x1]
06c0 ; --------------------------------------------------------------------------------------
06c0 ; SUBPROGRAM
06c0 ; --------------------------------------------------------------------------------------
06c0 06c3       |    |		.CONST	0x06c3								; Address of begin
06c1 06d0       |    |		.CONST	0x06d0								; Address of exception handler
06c2 0001       |    |		.CONST	0x0001								; Number of locals
06c3			BODY_06c0:
06c3			INIT_06c0:
06c3 4801       |H   |		Short_Literal	0x1
06c4 00db       |    |		Load_Top	At_Offset_3
06c5 8009       |    |		Call	0x0,0x9
06c6 800a       |    |		Call	0x0,0xa
06c7 00e2       |    |		Load_Encached	Integer_Cache
06c8 00e0       |    |		Load_Encached	Standard_Cache
06c9 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
06ca 00d8       |    |		Load_Top	At_Offset_0
06cb 00e3       |    |		Load_Encached	Natural_Cache
06cc 0260       | `  |		Execute	Discrete,In_Type
06cd 7001       |p   |		Jump_Nonzero	0x6cf
06ce 0801       |    |		Execute_Immediate	Raise,0x1
06cf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06d0			TRAP_06c0:
06d0 0007       |    |		Action	Break_Optional
06d1 e00b       |    |		Load	0x0,0xb
06d2 0257       | W  |		Execute	Discrete,Raise
06d3 0000 0000  |    |		.BLANK	0000[0x5]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; SUBPROGRAM
06d8 ; --------------------------------------------------------------------------------------
06d8 06db       |    |		.CONST	0x06db								; Address of begin
06d9 06e0       |    |		.CONST	0x06e0								; Address of exception handler
06da 0001       |    |		.CONST	0x0001								; Number of locals
06db			BODY_06d8:
06db			INIT_06d8:
06db 4802       |H   |		Short_Literal	0x2
06dc 00db       |    |		Load_Top	At_Offset_3
06dd 8009       |    |		Call	0x0,0x9
06de 800a       |    |		Call	0x0,0xa
06df 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06e0			TRAP_06d8:
06e0 0007       |    |		Action	Break_Optional
06e1 e00b       |    |		Load	0x0,0xb
06e2 0257       | W  |		Execute	Discrete,Raise
06e3 0000 0000  |    |		.BLANK	0000[0x5]
06e8 ; --------------------------------------------------------------------------------------
06e8 ; SUBPROGRAM
06e8 ; --------------------------------------------------------------------------------------
06e8 06eb       |    |		.CONST	0x06eb								; Address of begin
06e9 06f0       |    |		.CONST	0x06f0								; Address of exception handler
06ea 0001       |    |		.CONST	0x0001								; Number of locals
06eb			BODY_06e8:
06eb			INIT_06e8:
06eb 4803       |H   |		Short_Literal	0x3
06ec 00db       |    |		Load_Top	At_Offset_3
06ed 8009       |    |		Call	0x0,0x9
06ee 800c       |    |		Call	0x0,0xc
06ef 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06f0			TRAP_06e8:
06f0 0007       |    |		Action	Break_Optional
06f1 e00b       |    |		Load	0x0,0xb
06f2 0257       | W  |		Execute	Discrete,Raise
06f3 0000 0000  |    |		.BLANK	0000[0x5]
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 06fb       |    |		.CONST	0x06fb								; Address of begin
06f9 0700       |    |		.CONST	0x0700								; Address of exception handler
06fa 0001       |    |		.CONST	0x0001								; Number of locals
06fb			BODY_06f8:
06fb			INIT_06f8:
06fb 4803       |H   |		Short_Literal	0x3
06fc 00db       |    |		Load_Top	At_Offset_3
06fd 8009       |    |		Call	0x0,0x9
06fe 800d       |    |		Call	0x0,0xd
06ff 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0700			TRAP_06f8:
0700 0007       |    |		Action	Break_Optional
0701 e00b       |    |		Load	0x0,0xb
0702 0257       | W  |		Execute	Discrete,Raise
0703 0000 0000  |    |		.BLANK	0000[0x5]
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 070b       |    |		.CONST	0x070b								; Address of begin
0709 0710       |    |		.CONST	0x0710								; Address of exception handler
070a 0001       |    |		.CONST	0x0001								; Number of locals
070b			BODY_0708:
070b			INIT_0708:
070b 4803       |H   |		Short_Literal	0x3
070c 00db       |    |		Load_Top	At_Offset_3
070d 8009       |    |		Call	0x0,0x9
070e 800a       |    |		Call	0x0,0xa
070f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0710			TRAP_0708:
0710 0007       |    |		Action	Break_Optional
0711 e00b       |    |		Load	0x0,0xb
0712 0257       | W  |		Execute	Discrete,Raise
0713 0000 0000  |    |		.BLANK	0000[0x5]
0718 ; --------------------------------------------------------------------------------------
0718 ; SUBPROGRAM
0718 ; --------------------------------------------------------------------------------------
0718 0723       | #  |		.CONST	0x0723								; Address of begin
0719 0004       |    |		.CONST	0x0004								; Address of exception handler
071a 0003       |    |		.CONST	0x0003								; Number of locals
071b			INIT_0718:
071b e002       |    |		Load	0x0,0x2
071c 0322       | "  |		Declare_Variable	Record
071d 00d8       |    |		Load_Top	At_Offset_0
071e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
071f e001       |    |		Load	0x0,0x1
0720 0322       | "  |		Declare_Variable	Record
0721 00d8       |    |		Load_Top	At_Offset_0
0722 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0723			BODY_0718:
0723 00d9       |    |		Load_Top	At_Offset_1
0724 00ea       |    |		Load_Encached	Null_String_Cache
0725 4800       |H   |		Short_Literal	0x0
0726 e5fa       |    |		Load	0x2,-0x6
0727 e5fb       |    |		Load	0x2,-0x5
0728 e5fc       |    |		Load	0x2,-0x4
0729 4800       |H   |		Short_Literal	0x0
072a 00ea       |    |		Load_Encached	Null_String_Cache
072b e219       |    |		Load	0x1,0x19
072c e5fd       |    |		Load	0x2,-0x3
072d 00e0       |    |		Load_Encached	Standard_Cache
072e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
072f 4800       |H   |		Short_Literal	0x0
0730 00ea       |    |		Load_Encached	Null_String_Cache
0731 e218       |    |		Load	0x1,0x18
0732 8003       |    |		Call	0x0,0x3
0733 00d1       |    |		Pop_Control	Pop_Count_1
0734 00d8       |    |		Load_Top	At_Offset_0
0735 00da       |    |		Load_Top	At_Offset_2
0736 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
0738 e217       |    |		Load	0x1,0x17
0739 8004       |    |		Call	0x0,0x4
073a 00d1       |    |		Pop_Control	Pop_Count_1
073b 00d8       |    |		Load_Top	At_Offset_0
073c e005       |    |		Load	0x0,0x5
073d e006       |    |		Load	0x0,0x6
073e e5fe       |    |		Load	0x2,-0x2
073f e5ff       |    |		Load	0x2,-0x1
0740 4800       |H   |		Short_Literal	0x0
0741 8007       |    |		Call	0x0,0x7
0742 4406       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x6
0743 0000 0000  |    |		.BLANK	0000[0x5]
0748 ; --------------------------------------------------------------------------------------
0748 ; SUBPROGRAM
0748 ; --------------------------------------------------------------------------------------
0748 074b       | K  |		.CONST	0x074b								; Address of begin
0749 0004       |    |		.CONST	0x0004								; Address of exception handler
074a 0001       |    |		.CONST	0x0001								; Number of locals
074b			BODY_0748:
074b			INIT_0748:
074b e217       |    |		Load	0x1,0x17
074c 00db       |    |		Load_Top	At_Offset_3
074d 8008       |    |		Call	0x0,0x8
074e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
074f 0000       |    |		.XXX[0x1]
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 0788       |    |		.CONST	0x0788								; Address of begin
0751 0004       |    |		.CONST	0x0004								; Address of exception handler
0752 001c       |    |		.CONST	0x001c								; Number of locals
0753			INIT_0750:
0753 029a 0793  |    |		Declare_Subprogram	INIT_0790,For_Outer_Call,Visible,Unelaborated
0755 029a 07d3  |    |		Declare_Subprogram	INIT_07d0,For_Outer_Call,Visible,Unelaborated
0757 029a 07db  |    |		Declare_Subprogram	INIT_07d8,For_Outer_Call,Visible,Unelaborated
0759 029a 07f3  |    |		Declare_Subprogram	INIT_07f0,For_Outer_Call,Visible,Unelaborated
075b 029a 081b  |    |		Declare_Subprogram	INIT_0818,For_Outer_Call,Visible,Unelaborated
075d 029a 0853  |   S|		Declare_Subprogram	INIT_0850,For_Outer_Call,Visible,Unelaborated
075f 029a 088b  |    |		Declare_Subprogram	INIT_0888,For_Outer_Call,Visible,Unelaborated
0761 029a 08c3  |    |		Declare_Subprogram	INIT_08c0,For_Outer_Call,Visible,Unelaborated
0763 029a 08eb  |    |		Declare_Subprogram	INIT_08e8,For_Outer_Call,Visible,Unelaborated
0765 029a 08f3  |    |		Declare_Subprogram	INIT_08f0,For_Outer_Call,Visible,Unelaborated
0767 00bf       |    |		Action	Accept_Activation
0768 0092 0af1  |    |		Action	Push_String_Extended,0xaf1					; "Behavior_publication"
076a 0092 0af2  |    |		Action	Push_String_Extended,0xaf2					; "behavior_Unpublication"
076c 0092 0af3  |    |		Action	Push_String_Extended,0xaf3					; "Socket_id"
076e 0092 0af4  |    |		Action	Push_String_Extended,0xaf4					; "Internet_id"
0770 0092 0adf  |    |		Action	Push_String_Extended,0xadf					; "behavior_id"
0772 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0773 00c7       |    |		Action	Elaborate_Subprogram
0774 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0775 00c7       |    |		Action	Elaborate_Subprogram
0776 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0777 00c7       |    |		Action	Elaborate_Subprogram
0778 029d 090b  |    |		Declare_Subprogram	INIT_0908,For_Outer_Call
077a 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
077b 00c7       |    |		Action	Elaborate_Subprogram
077c 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
077d 00c7       |    |		Action	Elaborate_Subprogram
077e 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
077f 00c7       |    |		Action	Elaborate_Subprogram
0780 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0781 00c7       |    |		Action	Elaborate_Subprogram
0782 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0783 00c7       |    |		Action	Elaborate_Subprogram
0784 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0785 00c7       |    |		Action	Elaborate_Subprogram
0786 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0787 00c7       |    |		Action	Elaborate_Subprogram
0788			BODY_0750:
0788 00bc       |    |		Action	Signal_Activated
0789 00bb       |    |		Action	Signal_Completion
078a 0000 0000  |    |		.BLANK	0000[0x6]
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 079b       |    |		.CONST	0x079b								; Address of begin
0791 0004       |    |		.CONST	0x0004								; Address of exception handler
0792 0003       |    |		.CONST	0x0003								; Number of locals
0793			INIT_0790:
0793 e001       |    |		Load	0x0,0x1
0794 0322       | "  |		Declare_Variable	Record
0795 00d8       |    |		Load_Top	At_Offset_0
0796 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0797 e002       |    |		Load	0x0,0x2
0798 0322       | "  |		Declare_Variable	Record
0799 00d8       |    |		Load_Top	At_Offset_0
079a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
079b			BODY_0790:
079b 00d8       |    |		Load_Top	At_Offset_0
079c 482e       |H.  |		Short_Literal	0x2e
079d 482e       |H.  |		Short_Literal	0x2e
079e 482e       |H.  |		Short_Literal	0x2e
079f e5fd       |    |		Load	0x2,-0x3
07a0 00e0       |    |		Load_Encached	Standard_Cache
07a1 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
07a2 01cb       |    |		Execute	Vector,Append
07a3 e5fc       |    |		Load	0x2,-0x4
07a4 00e0       |    |		Load_Encached	Standard_Cache
07a5 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
07a6 01cc       |    |		Execute	Vector,Catenate
07a7 01cb       |    |		Execute	Vector,Append
07a8 e5fb       |    |		Load	0x2,-0x5
07a9 00e0       |    |		Load_Encached	Standard_Cache
07aa 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
07ab 01cc       |    |		Execute	Vector,Catenate
07ac 01cb       |    |		Execute	Vector,Append
07ad e5fa       |    |		Load	0x2,-0x6
07ae 00e0       |    |		Load_Encached	Standard_Cache
07af 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
07b0 01cc       |    |		Execute	Vector,Catenate
07b1 4800       |H   |		Short_Literal	0x0
07b2 00ea       |    |		Load_Encached	Null_String_Cache
07b3 e21a       |    |		Load	0x1,0x1a
07b4 e5fe       |    |		Load	0x2,-0x2
07b5 00e0       |    |		Load_Encached	Standard_Cache
07b6 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
07b7 4800       |H   |		Short_Literal	0x0
07b8 00ea       |    |		Load_Encached	Null_String_Cache
07b9 e219       |    |		Load	0x1,0x19
07ba 8003       |    |		Call	0x0,0x3
07bb 00d1       |    |		Pop_Control	Pop_Count_1
07bc 00d9       |    |		Load_Top	At_Offset_1
07bd 00d9       |    |		Load_Top	At_Offset_1
07be 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
07c0 e217       |    |		Load	0x1,0x17
07c1 8004       |    |		Call	0x0,0x4
07c2 00d1       |    |		Pop_Control	Pop_Count_1
07c3 00d9       |    |		Load_Top	At_Offset_1
07c4 e005       |    |		Load	0x0,0x5
07c5 e006       |    |		Load	0x0,0x6
07c6 00d8       |    |		Load_Top	At_Offset_0
07c7 e5ff       |    |		Load	0x2,-0x1
07c8 4800       |H   |		Short_Literal	0x0
07c9 8007       |    |		Call	0x0,0x7
07ca 4406       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x6
07cb 0000 0000  |    |		.BLANK	0000[0x5]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07d3       |    |		.CONST	0x07d3								; Address of begin
07d1 0004       |    |		.CONST	0x0004								; Address of exception handler
07d2 0001       |    |		.CONST	0x0001								; Number of locals
07d3			BODY_07d0:
07d3			INIT_07d0:
07d3 e217       |    |		Load	0x1,0x17
07d4 00db       |    |		Load_Top	At_Offset_3
07d5 8008       |    |		Call	0x0,0x8
07d6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07d7 0000       |    |		.XXX[0x1]
07d8 ; --------------------------------------------------------------------------------------
07d8 ; SUBPROGRAM
07d8 ; --------------------------------------------------------------------------------------
07d8 07db       |    |		.CONST	0x07db								; Address of begin
07d9 07e8       |    |		.CONST	0x07e8								; Address of exception handler
07da 0001       |    |		.CONST	0x0001								; Number of locals
07db			BODY_07d8:
07db			INIT_07d8:
07db 4801       |H   |		Short_Literal	0x1
07dc 00db       |    |		Load_Top	At_Offset_3
07dd 8009       |    |		Call	0x0,0x9
07de 800a       |    |		Call	0x0,0xa
07df 00e2       |    |		Load_Encached	Integer_Cache
07e0 00e0       |    |		Load_Encached	Standard_Cache
07e1 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
07e2 00d8       |    |		Load_Top	At_Offset_0
07e3 e00b       |    |		Load	0x0,0xb
07e4 0260       | `  |		Execute	Discrete,In_Type
07e5 7001       |p   |		Jump_Nonzero	0x7e7
07e6 0801       |    |		Execute_Immediate	Raise,0x1
07e7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07e8			TRAP_07d8:
07e8 0007       |    |		Action	Break_Optional
07e9 e00c       |    |		Load	0x0,0xc
07ea 0257       | W  |		Execute	Discrete,Raise
07eb 0000 0000  |    |		.BLANK	0000[0x5]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07f6       |    |		.CONST	0x07f6								; Address of begin
07f1 0810       |    |		.CONST	0x0810								; Address of exception handler
07f2 0003       |    |		.CONST	0x0003								; Number of locals
07f3			INIT_07f0:
07f3 00da       |    |		Load_Top	At_Offset_2
07f4 821c       |    |		Call	0x1,0x1c
07f5 00e3       |    |		Load_Encached	Natural_Cache
07f6			BODY_07f0:
07f6 4801       |H   |		Short_Literal	0x1
07f7 00da       |    |		Load_Top	At_Offset_2
07f8 482e       |H.  |		Short_Literal	0x2e
07f9 800d       |    |		Call	0x0,0xd
07fa 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
07fb 00d8       |    |		Load_Top	At_Offset_0
07fc 7002       |p   |		Jump_Nonzero	0x7ff
07fd e00c       |    |		Load	0x0,0xc
07fe 0257       | W  |		Execute	Discrete,Raise
07ff 00d9       |    |		Load_Top	At_Offset_1
0800 01dd       |    |		Execute	Vector,First
0801 00d9       |    |		Load_Top	At_Offset_1
0802 0aff       |    |		Execute_Immediate	Plus,-0x1
0803 00db       |    |		Load_Top	At_Offset_3
0804 01cf       |    |		Execute	Vector,Slice_Read
0805 00e2       |    |		Load_Encached	Integer_Cache
0806 00e0       |    |		Load_Encached	Standard_Cache
0807 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0808 e00e       |    |		Load	0x0,0xe
0809 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
080a 00d9       |    |		Load_Top	At_Offset_1
080b 00d0       |    |		Action	Swap_Control
080c 0260       | `  |		Execute	Discrete,In_Type
080d 7001       |p   |		Jump_Nonzero	0x80f
080e 0801       |    |		Execute_Immediate	Raise,0x1
080f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0810			TRAP_07f0:
0810 0007       |    |		Action	Break_Optional
0811 e00c       |    |		Load	0x0,0xc
0812 0257       | W  |		Execute	Discrete,Raise
0813 0000 0000  |    |		.BLANK	0000[0x5]
0818 ; --------------------------------------------------------------------------------------
0818 ; SUBPROGRAM
0818 ; --------------------------------------------------------------------------------------
0818 081f       |    |		.CONST	0x081f								; Address of begin
0819 084c       | L  |		.CONST	0x084c								; Address of exception handler
081a 0004       |    |		.CONST	0x0004								; Number of locals
081b			INIT_0818:
081b 00e3       |    |		Load_Encached	Natural_Cache
081c 00db       |    |		Load_Top	At_Offset_3
081d 821c       |    |		Call	0x1,0x1c
081e 00e3       |    |		Load_Encached	Natural_Cache
081f			BODY_0818:
081f 00d9       |    |		Load_Top	At_Offset_1
0820 01dd       |    |		Execute	Vector,First
0821 005b       | [  |		Store_Top	Discrete,At_Offset_3
0822 00cf       |    |		Action	Mark_Auxiliary
0823 4802       |H   |		Short_Literal	0x2
0824 4801       |H   |		Short_Literal	0x1
0825 0007       |    |		Action	Break_Optional
0826 4801       |H   |		Short_Literal	0x1
0827 e402       |    |		Load	0x2,0x2
0828 e403       |    |		Load	0x2,0x3
0829 01dc       |    |		Execute	Vector,Last
082a e403       |    |		Load	0x2,0x3
082b 01cf       |    |		Execute	Vector,Slice_Read
082c 482e       |H.  |		Short_Literal	0x2e
082d 800d       |    |		Call	0x0,0xd
082e a404       |    |		Store_Unchecked	0x2,0x4
082f 00db       |    |		Load_Top	At_Offset_3
0830 7002       |p   |		Jump_Nonzero	0x833
0831 e00c       |    |		Load	0x0,0xc
0832 0257       | W  |		Execute	Discrete,Raise
0833 00d8       |    |		Load_Top	At_Offset_0
0834 0e02       |    |		Execute_Immediate	Not_Equal,0x2
0835 6803       |h   |		Jump_Zero	0x839
0836 00db       |    |		Load_Top	At_Offset_3
0837 0a01       |    |		Execute_Immediate	Plus,0x1
0838 c402       |    |		Store	0x2,0x2
0839 00c8       |    |		Action	Pop_Auxiliary_Range
083a 3feb       |?   |		Loop_Increasing	0x826
083b 00ce       |    |		Action	Pop_Auxiliary
083c 00da       |    |		Load_Top	At_Offset_2
083d 00d9       |    |		Load_Top	At_Offset_1
083e 0aff       |    |		Execute_Immediate	Plus,-0x1
083f 00db       |    |		Load_Top	At_Offset_3
0840 01cf       |    |		Execute	Vector,Slice_Read
0841 00e2       |    |		Load_Encached	Integer_Cache
0842 00e0       |    |		Load_Encached	Standard_Cache
0843 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0844 e00e       |    |		Load	0x0,0xe
0845 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0846 00d9       |    |		Load_Top	At_Offset_1
0847 00d0       |    |		Action	Swap_Control
0848 0260       | `  |		Execute	Discrete,In_Type
0849 7001       |p   |		Jump_Nonzero	0x84b
084a 0801       |    |		Execute_Immediate	Raise,0x1
084b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
084c			TRAP_0818:
084c 0007       |    |		Action	Break_Optional
084d e00c       |    |		Load	0x0,0xc
084e 0257       | W  |		Execute	Discrete,Raise
084f 0000       |    |		.XXX[0x1]
0850 ; --------------------------------------------------------------------------------------
0850 ; SUBPROGRAM
0850 ; --------------------------------------------------------------------------------------
0850 0857       | W  |		.CONST	0x0857								; Address of begin
0851 0884       |    |		.CONST	0x0884								; Address of exception handler
0852 0004       |    |		.CONST	0x0004								; Number of locals
0853			INIT_0850:
0853 00e3       |    |		Load_Encached	Natural_Cache
0854 00db       |    |		Load_Top	At_Offset_3
0855 821c       |    |		Call	0x1,0x1c
0856 00e3       |    |		Load_Encached	Natural_Cache
0857			BODY_0850:
0857 00d9       |    |		Load_Top	At_Offset_1
0858 01dd       |    |		Execute	Vector,First
0859 005b       | [  |		Store_Top	Discrete,At_Offset_3
085a 00cf       |    |		Action	Mark_Auxiliary
085b 4803       |H   |		Short_Literal	0x3
085c 4801       |H   |		Short_Literal	0x1
085d 0007       |    |		Action	Break_Optional
085e 4801       |H   |		Short_Literal	0x1
085f e402       |    |		Load	0x2,0x2
0860 e403       |    |		Load	0x2,0x3
0861 01dc       |    |		Execute	Vector,Last
0862 e403       |    |		Load	0x2,0x3
0863 01cf       |    |		Execute	Vector,Slice_Read
0864 482e       |H.  |		Short_Literal	0x2e
0865 800d       |    |		Call	0x0,0xd
0866 a404       |    |		Store_Unchecked	0x2,0x4
0867 00db       |    |		Load_Top	At_Offset_3
0868 7002       |p   |		Jump_Nonzero	0x86b
0869 e00c       |    |		Load	0x0,0xc
086a 0257       | W  |		Execute	Discrete,Raise
086b 00d8       |    |		Load_Top	At_Offset_0
086c 0e03       |    |		Execute_Immediate	Not_Equal,0x3
086d 6803       |h   |		Jump_Zero	0x871
086e 00db       |    |		Load_Top	At_Offset_3
086f 0a01       |    |		Execute_Immediate	Plus,0x1
0870 c402       |    |		Store	0x2,0x2
0871 00c8       |    |		Action	Pop_Auxiliary_Range
0872 3feb       |?   |		Loop_Increasing	0x85e
0873 00ce       |    |		Action	Pop_Auxiliary
0874 00da       |    |		Load_Top	At_Offset_2
0875 00d9       |    |		Load_Top	At_Offset_1
0876 0aff       |    |		Execute_Immediate	Plus,-0x1
0877 00db       |    |		Load_Top	At_Offset_3
0878 01cf       |    |		Execute	Vector,Slice_Read
0879 00e2       |    |		Load_Encached	Integer_Cache
087a 00e0       |    |		Load_Encached	Standard_Cache
087b 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
087c e00e       |    |		Load	0x0,0xe
087d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
087e 00d9       |    |		Load_Top	At_Offset_1
087f 00d0       |    |		Action	Swap_Control
0880 0260       | `  |		Execute	Discrete,In_Type
0881 7001       |p   |		Jump_Nonzero	0x883
0882 0801       |    |		Execute_Immediate	Raise,0x1
0883 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0884			TRAP_0850:
0884 0007       |    |		Action	Break_Optional
0885 e00c       |    |		Load	0x0,0xc
0886 0257       | W  |		Execute	Discrete,Raise
0887 0000       |    |		.XXX[0x1]
0888 ; --------------------------------------------------------------------------------------
0888 ; SUBPROGRAM
0888 ; --------------------------------------------------------------------------------------
0888 088f       |    |		.CONST	0x088f								; Address of begin
0889 08b9       |    |		.CONST	0x08b9								; Address of exception handler
088a 0004       |    |		.CONST	0x0004								; Number of locals
088b			INIT_0888:
088b 00e3       |    |		Load_Encached	Natural_Cache
088c 00db       |    |		Load_Top	At_Offset_3
088d 821c       |    |		Call	0x1,0x1c
088e 00e3       |    |		Load_Encached	Natural_Cache
088f			BODY_0888:
088f 00d9       |    |		Load_Top	At_Offset_1
0890 01dd       |    |		Execute	Vector,First
0891 005b       | [  |		Store_Top	Discrete,At_Offset_3
0892 00cf       |    |		Action	Mark_Auxiliary
0893 4803       |H   |		Short_Literal	0x3
0894 4801       |H   |		Short_Literal	0x1
0895 0007       |    |		Action	Break_Optional
0896 4801       |H   |		Short_Literal	0x1
0897 e402       |    |		Load	0x2,0x2
0898 e403       |    |		Load	0x2,0x3
0899 01dc       |    |		Execute	Vector,Last
089a e403       |    |		Load	0x2,0x3
089b 01cf       |    |		Execute	Vector,Slice_Read
089c 482e       |H.  |		Short_Literal	0x2e
089d 800d       |    |		Call	0x0,0xd
089e a404       |    |		Store_Unchecked	0x2,0x4
089f 00db       |    |		Load_Top	At_Offset_3
08a0 7002       |p   |		Jump_Nonzero	0x8a3
08a1 e00c       |    |		Load	0x0,0xc
08a2 0257       | W  |		Execute	Discrete,Raise
08a3 00db       |    |		Load_Top	At_Offset_3
08a4 0a01       |    |		Execute_Immediate	Plus,0x1
08a5 c402       |    |		Store	0x2,0x2
08a6 00c8       |    |		Action	Pop_Auxiliary_Range
08a7 3fee       |?   |		Loop_Increasing	0x896
08a8 00ce       |    |		Action	Pop_Auxiliary
08a9 00da       |    |		Load_Top	At_Offset_2
08aa 00da       |    |		Load_Top	At_Offset_2
08ab 01dc       |    |		Execute	Vector,Last
08ac 00db       |    |		Load_Top	At_Offset_3
08ad 01cf       |    |		Execute	Vector,Slice_Read
08ae 00e2       |    |		Load_Encached	Integer_Cache
08af 00e0       |    |		Load_Encached	Standard_Cache
08b0 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
08b1 e00e       |    |		Load	0x0,0xe
08b2 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
08b3 00d9       |    |		Load_Top	At_Offset_1
08b4 00d0       |    |		Action	Swap_Control
08b5 0260       | `  |		Execute	Discrete,In_Type
08b6 7001       |p   |		Jump_Nonzero	0x8b8
08b7 0801       |    |		Execute_Immediate	Raise,0x1
08b8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08b9			TRAP_0888:
08b9 0007       |    |		Action	Break_Optional
08ba e00c       |    |		Load	0x0,0xc
08bb 0257       | W  |		Execute	Discrete,Raise
08bc 0000 0000  |    |		.BLANK	0000[0x4]
08c0 ; --------------------------------------------------------------------------------------
08c0 ; SUBPROGRAM
08c0 ; --------------------------------------------------------------------------------------
08c0 08cb       |    |		.CONST	0x08cb								; Address of begin
08c1 0004       |    |		.CONST	0x0004								; Address of exception handler
08c2 0003       |    |		.CONST	0x0003								; Number of locals
08c3			INIT_08c0:
08c3 e001       |    |		Load	0x0,0x1
08c4 0322       | "  |		Declare_Variable	Record
08c5 00d8       |    |		Load_Top	At_Offset_0
08c6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
08c7 e002       |    |		Load	0x0,0x2
08c8 0322       | "  |		Declare_Variable	Record
08c9 00d8       |    |		Load_Top	At_Offset_0
08ca 1c00       |    |		Execute_Immediate	Run_Utility,0x0
08cb			BODY_08c0:
08cb 00d8       |    |		Load_Top	At_Offset_0
08cc e5fd       |    |		Load	0x2,-0x3
08cd 00e0       |    |		Load_Encached	Standard_Cache
08ce 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
08cf 4800       |H   |		Short_Literal	0x0
08d0 00ea       |    |		Load_Encached	Null_String_Cache
08d1 e21b       |    |		Load	0x1,0x1b
08d2 800f       |    |		Call	0x0,0xf
08d3 00d1       |    |		Pop_Control	Pop_Count_1
08d4 00d9       |    |		Load_Top	At_Offset_1
08d5 00d9       |    |		Load_Top	At_Offset_1
08d6 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
08d8 e218       |    |		Load	0x1,0x18
08d9 8004       |    |		Call	0x0,0x4
08da 00d1       |    |		Pop_Control	Pop_Count_1
08db 00d9       |    |		Load_Top	At_Offset_1
08dc e005       |    |		Load	0x0,0x5
08dd e006       |    |		Load	0x0,0x6
08de e5fe       |    |		Load	0x2,-0x2
08df e5ff       |    |		Load	0x2,-0x1
08e0 4800       |H   |		Short_Literal	0x0
08e1 8007       |    |		Call	0x0,0x7
08e2 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
08e3 0000 0000  |    |		.BLANK	0000[0x5]
08e8 ; --------------------------------------------------------------------------------------
08e8 ; SUBPROGRAM
08e8 ; --------------------------------------------------------------------------------------
08e8 08eb       |    |		.CONST	0x08eb								; Address of begin
08e9 0004       |    |		.CONST	0x0004								; Address of exception handler
08ea 0001       |    |		.CONST	0x0001								; Number of locals
08eb			BODY_08e8:
08eb			INIT_08e8:
08eb e218       |    |		Load	0x1,0x18
08ec 00db       |    |		Load_Top	At_Offset_3
08ed 8008       |    |		Call	0x0,0x8
08ee 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08ef 0000       |    |		.XXX[0x1]
08f0 ; --------------------------------------------------------------------------------------
08f0 ; SUBPROGRAM
08f0 ; --------------------------------------------------------------------------------------
08f0 08f3       |    |		.CONST	0x08f3								; Address of begin
08f1 0900       |    |		.CONST	0x0900								; Address of exception handler
08f2 0001       |    |		.CONST	0x0001								; Number of locals
08f3			BODY_08f0:
08f3			INIT_08f0:
08f3 4801       |H   |		Short_Literal	0x1
08f4 00db       |    |		Load_Top	At_Offset_3
08f5 8009       |    |		Call	0x0,0x9
08f6 800a       |    |		Call	0x0,0xa
08f7 00e2       |    |		Load_Encached	Integer_Cache
08f8 00e0       |    |		Load_Encached	Standard_Cache
08f9 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
08fa 00d8       |    |		Load_Top	At_Offset_0
08fb 00e3       |    |		Load_Encached	Natural_Cache
08fc 0260       | `  |		Execute	Discrete,In_Type
08fd 7001       |p   |		Jump_Nonzero	0x8ff
08fe 0801       |    |		Execute_Immediate	Raise,0x1
08ff 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0900			TRAP_08f0:
0900 0007       |    |		Action	Break_Optional
0901 e00c       |    |		Load	0x0,0xc
0902 0257       | W  |		Execute	Discrete,Raise
0903 0000 0000  |    |		.BLANK	0000[0x5]
0908 ; --------------------------------------------------------------------------------------
0908 ; SUBPROGRAM
0908 ; --------------------------------------------------------------------------------------
0908 090b       |    |		.CONST	0x090b								; Address of begin
0909 0004       |    |		.CONST	0x0004								; Address of exception handler
090a 0001       |    |		.CONST	0x0001								; Number of locals
090b			BODY_0908:
090b			INIT_0908:
090b 4802       |H   |		Short_Literal	0x2
090c 00db       |    |		Load_Top	At_Offset_3
090d 8009       |    |		Call	0x0,0x9
090e 800a       |    |		Call	0x0,0xa
090f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0910 ; --------------------------------------------------------------------------------------
0910 ; SUBPROGRAM
0910 ; --------------------------------------------------------------------------------------
0910 094b       | K  |		.CONST	0x094b								; Address of begin
0911 0004       |    |		.CONST	0x0004								; Address of exception handler
0912 001c       |    |		.CONST	0x001c								; Number of locals
0913			INIT_0910:
0913 4800       |H   |		Short_Literal	0x0
0914 4806       |H   |		Short_Literal	0x6
0915 029f 0953  |   S|		Declare_Subprogram	INIT_0950,For_Call
0917 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0918 029a 097b  |   {|		Declare_Subprogram	INIT_0978,For_Outer_Call,Visible,Unelaborated
091a 029a 09a3  |    |		Declare_Subprogram	INIT_09a0,For_Outer_Call,Visible,Unelaborated
091c 029a 09ab  |    |		Declare_Subprogram	INIT_09a8,For_Outer_Call,Visible,Unelaborated
091e 029a 09f3  |    |		Declare_Subprogram	INIT_09f0,For_Outer_Call,Visible,Unelaborated
0920 029a 09fb  |    |		Declare_Subprogram	INIT_09f8,For_Outer_Call,Visible,Unelaborated
0922 029a 0a2b  |   +|		Declare_Subprogram	INIT_0a28,For_Outer_Call,Visible,Unelaborated
0924 029a 0a73  |   s|		Declare_Subprogram	INIT_0a70,For_Outer_Call,Visible,Unelaborated
0926 029a 0a8b  |    |		Declare_Subprogram	INIT_0a88,For_Outer_Call,Visible,Unelaborated
0928 029a 0aa3  |    |		Declare_Subprogram	INIT_0aa0,For_Outer_Call,Visible,Unelaborated
092a 029a 0acb  |    |		Declare_Subprogram	INIT_0ac8,For_Outer_Call,Visible,Unelaborated
092c 00bf       |    |		Action	Accept_Activation
092d 0092 0af5  |    |		Action	Push_String_Extended,0xaf5					; "Dump"
092f 0092 0af6  |    |		Action	Push_String_Extended,0xaf6					; "Dump_Reply"
0931 0092 0af7  |    |		Action	Push_String_Extended,0xaf7					; "data_base name"
0933 0092 0af8  |    |		Action	Push_String_Extended,0xaf8					; "Tuple"
0935 0092 0af9  |    |		Action	Push_String_Extended,0xaf9					; "Dump_End"
0937 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0938 00c7       |    |		Action	Elaborate_Subprogram
0939 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
093a 00c7       |    |		Action	Elaborate_Subprogram
093b 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
093c 00c7       |    |		Action	Elaborate_Subprogram
093d 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
093e 00c7       |    |		Action	Elaborate_Subprogram
093f 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0940 00c7       |    |		Action	Elaborate_Subprogram
0941 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0942 00c7       |    |		Action	Elaborate_Subprogram
0943 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0944 00c7       |    |		Action	Elaborate_Subprogram
0945 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0946 00c7       |    |		Action	Elaborate_Subprogram
0947 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0948 00c7       |    |		Action	Elaborate_Subprogram
0949 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
094a 00c7       |    |		Action	Elaborate_Subprogram
094b			BODY_0910:
094b 00bc       |    |		Action	Signal_Activated
094c 00bb       |    |		Action	Signal_Completion
094d 0000 0000  |    |		.XXX[0x3]
094f 0000       |    |
0950 ; --------------------------------------------------------------------------------------
0950 ; SUBPROGRAM
0950 ; --------------------------------------------------------------------------------------
0950 0953       | S  |		.CONST	0x0953								; Address of begin
0951 0004       |    |		.CONST	0x0004								; Address of exception handler
0952 0001       |    |		.CONST	0x0001								; Number of locals
0953			BODY_0950:
0953			INIT_0950:
0953 4607       |F   |		Jump_Case	0x8
0954 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0955 7807       |x   |		Jump	0x95d								; case 0x1
0956 780a       |x   |		Jump	0x961								; case 0x2
0957 780e       |x   |		Jump	0x966								; case 0x3
0958 7811       |x   |		Jump	0x96a								; case 0x4
0959 7812       |x   |		Jump	0x96c								; case 0x5
095a 7813       |x   |		Jump	0x96e								; case 0x6
095b 7816       |x   |		Jump	0x972								; case 0x7
095c 4302       |C   |		.XXX[0x1]
095d 00da       |    |		Load_Top	At_Offset_2
095e 0091 0ad4  |    |		Action	Push_String_Extended_Indexed,0xad4				; "BEHAVIOR_DB"
0960 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0961 00db       |    |		Load_Top	At_Offset_3
0962 00db       |    |		Load_Top	At_Offset_3
0963 00e0       |    |		Load_Encached	Standard_Cache
0964 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0965 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0966 00da       |    |		Load_Top	At_Offset_2
0967 00e0       |    |		Load_Encached	Standard_Cache
0968 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0969 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
096a 00db       |    |		Load_Top	At_Offset_3
096b 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
096c 00db       |    |		Load_Top	At_Offset_3
096d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
096e e20d       |    |		Load	0x1,0xd
096f 00dc       |    |		Load_Top	At_Offset_4
0970 0267       | g  |		Execute	Discrete,Predecessor
0971 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0972 e20d       |    |		Load	0x1,0xd
0973 00dc       |    |		Load_Top	At_Offset_4
0974 0268       | h  |		Execute	Discrete,Successor
0975 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0976 0000 0000  |    |		.XXX[0x2]
0978 ; --------------------------------------------------------------------------------------
0978 ; SUBPROGRAM
0978 ; --------------------------------------------------------------------------------------
0978 0983       |    |		.CONST	0x0983								; Address of begin
0979 0004       |    |		.CONST	0x0004								; Address of exception handler
097a 0003       |    |		.CONST	0x0003								; Number of locals
097b			INIT_0978:
097b e001       |    |		Load	0x0,0x1
097c 0322       | "  |		Declare_Variable	Record
097d 00d8       |    |		Load_Top	At_Offset_0
097e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
097f e002       |    |		Load	0x0,0x2
0980 0322       | "  |		Declare_Variable	Record
0981 00d8       |    |		Load_Top	At_Offset_0
0982 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0983			BODY_0978:
0983 00d9       |    |		Load_Top	At_Offset_1
0984 e5fd       |    |		Load	0x2,-0x3
0985 e20d       |    |		Load	0x1,0xd
0986 011c       |    |		Execute	Any,Convert_Unchecked
0987 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0988 4800       |H   |		Short_Literal	0x0
0989 00ea       |    |		Load_Encached	Null_String_Cache
098a e21a       |    |		Load	0x1,0x1a
098b 8003       |    |		Call	0x0,0x3
098c 00d1       |    |		Pop_Control	Pop_Count_1
098d 00d8       |    |		Load_Top	At_Offset_0
098e 00da       |    |		Load_Top	At_Offset_2
098f 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
0991 e218       |    |		Load	0x1,0x18
0992 8004       |    |		Call	0x0,0x4
0993 00d1       |    |		Pop_Control	Pop_Count_1
0994 00d8       |    |		Load_Top	At_Offset_0
0995 e005       |    |		Load	0x0,0x5
0996 e006       |    |		Load	0x0,0x6
0997 e5fe       |    |		Load	0x2,-0x2
0998 e5ff       |    |		Load	0x2,-0x1
0999 4800       |H   |		Short_Literal	0x0
099a 8007       |    |		Call	0x0,0x7
099b 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
099c 0000 0000  |    |		.BLANK	0000[0x4]
09a0 ; --------------------------------------------------------------------------------------
09a0 ; SUBPROGRAM
09a0 ; --------------------------------------------------------------------------------------
09a0 09a3       |    |		.CONST	0x09a3								; Address of begin
09a1 0004       |    |		.CONST	0x0004								; Address of exception handler
09a2 0001       |    |		.CONST	0x0001								; Number of locals
09a3			BODY_09a0:
09a3			INIT_09a0:
09a3 e218       |    |		Load	0x1,0x18
09a4 00db       |    |		Load_Top	At_Offset_3
09a5 8008       |    |		Call	0x0,0x8
09a6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09a7 0000       |    |		.XXX[0x1]
09a8 ; --------------------------------------------------------------------------------------
09a8 ; SUBPROGRAM
09a8 ; --------------------------------------------------------------------------------------
09a8 09b3       |    |		.CONST	0x09b3								; Address of begin
09a9 0004       |    |		.CONST	0x0004								; Address of exception handler
09aa 0003       |    |		.CONST	0x0003								; Number of locals
09ab			INIT_09a8:
09ab e001       |    |		Load	0x0,0x1
09ac 0322       | "  |		Declare_Variable	Record
09ad 00d8       |    |		Load_Top	At_Offset_0
09ae 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09af e002       |    |		Load	0x0,0x2
09b0 0322       | "  |		Declare_Variable	Record
09b1 00d8       |    |		Load_Top	At_Offset_0
09b2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09b3			BODY_09a8:
09b3 e5fb       |    |		Load	0x2,-0x5
09b4 01db       |    |		Execute	Vector,Length
09b5 0c65       | e  |		Execute_Immediate	Greater_Equal,0x65
09b6 681a       |h   |		Jump_Zero	0x9d1
09b7 00d9       |    |		Load_Top	At_Offset_1
09b8 e5fb       |    |		Load	0x2,-0x5
09b9 01dd       |    |		Execute	Vector,First
09ba e5fb       |    |		Load	0x2,-0x5
09bb 01dd       |    |		Execute	Vector,First
09bc 0a63       | c  |		Execute_Immediate	Plus,0x63
09bd 00d8       |    |		Load_Top	At_Offset_0
09be 00e2       |    |		Load_Encached	Integer_Cache
09bf 0260       | `  |		Execute	Discrete,In_Type
09c0 7001       |p   |		Jump_Nonzero	0x9c2
09c1 0801       |    |		Execute_Immediate	Raise,0x1
09c2 e5fb       |    |		Load	0x2,-0x5
09c3 01cf       |    |		Execute	Vector,Slice_Read
09c4 4800       |H   |		Short_Literal	0x0
09c5 00ea       |    |		Load_Encached	Null_String_Cache
09c6 e21b       |    |		Load	0x1,0x1b
09c7 e5fc       |    |		Load	0x2,-0x4
09c8 e20d       |    |		Load	0x1,0xd
09c9 011c       |    |		Execute	Any,Convert_Unchecked
09ca 1c01       |    |		Execute_Immediate	Run_Utility,0x1
09cb 4800       |H   |		Short_Literal	0x0
09cc 00ea       |    |		Load_Encached	Null_String_Cache
09cd e21a       |    |		Load	0x1,0x1a
09ce 8009       |    |		Call	0x0,0x9
09cf 00d1       |    |		Pop_Control	Pop_Count_1
09d0 780e       |x   |		Jump	0x9df
09d1 00d9       |    |		Load_Top	At_Offset_1
09d2 e5fb       |    |		Load	0x2,-0x5
09d3 4800       |H   |		Short_Literal	0x0
09d4 00ea       |    |		Load_Encached	Null_String_Cache
09d5 e21b       |    |		Load	0x1,0x1b
09d6 e5fc       |    |		Load	0x2,-0x4
09d7 e20d       |    |		Load	0x1,0xd
09d8 011c       |    |		Execute	Any,Convert_Unchecked
09d9 1c01       |    |		Execute_Immediate	Run_Utility,0x1
09da 4800       |H   |		Short_Literal	0x0
09db 00ea       |    |		Load_Encached	Null_String_Cache
09dc e21a       |    |		Load	0x1,0x1a
09dd 8009       |    |		Call	0x0,0x9
09de 00d1       |    |		Pop_Control	Pop_Count_1
09df 00d8       |    |		Load_Top	At_Offset_0
09e0 00da       |    |		Load_Top	At_Offset_2
09e1 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
09e3 e219       |    |		Load	0x1,0x19
09e4 8004       |    |		Call	0x0,0x4
09e5 00d1       |    |		Pop_Control	Pop_Count_1
09e6 00d8       |    |		Load_Top	At_Offset_0
09e7 e005       |    |		Load	0x0,0x5
09e8 e5fd       |    |		Load	0x2,-0x3
09e9 e5fe       |    |		Load	0x2,-0x2
09ea e5ff       |    |		Load	0x2,-0x1
09eb 4800       |H   |		Short_Literal	0x0
09ec 8007       |    |		Call	0x0,0x7
09ed 4405       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x5
09ee 0000 0000  |    |		.XXX[0x2]
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 09f3       |    |		.CONST	0x09f3								; Address of begin
09f1 0004       |    |		.CONST	0x0004								; Address of exception handler
09f2 0001       |    |		.CONST	0x0001								; Number of locals
09f3			BODY_09f0:
09f3			INIT_09f0:
09f3 e219       |    |		Load	0x1,0x19
09f4 00db       |    |		Load_Top	At_Offset_3
09f5 8008       |    |		Call	0x0,0x8
09f6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09f7 0000       |    |		.XXX[0x1]
09f8 ; --------------------------------------------------------------------------------------
09f8 ; SUBPROGRAM
09f8 ; --------------------------------------------------------------------------------------
09f8 0a07       |    |		.CONST	0x0a07								; Address of begin
09f9 0004       |    |		.CONST	0x0004								; Address of exception handler
09fa 0004       |    |		.CONST	0x0004								; Number of locals
09fb			INIT_09f8:
09fb e00a       |    |		Load	0x0,0xa
09fc 0322       | "  |		Declare_Variable	Record
09fd 00d8       |    |		Load_Top	At_Offset_0
09fe 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09ff e001       |    |		Load	0x0,0x1
0a00 0322       | "  |		Declare_Variable	Record
0a01 00d8       |    |		Load_Top	At_Offset_0
0a02 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0a03 e002       |    |		Load	0x0,0x2
0a04 0322       | "  |		Declare_Variable	Record
0a05 00d8       |    |		Load_Top	At_Offset_0
0a06 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0a07			BODY_09f8:
0a07 e5fe       |    |		Load	0x2,-0x2
0a08 800b       |    |		Call	0x0,0xb
0a09 00d9       |    |		Load_Top	At_Offset_1
0a0a 017d       | }  |		Execute	Record,Structure_Write
0a0b 00d8       |    |		Load_Top	At_Offset_0
0a0c 800c       |    |		Call	0x0,0xc
0a0d 00da       |    |		Load_Top	At_Offset_2
0a0e 017d       | }  |		Execute	Record,Structure_Write
0a0f 4801       |H   |		Short_Literal	0x1
0a10 00da       |    |		Load_Top	At_Offset_2
0a11 800d       |    |		Call	0x0,0xd
0a12 00db       |    |		Load_Top	At_Offset_3
0a13 017d       | }  |		Execute	Record,Structure_Write
0a14 00da       |    |		Load_Top	At_Offset_2
0a15 e5ff       |    |		Load	0x2,-0x1
0a16 e20d       |    |		Load	0x1,0xd
0a17 011c       |    |		Execute	Any,Convert_Unchecked
0a18 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0a19 800e       |    |		Call	0x0,0xe
0a1a 00d1       |    |		Pop_Control	Pop_Count_1
0a1b 00d9       |    |		Load_Top	At_Offset_1
0a1c 4801       |H   |		Short_Literal	0x1
0a1d e402       |    |		Load	0x2,0x2
0a1e 800f       |    |		Call	0x0,0xf
0a1f 00d1       |    |		Pop_Control	Pop_Count_1
0a20 00d8       |    |		Load_Top	At_Offset_0
0a21 00da       |    |		Load_Top	At_Offset_2
0a22 8010       |    |		Call	0x0,0x10
0a23 00d1       |    |		Pop_Control	Pop_Count_1
0a24 e5fe       |    |		Load	0x2,-0x2
0a25 00d9       |    |		Load_Top	At_Offset_1
0a26 8011       |    |		Call	0x0,0x11
0a27 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0a28 ; --------------------------------------------------------------------------------------
0a28 ; SUBPROGRAM
0a28 ; --------------------------------------------------------------------------------------
0a28 0a37       | 7  |		.CONST	0x0a37								; Address of begin
0a29 0004       |    |		.CONST	0x0004								; Address of exception handler
0a2a 0004       |    |		.CONST	0x0004								; Number of locals
0a2b			INIT_0a28:
0a2b e00a       |    |		Load	0x0,0xa
0a2c 0322       | "  |		Declare_Variable	Record
0a2d 00d8       |    |		Load_Top	At_Offset_0
0a2e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0a2f e001       |    |		Load	0x0,0x1
0a30 0322       | "  |		Declare_Variable	Record
0a31 00d8       |    |		Load_Top	At_Offset_0
0a32 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0a33 e002       |    |		Load	0x0,0x2
0a34 0322       | "  |		Declare_Variable	Record
0a35 00d8       |    |		Load_Top	At_Offset_0
0a36 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0a37			BODY_0a28:
0a37 e5fe       |    |		Load	0x2,-0x2
0a38 800b       |    |		Call	0x0,0xb
0a39 00d9       |    |		Load_Top	At_Offset_1
0a3a 017d       | }  |		Execute	Record,Structure_Write
0a3b 00d8       |    |		Load_Top	At_Offset_0
0a3c 800c       |    |		Call	0x0,0xc
0a3d 00da       |    |		Load_Top	At_Offset_2
0a3e 017d       | }  |		Execute	Record,Structure_Write
0a3f 4802       |H   |		Short_Literal	0x2
0a40 00da       |    |		Load_Top	At_Offset_2
0a41 800d       |    |		Call	0x0,0xd
0a42 00db       |    |		Load_Top	At_Offset_3
0a43 017d       | }  |		Execute	Record,Structure_Write
0a44 e5ff       |    |		Load	0x2,-0x1
0a45 01db       |    |		Execute	Vector,Length
0a46 0c65       | e  |		Execute_Immediate	Greater_Equal,0x65
0a47 6810       |h   |		Jump_Zero	0xa58
0a48 00da       |    |		Load_Top	At_Offset_2
0a49 e5ff       |    |		Load	0x2,-0x1
0a4a 01dd       |    |		Execute	Vector,First
0a4b e5ff       |    |		Load	0x2,-0x1
0a4c 01dd       |    |		Execute	Vector,First
0a4d 0a63       | c  |		Execute_Immediate	Plus,0x63
0a4e 00d8       |    |		Load_Top	At_Offset_0
0a4f 00e2       |    |		Load_Encached	Integer_Cache
0a50 0260       | `  |		Execute	Discrete,In_Type
0a51 7001       |p   |		Jump_Nonzero	0xa53
0a52 0801       |    |		Execute_Immediate	Raise,0x1
0a53 e5ff       |    |		Load	0x2,-0x1
0a54 01cf       |    |		Execute	Vector,Slice_Read
0a55 800e       |    |		Call	0x0,0xe
0a56 00d1       |    |		Pop_Control	Pop_Count_1
0a57 7804       |x   |		Jump	0xa5c
0a58 00da       |    |		Load_Top	At_Offset_2
0a59 e5ff       |    |		Load	0x2,-0x1
0a5a 800e       |    |		Call	0x0,0xe
0a5b 00d1       |    |		Pop_Control	Pop_Count_1
0a5c 00d9       |    |		Load_Top	At_Offset_1
0a5d 4802       |H   |		Short_Literal	0x2
0a5e e402       |    |		Load	0x2,0x2
0a5f 800f       |    |		Call	0x0,0xf
0a60 00d1       |    |		Pop_Control	Pop_Count_1
0a61 00d8       |    |		Load_Top	At_Offset_0
0a62 00da       |    |		Load_Top	At_Offset_2
0a63 8010       |    |		Call	0x0,0x10
0a64 00d1       |    |		Pop_Control	Pop_Count_1
0a65 e5fe       |    |		Load	0x2,-0x2
0a66 00d9       |    |		Load_Top	At_Offset_1
0a67 8011       |    |		Call	0x0,0x11
0a68 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0a69 0000 0000  |    |		.BLANK	0000[0x7]
0a70 ; --------------------------------------------------------------------------------------
0a70 ; SUBPROGRAM
0a70 ; --------------------------------------------------------------------------------------
0a70 0a77       | w  |		.CONST	0x0a77								; Address of begin
0a71 0a83       |    |		.CONST	0x0a83								; Address of exception handler
0a72 0002       |    |		.CONST	0x0002								; Number of locals
0a73			INIT_0a70:
0a73 e00a       |    |		Load	0x0,0xa
0a74 0322       | "  |		Declare_Variable	Record
0a75 00d8       |    |		Load_Top	At_Offset_0
0a76 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0a77			BODY_0a70:
0a77 4801       |H   |		Short_Literal	0x1
0a78 e5ff       |    |		Load	0x2,-0x1
0a79 800b       |    |		Call	0x0,0xb
0a7a 800c       |    |		Call	0x0,0xc
0a7b 800d       |    |		Call	0x0,0xd
0a7c 00d9       |    |		Load_Top	At_Offset_1
0a7d 017d       | }  |		Execute	Record,Structure_Write
0a7e 00d8       |    |		Load_Top	At_Offset_0
0a7f 8012       |    |		Call	0x0,0x12
0a80 e20d       |    |		Load	0x1,0xd
0a81 1c02       |    |		Execute_Immediate	Run_Utility,0x2
0a82 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a83			TRAP_0a70:
0a83 0007       |    |		Action	Break_Optional
0a84 e013       |    |		Load	0x0,0x13
0a85 0257       | W  |		Execute	Discrete,Raise
0a86 0000 0000  |    |		.XXX[0x2]
0a88 ; --------------------------------------------------------------------------------------
0a88 ; SUBPROGRAM
0a88 ; --------------------------------------------------------------------------------------
0a88 0a8f       |    |		.CONST	0x0a8f								; Address of begin
0a89 0a99       |    |		.CONST	0x0a99								; Address of exception handler
0a8a 0002       |    |		.CONST	0x0002								; Number of locals
0a8b			INIT_0a88:
0a8b e00a       |    |		Load	0x0,0xa
0a8c 0322       | "  |		Declare_Variable	Record
0a8d 00d8       |    |		Load_Top	At_Offset_0
0a8e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0a8f			BODY_0a88:
0a8f 4802       |H   |		Short_Literal	0x2
0a90 e5ff       |    |		Load	0x2,-0x1
0a91 800b       |    |		Call	0x0,0xb
0a92 800c       |    |		Call	0x0,0xc
0a93 800d       |    |		Call	0x0,0xd
0a94 00d9       |    |		Load_Top	At_Offset_1
0a95 017d       | }  |		Execute	Record,Structure_Write
0a96 00d8       |    |		Load_Top	At_Offset_0
0a97 8012       |    |		Call	0x0,0x12
0a98 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a99			TRAP_0a88:
0a99 0007       |    |		Action	Break_Optional
0a9a e013       |    |		Load	0x0,0x13
0a9b 0257       | W  |		Execute	Discrete,Raise
0a9c 0000 0000  |    |		.BLANK	0000[0x4]
0aa0 ; --------------------------------------------------------------------------------------
0aa0 ; SUBPROGRAM
0aa0 ; --------------------------------------------------------------------------------------
0aa0 0aaf       |    |		.CONST	0x0aaf								; Address of begin
0aa1 0004       |    |		.CONST	0x0004								; Address of exception handler
0aa2 0004       |    |		.CONST	0x0004								; Number of locals
0aa3			INIT_0aa0:
0aa3 e014       |    |		Load	0x0,0x14
0aa4 0322       | "  |		Declare_Variable	Record
0aa5 00d8       |    |		Load_Top	At_Offset_0
0aa6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0aa7 e002       |    |		Load	0x0,0x2
0aa8 0322       | "  |		Declare_Variable	Record
0aa9 00d8       |    |		Load_Top	At_Offset_0
0aaa 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0aab e001       |    |		Load	0x0,0x1
0aac 0322       | "  |		Declare_Variable	Record
0aad 00d8       |    |		Load_Top	At_Offset_0
0aae 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0aaf			BODY_0aa0:
0aaf 00d8       |    |		Load_Top	At_Offset_0
0ab0 4800       |H   |		Short_Literal	0x0
0ab1 8015       |    |		Call	0x0,0x15
0ab2 00d1       |    |		Pop_Control	Pop_Count_1
0ab3 00d9       |    |		Load_Top	At_Offset_1
0ab4 00d9       |    |		Load_Top	At_Offset_1
0ab5 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; "Orb"
0ab7 e21c       |    |		Load	0x1,0x1c
0ab8 8004       |    |		Call	0x0,0x4
0ab9 00d1       |    |		Pop_Control	Pop_Count_1
0aba 00d9       |    |		Load_Top	At_Offset_1
0abb e005       |    |		Load	0x0,0x5
0abc e5fd       |    |		Load	0x2,-0x3
0abd e5fe       |    |		Load	0x2,-0x2
0abe e5ff       |    |		Load	0x2,-0x1
0abf 4800       |H   |		Short_Literal	0x0
0ac0 8007       |    |		Call	0x0,0x7
0ac1 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0ac2 0000 0000  |    |		.BLANK	0000[0x6]
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; SUBPROGRAM
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0acb       |    |		.CONST	0x0acb								; Address of begin
0ac9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aca 0001       |    |		.CONST	0x0001								; Number of locals
0acb			BODY_0ac8:
0acb			INIT_0ac8:
0acb 00da       |    |		Load_Top	At_Offset_2
0acc 8016       |    |		Call	0x0,0x16
0acd 6804       |h   |		Jump_Zero	0xad2
0ace e21c       |    |		Load	0x1,0x1c
0acf 00db       |    |		Load_Top	At_Offset_3
0ad0 8008       |    |		Call	0x0,0x8
0ad1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ad2 4800       |H   |		Short_Literal	0x0
0ad3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ad4 ; --------------------------------------------------------------------------------------
0ad4 ; STRING TABLE
0ad4 ; --------------------------------------------------------------------------------------
0ad4 004e       | N  |		.STRTAB	0x004e->0x0afb							; "BEHAVIOR_DB"
0ad5 0057       | W  |		.STRTAB	0x0057->0x0b00							; "SPY_DB"
0ad6 005b       | [  |		.STRTAB	0x005b->0x0b03							; "FILTER_DB"
0ad7 0062       | b  |		.STRTAB	0x0062->0x0b08							; "NOTIFICATION_DB"
0ad8 006f       | o  |		.STRTAB	0x006f->0x0b0f							; "CLASS_DB"
0ad9 0075       | u  |		.STRTAB	0x0075->0x0b13							; "CLASS_ATTRIBUT_DB"
0ada 0084       |    |		.STRTAB	0x0084->0x0b1c							; "ALL_DB"
0adb 0088       |    |		.STRTAB	0x0088->0x0b1f							; "Orb"
0adc 0089       |    |		.STRTAB	0x0089->0x0b20							; "Shut_down"
0add 0090       |    |		.STRTAB	0x0090->0x0b25							; "Query"
0ade 0093       |    |		.STRTAB	0x0093->0x0b27							; "Query_reply"
0adf 009c       |    |		.STRTAB	0x009c->0x0b2d							; "behavior_id"
0ae0 00a5       |    |		.STRTAB	0x00a5->0x0b32							; "behavior_class"
0ae1 00b1       |    |		.STRTAB	0x00b1->0x0b39							; "Spy_Publication"
0ae2 00be       |    |		.STRTAB	0x00be->0x0b41							; "Spy_UnPublication"
0ae3 00cd       |    |		.STRTAB	0x00cd->0x0b49							; "spy_Id"
0ae4 00d1       |    |		.STRTAB	0x00d1->0x0b4c							; "Notification_publication"
0ae5 00e7       |    |		.STRTAB	0x00e7->0x0b58							; "Notification_Unpublication"
0ae6 00ff       |    |		.STRTAB	0x00ff->0x0b65							; "Behavior_id"
0ae7 0108       |    |		.STRTAB	0x0108->0x0b6b							; "Class"
0ae8 010b       |    |		.STRTAB	0x010b->0x0b6d							; "method"
0ae9 010f       |    |		.STRTAB	0x010f->0x0b70							; "Filter_publication"
0aea 011f       |    |		.STRTAB	0x011f->0x0b79							; "Filter_Unpublication"
0aeb 0131       | 1  |		.STRTAB	0x0131->0x0b83							; "filter_id"
0aec 0138       | 8  |		.STRTAB	0x0138->0x0b88							; "Class_Publication"
0aed 0147       | G  |		.STRTAB	0x0147->0x0b90							; "Class_UnPublication"
0aee 0158       | X  |		.STRTAB	0x0158->0x0b9a							; "Behavior_class"
0aef 0164       | d  |		.STRTAB	0x0164->0x0ba1							; "Class_Attribut_publication"
0af0 017c       | |  |		.STRTAB	0x017c->0x0bae							; "Class_Attribut_unpublication"
0af1 0196       |    |		.STRTAB	0x0196->0x0bbc							; "Behavior_publication"
0af2 01a8       |    |		.STRTAB	0x01a8->0x0bc6							; "behavior_Unpublication"
0af3 01bc       |    |		.STRTAB	0x01bc->0x0bd1							; "Socket_id"
0af4 01c3       |    |		.STRTAB	0x01c3->0x0bd5							; "Internet_id"
0af5 01cc       |    |		.STRTAB	0x01cc->0x0bdb							; "Dump"
0af6 01ce       |    |		.STRTAB	0x01ce->0x0bdd							; "Dump_Reply"
0af7 01d6       |    |		.STRTAB	0x01d6->0x0be2							; "data_base name"
0af8 01e2       |    |		.STRTAB	0x01e2->0x0be9							; "Tuple"
0af9 01e5       |    |		.STRTAB	0x01e5->0x0beb							; "Dump_End"
0afa 01eb       |    |		.STREND 0x01eb->0x0bef
0afb 4245 4841  |BEHA|		.STRTAB_STRINGS
0bf0 ; --------------------------------------------------------------------------------------
0bf0 ; Debug Table
0bf0 ; --------------------------------------------------------------------------------------
0bf0 0004 0002  |    |		.DEBUG4	0x0004,0x0002,0xd16c,0x0000,0x0001,0x0000
0bf6 9480 e880  |    |		.XXX[0xa]
0bf8 8080 8081  |    |
0bfa 19a5 b195  |    |
0bfc 7d51 e5c1  |}Q  |
0bfe 94ec 2880  |  ( |