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

⟦301b57dcb⟧

    Length: 7168 (0x1c00)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0a40       | @  |		.CONST	0x0a40								; 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 0006       |    |		.CONST	0x0006								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 007c       | |  |		.CONST	0x007c								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0028       | (  |		.CONST	0x0028								; Number of locals
000b			INIT_0008:
000b 029a 0083  |    |		Declare_Subprogram	INIT_0080,For_Outer_Call,Visible,Unelaborated
000d 029a 015b  |   [|		Declare_Subprogram	INIT_0158,For_Outer_Call,Visible,Unelaborated
000f 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated
0011 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated
0013 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated
0015 029a 0363  |   c|		Declare_Subprogram	INIT_0360,For_Outer_Call,Visible,Unelaborated
0017 029a 038b  |    |		Declare_Subprogram	INIT_0388,For_Outer_Call,Visible,Unelaborated
0019 029a 03c3  |    |		Declare_Subprogram	INIT_03c0,For_Outer_Call,Visible,Unelaborated
001b 029a 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Outer_Call,Visible,Unelaborated
001d 029a 0463  |   c|		Declare_Subprogram	INIT_0460,For_Outer_Call,Visible,Unelaborated
001f 029a 0483  |    |		Declare_Subprogram	INIT_0480,For_Outer_Call,Visible,Unelaborated
0021 029a 0493  |    |		Declare_Subprogram	INIT_0490,For_Outer_Call,Visible,Unelaborated
0023 029a 04a3  |    |		Declare_Subprogram	INIT_04a0,For_Outer_Call,Visible,Unelaborated
0025 029a 04b3  |    |		Declare_Subprogram	INIT_04b0,For_Outer_Call,Visible,Unelaborated
0027 029a 04c3  |    |		Declare_Subprogram	INIT_04c0,For_Outer_Call,Visible,Unelaborated
0029 029a 04d3  |    |		Declare_Subprogram	INIT_04d0,For_Outer_Call,Visible,Unelaborated
002b 029a 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Outer_Call,Visible,Unelaborated
002d 029a 057b  |   {|		Declare_Subprogram	INIT_0578,For_Outer_Call,Visible,Unelaborated
002f 029a 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call,Visible,Unelaborated
0031 029a 070b  |    |		Declare_Subprogram	INIT_0708,For_Outer_Call,Visible,Unelaborated
0033 029a 077b  |   {|		Declare_Subprogram	INIT_0778,For_Outer_Call,Visible,Unelaborated
0035 029a 07cb  |    |		Declare_Subprogram	INIT_07c8,For_Outer_Call,Visible,Unelaborated
0037 029a 07fb  |    |		Declare_Subprogram	INIT_07f8,For_Outer_Call,Visible,Unelaborated
0039 029a 0853  |   S|		Declare_Subprogram	INIT_0850,For_Outer_Call,Visible,Unelaborated
003b 029a 0873  |   s|		Declare_Subprogram	INIT_0870,For_Outer_Call,Visible,Unelaborated
003d 029a 08f3  |    |		Declare_Subprogram	INIT_08f0,For_Outer_Call,Visible,Unelaborated
003f 029a 0913  |    |		Declare_Subprogram	INIT_0910,For_Outer_Call,Visible,Unelaborated
0041 029a 0923  |   #|		Declare_Subprogram	INIT_0920,For_Outer_Call,Visible,Unelaborated
0043 00bf       |    |		Action	Accept_Activation
0044 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0045 00c7       |    |		Action	Elaborate_Subprogram
0046 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0047 00c7       |    |		Action	Elaborate_Subprogram
0048 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0049 00c7       |    |		Action	Elaborate_Subprogram
004a 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
004d 00c7       |    |		Action	Elaborate_Subprogram
004e 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
004f 00c7       |    |		Action	Elaborate_Subprogram
0050 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0051 00c7       |    |		Action	Elaborate_Subprogram
0052 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0053 00c7       |    |		Action	Elaborate_Subprogram
0054 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0055 00c7       |    |		Action	Elaborate_Subprogram
0056 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0057 00c7       |    |		Action	Elaborate_Subprogram
0058 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
0059 00c7       |    |		Action	Elaborate_Subprogram
005a 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
005b 00c7       |    |		Action	Elaborate_Subprogram
005c 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
005d 00c7       |    |		Action	Elaborate_Subprogram
005e 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
005f 00c7       |    |		Action	Elaborate_Subprogram
0060 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
0061 00c7       |    |		Action	Elaborate_Subprogram
0062 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0063 00c7       |    |		Action	Elaborate_Subprogram
0064 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0065 00c7       |    |		Action	Elaborate_Subprogram
0066 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0067 00c7       |    |		Action	Elaborate_Subprogram
0068 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
0069 00c7       |    |		Action	Elaborate_Subprogram
006a 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
006b 00c7       |    |		Action	Elaborate_Subprogram
006c 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
006d 00c7       |    |		Action	Elaborate_Subprogram
006e 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
006f 00c7       |    |		Action	Elaborate_Subprogram
0070 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
0071 00c7       |    |		Action	Elaborate_Subprogram
0072 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0073 00c7       |    |		Action	Elaborate_Subprogram
0074 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
0075 00c7       |    |		Action	Elaborate_Subprogram
0076 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
0077 00c7       |    |		Action	Elaborate_Subprogram
0078 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0079 00c7       |    |		Action	Elaborate_Subprogram
007a 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
007b 00c7       |    |		Action	Elaborate_Subprogram
007c			BODY_0008:
007c 00bc       |    |		Action	Signal_Activated
007d 00bb       |    |		Action	Signal_Completion
007e 0000 0000  |    |		.XXX[0x2]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0091       |    |		.CONST	0x0091								; Address of begin
0081 013c       | <  |		.CONST	0x013c								; Address of exception handler
0082 0008       |    |		.CONST	0x0008								; Number of locals
0083			INIT_0080:
0083 e002       |    |		Load	0x0,0x2
0084 0322       | "  |		Declare_Variable	Record
0085 e003       |    |		Load	0x0,0x3
0086 0322       | "  |		Declare_Variable	Record
0087 e004       |    |		Load	0x0,0x4
0088 0007       |    |		Action	Break_Optional
0089 e005       |    |		Load	0x0,0x5
008a 0007       |    |		Action	Break_Optional
008b e005       |    |		Load	0x0,0x5
008c 0007       |    |		Action	Break_Optional
008d e006       |    |		Load	0x0,0x6
008e 0007       |    |		Action	Break_Optional
008f e007       |    |		Load	0x0,0x7
0090 0007       |    |		Action	Break_Optional
0091			BODY_0080:
0091 e007       |    |		Load	0x0,0x7
0092 e006       |    |		Load	0x0,0x6
0093 e005       |    |		Load	0x0,0x5
0094 00d8       |    |		Load_Top	At_Offset_0
0095 e004       |    |		Load	0x0,0x4
0096 e403       |    |		Load	0x2,0x3
0097 e008       |    |		Load	0x0,0x8
0098 4800       |H   |		Short_Literal	0x0
0099 60b6       |`   |		Indirect_Literal	Discrete,0x150,{0x00000000, 0x7ffffffb}
009a 4800       |H   |		Short_Literal	0x0
009b e009       |    |		Load	0x0,0x9
009c e5fe       |    |		Load	0x2,-0x2
009d e5ff       |    |		Load	0x2,-0x1
009e 800a       |    |		Call	0x0,0xa
009f 00d1       |    |		Pop_Control	Pop_Count_1
00a0 c404       |    |		Store	0x2,0x4
00a1 c405       |    |		Store	0x2,0x5
00a2 c406       |    |		Store	0x2,0x6
00a3 003b       | ;  |		Store_Top	Access,At_Offset_3
00a4 0059       | Y  |		Store_Top	Discrete,At_Offset_1
00a5 00d8       |    |		Load_Top	At_Offset_0
00a6 0f01       |    |		Execute_Immediate	Equal,0x1
00a7 6888       |h   |		Jump_Zero	0x130
00a8 e403       |    |		Load	0x2,0x3
00a9 e008       |    |		Load	0x0,0x8
00aa 017f       |    |		Execute	Record,Equal
00ab 6884       |h   |		Jump_Zero	0x130
00ac e404       |    |		Load	0x2,0x4
00ad 0f08       |    |		Execute_Immediate	Equal,0x8
00ae 6881       |h   |		Jump_Zero	0x130
00af 00cf       |    |		Action	Mark_Auxiliary
00b0 00da       |    |		Load_Top	At_Offset_2
00b1 0227       | '  |		Execute	Access,All_Reference
00b2 01d9       |    |		Execute	Vector,Reverse_Bounds
00b3 0263       | c  |		Execute	Discrete,Above_Bound
00b4 707a       |pz  |		Jump_Nonzero	0x12f
00b5 00d8       |    |		Load_Top	At_Offset_0
00b6 e407       |    |		Load	0x2,0x7
00b7 0227       | '  |		Execute	Access,All_Reference
00b8 01d7       |    |		Execute	Vector,Field_Read
00b9 7073       |ps  |		Jump_Nonzero	0x12d
00ba 4801       |H   |		Short_Literal	0x1
00bb 00d9       |    |		Load_Top	At_Offset_1
00bc 0aff       |    |		Execute_Immediate	Plus,-0x1
00bd e00b       |    |		Load	0x0,0xb
00be 03ba       |    |		Declare_Variable	Access,By_Allocation,With_Constraint
00bf e402       |    |		Load	0x2,0x2
00c0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00c1 e402       |    |		Load	0x2,0x2
00c2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00c3 0229       | )  |		Execute	Access,All_Read
00c4 00d8       |    |		Load_Top	At_Offset_0
00c5 4801       |H   |		Short_Literal	0x1
00c6 00db       |    |		Load_Top	At_Offset_3
00c7 0aff       |    |		Execute_Immediate	Plus,-0x1
00c8 e407       |    |		Load	0x2,0x7
00c9 0227       | '  |		Execute	Access,All_Reference
00ca 01cf       |    |		Execute	Vector,Slice_Read
00cb e00c       |    |		Load	0x0,0xc
00cc e00d       |    |		Load	0x0,0xd
00cd e00e       |    |		Load	0x0,0xe
00ce a00f       |    |		Store_Unchecked	0x0,0xf
00cf 8010       |    |		Call	0x0,0x10
00d0 00d2       |    |		Pop_Control	Pop_Count_2
00d1 00d8       |    |		Load_Top	At_Offset_0
00d2 e407       |    |		Load	0x2,0x7
00d3 0227       | '  |		Execute	Access,All_Reference
00d4 01dc       |    |		Execute	Vector,Last
00d5 027f       |    |		Execute	Discrete,Equal
00d6 6808       |h   |		Jump_Zero	0xdf
00d7 e402       |    |		Load	0x2,0x2
00d8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00d9 0227       | '  |		Execute	Access,All_Reference
00da e00b       |    |		Load	0x0,0xb
00db 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
00dc e402       |    |		Load	0x2,0x2
00dd 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00de 7842       |xB  |		Jump	0x121
00df e407       |    |		Load	0x2,0x7
00e0 0227       | '  |		Execute	Access,All_Reference
00e1 01dc       |    |		Execute	Vector,Last
00e2 e407       |    |		Load	0x2,0x7
00e3 0227       | '  |		Execute	Access,All_Reference
00e4 01d7       |    |		Execute	Vector,Field_Read
00e5 701f       |p   |		Jump_Nonzero	0x105
00e6 4801       |H   |		Short_Literal	0x1
00e7 e407       |    |		Load	0x2,0x7
00e8 0227       | '  |		Execute	Access,All_Reference
00e9 01dc       |    |		Execute	Vector,Last
00ea 00da       |    |		Load_Top	At_Offset_2
00eb 0272       | r  |		Execute	Discrete,Minus
00ec 0aff       |    |		Execute_Immediate	Plus,-0x1
00ed e00b       |    |		Load	0x0,0xb
00ee 03ba       |    |		Declare_Variable	Access,By_Allocation,With_Constraint
00ef e402       |    |		Load	0x2,0x2
00f0 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00f1 e402       |    |		Load	0x2,0x2
00f2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00f3 0229       | )  |		Execute	Access,All_Read
00f4 00d8       |    |		Load_Top	At_Offset_0
00f5 00da       |    |		Load_Top	At_Offset_2
00f6 0a01       |    |		Execute_Immediate	Plus,0x1
00f7 e407       |    |		Load	0x2,0x7
00f8 0227       | '  |		Execute	Access,All_Reference
00f9 01dc       |    |		Execute	Vector,Last
00fa 0aff       |    |		Execute_Immediate	Plus,-0x1
00fb e407       |    |		Load	0x2,0x7
00fc 0227       | '  |		Execute	Access,All_Reference
00fd 01cf       |    |		Execute	Vector,Slice_Read
00fe e00c       |    |		Load	0x0,0xc
00ff e00d       |    |		Load	0x0,0xd
0100 e00e       |    |		Load	0x0,0xe
0101 a00f       |    |		Store_Unchecked	0x0,0xf
0102 8010       |    |		Call	0x0,0x10
0103 00d2       |    |		Pop_Control	Pop_Count_2
0104 781c       |x   |		Jump	0x121
0105 4801       |H   |		Short_Literal	0x1
0106 e407       |    |		Load	0x2,0x7
0107 0227       | '  |		Execute	Access,All_Reference
0108 01dc       |    |		Execute	Vector,Last
0109 00da       |    |		Load_Top	At_Offset_2
010a 0272       | r  |		Execute	Discrete,Minus
010b e00b       |    |		Load	0x0,0xb
010c 03ba       |    |		Declare_Variable	Access,By_Allocation,With_Constraint
010d e402       |    |		Load	0x2,0x2
010e 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
010f e402       |    |		Load	0x2,0x2
0110 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0111 0229       | )  |		Execute	Access,All_Read
0112 00d8       |    |		Load_Top	At_Offset_0
0113 00da       |    |		Load_Top	At_Offset_2
0114 0a01       |    |		Execute_Immediate	Plus,0x1
0115 e407       |    |		Load	0x2,0x7
0116 0227       | '  |		Execute	Access,All_Reference
0117 01dc       |    |		Execute	Vector,Last
0118 e407       |    |		Load	0x2,0x7
0119 0227       | '  |		Execute	Access,All_Reference
011a 01cf       |    |		Execute	Vector,Slice_Read
011b e00c       |    |		Load	0x0,0xc
011c e00d       |    |		Load	0x0,0xd
011d e00e       |    |		Load	0x0,0xe
011e a00f       |    |		Store_Unchecked	0x0,0xf
011f 8010       |    |		Call	0x0,0x10
0120 00d2       |    |		Pop_Control	Pop_Count_2
0121 e407       |    |		Load	0x2,0x7
0122 e011       |    |		Load	0x0,0x11
0123 e012       |    |		Load	0x0,0x12
0124 a013       |    |		Store_Unchecked	0x0,0x13
0125 8014       |    |		Call	0x0,0x14
0126 c407       |    |		Store	0x2,0x7
0127 e402       |    |		Load	0x2,0x2
0128 e5fd       |    |		Load	0x2,-0x3
0129 017d       | }  |		Execute	Record,Structure_Write
012a 4801       |H   |		Short_Literal	0x1
012b a5fc       |    |		Store_Unchecked	0x2,-0x4
012c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
012d 00c8       |    |		Action	Pop_Auxiliary_Range
012e 3f86       |?   |		Loop_Increasing	0xb5
012f 00ce       |    |		Action	Pop_Auxiliary
0130 00d9       |    |		Load_Top	At_Offset_1
0131 e011       |    |		Load	0x0,0x11
0132 e012       |    |		Load	0x0,0x12
0133 a013       |    |		Store_Unchecked	0x0,0x13
0134 8014       |    |		Call	0x0,0x14
0135 003a       | :  |		Store_Top	Access,At_Offset_2
0136 e015       |    |		Load	0x0,0x15
0137 e5fd       |    |		Load	0x2,-0x3
0138 017d       | }  |		Execute	Record,Structure_Write
0139 4800       |H   |		Short_Literal	0x0
013a a5fc       |    |		Store_Unchecked	0x2,-0x4
013b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
013c			TRAP_0080:
013c 0007       |    |		Action	Break_Optional
013d e402       |    |		Load	0x2,0x2
013e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
013f e016       |    |		Load	0x0,0x16
0140 e017       |    |		Load	0x0,0x17
0141 a018       |    |		Store_Unchecked	0x0,0x18
0142 8014       |    |		Call	0x0,0x14
0143 e402       |    |		Load	0x2,0x2
0144 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0145 e402       |    |		Load	0x2,0x2
0146 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0147 e016       |    |		Load	0x0,0x16
0148 e017       |    |		Load	0x0,0x17
0149 a018       |    |		Store_Unchecked	0x0,0x18
014a 8014       |    |		Call	0x0,0x14
014b e402       |    |		Load	0x2,0x2
014c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
014d 00d8       |    |		Load_Top	At_Offset_0
014e 0101       |    |		Execute	Exception,Reraise
014f 0000       |    |		.XXX[0x1]
0150 0000 0000  |    |		.LITERAL	{0x00000000, 0x7ffffffb}
0154 0000 0000  |    |		.BLANK	0000[0x4]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 0171       | q  |		.CONST	0x0171								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0005       |    |		.CONST	0x0005								; Number of locals
015b			INIT_0158:
015b e5fd       |    |		Load	0x2,-0x3
015c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
015d 0227       | '  |		Execute	Access,All_Reference
015e 01db       |    |		Execute	Vector,Length
015f e005       |    |		Load	0x0,0x5
0160 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0161 e5fd       |    |		Load	0x2,-0x3
0162 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0163 0227       | '  |		Execute	Access,All_Reference
0164 01db       |    |		Execute	Vector,Length
0165 e005       |    |		Load	0x0,0x5
0166 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0167 4801       |H   |		Short_Literal	0x1
0168 00da       |    |		Load_Top	At_Offset_2
0169 0a02       |    |		Execute_Immediate	Plus,0x2
016a 00da       |    |		Load_Top	At_Offset_2
016b 0273       | s  |		Execute	Discrete,Plus
016c e019       |    |		Load	0x0,0x19
016d 035b       | [  |		Declare_Type	Array,Constrained
016e 0337       | 7  |		Declare_Variable	Array
016f e005       |    |		Load	0x0,0x5
0170 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0171			BODY_0158:
0171 00cf       |    |		Action	Mark_Auxiliary
0172 e5fd       |    |		Load	0x2,-0x3
0173 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0174 0227       | '  |		Execute	Access,All_Reference
0175 01d9       |    |		Execute	Vector,Reverse_Bounds
0176 0263       | c  |		Execute	Discrete,Above_Bound
0177 700d       |p   |		Jump_Nonzero	0x185
0178 00db       |    |		Load_Top	At_Offset_3
0179 0a01       |    |		Execute_Immediate	Plus,0x1
017a c405       |    |		Store	0x2,0x5
017b 00d8       |    |		Load_Top	At_Offset_0
017c e5fd       |    |		Load	0x2,-0x3
017d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
017e 0227       | '  |		Execute	Access,All_Reference
017f 01d7       |    |		Execute	Vector,Field_Read
0180 e405       |    |		Load	0x2,0x5
0181 e404       |    |		Load	0x2,0x4
0182 01d6       |    |		Execute	Vector,Field_Write
0183 00c8       |    |		Action	Pop_Auxiliary_Range
0184 3ff3       |?   |		Loop_Increasing	0x178
0185 00ce       |    |		Action	Pop_Auxiliary
0186 00d8       |    |		Load_Top	At_Offset_0
0187 0a01       |    |		Execute_Immediate	Plus,0x1
0188 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0189 4800       |H   |		Short_Literal	0x0
018a 00d9       |    |		Load_Top	At_Offset_1
018b 00db       |    |		Load_Top	At_Offset_3
018c 01d6       |    |		Execute	Vector,Field_Write
018d 00cf       |    |		Action	Mark_Auxiliary
018e e5fd       |    |		Load	0x2,-0x3
018f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0190 0227       | '  |		Execute	Access,All_Reference
0191 01d9       |    |		Execute	Vector,Reverse_Bounds
0192 0263       | c  |		Execute	Discrete,Above_Bound
0193 700d       |p   |		Jump_Nonzero	0x1a1
0194 00db       |    |		Load_Top	At_Offset_3
0195 0a01       |    |		Execute_Immediate	Plus,0x1
0196 c405       |    |		Store	0x2,0x5
0197 00d8       |    |		Load_Top	At_Offset_0
0198 e5fd       |    |		Load	0x2,-0x3
0199 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
019a 0227       | '  |		Execute	Access,All_Reference
019b 01d7       |    |		Execute	Vector,Field_Read
019c e405       |    |		Load	0x2,0x5
019d e404       |    |		Load	0x2,0x4
019e 01d6       |    |		Execute	Vector,Field_Write
019f 00c8       |    |		Action	Pop_Auxiliary_Range
01a0 3ff3       |?   |		Loop_Increasing	0x194
01a1 00ce       |    |		Action	Pop_Auxiliary
01a2 00d8       |    |		Load_Top	At_Offset_0
01a3 0a01       |    |		Execute_Immediate	Plus,0x1
01a4 0059       | Y  |		Store_Top	Discrete,At_Offset_1
01a5 4800       |H   |		Short_Literal	0x0
01a6 00d9       |    |		Load_Top	At_Offset_1
01a7 00db       |    |		Load_Top	At_Offset_3
01a8 01d6       |    |		Execute	Vector,Field_Write
01a9 00d9       |    |		Load_Top	At_Offset_1
01aa 4800       |H   |		Short_Literal	0x0
01ab 4808       |H   |		Short_Literal	0x8
01ac e008       |    |		Load	0x0,0x8
01ad e009       |    |		Load	0x0,0x9
01ae e5fe       |    |		Load	0x2,-0x2
01af e5ff       |    |		Load	0x2,-0x1
01b0 801a       |    |		Call	0x0,0x1a
01b1 4801       |H   |		Short_Literal	0x1
01b2 a5fc       |    |		Store_Unchecked	0x2,-0x4
01b3 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01b4 0000 0000  |    |		.BLANK	0000[0x4]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01c9       |    |		.CONST	0x01c9								; Address of begin
01b9 0234       | 4  |		.CONST	0x0234								; Address of exception handler
01ba 0008       |    |		.CONST	0x0008								; Number of locals
01bb			INIT_01b8:
01bb e006       |    |		Load	0x0,0x6
01bc 0007       |    |		Action	Break_Optional
01bd e003       |    |		Load	0x0,0x3
01be 0322       | "  |		Declare_Variable	Record
01bf e004       |    |		Load	0x0,0x4
01c0 0007       |    |		Action	Break_Optional
01c1 e005       |    |		Load	0x0,0x5
01c2 0007       |    |		Action	Break_Optional
01c3 e005       |    |		Load	0x0,0x5
01c4 0007       |    |		Action	Break_Optional
01c5 e007       |    |		Load	0x0,0x7
01c6 0007       |    |		Action	Break_Optional
01c7 e01b       |    |		Load	0x0,0x1b
01c8 0007       |    |		Action	Break_Optional
01c9			BODY_01b8:
01c9 e01b       |    |		Load	0x0,0x1b
01ca a5fd       |    |		Store_Unchecked	0x2,-0x3
01cb e5ff       |    |		Load	0x2,-0x1
01cc 0227       | '  |		Execute	Access,All_Reference
01cd 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
01ce 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
01cf e01c       |    |		Load	0x0,0x1c
01d0 017f       |    |		Execute	Record,Equal
01d1 681a       |h   |		Jump_Zero	0x1ec
01d2 4800       |H   |		Short_Literal	0x0
01d3 4800       |H   |		Short_Literal	0x0
01d4 4812       |H   |		Short_Literal	0x12
01d5 e01d       |    |		Load	0x0,0x1d
01d6 0334       | 4  |		Declare_Variable	Array,With_Constraint
01d7 5070       |Pp  |		Indirect_Literal	Any,0x248,{0x574d5f43, 0x4f4c4f52}
01d8 e5ff       |    |		Load	0x2,-0x1
01d9 801e       |    |		Call	0x0,0x1e
01da e403       |    |		Load	0x2,0x3
01db 017d       | }  |		Execute	Record,Structure_Write
01dc e403       |    |		Load	0x2,0x3
01dd e01c       |    |		Load	0x0,0x1c
01de 017f       |    |		Execute	Record,Equal
01df 6803       |h   |		Jump_Zero	0x1e3
01e0 4800       |H   |		Short_Literal	0x0
01e1 a5fc       |    |		Store_Unchecked	0x2,-0x4
01e2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01e3 e5ff       |    |		Load	0x2,-0x1
01e4 801f       |    |		Call	0x0,0x1f
01e5 e403       |    |		Load	0x2,0x3
01e6 e5ff       |    |		Load	0x2,-0x1
01e7 0227       | '  |		Execute	Access,All_Reference
01e8 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
01e9 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01ea e5ff       |    |		Load	0x2,-0x1
01eb 8020       |    |		Call	0x0,0x20
01ec e007       |    |		Load	0x0,0x7
01ed e006       |    |		Load	0x0,0x6
01ee e005       |    |		Load	0x0,0x5
01ef 00d8       |    |		Load_Top	At_Offset_0
01f0 e004       |    |		Load	0x0,0x4
01f1 e403       |    |		Load	0x2,0x3
01f2 e021       | !  |		Load	0x0,0x21
01f3 4800       |H   |		Short_Literal	0x0
01f4 604f       |`O  |		Indirect_Literal	Discrete,0x244,{0x00000000, 0x000f4240}
01f5 4800       |H   |		Short_Literal	0x0
01f6 e5ff       |    |		Load	0x2,-0x1
01f7 0227       | '  |		Execute	Access,All_Reference
01f8 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
01f9 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
01fa e5fe       |    |		Load	0x2,-0x2
01fb e5ff       |    |		Load	0x2,-0x1
01fc 800a       |    |		Call	0x0,0xa
01fd 00d1       |    |		Pop_Control	Pop_Count_1
01fe c404       |    |		Store	0x2,0x4
01ff c406       |    |		Store	0x2,0x6
0200 c405       |    |		Store	0x2,0x5
0201 c402       |    |		Store	0x2,0x2
0202 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0203 00d9       |    |		Load_Top	At_Offset_1
0204 0f01       |    |		Execute_Immediate	Equal,0x1
0205 7003       |p   |		Jump_Nonzero	0x209
0206 4800       |H   |		Short_Literal	0x0
0207 a5fc       |    |		Store_Unchecked	0x2,-0x4
0208 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0209 e403       |    |		Load	0x2,0x3
020a e021       | !  |		Load	0x0,0x21
020b 017f       |    |		Execute	Record,Equal
020c 6803       |h   |		Jump_Zero	0x210
020d e404       |    |		Load	0x2,0x4
020e 0e20       |    |		Execute_Immediate	Not_Equal,0x20
020f 6809       |h   |		Jump_Zero	0x219
0210 e402       |    |		Load	0x2,0x2
0211 e011       |    |		Load	0x0,0x11
0212 e012       |    |		Load	0x0,0x12
0213 a013       |    |		Store_Unchecked	0x0,0x13
0214 8014       |    |		Call	0x0,0x14
0215 c402       |    |		Store	0x2,0x2
0216 4800       |H   |		Short_Literal	0x0
0217 a5fc       |    |		Store_Unchecked	0x2,-0x4
0218 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0219 4801       |H   |		Short_Literal	0x1
021a 00db       |    |		Load_Top	At_Offset_3
021b e01b       |    |		Load	0x0,0x1b
021c 03ba       |    |		Declare_Variable	Access,By_Allocation,With_Constraint
021d 0039       | 9  |		Store_Top	Access,At_Offset_1
021e 00d8       |    |		Load_Top	At_Offset_0
021f 0229       | )  |		Execute	Access,All_Read
0220 00d8       |    |		Load_Top	At_Offset_0
0221 e402       |    |		Load	0x2,0x2
0222 0227       | '  |		Execute	Access,All_Reference
0223 e022       | "  |		Load	0x0,0x22
0224 e023       | #  |		Load	0x0,0x23
0225 e024       | $  |		Load	0x0,0x24
0226 a025       | %  |		Store_Unchecked	0x0,0x25
0227 8010       |    |		Call	0x0,0x10
0228 00d2       |    |		Pop_Control	Pop_Count_2
0229 e402       |    |		Load	0x2,0x2
022a e011       |    |		Load	0x0,0x11
022b e012       |    |		Load	0x0,0x12
022c a013       |    |		Store_Unchecked	0x0,0x13
022d 8014       |    |		Call	0x0,0x14
022e c402       |    |		Store	0x2,0x2
022f 00d8       |    |		Load_Top	At_Offset_0
0230 a5fd       |    |		Store_Unchecked	0x2,-0x3
0231 4801       |H   |		Short_Literal	0x1
0232 a5fc       |    |		Store_Unchecked	0x2,-0x4
0233 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0234			TRAP_01b8:
0234 0007       |    |		Action	Break_Optional
0235 e402       |    |		Load	0x2,0x2
0236 e011       |    |		Load	0x0,0x11
0237 e012       |    |		Load	0x0,0x12
0238 a013       |    |		Store_Unchecked	0x0,0x13
0239 8014       |    |		Call	0x0,0x14
023a c402       |    |		Store	0x2,0x2
023b 00d9       |    |		Load_Top	At_Offset_1
023c e026       | &  |		Load	0x0,0x26
023d e027       | '  |		Load	0x0,0x27
023e a028       | (  |		Store_Unchecked	0x0,0x28
023f 8014       |    |		Call	0x0,0x14
0240 003a       | :  |		Store_Top	Access,At_Offset_2
0241 00d8       |    |		Load_Top	At_Offset_0
0242 0101       |    |		Execute	Exception,Reraise
0243 0000       |    |		.XXX[0x1]
0244 0000 0000  |    |		.LITERAL	{0x00000000, 0x000f4240}
0248 574d 5f43  |WM_C|		.LITERAL	{0x574d5f43, 0x4f4c4f52}
024c 4d41 505f  |MAP_|		.XXX[0x6]
024e 5749 4e44  |WIND|
0250 4f57 5300  |OWS |
0252 0000 0000  |    |		.BLANK	0000[0x6]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 0269       | i  |		.CONST	0x0269								; Address of begin
0259 0004       |    |		.CONST	0x0004								; Address of exception handler
025a 0003       |    |		.CONST	0x0003								; Number of locals
025b			INIT_0258:
025b e003       |    |		Load	0x0,0x3
025c 0322       | "  |		Declare_Variable	Record
025d 4801       |H   |		Short_Literal	0x1
025e e029       | )  |		Load	0x0,0x29
025f 012c       | ,  |		Execute	Any,Size
0260 e004       |    |		Load	0x0,0x4
0261 012c       | ,  |		Execute	Any,Size
0262 0270       | p  |		Execute	Discrete,Divide
0263 e5fd       |    |		Load	0x2,-0x3
0264 01db       |    |		Execute	Vector,Length
0265 0271       | q  |		Execute	Discrete,Times
0266 e019       |    |		Load	0x0,0x19
0267 035b       | [  |		Declare_Type	Array,Constrained
0268 0337       | 7  |		Declare_Variable	Array
0269			BODY_0258:
0269 e5ff       |    |		Load	0x2,-0x1
026a 0227       | '  |		Execute	Access,All_Reference
026b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
026c 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
026d e01c       |    |		Load	0x0,0x1c
026e 017f       |    |		Execute	Record,Equal
026f 681a       |h   |		Jump_Zero	0x28a
0270 4800       |H   |		Short_Literal	0x0
0271 4800       |H   |		Short_Literal	0x0
0272 4812       |H   |		Short_Literal	0x12
0273 e01d       |    |		Load	0x0,0x1d
0274 0334       | 4  |		Declare_Variable	Array,With_Constraint
0275 502a       |P*  |		Indirect_Literal	Any,0x2a0,{0x574d5f43, 0x4f4c4f52}
0276 e5ff       |    |		Load	0x2,-0x1
0277 801e       |    |		Call	0x0,0x1e
0278 00da       |    |		Load_Top	At_Offset_2
0279 017d       | }  |		Execute	Record,Structure_Write
027a 00d9       |    |		Load_Top	At_Offset_1
027b e01c       |    |		Load	0x0,0x1c
027c 017f       |    |		Execute	Record,Equal
027d 6803       |h   |		Jump_Zero	0x281
027e 4800       |H   |		Short_Literal	0x0
027f a5fc       |    |		Store_Unchecked	0x2,-0x4
0280 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0281 e5ff       |    |		Load	0x2,-0x1
0282 801f       |    |		Call	0x0,0x1f
0283 00d9       |    |		Load_Top	At_Offset_1
0284 e5ff       |    |		Load	0x2,-0x1
0285 0227       | '  |		Execute	Access,All_Reference
0286 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0287 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0288 e5ff       |    |		Load	0x2,-0x1
0289 8020       |    |		Call	0x0,0x20
028a 00d8       |    |		Load_Top	At_Offset_0
028b e5fd       |    |		Load	0x2,-0x3
028c e02a       | *  |		Load	0x0,0x2a
028d e02b       | +  |		Load	0x0,0x2b
028e e02c       | ,  |		Load	0x0,0x2c
028f a02d       | -  |		Store_Unchecked	0x0,0x2d
0290 802e       | .  |		Call	0x0,0x2e
0291 00d1       |    |		Pop_Control	Pop_Count_1
0292 00d8       |    |		Load_Top	At_Offset_0
0293 4800       |H   |		Short_Literal	0x0
0294 4820       |H   |		Short_Literal	0x20
0295 e021       | !  |		Load	0x0,0x21
0296 e5ff       |    |		Load	0x2,-0x1
0297 0227       | '  |		Execute	Access,All_Reference
0298 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0299 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
029a e5fe       |    |		Load	0x2,-0x2
029b e5ff       |    |		Load	0x2,-0x1
029c 801a       |    |		Call	0x0,0x1a
029d 4801       |H   |		Short_Literal	0x1
029e a5fc       |    |		Store_Unchecked	0x2,-0x4
029f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
02a0 574d 5f43  |WM_C|		.LITERAL	{0x574d5f43, 0x4f4c4f52}
02a4 4d41 505f  |MAP_|		.XXX[0x6]
02a6 5749 4e44  |WIND|
02a8 4f57 5300  |OWS |
02aa 0000 0000  |    |		.BLANK	0000[0x6]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02ce       |    |		.CONST	0x02ce								; Address of begin
02b1 0347       | G  |		.CONST	0x0347								; Address of exception handler
02b2 000d       |    |		.CONST	0x000d								; Number of locals
02b3			INIT_02b0:
02b3 e006       |    |		Load	0x0,0x6
02b4 0007       |    |		Action	Break_Optional
02b5 e003       |    |		Load	0x0,0x3
02b6 0322       | "  |		Declare_Variable	Record
02b7 e004       |    |		Load	0x0,0x4
02b8 0007       |    |		Action	Break_Optional
02b9 e005       |    |		Load	0x0,0x5
02ba 0007       |    |		Action	Break_Optional
02bb e005       |    |		Load	0x0,0x5
02bc 0007       |    |		Action	Break_Optional
02bd e005       |    |		Load	0x0,0x5
02be 0007       |    |		Action	Break_Optional
02bf 00e1       |    |		Load_Encached	Boolean_Cache
02c0 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
02c1 e02f       | /  |		Load	0x0,0x2f
02c2 0322       | "  |		Declare_Variable	Record
02c3 e030       | 0  |		Load	0x0,0x30
02c4 00d9       |    |		Load_Top	At_Offset_1
02c5 017d       | }  |		Execute	Record,Structure_Write
02c6 e031       | 1  |		Load	0x0,0x31
02c7 0007       |    |		Action	Break_Optional
02c8 e032       | 2  |		Load	0x0,0x32
02c9 0007       |    |		Action	Break_Optional
02ca e007       |    |		Load	0x0,0x7
02cb 0007       |    |		Action	Break_Optional
02cc 029f 0933  |   3|		Declare_Subprogram	INIT_0930,For_Call
02ce			BODY_02b0:
02ce e031       | 1  |		Load	0x0,0x31
02cf a5fc       |    |		Store_Unchecked	0x2,-0x4
02d0 e007       |    |		Load	0x0,0x7
02d1 e006       |    |		Load	0x0,0x6
02d2 e005       |    |		Load	0x0,0x5
02d3 00d8       |    |		Load_Top	At_Offset_0
02d4 e004       |    |		Load	0x0,0x4
02d5 e403       |    |		Load	0x2,0x3
02d6 e033       | 3  |		Load	0x0,0x33
02d7 4800       |H   |		Short_Literal	0x0
02d8 607f       |`   |		Indirect_Literal	Discrete,0x358,{0x00000000, 0x000f4240}
02d9 4800       |H   |		Short_Literal	0x0
02da e5fd       |    |		Load	0x2,-0x3
02db e5fe       |    |		Load	0x2,-0x2
02dc e5ff       |    |		Load	0x2,-0x1
02dd 800a       |    |		Call	0x0,0xa
02de 00d1       |    |		Pop_Control	Pop_Count_1
02df c404       |    |		Store	0x2,0x4
02e0 c406       |    |		Store	0x2,0x6
02e1 c405       |    |		Store	0x2,0x5
02e2 c402       |    |		Store	0x2,0x2
02e3 005a       | Z  |		Store_Top	Discrete,At_Offset_2
02e4 00d9       |    |		Load_Top	At_Offset_1
02e5 0f01       |    |		Execute_Immediate	Equal,0x1
02e6 7003       |p   |		Jump_Nonzero	0x2ea
02e7 4800       |H   |		Short_Literal	0x0
02e8 a5fb       |    |		Store_Unchecked	0x2,-0x5
02e9 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
02ea e403       |    |		Load	0x2,0x3
02eb e033       | 3  |		Load	0x0,0x33
02ec 017f       |    |		Execute	Record,Equal
02ed 6806       |h   |		Jump_Zero	0x2f4
02ee e404       |    |		Load	0x2,0x4
02ef 0e20       |    |		Execute_Immediate	Not_Equal,0x20
02f0 7003       |p   |		Jump_Nonzero	0x2f4
02f1 e406       |    |		Load	0x2,0x6
02f2 0d20       |    |		Execute_Immediate	Less,0x20
02f3 6809       |h   |		Jump_Zero	0x2fd
02f4 e402       |    |		Load	0x2,0x2
02f5 e011       |    |		Load	0x0,0x11
02f6 e012       |    |		Load	0x0,0x12
02f7 a013       |    |		Store_Unchecked	0x0,0x13
02f8 8014       |    |		Call	0x0,0x14
02f9 c402       |    |		Store	0x2,0x2
02fa 4800       |H   |		Short_Literal	0x0
02fb a5fb       |    |		Store_Unchecked	0x2,-0x5
02fc 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
02fd e406       |    |		Load	0x2,0x6
02fe 0d28       | (  |		Execute_Immediate	Less,0x28
02ff 6820       |h   |		Jump_Zero	0x320
0300 4801       |H   |		Short_Literal	0x1
0301 a407       |    |		Store_Unchecked	0x2,0x7
0302 4801       |H   |		Short_Literal	0x1
0303 a408       |    |		Store_Unchecked	0x2,0x8
0304 e406       |    |		Load	0x2,0x6
0305 0d27       | '  |		Execute_Immediate	Less,0x27
0306 682c       |h,  |		Jump_Zero	0x333
0307 e5fe       |    |		Load	0x2,-0x2
0308 e5ff       |    |		Load	0x2,-0x1
0309 8034       | 4  |		Call	0x0,0x34
030a 003b       | ;  |		Store_Top	Access,At_Offset_3
030b 00da       |    |		Load_Top	At_Offset_2
030c e032       | 2  |		Load	0x0,0x32
030d 022f       | /  |		Execute	Access,Equal
030e 6809       |h   |		Jump_Zero	0x318
030f e402       |    |		Load	0x2,0x2
0310 e011       |    |		Load	0x0,0x11
0311 e012       |    |		Load	0x0,0x12
0312 a013       |    |		Store_Unchecked	0x0,0x13
0313 8014       |    |		Call	0x0,0x14
0314 c402       |    |		Store	0x2,0x2
0315 4800       |H   |		Short_Literal	0x0
0316 a5fb       |    |		Store_Unchecked	0x2,-0x5
0317 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0318 00da       |    |		Load_Top	At_Offset_2
0319 0227       | '  |		Execute	Access,All_Reference
031a 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
031b 0227       | '  |		Execute	Access,All_Reference
031c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
031d e409       |    |		Load	0x2,0x9
031e 017d       | }  |		Execute	Record,Structure_Write
031f 7813       |x   |		Jump	0x333
0320 e406       |    |		Load	0x2,0x6
0321 4828       |H(  |		Short_Literal	0x28
0322 0270       | p  |		Execute	Discrete,Divide
0323 c407       |    |		Store	0x2,0x7
0324 e407       |    |		Load	0x2,0x7
0325 4828       |H(  |		Short_Literal	0x28
0326 0271       | q  |		Execute	Discrete,Times
0327 e406       |    |		Load	0x2,0x6
0328 027e       | ~  |		Execute	Discrete,Not_Equal
0329 6809       |h   |		Jump_Zero	0x333
032a e402       |    |		Load	0x2,0x2
032b e011       |    |		Load	0x0,0x11
032c e012       |    |		Load	0x0,0x12
032d a013       |    |		Store_Unchecked	0x0,0x13
032e 8014       |    |		Call	0x0,0x14
032f c402       |    |		Store	0x2,0x2
0330 4800       |H   |		Short_Literal	0x0
0331 a5fb       |    |		Store_Unchecked	0x2,-0x5
0332 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0333 4801       |H   |		Short_Literal	0x1
0334 e407       |    |		Load	0x2,0x7
0335 e031       | 1  |		Load	0x0,0x31
0336 03ba       |    |		Declare_Variable	Access,By_Allocation,With_Constraint
0337 00d8       |    |		Load_Top	At_Offset_0
0338 0227       | '  |		Execute	Access,All_Reference
0339 1c00       |    |		Execute_Immediate	Run_Utility,0x0
033a a40a       |    |		Store_Unchecked	0x2,0xa
033b 840d       |    |		Call	0x2,0xd
033c e402       |    |		Load	0x2,0x2
033d e011       |    |		Load	0x0,0x11
033e e012       |    |		Load	0x0,0x12
033f a013       |    |		Store_Unchecked	0x0,0x13
0340 8014       |    |		Call	0x0,0x14
0341 c402       |    |		Store	0x2,0x2
0342 00db       |    |		Load_Top	At_Offset_3
0343 a5fc       |    |		Store_Unchecked	0x2,-0x4
0344 4801       |H   |		Short_Literal	0x1
0345 a5fb       |    |		Store_Unchecked	0x2,-0x5
0346 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0347			TRAP_02b0:
0347 0007       |    |		Action	Break_Optional
0348 e402       |    |		Load	0x2,0x2
0349 e011       |    |		Load	0x0,0x11
034a e012       |    |		Load	0x0,0x12
034b a013       |    |		Store_Unchecked	0x0,0x13
034c 8014       |    |		Call	0x0,0x14
034d c402       |    |		Store	0x2,0x2
034e e40a       |    |		Load	0x2,0xa
034f e035       | 5  |		Load	0x0,0x35
0350 e036       | 6  |		Load	0x0,0x36
0351 a037       | 7  |		Store_Unchecked	0x0,0x37
0352 8014       |    |		Call	0x0,0x14
0353 c40a       |    |		Store	0x2,0xa
0354 00d8       |    |		Load_Top	At_Offset_0
0355 0101       |    |		Execute	Exception,Reraise
0356 0000 0000  |    |		.XXX[0x2]
0358 0000 0000  |    |		.LITERAL	{0x00000000, 0x000f4240}
035c 0000 0000  |    |		.BLANK	0000[0x4]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 036c       | l  |		.CONST	0x036c								; Address of begin
0361 0004       |    |		.CONST	0x0004								; Address of exception handler
0362 0002       |    |		.CONST	0x0002								; Number of locals
0363			INIT_0360:
0363 0007       |    |		Action	Break_Optional
0364 4801       |H   |		Short_Literal	0x1
0365 e5fd       |    |		Load	0x2,-0x3
0366 01db       |    |		Execute	Vector,Length
0367 4828       |H(  |		Short_Literal	0x28
0368 0271       | q  |		Execute	Discrete,Times
0369 e019       |    |		Load	0x0,0x19
036a 035b       | [  |		Declare_Type	Array,Constrained
036b 0337       | 7  |		Declare_Variable	Array
036c			BODY_0360:
036c e5fd       |    |		Load	0x2,-0x3
036d 01db       |    |		Execute	Vector,Length
036e 0d01       |    |		Execute_Immediate	Less,0x1
036f 6801       |h   |		Jump_Zero	0x371
0370 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0371 00d8       |    |		Load_Top	At_Offset_0
0372 e5fd       |    |		Load	0x2,-0x3
0373 e038       | 8  |		Load	0x0,0x38
0374 e039       | 9  |		Load	0x0,0x39
0375 e03a       | :  |		Load	0x0,0x3a
0376 a03b       | ;  |		Store_Unchecked	0x0,0x3b
0377 802e       | .  |		Call	0x0,0x2e
0378 00d1       |    |		Pop_Control	Pop_Count_1
0379 00d8       |    |		Load_Top	At_Offset_0
037a 4800       |H   |		Short_Literal	0x0
037b 4820       |H   |		Short_Literal	0x20
037c e033       | 3  |		Load	0x0,0x33
037d e5fc       |    |		Load	0x2,-0x4
037e e5fe       |    |		Load	0x2,-0x2
037f e5ff       |    |		Load	0x2,-0x1
0380 801a       |    |		Call	0x0,0x1a
0381 4801       |H   |		Short_Literal	0x1
0382 a5fb       |    |		Store_Unchecked	0x2,-0x5
0383 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0384 0000 0000  |    |		.BLANK	0000[0x4]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 0391       |    |		.CONST	0x0391								; Address of begin
0389 03b9       |    |		.CONST	0x03b9								; Address of exception handler
038a 0003       |    |		.CONST	0x0003								; Number of locals
038b			INIT_0388:
038b e03c       | <  |		Load	0x0,0x3c
038c 0322       | "  |		Declare_Variable	Record
038d 00d8       |    |		Load_Top	At_Offset_0
038e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
038f e007       |    |		Load	0x0,0x7
0390 0007       |    |		Action	Break_Optional
0391			BODY_0388:
0391 e007       |    |		Load	0x0,0x7
0392 00da       |    |		Load_Top	At_Offset_2
0393 e03d       | =  |		Load	0x0,0x3d
0394 e5fe       |    |		Load	0x2,-0x2
0395 e5ff       |    |		Load	0x2,-0x1
0396 803e       | >  |		Call	0x0,0x3e
0397 00d1       |    |		Pop_Control	Pop_Count_1
0398 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0399 00d8       |    |		Load_Top	At_Offset_0
039a 0f01       |    |		Execute_Immediate	Equal,0x1
039b 7003       |p   |		Jump_Nonzero	0x39f
039c 4800       |H   |		Short_Literal	0x0
039d a5fc       |    |		Store_Unchecked	0x2,-0x4
039e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
039f 00d9       |    |		Load_Top	At_Offset_1
03a0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03a1 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
03a2 680d       |h   |		Jump_Zero	0x3b0
03a3 00d9       |    |		Load_Top	At_Offset_1
03a4 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03a5 0aff       |    |		Execute_Immediate	Plus,-0x1
03a6 00da       |    |		Load_Top	At_Offset_2
03a7 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
03a8 0227       | '  |		Execute	Access,All_Reference
03a9 01d7       |    |		Execute	Vector,Field_Read
03aa 7005       |p   |		Jump_Nonzero	0x3b0
03ab 00d9       |    |		Load_Top	At_Offset_1
03ac 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03ad 0aff       |    |		Execute_Immediate	Plus,-0x1
03ae 00da       |    |		Load_Top	At_Offset_2
03af 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03b0 e007       |    |		Load	0x0,0x7
03b1 e03f       | ?  |		Load	0x0,0x3f
03b2 00db       |    |		Load_Top	At_Offset_3
03b3 8040       | @  |		Call	0x0,0x40
03b4 c5fd       |    |		Store	0x2,-0x3
03b5 c5fc       |    |		Store	0x2,-0x4
03b6 00d9       |    |		Load_Top	At_Offset_1
03b7 8041       | A  |		Call	0x0,0x41
03b8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03b9			TRAP_0388:
03b9 0007       |    |		Action	Break_Optional
03ba 00da       |    |		Load_Top	At_Offset_2
03bb 8041       | A  |		Call	0x0,0x41
03bc 00d1       |    |		Pop_Control	Pop_Count_1
03bd 00d8       |    |		Load_Top	At_Offset_0
03be 0101       |    |		Execute	Exception,Reraise
03bf 0000       |    |		.XXX[0x1]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c6       |    |		.CONST	0x03c6								; Address of begin
03c1 0004       |    |		.CONST	0x0004								; Address of exception handler
03c2 0003       |    |		.CONST	0x0003								; Number of locals
03c3			INIT_03c0:
03c3 e005       |    |		Load	0x0,0x5
03c4 029f 0993  |    |		Declare_Subprogram	INIT_0990,For_Call
03c6			BODY_03c0:
03c6 4800       |H   |		Short_Literal	0x0
03c7 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
03c8 00cf       |    |		Action	Mark_Auxiliary
03c9 e5fd       |    |		Load	0x2,-0x3
03ca 01d9       |    |		Execute	Vector,Reverse_Bounds
03cb 0263       | c  |		Execute	Discrete,Above_Bound
03cc 7015       |p   |		Jump_Nonzero	0x3e2
03cd 00d8       |    |		Load_Top	At_Offset_0
03ce e5fd       |    |		Load	0x2,-0x3
03cf 01d7       |    |		Execute	Vector,Field_Read
03d0 e00b       |    |		Load	0x0,0xb
03d1 022e       | .  |		Execute	Access,Not_Equal
03d2 680a       |h   |		Jump_Zero	0x3dd
03d3 e402       |    |		Load	0x2,0x2
03d4 00d9       |    |		Load_Top	At_Offset_1
03d5 e5fd       |    |		Load	0x2,-0x3
03d6 01d7       |    |		Execute	Vector,Field_Read
03d7 0227       | '  |		Execute	Access,All_Reference
03d8 01db       |    |		Execute	Vector,Length
03d9 0273       | s  |		Execute	Discrete,Plus
03da 0a01       |    |		Execute_Immediate	Plus,0x1
03db c402       |    |		Store	0x2,0x2
03dc 7803       |x   |		Jump	0x3e0
03dd e402       |    |		Load	0x2,0x2
03de 0a01       |    |		Execute_Immediate	Plus,0x1
03df c402       |    |		Store	0x2,0x2
03e0 00c8       |    |		Action	Pop_Auxiliary_Range
03e1 3feb       |?   |		Loop_Increasing	0x3cd
03e2 00ce       |    |		Action	Pop_Auxiliary
03e3 8403       |    |		Call	0x2,0x3
03e4 4801       |H   |		Short_Literal	0x1
03e5 a5fc       |    |		Store_Unchecked	0x2,-0x4
03e6 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
03e7 0000       |    |		.XXX[0x1]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03f9       |    |		.CONST	0x03f9								; Address of begin
03e9 0448       | H  |		.CONST	0x0448								; Address of exception handler
03ea 0008       |    |		.CONST	0x0008								; Number of locals
03eb			INIT_03e8:
03eb e007       |    |		Load	0x0,0x7
03ec 0007       |    |		Action	Break_Optional
03ed e003       |    |		Load	0x0,0x3
03ee 0322       | "  |		Declare_Variable	Record
03ef e004       |    |		Load	0x0,0x4
03f0 0007       |    |		Action	Break_Optional
03f1 e005       |    |		Load	0x0,0x5
03f2 0007       |    |		Action	Break_Optional
03f3 e005       |    |		Load	0x0,0x5
03f4 0007       |    |		Action	Break_Optional
03f5 e006       |    |		Load	0x0,0x6
03f6 0007       |    |		Action	Break_Optional
03f7 e042       | B  |		Load	0x0,0x42
03f8 0007       |    |		Action	Break_Optional
03f9			BODY_03e8:
03f9 e007       |    |		Load	0x0,0x7
03fa e006       |    |		Load	0x0,0x6
03fb e005       |    |		Load	0x0,0x5
03fc 00d8       |    |		Load_Top	At_Offset_0
03fd e004       |    |		Load	0x0,0x4
03fe e403       |    |		Load	0x2,0x3
03ff e043       | C  |		Load	0x0,0x43
0400 4800       |H   |		Short_Literal	0x0
0401 6056       |`V  |		Indirect_Literal	Discrete,0x458,{0x00000000, 0x000f4240}
0402 4800       |H   |		Short_Literal	0x0
0403 e043       | C  |		Load	0x0,0x43
0404 e5fe       |    |		Load	0x2,-0x2
0405 e5ff       |    |		Load	0x2,-0x1
0406 800a       |    |		Call	0x0,0xa
0407 00d1       |    |		Pop_Control	Pop_Count_1
0408 c404       |    |		Store	0x2,0x4
0409 c406       |    |		Store	0x2,0x6
040a c405       |    |		Store	0x2,0x5
040b 003b       | ;  |		Store_Top	Access,At_Offset_3
040c c402       |    |		Store	0x2,0x2
040d e402       |    |		Load	0x2,0x2
040e 6813       |h   |		Jump_Zero	0x422
040f e403       |    |		Load	0x2,0x3
0410 e043       | C  |		Load	0x0,0x43
0411 017f       |    |		Execute	Record,Equal
0412 680f       |h   |		Jump_Zero	0x422
0413 00da       |    |		Load_Top	At_Offset_2
0414 e044       | D  |		Load	0x0,0x44
0415 012c       | ,  |		Execute	Any,Size
0416 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0417 027c       | |  |		Execute	Discrete,Less
0418 7009       |p   |		Jump_Nonzero	0x422
0419 00da       |    |		Load_Top	At_Offset_2
041a e044       | D  |		Load	0x0,0x44
041b 012c       | ,  |		Execute	Any,Size
041c 026f       | o  |		Execute	Discrete,Remainder
041d 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
041e 7003       |p   |		Jump_Nonzero	0x422
041f e404       |    |		Load	0x2,0x4
0420 0e20       |    |		Execute_Immediate	Not_Equal,0x20
0421 6803       |h   |		Jump_Zero	0x425
0422 4800       |H   |		Short_Literal	0x0
0423 a5fc       |    |		Store_Unchecked	0x2,-0x4
0424 781c       |x   |		Jump	0x441
0425 4801       |H   |		Short_Literal	0x1
0426 00db       |    |		Load_Top	At_Offset_3
0427 e044       | D  |		Load	0x0,0x44
0428 012c       | ,  |		Execute	Any,Size
0429 e404       |    |		Load	0x2,0x4
042a 0270       | p  |		Execute	Discrete,Divide
042b 0270       | p  |		Execute	Discrete,Divide
042c e042       | B  |		Load	0x0,0x42
042d 03ba       |    |		Declare_Variable	Access,By_Allocation,With_Constraint
042e 00d8       |    |		Load_Top	At_Offset_0
042f 0227       | '  |		Execute	Access,All_Reference
0430 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0431 0039       | 9  |		Store_Top	Access,At_Offset_1
0432 00d8       |    |		Load_Top	At_Offset_0
0433 0229       | )  |		Execute	Access,All_Read
0434 00d8       |    |		Load_Top	At_Offset_0
0435 00db       |    |		Load_Top	At_Offset_3
0436 0227       | '  |		Execute	Access,All_Reference
0437 e045       | E  |		Load	0x0,0x45
0438 e046       | F  |		Load	0x0,0x46
0439 e047       | G  |		Load	0x0,0x47
043a a048       | H  |		Store_Unchecked	0x0,0x48
043b 8010       |    |		Call	0x0,0x10
043c 00d2       |    |		Pop_Control	Pop_Count_2
043d 00d8       |    |		Load_Top	At_Offset_0
043e a5fd       |    |		Store_Unchecked	0x2,-0x3
043f 4801       |H   |		Short_Literal	0x1
0440 a5fc       |    |		Store_Unchecked	0x2,-0x4
0441 00d9       |    |		Load_Top	At_Offset_1
0442 e011       |    |		Load	0x0,0x11
0443 e012       |    |		Load	0x0,0x12
0444 a013       |    |		Store_Unchecked	0x0,0x13
0445 8014       |    |		Call	0x0,0x14
0446 003a       | :  |		Store_Top	Access,At_Offset_2
0447 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0448			TRAP_03e8:
0448 0007       |    |		Action	Break_Optional
0449 00da       |    |		Load_Top	At_Offset_2
044a e011       |    |		Load	0x0,0x11
044b e012       |    |		Load	0x0,0x12
044c a013       |    |		Store_Unchecked	0x0,0x13
044d 8014       |    |		Call	0x0,0x14
044e 003b       | ;  |		Store_Top	Access,At_Offset_3
044f 00d9       |    |		Load_Top	At_Offset_1
0450 e049       | I  |		Load	0x0,0x49
0451 e04a       | J  |		Load	0x0,0x4a
0452 a04b       | K  |		Store_Unchecked	0x0,0x4b
0453 8014       |    |		Call	0x0,0x14
0454 003a       | :  |		Store_Top	Access,At_Offset_2
0455 00d8       |    |		Load_Top	At_Offset_0
0456 0101       |    |		Execute	Exception,Reraise
0457 0000       |    |		.XXX[0x1]
0458 0000 0000  |    |		.LITERAL	{0x00000000, 0x000f4240}
045c 0000 0000  |    |		.BLANK	0000[0x4]
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 046b       | k  |		.CONST	0x046b								; Address of begin
0461 0004       |    |		.CONST	0x0004								; Address of exception handler
0462 0002       |    |		.CONST	0x0002								; Number of locals
0463			INIT_0460:
0463 4801       |H   |		Short_Literal	0x1
0464 4818       |H   |		Short_Literal	0x18
0465 e5fd       |    |		Load	0x2,-0x3
0466 01db       |    |		Execute	Vector,Length
0467 0271       | q  |		Execute	Discrete,Times
0468 e019       |    |		Load	0x0,0x19
0469 035b       | [  |		Declare_Type	Array,Constrained
046a 0337       | 7  |		Declare_Variable	Array
046b			BODY_0460:
046b 00d8       |    |		Load_Top	At_Offset_0
046c e5fd       |    |		Load	0x2,-0x3
046d e04c       | L  |		Load	0x0,0x4c
046e e04d       | M  |		Load	0x0,0x4d
046f e04e       | N  |		Load	0x0,0x4e
0470 a04f       | O  |		Store_Unchecked	0x0,0x4f
0471 802e       | .  |		Call	0x0,0x2e
0472 00d1       |    |		Pop_Control	Pop_Count_1
0473 00d8       |    |		Load_Top	At_Offset_0
0474 4800       |H   |		Short_Literal	0x0
0475 4820       |H   |		Short_Literal	0x20
0476 e043       | C  |		Load	0x0,0x43
0477 00d8       |    |		Load_Top	At_Offset_0
0478 e5fe       |    |		Load	0x2,-0x2
0479 e5ff       |    |		Load	0x2,-0x1
047a 801a       |    |		Call	0x0,0x1a
047b 4801       |H   |		Short_Literal	0x1
047c a5fc       |    |		Store_Unchecked	0x2,-0x4
047d 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
047e 0000 0000  |    |		.XXX[0x2]
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0483       |    |		.CONST	0x0483								; Address of begin
0481 0004       |    |		.CONST	0x0004								; Address of exception handler
0482 0001       |    |		.CONST	0x0001								; Number of locals
0483			BODY_0480:
0483			INIT_0480:
0483 e007       |    |		Load	0x0,0x7
0484 e5fd       |    |		Load	0x2,-0x3
0485 e050       | P  |		Load	0x0,0x50
0486 e5fe       |    |		Load	0x2,-0x2
0487 e5ff       |    |		Load	0x2,-0x1
0488 803e       | >  |		Call	0x0,0x3e
0489 00d1       |    |		Pop_Control	Pop_Count_1
048a c5fc       |    |		Store	0x2,-0x4
048b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
048c 0000 0000  |    |		.BLANK	0000[0x4]
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0493       |    |		.CONST	0x0493								; Address of begin
0491 0004       |    |		.CONST	0x0004								; Address of exception handler
0492 0001       |    |		.CONST	0x0001								; Number of locals
0493			BODY_0490:
0493			INIT_0490:
0493 e050       | P  |		Load	0x0,0x50
0494 e5fd       |    |		Load	0x2,-0x3
0495 e5fe       |    |		Load	0x2,-0x2
0496 e5ff       |    |		Load	0x2,-0x1
0497 8051       | Q  |		Call	0x0,0x51
0498 4801       |H   |		Short_Literal	0x1
0499 a5fc       |    |		Store_Unchecked	0x2,-0x4
049a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
049b 0000 0000  |    |		.BLANK	0000[0x5]
04a0 ; --------------------------------------------------------------------------------------
04a0 ; SUBPROGRAM
04a0 ; --------------------------------------------------------------------------------------
04a0 04a3       |    |		.CONST	0x04a3								; Address of begin
04a1 0004       |    |		.CONST	0x0004								; Address of exception handler
04a2 0001       |    |		.CONST	0x0001								; Number of locals
04a3			BODY_04a0:
04a3			INIT_04a0:
04a3 e007       |    |		Load	0x0,0x7
04a4 e5fd       |    |		Load	0x2,-0x3
04a5 e052       | R  |		Load	0x0,0x52
04a6 e5fe       |    |		Load	0x2,-0x2
04a7 e5ff       |    |		Load	0x2,-0x1
04a8 803e       | >  |		Call	0x0,0x3e
04a9 00d1       |    |		Pop_Control	Pop_Count_1
04aa c5fc       |    |		Store	0x2,-0x4
04ab 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04ac 0000 0000  |    |		.BLANK	0000[0x4]
04b0 ; --------------------------------------------------------------------------------------
04b0 ; SUBPROGRAM
04b0 ; --------------------------------------------------------------------------------------
04b0 04b3       |    |		.CONST	0x04b3								; Address of begin
04b1 0004       |    |		.CONST	0x0004								; Address of exception handler
04b2 0001       |    |		.CONST	0x0001								; Number of locals
04b3			BODY_04b0:
04b3			INIT_04b0:
04b3 e052       | R  |		Load	0x0,0x52
04b4 e5fd       |    |		Load	0x2,-0x3
04b5 e5fe       |    |		Load	0x2,-0x2
04b6 e5ff       |    |		Load	0x2,-0x1
04b7 8051       | Q  |		Call	0x0,0x51
04b8 4801       |H   |		Short_Literal	0x1
04b9 a5fc       |    |		Store_Unchecked	0x2,-0x4
04ba 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04bb 0000 0000  |    |		.BLANK	0000[0x5]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04c3       |    |		.CONST	0x04c3								; Address of begin
04c1 0004       |    |		.CONST	0x0004								; Address of exception handler
04c2 0001       |    |		.CONST	0x0001								; Number of locals
04c3			BODY_04c0:
04c3			INIT_04c0:
04c3 e007       |    |		Load	0x0,0x7
04c4 e5fd       |    |		Load	0x2,-0x3
04c5 e053       | S  |		Load	0x0,0x53
04c6 e5fe       |    |		Load	0x2,-0x2
04c7 e5ff       |    |		Load	0x2,-0x1
04c8 821f       |    |		Call	0x1,0x1f
04c9 00d1       |    |		Pop_Control	Pop_Count_1
04ca c5fc       |    |		Store	0x2,-0x4
04cb 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04cc 0000 0000  |    |		.BLANK	0000[0x4]
04d0 ; --------------------------------------------------------------------------------------
04d0 ; SUBPROGRAM
04d0 ; --------------------------------------------------------------------------------------
04d0 04d3       |    |		.CONST	0x04d3								; Address of begin
04d1 0004       |    |		.CONST	0x0004								; Address of exception handler
04d2 0001       |    |		.CONST	0x0001								; Number of locals
04d3			BODY_04d0:
04d3			INIT_04d0:
04d3 e007       |    |		Load	0x0,0x7
04d4 e5fd       |    |		Load	0x2,-0x3
04d5 e053       | S  |		Load	0x0,0x53
04d6 e5fe       |    |		Load	0x2,-0x2
04d7 e5ff       |    |		Load	0x2,-0x1
04d8 8220       |    |		Call	0x1,0x20
04d9 c5fc       |    |		Store	0x2,-0x4
04da 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04db 0000 0000  |    |		.BLANK	0000[0x5]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04f1       |    |		.CONST	0x04f1								; Address of begin
04e1 055a       | Z  |		.CONST	0x055a								; Address of exception handler
04e2 0008       |    |		.CONST	0x0008								; Number of locals
04e3			INIT_04e0:
04e3 e006       |    |		Load	0x0,0x6
04e4 0007       |    |		Action	Break_Optional
04e5 e003       |    |		Load	0x0,0x3
04e6 0322       | "  |		Declare_Variable	Record
04e7 e004       |    |		Load	0x0,0x4
04e8 0007       |    |		Action	Break_Optional
04e9 e005       |    |		Load	0x0,0x5
04ea 0007       |    |		Action	Break_Optional
04eb e005       |    |		Load	0x0,0x5
04ec 0007       |    |		Action	Break_Optional
04ed e054       | T  |		Load	0x0,0x54
04ee 0007       |    |		Action	Break_Optional
04ef e007       |    |		Load	0x0,0x7
04f0 0007       |    |		Action	Break_Optional
04f1			BODY_04e0:
04f1 e054       | T  |		Load	0x0,0x54
04f2 a5fd       |    |		Store_Unchecked	0x2,-0x3
04f3 e5ff       |    |		Load	0x2,-0x1
04f4 0227       | '  |		Execute	Access,All_Reference
04f5 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
04f6 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
04f7 e01c       |    |		Load	0x0,0x1c
04f8 017f       |    |		Execute	Record,Equal
04f9 681a       |h   |		Jump_Zero	0x514
04fa 4800       |H   |		Short_Literal	0x0
04fb 4800       |H   |		Short_Literal	0x0
04fc 480b       |H   |		Short_Literal	0xb
04fd e01d       |    |		Load	0x0,0x1d
04fe 0334       | 4  |		Declare_Variable	Array,With_Constraint
04ff 5070       |Pp  |		Indirect_Literal	Any,0x570,{0x574d5f50, 0x524f544f}
0500 e5ff       |    |		Load	0x2,-0x1
0501 801e       |    |		Call	0x0,0x1e
0502 e403       |    |		Load	0x2,0x3
0503 017d       | }  |		Execute	Record,Structure_Write
0504 e403       |    |		Load	0x2,0x3
0505 e01c       |    |		Load	0x0,0x1c
0506 017f       |    |		Execute	Record,Equal
0507 6803       |h   |		Jump_Zero	0x50b
0508 4800       |H   |		Short_Literal	0x0
0509 a5fc       |    |		Store_Unchecked	0x2,-0x4
050a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
050b e5ff       |    |		Load	0x2,-0x1
050c 801f       |    |		Call	0x0,0x1f
050d e403       |    |		Load	0x2,0x3
050e e5ff       |    |		Load	0x2,-0x1
050f 0227       | '  |		Execute	Access,All_Reference
0510 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0511 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0512 e5ff       |    |		Load	0x2,-0x1
0513 8020       |    |		Call	0x0,0x20
0514 e007       |    |		Load	0x0,0x7
0515 e006       |    |		Load	0x0,0x6
0516 e005       |    |		Load	0x0,0x5
0517 00d8       |    |		Load_Top	At_Offset_0
0518 e004       |    |		Load	0x0,0x4
0519 e403       |    |		Load	0x2,0x3
051a e055       | U  |		Load	0x0,0x55
051b 4800       |H   |		Short_Literal	0x0
051c 604f       |`O  |		Indirect_Literal	Discrete,0x56c,{0x00000000, 0x000f4240}
051d 4800       |H   |		Short_Literal	0x0
051e e5ff       |    |		Load	0x2,-0x1
051f 0227       | '  |		Execute	Access,All_Reference
0520 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0521 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0522 e5fe       |    |		Load	0x2,-0x2
0523 e5ff       |    |		Load	0x2,-0x1
0524 800a       |    |		Call	0x0,0xa
0525 00d1       |    |		Pop_Control	Pop_Count_1
0526 c404       |    |		Store	0x2,0x4
0527 c406       |    |		Store	0x2,0x6
0528 c405       |    |		Store	0x2,0x5
0529 c402       |    |		Store	0x2,0x2
052a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
052b 00d8       |    |		Load_Top	At_Offset_0
052c 0f01       |    |		Execute_Immediate	Equal,0x1
052d 7003       |p   |		Jump_Nonzero	0x531
052e 4800       |H   |		Short_Literal	0x0
052f a5fc       |    |		Store_Unchecked	0x2,-0x4
0530 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0531 e403       |    |		Load	0x2,0x3
0532 e055       | U  |		Load	0x0,0x55
0533 017f       |    |		Execute	Record,Equal
0534 6803       |h   |		Jump_Zero	0x538
0535 e404       |    |		Load	0x2,0x4
0536 0e20       |    |		Execute_Immediate	Not_Equal,0x20
0537 6809       |h   |		Jump_Zero	0x541
0538 e402       |    |		Load	0x2,0x2
0539 e011       |    |		Load	0x0,0x11
053a e012       |    |		Load	0x0,0x12
053b a013       |    |		Store_Unchecked	0x0,0x13
053c 8014       |    |		Call	0x0,0x14
053d c402       |    |		Store	0x2,0x2
053e 4800       |H   |		Short_Literal	0x0
053f a5fc       |    |		Store_Unchecked	0x2,-0x4
0540 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0541 4801       |H   |		Short_Literal	0x1
0542 00db       |    |		Load_Top	At_Offset_3
0543 e054       | T  |		Load	0x0,0x54
0544 03ba       |    |		Declare_Variable	Access,By_Allocation,With_Constraint
0545 003a       | :  |		Store_Top	Access,At_Offset_2
0546 00d9       |    |		Load_Top	At_Offset_1
0547 0229       | )  |		Execute	Access,All_Read
0548 00d8       |    |		Load_Top	At_Offset_0
0549 e402       |    |		Load	0x2,0x2
054a 0227       | '  |		Execute	Access,All_Reference
054b e056       | V  |		Load	0x0,0x56
054c e057       | W  |		Load	0x0,0x57
054d e058       | X  |		Load	0x0,0x58
054e a059       | Y  |		Store_Unchecked	0x0,0x59
054f 8010       |    |		Call	0x0,0x10
0550 00d2       |    |		Pop_Control	Pop_Count_2
0551 e402       |    |		Load	0x2,0x2
0552 e011       |    |		Load	0x0,0x11
0553 e012       |    |		Load	0x0,0x12
0554 a013       |    |		Store_Unchecked	0x0,0x13
0555 8014       |    |		Call	0x0,0x14
0556 c402       |    |		Store	0x2,0x2
0557 4801       |H   |		Short_Literal	0x1
0558 a5fc       |    |		Store_Unchecked	0x2,-0x4
0559 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
055a			TRAP_04e0:
055a 0007       |    |		Action	Break_Optional
055b e402       |    |		Load	0x2,0x2
055c e011       |    |		Load	0x0,0x11
055d e012       |    |		Load	0x0,0x12
055e a013       |    |		Store_Unchecked	0x0,0x13
055f 8014       |    |		Call	0x0,0x14
0560 c402       |    |		Store	0x2,0x2
0561 00da       |    |		Load_Top	At_Offset_2
0562 e05a       | Z  |		Load	0x0,0x5a
0563 e05b       | [  |		Load	0x0,0x5b
0564 a05c       | \  |		Store_Unchecked	0x0,0x5c
0565 8014       |    |		Call	0x0,0x14
0566 003b       | ;  |		Store_Top	Access,At_Offset_3
0567 00d8       |    |		Load_Top	At_Offset_0
0568 0101       |    |		Execute	Exception,Reraise
0569 0000 0000  |    |		.XXX[0x3]
056b 0000       |    |
056c 0000 0000  |    |		.LITERAL	{0x00000000, 0x000f4240}
0570 574d 5f50  |WM_P|		.LITERAL	{0x574d5f50, 0x524f544f}
0574 434f 4c53  |COLS|		.XXX[0x4]
0576 0000 0000  |    |
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 0589       |    |		.CONST	0x0589								; Address of begin
0579 0004       |    |		.CONST	0x0004								; Address of exception handler
057a 0003       |    |		.CONST	0x0003								; Number of locals
057b			INIT_0578:
057b e003       |    |		Load	0x0,0x3
057c 0322       | "  |		Declare_Variable	Record
057d 4801       |H   |		Short_Literal	0x1
057e e003       |    |		Load	0x0,0x3
057f 012c       | ,  |		Execute	Any,Size
0580 e004       |    |		Load	0x0,0x4
0581 012c       | ,  |		Execute	Any,Size
0582 0270       | p  |		Execute	Discrete,Divide
0583 e5fd       |    |		Load	0x2,-0x3
0584 01db       |    |		Execute	Vector,Length
0585 0271       | q  |		Execute	Discrete,Times
0586 e019       |    |		Load	0x0,0x19
0587 035b       | [  |		Declare_Type	Array,Constrained
0588 0337       | 7  |		Declare_Variable	Array
0589			BODY_0578:
0589 e5ff       |    |		Load	0x2,-0x1
058a 0227       | '  |		Execute	Access,All_Reference
058b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
058c 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
058d e01c       |    |		Load	0x0,0x1c
058e 017f       |    |		Execute	Record,Equal
058f 681a       |h   |		Jump_Zero	0x5aa
0590 4800       |H   |		Short_Literal	0x0
0591 4800       |H   |		Short_Literal	0x0
0592 480b       |H   |		Short_Literal	0xb
0593 e01d       |    |		Load	0x0,0x1d
0594 0334       | 4  |		Declare_Variable	Array,With_Constraint
0595 502a       |P*  |		Indirect_Literal	Any,0x5c0,{0x574d5f50, 0x524f544f}
0596 e5ff       |    |		Load	0x2,-0x1
0597 801e       |    |		Call	0x0,0x1e
0598 00da       |    |		Load_Top	At_Offset_2
0599 017d       | }  |		Execute	Record,Structure_Write
059a 00d9       |    |		Load_Top	At_Offset_1
059b e01c       |    |		Load	0x0,0x1c
059c 017f       |    |		Execute	Record,Equal
059d 6803       |h   |		Jump_Zero	0x5a1
059e 4800       |H   |		Short_Literal	0x0
059f a5fc       |    |		Store_Unchecked	0x2,-0x4
05a0 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
05a1 e5ff       |    |		Load	0x2,-0x1
05a2 801f       |    |		Call	0x0,0x1f
05a3 00d9       |    |		Load_Top	At_Offset_1
05a4 e5ff       |    |		Load	0x2,-0x1
05a5 0227       | '  |		Execute	Access,All_Reference
05a6 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
05a7 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
05a8 e5ff       |    |		Load	0x2,-0x1
05a9 8020       |    |		Call	0x0,0x20
05aa 00d8       |    |		Load_Top	At_Offset_0
05ab e5fd       |    |		Load	0x2,-0x3
05ac e05d       | ]  |		Load	0x0,0x5d
05ad e05e       | ^  |		Load	0x0,0x5e
05ae e05f       | _  |		Load	0x0,0x5f
05af a060       | `  |		Store_Unchecked	0x0,0x60
05b0 802e       | .  |		Call	0x0,0x2e
05b1 00d1       |    |		Pop_Control	Pop_Count_1
05b2 00d8       |    |		Load_Top	At_Offset_0
05b3 4800       |H   |		Short_Literal	0x0
05b4 4820       |H   |		Short_Literal	0x20
05b5 e055       | U  |		Load	0x0,0x55
05b6 e5ff       |    |		Load	0x2,-0x1
05b7 0227       | '  |		Execute	Access,All_Reference
05b8 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
05b9 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
05ba e5fe       |    |		Load	0x2,-0x2
05bb e5ff       |    |		Load	0x2,-0x1
05bc 801a       |    |		Call	0x0,0x1a
05bd 4801       |H   |		Short_Literal	0x1
05be a5fc       |    |		Store_Unchecked	0x2,-0x4
05bf 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
05c0 574d 5f50  |WM_P|		.LITERAL	{0x574d5f50, 0x524f544f}
05c4 434f 4c53  |COLS|		.XXX[0x4]
05c6 0000 0000  |    |
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05e2       |    |		.CONST	0x05e2								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0009       |    |		.CONST	0x0009								; Number of locals
05cb			INIT_05c8:
05cb e061       | a  |		Load	0x0,0x61
05cc 0322       | "  |		Declare_Variable	Record
05cd 00d8       |    |		Load_Top	At_Offset_0
05ce 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05cf e003       |    |		Load	0x0,0x3
05d0 0322       | "  |		Declare_Variable	Record
05d1 e004       |    |		Load	0x0,0x4
05d2 0007       |    |		Action	Break_Optional
05d3 e005       |    |		Load	0x0,0x5
05d4 0007       |    |		Action	Break_Optional
05d5 e005       |    |		Load	0x0,0x5
05d6 0007       |    |		Action	Break_Optional
05d7 e007       |    |		Load	0x0,0x7
05d8 0007       |    |		Action	Break_Optional
05d9 e006       |    |		Load	0x0,0x6
05da 0007       |    |		Action	Break_Optional
05db e061       | a  |		Load	0x0,0x61
05dc 012c       | ,  |		Execute	Any,Size
05dd e004       |    |		Load	0x0,0x4
05de 012c       | ,  |		Execute	Any,Size
05df 0270       | p  |		Execute	Discrete,Divide
05e0 e005       |    |		Load	0x0,0x5
05e1 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
05e2			BODY_05c8:
05e2 e007       |    |		Load	0x0,0x7
05e3 e006       |    |		Load	0x0,0x6
05e4 e005       |    |		Load	0x0,0x5
05e5 00d8       |    |		Load_Top	At_Offset_0
05e6 e004       |    |		Load	0x0,0x4
05e7 e403       |    |		Load	0x2,0x3
05e8 e062       | b  |		Load	0x0,0x62
05e9 4800       |H   |		Short_Literal	0x0
05ea e063       | c  |		Load	0x0,0x63
05eb 012c       | ,  |		Execute	Any,Size
05ec 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
05ed 00d8       |    |		Load_Top	At_Offset_0
05ee e064       | d  |		Load	0x0,0x64
05ef 0260       | `  |		Execute	Discrete,In_Type
05f0 7001       |p   |		Jump_Nonzero	0x5f2
05f1 0801       |    |		Execute_Immediate	Raise,0x1
05f2 00d8       |    |		Load_Top	At_Offset_0
05f3 e005       |    |		Load	0x0,0x5
05f4 0260       | `  |		Execute	Discrete,In_Type
05f5 7001       |p   |		Jump_Nonzero	0x5f7
05f6 0801       |    |		Execute_Immediate	Raise,0x1
05f7 4800       |H   |		Short_Literal	0x0
05f8 e5fd       |    |		Load	0x2,-0x3
05f9 e5fe       |    |		Load	0x2,-0x2
05fa e5ff       |    |		Load	0x2,-0x1
05fb 800a       |    |		Call	0x0,0xa
05fc 00d1       |    |		Pop_Control	Pop_Count_1
05fd c404       |    |		Store	0x2,0x4
05fe c406       |    |		Store	0x2,0x6
05ff c405       |    |		Store	0x2,0x5
0600 003b       | ;  |		Store_Top	Access,At_Offset_3
0601 005b       | [  |		Store_Top	Discrete,At_Offset_3
0602 00da       |    |		Load_Top	At_Offset_2
0603 6814       |h   |		Jump_Zero	0x618
0604 e403       |    |		Load	0x2,0x3
0605 e062       | b  |		Load	0x0,0x62
0606 017f       |    |		Execute	Record,Equal
0607 6810       |h   |		Jump_Zero	0x618
0608 00db       |    |		Load_Top	At_Offset_3
0609 e061       | a  |		Load	0x0,0x61
060a 012c       | ,  |		Execute	Any,Size
060b 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
060c 027e       | ~  |		Execute	Discrete,Not_Equal
060d 6807       |h   |		Jump_Zero	0x615
060e 00db       |    |		Load_Top	At_Offset_3
060f e061       | a  |		Load	0x0,0x61
0610 012c       | ,  |		Execute	Any,Size
0611 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0612 0afd       |    |		Execute_Immediate	Plus,-0x3
0613 027e       | ~  |		Execute	Discrete,Not_Equal
0614 7003       |p   |		Jump_Nonzero	0x618
0615 e404       |    |		Load	0x2,0x4
0616 0e20       |    |		Execute_Immediate	Not_Equal,0x20
0617 680c       |h   |		Jump_Zero	0x624
0618 00d9       |    |		Load_Top	At_Offset_1
0619 e011       |    |		Load	0x0,0x11
061a e012       |    |		Load	0x0,0x12
061b a013       |    |		Store_Unchecked	0x0,0x13
061c 8014       |    |		Call	0x0,0x14
061d 003a       | :  |		Store_Top	Access,At_Offset_2
061e e065       | e  |		Load	0x0,0x65
061f e5fc       |    |		Load	0x2,-0x4
0620 017d       | }  |		Execute	Record,Structure_Write
0621 4800       |H   |		Short_Literal	0x0
0622 a5fb       |    |		Store_Unchecked	0x2,-0x5
0623 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0624 00db       |    |		Load_Top	At_Offset_3
0625 e061       | a  |		Load	0x0,0x61
0626 012c       | ,  |		Execute	Any,Size
0627 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0628 027b       | {  |		Execute	Discrete,Greater_Equal
0629 684a       |hJ  |		Jump_Zero	0x674
062a e402       |    |		Load	0x2,0x2
062b 00da       |    |		Load_Top	At_Offset_2
062c 0227       | '  |		Execute	Access,All_Reference
062d 01dd       |    |		Execute	Vector,First
062e 00db       |    |		Load_Top	At_Offset_3
062f 0227       | '  |		Execute	Access,All_Reference
0630 01dd       |    |		Execute	Vector,First
0631 00db       |    |		Load_Top	At_Offset_3
0632 0273       | s  |		Execute	Discrete,Plus
0633 0aff       |    |		Execute_Immediate	Plus,-0x1
0634 e408       |    |		Load	0x2,0x8
0635 0227       | '  |		Execute	Access,All_Reference
0636 01cf       |    |		Execute	Vector,Slice_Read
0637 e066       | f  |		Load	0x0,0x66
0638 a067       | g  |		Store_Unchecked	0x0,0x67
0639 8068       | h  |		Call	0x0,0x68
063a 00d1       |    |		Pop_Control	Pop_Count_1
063b e402       |    |		Load	0x2,0x2
063c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
063d e069       | i  |		Load	0x0,0x69
063e 0337       | 7  |		Declare_Variable	Array
063f 4801       |H   |		Short_Literal	0x1
0640 481f       |H   |		Short_Literal	0x1f
0641 00da       |    |		Load_Top	At_Offset_2
0642 01d6       |    |		Execute	Vector,Field_Write
0643 4801       |H   |		Short_Literal	0x1
0644 481e       |H   |		Short_Literal	0x1e
0645 00da       |    |		Load_Top	At_Offset_2
0646 01d6       |    |		Execute	Vector,Field_Write
0647 4801       |H   |		Short_Literal	0x1
0648 481d       |H   |		Short_Literal	0x1d
0649 00da       |    |		Load_Top	At_Offset_2
064a 01d6       |    |		Execute	Vector,Field_Write
064b 4801       |H   |		Short_Literal	0x1
064c 481c       |H   |		Short_Literal	0x1c
064d 00da       |    |		Load_Top	At_Offset_2
064e 01d6       |    |		Execute	Vector,Field_Write
064f 4801       |H   |		Short_Literal	0x1
0650 481b       |H   |		Short_Literal	0x1b
0651 00da       |    |		Load_Top	At_Offset_2
0652 01d6       |    |		Execute	Vector,Field_Write
0653 4801       |H   |		Short_Literal	0x1
0654 481a       |H   |		Short_Literal	0x1a
0655 00da       |    |		Load_Top	At_Offset_2
0656 01d6       |    |		Execute	Vector,Field_Write
0657 4801       |H   |		Short_Literal	0x1
0658 4819       |H   |		Short_Literal	0x19
0659 00da       |    |		Load_Top	At_Offset_2
065a 01d6       |    |		Execute	Vector,Field_Write
065b 4801       |H   |		Short_Literal	0x1
065c 4818       |H   |		Short_Literal	0x18
065d 00da       |    |		Load_Top	At_Offset_2
065e 01d6       |    |		Execute	Vector,Field_Write
065f 4801       |H   |		Short_Literal	0x1
0660 4817       |H   |		Short_Literal	0x17
0661 00da       |    |		Load_Top	At_Offset_2
0662 01d6       |    |		Execute	Vector,Field_Write
0663 4801       |H   |		Short_Literal	0x1
0664 4816       |H   |		Short_Literal	0x16
0665 00da       |    |		Load_Top	At_Offset_2
0666 01d6       |    |		Execute	Vector,Field_Write
0667 4815       |H   |		Short_Literal	0x15
0668 4800       |H   |		Short_Literal	0x0
0669 4800       |H   |		Short_Literal	0x0
066a 00d9       |    |		Load_Top	At_Offset_1
066b e40b       |    |		Load	0x2,0xb
066c 01d6       |    |		Execute	Vector,Field_Write
066d 3ffb       |?   |		Loop_Increasing	0x669
066e e069       | i  |		Load	0x0,0x69
066f 01c3       |    |		Execute	Vector,Check_In_Type
0670 01d3       |    |		Execute	Vector,And
0671 e402       |    |		Load	0x2,0x2
0672 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0673 7843       |xC  |		Jump	0x6b7
0674 e402       |    |		Load	0x2,0x2
0675 00da       |    |		Load_Top	At_Offset_2
0676 0227       | '  |		Execute	Access,All_Reference
0677 4801       |H   |		Short_Literal	0x1
0678 480c       |H   |		Short_Literal	0xc
0679 e019       |    |		Load	0x0,0x19
067a 0334       | 4  |		Declare_Variable	Array,With_Constraint
067b 480c       |H   |		Short_Literal	0xc
067c 4801       |H   |		Short_Literal	0x1
067d 4800       |H   |		Short_Literal	0x0
067e 00d9       |    |		Load_Top	At_Offset_1
067f e40c       |    |		Load	0x2,0xc
0680 01d6       |    |		Execute	Vector,Field_Write
0681 3ffb       |?   |		Loop_Increasing	0x67d
0682 01cc       |    |		Execute	Vector,Catenate
0683 e066       | f  |		Load	0x0,0x66
0684 a067       | g  |		Store_Unchecked	0x0,0x67
0685 8068       | h  |		Call	0x0,0x68
0686 00d1       |    |		Pop_Control	Pop_Count_1
0687 e402       |    |		Load	0x2,0x2
0688 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0689 e069       | i  |		Load	0x0,0x69
068a 0337       | 7  |		Declare_Variable	Array
068b 4801       |H   |		Short_Literal	0x1
068c 481f       |H   |		Short_Literal	0x1f
068d 00da       |    |		Load_Top	At_Offset_2
068e 01d6       |    |		Execute	Vector,Field_Write
068f 4801       |H   |		Short_Literal	0x1
0690 481e       |H   |		Short_Literal	0x1e
0691 00da       |    |		Load_Top	At_Offset_2
0692 01d6       |    |		Execute	Vector,Field_Write
0693 4801       |H   |		Short_Literal	0x1
0694 481d       |H   |		Short_Literal	0x1d
0695 00da       |    |		Load_Top	At_Offset_2
0696 01d6       |    |		Execute	Vector,Field_Write
0697 4801       |H   |		Short_Literal	0x1
0698 481c       |H   |		Short_Literal	0x1c
0699 00da       |    |		Load_Top	At_Offset_2
069a 01d6       |    |		Execute	Vector,Field_Write
069b 4801       |H   |		Short_Literal	0x1
069c 481b       |H   |		Short_Literal	0x1b
069d 00da       |    |		Load_Top	At_Offset_2
069e 01d6       |    |		Execute	Vector,Field_Write
069f 4801       |H   |		Short_Literal	0x1
06a0 481a       |H   |		Short_Literal	0x1a
06a1 00da       |    |		Load_Top	At_Offset_2
06a2 01d6       |    |		Execute	Vector,Field_Write
06a3 4801       |H   |		Short_Literal	0x1
06a4 4819       |H   |		Short_Literal	0x19
06a5 00da       |    |		Load_Top	At_Offset_2
06a6 01d6       |    |		Execute	Vector,Field_Write
06a7 4801       |H   |		Short_Literal	0x1
06a8 4818       |H   |		Short_Literal	0x18
06a9 00da       |    |		Load_Top	At_Offset_2
06aa 01d6       |    |		Execute	Vector,Field_Write
06ab 4817       |H   |		Short_Literal	0x17
06ac 4800       |H   |		Short_Literal	0x0
06ad 4800       |H   |		Short_Literal	0x0
06ae 00d9       |    |		Load_Top	At_Offset_1
06af e40b       |    |		Load	0x2,0xb
06b0 01d6       |    |		Execute	Vector,Field_Write
06b1 3ffb       |?   |		Loop_Increasing	0x6ad
06b2 e069       | i  |		Load	0x0,0x69
06b3 01c3       |    |		Execute	Vector,Check_In_Type
06b4 01d3       |    |		Execute	Vector,And
06b5 e402       |    |		Load	0x2,0x2
06b6 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
06b7 e063       | c  |		Load	0x0,0x63
06b8 0322       | "  |		Declare_Variable	Record
06b9 e402       |    |		Load	0x2,0x2
06ba 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
06bb e063       | c  |		Load	0x0,0x63
06bc 3000       |0   |		Execute	Record,Field_Type,Field_Number 0x0
06bd 0119       |    |		Execute	Any,Check_In_Formal_Type
06be 00d9       |    |		Load_Top	At_Offset_1
06bf 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
06c0 e402       |    |		Load	0x2,0x2
06c1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06c2 00d9       |    |		Load_Top	At_Offset_1
06c3 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
06c4 e402       |    |		Load	0x2,0x2
06c5 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06c6 00d9       |    |		Load_Top	At_Offset_1
06c7 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
06c8 e402       |    |		Load	0x2,0x2
06c9 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
06ca 00d9       |    |		Load_Top	At_Offset_1
06cb 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
06cc e402       |    |		Load	0x2,0x2
06cd 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
06ce 00d9       |    |		Load_Top	At_Offset_1
06cf 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
06d0 e402       |    |		Load	0x2,0x2
06d1 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
06d2 00d9       |    |		Load_Top	At_Offset_1
06d3 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
06d4 e402       |    |		Load	0x2,0x2
06d5 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
06d6 00d9       |    |		Load_Top	At_Offset_1
06d7 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
06d8 e402       |    |		Load	0x2,0x2
06d9 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
06da 00d9       |    |		Load_Top	At_Offset_1
06db 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
06dc e402       |    |		Load	0x2,0x2
06dd 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
06de 00d9       |    |		Load_Top	At_Offset_1
06df 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
06e0 e402       |    |		Load	0x2,0x2
06e1 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
06e2 00d9       |    |		Load_Top	At_Offset_1
06e3 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
06e4 e402       |    |		Load	0x2,0x2
06e5 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
06e6 00d9       |    |		Load_Top	At_Offset_1
06e7 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
06e8 e402       |    |		Load	0x2,0x2
06e9 340b       |4   |		Execute	Record,Field_Reference,Field_Number 0xb
06ea 00d9       |    |		Load_Top	At_Offset_1
06eb 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
06ec e402       |    |		Load	0x2,0x2
06ed 340c       |4   |		Execute	Record,Field_Reference,Field_Number 0xc
06ee 00d9       |    |		Load_Top	At_Offset_1
06ef 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
06f0 e402       |    |		Load	0x2,0x2
06f1 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
06f2 00d9       |    |		Load_Top	At_Offset_1
06f3 380d       |8   |		Execute	Record,Field_Write,Field_Number 0xd
06f4 e402       |    |		Load	0x2,0x2
06f5 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
06f6 00d9       |    |		Load_Top	At_Offset_1
06f7 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
06f8 e402       |    |		Load	0x2,0x2
06f9 3c0f       |<   |		Execute	Record,Field_Read,Field_Number 0xf
06fa 00d8       |    |		Load_Top	At_Offset_0
06fb e06a       | j  |		Load	0x0,0x6a
06fc 0260       | `  |		Execute	Discrete,In_Type
06fd 7001       |p   |		Jump_Nonzero	0x6ff
06fe 0801       |    |		Execute_Immediate	Raise,0x1
06ff 00d9       |    |		Load_Top	At_Offset_1
0700 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0701 e5fc       |    |		Load	0x2,-0x4
0702 017d       | }  |		Execute	Record,Structure_Write
0703 4801       |H   |		Short_Literal	0x1
0704 a5fb       |    |		Store_Unchecked	0x2,-0x5
0705 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0706 0000 0000  |    |		.XXX[0x2]
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 0718       |    |		.CONST	0x0718								; Address of begin
0709 0004       |    |		.CONST	0x0004								; Address of exception handler
070a 0003       |    |		.CONST	0x0003								; Number of locals
070b			INIT_0708:
070b e061       | a  |		Load	0x0,0x61
070c 0322       | "  |		Declare_Variable	Record
070d 00d8       |    |		Load_Top	At_Offset_0
070e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
070f 4801       |H   |		Short_Literal	0x1
0710 e061       | a  |		Load	0x0,0x61
0711 012c       | ,  |		Execute	Any,Size
0712 e004       |    |		Load	0x0,0x4
0713 012c       | ,  |		Execute	Any,Size
0714 0270       | p  |		Execute	Discrete,Divide
0715 e019       |    |		Load	0x0,0x19
0716 035b       | [  |		Declare_Type	Array,Constrained
0717 0337       | 7  |		Declare_Variable	Array
0718			BODY_0708:
0718 e061       | a  |		Load	0x0,0x61
0719 0322       | "  |		Declare_Variable	Record
071a e5fc       |    |		Load	0x2,-0x4
071b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
071c e061       | a  |		Load	0x0,0x61
071d 3000       |0   |		Execute	Record,Field_Type,Field_Number 0x0
071e 0119       |    |		Execute	Any,Check_In_Formal_Type
071f 00d9       |    |		Load_Top	At_Offset_1
0720 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0721 e5fc       |    |		Load	0x2,-0x4
0722 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0723 00d9       |    |		Load_Top	At_Offset_1
0724 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0725 e5fc       |    |		Load	0x2,-0x4
0726 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0727 00d9       |    |		Load_Top	At_Offset_1
0728 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0729 e5fc       |    |		Load	0x2,-0x4
072a 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
072b 00d9       |    |		Load_Top	At_Offset_1
072c 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
072d e5fc       |    |		Load	0x2,-0x4
072e 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
072f 00d9       |    |		Load_Top	At_Offset_1
0730 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0731 e5fc       |    |		Load	0x2,-0x4
0732 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0733 00d9       |    |		Load_Top	At_Offset_1
0734 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0735 e5fc       |    |		Load	0x2,-0x4
0736 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0737 00d9       |    |		Load_Top	At_Offset_1
0738 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0739 e5fc       |    |		Load	0x2,-0x4
073a 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
073b 00d9       |    |		Load_Top	At_Offset_1
073c 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
073d e5fc       |    |		Load	0x2,-0x4
073e 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
073f 00d9       |    |		Load_Top	At_Offset_1
0740 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0741 e5fc       |    |		Load	0x2,-0x4
0742 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0743 00d9       |    |		Load_Top	At_Offset_1
0744 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0745 e5fc       |    |		Load	0x2,-0x4
0746 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0747 00d9       |    |		Load_Top	At_Offset_1
0748 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
0749 e5fc       |    |		Load	0x2,-0x4
074a 340b       |4   |		Execute	Record,Field_Reference,Field_Number 0xb
074b 00d9       |    |		Load_Top	At_Offset_1
074c 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
074d e5fc       |    |		Load	0x2,-0x4
074e 340c       |4   |		Execute	Record,Field_Reference,Field_Number 0xc
074f 00d9       |    |		Load_Top	At_Offset_1
0750 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
0751 e5fc       |    |		Load	0x2,-0x4
0752 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
0753 00d9       |    |		Load_Top	At_Offset_1
0754 380d       |8   |		Execute	Record,Field_Write,Field_Number 0xd
0755 e5fc       |    |		Load	0x2,-0x4
0756 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
0757 00d9       |    |		Load_Top	At_Offset_1
0758 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
0759 e5fc       |    |		Load	0x2,-0x4
075a 3c0f       |<   |		Execute	Record,Field_Read,Field_Number 0xf
075b 00d8       |    |		Load_Top	At_Offset_0
075c e06b       | k  |		Load	0x0,0x6b
075d 0260       | `  |		Execute	Discrete,In_Type
075e 7001       |p   |		Jump_Nonzero	0x760
075f 0801       |    |		Execute_Immediate	Raise,0x1
0760 00d9       |    |		Load_Top	At_Offset_1
0761 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0762 00da       |    |		Load_Top	At_Offset_2
0763 017d       | }  |		Execute	Record,Structure_Write
0764 00d8       |    |		Load_Top	At_Offset_0
0765 00da       |    |		Load_Top	At_Offset_2
0766 e06c       | l  |		Load	0x0,0x6c
0767 a06d       | m  |		Store_Unchecked	0x0,0x6d
0768 806e       | n  |		Call	0x0,0x6e
0769 00d1       |    |		Pop_Control	Pop_Count_1
076a 00d8       |    |		Load_Top	At_Offset_0
076b 4800       |H   |		Short_Literal	0x0
076c 4820       |H   |		Short_Literal	0x20
076d e062       | b  |		Load	0x0,0x62
076e e5fd       |    |		Load	0x2,-0x3
076f e5fe       |    |		Load	0x2,-0x2
0770 e5ff       |    |		Load	0x2,-0x1
0771 801a       |    |		Call	0x0,0x1a
0772 4801       |H   |		Short_Literal	0x1
0773 a5fb       |    |		Store_Unchecked	0x2,-0x5
0774 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0775 0000 0000  |    |		.XXX[0x3]
0777 0000       |    |
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 0783       |    |		.CONST	0x0783								; Address of begin
0779 0004       |    |		.CONST	0x0004								; Address of exception handler
077a 0005       |    |		.CONST	0x0005								; Number of locals
077b			INIT_0778:
077b e03c       | <  |		Load	0x0,0x3c
077c 0322       | "  |		Declare_Variable	Record
077d 00d8       |    |		Load_Top	At_Offset_0
077e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
077f 806f       | o  |		Call	0x0,0x6f
0780 e007       |    |		Load	0x0,0x7
0781 029f 09db  |    |		Declare_Subprogram	INIT_09d8,For_Call
0783			BODY_0778:
0783 e5fd       |    |		Load	0x2,-0x3
0784 e070       | p  |		Load	0x0,0x70
0785 017e       | ~  |		Execute	Record,Not_Equal
0786 6806       |h   |		Jump_Zero	0x78d
0787 e007       |    |		Load	0x0,0x7
0788 e5fd       |    |		Load	0x2,-0x3
0789 e5fe       |    |		Load	0x2,-0x2
078a e5ff       |    |		Load	0x2,-0x1
078b 821a       |    |		Call	0x1,0x1a
078c 005a       | Z  |		Store_Top	Discrete,At_Offset_2
078d e5fc       |    |		Load	0x2,-0x4
078e e070       | p  |		Load	0x0,0x70
078f 017e       | ~  |		Execute	Record,Not_Equal
0790 6806       |h   |		Jump_Zero	0x797
0791 e007       |    |		Load	0x0,0x7
0792 e5fc       |    |		Load	0x2,-0x4
0793 e5fe       |    |		Load	0x2,-0x2
0794 e5ff       |    |		Load	0x2,-0x1
0795 8218       |    |		Call	0x1,0x18
0796 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0797 e5fb       |    |		Load	0x2,-0x5
0798 01db       |    |		Execute	Vector,Length
0799 6806       |h   |		Jump_Zero	0x7a0
079a e007       |    |		Load	0x0,0x7
079b e5fb       |    |		Load	0x2,-0x5
079c e5fe       |    |		Load	0x2,-0x2
079d e5ff       |    |		Load	0x2,-0x1
079e 8214       |    |		Call	0x1,0x14
079f 005a       | Z  |		Store_Top	Discrete,At_Offset_2
07a0 00db       |    |		Load_Top	At_Offset_3
07a1 00db       |    |		Load_Top	At_Offset_3
07a2 8071       | q  |		Call	0x0,0x71
07a3 00d1       |    |		Pop_Control	Pop_Count_1
07a4 e007       |    |		Load	0x0,0x7
07a5 e402       |    |		Load	0x2,0x2
07a6 e5fe       |    |		Load	0x2,-0x2
07a7 e5ff       |    |		Load	0x2,-0x1
07a8 8228       | (  |		Call	0x1,0x28
07a9 005a       | Z  |		Store_Top	Discrete,At_Offset_2
07aa 00db       |    |		Load_Top	At_Offset_3
07ab 8041       | A  |		Call	0x0,0x41
07ac 00d1       |    |		Pop_Control	Pop_Count_1
07ad e5fa       |    |		Load	0x2,-0x6
07ae e065       | e  |		Load	0x0,0x65
07af 017e       | ~  |		Execute	Record,Not_Equal
07b0 6806       |h   |		Jump_Zero	0x7b7
07b1 e007       |    |		Load	0x0,0x7
07b2 e5fa       |    |		Load	0x2,-0x6
07b3 e5fe       |    |		Load	0x2,-0x2
07b4 e5ff       |    |		Load	0x2,-0x1
07b5 821c       |    |		Call	0x1,0x1c
07b6 005a       | Z  |		Store_Top	Discrete,At_Offset_2
07b7 e5f9       |    |		Load	0x2,-0x7
07b8 e072       | r  |		Load	0x0,0x72
07b9 017e       | ~  |		Execute	Record,Not_Equal
07ba 6806       |h   |		Jump_Zero	0x7c1
07bb e007       |    |		Load	0x0,0x7
07bc e5f9       |    |		Load	0x2,-0x7
07bd e5fe       |    |		Load	0x2,-0x2
07be e5ff       |    |		Load	0x2,-0x1
07bf 8226       | &  |		Call	0x1,0x26
07c0 005a       | Z  |		Store_Top	Discrete,At_Offset_2
07c1 8405       |    |		Call	0x2,0x5
07c2 4801       |H   |		Short_Literal	0x1
07c3 a5f7       |    |		Store_Unchecked	0x2,-0x9
07c4 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
07c5 0000 0000  |    |		.XXX[0x3]
07c7 0000       |    |
07c8 ; --------------------------------------------------------------------------------------
07c8 ; SUBPROGRAM
07c8 ; --------------------------------------------------------------------------------------
07c8 07d3       |    |		.CONST	0x07d3								; Address of begin
07c9 07ec       |    |		.CONST	0x07ec								; Address of exception handler
07ca 0003       |    |		.CONST	0x0003								; Number of locals
07cb			INIT_07c8:
07cb e03c       | <  |		Load	0x0,0x3c
07cc 0322       | "  |		Declare_Variable	Record
07cd 00d8       |    |		Load_Top	At_Offset_0
07ce 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07cf e03c       | <  |		Load	0x0,0x3c
07d0 0322       | "  |		Declare_Variable	Record
07d1 00d8       |    |		Load_Top	At_Offset_0
07d2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07d3			BODY_07c8:
07d3 00d9       |    |		Load_Top	At_Offset_1
07d4 e5fd       |    |		Load	0x2,-0x3
07d5 8071       | q  |		Call	0x0,0x71
07d6 00d1       |    |		Pop_Control	Pop_Count_1
07d7 00d8       |    |		Load_Top	At_Offset_0
07d8 e5fc       |    |		Load	0x2,-0x4
07d9 8071       | q  |		Call	0x0,0x71
07da 00d1       |    |		Pop_Control	Pop_Count_1
07db e007       |    |		Load	0x0,0x7
07dc e5f8       |    |		Load	0x2,-0x8
07dd e5f9       |    |		Load	0x2,-0x7
07de e5fa       |    |		Load	0x2,-0x6
07df e5fb       |    |		Load	0x2,-0x5
07e0 e403       |    |		Load	0x2,0x3
07e1 e402       |    |		Load	0x2,0x2
07e2 e5fe       |    |		Load	0x2,-0x2
07e3 e5ff       |    |		Load	0x2,-0x1
07e4 8221       | !  |		Call	0x1,0x21
07e5 c5f7       |    |		Store	0x2,-0x9
07e6 00d9       |    |		Load_Top	At_Offset_1
07e7 8041       | A  |		Call	0x0,0x41
07e8 00d1       |    |		Pop_Control	Pop_Count_1
07e9 00d8       |    |		Load_Top	At_Offset_0
07ea 8041       | A  |		Call	0x0,0x41
07eb 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
07ec			TRAP_07c8:
07ec 0007       |    |		Action	Break_Optional
07ed 00da       |    |		Load_Top	At_Offset_2
07ee 8041       | A  |		Call	0x0,0x41
07ef 00d1       |    |		Pop_Control	Pop_Count_1
07f0 00d9       |    |		Load_Top	At_Offset_1
07f1 8041       | A  |		Call	0x0,0x41
07f2 00d1       |    |		Pop_Control	Pop_Count_1
07f3 00d8       |    |		Load_Top	At_Offset_0
07f4 0101       |    |		Execute	Exception,Reraise
07f5 0000 0000  |    |		.XXX[0x3]
07f7 0000       |    |
07f8 ; --------------------------------------------------------------------------------------
07f8 ; SUBPROGRAM
07f8 ; --------------------------------------------------------------------------------------
07f8 0807       |    |		.CONST	0x0807								; Address of begin
07f9 0847       | G  |		.CONST	0x0847								; Address of exception handler
07fa 0007       |    |		.CONST	0x0007								; Number of locals
07fb			INIT_07f8:
07fb e003       |    |		Load	0x0,0x3
07fc 0322       | "  |		Declare_Variable	Record
07fd e004       |    |		Load	0x0,0x4
07fe 0007       |    |		Action	Break_Optional
07ff e005       |    |		Load	0x0,0x5
0800 0007       |    |		Action	Break_Optional
0801 e005       |    |		Load	0x0,0x5
0802 0007       |    |		Action	Break_Optional
0803 e006       |    |		Load	0x0,0x6
0804 0007       |    |		Action	Break_Optional
0805 e007       |    |		Load	0x0,0x7
0806 0007       |    |		Action	Break_Optional
0807			BODY_07f8:
0807 e007       |    |		Load	0x0,0x7
0808 e006       |    |		Load	0x0,0x6
0809 e005       |    |		Load	0x0,0x5
080a 00d8       |    |		Load_Top	At_Offset_0
080b e004       |    |		Load	0x0,0x4
080c e402       |    |		Load	0x2,0x2
080d e021       | !  |		Load	0x0,0x21
080e 4800       |H   |		Short_Literal	0x0
080f e029       | )  |		Load	0x0,0x29
0810 012c       | ,  |		Execute	Any,Size
0811 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0812 00d8       |    |		Load_Top	At_Offset_0
0813 e005       |    |		Load	0x0,0x5
0814 0260       | `  |		Execute	Discrete,In_Type
0815 7001       |p   |		Jump_Nonzero	0x817
0816 0801       |    |		Execute_Immediate	Raise,0x1
0817 4800       |H   |		Short_Literal	0x0
0818 e073       | s  |		Load	0x0,0x73
0819 e5fe       |    |		Load	0x2,-0x2
081a e5ff       |    |		Load	0x2,-0x1
081b 800a       |    |		Call	0x0,0xa
081c 00d1       |    |		Pop_Control	Pop_Count_1
081d c403       |    |		Store	0x2,0x3
081e c404       |    |		Store	0x2,0x4
081f c405       |    |		Store	0x2,0x5
0820 003b       | ;  |		Store_Top	Access,At_Offset_3
0821 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0822 00d8       |    |		Load_Top	At_Offset_0
0823 6817       |h   |		Jump_Zero	0x83b
0824 e402       |    |		Load	0x2,0x2
0825 e021       | !  |		Load	0x0,0x21
0826 017f       |    |		Execute	Record,Equal
0827 6813       |h   |		Jump_Zero	0x83b
0828 00db       |    |		Load_Top	At_Offset_3
0829 e029       | )  |		Load	0x0,0x29
082a 012c       | ,  |		Execute	Any,Size
082b 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
082c 027b       | {  |		Execute	Discrete,Greater_Equal
082d 680d       |h   |		Jump_Zero	0x83b
082e e403       |    |		Load	0x2,0x3
082f 0f20       |    |		Execute_Immediate	Equal,0x20
0830 680a       |h   |		Jump_Zero	0x83b
0831 e5fd       |    |		Load	0x2,-0x3
0832 00da       |    |		Load_Top	At_Offset_2
0833 0227       | '  |		Execute	Access,All_Reference
0834 e074       | t  |		Load	0x0,0x74
0835 a075       | u  |		Store_Unchecked	0x0,0x75
0836 8068       | h  |		Call	0x0,0x68
0837 00d1       |    |		Pop_Control	Pop_Count_1
0838 4801       |H   |		Short_Literal	0x1
0839 a5fc       |    |		Store_Unchecked	0x2,-0x4
083a 7805       |x   |		Jump	0x840
083b e076       | v  |		Load	0x0,0x76
083c e5fd       |    |		Load	0x2,-0x3
083d 017d       | }  |		Execute	Record,Structure_Write
083e 4800       |H   |		Short_Literal	0x0
083f a5fc       |    |		Store_Unchecked	0x2,-0x4
0840 00d9       |    |		Load_Top	At_Offset_1
0841 e011       |    |		Load	0x0,0x11
0842 e012       |    |		Load	0x0,0x12
0843 a013       |    |		Store_Unchecked	0x0,0x13
0844 8014       |    |		Call	0x0,0x14
0845 003a       | :  |		Store_Top	Access,At_Offset_2
0846 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0847			TRAP_07f8:
0847 0007       |    |		Action	Break_Optional
0848 00da       |    |		Load_Top	At_Offset_2
0849 e011       |    |		Load	0x0,0x11
084a e012       |    |		Load	0x0,0x12
084b a013       |    |		Store_Unchecked	0x0,0x13
084c 8014       |    |		Call	0x0,0x14
084d 003b       | ;  |		Store_Top	Access,At_Offset_3
084e 00d8       |    |		Load_Top	At_Offset_0
084f 0101       |    |		Execute	Exception,Reraise
0850 ; --------------------------------------------------------------------------------------
0850 ; SUBPROGRAM
0850 ; --------------------------------------------------------------------------------------
0850 085c       | \  |		.CONST	0x085c								; Address of begin
0851 0004       |    |		.CONST	0x0004								; Address of exception handler
0852 0002       |    |		.CONST	0x0002								; Number of locals
0853			INIT_0850:
0853 4801       |H   |		Short_Literal	0x1
0854 e029       | )  |		Load	0x0,0x29
0855 012c       | ,  |		Execute	Any,Size
0856 e004       |    |		Load	0x0,0x4
0857 012c       | ,  |		Execute	Any,Size
0858 0270       | p  |		Execute	Discrete,Divide
0859 e019       |    |		Load	0x0,0x19
085a 035b       | [  |		Declare_Type	Array,Constrained
085b 0337       | 7  |		Declare_Variable	Array
085c			BODY_0850:
085c 00d8       |    |		Load_Top	At_Offset_0
085d e5fd       |    |		Load	0x2,-0x3
085e e077       | w  |		Load	0x0,0x77
085f a078       | x  |		Store_Unchecked	0x0,0x78
0860 806e       | n  |		Call	0x0,0x6e
0861 00d1       |    |		Pop_Control	Pop_Count_1
0862 00d8       |    |		Load_Top	At_Offset_0
0863 4800       |H   |		Short_Literal	0x0
0864 4820       |H   |		Short_Literal	0x20
0865 e021       | !  |		Load	0x0,0x21
0866 e073       | s  |		Load	0x0,0x73
0867 e5fe       |    |		Load	0x2,-0x2
0868 e5ff       |    |		Load	0x2,-0x1
0869 801a       |    |		Call	0x0,0x1a
086a 4801       |H   |		Short_Literal	0x1
086b a5fc       |    |		Store_Unchecked	0x2,-0x4
086c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
086d 0000 0000  |    |		.XXX[0x3]
086f 0000       |    |
0870 ; --------------------------------------------------------------------------------------
0870 ; SUBPROGRAM
0870 ; --------------------------------------------------------------------------------------
0870 087f       |    |		.CONST	0x087f								; Address of begin
0871 08e2       |    |		.CONST	0x08e2								; Address of exception handler
0872 0007       |    |		.CONST	0x0007								; Number of locals
0873			INIT_0870:
0873 e003       |    |		Load	0x0,0x3
0874 0322       | "  |		Declare_Variable	Record
0875 e004       |    |		Load	0x0,0x4
0876 0007       |    |		Action	Break_Optional
0877 e005       |    |		Load	0x0,0x5
0878 0007       |    |		Action	Break_Optional
0879 e005       |    |		Load	0x0,0x5
087a 0007       |    |		Action	Break_Optional
087b e007       |    |		Load	0x0,0x7
087c 0007       |    |		Action	Break_Optional
087d e006       |    |		Load	0x0,0x6
087e 0007       |    |		Action	Break_Optional
087f			BODY_0870:
087f e007       |    |		Load	0x0,0x7
0880 e006       |    |		Load	0x0,0x6
0881 e005       |    |		Load	0x0,0x5
0882 00d8       |    |		Load_Top	At_Offset_0
0883 e004       |    |		Load	0x0,0x4
0884 e402       |    |		Load	0x2,0x2
0885 e079       | y  |		Load	0x0,0x79
0886 4800       |H   |		Short_Literal	0x0
0887 4809       |H   |		Short_Literal	0x9
0888 4800       |H   |		Short_Literal	0x0
0889 e079       | y  |		Load	0x0,0x79
088a e5fe       |    |		Load	0x2,-0x2
088b e5ff       |    |		Load	0x2,-0x1
088c 800a       |    |		Call	0x0,0xa
088d 00d1       |    |		Pop_Control	Pop_Count_1
088e c403       |    |		Store	0x2,0x3
088f c405       |    |		Store	0x2,0x5
0890 c404       |    |		Store	0x2,0x4
0891 003a       | :  |		Store_Top	Access,At_Offset_2
0892 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0893 00d9       |    |		Load_Top	At_Offset_1
0894 680e       |h   |		Jump_Zero	0x8a3
0895 e402       |    |		Load	0x2,0x2
0896 e079       | y  |		Load	0x0,0x79
0897 017f       |    |		Execute	Record,Equal
0898 680a       |h   |		Jump_Zero	0x8a3
0899 00da       |    |		Load_Top	At_Offset_2
089a e07a       | z  |		Load	0x0,0x7a
089b 012c       | ,  |		Execute	Any,Size
089c 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
089d 0aff       |    |		Execute_Immediate	Plus,-0x1
089e 027c       | |  |		Execute	Discrete,Less
089f 7003       |p   |		Jump_Nonzero	0x8a3
08a0 e403       |    |		Load	0x2,0x3
08a1 0e20       |    |		Execute_Immediate	Not_Equal,0x20
08a2 6806       |h   |		Jump_Zero	0x8a9
08a3 e072       | r  |		Load	0x0,0x72
08a4 e5fd       |    |		Load	0x2,-0x3
08a5 017d       | }  |		Execute	Record,Structure_Write
08a6 4800       |H   |		Short_Literal	0x0
08a7 a5fc       |    |		Store_Unchecked	0x2,-0x4
08a8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08a9 00da       |    |		Load_Top	At_Offset_2
08aa e07a       | z  |		Load	0x0,0x7a
08ab 012c       | ,  |		Execute	Any,Size
08ac 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
08ad 0aff       |    |		Execute_Immediate	Plus,-0x1
08ae 027f       |    |		Execute	Discrete,Equal
08af 6814       |h   |		Jump_Zero	0x8c4
08b0 e5fd       |    |		Load	0x2,-0x3
08b1 00d9       |    |		Load_Top	At_Offset_1
08b2 0227       | '  |		Execute	Access,All_Reference
08b3 4801       |H   |		Short_Literal	0x1
08b4 4804       |H   |		Short_Literal	0x4
08b5 e019       |    |		Load	0x0,0x19
08b6 0334       | 4  |		Declare_Variable	Array,With_Constraint
08b7 4804       |H   |		Short_Literal	0x4
08b8 4801       |H   |		Short_Literal	0x1
08b9 4800       |H   |		Short_Literal	0x0
08ba 00d9       |    |		Load_Top	At_Offset_1
08bb e40a       |    |		Load	0x2,0xa
08bc 01d6       |    |		Execute	Vector,Field_Write
08bd 3ffb       |?   |		Loop_Increasing	0x8b9
08be 01cc       |    |		Execute	Vector,Catenate
08bf e07b       | {  |		Load	0x0,0x7b
08c0 a07c       | |  |		Store_Unchecked	0x0,0x7c
08c1 8068       | h  |		Call	0x0,0x68
08c2 00d1       |    |		Pop_Control	Pop_Count_1
08c3 7815       |x   |		Jump	0x8d9
08c4 e5fd       |    |		Load	0x2,-0x3
08c5 00d9       |    |		Load_Top	At_Offset_1
08c6 0227       | '  |		Execute	Access,All_Reference
08c7 01dd       |    |		Execute	Vector,First
08c8 00da       |    |		Load_Top	At_Offset_2
08c9 0227       | '  |		Execute	Access,All_Reference
08ca 01dd       |    |		Execute	Vector,First
08cb e07a       | z  |		Load	0x0,0x7a
08cc 012c       | ,  |		Execute	Any,Size
08cd e004       |    |		Load	0x0,0x4
08ce 012c       | ,  |		Execute	Any,Size
08cf 0270       | p  |		Execute	Discrete,Divide
08d0 0273       | s  |		Execute	Discrete,Plus
08d1 0aff       |    |		Execute_Immediate	Plus,-0x1
08d2 00db       |    |		Load_Top	At_Offset_3
08d3 0227       | '  |		Execute	Access,All_Reference
08d4 01cf       |    |		Execute	Vector,Slice_Read
08d5 e07b       | {  |		Load	0x0,0x7b
08d6 a07c       | |  |		Store_Unchecked	0x0,0x7c
08d7 8068       | h  |		Call	0x0,0x68
08d8 00d1       |    |		Pop_Control	Pop_Count_1
08d9 00d8       |    |		Load_Top	At_Offset_0
08da e011       |    |		Load	0x0,0x11
08db e012       |    |		Load	0x0,0x12
08dc a013       |    |		Store_Unchecked	0x0,0x13
08dd 8014       |    |		Call	0x0,0x14
08de 0039       | 9  |		Store_Top	Access,At_Offset_1
08df 4801       |H   |		Short_Literal	0x1
08e0 a5fc       |    |		Store_Unchecked	0x2,-0x4
08e1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08e2			TRAP_0870:
08e2 0007       |    |		Action	Break_Optional
08e3 00d9       |    |		Load_Top	At_Offset_1
08e4 e011       |    |		Load	0x0,0x11
08e5 e012       |    |		Load	0x0,0x12
08e6 a013       |    |		Store_Unchecked	0x0,0x13
08e7 8014       |    |		Call	0x0,0x14
08e8 003a       | :  |		Store_Top	Access,At_Offset_2
08e9 00d8       |    |		Load_Top	At_Offset_0
08ea 0101       |    |		Execute	Exception,Reraise
08eb 0000 0000  |    |		.BLANK	0000[0x5]
08f0 ; --------------------------------------------------------------------------------------
08f0 ; SUBPROGRAM
08f0 ; --------------------------------------------------------------------------------------
08f0 08f8       |    |		.CONST	0x08f8								; Address of begin
08f1 0004       |    |		.CONST	0x0004								; Address of exception handler
08f2 0002       |    |		.CONST	0x0002								; Number of locals
08f3			INIT_08f0:
08f3 4801       |H   |		Short_Literal	0x1
08f4 4824       |H$  |		Short_Literal	0x24
08f5 e019       |    |		Load	0x0,0x19
08f6 035b       | [  |		Declare_Type	Array,Constrained
08f7 0337       | 7  |		Declare_Variable	Array
08f8			BODY_08f0:
08f8 00d8       |    |		Load_Top	At_Offset_0
08f9 e5fd       |    |		Load	0x2,-0x3
08fa e07d       | }  |		Load	0x0,0x7d
08fb a07e       | ~  |		Store_Unchecked	0x0,0x7e
08fc 806e       | n  |		Call	0x0,0x6e
08fd 00d1       |    |		Pop_Control	Pop_Count_1
08fe 00d8       |    |		Load_Top	At_Offset_0
08ff 4800       |H   |		Short_Literal	0x0
0900 4820       |H   |		Short_Literal	0x20
0901 e079       | y  |		Load	0x0,0x79
0902 00d8       |    |		Load_Top	At_Offset_0
0903 e5fe       |    |		Load	0x2,-0x2
0904 e5ff       |    |		Load	0x2,-0x1
0905 801a       |    |		Call	0x0,0x1a
0906 4801       |H   |		Short_Literal	0x1
0907 a5fc       |    |		Store_Unchecked	0x2,-0x4
0908 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0909 0000 0000  |    |		.BLANK	0000[0x7]
0910 ; --------------------------------------------------------------------------------------
0910 ; SUBPROGRAM
0910 ; --------------------------------------------------------------------------------------
0910 0913       |    |		.CONST	0x0913								; Address of begin
0911 0004       |    |		.CONST	0x0004								; Address of exception handler
0912 0001       |    |		.CONST	0x0001								; Number of locals
0913			BODY_0910:
0913			INIT_0910:
0913 e007       |    |		Load	0x0,0x7
0914 e5fd       |    |		Load	0x2,-0x3
0915 e07f       |    |		Load	0x0,0x7f
0916 e5fe       |    |		Load	0x2,-0x2
0917 e5ff       |    |		Load	0x2,-0x1
0918 803e       | >  |		Call	0x0,0x3e
0919 00d1       |    |		Pop_Control	Pop_Count_1
091a c5fc       |    |		Store	0x2,-0x4
091b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
091c 0000 0000  |    |		.BLANK	0000[0x4]
0920 ; --------------------------------------------------------------------------------------
0920 ; SUBPROGRAM
0920 ; --------------------------------------------------------------------------------------
0920 0923       | #  |		.CONST	0x0923								; Address of begin
0921 0004       |    |		.CONST	0x0004								; Address of exception handler
0922 0001       |    |		.CONST	0x0001								; Number of locals
0923			BODY_0920:
0923			INIT_0920:
0923 e07f       |    |		Load	0x0,0x7f
0924 e5fd       |    |		Load	0x2,-0x3
0925 e5fe       |    |		Load	0x2,-0x2
0926 e5ff       |    |		Load	0x2,-0x1
0927 8051       | Q  |		Call	0x0,0x51
0928 4801       |H   |		Short_Literal	0x1
0929 a5fc       |    |		Store_Unchecked	0x2,-0x4
092a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
092b 0000 0000  |    |		.BLANK	0000[0x5]
0930 ; --------------------------------------------------------------------------------------
0930 ; SUBPROGRAM
0930 ; --------------------------------------------------------------------------------------
0930 093d       | =  |		.CONST	0x093d								; Address of begin
0931 0004       |    |		.CONST	0x0004								; Address of exception handler
0932 0003       |    |		.CONST	0x0003								; Number of locals
0933			INIT_0930:
0933 e40a       |    |		Load	0x2,0xa
0934 0227       | '  |		Execute	Access,All_Reference
0935 01dd       |    |		Execute	Vector,First
0936 e005       |    |		Load	0x0,0x5
0937 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0938 e402       |    |		Load	0x2,0x2
0939 0227       | '  |		Execute	Access,All_Reference
093a 01dd       |    |		Execute	Vector,First
093b e005       |    |		Load	0x0,0x5
093c 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
093d			BODY_0930:
093d 00cf       |    |		Action	Mark_Auxiliary
093e e407       |    |		Load	0x2,0x7
093f 4801       |H   |		Short_Literal	0x1
0940 0263       | c  |		Execute	Discrete,Above_Bound
0941 7046       |pF  |		Jump_Nonzero	0x988
0942 e408       |    |		Load	0x2,0x8
0943 6823       |h#  |		Jump_Zero	0x967
0944 e602       |    |		Load	0x3,0x2
0945 e40a       |    |		Load	0x2,0xa
0946 0229       | )  |		Execute	Access,All_Read
0947 01d5       |    |		Execute	Vector,Field_Reference
0948 00d8       |    |		Load_Top	At_Offset_0
0949 e603       |    |		Load	0x3,0x3
094a 00d8       |    |		Load_Top	At_Offset_0
094b 0a27       | '  |		Execute_Immediate	Plus,0x27
094c 0af8       |    |		Execute_Immediate	Plus,-0x8
094d e402       |    |		Load	0x2,0x2
094e 0227       | '  |		Execute	Access,All_Reference
094f 01cf       |    |		Execute	Vector,Slice_Read
0950 4801       |H   |		Short_Literal	0x1
0951 4808       |H   |		Short_Literal	0x8
0952 e019       |    |		Load	0x0,0x19
0953 0334       | 4  |		Declare_Variable	Array,With_Constraint
0954 4808       |H   |		Short_Literal	0x8
0955 4801       |H   |		Short_Literal	0x1
0956 4800       |H   |		Short_Literal	0x0
0957 00d9       |    |		Load_Top	At_Offset_1
0958 e60a       |    |		Load	0x3,0xa
0959 01d6       |    |		Execute	Vector,Field_Write
095a 3ffb       |?   |		Loop_Increasing	0x956
095b 01cc       |    |		Execute	Vector,Catenate
095c e080       |    |		Load	0x0,0x80
095d a081       |    |		Store_Unchecked	0x0,0x81
095e 8068       | h  |		Call	0x0,0x68
095f 00d2       |    |		Pop_Control	Pop_Count_2
0960 e082       |    |		Load	0x0,0x82
0961 e602       |    |		Load	0x3,0x2
0962 e40a       |    |		Load	0x2,0xa
0963 0227       | '  |		Execute	Access,All_Reference
0964 01d5       |    |		Execute	Vector,Field_Reference
0965 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0966 780f       |x   |		Jump	0x976
0967 e602       |    |		Load	0x3,0x2
0968 e40a       |    |		Load	0x2,0xa
0969 0229       | )  |		Execute	Access,All_Read
096a 01d5       |    |		Execute	Vector,Field_Reference
096b 00d8       |    |		Load_Top	At_Offset_0
096c e603       |    |		Load	0x3,0x3
096d 00d8       |    |		Load_Top	At_Offset_0
096e 0a27       | '  |		Execute_Immediate	Plus,0x27
096f e402       |    |		Load	0x2,0x2
0970 0227       | '  |		Execute	Access,All_Reference
0971 01cf       |    |		Execute	Vector,Slice_Read
0972 e080       |    |		Load	0x0,0x80
0973 a081       |    |		Store_Unchecked	0x0,0x81
0974 8068       | h  |		Call	0x0,0x68
0975 00d2       |    |		Pop_Control	Pop_Count_2
0976 e409       |    |		Load	0x2,0x9
0977 e030       | 0  |		Load	0x0,0x30
0978 017f       |    |		Execute	Record,Equal
0979 7006       |p   |		Jump_Nonzero	0x980
097a e409       |    |		Load	0x2,0x9
097b e602       |    |		Load	0x3,0x2
097c e40a       |    |		Load	0x2,0xa
097d 0227       | '  |		Execute	Access,All_Reference
097e 01d5       |    |		Execute	Vector,Field_Reference
097f 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0980 e602       |    |		Load	0x3,0x2
0981 0a01       |    |		Execute_Immediate	Plus,0x1
0982 c602       |    |		Store	0x3,0x2
0983 00db       |    |		Load_Top	At_Offset_3
0984 0a28       | (  |		Execute_Immediate	Plus,0x28
0985 c603       |    |		Store	0x3,0x3
0986 00c8       |    |		Action	Pop_Auxiliary_Range
0987 3fba       |?   |		Loop_Increasing	0x942
0988 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0989 0000 0000  |    |		.BLANK	0000[0x7]
0990 ; --------------------------------------------------------------------------------------
0990 ; SUBPROGRAM
0990 ; --------------------------------------------------------------------------------------
0990 099b       |    |		.CONST	0x099b								; Address of begin
0991 0004       |    |		.CONST	0x0004								; Address of exception handler
0992 0004       |    |		.CONST	0x0004								; Number of locals
0993			INIT_0990:
0993 4801       |H   |		Short_Literal	0x1
0994 e402       |    |		Load	0x2,0x2
0995 e019       |    |		Load	0x0,0x19
0996 035b       | [  |		Declare_Type	Array,Constrained
0997 0337       | 7  |		Declare_Variable	Array
0998 e005       |    |		Load	0x0,0x5
0999 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
099a e00b       |    |		Load	0x0,0xb
099b			BODY_0990:
099b 00cf       |    |		Action	Mark_Auxiliary
099c e5fd       |    |		Load	0x2,-0x3
099d 01d9       |    |		Execute	Vector,Reverse_Bounds
099e 0263       | c  |		Execute	Discrete,Above_Bound
099f 702e       |p.  |		Jump_Nonzero	0x9ce
09a0 00d8       |    |		Load_Top	At_Offset_0
09a1 e5fd       |    |		Load	0x2,-0x3
09a2 01d7       |    |		Execute	Vector,Field_Read
09a3 a604       |    |		Store_Unchecked	0x3,0x4
09a4 00db       |    |		Load_Top	At_Offset_3
09a5 e00b       |    |		Load	0x0,0xb
09a6 022e       | .  |		Execute	Access,Not_Equal
09a7 681d       |h   |		Jump_Zero	0x9c5
09a8 e602       |    |		Load	0x3,0x2
09a9 e603       |    |		Load	0x3,0x3
09aa 00d8       |    |		Load_Top	At_Offset_0
09ab e604       |    |		Load	0x3,0x4
09ac 0227       | '  |		Execute	Access,All_Reference
09ad 01db       |    |		Execute	Vector,Length
09ae 0273       | s  |		Execute	Discrete,Plus
09af 0aff       |    |		Execute_Immediate	Plus,-0x1
09b0 00da       |    |		Load_Top	At_Offset_2
09b1 035b       | [  |		Declare_Type	Array,Constrained
09b2 00d0       |    |		Action	Swap_Control
09b3 01cd       |    |		Execute	Vector,Slice_Reference
09b4 00d8       |    |		Load_Top	At_Offset_0
09b5 00da       |    |		Load_Top	At_Offset_2
09b6 e5fd       |    |		Load	0x2,-0x3
09b7 01d7       |    |		Execute	Vector,Field_Read
09b8 0227       | '  |		Execute	Access,All_Reference
09b9 e083       |    |		Load	0x0,0x83
09ba e084       |    |		Load	0x0,0x84
09bb e085       |    |		Load	0x0,0x85
09bc a086       |    |		Store_Unchecked	0x0,0x86
09bd 802e       | .  |		Call	0x0,0x2e
09be 00d2       |    |		Pop_Control	Pop_Count_2
09bf e603       |    |		Load	0x3,0x3
09c0 e604       |    |		Load	0x3,0x4
09c1 0227       | '  |		Execute	Access,All_Reference
09c2 01db       |    |		Execute	Vector,Length
09c3 0273       | s  |		Execute	Discrete,Plus
09c4 c603       |    |		Store	0x3,0x3
09c5 4800       |H   |		Short_Literal	0x0
09c6 e603       |    |		Load	0x3,0x3
09c7 e602       |    |		Load	0x3,0x2
09c8 01d6       |    |		Execute	Vector,Field_Write
09c9 e603       |    |		Load	0x3,0x3
09ca 0a01       |    |		Execute_Immediate	Plus,0x1
09cb c603       |    |		Store	0x3,0x3
09cc 00c8       |    |		Action	Pop_Auxiliary_Range
09cd 3fd2       |?   |		Loop_Increasing	0x9a0
09ce 00ce       |    |		Action	Pop_Auxiliary
09cf 00da       |    |		Load_Top	At_Offset_2
09d0 4800       |H   |		Short_Literal	0x0
09d1 4808       |H   |		Short_Literal	0x8
09d2 e008       |    |		Load	0x0,0x8
09d3 e03d       | =  |		Load	0x0,0x3d
09d4 e5fe       |    |		Load	0x2,-0x2
09d5 e5ff       |    |		Load	0x2,-0x1
09d6 801a       |    |		Call	0x0,0x1a
09d7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09d8 ; --------------------------------------------------------------------------------------
09d8 ; SUBPROGRAM
09d8 ; --------------------------------------------------------------------------------------
09d8 09e2       |    |		.CONST	0x09e2								; Address of begin
09d9 0a27       | '  |		.CONST	0x0a27								; Address of exception handler
09da 0003       |    |		.CONST	0x0003								; Number of locals
09db			INIT_09d8:
09db e002       |    |		Load	0x0,0x2
09dc 0322       | "  |		Declare_Variable	Record
09dd e5f8       |    |		Load	0x2,-0x8
09de 00d9       |    |		Load_Top	At_Offset_1
09df 017d       | }  |		Execute	Record,Structure_Write
09e0 00e1       |    |		Load_Encached	Boolean_Cache
09e1 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
09e2			BODY_09d8:
09e2 00d9       |    |		Load_Top	At_Offset_1
09e3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
09e4 e00b       |    |		Load	0x0,0xb
09e5 022f       | /  |		Execute	Access,Equal
09e6 680a       |h   |		Jump_Zero	0x9f1
09e7 4801       |H   |		Short_Literal	0x1
09e8 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
09e9 4800       |H   |		Short_Literal	0x0
09ea 480c       |H   |		Short_Literal	0xc
09eb e01d       |    |		Load	0x0,0x1d
09ec 0334       | 4  |		Declare_Variable	Array,With_Constraint
09ed 5046       |PF  |		Indirect_Literal	Any,0xa34,{0x5245534f, 0x55524345}
09ee 8087       |    |		Call	0x0,0x87
09ef 00da       |    |		Load_Top	At_Offset_2
09f0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
09f1 00d9       |    |		Load_Top	At_Offset_1
09f2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
09f3 e00b       |    |		Load	0x0,0xb
09f4 022f       | /  |		Execute	Access,Equal
09f5 6804       |h   |		Jump_Zero	0x9fa
09f6 00d9       |    |		Load_Top	At_Offset_1
09f7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
09f8 00da       |    |		Load_Top	At_Offset_2
09f9 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
09fa 00d9       |    |		Load_Top	At_Offset_1
09fb e015       |    |		Load	0x0,0x15
09fc 017f       |    |		Execute	Record,Equal
09fd 6814       |h   |		Jump_Zero	0xa12
09fe e5fb       |    |		Load	0x2,-0x5
09ff 01db       |    |		Execute	Vector,Length
0a00 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0a01 6810       |h   |		Jump_Zero	0xa12
0a02 4801       |H   |		Short_Literal	0x1
0a03 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0a04 e5fb       |    |		Load	0x2,-0x5
0a05 01dd       |    |		Execute	Vector,First
0a06 e5fb       |    |		Load	0x2,-0x5
0a07 01d7       |    |		Execute	Vector,Field_Read
0a08 0227       | '  |		Execute	Access,All_Reference
0a09 8088       |    |		Call	0x0,0x88
0a0a e00b       |    |		Load	0x0,0xb
0a0b 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0a0c 00da       |    |		Load_Top	At_Offset_2
0a0d 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0a0e 00d9       |    |		Load_Top	At_Offset_1
0a0f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0a10 00da       |    |		Load_Top	At_Offset_2
0a11 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0a12 00d9       |    |		Load_Top	At_Offset_1
0a13 e015       |    |		Load	0x0,0x15
0a14 017e       | ~  |		Execute	Record,Not_Equal
0a15 6810       |h   |		Jump_Zero	0xa26
0a16 e007       |    |		Load	0x0,0x7
0a17 00da       |    |		Load_Top	At_Offset_2
0a18 e5fe       |    |		Load	0x2,-0x2
0a19 e5ff       |    |		Load	0x2,-0x1
0a1a 820e       |    |		Call	0x1,0xe
0a1b c404       |    |		Store	0x2,0x4
0a1c 00d8       |    |		Load_Top	At_Offset_0
0a1d 6808       |h   |		Jump_Zero	0xa26
0a1e 00d9       |    |		Load_Top	At_Offset_1
0a1f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0a20 e016       |    |		Load	0x0,0x16
0a21 e017       |    |		Load	0x0,0x17
0a22 a018       |    |		Store_Unchecked	0x0,0x18
0a23 8014       |    |		Call	0x0,0x14
0a24 00da       |    |		Load_Top	At_Offset_2
0a25 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0a26 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a27			TRAP_09d8:
0a27 0007       |    |		Action	Break_Optional
0a28 00d9       |    |		Load_Top	At_Offset_1
0a29 6808       |h   |		Jump_Zero	0xa32
0a2a 00da       |    |		Load_Top	At_Offset_2
0a2b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0a2c e016       |    |		Load	0x0,0x16
0a2d e017       |    |		Load	0x0,0x17
0a2e a018       |    |		Store_Unchecked	0x0,0x18
0a2f 8014       |    |		Call	0x0,0x14
0a30 00db       |    |		Load_Top	At_Offset_3
0a31 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0a32 00d8       |    |		Load_Top	At_Offset_0
0a33 0101       |    |		Execute	Exception,Reraise
0a34 5245 534f  |RESO|		.LITERAL	{0x5245534f, 0x55524345}
0a38 5f4e 414d  |_NAM|		.XXX[0x3]
0a3a 4500       |E   |
0a3b 0000 0000  |    |		.BLANK	0000[0x5]
0a40 ; --------------------------------------------------------------------------------------
0a40 ; Debug Table
0a40 ; --------------------------------------------------------------------------------------
0a40 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x683b,0x0000,0x0001,0x0021
0a46 000b 0aca  |    |		.DBG4T	0x000b,0x0aca,0x8000,0x0000
0a4a 0044 0ae8  | D  |		.DBG4T	0x0044,0x0ae8,0x8000,0x0000
0a4e 0083 0b06  |    |		.DBG4T	0x0083,0x0b06,0x0001,0x0000
0a52 015b 0b26  | [ &|		.DBG4T	0x015b,0x0b26,0x0001,0x0000
0a56 01bb 0b38  |   8|		.DBG4T	0x01bb,0x0b38,0x0001,0x0000
0a5a 025b 0b5a  | [ Z|		.DBG4T	0x025b,0x0b5a,0x0001,0x0000
0a5e 02b3 0b69  |   i|		.DBG4T	0x02b3,0x0b69,0x0001,0x0000
0a62 0363 0b97  | c  |		.DBG4T	0x0363,0x0b97,0x0001,0x0000
0a66 038b 0ba0  |    |		.DBG4T	0x038b,0x0ba0,0x0001,0x0000
0a6a 03c3 0bae  |    |		.DBG4T	0x03c3,0x0bae,0x0001,0x0000
0a6e 03eb 0bb8  |    |		.DBG4T	0x03eb,0x0bb8,0x0001,0x0000
0a72 0463 0bcc  | c  |		.DBG4T	0x0463,0x0bcc,0x0001,0x0000
0a76 0483 0bd2  |    |		.DBG4T	0x0483,0x0bd2,0x0001,0x0000
0a7a 0493 0bd5  |    |		.DBG4T	0x0493,0x0bd5,0x0001,0x0000
0a7e 04a3 0bd9  |    |		.DBG4T	0x04a3,0x0bd9,0x0001,0x0000
0a82 04b3 0bdc  |    |		.DBG4T	0x04b3,0x0bdc,0x0001,0x0000
0a86 04c3 0be0  |    |		.DBG4T	0x04c3,0x0be0,0x0001,0x0000
0a8a 04d3 0be3  |    |		.DBG4T	0x04d3,0x0be3,0x0001,0x0000
0a8e 04e3 0be6  |    |		.DBG4T	0x04e3,0x0be6,0x0001,0x0000
0a92 057b 0c07  | {  |		.DBG4T	0x057b,0x0c07,0x0001,0x0000
0a96 05cb 0c16  |    |		.DBG4T	0x05cb,0x0c16,0x0001,0x0000
0a9a 070b 0c2d  |   -|		.DBG4T	0x070b,0x0c2d,0x0001,0x0000
0a9e 077b 0c35  | { 5|		.DBG4T	0x077b,0x0c35,0x0001,0x0000
0aa2 07cb 0c49  |   I|		.DBG4T	0x07cb,0x0c49,0x0001,0x0000
0aa6 07fb 0c55  |   U|		.DBG4T	0x07fb,0x0c55,0x0001,0x0000
0aaa 0853 0c66  | S f|		.DBG4T	0x0853,0x0c66,0x0001,0x0000
0aae 0873 0c6c  | s l|		.DBG4T	0x0873,0x0c6c,0x0001,0x0000
0ab2 08f3 0c80  |    |		.DBG4T	0x08f3,0x0c80,0x0001,0x0000
0ab6 0913 0c86  |    |		.DBG4T	0x0913,0x0c86,0x0001,0x0000
0aba 0923 0c89  | #  |		.DBG4T	0x0923,0x0c89,0x0001,0x0000
0abe 0933 0c8d  | 3  |		.DBG4T	0x0933,0x0c8d,0x0004,0x0000
0ac2 0993 0c9a  |    |		.DBG4T	0x0993,0x0c9a,0x0004,0x0000
0ac6 09db 0ca7  |    |		.DBG4T	0x09db,0x0ca7,0x0004,0x0000
0aca ; --------------------------------------------------------------------------------------
0aca ; Debug chain
0aca ; --------------------------------------------------------------------------------------
0aca 001c 0000  |    |		.DBGLEN	0x001c,0x0000
0acc 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d,0x003f,0x0041
0ae8 ; --------------------------------------------------------------------------------------
0ae8 ; Debug chain
0ae8 ; --------------------------------------------------------------------------------------
0ae8 001c 0000  |    |		.DBGLEN	0x001c,0x0000
0aea 0044 0046  | D F|		.DBGLNO	0x0044,0x0046,0x0048,0x004a,0x004c,0x004e,0x0050,0x0052,0x0054,0x0056,0x0058,0x005a,0x005c,0x005e,0x0060,0x0062,0x0064,0x0066,0x0068,0x006a,0x006c,0x006e,0x0070,0x0072,0x0074,0x0076,0x0078,0x007a
0b06 ; --------------------------------------------------------------------------------------
0b06 ; Debug chain
0b06 ; --------------------------------------------------------------------------------------
0b06 0007 0017  |    |		.DBGLEN	0x0007,0x0017
0b08 0083 0085  |    |		.DBGLNO	0x0083,0x0085,0x0087,0x0089,0x008b,0x008d,0x008f,0x0091,0x00a5,0x00b0,0x00b5,0x00ba,0x00c1,0x00d1,0x00d7,0x00df,0x00e6,0x00f1,0x0105,0x010f,0x0121,0x0127,0x012a,0x012c,0x0130,0x0136,0x0139,0x013d,0x0145,0x014d
0b26 ; --------------------------------------------------------------------------------------
0b26 ; Debug chain
0b26 ; --------------------------------------------------------------------------------------
0b26 0004 000c  |    |		.DBGLEN	0x0004,0x000c
0b28 015b 0161  | [ a|		.DBGLNO	0x015b,0x0161,0x0167,0x016f,0x0172,0x0178,0x017b,0x0186,0x0189,0x018e,0x0194,0x0197,0x01a2,0x01a5,0x01a9,0x01b1
0b38 ; --------------------------------------------------------------------------------------
0b38 ; Debug chain
0b38 ; --------------------------------------------------------------------------------------
0b38 0007 0019  |    |		.DBGLEN	0x0007,0x0019
0b3a 01bb 01bd  |    |		.DBGLNO	0x01bb,0x01bd,0x01bf,0x01c1,0x01c3,0x01c5,0x01c7,0x01c9,0x01cb,0x01d2,0x01dc,0x01e0,0x01e2,0x01e3,0x01e5,0x01ea,0x01ec,0x0203,0x0206,0x0208,0x0209,0x0210,0x0216,0x0218,0x0219,0x021e,0x0229,0x022f,0x0231,0x0235,0x023b,0x0241
0b5a ; --------------------------------------------------------------------------------------
0b5a ; Debug chain
0b5a ; --------------------------------------------------------------------------------------
0b5a 0002 000b  |    |		.DBGLEN	0x0002,0x000b
0b5c 025b 025d  | [ ]|		.DBGLNO	0x025b,0x025d,0x0269,0x0270,0x027a,0x027e,0x0280,0x0281,0x0283,0x0288,0x028a,0x0292,0x029d
0b69 ; --------------------------------------------------------------------------------------
0b69 ; Debug chain
0b69 ; --------------------------------------------------------------------------------------
0b69 000c 0020  |    |		.DBGLEN	0x000c,0x0020
0b6b 02b3 02b5  |    |		.DBGLNO	0x02b3,0x02b5,0x02b7,0x02b9,0x02bb,0x02bd,0x02bf,0x02c1,0x02c6,0x02c8,0x02ca,0x02cc,0x02ce,0x02d0,0x02e4,0x02e7,0x02e9,0x02ea,0x02f4,0x02fa,0x02fc,0x02fd,0x0300,0x0302,0x0304,0x0307,0x030b,0x030f,0x0315,0x0317,0x0318,0x0320,0x0324,0x032a,0x0330,0x0332,0x0333,0x033b,0x033c,0x0342,0x0344,0x0348,0x034e,0x0354
0b97 ; --------------------------------------------------------------------------------------
0b97 ; Debug chain
0b97 ; --------------------------------------------------------------------------------------
0b97 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0b99 0363 0364  | c d|		.DBGLNO	0x0363,0x0364,0x036c,0x0370,0x0371,0x0379,0x0381
0ba0 ; --------------------------------------------------------------------------------------
0ba0 ; Debug chain
0ba0 ; --------------------------------------------------------------------------------------
0ba0 0002 000a  |    |		.DBGLEN	0x0002,0x000a
0ba2 038b 038f  |    |		.DBGLNO	0x038b,0x038f,0x0391,0x0399,0x039c,0x039e,0x039f,0x03ab,0x03b0,0x03b6,0x03ba,0x03bd
0bae ; --------------------------------------------------------------------------------------
0bae ; Debug chain
0bae ; --------------------------------------------------------------------------------------
0bae 0001 0007  |    |		.DBGLEN	0x0001,0x0007
0bb0 03c3 03c6  |    |		.DBGLNO	0x03c3,0x03c6,0x03c9,0x03cd,0x03d3,0x03dd,0x03e3,0x03e4
0bb8 ; --------------------------------------------------------------------------------------
0bb8 ; Debug chain
0bb8 ; --------------------------------------------------------------------------------------
0bb8 0007 000b  |    |		.DBGLEN	0x0007,0x000b
0bba 03eb 03ed  |    |		.DBGLNO	0x03eb,0x03ed,0x03ef,0x03f1,0x03f3,0x03f5,0x03f7,0x03f9,0x040d,0x0422,0x0425,0x0432,0x043d,0x043f,0x0441,0x0449,0x044f,0x0455
0bcc ; --------------------------------------------------------------------------------------
0bcc ; Debug chain
0bcc ; --------------------------------------------------------------------------------------
0bcc 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0bce 0463 046b  | c k|		.DBGLNO	0x0463,0x046b,0x0473,0x047b
0bd2 ; --------------------------------------------------------------------------------------
0bd2 ; Debug chain
0bd2 ; --------------------------------------------------------------------------------------
0bd2 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0bd4 0483       |    |		.DBGLNO	0x0483
0bd5 ; --------------------------------------------------------------------------------------
0bd5 ; Debug chain
0bd5 ; --------------------------------------------------------------------------------------
0bd5 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0bd7 0493 0498  |    |		.DBGLNO	0x0493,0x0498
0bd9 ; --------------------------------------------------------------------------------------
0bd9 ; Debug chain
0bd9 ; --------------------------------------------------------------------------------------
0bd9 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0bdb 04a3       |    |		.DBGLNO	0x04a3
0bdc ; --------------------------------------------------------------------------------------
0bdc ; Debug chain
0bdc ; --------------------------------------------------------------------------------------
0bdc 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0bde 04b3 04b8  |    |		.DBGLNO	0x04b3,0x04b8
0be0 ; --------------------------------------------------------------------------------------
0be0 ; Debug chain
0be0 ; --------------------------------------------------------------------------------------
0be0 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0be2 04c3       |    |		.DBGLNO	0x04c3
0be3 ; --------------------------------------------------------------------------------------
0be3 ; Debug chain
0be3 ; --------------------------------------------------------------------------------------
0be3 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0be5 04d3       |    |		.DBGLNO	0x04d3
0be6 ; --------------------------------------------------------------------------------------
0be6 ; Debug chain
0be6 ; --------------------------------------------------------------------------------------
0be6 0007 0018  |    |		.DBGLEN	0x0007,0x0018
0be8 04e3 04e5  |    |		.DBGLNO	0x04e3,0x04e5,0x04e7,0x04e9,0x04eb,0x04ed,0x04ef,0x04f1,0x04f3,0x04fa,0x0504,0x0508,0x050a,0x050b,0x050d,0x0512,0x0514,0x052b,0x052e,0x0530,0x0531,0x0538,0x053e,0x0540,0x0541,0x0546,0x0551,0x0557,0x055b,0x0561,0x0567
0c07 ; --------------------------------------------------------------------------------------
0c07 ; Debug chain
0c07 ; --------------------------------------------------------------------------------------
0c07 0002 000b  |    |		.DBGLEN	0x0002,0x000b
0c09 057b 057d  | { }|		.DBGLNO	0x057b,0x057d,0x0589,0x0590,0x059a,0x059e,0x05a0,0x05a1,0x05a3,0x05a8,0x05aa,0x05b2,0x05bd
0c16 ; --------------------------------------------------------------------------------------
0c16 ; Debug chain
0c16 ; --------------------------------------------------------------------------------------
0c16 0008 000d  |    |		.DBGLEN	0x0008,0x000d
0c18 05cb 05cf  |    |		.DBGLNO	0x05cb,0x05cf,0x05d1,0x05d3,0x05d5,0x05d7,0x05d9,0x05db,0x05e2,0x0602,0x0618,0x061e,0x0621,0x0623,0x0624,0x062a,0x063b,0x0674,0x0687,0x06b7,0x0703
0c2d ; --------------------------------------------------------------------------------------
0c2d ; Debug chain
0c2d ; --------------------------------------------------------------------------------------
0c2d 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0c2f 070b 070f  |    |		.DBGLNO	0x070b,0x070f,0x0718,0x0764,0x076a,0x0772
0c35 ; --------------------------------------------------------------------------------------
0c35 ; Debug chain
0c35 ; --------------------------------------------------------------------------------------
0c35 0003 000f  |    |		.DBGLEN	0x0003,0x000f
0c37 077b 077f  | {  |		.DBGLNO	0x077b,0x077f,0x0780,0x0783,0x0787,0x078d,0x0791,0x0797,0x079a,0x07a0,0x07a4,0x07aa,0x07ad,0x07b1,0x07b7,0x07bb,0x07c1,0x07c2
0c49 ; --------------------------------------------------------------------------------------
0c49 ; Debug chain
0c49 ; --------------------------------------------------------------------------------------
0c49 0002 0008  |    |		.DBGLEN	0x0002,0x0008
0c4b 07cb 07cf  |    |		.DBGLNO	0x07cb,0x07cf,0x07d3,0x07d7,0x07db,0x07e6,0x07e9,0x07ed,0x07f0,0x07f3
0c55 ; --------------------------------------------------------------------------------------
0c55 ; Debug chain
0c55 ; --------------------------------------------------------------------------------------
0c55 0006 0009  |    |		.DBGLEN	0x0006,0x0009
0c57 07fb 07fd  |    |		.DBGLNO	0x07fb,0x07fd,0x07ff,0x0801,0x0803,0x0805,0x0807,0x0822,0x0831,0x0838,0x083b,0x083e,0x0840,0x0848,0x084e
0c66 ; --------------------------------------------------------------------------------------
0c66 ; Debug chain
0c66 ; --------------------------------------------------------------------------------------
0c66 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0c68 0853 085c  | S \|		.DBGLNO	0x0853,0x085c,0x0862,0x086a
0c6c ; --------------------------------------------------------------------------------------
0c6c ; Debug chain
0c6c ; --------------------------------------------------------------------------------------
0c6c 0006 000c  |    |		.DBGLEN	0x0006,0x000c
0c6e 0873 0875  | s u|		.DBGLNO	0x0873,0x0875,0x0877,0x0879,0x087b,0x087d,0x087f,0x0893,0x08a3,0x08a6,0x08a8,0x08a9,0x08b0,0x08c4,0x08d9,0x08df,0x08e3,0x08e9
0c80 ; --------------------------------------------------------------------------------------
0c80 ; Debug chain
0c80 ; --------------------------------------------------------------------------------------
0c80 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0c82 08f3 08f8  |    |		.DBGLNO	0x08f3,0x08f8,0x08fe,0x0906
0c86 ; --------------------------------------------------------------------------------------
0c86 ; Debug chain
0c86 ; --------------------------------------------------------------------------------------
0c86 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0c88 0913       |    |		.DBGLNO	0x0913
0c89 ; --------------------------------------------------------------------------------------
0c89 ; Debug chain
0c89 ; --------------------------------------------------------------------------------------
0c89 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0c8b 0923 0928  | # (|		.DBGLNO	0x0923,0x0928
0c8d ; --------------------------------------------------------------------------------------
0c8d ; Debug chain
0c8d ; --------------------------------------------------------------------------------------
0c8d 0002 0009  |    |		.DBGLEN	0x0002,0x0009
0c8f 0933 0938  | 3 8|		.DBGLNO	0x0933,0x0938,0x093e,0x0942,0x0944,0x0960,0x0967,0x0976,0x097a,0x0980,0x0983
0c9a ; --------------------------------------------------------------------------------------
0c9a ; Debug chain
0c9a ; --------------------------------------------------------------------------------------
0c9a 0003 0008  |    |		.DBGLEN	0x0003,0x0008
0c9c 0993 0998  |    |		.DBGLNO	0x0993,0x0998,0x099a,0x099c,0x09a0,0x09a4,0x09a8,0x09bf,0x09c5,0x09c9,0x09cf
0ca7 ; --------------------------------------------------------------------------------------
0ca7 ; Debug chain
0ca7 ; --------------------------------------------------------------------------------------
0ca7 0002 0011  |    |		.DBGLEN	0x0002,0x0011
0ca9 09db 09e0  |    |		.DBGLNO	0x09db,0x09e0,0x09e2,0x09e7,0x09e9,0x09f1,0x09f6,0x09fa,0x09fe,0x0a02,0x0a04,0x0a0e,0x0a12,0x0a16,0x0a1c,0x0a1e,0x0a28,0x0a2a,0x0a32
0cbc 0000 0000  |    |		.BLANK	0000[0x144]