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

⟦3ab675d2b⟧

    Length: 5120 (0x1400)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_10018b7

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 06b0       |    |		.CONST	0x06b0								; 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 0004       |    |		.CONST	0x0004								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 011b       |    |		.CONST	0x011b								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0038       | 8  |		.CONST	0x0038								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional
000c 00c4       |    |		Action	Make_Default
000d 0007       |    |		Action	Break_Optional
000e 0007       |    |		Action	Break_Optional
000f 00e4       |    |		Load_Encached	Positive_Cache
0010 0266       | f  |		Execute	Discrete,Bounds
0011 e003       |    |		Load	0x0,0x3
0012 029f 0123  |   #|		Declare_Subprogram	INIT_0120,For_Call
0014 4801       |H   |		Short_Literal	0x1
0015 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
0016 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated
0018 0007       |    |		Action	Break_Optional
0019 4800       |H   |		Short_Literal	0x0
001a e004       |    |		Load	0x0,0x4
001b 00e3       |    |		Load_Encached	Natural_Cache
001c 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
001d 4801       |H   |		Short_Literal	0x1
001e e004       |    |		Load	0x0,0x4
001f 00da       |    |		Load_Top	At_Offset_2
0020 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0021 00d8       |    |		Load_Top	At_Offset_0
0022 0266       | f  |		Execute	Discrete,Bounds
0023 e005       |    |		Load	0x0,0x5
0024 029f 015b  |   [|		Declare_Subprogram	INIT_0158,For_Call
0026 4801       |H   |		Short_Literal	0x1
0027 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
0028 00d9       |    |		Load_Top	At_Offset_1
0029 0266       | f  |		Execute	Discrete,Bounds
002a e006       |    |		Load	0x0,0x6
002b 02a0       |    |		Declare_Subprogram	Null_Subprogram
002c 4801       |H   |		Short_Literal	0x1
002d 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
002e 0007       |    |		Action	Break_Optional
002f 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated
0031 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated
0033 029a 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call,Visible,Unelaborated
0035 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated
0037 029a 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call,Visible,Unelaborated
0039 029a 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call,Visible,Unelaborated
003b 029a 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Visible,Unelaborated
003d 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated
003f 029a 0203  |    |		Declare_Subprogram	INIT_0200,For_Outer_Call,Visible,Unelaborated
0041 029a 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call,Visible,Unelaborated
0043 029a 026b  |   k|		Declare_Subprogram	INIT_0268,For_Outer_Call,Visible,Unelaborated
0045 029a 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call,Visible,Unelaborated
0047 029a 0293  |    |		Declare_Subprogram	INIT_0290,For_Outer_Call,Visible,Unelaborated
0049 029a 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call,Visible,Unelaborated
004b 029a 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call,Visible,Unelaborated
004d 029a 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call,Visible,Unelaborated
004f 029a 0343  |   C|		Declare_Subprogram	INIT_0340,For_Outer_Call,Visible,Unelaborated
0051 029a 037b  |   {|		Declare_Subprogram	INIT_0378,For_Outer_Call,Visible,Unelaborated
0053 029a 03b3  |    |		Declare_Subprogram	INIT_03b0,For_Outer_Call,Visible,Unelaborated
0055 029a 03db  |    |		Declare_Subprogram	INIT_03d8,For_Outer_Call,Visible,Unelaborated
0057 029a 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Outer_Call,Visible,Unelaborated
0059 029a 0423  |   #|		Declare_Subprogram	INIT_0420,For_Outer_Call,Visible,Unelaborated
005b 029a 044b  |   K|		Declare_Subprogram	INIT_0448,For_Outer_Call,Visible,Unelaborated
005d 0093 0000  |    |		push_full_address	0x0
005f 60e0       |`   |		Indirect_Literal	Discrete,0x140,{0x80000000, 0x00020000}
0060 0273       | s  |		Execute	Discrete,Plus
0061 e007       |    |		Load	0x0,0x7
0062 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0063 60d8       |`   |		Indirect_Literal	Discrete,0x13c,{0x00000000, 0x0000ffff}
0064 0279       | y  |		Execute	Discrete,And
0065 0273       | s  |		Execute	Discrete,Plus
0066 0129       | )  |		Execute	Any,Make_Visible
0067 0007       |    |		Action	Break_Optional
0068 00e3       |    |		Load_Encached	Natural_Cache
0069 4800       |H   |		Short_Literal	0x0
006a 4801       |H   |		Short_Literal	0x1
006b 4801       |H   |		Short_Literal	0x1
006c 4805       |H   |		Short_Literal	0x5
006d 0319       |    |		Declare_Type	Variant_Record,Incomplete,Visible
006e 029f 049b  |    |		Declare_Subprogram	INIT_0498,For_Call
0070 00d9       |    |		Load_Top	At_Offset_1
0071 012a       | *  |		Execute	Any,Change_Utility
0072 0007       |    |		Action	Break_Optional
0073 00d8       |    |		Load_Top	At_Offset_0
0074 02a0       |    |		Declare_Subprogram	Null_Subprogram
0075 4818       |H   |		Short_Literal	0x18
0076 03d4       |    |		Declare_Type	Access,Defined,Visible,Accesses_Protected
0077 00d8       |    |		Load_Top	At_Offset_0
0078 0129       | )  |		Execute	Any,Make_Visible
0079 c20d       |    |		Store	0x1,0xd
007a 00bf       |    |		Action	Accept_Activation
007b e210       |    |		Load	0x1,0x10
007c e008       |    |		Load	0x0,0x8
007d 4801       |H   |		Short_Literal	0x1
007e e212       |    |		Load	0x1,0x12
007f 01dc       |    |		Execute	Vector,Last
0080 e210       |    |		Load	0x1,0x10
0081 0269       | i  |		Execute	Discrete,Last
0082 026c       | l  |		Execute	Discrete,Minimum
0083 e212       |    |		Load	0x1,0x12
0084 034e       | N  |		QQ_Declare_Type	Array,Constrained,Bounds_With_Object
0085 029f 0503  |    |		Declare_Subprogram	INIT_0500,For_Call
0087 4800       |H   |		Short_Literal	0x0
0088 4801       |H   |		Short_Literal	0x1
0089 4801       |H   |		Short_Literal	0x1
008a 4800       |H   |		Short_Literal	0x0
008b 4801       |H   |		Short_Literal	0x1
008c 4801       |H   |		Short_Literal	0x1
008d 031d       |    |		Declare_Type	Variant_Record,Defined
008e 4800       |H   |		Short_Literal	0x0
008f 00d9       |    |		Load_Top	At_Offset_1
0090 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0091 00d8       |    |		Load_Top	At_Offset_0
0092 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0093 0335       | 5  |		Declare_Variable	Array,Duplicate
0094 00cd       |    |		Action	Spare6_Action
0095 00d9       |    |		Load_Top	At_Offset_1
0096 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0097 01d9       |    |		Execute	Vector,Reverse_Bounds
0098 0263       | c  |		Execute	Discrete,Above_Bound
0099 7005       |p   |		Jump_Nonzero	0x9f
009a e009       |    |		Load	0x0,0x9
009b 00d9       |    |		Load_Top	At_Offset_1
009c e230       | 0  |		Load	0x1,0x30
009d 01d6       |    |		Execute	Vector,Field_Write
009e 3ffb       |?   |		Loop_Increasing	0x9a
009f 00d9       |    |		Load_Top	At_Offset_1
00a0 00d8       |    |		Load_Top	At_Offset_0
00a1 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00a2 00da       |    |		Load_Top	At_Offset_2
00a3 01da       |    |		Execute	Vector,Bounds
00a4 00da       |    |		Load_Top	At_Offset_2
00a5 01da       |    |		Execute	Vector,Bounds
00a6 00da       |    |		Load_Top	At_Offset_2
00a7 027f       |    |		Execute	Discrete,Equal
00a8 7001       |p   |		Jump_Nonzero	0xaa
00a9 08e0       |    |		Execute_Immediate	Raise,0xe0
00aa 00cd       |    |		Action	Spare6_Action
00ab 027f       |    |		Execute	Discrete,Equal
00ac 7001       |p   |		Jump_Nonzero	0xae
00ad 08e0       |    |		Execute_Immediate	Raise,0xe0
00ae 00d2       |    |		Pop_Control	Pop_Count_2
00af 00d9       |    |		Load_Top	At_Offset_1
00b0 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
00b1 e00a       |    |		Load	0x0,0xa
00b2 00d9       |    |		Load_Top	At_Offset_1
00b3 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00b4 00e3       |    |		Load_Encached	Natural_Cache
00b5 0266       | f  |		Execute	Discrete,Bounds
00b6 00db       |    |		Load_Top	At_Offset_3
00b7 029f 054b  |   K|		Declare_Subprogram	INIT_0548,For_Call
00b9 4801       |H   |		Short_Literal	0x1
00ba 0350       | P  |		Declare_Type	Array,Defined,Bounds_With_Object
00bb e210       |    |		Load	0x1,0x10
00bc 4801       |H   |		Short_Literal	0x1
00bd e213       |    |		Load	0x1,0x13
00be 01dc       |    |		Execute	Vector,Last
00bf e210       |    |		Load	0x1,0x10
00c0 0269       | i  |		Execute	Discrete,Last
00c1 026c       | l  |		Execute	Discrete,Minimum
00c2 e213       |    |		Load	0x1,0x13
00c3 034e       | N  |		QQ_Declare_Type	Array,Constrained,Bounds_With_Object
00c4 029f 0563  |   c|		Declare_Subprogram	INIT_0560,For_Call
00c6 4800       |H   |		Short_Literal	0x0
00c7 4801       |H   |		Short_Literal	0x1
00c8 4800       |H   |		Short_Literal	0x0
00c9 4800       |H   |		Short_Literal	0x0
00ca 4801       |H   |		Short_Literal	0x1
00cb 4801       |H   |		Short_Literal	0x1
00cc 031d       |    |		Declare_Type	Variant_Record,Defined
00cd e00b       |    |		Load	0x0,0xb
00ce 00e3       |    |		Load_Encached	Natural_Cache
00cf 00da       |    |		Load_Top	At_Offset_2
00d0 4801       |H   |		Short_Literal	0x1
00d1 6066       |`f  |		Indirect_Literal	Discrete,0x138,{0x00000000, 0x7fffffff}
00d2 e230       | 0  |		Load	0x1,0x30
00d3 034e       | N  |		QQ_Declare_Type	Array,Constrained,Bounds_With_Object
00d4 029f 049b  |    |		Declare_Subprogram	INIT_0498,For_Call
00d6 4800       |H   |		Short_Literal	0x0
00d7 4801       |H   |		Short_Literal	0x1
00d8 4803       |H   |		Short_Literal	0x3
00d9 e22c       | ,  |		Load	0x1,0x2c
00da 0307       |    |		Complete_Type	Variant_Record,By_Defining
00db e22d       | -  |		Load	0x1,0x2d
00dc 03c4       |    |		Complete_Type	Access,By_Component_Completion
00dd 029d 05a3  |    |		Declare_Subprogram	INIT_05a0,For_Outer_Call
00df 029d 05b3  |    |		Declare_Subprogram	INIT_05b0,For_Outer_Call
00e1 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
00e2 00c7       |    |		Action	Elaborate_Subprogram
00e3 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
00e4 00c7       |    |		Action	Elaborate_Subprogram
00e5 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
00e6 00c7       |    |		Action	Elaborate_Subprogram
00e7 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
00e8 00c7       |    |		Action	Elaborate_Subprogram
00e9 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
00ea 00c7       |    |		Action	Elaborate_Subprogram
00eb 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
00ec 00c7       |    |		Action	Elaborate_Subprogram
00ed 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
00ee 00c7       |    |		Action	Elaborate_Subprogram
00ef 029d 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call
00f1 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
00f2 00c7       |    |		Action	Elaborate_Subprogram
00f3 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
00f4 00c7       |    |		Action	Elaborate_Subprogram
00f5 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
00f6 00c7       |    |		Action	Elaborate_Subprogram
00f7 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
00f8 00c7       |    |		Action	Elaborate_Subprogram
00f9 029d 05e3  |    |		Declare_Subprogram	INIT_05e0,For_Outer_Call
00fb 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
00fc 00c7       |    |		Action	Elaborate_Subprogram
00fd 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
00fe 00c7       |    |		Action	Elaborate_Subprogram
00ff 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0100 00c7       |    |		Action	Elaborate_Subprogram
0101 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0102 00c7       |    |		Action	Elaborate_Subprogram
0103 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
0104 00c7       |    |		Action	Elaborate_Subprogram
0105 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
0106 00c7       |    |		Action	Elaborate_Subprogram
0107 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0108 00c7       |    |		Action	Elaborate_Subprogram
0109 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
010a 00c7       |    |		Action	Elaborate_Subprogram
010b 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
010c 00c7       |    |		Action	Elaborate_Subprogram
010d 029d 05fb  |    |		Declare_Subprogram	INIT_05f8,For_Outer_Call
010f 029d 0613  |    |		Declare_Subprogram	INIT_0610,For_Outer_Call
0111 029d 063b  |   ;|		Declare_Subprogram	INIT_0638,For_Outer_Call
0113 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0114 00c7       |    |		Action	Elaborate_Subprogram
0115 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
0116 00c7       |    |		Action	Elaborate_Subprogram
0117 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
0118 00c7       |    |		Action	Elaborate_Subprogram
0119 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
011a 00c7       |    |		Action	Elaborate_Subprogram
011b			BODY_0008:
011b 00bc       |    |		Action	Signal_Activated
011c 00bb       |    |		Action	Signal_Completion
011d 0000 0000  |    |		.XXX[0x3]
011f 0000       |    |
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123       | #  |		.CONST	0x0123								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0001       |    |		.CONST	0x0001								; Number of locals
0123			BODY_0120:
0123			INIT_0120:
0123 00d1       |    |		Pop_Control	Pop_Count_1
0124 00da       |    |		Load_Top	At_Offset_2
0125 01d8       |    |		Execute	Vector,Element_Type
0126 0322       | "  |		Declare_Variable	Record
0127 00d8       |    |		Load_Top	At_Offset_0
0128 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0129 00db       |    |		Load_Top	At_Offset_3
012a 01dc       |    |		Execute	Vector,Last
012b e5ff       |    |		Load	0x2,-0x1
012c 01dd       |    |		Execute	Vector,First
012d 0263       | c  |		Execute	Discrete,Above_Bound
012e 7006       |p   |		Jump_Nonzero	0x135
012f 00da       |    |		Load_Top	At_Offset_2
0130 00d9       |    |		Load_Top	At_Offset_1
0131 e5ff       |    |		Load	0x2,-0x1
0132 01d6       |    |		Execute	Vector,Field_Write
0133 0a01       |    |		Execute_Immediate	Plus,0x1
0134 7ff8       |    |		Jump	0x12d
0135 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0136 0000 0000  |    |		.XXX[0x2]
0138 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
013c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ffff}
0140 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
0144 0000 0000  |    |		.BLANK	0000[0x4]
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 4801       |H   |		Short_Literal	0x1
014c 4800       |H   |		Short_Literal	0x0
014d e20e       |    |		Load	0x1,0xe
014e 035b       | [  |		Declare_Type	Array,Constrained
014f 0337       | 7  |		Declare_Variable	Array
0150 e20e       |    |		Load	0x1,0xe
0151 01c6       |    |		Execute	Vector,Convert_To_Formal
0152 00ca       |    |		Action	Exit_Nullary_Function
0153 0000 0000  |    |		.BLANK	0000[0x5]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b       | [  |		.CONST	0x015b								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0001       |    |		.CONST	0x0001								; Number of locals
015b			BODY_0158:
015b			INIT_0158:
015b 00d1       |    |		Pop_Control	Pop_Count_1
015c 00da       |    |		Load_Top	At_Offset_2
015d 01d8       |    |		Execute	Vector,Element_Type
015e 02ff       |    |		Declare_Variable	Variant_Record
015f 00d8       |    |		Load_Top	At_Offset_0
0160 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0161 00db       |    |		Load_Top	At_Offset_3
0162 01dc       |    |		Execute	Vector,Last
0163 e5ff       |    |		Load	0x2,-0x1
0164 01dd       |    |		Execute	Vector,First
0165 0263       | c  |		Execute	Discrete,Above_Bound
0166 7006       |p   |		Jump_Nonzero	0x16d
0167 00da       |    |		Load_Top	At_Offset_2
0168 00d9       |    |		Load_Top	At_Offset_1
0169 e5ff       |    |		Load	0x2,-0x1
016a 01d6       |    |		Execute	Vector,Field_Write
016b 0a01       |    |		Execute_Immediate	Plus,0x1
016c 7ff8       |    |		Jump	0x165
016d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
016e 0000 0000  |    |		.XXX[0x2]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0179       | y  |		.CONST	0x0179								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0003       |    |		.CONST	0x0003								; Number of locals
0173			INIT_0170:
0173 00da       |    |		Load_Top	At_Offset_2
0174 8216       |    |		Call	0x1,0x16
0175 8220       |    |		Call	0x1,0x20
0176 e5fe       |    |		Load	0x2,-0x2
0177 8216       |    |		Call	0x1,0x16
0178 8220       |    |		Call	0x1,0x20
0179			BODY_0170:
0179 00d9       |    |		Load_Top	At_Offset_1
017a 01db       |    |		Execute	Vector,Length
017b 00d9       |    |		Load_Top	At_Offset_1
017c 01db       |    |		Execute	Vector,Length
017d 027f       |    |		Execute	Discrete,Equal
017e 6823       |h#  |		Jump_Zero	0x1a2
017f 00cf       |    |		Action	Mark_Auxiliary
0180 00da       |    |		Load_Top	At_Offset_2
0181 01d9       |    |		Execute	Vector,Reverse_Bounds
0182 0263       | c  |		Execute	Discrete,Above_Bound
0183 701b       |p   |		Jump_Nonzero	0x19f
0184 00d8       |    |		Load_Top	At_Offset_0
0185 e402       |    |		Load	0x2,0x2
0186 01d5       |    |		Execute	Vector,Field_Reference
0187 800c       |    |		Call	0x0,0xc
0188 680a       |h   |		Jump_Zero	0x193
0189 00d8       |    |		Load_Top	At_Offset_0
018a e403       |    |		Load	0x2,0x3
018b 01d5       |    |		Execute	Vector,Field_Reference
018c 00d9       |    |		Load_Top	At_Offset_1
018d e402       |    |		Load	0x2,0x2
018e 01d5       |    |		Execute	Vector,Field_Reference
018f 8214       |    |		Call	0x1,0x14
0190 700c       |p   |		Jump_Nonzero	0x19d
0191 4800       |H   |		Short_Literal	0x0
0192 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0193 00d8       |    |		Load_Top	At_Offset_0
0194 e402       |    |		Load	0x2,0x2
0195 01d5       |    |		Execute	Vector,Field_Reference
0196 00d9       |    |		Load_Top	At_Offset_1
0197 e403       |    |		Load	0x2,0x3
0198 01d5       |    |		Execute	Vector,Field_Reference
0199 016f       | o  |		Execute	Variant_Record,Equal
019a 7002       |p   |		Jump_Nonzero	0x19d
019b 4800       |H   |		Short_Literal	0x0
019c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
019d 00c8       |    |		Action	Pop_Auxiliary_Range
019e 3fe5       |?   |		Loop_Increasing	0x184
019f 00ce       |    |		Action	Pop_Auxiliary
01a0 4801       |H   |		Short_Literal	0x1
01a1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01a2 4800       |H   |		Short_Literal	0x0
01a3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01a4 0000 0000  |    |		.BLANK	0000[0x4]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab       |    |		.CONST	0x01ab								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0001       |    |		.CONST	0x0001								; Number of locals
01ab			BODY_01a8:
01ab			INIT_01a8:
01ab 00da       |    |		Load_Top	At_Offset_2
01ac e5fe       |    |		Load	0x2,-0x2
01ad 8232       | 2  |		Call	0x1,0x32
01ae 800d       |    |		Call	0x0,0xd
01af 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3       |    |		.CONST	0x01b3								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0001       |    |		.CONST	0x0001								; Number of locals
01b3			BODY_01b0:
01b3			INIT_01b0:
01b3 00da       |    |		Load_Top	At_Offset_2
01b4 800e       |    |		Call	0x0,0xe
01b5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01b6 0000 0000  |    |		.XXX[0x2]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb       |    |		.CONST	0x01bb								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0001       |    |		.CONST	0x0001								; Number of locals
01bb			BODY_01b8:
01bb			INIT_01b8:
01bb 00da       |    |		Load_Top	At_Offset_2
01bc 800f       |    |		Call	0x0,0xf
01bd 8233       | 3  |		Call	0x1,0x33
01be 00d8       |    |		Load_Top	At_Offset_0
01bf e00b       |    |		Load	0x0,0xb
01c0 0260       | `  |		Execute	Discrete,In_Type
01c1 7001       |p   |		Jump_Nonzero	0x1c3
01c2 0801       |    |		Execute_Immediate	Raise,0x1
01c3 8010       |    |		Call	0x0,0x10
01c4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01c5 0000 0000  |    |		.XXX[0x3]
01c7 0000       |    |
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb       |    |		.CONST	0x01cb								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0001       |    |		.CONST	0x0001								; Number of locals
01cb			BODY_01c8:
01cb			INIT_01c8:
01cb 00da       |    |		Load_Top	At_Offset_2
01cc 8011       |    |		Call	0x0,0x11
01cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ce 0000 0000  |    |		.XXX[0x2]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 00da       |    |		Load_Top	At_Offset_2
01d4 800f       |    |		Call	0x0,0xf
01d5 8233       | 3  |		Call	0x1,0x33
01d6 00d8       |    |		Load_Top	At_Offset_0
01d7 e00b       |    |		Load	0x0,0xb
01d8 0260       | `  |		Execute	Discrete,In_Type
01d9 7001       |p   |		Jump_Nonzero	0x1db
01da 0801       |    |		Execute_Immediate	Raise,0x1
01db 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01dc 0000 0000  |    |		.BLANK	0000[0x4]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3       |    |		.CONST	0x01e3								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0001       |    |		.CONST	0x0001								; Number of locals
01e3			BODY_01e0:
01e3			INIT_01e0:
01e3 00da       |    |		Load_Top	At_Offset_2
01e4 e22d       | -  |		Load	0x1,0x2d
01e5 022e       | .  |		Execute	Access,Not_Equal
01e6 6809       |h   |		Jump_Zero	0x1f0
01e7 00da       |    |		Load_Top	At_Offset_2
01e8 0227       | '  |		Execute	Access,All_Reference
01e9 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01ea 00d8       |    |		Load_Top	At_Offset_0
01eb e00b       |    |		Load	0x0,0xb
01ec 0260       | `  |		Execute	Discrete,In_Type
01ed 7001       |p   |		Jump_Nonzero	0x1ef
01ee 0801       |    |		Execute_Immediate	Raise,0x1
01ef 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f0 e012       |    |		Load	0x0,0x12
01f1 00d8       |    |		Load_Top	At_Offset_0
01f2 e00b       |    |		Load	0x0,0xb
01f3 0260       | `  |		Execute	Discrete,In_Type
01f4 7001       |p   |		Jump_Nonzero	0x1f6
01f5 0801       |    |		Execute_Immediate	Raise,0x1
01f6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f7 0000       |    |		.XXX[0x1]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb       |    |		.CONST	0x01fb								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0001       |    |		.CONST	0x0001								; Number of locals
01fb			BODY_01f8:
01fb			INIT_01f8:
01fb 00da       |    |		Load_Top	At_Offset_2
01fc 0227       | '  |		Execute	Access,All_Reference
01fd 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
01fe 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ff 0000       |    |		.XXX[0x1]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203       |    |		.CONST	0x0203								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0001       |    |		.CONST	0x0001								; Number of locals
0203			BODY_0200:
0203			INIT_0200:
0203 00db       |    |		Load_Top	At_Offset_3
0204 e22c       | ,  |		Load	0x1,0x2c
0205 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0206 00db       |    |		Load_Top	At_Offset_3
0207 00d9       |    |		Load_Top	At_Offset_1
0208 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0209 4800       |H   |		Short_Literal	0x0
020a 00d9       |    |		Load_Top	At_Offset_1
020b 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
020c 00d8       |    |		Load_Top	At_Offset_0
020d 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
020e 0335       | 5  |		Declare_Variable	Array,Duplicate
020f 00cd       |    |		Action	Spare6_Action
0210 00d9       |    |		Load_Top	At_Offset_1
0211 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
0212 01d9       |    |		Execute	Vector,Reverse_Bounds
0213 0263       | c  |		Execute	Discrete,Above_Bound
0214 7005       |p   |		Jump_Nonzero	0x21a
0215 e22f       | /  |		Load	0x1,0x2f
0216 00d9       |    |		Load_Top	At_Offset_1
0217 e403       |    |		Load	0x2,0x3
0218 01d6       |    |		Execute	Vector,Field_Write
0219 3ffb       |?   |		Loop_Increasing	0x215
021a 00d9       |    |		Load_Top	At_Offset_1
021b 00d8       |    |		Load_Top	At_Offset_0
021c 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
021d 00da       |    |		Load_Top	At_Offset_2
021e 01da       |    |		Execute	Vector,Bounds
021f 00da       |    |		Load_Top	At_Offset_2
0220 01da       |    |		Execute	Vector,Bounds
0221 00da       |    |		Load_Top	At_Offset_2
0222 027f       |    |		Execute	Discrete,Equal
0223 7001       |p   |		Jump_Nonzero	0x225
0224 08e0       |    |		Execute_Immediate	Raise,0xe0
0225 00cd       |    |		Action	Spare6_Action
0226 027f       |    |		Execute	Discrete,Equal
0227 7001       |p   |		Jump_Nonzero	0x229
0228 08e0       |    |		Execute_Immediate	Raise,0xe0
0229 00d2       |    |		Pop_Control	Pop_Count_2
022a 00d9       |    |		Load_Top	At_Offset_1
022b 2905       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x5
022c e5fd       |    |		Load	0x2,-0x3
022d 01db       |    |		Execute	Vector,Length
022e e231       | 1  |		Load	0x1,0x31
022f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0230 e5fd       |    |		Load	0x2,-0x3
0231 00d9       |    |		Load_Top	At_Offset_1
0232 00d8       |    |		Load_Top	At_Offset_0
0233 2502       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0234 00da       |    |		Load_Top	At_Offset_2
0235 01da       |    |		Execute	Vector,Bounds
0236 00da       |    |		Load_Top	At_Offset_2
0237 01da       |    |		Execute	Vector,Bounds
0238 00da       |    |		Load_Top	At_Offset_2
0239 027f       |    |		Execute	Discrete,Equal
023a 7001       |p   |		Jump_Nonzero	0x23c
023b 08e0       |    |		Execute_Immediate	Raise,0xe0
023c 00cd       |    |		Action	Spare6_Action
023d 027f       |    |		Execute	Discrete,Equal
023e 7001       |p   |		Jump_Nonzero	0x240
023f 08e0       |    |		Execute_Immediate	Raise,0xe0
0240 00d2       |    |		Pop_Control	Pop_Count_2
0241 00d9       |    |		Load_Top	At_Offset_1
0242 2902       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x2
0243 00d9       |    |		Load_Top	At_Offset_1
0244 2804       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
0245 e22d       | -  |		Load	0x1,0x2d
0246 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0247 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b       | K  |		.CONST	0x024b								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0001       |    |		.CONST	0x0001								; Number of locals
024b			BODY_0248:
024b			INIT_0248:
024b 4800       |H   |		Short_Literal	0x0
024c 00db       |    |		Load_Top	At_Offset_3
024d 0227       | '  |		Execute	Access,All_Reference
024e 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
024f 00da       |    |		Load_Top	At_Offset_2
0250 0229       | )  |		Execute	Access,All_Read
0251 00d8       |    |		Load_Top	At_Offset_0
0252 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
0253 00d8       |    |		Load_Top	At_Offset_0
0254 0335       | 5  |		Declare_Variable	Array,Duplicate
0255 00cd       |    |		Action	Spare6_Action
0256 00d9       |    |		Load_Top	At_Offset_1
0257 01d9       |    |		Execute	Vector,Reverse_Bounds
0258 0263       | c  |		Execute	Discrete,Above_Bound
0259 7005       |p   |		Jump_Nonzero	0x25f
025a e22f       | /  |		Load	0x1,0x2f
025b 00d9       |    |		Load_Top	At_Offset_1
025c e404       |    |		Load	0x2,0x4
025d 01d6       |    |		Execute	Vector,Field_Write
025e 3ffb       |?   |		Loop_Increasing	0x25a
025f 00cd       |    |		Action	Spare6_Action
0260 00d9       |    |		Load_Top	At_Offset_1
0261 2905       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x5
0262 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0263 0000 0000  |    |		.BLANK	0000[0x5]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026d       | m  |		.CONST	0x026d								; Address of begin
0269 0004       |    |		.CONST	0x0004								; Address of exception handler
026a 0002       |    |		.CONST	0x0002								; Number of locals
026b			INIT_0268:
026b e006       |    |		Load	0x0,0x6
026c 0007       |    |		Action	Break_Optional
026d			BODY_0268:
026d e5fe       |    |		Load	0x2,-0x2
026e e5ff       |    |		Load	0x2,-0x1
026f 0227       | '  |		Execute	Access,All_Reference
0270 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
0271 2502       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0272 01d7       |    |		Execute	Vector,Field_Read
0273 0039       | 9  |		Store_Top	Access,At_Offset_1
0274 00d8       |    |		Load_Top	At_Offset_0
0275 8013       |    |		Call	0x0,0x13
0276 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0277 0000       |    |		.XXX[0x1]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027f       |    |		.CONST	0x027f								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0002       |    |		.CONST	0x0002								; Number of locals
027b			INIT_0278:
027b e5fd       |    |		Load	0x2,-0x3
027c 0227       | '  |		Execute	Access,All_Reference
027d 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
027e 0007       |    |		Action	Break_Optional
027f			BODY_0278:
027f 00db       |    |		Load_Top	At_Offset_3
0280 00d9       |    |		Load_Top	At_Offset_1
0281 01d5       |    |		Execute	Vector,Field_Reference
0282 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0283 6807       |h   |		Jump_Zero	0x28b
0284 e5fe       |    |		Load	0x2,-0x2
0285 e5ff       |    |		Load	0x2,-0x1
0286 00da       |    |		Load_Top	At_Offset_2
0287 01d5       |    |		Execute	Vector,Field_Reference
0288 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0289 8235       | 5  |		Call	0x1,0x35
028a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
028b 4800       |H   |		Short_Literal	0x0
028c 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
028d 0000 0000  |    |		.XXX[0x3]
028f 0000       |    |
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 029b       |    |		.CONST	0x029b								; Address of begin
0291 0004       |    |		.CONST	0x0004								; Address of exception handler
0292 0003       |    |		.CONST	0x0003								; Number of locals
0293			INIT_0290:
0293 e22d       | -  |		Load	0x1,0x2d
0294 00db       |    |		Load_Top	At_Offset_3
0295 8217       |    |		Call	0x1,0x17
0296 0039       | 9  |		Store_Top	Access,At_Offset_1
0297 00db       |    |		Load_Top	At_Offset_3
0298 8218       |    |		Call	0x1,0x18
0299 00e3       |    |		Load_Encached	Natural_Cache
029a 03f1       |    |		Declare_Variable	Discrete,With_Value
029b			BODY_0290:
029b 00d8       |    |		Load_Top	At_Offset_0
029c 00da       |    |		Load_Top	At_Offset_2
029d 0227       | '  |		Execute	Access,All_Reference
029e 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
029f 01d5       |    |		Execute	Vector,Field_Reference
02a0 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02a1 0335       | 5  |		Declare_Variable	Array,Duplicate
02a2 00cd       |    |		Action	Spare6_Action
02a3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02a4 0000 0000  |    |		.BLANK	0000[0x4]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02b3       |    |		.CONST	0x02b3								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0003       |    |		.CONST	0x0003								; Number of locals
02ab			INIT_02a8:
02ab e22d       | -  |		Load	0x1,0x2d
02ac 00db       |    |		Load_Top	At_Offset_3
02ad 8217       |    |		Call	0x1,0x17
02ae 0039       | 9  |		Store_Top	Access,At_Offset_1
02af 00db       |    |		Load_Top	At_Offset_3
02b0 8218       |    |		Call	0x1,0x18
02b1 00e3       |    |		Load_Encached	Natural_Cache
02b2 03f1       |    |		Declare_Variable	Discrete,With_Value
02b3			BODY_02a8:
02b3 e5fe       |    |		Load	0x2,-0x2
02b4 00d9       |    |		Load_Top	At_Offset_1
02b5 00db       |    |		Load_Top	At_Offset_3
02b6 0227       | '  |		Execute	Access,All_Reference
02b7 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
02b8 01d5       |    |		Execute	Vector,Field_Reference
02b9 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02ba 01d5       |    |		Execute	Vector,Field_Reference
02bb 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
02bc 00cd       |    |		Action	Spare6_Action
02bd 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02be 0000 0000  |    |		.XXX[0x2]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02cb       |    |		.CONST	0x02cb								; Address of begin
02c1 0004       |    |		.CONST	0x0004								; Address of exception handler
02c2 0003       |    |		.CONST	0x0003								; Number of locals
02c3			INIT_02c0:
02c3 e22d       | -  |		Load	0x1,0x2d
02c4 00db       |    |		Load_Top	At_Offset_3
02c5 8217       |    |		Call	0x1,0x17
02c6 0039       | 9  |		Store_Top	Access,At_Offset_1
02c7 00db       |    |		Load_Top	At_Offset_3
02c8 8218       |    |		Call	0x1,0x18
02c9 00e3       |    |		Load_Encached	Natural_Cache
02ca 03f1       |    |		Declare_Variable	Discrete,With_Value
02cb			BODY_02c0:
02cb e5ff       |    |		Load	0x2,-0x1
02cc e014       |    |		Load	0x0,0x14
02cd 017f       |    |		Execute	Record,Equal
02ce 6802       |h   |		Jump_Zero	0x2d1
02cf e00a       |    |		Load	0x0,0xa
02d0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d1 00d8       |    |		Load_Top	At_Offset_0
02d2 00da       |    |		Load_Top	At_Offset_2
02d3 0227       | '  |		Execute	Access,All_Reference
02d4 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
02d5 01d5       |    |		Execute	Vector,Field_Reference
02d6 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
02d7 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
02d8 00cd       |    |		Action	Spare6_Action
02d9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02da 0000 0000  |    |		.BLANK	0000[0x6]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02fa       |    |		.CONST	0x02fa								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0007       |    |		.CONST	0x0007								; Number of locals
02e3			INIT_02e0:
02e3 00da       |    |		Load_Top	At_Offset_2
02e4 0227       | '  |		Execute	Access,All_Reference
02e5 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
02e6 0007       |    |		Action	Break_Optional
02e7 00db       |    |		Load_Top	At_Offset_3
02e8 0227       | '  |		Execute	Access,All_Reference
02e9 2403       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3
02ea 0007       |    |		Action	Break_Optional
02eb e5ff       |    |		Load	0x2,-0x1
02ec 821a       |    |		Call	0x1,0x1a
02ed e00b       |    |		Load	0x0,0xb
02ee 1c04       |    |		Execute_Immediate	Run_Utility,0x4
02ef 00e3       |    |		Load_Encached	Natural_Cache
02f0 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
02f1 00e3       |    |		Load_Encached	Natural_Cache
02f2 e003       |    |		Load	0x0,0x3
02f3 0322       | "  |		Declare_Variable	Record
02f4 00d8       |    |		Load_Top	At_Offset_0
02f5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02f6 e008       |    |		Load	0x0,0x8
02f7 02ff       |    |		Declare_Variable	Variant_Record
02f8 00d8       |    |		Load_Top	At_Offset_0
02f9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02fa			BODY_02e0:
02fa 00d8       |    |		Load_Top	At_Offset_0
02fb 8015       |    |		Call	0x0,0x15
02fc 00d1       |    |		Pop_Control	Pop_Count_1
02fd 00cf       |    |		Action	Mark_Auxiliary
02fe e402       |    |		Load	0x2,0x2
02ff 01d9       |    |		Execute	Vector,Reverse_Bounds
0300 0263       | c  |		Execute	Discrete,Above_Bound
0301 7037       |p7  |		Jump_Nonzero	0x339
0302 00d8       |    |		Load_Top	At_Offset_0
0303 e402       |    |		Load	0x2,0x2
0304 01d5       |    |		Execute	Vector,Field_Reference
0305 e22f       | /  |		Load	0x1,0x2f
0306 016f       | o  |		Execute	Variant_Record,Equal
0307 682f       |h/  |		Jump_Zero	0x337
0308 e5fe       |    |		Load	0x2,-0x2
0309 01db       |    |		Execute	Vector,Length
030a e22e       | .  |		Load	0x1,0x2e
030b 1c08       |    |		Execute_Immediate	Run_Utility,0x8
030c e5fe       |    |		Load	0x2,-0x2
030d 00d9       |    |		Load_Top	At_Offset_1
030e 00d8       |    |		Load_Top	At_Offset_0
030f 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0310 00da       |    |		Load_Top	At_Offset_2
0311 01da       |    |		Execute	Vector,Bounds
0312 00da       |    |		Load_Top	At_Offset_2
0313 01da       |    |		Execute	Vector,Bounds
0314 00da       |    |		Load_Top	At_Offset_2
0315 027f       |    |		Execute	Discrete,Equal
0316 7001       |p   |		Jump_Nonzero	0x318
0317 08e0       |    |		Execute_Immediate	Raise,0xe0
0318 00cd       |    |		Action	Spare6_Action
0319 027f       |    |		Execute	Discrete,Equal
031a 7001       |p   |		Jump_Nonzero	0x31c
031b 08e0       |    |		Execute_Immediate	Raise,0xe0
031c 00d2       |    |		Pop_Control	Pop_Count_2
031d 00d9       |    |		Load_Top	At_Offset_1
031e 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
031f e407       |    |		Load	0x2,0x7
0320 00d9       |    |		Load_Top	At_Offset_1
0321 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0322 00d9       |    |		Load_Top	At_Offset_1
0323 e402       |    |		Load	0x2,0x2
0324 01d6       |    |		Execute	Vector,Field_Write
0325 00d8       |    |		Load_Top	At_Offset_0
0326 a405       |    |		Store_Unchecked	0x2,0x5
0327 00d8       |    |		Load_Top	At_Offset_0
0328 e403       |    |		Load	0x2,0x3
0329 027d       | }  |		Execute	Discrete,Greater
032a 6802       |h   |		Jump_Zero	0x32d
032b 00d8       |    |		Load_Top	At_Offset_0
032c a403       |    |		Store_Unchecked	0x2,0x3
032d e405       |    |		Load	0x2,0x5
032e e404       |    |		Load	0x2,0x4
032f 800d       |    |		Call	0x0,0xd
0330 e406       |    |		Load	0x2,0x6
0331 017d       | }  |		Execute	Record,Structure_Write
0332 e406       |    |		Load	0x2,0x6
0333 8016       |    |		Call	0x0,0x16
0334 e5fd       |    |		Load	0x2,-0x3
0335 016d       | m  |		Execute	Variant_Record,Structure_Write
0336 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0337 00c8       |    |		Action	Pop_Auxiliary_Range
0338 3fc9       |?   |		Loop_Increasing	0x302
0339 00ce       |    |		Action	Pop_Auxiliary
033a e22b       | +  |		Load	0x1,0x2b
033b 0257       | W  |		Execute	Discrete,Raise
033c 0000 0000  |    |		.BLANK	0000[0x4]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0353       | S  |		.CONST	0x0353								; Address of begin
0341 0004       |    |		.CONST	0x0004								; Address of exception handler
0342 0005       |    |		.CONST	0x0005								; Number of locals
0343			INIT_0340:
0343 e22d       | -  |		Load	0x1,0x2d
0344 00db       |    |		Load_Top	At_Offset_3
0345 8217       |    |		Call	0x1,0x17
0346 0039       | 9  |		Store_Top	Access,At_Offset_1
0347 00db       |    |		Load_Top	At_Offset_3
0348 8218       |    |		Call	0x1,0x18
0349 00e3       |    |		Load_Encached	Natural_Cache
034a 03f1       |    |		Declare_Variable	Discrete,With_Value
034b 00d9       |    |		Load_Top	At_Offset_1
034c 0227       | '  |		Execute	Access,All_Reference
034d 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
034e 0007       |    |		Action	Break_Optional
034f 00da       |    |		Load_Top	At_Offset_2
0350 0227       | '  |		Execute	Access,All_Reference
0351 2403       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3
0352 0007       |    |		Action	Break_Optional
0353			BODY_0340:
0353 e22f       | /  |		Load	0x1,0x2f
0354 00db       |    |		Load_Top	At_Offset_3
0355 00db       |    |		Load_Top	At_Offset_3
0356 01d6       |    |		Execute	Vector,Field_Write
0357 00d8       |    |		Load_Top	At_Offset_0
0358 00db       |    |		Load_Top	At_Offset_3
0359 027f       |    |		Execute	Discrete,Equal
035a 6816       |h   |		Jump_Zero	0x371
035b 00cf       |    |		Action	Mark_Auxiliary
035c 0007       |    |		Action	Break_Optional
035d 00d9       |    |		Load_Top	At_Offset_1
035e 0f01       |    |		Execute_Immediate	Equal,0x1
035f 6803       |h   |		Jump_Zero	0x363
0360 4800       |H   |		Short_Literal	0x0
0361 a405       |    |		Store_Unchecked	0x2,0x5
0362 7803       |x   |		Jump	0x366
0363 00d9       |    |		Load_Top	At_Offset_1
0364 0aff       |    |		Execute_Immediate	Plus,-0x1
0365 c405       |    |		Store	0x2,0x5
0366 00d9       |    |		Load_Top	At_Offset_1
0367 6808       |h   |		Jump_Zero	0x370
0368 00d9       |    |		Load_Top	At_Offset_1
0369 00db       |    |		Load_Top	At_Offset_3
036a 01d5       |    |		Execute	Vector,Field_Reference
036b e22f       | /  |		Load	0x1,0x2f
036c 016e       | n  |		Execute	Variant_Record,Not_Equal
036d 7002       |p   |		Jump_Nonzero	0x370
036e 00c9       |    |		Action	Pop_Auxiliary_Loop
036f 7fed       |    |		Jump	0x35d
0370 00ce       |    |		Action	Pop_Auxiliary
0371 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0372 0000 0000  |    |		.BLANK	0000[0x6]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 0387       |    |		.CONST	0x0387								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0004       |    |		.CONST	0x0004								; Number of locals
037b			INIT_0378:
037b e22d       | -  |		Load	0x1,0x2d
037c 00db       |    |		Load_Top	At_Offset_3
037d 8217       |    |		Call	0x1,0x17
037e 0039       | 9  |		Store_Top	Access,At_Offset_1
037f 00db       |    |		Load_Top	At_Offset_3
0380 8218       |    |		Call	0x1,0x18
0381 00e3       |    |		Load_Encached	Natural_Cache
0382 03f1       |    |		Declare_Variable	Discrete,With_Value
0383 e008       |    |		Load	0x0,0x8
0384 02ff       |    |		Declare_Variable	Variant_Record
0385 00d8       |    |		Load_Top	At_Offset_0
0386 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0387			BODY_0378:
0387 00d8       |    |		Load_Top	At_Offset_0
0388 8015       |    |		Call	0x0,0x15
0389 00d1       |    |		Pop_Control	Pop_Count_1
038a e5fe       |    |		Load	0x2,-0x2
038b 01db       |    |		Execute	Vector,Length
038c e22e       | .  |		Load	0x1,0x2e
038d 1c08       |    |		Execute_Immediate	Run_Utility,0x8
038e e5fe       |    |		Load	0x2,-0x2
038f 00d9       |    |		Load_Top	At_Offset_1
0390 00d8       |    |		Load_Top	At_Offset_0
0391 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0392 00da       |    |		Load_Top	At_Offset_2
0393 01da       |    |		Execute	Vector,Bounds
0394 00da       |    |		Load_Top	At_Offset_2
0395 01da       |    |		Execute	Vector,Bounds
0396 00da       |    |		Load_Top	At_Offset_2
0397 027f       |    |		Execute	Discrete,Equal
0398 7001       |p   |		Jump_Nonzero	0x39a
0399 08e0       |    |		Execute_Immediate	Raise,0xe0
039a 00cd       |    |		Action	Spare6_Action
039b 027f       |    |		Execute	Discrete,Equal
039c 7001       |p   |		Jump_Nonzero	0x39e
039d 08e0       |    |		Execute_Immediate	Raise,0xe0
039e 00d2       |    |		Pop_Control	Pop_Count_2
039f 00d9       |    |		Load_Top	At_Offset_1
03a0 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
03a1 00d9       |    |		Load_Top	At_Offset_1
03a2 00d9       |    |		Load_Top	At_Offset_1
03a3 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
03a4 00da       |    |		Load_Top	At_Offset_2
03a5 e402       |    |		Load	0x2,0x2
03a6 0227       | '  |		Execute	Access,All_Reference
03a7 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
03a8 01d6       |    |		Execute	Vector,Field_Write
03a9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03aa 0000 0000  |    |		.BLANK	0000[0x6]
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03bf       |    |		.CONST	0x03bf								; Address of begin
03b1 0004       |    |		.CONST	0x0004								; Address of exception handler
03b2 0004       |    |		.CONST	0x0004								; Number of locals
03b3			INIT_03b0:
03b3 e22d       | -  |		Load	0x1,0x2d
03b4 00db       |    |		Load_Top	At_Offset_3
03b5 8217       |    |		Call	0x1,0x17
03b6 0039       | 9  |		Store_Top	Access,At_Offset_1
03b7 00db       |    |		Load_Top	At_Offset_3
03b8 8218       |    |		Call	0x1,0x18
03b9 00e3       |    |		Load_Encached	Natural_Cache
03ba 03f1       |    |		Declare_Variable	Discrete,With_Value
03bb e008       |    |		Load	0x0,0x8
03bc 02ff       |    |		Declare_Variable	Variant_Record
03bd 00d8       |    |		Load_Top	At_Offset_0
03be 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03bf			BODY_03b0:
03bf 00d8       |    |		Load_Top	At_Offset_0
03c0 8015       |    |		Call	0x0,0x15
03c1 00d1       |    |		Pop_Control	Pop_Count_1
03c2 e5fd       |    |		Load	0x2,-0x3
03c3 e5fe       |    |		Load	0x2,-0x2
03c4 00db       |    |		Load_Top	At_Offset_3
03c5 e402       |    |		Load	0x2,0x2
03c6 0227       | '  |		Execute	Access,All_Reference
03c7 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
03c8 01d5       |    |		Execute	Vector,Field_Reference
03c9 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03ca 01d6       |    |		Execute	Vector,Field_Write
03cb 00d8       |    |		Load_Top	At_Offset_0
03cc 00da       |    |		Load_Top	At_Offset_2
03cd e402       |    |		Load	0x2,0x2
03ce 0227       | '  |		Execute	Access,All_Reference
03cf 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
03d0 01d5       |    |		Execute	Vector,Field_Reference
03d1 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
03d2 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
03d3 0000 0000  |    |		.BLANK	0000[0x5]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03e3       |    |		.CONST	0x03e3								; Address of begin
03d9 0004       |    |		.CONST	0x0004								; Address of exception handler
03da 0003       |    |		.CONST	0x0003								; Number of locals
03db			INIT_03d8:
03db 00da       |    |		Load_Top	At_Offset_2
03dc 8218       |    |		Call	0x1,0x18
03dd 00e3       |    |		Load_Encached	Natural_Cache
03de 03f1       |    |		Declare_Variable	Discrete,With_Value
03df e22d       | -  |		Load	0x1,0x2d
03e0 e5ff       |    |		Load	0x2,-0x1
03e1 8217       |    |		Call	0x1,0x17
03e2 0039       | 9  |		Store_Top	Access,At_Offset_1
03e3			BODY_03d8:
03e3 00d8       |    |		Load_Top	At_Offset_0
03e4 00da       |    |		Load_Top	At_Offset_2
03e5 8234       | 4  |		Call	0x1,0x34
03e6 6809       |h   |		Jump_Zero	0x3f0
03e7 e5fe       |    |		Load	0x2,-0x2
03e8 00da       |    |		Load_Top	At_Offset_2
03e9 00da       |    |		Load_Top	At_Offset_2
03ea 0227       | '  |		Execute	Access,All_Reference
03eb 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
03ec 01d5       |    |		Execute	Vector,Field_Reference
03ed 00da       |    |		Load_Top	At_Offset_2
03ee 8238       | 8  |		Call	0x1,0x38
03ef 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03f0 e5fe       |    |		Load	0x2,-0x2
03f1 0092 066f  |   o|		Action	Push_String_Extended,0x66f					; "null_object"
03f3 8017       |    |		Call	0x0,0x17
03f4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03f5 0000 0000  |    |		.XXX[0x3]
03f7 0000       |    |
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03fb       |    |		.CONST	0x03fb								; Address of begin
03f9 0004       |    |		.CONST	0x0004								; Address of exception handler
03fa 0001       |    |		.CONST	0x0001								; Number of locals
03fb			BODY_03f8:
03fb			INIT_03f8:
03fb 00db       |    |		Load_Top	At_Offset_3
03fc 0092 0670  |   p|		Action	Push_String_Extended,0x670					; "Collection'("
03fe 8017       |    |		Call	0x0,0x17
03ff 00db       |    |		Load_Top	At_Offset_3
0400 8018       |    |		Call	0x0,0x18
0401 00da       |    |		Load_Top	At_Offset_2
0402 01db       |    |		Execute	Vector,Length
0403 680d       |h   |		Jump_Zero	0x411
0404 00cf       |    |		Action	Mark_Auxiliary
0405 00db       |    |		Load_Top	At_Offset_3
0406 01d9       |    |		Execute	Vector,Reverse_Bounds
0407 0263       | c  |		Execute	Discrete,Above_Bound
0408 7007       |p   |		Jump_Nonzero	0x410
0409 e5fe       |    |		Load	0x2,-0x2
040a 00d9       |    |		Load_Top	At_Offset_1
040b e5ff       |    |		Load	0x2,-0x1
040c 01d5       |    |		Execute	Vector,Field_Reference
040d 8227       | '  |		Call	0x1,0x27
040e 00c8       |    |		Action	Pop_Auxiliary_Range
040f 3ff9       |?   |		Loop_Increasing	0x409
0410 00ce       |    |		Action	Pop_Auxiliary
0411 00db       |    |		Load_Top	At_Offset_3
0412 8019       |    |		Call	0x0,0x19
0413 4801       |H   |		Short_Literal	0x1
0414 e5fe       |    |		Load	0x2,-0x2
0415 801a       |    |		Call	0x0,0x1a
0416 00db       |    |		Load_Top	At_Offset_3
0417 0092 0671  |   q|		Action	Push_String_Extended,0x671					; ")"
0419 8017       |    |		Call	0x0,0x17
041a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
041b 0000 0000  |    |		.BLANK	0000[0x5]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0433       | 3  |		.CONST	0x0433								; Address of begin
0421 0004       |    |		.CONST	0x0004								; Address of exception handler
0422 0004       |    |		.CONST	0x0004								; Number of locals
0423			INIT_0420:
0423 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
0424 00c6       |    |		Action	Check_Subprogram_Elaborated
0425 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0426 0093 0000  |    |		push_full_address	0x0
0428 601b       |`   |		Indirect_Literal	Discrete,0x444,{0x80000000, 0x00010000}
0429 0273       | s  |		Execute	Discrete,Plus
042a e007       |    |		Load	0x0,0x7
042b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
042c 6013       |`   |		Indirect_Literal	Discrete,0x440,{0x00000000, 0x0000ffff}
042d 0279       | y  |		Execute	Discrete,And
042e 0273       | s  |		Execute	Discrete,Plus
042f e01b       |    |		Load	0x0,0x1b
0430 0273       | s  |		Execute	Discrete,Plus
0431 4804       |H   |		Short_Literal	0x4
0432 0007       |    |		Action	Break_Optional
0433			BODY_0420:
0433 e5fe       |    |		Load	0x2,-0x2
0434 e5ff       |    |		Load	0x2,-0x1
0435 4802       |H   |		Short_Literal	0x2
0436 4802       |H   |		Short_Literal	0x2
0437 0099       |    |		Action	Reference_Dynamic
0438 4803       |H   |		Short_Literal	0x3
0439 4802       |H   |		Short_Literal	0x2
043a 0099       |    |		Action	Reference_Dynamic
043b 822a       | *  |		Call	0x1,0x2a
043c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
043d 0000 0000  |    |		.XXX[0x3]
043f 0000       |    |
0440 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ffff}
0444 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
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 e5fd       |    |		Load	0x2,-0x3
044c e22d       | -  |		Load	0x1,0x2d
044d 022e       | .  |		Execute	Access,Not_Equal
044e 6845       |hE  |		Jump_Zero	0x494
044f e5fc       |    |		Load	0x2,-0x4
0450 0092 0672  |   r|		Action	Push_String_Extended,0x672					; "Class'("
0452 8017       |    |		Call	0x0,0x17
0453 e5fc       |    |		Load	0x2,-0x4
0454 8018       |    |		Call	0x0,0x18
0455 e5fc       |    |		Load	0x2,-0x4
0456 0092 0673  |   s|		Action	Push_String_Extended,0x673					; "Kind      => "
0458 e5fd       |    |		Load	0x2,-0x3
0459 0227       | '  |		Execute	Access,All_Reference
045a 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
045b e00b       |    |		Load	0x0,0xb
045c 1c04       |    |		Execute_Immediate	Run_Utility,0x4
045d e00b       |    |		Load	0x0,0xb
045e 0122       | "  |		Execute	Any,Make_Root_Type
045f 011c       |    |		Execute	Any,Convert_Unchecked
0460 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0461 01cc       |    |		Execute	Vector,Catenate
0462 8017       |    |		Call	0x0,0x17
0463 e5fc       |    |		Load	0x2,-0x4
0464 0092 0674  |   t|		Action	Push_String_Extended,0x674					; "Size      => "
0466 e5fd       |    |		Load	0x2,-0x3
0467 0227       | '  |		Execute	Access,All_Reference
0468 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0469 00e0       |    |		Load_Encached	Standard_Cache
046a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
046b 01cc       |    |		Execute	Vector,Catenate
046c 8017       |    |		Call	0x0,0x17
046d e5fc       |    |		Load	0x2,-0x4
046e 0092 0675  |   u|		Action	Push_String_Extended,0x675					; "Instances => Collection'("
0470 8017       |    |		Call	0x0,0x17
0471 e5fc       |    |		Load	0x2,-0x4
0472 8018       |    |		Call	0x0,0x18
0473 00cf       |    |		Action	Mark_Auxiliary
0474 e5fd       |    |		Load	0x2,-0x3
0475 821b       |    |		Call	0x1,0x1b
0476 4801       |H   |		Short_Literal	0x1
0477 0263       | c  |		Execute	Discrete,Above_Bound
0478 700e       |p   |		Jump_Nonzero	0x487
0479 e5fc       |    |		Load	0x2,-0x4
047a 00d9       |    |		Load_Top	At_Offset_1
047b 801c       |    |		Call	0x0,0x1c
047c e5fc       |    |		Load	0x2,-0x4
047d 0092 0676  |   v|		Action	Push_String_Extended,0x676					; " => "
047f 801d       |    |		Call	0x0,0x1d
0480 e5fc       |    |		Load	0x2,-0x4
0481 e5fd       |    |		Load	0x2,-0x3
0482 00da       |    |		Load_Top	At_Offset_2
0483 8215       |    |		Call	0x1,0x15
0484 85fe       |    |		Call	0x2,-0x2
0485 00c8       |    |		Action	Pop_Auxiliary_Range
0486 3ff2       |?   |		Loop_Increasing	0x479
0487 00ce       |    |		Action	Pop_Auxiliary
0488 e5fc       |    |		Load	0x2,-0x4
0489 8019       |    |		Call	0x0,0x19
048a e5fc       |    |		Load	0x2,-0x4
048b 0092 0671  |   q|		Action	Push_String_Extended,0x671					; ")"
048d 8017       |    |		Call	0x0,0x17
048e e5fc       |    |		Load	0x2,-0x4
048f 8019       |    |		Call	0x0,0x19
0490 e5fc       |    |		Load	0x2,-0x4
0491 0092 0671  |   q|		Action	Push_String_Extended,0x671					; ")"
0493 8017       |    |		Call	0x0,0x17
0494 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0495 0000 0000  |    |		.XXX[0x3]
0497 0000       |    |
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 049b       |    |		.CONST	0x049b								; Address of begin
0499 0004       |    |		.CONST	0x0004								; Address of exception handler
049a 0001       |    |		.CONST	0x0001								; Number of locals
049b			BODY_0498:
049b			BODY_0498:
049b			INIT_0498:
049b			INIT_0498:
049b 4609       |F   |		Jump_Case	0xa
049c 7809       |x   |		Jump	0x4a6								; case 0x0
049d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
049e 782d       |x-  |		Jump	0x4cc								; case 0x2
049f 7830       |x0  |		Jump	0x4d0								; case 0x3
04a0 7835       |x5  |		Jump	0x4d6								; case 0x4
04a1 783c       |x<  |		Jump	0x4de								; case 0x5
04a2 7858       |xX  |		Jump	0x4fb								; case 0x6
04a3 7844       |xD  |		Jump	0x4e8								; case 0x7
04a4 784c       |xL  |		Jump	0x4f1								; case 0x8
04a5 7855       |xU  |		Jump	0x4fb								; case 0x9
04a6 4800       |H   |		Short_Literal	0x0
04a7 00db       |    |		Load_Top	At_Offset_3
04a8 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
04a9 00da       |    |		Load_Top	At_Offset_2
04aa 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
04ab 0335       | 5  |		Declare_Variable	Array,Duplicate
04ac 00cd       |    |		Action	Spare6_Action
04ad 00db       |    |		Load_Top	At_Offset_3
04ae 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
04af 01d9       |    |		Execute	Vector,Reverse_Bounds
04b0 0263       | c  |		Execute	Discrete,Above_Bound
04b1 7005       |p   |		Jump_Nonzero	0x4b7
04b2 e22f       | /  |		Load	0x1,0x2f
04b3 00d9       |    |		Load_Top	At_Offset_1
04b4 e402       |    |		Load	0x2,0x2
04b5 01d6       |    |		Execute	Vector,Field_Write
04b6 3ffb       |?   |		Loop_Increasing	0x4b2
04b7 00db       |    |		Load_Top	At_Offset_3
04b8 00d8       |    |		Load_Top	At_Offset_0
04b9 2505       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x5
04ba 00da       |    |		Load_Top	At_Offset_2
04bb 01da       |    |		Execute	Vector,Bounds
04bc 00da       |    |		Load_Top	At_Offset_2
04bd 01da       |    |		Execute	Vector,Bounds
04be 00da       |    |		Load_Top	At_Offset_2
04bf 027f       |    |		Execute	Discrete,Equal
04c0 7001       |p   |		Jump_Nonzero	0x4c2
04c1 08e0       |    |		Execute_Immediate	Raise,0xe0
04c2 00cd       |    |		Action	Spare6_Action
04c3 027f       |    |		Execute	Discrete,Equal
04c4 7001       |p   |		Jump_Nonzero	0x4c6
04c5 08e0       |    |		Execute_Immediate	Raise,0xe0
04c6 00d1       |    |		Pop_Control	Pop_Count_1
04c7 2905       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x5
04c8 00da       |    |		Load_Top	At_Offset_2
04c9 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
04ca 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04cb 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
04cc 4801       |H   |		Short_Literal	0x1
04cd 4805       |H   |		Short_Literal	0x5
04ce 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
04cf 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
04d0 e5fd       |    |		Load	0x2,-0x3
04d1 00db       |    |		Load_Top	At_Offset_3
04d2 1c07       |    |		Execute_Immediate	Run_Utility,0x7
04d3 e5fe       |    |		Load	0x2,-0x2
04d4 0306       |    |		Complete_Type	Variant_Record,By_Renaming
04d5 4304       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x4
04d6 4801       |H   |		Short_Literal	0x1
04d7 4805       |H   |		Short_Literal	0x5
04d8 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
04d9 e5fe       |    |		Load	0x2,-0x2
04da e5ff       |    |		Load	0x2,-0x1
04db 00da       |    |		Load_Top	At_Offset_2
04dc 0305       |    |		Complete_Type	Variant_Record,By_Constraining_Incomplete
04dd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04de 4801       |H   |		Short_Literal	0x1
04df 4801       |H   |		Short_Literal	0x1
04e0 e5ff       |    |		Load	0x2,-0x1
04e1 0169       | i  |		Execute	Variant_Record,Read_Discriminant_Constraint
04e2 e230       | 0  |		Load	0x1,0x30
04e3 035b       | [  |		Declare_Type	Array,Constrained
04e4 4801       |H   |		Short_Literal	0x1
04e5 e5ff       |    |		Load	0x2,-0x1
04e6 0304       |    |		Complete_Type	Variant_Record,By_Completing_Constraint
04e7 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
04e8 00db       |    |		Load_Top	At_Offset_3
04e9 4801       |H   |		Short_Literal	0x1
04ea e5fe       |    |		Load	0x2,-0x2
04eb e230       | 0  |		Load	0x1,0x30
04ec 035b       | [  |		Declare_Type	Array,Constrained
04ed 4801       |H   |		Short_Literal	0x1
04ee e5ff       |    |		Load	0x2,-0x1
04ef 031b       |    |		Declare_Type	Variant_Record,Constrained
04f0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04f1 00db       |    |		Load_Top	At_Offset_3
04f2 00db       |    |		Load_Top	At_Offset_3
04f3 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
04f4 4801       |H   |		Short_Literal	0x1
04f5 e5fe       |    |		Load	0x2,-0x2
04f6 e230       | 0  |		Load	0x1,0x30
04f7 0334       | 4  |		Declare_Variable	Array,With_Constraint
04f8 2d05       |-   |		Execute	Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x5
04f9 016a       | j  |		QQ_execute	Variant_Record,XXX
04fa 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04fb 0869       | i  |		Execute_Immediate	Raise,0x69
04fc 0000 0000  |    |		.BLANK	0000[0x4]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0503       |    |		.CONST	0x0503								; Address of begin
0501 0004       |    |		.CONST	0x0004								; Address of exception handler
0502 0001       |    |		.CONST	0x0001								; Number of locals
0503			BODY_0500:
0503			INIT_0500:
0503 4609       |F   |		Jump_Case	0xa
0504 7809       |x   |		Jump	0x50e								; case 0x0
0505 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0506 781a       |x   |		Jump	0x521								; case 0x2
0507 781d       |x   |		Jump	0x525								; case 0x3
0508 7839       |x9  |		Jump	0x542								; case 0x4
0509 7838       |x8  |		Jump	0x542								; case 0x5
050a 7837       |x7  |		Jump	0x542								; case 0x6
050b 781f       |x   |		Jump	0x52b								; case 0x7
050c 7827       |x'  |		Jump	0x534								; case 0x8
050d 7830       |x0  |		Jump	0x53e								; case 0x9
050e 00da       |    |		Load_Top	At_Offset_2
050f 016c       | l  |		Execute	Variant_Record,Is_Constrained
0510 7009       |p   |		Jump_Nonzero	0x51a
0511 00cf       |    |		Action	Mark_Auxiliary
0512 4800       |H   |		Short_Literal	0x0
0513 e5ff       |    |		Load	0x2,-0x1
0514 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0515 00d8       |    |		Load_Top	At_Offset_0
0516 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0517 c5ff       |    |		Store	0x2,-0x1
0518 00ce       |    |		Action	Pop_Auxiliary
0519 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
051a 00da       |    |		Load_Top	At_Offset_2
051b 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
051c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
051d 00da       |    |		Load_Top	At_Offset_2
051e 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
051f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0520 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0521 4801       |H   |		Short_Literal	0x1
0522 4803       |H   |		Short_Literal	0x3
0523 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
0524 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0525 e5fd       |    |		Load	0x2,-0x3
0526 00db       |    |		Load_Top	At_Offset_3
0527 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0528 e5fe       |    |		Load	0x2,-0x2
0529 0306       |    |		Complete_Type	Variant_Record,By_Renaming
052a 4304       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x4
052b 00db       |    |		Load_Top	At_Offset_3
052c 4801       |H   |		Short_Literal	0x1
052d e5fe       |    |		Load	0x2,-0x2
052e e212       |    |		Load	0x1,0x12
052f 035b       | [  |		Declare_Type	Array,Constrained
0530 4801       |H   |		Short_Literal	0x1
0531 e5ff       |    |		Load	0x2,-0x1
0532 031b       |    |		Declare_Type	Variant_Record,Constrained
0533 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0534 00db       |    |		Load_Top	At_Offset_3
0535 00db       |    |		Load_Top	At_Offset_3
0536 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
0537 4801       |H   |		Short_Literal	0x1
0538 e5fe       |    |		Load	0x2,-0x2
0539 e212       |    |		Load	0x1,0x12
053a 0334       | 4  |		Declare_Variable	Array,With_Constraint
053b 2d03       |-   |		Execute	Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
053c 016a       | j  |		QQ_execute	Variant_Record,XXX
053d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
053e 4800       |H   |		Short_Literal	0x0
053f 00db       |    |		Load_Top	At_Offset_3
0540 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0541 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0542 0869       | i  |		Execute_Immediate	Raise,0x69
0543 0000 0000  |    |		.BLANK	0000[0x5]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054b       | K  |		.CONST	0x054b								; Address of begin
0549 0004       |    |		.CONST	0x0004								; Address of exception handler
054a 0001       |    |		.CONST	0x0001								; Number of locals
054b			BODY_0548:
054b			INIT_0548:
054b 00d1       |    |		Pop_Control	Pop_Count_1
054c 00da       |    |		Load_Top	At_Offset_2
054d 01d8       |    |		Execute	Vector,Element_Type
054e 02ff       |    |		Declare_Variable	Variant_Record
054f 00d8       |    |		Load_Top	At_Offset_0
0550 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0551 00db       |    |		Load_Top	At_Offset_3
0552 01dc       |    |		Execute	Vector,Last
0553 e5ff       |    |		Load	0x2,-0x1
0554 01dd       |    |		Execute	Vector,First
0555 0263       | c  |		Execute	Discrete,Above_Bound
0556 7006       |p   |		Jump_Nonzero	0x55d
0557 00da       |    |		Load_Top	At_Offset_2
0558 00d9       |    |		Load_Top	At_Offset_1
0559 e5ff       |    |		Load	0x2,-0x1
055a 01d6       |    |		Execute	Vector,Field_Write
055b 0a01       |    |		Execute_Immediate	Plus,0x1
055c 7ff8       |    |		Jump	0x555
055d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
055e 0000 0000  |    |		.XXX[0x2]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0563       | c  |		.CONST	0x0563								; Address of begin
0561 0004       |    |		.CONST	0x0004								; Address of exception handler
0562 0001       |    |		.CONST	0x0001								; Number of locals
0563			BODY_0560:
0563			INIT_0560:
0563 4609       |F   |		Jump_Case	0xa
0564 7809       |x   |		Jump	0x56e								; case 0x0
0565 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0566 7813       |x   |		Jump	0x57a								; case 0x2
0567 7816       |x   |		Jump	0x57e								; case 0x3
0568 7832       |x2  |		Jump	0x59b								; case 0x4
0569 7831       |x1  |		Jump	0x59b								; case 0x5
056a 7830       |x0  |		Jump	0x59b								; case 0x6
056b 7818       |x   |		Jump	0x584								; case 0x7
056c 7820       |x   |		Jump	0x58d								; case 0x8
056d 7829       |x)  |		Jump	0x597								; case 0x9
056e 00da       |    |		Load_Top	At_Offset_2
056f 016c       | l  |		Execute	Variant_Record,Is_Constrained
0570 7008       |p   |		Jump_Nonzero	0x579
0571 00cf       |    |		Action	Mark_Auxiliary
0572 4800       |H   |		Short_Literal	0x0
0573 e5ff       |    |		Load	0x2,-0x1
0574 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0575 00d8       |    |		Load_Top	At_Offset_0
0576 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0577 c5ff       |    |		Store	0x2,-0x1
0578 00ce       |    |		Action	Pop_Auxiliary
0579 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
057a 4801       |H   |		Short_Literal	0x1
057b 4802       |H   |		Short_Literal	0x2
057c 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
057d 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
057e e5fd       |    |		Load	0x2,-0x3
057f 00db       |    |		Load_Top	At_Offset_3
0580 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0581 e5fe       |    |		Load	0x2,-0x2
0582 0306       |    |		Complete_Type	Variant_Record,By_Renaming
0583 4304       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x4
0584 00db       |    |		Load_Top	At_Offset_3
0585 4801       |H   |		Short_Literal	0x1
0586 e5fe       |    |		Load	0x2,-0x2
0587 e213       |    |		Load	0x1,0x13
0588 035b       | [  |		Declare_Type	Array,Constrained
0589 4801       |H   |		Short_Literal	0x1
058a e5ff       |    |		Load	0x2,-0x1
058b 031b       |    |		Declare_Type	Variant_Record,Constrained
058c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
058d 00db       |    |		Load_Top	At_Offset_3
058e 00db       |    |		Load_Top	At_Offset_3
058f 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
0590 4801       |H   |		Short_Literal	0x1
0591 e5fe       |    |		Load	0x2,-0x2
0592 e213       |    |		Load	0x1,0x13
0593 0334       | 4  |		Declare_Variable	Array,With_Constraint
0594 2d02       |-   |		Execute	Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x2
0595 016a       | j  |		QQ_execute	Variant_Record,XXX
0596 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0597 4800       |H   |		Short_Literal	0x0
0598 00db       |    |		Load_Top	At_Offset_3
0599 1c07       |    |		Execute_Immediate	Run_Utility,0x7
059a 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
059b 0869       | i  |		Execute_Immediate	Raise,0x69
059c 0000 0000  |    |		.BLANK	0000[0x4]
05a0 ; --------------------------------------------------------------------------------------
05a0 ; SUBPROGRAM
05a0 ; --------------------------------------------------------------------------------------
05a0 05a3       |    |		.CONST	0x05a3								; Address of begin
05a1 0004       |    |		.CONST	0x0004								; Address of exception handler
05a2 0001       |    |		.CONST	0x0001								; Number of locals
05a3			BODY_05a0:
05a3			INIT_05a0:
05a3 00da       |    |		Load_Top	At_Offset_2
05a4 821a       |    |		Call	0x1,0x1a
05a5 e00b       |    |		Load	0x0,0xb
05a6 1c04       |    |		Execute_Immediate	Run_Utility,0x4
05a7 00d8       |    |		Load_Top	At_Offset_0
05a8 00e3       |    |		Load_Encached	Natural_Cache
05a9 0260       | `  |		Execute	Discrete,In_Type
05aa 7001       |p   |		Jump_Nonzero	0x5ac
05ab 0801       |    |		Execute_Immediate	Raise,0x1
05ac 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05ad 0000 0000  |    |		.XXX[0x3]
05af 0000       |    |
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b3       |    |		.CONST	0x05b3								; Address of begin
05b1 0004       |    |		.CONST	0x0004								; Address of exception handler
05b2 0001       |    |		.CONST	0x0001								; Number of locals
05b3			BODY_05b0:
05b3			INIT_05b0:
05b3 00da       |    |		Load_Top	At_Offset_2
05b4 e00b       |    |		Load	0x0,0xb
05b5 1c05       |    |		Execute_Immediate	Run_Utility,0x5
05b6 00d8       |    |		Load_Top	At_Offset_0
05b7 e00b       |    |		Load	0x0,0xb
05b8 0122       | "  |		Execute	Any,Make_Root_Type
05b9 0260       | `  |		Execute	Discrete,In_Type
05ba 7001       |p   |		Jump_Nonzero	0x5bc
05bb 0801       |    |		Execute_Immediate	Raise,0x1
05bc 00d8       |    |		Load_Top	At_Offset_0
05bd e00b       |    |		Load	0x0,0xb
05be 0260       | `  |		Execute	Discrete,In_Type
05bf 7001       |p   |		Jump_Nonzero	0x5c1
05c0 0801       |    |		Execute_Immediate	Raise,0x1
05c1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05c2 0000 0000  |    |		.BLANK	0000[0x6]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cb       |    |		.CONST	0x05cb								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0001       |    |		.CONST	0x0001								; Number of locals
05cb			BODY_05c8:
05cb			INIT_05c8:
05cb 00db       |    |		Load_Top	At_Offset_3
05cc e22d       | -  |		Load	0x1,0x2d
05cd 022e       | .  |		Execute	Access,Not_Equal
05ce 680a       |h   |		Jump_Zero	0x5d9
05cf 00da       |    |		Load_Top	At_Offset_2
05d0 6806       |h   |		Jump_Zero	0x5d7
05d1 00da       |    |		Load_Top	At_Offset_2
05d2 e5fe       |    |		Load	0x2,-0x2
05d3 0227       | '  |		Execute	Access,All_Reference
05d4 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
05d5 027a       | z  |		Execute	Discrete,Less_Equal
05d6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05d7 4800       |H   |		Short_Literal	0x0
05d8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05d9 4800       |H   |		Short_Literal	0x0
05da 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05db 0000 0000  |    |		.BLANK	0000[0x5]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05e3       |    |		.CONST	0x05e3								; Address of begin
05e1 0004       |    |		.CONST	0x0004								; Address of exception handler
05e2 0001       |    |		.CONST	0x0001								; Number of locals
05e3			BODY_05e0:
05e3			INIT_05e0:
05e3 00cf       |    |		Action	Mark_Auxiliary
05e4 00db       |    |		Load_Top	At_Offset_3
05e5 01d9       |    |		Execute	Vector,Reverse_Bounds
05e6 0263       | c  |		Execute	Discrete,Above_Bound
05e7 700c       |p   |		Jump_Nonzero	0x5f4
05e8 00d8       |    |		Load_Top	At_Offset_0
05e9 e5fe       |    |		Load	0x2,-0x2
05ea 01d7       |    |		Execute	Vector,Field_Read
05eb 00d9       |    |		Load_Top	At_Offset_1
05ec e5ff       |    |		Load	0x2,-0x1
05ed 01d5       |    |		Execute	Vector,Field_Reference
05ee 801e       |    |		Call	0x0,0x1e
05ef 7002       |p   |		Jump_Nonzero	0x5f2
05f0 4800       |H   |		Short_Literal	0x0
05f1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05f2 00c8       |    |		Action	Pop_Auxiliary_Range
05f3 3ff4       |?   |		Loop_Increasing	0x5e8
05f4 00ce       |    |		Action	Pop_Auxiliary
05f5 4801       |H   |		Short_Literal	0x1
05f6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05f7 0000       |    |		.XXX[0x1]
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 05ff       |    |		.CONST	0x05ff								; Address of begin
05f9 0004       |    |		.CONST	0x0004								; Address of exception handler
05fa 0002       |    |		.CONST	0x0002								; Number of locals
05fb			INIT_05f8:
05fb e003       |    |		Load	0x0,0x3
05fc 0322       | "  |		Declare_Variable	Record
05fd 00d8       |    |		Load_Top	At_Offset_0
05fe 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05ff			BODY_05f8:
05ff 00db       |    |		Load_Top	At_Offset_3
0600 800c       |    |		Call	0x0,0xc
0601 6808       |h   |		Jump_Zero	0x60a
0602 00db       |    |		Load_Top	At_Offset_3
0603 8216       |    |		Call	0x1,0x16
0604 00d9       |    |		Load_Top	At_Offset_1
0605 017d       | }  |		Execute	Record,Structure_Write
0606 e5fe       |    |		Load	0x2,-0x2
0607 00d9       |    |		Load_Top	At_Offset_1
0608 8227       | '  |		Call	0x1,0x27
0609 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
060a e5fe       |    |		Load	0x2,-0x2
060b e5ff       |    |		Load	0x2,-0x1
060c 801f       |    |		Call	0x0,0x1f
060d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
060e 0000 0000  |    |		.XXX[0x2]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0615       |    |		.CONST	0x0615								; Address of begin
0611 0004       |    |		.CONST	0x0004								; Address of exception handler
0612 0002       |    |		.CONST	0x0002								; Number of locals
0613			INIT_0610:
0613 00e1       |    |		Load_Encached	Boolean_Cache
0614 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0615			BODY_0610:
0615 00cf       |    |		Action	Mark_Auxiliary
0616 e5ff       |    |		Load	0x2,-0x1
0617 01d9       |    |		Execute	Vector,Reverse_Bounds
0618 0263       | c  |		Execute	Discrete,Above_Bound
0619 7019       |p   |		Jump_Nonzero	0x633
061a 00db       |    |		Load_Top	At_Offset_3
061b 6803       |h   |		Jump_Zero	0x61f
061c 4800       |H   |		Short_Literal	0x0
061d a402       |    |		Store_Unchecked	0x2,0x2
061e 7804       |x   |		Jump	0x623
061f e5fd       |    |		Load	0x2,-0x3
0620 0092 0677  |   w|		Action	Push_String_Extended,0x677					; ","
0622 8017       |    |		Call	0x0,0x17
0623 e5fd       |    |		Load	0x2,-0x3
0624 00d9       |    |		Load_Top	At_Offset_1
0625 e5fe       |    |		Load	0x2,-0x2
0626 01d7       |    |		Execute	Vector,Field_Read
0627 8013       |    |		Call	0x0,0x13
0628 0092 0676  |   v|		Action	Push_String_Extended,0x676					; " => "
062a 01cc       |    |		Execute	Vector,Catenate
062b 801d       |    |		Call	0x0,0x1d
062c e5fd       |    |		Load	0x2,-0x3
062d 00d9       |    |		Load_Top	At_Offset_1
062e e5ff       |    |		Load	0x2,-0x1
062f 01d5       |    |		Execute	Vector,Field_Reference
0630 8236       | 6  |		Call	0x1,0x36
0631 00c8       |    |		Action	Pop_Auxiliary_Range
0632 3fe7       |?   |		Loop_Increasing	0x61a
0633 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0634 0000 0000  |    |		.BLANK	0000[0x4]
0638 ; --------------------------------------------------------------------------------------
0638 ; SUBPROGRAM
0638 ; --------------------------------------------------------------------------------------
0638 063b       | ;  |		.CONST	0x063b								; Address of begin
0639 0004       |    |		.CONST	0x0004								; Address of exception handler
063a 0001       |    |		.CONST	0x0001								; Number of locals
063b			BODY_0638:
063b			INIT_0638:
063b 00db       |    |		Load_Top	At_Offset_3
063c e22f       | /  |		Load	0x1,0x2f
063d 016e       | n  |		Execute	Variant_Record,Not_Equal
063e 682b       |h+  |		Jump_Zero	0x66a
063f e5fd       |    |		Load	0x2,-0x3
0640 00db       |    |		Load_Top	At_Offset_3
0641 0227       | '  |		Execute	Access,All_Reference
0642 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0643 e00b       |    |		Load	0x0,0xb
0644 1c04       |    |		Execute_Immediate	Run_Utility,0x4
0645 e00b       |    |		Load	0x0,0xb
0646 0122       | "  |		Execute	Any,Make_Root_Type
0647 011c       |    |		Execute	Any,Convert_Unchecked
0648 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0649 0092 0678  |   x|		Action	Push_String_Extended,0x678					; "'("
064b 01cc       |    |		Execute	Vector,Catenate
064c 8017       |    |		Call	0x0,0x17
064d e5fd       |    |		Load	0x2,-0x3
064e 8018       |    |		Call	0x0,0x18
064f e5fd       |    |		Load	0x2,-0x3
0650 0092 0679  |   y|		Action	Push_String_Extended,0x679					; "DATE =>"
0652 801d       |    |		Call	0x0,0x1d
0653 e5fd       |    |		Load	0x2,-0x3
0654 e5fe       |    |		Load	0x2,-0x2
0655 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
0656 8020       |    |		Call	0x0,0x20
0657 e5fd       |    |		Load	0x2,-0x3
0658 0092 0677  |   w|		Action	Push_String_Extended,0x677					; ","
065a 8017       |    |		Call	0x0,0x17
065b e5fd       |    |		Load	0x2,-0x3
065c 00db       |    |		Load_Top	At_Offset_3
065d 0227       | '  |		Execute	Access,All_Reference
065e 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
065f 2502       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0660 e5fe       |    |		Load	0x2,-0x2
0661 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0662 8237       | 7  |		Call	0x1,0x37
0663 e5fd       |    |		Load	0x2,-0x3
0664 8019       |    |		Call	0x0,0x19
0665 e5fd       |    |		Load	0x2,-0x3
0666 0092 0671  |   q|		Action	Push_String_Extended,0x671					; ")"
0668 8017       |    |		Call	0x0,0x17
0669 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
066a e5fd       |    |		Load	0x2,-0x3
066b 0092 067a  |   z|		Action	Push_String_Extended,0x67a					; "FREE"
066d 8017       |    |		Call	0x0,0x17
066e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
066f ; --------------------------------------------------------------------------------------
066f ; STRING TABLE
066f ; --------------------------------------------------------------------------------------
066f 001a       |    |		.STRTAB	0x001a->0x067c							; "null_object"
0670 0023       | #  |		.STRTAB	0x0023->0x0681							; "Collection'("
0671 002d       | -  |		.STRTAB	0x002d->0x0687							; ")"
0672 002c       | ,  |		.STRTAB	0x002c->0x0688							; "Class'("
0673 0031       | 1  |		.STRTAB	0x0031->0x068b							; "Kind      => "
0674 003c       | <  |		.STRTAB	0x003c->0x0692							; "Size      => "
0675 0047       | G  |		.STRTAB	0x0047->0x0698							; "Instances => Collection'("
0676 005e       | ^  |		.STRTAB	0x005e->0x06a5							; " => "
0677 0060       | `  |		.STRTAB	0x0060->0x06a7							; ","
0678 005f       | _  |		.STRTAB	0x005f->0x06a7							; "'("
0679 005f       | _  |		.STRTAB	0x005f->0x06a8							; "DATE =>"
067a 0064       | d  |		.STRTAB	0x0064->0x06ac							; "FREE"
067b 0066       | f  |		.STREND 0x0066->0x06ae
067c 6e75 6c6c  |null|		.STRTAB_STRINGS
06ae 0000 0000  |    |		.XXX[0x2]
06b0 ; --------------------------------------------------------------------------------------
06b0 ; Debug Table
06b0 ; --------------------------------------------------------------------------------------
06b0 0004 0008  |    |		.DEBUG4	0x0004,0x0008,0xf117,0x0000,0x0001,0x0027
06b6 000b 0752  |   R|		.DBG4T	0x000b,0x0752,0x0000,0x0000
06ba 007b 077c  | { ||		.DBG4T	0x007b,0x077c,0x0000,0x0000
06be 0123 0000  | #  |		.DBG4T	0x0123,0x0000,0x0005,0x0000
06c2 014b 07a2  | K  |		.DBG4T	0x014b,0x07a2,0x0002,0x0000
06c6 015b 0000  | [  |		.DBG4T	0x015b,0x0000,0x0005,0x0000
06ca 0173 07a5  | s  |		.DBG4T	0x0173,0x07a5,0x0002,0x0000
06ce 01ab 07b2  |    |		.DBG4T	0x01ab,0x07b2,0x0002,0x0000
06d2 01b3 07b5  |    |		.DBG4T	0x01b3,0x07b5,0x0002,0x0000
06d6 01bb 07b8  |    |		.DBG4T	0x01bb,0x07b8,0x0002,0x0000
06da 01cb 07bb  |    |		.DBG4T	0x01cb,0x07bb,0x0002,0x0000
06de 01d3 07be  |    |		.DBG4T	0x01d3,0x07be,0x0002,0x0000
06e2 01e3 07c1  |    |		.DBG4T	0x01e3,0x07c1,0x0002,0x0000
06e6 01fb 07c6  |    |		.DBG4T	0x01fb,0x07c6,0x0002,0x0000
06ea 0203 07c9  |    |		.DBG4T	0x0203,0x07c9,0x0002,0x0000
06ee 024b 07cc  | K  |		.DBG4T	0x024b,0x07cc,0x0001,0x0000
06f2 026b 07d0  | k  |		.DBG4T	0x026b,0x07d0,0x0002,0x0000
06f6 027b 07d5  | {  |		.DBG4T	0x027b,0x07d5,0x0002,0x0000
06fa 0293 07d9  |    |		.DBG4T	0x0293,0x07d9,0x0002,0x0000
06fe 02ab 07de  |    |		.DBG4T	0x02ab,0x07de,0x0002,0x0000
0702 02c3 07e3  |    |		.DBG4T	0x02c3,0x07e3,0x0002,0x0000
0706 02e3 07ea  |    |		.DBG4T	0x02e3,0x07ea,0x0001,0x0000
070a 0343 07fd  | C  |		.DBG4T	0x0343,0x07fd,0x0001,0x0000
070e 037b 080a  | {  |		.DBG4T	0x037b,0x080a,0x0001,0x0000
0712 03b3 0811  |    |		.DBG4T	0x03b3,0x0811,0x0001,0x0000
0716 03db 0819  |    |		.DBG4T	0x03db,0x0819,0x0001,0x0000
071a 03fb 0820  |    |		.DBG4T	0x03fb,0x0820,0x0001,0x0000
071e 0423 082a  | # *|		.DBG4T	0x0423,0x082a,0x0001,0x0000
0722 044b 082e  | K .|		.DBG4T	0x044b,0x082e,0x2801,0x0002
0726 049b 0000  |    |		.DBG4T	0x049b,0x0000,0x0005,0x0000
072a 0503 0000  |    |		.DBG4T	0x0503,0x0000,0x0005,0x0000
072e 054b 0000  | K  |		.DBG4T	0x054b,0x0000,0x0005,0x0000
0732 0563 0000  | c  |		.DBG4T	0x0563,0x0000,0x0005,0x0000
0736 05a3 083f  |   ?|		.DBG4T	0x05a3,0x083f,0x0002,0x0000
073a 05b3 0842  |   B|		.DBG4T	0x05b3,0x0842,0x0002,0x0000
073e 05cb 0845  |   E|		.DBG4T	0x05cb,0x0845,0x0002,0x0000
0742 05e3 0848  |   H|		.DBG4T	0x05e3,0x0848,0x0002,0x0000
0746 05fb 084e  |   N|		.DBG4T	0x05fb,0x084e,0x0001,0x0000
074a 0613 0855  |   U|		.DBG4T	0x0613,0x0855,0x0001,0x0000
074e 063b 085e  | ; ^|		.DBG4T	0x063b,0x085e,0x0001,0x0000
0752 ; --------------------------------------------------------------------------------------
0752 ; Debug chain
0752 ; --------------------------------------------------------------------------------------
0752 0028 0000  | (  |		.DBGLEN	0x0028,0x0000
0754 000b 000c  |    |		.DBGLNO	0x000b,0x000c,0x000d,0x000e,0x000f,0x0016,0x0018,0x0019,0x001d,0x0021,0x0028,0x002e,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d,0x003f,0x0041,0x0043,0x0045,0x0047,0x0049,0x004b,0x004d,0x004f,0x0051,0x0053,0x0055,0x0057,0x0059,0x005b,0x005d,0x0067,0x0068,0x0073,0x0077
077c ; --------------------------------------------------------------------------------------
077c ; Debug chain
077c ; --------------------------------------------------------------------------------------
077c 0024 0000  | $  |		.DBGLEN	0x0024,0x0000
077e 007b 008e  | {  |		.DBGLNO	0x007b,0x008e,0x00b4,0x00bb,0x00cd,0x00dd,0x00df,0x00e1,0x00e3,0x00e5,0x00e7,0x00e9,0x00eb,0x00ed,0x00ef,0x00f1,0x00f3,0x00f5,0x00f7,0x00f9,0x00fb,0x00fd,0x00ff,0x0101,0x0103,0x0105,0x0107,0x0109,0x010b,0x010d,0x010f,0x0111,0x0113,0x0115,0x0117,0x0119
07a2 ; --------------------------------------------------------------------------------------
07a2 ; Debug chain
07a2 ; --------------------------------------------------------------------------------------
07a2 0000 0001  |    |		.DBGLEN	0x0000,0x0001
07a4 014b       | K  |		.DBGLNO	0x014b
07a5 ; --------------------------------------------------------------------------------------
07a5 ; Debug chain
07a5 ; --------------------------------------------------------------------------------------
07a5 0002 0009  |    |		.DBGLEN	0x0002,0x0009
07a7 0173 0176  | s v|		.DBGLNO	0x0173,0x0176,0x0179,0x0180,0x0184,0x0189,0x0191,0x0193,0x019b,0x01a0,0x01a2
07b2 ; --------------------------------------------------------------------------------------
07b2 ; Debug chain
07b2 ; --------------------------------------------------------------------------------------
07b2 0000 0001  |    |		.DBGLEN	0x0000,0x0001
07b4 01ab       |    |		.DBGLNO	0x01ab
07b5 ; --------------------------------------------------------------------------------------
07b5 ; Debug chain
07b5 ; --------------------------------------------------------------------------------------
07b5 0000 0001  |    |		.DBGLEN	0x0000,0x0001
07b7 01b3       |    |		.DBGLNO	0x01b3
07b8 ; --------------------------------------------------------------------------------------
07b8 ; Debug chain
07b8 ; --------------------------------------------------------------------------------------
07b8 0000 0001  |    |		.DBGLEN	0x0000,0x0001
07ba 01bb       |    |		.DBGLNO	0x01bb
07bb ; --------------------------------------------------------------------------------------
07bb ; Debug chain
07bb ; --------------------------------------------------------------------------------------
07bb 0000 0001  |    |		.DBGLEN	0x0000,0x0001
07bd 01cb       |    |		.DBGLNO	0x01cb
07be ; --------------------------------------------------------------------------------------
07be ; Debug chain
07be ; --------------------------------------------------------------------------------------
07be 0000 0001  |    |		.DBGLEN	0x0000,0x0001
07c0 01d3       |    |		.DBGLNO	0x01d3
07c1 ; --------------------------------------------------------------------------------------
07c1 ; Debug chain
07c1 ; --------------------------------------------------------------------------------------
07c1 0000 0003  |    |		.DBGLEN	0x0000,0x0003
07c3 01e3 01e7  |    |		.DBGLNO	0x01e3,0x01e7,0x01f0
07c6 ; --------------------------------------------------------------------------------------
07c6 ; Debug chain
07c6 ; --------------------------------------------------------------------------------------
07c6 0000 0001  |    |		.DBGLEN	0x0000,0x0001
07c8 01fb       |    |		.DBGLNO	0x01fb
07c9 ; --------------------------------------------------------------------------------------
07c9 ; Debug chain
07c9 ; --------------------------------------------------------------------------------------
07c9 0000 0001  |    |		.DBGLEN	0x0000,0x0001
07cb 0203       |    |		.DBGLNO	0x0203
07cc ; --------------------------------------------------------------------------------------
07cc ; Debug chain
07cc ; --------------------------------------------------------------------------------------
07cc 0000 0002  |    |		.DBGLEN	0x0000,0x0002
07ce 024b 024f  | K O|		.DBGLNO	0x024b,0x024f
07d0 ; --------------------------------------------------------------------------------------
07d0 ; Debug chain
07d0 ; --------------------------------------------------------------------------------------
07d0 0001 0002  |    |		.DBGLEN	0x0001,0x0002
07d2 026b 026d  | k m|		.DBGLNO	0x026b,0x026d,0x0274
07d5 ; --------------------------------------------------------------------------------------
07d5 ; Debug chain
07d5 ; --------------------------------------------------------------------------------------
07d5 0001 0001  |    |		.DBGLEN	0x0001,0x0001
07d7 027b 027f  | {  |		.DBGLNO	0x027b,0x027f
07d9 ; --------------------------------------------------------------------------------------
07d9 ; Debug chain
07d9 ; --------------------------------------------------------------------------------------
07d9 0002 0001  |    |		.DBGLEN	0x0002,0x0001
07db 0293 0297  |    |		.DBGLNO	0x0293,0x0297,0x029b
07de ; --------------------------------------------------------------------------------------
07de ; Debug chain
07de ; --------------------------------------------------------------------------------------
07de 0002 0001  |    |		.DBGLEN	0x0002,0x0001
07e0 02ab 02af  |    |		.DBGLNO	0x02ab,0x02af,0x02b3
07e3 ; --------------------------------------------------------------------------------------
07e3 ; Debug chain
07e3 ; --------------------------------------------------------------------------------------
07e3 0002 0003  |    |		.DBGLEN	0x0002,0x0003
07e5 02c3 02c7  |    |		.DBGLNO	0x02c3,0x02c7,0x02cb,0x02cf,0x02d1
07ea ; --------------------------------------------------------------------------------------
07ea ; Debug chain
07ea ; --------------------------------------------------------------------------------------
07ea 0006 000b  |    |		.DBGLEN	0x0006,0x000b
07ec 02e3 02e7  |    |		.DBGLNO	0x02e3,0x02e7,0x02eb,0x02f1,0x02f2,0x02f6,0x02fa,0x02fe,0x0302,0x0308,0x0325,0x0327,0x032b,0x032d,0x0332,0x0336,0x033a
07fd ; --------------------------------------------------------------------------------------
07fd ; Debug chain
07fd ; --------------------------------------------------------------------------------------
07fd 0004 0007  |    |		.DBGLEN	0x0004,0x0007
07ff 0343 0347  | C G|		.DBGLNO	0x0343,0x0347,0x034b,0x034f,0x0353,0x0357,0x035c,0x035d,0x0360,0x0363,0x0366
080a ; --------------------------------------------------------------------------------------
080a ; Debug chain
080a ; --------------------------------------------------------------------------------------
080a 0003 0002  |    |		.DBGLEN	0x0003,0x0002
080c 037b 037f  | {  |		.DBGLNO	0x037b,0x037f,0x0383,0x0387,0x038a
0811 ; --------------------------------------------------------------------------------------
0811 ; Debug chain
0811 ; --------------------------------------------------------------------------------------
0811 0003 0003  |    |		.DBGLEN	0x0003,0x0003
0813 03b3 03b7  |    |		.DBGLNO	0x03b3,0x03b7,0x03bb,0x03bf,0x03c2,0x03cb
0819 ; --------------------------------------------------------------------------------------
0819 ; Debug chain
0819 ; --------------------------------------------------------------------------------------
0819 0002 0003  |    |		.DBGLEN	0x0002,0x0003
081b 03db 03df  |    |		.DBGLNO	0x03db,0x03df,0x03e3,0x03e7,0x03f0
0820 ; --------------------------------------------------------------------------------------
0820 ; Debug chain
0820 ; --------------------------------------------------------------------------------------
0820 0000 0008  |    |		.DBGLEN	0x0000,0x0008
0822 03fb 03ff  |    |		.DBGLNO	0x03fb,0x03ff,0x0401,0x0405,0x0409,0x0411,0x0413,0x0416
082a ; --------------------------------------------------------------------------------------
082a ; Debug chain
082a ; --------------------------------------------------------------------------------------
082a 0001 0001  |    |		.DBGLEN	0x0001,0x0001
082c 0423 0433  | # 3|		.DBGLNO	0x0423,0x0433
082e ; --------------------------------------------------------------------------------------
082e ; Debug chain
082e ; --------------------------------------------------------------------------------------
082e 0000 000f  |    |		.DBGLEN	0x0000,0x000f
0830 044b 044f  | K O|		.DBGLNO	0x044b,0x044f,0x0453,0x0455,0x0463,0x046d,0x0471,0x0474,0x0479,0x047c,0x0480,0x0488,0x048a,0x048e,0x0490
083f ; --------------------------------------------------------------------------------------
083f ; Debug chain
083f ; --------------------------------------------------------------------------------------
083f 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0841 05a3       |    |		.DBGLNO	0x05a3
0842 ; --------------------------------------------------------------------------------------
0842 ; Debug chain
0842 ; --------------------------------------------------------------------------------------
0842 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0844 05b3       |    |		.DBGLNO	0x05b3
0845 ; --------------------------------------------------------------------------------------
0845 ; Debug chain
0845 ; --------------------------------------------------------------------------------------
0845 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0847 05cb       |    |		.DBGLNO	0x05cb
0848 ; --------------------------------------------------------------------------------------
0848 ; Debug chain
0848 ; --------------------------------------------------------------------------------------
0848 0000 0004  |    |		.DBGLEN	0x0000,0x0004
084a 05e4 05e8  |    |		.DBGLNO	0x05e4,0x05e8,0x05f0,0x05f5
084e ; --------------------------------------------------------------------------------------
084e ; Debug chain
084e ; --------------------------------------------------------------------------------------
084e 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0850 05fb 05ff  |    |		.DBGLNO	0x05fb,0x05ff,0x0602,0x0606,0x060a
0855 ; --------------------------------------------------------------------------------------
0855 ; Debug chain
0855 ; --------------------------------------------------------------------------------------
0855 0001 0006  |    |		.DBGLEN	0x0001,0x0006
0857 0613 0616  |    |		.DBGLNO	0x0613,0x0616,0x061a,0x061c,0x061f,0x0623,0x062c
085e ; --------------------------------------------------------------------------------------
085e ; Debug chain
085e ; --------------------------------------------------------------------------------------
085e 0000 000a  |    |		.DBGLEN	0x0000,0x000a
0860 063b 063f  | ; ?|		.DBGLNO	0x063b,0x063f,0x064d,0x064f,0x0653,0x0657,0x065b,0x0663,0x0665,0x066a
086a 0000 0000  |    |		.BLANK	0000[0x196]