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

⟦fca7e99e4⟧

    Length: 8192 (0x2000)
    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 0c10       |    |		.CONST	0x0c10								; 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 0007       |    |		.CONST	0x0007								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0031       | 1  |		.CONST	0x0031								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0015       |    |		.CONST	0x0015								; Number of locals
000b			INIT_0008:
000b 029a 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Outer_Call,Visible,Unelaborated
000d 029a 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call,Visible,Unelaborated
000f 029a 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call,Visible,Unelaborated
0011 029a 0483  |    |		Declare_Subprogram	INIT_0480,For_Outer_Call,Visible,Unelaborated
0013 029a 060b  |    |		Declare_Subprogram	INIT_0608,For_Outer_Call,Visible,Unelaborated
0015 00bf       |    |		Action	Accept_Activation
0016 0007       |    |		Action	Break_Optional
0017 0007       |    |		Action	Break_Optional
0018 4800       |H   |		Short_Literal	0x0
0019 4834       |H4  |		Short_Literal	0x34
001a e002       |    |		Load	0x0,0x2
001b 0334       | 4  |		Declare_Variable	Array,With_Constraint
001c 51b7       |Q   |		Indirect_Literal	Any,0x1d4,{0x5265706c, 0x795f4576}
001d 4800       |H   |		Short_Literal	0x0
001e 4820       |H   |		Short_Literal	0x20
001f e002       |    |		Load	0x0,0x2
0020 0334       | 4  |		Declare_Variable	Array,With_Constraint
0021 51ce       |Q   |		Indirect_Literal	Any,0x1f0,{0x486f7374, 0x206e616d}
0022 0007       |    |		Action	Break_Optional
0023 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0024 00c7       |    |		Action	Elaborate_Subprogram
0025 029d 0633  |   3|		Declare_Subprogram	INIT_0630,For_Outer_Call
0027 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0028 00c7       |    |		Action	Elaborate_Subprogram
0029 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
002a 00c7       |    |		Action	Elaborate_Subprogram
002b 029d 07d3  |    |		Declare_Subprogram	INIT_07d0,For_Outer_Call
002d 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
002e 00c7       |    |		Action	Elaborate_Subprogram
002f 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0030 00c7       |    |		Action	Elaborate_Subprogram
0031			BODY_0008:
0031 8003       |    |		Call	0x0,0x3
0032 00bc       |    |		Action	Signal_Activated
0033 00bb       |    |		Action	Signal_Completion
0034 0000 0000  |    |		.BLANK	0000[0x4]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0050       | P  |		.CONST	0x0050								; Address of begin
0039 0004       |    |		.CONST	0x0004								; Address of exception handler
003a 000b       |    |		.CONST	0x000b								; Number of locals
003b			INIT_0038:
003b 00e3       |    |		Load_Encached	Natural_Cache
003c 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
003d 00e3       |    |		Load_Encached	Natural_Cache
003e 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
003f 00e3       |    |		Load_Encached	Natural_Cache
0040 00e1       |    |		Load_Encached	Boolean_Cache
0041 e004       |    |		Load	0x0,0x4
0042 0007       |    |		Action	Break_Optional
0043 e005       |    |		Load	0x0,0x5
0044 02ff       |    |		Declare_Variable	Variant_Record
0045 00d8       |    |		Load_Top	At_Offset_0
0046 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0047 e006       |    |		Load	0x0,0x6
0048 02ff       |    |		Declare_Variable	Variant_Record
0049 00d8       |    |		Load_Top	At_Offset_0
004a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
004b e007       |    |		Load	0x0,0x7
004c 029f 07f3  |    |		Declare_Subprogram	INIT_07f0,For_Call
004e 029f 080b  |    |		Declare_Subprogram	INIT_0808,For_Call
0050			BODY_0038:
0050 e5fe       |    |		Load	0x2,-0x2
0051 0f02       |    |		Execute_Immediate	Equal,0x2
0052 680b       |h   |		Jump_Zero	0x5e
0053 e5ff       |    |		Load	0x2,-0x1
0054 820e       |    |		Call	0x1,0xe
0055 e5ff       |    |		Load	0x2,-0x1
0056 0227       | '  |		Execute	Access,All_Reference
0057 3c28       |<(  |		Execute	Record,Field_Read,Field_Number 0x28
0058 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0059 6804       |h   |		Jump_Zero	0x5e
005a e5ff       |    |		Load	0x2,-0x1
005b 0227       | '  |		Execute	Access,All_Reference
005c 3c28       |<(  |		Execute	Record,Field_Read,Field_Number 0x28
005d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
005e 4800       |H   |		Short_Literal	0x0
005f e5ff       |    |		Load	0x2,-0x1
0060 0227       | '  |		Execute	Access,All_Reference
0061 3439       |49  |		Execute	Record,Field_Reference,Field_Number 0x39
0062 01d7       |    |		Execute	Vector,Field_Read
0063 6802       |h   |		Jump_Zero	0x66
0064 4800       |H   |		Short_Literal	0x0
0065 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0066 e5ff       |    |		Load	0x2,-0x1
0067 0227       | '  |		Execute	Access,All_Reference
0068 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0069 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
006a e5ff       |    |		Load	0x2,-0x1
006b 0227       | '  |		Execute	Access,All_Reference
006c 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
006d 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
006e 01dc       |    |		Execute	Vector,Last
006f 027c       | |  |		Execute	Discrete,Less
0070 684c       |hL  |		Jump_Zero	0xbd
0071 e5ff       |    |		Load	0x2,-0x1
0072 0229       | )  |		Execute	Access,All_Read
0073 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
0074 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0075 e5ff       |    |		Load	0x2,-0x1
0076 0227       | '  |		Execute	Access,All_Reference
0077 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0078 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0079 0a01       |    |		Execute_Immediate	Plus,0x1
007a 00d8       |    |		Load_Top	At_Offset_0
007b 00e2       |    |		Load_Encached	Integer_Cache
007c 0260       | `  |		Execute	Discrete,In_Type
007d 7001       |p   |		Jump_Nonzero	0x7f
007e 0801       |    |		Execute_Immediate	Raise,0x1
007f e5ff       |    |		Load	0x2,-0x1
0080 0227       | '  |		Execute	Access,All_Reference
0081 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0082 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0083 01dc       |    |		Execute	Vector,Last
0084 00da       |    |		Load_Top	At_Offset_2
0085 035b       | [  |		Declare_Type	Array,Constrained
0086 00d0       |    |		Action	Swap_Control
0087 01cd       |    |		Execute	Vector,Slice_Reference
0088 e5ff       |    |		Load	0x2,-0x1
0089 0229       | )  |		Execute	Access,All_Read
008a 3c38       |<8  |		Execute	Record,Field_Read,Field_Number 0x38
008b 00e3       |    |		Load_Encached	Natural_Cache
008c 00da       |    |		Load_Top	At_Offset_2
008d 00e2       |    |		Load_Encached	Integer_Cache
008e e5ff       |    |		Load	0x2,-0x1
008f 0227       | '  |		Execute	Access,All_Reference
0090 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
0091 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0092 8008       |    |		Call	0x0,0x8
0093 00db       |    |		Load_Top	At_Offset_3
0094 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0095 00d1       |    |		Pop_Control	Pop_Count_1
0096 c403       |    |		Store	0x2,0x3
0097 00d2       |    |		Pop_Control	Pop_Count_2
0098 e5ff       |    |		Load	0x2,-0x1
0099 0227       | '  |		Execute	Access,All_Reference
009a 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
009b 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
009c e403       |    |		Load	0x2,0x3
009d 0273       | s  |		Execute	Discrete,Plus
009e e5ff       |    |		Load	0x2,-0x1
009f 0227       | '  |		Execute	Access,All_Reference
00a0 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
00a1 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00a2 e5ff       |    |		Load	0x2,-0x1
00a3 0227       | '  |		Execute	Access,All_Reference
00a4 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
00a5 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00a6 680d       |h   |		Jump_Zero	0xb4
00a7 e5ff       |    |		Load	0x2,-0x1
00a8 0227       | '  |		Execute	Access,All_Reference
00a9 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
00aa 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00ab 0f07       |    |		Execute_Immediate	Equal,0x7
00ac 7007       |p   |		Jump_Nonzero	0xb4
00ad 4800       |H   |		Short_Literal	0x0
00ae 4806       |H   |		Short_Literal	0x6
00af e002       |    |		Load	0x0,0x2
00b0 0334       | 4  |		Declare_Variable	Array,With_Constraint
00b1 5152       |QR  |		Indirect_Literal	Any,0x204,{0x52656365, 0x69766500}
00b2 e5ff       |    |		Load	0x2,-0x1
00b3 8009       |    |		Call	0x0,0x9
00b4 e5ff       |    |		Load	0x2,-0x1
00b5 0227       | '  |		Execute	Access,All_Reference
00b6 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
00b7 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00b8 7004       |p   |		Jump_Nonzero	0xbd
00b9 e5ff       |    |		Load	0x2,-0x1
00ba 0227       | '  |		Execute	Access,All_Reference
00bb 3c28       |<(  |		Execute	Record,Field_Read,Field_Number 0x28
00bc 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00bd 00cf       |    |		Action	Mark_Auxiliary
00be 7901       |y   |		Jump	0x1c0
00bf e402       |    |		Load	0x2,0x2
00c0 0a1f       |    |		Execute_Immediate	Plus,0x1f
00c1 c404       |    |		Store	0x2,0x4
00c2 e404       |    |		Load	0x2,0x4
00c3 e5ff       |    |		Load	0x2,-0x1
00c4 0227       | '  |		Execute	Access,All_Reference
00c5 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
00c6 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00c7 027d       | }  |		Execute	Discrete,Greater
00c8 68a0       |h   |		Jump_Zero	0x169
00c9 e404       |    |		Load	0x2,0x4
00ca e5ff       |    |		Load	0x2,-0x1
00cb 0227       | '  |		Execute	Access,All_Reference
00cc 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
00cd 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00ce 01dc       |    |		Execute	Vector,Last
00cf 027d       | }  |		Execute	Discrete,Greater
00d0 6826       |h&  |		Jump_Zero	0xf7
00d1 e5ff       |    |		Load	0x2,-0x1
00d2 0227       | '  |		Execute	Access,All_Reference
00d3 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
00d4 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00d5 a404       |    |		Store_Unchecked	0x2,0x4
00d6 e5ff       |    |		Load	0x2,-0x1
00d7 0227       | '  |		Execute	Access,All_Reference
00d8 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
00d9 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00da e402       |    |		Load	0x2,0x2
00db 0272       | r  |		Execute	Discrete,Minus
00dc 0a01       |    |		Execute_Immediate	Plus,0x1
00dd e5ff       |    |		Load	0x2,-0x1
00de 0227       | '  |		Execute	Access,All_Reference
00df 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
00e0 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00e1 e402       |    |		Load	0x2,0x2
00e2 e404       |    |		Load	0x2,0x4
00e3 e5ff       |    |		Load	0x2,-0x1
00e4 0227       | '  |		Execute	Access,All_Reference
00e5 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
00e6 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00e7 01cf       |    |		Execute	Vector,Slice_Read
00e8 4801       |H   |		Short_Literal	0x1
00e9 e5ff       |    |		Load	0x2,-0x1
00ea 0227       | '  |		Execute	Access,All_Reference
00eb 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
00ec 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00ed e5ff       |    |		Load	0x2,-0x1
00ee 0229       | )  |		Execute	Access,All_Read
00ef 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
00f0 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00f1 01ce       |    |		Execute	Vector,Slice_Write
00f2 4801       |H   |		Short_Literal	0x1
00f3 a402       |    |		Store_Unchecked	0x2,0x2
00f4 e402       |    |		Load	0x2,0x2
00f5 0a1f       |    |		Execute_Immediate	Plus,0x1f
00f6 c404       |    |		Store	0x2,0x4
00f7 e5ff       |    |		Load	0x2,-0x1
00f8 0229       | )  |		Execute	Access,All_Read
00f9 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
00fa 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00fb e5ff       |    |		Load	0x2,-0x1
00fc 0227       | '  |		Execute	Access,All_Reference
00fd 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
00fe 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00ff 0a01       |    |		Execute_Immediate	Plus,0x1
0100 00d8       |    |		Load_Top	At_Offset_0
0101 00e2       |    |		Load_Encached	Integer_Cache
0102 0260       | `  |		Execute	Discrete,In_Type
0103 7001       |p   |		Jump_Nonzero	0x105
0104 0801       |    |		Execute_Immediate	Raise,0x1
0105 e5ff       |    |		Load	0x2,-0x1
0106 0227       | '  |		Execute	Access,All_Reference
0107 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0108 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0109 01dc       |    |		Execute	Vector,Last
010a 00da       |    |		Load_Top	At_Offset_2
010b 035b       | [  |		Declare_Type	Array,Constrained
010c 00d0       |    |		Action	Swap_Control
010d 01cd       |    |		Execute	Vector,Slice_Reference
010e e5ff       |    |		Load	0x2,-0x1
010f 0229       | )  |		Execute	Access,All_Read
0110 3c38       |<8  |		Execute	Record,Field_Read,Field_Number 0x38
0111 00e3       |    |		Load_Encached	Natural_Cache
0112 00da       |    |		Load_Top	At_Offset_2
0113 00e2       |    |		Load_Encached	Integer_Cache
0114 e5ff       |    |		Load	0x2,-0x1
0115 0227       | '  |		Execute	Access,All_Reference
0116 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
0117 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0118 8008       |    |		Call	0x0,0x8
0119 00db       |    |		Load_Top	At_Offset_3
011a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
011b 00d1       |    |		Pop_Control	Pop_Count_1
011c c403       |    |		Store	0x2,0x3
011d 00d2       |    |		Pop_Control	Pop_Count_2
011e e5ff       |    |		Load	0x2,-0x1
011f 0227       | '  |		Execute	Access,All_Reference
0120 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0121 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0122 e403       |    |		Load	0x2,0x3
0123 0273       | s  |		Execute	Discrete,Plus
0124 e5ff       |    |		Load	0x2,-0x1
0125 0227       | '  |		Execute	Access,All_Reference
0126 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0127 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0128 e5ff       |    |		Load	0x2,-0x1
0129 0227       | '  |		Execute	Access,All_Reference
012a 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
012b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
012c 680d       |h   |		Jump_Zero	0x13a
012d e5ff       |    |		Load	0x2,-0x1
012e 0227       | '  |		Execute	Access,All_Reference
012f 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
0130 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0131 0f07       |    |		Execute_Immediate	Equal,0x7
0132 7007       |p   |		Jump_Nonzero	0x13a
0133 4800       |H   |		Short_Literal	0x0
0134 4806       |H   |		Short_Literal	0x6
0135 e002       |    |		Load	0x0,0x2
0136 0334       | 4  |		Declare_Variable	Array,With_Constraint
0137 50d0       |P   |		Indirect_Literal	Any,0x208,{0x52656365, 0x69766500}
0138 e5ff       |    |		Load	0x2,-0x1
0139 8009       |    |		Call	0x0,0x9
013a e404       |    |		Load	0x2,0x4
013b e5ff       |    |		Load	0x2,-0x1
013c 0227       | '  |		Execute	Access,All_Reference
013d 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
013e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
013f 027d       | }  |		Execute	Discrete,Greater
0140 6828       |h(  |		Jump_Zero	0x169
0141 e402       |    |		Load	0x2,0x2
0142 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
0143 6821       |h!  |		Jump_Zero	0x165
0144 e5ff       |    |		Load	0x2,-0x1
0145 0227       | '  |		Execute	Access,All_Reference
0146 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0147 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0148 a404       |    |		Store_Unchecked	0x2,0x4
0149 e5ff       |    |		Load	0x2,-0x1
014a 0227       | '  |		Execute	Access,All_Reference
014b 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
014c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
014d e402       |    |		Load	0x2,0x2
014e 0272       | r  |		Execute	Discrete,Minus
014f 0a01       |    |		Execute_Immediate	Plus,0x1
0150 e5ff       |    |		Load	0x2,-0x1
0151 0227       | '  |		Execute	Access,All_Reference
0152 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0153 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0154 e402       |    |		Load	0x2,0x2
0155 e404       |    |		Load	0x2,0x4
0156 e5ff       |    |		Load	0x2,-0x1
0157 0227       | '  |		Execute	Access,All_Reference
0158 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0159 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
015a 01cf       |    |		Execute	Vector,Slice_Read
015b 4801       |H   |		Short_Literal	0x1
015c e5ff       |    |		Load	0x2,-0x1
015d 0227       | '  |		Execute	Access,All_Reference
015e 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
015f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0160 e5ff       |    |		Load	0x2,-0x1
0161 0229       | )  |		Execute	Access,All_Read
0162 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
0163 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0164 01ce       |    |		Execute	Vector,Slice_Write
0165 e5ff       |    |		Load	0x2,-0x1
0166 0227       | '  |		Execute	Access,All_Reference
0167 3c28       |<(  |		Execute	Record,Field_Read,Field_Number 0x28
0168 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0169 e402       |    |		Load	0x2,0x2
016a e5ff       |    |		Load	0x2,-0x1
016b 0227       | '  |		Execute	Access,All_Reference
016c 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
016d 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
016e 01d7       |    |		Execute	Vector,Field_Read
016f 0c80       |    |		Execute_Immediate	Greater_Equal,-0x80
0170 680b       |h   |		Jump_Zero	0x17c
0171 4801       |H   |		Short_Literal	0x1
0172 a405       |    |		Store_Unchecked	0x2,0x5
0173 e402       |    |		Load	0x2,0x2
0174 e5ff       |    |		Load	0x2,-0x1
0175 0227       | '  |		Execute	Access,All_Reference
0176 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0177 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0178 01d7       |    |		Execute	Vector,Field_Read
0179 0a80       |    |		Execute_Immediate	Plus,-0x80
017a c406       |    |		Store	0x2,0x6
017b 7809       |x   |		Jump	0x185
017c 4800       |H   |		Short_Literal	0x0
017d a405       |    |		Store_Unchecked	0x2,0x5
017e e402       |    |		Load	0x2,0x2
017f e5ff       |    |		Load	0x2,-0x1
0180 0227       | '  |		Execute	Access,All_Reference
0181 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0182 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0183 01d7       |    |		Execute	Vector,Field_Read
0184 c406       |    |		Store	0x2,0x6
0185 e406       |    |		Load	0x2,0x6
0186 e402       |    |		Load	0x2,0x2
0187 e5ff       |    |		Load	0x2,-0x1
0188 0227       | '  |		Execute	Access,All_Reference
0189 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
018a 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
018b 01d6       |    |		Execute	Vector,Field_Write
018c e406       |    |		Load	0x2,0x6
018d 0b00       |    |		Execute_Immediate	Case_Compare,0x0
018e 701d       |p   |		Jump_Nonzero	0x1ac
018f 0f01       |    |		Execute_Immediate	Equal,0x1
0190 702a       |p*  |		Jump_Nonzero	0x1bb
0191 e00a       |    |		Load	0x0,0xa
0192 e408       |    |		Load	0x2,0x8
0193 e405       |    |		Load	0x2,0x5
0194 e402       |    |		Load	0x2,0x2
0195 e404       |    |		Load	0x2,0x4
0196 e5ff       |    |		Load	0x2,-0x1
0197 0227       | '  |		Execute	Access,All_Reference
0198 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0199 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
019a 01cf       |    |		Execute	Vector,Slice_Read
019b e5ff       |    |		Load	0x2,-0x1
019c e406       |    |		Load	0x2,0x6
019d e5ff       |    |		Load	0x2,-0x1
019e 0227       | '  |		Execute	Access,All_Reference
019f 343b       |4;  |		Execute	Record,Field_Reference,Field_Number 0x3b
01a0 01d7       |    |		Execute	Vector,Field_Read
01a1 800b       |    |		Call	0x0,0xb
01a2 800c       |    |		Call	0x0,0xc
01a3 00d1       |    |		Pop_Control	Pop_Count_1
01a4 c409       |    |		Store	0x2,0x9
01a5 00db       |    |		Load_Top	At_Offset_3
01a6 0f01       |    |		Execute_Immediate	Equal,0x1
01a7 6814       |h   |		Jump_Zero	0x1bc
01a8 e408       |    |		Load	0x2,0x8
01a9 e5ff       |    |		Load	0x2,-0x1
01aa 800d       |    |		Call	0x0,0xd
01ab 7810       |x   |		Jump	0x1bc
01ac 00d1       |    |		Pop_Control	Pop_Count_1
01ad e407       |    |		Load	0x2,0x7
01ae e405       |    |		Load	0x2,0x5
01af e402       |    |		Load	0x2,0x2
01b0 e404       |    |		Load	0x2,0x4
01b1 e5ff       |    |		Load	0x2,-0x1
01b2 0227       | '  |		Execute	Access,All_Reference
01b3 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
01b4 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01b5 01cf       |    |		Execute	Vector,Slice_Read
01b6 e5ff       |    |		Load	0x2,-0x1
01b7 800e       |    |		Call	0x0,0xe
01b8 00d1       |    |		Pop_Control	Pop_Count_1
01b9 840a       |    |		Call	0x2,0xa
01ba 7801       |x   |		Jump	0x1bc
01bb 840b       |    |		Call	0x2,0xb
01bc e404       |    |		Load	0x2,0x4
01bd 0a01       |    |		Execute_Immediate	Plus,0x1
01be c402       |    |		Store	0x2,0x2
01bf 00c9       |    |		Action	Pop_Auxiliary_Loop
01c0 e402       |    |		Load	0x2,0x2
01c1 e5ff       |    |		Load	0x2,-0x1
01c2 0227       | '  |		Execute	Access,All_Reference
01c3 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
01c4 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01c5 027a       | z  |		Execute	Discrete,Less_Equal
01c6 76f8       |v   |		Jump_Nonzero	0xbf
01c7 00ce       |    |		Action	Pop_Auxiliary
01c8 4800       |H   |		Short_Literal	0x0
01c9 e5ff       |    |		Load	0x2,-0x1
01ca 0227       | '  |		Execute	Access,All_Reference
01cb 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
01cc 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01cd e5ff       |    |		Load	0x2,-0x1
01ce 0227       | '  |		Execute	Access,All_Reference
01cf 3c28       |<(  |		Execute	Record,Field_Read,Field_Number 0x28
01d0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01d1 0000 0000  |    |		.XXX[0x3]
01d3 0000       |    |
01d4 5265 706c  |Repl|		.LITERAL	{0x5265706c, 0x795f4576}
01d8 656e 7420  |ent |		.XXX[0x18]
01da 7265 6365  |rece|
01dc 6976 6564  |ived|
01de 2077 6865  | whe|
01e0 6e20 6e6f  |n no|
01e2 7420 6578  |t ex|
01e4 7065 6374  |pect|
01e6 6564 2e20  |ed. |
01e8 204f 7574  | Out|
01ea 206f 6620  | of |
01ec 7379 6e63  |sync|
01ee 3f00 0000  |?   |
01f0 486f 7374  |Host|		.LITERAL	{0x486f7374, 0x206e616d}
01f4 6520 286f  |e (o|		.XXX[0x10]
01f6 7220 6e75  |r nu|
01f8 6d62 6572  |mber|
01fa 2920 6973  |) is|
01fc 2075 6e6b  | unk|
01fe 6e6f 776e  |nown|
0200 3a00 0000  |:   |
0202 0000 0000  |    |
0204 5265 6365  |Rece|		.LITERAL	{0x52656365, 0x69766500}
0208 5265 6365  |Rece|		.LITERAL	{0x52656365, 0x69766500}
020c 0000 0000  |    |		.BLANK	0000[0x4]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0217       |    |		.CONST	0x0217								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0004       |    |		.CONST	0x0004								; Number of locals
0213			INIT_0210:
0213 00e3       |    |		Load_Encached	Natural_Cache
0214 00e3       |    |		Load_Encached	Natural_Cache
0215 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0216 00e3       |    |		Load_Encached	Natural_Cache
0217			BODY_0210:
0217 4800       |H   |		Short_Literal	0x0
0218 e5ff       |    |		Load	0x2,-0x1
0219 0227       | '  |		Execute	Access,All_Reference
021a 3439       |49  |		Execute	Record,Field_Reference,Field_Number 0x39
021b 01d7       |    |		Execute	Vector,Field_Read
021c 6801       |h   |		Jump_Zero	0x21e
021d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
021e e5ff       |    |		Load	0x2,-0x1
021f 0227       | '  |		Execute	Access,All_Reference
0220 342d       |4-  |		Execute	Record,Field_Reference,Field_Number 0x2d
0221 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0222 6802       |h   |		Jump_Zero	0x225
0223 e5ff       |    |		Load	0x2,-0x1
0224 800f       |    |		Call	0x0,0xf
0225 e5ff       |    |		Load	0x2,-0x1
0226 0227       | '  |		Execute	Access,All_Reference
0227 3435       |45  |		Execute	Record,Field_Reference,Field_Number 0x35
0228 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0229 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
022a 00d8       |    |		Load_Top	At_Offset_0
022b 7001       |p   |		Jump_Nonzero	0x22d
022c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
022d 00cf       |    |		Action	Mark_Auxiliary
022e 0007       |    |		Action	Break_Optional
022f e5ff       |    |		Load	0x2,-0x1
0230 0229       | )  |		Execute	Access,All_Read
0231 3c38       |<8  |		Execute	Record,Field_Read,Field_Number 0x38
0232 00e3       |    |		Load_Encached	Natural_Cache
0233 00e2       |    |		Load_Encached	Integer_Cache
0234 e403       |    |		Load	0x2,0x3
0235 e404       |    |		Load	0x2,0x4
0236 e5ff       |    |		Load	0x2,-0x1
0237 0227       | '  |		Execute	Access,All_Reference
0238 3435       |45  |		Execute	Record,Field_Reference,Field_Number 0x35
0239 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
023a 01cf       |    |		Execute	Vector,Slice_Read
023b e5ff       |    |		Load	0x2,-0x1
023c 0227       | '  |		Execute	Access,All_Reference
023d 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
023e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
023f 8010       |    |		Call	0x0,0x10
0240 00da       |    |		Load_Top	At_Offset_2
0241 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0242 c402       |    |		Store	0x2,0x2
0243 00d1       |    |		Pop_Control	Pop_Count_1
0244 00da       |    |		Load_Top	At_Offset_2
0245 e402       |    |		Load	0x2,0x2
0246 0273       | s  |		Execute	Discrete,Plus
0247 005b       | [  |		Store_Top	Discrete,At_Offset_3
0248 00da       |    |		Load_Top	At_Offset_2
0249 00da       |    |		Load_Top	At_Offset_2
024a 027d       | }  |		Execute	Discrete,Greater
024b 7010       |p   |		Jump_Nonzero	0x25c
024c e5ff       |    |		Load	0x2,-0x1
024d 0227       | '  |		Execute	Access,All_Reference
024e 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
024f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0250 0f07       |    |		Execute_Immediate	Equal,0x7
0251 7006       |p   |		Jump_Nonzero	0x258
0252 e5ff       |    |		Load	0x2,-0x1
0253 0227       | '  |		Execute	Access,All_Reference
0254 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
0255 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0256 6801       |h   |		Jump_Zero	0x258
0257 7804       |x   |		Jump	0x25c
0258 e5ff       |    |		Load	0x2,-0x1
0259 8214       |    |		Call	0x1,0x14
025a 00c9       |    |		Action	Pop_Auxiliary_Loop
025b 7fd3       |    |		Jump	0x22f
025c 00ce       |    |		Action	Pop_Auxiliary
025d e5ff       |    |		Load	0x2,-0x1
025e 0227       | '  |		Execute	Access,All_Reference
025f 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
0260 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0261 6807       |h   |		Jump_Zero	0x269
0262 4800       |H   |		Short_Literal	0x0
0263 4807       |H   |		Short_Literal	0x7
0264 e002       |    |		Load	0x0,0x2
0265 0334       | 4  |		Declare_Variable	Array,With_Constraint
0266 5009       |P   |		Indirect_Literal	Any,0x270,{0x5472616e, 0x736d6974}
0267 e5ff       |    |		Load	0x2,-0x1
0268 8009       |    |		Call	0x0,0x9
0269 4800       |H   |		Short_Literal	0x0
026a e5ff       |    |		Load	0x2,-0x1
026b 0227       | '  |		Execute	Access,All_Reference
026c 3435       |45  |		Execute	Record,Field_Reference,Field_Number 0x35
026d 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
026e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
026f 0000       |    |		.XXX[0x1]
0270 5472 616e  |Tran|		.LITERAL	{0x5472616e, 0x736d6974}
0274 0000 0000  |    |		.BLANK	0000[0x4]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0298       |    |		.CONST	0x0298								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 000d       |    |		.CONST	0x000d								; Number of locals
027b			INIT_0278:
027b 00e3       |    |		Load_Encached	Natural_Cache
027c 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
027d 00e3       |    |		Load_Encached	Natural_Cache
027e 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
027f 00e3       |    |		Load_Encached	Natural_Cache
0280 00e1       |    |		Load_Encached	Boolean_Cache
0281 e004       |    |		Load	0x0,0x4
0282 0007       |    |		Action	Break_Optional
0283 e005       |    |		Load	0x0,0x5
0284 02ff       |    |		Declare_Variable	Variant_Record
0285 00d8       |    |		Load_Top	At_Offset_0
0286 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0287 e006       |    |		Load	0x0,0x6
0288 02ff       |    |		Declare_Variable	Variant_Record
0289 00d8       |    |		Load_Top	At_Offset_0
028a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
028b e5ff       |    |		Load	0x2,-0x1
028c 0227       | '  |		Execute	Access,All_Reference
028d 3c28       |<(  |		Execute	Record,Field_Read,Field_Number 0x28
028e e011       |    |		Load	0x0,0x11
028f 03f1       |    |		Declare_Variable	Discrete,With_Value
0290 e007       |    |		Load	0x0,0x7
0291 0007       |    |		Action	Break_Optional
0292 00e1       |    |		Load_Encached	Boolean_Cache
0293 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0294 029f 0843  |   C|		Declare_Subprogram	INIT_0840,For_Call
0296 029f 085b  |   [|		Declare_Subprogram	INIT_0858,For_Call
0298			BODY_0278:
0298 4800       |H   |		Short_Literal	0x0
0299 e5ff       |    |		Load	0x2,-0x1
029a 0227       | '  |		Execute	Access,All_Reference
029b 3439       |49  |		Execute	Record,Field_Reference,Field_Number 0x39
029c 01d7       |    |		Execute	Vector,Field_Read
029d 6801       |h   |		Jump_Zero	0x29f
029e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
029f e5ff       |    |		Load	0x2,-0x1
02a0 0227       | '  |		Execute	Access,All_Reference
02a1 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
02a2 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02a3 e5ff       |    |		Load	0x2,-0x1
02a4 0227       | '  |		Execute	Access,All_Reference
02a5 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
02a6 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02a7 01dc       |    |		Execute	Vector,Last
02a8 027c       | |  |		Execute	Discrete,Less
02a9 6843       |hC  |		Jump_Zero	0x2ed
02aa e5ff       |    |		Load	0x2,-0x1
02ab 0229       | )  |		Execute	Access,All_Read
02ac 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
02ad 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02ae e5ff       |    |		Load	0x2,-0x1
02af 0227       | '  |		Execute	Access,All_Reference
02b0 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
02b1 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02b2 0a01       |    |		Execute_Immediate	Plus,0x1
02b3 00d8       |    |		Load_Top	At_Offset_0
02b4 00e2       |    |		Load_Encached	Integer_Cache
02b5 0260       | `  |		Execute	Discrete,In_Type
02b6 7001       |p   |		Jump_Nonzero	0x2b8
02b7 0801       |    |		Execute_Immediate	Raise,0x1
02b8 e5ff       |    |		Load	0x2,-0x1
02b9 0227       | '  |		Execute	Access,All_Reference
02ba 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
02bb 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02bc 01dc       |    |		Execute	Vector,Last
02bd 00da       |    |		Load_Top	At_Offset_2
02be 035b       | [  |		Declare_Type	Array,Constrained
02bf 00d0       |    |		Action	Swap_Control
02c0 01cd       |    |		Execute	Vector,Slice_Reference
02c1 e5ff       |    |		Load	0x2,-0x1
02c2 0229       | )  |		Execute	Access,All_Read
02c3 3c38       |<8  |		Execute	Record,Field_Read,Field_Number 0x38
02c4 00e3       |    |		Load_Encached	Natural_Cache
02c5 00da       |    |		Load_Top	At_Offset_2
02c6 00e2       |    |		Load_Encached	Integer_Cache
02c7 e5ff       |    |		Load	0x2,-0x1
02c8 0227       | '  |		Execute	Access,All_Reference
02c9 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
02ca 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02cb 8008       |    |		Call	0x0,0x8
02cc 00db       |    |		Load_Top	At_Offset_3
02cd 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02ce 00d1       |    |		Pop_Control	Pop_Count_1
02cf c403       |    |		Store	0x2,0x3
02d0 00d2       |    |		Pop_Control	Pop_Count_2
02d1 e5ff       |    |		Load	0x2,-0x1
02d2 0227       | '  |		Execute	Access,All_Reference
02d3 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
02d4 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02d5 e403       |    |		Load	0x2,0x3
02d6 0273       | s  |		Execute	Discrete,Plus
02d7 e5ff       |    |		Load	0x2,-0x1
02d8 0227       | '  |		Execute	Access,All_Reference
02d9 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
02da 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02db e5ff       |    |		Load	0x2,-0x1
02dc 0227       | '  |		Execute	Access,All_Reference
02dd 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
02de 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02df 680d       |h   |		Jump_Zero	0x2ed
02e0 e5ff       |    |		Load	0x2,-0x1
02e1 0227       | '  |		Execute	Access,All_Reference
02e2 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
02e3 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02e4 0f07       |    |		Execute_Immediate	Equal,0x7
02e5 7007       |p   |		Jump_Nonzero	0x2ed
02e6 4800       |H   |		Short_Literal	0x0
02e7 4806       |H   |		Short_Literal	0x6
02e8 e002       |    |		Load	0x0,0x2
02e9 0334       | 4  |		Declare_Variable	Array,With_Constraint
02ea 5189       |Q   |		Indirect_Literal	Any,0x474,{0x52656365, 0x69766500}
02eb e5ff       |    |		Load	0x2,-0x1
02ec 8009       |    |		Call	0x0,0x9
02ed 00cf       |    |		Action	Mark_Auxiliary
02ee 7949       |yI  |		Jump	0x438
02ef e402       |    |		Load	0x2,0x2
02f0 0a1f       |    |		Execute_Immediate	Plus,0x1f
02f1 c404       |    |		Store	0x2,0x4
02f2 e404       |    |		Load	0x2,0x4
02f3 e5ff       |    |		Load	0x2,-0x1
02f4 0227       | '  |		Execute	Access,All_Reference
02f5 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
02f6 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02f7 027d       | }  |		Execute	Discrete,Greater
02f8 68e8       |h   |		Jump_Zero	0x3e1
02f9 e404       |    |		Load	0x2,0x4
02fa e5ff       |    |		Load	0x2,-0x1
02fb 0227       | '  |		Execute	Access,All_Reference
02fc 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
02fd 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02fe 01dc       |    |		Execute	Vector,Last
02ff 027d       | }  |		Execute	Discrete,Greater
0300 6825       |h%  |		Jump_Zero	0x326
0301 e5ff       |    |		Load	0x2,-0x1
0302 0227       | '  |		Execute	Access,All_Reference
0303 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0304 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0305 a404       |    |		Store_Unchecked	0x2,0x4
0306 e5ff       |    |		Load	0x2,-0x1
0307 0227       | '  |		Execute	Access,All_Reference
0308 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0309 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
030a e402       |    |		Load	0x2,0x2
030b 0272       | r  |		Execute	Discrete,Minus
030c 0a01       |    |		Execute_Immediate	Plus,0x1
030d e5ff       |    |		Load	0x2,-0x1
030e 0227       | '  |		Execute	Access,All_Reference
030f 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0310 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0311 e402       |    |		Load	0x2,0x2
0312 e404       |    |		Load	0x2,0x4
0313 e5ff       |    |		Load	0x2,-0x1
0314 0227       | '  |		Execute	Access,All_Reference
0315 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0316 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0317 01cf       |    |		Execute	Vector,Slice_Read
0318 4801       |H   |		Short_Literal	0x1
0319 e5ff       |    |		Load	0x2,-0x1
031a 0227       | '  |		Execute	Access,All_Reference
031b 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
031c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
031d e5ff       |    |		Load	0x2,-0x1
031e 0229       | )  |		Execute	Access,All_Read
031f 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
0320 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0321 01ce       |    |		Execute	Vector,Slice_Write
0322 4801       |H   |		Short_Literal	0x1
0323 a402       |    |		Store_Unchecked	0x2,0x2
0324 4820       |H   |		Short_Literal	0x20
0325 a404       |    |		Store_Unchecked	0x2,0x4
0326 00db       |    |		Load_Top	At_Offset_3
0327 680b       |h   |		Jump_Zero	0x333
0328 e5ff       |    |		Load	0x2,-0x1
0329 820e       |    |		Call	0x1,0xe
032a e409       |    |		Load	0x2,0x9
032b e5ff       |    |		Load	0x2,-0x1
032c 0227       | '  |		Execute	Access,All_Reference
032d 3c28       |<(  |		Execute	Record,Field_Read,Field_Number 0x28
032e 027e       | ~  |		Execute	Discrete,Not_Equal
032f 6801       |h   |		Jump_Zero	0x331
0330 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0331 4800       |H   |		Short_Literal	0x0
0332 a40b       |    |		Store_Unchecked	0x2,0xb
0333 e5ff       |    |		Load	0x2,-0x1
0334 0229       | )  |		Execute	Access,All_Read
0335 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
0336 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0337 e5ff       |    |		Load	0x2,-0x1
0338 0227       | '  |		Execute	Access,All_Reference
0339 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
033a 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
033b 0a01       |    |		Execute_Immediate	Plus,0x1
033c 00d8       |    |		Load_Top	At_Offset_0
033d 00e2       |    |		Load_Encached	Integer_Cache
033e 0260       | `  |		Execute	Discrete,In_Type
033f 7001       |p   |		Jump_Nonzero	0x341
0340 0801       |    |		Execute_Immediate	Raise,0x1
0341 e5ff       |    |		Load	0x2,-0x1
0342 0227       | '  |		Execute	Access,All_Reference
0343 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0344 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0345 01dc       |    |		Execute	Vector,Last
0346 00da       |    |		Load_Top	At_Offset_2
0347 035b       | [  |		Declare_Type	Array,Constrained
0348 00d0       |    |		Action	Swap_Control
0349 01cd       |    |		Execute	Vector,Slice_Reference
034a e5ff       |    |		Load	0x2,-0x1
034b 0229       | )  |		Execute	Access,All_Read
034c 3c38       |<8  |		Execute	Record,Field_Read,Field_Number 0x38
034d 00e3       |    |		Load_Encached	Natural_Cache
034e 00da       |    |		Load_Top	At_Offset_2
034f 00e2       |    |		Load_Encached	Integer_Cache
0350 e5ff       |    |		Load	0x2,-0x1
0351 0227       | '  |		Execute	Access,All_Reference
0352 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
0353 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0354 8008       |    |		Call	0x0,0x8
0355 00db       |    |		Load_Top	At_Offset_3
0356 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0357 00d1       |    |		Pop_Control	Pop_Count_1
0358 c403       |    |		Store	0x2,0x3
0359 00d2       |    |		Pop_Control	Pop_Count_2
035a e5ff       |    |		Load	0x2,-0x1
035b 0227       | '  |		Execute	Access,All_Reference
035c 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
035d 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
035e e403       |    |		Load	0x2,0x3
035f 0273       | s  |		Execute	Discrete,Plus
0360 e5ff       |    |		Load	0x2,-0x1
0361 0227       | '  |		Execute	Access,All_Reference
0362 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0363 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0364 e5ff       |    |		Load	0x2,-0x1
0365 0227       | '  |		Execute	Access,All_Reference
0366 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
0367 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0368 680d       |h   |		Jump_Zero	0x376
0369 e5ff       |    |		Load	0x2,-0x1
036a 0227       | '  |		Execute	Access,All_Reference
036b 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
036c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
036d 0f07       |    |		Execute_Immediate	Equal,0x7
036e 7007       |p   |		Jump_Nonzero	0x376
036f 4800       |H   |		Short_Literal	0x0
0370 4806       |H   |		Short_Literal	0x6
0371 e002       |    |		Load	0x0,0x2
0372 0334       | 4  |		Declare_Variable	Array,With_Constraint
0373 5104       |Q   |		Indirect_Literal	Any,0x478,{0x52656365, 0x69766500}
0374 e5ff       |    |		Load	0x2,-0x1
0375 8009       |    |		Call	0x0,0x9
0376 e404       |    |		Load	0x2,0x4
0377 e5ff       |    |		Load	0x2,-0x1
0378 0227       | '  |		Execute	Access,All_Reference
0379 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
037a 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
037b 027d       | }  |		Execute	Discrete,Greater
037c 6864       |hd  |		Jump_Zero	0x3e1
037d e5ff       |    |		Load	0x2,-0x1
037e 0227       | '  |		Execute	Access,All_Reference
037f 3c28       |<(  |		Execute	Record,Field_Read,Field_Number 0x28
0380 e409       |    |		Load	0x2,0x9
0381 027d       | }  |		Execute	Discrete,Greater
0382 6825       |h%  |		Jump_Zero	0x3a8
0383 e402       |    |		Load	0x2,0x2
0384 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
0385 6821       |h!  |		Jump_Zero	0x3a7
0386 e5ff       |    |		Load	0x2,-0x1
0387 0227       | '  |		Execute	Access,All_Reference
0388 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0389 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
038a a404       |    |		Store_Unchecked	0x2,0x4
038b e5ff       |    |		Load	0x2,-0x1
038c 0227       | '  |		Execute	Access,All_Reference
038d 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
038e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
038f e402       |    |		Load	0x2,0x2
0390 0272       | r  |		Execute	Discrete,Minus
0391 0a01       |    |		Execute_Immediate	Plus,0x1
0392 e5ff       |    |		Load	0x2,-0x1
0393 0227       | '  |		Execute	Access,All_Reference
0394 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0395 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0396 e402       |    |		Load	0x2,0x2
0397 e404       |    |		Load	0x2,0x4
0398 e5ff       |    |		Load	0x2,-0x1
0399 0227       | '  |		Execute	Access,All_Reference
039a 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
039b 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
039c 01cf       |    |		Execute	Vector,Slice_Read
039d 4801       |H   |		Short_Literal	0x1
039e e5ff       |    |		Load	0x2,-0x1
039f 0227       | '  |		Execute	Access,All_Reference
03a0 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
03a1 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03a2 e5ff       |    |		Load	0x2,-0x1
03a3 0229       | )  |		Execute	Access,All_Read
03a4 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
03a5 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03a6 01ce       |    |		Execute	Vector,Slice_Write
03a7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03a8 e5ff       |    |		Load	0x2,-0x1
03a9 0229       | )  |		Execute	Access,All_Read
03aa 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
03ab 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03ac e5ff       |    |		Load	0x2,-0x1
03ad 0227       | '  |		Execute	Access,All_Reference
03ae 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
03af 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03b0 0a01       |    |		Execute_Immediate	Plus,0x1
03b1 00d8       |    |		Load_Top	At_Offset_0
03b2 00e2       |    |		Load_Encached	Integer_Cache
03b3 0260       | `  |		Execute	Discrete,In_Type
03b4 7001       |p   |		Jump_Nonzero	0x3b6
03b5 0801       |    |		Execute_Immediate	Raise,0x1
03b6 e404       |    |		Load	0x2,0x4
03b7 00da       |    |		Load_Top	At_Offset_2
03b8 035b       | [  |		Declare_Type	Array,Constrained
03b9 00d0       |    |		Action	Swap_Control
03ba 01cd       |    |		Execute	Vector,Slice_Reference
03bb e5ff       |    |		Load	0x2,-0x1
03bc 0229       | )  |		Execute	Access,All_Read
03bd 3c38       |<8  |		Execute	Record,Field_Read,Field_Number 0x38
03be 00e3       |    |		Load_Encached	Natural_Cache
03bf 00da       |    |		Load_Top	At_Offset_2
03c0 00e2       |    |		Load_Encached	Integer_Cache
03c1 e5ff       |    |		Load	0x2,-0x1
03c2 0227       | '  |		Execute	Access,All_Reference
03c3 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
03c4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03c5 8012       |    |		Call	0x0,0x12
03c6 00db       |    |		Load_Top	At_Offset_3
03c7 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03c8 00d1       |    |		Pop_Control	Pop_Count_1
03c9 c403       |    |		Store	0x2,0x3
03ca 00d2       |    |		Pop_Control	Pop_Count_2
03cb e5ff       |    |		Load	0x2,-0x1
03cc 0227       | '  |		Execute	Access,All_Reference
03cd 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
03ce 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03cf e403       |    |		Load	0x2,0x3
03d0 0273       | s  |		Execute	Discrete,Plus
03d1 e5ff       |    |		Load	0x2,-0x1
03d2 0227       | '  |		Execute	Access,All_Reference
03d3 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
03d4 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
03d5 e5ff       |    |		Load	0x2,-0x1
03d6 0227       | '  |		Execute	Access,All_Reference
03d7 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
03d8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03d9 6807       |h   |		Jump_Zero	0x3e1
03da 4800       |H   |		Short_Literal	0x0
03db 4806       |H   |		Short_Literal	0x6
03dc e002       |    |		Load	0x0,0x2
03dd 0334       | 4  |		Declare_Variable	Array,With_Constraint
03de 509d       |P   |		Indirect_Literal	Any,0x47c,{0x52656365, 0x69766500}
03df e5ff       |    |		Load	0x2,-0x1
03e0 8009       |    |		Call	0x0,0x9
03e1 e402       |    |		Load	0x2,0x2
03e2 e5ff       |    |		Load	0x2,-0x1
03e3 0227       | '  |		Execute	Access,All_Reference
03e4 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
03e5 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03e6 01d7       |    |		Execute	Vector,Field_Read
03e7 0c80       |    |		Execute_Immediate	Greater_Equal,-0x80
03e8 680b       |h   |		Jump_Zero	0x3f4
03e9 4801       |H   |		Short_Literal	0x1
03ea a405       |    |		Store_Unchecked	0x2,0x5
03eb e402       |    |		Load	0x2,0x2
03ec e5ff       |    |		Load	0x2,-0x1
03ed 0227       | '  |		Execute	Access,All_Reference
03ee 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
03ef 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03f0 01d7       |    |		Execute	Vector,Field_Read
03f1 0a80       |    |		Execute_Immediate	Plus,-0x80
03f2 c406       |    |		Store	0x2,0x6
03f3 7809       |x   |		Jump	0x3fd
03f4 4800       |H   |		Short_Literal	0x0
03f5 a405       |    |		Store_Unchecked	0x2,0x5
03f6 e402       |    |		Load	0x2,0x2
03f7 e5ff       |    |		Load	0x2,-0x1
03f8 0227       | '  |		Execute	Access,All_Reference
03f9 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
03fa 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03fb 01d7       |    |		Execute	Vector,Field_Read
03fc c406       |    |		Store	0x2,0x6
03fd e406       |    |		Load	0x2,0x6
03fe e402       |    |		Load	0x2,0x2
03ff e5ff       |    |		Load	0x2,-0x1
0400 0227       | '  |		Execute	Access,All_Reference
0401 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0402 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0403 01d6       |    |		Execute	Vector,Field_Write
0404 e406       |    |		Load	0x2,0x6
0405 0b00       |    |		Execute_Immediate	Case_Compare,0x0
0406 701d       |p   |		Jump_Nonzero	0x424
0407 0f01       |    |		Execute_Immediate	Equal,0x1
0408 702a       |p*  |		Jump_Nonzero	0x433
0409 e00a       |    |		Load	0x0,0xa
040a e408       |    |		Load	0x2,0x8
040b e405       |    |		Load	0x2,0x5
040c e402       |    |		Load	0x2,0x2
040d e404       |    |		Load	0x2,0x4
040e e5ff       |    |		Load	0x2,-0x1
040f 0227       | '  |		Execute	Access,All_Reference
0410 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0411 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0412 01cf       |    |		Execute	Vector,Slice_Read
0413 e5ff       |    |		Load	0x2,-0x1
0414 e406       |    |		Load	0x2,0x6
0415 e5ff       |    |		Load	0x2,-0x1
0416 0227       | '  |		Execute	Access,All_Reference
0417 343b       |4;  |		Execute	Record,Field_Reference,Field_Number 0x3b
0418 01d7       |    |		Execute	Vector,Field_Read
0419 800b       |    |		Call	0x0,0xb
041a 800c       |    |		Call	0x0,0xc
041b 00d1       |    |		Pop_Control	Pop_Count_1
041c c40a       |    |		Store	0x2,0xa
041d e40a       |    |		Load	0x2,0xa
041e 0f01       |    |		Execute_Immediate	Equal,0x1
041f 6814       |h   |		Jump_Zero	0x434
0420 e408       |    |		Load	0x2,0x8
0421 e5ff       |    |		Load	0x2,-0x1
0422 800d       |    |		Call	0x0,0xd
0423 7810       |x   |		Jump	0x434
0424 00d1       |    |		Pop_Control	Pop_Count_1
0425 e407       |    |		Load	0x2,0x7
0426 e405       |    |		Load	0x2,0x5
0427 e402       |    |		Load	0x2,0x2
0428 e404       |    |		Load	0x2,0x4
0429 e5ff       |    |		Load	0x2,-0x1
042a 0227       | '  |		Execute	Access,All_Reference
042b 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
042c 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
042d 01cf       |    |		Execute	Vector,Slice_Read
042e e5ff       |    |		Load	0x2,-0x1
042f 800e       |    |		Call	0x0,0xe
0430 00d1       |    |		Pop_Control	Pop_Count_1
0431 840c       |    |		Call	0x2,0xc
0432 7801       |x   |		Jump	0x434
0433 840d       |    |		Call	0x2,0xd
0434 e404       |    |		Load	0x2,0x4
0435 0a01       |    |		Execute_Immediate	Plus,0x1
0436 c402       |    |		Store	0x2,0x2
0437 00c9       |    |		Action	Pop_Auxiliary_Loop
0438 e5ff       |    |		Load	0x2,-0x1
0439 0227       | '  |		Execute	Access,All_Reference
043a 3c28       |<(  |		Execute	Record,Field_Read,Field_Number 0x28
043b e409       |    |		Load	0x2,0x9
043c 027f       |    |		Execute	Discrete,Equal
043d 76b1       |v   |		Jump_Nonzero	0x2ef
043e 00ce       |    |		Action	Pop_Auxiliary
043f e404       |    |		Load	0x2,0x4
0440 e5ff       |    |		Load	0x2,-0x1
0441 0227       | '  |		Execute	Access,All_Reference
0442 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0443 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0444 027f       |    |		Execute	Discrete,Equal
0445 6806       |h   |		Jump_Zero	0x44c
0446 4800       |H   |		Short_Literal	0x0
0447 e5ff       |    |		Load	0x2,-0x1
0448 0227       | '  |		Execute	Access,All_Reference
0449 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
044a 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
044b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
044c e5ff       |    |		Load	0x2,-0x1
044d 0227       | '  |		Execute	Access,All_Reference
044e 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
044f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0450 a402       |    |		Store_Unchecked	0x2,0x2
0451 e5ff       |    |		Load	0x2,-0x1
0452 0227       | '  |		Execute	Access,All_Reference
0453 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0454 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0455 e404       |    |		Load	0x2,0x4
0456 0272       | r  |		Execute	Discrete,Minus
0457 e5ff       |    |		Load	0x2,-0x1
0458 0227       | '  |		Execute	Access,All_Reference
0459 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
045a 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
045b e404       |    |		Load	0x2,0x4
045c 0a01       |    |		Execute_Immediate	Plus,0x1
045d 00d8       |    |		Load_Top	At_Offset_0
045e 00e2       |    |		Load_Encached	Integer_Cache
045f 0260       | `  |		Execute	Discrete,In_Type
0460 7001       |p   |		Jump_Nonzero	0x462
0461 0801       |    |		Execute_Immediate	Raise,0x1
0462 e402       |    |		Load	0x2,0x2
0463 e5ff       |    |		Load	0x2,-0x1
0464 0227       | '  |		Execute	Access,All_Reference
0465 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0466 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0467 01cf       |    |		Execute	Vector,Slice_Read
0468 4801       |H   |		Short_Literal	0x1
0469 e5ff       |    |		Load	0x2,-0x1
046a 0227       | '  |		Execute	Access,All_Reference
046b 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
046c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
046d e5ff       |    |		Load	0x2,-0x1
046e 0229       | )  |		Execute	Access,All_Read
046f 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
0470 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0471 01ce       |    |		Execute	Vector,Slice_Write
0472 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0473 0000       |    |		.XXX[0x1]
0474 5265 6365  |Rece|		.LITERAL	{0x52656365, 0x69766500}
0478 5265 6365  |Rece|		.LITERAL	{0x52656365, 0x69766500}
047c 5265 6365  |Rece|		.LITERAL	{0x52656365, 0x69766500}
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 04a2       |    |		.CONST	0x04a2								; Address of begin
0481 0004       |    |		.CONST	0x0004								; Address of exception handler
0482 0011       |    |		.CONST	0x0011								; Number of locals
0483			INIT_0480:
0483 e013       |    |		Load	0x0,0x13
0484 0007       |    |		Action	Break_Optional
0485 e013       |    |		Load	0x0,0x13
0486 0007       |    |		Action	Break_Optional
0487 e013       |    |		Load	0x0,0x13
0488 0007       |    |		Action	Break_Optional
0489 e011       |    |		Load	0x0,0x11
048a 0007       |    |		Action	Break_Optional
048b e011       |    |		Load	0x0,0x11
048c 0007       |    |		Action	Break_Optional
048d 00e1       |    |		Load_Encached	Boolean_Cache
048e e014       |    |		Load	0x0,0x14
048f 0007       |    |		Action	Break_Optional
0490 e015       |    |		Load	0x0,0x15
0491 0007       |    |		Action	Break_Optional
0492 e015       |    |		Load	0x0,0x15
0493 0007       |    |		Action	Break_Optional
0494 e016       |    |		Load	0x0,0x16
0495 0007       |    |		Action	Break_Optional
0496 e007       |    |		Load	0x0,0x7
0497 0007       |    |		Action	Break_Optional
0498 029f 0893  |    |		Declare_Subprogram	INIT_0890,For_Call
049a 029f 08db  |    |		Declare_Subprogram	INIT_08d8,For_Call
049c 029f 093b  |   ;|		Declare_Subprogram	INIT_0938,For_Call
049e 029f 099b  |    |		Declare_Subprogram	INIT_0998,For_Call
04a0 029f 09d3  |    |		Declare_Subprogram	INIT_09d0,For_Call
04a2			BODY_0480:
04a2 e017       |    |		Load	0x0,0x17
04a3 a5fe       |    |		Store_Unchecked	0x2,-0x2
04a4 4800       |H   |		Short_Literal	0x0
04a5 a5fd       |    |		Store_Unchecked	0x2,-0x3
04a6 4800       |H   |		Short_Literal	0x0
04a7 a5fc       |    |		Store_Unchecked	0x2,-0x4
04a8 4800       |H   |		Short_Literal	0x0
04a9 a5fb       |    |		Store_Unchecked	0x2,-0x5
04aa e014       |    |		Load	0x0,0x14
04ab e5f9       |    |		Load	0x2,-0x7
04ac 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
04ad 4800       |H   |		Short_Literal	0x0
04ae e5f9       |    |		Load	0x2,-0x7
04af 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
04b0 e016       |    |		Load	0x0,0x16
04b1 a5fa       |    |		Store_Unchecked	0x2,-0x6
04b2 e5f7       |    |		Load	0x2,-0x9
04b3 4800       |H   |		Short_Literal	0x0
04b4 00e5       |    |		Load_Encached	Long_Integer_Cache
04b5 00d9       |    |		Load_Top	At_Offset_1
04b6 0267       | g  |		Execute	Discrete,Predecessor
04b7 e002       |    |		Load	0x0,0x2
04b8 0334       | 4  |		Declare_Variable	Array,With_Constraint
04b9 8018       |    |		Call	0x0,0x18
04ba 00d1       |    |		Pop_Control	Pop_Count_1
04bb e5ff       |    |		Load	0x2,-0x1
04bc 01dd       |    |		Execute	Vector,First
04bd 0aff       |    |		Execute_Immediate	Plus,-0x1
04be c406       |    |		Store	0x2,0x6
04bf 483a       |H:  |		Short_Literal	0x3a
04c0 4820       |H   |		Short_Literal	0x20
04c1 840d       |    |		Call	0x2,0xd
04c2 e404       |    |		Load	0x2,0x4
04c3 a402       |    |		Store_Unchecked	0x2,0x2
04c4 e405       |    |		Load	0x2,0x5
04c5 c403       |    |		Store	0x2,0x3
04c6 e406       |    |		Load	0x2,0x6
04c7 0a01       |    |		Execute_Immediate	Plus,0x1
04c8 e5ff       |    |		Load	0x2,-0x1
04c9 01dc       |    |		Execute	Vector,Last
04ca 027a       | z  |		Execute	Discrete,Less_Equal
04cb 680c       |h   |		Jump_Zero	0x4d8
04cc e406       |    |		Load	0x2,0x6
04cd 00d8       |    |		Load_Top	At_Offset_0
04ce 0a01       |    |		Execute_Immediate	Plus,0x1
04cf e5ff       |    |		Load	0x2,-0x1
04d0 01cf       |    |		Execute	Vector,Slice_Read
04d1 4800       |H   |		Short_Literal	0x0
04d2 4801       |H   |		Short_Literal	0x1
04d3 e002       |    |		Load	0x0,0x2
04d4 0334       | 4  |		Declare_Variable	Array,With_Constraint
04d5 50ce       |P   |		Indirect_Literal	Any,0x5a4,{0x3a3a0000, 0x00000000}
04d6 01df       |    |		Execute	Vector,Equal
04d7 7801       |x   |		Jump	0x4d9
04d8 4800       |H   |		Short_Literal	0x0
04d9 a407       |    |		Store_Unchecked	0x2,0x7
04da 4800       |H   |		Short_Literal	0x0
04db a5fb       |    |		Store_Unchecked	0x2,-0x5
04dc e407       |    |		Load	0x2,0x7
04dd 681a       |h   |		Jump_Zero	0x4f8
04de e5f7       |    |		Load	0x2,-0x9
04df 4820       |H   |		Short_Literal	0x20
04e0 4800       |H   |		Short_Literal	0x0
04e1 482e       |H.  |		Short_Literal	0x2e
04e2 e002       |    |		Load	0x0,0x2
04e3 0334       | 4  |		Declare_Variable	Array,With_Constraint
04e4 50c3       |P   |		Indirect_Literal	Any,0x5a8,{0x4445436e, 0x65742063}
04e5 4800       |H   |		Short_Literal	0x0
04e6 480a       |H   |		Short_Literal	0xa
04e7 e002       |    |		Load	0x0,0x2
04e8 0334       | 4  |		Declare_Variable	Array,With_Constraint
04e9 50d6       |P   |		Indirect_Literal	Any,0x5c0,{0x4445436e, 0x6574556e}
04ea 4800       |H   |		Short_Literal	0x0
04eb 4808       |H   |		Short_Literal	0x8
04ec e002       |    |		Load	0x0,0x2
04ed 0334       | 4  |		Declare_Variable	Array,With_Constraint
04ee 50d9       |P   |		Indirect_Literal	Any,0x5c8,{0x586c6962, 0x4572726f}
04ef 8019       |    |		Call	0x0,0x19
04f0 01cb       |    |		Execute	Vector,Append
04f1 e5ff       |    |		Load	0x2,-0x1
04f2 01cc       |    |		Execute	Vector,Catenate
04f3 8018       |    |		Call	0x0,0x18
04f4 00d1       |    |		Pop_Control	Pop_Count_1
04f5 4800       |H   |		Short_Literal	0x0
04f6 a5f8       |    |		Store_Unchecked	0x2,-0x8
04f7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04f8 482e       |H.  |		Short_Literal	0x2e
04f9 483a       |H:  |		Short_Literal	0x3a
04fa 840d       |    |		Call	0x2,0xd
04fb e404       |    |		Load	0x2,0x4
04fc e405       |    |		Load	0x2,0x5
04fd 027d       | }  |		Execute	Discrete,Greater
04fe 6803       |h   |		Jump_Zero	0x502
04ff 4800       |H   |		Short_Literal	0x0
0500 a409       |    |		Store_Unchecked	0x2,0x9
0501 7801       |x   |		Jump	0x503
0502 840e       |    |		Call	0x2,0xe
0503 e409       |    |		Load	0x2,0x9
0504 a5fd       |    |		Store_Unchecked	0x2,-0x3
0505 4800       |H   |		Short_Literal	0x0
0506 482e       |H.  |		Short_Literal	0x2e
0507 840d       |    |		Call	0x2,0xd
0508 e404       |    |		Load	0x2,0x4
0509 e405       |    |		Load	0x2,0x5
050a 027d       | }  |		Execute	Discrete,Greater
050b 6803       |h   |		Jump_Zero	0x50f
050c 4800       |H   |		Short_Literal	0x0
050d a40a       |    |		Store_Unchecked	0x2,0xa
050e 7801       |x   |		Jump	0x510
050f 840f       |    |		Call	0x2,0xf
0510 e40a       |    |		Load	0x2,0xa
0511 a5fc       |    |		Store_Unchecked	0x2,-0x4
0512 e405       |    |		Load	0x2,0x5
0513 e5ff       |    |		Load	0x2,-0x1
0514 01dc       |    |		Execute	Vector,Last
0515 027c       | |  |		Execute	Discrete,Less
0516 6859       |hY  |		Jump_Zero	0x570
0517 e405       |    |		Load	0x2,0x5
0518 0a01       |    |		Execute_Immediate	Plus,0x1
0519 e5ff       |    |		Load	0x2,-0x1
051a 01dc       |    |		Execute	Vector,Last
051b e5ff       |    |		Load	0x2,-0x1
051c 01cf       |    |		Execute	Vector,Slice_Read
051d e405       |    |		Load	0x2,0x5
051e 0a01       |    |		Execute_Immediate	Plus,0x1
051f e5ff       |    |		Load	0x2,-0x1
0520 01dc       |    |		Execute	Vector,Last
0521 e002       |    |		Load	0x0,0x2
0522 035b       | [  |		Declare_Type	Array,Constrained
0523 0337       | 7  |		Declare_Variable	Array
0524 00d8       |    |		Load_Top	At_Offset_0
0525 01d9       |    |		Execute	Vector,Reverse_Bounds
0526 0263       | c  |		Execute	Discrete,Above_Bound
0527 7005       |p   |		Jump_Nonzero	0x52d
0528 4800       |H   |		Short_Literal	0x0
0529 00d9       |    |		Load_Top	At_Offset_1
052a e413       |    |		Load	0x2,0x13
052b 01d6       |    |		Execute	Vector,Field_Write
052c 3ffb       |?   |		Loop_Increasing	0x528
052d 01de       |    |		Execute	Vector,Not_Equal
052e 6841       |hA  |		Jump_Zero	0x570
052f e405       |    |		Load	0x2,0x5
0530 0a01       |    |		Execute_Immediate	Plus,0x1
0531 e5ff       |    |		Load	0x2,-0x1
0532 01dc       |    |		Execute	Vector,Last
0533 e5ff       |    |		Load	0x2,-0x1
0534 01cf       |    |		Execute	Vector,Slice_Read
0535 e405       |    |		Load	0x2,0x5
0536 0a01       |    |		Execute_Immediate	Plus,0x1
0537 e5ff       |    |		Load	0x2,-0x1
0538 01dc       |    |		Execute	Vector,Last
0539 e002       |    |		Load	0x0,0x2
053a 035b       | [  |		Declare_Type	Array,Constrained
053b 0337       | 7  |		Declare_Variable	Array
053c 00d8       |    |		Load_Top	At_Offset_0
053d 01d9       |    |		Execute	Vector,Reverse_Bounds
053e 0263       | c  |		Execute	Discrete,Above_Bound
053f 7005       |p   |		Jump_Nonzero	0x545
0540 4820       |H   |		Short_Literal	0x20
0541 00d9       |    |		Load_Top	At_Offset_1
0542 e413       |    |		Load	0x2,0x13
0543 01d6       |    |		Execute	Vector,Field_Write
0544 3ffb       |?   |		Loop_Increasing	0x540
0545 01de       |    |		Execute	Vector,Not_Equal
0546 6829       |h)  |		Jump_Zero	0x570
0547 e5f7       |    |		Load	0x2,-0x9
0548 4800       |H   |		Short_Literal	0x0
0549 482a       |H*  |		Short_Literal	0x2a
054a e002       |    |		Load	0x0,0x2
054b 0334       | 4  |		Declare_Variable	Array,With_Constraint
054c 5083       |P   |		Indirect_Literal	Any,0x5d0,{0x47617262, 0x61676520}
054d 4800       |H   |		Short_Literal	0x0
054e 4808       |H   |		Short_Literal	0x8
054f e002       |    |		Load	0x0,0x2
0550 0334       | 4  |		Declare_Variable	Array,With_Constraint
0551 5096       |P   |		Indirect_Literal	Any,0x5e8,{0x444e4761, 0x72626167}
0552 4800       |H   |		Short_Literal	0x0
0553 4808       |H   |		Short_Literal	0x8
0554 e002       |    |		Load	0x0,0x2
0555 0334       | 4  |		Declare_Variable	Array,With_Constraint
0556 5099       |P   |		Indirect_Literal	Any,0x5f0,{0x586c6962, 0x4572726f}
0557 8019       |    |		Call	0x0,0x19
0558 4800       |H   |		Short_Literal	0x0
0559 4801       |H   |		Short_Literal	0x1
055a e002       |    |		Load	0x0,0x2
055b 0334       | 4  |		Declare_Variable	Array,With_Constraint
055c 509b       |P   |		Indirect_Literal	Any,0x5f8,{0x205b0000, 0x00000000}
055d 01cc       |    |		Execute	Vector,Catenate
055e e405       |    |		Load	0x2,0x5
055f 0a01       |    |		Execute_Immediate	Plus,0x1
0560 e5ff       |    |		Load	0x2,-0x1
0561 01dc       |    |		Execute	Vector,Last
0562 e5ff       |    |		Load	0x2,-0x1
0563 01cf       |    |		Execute	Vector,Slice_Read
0564 01cc       |    |		Execute	Vector,Catenate
0565 4800       |H   |		Short_Literal	0x0
0566 4800       |H   |		Short_Literal	0x0
0567 e002       |    |		Load	0x0,0x2
0568 0334       | 4  |		Declare_Variable	Array,With_Constraint
0569 5092       |P   |		Indirect_Literal	Any,0x5fc,{0x5d000000, 0x00000000}
056a 01cc       |    |		Execute	Vector,Catenate
056b 8018       |    |		Call	0x0,0x18
056c 00d1       |    |		Pop_Control	Pop_Count_1
056d 4800       |H   |		Short_Literal	0x0
056e a5f8       |    |		Store_Unchecked	0x2,-0x8
056f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0570 e402       |    |		Load	0x2,0x2
0571 e403       |    |		Load	0x2,0x3
0572 027d       | }  |		Execute	Discrete,Greater
0573 700b       |p   |		Jump_Nonzero	0x57f
0574 e402       |    |		Load	0x2,0x2
0575 e403       |    |		Load	0x2,0x3
0576 e5ff       |    |		Load	0x2,-0x1
0577 01cf       |    |		Execute	Vector,Slice_Read
0578 4800       |H   |		Short_Literal	0x0
0579 4804       |H   |		Short_Literal	0x4
057a e002       |    |		Load	0x0,0x2
057b 0334       | 4  |		Declare_Variable	Array,With_Constraint
057c 5083       |P   |		Indirect_Literal	Any,0x600,{0x6c6f6361, 0x6c000000}
057d 01df       |    |		Execute	Vector,Equal
057e 6802       |h   |		Jump_Zero	0x581
057f 8410       |    |		Call	0x2,0x10
0580 780e       |x   |		Jump	0x58f
0581 e5f7       |    |		Load	0x2,-0x9
0582 e007       |    |		Load	0x0,0x7
0583 e016       |    |		Load	0x0,0x16
0584 e408       |    |		Load	0x2,0x8
0585 e409       |    |		Load	0x2,0x9
0586 e402       |    |		Load	0x2,0x2
0587 e403       |    |		Load	0x2,0x3
0588 e5ff       |    |		Load	0x2,-0x1
0589 01cf       |    |		Execute	Vector,Slice_Read
058a 8215       |    |		Call	0x1,0x15
058b c408       |    |		Store	0x2,0x8
058c c40b       |    |		Store	0x2,0xb
058d c40c       |    |		Store	0x2,0xc
058e 00d1       |    |		Pop_Control	Pop_Count_1
058f e40c       |    |		Load	0x2,0xc
0590 7009       |p   |		Jump_Nonzero	0x59a
0591 e40b       |    |		Load	0x2,0xb
0592 e01a       |    |		Load	0x0,0x1a
0593 e01b       |    |		Load	0x0,0x1b
0594 a01c       |    |		Store_Unchecked	0x0,0x1c
0595 801d       |    |		Call	0x0,0x1d
0596 c40b       |    |		Store	0x2,0xb
0597 4800       |H   |		Short_Literal	0x0
0598 a5f8       |    |		Store_Unchecked	0x2,-0x8
0599 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
059a 8411       |    |		Call	0x2,0x11
059b e40b       |    |		Load	0x2,0xb
059c a5fa       |    |		Store_Unchecked	0x2,-0x6
059d e408       |    |		Load	0x2,0x8
059e e5f9       |    |		Load	0x2,-0x7
059f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05a0 4801       |H   |		Short_Literal	0x1
05a1 a5f8       |    |		Store_Unchecked	0x2,-0x8
05a2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05a3 0000       |    |		.XXX[0x1]
05a4 3a3a 0000  |::  |		.LITERAL	{0x3a3a0000, 0x00000000}
05a8 4445 436e  |DECn|		.LITERAL	{0x4445436e, 0x65742063}
05ac 6f6e 6e65  |onne|		.XXX[0x14]
05ae 6374 696f  |ctio|
05b0 6e73 2061  |ns a|
05b2 7265 206e  |re n|
05b4 6f74 2063  |ot c|
05b6 7572 7265  |urre|
05b8 6e74 6c79  |ntly|
05ba 2073 7570  | sup|
05bc 706f 7274  |port|
05be 6564 3a00  |ed: |
05c0 4445 436e  |DECn|		.LITERAL	{0x4445436e, 0x6574556e}
05c4 7375 7000  |sup |		.XXX[0x4]
05c6 0000 0000  |    |
05c8 586c 6962  |Xlib|		.LITERAL	{0x586c6962, 0x4572726f}
05cc 7200 0000  |r   |		.XXX[0x4]
05ce 0000 0000  |    |
05d0 4761 7262  |Garb|		.LITERAL	{0x47617262, 0x61676520}
05d4 6368 6172  |char|		.XXX[0x14]
05d6 6163 7465  |acte|
05d8 7273 2061  |rs a|
05da 6674 6572  |fter|
05dc 2074 6865  | the|
05de 2064 6973  | dis|
05e0 706c 6179  |play|
05e2 206e 616d  | nam|
05e4 6520 3a00  |e : |
05e6 0000 0000  |    |
05e8 444e 4761  |DNGa|		.LITERAL	{0x444e4761, 0x72626167}
05ec 6500 0000  |e   |		.XXX[0x4]
05ee 0000 0000  |    |
05f0 586c 6962  |Xlib|		.LITERAL	{0x586c6962, 0x4572726f}
05f4 7200 0000  |r   |		.XXX[0x4]
05f6 0000 0000  |    |
05f8 205b 0000  | [  |		.LITERAL	{0x205b0000, 0x00000000}
05fc 5d00 0000  |]   |		.LITERAL	{0x5d000000, 0x00000000}
0600 6c6f 6361  |loca|		.LITERAL	{0x6c6f6361, 0x6c000000}
0604 0000 0000  |    |		.BLANK	0000[0x4]
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060b       |    |		.CONST	0x060b								; Address of begin
0609 0004       |    |		.CONST	0x0004								; Address of exception handler
060a 0001       |    |		.CONST	0x0001								; Number of locals
060b			BODY_0608:
060b			INIT_0608:
060b 00da       |    |		Load_Top	At_Offset_2
060c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
060d 681a       |h   |		Jump_Zero	0x628
060e 00da       |    |		Load_Top	At_Offset_2
060f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0610 0227       | '  |		Execute	Access,All_Reference
0611 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0612 0209       |    |		Execute	Task,Abort
0613 0007       |    |		Action	Break_Optional
0614 00da       |    |		Load_Top	At_Offset_2
0615 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0616 0227       | '  |		Execute	Access,All_Reference
0617 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0618 e01e       |    |		Load	0x0,0x1e
0619 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
061a 00da       |    |		Load_Top	At_Offset_2
061b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
061c 0227       | '  |		Execute	Access,All_Reference
061d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
061e e01e       |    |		Load	0x0,0x1e
061f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0620 00da       |    |		Load_Top	At_Offset_2
0621 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0622 e01f       |    |		Load	0x0,0x1f
0623 e020       |    |		Load	0x0,0x20
0624 a021       | !  |		Store_Unchecked	0x0,0x21
0625 801d       |    |		Call	0x0,0x1d
0626 00db       |    |		Load_Top	At_Offset_3
0627 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0628 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0629 0000 0000  |    |		.BLANK	0000[0x7]
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 064b       | K  |		.CONST	0x064b								; Address of begin
0631 0004       |    |		.CONST	0x0004								; Address of exception handler
0632 000c       |    |		.CONST	0x000c								; Number of locals
0633			INIT_0630:
0633 00e3       |    |		Load_Encached	Natural_Cache
0634 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0635 00e3       |    |		Load_Encached	Natural_Cache
0636 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0637 00e3       |    |		Load_Encached	Natural_Cache
0638 00e1       |    |		Load_Encached	Boolean_Cache
0639 e004       |    |		Load	0x0,0x4
063a 0007       |    |		Action	Break_Optional
063b e005       |    |		Load	0x0,0x5
063c 02ff       |    |		Declare_Variable	Variant_Record
063d 00d8       |    |		Load_Top	At_Offset_0
063e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
063f e006       |    |		Load	0x0,0x6
0640 02ff       |    |		Declare_Variable	Variant_Record
0641 00d8       |    |		Load_Top	At_Offset_0
0642 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0643 e007       |    |		Load	0x0,0x7
0644 0007       |    |		Action	Break_Optional
0645 00e1       |    |		Load_Encached	Boolean_Cache
0646 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0647 029f 0a23  |   #|		Declare_Subprogram	INIT_0a20,For_Call
0649 029f 0a3b  |   ;|		Declare_Subprogram	INIT_0a38,For_Call
064b			BODY_0630:
064b e5ff       |    |		Load	0x2,-0x1
064c 0227       | '  |		Execute	Access,All_Reference
064d 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
064e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
064f e5ff       |    |		Load	0x2,-0x1
0650 0227       | '  |		Execute	Access,All_Reference
0651 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0652 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0653 01dc       |    |		Execute	Vector,Last
0654 027c       | |  |		Execute	Discrete,Less
0655 684c       |hL  |		Jump_Zero	0x6a2
0656 e5ff       |    |		Load	0x2,-0x1
0657 0229       | )  |		Execute	Access,All_Read
0658 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
0659 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
065a e5ff       |    |		Load	0x2,-0x1
065b 0227       | '  |		Execute	Access,All_Reference
065c 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
065d 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
065e 0a01       |    |		Execute_Immediate	Plus,0x1
065f 00d8       |    |		Load_Top	At_Offset_0
0660 00e2       |    |		Load_Encached	Integer_Cache
0661 0260       | `  |		Execute	Discrete,In_Type
0662 7001       |p   |		Jump_Nonzero	0x664
0663 0801       |    |		Execute_Immediate	Raise,0x1
0664 e5ff       |    |		Load	0x2,-0x1
0665 0227       | '  |		Execute	Access,All_Reference
0666 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0667 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0668 01dc       |    |		Execute	Vector,Last
0669 00da       |    |		Load_Top	At_Offset_2
066a 035b       | [  |		Declare_Type	Array,Constrained
066b 00d0       |    |		Action	Swap_Control
066c 01cd       |    |		Execute	Vector,Slice_Reference
066d e5ff       |    |		Load	0x2,-0x1
066e 0229       | )  |		Execute	Access,All_Read
066f 3c38       |<8  |		Execute	Record,Field_Read,Field_Number 0x38
0670 00e3       |    |		Load_Encached	Natural_Cache
0671 00da       |    |		Load_Top	At_Offset_2
0672 00e2       |    |		Load_Encached	Integer_Cache
0673 e5ff       |    |		Load	0x2,-0x1
0674 0227       | '  |		Execute	Access,All_Reference
0675 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
0676 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0677 8008       |    |		Call	0x0,0x8
0678 00db       |    |		Load_Top	At_Offset_3
0679 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
067a 00d1       |    |		Pop_Control	Pop_Count_1
067b c403       |    |		Store	0x2,0x3
067c 00d2       |    |		Pop_Control	Pop_Count_2
067d e5ff       |    |		Load	0x2,-0x1
067e 0227       | '  |		Execute	Access,All_Reference
067f 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0680 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0681 e403       |    |		Load	0x2,0x3
0682 0273       | s  |		Execute	Discrete,Plus
0683 e5ff       |    |		Load	0x2,-0x1
0684 0227       | '  |		Execute	Access,All_Reference
0685 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0686 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0687 e5ff       |    |		Load	0x2,-0x1
0688 0227       | '  |		Execute	Access,All_Reference
0689 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
068a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
068b 680d       |h   |		Jump_Zero	0x699
068c e5ff       |    |		Load	0x2,-0x1
068d 0227       | '  |		Execute	Access,All_Reference
068e 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
068f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0690 0f07       |    |		Execute_Immediate	Equal,0x7
0691 7007       |p   |		Jump_Nonzero	0x699
0692 4800       |H   |		Short_Literal	0x0
0693 4806       |H   |		Short_Literal	0x6
0694 e002       |    |		Load	0x0,0x2
0695 0334       | 4  |		Declare_Variable	Array,With_Constraint
0696 512d       |Q-  |		Indirect_Literal	Any,0x7c4,{0x52656365, 0x69766500}
0697 e5ff       |    |		Load	0x2,-0x1
0698 8009       |    |		Call	0x0,0x9
0699 e5ff       |    |		Load	0x2,-0x1
069a 0227       | '  |		Execute	Access,All_Reference
069b 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
069c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
069d 7004       |p   |		Jump_Nonzero	0x6a2
069e e403       |    |		Load	0x2,0x3
069f 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
06a0 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
06a1 7914       |y   |		Jump	0x7b6
06a2 00cf       |    |		Action	Mark_Auxiliary
06a3 7905       |y   |		Jump	0x7a9
06a4 e402       |    |		Load	0x2,0x2
06a5 0a1f       |    |		Execute_Immediate	Plus,0x1f
06a6 c404       |    |		Store	0x2,0x4
06a7 e404       |    |		Load	0x2,0x4
06a8 e5ff       |    |		Load	0x2,-0x1
06a9 0227       | '  |		Execute	Access,All_Reference
06aa 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
06ab 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06ac 027d       | }  |		Execute	Discrete,Greater
06ad 68a2       |h   |		Jump_Zero	0x750
06ae e404       |    |		Load	0x2,0x4
06af e5ff       |    |		Load	0x2,-0x1
06b0 0227       | '  |		Execute	Access,All_Reference
06b1 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
06b2 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06b3 01dc       |    |		Execute	Vector,Last
06b4 027d       | }  |		Execute	Discrete,Greater
06b5 6825       |h%  |		Jump_Zero	0x6db
06b6 e5ff       |    |		Load	0x2,-0x1
06b7 0227       | '  |		Execute	Access,All_Reference
06b8 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
06b9 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06ba a404       |    |		Store_Unchecked	0x2,0x4
06bb e5ff       |    |		Load	0x2,-0x1
06bc 0227       | '  |		Execute	Access,All_Reference
06bd 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
06be 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06bf e402       |    |		Load	0x2,0x2
06c0 0272       | r  |		Execute	Discrete,Minus
06c1 0a01       |    |		Execute_Immediate	Plus,0x1
06c2 e5ff       |    |		Load	0x2,-0x1
06c3 0227       | '  |		Execute	Access,All_Reference
06c4 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
06c5 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06c6 e402       |    |		Load	0x2,0x2
06c7 e404       |    |		Load	0x2,0x4
06c8 e5ff       |    |		Load	0x2,-0x1
06c9 0227       | '  |		Execute	Access,All_Reference
06ca 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
06cb 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06cc 01cf       |    |		Execute	Vector,Slice_Read
06cd 4801       |H   |		Short_Literal	0x1
06ce e5ff       |    |		Load	0x2,-0x1
06cf 0227       | '  |		Execute	Access,All_Reference
06d0 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
06d1 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06d2 e5ff       |    |		Load	0x2,-0x1
06d3 0229       | )  |		Execute	Access,All_Read
06d4 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
06d5 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06d6 01ce       |    |		Execute	Vector,Slice_Write
06d7 4801       |H   |		Short_Literal	0x1
06d8 a402       |    |		Store_Unchecked	0x2,0x2
06d9 4820       |H   |		Short_Literal	0x20
06da a404       |    |		Store_Unchecked	0x2,0x4
06db e5ff       |    |		Load	0x2,-0x1
06dc 0229       | )  |		Execute	Access,All_Read
06dd 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
06de 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06df e5ff       |    |		Load	0x2,-0x1
06e0 0227       | '  |		Execute	Access,All_Reference
06e1 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
06e2 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06e3 0a01       |    |		Execute_Immediate	Plus,0x1
06e4 00d8       |    |		Load_Top	At_Offset_0
06e5 00e2       |    |		Load_Encached	Integer_Cache
06e6 0260       | `  |		Execute	Discrete,In_Type
06e7 7001       |p   |		Jump_Nonzero	0x6e9
06e8 0801       |    |		Execute_Immediate	Raise,0x1
06e9 e5ff       |    |		Load	0x2,-0x1
06ea 0227       | '  |		Execute	Access,All_Reference
06eb 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
06ec 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06ed 01dc       |    |		Execute	Vector,Last
06ee 00da       |    |		Load_Top	At_Offset_2
06ef 035b       | [  |		Declare_Type	Array,Constrained
06f0 00d0       |    |		Action	Swap_Control
06f1 01cd       |    |		Execute	Vector,Slice_Reference
06f2 e5ff       |    |		Load	0x2,-0x1
06f3 0229       | )  |		Execute	Access,All_Read
06f4 3c38       |<8  |		Execute	Record,Field_Read,Field_Number 0x38
06f5 00e3       |    |		Load_Encached	Natural_Cache
06f6 00da       |    |		Load_Top	At_Offset_2
06f7 00e2       |    |		Load_Encached	Integer_Cache
06f8 e5ff       |    |		Load	0x2,-0x1
06f9 0227       | '  |		Execute	Access,All_Reference
06fa 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
06fb 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
06fc 8008       |    |		Call	0x0,0x8
06fd 00db       |    |		Load_Top	At_Offset_3
06fe 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
06ff 00d1       |    |		Pop_Control	Pop_Count_1
0700 c403       |    |		Store	0x2,0x3
0701 00d2       |    |		Pop_Control	Pop_Count_2
0702 e5ff       |    |		Load	0x2,-0x1
0703 0227       | '  |		Execute	Access,All_Reference
0704 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0705 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0706 e403       |    |		Load	0x2,0x3
0707 0273       | s  |		Execute	Discrete,Plus
0708 e5ff       |    |		Load	0x2,-0x1
0709 0227       | '  |		Execute	Access,All_Reference
070a 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
070b 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
070c e5ff       |    |		Load	0x2,-0x1
070d 0227       | '  |		Execute	Access,All_Reference
070e 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
070f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0710 680d       |h   |		Jump_Zero	0x71e
0711 e5ff       |    |		Load	0x2,-0x1
0712 0227       | '  |		Execute	Access,All_Reference
0713 3438       |48  |		Execute	Record,Field_Reference,Field_Number 0x38
0714 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0715 0f07       |    |		Execute_Immediate	Equal,0x7
0716 7007       |p   |		Jump_Nonzero	0x71e
0717 4800       |H   |		Short_Literal	0x0
0718 4806       |H   |		Short_Literal	0x6
0719 e002       |    |		Load	0x0,0x2
071a 0334       | 4  |		Declare_Variable	Array,With_Constraint
071b 50ac       |P   |		Indirect_Literal	Any,0x7c8,{0x52656365, 0x69766500}
071c e5ff       |    |		Load	0x2,-0x1
071d 8009       |    |		Call	0x0,0x9
071e e404       |    |		Load	0x2,0x4
071f e5ff       |    |		Load	0x2,-0x1
0720 0227       | '  |		Execute	Access,All_Reference
0721 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0722 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0723 027d       | }  |		Execute	Discrete,Greater
0724 682b       |h+  |		Jump_Zero	0x750
0725 e402       |    |		Load	0x2,0x2
0726 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
0727 6821       |h!  |		Jump_Zero	0x749
0728 e5ff       |    |		Load	0x2,-0x1
0729 0227       | '  |		Execute	Access,All_Reference
072a 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
072b 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
072c a404       |    |		Store_Unchecked	0x2,0x4
072d e5ff       |    |		Load	0x2,-0x1
072e 0227       | '  |		Execute	Access,All_Reference
072f 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0730 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0731 e402       |    |		Load	0x2,0x2
0732 0272       | r  |		Execute	Discrete,Minus
0733 0a01       |    |		Execute_Immediate	Plus,0x1
0734 e5ff       |    |		Load	0x2,-0x1
0735 0227       | '  |		Execute	Access,All_Reference
0736 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0737 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0738 e402       |    |		Load	0x2,0x2
0739 e404       |    |		Load	0x2,0x4
073a e5ff       |    |		Load	0x2,-0x1
073b 0227       | '  |		Execute	Access,All_Reference
073c 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
073d 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
073e 01cf       |    |		Execute	Vector,Slice_Read
073f 4801       |H   |		Short_Literal	0x1
0740 e5ff       |    |		Load	0x2,-0x1
0741 0227       | '  |		Execute	Access,All_Reference
0742 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0743 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0744 e5ff       |    |		Load	0x2,-0x1
0745 0229       | )  |		Execute	Access,All_Read
0746 3c34       |<4  |		Execute	Record,Field_Read,Field_Number 0x34
0747 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0748 01ce       |    |		Execute	Vector,Slice_Write
0749 00db       |    |		Load_Top	At_Offset_3
074a e403       |    |		Load	0x2,0x3
074b 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
074c 0278       | x  |		Execute	Discrete,Or
074d a40a       |    |		Store_Unchecked	0x2,0xa
074e 00ce       |    |		Action	Pop_Auxiliary
074f 7866       |xf  |		Jump	0x7b6
0750 e402       |    |		Load	0x2,0x2
0751 e5ff       |    |		Load	0x2,-0x1
0752 0227       | '  |		Execute	Access,All_Reference
0753 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0754 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0755 01d7       |    |		Execute	Vector,Field_Read
0756 0c80       |    |		Execute_Immediate	Greater_Equal,-0x80
0757 680b       |h   |		Jump_Zero	0x763
0758 4801       |H   |		Short_Literal	0x1
0759 a405       |    |		Store_Unchecked	0x2,0x5
075a e402       |    |		Load	0x2,0x2
075b e5ff       |    |		Load	0x2,-0x1
075c 0227       | '  |		Execute	Access,All_Reference
075d 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
075e 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
075f 01d7       |    |		Execute	Vector,Field_Read
0760 0a80       |    |		Execute_Immediate	Plus,-0x80
0761 c406       |    |		Store	0x2,0x6
0762 7809       |x   |		Jump	0x76c
0763 4800       |H   |		Short_Literal	0x0
0764 a405       |    |		Store_Unchecked	0x2,0x5
0765 e402       |    |		Load	0x2,0x2
0766 e5ff       |    |		Load	0x2,-0x1
0767 0227       | '  |		Execute	Access,All_Reference
0768 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0769 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
076a 01d7       |    |		Execute	Vector,Field_Read
076b c406       |    |		Store	0x2,0x6
076c e406       |    |		Load	0x2,0x6
076d e402       |    |		Load	0x2,0x2
076e e5ff       |    |		Load	0x2,-0x1
076f 0227       | '  |		Execute	Access,All_Reference
0770 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0771 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0772 01d6       |    |		Execute	Vector,Field_Write
0773 4801       |H   |		Short_Literal	0x1
0774 a40a       |    |		Store_Unchecked	0x2,0xa
0775 e406       |    |		Load	0x2,0x6
0776 0b00       |    |		Execute_Immediate	Case_Compare,0x0
0777 701d       |p   |		Jump_Nonzero	0x795
0778 0f01       |    |		Execute_Immediate	Equal,0x1
0779 702a       |p*  |		Jump_Nonzero	0x7a4
077a e00a       |    |		Load	0x0,0xa
077b e408       |    |		Load	0x2,0x8
077c e405       |    |		Load	0x2,0x5
077d e402       |    |		Load	0x2,0x2
077e e404       |    |		Load	0x2,0x4
077f e5ff       |    |		Load	0x2,-0x1
0780 0227       | '  |		Execute	Access,All_Reference
0781 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
0782 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0783 01cf       |    |		Execute	Vector,Slice_Read
0784 e5ff       |    |		Load	0x2,-0x1
0785 e406       |    |		Load	0x2,0x6
0786 e5ff       |    |		Load	0x2,-0x1
0787 0227       | '  |		Execute	Access,All_Reference
0788 343b       |4;  |		Execute	Record,Field_Reference,Field_Number 0x3b
0789 01d7       |    |		Execute	Vector,Field_Read
078a 800b       |    |		Call	0x0,0xb
078b 800c       |    |		Call	0x0,0xc
078c 00d1       |    |		Pop_Control	Pop_Count_1
078d c409       |    |		Store	0x2,0x9
078e e409       |    |		Load	0x2,0x9
078f 0f01       |    |		Execute_Immediate	Equal,0x1
0790 6814       |h   |		Jump_Zero	0x7a5
0791 e408       |    |		Load	0x2,0x8
0792 e5ff       |    |		Load	0x2,-0x1
0793 800d       |    |		Call	0x0,0xd
0794 7810       |x   |		Jump	0x7a5
0795 00d1       |    |		Pop_Control	Pop_Count_1
0796 e407       |    |		Load	0x2,0x7
0797 e405       |    |		Load	0x2,0x5
0798 e402       |    |		Load	0x2,0x2
0799 e404       |    |		Load	0x2,0x4
079a e5ff       |    |		Load	0x2,-0x1
079b 0227       | '  |		Execute	Access,All_Reference
079c 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
079d 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
079e 01cf       |    |		Execute	Vector,Slice_Read
079f e5ff       |    |		Load	0x2,-0x1
07a0 800e       |    |		Call	0x0,0xe
07a1 00d1       |    |		Pop_Control	Pop_Count_1
07a2 840b       |    |		Call	0x2,0xb
07a3 7801       |x   |		Jump	0x7a5
07a4 840c       |    |		Call	0x2,0xc
07a5 e404       |    |		Load	0x2,0x4
07a6 0a01       |    |		Execute_Immediate	Plus,0x1
07a7 c402       |    |		Store	0x2,0x2
07a8 00c9       |    |		Action	Pop_Auxiliary_Loop
07a9 e402       |    |		Load	0x2,0x2
07aa e5ff       |    |		Load	0x2,-0x1
07ab 0227       | '  |		Execute	Access,All_Reference
07ac 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
07ad 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07ae 027a       | z  |		Execute	Discrete,Less_Equal
07af 76f4       |v   |		Jump_Nonzero	0x6a4
07b0 00ce       |    |		Action	Pop_Auxiliary
07b1 4800       |H   |		Short_Literal	0x0
07b2 e5ff       |    |		Load	0x2,-0x1
07b3 0227       | '  |		Execute	Access,All_Reference
07b4 3434       |44  |		Execute	Record,Field_Reference,Field_Number 0x34
07b5 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07b6 0008       |    |		Action	Idle
07b7 0007       |    |		Action	Break_Optional
07b8 00da       |    |		Load_Top	At_Offset_2
07b9 7002       |p   |		Jump_Nonzero	0x7bc
07ba 6005       |`   |		Indirect_Literal	Discrete,0x7c0,{0x00000000, 0x00002000}
07bb 00ba       |    |		Action	Initiate_Delay
07bc 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07bd 0000 0000  |    |		.XXX[0x3]
07bf 0000       |    |
07c0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00002000}
07c4 5265 6365  |Rece|		.LITERAL	{0x52656365, 0x69766500}
07c8 5265 6365  |Rece|		.LITERAL	{0x52656365, 0x69766500}
07cc 0000 0000  |    |		.BLANK	0000[0x4]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07e3       |    |		.CONST	0x07e3								; Address of begin
07d1 0004       |    |		.CONST	0x0004								; Address of exception handler
07d2 0007       |    |		.CONST	0x0007								; Number of locals
07d3			INIT_07d0:
07d3 e01e       |    |		Load	0x0,0x1e
07d4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
07d5 02c7       |    |		Declare_Variable	Any
07d6 00d8       |    |		Load_Top	At_Offset_0
07d7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07d8 e014       |    |		Load	0x0,0x14
07d9 0007       |    |		Action	Break_Optional
07da 00e2       |    |		Load_Encached	Integer_Cache
07db e5fe       |    |		Load	0x2,-0x2
07dc 600b       |`   |		Indirect_Literal	Discrete,0x7e8,{0x00000000, 0x00001770}
07dd 0273       | s  |		Execute	Discrete,Plus
07de e013       |    |		Load	0x0,0x13
07df 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
07e0 e016       |    |		Load	0x0,0x16
07e1 029f 0a73  |   s|		Declare_Subprogram	INIT_0a70,For_Call
07e3			BODY_07d0:
07e3 8407       |    |		Call	0x2,0x7
07e4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
07e5 0000 0000  |    |		.XXX[0x3]
07e7 0000       |    |
07e8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001770}
07ec 0000 0000  |    |		.BLANK	0000[0x4]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07f5       |    |		.CONST	0x07f5								; Address of begin
07f1 0004       |    |		.CONST	0x0004								; Address of exception handler
07f2 0002       |    |		.CONST	0x0002								; Number of locals
07f3			INIT_07f0:
07f3 e022       | "  |		Load	0x0,0x22
07f4 0007       |    |		Action	Break_Optional
07f5			BODY_07f0:
07f5 e022       | "  |		Load	0x0,0x22
07f6 e5ff       |    |		Load	0x2,-0x1
07f7 4802       |H   |		Short_Literal	0x2
07f8 e023       | #  |		Load	0x0,0x23
07f9 e024       | $  |		Load	0x0,0x24
07fa 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
07fb 0039       | 9  |		Store_Top	Access,At_Offset_1
07fc e407       |    |		Load	0x2,0x7
07fd e5ff       |    |		Load	0x2,-0x1
07fe 00da       |    |		Load_Top	At_Offset_2
07ff 8025       | %  |		Call	0x0,0x25
0800 8026       | &  |		Call	0x0,0x26
0801 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0802 0000 0000  |    |		.BLANK	0000[0x6]
0808 ; --------------------------------------------------------------------------------------
0808 ; SUBPROGRAM
0808 ; --------------------------------------------------------------------------------------
0808 080d       |    |		.CONST	0x080d								; Address of begin
0809 0004       |    |		.CONST	0x0004								; Address of exception handler
080a 0002       |    |		.CONST	0x0002								; Number of locals
080b			INIT_0808:
080b e022       | "  |		Load	0x0,0x22
080c 0007       |    |		Action	Break_Optional
080d			BODY_0808:
080d e022       | "  |		Load	0x0,0x22
080e e5ff       |    |		Load	0x2,-0x1
080f 4802       |H   |		Short_Literal	0x2
0810 e023       | #  |		Load	0x0,0x23
0811 e027       | '  |		Load	0x0,0x27
0812 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0813 0039       | 9  |		Store_Top	Access,At_Offset_1
0814 e5ff       |    |		Load	0x2,-0x1
0815 0229       | )  |		Execute	Access,All_Read
0816 3c33       |<3  |		Execute	Record,Field_Read,Field_Number 0x33
0817 00d8       |    |		Load_Top	At_Offset_0
0818 e212       |    |		Load	0x1,0x12
0819 4800       |H   |		Short_Literal	0x0
081a 4809       |H   |		Short_Literal	0x9
081b e002       |    |		Load	0x0,0x2
081c 0334       | 4  |		Declare_Variable	Array,With_Constraint
081d 500e       |P   |		Indirect_Literal	Any,0x82c,{0x556e6578, 0x70526570}
081e 4800       |H   |		Short_Literal	0x0
081f 4808       |H   |		Short_Literal	0x8
0820 e002       |    |		Load	0x0,0x2
0821 0334       | 4  |		Declare_Variable	Array,With_Constraint
0822 5011       |P   |		Indirect_Literal	Any,0x834,{0x586c6962, 0x4572726f}
0823 8019       |    |		Call	0x0,0x19
0824 8018       |    |		Call	0x0,0x18
0825 00d2       |    |		Pop_Control	Pop_Count_2
0826 e5ff       |    |		Load	0x2,-0x1
0827 00d9       |    |		Load_Top	At_Offset_1
0828 8028       | (  |		Call	0x0,0x28
0829 8029       | )  |		Call	0x0,0x29
082a e02a       | *  |		Load	0x0,0x2a
082b 0257       | W  |		Execute	Discrete,Raise
082c 556e 6578  |Unex|		.LITERAL	{0x556e6578, 0x70526570}
0830 6c79 0000  |ly  |		.XXX[0x4]
0832 0000 0000  |    |
0834 586c 6962  |Xlib|		.LITERAL	{0x586c6962, 0x4572726f}
0838 7200       |r   |		.XXX[0x1]
0839 0000 0000  |    |		.BLANK	0000[0x7]
0840 ; --------------------------------------------------------------------------------------
0840 ; SUBPROGRAM
0840 ; --------------------------------------------------------------------------------------
0840 0845       | E  |		.CONST	0x0845								; Address of begin
0841 0004       |    |		.CONST	0x0004								; Address of exception handler
0842 0002       |    |		.CONST	0x0002								; Number of locals
0843			INIT_0840:
0843 e022       | "  |		Load	0x0,0x22
0844 0007       |    |		Action	Break_Optional
0845			BODY_0840:
0845 e022       | "  |		Load	0x0,0x22
0846 e5ff       |    |		Load	0x2,-0x1
0847 4802       |H   |		Short_Literal	0x2
0848 e023       | #  |		Load	0x0,0x23
0849 e024       | $  |		Load	0x0,0x24
084a 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
084b 0039       | 9  |		Store_Top	Access,At_Offset_1
084c e407       |    |		Load	0x2,0x7
084d e5ff       |    |		Load	0x2,-0x1
084e 00da       |    |		Load_Top	At_Offset_2
084f 8025       | %  |		Call	0x0,0x25
0850 8026       | &  |		Call	0x0,0x26
0851 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0852 0000 0000  |    |		.BLANK	0000[0x6]
0858 ; --------------------------------------------------------------------------------------
0858 ; SUBPROGRAM
0858 ; --------------------------------------------------------------------------------------
0858 085d       | ]  |		.CONST	0x085d								; Address of begin
0859 0004       |    |		.CONST	0x0004								; Address of exception handler
085a 0002       |    |		.CONST	0x0002								; Number of locals
085b			INIT_0858:
085b e022       | "  |		Load	0x0,0x22
085c 0007       |    |		Action	Break_Optional
085d			BODY_0858:
085d e022       | "  |		Load	0x0,0x22
085e e5ff       |    |		Load	0x2,-0x1
085f 4802       |H   |		Short_Literal	0x2
0860 e023       | #  |		Load	0x0,0x23
0861 e027       | '  |		Load	0x0,0x27
0862 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0863 0039       | 9  |		Store_Top	Access,At_Offset_1
0864 e5ff       |    |		Load	0x2,-0x1
0865 0229       | )  |		Execute	Access,All_Read
0866 3c33       |<3  |		Execute	Record,Field_Read,Field_Number 0x33
0867 00d8       |    |		Load_Top	At_Offset_0
0868 e212       |    |		Load	0x1,0x12
0869 4800       |H   |		Short_Literal	0x0
086a 4809       |H   |		Short_Literal	0x9
086b e002       |    |		Load	0x0,0x2
086c 0334       | 4  |		Declare_Variable	Array,With_Constraint
086d 500e       |P   |		Indirect_Literal	Any,0x87c,{0x556e6578, 0x70526570}
086e 4800       |H   |		Short_Literal	0x0
086f 4808       |H   |		Short_Literal	0x8
0870 e002       |    |		Load	0x0,0x2
0871 0334       | 4  |		Declare_Variable	Array,With_Constraint
0872 5011       |P   |		Indirect_Literal	Any,0x884,{0x586c6962, 0x4572726f}
0873 8019       |    |		Call	0x0,0x19
0874 8018       |    |		Call	0x0,0x18
0875 00d2       |    |		Pop_Control	Pop_Count_2
0876 e5ff       |    |		Load	0x2,-0x1
0877 00d9       |    |		Load_Top	At_Offset_1
0878 8028       | (  |		Call	0x0,0x28
0879 8029       | )  |		Call	0x0,0x29
087a e02a       | *  |		Load	0x0,0x2a
087b 0257       | W  |		Execute	Discrete,Raise
087c 556e 6578  |Unex|		.LITERAL	{0x556e6578, 0x70526570}
0880 6c79 0000  |ly  |		.XXX[0x4]
0882 0000 0000  |    |
0884 586c 6962  |Xlib|		.LITERAL	{0x586c6962, 0x4572726f}
0888 7200       |r   |		.XXX[0x1]
0889 0000 0000  |    |		.BLANK	0000[0x7]
0890 ; --------------------------------------------------------------------------------------
0890 ; SUBPROGRAM
0890 ; --------------------------------------------------------------------------------------
0890 0893       |    |		.CONST	0x0893								; Address of begin
0891 0004       |    |		.CONST	0x0004								; Address of exception handler
0892 0001       |    |		.CONST	0x0001								; Number of locals
0893			BODY_0890:
0893			INIT_0890:
0893 e406       |    |		Load	0x2,0x6
0894 e5ff       |    |		Load	0x2,-0x1
0895 01dc       |    |		Execute	Vector,Last
0896 027b       | {  |		Execute	Discrete,Greater_Equal
0897 6807       |h   |		Jump_Zero	0x89f
0898 e5ff       |    |		Load	0x2,-0x1
0899 01dc       |    |		Execute	Vector,Last
089a c405       |    |		Store	0x2,0x5
089b e405       |    |		Load	0x2,0x5
089c 0a01       |    |		Execute_Immediate	Plus,0x1
089d c404       |    |		Store	0x2,0x4
089e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
089f e406       |    |		Load	0x2,0x6
08a0 0a01       |    |		Execute_Immediate	Plus,0x1
08a1 c406       |    |		Store	0x2,0x6
08a2 00cf       |    |		Action	Mark_Auxiliary
08a3 780d       |x   |		Jump	0x8b1
08a4 e406       |    |		Load	0x2,0x6
08a5 e5ff       |    |		Load	0x2,-0x1
08a6 01dc       |    |		Execute	Vector,Last
08a7 027b       | {  |		Execute	Discrete,Greater_Equal
08a8 6804       |h   |		Jump_Zero	0x8ad
08a9 e404       |    |		Load	0x2,0x4
08aa 0aff       |    |		Execute_Immediate	Plus,-0x1
08ab c405       |    |		Store	0x2,0x5
08ac 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08ad e406       |    |		Load	0x2,0x6
08ae 0a01       |    |		Execute_Immediate	Plus,0x1
08af c406       |    |		Store	0x2,0x6
08b0 00c9       |    |		Action	Pop_Auxiliary_Loop
08b1 e406       |    |		Load	0x2,0x6
08b2 e5ff       |    |		Load	0x2,-0x1
08b3 01d7       |    |		Execute	Vector,Field_Read
08b4 e7ff       |    |		Load	0x3,-0x1
08b5 027f       |    |		Execute	Discrete,Equal
08b6 77ed       |w   |		Jump_Nonzero	0x8a4
08b7 00ce       |    |		Action	Pop_Auxiliary
08b8 e406       |    |		Load	0x2,0x6
08b9 c404       |    |		Store	0x2,0x4
08ba e5ff       |    |		Load	0x2,-0x1
08bb 01dc       |    |		Execute	Vector,Last
08bc c405       |    |		Store	0x2,0x5
08bd 00cf       |    |		Action	Mark_Auxiliary
08be e405       |    |		Load	0x2,0x5
08bf e404       |    |		Load	0x2,0x4
08c0 0263       | c  |		Execute	Discrete,Above_Bound
08c1 700e       |p   |		Jump_Nonzero	0x8d0
08c2 00d8       |    |		Load_Top	At_Offset_0
08c3 e5ff       |    |		Load	0x2,-0x1
08c4 01d7       |    |		Execute	Vector,Field_Read
08c5 e7fe       |    |		Load	0x3,-0x2
08c6 027f       |    |		Execute	Discrete,Equal
08c7 6806       |h   |		Jump_Zero	0x8ce
08c8 00d8       |    |		Load_Top	At_Offset_0
08c9 a406       |    |		Store_Unchecked	0x2,0x6
08ca 00d8       |    |		Load_Top	At_Offset_0
08cb 0aff       |    |		Execute_Immediate	Plus,-0x1
08cc c405       |    |		Store	0x2,0x5
08cd 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08ce 00c8       |    |		Action	Pop_Auxiliary_Range
08cf 3ff2       |?   |		Loop_Increasing	0x8c2
08d0 00ce       |    |		Action	Pop_Auxiliary
08d1 e5ff       |    |		Load	0x2,-0x1
08d2 01dc       |    |		Execute	Vector,Last
08d3 c406       |    |		Store	0x2,0x6
08d4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08d5 0000 0000  |    |		.XXX[0x3]
08d7 0000       |    |
08d8 ; --------------------------------------------------------------------------------------
08d8 ; SUBPROGRAM
08d8 ; --------------------------------------------------------------------------------------
08d8 08db       |    |		.CONST	0x08db								; Address of begin
08d9 08e5       |    |		.CONST	0x08e5								; Address of exception handler
08da 0001       |    |		.CONST	0x0001								; Number of locals
08db			BODY_08d8:
08db			INIT_08d8:
08db e404       |    |		Load	0x2,0x4
08dc e405       |    |		Load	0x2,0x5
08dd e5ff       |    |		Load	0x2,-0x1
08de 01cf       |    |		Execute	Vector,Slice_Read
08df 802b       | +  |		Call	0x0,0x2b
08e0 00e5       |    |		Load_Encached	Long_Integer_Cache
08e1 00e0       |    |		Load_Encached	Standard_Cache
08e2 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
08e3 c409       |    |		Store	0x2,0x9
08e4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08e5			TRAP_08d8:
08e5 010e       |    |		Execute	Exception,Is_Constraint_Error
08e6 6824       |h$  |		Jump_Zero	0x90b
08e7 e5f7       |    |		Load	0x2,-0x9
08e8 4820       |H   |		Short_Literal	0x20
08e9 4800       |H   |		Short_Literal	0x0
08ea 481d       |H   |		Short_Literal	0x1d
08eb e002       |    |		Load	0x0,0x2
08ec 0334       | 4  |		Declare_Variable	Array,With_Constraint
08ed 501e       |P   |		Indirect_Literal	Any,0x90c,{0x436f6e73, 0x74726169}
08ee 4800       |H   |		Short_Literal	0x0
08ef 4819       |H   |		Short_Literal	0x19
08f0 e002       |    |		Load	0x0,0x2
08f1 0334       | 4  |		Declare_Variable	Array,With_Constraint
08f2 5029       |P)  |		Indirect_Literal	Any,0x91c,{0x636f6e76, 0x65727469}
08f3 01cc       |    |		Execute	Vector,Catenate
08f4 4800       |H   |		Short_Literal	0x0
08f5 4807       |H   |		Short_Literal	0x7
08f6 e002       |    |		Load	0x0,0x2
08f7 0334       | 4  |		Declare_Variable	Array,With_Constraint
08f8 5033       |P3  |		Indirect_Literal	Any,0x92c,{0x43454470, 0x794e756d}
08f9 4800       |H   |		Short_Literal	0x0
08fa 4808       |H   |		Short_Literal	0x8
08fb e002       |    |		Load	0x0,0x2
08fc 0334       | 4  |		Declare_Variable	Array,With_Constraint
08fd 5032       |P2  |		Indirect_Literal	Any,0x930,{0x586c6962, 0x4572726f}
08fe 8019       |    |		Call	0x0,0x19
08ff 01cb       |    |		Execute	Vector,Append
0900 e404       |    |		Load	0x2,0x4
0901 e405       |    |		Load	0x2,0x5
0902 e5ff       |    |		Load	0x2,-0x1
0903 01cf       |    |		Execute	Vector,Slice_Read
0904 01cc       |    |		Execute	Vector,Catenate
0905 8018       |    |		Call	0x0,0x18
0906 00d1       |    |		Pop_Control	Pop_Count_1
0907 4800       |H   |		Short_Literal	0x0
0908 a5f8       |    |		Store_Unchecked	0x2,-0x8
0909 00cc       |    |		Action	Pop_Block
090a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
090b 0100       |    |		Execute	Exception,Raise
090c 436f 6e73  |Cons|		.LITERAL	{0x436f6e73, 0x74726169}
0910 6e74 5f45  |nt_E|		.XXX[0xc]
0912 7272 6f72  |rror|
0914 2072 6169  | rai|
0916 7365 6420  |sed |
0918 7768 696c  |whil|
091a 6520 0000  |e   |
091c 636f 6e76  |conv|		.LITERAL	{0x636f6e76, 0x65727469}
0920 6e67 2064  |ng d|		.XXX[0xc]
0922 6973 706c  |ispl|
0924 6179 206e  |ay n|
0926 756d 6265  |umbe|
0928 723a 0000  |r:  |
092a 0000 0000  |    |
092c 4345 4470  |CEDp|		.LITERAL	{0x43454470, 0x794e756d}
0930 586c 6962  |Xlib|		.LITERAL	{0x586c6962, 0x4572726f}
0934 7200 0000  |r   |		.XXX[0x4]
0936 0000 0000  |    |
0938 ; --------------------------------------------------------------------------------------
0938 ; SUBPROGRAM
0938 ; --------------------------------------------------------------------------------------
0938 093b       | ;  |		.CONST	0x093b								; Address of begin
0939 0945       | E  |		.CONST	0x0945								; Address of exception handler
093a 0001       |    |		.CONST	0x0001								; Number of locals
093b			BODY_0938:
093b			INIT_0938:
093b e404       |    |		Load	0x2,0x4
093c e405       |    |		Load	0x2,0x5
093d e5ff       |    |		Load	0x2,-0x1
093e 01cf       |    |		Execute	Vector,Slice_Read
093f 802b       | +  |		Call	0x0,0x2b
0940 00e5       |    |		Load_Encached	Long_Integer_Cache
0941 00e0       |    |		Load_Encached	Standard_Cache
0942 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0943 c40a       |    |		Store	0x2,0xa
0944 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0945			TRAP_0938:
0945 010e       |    |		Execute	Exception,Is_Constraint_Error
0946 6824       |h$  |		Jump_Zero	0x96b
0947 e5f7       |    |		Load	0x2,-0x9
0948 4820       |H   |		Short_Literal	0x20
0949 4800       |H   |		Short_Literal	0x0
094a 481d       |H   |		Short_Literal	0x1d
094b e002       |    |		Load	0x0,0x2
094c 0334       | 4  |		Declare_Variable	Array,With_Constraint
094d 501e       |P   |		Indirect_Literal	Any,0x96c,{0x436f6e73, 0x74726169}
094e 4800       |H   |		Short_Literal	0x0
094f 4818       |H   |		Short_Literal	0x18
0950 e002       |    |		Load	0x0,0x2
0951 0334       | 4  |		Declare_Variable	Array,With_Constraint
0952 5029       |P)  |		Indirect_Literal	Any,0x97c,{0x636f6e76, 0x65727469}
0953 01cc       |    |		Execute	Vector,Catenate
0954 4800       |H   |		Short_Literal	0x0
0955 4807       |H   |		Short_Literal	0x7
0956 e002       |    |		Load	0x0,0x2
0957 0334       | 4  |		Declare_Variable	Array,With_Constraint
0958 5033       |P3  |		Indirect_Literal	Any,0x98c,{0x43455363, 0x724e756d}
0959 4800       |H   |		Short_Literal	0x0
095a 4808       |H   |		Short_Literal	0x8
095b e002       |    |		Load	0x0,0x2
095c 0334       | 4  |		Declare_Variable	Array,With_Constraint
095d 5032       |P2  |		Indirect_Literal	Any,0x990,{0x586c6962, 0x4572726f}
095e 8019       |    |		Call	0x0,0x19
095f 01cb       |    |		Execute	Vector,Append
0960 e404       |    |		Load	0x2,0x4
0961 e405       |    |		Load	0x2,0x5
0962 e5ff       |    |		Load	0x2,-0x1
0963 01cf       |    |		Execute	Vector,Slice_Read
0964 01cc       |    |		Execute	Vector,Catenate
0965 8018       |    |		Call	0x0,0x18
0966 00d1       |    |		Pop_Control	Pop_Count_1
0967 4800       |H   |		Short_Literal	0x0
0968 a5f8       |    |		Store_Unchecked	0x2,-0x8
0969 00cc       |    |		Action	Pop_Block
096a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
096b 0100       |    |		Execute	Exception,Raise
096c 436f 6e73  |Cons|		.LITERAL	{0x436f6e73, 0x74726169}
0970 6e74 5f45  |nt_E|		.XXX[0xc]
0972 7272 6f72  |rror|
0974 2072 6169  | rai|
0976 7365 6420  |sed |
0978 7768 696c  |whil|
097a 6520 0000  |e   |
097c 636f 6e76  |conv|		.LITERAL	{0x636f6e76, 0x65727469}
0980 6e67 2073  |ng s|		.XXX[0xc]
0982 6372 6565  |cree|
0984 6e20 6e75  |n nu|
0986 6d62 6572  |mber|
0988 3a00 0000  |:   |
098a 0000 0000  |    |
098c 4345 5363  |CESc|		.LITERAL	{0x43455363, 0x724e756d}
0990 586c 6962  |Xlib|		.LITERAL	{0x586c6962, 0x4572726f}
0994 7200 0000  |r   |		.XXX[0x4]
0996 0000 0000  |    |
0998 ; --------------------------------------------------------------------------------------
0998 ; SUBPROGRAM
0998 ; --------------------------------------------------------------------------------------
0998 099d       |    |		.CONST	0x099d								; Address of begin
0999 099f       |    |		.CONST	0x099f								; Address of exception handler
099a 0002       |    |		.CONST	0x0002								; Number of locals
099b			INIT_0998:
099b 029f 0ad3  |    |		Declare_Subprogram	INIT_0ad0,For_Call
099d			BODY_0998:
099d 8602       |    |		Call	0x3,0x2
099e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
099f			TRAP_0998:
099f e02c       | ,  |		Load	0x0,0x2c
09a0 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
09a1 010f       |    |		Execute	Exception,Equal
09a2 681a       |h   |		Jump_Zero	0x9bd
09a3 e5f7       |    |		Load	0x2,-0x9
09a4 4820       |H   |		Short_Literal	0x20
09a5 e213       |    |		Load	0x1,0x13
09a6 4800       |H   |		Short_Literal	0x0
09a7 480a       |H   |		Short_Literal	0xa
09a8 e002       |    |		Load	0x0,0x2
09a9 0334       | 4  |		Declare_Variable	Array,With_Constraint
09aa 5015       |P   |		Indirect_Literal	Any,0x9c0,{0x556e6b6e, 0x6f776e48}
09ab 4800       |H   |		Short_Literal	0x0
09ac 4808       |H   |		Short_Literal	0x8
09ad e002       |    |		Load	0x0,0x2
09ae 0334       | 4  |		Declare_Variable	Array,With_Constraint
09af 5018       |P   |		Indirect_Literal	Any,0x9c8,{0x586c6962, 0x4572726f}
09b0 8019       |    |		Call	0x0,0x19
09b1 01cb       |    |		Execute	Vector,Append
09b2 e402       |    |		Load	0x2,0x2
09b3 e403       |    |		Load	0x2,0x3
09b4 e5ff       |    |		Load	0x2,-0x1
09b5 01cf       |    |		Execute	Vector,Slice_Read
09b6 01cc       |    |		Execute	Vector,Catenate
09b7 8018       |    |		Call	0x0,0x18
09b8 00d1       |    |		Pop_Control	Pop_Count_1
09b9 4800       |H   |		Short_Literal	0x0
09ba a5f8       |    |		Store_Unchecked	0x2,-0x8
09bb 00cc       |    |		Action	Pop_Block
09bc 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
09bd 00d8       |    |		Load_Top	At_Offset_0
09be 0101       |    |		Execute	Exception,Reraise
09bf 0000       |    |		.XXX[0x1]
09c0 556e 6b6e  |Unkn|		.LITERAL	{0x556e6b6e, 0x6f776e48}
09c4 6f73 7400  |ost |		.XXX[0x4]
09c6 0000 0000  |    |
09c8 586c 6962  |Xlib|		.LITERAL	{0x586c6962, 0x4572726f}
09cc 7200 0000  |r   |		.XXX[0x4]
09ce 0000 0000  |    |
09d0 ; --------------------------------------------------------------------------------------
09d0 ; SUBPROGRAM
09d0 ; --------------------------------------------------------------------------------------
09d0 09d9       |    |		.CONST	0x09d9								; Address of begin
09d1 0a01       |    |		.CONST	0x0a01								; Address of exception handler
09d2 0003       |    |		.CONST	0x0003								; Number of locals
09d3			INIT_09d0:
09d3 e409       |    |		Load	0x2,0x9
09d4 00e0       |    |		Load_Encached	Standard_Cache
09d5 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
09d6 e40a       |    |		Load	0x2,0xa
09d7 00e0       |    |		Load_Encached	Standard_Cache
09d8 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
09d9			BODY_09d0:
09d9 482e       |H.  |		Short_Literal	0x2e
09da 483a       |H:  |		Short_Literal	0x3a
09db e402       |    |		Load	0x2,0x2
09dc e403       |    |		Load	0x2,0x3
09dd e5ff       |    |		Load	0x2,-0x1
09de 01cf       |    |		Execute	Vector,Slice_Read
09df 01cb       |    |		Execute	Vector,Append
09e0 00db       |    |		Load_Top	At_Offset_3
09e1 01dd       |    |		Execute	Vector,First
09e2 0a01       |    |		Execute_Immediate	Plus,0x1
09e3 00d8       |    |		Load_Top	At_Offset_0
09e4 00e2       |    |		Load_Encached	Integer_Cache
09e5 0260       | `  |		Execute	Discrete,In_Type
09e6 7001       |p   |		Jump_Nonzero	0x9e8
09e7 0801       |    |		Execute_Immediate	Raise,0x1
09e8 e602       |    |		Load	0x3,0x2
09e9 01dc       |    |		Execute	Vector,Last
09ea e602       |    |		Load	0x3,0x2
09eb 01cf       |    |		Execute	Vector,Slice_Read
09ec 802d       | -  |		Call	0x0,0x2d
09ed 01cc       |    |		Execute	Vector,Catenate
09ee 01cb       |    |		Execute	Vector,Append
09ef 00d9       |    |		Load_Top	At_Offset_1
09f0 01dd       |    |		Execute	Vector,First
09f1 0a01       |    |		Execute_Immediate	Plus,0x1
09f2 00d8       |    |		Load_Top	At_Offset_0
09f3 00e2       |    |		Load_Encached	Integer_Cache
09f4 0260       | `  |		Execute	Discrete,In_Type
09f5 7001       |p   |		Jump_Nonzero	0x9f7
09f6 0801       |    |		Execute_Immediate	Raise,0x1
09f7 00da       |    |		Load_Top	At_Offset_2
09f8 01dc       |    |		Execute	Vector,Last
09f9 00db       |    |		Load_Top	At_Offset_3
09fa 01cf       |    |		Execute	Vector,Slice_Read
09fb 802d       | -  |		Call	0x0,0x2d
09fc 01cc       |    |		Execute	Vector,Catenate
09fd e017       |    |		Load	0x0,0x17
09fe 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
09ff a5fe       |    |		Store_Unchecked	0x2,-0x2
0a00 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a01			TRAP_09d0:
0a01 0007       |    |		Action	Break_Optional
0a02 e40b       |    |		Load	0x2,0xb
0a03 e01a       |    |		Load	0x0,0x1a
0a04 e01b       |    |		Load	0x0,0x1b
0a05 a01c       |    |		Store_Unchecked	0x0,0x1c
0a06 801d       |    |		Call	0x0,0x1d
0a07 c40b       |    |		Store	0x2,0xb
0a08 e408       |    |		Load	0x2,0x8
0a09 0227       | '  |		Execute	Access,All_Reference
0a0a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a0b 0209       |    |		Execute	Task,Abort
0a0c 0007       |    |		Action	Break_Optional
0a0d e408       |    |		Load	0x2,0x8
0a0e 0227       | '  |		Execute	Access,All_Reference
0a0f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0a10 e01e       |    |		Load	0x0,0x1e
0a11 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0a12 e408       |    |		Load	0x2,0x8
0a13 0227       | '  |		Execute	Access,All_Reference
0a14 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0a15 e01e       |    |		Load	0x0,0x1e
0a16 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0a17 e408       |    |		Load	0x2,0x8
0a18 e01f       |    |		Load	0x0,0x1f
0a19 e020       |    |		Load	0x0,0x20
0a1a a021       | !  |		Store_Unchecked	0x0,0x21
0a1b 801d       |    |		Call	0x0,0x1d
0a1c c408       |    |		Store	0x2,0x8
0a1d 00d8       |    |		Load_Top	At_Offset_0
0a1e 0101       |    |		Execute	Exception,Reraise
0a1f 0000       |    |		.XXX[0x1]
0a20 ; --------------------------------------------------------------------------------------
0a20 ; SUBPROGRAM
0a20 ; --------------------------------------------------------------------------------------
0a20 0a25       | %  |		.CONST	0x0a25								; Address of begin
0a21 0004       |    |		.CONST	0x0004								; Address of exception handler
0a22 0002       |    |		.CONST	0x0002								; Number of locals
0a23			INIT_0a20:
0a23 e022       | "  |		Load	0x0,0x22
0a24 0007       |    |		Action	Break_Optional
0a25			BODY_0a20:
0a25 e022       | "  |		Load	0x0,0x22
0a26 e5ff       |    |		Load	0x2,-0x1
0a27 4802       |H   |		Short_Literal	0x2
0a28 e023       | #  |		Load	0x0,0x23
0a29 e024       | $  |		Load	0x0,0x24
0a2a 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0a2b 0039       | 9  |		Store_Top	Access,At_Offset_1
0a2c e407       |    |		Load	0x2,0x7
0a2d e5ff       |    |		Load	0x2,-0x1
0a2e 00da       |    |		Load_Top	At_Offset_2
0a2f 8025       | %  |		Call	0x0,0x25
0a30 8026       | &  |		Call	0x0,0x26
0a31 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a32 0000 0000  |    |		.BLANK	0000[0x6]
0a38 ; --------------------------------------------------------------------------------------
0a38 ; SUBPROGRAM
0a38 ; --------------------------------------------------------------------------------------
0a38 0a3d       | =  |		.CONST	0x0a3d								; Address of begin
0a39 0004       |    |		.CONST	0x0004								; Address of exception handler
0a3a 0002       |    |		.CONST	0x0002								; Number of locals
0a3b			INIT_0a38:
0a3b e022       | "  |		Load	0x0,0x22
0a3c 0007       |    |		Action	Break_Optional
0a3d			BODY_0a38:
0a3d e022       | "  |		Load	0x0,0x22
0a3e e5ff       |    |		Load	0x2,-0x1
0a3f 4802       |H   |		Short_Literal	0x2
0a40 e023       | #  |		Load	0x0,0x23
0a41 e027       | '  |		Load	0x0,0x27
0a42 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0a43 0039       | 9  |		Store_Top	Access,At_Offset_1
0a44 e5ff       |    |		Load	0x2,-0x1
0a45 0229       | )  |		Execute	Access,All_Read
0a46 3c33       |<3  |		Execute	Record,Field_Read,Field_Number 0x33
0a47 00d8       |    |		Load_Top	At_Offset_0
0a48 e212       |    |		Load	0x1,0x12
0a49 4800       |H   |		Short_Literal	0x0
0a4a 4809       |H   |		Short_Literal	0x9
0a4b e002       |    |		Load	0x0,0x2
0a4c 0334       | 4  |		Declare_Variable	Array,With_Constraint
0a4d 500e       |P   |		Indirect_Literal	Any,0xa5c,{0x556e6578, 0x70526570}
0a4e 4800       |H   |		Short_Literal	0x0
0a4f 4808       |H   |		Short_Literal	0x8
0a50 e002       |    |		Load	0x0,0x2
0a51 0334       | 4  |		Declare_Variable	Array,With_Constraint
0a52 5011       |P   |		Indirect_Literal	Any,0xa64,{0x586c6962, 0x4572726f}
0a53 8019       |    |		Call	0x0,0x19
0a54 8018       |    |		Call	0x0,0x18
0a55 00d2       |    |		Pop_Control	Pop_Count_2
0a56 e5ff       |    |		Load	0x2,-0x1
0a57 00d9       |    |		Load_Top	At_Offset_1
0a58 8028       | (  |		Call	0x0,0x28
0a59 8029       | )  |		Call	0x0,0x29
0a5a e02a       | *  |		Load	0x0,0x2a
0a5b 0257       | W  |		Execute	Discrete,Raise
0a5c 556e 6578  |Unex|		.LITERAL	{0x556e6578, 0x70526570}
0a60 6c79 0000  |ly  |		.XXX[0x4]
0a62 0000 0000  |    |
0a64 586c 6962  |Xlib|		.LITERAL	{0x586c6962, 0x4572726f}
0a68 7200       |r   |		.XXX[0x1]
0a69 0000 0000  |    |		.BLANK	0000[0x7]
0a70 ; --------------------------------------------------------------------------------------
0a70 ; SUBPROGRAM
0a70 ; --------------------------------------------------------------------------------------
0a70 0a75       | u  |		.CONST	0x0a75								; Address of begin
0a71 0a77       | w  |		.CONST	0x0a77								; Address of exception handler
0a72 0002       |    |		.CONST	0x0002								; Number of locals
0a73			INIT_0a70:
0a73 029f 0ae3  |    |		Declare_Subprogram	INIT_0ae0,For_Call
0a75			BODY_0a70:
0a75 8602       |    |		Call	0x3,0x2
0a76 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a77			TRAP_0a70:
0a77 e02c       | ,  |		Load	0x0,0x2c
0a78 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0a79 010f       |    |		Execute	Exception,Equal
0a7a 681b       |h   |		Jump_Zero	0xa96
0a7b e5fa       |    |		Load	0x2,-0x6
0a7c 4820       |H   |		Short_Literal	0x20
0a7d 4800       |H   |		Short_Literal	0x0
0a7e 4811       |H   |		Short_Literal	0x11
0a7f e002       |    |		Load	0x0,0x2
0a80 0334       | 4  |		Declare_Variable	Array,With_Constraint
0a81 5032       |P2  |		Indirect_Literal	Any,0xab4,{0x486f7374, 0x20697320}
0a82 4800       |H   |		Short_Literal	0x0
0a83 4808       |H   |		Short_Literal	0x8
0a84 e002       |    |		Load	0x0,0x2
0a85 0334       | 4  |		Declare_Variable	Array,With_Constraint
0a86 5039       |P9  |		Indirect_Literal	Any,0xac0,{0x556e6465, 0x66486f73}
0a87 4800       |H   |		Short_Literal	0x0
0a88 4808       |H   |		Short_Literal	0x8
0a89 e002       |    |		Load	0x0,0x2
0a8a 0334       | 4  |		Declare_Variable	Array,With_Constraint
0a8b 503c       |P<  |		Indirect_Literal	Any,0xac8,{0x586c6962, 0x4572726f}
0a8c 8019       |    |		Call	0x0,0x19
0a8d 01cb       |    |		Execute	Vector,Append
0a8e e5ff       |    |		Load	0x2,-0x1
0a8f 01cc       |    |		Execute	Vector,Catenate
0a90 8018       |    |		Call	0x0,0x18
0a91 00d1       |    |		Pop_Control	Pop_Count_1
0a92 4800       |H   |		Short_Literal	0x0
0a93 a5fb       |    |		Store_Unchecked	0x2,-0x5
0a94 00cc       |    |		Action	Pop_Block
0a95 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0a96 e406       |    |		Load	0x2,0x6
0a97 e01a       |    |		Load	0x0,0x1a
0a98 e01b       |    |		Load	0x0,0x1b
0a99 a01c       |    |		Store_Unchecked	0x0,0x1c
0a9a 801d       |    |		Call	0x0,0x1d
0a9b c406       |    |		Store	0x2,0x6
0a9c e403       |    |		Load	0x2,0x3
0a9d 0227       | '  |		Execute	Access,All_Reference
0a9e 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a9f 0209       |    |		Execute	Task,Abort
0aa0 0007       |    |		Action	Break_Optional
0aa1 e403       |    |		Load	0x2,0x3
0aa2 0227       | '  |		Execute	Access,All_Reference
0aa3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0aa4 e01e       |    |		Load	0x0,0x1e
0aa5 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0aa6 e403       |    |		Load	0x2,0x3
0aa7 0227       | '  |		Execute	Access,All_Reference
0aa8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0aa9 e01e       |    |		Load	0x0,0x1e
0aaa 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0aab e403       |    |		Load	0x2,0x3
0aac e01f       |    |		Load	0x0,0x1f
0aad e020       |    |		Load	0x0,0x20
0aae a021       | !  |		Store_Unchecked	0x0,0x21
0aaf 801d       |    |		Call	0x0,0x1d
0ab0 c403       |    |		Store	0x2,0x3
0ab1 00d8       |    |		Load_Top	At_Offset_0
0ab2 0101       |    |		Execute	Exception,Reraise
0ab3 0000       |    |		.XXX[0x1]
0ab4 486f 7374  |Host|		.LITERAL	{0x486f7374, 0x20697320}
0ab8 756e 6465  |unde|		.XXX[0x8]
0aba 6669 6e65  |fine|
0abc 643a 0000  |d:  |
0abe 0000 0000  |    |
0ac0 556e 6465  |Unde|		.LITERAL	{0x556e6465, 0x66486f73}
0ac4 7400 0000  |t   |		.XXX[0x4]
0ac6 0000 0000  |    |
0ac8 586c 6962  |Xlib|		.LITERAL	{0x586c6962, 0x4572726f}
0acc 7200 0000  |r   |		.XXX[0x4]
0ace 0000 0000  |    |
0ad0 ; --------------------------------------------------------------------------------------
0ad0 ; SUBPROGRAM
0ad0 ; --------------------------------------------------------------------------------------
0ad0 0ad4       |    |		.CONST	0x0ad4								; Address of begin
0ad1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ad2 0002       |    |		.CONST	0x0002								; Number of locals
0ad3			INIT_0ad0:
0ad3 802e       | .  |		Call	0x0,0x2e
0ad4			BODY_0ad0:
0ad4 e5f7       |    |		Load	0x2,-0x9
0ad5 e007       |    |		Load	0x0,0x7
0ad6 e016       |    |		Load	0x0,0x16
0ad7 e408       |    |		Load	0x2,0x8
0ad8 e409       |    |		Load	0x2,0x9
0ad9 e802       |    |		Load	0x4,0x2
0ada 8215       |    |		Call	0x1,0x15
0adb c408       |    |		Store	0x2,0x8
0adc c40b       |    |		Store	0x2,0xb
0add c40c       |    |		Store	0x2,0xc
0ade 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0adf 0000       |    |		.XXX[0x1]
0ae0 ; --------------------------------------------------------------------------------------
0ae0 ; SUBPROGRAM
0ae0 ; --------------------------------------------------------------------------------------
0ae0 0aeb       |    |		.CONST	0x0aeb								; Address of begin
0ae1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ae2 0003       |    |		.CONST	0x0003								; Number of locals
0ae3			INIT_0ae0:
0ae3 e5ff       |    |		Load	0x2,-0x1
0ae4 802b       | +  |		Call	0x0,0x2b
0ae5 e02c       | ,  |		Load	0x0,0x2c
0ae6 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0ae7 e5ff       |    |		Load	0x2,-0x1
0ae8 802b       | +  |		Call	0x0,0x2b
0ae9 e02c       | ,  |		Load	0x0,0x2c
0aea 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0aeb			BODY_0ae0:
0aeb 00d9       |    |		Load_Top	At_Offset_1
0aec 4801       |H   |		Short_Literal	0x1
0aed 4806       |H   |		Short_Literal	0x6
0aee 00e9       |    |		Load_Encached	String_Cache
0aef 0334       | 4  |		Declare_Variable	Array,With_Constraint
0af0 50b7       |P   |		Indirect_Literal	Any,0xba8,{0x5443502f, 0x49502020}
0af1 01df       |    |		Execute	Vector,Equal
0af2 7018       |p   |		Jump_Nonzero	0xb0b
0af3 e5fa       |    |		Load	0x2,-0x6
0af4 4800       |H   |		Short_Literal	0x0
0af5 4822       |H"  |		Short_Literal	0x22
0af6 e002       |    |		Load	0x0,0x2
0af7 0334       | 4  |		Declare_Variable	Array,With_Constraint
0af8 50b3       |P   |		Indirect_Literal	Any,0xbac,{0x4f6e6c79, 0x20544350}
0af9 4800       |H   |		Short_Literal	0x0
0afa 4808       |H   |		Short_Literal	0x8
0afb e002       |    |		Load	0x0,0x2
0afc 0334       | 4  |		Declare_Variable	Array,With_Constraint
0afd 50c2       |P   |		Indirect_Literal	Any,0xbc0,{0x4f6e6c79, 0x54435049}
0afe 4800       |H   |		Short_Literal	0x0
0aff 4808       |H   |		Short_Literal	0x8
0b00 e002       |    |		Load	0x0,0x2
0b01 0334       | 4  |		Declare_Variable	Array,With_Constraint
0b02 50c5       |P   |		Indirect_Literal	Any,0xbc8,{0x586c6962, 0x4572726f}
0b03 8019       |    |		Call	0x0,0x19
0b04 8018       |    |		Call	0x0,0x18
0b05 00d1       |    |		Pop_Control	Pop_Count_1
0b06 4800       |H   |		Short_Literal	0x0
0b07 a5fb       |    |		Store_Unchecked	0x2,-0x5
0b08 00cc       |    |		Action	Pop_Block
0b09 00cc       |    |		Action	Pop_Block
0b0a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0b0b e02f       | /  |		Load	0x0,0x2f
0b0c 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0b0d e402       |    |		Load	0x2,0x2
0b0e 0120       |    |		Execute	Any,Is_Value
0b0f 6803       |h   |		Jump_Zero	0xb13
0b10 e01e       |    |		Load	0x0,0x1e
0b11 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0b12 7801       |x   |		Jump	0xb14
0b13 e402       |    |		Load	0x2,0x2
0b14 e02f       | /  |		Load	0x0,0x2f
0b15 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0b16 e802       |    |		Load	0x4,0x2
0b17 e01e       |    |		Load	0x0,0x1e
0b18 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0b19 c402       |    |		Store	0x2,0x2
0b1a c404       |    |		Store	0x2,0x4
0b1b e404       |    |		Load	0x2,0x4
0b1c 681e       |h   |		Jump_Zero	0xb3b
0b1d e5fa       |    |		Load	0x2,-0x6
0b1e 4820       |H   |		Short_Literal	0x20
0b1f 4800       |H   |		Short_Literal	0x0
0b20 481a       |H   |		Short_Literal	0x1a
0b21 e002       |    |		Load	0x0,0x2
0b22 0334       | 4  |		Declare_Variable	Array,With_Constraint
0b23 50ac       |P   |		Indirect_Literal	Any,0xbd0,{0x5472616e, 0x73706f72}
0b24 4800       |H   |		Short_Literal	0x0
0b25 480a       |H   |		Short_Literal	0xa
0b26 e002       |    |		Load	0x0,0x2
0b27 0334       | 4  |		Declare_Variable	Array,With_Constraint
0b28 50b7       |P   |		Indirect_Literal	Any,0xbe0,{0x544f7065, 0x6e466169}
0b29 4800       |H   |		Short_Literal	0x0
0b2a 4808       |H   |		Short_Literal	0x8
0b2b e002       |    |		Load	0x0,0x2
0b2c 0334       | 4  |		Declare_Variable	Array,With_Constraint
0b2d 50ba       |P   |		Indirect_Literal	Any,0xbe8,{0x586c6962, 0x4572726f}
0b2e 8019       |    |		Call	0x0,0x19
0b2f 01cb       |    |		Execute	Vector,Append
0b30 e404       |    |		Load	0x2,0x4
0b31 8030       | 0  |		Call	0x0,0x30
0b32 802d       | -  |		Call	0x0,0x2d
0b33 01cc       |    |		Execute	Vector,Catenate
0b34 8018       |    |		Call	0x0,0x18
0b35 00d1       |    |		Pop_Control	Pop_Count_1
0b36 4800       |H   |		Short_Literal	0x0
0b37 a5fb       |    |		Store_Unchecked	0x2,-0x5
0b38 00cc       |    |		Action	Pop_Block
0b39 00cc       |    |		Action	Pop_Block
0b3a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0b3b e02f       | /  |		Load	0x0,0x2f
0b3c 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0b3d 6066       |`f  |		Indirect_Literal	Discrete,0xba4,{0x00007fff, 0xffffffff}
0b3e 4800       |H   |		Short_Literal	0x0
0b3f 4801       |H   |		Short_Literal	0x1
0b40 e031       | 1  |		Load	0x0,0x31
0b41 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0b42 0334       | 4  |		Declare_Variable	Array,With_Constraint
0b43 e405       |    |		Load	0x2,0x5
0b44 09f8       |    |		Execute_Immediate	Binary_Scale,-0x8
0b45 4900       |I   |		Short_Literal	0x100
0b46 026f       | o  |		Execute	Discrete,Remainder
0b47 00d8       |    |		Load_Top	At_Offset_0
0b48 e031       | 1  |		Load	0x0,0x31
0b49 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0b4a 0260       | `  |		Execute	Discrete,In_Type
0b4b 7001       |p   |		Jump_Nonzero	0xb4d
0b4c 0801       |    |		Execute_Immediate	Raise,0x1
0b4d 4800       |H   |		Short_Literal	0x0
0b4e 00da       |    |		Load_Top	At_Offset_2
0b4f 01d6       |    |		Execute	Vector,Field_Write
0b50 e405       |    |		Load	0x2,0x5
0b51 4900       |I   |		Short_Literal	0x100
0b52 026f       | o  |		Execute	Discrete,Remainder
0b53 00d8       |    |		Load_Top	At_Offset_0
0b54 e031       | 1  |		Load	0x0,0x31
0b55 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0b56 0260       | `  |		Execute	Discrete,In_Type
0b57 7001       |p   |		Jump_Nonzero	0xb59
0b58 0801       |    |		Execute_Immediate	Raise,0x1
0b59 4801       |H   |		Short_Literal	0x1
0b5a 00da       |    |		Load_Top	At_Offset_2
0b5b 01d6       |    |		Execute	Vector,Field_Write
0b5c 00db       |    |		Load_Top	At_Offset_3
0b5d e402       |    |		Load	0x2,0x2
0b5e e01e       |    |		Load	0x0,0x1e
0b5f 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0b60 c404       |    |		Store	0x2,0x4
0b61 e404       |    |		Load	0x2,0x4
0b62 6821       |h!  |		Jump_Zero	0xb84
0b63 e402       |    |		Load	0x2,0x2
0b64 e01e       |    |		Load	0x0,0x1e
0b65 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0b66 e5fa       |    |		Load	0x2,-0x6
0b67 4820       |H   |		Short_Literal	0x20
0b68 4800       |H   |		Short_Literal	0x0
0b69 481d       |H   |		Short_Literal	0x1d
0b6a e002       |    |		Load	0x0,0x2
0b6b 0334       | 4  |		Declare_Variable	Array,With_Constraint
0b6c 5083       |P   |		Indirect_Literal	Any,0xbf0,{0x5472616e, 0x73706f72}
0b6d 4800       |H   |		Short_Literal	0x0
0b6e 480d       |H   |		Short_Literal	0xd
0b6f e002       |    |		Load	0x0,0x2
0b70 0334       | 4  |		Declare_Variable	Array,With_Constraint
0b71 508e       |P   |		Indirect_Literal	Any,0xc00,{0x54436f6e, 0x6e656374}
0b72 4800       |H   |		Short_Literal	0x0
0b73 4808       |H   |		Short_Literal	0x8
0b74 e002       |    |		Load	0x0,0x2
0b75 0334       | 4  |		Declare_Variable	Array,With_Constraint
0b76 5091       |P   |		Indirect_Literal	Any,0xc08,{0x586c6962, 0x4572726f}
0b77 8019       |    |		Call	0x0,0x19
0b78 01cb       |    |		Execute	Vector,Append
0b79 e404       |    |		Load	0x2,0x4
0b7a 8030       | 0  |		Call	0x0,0x30
0b7b 802d       | -  |		Call	0x0,0x2d
0b7c 01cc       |    |		Execute	Vector,Catenate
0b7d 8018       |    |		Call	0x0,0x18
0b7e 00d1       |    |		Pop_Control	Pop_Count_1
0b7f 4800       |H   |		Short_Literal	0x0
0b80 a5fb       |    |		Store_Unchecked	0x2,-0x5
0b81 00cc       |    |		Action	Pop_Block
0b82 00cc       |    |		Action	Pop_Block
0b83 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0b84 00d8       |    |		Load_Top	At_Offset_0
0b85 e016       |    |		Load	0x0,0x16
0b86 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0b87 a406       |    |		Store_Unchecked	0x2,0x6
0b88 e014       |    |		Load	0x0,0x14
0b89 03bc       |    |		Declare_Variable	Access,By_Allocation
0b8a 00d8       |    |		Load_Top	At_Offset_0
0b8b 00e0       |    |		Load_Encached	Standard_Cache
0b8c 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0b8d a403       |    |		Store_Unchecked	0x2,0x3
0b8e e402       |    |		Load	0x2,0x2
0b8f e403       |    |		Load	0x2,0x3
0b90 0227       | '  |		Execute	Access,All_Reference
0b91 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0b92 e403       |    |		Load	0x2,0x3
0b93 4801       |H   |		Short_Literal	0x1
0b94 e403       |    |		Load	0x2,0x3
0b95 0227       | '  |		Execute	Access,All_Reference
0b96 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b97 e032       | 2  |		Load	0x0,0x32
0b98 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0b99 e403       |    |		Load	0x2,0x3
0b9a a5fd       |    |		Store_Unchecked	0x2,-0x3
0b9b e406       |    |		Load	0x2,0x6
0b9c a5fc       |    |		Store_Unchecked	0x2,-0x4
0b9d 4801       |H   |		Short_Literal	0x1
0b9e a5fb       |    |		Store_Unchecked	0x2,-0x5
0b9f 00cc       |    |		Action	Pop_Block
0ba0 00cc       |    |		Action	Pop_Block
0ba1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0ba2 0000 0000  |    |		.XXX[0x2]
0ba4 0000 7fff  |    |		.LITERAL	{0x00007fff, 0xffffffff}
0ba8 5443 502f  |TCP/|		.LITERAL	{0x5443502f, 0x49502020}
0bac 4f6e 6c79  |Only|		.LITERAL	{0x4f6e6c79, 0x20544350}
0bb0 2f49 5020  |/IP |		.XXX[0x10]
0bb2 6973 2063  |is c|
0bb4 7572 7265  |urre|
0bb6 6e74 6c79  |ntly|
0bb8 2073 7570  | sup|
0bba 706f 7274  |port|
0bbc 6564 2e00  |ed. |
0bbe 0000 0000  |    |
0bc0 4f6e 6c79  |Only|		.LITERAL	{0x4f6e6c79, 0x54435049}
0bc4 5000 0000  |P   |		.XXX[0x4]
0bc6 0000 0000  |    |
0bc8 586c 6962  |Xlib|		.LITERAL	{0x586c6962, 0x4572726f}
0bcc 7200 0000  |r   |		.XXX[0x4]
0bce 0000 0000  |    |
0bd0 5472 616e  |Tran|		.LITERAL	{0x5472616e, 0x73706f72}
0bd4 742e 4f70  |t.Op|		.XXX[0xc]
0bd6 656e 2063  |en c|
0bd8 616c 6c20  |all |
0bda 6661 696c  |fail|
0bdc 6564 3a00  |ed: |
0bde 0000 0000  |    |
0be0 544f 7065  |TOpe|		.LITERAL	{0x544f7065, 0x6e466169}
0be4 6c65 6400  |led |		.XXX[0x4]
0be6 0000 0000  |    |
0be8 586c 6962  |Xlib|		.LITERAL	{0x586c6962, 0x4572726f}
0bec 7200 0000  |r   |		.XXX[0x4]
0bee 0000 0000  |    |
0bf0 5472 616e  |Tran|		.LITERAL	{0x5472616e, 0x73706f72}
0bf4 742e 436f  |t.Co|		.XXX[0xc]
0bf6 6e6e 6563  |nnec|
0bf8 7420 6361  |t ca|
0bfa 6c6c 2066  |ll f|
0bfc 6169 6c65  |aile|
0bfe 643a 0000  |d:  |
0c00 5443 6f6e  |TCon|		.LITERAL	{0x54436f6e, 0x6e656374}
0c04 4661 696c  |Fail|		.XXX[0x4]
0c06 6564 0000  |ed  |
0c08 586c 6962  |Xlib|		.LITERAL	{0x586c6962, 0x4572726f}
0c0c 7200 0000  |r   |		.XXX[0x4]
0c0e 0000 0000  |    |
0c10 ; --------------------------------------------------------------------------------------
0c10 ; Debug Table
0c10 ; --------------------------------------------------------------------------------------
0c10 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x68e1,0x0000,0x0001,0x0017
0c16 000b 0c72  |   r|		.DBG4T	0x000b,0x0c72,0x8000,0x0000
0c1a 0016 0c79  |   y|		.DBG4T	0x0016,0x0c79,0x8000,0x0000
0c1e 003b 0c88  | ;  |		.DBG4T	0x003b,0x0c88,0x0002,0x4000
0c22 0213 0cf2  |    |		.DBG4T	0x0213,0x0cf2,0x0001,0x0000
0c26 027b 0d07  | {  |		.DBG4T	0x027b,0x0d07,0x0001,0x4000
0c2a 0483 0d81  |    |		.DBG4T	0x0483,0x0d81,0x0001,0x0000
0c2e 060b 0dba  |    |		.DBG4T	0x060b,0x0dba,0x0001,0x0000
0c32 0633 0dc1  | 3  |		.DBG4T	0x0633,0x0dc1,0x0001,0x4000
0c36 07d3 0e2a  |   *|		.DBG4T	0x07d3,0x0e2a,0x0001,0x0000
0c3a 07f3 0e32  |   2|		.DBG4T	0x07f3,0x0e32,0x0004,0x0000
0c3e 080b 0e37  |   7|		.DBG4T	0x080b,0x0e37,0x0004,0x0000
0c42 0843 0e3e  | C >|		.DBG4T	0x0843,0x0e3e,0x0004,0x0000
0c46 085b 0e43  | [ C|		.DBG4T	0x085b,0x0e43,0x0004,0x0000
0c4a 0893 0e4a  |   J|		.DBG4T	0x0893,0x0e4a,0x0001,0x4000
0c4e 08db 0e70  |   p|		.DBG4T	0x08db,0x0e70,0x0004,0x0000
0c52 093b 0e76  | ; v|		.DBG4T	0x093b,0x0e76,0x0004,0x0000
0c56 099b 0e7c  |   ||		.DBG4T	0x099b,0x0e7c,0x0004,0x0000
0c5a 09d3 0e83  |    |		.DBG4T	0x09d3,0x0e83,0x0004,0x0000
0c5e 0a23 0e8e  | #  |		.DBG4T	0x0a23,0x0e8e,0x0004,0x0000
0c62 0a3b 0e93  | ;  |		.DBG4T	0x0a3b,0x0e93,0x0004,0x0000
0c66 0a73 0e9a  | s  |		.DBG4T	0x0a73,0x0e9a,0x0004,0x0000
0c6a 0ad3 0ea6  |    |		.DBG4T	0x0ad3,0x0ea6,0x0004,0x0000
0c6e 0ae3 0eaa  |    |		.DBG4T	0x0ae3,0x0eaa,0x0004,0x0000
0c72 ; --------------------------------------------------------------------------------------
0c72 ; Debug chain
0c72 ; --------------------------------------------------------------------------------------
0c72 0005 0000  |    |		.DBGLEN	0x0005,0x0000
0c74 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013
0c79 ; --------------------------------------------------------------------------------------
0c79 ; Debug chain
0c79 ; --------------------------------------------------------------------------------------
0c79 000c 0001  |    |		.DBGLEN	0x000c,0x0001
0c7b 0016 0017  |    |		.DBGLNO	0x0016,0x0017,0x0018,0x001d,0x0022,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031
0c88 ; --------------------------------------------------------------------------------------
0c88 ; Debug chain
0c88 ; --------------------------------------------------------------------------------------
0c88 0008 0030  |   0|		.DBGLEN	0x0008,0x0030
0c8a 003b 003d  | ; =|		.DBGLNO	0x003b,0x003d,0x003f,0x0040,0x0041,0x0043,0x0047,0x004b,0x0050,0x0053,0x0055,0x005a,0x005e,0x0064,0x0066,0x0071,0x0098,0x00a2,0x00ad,0x00b4,0x00b9,0x00bf,0x00c2,0x00c9,0x00d1,0x00d6,0x00e1,0x00f2,0x00f4,0x00f7,0x011e,0x0128,0x0133,0x013a,0x0141,0x0144,0x0149,0x0154,0x0165,0x0169,0x0171,0x0173,0x017c,0x017e,0x0185,0x018c,0x0191,0x01a5,0x01a8,0x01ad,0x01b9,0x01bb,0x01bc,0x01c0,0x01c8,0x01cd
0cc2 0001 0002  |    |		.XXX[0x30]
0cc4 0003 0004  |    |
0cc6 0005 0006  |    |
0cc8 0007 0008  |    |
0cca 0009 000a  |    |
0ccc 000b 000c  |    |
0cce 000d 000f  |    |
0cd0 0010 0011  |    |
0cd2 0012 0013  |    |
0cd4 0014 0015  |    |
0cd6 0016 0017  |    |
0cd8 0018 0019  |    |
0cda 001a 001b  |    |
0cdc 001c 001d  |    |
0cde 001e 001f  |    |
0ce0 0020 0021  |   !|
0ce2 0022 0023  | " #|
0ce4 0024 0025  | $ %|
0ce6 0026 0027  | & '|
0ce8 002b 002c  | + ,|
0cea 002d 0028  | - (|
0cec 0029 002a  | ) *|
0cee 002e 000e  | .  |
0cf0 002f 0030  | / 0|
0cf2 ; --------------------------------------------------------------------------------------
0cf2 ; Debug chain
0cf2 ; --------------------------------------------------------------------------------------
0cf2 0003 0010  |    |		.DBGLEN	0x0003,0x0010
0cf4 0213 0214  |    |		.DBGLNO	0x0213,0x0214,0x0216,0x0217,0x021d,0x021e,0x0223,0x0225,0x022a,0x022c,0x022e,0x022f,0x0244,0x0248,0x0257,0x0258,0x025d,0x0262,0x0269
0d07 ; --------------------------------------------------------------------------------------
0d07 ; Debug chain
0d07 ; --------------------------------------------------------------------------------------
0d07 000a 0037  |   7|		.DBGLEN	0x000a,0x0037
0d09 027b 027d  | { }|		.DBGLNO	0x027b,0x027d,0x027f,0x0280,0x0281,0x0283,0x0287,0x028b,0x0290,0x0292,0x0298,0x029e,0x029f,0x02aa,0x02d1,0x02db,0x02e6,0x02ef,0x02f2,0x02f9,0x0301,0x0306,0x0311,0x0322,0x0324,0x0326,0x0328,0x032a,0x0330,0x0331,0x0333,0x035a,0x0364,0x036f,0x0376,0x037d,0x0383,0x0386,0x038b,0x0396,0x03a7,0x03a8,0x03cb,0x03d5,0x03da,0x03e1,0x03e9,0x03eb,0x03f4,0x03f6,0x03fd,0x0404,0x0409,0x041d,0x0420,0x0425,0x0431,0x0433,0x0434,0x0438,0x043f,0x0446,0x044c,0x0451,0x045b
0d4a 0001 0002  |    |		.XXX[0x37]
0d4c 0003 0004  |    |
0d4e 0005 0006  |    |
0d50 0007 0009  |    |
0d52 000a 000b  |    |
0d54 000c 000d  |    |
0d56 000e 000f  |    |
0d58 0010 0011  |    |
0d5a 0012 0013  |    |
0d5c 0014 0015  |    |
0d5e 0016 0017  |    |
0d60 0018 0019  |    |
0d62 001a 001b  |    |
0d64 001c 001d  |    |
0d66 001e 001f  |    |
0d68 0020 0021  |   !|
0d6a 0022 0023  | " #|
0d6c 0024 0025  | $ %|
0d6e 0026 0027  | & '|
0d70 0028 0029  | ( )|
0d72 002a 002b  | * +|
0d74 002f 0030  | / 0|
0d76 0031 002c  | 1 ,|
0d78 002d 002e  | - .|
0d7a 0032 0008  | 2  |
0d7c 0033 0034  | 3 4|
0d7e 0035 0036  | 5 6|
0d80 0037       | 7  |
0d81 ; --------------------------------------------------------------------------------------
0d81 ; Debug chain
0d81 ; --------------------------------------------------------------------------------------
0d81 000c 002b  |   +|		.DBGLEN	0x000c,0x002b
0d83 0483 0485  |    |		.DBGLNO	0x0483,0x0485,0x0487,0x0489,0x048b,0x048d,0x048e,0x0490,0x0492,0x0494,0x0496,0x0498,0x04a2,0x04a4,0x04a6,0x04a8,0x04aa,0x04ad,0x04b0,0x04b2,0x04bb,0x04bf,0x04c2,0x04c4,0x04c6,0x04da,0x04dc,0x04de,0x04f5,0x04f7,0x04f8,0x04fb,0x04ff,0x0502,0x0503,0x0505,0x0508,0x050c,0x050f,0x0510,0x0512,0x0547,0x056d,0x056f,0x0570,0x057f,0x0581,0x058f,0x0591,0x0597,0x0599,0x059a,0x059b,0x059d,0x05a0
0dba ; --------------------------------------------------------------------------------------
0dba ; Debug chain
0dba ; --------------------------------------------------------------------------------------
0dba 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0dbc 060b 060e  |    |		.DBGLNO	0x060b,0x060e,0x0614,0x061a,0x0620
0dc1 ; --------------------------------------------------------------------------------------
0dc1 ; Debug chain
0dc1 ; --------------------------------------------------------------------------------------
0dc1 0009 002f  |   /|		.DBGLEN	0x0009,0x002f
0dc3 0633 0635  | 3 5|		.DBGLNO	0x0633,0x0635,0x0637,0x0638,0x0639,0x063b,0x063f,0x0643,0x0645,0x064b,0x0656,0x067d,0x0687,0x0692,0x0699,0x069e,0x06a1,0x06a4,0x06a7,0x06ae,0x06b6,0x06bb,0x06c6,0x06d7,0x06d9,0x06db,0x0702,0x070c,0x0717,0x071e,0x0725,0x0728,0x072d,0x0738,0x0749,0x074e,0x0750,0x0758,0x075a,0x0763,0x0765,0x076c,0x0773,0x0775,0x077a,0x078e,0x0791,0x0796,0x07a2,0x07a4,0x07a5,0x07a9,0x07b1,0x07b6,0x07b8,0x07ba
0dfb 0001 0002  |    |		.XXX[0x2f]
0dfd 0003 0004  |    |
0dff 0005 0006  |    |
0e01 0007 0008  |    |
0e03 000a 000b  |    |
0e05 000c 000d  |    |
0e07 000e 000f  |    |
0e09 0010 0011  |    |
0e0b 0012 0013  |    |
0e0d 0014 0015  |    |
0e0f 0016 0017  |    |
0e11 0018 0019  |    |
0e13 001a 001b  |    |
0e15 001c 001d  |    |
0e17 001e 001f  |    |
0e19 0020 0021  |   !|
0e1b 0022 0023  | " #|
0e1d 0024 0028  | $ (|
0e1f 0029 002a  | ) *|
0e21 0025 0026  | % &|
0e23 0027 002b  | ' +|
0e25 0009 002c  |   ,|
0e27 002d 002e  | - .|
0e29 002f       | /  |
0e2a ; --------------------------------------------------------------------------------------
0e2a ; Debug chain
0e2a ; --------------------------------------------------------------------------------------
0e2a 0005 0001  |    |		.DBGLEN	0x0005,0x0001
0e2c 07d3 07d8  |    |		.DBGLNO	0x07d3,0x07d8,0x07da,0x07db,0x07e0,0x07e3
0e32 ; --------------------------------------------------------------------------------------
0e32 ; Debug chain
0e32 ; --------------------------------------------------------------------------------------
0e32 0001 0002  |    |		.DBGLEN	0x0001,0x0002
0e34 07f3 07f5  |    |		.DBGLNO	0x07f3,0x07f5,0x07fc
0e37 ; --------------------------------------------------------------------------------------
0e37 ; Debug chain
0e37 ; --------------------------------------------------------------------------------------
0e37 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0e39 080b 080d  |    |		.DBGLNO	0x080b,0x080d,0x0814,0x0826,0x082a
0e3e ; --------------------------------------------------------------------------------------
0e3e ; Debug chain
0e3e ; --------------------------------------------------------------------------------------
0e3e 0001 0002  |    |		.DBGLEN	0x0001,0x0002
0e40 0843 0845  | C E|		.DBGLNO	0x0843,0x0845,0x084c
0e43 ; --------------------------------------------------------------------------------------
0e43 ; Debug chain
0e43 ; --------------------------------------------------------------------------------------
0e43 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0e45 085b 085d  | [ ]|		.DBGLNO	0x085b,0x085d,0x0864,0x0876,0x087a
0e4a ; --------------------------------------------------------------------------------------
0e4a ; Debug chain
0e4a ; --------------------------------------------------------------------------------------
0e4a 0000 0012  |    |		.DBGLEN	0x0000,0x0012
0e4c 0893 0898  |    |		.DBGLNO	0x0893,0x0898,0x089b,0x089e,0x089f,0x08a4,0x08a9,0x08ac,0x08ad,0x08b1,0x08b8,0x08ba,0x08be,0x08c2,0x08c8,0x08ca,0x08cd,0x08d1
0e5e 0001 0002  |    |		.XXX[0x12]
0e60 0003 0004  |    |
0e62 0005 0007  |    |
0e64 0008 0009  |    |
0e66 000a 0006  |    |
0e68 000b 000c  |    |
0e6a 000d 000e  |    |
0e6c 000f 0010  |    |
0e6e 0011 0012  |    |
0e70 ; --------------------------------------------------------------------------------------
0e70 ; Debug chain
0e70 ; --------------------------------------------------------------------------------------
0e70 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0e72 08db 08e7  |    |		.DBGLNO	0x08db,0x08e7,0x0907,0x0909
0e76 ; --------------------------------------------------------------------------------------
0e76 ; Debug chain
0e76 ; --------------------------------------------------------------------------------------
0e76 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0e78 093b 0947  | ; G|		.DBGLNO	0x093b,0x0947,0x0967,0x0969
0e7c ; --------------------------------------------------------------------------------------
0e7c ; Debug chain
0e7c ; --------------------------------------------------------------------------------------
0e7c 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0e7e 099d 09a3  |    |		.DBGLNO	0x099d,0x09a3,0x09b9,0x09bb,0x09bd
0e83 ; --------------------------------------------------------------------------------------
0e83 ; Debug chain
0e83 ; --------------------------------------------------------------------------------------
0e83 0002 0007  |    |		.DBGLEN	0x0002,0x0007
0e85 09d3 09d6  |    |		.DBGLNO	0x09d3,0x09d6,0x09d9,0x0a02,0x0a08,0x0a0d,0x0a12,0x0a17,0x0a1d
0e8e ; --------------------------------------------------------------------------------------
0e8e ; Debug chain
0e8e ; --------------------------------------------------------------------------------------
0e8e 0001 0002  |    |		.DBGLEN	0x0001,0x0002
0e90 0a23 0a25  | # %|		.DBGLNO	0x0a23,0x0a25,0x0a2c
0e93 ; --------------------------------------------------------------------------------------
0e93 ; Debug chain
0e93 ; --------------------------------------------------------------------------------------
0e93 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0e95 0a3b 0a3d  | ; =|		.DBGLNO	0x0a3b,0x0a3d,0x0a44,0x0a56,0x0a5a
0e9a ; --------------------------------------------------------------------------------------
0e9a ; Debug chain
0e9a ; --------------------------------------------------------------------------------------
0e9a 0000 000a  |    |		.DBGLEN	0x0000,0x000a
0e9c 0a75 0a7b  | u {|		.DBGLNO	0x0a75,0x0a7b,0x0a92,0x0a94,0x0a96,0x0a9c,0x0aa1,0x0aa6,0x0aab,0x0ab1
0ea6 ; --------------------------------------------------------------------------------------
0ea6 ; Debug chain
0ea6 ; --------------------------------------------------------------------------------------
0ea6 0001 0001  |    |		.DBGLEN	0x0001,0x0001
0ea8 0ad3 0ad4  |    |		.DBGLNO	0x0ad3,0x0ad4
0eaa ; --------------------------------------------------------------------------------------
0eaa ; Debug chain
0eaa ; --------------------------------------------------------------------------------------
0eaa 0002 0017  |    |		.DBGLEN	0x0002,0x0017
0eac 0ae3 0ae7  |    |		.DBGLNO	0x0ae3,0x0ae7,0x0aeb,0x0af3,0x0b06,0x0b08,0x0b0b,0x0b1b,0x0b1d,0x0b36,0x0b38,0x0b3b,0x0b61,0x0b63,0x0b66,0x0b7f,0x0b81,0x0b84,0x0b88,0x0b8e,0x0b92,0x0b99,0x0b9b,0x0b9d,0x0b9f
0ec5 0000 0000  |    |		.BLANK	0000[0x13b]