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

⟦593674153⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0994a3

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 04e0       |    |		.CONST	0x04e0								; 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 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00a4       |    |		.CONST	0x00a4								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0034       | 4  |		.CONST	0x0034								; Number of locals
000b			INIT_0008:
000b 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated
000d 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated
000f 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated
0011 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated
0013 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated
0015 029a 00fb  |    |		Declare_Subprogram	INIT_00f8,For_Outer_Call,Visible,Unelaborated
0017 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated
0019 029a 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call,Visible,Unelaborated
001b 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated
001d 029a 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call,Visible,Unelaborated
001f 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated
0021 029a 015b  |   [|		Declare_Subprogram	INIT_0158,For_Outer_Call,Visible,Unelaborated
0023 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated
0025 029a 0183  |    |		Declare_Subprogram	INIT_0180,For_Outer_Call,Visible,Unelaborated
0027 029a 0193  |    |		Declare_Subprogram	INIT_0190,For_Outer_Call,Visible,Unelaborated
0029 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated
002b 029a 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call,Visible,Unelaborated
002d 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated
002f 029a 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call,Visible,Unelaborated
0031 029a 0253  |   S|		Declare_Subprogram	INIT_0250,For_Outer_Call,Visible,Unelaborated
0033 029a 0263  |   c|		Declare_Subprogram	INIT_0260,For_Outer_Call,Visible,Unelaborated
0035 029a 0293  |    |		Declare_Subprogram	INIT_0290,For_Outer_Call,Visible,Unelaborated
0037 029a 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call,Visible,Unelaborated
0039 029a 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call,Visible,Unelaborated
003b 029a 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Outer_Call,Visible,Unelaborated
003d 029a 02f3  |    |		Declare_Subprogram	INIT_02f0,For_Outer_Call,Visible,Unelaborated
003f 029a 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call,Visible,Unelaborated
0041 029a 032b  |   +|		Declare_Subprogram	INIT_0328,For_Outer_Call,Visible,Unelaborated
0043 029a 0333  |   3|		Declare_Subprogram	INIT_0330,For_Outer_Call,Visible,Unelaborated
0045 029a 0363  |   c|		Declare_Subprogram	INIT_0360,For_Outer_Call,Visible,Unelaborated
0047 029a 037b  |   {|		Declare_Subprogram	INIT_0378,For_Outer_Call,Visible,Unelaborated
0049 029a 03c3  |    |		Declare_Subprogram	INIT_03c0,For_Outer_Call,Visible,Unelaborated
004b 029a 03cb  |    |		Declare_Subprogram	INIT_03c8,For_Outer_Call,Visible,Unelaborated
004d e002       |    |		Load	0x0,0x2
004e 029f 0433  |   3|		Declare_Subprogram	INIT_0430,For_Call
0050 4801       |H   |		Short_Literal	0x1
0051 032e       | .  |		Declare_Type	Record,Defined,Visible
0052 e002       |    |		Load	0x0,0x2
0053 00d8       |    |		Load_Top	At_Offset_0
0054 00e4       |    |		Load_Encached	Positive_Cache
0055 029f 044b  |   K|		Declare_Subprogram	INIT_0448,For_Call
0057 4803       |H   |		Short_Literal	0x3
0058 032e       | .  |		Declare_Type	Record,Defined,Visible
0059 00bf       |    |		Action	Accept_Activation
005a e003       |    |		Load	0x0,0x3
005b 0337       | 7  |		Declare_Variable	Array
005c e004       |    |		Load	0x0,0x4
005d 0337       | 7  |		Declare_Variable	Array
005e e005       |    |		Load	0x0,0x5
005f 0337       | 7  |		Declare_Variable	Array
0060 e006       |    |		Load	0x0,0x6
0061 0337       | 7  |		Declare_Variable	Array
0062 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0063 00c7       |    |		Action	Elaborate_Subprogram
0064 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0065 00c7       |    |		Action	Elaborate_Subprogram
0066 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0067 00c7       |    |		Action	Elaborate_Subprogram
0068 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0069 00c7       |    |		Action	Elaborate_Subprogram
006a 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
006b 00c7       |    |		Action	Elaborate_Subprogram
006c 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
006d 00c7       |    |		Action	Elaborate_Subprogram
006e 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
006f 00c7       |    |		Action	Elaborate_Subprogram
0070 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0071 00c7       |    |		Action	Elaborate_Subprogram
0072 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0073 00c7       |    |		Action	Elaborate_Subprogram
0074 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0075 00c7       |    |		Action	Elaborate_Subprogram
0076 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
0077 00c7       |    |		Action	Elaborate_Subprogram
0078 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
0079 00c7       |    |		Action	Elaborate_Subprogram
007a 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
007b 00c7       |    |		Action	Elaborate_Subprogram
007c 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
007d 00c7       |    |		Action	Elaborate_Subprogram
007e 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
007f 00c7       |    |		Action	Elaborate_Subprogram
0080 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0081 00c7       |    |		Action	Elaborate_Subprogram
0082 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0083 00c7       |    |		Action	Elaborate_Subprogram
0084 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0085 00c7       |    |		Action	Elaborate_Subprogram
0086 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
0087 00c7       |    |		Action	Elaborate_Subprogram
0088 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0089 00c7       |    |		Action	Elaborate_Subprogram
008a 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
008b 00c7       |    |		Action	Elaborate_Subprogram
008c 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
008d 00c7       |    |		Action	Elaborate_Subprogram
008e 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
008f 00c7       |    |		Action	Elaborate_Subprogram
0090 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
0091 00c7       |    |		Action	Elaborate_Subprogram
0092 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
0093 00c7       |    |		Action	Elaborate_Subprogram
0094 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0095 00c7       |    |		Action	Elaborate_Subprogram
0096 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
0097 00c7       |    |		Action	Elaborate_Subprogram
0098 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
0099 00c7       |    |		Action	Elaborate_Subprogram
009a 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
009b 00c7       |    |		Action	Elaborate_Subprogram
009c 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
009d 00c7       |    |		Action	Elaborate_Subprogram
009e 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
009f 00c7       |    |		Action	Elaborate_Subprogram
00a0 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
00a1 00c7       |    |		Action	Elaborate_Subprogram
00a2 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
00a3 00c7       |    |		Action	Elaborate_Subprogram
00a4			BODY_0008:
00a4 00bc       |    |		Action	Signal_Activated
00a5 00bb       |    |		Action	Signal_Completion
00a6 0000 0000  |    |		.XXX[0x2]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab       |    |		.CONST	0x00ab								; Address of begin
00a9 0004       |    |		.CONST	0x0004								; Address of exception handler
00aa 0001       |    |		.CONST	0x0001								; Number of locals
00ab			BODY_00a8:
00ab			INIT_00a8:
00ab 48ff       |H   |		Short_Literal	0xff
00ac 00db       |    |		Load_Top	At_Offset_3
00ad e007       |    |		Load	0x0,0x7
00ae 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00af e002       |    |		Load	0x0,0x2
00b0 0162       | b  |		Execute	Variant_Record,Check_In_Type
00b1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00b2 0000 0000  |    |		.BLANK	0000[0x6]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb       |    |		.CONST	0x00bb								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 0001       |    |		.CONST	0x0001								; Number of locals
00bb			BODY_00b8:
00bb			INIT_00b8:
00bb 00da       |    |		Load_Top	At_Offset_2
00bc 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
00bd e007       |    |		Load	0x0,0x7
00be 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00bf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3       |    |		.CONST	0x00c3								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0001       |    |		.CONST	0x0001								; Number of locals
00c3			BODY_00c0:
00c3			INIT_00c0:
00c3 00db       |    |		Load_Top	At_Offset_3
00c4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00c5 e007       |    |		Load	0x0,0x7
00c6 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00c7 0162       | b  |		Execute	Variant_Record,Check_In_Type
00c8 e007       |    |		Load	0x0,0x7
00c9 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00ca 00d1       |    |		Pop_Control	Pop_Count_1
00cb 00db       |    |		Load_Top	At_Offset_3
00cc 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00cd e007       |    |		Load	0x0,0x7
00ce 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00cf 0162       | b  |		Execute	Variant_Record,Check_In_Type
00d0 00db       |    |		Load_Top	At_Offset_3
00d1 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
00d2 e007       |    |		Load	0x0,0x7
00d3 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00d4 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00d5 0000 0000  |    |		.XXX[0x3]
00d7 0000       |    |
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db 00da       |    |		Load_Top	At_Offset_2
00dc 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00dd e007       |    |		Load	0x0,0x7
00de 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00df 0162       | b  |		Execute	Variant_Record,Check_In_Type
00e0 e007       |    |		Load	0x0,0x7
00e1 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00e2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00e3 0000 0000  |    |		.BLANK	0000[0x5]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb       |    |		.CONST	0x00eb								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0001       |    |		.CONST	0x0001								; Number of locals
00eb			BODY_00e8:
00eb			INIT_00e8:
00eb 4810       |H   |		Short_Literal	0x10
00ec 4801       |H   |		Short_Literal	0x1
00ed e5ff       |    |		Load	0x2,-0x1
00ee 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
00ef e007       |    |		Load	0x0,0x7
00f0 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
00f1 e231       | 1  |		Load	0x1,0x31
00f2 01d4       |    |		Execute	Vector,Structure_Write
00f3 e231       | 1  |		Load	0x1,0x31
00f4 0335       | 5  |		Declare_Variable	Array,Duplicate
00f5 00cd       |    |		Action	Spare6_Action
00f6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00f7 0000       |    |		.XXX[0x1]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb       |    |		.CONST	0x00fb								; Address of begin
00f9 0004       |    |		.CONST	0x0004								; Address of exception handler
00fa 0001       |    |		.CONST	0x0001								; Number of locals
00fb			BODY_00f8:
00fb			INIT_00f8:
00fb 4814       |H   |		Short_Literal	0x14
00fc 4801       |H   |		Short_Literal	0x1
00fd e5ff       |    |		Load	0x2,-0x1
00fe 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
00ff e007       |    |		Load	0x0,0x7
0100 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0101 e232       | 2  |		Load	0x1,0x32
0102 01d4       |    |		Execute	Vector,Structure_Write
0103 e232       | 2  |		Load	0x1,0x32
0104 0335       | 5  |		Declare_Variable	Array,Duplicate
0105 00cd       |    |		Action	Spare6_Action
0106 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0107 0000       |    |		.XXX[0x1]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b       |    |		.CONST	0x010b								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0001       |    |		.CONST	0x0001								; Number of locals
010b			BODY_0108:
010b			INIT_0108:
010b 4810       |H   |		Short_Literal	0x10
010c 480d       |H   |		Short_Literal	0xd
010d e5ff       |    |		Load	0x2,-0x1
010e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
010f e007       |    |		Load	0x0,0x7
0110 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0111 e233       | 3  |		Load	0x1,0x33
0112 01d4       |    |		Execute	Vector,Structure_Write
0113 e233       | 3  |		Load	0x1,0x33
0114 0335       | 5  |		Declare_Variable	Array,Duplicate
0115 00cd       |    |		Action	Spare6_Action
0116 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
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 4824       |H$  |		Short_Literal	0x24
011c 4815       |H   |		Short_Literal	0x15
011d e5ff       |    |		Load	0x2,-0x1
011e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
011f e007       |    |		Load	0x0,0x7
0120 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0121 e231       | 1  |		Load	0x1,0x31
0122 01d4       |    |		Execute	Vector,Structure_Write
0123 e231       | 1  |		Load	0x1,0x31
0124 0335       | 5  |		Declare_Variable	Array,Duplicate
0125 00cd       |    |		Action	Spare6_Action
0126 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0127 0000       |    |		.XXX[0x1]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b       | +  |		.CONST	0x012b								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0001       |    |		.CONST	0x0001								; Number of locals
012b			BODY_0128:
012b			INIT_0128:
012b 4828       |H(  |		Short_Literal	0x28
012c 4815       |H   |		Short_Literal	0x15
012d e5ff       |    |		Load	0x2,-0x1
012e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
012f e007       |    |		Load	0x0,0x7
0130 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0131 e232       | 2  |		Load	0x1,0x32
0132 01d4       |    |		Execute	Vector,Structure_Write
0133 e232       | 2  |		Load	0x1,0x32
0134 0335       | 5  |		Declare_Variable	Array,Duplicate
0135 00cd       |    |		Action	Spare6_Action
0136 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0137 0000       |    |		.XXX[0x1]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b       | ;  |		.CONST	0x013b								; Address of begin
0139 0004       |    |		.CONST	0x0004								; Address of exception handler
013a 0001       |    |		.CONST	0x0001								; Number of locals
013b			BODY_0138:
013b			INIT_0138:
013b 4838       |H8  |		Short_Literal	0x38
013c 4829       |H)  |		Short_Literal	0x29
013d e5ff       |    |		Load	0x2,-0x1
013e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
013f e007       |    |		Load	0x0,0x7
0140 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0141 e231       | 1  |		Load	0x1,0x31
0142 01d4       |    |		Execute	Vector,Structure_Write
0143 e231       | 1  |		Load	0x1,0x31
0144 0335       | 5  |		Declare_Variable	Array,Duplicate
0145 00cd       |    |		Action	Spare6_Action
0146 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0147 0000       |    |		.XXX[0x1]
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 483c       |H<  |		Short_Literal	0x3c
014c 4829       |H)  |		Short_Literal	0x29
014d e5ff       |    |		Load	0x2,-0x1
014e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
014f e007       |    |		Load	0x0,0x7
0150 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0151 e232       | 2  |		Load	0x1,0x32
0152 01d4       |    |		Execute	Vector,Structure_Write
0153 e232       | 2  |		Load	0x1,0x32
0154 0335       | 5  |		Declare_Variable	Array,Duplicate
0155 00cd       |    |		Action	Spare6_Action
0156 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0157 0000       |    |		.XXX[0x1]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 0161       | a  |		.CONST	0x0161								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0003       |    |		.CONST	0x0003								; Number of locals
015b			INIT_0158:
015b e002       |    |		Load	0x0,0x2
015c 02ff       |    |		Declare_Variable	Variant_Record
015d 00d8       |    |		Load_Top	At_Offset_0
015e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
015f e005       |    |		Load	0x0,0x5
0160 0337       | 7  |		Declare_Variable	Array
0161			BODY_0158:
0161 e5ff       |    |		Load	0x2,-0x1
0162 8008       |    |		Call	0x0,0x8
0163 00da       |    |		Load_Top	At_Offset_2
0164 016d       | m  |		Execute	Variant_Record,Structure_Write
0165 4810       |H   |		Short_Literal	0x10
0166 480d       |H   |		Short_Literal	0xd
0167 00db       |    |		Load_Top	At_Offset_3
0168 e007       |    |		Load	0x0,0x7
0169 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
016a 00d9       |    |		Load_Top	At_Offset_1
016b 01d4       |    |		Execute	Vector,Structure_Write
016c 00d8       |    |		Load_Top	At_Offset_0
016d 8009       |    |		Call	0x0,0x9
016e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
016f 0000       |    |		.XXX[0x1]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173       | s  |		.CONST	0x0173								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0001       |    |		.CONST	0x0001								; Number of locals
0173			BODY_0170:
0173			INIT_0170:
0173 483e       |H>  |		Short_Literal	0x3e
0174 483d       |H=  |		Short_Literal	0x3d
0175 e5ff       |    |		Load	0x2,-0x1
0176 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0177 e007       |    |		Load	0x0,0x7
0178 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0179 e234       | 4  |		Load	0x1,0x34
017a 01d4       |    |		Execute	Vector,Structure_Write
017b e234       | 4  |		Load	0x1,0x34
017c 800a       |    |		Call	0x0,0xa
017d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
017e 0000 0000  |    |		.XXX[0x2]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183       |    |		.CONST	0x0183								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0001       |    |		.CONST	0x0001								; Number of locals
0183			BODY_0180:
0183			INIT_0180:
0183 4840       |H@  |		Short_Literal	0x40
0184 483f       |H?  |		Short_Literal	0x3f
0185 e5ff       |    |		Load	0x2,-0x1
0186 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0187 e007       |    |		Load	0x0,0x7
0188 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0189 e234       | 4  |		Load	0x1,0x34
018a 01d4       |    |		Execute	Vector,Structure_Write
018b e234       | 4  |		Load	0x1,0x34
018c 800a       |    |		Call	0x0,0xa
018d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
018e 0000 0000  |    |		.XXX[0x2]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193       |    |		.CONST	0x0193								; Address of begin
0191 0004       |    |		.CONST	0x0004								; Address of exception handler
0192 0001       |    |		.CONST	0x0001								; Number of locals
0193			BODY_0190:
0193			INIT_0190:
0193 00db       |    |		Load_Top	At_Offset_3
0194 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0195 e007       |    |		Load	0x0,0x7
0196 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0197 0162       | b  |		Execute	Variant_Record,Check_In_Type
0198 4840       |H@  |		Short_Literal	0x40
0199 4801       |H   |		Short_Literal	0x1
019a e5ff       |    |		Load	0x2,-0x1
019b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
019c e007       |    |		Load	0x0,0x7
019d 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
019e e007       |    |		Load	0x0,0x7
019f 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01a0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01a1 0000 0000  |    |		.BLANK	0000[0x7]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ae       |    |		.CONST	0x01ae								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0003       |    |		.CONST	0x0003								; Number of locals
01ab			INIT_01a8:
01ab e006       |    |		Load	0x0,0x6
01ac 0337       | 7  |		Declare_Variable	Array
01ad 00e2       |    |		Load_Encached	Integer_Cache
01ae			BODY_01a8:
01ae e5ff       |    |		Load	0x2,-0x1
01af 0059       | Y  |		Store_Top	Discrete,At_Offset_1
01b0 00d8       |    |		Load_Top	At_Offset_0
01b1 800b       |    |		Call	0x0,0xb
01b2 00da       |    |		Load_Top	At_Offset_2
01b3 01d4       |    |		Execute	Vector,Structure_Write
01b4 0092 0465  |   e|		Action	Push_String_Extended,0x465					; "Status ORB is : "
01b6 00da       |    |		Load_Top	At_Offset_2
01b7 01cc       |    |		Execute	Vector,Catenate
01b8 0092 0466  |   f|		Action	Push_String_Extended,0x466					; "="
01ba 01cc       |    |		Execute	Vector,Catenate
01bb e5ff       |    |		Load	0x2,-0x1
01bc e00c       |    |		Load	0x0,0xc
01bd 011c       |    |		Execute	Any,Convert_Unchecked
01be 1c01       |    |		Execute_Immediate	Run_Utility,0x1
01bf 01cc       |    |		Execute	Vector,Catenate
01c0 4801       |H   |		Short_Literal	0x1
01c1 e00d       |    |		Load	0x0,0xd
01c2 e00e       |    |		Load	0x0,0xe
01c3 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
01c4 e5fe       |    |		Load	0x2,-0x2
01c5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01c6 e007       |    |		Load	0x0,0x7
01c7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01c8 0162       | b  |		Execute	Variant_Record,Check_In_Type
01c9 00da       |    |		Load_Top	At_Offset_2
01ca 483f       |H?  |		Short_Literal	0x3f
01cb e007       |    |		Load	0x0,0x7
01cc 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
01cd 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01ce 0000 0000  |    |		.XXX[0x2]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d6       |    |		.CONST	0x01d6								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0003       |    |		.CONST	0x0003								; Number of locals
01d3			INIT_01d0:
01d3 e006       |    |		Load	0x0,0x6
01d4 0337       | 7  |		Declare_Variable	Array
01d5 00e2       |    |		Load_Encached	Integer_Cache
01d6			BODY_01d0:
01d6 e5ff       |    |		Load	0x2,-0x1
01d7 0059       | Y  |		Store_Top	Discrete,At_Offset_1
01d8 00d8       |    |		Load_Top	At_Offset_0
01d9 800b       |    |		Call	0x0,0xb
01da 00da       |    |		Load_Top	At_Offset_2
01db 01d4       |    |		Execute	Vector,Structure_Write
01dc 0092 0467  |   g|		Action	Push_String_Extended,0x467					; "Message ORB is : "
01de 00da       |    |		Load_Top	At_Offset_2
01df 01cc       |    |		Execute	Vector,Catenate
01e0 0092 0466  |   f|		Action	Push_String_Extended,0x466					; "="
01e2 01cc       |    |		Execute	Vector,Catenate
01e3 e5ff       |    |		Load	0x2,-0x1
01e4 e00f       |    |		Load	0x0,0xf
01e5 011c       |    |		Execute	Any,Convert_Unchecked
01e6 1c01       |    |		Execute_Immediate	Run_Utility,0x1
01e7 01cc       |    |		Execute	Vector,Catenate
01e8 4801       |H   |		Short_Literal	0x1
01e9 e00d       |    |		Load	0x0,0xd
01ea e00e       |    |		Load	0x0,0xe
01eb 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
01ec e5fe       |    |		Load	0x2,-0x2
01ed 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01ee e007       |    |		Load	0x0,0x7
01ef 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01f0 0162       | b  |		Execute	Variant_Record,Check_In_Type
01f1 00da       |    |		Load_Top	At_Offset_2
01f2 483d       |H=  |		Short_Literal	0x3d
01f3 e007       |    |		Load	0x0,0x7
01f4 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
01f5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01f6 0000 0000  |    |		.XXX[0x2]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01ff       |    |		.CONST	0x01ff								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0003       |    |		.CONST	0x0003								; Number of locals
01fb			INIT_01f8:
01fb e004       |    |		Load	0x0,0x4
01fc 0337       | 7  |		Declare_Variable	Array
01fd 00d8       |    |		Load_Top	At_Offset_0
01fe 0337       | 7  |		Declare_Variable	Array
01ff			BODY_01f8:
01ff e5ff       |    |		Load	0x2,-0x1
0200 8216       |    |		Call	0x1,0x16
0201 00da       |    |		Load_Top	At_Offset_2
0202 01d4       |    |		Execute	Vector,Structure_Write
0203 e5ff       |    |		Load	0x2,-0x1
0204 8213       |    |		Call	0x1,0x13
0205 00d9       |    |		Load_Top	At_Offset_1
0206 01d4       |    |		Execute	Vector,Structure_Write
0207 e5ff       |    |		Load	0x2,-0x1
0208 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0209 e007       |    |		Load	0x0,0x7
020a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
020b 0162       | b  |		Execute	Variant_Record,Check_In_Type
020c 00da       |    |		Load_Top	At_Offset_2
020d 4801       |H   |		Short_Literal	0x1
020e e007       |    |		Load	0x0,0x7
020f 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0210 00d1       |    |		Pop_Control	Pop_Count_1
0211 e5ff       |    |		Load	0x2,-0x1
0212 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0213 e007       |    |		Load	0x0,0x7
0214 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0215 0162       | b  |		Execute	Variant_Record,Check_In_Type
0216 00d9       |    |		Load_Top	At_Offset_1
0217 4815       |H   |		Short_Literal	0x15
0218 e007       |    |		Load	0x0,0x7
0219 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
021a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
021b 0000 0000  |    |		.BLANK	0000[0x5]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0227       | '  |		.CONST	0x0227								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0002       |    |		.CONST	0x0002								; Number of locals
0223			INIT_0220:
0223 e22f       | /  |		Load	0x1,0x2f
0224 0322       | "  |		Declare_Variable	Record
0225 00d8       |    |		Load_Top	At_Offset_0
0226 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0227			BODY_0220:
0227 00d8       |    |		Load_Top	At_Offset_0
0228 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0229 e007       |    |		Load	0x0,0x7
022a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
022b 0162       | b  |		Execute	Variant_Record,Check_In_Type
022c e007       |    |		Load	0x0,0x7
022d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
022e 00d1       |    |		Pop_Control	Pop_Count_1
022f 00d8       |    |		Load_Top	At_Offset_0
0230 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0231 e007       |    |		Load	0x0,0x7
0232 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0233 0162       | b  |		Execute	Variant_Record,Check_In_Type
0234 4840       |H@  |		Short_Literal	0x40
0235 4801       |H   |		Short_Literal	0x1
0236 e5ff       |    |		Load	0x2,-0x1
0237 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0238 e007       |    |		Load	0x0,0x7
0239 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
023a e007       |    |		Load	0x0,0x7
023b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
023c 00d1       |    |		Pop_Control	Pop_Count_1
023d 00db       |    |		Load_Top	At_Offset_3
023e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
023f e007       |    |		Load	0x0,0x7
0240 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0241 0162       | b  |		Execute	Variant_Record,Check_In_Type
0242 e007       |    |		Load	0x0,0x7
0243 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0244 00d1       |    |		Pop_Control	Pop_Count_1
0245 00db       |    |		Load_Top	At_Offset_3
0246 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0247 e007       |    |		Load	0x0,0x7
0248 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0249 0162       | b  |		Execute	Variant_Record,Check_In_Type
024a 00d9       |    |		Load_Top	At_Offset_1
024b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
024c e007       |    |		Load	0x0,0x7
024d 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
024e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
024f 0000       |    |		.XXX[0x1]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253       | S  |		.CONST	0x0253								; Address of begin
0251 0004       |    |		.CONST	0x0004								; Address of exception handler
0252 0001       |    |		.CONST	0x0001								; Number of locals
0253			BODY_0250:
0253			INIT_0250:
0253 00db       |    |		Load_Top	At_Offset_3
0254 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0255 e007       |    |		Load	0x0,0x7
0256 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0257 0162       | b  |		Execute	Variant_Record,Check_In_Type
0258 00db       |    |		Load_Top	At_Offset_3
0259 e007       |    |		Load	0x0,0x7
025a 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
025b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
025c 0000 0000  |    |		.BLANK	0000[0x4]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0267       | g  |		.CONST	0x0267								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0002       |    |		.CONST	0x0002								; Number of locals
0263			INIT_0260:
0263 e22f       | /  |		Load	0x1,0x2f
0264 0322       | "  |		Declare_Variable	Record
0265 00d8       |    |		Load_Top	At_Offset_0
0266 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0267			BODY_0260:
0267 00d8       |    |		Load_Top	At_Offset_0
0268 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0269 e007       |    |		Load	0x0,0x7
026a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
026b 0162       | b  |		Execute	Variant_Record,Check_In_Type
026c e007       |    |		Load	0x0,0x7
026d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
026e 00d1       |    |		Pop_Control	Pop_Count_1
026f 00d8       |    |		Load_Top	At_Offset_0
0270 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0271 e007       |    |		Load	0x0,0x7
0272 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0273 0162       | b  |		Execute	Variant_Record,Check_In_Type
0274 e5ff       |    |		Load	0x2,-0x1
0275 e007       |    |		Load	0x0,0x7
0276 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0277 00d1       |    |		Pop_Control	Pop_Count_1
0278 00d8       |    |		Load_Top	At_Offset_0
0279 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
027a e007       |    |		Load	0x0,0x7
027b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
027c 0162       | b  |		Execute	Variant_Record,Check_In_Type
027d 0092 0468  |   h|		Action	Push_String_Extended,0x468					; "0000"
027f e007       |    |		Load	0x0,0x7
0280 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0281 00d1       |    |		Pop_Control	Pop_Count_1
0282 e5fe       |    |		Load	0x2,-0x2
0283 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0284 e007       |    |		Load	0x0,0x7
0285 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0286 0162       | b  |		Execute	Variant_Record,Check_In_Type
0287 00d9       |    |		Load_Top	At_Offset_1
0288 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0289 4801       |H   |		Short_Literal	0x1
028a e007       |    |		Load	0x0,0x7
028b 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
028c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
028d 0000 0000  |    |		.XXX[0x3]
028f 0000       |    |
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0297       |    |		.CONST	0x0297								; Address of begin
0291 0004       |    |		.CONST	0x0004								; Address of exception handler
0292 0002       |    |		.CONST	0x0002								; Number of locals
0293			INIT_0290:
0293 e22f       | /  |		Load	0x1,0x2f
0294 0322       | "  |		Declare_Variable	Record
0295 00d8       |    |		Load_Top	At_Offset_0
0296 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0297			BODY_0290:
0297 00d8       |    |		Load_Top	At_Offset_0
0298 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0299 e007       |    |		Load	0x0,0x7
029a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
029b 0162       | b  |		Execute	Variant_Record,Check_In_Type
029c e007       |    |		Load	0x0,0x7
029d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
029e 00d1       |    |		Pop_Control	Pop_Count_1
029f 00d8       |    |		Load_Top	At_Offset_0
02a0 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02a1 e007       |    |		Load	0x0,0x7
02a2 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02a3 0162       | b  |		Execute	Variant_Record,Check_In_Type
02a4 e5ff       |    |		Load	0x2,-0x1
02a5 e007       |    |		Load	0x0,0x7
02a6 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02a7 00d1       |    |		Pop_Control	Pop_Count_1
02a8 00d8       |    |		Load_Top	At_Offset_0
02a9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02aa e007       |    |		Load	0x0,0x7
02ab 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02ac 0162       | b  |		Execute	Variant_Record,Check_In_Type
02ad 0092 0468  |   h|		Action	Push_String_Extended,0x468					; "0000"
02af e007       |    |		Load	0x0,0x7
02b0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02b1 00d1       |    |		Pop_Control	Pop_Count_1
02b2 e5fe       |    |		Load	0x2,-0x2
02b3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02b4 e007       |    |		Load	0x0,0x7
02b5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02b6 0162       | b  |		Execute	Variant_Record,Check_In_Type
02b7 00d9       |    |		Load_Top	At_Offset_1
02b8 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
02b9 4815       |H   |		Short_Literal	0x15
02ba e007       |    |		Load	0x0,0x7
02bb 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
02bc 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02bd 0000 0000  |    |		.XXX[0x3]
02bf 0000       |    |
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3       |    |		.CONST	0x02c3								; Address of begin
02c1 0004       |    |		.CONST	0x0004								; Address of exception handler
02c2 0001       |    |		.CONST	0x0001								; Number of locals
02c3			BODY_02c0:
02c3			INIT_02c0:
02c3 00da       |    |		Load_Top	At_Offset_2
02c4 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
02c5 e007       |    |		Load	0x0,0x7
02c6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02c7 4801       |H   |		Short_Literal	0x1
02c8 e00d       |    |		Load	0x0,0xd
02c9 e00e       |    |		Load	0x0,0xe
02ca 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
02cb 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02cc 0000 0000  |    |		.BLANK	0000[0x4]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d7       |    |		.CONST	0x02d7								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 0002       |    |		.CONST	0x0002								; Number of locals
02d3			INIT_02d0:
02d3 e002       |    |		Load	0x0,0x2
02d4 02ff       |    |		Declare_Variable	Variant_Record
02d5 00d8       |    |		Load_Top	At_Offset_0
02d6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02d7			BODY_02d0:
02d7 00e1       |    |		Load_Encached	Boolean_Cache
02d8 00d9       |    |		Load_Top	At_Offset_1
02d9 e5fe       |    |		Load	0x2,-0x2
02da e010       |    |		Load	0x0,0x10
02db 8011       |    |		Call	0x0,0x11
02dc c5ff       |    |		Store	0x2,-0x1
02dd 00d2       |    |		Pop_Control	Pop_Count_2
02de c5fc       |    |		Store	0x2,-0x4
02df e5fd       |    |		Load	0x2,-0x3
02e0 00d9       |    |		Load_Top	At_Offset_1
02e1 8012       |    |		Call	0x0,0x12
02e2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02e3 0000 0000  |    |		.BLANK	0000[0x5]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb       |    |		.CONST	0x02eb								; Address of begin
02e9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ea 0001       |    |		.CONST	0x0001								; Number of locals
02eb			BODY_02e8:
02eb			INIT_02e8:
02eb 00da       |    |		Load_Top	At_Offset_2
02ec 8013       |    |		Call	0x0,0x13
02ed 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02ee 0000 0000  |    |		.XXX[0x2]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02fa       |    |		.CONST	0x02fa								; Address of begin
02f1 0004       |    |		.CONST	0x0004								; Address of exception handler
02f2 0003       |    |		.CONST	0x0003								; Number of locals
02f3			INIT_02f0:
02f3 e5fd       |    |		Load	0x2,-0x3
02f4 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
02f5 8014       |    |		Call	0x0,0x14
02f6 00e3       |    |		Load_Encached	Natural_Cache
02f7 03f1       |    |		Declare_Variable	Discrete,With_Value
02f8 029f 0423  |   #|		Declare_Subprogram	INIT_0420,For_Call
02fa			BODY_02f0:
02fa 00cf       |    |		Action	Mark_Auxiliary
02fb 48ff       |H   |		Short_Literal	0xff
02fc 00db       |    |		Load_Top	At_Offset_3
02fd 0272       | r  |		Execute	Discrete,Minus
02fe 4801       |H   |		Short_Literal	0x1
02ff 0263       | c  |		Execute	Discrete,Above_Bound
0300 7003       |p   |		Jump_Nonzero	0x304
0301 8403       |    |		Call	0x2,0x3
0302 00c8       |    |		Action	Pop_Auxiliary_Range
0303 3ffd       |?   |		Loop_Increasing	0x301
0304 00ce       |    |		Action	Pop_Auxiliary
0305 e5fc       |    |		Load	0x2,-0x4
0306 00da       |    |		Load_Top	At_Offset_2
0307 e5fd       |    |		Load	0x2,-0x3
0308 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0309 e5fe       |    |		Load	0x2,-0x2
030a e5ff       |    |		Load	0x2,-0x1
030b 8015       |    |		Call	0x0,0x15
030c c5fc       |    |		Store	0x2,-0x4
030d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
030e 0000 0000  |    |		.XXX[0x2]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313       |    |		.CONST	0x0313								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0001       |    |		.CONST	0x0001								; Number of locals
0313			BODY_0310:
0313			INIT_0310:
0313 00db       |    |		Load_Top	At_Offset_3
0314 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0315 e007       |    |		Load	0x0,0x7
0316 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0317 0162       | b  |		Execute	Variant_Record,Check_In_Type
0318 e007       |    |		Load	0x0,0x7
0319 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
031a 00d1       |    |		Pop_Control	Pop_Count_1
031b 00e1       |    |		Load_Encached	Boolean_Cache
031c e5fe       |    |		Load	0x2,-0x2
031d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
031e e5ff       |    |		Load	0x2,-0x1
031f 8016       |    |		Call	0x0,0x16
0320 00d1       |    |		Pop_Control	Pop_Count_1
0321 c5fd       |    |		Store	0x2,-0x3
0322 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0323 0000 0000  |    |		.BLANK	0000[0x5]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b       | +  |		.CONST	0x032b								; Address of begin
0329 0004       |    |		.CONST	0x0004								; Address of exception handler
032a 0001       |    |		.CONST	0x0001								; Number of locals
032b			BODY_0328:
032b			INIT_0328:
032b 00db       |    |		Load_Top	At_Offset_3
032c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
032d 00db       |    |		Load_Top	At_Offset_3
032e 8017       |    |		Call	0x0,0x17
032f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 033e       | >  |		.CONST	0x033e								; Address of begin
0331 0004       |    |		.CONST	0x0004								; Address of exception handler
0332 0003       |    |		.CONST	0x0003								; Number of locals
0333			INIT_0330:
0333 00da       |    |		Load_Top	At_Offset_2
0334 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0335 e007       |    |		Load	0x0,0x7
0336 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0337 00e3       |    |		Load_Encached	Natural_Cache
0338 03f1       |    |		Declare_Variable	Discrete,With_Value
0339 4841       |HA  |		Short_Literal	0x41
033a 00d9       |    |		Load_Top	At_Offset_1
033b 00e9       |    |		Load_Encached	String_Cache
033c 035b       | [  |		Declare_Type	Array,Constrained
033d 0337       | 7  |		Declare_Variable	Array
033e			BODY_0330:
033e e5ff       |    |		Load	0x2,-0x1
033f 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0340 e007       |    |		Load	0x0,0x7
0341 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0342 4841       |HA  |		Short_Literal	0x41
0343 e5ff       |    |		Load	0x2,-0x1
0344 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0345 e007       |    |		Load	0x0,0x7
0346 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0347 00d9       |    |		Load_Top	At_Offset_1
0348 01d4       |    |		Execute	Vector,Structure_Write
0349 4801       |H   |		Short_Literal	0x1
034a e5fe       |    |		Load	0x2,-0x2
034b 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
034c 48ff       |H   |		Short_Literal	0xff
034d 00d9       |    |		Load_Top	At_Offset_1
034e e007       |    |		Load	0x0,0x7
034f 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0350 e002       |    |		Load	0x0,0x2
0351 0162       | b  |		Execute	Variant_Record,Check_In_Type
0352 e5fe       |    |		Load	0x2,-0x2
0353 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0354 e5fe       |    |		Load	0x2,-0x2
0355 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0356 e5fe       |    |		Load	0x2,-0x2
0357 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0358 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0359 0000 0000  |    |		.BLANK	0000[0x7]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0364       | d  |		.CONST	0x0364								; Address of begin
0361 0004       |    |		.CONST	0x0004								; Address of exception handler
0362 0002       |    |		.CONST	0x0002								; Number of locals
0363			INIT_0360:
0363 00e1       |    |		Load_Encached	Boolean_Cache
0364			BODY_0360:
0364 4800       |H   |		Short_Literal	0x0
0365 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0366 00db       |    |		Load_Top	At_Offset_3
0367 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0368 e5ff       |    |		Load	0x2,-0x1
0369 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
036a e007       |    |		Load	0x0,0x7
036b 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
036c 027f       |    |		Execute	Discrete,Equal
036d 6802       |h   |		Jump_Zero	0x370
036e 4801       |H   |		Short_Literal	0x1
036f 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0370 00d8       |    |		Load_Top	At_Offset_0
0371 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0372 0000 0000  |    |		.BLANK	0000[0x6]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037c       | |  |		.CONST	0x037c								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0002       |    |		.CONST	0x0002								; Number of locals
037b			INIT_0378:
037b 00e8       |    |		Load_Encached	Character_Cache
037c			BODY_0378:
037c 00db       |    |		Load_Top	At_Offset_3
037d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
037e e007       |    |		Load	0x0,0x7
037f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0380 0162       | b  |		Execute	Variant_Record,Check_In_Type
0381 e007       |    |		Load	0x0,0x7
0382 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0383 00d1       |    |		Pop_Control	Pop_Count_1
0384 00db       |    |		Load_Top	At_Offset_3
0385 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0386 e5ff       |    |		Load	0x2,-0x1
0387 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0388 e007       |    |		Load	0x0,0x7
0389 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
038a 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
038b 00cf       |    |		Action	Mark_Auxiliary
038c 7816       |x   |		Jump	0x3a3
038d e5ff       |    |		Load	0x2,-0x1
038e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
038f e007       |    |		Load	0x0,0x7
0390 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0391 0162       | b  |		Execute	Variant_Record,Check_In_Type
0392 00da       |    |		Load_Top	At_Offset_2
0393 e007       |    |		Load	0x0,0x7
0394 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0395 00d1       |    |		Pop_Control	Pop_Count_1
0396 e5ff       |    |		Load	0x2,-0x1
0397 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0398 0a01       |    |		Execute_Immediate	Plus,0x1
0399 e5ff       |    |		Load	0x2,-0x1
039a 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
039b e5ff       |    |		Load	0x2,-0x1
039c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
039d e5ff       |    |		Load	0x2,-0x1
039e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
039f e007       |    |		Load	0x0,0x7
03a0 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
03a1 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
03a2 00c9       |    |		Action	Pop_Auxiliary_Loop
03a3 00d9       |    |		Load_Top	At_Offset_1
03a4 0e2f       | /  |		Execute_Immediate	Not_Equal,0x2f
03a5 e5ff       |    |		Load	0x2,-0x1
03a6 822b       | +  |		Call	0x1,0x2b
03a7 0f00       |    |		Execute_Immediate	Equal,0x0
03a8 0279       | y  |		Execute	Discrete,And
03a9 77e3       |w   |		Jump_Nonzero	0x38d
03aa 00ce       |    |		Action	Pop_Auxiliary
03ab 00db       |    |		Load_Top	At_Offset_3
03ac 822b       | +  |		Call	0x1,0x2b
03ad 7006       |p   |		Jump_Nonzero	0x3b4
03ae 00db       |    |		Load_Top	At_Offset_3
03af 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03b0 0a01       |    |		Execute_Immediate	Plus,0x1
03b1 e5ff       |    |		Load	0x2,-0x1
03b2 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03b3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03b4 00db       |    |		Load_Top	At_Offset_3
03b5 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03b6 e007       |    |		Load	0x0,0x7
03b7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
03b8 0162       | b  |		Execute	Variant_Record,Check_In_Type
03b9 00d9       |    |		Load_Top	At_Offset_1
03ba e007       |    |		Load	0x0,0x7
03bb 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
03bc 00d1       |    |		Pop_Control	Pop_Count_1
03bd 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03be 0000 0000  |    |		.XXX[0x2]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3       |    |		.CONST	0x03c3								; Address of begin
03c1 0004       |    |		.CONST	0x0004								; Address of exception handler
03c2 0001       |    |		.CONST	0x0001								; Number of locals
03c3			BODY_03c0:
03c3			INIT_03c0:
03c3 00da       |    |		Load_Top	At_Offset_2
03c4 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
03c5 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
03c6 00cd       |    |		Action	Spare6_Action
03c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb       |    |		.CONST	0x03cb								; Address of begin
03c9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ca 0001       |    |		.CONST	0x0001								; Number of locals
03cb			BODY_03c8:
03cb			INIT_03c8:
03cb 00db       |    |		Load_Top	At_Offset_3
03cc 00db       |    |		Load_Top	At_Offset_3
03cd 822a       | *  |		Call	0x1,0x2a
03ce 00d1       |    |		Pop_Control	Pop_Count_1
03cf 00db       |    |		Load_Top	At_Offset_3
03d0 822c       | ,  |		Call	0x1,0x2c
03d1 00d1       |    |		Pop_Control	Pop_Count_1
03d2 00db       |    |		Load_Top	At_Offset_3
03d3 822d       | -  |		Call	0x1,0x2d
03d4 e5fd       |    |		Load	0x2,-0x3
03d5 016d       | m  |		Execute	Variant_Record,Structure_Write
03d6 00db       |    |		Load_Top	At_Offset_3
03d7 822c       | ,  |		Call	0x1,0x2c
03d8 00d1       |    |		Pop_Control	Pop_Count_1
03d9 00db       |    |		Load_Top	At_Offset_3
03da 822d       | -  |		Call	0x1,0x2d
03db e5fc       |    |		Load	0x2,-0x4
03dc 016d       | m  |		Execute	Variant_Record,Structure_Write
03dd 00db       |    |		Load_Top	At_Offset_3
03de 822c       | ,  |		Call	0x1,0x2c
03df 00d1       |    |		Pop_Control	Pop_Count_1
03e0 00db       |    |		Load_Top	At_Offset_3
03e1 822d       | -  |		Call	0x1,0x2d
03e2 e5fb       |    |		Load	0x2,-0x5
03e3 016d       | m  |		Execute	Variant_Record,Structure_Write
03e4 00db       |    |		Load_Top	At_Offset_3
03e5 822c       | ,  |		Call	0x1,0x2c
03e6 00d1       |    |		Pop_Control	Pop_Count_1
03e7 00db       |    |		Load_Top	At_Offset_3
03e8 822d       | -  |		Call	0x1,0x2d
03e9 e5fa       |    |		Load	0x2,-0x6
03ea 016d       | m  |		Execute	Variant_Record,Structure_Write
03eb 00db       |    |		Load_Top	At_Offset_3
03ec 822c       | ,  |		Call	0x1,0x2c
03ed 00d1       |    |		Pop_Control	Pop_Count_1
03ee 00db       |    |		Load_Top	At_Offset_3
03ef 822d       | -  |		Call	0x1,0x2d
03f0 e5f9       |    |		Load	0x2,-0x7
03f1 016d       | m  |		Execute	Variant_Record,Structure_Write
03f2 0092 0469  |   i|		Action	Push_String_Extended,0x469					; "Orb has extracted the Class_Name : "
03f4 e5fd       |    |		Load	0x2,-0x3
03f5 8018       |    |		Call	0x0,0x18
03f6 01cc       |    |		Execute	Vector,Catenate
03f7 4801       |H   |		Short_Literal	0x1
03f8 e00d       |    |		Load	0x0,0xd
03f9 e00e       |    |		Load	0x0,0xe
03fa 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
03fb 0092 046a  |   j|		Action	Push_String_Extended,0x46a					; "Orb has extracted the Object_Name : "
03fd e5fc       |    |		Load	0x2,-0x4
03fe 8018       |    |		Call	0x0,0x18
03ff 01cc       |    |		Execute	Vector,Catenate
0400 4801       |H   |		Short_Literal	0x1
0401 e00d       |    |		Load	0x0,0xd
0402 e00e       |    |		Load	0x0,0xe
0403 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0404 0092 046b  |   k|		Action	Push_String_Extended,0x46b					; "Orb has extracted the Method_Name : "
0406 e5fb       |    |		Load	0x2,-0x5
0407 8018       |    |		Call	0x0,0x18
0408 01cc       |    |		Execute	Vector,Catenate
0409 4801       |H   |		Short_Literal	0x1
040a e00d       |    |		Load	0x0,0xd
040b e00e       |    |		Load	0x0,0xe
040c 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
040d 0092 046c  |   l|		Action	Push_String_Extended,0x46c					; "Orb has extracted the Number_Of_Parameter : "
040f e5fa       |    |		Load	0x2,-0x6
0410 8018       |    |		Call	0x0,0x18
0411 01cc       |    |		Execute	Vector,Catenate
0412 4801       |H   |		Short_Literal	0x1
0413 e00d       |    |		Load	0x0,0xd
0414 e00e       |    |		Load	0x0,0xe
0415 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0416 0092 046d  |   m|		Action	Push_String_Extended,0x46d					; "Orb has extracted the Parameters : "
0418 e5f9       |    |		Load	0x2,-0x7
0419 8018       |    |		Call	0x0,0x18
041a 01cc       |    |		Execute	Vector,Catenate
041b 4801       |H   |		Short_Literal	0x1
041c e00d       |    |		Load	0x0,0xd
041d e00e       |    |		Load	0x0,0xe
041e 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
041f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0423       | #  |		.CONST	0x0423								; Address of begin
0421 0004       |    |		.CONST	0x0004								; Address of exception handler
0422 0001       |    |		.CONST	0x0001								; Number of locals
0423			BODY_0420:
0423			INIT_0420:
0423 e5fd       |    |		Load	0x2,-0x3
0424 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0425 e007       |    |		Load	0x0,0x7
0426 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0427 0162       | b  |		Execute	Variant_Record,Check_In_Type
0428 4824       |H$  |		Short_Literal	0x24
0429 e007       |    |		Load	0x0,0x7
042a 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
042b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
042c 0000 0000  |    |		.BLANK	0000[0x4]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0433       | 3  |		.CONST	0x0433								; Address of begin
0431 0004       |    |		.CONST	0x0004								; Address of exception handler
0432 0001       |    |		.CONST	0x0001								; Number of locals
0433			BODY_0430:
0433			INIT_0430:
0433 4601       |F   |		Jump_Case	0x2
0434 7801       |x   |		Jump	0x436								; case 0x0
0435 7807       |x   |		Jump	0x43d								; case 0x1
0436 00da       |    |		Load_Top	At_Offset_2
0437 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0438 0125       | %  |		Execute	Any,Set_Constraint
0439 00da       |    |		Load_Top	At_Offset_2
043a 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
043b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
043c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
043d 00da       |    |		Load_Top	At_Offset_2
043e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
043f 0125       | %  |		Execute	Any,Set_Constraint
0440 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0441 0000 0000  |    |		.BLANK	0000[0x7]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 044b       | K  |		.CONST	0x044b								; Address of begin
0449 0004       |    |		.CONST	0x0004								; Address of exception handler
044a 0001       |    |		.CONST	0x0001								; Number of locals
044b			BODY_0448:
044b			INIT_0448:
044b 4601       |F   |		Jump_Case	0x2
044c 7801       |x   |		Jump	0x44e								; case 0x0
044d 7810       |x   |		Jump	0x45e								; case 0x1
044e 00da       |    |		Load_Top	At_Offset_2
044f 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0450 0125       | %  |		Execute	Any,Set_Constraint
0451 00da       |    |		Load_Top	At_Offset_2
0452 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0453 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0454 00da       |    |		Load_Top	At_Offset_2
0455 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0456 0125       | %  |		Execute	Any,Set_Constraint
0457 00da       |    |		Load_Top	At_Offset_2
0458 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0459 1c00       |    |		Execute_Immediate	Run_Utility,0x0
045a 4801       |H   |		Short_Literal	0x1
045b 00db       |    |		Load_Top	At_Offset_3
045c 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
045d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
045e 00da       |    |		Load_Top	At_Offset_2
045f 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0460 0125       | %  |		Execute	Any,Set_Constraint
0461 00da       |    |		Load_Top	At_Offset_2
0462 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0463 0125       | %  |		Execute	Any,Set_Constraint
0464 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0465 ; --------------------------------------------------------------------------------------
0465 ; STRING TABLE
0465 ; --------------------------------------------------------------------------------------
0465 0014       |    |		.STRTAB	0x0014->0x046f							; "Status ORB is : "
0466 0022       | "  |		.STRTAB	0x0022->0x0477							; "="
0467 0021       | !  |		.STRTAB	0x0021->0x0477							; "Message ORB is : "
0468 0030       | 0  |		.STRTAB	0x0030->0x0480							; "0000"
0469 0032       | 2  |		.STRTAB	0x0032->0x0482							; "Orb has extracted the Class_Name : "
046a 0053       | S  |		.STRTAB	0x0053->0x0493							; "Orb has extracted the Object_Name : "
046b 0075       | u  |		.STRTAB	0x0075->0x04a5							; "Orb has extracted the Method_Name : "
046c 0097       |    |		.STRTAB	0x0097->0x04b7							; "Orb has extracted the Number_Of_Parameter : "
046d 00c1       |    |		.STRTAB	0x00c1->0x04cd							; "Orb has extracted the Parameters : "
046e 00e2       |    |		.STREND 0x00e2->0x04df
046f 5374 6174  |Stat|		.STRTAB_STRINGS
04df 0000       |    |		.XXX[0x1]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; Debug Table
04e0 ; --------------------------------------------------------------------------------------
04e0 0004 000a  |    |		.DEBUG4	0x0004,0x000a,0x645a,0x0000,0x0001,0x0026
04e6 000b 057e  |   ~|		.DBG4T	0x000b,0x057e,0xc000,0x8000
04ea 005a 05c6  | Z  |		.DBG4T	0x005a,0x05c6,0xc000,0x0000
04ee 00ab 05ed  |    |		.DBG4T	0x00ab,0x05ed,0x1002,0x0000
04f2 00bb 05f0  |    |		.DBG4T	0x00bb,0x05f0,0x1002,0x0000
04f6 00c3 05f3  |    |		.DBG4T	0x00c3,0x05f3,0x1001,0x0000
04fa 00db 05f7  |    |		.DBG4T	0x00db,0x05f7,0x1001,0x0000
04fe 00eb 05fa  |    |		.DBG4T	0x00eb,0x05fa,0x1002,0x0000
0502 00fb 05fe  |    |		.DBG4T	0x00fb,0x05fe,0x1002,0x0000
0506 010b 0602  |    |		.DBG4T	0x010b,0x0602,0x1002,0x0000
050a 011b 0606  |    |		.DBG4T	0x011b,0x0606,0x1002,0x0000
050e 012b 060a  | +  |		.DBG4T	0x012b,0x060a,0x1002,0x0000
0512 013b 060e  | ;  |		.DBG4T	0x013b,0x060e,0x1002,0x0000
0516 014b 0612  | K  |		.DBG4T	0x014b,0x0612,0x1002,0x0000
051a 015b 0616  | [  |		.DBG4T	0x015b,0x0616,0x1002,0x0000
051e 0173 061d  | s  |		.DBG4T	0x0173,0x061d,0x1002,0x0000
0522 0183 0621  |   !|		.DBG4T	0x0183,0x0621,0x1002,0x0000
0526 0193 0625  |   %|		.DBG4T	0x0193,0x0625,0x1001,0x0000
052a 01ab 0628  |   (|		.DBG4T	0x01ab,0x0628,0x1001,0x0000
052e 01d3 0630  |   0|		.DBG4T	0x01d3,0x0630,0x1001,0x0000
0532 01fb 0638  |   8|		.DBG4T	0x01fb,0x0638,0x1001,0x0000
0536 0223 063f  | # ?|		.DBG4T	0x0223,0x063f,0x1001,0x0000
053a 0253 0646  | S F|		.DBG4T	0x0253,0x0646,0x1001,0x0000
053e 0263 0649  | c I|		.DBG4T	0x0263,0x0649,0x1001,0x0000
0542 0293 0650  |   P|		.DBG4T	0x0293,0x0650,0x1001,0x0000
0546 02c3 0657  |   W|		.DBG4T	0x02c3,0x0657,0x1001,0x0000
054a 02d3 065a  |   Z|		.DBG4T	0x02d3,0x065a,0x1001,0x0000
054e 02eb 065f  |   _|		.DBG4T	0x02eb,0x065f,0x1001,0x0000
0552 02f3 0662  |   b|		.DBG4T	0x02f3,0x0662,0x1001,0x0000
0556 0313 0668  |   h|		.DBG4T	0x0313,0x0668,0x1001,0x0000
055a 032b 066c  | + l|		.DBG4T	0x032b,0x066c,0x1001,0x0000
055e 0333 066f  | 3 o|		.DBG4T	0x0333,0x066f,0x1001,0x0000
0562 0363 0677  | c w|		.DBG4T	0x0363,0x0677,0x1002,0x0000
0566 037b 067e  | { ~|		.DBG4T	0x037b,0x067e,0x1001,0x4000
056a 03c3 0693  |    |		.DBG4T	0x03c3,0x0693,0x1002,0x0000
056e 03cb 0696  |    |		.DBG4T	0x03cb,0x0696,0x1001,0x0000
0572 0423 06a8  | #  |		.DBG4T	0x0423,0x06a8,0x1004,0x0000
0576 0433 0000  | 3  |		.DBG4T	0x0433,0x0000,0x1005,0x0000
057a 044b 0000  | K  |		.DBG4T	0x044b,0x0000,0x1005,0x0000
057e ; --------------------------------------------------------------------------------------
057e ; Debug chain
057e ; --------------------------------------------------------------------------------------
057e 0023 0000  | #  |		.DBGLEN	0x0023,0x0000
0580 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d,0x003f,0x0041,0x0043,0x0045,0x0047,0x0049,0x004b,0x004d,0x0052
05a3 0002 0003  |    |		.XXX[0x23]
05a5 0004 0005  |    |
05a7 0006 0007  |    |
05a9 0008 0009  |    |
05ab 000a 000b  |    |
05ad 000c 000d  |    |
05af 000e 000f  |    |
05b1 0010 0011  |    |
05b3 0012 0013  |    |
05b5 0014 0015  |    |
05b7 0016 0017  |    |
05b9 0018 0019  |    |
05bb 001a 001b  |    |
05bd 001c 001d  |    |
05bf 001f 0020  |    |
05c1 0021 0022  | ! "|
05c3 0023 0024  | # $|
05c5 0025       | %  |
05c6 ; --------------------------------------------------------------------------------------
05c6 ; Debug chain
05c6 ; --------------------------------------------------------------------------------------
05c6 0025 0000  | %  |		.DBGLEN	0x0025,0x0000
05c8 005a 005c  | Z \|		.DBGLNO	0x005a,0x005c,0x005e,0x0060,0x0062,0x0064,0x0066,0x0068,0x006a,0x006c,0x006e,0x0070,0x0072,0x0074,0x0076,0x0078,0x007a,0x007c,0x007e,0x0080,0x0082,0x0084,0x0086,0x0088,0x008a,0x008c,0x008e,0x0090,0x0092,0x0094,0x0096,0x0098,0x009a,0x009c,0x009e,0x00a0,0x00a2
05ed ; --------------------------------------------------------------------------------------
05ed ; Debug chain
05ed ; --------------------------------------------------------------------------------------
05ed 0000 0001  |    |		.DBGLEN	0x0000,0x0001
05ef 00ab       |    |		.DBGLNO	0x00ab
05f0 ; --------------------------------------------------------------------------------------
05f0 ; Debug chain
05f0 ; --------------------------------------------------------------------------------------
05f0 0000 0001  |    |		.DBGLEN	0x0000,0x0001
05f2 00bb       |    |		.DBGLNO	0x00bb
05f3 ; --------------------------------------------------------------------------------------
05f3 ; Debug chain
05f3 ; --------------------------------------------------------------------------------------
05f3 0000 0002  |    |		.DBGLEN	0x0000,0x0002
05f5 00c3 00cb  |    |		.DBGLNO	0x00c3,0x00cb
05f7 ; --------------------------------------------------------------------------------------
05f7 ; Debug chain
05f7 ; --------------------------------------------------------------------------------------
05f7 0000 0001  |    |		.DBGLEN	0x0000,0x0001
05f9 00db       |    |		.DBGLNO	0x00db
05fa ; --------------------------------------------------------------------------------------
05fa ; Debug chain
05fa ; --------------------------------------------------------------------------------------
05fa 0000 0002  |    |		.DBGLEN	0x0000,0x0002
05fc 00eb 00f3  |    |		.DBGLNO	0x00eb,0x00f3
05fe ; --------------------------------------------------------------------------------------
05fe ; Debug chain
05fe ; --------------------------------------------------------------------------------------
05fe 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0600 00fb 0103  |    |		.DBGLNO	0x00fb,0x0103
0602 ; --------------------------------------------------------------------------------------
0602 ; Debug chain
0602 ; --------------------------------------------------------------------------------------
0602 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0604 010b 0113  |    |		.DBGLNO	0x010b,0x0113
0606 ; --------------------------------------------------------------------------------------
0606 ; Debug chain
0606 ; --------------------------------------------------------------------------------------
0606 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0608 011b 0123  |   #|		.DBGLNO	0x011b,0x0123
060a ; --------------------------------------------------------------------------------------
060a ; Debug chain
060a ; --------------------------------------------------------------------------------------
060a 0000 0002  |    |		.DBGLEN	0x0000,0x0002
060c 012b 0133  | + 3|		.DBGLNO	0x012b,0x0133
060e ; --------------------------------------------------------------------------------------
060e ; Debug chain
060e ; --------------------------------------------------------------------------------------
060e 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0610 013b 0143  | ; C|		.DBGLNO	0x013b,0x0143
0612 ; --------------------------------------------------------------------------------------
0612 ; Debug chain
0612 ; --------------------------------------------------------------------------------------
0612 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0614 014b 0153  | K S|		.DBGLNO	0x014b,0x0153
0616 ; --------------------------------------------------------------------------------------
0616 ; Debug chain
0616 ; --------------------------------------------------------------------------------------
0616 0002 0003  |    |		.DBGLEN	0x0002,0x0003
0618 015b 015f  | [ _|		.DBGLNO	0x015b,0x015f,0x0161,0x0165,0x016c
061d ; --------------------------------------------------------------------------------------
061d ; Debug chain
061d ; --------------------------------------------------------------------------------------
061d 0000 0002  |    |		.DBGLEN	0x0000,0x0002
061f 0173 017b  | s {|		.DBGLNO	0x0173,0x017b
0621 ; --------------------------------------------------------------------------------------
0621 ; Debug chain
0621 ; --------------------------------------------------------------------------------------
0621 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0623 0183 018b  |    |		.DBGLNO	0x0183,0x018b
0625 ; --------------------------------------------------------------------------------------
0625 ; Debug chain
0625 ; --------------------------------------------------------------------------------------
0625 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0627 0193       |    |		.DBGLNO	0x0193
0628 ; --------------------------------------------------------------------------------------
0628 ; Debug chain
0628 ; --------------------------------------------------------------------------------------
0628 0002 0004  |    |		.DBGLEN	0x0002,0x0004
062a 01ab 01ad  |    |		.DBGLNO	0x01ab,0x01ad,0x01ae,0x01b0,0x01b4,0x01c4
0630 ; --------------------------------------------------------------------------------------
0630 ; Debug chain
0630 ; --------------------------------------------------------------------------------------
0630 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0632 01d3 01d5  |    |		.DBGLNO	0x01d3,0x01d5,0x01d6,0x01d8,0x01dc,0x01ec
0638 ; --------------------------------------------------------------------------------------
0638 ; Debug chain
0638 ; --------------------------------------------------------------------------------------
0638 0001 0004  |    |		.DBGLEN	0x0001,0x0004
063a 01fb 01ff  |    |		.DBGLNO	0x01fb,0x01ff,0x0203,0x0207,0x0211
063f ; --------------------------------------------------------------------------------------
063f ; Debug chain
063f ; --------------------------------------------------------------------------------------
063f 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0641 0223 0227  | # '|		.DBGLNO	0x0223,0x0227,0x022f,0x023d,0x0245
0646 ; --------------------------------------------------------------------------------------
0646 ; Debug chain
0646 ; --------------------------------------------------------------------------------------
0646 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0648 0253       | S  |		.DBGLNO	0x0253
0649 ; --------------------------------------------------------------------------------------
0649 ; Debug chain
0649 ; --------------------------------------------------------------------------------------
0649 0001 0004  |    |		.DBGLEN	0x0001,0x0004
064b 0263 0267  | c g|		.DBGLNO	0x0263,0x0267,0x026f,0x0278,0x0282
0650 ; --------------------------------------------------------------------------------------
0650 ; Debug chain
0650 ; --------------------------------------------------------------------------------------
0650 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0652 0293 0297  |    |		.DBGLNO	0x0293,0x0297,0x029f,0x02a8,0x02b2
0657 ; --------------------------------------------------------------------------------------
0657 ; Debug chain
0657 ; --------------------------------------------------------------------------------------
0657 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0659 02c3       |    |		.DBGLNO	0x02c3
065a ; --------------------------------------------------------------------------------------
065a ; Debug chain
065a ; --------------------------------------------------------------------------------------
065a 0001 0002  |    |		.DBGLEN	0x0001,0x0002
065c 02d3 02d7  |    |		.DBGLNO	0x02d3,0x02d7,0x02df
065f ; --------------------------------------------------------------------------------------
065f ; Debug chain
065f ; --------------------------------------------------------------------------------------
065f 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0661 02eb       |    |		.DBGLNO	0x02eb
0662 ; --------------------------------------------------------------------------------------
0662 ; Debug chain
0662 ; --------------------------------------------------------------------------------------
0662 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0664 02f3 02fb  |    |		.DBGLNO	0x02f3,0x02fb,0x0301,0x0305
0668 ; --------------------------------------------------------------------------------------
0668 ; Debug chain
0668 ; --------------------------------------------------------------------------------------
0668 0000 0002  |    |		.DBGLEN	0x0000,0x0002
066a 0313 031b  |    |		.DBGLNO	0x0313,0x031b
066c ; --------------------------------------------------------------------------------------
066c ; Debug chain
066c ; --------------------------------------------------------------------------------------
066c 0000 0001  |    |		.DBGLEN	0x0000,0x0001
066e 032b       | +  |		.DBGLNO	0x032b
066f ; --------------------------------------------------------------------------------------
066f ; Debug chain
066f ; --------------------------------------------------------------------------------------
066f 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0671 0333 0339  | 3 9|		.DBGLNO	0x0333,0x0339,0x033e,0x0349,0x034c,0x0354
0677 ; --------------------------------------------------------------------------------------
0677 ; Debug chain
0677 ; --------------------------------------------------------------------------------------
0677 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0679 0363 0364  | c d|		.DBGLNO	0x0363,0x0364,0x0366,0x036e,0x0370
067e ; --------------------------------------------------------------------------------------
067e ; Debug chain
067e ; --------------------------------------------------------------------------------------
067e 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0680 037b 037c  | { ||		.DBGLNO	0x037b,0x037c,0x0384,0x038d,0x0396,0x039b,0x03a3,0x03ab,0x03ae,0x03b4
068a 0001 0002  |    |		.XXX[0x9]
068c 0004 0005  |    |
068e 0006 0003  |    |
0690 0007 0008  |    |
0692 0009       |    |
0693 ; --------------------------------------------------------------------------------------
0693 ; Debug chain
0693 ; --------------------------------------------------------------------------------------
0693 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0695 03c3       |    |		.DBGLNO	0x03c3
0696 ; --------------------------------------------------------------------------------------
0696 ; Debug chain
0696 ; --------------------------------------------------------------------------------------
0696 0000 0010  |    |		.DBGLEN	0x0000,0x0010
0698 03cb 03cf  |    |		.DBGLNO	0x03cb,0x03cf,0x03d2,0x03d6,0x03d9,0x03dd,0x03e0,0x03e4,0x03e7,0x03eb,0x03ee,0x03f2,0x03fb,0x0404,0x040d,0x0416
06a8 ; --------------------------------------------------------------------------------------
06a8 ; Debug chain
06a8 ; --------------------------------------------------------------------------------------
06a8 0000 0001  |    |		.DBGLEN	0x0000,0x0001
06aa 0423       | #  |		.DBGLNO	0x0423
06ab 0000 0000  |    |		.BLANK	0000[0x155]