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

⟦e655dd552⟧

    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 0990       |    |		.CONST	0x0990								; 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 0058       | X  |		.CONST	0x0058								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001f       |    |		.CONST	0x001f								; Number of locals
000b			INIT_0008:
000b 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated
000d 029a 0083  |    |		Declare_Subprogram	INIT_0080,For_Outer_Call,Visible,Unelaborated
000f 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated
0011 029a 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Outer_Call,Visible,Unelaborated
0013 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated
0015 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated
0017 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated
0019 029a 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Outer_Call,Visible,Unelaborated
001b 029a 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call,Visible,Unelaborated
001d 029a 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Outer_Call,Visible,Unelaborated
001f 029a 0203  |    |		Declare_Subprogram	INIT_0200,For_Outer_Call,Visible,Unelaborated
0021 029a 021b  |    |		Declare_Subprogram	INIT_0218,For_Outer_Call,Visible,Unelaborated
0023 029a 0233  |   3|		Declare_Subprogram	INIT_0230,For_Outer_Call,Visible,Unelaborated
0025 029a 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call,Visible,Unelaborated
0027 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated
0029 029a 026b  |   k|		Declare_Subprogram	INIT_0268,For_Outer_Call,Visible,Unelaborated
002b 029a 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call,Visible,Unelaborated
002d 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated
002f 029a 029b  |    |		Declare_Subprogram	INIT_0298,For_Outer_Call,Visible,Unelaborated
0031 00bf       |    |		Action	Accept_Activation
0032 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0033 00c7       |    |		Action	Elaborate_Subprogram
0034 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0035 00c7       |    |		Action	Elaborate_Subprogram
0036 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0037 00c7       |    |		Action	Elaborate_Subprogram
0038 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0039 00c7       |    |		Action	Elaborate_Subprogram
003a 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
003b 00c7       |    |		Action	Elaborate_Subprogram
003c 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
003d 00c7       |    |		Action	Elaborate_Subprogram
003e 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
003f 00c7       |    |		Action	Elaborate_Subprogram
0040 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0041 00c7       |    |		Action	Elaborate_Subprogram
0042 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0043 00c7       |    |		Action	Elaborate_Subprogram
0044 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0045 00c7       |    |		Action	Elaborate_Subprogram
0046 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0047 00c7       |    |		Action	Elaborate_Subprogram
0048 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0049 00c7       |    |		Action	Elaborate_Subprogram
004a 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
004d 00c7       |    |		Action	Elaborate_Subprogram
004e 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
004f 00c7       |    |		Action	Elaborate_Subprogram
0050 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
0051 00c7       |    |		Action	Elaborate_Subprogram
0052 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0053 00c7       |    |		Action	Elaborate_Subprogram
0054 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0055 00c7       |    |		Action	Elaborate_Subprogram
0056 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
0057 00c7       |    |		Action	Elaborate_Subprogram
0058			BODY_0008:
0058 e002       |    |		Load	0x0,0x2
0059 012c       | ,  |		Execute	Any,Size
005a 4820       |H   |		Short_Literal	0x20
005b 026f       | o  |		Execute	Discrete,Remainder
005c 6802       |h   |		Jump_Zero	0x5f
005d e003       |    |		Load	0x0,0x3
005e 0257       | W  |		Execute	Discrete,Raise
005f 00bc       |    |		Action	Signal_Activated
0060 00bb       |    |		Action	Signal_Completion
0061 0000 0000  |    |		.BLANK	0000[0x7]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 0072       | r  |		.CONST	0x0072								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0004       |    |		.CONST	0x0004								; Number of locals
006b			INIT_0068:
006b e004       |    |		Load	0x0,0x4
006c 02ff       |    |		Declare_Variable	Variant_Record
006d 00d8       |    |		Load_Top	At_Offset_0
006e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
006f e005       |    |		Load	0x0,0x5
0070 029f 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Call
0072			BODY_0068:
0072 e5ff       |    |		Load	0x2,-0x1
0073 8006       |    |		Call	0x0,0x6
0074 8404       |    |		Call	0x2,0x4
0075 e5ff       |    |		Load	0x2,-0x1
0076 8007       |    |		Call	0x0,0x7
0077 e5ff       |    |		Load	0x2,-0x1
0078 8008       |    |		Call	0x0,0x8
0079 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
007a 0000 0000  |    |		.BLANK	0000[0x6]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 008b       |    |		.CONST	0x008b								; Address of begin
0081 0004       |    |		.CONST	0x0004								; Address of exception handler
0082 0004       |    |		.CONST	0x0004								; Number of locals
0083			INIT_0080:
0083 e005       |    |		Load	0x0,0x5
0084 0007       |    |		Action	Break_Optional
0085 e004       |    |		Load	0x0,0x4
0086 02ff       |    |		Declare_Variable	Variant_Record
0087 00d8       |    |		Load_Top	At_Offset_0
0088 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0089 029f 0303  |    |		Declare_Subprogram	INIT_0300,For_Call
008b			BODY_0080:
008b e5ff       |    |		Load	0x2,-0x1
008c 8006       |    |		Call	0x0,0x6
008d 8404       |    |		Call	0x2,0x4
008e e5ff       |    |		Load	0x2,-0x1
008f 8007       |    |		Call	0x0,0x7
0090 e5ff       |    |		Load	0x2,-0x1
0091 8008       |    |		Call	0x0,0x8
0092 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0093 0000 0000  |    |		.BLANK	0000[0x5]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a3       |    |		.CONST	0x00a3								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0004       |    |		.CONST	0x0004								; Number of locals
009b			INIT_0098:
009b e005       |    |		Load	0x0,0x5
009c 0007       |    |		Action	Break_Optional
009d e004       |    |		Load	0x0,0x4
009e 02ff       |    |		Declare_Variable	Variant_Record
009f 00d8       |    |		Load_Top	At_Offset_0
00a0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00a1 029f 0383  |    |		Declare_Subprogram	INIT_0380,For_Call
00a3			BODY_0098:
00a3 e5ff       |    |		Load	0x2,-0x1
00a4 8006       |    |		Call	0x0,0x6
00a5 8404       |    |		Call	0x2,0x4
00a6 e5ff       |    |		Load	0x2,-0x1
00a7 8007       |    |		Call	0x0,0x7
00a8 e5ff       |    |		Load	0x2,-0x1
00a9 8008       |    |		Call	0x0,0x8
00aa 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
00ab 0000 0000  |    |		.BLANK	0000[0x5]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00bc       |    |		.CONST	0x00bc								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0005       |    |		.CONST	0x0005								; Number of locals
00b3			INIT_00b0:
00b3 e009       |    |		Load	0x0,0x9
00b4 0007       |    |		Action	Break_Optional
00b5 e004       |    |		Load	0x0,0x4
00b6 02ff       |    |		Declare_Variable	Variant_Record
00b7 00d8       |    |		Load_Top	At_Offset_0
00b8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00b9 e005       |    |		Load	0x0,0x5
00ba 029f 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Call
00bc			BODY_00b0:
00bc e5ff       |    |		Load	0x2,-0x1
00bd 8006       |    |		Call	0x0,0x6
00be 8405       |    |		Call	0x2,0x5
00bf e5ff       |    |		Load	0x2,-0x1
00c0 8007       |    |		Call	0x0,0x7
00c1 e5ff       |    |		Load	0x2,-0x1
00c2 8008       |    |		Call	0x0,0x8
00c3 4801       |H   |		Short_Literal	0x1
00c4 a5fa       |    |		Store_Unchecked	0x2,-0x6
00c5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00c6 0000 0000  |    |		.XXX[0x2]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00d1       |    |		.CONST	0x00d1								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0003       |    |		.CONST	0x0003								; Number of locals
00cb			INIT_00c8:
00cb e5fd       |    |		Load	0x2,-0x3
00cc 01db       |    |		Execute	Vector,Length
00cd e00a       |    |		Load	0x0,0xa
00ce 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
00cf 029f 046b  |   k|		Declare_Subprogram	INIT_0468,For_Call
00d1			BODY_00c8:
00d1 e5ff       |    |		Load	0x2,-0x1
00d2 8006       |    |		Call	0x0,0x6
00d3 8403       |    |		Call	0x2,0x3
00d4 e5ff       |    |		Load	0x2,-0x1
00d5 8007       |    |		Call	0x0,0x7
00d6 e5ff       |    |		Load	0x2,-0x1
00d7 8008       |    |		Call	0x0,0x8
00d8 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
00d9 0000 0000  |    |		.BLANK	0000[0x7]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00ec       |    |		.CONST	0x00ec								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0005       |    |		.CONST	0x0005								; Number of locals
00e3			INIT_00e0:
00e3 e00a       |    |		Load	0x0,0xa
00e4 0007       |    |		Action	Break_Optional
00e5 e004       |    |		Load	0x0,0x4
00e6 02ff       |    |		Declare_Variable	Variant_Record
00e7 00d8       |    |		Load_Top	At_Offset_0
00e8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00e9 e005       |    |		Load	0x0,0x5
00ea 029f 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Call
00ec			BODY_00e0:
00ec e5fd       |    |		Load	0x2,-0x3
00ed 01db       |    |		Execute	Vector,Length
00ee c402       |    |		Store	0x2,0x2
00ef e5ff       |    |		Load	0x2,-0x1
00f0 8006       |    |		Call	0x0,0x6
00f1 8405       |    |		Call	0x2,0x5
00f2 4801       |H   |		Short_Literal	0x1
00f3 a5fa       |    |		Store_Unchecked	0x2,-0x6
00f4 e5ff       |    |		Load	0x2,-0x1
00f5 8007       |    |		Call	0x0,0x7
00f6 e5ff       |    |		Load	0x2,-0x1
00f7 8008       |    |		Call	0x0,0x8
00f8 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00f9 0000 0000  |    |		.BLANK	0000[0x7]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 010b       |    |		.CONST	0x010b								; Address of begin
0101 0004       |    |		.CONST	0x0004								; Address of exception handler
0102 0008       |    |		.CONST	0x0008								; Number of locals
0103			INIT_0100:
0103 e00a       |    |		Load	0x0,0xa
0104 03e9       |    |		Declare_Variable	Discrete,Duplicate
0105 e009       |    |		Load	0x0,0x9
0106 03e9       |    |		Declare_Variable	Discrete,Duplicate
0107 03e9       |    |		Declare_Variable	Discrete,Duplicate
0108 e00b       |    |		Load	0x0,0xb
0109 029f 052b  |   +|		Declare_Subprogram	INIT_0528,For_Call
010b			BODY_0100:
010b e5fd       |    |		Load	0x2,-0x3
010c 01db       |    |		Execute	Vector,Length
010d 7005       |p   |		Jump_Nonzero	0x113
010e e00c       |    |		Load	0x0,0xc
010f e5fc       |    |		Load	0x2,-0x4
0110 017d       | }  |		Execute	Record,Structure_Write
0111 4800       |H   |		Short_Literal	0x0
0112 a5fb       |    |		Store_Unchecked	0x2,-0x5
0113 e5fd       |    |		Load	0x2,-0x3
0114 01db       |    |		Execute	Vector,Length
0115 c403       |    |		Store	0x2,0x3
0116 e5fd       |    |		Load	0x2,-0x3
0117 01dd       |    |		Execute	Vector,First
0118 e5fd       |    |		Load	0x2,-0x3
0119 01d7       |    |		Execute	Vector,Field_Read
011a 0e23       | #  |		Execute_Immediate	Not_Equal,0x23
011b 6801       |h   |		Jump_Zero	0x11d
011c 8408       |    |		Call	0x2,0x8
011d e403       |    |		Load	0x2,0x3
011e 0aff       |    |		Execute_Immediate	Plus,-0x1
011f c403       |    |		Store	0x2,0x3
0120 e403       |    |		Load	0x2,0x3
0121 0e03       |    |		Execute_Immediate	Not_Equal,0x3
0122 680c       |h   |		Jump_Zero	0x12f
0123 e403       |    |		Load	0x2,0x3
0124 0e06       |    |		Execute_Immediate	Not_Equal,0x6
0125 6809       |h   |		Jump_Zero	0x12f
0126 e403       |    |		Load	0x2,0x3
0127 0e09       |    |		Execute_Immediate	Not_Equal,0x9
0128 6806       |h   |		Jump_Zero	0x12f
0129 e403       |    |		Load	0x2,0x3
012a 0e0c       |    |		Execute_Immediate	Not_Equal,0xc
012b 6803       |h   |		Jump_Zero	0x12f
012c 4800       |H   |		Short_Literal	0x0
012d a5fb       |    |		Store_Unchecked	0x2,-0x5
012e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
012f e403       |    |		Load	0x2,0x3
0130 4803       |H   |		Short_Literal	0x3
0131 0270       | p  |		Execute	Discrete,Divide
0132 c403       |    |		Store	0x2,0x3
0133 4800       |H   |		Short_Literal	0x0
0134 a404       |    |		Store_Unchecked	0x2,0x4
0135 4800       |H   |		Short_Literal	0x0
0136 a405       |    |		Store_Unchecked	0x2,0x5
0137 4800       |H   |		Short_Literal	0x0
0138 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0139 00cf       |    |		Action	Mark_Auxiliary
013a 0007       |    |		Action	Break_Optional
013b e405       |    |		Load	0x2,0x5
013c a404       |    |		Store_Unchecked	0x2,0x4
013d 00db       |    |		Load_Top	At_Offset_3
013e a405       |    |		Store_Unchecked	0x2,0x5
013f 4800       |H   |		Short_Literal	0x0
0140 a406       |    |		Store_Unchecked	0x2,0x6
0141 e5fd       |    |		Load	0x2,-0x3
0142 01dd       |    |		Execute	Vector,First
0143 0a01       |    |		Execute_Immediate	Plus,0x1
0144 c402       |    |		Store	0x2,0x2
0145 00cf       |    |		Action	Mark_Auxiliary
0146 4801       |H   |		Short_Literal	0x1
0147 e403       |    |		Load	0x2,0x3
0148 0264       | d  |		Execute	Discrete,Below_Bound
0149 7033       |p3  |		Jump_Nonzero	0x17d
014a e402       |    |		Load	0x2,0x2
014b e5fd       |    |		Load	0x2,-0x3
014c 01d7       |    |		Execute	Vector,Field_Read
014d a407       |    |		Store_Unchecked	0x2,0x7
014e e402       |    |		Load	0x2,0x2
014f 0a01       |    |		Execute_Immediate	Plus,0x1
0150 c402       |    |		Store	0x2,0x2
0151 e406       |    |		Load	0x2,0x6
0152 0904       |    |		Execute_Immediate	Binary_Scale,0x4
0153 c406       |    |		Store	0x2,0x6
0154 e407       |    |		Load	0x2,0x7
0155 0c30       | 0  |		Execute_Immediate	Greater_Equal,0x30
0156 6809       |h   |		Jump_Zero	0x160
0157 e407       |    |		Load	0x2,0x7
0158 0d3a       | :  |		Execute_Immediate	Less,0x3a
0159 6806       |h   |		Jump_Zero	0x160
015a e406       |    |		Load	0x2,0x6
015b e407       |    |		Load	0x2,0x7
015c 0273       | s  |		Execute	Discrete,Plus
015d 0ad0       |    |		Execute_Immediate	Plus,-0x30
015e c406       |    |		Store	0x2,0x6
015f 781b       |x   |		Jump	0x17b
0160 e407       |    |		Load	0x2,0x7
0161 0c41       | A  |		Execute_Immediate	Greater_Equal,0x41
0162 6809       |h   |		Jump_Zero	0x16c
0163 e407       |    |		Load	0x2,0x7
0164 0d47       | G  |		Execute_Immediate	Less,0x47
0165 6806       |h   |		Jump_Zero	0x16c
0166 e406       |    |		Load	0x2,0x6
0167 e407       |    |		Load	0x2,0x7
0168 0273       | s  |		Execute	Discrete,Plus
0169 0ac9       |    |		Execute_Immediate	Plus,-0x37
016a c406       |    |		Store	0x2,0x6
016b 780f       |x   |		Jump	0x17b
016c e407       |    |		Load	0x2,0x7
016d 0c61       | a  |		Execute_Immediate	Greater_Equal,0x61
016e 6809       |h   |		Jump_Zero	0x178
016f e407       |    |		Load	0x2,0x7
0170 0d67       | g  |		Execute_Immediate	Less,0x67
0171 6806       |h   |		Jump_Zero	0x178
0172 e406       |    |		Load	0x2,0x6
0173 e407       |    |		Load	0x2,0x7
0174 0273       | s  |		Execute	Discrete,Plus
0175 0aa9       |    |		Execute_Immediate	Plus,-0x57
0176 c406       |    |		Store	0x2,0x6
0177 7803       |x   |		Jump	0x17b
0178 4800       |H   |		Short_Literal	0x0
0179 a5fb       |    |		Store_Unchecked	0x2,-0x5
017a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
017b 00c8       |    |		Action	Pop_Auxiliary_Range
017c 37cd       |7   |		Loop_Decreasing	0x14a
017d 00ce       |    |		Action	Pop_Auxiliary
017e e402       |    |		Load	0x2,0x2
017f e5fd       |    |		Load	0x2,-0x3
0180 01d7       |    |		Execute	Vector,Field_Read
0181 7001       |p   |		Jump_Nonzero	0x183
0182 7802       |x   |		Jump	0x185
0183 00c9       |    |		Action	Pop_Auxiliary_Loop
0184 7fb6       |    |		Jump	0x13b
0185 00ce       |    |		Action	Pop_Auxiliary
0186 e403       |    |		Load	0x2,0x3
0187 0902       |    |		Execute_Immediate	Binary_Scale,0x2
0188 c403       |    |		Store	0x2,0x3
0189 4810       |H   |		Short_Literal	0x10
018a e403       |    |		Load	0x2,0x3
018b 0272       | r  |		Execute	Discrete,Minus
018c c403       |    |		Store	0x2,0x3
018d e404       |    |		Load	0x2,0x4
018e 4801       |H   |		Short_Literal	0x1
018f e403       |    |		Load	0x2,0x3
0190 0253       | S  |		Execute	Discrete,Binary_Scale
0191 0271       | q  |		Execute	Discrete,Times
0192 e5fc       |    |		Load	0x2,-0x4
0193 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0194 00db       |    |		Load_Top	At_Offset_3
0195 4801       |H   |		Short_Literal	0x1
0196 e403       |    |		Load	0x2,0x3
0197 0253       | S  |		Execute	Discrete,Binary_Scale
0198 0271       | q  |		Execute	Discrete,Times
0199 e5fc       |    |		Load	0x2,-0x4
019a 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
019b 00da       |    |		Load_Top	At_Offset_2
019c 4801       |H   |		Short_Literal	0x1
019d e403       |    |		Load	0x2,0x3
019e 0253       | S  |		Execute	Discrete,Binary_Scale
019f 0271       | q  |		Execute	Discrete,Times
01a0 e5fc       |    |		Load	0x2,-0x4
01a1 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
01a2 e00d       |    |		Load	0x0,0xd
01a3 0337       | 7  |		Declare_Variable	Array
01a4 4801       |H   |		Short_Literal	0x1
01a5 4807       |H   |		Short_Literal	0x7
01a6 00da       |    |		Load_Top	At_Offset_2
01a7 01d6       |    |		Execute	Vector,Field_Write
01a8 4801       |H   |		Short_Literal	0x1
01a9 4806       |H   |		Short_Literal	0x6
01aa 00da       |    |		Load_Top	At_Offset_2
01ab 01d6       |    |		Execute	Vector,Field_Write
01ac 4801       |H   |		Short_Literal	0x1
01ad 4805       |H   |		Short_Literal	0x5
01ae 00da       |    |		Load_Top	At_Offset_2
01af 01d6       |    |		Execute	Vector,Field_Write
01b0 4804       |H   |		Short_Literal	0x4
01b1 4800       |H   |		Short_Literal	0x0
01b2 4800       |H   |		Short_Literal	0x0
01b3 00d9       |    |		Load_Top	At_Offset_1
01b4 e409       |    |		Load	0x2,0x9
01b5 01d6       |    |		Execute	Vector,Field_Write
01b6 3ffb       |?   |		Loop_Increasing	0x1b2
01b7 e00d       |    |		Load	0x0,0xd
01b8 01c3       |    |		Execute	Vector,Check_In_Type
01b9 e5fc       |    |		Load	0x2,-0x4
01ba 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
01bb 4801       |H   |		Short_Literal	0x1
01bc a5fb       |    |		Store_Unchecked	0x2,-0x5
01bd 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01be 0000 0000  |    |		.XXX[0x2]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01cc       |    |		.CONST	0x01cc								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0005       |    |		.CONST	0x0005								; Number of locals
01c3			INIT_01c0:
01c3 e002       |    |		Load	0x0,0x2
01c4 0322       | "  |		Declare_Variable	Record
01c5 e004       |    |		Load	0x0,0x4
01c6 02ff       |    |		Declare_Variable	Variant_Record
01c7 00d8       |    |		Load_Top	At_Offset_0
01c8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01c9 e005       |    |		Load	0x0,0x5
01ca 029f 0543  |   C|		Declare_Subprogram	INIT_0540,For_Call
01cc			BODY_01c0:
01cc e5ff       |    |		Load	0x2,-0x1
01cd 8006       |    |		Call	0x0,0x6
01ce 8405       |    |		Call	0x2,0x5
01cf e5ff       |    |		Load	0x2,-0x1
01d0 8007       |    |		Call	0x0,0x7
01d1 e5ff       |    |		Load	0x2,-0x1
01d2 8008       |    |		Call	0x0,0x8
01d3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01d4 0000 0000  |    |		.BLANK	0000[0x4]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01e6       |    |		.CONST	0x01e6								; Address of begin
01d9 0004       |    |		.CONST	0x0004								; Address of exception handler
01da 0005       |    |		.CONST	0x0005								; Number of locals
01db			INIT_01d8:
01db e004       |    |		Load	0x0,0x4
01dc 02ff       |    |		Declare_Variable	Variant_Record
01dd 00d8       |    |		Load_Top	At_Offset_0
01de 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01df e5fd       |    |		Load	0x2,-0x3
01e0 01db       |    |		Execute	Vector,Length
01e1 e00a       |    |		Load	0x0,0xa
01e2 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
01e3 e005       |    |		Load	0x0,0x5
01e4 029f 05b3  |    |		Declare_Subprogram	INIT_05b0,For_Call
01e6			BODY_01d8:
01e6 e5ff       |    |		Load	0x2,-0x1
01e7 8006       |    |		Call	0x0,0x6
01e8 8405       |    |		Call	0x2,0x5
01e9 e5ff       |    |		Load	0x2,-0x1
01ea 8007       |    |		Call	0x0,0x7
01eb e5ff       |    |		Load	0x2,-0x1
01ec 8008       |    |		Call	0x0,0x8
01ed 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01ee 0000 0000  |    |		.XXX[0x2]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f7       |    |		.CONST	0x01f7								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0003       |    |		.CONST	0x0003								; Number of locals
01f3			INIT_01f0:
01f3 e00e       |    |		Load	0x0,0xe
01f4 0322       | "  |		Declare_Variable	Record
01f5 029f 061b  |    |		Declare_Subprogram	INIT_0618,For_Call
01f7			BODY_01f0:
01f7 e5ff       |    |		Load	0x2,-0x1
01f8 8006       |    |		Call	0x0,0x6
01f9 8403       |    |		Call	0x2,0x3
01fa e5ff       |    |		Load	0x2,-0x1
01fb 8007       |    |		Call	0x0,0x7
01fc e5ff       |    |		Load	0x2,-0x1
01fd 8008       |    |		Call	0x0,0x8
01fe 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01ff 0000       |    |		.XXX[0x1]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 020b       |    |		.CONST	0x020b								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0004       |    |		.CONST	0x0004								; Number of locals
0203			INIT_0200:
0203 e5fd       |    |		Load	0x2,-0x3
0204 01db       |    |		Execute	Vector,Length
0205 e00a       |    |		Load	0x0,0xa
0206 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0207 e00e       |    |		Load	0x0,0xe
0208 0322       | "  |		Declare_Variable	Record
0209 029f 066b  |   k|		Declare_Subprogram	INIT_0668,For_Call
020b			BODY_0200:
020b e5ff       |    |		Load	0x2,-0x1
020c 8006       |    |		Call	0x0,0x6
020d 8404       |    |		Call	0x2,0x4
020e e5ff       |    |		Load	0x2,-0x1
020f 8007       |    |		Call	0x0,0x7
0210 e5ff       |    |		Load	0x2,-0x1
0211 8008       |    |		Call	0x0,0x8
0212 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0213 0000 0000  |    |		.BLANK	0000[0x5]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0221       | !  |		.CONST	0x0221								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0003       |    |		.CONST	0x0003								; Number of locals
021b			INIT_0218:
021b e5fd       |    |		Load	0x2,-0x3
021c 01db       |    |		Execute	Vector,Length
021d e009       |    |		Load	0x0,0x9
021e 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
021f 029f 06d3  |    |		Declare_Subprogram	INIT_06d0,For_Call
0221			BODY_0218:
0221 e5ff       |    |		Load	0x2,-0x1
0222 8006       |    |		Call	0x0,0x6
0223 8403       |    |		Call	0x2,0x3
0224 e5ff       |    |		Load	0x2,-0x1
0225 8007       |    |		Call	0x0,0x7
0226 e5ff       |    |		Load	0x2,-0x1
0227 8008       |    |		Call	0x0,0x8
0228 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0229 0000 0000  |    |		.BLANK	0000[0x7]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0237       | 7  |		.CONST	0x0237								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0003       |    |		.CONST	0x0003								; Number of locals
0233			INIT_0230:
0233 e00f       |    |		Load	0x0,0xf
0234 0322       | "  |		Declare_Variable	Record
0235 029f 0713  |    |		Declare_Subprogram	INIT_0710,For_Call
0237			BODY_0230:
0237 e5ff       |    |		Load	0x2,-0x1
0238 8006       |    |		Call	0x0,0x6
0239 8403       |    |		Call	0x2,0x3
023a e5ff       |    |		Load	0x2,-0x1
023b 8007       |    |		Call	0x0,0x7
023c e5ff       |    |		Load	0x2,-0x1
023d 8008       |    |		Call	0x0,0x8
023e 00d9       |    |		Load_Top	At_Offset_1
023f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 024c       | L  |		.CONST	0x024c								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0004       |    |		.CONST	0x0004								; Number of locals
0243			INIT_0240:
0243 e00f       |    |		Load	0x0,0xf
0244 0322       | "  |		Declare_Variable	Record
0245 e010       |    |		Load	0x0,0x10
0246 0322       | "  |		Declare_Variable	Record
0247 e011       |    |		Load	0x0,0x11
0248 00d9       |    |		Load_Top	At_Offset_1
0249 017d       | }  |		Execute	Record,Structure_Write
024a 029f 0743  |   C|		Declare_Subprogram	INIT_0740,For_Call
024c			BODY_0240:
024c e5ff       |    |		Load	0x2,-0x1
024d 8006       |    |		Call	0x0,0x6
024e 8404       |    |		Call	0x2,0x4
024f e5ff       |    |		Load	0x2,-0x1
0250 8007       |    |		Call	0x0,0x7
0251 e5ff       |    |		Load	0x2,-0x1
0252 8008       |    |		Call	0x0,0x8
0253 00da       |    |		Load_Top	At_Offset_2
0254 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0255 0000 0000  |    |		.XXX[0x3]
0257 0000       |    |
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025d       | ]  |		.CONST	0x025d								; Address of begin
0259 0004       |    |		.CONST	0x0004								; Address of exception handler
025a 0002       |    |		.CONST	0x0002								; Number of locals
025b			INIT_0258:
025b 029f 077b  |   {|		Declare_Subprogram	INIT_0778,For_Call
025d			BODY_0258:
025d 00db       |    |		Load_Top	At_Offset_3
025e 8006       |    |		Call	0x0,0x6
025f 8402       |    |		Call	0x2,0x2
0260 00db       |    |		Load_Top	At_Offset_3
0261 8007       |    |		Call	0x0,0x7
0262 00db       |    |		Load_Top	At_Offset_3
0263 8008       |    |		Call	0x0,0x8
0264 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0265 0000 0000  |    |		.XXX[0x3]
0267 0000       |    |
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026d       | m  |		.CONST	0x026d								; Address of begin
0269 0004       |    |		.CONST	0x0004								; Address of exception handler
026a 0002       |    |		.CONST	0x0002								; Number of locals
026b			INIT_0268:
026b 029f 07a3  |    |		Declare_Subprogram	INIT_07a0,For_Call
026d			BODY_0268:
026d 00db       |    |		Load_Top	At_Offset_3
026e 8006       |    |		Call	0x0,0x6
026f 8402       |    |		Call	0x2,0x2
0270 00db       |    |		Load_Top	At_Offset_3
0271 8007       |    |		Call	0x0,0x7
0272 00db       |    |		Load_Top	At_Offset_3
0273 8008       |    |		Call	0x0,0x8
0274 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0275 0000 0000  |    |		.XXX[0x3]
0277 0000       |    |
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0282       |    |		.CONST	0x0282								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0004       |    |		.CONST	0x0004								; Number of locals
027b			INIT_0278:
027b e004       |    |		Load	0x0,0x4
027c 02ff       |    |		Declare_Variable	Variant_Record
027d 00d8       |    |		Load_Top	At_Offset_0
027e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
027f e005       |    |		Load	0x0,0x5
0280 029f 07c3  |    |		Declare_Subprogram	INIT_07c0,For_Call
0282			BODY_0278:
0282 e5ff       |    |		Load	0x2,-0x1
0283 8006       |    |		Call	0x0,0x6
0284 8404       |    |		Call	0x2,0x4
0285 0831       | 1  |		Execute_Immediate	Raise,0x31
0286 0000 0000  |    |		.XXX[0x2]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028d       |    |		.CONST	0x028d								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0002       |    |		.CONST	0x0002								; Number of locals
028b			INIT_0288:
028b 029f 07fb  |    |		Declare_Subprogram	INIT_07f8,For_Call
028d			BODY_0288:
028d 00db       |    |		Load_Top	At_Offset_3
028e 8006       |    |		Call	0x0,0x6
028f 8402       |    |		Call	0x2,0x2
0290 00db       |    |		Load_Top	At_Offset_3
0291 8007       |    |		Call	0x0,0x7
0292 00db       |    |		Load_Top	At_Offset_3
0293 8008       |    |		Call	0x0,0x8
0294 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0295 0000 0000  |    |		.XXX[0x3]
0297 0000       |    |
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029d       |    |		.CONST	0x029d								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 0002       |    |		.CONST	0x0002								; Number of locals
029b			INIT_0298:
029b 029f 0843  |   C|		Declare_Subprogram	INIT_0840,For_Call
029d			BODY_0298:
029d 00db       |    |		Load_Top	At_Offset_3
029e 8006       |    |		Call	0x0,0x6
029f 8402       |    |		Call	0x2,0x2
02a0 00db       |    |		Load_Top	At_Offset_3
02a1 8007       |    |		Call	0x0,0x7
02a2 00db       |    |		Load_Top	At_Offset_3
02a3 8008       |    |		Call	0x0,0x8
02a4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02a5 0000 0000  |    |		.XXX[0x3]
02a7 0000       |    |
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab       |    |		.CONST	0x02ab								; Address of begin
02a9 02f6       |    |		.CONST	0x02f6								; Address of exception handler
02aa 0001       |    |		.CONST	0x0001								; Number of locals
02ab			BODY_02a8:
02ab			INIT_02a8:
02ab e012       |    |		Load	0x0,0x12
02ac 0322       | "  |		Declare_Variable	Record
02ad 4854       |HT  |		Short_Literal	0x54
02ae 00d9       |    |		Load_Top	At_Offset_1
02af 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02b0 e012       |    |		Load	0x0,0x12
02b1 012c       | ,  |		Execute	Any,Size
02b2 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
02b3 00d9       |    |		Load_Top	At_Offset_1
02b4 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
02b5 4800       |H   |		Short_Literal	0x0
02b6 00d9       |    |		Load_Top	At_Offset_1
02b7 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02b8 4800       |H   |		Short_Literal	0x0
02b9 00d9       |    |		Load_Top	At_Offset_1
02ba 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
02bb e5fe       |    |		Load	0x2,-0x2
02bc 00d9       |    |		Load_Top	At_Offset_1
02bd 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
02be e5fd       |    |		Load	0x2,-0x3
02bf 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02c0 00d9       |    |		Load_Top	At_Offset_1
02c1 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
02c2 e5fd       |    |		Load	0x2,-0x3
02c3 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
02c4 00d9       |    |		Load_Top	At_Offset_1
02c5 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
02c6 e5fd       |    |		Load	0x2,-0x3
02c7 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
02c8 00d9       |    |		Load_Top	At_Offset_1
02c9 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
02ca e5ff       |    |		Load	0x2,-0x1
02cb e013       |    |		Load	0x0,0x13
02cc a014       |    |		Store_Unchecked	0x0,0x14
02cd e015       |    |		Load	0x0,0x15
02ce e016       |    |		Load	0x0,0x16
02cf a017       |    |		Store_Unchecked	0x0,0x17
02d0 8018       |    |		Call	0x0,0x18
02d1 e005       |    |		Load	0x0,0x5
02d2 e402       |    |		Load	0x2,0x2
02d3 4801       |H   |		Short_Literal	0x1
02d4 4800       |H   |		Short_Literal	0x0
02d5 4854       |HT  |		Short_Literal	0x54
02d6 e5ff       |    |		Load	0x2,-0x1
02d7 e019       |    |		Load	0x0,0x19
02d8 a01a       |    |		Store_Unchecked	0x0,0x1a
02d9 a01b       |    |		Store_Unchecked	0x0,0x1b
02da 801c       |    |		Call	0x0,0x1c
02db 00d1       |    |		Pop_Control	Pop_Count_1
02dc c403       |    |		Store	0x2,0x3
02dd e403       |    |		Load	0x2,0x3
02de a5fc       |    |		Store_Unchecked	0x2,-0x4
02df e403       |    |		Load	0x2,0x3
02e0 6814       |h   |		Jump_Zero	0x2f5
02e1 e402       |    |		Load	0x2,0x2
02e2 2603       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
02e3 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
02e4 e5fd       |    |		Load	0x2,-0x3
02e5 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02e6 e402       |    |		Load	0x2,0x2
02e7 2603       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
02e8 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
02e9 e5fd       |    |		Load	0x2,-0x3
02ea 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02eb e402       |    |		Load	0x2,0x2
02ec 2603       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
02ed 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
02ee e5fd       |    |		Load	0x2,-0x3
02ef 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
02f0 e402       |    |		Load	0x2,0x2
02f1 2603       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
02f2 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
02f3 e5fd       |    |		Load	0x2,-0x3
02f4 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
02f5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02f6			TRAP_02a8:
02f6 0007       |    |		Action	Break_Optional
02f7 e5ff       |    |		Load	0x2,-0x1
02f8 8007       |    |		Call	0x0,0x7
02f9 00d8       |    |		Load_Top	At_Offset_0
02fa 0101       |    |		Execute	Exception,Reraise
02fb 0000 0000  |    |		.BLANK	0000[0x5]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303       |    |		.CONST	0x0303								; Address of begin
0301 037a       | z  |		.CONST	0x037a								; Address of exception handler
0302 0001       |    |		.CONST	0x0001								; Number of locals
0303			BODY_0300:
0303			INIT_0300:
0303 e01d       |    |		Load	0x0,0x1d
0304 0322       | "  |		Declare_Variable	Record
0305 4856       |HV  |		Short_Literal	0x56
0306 00d9       |    |		Load_Top	At_Offset_1
0307 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0308 e01d       |    |		Load	0x0,0x1d
0309 012c       | ,  |		Execute	Any,Size
030a 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
030b 00d9       |    |		Load_Top	At_Offset_1
030c 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
030d e5fd       |    |		Load	0x2,-0x3
030e 801e       |    |		Call	0x0,0x1e
030f 00d9       |    |		Load_Top	At_Offset_1
0310 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0311 e5fe       |    |		Load	0x2,-0x2
0312 00d9       |    |		Load_Top	At_Offset_1
0313 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0314 e5fb       |    |		Load	0x2,-0x5
0315 01db       |    |		Execute	Vector,Length
0316 00d9       |    |		Load_Top	At_Offset_1
0317 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0318 e5fc       |    |		Load	0x2,-0x4
0319 01db       |    |		Execute	Vector,Length
031a 00d9       |    |		Load_Top	At_Offset_1
031b 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
031c e5ff       |    |		Load	0x2,-0x1
031d e01f       |    |		Load	0x0,0x1f
031e a020       |    |		Store_Unchecked	0x0,0x20
031f e021       | !  |		Load	0x0,0x21
0320 e022       | "  |		Load	0x0,0x22
0321 a023       | #  |		Store_Unchecked	0x0,0x23
0322 8018       |    |		Call	0x0,0x18
0323 e005       |    |		Load	0x0,0x5
0324 e403       |    |		Load	0x2,0x3
0325 4800       |H   |		Short_Literal	0x0
0326 e5fb       |    |		Load	0x2,-0x5
0327 01db       |    |		Execute	Vector,Length
0328 0902       |    |		Execute_Immediate	Binary_Scale,0x2
0329 e024       | $  |		Load	0x0,0x24
032a 012c       | ,  |		Execute	Any,Size
032b 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
032c 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
032d e5fc       |    |		Load	0x2,-0x4
032e 01db       |    |		Execute	Vector,Length
032f 0271       | q  |		Execute	Discrete,Times
0330 0273       | s  |		Execute	Discrete,Plus
0331 00d8       |    |		Load_Top	At_Offset_0
0332 e00a       |    |		Load	0x0,0xa
0333 0260       | `  |		Execute	Discrete,In_Type
0334 7001       |p   |		Jump_Nonzero	0x336
0335 0801       |    |		Execute_Immediate	Raise,0x1
0336 4856       |HV  |		Short_Literal	0x56
0337 e5ff       |    |		Load	0x2,-0x1
0338 e019       |    |		Load	0x0,0x19
0339 a01a       |    |		Store_Unchecked	0x0,0x1a
033a a01b       |    |		Store_Unchecked	0x0,0x1b
033b 801c       |    |		Call	0x0,0x1c
033c 00d1       |    |		Pop_Control	Pop_Count_1
033d c402       |    |		Store	0x2,0x2
033e e402       |    |		Load	0x2,0x2
033f a5fa       |    |		Store_Unchecked	0x2,-0x6
0340 e402       |    |		Load	0x2,0x2
0341 6817       |h   |		Jump_Zero	0x359
0342 e5fb       |    |		Load	0x2,-0x5
0343 e5ff       |    |		Load	0x2,-0x1
0344 e025       | %  |		Load	0x0,0x25
0345 e026       | &  |		Load	0x0,0x26
0346 e027       | '  |		Load	0x0,0x27
0347 a028       | (  |		Store_Unchecked	0x0,0x28
0348 e029       | )  |		Load	0x0,0x29
0349 e02a       | *  |		Load	0x0,0x2a
034a a02b       | +  |		Store_Unchecked	0x0,0x2b
034b 802c       | ,  |		Call	0x0,0x2c
034c 00d1       |    |		Pop_Control	Pop_Count_1
034d e5fc       |    |		Load	0x2,-0x4
034e e5ff       |    |		Load	0x2,-0x1
034f e02d       | -  |		Load	0x0,0x2d
0350 e02e       | .  |		Load	0x0,0x2e
0351 e02f       | /  |		Load	0x0,0x2f
0352 a030       | 0  |		Store_Unchecked	0x0,0x30
0353 e031       | 1  |		Load	0x0,0x31
0354 e032       | 2  |		Load	0x0,0x32
0355 a033       | 3  |		Store_Unchecked	0x0,0x33
0356 802c       | ,  |		Call	0x0,0x2c
0357 00d1       |    |		Pop_Control	Pop_Count_1
0358 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0359 e5fb       |    |		Load	0x2,-0x5
035a 00d8       |    |		Load_Top	At_Offset_0
035b 0335       | 5  |		Declare_Variable	Array,Duplicate
035c 00cd       |    |		Action	Spare6_Action
035d 00d9       |    |		Load_Top	At_Offset_1
035e 01d9       |    |		Execute	Vector,Reverse_Bounds
035f 0263       | c  |		Execute	Discrete,Above_Bound
0360 7005       |p   |		Jump_Nonzero	0x366
0361 4800       |H   |		Short_Literal	0x0
0362 00d9       |    |		Load_Top	At_Offset_1
0363 e603       |    |		Load	0x3,0x3
0364 01d6       |    |		Execute	Vector,Field_Write
0365 3ffb       |?   |		Loop_Increasing	0x361
0366 00cd       |    |		Action	Spare6_Action
0367 e5fb       |    |		Load	0x2,-0x5
0368 01d4       |    |		Execute	Vector,Structure_Write
0369 e5fc       |    |		Load	0x2,-0x4
036a 00d8       |    |		Load_Top	At_Offset_0
036b 0335       | 5  |		Declare_Variable	Array,Duplicate
036c 00cd       |    |		Action	Spare6_Action
036d 00d9       |    |		Load_Top	At_Offset_1
036e 01d9       |    |		Execute	Vector,Reverse_Bounds
036f 0263       | c  |		Execute	Discrete,Above_Bound
0370 7005       |p   |		Jump_Nonzero	0x376
0371 4800       |H   |		Short_Literal	0x0
0372 00d9       |    |		Load_Top	At_Offset_1
0373 e603       |    |		Load	0x3,0x3
0374 01d6       |    |		Execute	Vector,Field_Write
0375 3ffb       |?   |		Loop_Increasing	0x371
0376 00cd       |    |		Action	Spare6_Action
0377 e5fc       |    |		Load	0x2,-0x4
0378 01d4       |    |		Execute	Vector,Structure_Write
0379 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
037a			TRAP_0300:
037a 0007       |    |		Action	Break_Optional
037b e5ff       |    |		Load	0x2,-0x1
037c 8007       |    |		Call	0x0,0x7
037d 00d8       |    |		Load_Top	At_Offset_0
037e 0101       |    |		Execute	Exception,Reraise
037f 0000       |    |		.XXX[0x1]
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0383       |    |		.CONST	0x0383								; Address of begin
0381 03de       |    |		.CONST	0x03de								; Address of exception handler
0382 0001       |    |		.CONST	0x0001								; Number of locals
0383			BODY_0380:
0383			INIT_0380:
0383 e034       | 4  |		Load	0x0,0x34
0384 0322       | "  |		Declare_Variable	Record
0385 4857       |HW  |		Short_Literal	0x57
0386 00d9       |    |		Load_Top	At_Offset_1
0387 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0388 e034       | 4  |		Load	0x0,0x34
0389 012c       | ,  |		Execute	Any,Size
038a 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
038b 00d9       |    |		Load_Top	At_Offset_1
038c 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
038d e5fd       |    |		Load	0x2,-0x3
038e 801e       |    |		Call	0x0,0x1e
038f 00d9       |    |		Load_Top	At_Offset_1
0390 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0391 e5fe       |    |		Load	0x2,-0x2
0392 00d9       |    |		Load_Top	At_Offset_1
0393 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0394 e5f9       |    |		Load	0x2,-0x7
0395 01db       |    |		Execute	Vector,Length
0396 00d9       |    |		Load_Top	At_Offset_1
0397 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0398 e5fc       |    |		Load	0x2,-0x4
0399 00d9       |    |		Load_Top	At_Offset_1
039a 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
039b e5fb       |    |		Load	0x2,-0x5
039c 00d9       |    |		Load_Top	At_Offset_1
039d 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
039e e5fa       |    |		Load	0x2,-0x6
039f 00d9       |    |		Load_Top	At_Offset_1
03a0 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
03a1 e5ff       |    |		Load	0x2,-0x1
03a2 e035       | 5  |		Load	0x0,0x35
03a3 a036       | 6  |		Store_Unchecked	0x0,0x36
03a4 e037       | 7  |		Load	0x0,0x37
03a5 e038       | 8  |		Load	0x0,0x38
03a6 a039       | 9  |		Store_Unchecked	0x0,0x39
03a7 8018       |    |		Call	0x0,0x18
03a8 e005       |    |		Load	0x0,0x5
03a9 e403       |    |		Load	0x2,0x3
03aa 4800       |H   |		Short_Literal	0x0
03ab e5f9       |    |		Load	0x2,-0x7
03ac 01db       |    |		Execute	Vector,Length
03ad 0902       |    |		Execute_Immediate	Binary_Scale,0x2
03ae 00d8       |    |		Load_Top	At_Offset_0
03af e00a       |    |		Load	0x0,0xa
03b0 0260       | `  |		Execute	Discrete,In_Type
03b1 7001       |p   |		Jump_Nonzero	0x3b3
03b2 0801       |    |		Execute_Immediate	Raise,0x1
03b3 4857       |HW  |		Short_Literal	0x57
03b4 e5ff       |    |		Load	0x2,-0x1
03b5 e019       |    |		Load	0x0,0x19
03b6 a01a       |    |		Store_Unchecked	0x0,0x1a
03b7 a01b       |    |		Store_Unchecked	0x0,0x1b
03b8 801c       |    |		Call	0x0,0x1c
03b9 00d1       |    |		Pop_Control	Pop_Count_1
03ba c402       |    |		Store	0x2,0x2
03bb e402       |    |		Load	0x2,0x2
03bc a5f5       |    |		Store_Unchecked	0x2,-0xb
03bd e402       |    |		Load	0x2,0x2
03be 6818       |h   |		Jump_Zero	0x3d7
03bf e403       |    |		Load	0x2,0x3
03c0 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
03c1 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
03c2 a5f8       |    |		Store_Unchecked	0x2,-0x8
03c3 e403       |    |		Load	0x2,0x3
03c4 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
03c5 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
03c6 a5f7       |    |		Store_Unchecked	0x2,-0x9
03c7 e403       |    |		Load	0x2,0x3
03c8 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
03c9 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
03ca a5f6       |    |		Store_Unchecked	0x2,-0xa
03cb e5f9       |    |		Load	0x2,-0x7
03cc e5ff       |    |		Load	0x2,-0x1
03cd e025       | %  |		Load	0x0,0x25
03ce e026       | &  |		Load	0x0,0x26
03cf e027       | '  |		Load	0x0,0x27
03d0 a028       | (  |		Store_Unchecked	0x0,0x28
03d1 e029       | )  |		Load	0x0,0x29
03d2 e02a       | *  |		Load	0x0,0x2a
03d3 a02b       | +  |		Store_Unchecked	0x0,0x2b
03d4 802c       | ,  |		Call	0x0,0x2c
03d5 00d1       |    |		Pop_Control	Pop_Count_1
03d6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03d7 4800       |H   |		Short_Literal	0x0
03d8 a5f8       |    |		Store_Unchecked	0x2,-0x8
03d9 4800       |H   |		Short_Literal	0x0
03da a5f7       |    |		Store_Unchecked	0x2,-0x9
03db 4800       |H   |		Short_Literal	0x0
03dc a5f6       |    |		Store_Unchecked	0x2,-0xa
03dd 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03de			TRAP_0380:
03de 0007       |    |		Action	Break_Optional
03df e5ff       |    |		Load	0x2,-0x1
03e0 8007       |    |		Call	0x0,0x7
03e1 00d8       |    |		Load_Top	At_Offset_0
03e2 0101       |    |		Execute	Exception,Reraise
03e3 0000 0000  |    |		.BLANK	0000[0x5]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb       |    |		.CONST	0x03eb								; Address of begin
03e9 0462       | b  |		.CONST	0x0462								; Address of exception handler
03ea 0001       |    |		.CONST	0x0001								; Number of locals
03eb			BODY_03e8:
03eb			INIT_03e8:
03eb e5fd       |    |		Load	0x2,-0x3
03ec 01db       |    |		Execute	Vector,Length
03ed c402       |    |		Store	0x2,0x2
03ee e402       |    |		Load	0x2,0x2
03ef e03a       | :  |		Load	0x0,0x3a
03f0 0322       | "  |		Declare_Variable	Record
03f1 4855       |HU  |		Short_Literal	0x55
03f2 00d9       |    |		Load_Top	At_Offset_1
03f3 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03f4 e03a       | :  |		Load	0x0,0x3a
03f5 012c       | ,  |		Execute	Any,Size
03f6 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
03f7 e402       |    |		Load	0x2,0x2
03f8 0a03       |    |		Execute_Immediate	Plus,0x3
03f9 09fe       |    |		Execute_Immediate	Binary_Scale,-0x2
03fa 0273       | s  |		Execute	Discrete,Plus
03fb 00d9       |    |		Load_Top	At_Offset_1
03fc 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03fd 4800       |H   |		Short_Literal	0x0
03fe 00d9       |    |		Load_Top	At_Offset_1
03ff 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0400 4800       |H   |		Short_Literal	0x0
0401 00d9       |    |		Load_Top	At_Offset_1
0402 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0403 4800       |H   |		Short_Literal	0x0
0404 00d9       |    |		Load_Top	At_Offset_1
0405 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0406 e402       |    |		Load	0x2,0x2
0407 00d9       |    |		Load_Top	At_Offset_1
0408 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0409 e5fe       |    |		Load	0x2,-0x2
040a 00d9       |    |		Load_Top	At_Offset_1
040b 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
040c e5ff       |    |		Load	0x2,-0x1
040d e03b       | ;  |		Load	0x0,0x3b
040e a03c       | <  |		Store_Unchecked	0x0,0x3c
040f e03d       | =  |		Load	0x0,0x3d
0410 e03e       | >  |		Load	0x0,0x3e
0411 a03f       | ?  |		Store_Unchecked	0x0,0x3f
0412 8040       | @  |		Call	0x0,0x40
0413 e5fd       |    |		Load	0x2,-0x3
0414 e5ff       |    |		Load	0x2,-0x1
0415 e041       | A  |		Load	0x0,0x41
0416 e042       | B  |		Load	0x0,0x42
0417 e043       | C  |		Load	0x0,0x43
0418 a044       | D  |		Store_Unchecked	0x0,0x44
0419 e045       | E  |		Load	0x0,0x45
041a e046       | F  |		Load	0x0,0x46
041b a047       | G  |		Store_Unchecked	0x0,0x47
041c 8048       | H  |		Call	0x0,0x48
041d e005       |    |		Load	0x0,0x5
041e e403       |    |		Load	0x2,0x3
041f 4801       |H   |		Short_Literal	0x1
0420 4800       |H   |		Short_Literal	0x0
0421 4855       |HU  |		Short_Literal	0x55
0422 e5ff       |    |		Load	0x2,-0x1
0423 e019       |    |		Load	0x0,0x19
0424 a01a       |    |		Store_Unchecked	0x0,0x1a
0425 a01b       |    |		Store_Unchecked	0x0,0x1b
0426 801c       |    |		Call	0x0,0x1c
0427 00d1       |    |		Pop_Control	Pop_Count_1
0428 c404       |    |		Store	0x2,0x4
0429 e404       |    |		Load	0x2,0x4
042a 700e       |p   |		Jump_Nonzero	0x439
042b e00c       |    |		Load	0x0,0xc
042c e5fc       |    |		Load	0x2,-0x4
042d 017d       | }  |		Execute	Record,Structure_Write
042e e00c       |    |		Load	0x0,0xc
042f e5fb       |    |		Load	0x2,-0x5
0430 017d       | }  |		Execute	Record,Structure_Write
0431 4800       |H   |		Short_Literal	0x0
0432 a5fa       |    |		Store_Unchecked	0x2,-0x6
0433 e5ff       |    |		Load	0x2,-0x1
0434 8007       |    |		Call	0x0,0x7
0435 e5ff       |    |		Load	0x2,-0x1
0436 8008       |    |		Call	0x0,0x8
0437 00cc       |    |		Action	Pop_Block
0438 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0439 e403       |    |		Load	0x2,0x3
043a 2606       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6
043b 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
043c e5fb       |    |		Load	0x2,-0x5
043d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
043e e403       |    |		Load	0x2,0x3
043f 2606       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6
0440 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0441 e5fb       |    |		Load	0x2,-0x5
0442 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0443 e403       |    |		Load	0x2,0x3
0444 2606       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6
0445 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0446 e5fb       |    |		Load	0x2,-0x5
0447 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0448 e403       |    |		Load	0x2,0x3
0449 2606       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6
044a 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
044b e5fc       |    |		Load	0x2,-0x4
044c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
044d e403       |    |		Load	0x2,0x3
044e 2606       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6
044f 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0450 e5fc       |    |		Load	0x2,-0x4
0451 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0452 e403       |    |		Load	0x2,0x3
0453 2606       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6
0454 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0455 e5fc       |    |		Load	0x2,-0x4
0456 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0457 e403       |    |		Load	0x2,0x3
0458 2606       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6
0459 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
045a e5fc       |    |		Load	0x2,-0x4
045b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
045c e403       |    |		Load	0x2,0x3
045d 2606       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6
045e 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
045f e5fb       |    |		Load	0x2,-0x5
0460 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0461 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0462			TRAP_03e8:
0462 0007       |    |		Action	Break_Optional
0463 e5ff       |    |		Load	0x2,-0x1
0464 8007       |    |		Call	0x0,0x7
0465 00d8       |    |		Load_Top	At_Offset_0
0466 0101       |    |		Execute	Exception,Reraise
0467 0000       |    |		.XXX[0x1]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 046b       | k  |		.CONST	0x046b								; Address of begin
0469 049e       |    |		.CONST	0x049e								; Address of exception handler
046a 0001       |    |		.CONST	0x0001								; Number of locals
046b			BODY_0468:
046b			INIT_0468:
046b e402       |    |		Load	0x2,0x2
046c 0902       |    |		Execute_Immediate	Binary_Scale,0x2
046d 00d8       |    |		Load_Top	At_Offset_0
046e e00a       |    |		Load	0x0,0xa
046f 0260       | `  |		Execute	Discrete,In_Type
0470 7001       |p   |		Jump_Nonzero	0x472
0471 0801       |    |		Execute_Immediate	Raise,0x1
0472 e049       | I  |		Load	0x0,0x49
0473 0322       | "  |		Declare_Variable	Record
0474 4858       |HX  |		Short_Literal	0x58
0475 00d9       |    |		Load_Top	At_Offset_1
0476 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0477 e049       | I  |		Load	0x0,0x49
0478 012c       | ,  |		Execute	Any,Size
0479 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
047a e402       |    |		Load	0x2,0x2
047b 00d8       |    |		Load_Top	At_Offset_0
047c e009       |    |		Load	0x0,0x9
047d 0260       | `  |		Execute	Discrete,In_Type
047e 7001       |p   |		Jump_Nonzero	0x480
047f 0801       |    |		Execute_Immediate	Raise,0x1
0480 0273       | s  |		Execute	Discrete,Plus
0481 00d9       |    |		Load_Top	At_Offset_1
0482 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0483 4800       |H   |		Short_Literal	0x0
0484 00d9       |    |		Load_Top	At_Offset_1
0485 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0486 e5fe       |    |		Load	0x2,-0x2
0487 00d9       |    |		Load_Top	At_Offset_1
0488 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0489 e5fc       |    |		Load	0x2,-0x4
048a 00d9       |    |		Load_Top	At_Offset_1
048b 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
048c e5ff       |    |		Load	0x2,-0x1
048d e04a       | J  |		Load	0x0,0x4a
048e a04b       | K  |		Store_Unchecked	0x0,0x4b
048f e04c       | L  |		Load	0x0,0x4c
0490 e04d       | M  |		Load	0x0,0x4d
0491 a04e       | N  |		Store_Unchecked	0x0,0x4e
0492 8040       | @  |		Call	0x0,0x40
0493 e5fd       |    |		Load	0x2,-0x3
0494 e5ff       |    |		Load	0x2,-0x1
0495 e04f       | O  |		Load	0x0,0x4f
0496 e050       | P  |		Load	0x0,0x50
0497 e051       | Q  |		Load	0x0,0x51
0498 a052       | R  |		Store_Unchecked	0x0,0x52
0499 e053       | S  |		Load	0x0,0x53
049a e054       | T  |		Load	0x0,0x54
049b a055       | U  |		Store_Unchecked	0x0,0x55
049c 8056       | V  |		Call	0x0,0x56
049d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
049e			TRAP_0468:
049e 0007       |    |		Action	Break_Optional
049f e5ff       |    |		Load	0x2,-0x1
04a0 8007       |    |		Call	0x0,0x7
04a1 00d8       |    |		Load_Top	At_Offset_0
04a2 0101       |    |		Execute	Exception,Reraise
04a3 0000 0000  |    |		.BLANK	0000[0x5]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab       |    |		.CONST	0x04ab								; Address of begin
04a9 051f       |    |		.CONST	0x051f								; Address of exception handler
04aa 0001       |    |		.CONST	0x0001								; Number of locals
04ab			BODY_04a8:
04ab			INIT_04a8:
04ab e402       |    |		Load	0x2,0x2
04ac e057       | W  |		Load	0x0,0x57
04ad 0322       | "  |		Declare_Variable	Record
04ae 485c       |H\  |		Short_Literal	0x5c
04af 00d9       |    |		Load_Top	At_Offset_1
04b0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
04b1 e057       | W  |		Load	0x0,0x57
04b2 012c       | ,  |		Execute	Any,Size
04b3 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
04b4 e402       |    |		Load	0x2,0x2
04b5 0a03       |    |		Execute_Immediate	Plus,0x3
04b6 00d8       |    |		Load_Top	At_Offset_0
04b7 e009       |    |		Load	0x0,0x9
04b8 0260       | `  |		Execute	Discrete,In_Type
04b9 7001       |p   |		Jump_Nonzero	0x4bb
04ba 0801       |    |		Execute_Immediate	Raise,0x1
04bb 09fe       |    |		Execute_Immediate	Binary_Scale,-0x2
04bc 0273       | s  |		Execute	Discrete,Plus
04bd 00d9       |    |		Load_Top	At_Offset_1
04be 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
04bf 4800       |H   |		Short_Literal	0x0
04c0 00d9       |    |		Load_Top	At_Offset_1
04c1 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
04c2 4800       |H   |		Short_Literal	0x0
04c3 00d9       |    |		Load_Top	At_Offset_1
04c4 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
04c5 4800       |H   |		Short_Literal	0x0
04c6 00d9       |    |		Load_Top	At_Offset_1
04c7 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
04c8 e5fe       |    |		Load	0x2,-0x2
04c9 00d9       |    |		Load_Top	At_Offset_1
04ca 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
04cb e402       |    |		Load	0x2,0x2
04cc 00d8       |    |		Load_Top	At_Offset_0
04cd e009       |    |		Load	0x0,0x9
04ce 0260       | `  |		Execute	Discrete,In_Type
04cf 7001       |p   |		Jump_Nonzero	0x4d1
04d0 0801       |    |		Execute_Immediate	Raise,0x1
04d1 00d9       |    |		Load_Top	At_Offset_1
04d2 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
04d3 e5ff       |    |		Load	0x2,-0x1
04d4 e058       | X  |		Load	0x0,0x58
04d5 a059       | Y  |		Store_Unchecked	0x0,0x59
04d6 e05a       | Z  |		Load	0x0,0x5a
04d7 e05b       | [  |		Load	0x0,0x5b
04d8 a05c       | \  |		Store_Unchecked	0x0,0x5c
04d9 8040       | @  |		Call	0x0,0x40
04da e5fd       |    |		Load	0x2,-0x3
04db e5ff       |    |		Load	0x2,-0x1
04dc e041       | A  |		Load	0x0,0x41
04dd e042       | B  |		Load	0x0,0x42
04de e043       | C  |		Load	0x0,0x43
04df a044       | D  |		Store_Unchecked	0x0,0x44
04e0 e045       | E  |		Load	0x0,0x45
04e1 e046       | F  |		Load	0x0,0x46
04e2 a047       | G  |		Store_Unchecked	0x0,0x47
04e3 8048       | H  |		Call	0x0,0x48
04e4 e005       |    |		Load	0x0,0x5
04e5 e403       |    |		Load	0x2,0x3
04e6 4801       |H   |		Short_Literal	0x1
04e7 4800       |H   |		Short_Literal	0x0
04e8 485c       |H\  |		Short_Literal	0x5c
04e9 e5ff       |    |		Load	0x2,-0x1
04ea e019       |    |		Load	0x0,0x19
04eb a01a       |    |		Store_Unchecked	0x0,0x1a
04ec a01b       |    |		Store_Unchecked	0x0,0x1b
04ed 801c       |    |		Call	0x0,0x1c
04ee 00d1       |    |		Pop_Control	Pop_Count_1
04ef c404       |    |		Store	0x2,0x4
04f0 e404       |    |		Load	0x2,0x4
04f1 700e       |p   |		Jump_Nonzero	0x500
04f2 e00c       |    |		Load	0x0,0xc
04f3 e5fc       |    |		Load	0x2,-0x4
04f4 017d       | }  |		Execute	Record,Structure_Write
04f5 e00c       |    |		Load	0x0,0xc
04f6 e5fb       |    |		Load	0x2,-0x5
04f7 017d       | }  |		Execute	Record,Structure_Write
04f8 4800       |H   |		Short_Literal	0x0
04f9 a5fa       |    |		Store_Unchecked	0x2,-0x6
04fa e5ff       |    |		Load	0x2,-0x1
04fb 8007       |    |		Call	0x0,0x7
04fc e5ff       |    |		Load	0x2,-0x1
04fd 8008       |    |		Call	0x0,0x8
04fe 00cc       |    |		Action	Pop_Block
04ff 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0500 e403       |    |		Load	0x2,0x3
0501 261f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
0502 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0503 e5fc       |    |		Load	0x2,-0x4
0504 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0505 e403       |    |		Load	0x2,0x3
0506 261f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
0507 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0508 e5fc       |    |		Load	0x2,-0x4
0509 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
050a e403       |    |		Load	0x2,0x3
050b 261f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
050c 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
050d e5fc       |    |		Load	0x2,-0x4
050e 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
050f e403       |    |		Load	0x2,0x3
0510 261f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
0511 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0512 e5fb       |    |		Load	0x2,-0x5
0513 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0514 e403       |    |		Load	0x2,0x3
0515 261f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
0516 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0517 e5fb       |    |		Load	0x2,-0x5
0518 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0519 e403       |    |		Load	0x2,0x3
051a 261f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
051b 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
051c e5fb       |    |		Load	0x2,-0x5
051d 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
051e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
051f			TRAP_04a8:
051f 0007       |    |		Action	Break_Optional
0520 e5ff       |    |		Load	0x2,-0x1
0521 8007       |    |		Call	0x0,0x7
0522 00d8       |    |		Load_Top	At_Offset_0
0523 0101       |    |		Execute	Exception,Reraise
0524 0000 0000  |    |		.BLANK	0000[0x4]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 0532       | 2  |		.CONST	0x0532								; Address of begin
0529 0004       |    |		.CONST	0x0004								; Address of exception handler
052a 0004       |    |		.CONST	0x0004								; Number of locals
052b			INIT_0528:
052b e004       |    |		Load	0x0,0x4
052c 02ff       |    |		Declare_Variable	Variant_Record
052d 00d8       |    |		Load_Top	At_Offset_0
052e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
052f e005       |    |		Load	0x0,0x5
0530 029f 0863  |   c|		Declare_Subprogram	INIT_0860,For_Call
0532			BODY_0528:
0532 e5ff       |    |		Load	0x2,-0x1
0533 8006       |    |		Call	0x0,0x6
0534 8604       |    |		Call	0x3,0x4
0535 e5ff       |    |		Load	0x2,-0x1
0536 8007       |    |		Call	0x0,0x7
0537 e5ff       |    |		Load	0x2,-0x1
0538 8008       |    |		Call	0x0,0x8
0539 4801       |H   |		Short_Literal	0x1
053a a5fb       |    |		Store_Unchecked	0x2,-0x5
053b 00cc       |    |		Action	Pop_Block
053c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
053d 0000 0000  |    |		.XXX[0x3]
053f 0000       |    |
0540 ; --------------------------------------------------------------------------------------
0540 ; SUBPROGRAM
0540 ; --------------------------------------------------------------------------------------
0540 0543       | C  |		.CONST	0x0543								; Address of begin
0541 05aa       |    |		.CONST	0x05aa								; Address of exception handler
0542 0001       |    |		.CONST	0x0001								; Number of locals
0543			BODY_0540:
0543			INIT_0540:
0543 4804       |H   |		Short_Literal	0x4
0544 e05d       | ]  |		Load	0x0,0x5d
0545 0322       | "  |		Declare_Variable	Record
0546 485b       |H[  |		Short_Literal	0x5b
0547 00d9       |    |		Load_Top	At_Offset_1
0548 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0549 e05d       | ]  |		Load	0x0,0x5d
054a 012c       | ,  |		Execute	Any,Size
054b 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
054c e024       | $  |		Load	0x0,0x24
054d 012c       | ,  |		Execute	Any,Size
054e 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
054f 00d8       |    |		Load_Top	At_Offset_0
0550 e009       |    |		Load	0x0,0x9
0551 0260       | `  |		Execute	Discrete,In_Type
0552 7001       |p   |		Jump_Nonzero	0x554
0553 0801       |    |		Execute_Immediate	Raise,0x1
0554 0273       | s  |		Execute	Discrete,Plus
0555 00d9       |    |		Load_Top	At_Offset_1
0556 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0557 4800       |H   |		Short_Literal	0x0
0558 00d9       |    |		Load_Top	At_Offset_1
0559 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
055a e5fe       |    |		Load	0x2,-0x2
055b 00d9       |    |		Load_Top	At_Offset_1
055c 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
055d e5ff       |    |		Load	0x2,-0x1
055e e05e       | ^  |		Load	0x0,0x5e
055f a05f       | _  |		Store_Unchecked	0x0,0x5f
0560 e060       | `  |		Load	0x0,0x60
0561 e061       | a  |		Load	0x0,0x61
0562 a062       | b  |		Store_Unchecked	0x0,0x62
0563 8040       | @  |		Call	0x0,0x40
0564 e5fd       |    |		Load	0x2,-0x3
0565 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0566 e5ff       |    |		Load	0x2,-0x1
0567 e063       | c  |		Load	0x0,0x63
0568 a064       | d  |		Store_Unchecked	0x0,0x64
0569 e065       | e  |		Load	0x0,0x65
056a e066       | f  |		Load	0x0,0x66
056b a067       | g  |		Store_Unchecked	0x0,0x67
056c 8068       | h  |		Call	0x0,0x68
056d e005       |    |		Load	0x0,0x5
056e e403       |    |		Load	0x2,0x3
056f 4800       |H   |		Short_Literal	0x0
0570 4800       |H   |		Short_Literal	0x0
0571 485b       |H[  |		Short_Literal	0x5b
0572 e5ff       |    |		Load	0x2,-0x1
0573 e019       |    |		Load	0x0,0x19
0574 a01a       |    |		Store_Unchecked	0x0,0x1a
0575 a01b       |    |		Store_Unchecked	0x0,0x1b
0576 801c       |    |		Call	0x0,0x1c
0577 00d1       |    |		Pop_Control	Pop_Count_1
0578 c404       |    |		Store	0x2,0x4
0579 e404       |    |		Load	0x2,0x4
057a 682e       |h.  |		Jump_Zero	0x5a9
057b e402       |    |		Load	0x2,0x2
057c e5ff       |    |		Load	0x2,-0x1
057d e069       | i  |		Load	0x0,0x69
057e a06a       | j  |		Store_Unchecked	0x0,0x6a
057f e06b       | k  |		Load	0x0,0x6b
0580 e06c       | l  |		Load	0x0,0x6c
0581 a06d       | m  |		Store_Unchecked	0x0,0x6d
0582 806e       | n  |		Call	0x0,0x6e
0583 00d1       |    |		Pop_Control	Pop_Count_1
0584 e402       |    |		Load	0x2,0x2
0585 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0586 e5fd       |    |		Load	0x2,-0x3
0587 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0588 e402       |    |		Load	0x2,0x2
0589 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
058a e5fd       |    |		Load	0x2,-0x3
058b 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
058c e402       |    |		Load	0x2,0x2
058d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
058e e5fd       |    |		Load	0x2,-0x3
058f 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0590 e00d       |    |		Load	0x0,0xd
0591 0337       | 7  |		Declare_Variable	Array
0592 4801       |H   |		Short_Literal	0x1
0593 4807       |H   |		Short_Literal	0x7
0594 00da       |    |		Load_Top	At_Offset_2
0595 01d6       |    |		Execute	Vector,Field_Write
0596 4801       |H   |		Short_Literal	0x1
0597 4806       |H   |		Short_Literal	0x6
0598 00da       |    |		Load_Top	At_Offset_2
0599 01d6       |    |		Execute	Vector,Field_Write
059a 4801       |H   |		Short_Literal	0x1
059b 4805       |H   |		Short_Literal	0x5
059c 00da       |    |		Load_Top	At_Offset_2
059d 01d6       |    |		Execute	Vector,Field_Write
059e 4804       |H   |		Short_Literal	0x4
059f 4800       |H   |		Short_Literal	0x0
05a0 4800       |H   |		Short_Literal	0x0
05a1 00d9       |    |		Load_Top	At_Offset_1
05a2 e602       |    |		Load	0x3,0x2
05a3 01d6       |    |		Execute	Vector,Field_Write
05a4 3ffb       |?   |		Loop_Increasing	0x5a0
05a5 e00d       |    |		Load	0x0,0xd
05a6 01c3       |    |		Execute	Vector,Check_In_Type
05a7 e5fd       |    |		Load	0x2,-0x3
05a8 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
05a9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05aa			TRAP_0540:
05aa 0007       |    |		Action	Break_Optional
05ab e5ff       |    |		Load	0x2,-0x1
05ac 8007       |    |		Call	0x0,0x7
05ad 00d8       |    |		Load_Top	At_Offset_0
05ae 0101       |    |		Execute	Exception,Reraise
05af 0000       |    |		.XXX[0x1]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b5       |    |		.CONST	0x05b5								; Address of begin
05b1 060d       |    |		.CONST	0x060d								; Address of exception handler
05b2 0002       |    |		.CONST	0x0002								; Number of locals
05b3			INIT_05b0:
05b3 029f 08eb  |    |		Declare_Subprogram	INIT_08e8,For_Call
05b5			BODY_05b0:
05b5 e403       |    |		Load	0x2,0x3
05b6 e024       | $  |		Load	0x0,0x24
05b7 012c       | ,  |		Execute	Any,Size
05b8 0271       | q  |		Execute	Discrete,Times
05b9 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
05ba 00d8       |    |		Load_Top	At_Offset_0
05bb e00a       |    |		Load	0x0,0xa
05bc 0260       | `  |		Execute	Discrete,In_Type
05bd 7001       |p   |		Jump_Nonzero	0x5bf
05be 0801       |    |		Execute_Immediate	Raise,0x1
05bf e05d       | ]  |		Load	0x0,0x5d
05c0 0322       | "  |		Declare_Variable	Record
05c1 485b       |H[  |		Short_Literal	0x5b
05c2 00d9       |    |		Load_Top	At_Offset_1
05c3 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05c4 e05d       | ]  |		Load	0x0,0x5d
05c5 012c       | ,  |		Execute	Any,Size
05c6 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
05c7 e403       |    |		Load	0x2,0x3
05c8 e024       | $  |		Load	0x0,0x24
05c9 012c       | ,  |		Execute	Any,Size
05ca 0271       | q  |		Execute	Discrete,Times
05cb 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
05cc 00d8       |    |		Load_Top	At_Offset_0
05cd e009       |    |		Load	0x0,0x9
05ce 0260       | `  |		Execute	Discrete,In_Type
05cf 7001       |p   |		Jump_Nonzero	0x5d1
05d0 0801       |    |		Execute_Immediate	Raise,0x1
05d1 0273       | s  |		Execute	Discrete,Plus
05d2 00d9       |    |		Load_Top	At_Offset_1
05d3 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
05d4 4800       |H   |		Short_Literal	0x0
05d5 00d9       |    |		Load_Top	At_Offset_1
05d6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05d7 e5fe       |    |		Load	0x2,-0x2
05d8 00d9       |    |		Load_Top	At_Offset_1
05d9 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
05da e5ff       |    |		Load	0x2,-0x1
05db e05e       | ^  |		Load	0x0,0x5e
05dc a05f       | _  |		Store_Unchecked	0x0,0x5f
05dd e060       | `  |		Load	0x0,0x60
05de e061       | a  |		Load	0x0,0x61
05df a062       | b  |		Store_Unchecked	0x0,0x62
05e0 8040       | @  |		Call	0x0,0x40
05e1 00cf       |    |		Action	Mark_Auxiliary
05e2 e5fd       |    |		Load	0x2,-0x3
05e3 01d9       |    |		Execute	Vector,Reverse_Bounds
05e4 0263       | c  |		Execute	Discrete,Above_Bound
05e5 700d       |p   |		Jump_Nonzero	0x5f3
05e6 00d8       |    |		Load_Top	At_Offset_0
05e7 e5fd       |    |		Load	0x2,-0x3
05e8 01d5       |    |		Execute	Vector,Field_Reference
05e9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05ea e5ff       |    |		Load	0x2,-0x1
05eb e063       | c  |		Load	0x0,0x63
05ec a064       | d  |		Store_Unchecked	0x0,0x64
05ed e065       | e  |		Load	0x0,0x65
05ee e066       | f  |		Load	0x0,0x66
05ef a067       | g  |		Store_Unchecked	0x0,0x67
05f0 8068       | h  |		Call	0x0,0x68
05f1 00c8       |    |		Action	Pop_Auxiliary_Range
05f2 3ff3       |?   |		Loop_Increasing	0x5e6
05f3 00ce       |    |		Action	Pop_Auxiliary
05f4 e005       |    |		Load	0x0,0x5
05f5 e402       |    |		Load	0x2,0x2
05f6 4800       |H   |		Short_Literal	0x0
05f7 e403       |    |		Load	0x2,0x3
05f8 e002       |    |		Load	0x0,0x2
05f9 012c       | ,  |		Execute	Any,Size
05fa 0271       | q  |		Execute	Discrete,Times
05fb 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
05fc 00d8       |    |		Load_Top	At_Offset_0
05fd e00a       |    |		Load	0x0,0xa
05fe 0260       | `  |		Execute	Discrete,In_Type
05ff 7001       |p   |		Jump_Nonzero	0x601
0600 0801       |    |		Execute_Immediate	Raise,0x1
0601 485b       |H[  |		Short_Literal	0x5b
0602 e5ff       |    |		Load	0x2,-0x1
0603 e019       |    |		Load	0x0,0x19
0604 a01a       |    |		Store_Unchecked	0x0,0x1a
0605 a01b       |    |		Store_Unchecked	0x0,0x1b
0606 801c       |    |		Call	0x0,0x1c
0607 00d1       |    |		Pop_Control	Pop_Count_1
0608 c404       |    |		Store	0x2,0x4
0609 e404       |    |		Load	0x2,0x4
060a 6801       |h   |		Jump_Zero	0x60c
060b 8602       |    |		Call	0x3,0x2
060c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
060d			TRAP_05b0:
060d 0007       |    |		Action	Break_Optional
060e e5ff       |    |		Load	0x2,-0x1
060f 8007       |    |		Call	0x0,0x7
0610 00d8       |    |		Load_Top	At_Offset_0
0611 0101       |    |		Execute	Exception,Reraise
0612 0000 0000  |    |		.BLANK	0000[0x6]
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 061b       |    |		.CONST	0x061b								; Address of begin
0619 0661       | a  |		.CONST	0x0661								; Address of exception handler
061a 0001       |    |		.CONST	0x0001								; Number of locals
061b			BODY_0618:
061b			INIT_0618:
061b e00e       |    |		Load	0x0,0xe
061c 012c       | ,  |		Execute	Any,Size
061d 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
061e 00d8       |    |		Load_Top	At_Offset_0
061f e00a       |    |		Load	0x0,0xa
0620 0260       | `  |		Execute	Discrete,In_Type
0621 7001       |p   |		Jump_Nonzero	0x623
0622 0801       |    |		Execute_Immediate	Raise,0x1
0623 0902       |    |		Execute_Immediate	Binary_Scale,0x2
0624 00d8       |    |		Load_Top	At_Offset_0
0625 e00a       |    |		Load	0x0,0xa
0626 0260       | `  |		Execute	Discrete,In_Type
0627 7001       |p   |		Jump_Nonzero	0x629
0628 0801       |    |		Execute_Immediate	Raise,0x1
0629 e06f       | o  |		Load	0x0,0x6f
062a 0322       | "  |		Declare_Variable	Record
062b 4859       |HY  |		Short_Literal	0x59
062c 00d9       |    |		Load_Top	At_Offset_1
062d 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
062e e06f       | o  |		Load	0x0,0x6f
062f 012c       | ,  |		Execute	Any,Size
0630 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0631 e00e       |    |		Load	0x0,0xe
0632 012c       | ,  |		Execute	Any,Size
0633 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0634 0273       | s  |		Execute	Discrete,Plus
0635 00d9       |    |		Load_Top	At_Offset_1
0636 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0637 4800       |H   |		Short_Literal	0x0
0638 00d9       |    |		Load_Top	At_Offset_1
0639 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
063a e5fe       |    |		Load	0x2,-0x2
063b 00d9       |    |		Load_Top	At_Offset_1
063c 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
063d e5ff       |    |		Load	0x2,-0x1
063e e070       | p  |		Load	0x0,0x70
063f a071       | q  |		Store_Unchecked	0x0,0x71
0640 e072       | r  |		Load	0x0,0x72
0641 e073       | s  |		Load	0x0,0x73
0642 a074       | t  |		Store_Unchecked	0x0,0x74
0643 8040       | @  |		Call	0x0,0x40
0644 e5fd       |    |		Load	0x2,-0x3
0645 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0646 e402       |    |		Load	0x2,0x2
0647 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0648 e5fd       |    |		Load	0x2,-0x3
0649 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
064a e402       |    |		Load	0x2,0x2
064b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
064c e5fd       |    |		Load	0x2,-0x3
064d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
064e e402       |    |		Load	0x2,0x2
064f 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0650 e5fd       |    |		Load	0x2,-0x3
0651 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0652 e402       |    |		Load	0x2,0x2
0653 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0654 e5fd       |    |		Load	0x2,-0x3
0655 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0656 e402       |    |		Load	0x2,0x2
0657 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0658 e402       |    |		Load	0x2,0x2
0659 e5ff       |    |		Load	0x2,-0x1
065a e075       | u  |		Load	0x0,0x75
065b a076       | v  |		Store_Unchecked	0x0,0x76
065c e077       | w  |		Load	0x0,0x77
065d e078       | x  |		Load	0x0,0x78
065e a079       | y  |		Store_Unchecked	0x0,0x79
065f 8068       | h  |		Call	0x0,0x68
0660 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0661			TRAP_0618:
0661 0007       |    |		Action	Break_Optional
0662 e5ff       |    |		Load	0x2,-0x1
0663 8007       |    |		Call	0x0,0x7
0664 00d8       |    |		Load_Top	At_Offset_0
0665 0101       |    |		Execute	Exception,Reraise
0666 0000 0000  |    |		.XXX[0x2]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 066b       | k  |		.CONST	0x066b								; Address of begin
0669 06cb       |    |		.CONST	0x06cb								; Address of exception handler
066a 0001       |    |		.CONST	0x0001								; Number of locals
066b			BODY_0668:
066b			INIT_0668:
066b e402       |    |		Load	0x2,0x2
066c e00e       |    |		Load	0x0,0xe
066d 012c       | ,  |		Execute	Any,Size
066e 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
066f 00d8       |    |		Load_Top	At_Offset_0
0670 e00a       |    |		Load	0x0,0xa
0671 0260       | `  |		Execute	Discrete,In_Type
0672 7001       |p   |		Jump_Nonzero	0x674
0673 0801       |    |		Execute_Immediate	Raise,0x1
0674 0271       | q  |		Execute	Discrete,Times
0675 0902       |    |		Execute_Immediate	Binary_Scale,0x2
0676 00d8       |    |		Load_Top	At_Offset_0
0677 e00a       |    |		Load	0x0,0xa
0678 0260       | `  |		Execute	Discrete,In_Type
0679 7001       |p   |		Jump_Nonzero	0x67b
067a 0801       |    |		Execute_Immediate	Raise,0x1
067b e06f       | o  |		Load	0x0,0x6f
067c 0322       | "  |		Declare_Variable	Record
067d 4859       |HY  |		Short_Literal	0x59
067e 00d9       |    |		Load_Top	At_Offset_1
067f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0680 e06f       | o  |		Load	0x0,0x6f
0681 012c       | ,  |		Execute	Any,Size
0682 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0683 e402       |    |		Load	0x2,0x2
0684 00d8       |    |		Load_Top	At_Offset_0
0685 e009       |    |		Load	0x0,0x9
0686 0260       | `  |		Execute	Discrete,In_Type
0687 7001       |p   |		Jump_Nonzero	0x689
0688 0801       |    |		Execute_Immediate	Raise,0x1
0689 e00e       |    |		Load	0x0,0xe
068a 012c       | ,  |		Execute	Any,Size
068b 0271       | q  |		Execute	Discrete,Times
068c 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
068d 0273       | s  |		Execute	Discrete,Plus
068e 00d9       |    |		Load_Top	At_Offset_1
068f 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0690 4800       |H   |		Short_Literal	0x0
0691 00d9       |    |		Load_Top	At_Offset_1
0692 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0693 e5fe       |    |		Load	0x2,-0x2
0694 00d9       |    |		Load_Top	At_Offset_1
0695 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0696 e5ff       |    |		Load	0x2,-0x1
0697 e070       | p  |		Load	0x0,0x70
0698 a071       | q  |		Store_Unchecked	0x0,0x71
0699 e072       | r  |		Load	0x0,0x72
069a e073       | s  |		Load	0x0,0x73
069b a074       | t  |		Store_Unchecked	0x0,0x74
069c 8040       | @  |		Call	0x0,0x40
069d 00cf       |    |		Action	Mark_Auxiliary
069e e5fd       |    |		Load	0x2,-0x3
069f 01d9       |    |		Execute	Vector,Reverse_Bounds
06a0 0263       | c  |		Execute	Discrete,Above_Bound
06a1 7028       |p(  |		Jump_Nonzero	0x6ca
06a2 00d8       |    |		Load_Top	At_Offset_0
06a3 e5fd       |    |		Load	0x2,-0x3
06a4 01d5       |    |		Execute	Vector,Field_Reference
06a5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
06a6 e403       |    |		Load	0x2,0x3
06a7 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
06a8 00d8       |    |		Load_Top	At_Offset_0
06a9 e5fd       |    |		Load	0x2,-0x3
06aa 01d5       |    |		Execute	Vector,Field_Reference
06ab 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06ac e403       |    |		Load	0x2,0x3
06ad 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
06ae 00d8       |    |		Load_Top	At_Offset_0
06af e5fd       |    |		Load	0x2,-0x3
06b0 01d5       |    |		Execute	Vector,Field_Reference
06b1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06b2 e403       |    |		Load	0x2,0x3
06b3 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
06b4 00d8       |    |		Load_Top	At_Offset_0
06b5 e5fd       |    |		Load	0x2,-0x3
06b6 01d5       |    |		Execute	Vector,Field_Reference
06b7 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
06b8 e403       |    |		Load	0x2,0x3
06b9 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
06ba 00d8       |    |		Load_Top	At_Offset_0
06bb e5fd       |    |		Load	0x2,-0x3
06bc 01d5       |    |		Execute	Vector,Field_Reference
06bd 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
06be e403       |    |		Load	0x2,0x3
06bf 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
06c0 e403       |    |		Load	0x2,0x3
06c1 e5ff       |    |		Load	0x2,-0x1
06c2 e075       | u  |		Load	0x0,0x75
06c3 a076       | v  |		Store_Unchecked	0x0,0x76
06c4 e077       | w  |		Load	0x0,0x77
06c5 e078       | x  |		Load	0x0,0x78
06c6 a079       | y  |		Store_Unchecked	0x0,0x79
06c7 8068       | h  |		Call	0x0,0x68
06c8 00c8       |    |		Action	Pop_Auxiliary_Range
06c9 3fd8       |?   |		Loop_Increasing	0x6a2
06ca 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
06cb			TRAP_0668:
06cb 0007       |    |		Action	Break_Optional
06cc e5ff       |    |		Load	0x2,-0x1
06cd 8007       |    |		Call	0x0,0x7
06ce 00d8       |    |		Load_Top	At_Offset_0
06cf 0101       |    |		Execute	Exception,Reraise
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d3       |    |		.CONST	0x06d3								; Address of begin
06d1 0709       |    |		.CONST	0x0709								; Address of exception handler
06d2 0001       |    |		.CONST	0x0001								; Number of locals
06d3			BODY_06d0:
06d3			INIT_06d0:
06d3 e402       |    |		Load	0x2,0x2
06d4 e07a       | z  |		Load	0x0,0x7a
06d5 0322       | "  |		Declare_Variable	Record
06d6 485a       |HZ  |		Short_Literal	0x5a
06d7 00d9       |    |		Load_Top	At_Offset_1
06d8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
06d9 e07a       | z  |		Load	0x0,0x7a
06da 012c       | ,  |		Execute	Any,Size
06db 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
06dc e402       |    |		Load	0x2,0x2
06dd 0a03       |    |		Execute_Immediate	Plus,0x3
06de 09fe       |    |		Execute_Immediate	Binary_Scale,-0x2
06df 0273       | s  |		Execute	Discrete,Plus
06e0 00d9       |    |		Load_Top	At_Offset_1
06e1 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
06e2 4800       |H   |		Short_Literal	0x0
06e3 00d9       |    |		Load_Top	At_Offset_1
06e4 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
06e5 4800       |H   |		Short_Literal	0x0
06e6 00d9       |    |		Load_Top	At_Offset_1
06e7 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
06e8 e5fe       |    |		Load	0x2,-0x2
06e9 00d9       |    |		Load_Top	At_Offset_1
06ea 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
06eb e5fb       |    |		Load	0x2,-0x5
06ec e07a       | z  |		Load	0x0,0x7a
06ed 3001       |0   |		Execute	Record,Field_Type,Field_Number 0x1
06ee 0119       |    |		Execute	Any,Check_In_Formal_Type
06ef 00d9       |    |		Load_Top	At_Offset_1
06f0 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
06f1 e5fc       |    |		Load	0x2,-0x4
06f2 00d9       |    |		Load_Top	At_Offset_1
06f3 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
06f4 e402       |    |		Load	0x2,0x2
06f5 00d9       |    |		Load_Top	At_Offset_1
06f6 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
06f7 e5ff       |    |		Load	0x2,-0x1
06f8 e07b       | {  |		Load	0x0,0x7b
06f9 a07c       | |  |		Store_Unchecked	0x0,0x7c
06fa e07d       | }  |		Load	0x0,0x7d
06fb e07e       | ~  |		Load	0x0,0x7e
06fc a07f       |    |		Store_Unchecked	0x0,0x7f
06fd 8040       | @  |		Call	0x0,0x40
06fe e5fd       |    |		Load	0x2,-0x3
06ff e5ff       |    |		Load	0x2,-0x1
0700 e041       | A  |		Load	0x0,0x41
0701 e042       | B  |		Load	0x0,0x42
0702 e043       | C  |		Load	0x0,0x43
0703 a044       | D  |		Store_Unchecked	0x0,0x44
0704 e045       | E  |		Load	0x0,0x45
0705 e046       | F  |		Load	0x0,0x46
0706 a047       | G  |		Store_Unchecked	0x0,0x47
0707 8048       | H  |		Call	0x0,0x48
0708 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0709			TRAP_06d0:
0709 0007       |    |		Action	Break_Optional
070a e5ff       |    |		Load	0x2,-0x1
070b 8007       |    |		Call	0x0,0x7
070c 00d8       |    |		Load_Top	At_Offset_0
070d 0101       |    |		Execute	Exception,Reraise
070e 0000 0000  |    |		.XXX[0x2]
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 0713       |    |		.CONST	0x0713								; Address of begin
0711 0736       | 6  |		.CONST	0x0736								; Address of exception handler
0712 0001       |    |		.CONST	0x0001								; Number of locals
0713			BODY_0710:
0713			INIT_0710:
0713 e00f       |    |		Load	0x0,0xf
0714 0322       | "  |		Declare_Variable	Record
0715 e5ff       |    |		Load	0x2,-0x1
0716 8080       |    |		Call	0x0,0x80
0717 00d9       |    |		Load_Top	At_Offset_1
0718 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0719 e402       |    |		Load	0x2,0x2
071a 017d       | }  |		Execute	Record,Structure_Write
071b e081       |    |		Load	0x0,0x81
071c 0322       | "  |		Declare_Variable	Record
071d 4850       |HP  |		Short_Literal	0x50
071e 00d9       |    |		Load_Top	At_Offset_1
071f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0720 e081       |    |		Load	0x0,0x81
0721 012c       | ,  |		Execute	Any,Size
0722 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0723 00d9       |    |		Load_Top	At_Offset_1
0724 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0725 4800       |H   |		Short_Literal	0x0
0726 00d9       |    |		Load_Top	At_Offset_1
0727 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0728 e402       |    |		Load	0x2,0x2
0729 00d9       |    |		Load_Top	At_Offset_1
072a 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
072b e5fe       |    |		Load	0x2,-0x2
072c 00d9       |    |		Load_Top	At_Offset_1
072d 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
072e e5ff       |    |		Load	0x2,-0x1
072f e082       |    |		Load	0x0,0x82
0730 a083       |    |		Store_Unchecked	0x0,0x83
0731 e084       |    |		Load	0x0,0x84
0732 e085       |    |		Load	0x0,0x85
0733 a086       |    |		Store_Unchecked	0x0,0x86
0734 8018       |    |		Call	0x0,0x18
0735 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0736			TRAP_0710:
0736 0007       |    |		Action	Break_Optional
0737 e5ff       |    |		Load	0x2,-0x1
0738 8007       |    |		Call	0x0,0x7
0739 00d8       |    |		Load_Top	At_Offset_0
073a 0101       |    |		Execute	Exception,Reraise
073b 0000 0000  |    |		.BLANK	0000[0x5]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0743       | C  |		.CONST	0x0743								; Address of begin
0741 0772       | r  |		.CONST	0x0772								; Address of exception handler
0742 0001       |    |		.CONST	0x0001								; Number of locals
0743			BODY_0740:
0743			INIT_0740:
0743 e00f       |    |		Load	0x0,0xf
0744 0322       | "  |		Declare_Variable	Record
0745 e5ff       |    |		Load	0x2,-0x1
0746 8080       |    |		Call	0x0,0x80
0747 00d9       |    |		Load_Top	At_Offset_1
0748 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0749 e402       |    |		Load	0x2,0x2
074a 017d       | }  |		Execute	Record,Structure_Write
074b e5fd       |    |		Load	0x2,-0x3
074c e087       |    |		Load	0x0,0x87
074d 022f       | /  |		Execute	Access,Equal
074e 7005       |p   |		Jump_Nonzero	0x754
074f e5fd       |    |		Load	0x2,-0x3
0750 0227       | '  |		Execute	Access,All_Reference
0751 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0752 e403       |    |		Load	0x2,0x3
0753 017d       | }  |		Execute	Record,Structure_Write
0754 e088       |    |		Load	0x0,0x88
0755 0322       | "  |		Declare_Variable	Record
0756 484e       |HN  |		Short_Literal	0x4e
0757 00d9       |    |		Load_Top	At_Offset_1
0758 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0759 e088       |    |		Load	0x0,0x88
075a 012c       | ,  |		Execute	Any,Size
075b 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
075c 00d9       |    |		Load_Top	At_Offset_1
075d 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
075e e5fe       |    |		Load	0x2,-0x2
075f 00d9       |    |		Load_Top	At_Offset_1
0760 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0761 e402       |    |		Load	0x2,0x2
0762 00d9       |    |		Load_Top	At_Offset_1
0763 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0764 e5fc       |    |		Load	0x2,-0x4
0765 00d9       |    |		Load_Top	At_Offset_1
0766 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0767 e403       |    |		Load	0x2,0x3
0768 00d9       |    |		Load_Top	At_Offset_1
0769 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
076a e5ff       |    |		Load	0x2,-0x1
076b e089       |    |		Load	0x0,0x89
076c a08a       |    |		Store_Unchecked	0x0,0x8a
076d e08b       |    |		Load	0x0,0x8b
076e e08c       |    |		Load	0x0,0x8c
076f a08d       |    |		Store_Unchecked	0x0,0x8d
0770 8018       |    |		Call	0x0,0x18
0771 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0772			TRAP_0740:
0772 0007       |    |		Action	Break_Optional
0773 e5ff       |    |		Load	0x2,-0x1
0774 8007       |    |		Call	0x0,0x7
0775 00d8       |    |		Load_Top	At_Offset_0
0776 0101       |    |		Execute	Exception,Reraise
0777 0000       |    |		.XXX[0x1]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 077b       | {  |		.CONST	0x077b								; Address of begin
0779 0796       |    |		.CONST	0x0796								; Address of exception handler
077a 0001       |    |		.CONST	0x0001								; Number of locals
077b			BODY_0778:
077b			INIT_0778:
077b e08e       |    |		Load	0x0,0x8e
077c 0322       | "  |		Declare_Variable	Record
077d 484f       |HO  |		Short_Literal	0x4f
077e 00d9       |    |		Load_Top	At_Offset_1
077f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0780 e08e       |    |		Load	0x0,0x8e
0781 012c       | ,  |		Execute	Any,Size
0782 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0783 00d9       |    |		Load_Top	At_Offset_1
0784 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0785 4800       |H   |		Short_Literal	0x0
0786 00d9       |    |		Load_Top	At_Offset_1
0787 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0788 e5fe       |    |		Load	0x2,-0x2
0789 00d9       |    |		Load_Top	At_Offset_1
078a 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
078b e5ff       |    |		Load	0x2,-0x1
078c e08f       |    |		Load	0x0,0x8f
078d a090       |    |		Store_Unchecked	0x0,0x90
078e e091       |    |		Load	0x0,0x91
078f e092       |    |		Load	0x0,0x92
0790 a093       |    |		Store_Unchecked	0x0,0x93
0791 8018       |    |		Call	0x0,0x18
0792 e094       |    |		Load	0x0,0x94
0793 e5fe       |    |		Load	0x2,-0x2
0794 017d       | }  |		Execute	Record,Structure_Write
0795 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0796			TRAP_0778:
0796 0007       |    |		Action	Break_Optional
0797 e5ff       |    |		Load	0x2,-0x1
0798 8007       |    |		Call	0x0,0x7
0799 00d8       |    |		Load_Top	At_Offset_0
079a 0101       |    |		Execute	Exception,Reraise
079b 0000 0000  |    |		.BLANK	0000[0x5]
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a3       |    |		.CONST	0x07a3								; Address of begin
07a1 07bb       |    |		.CONST	0x07bb								; Address of exception handler
07a2 0001       |    |		.CONST	0x0001								; Number of locals
07a3			BODY_07a0:
07a3			INIT_07a0:
07a3 e095       |    |		Load	0x0,0x95
07a4 0322       | "  |		Declare_Variable	Record
07a5 4851       |HQ  |		Short_Literal	0x51
07a6 00d9       |    |		Load_Top	At_Offset_1
07a7 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
07a8 e095       |    |		Load	0x0,0x95
07a9 012c       | ,  |		Execute	Any,Size
07aa 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
07ab 00d9       |    |		Load_Top	At_Offset_1
07ac 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
07ad 4800       |H   |		Short_Literal	0x0
07ae 00d9       |    |		Load_Top	At_Offset_1
07af 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
07b0 e5fe       |    |		Load	0x2,-0x2
07b1 00d9       |    |		Load_Top	At_Offset_1
07b2 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
07b3 e5ff       |    |		Load	0x2,-0x1
07b4 e096       |    |		Load	0x0,0x96
07b5 a097       |    |		Store_Unchecked	0x0,0x97
07b6 e098       |    |		Load	0x0,0x98
07b7 e099       |    |		Load	0x0,0x99
07b8 a09a       |    |		Store_Unchecked	0x0,0x9a
07b9 8018       |    |		Call	0x0,0x18
07ba 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07bb			TRAP_07a0:
07bb 0007       |    |		Action	Break_Optional
07bc e5ff       |    |		Load	0x2,-0x1
07bd 8007       |    |		Call	0x0,0x7
07be 00d8       |    |		Load_Top	At_Offset_0
07bf 0101       |    |		Execute	Exception,Reraise
07c0 ; --------------------------------------------------------------------------------------
07c0 ; SUBPROGRAM
07c0 ; --------------------------------------------------------------------------------------
07c0 07c5       |    |		.CONST	0x07c5								; Address of begin
07c1 07f3       |    |		.CONST	0x07f3								; Address of exception handler
07c2 0002       |    |		.CONST	0x0002								; Number of locals
07c3			INIT_07c0:
07c3 029f 094b  |   K|		Declare_Subprogram	INIT_0948,For_Call
07c5			BODY_07c0:
07c5 e09b       |    |		Load	0x0,0x9b
07c6 0322       | "  |		Declare_Variable	Record
07c7 4853       |HS  |		Short_Literal	0x53
07c8 00d9       |    |		Load_Top	At_Offset_1
07c9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
07ca e09b       |    |		Load	0x0,0x9b
07cb 012c       | ,  |		Execute	Any,Size
07cc 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
07cd 00d9       |    |		Load_Top	At_Offset_1
07ce 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
07cf 4800       |H   |		Short_Literal	0x0
07d0 00d9       |    |		Load_Top	At_Offset_1
07d1 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
07d2 e5fe       |    |		Load	0x2,-0x2
07d3 00d9       |    |		Load_Top	At_Offset_1
07d4 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
07d5 e5ff       |    |		Load	0x2,-0x1
07d6 e09c       |    |		Load	0x0,0x9c
07d7 a09d       |    |		Store_Unchecked	0x0,0x9d
07d8 e09e       |    |		Load	0x0,0x9e
07d9 e09f       |    |		Load	0x0,0x9f
07da a0a0       |    |		Store_Unchecked	0x0,0xa0
07db 8018       |    |		Call	0x0,0x18
07dc e005       |    |		Load	0x0,0x5
07dd e402       |    |		Load	0x2,0x2
07de 4800       |H   |		Short_Literal	0x0
07df 4800       |H   |		Short_Literal	0x0
07e0 4853       |HS  |		Short_Literal	0x53
07e1 e5ff       |    |		Load	0x2,-0x1
07e2 e019       |    |		Load	0x0,0x19
07e3 a01a       |    |		Store_Unchecked	0x0,0x1a
07e4 a01b       |    |		Store_Unchecked	0x0,0x1b
07e5 801c       |    |		Call	0x0,0x1c
07e6 00d1       |    |		Pop_Control	Pop_Count_1
07e7 c403       |    |		Store	0x2,0x3
07e8 e403       |    |		Load	0x2,0x3
07e9 7007       |p   |		Jump_Nonzero	0x7f1
07ea e5ff       |    |		Load	0x2,-0x1
07eb 8007       |    |		Call	0x0,0x7
07ec e5ff       |    |		Load	0x2,-0x1
07ed 8008       |    |		Call	0x0,0x8
07ee e0a1       |    |		Load	0x0,0xa1
07ef 00cb       |    |		Action	Pop_Block_With_Result
07f0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07f1 8602       |    |		Call	0x3,0x2
07f2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07f3			TRAP_07c0:
07f3 0007       |    |		Action	Break_Optional
07f4 e5ff       |    |		Load	0x2,-0x1
07f5 8007       |    |		Call	0x0,0x7
07f6 00d8       |    |		Load_Top	At_Offset_0
07f7 0101       |    |		Execute	Exception,Reraise
07f8 ; --------------------------------------------------------------------------------------
07f8 ; SUBPROGRAM
07f8 ; --------------------------------------------------------------------------------------
07f8 07fb       |    |		.CONST	0x07fb								; Address of begin
07f9 0838       | 8  |		.CONST	0x0838								; Address of exception handler
07fa 0001       |    |		.CONST	0x0001								; Number of locals
07fb			BODY_07f8:
07fb			INIT_07f8:
07fb 4804       |H   |		Short_Literal	0x4
07fc e0a2       |    |		Load	0x0,0xa2
07fd 0322       | "  |		Declare_Variable	Record
07fe 4802       |H   |		Short_Literal	0x2
07ff 00d9       |    |		Load_Top	At_Offset_1
0800 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0801 e0a2       |    |		Load	0x0,0xa2
0802 012c       | ,  |		Execute	Any,Size
0803 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0804 0a01       |    |		Execute_Immediate	Plus,0x1
0805 00d9       |    |		Load_Top	At_Offset_1
0806 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0807 4800       |H   |		Short_Literal	0x0
0808 00d9       |    |		Load_Top	At_Offset_1
0809 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
080a e5fe       |    |		Load	0x2,-0x2
080b 00d9       |    |		Load_Top	At_Offset_1
080c 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
080d e0a2       |    |		Load	0x0,0xa2
080e 3004       |0   |		Execute	Record,Field_Type,Field_Number 0x4
080f 0337       | 7  |		Declare_Variable	Array
0810 4801       |H   |		Short_Literal	0x1
0811 4812       |H   |		Short_Literal	0x12
0812 00da       |    |		Load_Top	At_Offset_2
0813 01d6       |    |		Execute	Vector,Field_Write
0814 4811       |H   |		Short_Literal	0x11
0815 4800       |H   |		Short_Literal	0x0
0816 4800       |H   |		Short_Literal	0x0
0817 00d9       |    |		Load_Top	At_Offset_1
0818 e604       |    |		Load	0x3,0x4
0819 01d6       |    |		Execute	Vector,Field_Write
081a 3ffb       |?   |		Loop_Increasing	0x816
081b 481f       |H   |		Short_Literal	0x1f
081c 4813       |H   |		Short_Literal	0x13
081d 4800       |H   |		Short_Literal	0x0
081e 00d9       |    |		Load_Top	At_Offset_1
081f e604       |    |		Load	0x3,0x4
0820 01d6       |    |		Execute	Vector,Field_Write
0821 3ffb       |?   |		Loop_Increasing	0x81d
0822 e0a2       |    |		Load	0x0,0xa2
0823 3004       |0   |		Execute	Record,Field_Type,Field_Number 0x4
0824 0119       |    |		Execute	Any,Check_In_Formal_Type
0825 00d9       |    |		Load_Top	At_Offset_1
0826 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0827 e5ff       |    |		Load	0x2,-0x1
0828 e0a3       |    |		Load	0x0,0xa3
0829 a0a4       |    |		Store_Unchecked	0x0,0xa4
082a e0a5       |    |		Load	0x0,0xa5
082b e0a6       |    |		Load	0x0,0xa6
082c a0a7       |    |		Store_Unchecked	0x0,0xa7
082d 8040       | @  |		Call	0x0,0x40
082e e5fd       |    |		Load	0x2,-0x3
082f 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0830 e5ff       |    |		Load	0x2,-0x1
0831 e0a8       |    |		Load	0x0,0xa8
0832 a0a9       |    |		Store_Unchecked	0x0,0xa9
0833 e0aa       |    |		Load	0x0,0xaa
0834 e0ab       |    |		Load	0x0,0xab
0835 a0ac       |    |		Store_Unchecked	0x0,0xac
0836 8068       | h  |		Call	0x0,0x68
0837 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0838			TRAP_07f8:
0838 0007       |    |		Action	Break_Optional
0839 e5ff       |    |		Load	0x2,-0x1
083a 8007       |    |		Call	0x0,0x7
083b 00d8       |    |		Load_Top	At_Offset_0
083c 0101       |    |		Execute	Exception,Reraise
083d 0000 0000  |    |		.XXX[0x3]
083f 0000       |    |
0840 ; --------------------------------------------------------------------------------------
0840 ; SUBPROGRAM
0840 ; --------------------------------------------------------------------------------------
0840 0843       | C  |		.CONST	0x0843								; Address of begin
0841 085b       | [  |		.CONST	0x085b								; Address of exception handler
0842 0001       |    |		.CONST	0x0001								; Number of locals
0843			BODY_0840:
0843			INIT_0840:
0843 e0ad       |    |		Load	0x0,0xad
0844 0322       | "  |		Declare_Variable	Record
0845 4852       |HR  |		Short_Literal	0x52
0846 00d9       |    |		Load_Top	At_Offset_1
0847 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0848 e0ad       |    |		Load	0x0,0xad
0849 012c       | ,  |		Execute	Any,Size
084a 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
084b 00d9       |    |		Load_Top	At_Offset_1
084c 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
084d 4800       |H   |		Short_Literal	0x0
084e 00d9       |    |		Load_Top	At_Offset_1
084f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0850 e5fe       |    |		Load	0x2,-0x2
0851 00d9       |    |		Load_Top	At_Offset_1
0852 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0853 e5ff       |    |		Load	0x2,-0x1
0854 e0ae       |    |		Load	0x0,0xae
0855 a0af       |    |		Store_Unchecked	0x0,0xaf
0856 e0b0       |    |		Load	0x0,0xb0
0857 e0b1       |    |		Load	0x0,0xb1
0858 a0b2       |    |		Store_Unchecked	0x0,0xb2
0859 8018       |    |		Call	0x0,0x18
085a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
085b			TRAP_0840:
085b 0007       |    |		Action	Break_Optional
085c e5ff       |    |		Load	0x2,-0x1
085d 8007       |    |		Call	0x0,0x7
085e 00d8       |    |		Load_Top	At_Offset_0
085f 0101       |    |		Execute	Exception,Reraise
0860 ; --------------------------------------------------------------------------------------
0860 ; SUBPROGRAM
0860 ; --------------------------------------------------------------------------------------
0860 0863       | c  |		.CONST	0x0863								; Address of begin
0861 08df       |    |		.CONST	0x08df								; Address of exception handler
0862 0001       |    |		.CONST	0x0001								; Number of locals
0863			BODY_0860:
0863			INIT_0860:
0863 e403       |    |		Load	0x2,0x3
0864 e057       | W  |		Load	0x0,0x57
0865 0322       | "  |		Declare_Variable	Record
0866 485c       |H\  |		Short_Literal	0x5c
0867 00d9       |    |		Load_Top	At_Offset_1
0868 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0869 e057       | W  |		Load	0x0,0x57
086a 012c       | ,  |		Execute	Any,Size
086b 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
086c e403       |    |		Load	0x2,0x3
086d 0a03       |    |		Execute_Immediate	Plus,0x3
086e 00d8       |    |		Load_Top	At_Offset_0
086f e009       |    |		Load	0x0,0x9
0870 0260       | `  |		Execute	Discrete,In_Type
0871 7001       |p   |		Jump_Nonzero	0x873
0872 0801       |    |		Execute_Immediate	Raise,0x1
0873 09fe       |    |		Execute_Immediate	Binary_Scale,-0x2
0874 0273       | s  |		Execute	Discrete,Plus
0875 00d9       |    |		Load_Top	At_Offset_1
0876 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0877 4800       |H   |		Short_Literal	0x0
0878 00d9       |    |		Load_Top	At_Offset_1
0879 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
087a 4800       |H   |		Short_Literal	0x0
087b 00d9       |    |		Load_Top	At_Offset_1
087c 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
087d 4800       |H   |		Short_Literal	0x0
087e 00d9       |    |		Load_Top	At_Offset_1
087f 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0880 e5fe       |    |		Load	0x2,-0x2
0881 00d9       |    |		Load_Top	At_Offset_1
0882 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0883 e403       |    |		Load	0x2,0x3
0884 00d8       |    |		Load_Top	At_Offset_0
0885 e009       |    |		Load	0x0,0x9
0886 0260       | `  |		Execute	Discrete,In_Type
0887 7001       |p   |		Jump_Nonzero	0x889
0888 0801       |    |		Execute_Immediate	Raise,0x1
0889 00d9       |    |		Load_Top	At_Offset_1
088a 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
088b e5ff       |    |		Load	0x2,-0x1
088c e058       | X  |		Load	0x0,0x58
088d a059       | Y  |		Store_Unchecked	0x0,0x59
088e e05a       | Z  |		Load	0x0,0x5a
088f e05b       | [  |		Load	0x0,0x5b
0890 a05c       | \  |		Store_Unchecked	0x0,0x5c
0891 8040       | @  |		Call	0x0,0x40
0892 e5fd       |    |		Load	0x2,-0x3
0893 e5ff       |    |		Load	0x2,-0x1
0894 e041       | A  |		Load	0x0,0x41
0895 e042       | B  |		Load	0x0,0x42
0896 e043       | C  |		Load	0x0,0x43
0897 a044       | D  |		Store_Unchecked	0x0,0x44
0898 e045       | E  |		Load	0x0,0x45
0899 e046       | F  |		Load	0x0,0x46
089a a047       | G  |		Store_Unchecked	0x0,0x47
089b 8048       | H  |		Call	0x0,0x48
089c e005       |    |		Load	0x0,0x5
089d e602       |    |		Load	0x3,0x2
089e 4801       |H   |		Short_Literal	0x1
089f 4800       |H   |		Short_Literal	0x0
08a0 485c       |H\  |		Short_Literal	0x5c
08a1 e5ff       |    |		Load	0x2,-0x1
08a2 e019       |    |		Load	0x0,0x19
08a3 a01a       |    |		Store_Unchecked	0x0,0x1a
08a4 a01b       |    |		Store_Unchecked	0x0,0x1b
08a5 801c       |    |		Call	0x0,0x1c
08a6 00d1       |    |		Pop_Control	Pop_Count_1
08a7 c603       |    |		Store	0x3,0x3
08a8 e603       |    |		Load	0x3,0x3
08a9 700c       |p   |		Jump_Nonzero	0x8b6
08aa e00c       |    |		Load	0x0,0xc
08ab e5fc       |    |		Load	0x2,-0x4
08ac 017d       | }  |		Execute	Record,Structure_Write
08ad 4800       |H   |		Short_Literal	0x0
08ae a5fb       |    |		Store_Unchecked	0x2,-0x5
08af e5ff       |    |		Load	0x2,-0x1
08b0 8007       |    |		Call	0x0,0x7
08b1 e5ff       |    |		Load	0x2,-0x1
08b2 8008       |    |		Call	0x0,0x8
08b3 00cc       |    |		Action	Pop_Block
08b4 00cc       |    |		Action	Pop_Block
08b5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
08b6 e602       |    |		Load	0x3,0x2
08b7 261f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
08b8 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
08b9 e5fc       |    |		Load	0x2,-0x4
08ba 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
08bb e602       |    |		Load	0x3,0x2
08bc 261f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
08bd 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
08be e5fc       |    |		Load	0x2,-0x4
08bf 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
08c0 e602       |    |		Load	0x3,0x2
08c1 261f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
08c2 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
08c3 e5fc       |    |		Load	0x2,-0x4
08c4 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
08c5 e00d       |    |		Load	0x0,0xd
08c6 0337       | 7  |		Declare_Variable	Array
08c7 4801       |H   |		Short_Literal	0x1
08c8 4807       |H   |		Short_Literal	0x7
08c9 00da       |    |		Load_Top	At_Offset_2
08ca 01d6       |    |		Execute	Vector,Field_Write
08cb 4801       |H   |		Short_Literal	0x1
08cc 4806       |H   |		Short_Literal	0x6
08cd 00da       |    |		Load_Top	At_Offset_2
08ce 01d6       |    |		Execute	Vector,Field_Write
08cf 4801       |H   |		Short_Literal	0x1
08d0 4805       |H   |		Short_Literal	0x5
08d1 00da       |    |		Load_Top	At_Offset_2
08d2 01d6       |    |		Execute	Vector,Field_Write
08d3 4804       |H   |		Short_Literal	0x4
08d4 4800       |H   |		Short_Literal	0x0
08d5 4800       |H   |		Short_Literal	0x0
08d6 00d9       |    |		Load_Top	At_Offset_1
08d7 e802       |    |		Load	0x4,0x2
08d8 01d6       |    |		Execute	Vector,Field_Write
08d9 3ffb       |?   |		Loop_Increasing	0x8d5
08da e00d       |    |		Load	0x0,0xd
08db 01c3       |    |		Execute	Vector,Check_In_Type
08dc e5fc       |    |		Load	0x2,-0x4
08dd 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
08de 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08df			TRAP_0860:
08df 0007       |    |		Action	Break_Optional
08e0 e5ff       |    |		Load	0x2,-0x1
08e1 8007       |    |		Call	0x0,0x7
08e2 00d8       |    |		Load_Top	At_Offset_0
08e3 0101       |    |		Execute	Exception,Reraise
08e4 0000 0000  |    |		.BLANK	0000[0x4]
08e8 ; --------------------------------------------------------------------------------------
08e8 ; SUBPROGRAM
08e8 ; --------------------------------------------------------------------------------------
08e8 08f0       |    |		.CONST	0x08f0								; Address of begin
08e9 0004       |    |		.CONST	0x0004								; Address of exception handler
08ea 0002       |    |		.CONST	0x0002								; Number of locals
08eb			INIT_08e8:
08eb 4801       |H   |		Short_Literal	0x1
08ec e403       |    |		Load	0x2,0x3
08ed e0b3       |    |		Load	0x0,0xb3
08ee 035b       | [  |		Declare_Type	Array,Constrained
08ef 0337       | 7  |		Declare_Variable	Array
08f0			BODY_08e8:
08f0 00d8       |    |		Load_Top	At_Offset_0
08f1 e5ff       |    |		Load	0x2,-0x1
08f2 e0b4       |    |		Load	0x0,0xb4
08f3 e0b5       |    |		Load	0x0,0xb5
08f4 e0b6       |    |		Load	0x0,0xb6
08f5 a0b7       |    |		Store_Unchecked	0x0,0xb7
08f6 e0b8       |    |		Load	0x0,0xb8
08f7 e0b9       |    |		Load	0x0,0xb9
08f8 a0ba       |    |		Store_Unchecked	0x0,0xba
08f9 802c       | ,  |		Call	0x0,0x2c
08fa 00d1       |    |		Pop_Control	Pop_Count_1
08fb 00cf       |    |		Action	Mark_Auxiliary
08fc 00d9       |    |		Load_Top	At_Offset_1
08fd 01d9       |    |		Execute	Vector,Reverse_Bounds
08fe 0263       | c  |		Execute	Discrete,Above_Bound
08ff 7045       |pE  |		Jump_Nonzero	0x945
0900 00d8       |    |		Load_Top	At_Offset_0
0901 e802       |    |		Load	0x4,0x2
0902 01d5       |    |		Execute	Vector,Field_Reference
0903 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0904 e5fd       |    |		Load	0x2,-0x3
0905 01dd       |    |		Execute	Vector,First
0906 0aff       |    |		Execute_Immediate	Plus,-0x1
0907 00da       |    |		Load_Top	At_Offset_2
0908 0273       | s  |		Execute	Discrete,Plus
0909 e5fd       |    |		Load	0x2,-0x3
090a 01d5       |    |		Execute	Vector,Field_Reference
090b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
090c 00d8       |    |		Load_Top	At_Offset_0
090d e802       |    |		Load	0x4,0x2
090e 01d5       |    |		Execute	Vector,Field_Reference
090f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0910 e5fd       |    |		Load	0x2,-0x3
0911 01dd       |    |		Execute	Vector,First
0912 0aff       |    |		Execute_Immediate	Plus,-0x1
0913 00da       |    |		Load_Top	At_Offset_2
0914 0273       | s  |		Execute	Discrete,Plus
0915 e5fd       |    |		Load	0x2,-0x3
0916 01d5       |    |		Execute	Vector,Field_Reference
0917 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0918 00d8       |    |		Load_Top	At_Offset_0
0919 e802       |    |		Load	0x4,0x2
091a 01d5       |    |		Execute	Vector,Field_Reference
091b 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
091c e5fd       |    |		Load	0x2,-0x3
091d 01dd       |    |		Execute	Vector,First
091e 0aff       |    |		Execute_Immediate	Plus,-0x1
091f 00da       |    |		Load_Top	At_Offset_2
0920 0273       | s  |		Execute	Discrete,Plus
0921 e5fd       |    |		Load	0x2,-0x3
0922 01d5       |    |		Execute	Vector,Field_Reference
0923 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0924 e00d       |    |		Load	0x0,0xd
0925 0337       | 7  |		Declare_Variable	Array
0926 4801       |H   |		Short_Literal	0x1
0927 4807       |H   |		Short_Literal	0x7
0928 00da       |    |		Load_Top	At_Offset_2
0929 01d6       |    |		Execute	Vector,Field_Write
092a 4801       |H   |		Short_Literal	0x1
092b 4806       |H   |		Short_Literal	0x6
092c 00da       |    |		Load_Top	At_Offset_2
092d 01d6       |    |		Execute	Vector,Field_Write
092e 4801       |H   |		Short_Literal	0x1
092f 4805       |H   |		Short_Literal	0x5
0930 00da       |    |		Load_Top	At_Offset_2
0931 01d6       |    |		Execute	Vector,Field_Write
0932 4804       |H   |		Short_Literal	0x4
0933 4800       |H   |		Short_Literal	0x0
0934 4800       |H   |		Short_Literal	0x0
0935 00d9       |    |		Load_Top	At_Offset_1
0936 e806       |    |		Load	0x4,0x6
0937 01d6       |    |		Execute	Vector,Field_Write
0938 3ffb       |?   |		Loop_Increasing	0x934
0939 e00d       |    |		Load	0x0,0xd
093a 01c3       |    |		Execute	Vector,Check_In_Type
093b e5fd       |    |		Load	0x2,-0x3
093c 01dd       |    |		Execute	Vector,First
093d 0aff       |    |		Execute_Immediate	Plus,-0x1
093e 00da       |    |		Load_Top	At_Offset_2
093f 0273       | s  |		Execute	Discrete,Plus
0940 e5fd       |    |		Load	0x2,-0x3
0941 01d5       |    |		Execute	Vector,Field_Reference
0942 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0943 00c8       |    |		Action	Pop_Auxiliary_Range
0944 3fbb       |?   |		Loop_Increasing	0x900
0945 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0946 0000 0000  |    |		.XXX[0x2]
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 0954       | T  |		.CONST	0x0954								; Address of begin
0949 096a       | j  |		.CONST	0x096a								; Address of exception handler
094a 0004       |    |		.CONST	0x0004								; Number of locals
094b			INIT_0948:
094b e0a1       |    |		Load	0x0,0xa1
094c 0007       |    |		Action	Break_Optional
094d e402       |    |		Load	0x2,0x2
094e 261d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1d
094f 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0950 e00a       |    |		Load	0x0,0xa
0951 03f1       |    |		Declare_Variable	Discrete,With_Value
0952 029f 097b  |   {|		Declare_Subprogram	INIT_0978,For_Call
0954			BODY_0948:
0954 8804       |    |		Call	0x4,0x4
0955 00da       |    |		Load_Top	At_Offset_2
0956 0229       | )  |		Execute	Access,All_Read
0957 00d8       |    |		Load_Top	At_Offset_0
0958 e5ff       |    |		Load	0x2,-0x1
0959 e0bb       |    |		Load	0x0,0xbb
095a e0bc       |    |		Load	0x0,0xbc
095b e0bd       |    |		Load	0x0,0xbd
095c a0be       |    |		Store_Unchecked	0x0,0xbe
095d e0bf       |    |		Load	0x0,0xbf
095e e0c0       |    |		Load	0x0,0xc0
095f a0c1       |    |		Store_Unchecked	0x0,0xc1
0960 802c       | ,  |		Call	0x0,0x2c
0961 00d2       |    |		Pop_Control	Pop_Count_2
0962 e5ff       |    |		Load	0x2,-0x1
0963 8007       |    |		Call	0x0,0x7
0964 e5ff       |    |		Load	0x2,-0x1
0965 8008       |    |		Call	0x0,0x8
0966 00da       |    |		Load_Top	At_Offset_2
0967 00cb       |    |		Action	Pop_Block_With_Result
0968 00cb       |    |		Action	Pop_Block_With_Result
0969 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
096a			TRAP_0948:
096a 0007       |    |		Action	Break_Optional
096b 00db       |    |		Load_Top	At_Offset_3
096c e0c2       |    |		Load	0x0,0xc2
096d e0c3       |    |		Load	0x0,0xc3
096e a0c4       |    |		Store_Unchecked	0x0,0xc4
096f 80c5       |    |		Call	0x0,0xc5
0970 c802       |    |		Store	0x4,0x2
0971 00d8       |    |		Load_Top	At_Offset_0
0972 0101       |    |		Execute	Exception,Reraise
0973 0000 0000  |    |		.BLANK	0000[0x5]
0978 ; --------------------------------------------------------------------------------------
0978 ; SUBPROGRAM
0978 ; --------------------------------------------------------------------------------------
0978 097b       | {  |		.CONST	0x097b								; Address of begin
0979 0981       |    |		.CONST	0x0981								; Address of exception handler
097a 0001       |    |		.CONST	0x0001								; Number of locals
097b			BODY_0978:
097b			INIT_0978:
097b 4801       |H   |		Short_Literal	0x1
097c e803       |    |		Load	0x4,0x3
097d e0a1       |    |		Load	0x0,0xa1
097e 03ba       |    |		Declare_Variable	Access,By_Allocation,With_Constraint
097f a802       |    |		Store_Unchecked	0x4,0x2
0980 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0981			TRAP_0978:
0981 0007       |    |		Action	Break_Optional
0982 e803       |    |		Load	0x4,0x3
0983 e00f       |    |		Load	0x0,0xf
0984 012c       | ,  |		Execute	Any,Size
0985 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
0986 0271       | q  |		Execute	Discrete,Times
0987 00d8       |    |		Load_Top	At_Offset_0
0988 e00a       |    |		Load	0x0,0xa
0989 0260       | `  |		Execute	Discrete,In_Type
098a 7001       |p   |		Jump_Nonzero	0x98c
098b 0801       |    |		Execute_Immediate	Raise,0x1
098c e5ff       |    |		Load	0x2,-0x1
098d 80c6       |    |		Call	0x0,0xc6
098e 00d8       |    |		Load_Top	At_Offset_0
098f 0101       |    |		Execute	Exception,Reraise
0990 ; --------------------------------------------------------------------------------------
0990 ; Debug Table
0990 ; --------------------------------------------------------------------------------------
0990 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x68d6,0x0000,0x0001,0x002c
0996 000b 0a46  |   F|		.DBG4T	0x000b,0x0a46,0x8000,0x0000
099a 0032 0a5b  | 2 [|		.DBG4T	0x0032,0x0a5b,0x8000,0x0000
099e 006b 0a72  | k r|		.DBG4T	0x006b,0x0a72,0x0001,0x0000
09a2 0083 0a7a  |   z|		.DBG4T	0x0083,0x0a7a,0x0001,0x0000
09a6 009b 0a82  |    |		.DBG4T	0x009b,0x0a82,0x0001,0x0000
09aa 00b3 0a8a  |    |		.DBG4T	0x00b3,0x0a8a,0x0001,0x0000
09ae 00cb 0a94  |    |		.DBG4T	0x00cb,0x0a94,0x0001,0x0000
09b2 00e3 0a9b  |    |		.DBG4T	0x00e3,0x0a9b,0x0001,0x0000
09b6 0103 0aa6  |    |		.DBG4T	0x0103,0x0aa6,0x0001,0x0000
09ba 01c3 0ad4  |    |		.DBG4T	0x01c3,0x0ad4,0x0001,0x0000
09be 01db 0add  |    |		.DBG4T	0x01db,0x0add,0x0001,0x0000
09c2 01f3 0ae6  |    |		.DBG4T	0x01f3,0x0ae6,0x0001,0x0000
09c6 0203 0aed  |    |		.DBG4T	0x0203,0x0aed,0x0001,0x0000
09ca 021b 0af5  |    |		.DBG4T	0x021b,0x0af5,0x0001,0x0000
09ce 0233 0afc  | 3  |		.DBG4T	0x0233,0x0afc,0x0002,0x0000
09d2 0243 0b04  | C  |		.DBG4T	0x0243,0x0b04,0x0002,0x0000
09d6 025b 0b0d  | [  |		.DBG4T	0x025b,0x0b0d,0x0001,0x0000
09da 026b 0b13  | k  |		.DBG4T	0x026b,0x0b13,0x0001,0x0000
09de 027b 0b19  | {  |		.DBG4T	0x027b,0x0b19,0x0002,0x0000
09e2 028b 0b1f  |    |		.DBG4T	0x028b,0x0b1f,0x0001,0x0000
09e6 029b 0b25  |   %|		.DBG4T	0x029b,0x0b25,0x0001,0x0000
09ea 02ab 0b2b  |   +|		.DBG4T	0x02ab,0x0b2b,0x0004,0x0000
09ee 0303 0b37  |   7|		.DBG4T	0x0303,0x0b37,0x0004,0x0000
09f2 0383 0b43  |   C|		.DBG4T	0x0383,0x0b43,0x0004,0x0000
09f6 03eb 0b52  |   R|		.DBG4T	0x03eb,0x0b52,0x0004,0x0000
09fa 046b 0b69  | k i|		.DBG4T	0x046b,0x0b69,0x0004,0x0000
09fe 04ab 0b6f  |   o|		.DBG4T	0x04ab,0x0b6f,0x0004,0x0000
0a02 052b 0b83  | +  |		.DBG4T	0x052b,0x0b83,0x0004,0x0000
0a06 0543 0b8d  | C  |		.DBG4T	0x0543,0x0b8d,0x0004,0x0000
0a0a 05b3 0b9a  |    |		.DBG4T	0x05b3,0x0b9a,0x0004,0x0000
0a0e 061b 0ba4  |    |		.DBG4T	0x061b,0x0ba4,0x0004,0x0000
0a12 066b 0baf  | k  |		.DBG4T	0x066b,0x0baf,0x0004,0x0000
0a16 06d3 0bbb  |    |		.DBG4T	0x06d3,0x0bbb,0x0004,0x0000
0a1a 0713 0bc1  |    |		.DBG4T	0x0713,0x0bc1,0x0004,0x0000
0a1e 0743 0bc7  | C  |		.DBG4T	0x0743,0x0bc7,0x0004,0x0000
0a22 077b 0bcf  | {  |		.DBG4T	0x077b,0x0bcf,0x0004,0x0000
0a26 07a3 0bd5  |    |		.DBG4T	0x07a3,0x0bd5,0x0004,0x0000
0a2a 07c3 0bda  |    |		.DBG4T	0x07c3,0x0bda,0x0004,0x0000
0a2e 07fb 0be5  |    |		.DBG4T	0x07fb,0x0be5,0x0004,0x0000
0a32 0843 0beb  | C  |		.DBG4T	0x0843,0x0beb,0x0004,0x0000
0a36 0863 0bf0  | c  |		.DBG4T	0x0863,0x0bf0,0x0004,0x0000
0a3a 08eb 0c01  |    |		.DBG4T	0x08eb,0x0c01,0x0004,0x0000
0a3e 094b 0c0a  | K  |		.DBG4T	0x094b,0x0c0a,0x0004,0x0000
0a42 097b 0c15  | {  |		.DBG4T	0x097b,0x0c15,0x0004,0x0000
0a46 ; --------------------------------------------------------------------------------------
0a46 ; Debug chain
0a46 ; --------------------------------------------------------------------------------------
0a46 0013 0000  |    |		.DBGLEN	0x0013,0x0000
0a48 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f
0a5b ; --------------------------------------------------------------------------------------
0a5b ; Debug chain
0a5b ; --------------------------------------------------------------------------------------
0a5b 0013 0002  |    |		.DBGLEN	0x0013,0x0002
0a5d 0032 0034  | 2 4|		.DBGLNO	0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040,0x0042,0x0044,0x0046,0x0048,0x004a,0x004c,0x004e,0x0050,0x0052,0x0054,0x0056,0x0058,0x005d
0a72 ; --------------------------------------------------------------------------------------
0a72 ; Debug chain
0a72 ; --------------------------------------------------------------------------------------
0a72 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0a74 006b 006f  | k o|		.DBGLNO	0x006b,0x006f,0x0072,0x0074,0x0075,0x0077
0a7a ; --------------------------------------------------------------------------------------
0a7a ; Debug chain
0a7a ; --------------------------------------------------------------------------------------
0a7a 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0a7c 0083 0085  |    |		.DBGLNO	0x0083,0x0085,0x008b,0x008d,0x008e,0x0090
0a82 ; --------------------------------------------------------------------------------------
0a82 ; Debug chain
0a82 ; --------------------------------------------------------------------------------------
0a82 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0a84 009b 009d  |    |		.DBGLNO	0x009b,0x009d,0x00a3,0x00a5,0x00a6,0x00a8
0a8a ; --------------------------------------------------------------------------------------
0a8a ; Debug chain
0a8a ; --------------------------------------------------------------------------------------
0a8a 0003 0005  |    |		.DBGLEN	0x0003,0x0005
0a8c 00b3 00b5  |    |		.DBGLNO	0x00b3,0x00b5,0x00b9,0x00bc,0x00be,0x00bf,0x00c1,0x00c3
0a94 ; --------------------------------------------------------------------------------------
0a94 ; Debug chain
0a94 ; --------------------------------------------------------------------------------------
0a94 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0a96 00cb 00d1  |    |		.DBGLNO	0x00cb,0x00d1,0x00d3,0x00d4,0x00d6
0a9b ; --------------------------------------------------------------------------------------
0a9b ; Debug chain
0a9b ; --------------------------------------------------------------------------------------
0a9b 0003 0006  |    |		.DBGLEN	0x0003,0x0006
0a9d 00e3 00e5  |    |		.DBGLNO	0x00e3,0x00e5,0x00e9,0x00ec,0x00ef,0x00f1,0x00f2,0x00f4,0x00f6
0aa6 ; --------------------------------------------------------------------------------------
0aa6 ; Debug chain
0aa6 ; --------------------------------------------------------------------------------------
0aa6 0003 0029  |   )|		.DBGLEN	0x0003,0x0029
0aa8 0103 0105  |    |		.DBGLNO	0x0103,0x0105,0x0108,0x010b,0x010e,0x0111,0x0113,0x0116,0x011c,0x011d,0x0120,0x012c,0x012e,0x012f,0x0133,0x0135,0x0137,0x013a,0x013b,0x013d,0x013f,0x0141,0x0146,0x014a,0x014e,0x0151,0x0154,0x015a,0x0160,0x0166,0x016c,0x0172,0x0178,0x017a,0x017e,0x0182,0x0186,0x0189,0x018d,0x0194,0x019b,0x01a2,0x01bb,0x01bd
0ad4 ; --------------------------------------------------------------------------------------
0ad4 ; Debug chain
0ad4 ; --------------------------------------------------------------------------------------
0ad4 0003 0004  |    |		.DBGLEN	0x0003,0x0004
0ad6 01c3 01c5  |    |		.DBGLNO	0x01c3,0x01c5,0x01c9,0x01cc,0x01ce,0x01cf,0x01d1
0add ; --------------------------------------------------------------------------------------
0add ; Debug chain
0add ; --------------------------------------------------------------------------------------
0add 0003 0004  |    |		.DBGLEN	0x0003,0x0004
0adf 01db 01df  |    |		.DBGLNO	0x01db,0x01df,0x01e3,0x01e6,0x01e8,0x01e9,0x01eb
0ae6 ; --------------------------------------------------------------------------------------
0ae6 ; Debug chain
0ae6 ; --------------------------------------------------------------------------------------
0ae6 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0ae8 01f3 01f7  |    |		.DBGLNO	0x01f3,0x01f7,0x01f9,0x01fa,0x01fc
0aed ; --------------------------------------------------------------------------------------
0aed ; Debug chain
0aed ; --------------------------------------------------------------------------------------
0aed 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0aef 0203 0207  |    |		.DBGLNO	0x0203,0x0207,0x020b,0x020d,0x020e,0x0210
0af5 ; --------------------------------------------------------------------------------------
0af5 ; Debug chain
0af5 ; --------------------------------------------------------------------------------------
0af5 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0af7 021b 0221  |   !|		.DBGLNO	0x021b,0x0221,0x0223,0x0224,0x0226
0afc ; --------------------------------------------------------------------------------------
0afc ; Debug chain
0afc ; --------------------------------------------------------------------------------------
0afc 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0afe 0233 0237  | 3 7|		.DBGLNO	0x0233,0x0237,0x0239,0x023a,0x023c,0x023e
0b04 ; --------------------------------------------------------------------------------------
0b04 ; Debug chain
0b04 ; --------------------------------------------------------------------------------------
0b04 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0b06 0243 0245  | C E|		.DBGLNO	0x0243,0x0245,0x024c,0x024e,0x024f,0x0251,0x0253
0b0d ; --------------------------------------------------------------------------------------
0b0d ; Debug chain
0b0d ; --------------------------------------------------------------------------------------
0b0d 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0b0f 025d 025f  | ] _|		.DBGLNO	0x025d,0x025f,0x0260,0x0262
0b13 ; --------------------------------------------------------------------------------------
0b13 ; Debug chain
0b13 ; --------------------------------------------------------------------------------------
0b13 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0b15 026d 026f  | m o|		.DBGLNO	0x026d,0x026f,0x0270,0x0272
0b19 ; --------------------------------------------------------------------------------------
0b19 ; Debug chain
0b19 ; --------------------------------------------------------------------------------------
0b19 0002 0002  |    |		.DBGLEN	0x0002,0x0002
0b1b 027b 027f  | {  |		.DBGLNO	0x027b,0x027f,0x0282,0x0284
0b1f ; --------------------------------------------------------------------------------------
0b1f ; Debug chain
0b1f ; --------------------------------------------------------------------------------------
0b1f 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0b21 028d 028f  |    |		.DBGLNO	0x028d,0x028f,0x0290,0x0292
0b25 ; --------------------------------------------------------------------------------------
0b25 ; Debug chain
0b25 ; --------------------------------------------------------------------------------------
0b25 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0b27 029d 029f  |    |		.DBGLNO	0x029d,0x029f,0x02a0,0x02a2
0b2b ; --------------------------------------------------------------------------------------
0b2b ; Debug chain
0b2b ; --------------------------------------------------------------------------------------
0b2b 0000 000a  |    |		.DBGLEN	0x0000,0x000a
0b2d 02ab 02d1  |    |		.DBGLNO	0x02ab,0x02d1,0x02dd,0x02df,0x02e1,0x02e6,0x02eb,0x02f0,0x02f7,0x02f9
0b37 ; --------------------------------------------------------------------------------------
0b37 ; Debug chain
0b37 ; --------------------------------------------------------------------------------------
0b37 0000 000a  |    |		.DBGLEN	0x0000,0x000a
0b39 0303 0323  |   #|		.DBGLNO	0x0303,0x0323,0x033e,0x0340,0x0342,0x034d,0x0359,0x0369,0x037b,0x037d
0b43 ; --------------------------------------------------------------------------------------
0b43 ; Debug chain
0b43 ; --------------------------------------------------------------------------------------
0b43 0000 000d  |    |		.DBGLEN	0x0000,0x000d
0b45 0383 03a8  |    |		.DBGLNO	0x0383,0x03a8,0x03bb,0x03bd,0x03bf,0x03c3,0x03c7,0x03cb,0x03d7,0x03d9,0x03db,0x03df,0x03e1
0b52 ; --------------------------------------------------------------------------------------
0b52 ; Debug chain
0b52 ; --------------------------------------------------------------------------------------
0b52 0000 0015  |    |		.DBGLEN	0x0000,0x0015
0b54 03eb 03ee  |    |		.DBGLNO	0x03eb,0x03ee,0x0413,0x041d,0x0429,0x042b,0x042e,0x0431,0x0433,0x0435,0x0437,0x0439,0x043e,0x0443,0x0448,0x044d,0x0452,0x0457,0x045c,0x0463,0x0465
0b69 ; --------------------------------------------------------------------------------------
0b69 ; Debug chain
0b69 ; --------------------------------------------------------------------------------------
0b69 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0b6b 046b 0493  | k  |		.DBGLNO	0x046b,0x0493,0x049f,0x04a1
0b6f ; --------------------------------------------------------------------------------------
0b6f ; Debug chain
0b6f ; --------------------------------------------------------------------------------------
0b6f 0000 0012  |    |		.DBGLEN	0x0000,0x0012
0b71 04ab 04da  |    |		.DBGLNO	0x04ab,0x04da,0x04e4,0x04f0,0x04f2,0x04f5,0x04f8,0x04fa,0x04fc,0x04fe,0x0500,0x0505,0x050a,0x050f,0x0514,0x0519,0x0520,0x0522
0b83 ; --------------------------------------------------------------------------------------
0b83 ; Debug chain
0b83 ; --------------------------------------------------------------------------------------
0b83 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0b85 052b 052f  | + /|		.DBGLNO	0x052b,0x052f,0x0532,0x0534,0x0535,0x0537,0x0539,0x053b
0b8d ; --------------------------------------------------------------------------------------
0b8d ; Debug chain
0b8d ; --------------------------------------------------------------------------------------
0b8d 0000 000b  |    |		.DBGLEN	0x0000,0x000b
0b8f 0543 0564  | C d|		.DBGLNO	0x0543,0x0564,0x056d,0x0579,0x057b,0x0584,0x0588,0x058c,0x0590,0x05ab,0x05ad
0b9a ; --------------------------------------------------------------------------------------
0b9a ; Debug chain
0b9a ; --------------------------------------------------------------------------------------
0b9a 0000 0008  |    |		.DBGLEN	0x0000,0x0008
0b9c 05b5 05e2  |    |		.DBGLNO	0x05b5,0x05e2,0x05e6,0x05f4,0x0609,0x060b,0x060e,0x0610
0ba4 ; --------------------------------------------------------------------------------------
0ba4 ; Debug chain
0ba4 ; --------------------------------------------------------------------------------------
0ba4 0000 0009  |    |		.DBGLEN	0x0000,0x0009
0ba6 061b 0644  |   D|		.DBGLNO	0x061b,0x0644,0x0648,0x064c,0x0650,0x0654,0x0658,0x0662,0x0664
0baf ; --------------------------------------------------------------------------------------
0baf ; Debug chain
0baf ; --------------------------------------------------------------------------------------
0baf 0000 000a  |    |		.DBGLEN	0x0000,0x000a
0bb1 066b 069e  | k  |		.DBGLNO	0x066b,0x069e,0x06a2,0x06a8,0x06ae,0x06b4,0x06ba,0x06c0,0x06cc,0x06ce
0bbb ; --------------------------------------------------------------------------------------
0bbb ; Debug chain
0bbb ; --------------------------------------------------------------------------------------
0bbb 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0bbd 06d3 06fe  |    |		.DBGLNO	0x06d3,0x06fe,0x070a,0x070c
0bc1 ; --------------------------------------------------------------------------------------
0bc1 ; Debug chain
0bc1 ; --------------------------------------------------------------------------------------
0bc1 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0bc3 0713 071b  |    |		.DBGLNO	0x0713,0x071b,0x0737,0x0739
0bc7 ; --------------------------------------------------------------------------------------
0bc7 ; Debug chain
0bc7 ; --------------------------------------------------------------------------------------
0bc7 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0bc9 0743 074b  | C K|		.DBGLNO	0x0743,0x074b,0x074f,0x0754,0x0773,0x0775
0bcf ; --------------------------------------------------------------------------------------
0bcf ; Debug chain
0bcf ; --------------------------------------------------------------------------------------
0bcf 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0bd1 077b 0792  | {  |		.DBGLNO	0x077b,0x0792,0x0797,0x0799
0bd5 ; --------------------------------------------------------------------------------------
0bd5 ; Debug chain
0bd5 ; --------------------------------------------------------------------------------------
0bd5 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0bd7 07a3 07bc  |    |		.DBGLNO	0x07a3,0x07bc,0x07be
0bda ; --------------------------------------------------------------------------------------
0bda ; Debug chain
0bda ; --------------------------------------------------------------------------------------
0bda 0000 0009  |    |		.DBGLEN	0x0000,0x0009
0bdc 07c5 07dc  |    |		.DBGLNO	0x07c5,0x07dc,0x07e8,0x07ea,0x07ec,0x07ee,0x07f1,0x07f4,0x07f6
0be5 ; --------------------------------------------------------------------------------------
0be5 ; Debug chain
0be5 ; --------------------------------------------------------------------------------------
0be5 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0be7 07fb 082e  |   .|		.DBGLNO	0x07fb,0x082e,0x0839,0x083b
0beb ; --------------------------------------------------------------------------------------
0beb ; Debug chain
0beb ; --------------------------------------------------------------------------------------
0beb 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0bed 0843 085c  | C \|		.DBGLNO	0x0843,0x085c,0x085e
0bf0 ; --------------------------------------------------------------------------------------
0bf0 ; Debug chain
0bf0 ; --------------------------------------------------------------------------------------
0bf0 0000 000f  |    |		.DBGLEN	0x0000,0x000f
0bf2 0863 0892  | c  |		.DBGLNO	0x0863,0x0892,0x089c,0x08a8,0x08aa,0x08ad,0x08af,0x08b1,0x08b3,0x08b6,0x08bb,0x08c0,0x08c5,0x08e0,0x08e2
0c01 ; --------------------------------------------------------------------------------------
0c01 ; Debug chain
0c01 ; --------------------------------------------------------------------------------------
0c01 0001 0006  |    |		.DBGLEN	0x0001,0x0006
0c03 08eb 08f0  |    |		.DBGLNO	0x08eb,0x08f0,0x08fc,0x0900,0x090c,0x0918,0x0924
0c0a ; --------------------------------------------------------------------------------------
0c0a ; Debug chain
0c0a ; --------------------------------------------------------------------------------------
0c0a 0002 0007  |    |		.DBGLEN	0x0002,0x0007
0c0c 094b 094d  | K M|		.DBGLNO	0x094b,0x094d,0x0954,0x0955,0x0962,0x0964,0x0966,0x096b,0x0971
0c15 ; --------------------------------------------------------------------------------------
0c15 ; Debug chain
0c15 ; --------------------------------------------------------------------------------------
0c15 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0c17 097b 0982  | {  |		.DBGLNO	0x097b,0x0982,0x098e
0c1a 0000 0000  |    |		.BLANK	0000[0x1e6]