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

⟦1ec040bbb⟧

    Length: 8192 (0x2000)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_779ce4

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 0f90       |    |		.CONST	0x0f90								; 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 800a       |    |		.CONST	0x800a								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 01ca       |    |		.CONST	0x01ca								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0064       | d  |		.CONST	0x0064								; Number of locals
000b			INIT_0008:
000b 029a 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call,Visible,Unelaborated
000d 029a 021b  |    |		Declare_Subprogram	INIT_0218,For_Outer_Call,Visible,Unelaborated
000f 029a 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call,Visible,Unelaborated
0011 029a 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call,Visible,Unelaborated
0013 029a 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call,Visible,Unelaborated
0015 029a 026b  |   k|		Declare_Subprogram	INIT_0268,For_Outer_Call,Visible,Unelaborated
0017 029a 0273  |   s|		Declare_Subprogram	INIT_0270,For_Outer_Call,Visible,Unelaborated
0019 029a 0283  |    |		Declare_Subprogram	INIT_0280,For_Outer_Call,Visible,Unelaborated
001b 029a 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call,Visible,Unelaborated
001d 029a 02cb  |    |		Declare_Subprogram	INIT_02c8,For_Outer_Call,Visible,Unelaborated
001f 029a 02db  |    |		Declare_Subprogram	INIT_02d8,For_Outer_Call,Visible,Unelaborated
0021 029a 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Outer_Call,Visible,Unelaborated
0023 029a 02f3  |    |		Declare_Subprogram	INIT_02f0,For_Outer_Call,Visible,Unelaborated
0025 029a 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call,Visible,Unelaborated
0027 029a 030b  |    |		Declare_Subprogram	INIT_0308,For_Outer_Call,Visible,Unelaborated
0029 029a 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call,Visible,Unelaborated
002b 029a 032b  |   +|		Declare_Subprogram	INIT_0328,For_Outer_Call,Visible,Unelaborated
002d 029a 03a3  |    |		Declare_Subprogram	INIT_03a0,For_Outer_Call,Visible,Unelaborated
002f 029a 03b3  |    |		Declare_Subprogram	INIT_03b0,For_Outer_Call,Visible,Unelaborated
0031 029a 03c3  |    |		Declare_Subprogram	INIT_03c0,For_Outer_Call,Visible,Unelaborated
0033 029a 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call,Visible,Unelaborated
0035 029a 040b  |    |		Declare_Subprogram	INIT_0408,For_Outer_Call,Visible,Unelaborated
0037 029a 041b  |    |		Declare_Subprogram	INIT_0418,For_Outer_Call,Visible,Unelaborated
0039 029a 043b  |   ;|		Declare_Subprogram	INIT_0438,For_Outer_Call,Visible,Unelaborated
003b 029a 0453  |   S|		Declare_Subprogram	INIT_0450,For_Outer_Call,Visible,Unelaborated
003d 029a 046b  |   k|		Declare_Subprogram	INIT_0468,For_Outer_Call,Visible,Unelaborated
003f 029a 0483  |    |		Declare_Subprogram	INIT_0480,For_Outer_Call,Visible,Unelaborated
0041 029a 0493  |    |		Declare_Subprogram	INIT_0490,For_Outer_Call,Visible,Unelaborated
0043 029a 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Outer_Call,Visible,Unelaborated
0045 03a9       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible
0046 00d8       |    |		Load_Top	At_Offset_0
0047 02a0       |    |		Declare_Subprogram	Null_Subprogram
0048 03ae       |    |		Declare_Type	Heap_Access,Defined,Visible
0049 4802       |H   |		Short_Literal	0x2
004a 032b       | +  |		Declare_Type	Record,Incomplete,Visible
004b 00d8       |    |		Load_Top	At_Offset_0
004c 02a0       |    |		Declare_Subprogram	Null_Subprogram
004d 03ae       |    |		Declare_Type	Heap_Access,Defined,Visible
004e 4804       |H   |		Short_Literal	0x4
004f 032b       | +  |		Declare_Type	Record,Incomplete,Visible
0050 00d8       |    |		Load_Top	At_Offset_0
0051 02a0       |    |		Declare_Subprogram	Null_Subprogram
0052 03ae       |    |		Declare_Type	Heap_Access,Defined,Visible
0053 00bf       |    |		Action	Accept_Activation
0054 0093 0000  |    |		push_full_address	0x0
0056 61bd       |a   |		Indirect_Literal	Discrete,0x214,{0x80000000, 0x00060000}
0057 0273       | s  |		Execute	Discrete,Plus
0058 e20d       |    |		Load	0x1,0xd
0059 61b6       |a   |		Indirect_Literal	Discrete,0x210,{0x00000000, 0x0000ffff}
005a 0279       | y  |		Execute	Discrete,And
005b 0273       | s  |		Execute	Discrete,Plus
005c e002       |    |		Load	0x0,0x2
005d 0273       | s  |		Execute	Discrete,Plus
005e 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
005f e003       |    |		Load	0x0,0x3
0060 0387       |    |		Declare_Variable	Package
0061 00d8       |    |		Load_Top	At_Offset_0
0062 020f       |    |		Execute	Module,Activate
0063 4800       |H   |		Short_Literal	0x0
0064 4802       |H   |		Short_Literal	0x2
0065 029f 04bb  |    |		Declare_Subprogram	INIT_04b8,For_Call
0067 03fd       |    |		Declare_Type	Discrete,Defined
0068 4800       |H   |		Short_Literal	0x0
0069 4804       |H   |		Short_Literal	0x4
006a 029f 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Call
006c 03fd       |    |		Declare_Type	Discrete,Defined
006d 4800       |H   |		Short_Literal	0x0
006e 4803       |H   |		Short_Literal	0x3
006f 029f 050b  |    |		Declare_Subprogram	INIT_0508,For_Call
0071 03fd       |    |		Declare_Type	Discrete,Defined
0072 4800       |H   |		Short_Literal	0x0
0073 4801       |H   |		Short_Literal	0x1
0074 029f 0533  |   3|		Declare_Subprogram	INIT_0530,For_Call
0076 03fd       |    |		Declare_Type	Discrete,Defined
0077 e004       |    |		Load	0x0,0x4
0078 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
0079 00db       |    |		Load_Top	At_Offset_3
007a e233       | 3  |		Load	0x1,0x33
007b 00db       |    |		Load_Top	At_Offset_3
007c e005       |    |		Load	0x0,0x5
007d e006       |    |		Load	0x0,0x6
007e 02a0       |    |		Declare_Subprogram	Null_Subprogram
007f 4806       |H   |		Short_Literal	0x6
0080 032d       | -  |		Declare_Type	Record,Defined
0081 00d8       |    |		Load_Top	At_Offset_0
0082 0322       | "  |		Declare_Variable	Record
0083 029b 055b  |   [|		Declare_Subprogram	INIT_0558,For_Outer_Call,Unelaborated
0085 4800       |H   |		Short_Literal	0x0
0086 4803       |H   |		Short_Literal	0x3
0087 029f 0563  |   c|		Declare_Subprogram	INIT_0560,For_Call
0089 03fd       |    |		Declare_Type	Discrete,Defined
008a 00e3       |    |		Load_Encached	Natural_Cache
008b 00e3       |    |		Load_Encached	Natural_Cache
008c 00e3       |    |		Load_Encached	Natural_Cache
008d 00e3       |    |		Load_Encached	Natural_Cache
008e 02a0       |    |		Declare_Subprogram	Null_Subprogram
008f 4804       |H   |		Short_Literal	0x4
0090 032d       | -  |		Declare_Type	Record,Defined
0091 00d9       |    |		Load_Top	At_Offset_1
0092 00e1       |    |		Load_Encached	Boolean_Cache
0093 029f 058b  |    |		Declare_Subprogram	INIT_0588,For_Call
0095 4800       |H   |		Short_Literal	0x0
0096 4801       |H   |		Short_Literal	0x1
0097 4800       |H   |		Short_Literal	0x0
0098 4800       |H   |		Short_Literal	0x0
0099 4801       |H   |		Short_Literal	0x1
009a 031d       |    |		Declare_Type	Variant_Record,Defined
009b 4800       |H   |		Short_Literal	0x0
009c 00d9       |    |		Load_Top	At_Offset_1
009d 1c08       |    |		Execute_Immediate	Run_Utility,0x8
009e 00d8       |    |		Load_Top	At_Offset_0
009f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00a0 029b 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call,Unelaborated
00a2 e235       | 5  |		Load	0x1,0x35
00a3 e23a       | :  |		Load	0x1,0x3a
00a4 4801       |H   |		Short_Literal	0x1
00a5 e005       |    |		Load	0x0,0x5
00a6 4801       |H   |		Short_Literal	0x1
00a7 00e3       |    |		Load_Encached	Natural_Cache
00a8 4803       |H   |		Short_Literal	0x3
00a9 e23b       | ;  |		Load	0x1,0x3b
00aa 00e3       |    |		Load_Encached	Natural_Cache
00ab 00e3       |    |		Load_Encached	Natural_Cache
00ac 029f 05d3  |    |		Declare_Subprogram	INIT_05d0,For_Call
00ae 4805       |H   |		Short_Literal	0x5
00af 4801       |H   |		Short_Literal	0x1
00b0 4803       |H   |		Short_Literal	0x3
00b1 4800       |H   |		Short_Literal	0x0
00b2 4801       |H   |		Short_Literal	0x1
00b3 031d       |    |		Declare_Type	Variant_Record,Defined
00b4 4800       |H   |		Short_Literal	0x0
00b5 00d9       |    |		Load_Top	At_Offset_1
00b6 1c08       |    |		Execute_Immediate	Run_Utility,0x8
00b7 029b 062b  |   +|		Declare_Subprogram	INIT_0628,For_Outer_Call,Unelaborated
00b9 029b 0633  |   3|		Declare_Subprogram	INIT_0630,For_Outer_Call,Unelaborated
00bb 029b 0643  |   C|		Declare_Subprogram	INIT_0640,For_Outer_Call,Unelaborated
00bd 029b 064b  |   K|		Declare_Subprogram	INIT_0648,For_Outer_Call,Unelaborated
00bf 029b 065b  |   [|		Declare_Subprogram	INIT_0658,For_Outer_Call,Unelaborated
00c1 0093 0000  |    |		push_full_address	0x0
00c3 6148       |aH  |		Indirect_Literal	Discrete,0x20c,{0x80000000, 0x00050000}
00c4 0273       | s  |		Execute	Discrete,Plus
00c5 e20d       |    |		Load	0x1,0xd
00c6 6149       |aI  |		Indirect_Literal	Discrete,0x210,{0x00000000, 0x0000ffff}
00c7 0279       | y  |		Execute	Discrete,And
00c8 0273       | s  |		Execute	Discrete,Plus
00c9 e007       |    |		Load	0x0,0x7
00ca 0273       | s  |		Execute	Discrete,Plus
00cb e235       | 5  |		Load	0x1,0x35
00cc e237       | 7  |		Load	0x1,0x37
00cd e238       | 8  |		Load	0x1,0x38
00ce 0320       |    |		Declare_Variable	Record,Duplicate
00cf 00cd       |    |		Action	Spare6_Action
00d0 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
00d1 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
00d2 e23c       | <  |		Load	0x1,0x3c
00d3 e23d       | =  |		Load	0x1,0x3d
00d4 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
00d5 00cd       |    |		Action	Spare6_Action
00d6 1d3e       | >  |		Execute_Immediate	Reference_Lex_1,0x3e
00d7 1d43       | C  |		Execute_Immediate	Reference_Lex_1,0x43
00d8 e23f       | ?  |		Load	0x1,0x3f
00d9 e240       | @  |		Load	0x1,0x40
00da 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
00db 00cd       |    |		Action	Spare6_Action
00dc 1d41       | A  |		Execute_Immediate	Reference_Lex_1,0x41
00dd 1d44       | D  |		Execute_Immediate	Reference_Lex_1,0x44
00de 1d45       | E  |		Execute_Immediate	Reference_Lex_1,0x45
00df 0092 0e4e  |   N|		Action	Push_String_Extended,0xe4e					; " "
00e1 e008       |    |		Load	0x0,0x8
00e2 0387       |    |		Declare_Variable	Package
00e3 00d8       |    |		Load_Top	At_Offset_0
00e4 020f       |    |		Execute	Module,Activate
00e5 e009       |    |		Load	0x0,0x9
00e6 00d9       |    |		Load_Top	At_Offset_1
00e7 0098       |    |		Execute	Package,Field_Read_Dynamic
00e8 e22c       | ,  |		Load	0x1,0x2c
00e9 03a2       |    |		Complete_Type	Heap_Access,By_Renaming
00ea e00a       |    |		Load	0x0,0xa
00eb 00d9       |    |		Load_Top	At_Offset_1
00ec 0098       |    |		Execute	Package,Field_Read_Dynamic
00ed e22e       | .  |		Load	0x1,0x2e
00ee 0325       | %  |		Complete_Type	Record,By_Renaming
00ef e22f       | /  |		Load	0x1,0x2f
00f0 03a0       |    |		Complete_Type	Heap_Access,By_Component_Completion
00f1 e00b       |    |		Load	0x0,0xb
00f2 00d9       |    |		Load_Top	At_Offset_1
00f3 0098       |    |		Execute	Package,Field_Read_Dynamic
00f4 e230       | 0  |		Load	0x1,0x30
00f5 0325       | %  |		Complete_Type	Record,By_Renaming
00f6 e231       | 1  |		Load	0x1,0x31
00f7 03a0       |    |		Complete_Type	Heap_Access,By_Component_Completion
00f8 e00c       |    |		Load	0x0,0xc
00f9 00d9       |    |		Load_Top	At_Offset_1
00fa 0098       |    |		Execute	Package,Field_Read_Dynamic
00fb 0337       | 7  |		Declare_Variable	Array
00fc 00d8       |    |		Load_Top	At_Offset_0
00fd 0335       | 5  |		Declare_Variable	Array,Duplicate
00fe 00cd       |    |		Action	Spare6_Action
00ff 4800       |H   |		Short_Literal	0x0
0100 4800       |H   |		Short_Literal	0x0
0101 00da       |    |		Load_Top	At_Offset_2
0102 01d6       |    |		Execute	Vector,Field_Write
0103 4835       |H5  |		Short_Literal	0x35
0104 4801       |H   |		Short_Literal	0x1
0105 00da       |    |		Load_Top	At_Offset_2
0106 01d6       |    |		Execute	Vector,Field_Write
0107 480a       |H   |		Short_Literal	0xa
0108 4802       |H   |		Short_Literal	0x2
0109 00da       |    |		Load_Top	At_Offset_2
010a 01d6       |    |		Execute	Vector,Field_Write
010b 480f       |H   |		Short_Literal	0xf
010c 4803       |H   |		Short_Literal	0x3
010d 00da       |    |		Load_Top	At_Offset_2
010e 01d6       |    |		Execute	Vector,Field_Write
010f 00d9       |    |		Load_Top	At_Offset_1
0110 01d4       |    |		Execute	Vector,Structure_Write
0111 00ea       |    |		Load_Encached	Null_String_Cache
0112 0092 0e4f  |   O|		Action	Push_String_Extended,0xe4f					; "    TEST CASE"
0114 0092 0e50  |   P|		Action	Push_String_Extended,0xe50					; " COVERAGE"
0116 0092 0e51  |   Q|		Action	Push_String_Extended,0xe51					; "  % COV"
0118 4801       |H   |		Short_Literal	0x1
0119 4850       |HP  |		Short_Literal	0x50
011a 00e9       |    |		Load_Encached	String_Cache
011b 035b       | [  |		Declare_Type	Array,Constrained
011c 0337       | 7  |		Declare_Variable	Array
011d 4850       |HP  |		Short_Literal	0x50
011e 4801       |H   |		Short_Literal	0x1
011f 482d       |H-  |		Short_Literal	0x2d
0120 00d9       |    |		Load_Top	At_Offset_1
0121 e24c       | L  |		Load	0x1,0x4c
0122 01d6       |    |		Execute	Vector,Field_Write
0123 3ffb       |?   |		Loop_Increasing	0x11f
0124 029d 068b  |    |		Declare_Subprogram	INIT_0688,For_Outer_Call
0126 029d 069b  |    |		Declare_Subprogram	INIT_0698,For_Outer_Call
0128 029d 06b3  |    |		Declare_Subprogram	INIT_06b0,For_Outer_Call
012a 029d 06db  |    |		Declare_Subprogram	INIT_06d8,For_Outer_Call
012c 029b 077b  |   {|		Declare_Subprogram	INIT_0778,For_Outer_Call,Unelaborated
012e 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
012f 00c7       |    |		Action	Elaborate_Subprogram
0130 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0131 00c7       |    |		Action	Elaborate_Subprogram
0132 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0133 00c7       |    |		Action	Elaborate_Subprogram
0134 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0135 00c7       |    |		Action	Elaborate_Subprogram
0136 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0137 00c7       |    |		Action	Elaborate_Subprogram
0138 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0139 00c7       |    |		Action	Elaborate_Subprogram
013a 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
013b 00c7       |    |		Action	Elaborate_Subprogram
013c 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
013d 00c7       |    |		Action	Elaborate_Subprogram
013e 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
013f 00c7       |    |		Action	Elaborate_Subprogram
0140 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
0141 00c7       |    |		Action	Elaborate_Subprogram
0142 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
0143 00c7       |    |		Action	Elaborate_Subprogram
0144 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0145 00c7       |    |		Action	Elaborate_Subprogram
0146 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0147 00c7       |    |		Action	Elaborate_Subprogram
0148 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0149 00c7       |    |		Action	Elaborate_Subprogram
014a 029d 07a3  |    |		Declare_Subprogram	INIT_07a0,For_Outer_Call
014c 029d 07c3  |    |		Declare_Subprogram	INIT_07c0,For_Outer_Call
014e 029d 07db  |    |		Declare_Subprogram	INIT_07d8,For_Outer_Call
0150 029d 07f3  |    |		Declare_Subprogram	INIT_07f0,For_Outer_Call
0152 029d 080b  |    |		Declare_Subprogram	INIT_0808,For_Outer_Call
0154 e00d       |    |		Load	0x0,0xd
0155 e246       | F  |		Load	0x1,0x46
0156 0095       |    |		Execute	Package,Field_Reference_Dynamic
0157 00c6       |    |		Action	Check_Subprogram_Elaborated
0158 1d53       | S  |		Execute_Immediate	Reference_Lex_1,0x53
0159 0093 0000  |    |		push_full_address	0x0
015b 60ac       |`   |		Indirect_Literal	Discrete,0x208,{0x80000000, 0x00040000}
015c 0273       | s  |		Execute	Discrete,Plus
015d e20d       |    |		Load	0x1,0xd
015e 60b1       |`   |		Indirect_Literal	Discrete,0x210,{0x00000000, 0x0000ffff}
015f 0279       | y  |		Execute	Discrete,And
0160 0273       | s  |		Execute	Discrete,Plus
0161 e00e       |    |		Load	0x0,0xe
0162 0273       | s  |		Execute	Discrete,Plus
0163 4800       |H   |		Short_Literal	0x0
0164 0007       |    |		Action	Break_Optional
0165 e00d       |    |		Load	0x0,0xd
0166 e246       | F  |		Load	0x1,0x46
0167 0095       |    |		Execute	Package,Field_Reference_Dynamic
0168 00c6       |    |		Action	Check_Subprogram_Elaborated
0169 1d54       | T  |		Execute_Immediate	Reference_Lex_1,0x54
016a 0093 0000  |    |		push_full_address	0x0
016c 6097       |`   |		Indirect_Literal	Discrete,0x204,{0x80000000, 0x00030000}
016d 0273       | s  |		Execute	Discrete,Plus
016e e20d       |    |		Load	0x1,0xd
016f 60a0       |`   |		Indirect_Literal	Discrete,0x210,{0x00000000, 0x0000ffff}
0170 0279       | y  |		Execute	Discrete,And
0171 0273       | s  |		Execute	Discrete,Plus
0172 e00f       |    |		Load	0x0,0xf
0173 0273       | s  |		Execute	Discrete,Plus
0174 4800       |H   |		Short_Literal	0x0
0175 0007       |    |		Action	Break_Optional
0176 e00d       |    |		Load	0x0,0xd
0177 e246       | F  |		Load	0x1,0x46
0178 0095       |    |		Execute	Package,Field_Reference_Dynamic
0179 00c6       |    |		Action	Check_Subprogram_Elaborated
017a 1d55       | U  |		Execute_Immediate	Reference_Lex_1,0x55
017b 0093 0000  |    |		push_full_address	0x0
017d 6082       |`   |		Indirect_Literal	Discrete,0x200,{0x80000000, 0x00020000}
017e 0273       | s  |		Execute	Discrete,Plus
017f e20d       |    |		Load	0x1,0xd
0180 608f       |`   |		Indirect_Literal	Discrete,0x210,{0x00000000, 0x0000ffff}
0181 0279       | y  |		Execute	Discrete,And
0182 0273       | s  |		Execute	Discrete,Plus
0183 e010       |    |		Load	0x0,0x10
0184 0273       | s  |		Execute	Discrete,Plus
0185 4800       |H   |		Short_Literal	0x0
0186 0007       |    |		Action	Break_Optional
0187 e00d       |    |		Load	0x0,0xd
0188 e246       | F  |		Load	0x1,0x46
0189 0095       |    |		Execute	Package,Field_Reference_Dynamic
018a 00c6       |    |		Action	Check_Subprogram_Elaborated
018b 1d56       | V  |		Execute_Immediate	Reference_Lex_1,0x56
018c 0093 0000  |    |		push_full_address	0x0
018e 606d       |`m  |		Indirect_Literal	Discrete,0x1fc,{0x80000000, 0x00010000}
018f 0273       | s  |		Execute	Discrete,Plus
0190 e20d       |    |		Load	0x1,0xd
0191 607e       |`~  |		Indirect_Literal	Discrete,0x210,{0x00000000, 0x0000ffff}
0192 0279       | y  |		Execute	Discrete,And
0193 0273       | s  |		Execute	Discrete,Plus
0194 e011       |    |		Load	0x0,0x11
0195 0273       | s  |		Execute	Discrete,Plus
0196 4800       |H   |		Short_Literal	0x0
0197 0007       |    |		Action	Break_Optional
0198 029d 0823  |   #|		Declare_Subprogram	INIT_0820,For_Outer_Call
019a 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
019b 00c7       |    |		Action	Elaborate_Subprogram
019c 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
019d 00c7       |    |		Action	Elaborate_Subprogram
019e 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
019f 00c7       |    |		Action	Elaborate_Subprogram
01a0 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
01a1 00c7       |    |		Action	Elaborate_Subprogram
01a2 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
01a3 00c7       |    |		Action	Elaborate_Subprogram
01a4 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
01a5 00c7       |    |		Action	Elaborate_Subprogram
01a6 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
01a7 00c7       |    |		Action	Elaborate_Subprogram
01a8 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
01a9 00c7       |    |		Action	Elaborate_Subprogram
01aa 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
01ab 00c7       |    |		Action	Elaborate_Subprogram
01ac 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
01ad 00c7       |    |		Action	Elaborate_Subprogram
01ae 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
01af 00c7       |    |		Action	Elaborate_Subprogram
01b0 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
01b1 00c7       |    |		Action	Elaborate_Subprogram
01b2 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
01b3 00c7       |    |		Action	Elaborate_Subprogram
01b4 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
01b5 00c7       |    |		Action	Elaborate_Subprogram
01b6 1d3e       | >  |		Execute_Immediate	Reference_Lex_1,0x3e
01b7 00c7       |    |		Action	Elaborate_Subprogram
01b8 1d41       | A  |		Execute_Immediate	Reference_Lex_1,0x41
01b9 00c7       |    |		Action	Elaborate_Subprogram
01ba 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
01bb 00c7       |    |		Action	Elaborate_Subprogram
01bc 1d43       | C  |		Execute_Immediate	Reference_Lex_1,0x43
01bd 00c7       |    |		Action	Elaborate_Subprogram
01be 1d44       | D  |		Execute_Immediate	Reference_Lex_1,0x44
01bf 00c7       |    |		Action	Elaborate_Subprogram
01c0 029d 085b  |   [|		Declare_Subprogram	INIT_0858,For_Outer_Call
01c2 1d45       | E  |		Execute_Immediate	Reference_Lex_1,0x45
01c3 00c7       |    |		Action	Elaborate_Subprogram
01c4 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
01c5 00c7       |    |		Action	Elaborate_Subprogram
01c6 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
01c7 00c7       |    |		Action	Elaborate_Subprogram
01c8 1d51       | Q  |		Execute_Immediate	Reference_Lex_1,0x51
01c9 00c7       |    |		Action	Elaborate_Subprogram
01ca			BODY_0008:
01ca 00bc       |    |		Action	Signal_Activated
01cb 00bb       |    |		Action	Signal_Completion
01cc 0000 0000  |    |		.BLANK	0000[0x4]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01db       |    |		.CONST	0x01db								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0005       |    |		.CONST	0x0005								; Number of locals
01d3			INIT_01d0:
01d3 e22d       | -  |		Load	0x1,0x2d
01d4 0007       |    |		Action	Break_Optional
01d5 e005       |    |		Load	0x0,0x5
01d6 0007       |    |		Action	Break_Optional
01d7 e5ff       |    |		Load	0x2,-0x1
01d8 824e       | N  |		Call	0x1,0x4e
01d9 e5ff       |    |		Load	0x2,-0x1
01da 824d       | M  |		Call	0x1,0x4d
01db			BODY_01d0:
01db e5fd       |    |		Load	0x2,-0x3
01dc e012       |    |		Load	0x0,0x12
01dd e246       | F  |		Load	0x1,0x46
01de 0096       |    |		Execute	Package,Entry
01df e22d       | -  |		Load	0x1,0x2d
01e0 e5fd       |    |		Load	0x2,-0x3
01e1 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
01e2 a402       |    |		Store_Unchecked	0x2,0x2
01e3 e5fd       |    |		Load	0x2,-0x3
01e4 0092 0e52  |   R|		Action	Push_String_Extended,0xe52					; "Test Case Coverage for "
01e6 8013       |    |		Call	0x0,0x13
01e7 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
01e8 00db       |    |		Load_Top	At_Offset_3
01e9 e5fd       |    |		Load	0x2,-0x3
01ea e5ff       |    |		Load	0x2,-0x1
01eb 00db       |    |		Load_Top	At_Offset_3
01ec e404       |    |		Load	0x2,0x4
01ed e403       |    |		Load	0x2,0x3
01ee 8250       | P  |		Call	0x1,0x50
01ef c402       |    |		Store	0x2,0x2
01f0 00db       |    |		Load_Top	At_Offset_3
01f1 e5fd       |    |		Load	0x2,-0x3
01f2 00da       |    |		Load_Top	At_Offset_2
01f3 e404       |    |		Load	0x2,0x4
01f4 e5ff       |    |		Load	0x2,-0x1
01f5 8251       | Q  |		Call	0x1,0x51
01f6 c402       |    |		Store	0x2,0x2
01f7 00db       |    |		Load_Top	At_Offset_3
01f8 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01f9 0000 0000  |    |		.XXX[0x3]
01fb 0000       |    |
01fc 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0200 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
0204 8000 0000  |    |		.LITERAL	{0x80000000, 0x00030000}
0208 8000 0000  |    |		.LITERAL	{0x80000000, 0x00040000}
020c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00050000}
0210 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ffff}
0214 8000 0000  |    |		.LITERAL	{0x80000000, 0x00060000}
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b       |    |		.CONST	0x021b								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0001       |    |		.CONST	0x0001								; Number of locals
021b			BODY_0218:
021b			INIT_0218:
021b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
021c 0000 0000  |    |		.BLANK	0000[0x4]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 022f       | /  |		.CONST	0x022f								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0004       |    |		.CONST	0x0004								; Number of locals
0223			INIT_0220:
0223 00da       |    |		Load_Top	At_Offset_2
0224 0219       |    |		Execute	Heap_Access,All_Read
0225 e014       |    |		Load	0x0,0x14
0226 e246       | F  |		Load	0x1,0x46
0227 0096       |    |		Execute	Package,Entry
0228 4801       |H   |		Short_Literal	0x1
0229 e015       |    |		Load	0x0,0x15
022a 1c08       |    |		Execute_Immediate	Run_Utility,0x8
022b 00d8       |    |		Load_Top	At_Offset_0
022c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
022d e005       |    |		Load	0x0,0x5
022e 0007       |    |		Action	Break_Optional
022f			BODY_0220:
022f 00da       |    |		Load_Top	At_Offset_2
0230 4801       |H   |		Short_Literal	0x1
0231 8016       |    |		Call	0x0,0x16
0232 00da       |    |		Load_Top	At_Offset_2
0233 016d       | m  |		Execute	Variant_Record,Structure_Write
0234 00da       |    |		Load_Top	At_Offset_2
0235 e248       | H  |		Load	0x1,0x48
0236 8013       |    |		Call	0x0,0x13
0237 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0238 00d8       |    |		Load_Top	At_Offset_0
0239 00da       |    |		Load_Top	At_Offset_2
023a 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
023b 00d9       |    |		Load_Top	At_Offset_1
023c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
023d 0000 0000  |    |		.XXX[0x3]
023f 0000       |    |
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243       | C  |		.CONST	0x0243								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0001       |    |		.CONST	0x0001								; Number of locals
0243			BODY_0240:
0243			INIT_0240:
0243 00ea       |    |		Load_Encached	Null_String_Cache
0244 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0245 0000 0000  |    |		.XXX[0x3]
0247 0000       |    |
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024e       | N  |		.CONST	0x024e								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0002       |    |		.CONST	0x0002								; Number of locals
024b			INIT_0248:
024b e22d       | -  |		Load	0x1,0x2d
024c e5fe       |    |		Load	0x2,-0x2
024d 039c       |    |		Declare_Variable	Heap_Access,By_Allocation
024e			BODY_0248:
024e 00d8       |    |		Load_Top	At_Offset_0
024f 00d8       |    |		Load_Top	At_Offset_0
0250 0219       |    |		Execute	Heap_Access,All_Read
0251 e009       |    |		Load	0x0,0x9
0252 e246       | F  |		Load	0x1,0x46
0253 0098       |    |		Execute	Package,Field_Read_Dynamic
0254 0216       |    |		Execute	Heap_Access,Convert
0255 e5fe       |    |		Load	0x2,-0x2
0256 e5ff       |    |		Load	0x2,-0x1
0257 0219       |    |		Execute	Heap_Access,All_Read
0258 e017       |    |		Load	0x0,0x17
0259 e246       | F  |		Load	0x1,0x46
025a 0096       |    |		Execute	Package,Entry
025b 00d9       |    |		Load_Top	At_Offset_1
025c 0218       |    |		Execute	Heap_Access,All_Write
025d 00d1       |    |		Pop_Control	Pop_Count_1
025e 00d8       |    |		Load_Top	At_Offset_0
025f a5fd       |    |		Store_Unchecked	0x2,-0x3
0260 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0261 0000 0000  |    |		.BLANK	0000[0x7]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b       | k  |		.CONST	0x026b								; Address of begin
0269 0004       |    |		.CONST	0x0004								; Address of exception handler
026a 0001       |    |		.CONST	0x0001								; Number of locals
026b			BODY_0268:
026b			INIT_0268:
026b 4801       |H   |		Short_Literal	0x1
026c a5fc       |    |		Store_Unchecked	0x2,-0x4
026d 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
026e 0000 0000  |    |		.XXX[0x2]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273       | s  |		.CONST	0x0273								; Address of begin
0271 0004       |    |		.CONST	0x0004								; Address of exception handler
0272 0001       |    |		.CONST	0x0001								; Number of locals
0273			BODY_0270:
0273			INIT_0270:
0273 00ea       |    |		Load_Encached	Null_String_Cache
0274 0092 0e53  |   S|		Action	Push_String_Extended,0xe53					; "Explain"
0276 e018       |    |		Load	0x0,0x18
0277 e232       | 2  |		Load	0x1,0x32
0278 0096       |    |		Execute	Package,Entry
0279 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
027a 0000 0000  |    |		.BLANK	0000[0x6]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0295       |    |		.CONST	0x0295								; Address of begin
0281 02a4       |    |		.CONST	0x02a4								; Address of exception handler
0282 0003       |    |		.CONST	0x0003								; Number of locals
0283			INIT_0280:
0283 00db       |    |		Load_Top	At_Offset_3
0284 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0285 00d8       |    |		Load_Top	At_Offset_0
0286 00e4       |    |		Load_Encached	Positive_Cache
0287 0260       | `  |		Execute	Discrete,In_Type
0288 7001       |p   |		Jump_Nonzero	0x28a
0289 0801       |    |		Execute_Immediate	Raise,0x1
028a 00db       |    |		Load_Top	At_Offset_3
028b 0219       |    |		Execute	Heap_Access,All_Read
028c e019       |    |		Load	0x0,0x19
028d e246       | F  |		Load	0x1,0x46
028e 0096       |    |		Execute	Package,Entry
028f 00d8       |    |		Load_Top	At_Offset_0
0290 e01a       |    |		Load	0x0,0x1a
0291 e246       | F  |		Load	0x1,0x46
0292 0096       |    |		Execute	Package,Entry
0293 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0294 0007       |    |		Action	Break_Optional
0295			BODY_0280:
0295 00d8       |    |		Load_Top	At_Offset_0
0296 00d1       |    |		Pop_Control	Pop_Count_1
0297 4800       |H   |		Short_Literal	0x0
0298 0092 0e54  |   T|		Action	Push_String_Extended,0xe54					; "Definition not supported on this "
029a 00da       |    |		Load_Top	At_Offset_2
029b e23a       | :  |		Load	0x1,0x3a
029c 011c       |    |		Execute	Any,Convert_Unchecked
029d 1c01       |    |		Execute_Immediate	Run_Utility,0x1
029e 01cc       |    |		Execute	Vector,Catenate
029f 820e       |    |		Call	0x1,0xe
02a0 801b       |    |		Call	0x0,0x1b
02a1 e5fd       |    |		Load	0x2,-0x3
02a2 016d       | m  |		Execute	Variant_Record,Structure_Write
02a3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02a4			TRAP_0280:
02a4 e01c       |    |		Load	0x0,0x1c
02a5 e246       | F  |		Load	0x1,0x46
02a6 0098       |    |		Execute	Package,Field_Read_Dynamic
02a7 010f       |    |		Execute	Exception,Equal
02a8 7002       |p   |		Jump_Nonzero	0x2ab
02a9 010e       |    |		Execute	Exception,Is_Constraint_Error
02aa 6805       |h   |		Jump_Zero	0x2b0
02ab 4801       |H   |		Short_Literal	0x1
02ac 0092 0e55  |   U|		Action	Push_String_Extended,0xe55					; "Definition not supported at this position"
02ae 820e       |    |		Call	0x1,0xe
02af 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02b0 0100       |    |		Execute	Exception,Raise
02b1 0000 0000  |    |		.BLANK	0000[0x7]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb       |    |		.CONST	0x02bb								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0001       |    |		.CONST	0x0001								; Number of locals
02bb			BODY_02b8:
02bb			INIT_02b8:
02bb 801b       |    |		Call	0x0,0x1b
02bc e5fe       |    |		Load	0x2,-0x2
02bd 016d       | m  |		Execute	Variant_Record,Structure_Write
02be 4800       |H   |		Short_Literal	0x0
02bf a5fd       |    |		Store_Unchecked	0x2,-0x3
02c0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02c1 0000 0000  |    |		.BLANK	0000[0x7]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb       |    |		.CONST	0x02cb								; Address of begin
02c9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ca 0001       |    |		.CONST	0x0001								; Number of locals
02cb			BODY_02c8:
02cb			INIT_02c8:
02cb 00ea       |    |		Load_Encached	Null_String_Cache
02cc 0092 0e56  |   V|		Action	Push_String_Extended,0xe56					; "Elide"
02ce e018       |    |		Load	0x0,0x18
02cf e232       | 2  |		Load	0x1,0x32
02d0 0096       |    |		Execute	Package,Entry
02d1 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
02d2 0000 0000  |    |		.BLANK	0000[0x6]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db       |    |		.CONST	0x02db								; Address of begin
02d9 0004       |    |		.CONST	0x0004								; Address of exception handler
02da 0001       |    |		.CONST	0x0001								; Number of locals
02db			BODY_02d8:
02db			INIT_02d8:
02db 00ea       |    |		Load_Encached	Null_String_Cache
02dc 0092 0e57  |   W|		Action	Push_String_Extended,0xe57					; "Expand"
02de e018       |    |		Load	0x0,0x18
02df e232       | 2  |		Load	0x1,0x32
02e0 0096       |    |		Execute	Package,Entry
02e1 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
02e2 0000 0000  |    |		.BLANK	0000[0x6]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb       |    |		.CONST	0x02eb								; Address of begin
02e9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ea 0001       |    |		.CONST	0x0001								; Number of locals
02eb			BODY_02e8:
02eb			INIT_02e8:
02eb 0833       | 3  |		Execute_Immediate	Raise,0x33
02ec 0000 0000  |    |		.BLANK	0000[0x4]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02f3       |    |		.CONST	0x02f3								; Address of begin
02f1 0004       |    |		.CONST	0x0004								; Address of exception handler
02f2 0001       |    |		.CONST	0x0001								; Number of locals
02f3			BODY_02f0:
02f3			INIT_02f0:
02f3 0833       | 3  |		Execute_Immediate	Raise,0x33
02f4 0000 0000  |    |		.BLANK	0000[0x4]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb       |    |		.CONST	0x02fb								; Address of begin
02f9 0004       |    |		.CONST	0x0004								; Address of exception handler
02fa 0001       |    |		.CONST	0x0001								; Number of locals
02fb			BODY_02f8:
02fb			INIT_02f8:
02fb 00ea       |    |		Load_Encached	Null_String_Cache
02fc 0092 0e58  |   X|		Action	Push_String_Extended,0xe58					; "Promote"
02fe e018       |    |		Load	0x0,0x18
02ff e232       | 2  |		Load	0x1,0x32
0300 0096       |    |		Execute	Package,Entry
0301 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0302 0000 0000  |    |		.BLANK	0000[0x6]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b       |    |		.CONST	0x030b								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0001       |    |		.CONST	0x0001								; Number of locals
030b			BODY_0308:
030b			INIT_0308:
030b 00ea       |    |		Load_Encached	Null_String_Cache
030c 0092 0e59  |   Y|		Action	Push_String_Extended,0xe59					; "Demote"
030e e018       |    |		Load	0x0,0x18
030f e232       | 2  |		Load	0x1,0x32
0310 0096       |    |		Execute	Package,Entry
0311 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0312 0000 0000  |    |		.BLANK	0000[0x6]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 031f       |    |		.CONST	0x031f								; Address of begin
0319 0004       |    |		.CONST	0x0004								; Address of exception handler
031a 0003       |    |		.CONST	0x0003								; Number of locals
031b			INIT_0318:
031b 00db       |    |		Load_Top	At_Offset_3
031c 801d       |    |		Call	0x0,0x1d
031d 029f 088b  |    |		Declare_Subprogram	INIT_0888,For_Call
031f			BODY_0318:
031f 00d9       |    |		Load_Top	At_Offset_1
0320 6802       |h   |		Jump_Zero	0x323
0321 8403       |    |		Call	0x2,0x3
0322 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0323 4800       |H   |		Short_Literal	0x0
0324 0092 0e5a  |   Z|		Action	Push_String_Extended,0xe5a					; "Delete requires a selected line"
0326 820e       |    |		Call	0x1,0xe
0327 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 0334       | 4  |		.CONST	0x0334								; Address of begin
0329 0004       |    |		.CONST	0x0004								; Address of exception handler
032a 0002       |    |		.CONST	0x0002								; Number of locals
032b			INIT_0328:
032b e237       | 7  |		Load	0x1,0x37
032c 0322       | "  |		Declare_Variable	Record
032d 00db       |    |		Load_Top	At_Offset_3
032e 0219       |    |		Execute	Heap_Access,All_Read
032f e01e       |    |		Load	0x0,0x1e
0330 e246       | F  |		Load	0x1,0x46
0331 0096       |    |		Execute	Package,Entry
0332 00d9       |    |		Load_Top	At_Offset_1
0333 017d       | }  |		Execute	Record,Structure_Write
0334			BODY_0328:
0334 e5fe       |    |		Load	0x2,-0x2
0335 00d8       |    |		Load_Top	At_Offset_0
0336 4ffd       |O   |		Short_Literal	-0x3
0337 4803       |H   |		Short_Literal	0x3
0338 0262       | b  |		Execute	Discrete,In_Range
0339 6850       |hP  |		Jump_Zero	0x38a
033a 0a03       |    |		Execute_Immediate	Plus,0x3
033b 4606       |F   |		Jump_Case	0x7
033c 782d       |x-  |		Jump	0x36a								; case 0x0
033d 784d       |xM  |		Jump	0x38b								; case 0x1
033e 781e       |x   |		Jump	0x35d								; case 0x2
033f 784b       |xK  |		Jump	0x38b								; case 0x3
0340 780f       |x   |		Jump	0x350								; case 0x4
0341 7835       |x5  |		Jump	0x377								; case 0x5
0342 7800       |x   |		Jump	0x343								; case 0x6
0343 4803       |H   |		Short_Literal	0x3
0344 00d9       |    |		Load_Top	At_Offset_1
0345 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0346 6055       |`U  |		Indirect_Literal	Discrete,0x39c,{0x00000000, 0x7fffffff}
0347 4801       |H   |		Short_Literal	0x1
0348 e5ff       |    |		Load	0x2,-0x1
0349 0219       |    |		Execute	Heap_Access,All_Read
034a 1d5d       | ]  |		Execute_Immediate	Reference_Lex_1,0x5d
034b 1d5e       | ^  |		Execute_Immediate	Reference_Lex_1,0x5e
034c e00d       |    |		Load	0x0,0xd
034d e246       | F  |		Load	0x1,0x46
034e 0096       |    |		Execute	Package,Entry
034f 7843       |xC  |		Jump	0x393
0350 4801       |H   |		Short_Literal	0x1
0351 00d9       |    |		Load_Top	At_Offset_1
0352 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0353 6048       |`H  |		Indirect_Literal	Discrete,0x39c,{0x00000000, 0x7fffffff}
0354 4801       |H   |		Short_Literal	0x1
0355 e5ff       |    |		Load	0x2,-0x1
0356 0219       |    |		Execute	Heap_Access,All_Read
0357 1d57       | W  |		Execute_Immediate	Reference_Lex_1,0x57
0358 1d58       | X  |		Execute_Immediate	Reference_Lex_1,0x58
0359 e00d       |    |		Load	0x0,0xd
035a e246       | F  |		Load	0x1,0x46
035b 0096       |    |		Execute	Package,Entry
035c 7836       |x6  |		Jump	0x393
035d 4802       |H   |		Short_Literal	0x2
035e 00d9       |    |		Load_Top	At_Offset_1
035f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0360 603b       |`;  |		Indirect_Literal	Discrete,0x39c,{0x00000000, 0x7fffffff}
0361 4801       |H   |		Short_Literal	0x1
0362 e5ff       |    |		Load	0x2,-0x1
0363 0219       |    |		Execute	Heap_Access,All_Read
0364 1d5a       | Z  |		Execute_Immediate	Reference_Lex_1,0x5a
0365 1d5b       | [  |		Execute_Immediate	Reference_Lex_1,0x5b
0366 e00d       |    |		Load	0x0,0xd
0367 e246       | F  |		Load	0x1,0x46
0368 0096       |    |		Execute	Package,Entry
0369 7829       |x)  |		Jump	0x393
036a 4804       |H   |		Short_Literal	0x4
036b 00d9       |    |		Load_Top	At_Offset_1
036c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
036d 602e       |`.  |		Indirect_Literal	Discrete,0x39c,{0x00000000, 0x7fffffff}
036e 4801       |H   |		Short_Literal	0x1
036f e5ff       |    |		Load	0x2,-0x1
0370 0219       |    |		Execute	Heap_Access,All_Read
0371 1d60       | `  |		Execute_Immediate	Reference_Lex_1,0x60
0372 1d61       | a  |		Execute_Immediate	Reference_Lex_1,0x61
0373 e00d       |    |		Load	0x0,0xd
0374 e246       | F  |		Load	0x1,0x46
0375 0096       |    |		Execute	Package,Entry
0376 781c       |x   |		Jump	0x393
0377 00d8       |    |		Load_Top	At_Offset_0
0378 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0379 7004       |p   |		Jump_Nonzero	0x37e
037a 4801       |H   |		Short_Literal	0x1
037b 00d9       |    |		Load_Top	At_Offset_1
037c 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
037d 7807       |x   |		Jump	0x385
037e 00d8       |    |		Load_Top	At_Offset_0
037f 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0380 0f01       |    |		Execute_Immediate	Equal,0x1
0381 6803       |h   |		Jump_Zero	0x385
0382 4800       |H   |		Short_Literal	0x0
0383 00d9       |    |		Load_Top	At_Offset_1
0384 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0385 00d8       |    |		Load_Top	At_Offset_0
0386 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0387 e5ff       |    |		Load	0x2,-0x1
0388 8263       | c  |		Call	0x1,0x63
0389 7809       |x   |		Jump	0x393
038a 00d1       |    |		Pop_Control	Pop_Count_1
038b 4800       |H   |		Short_Literal	0x0
038c 0092 0e5b  |   [|		Action	Push_String_Extended,0xe5b					; "No operation defined for value "
038e e5fe       |    |		Load	0x2,-0x2
038f 00e0       |    |		Load_Encached	Standard_Cache
0390 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0391 01cc       |    |		Execute	Vector,Catenate
0392 820e       |    |		Call	0x1,0xe
0393 00d8       |    |		Load_Top	At_Offset_0
0394 e5ff       |    |		Load	0x2,-0x1
0395 0219       |    |		Execute	Heap_Access,All_Read
0396 e01f       |    |		Load	0x0,0x1f
0397 e246       | F  |		Load	0x1,0x46
0398 0096       |    |		Execute	Package,Entry
0399 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
039a 0000 0000  |    |		.XXX[0x2]
039c 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3       |    |		.CONST	0x03a3								; Address of begin
03a1 0004       |    |		.CONST	0x0004								; Address of exception handler
03a2 0001       |    |		.CONST	0x0001								; Number of locals
03a3			BODY_03a0:
03a3			INIT_03a0:
03a3 00ea       |    |		Load_Encached	Null_String_Cache
03a4 0092 0e5c  |   \|		Action	Push_String_Extended,0xe5c					; "Filter"
03a6 e018       |    |		Load	0x0,0x18
03a7 e232       | 2  |		Load	0x1,0x32
03a8 0096       |    |		Execute	Package,Entry
03a9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03aa 0000 0000  |    |		.BLANK	0000[0x6]
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03b3       |    |		.CONST	0x03b3								; Address of begin
03b1 0004       |    |		.CONST	0x0004								; Address of exception handler
03b2 0001       |    |		.CONST	0x0001								; Number of locals
03b3			BODY_03b0:
03b3			INIT_03b0:
03b3 00ea       |    |		Load_Encached	Null_String_Cache
03b4 0092 0e5d  |   ]|		Action	Push_String_Extended,0xe5d					; "Show_Differential"
03b6 e018       |    |		Load	0x0,0x18
03b7 e232       | 2  |		Load	0x1,0x32
03b8 0096       |    |		Execute	Package,Entry
03b9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03ba 0000 0000  |    |		.BLANK	0000[0x6]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3       |    |		.CONST	0x03c3								; Address of begin
03c1 0004       |    |		.CONST	0x0004								; Address of exception handler
03c2 0001       |    |		.CONST	0x0001								; Number of locals
03c3			BODY_03c0:
03c3			INIT_03c0:
03c3 00ea       |    |		Load_Encached	Null_String_Cache
03c4 0092 0e5e  |   ^|		Action	Push_String_Extended,0xe5e					; "Generate_Test_Set"
03c6 e018       |    |		Load	0x0,0x18
03c7 e232       | 2  |		Load	0x1,0x32
03c8 0096       |    |		Execute	Package,Entry
03c9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03ca 0000 0000  |    |		.BLANK	0000[0x6]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03ec       |    |		.CONST	0x03ec								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0009       |    |		.CONST	0x0009								; Number of locals
03d3			INIT_03d0:
03d3 e020       |    |		Load	0x0,0x20
03d4 0007       |    |		Action	Break_Optional
03d5 e021       | !  |		Load	0x0,0x21
03d6 0007       |    |		Action	Break_Optional
03d7 e00b       |    |		Load	0x0,0xb
03d8 e246       | F  |		Load	0x1,0x46
03d9 0098       |    |		Execute	Package,Field_Read_Dynamic
03da 0322       | "  |		Declare_Variable	Record
03db 00d8       |    |		Load_Top	At_Offset_0
03dc 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03dd e5ff       |    |		Load	0x2,-0x1
03de 0219       |    |		Execute	Heap_Access,All_Read
03df e01e       |    |		Load	0x0,0x1e
03e0 e246       | F  |		Load	0x1,0x46
03e1 0096       |    |		Execute	Package,Entry
03e2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03e3 0007       |    |		Action	Break_Optional
03e4 029f 08b3  |    |		Declare_Subprogram	INIT_08b0,For_Call
03e6 029f 08eb  |    |		Declare_Subprogram	INIT_08e8,For_Call
03e8 029f 091b  |    |		Declare_Subprogram	INIT_0918,For_Call
03ea 029f 0933  |   3|		Declare_Subprogram	INIT_0930,For_Call
03ec			BODY_03d0:
03ec 4800       |H   |		Short_Literal	0x0
03ed e5ff       |    |		Load	0x2,-0x1
03ee 0219       |    |		Execute	Heap_Access,All_Read
03ef e022       | "  |		Load	0x0,0x22
03f0 e246       | F  |		Load	0x1,0x46
03f1 0096       |    |		Execute	Package,Entry
03f2 e404       |    |		Load	0x2,0x4
03f3 017d       | }  |		Execute	Record,Structure_Write
03f4 e405       |    |		Load	0x2,0x5
03f5 8023       | #  |		Call	0x0,0x23
03f6 a402       |    |		Store_Unchecked	0x2,0x2
03f7 00cf       |    |		Action	Mark_Auxiliary
03f8 7807       |x   |		Jump	0x400
03f9 8409       |    |		Call	0x2,0x9
03fa e404       |    |		Load	0x2,0x4
03fb e024       | $  |		Load	0x0,0x24
03fc e246       | F  |		Load	0x1,0x46
03fd 0096       |    |		Execute	Package,Entry
03fe 00d1       |    |		Pop_Control	Pop_Count_1
03ff 00c9       |    |		Action	Pop_Auxiliary_Loop
0400 e404       |    |		Load	0x2,0x4
0401 e025       | %  |		Load	0x0,0x25
0402 e246       | F  |		Load	0x1,0x46
0403 0096       |    |		Execute	Package,Entry
0404 6ff4       |o   |		Jump_Zero	0x3f9
0405 00ce       |    |		Action	Pop_Auxiliary
0406 8408       |    |		Call	0x2,0x8
0407 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0408 ; --------------------------------------------------------------------------------------
0408 ; SUBPROGRAM
0408 ; --------------------------------------------------------------------------------------
0408 0410       |    |		.CONST	0x0410								; Address of begin
0409 0004       |    |		.CONST	0x0004								; Address of exception handler
040a 0002       |    |		.CONST	0x0002								; Number of locals
040b			INIT_0408:
040b 00da       |    |		Load_Top	At_Offset_2
040c 0217       |    |		Execute	Heap_Access,All_Reference
040d e026       | &  |		Load	0x0,0x26
040e e246       | F  |		Load	0x1,0x46
040f 0096       |    |		Execute	Package,Entry
0410			BODY_0408:
0410 00d8       |    |		Load_Top	At_Offset_0
0411 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0412 0000 0000  |    |		.BLANK	0000[0x6]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 0424       | $  |		.CONST	0x0424								; Address of begin
0419 0004       |    |		.CONST	0x0004								; Address of exception handler
041a 0002       |    |		.CONST	0x0002								; Number of locals
041b			INIT_0418:
041b e237       | 7  |		Load	0x1,0x37
041c 0322       | "  |		Declare_Variable	Record
041d 00db       |    |		Load_Top	At_Offset_3
041e 0219       |    |		Execute	Heap_Access,All_Read
041f e01e       |    |		Load	0x0,0x1e
0420 e246       | F  |		Load	0x1,0x46
0421 0096       |    |		Execute	Package,Entry
0422 00d9       |    |		Load_Top	At_Offset_1
0423 017d       | }  |		Execute	Record,Structure_Write
0424			BODY_0418:
0424 00d8       |    |		Load_Top	At_Offset_0
0425 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0426 e236       | 6  |		Load	0x1,0x36
0427 011c       |    |		Execute	Any,Convert_Unchecked
0428 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0429 0092 0e5f  |   _|		Action	Push_String_Extended,0xe5f					; "S by "
042b 01cc       |    |		Execute	Vector,Catenate
042c 00d9       |    |		Load_Top	At_Offset_1
042d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
042e e234       | 4  |		Load	0x1,0x34
042f 011c       |    |		Execute	Any,Convert_Unchecked
0430 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0431 01cc       |    |		Execute	Vector,Catenate
0432 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0433 0000 0000  |    |		.BLANK	0000[0x5]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 0444       | D  |		.CONST	0x0444								; Address of begin
0439 0004       |    |		.CONST	0x0004								; Address of exception handler
043a 0002       |    |		.CONST	0x0002								; Number of locals
043b			INIT_0438:
043b e237       | 7  |		Load	0x1,0x37
043c 0322       | "  |		Declare_Variable	Record
043d 00db       |    |		Load_Top	At_Offset_3
043e 0219       |    |		Execute	Heap_Access,All_Read
043f e01e       |    |		Load	0x0,0x1e
0440 e246       | F  |		Load	0x1,0x46
0441 0096       |    |		Execute	Package,Entry
0442 00d9       |    |		Load_Top	At_Offset_1
0443 017d       | }  |		Execute	Record,Structure_Write
0444			BODY_0438:
0444 00d8       |    |		Load_Top	At_Offset_0
0445 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0446 8027       | '  |		Call	0x0,0x27
0447 00d9       |    |		Load_Top	At_Offset_1
0448 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0449 e233       | 3  |		Load	0x1,0x33
044a 011c       |    |		Execute	Any,Convert_Unchecked
044b 1c01       |    |		Execute_Immediate	Run_Utility,0x1
044c 01cc       |    |		Execute	Vector,Catenate
044d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
044e 0000 0000  |    |		.XXX[0x2]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 0456       | V  |		.CONST	0x0456								; Address of begin
0451 0004       |    |		.CONST	0x0004								; Address of exception handler
0452 0003       |    |		.CONST	0x0003								; Number of locals
0453			INIT_0450:
0453 00e1       |    |		Load_Encached	Boolean_Cache
0454 029f 094b  |   K|		Declare_Subprogram	INIT_0948,For_Call
0456			BODY_0450:
0456 e5ff       |    |		Load	0x2,-0x1
0457 8226       | &  |		Call	0x1,0x26
0458 e5fe       |    |		Load	0x2,-0x2
0459 8226       | &  |		Call	0x1,0x26
045a 01df       |    |		Execute	Vector,Equal
045b 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
045c 00d9       |    |		Load_Top	At_Offset_1
045d 6801       |h   |		Jump_Zero	0x45f
045e 8403       |    |		Call	0x2,0x3
045f 00d9       |    |		Load_Top	At_Offset_1
0460 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0461 0000 0000  |    |		.BLANK	0000[0x7]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 046b       | k  |		.CONST	0x046b								; Address of begin
0469 0004       |    |		.CONST	0x0004								; Address of exception handler
046a 0001       |    |		.CONST	0x0001								; Number of locals
046b			BODY_0468:
046b			INIT_0468:
046b 4801       |H   |		Short_Literal	0x1
046c 00db       |    |		Load_Top	At_Offset_3
046d 0219       |    |		Execute	Heap_Access,All_Read
046e e022       | "  |		Load	0x0,0x22
046f e246       | F  |		Load	0x1,0x46
0470 0096       |    |		Execute	Package,Entry
0471 e231       | 1  |		Load	0x1,0x31
0472 e5ff       |    |		Load	0x2,-0x1
0473 0219       |    |		Execute	Heap_Access,All_Read
0474 e014       |    |		Load	0x0,0x14
0475 e246       | F  |		Load	0x1,0x46
0476 0096       |    |		Execute	Package,Entry
0477 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
0478 a5fe       |    |		Store_Unchecked	0x2,-0x2
0479 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
047a 0000 0000  |    |		.BLANK	0000[0x6]
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0483       |    |		.CONST	0x0483								; Address of begin
0481 0004       |    |		.CONST	0x0004								; Address of exception handler
0482 0001       |    |		.CONST	0x0001								; Number of locals
0483			BODY_0480:
0483			INIT_0480:
0483 00da       |    |		Load_Top	At_Offset_2
0484 0217       |    |		Execute	Heap_Access,All_Reference
0485 e025       | %  |		Load	0x0,0x25
0486 e246       | F  |		Load	0x1,0x46
0487 0096       |    |		Execute	Package,Entry
0488 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0489 0000 0000  |    |		.BLANK	0000[0x7]
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 049b       |    |		.CONST	0x049b								; Address of begin
0491 0004       |    |		.CONST	0x0004								; Address of exception handler
0492 0002       |    |		.CONST	0x0002								; Number of locals
0493			INIT_0490:
0493 00da       |    |		Load_Top	At_Offset_2
0494 0217       |    |		Execute	Heap_Access,All_Reference
0495 e028       | (  |		Load	0x0,0x28
0496 e246       | F  |		Load	0x1,0x46
0497 0096       |    |		Execute	Package,Entry
0498 e014       |    |		Load	0x0,0x14
0499 e246       | F  |		Load	0x1,0x46
049a 0096       |    |		Execute	Package,Entry
049b			BODY_0490:
049b 00db       |    |		Load_Top	At_Offset_3
049c 0217       |    |		Execute	Heap_Access,All_Reference
049d e029       | )  |		Load	0x0,0x29
049e e246       | F  |		Load	0x1,0x46
049f 0096       |    |		Execute	Package,Entry
04a0 e22f       | /  |		Load	0x1,0x2f
04a1 00da       |    |		Load_Top	At_Offset_2
04a2 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
04a3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04a4 0000 0000  |    |		.BLANK	0000[0x4]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab       |    |		.CONST	0x04ab								; Address of begin
04a9 0004       |    |		.CONST	0x0004								; Address of exception handler
04aa 0001       |    |		.CONST	0x0001								; Number of locals
04ab			BODY_04a8:
04ab			INIT_04a8:
04ab 00da       |    |		Load_Top	At_Offset_2
04ac 0219       |    |		Execute	Heap_Access,All_Read
04ad 00d8       |    |		Load_Top	At_Offset_0
04ae e024       | $  |		Load	0x0,0x24
04af e246       | F  |		Load	0x1,0x46
04b0 0096       |    |		Execute	Package,Entry
04b1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
04b2 0000 0000  |    |		.BLANK	0000[0x6]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04bb       |    |		.CONST	0x04bb								; Address of begin
04b9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ba 0001       |    |		.CONST	0x0001								; Number of locals
04bb			BODY_04b8:
04bb			INIT_04b8:
04bb 4607       |F   |		Jump_Case	0x8
04bc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
04bd 7807       |x   |		Jump	0x4c5								; case 0x1
04be 780a       |x   |		Jump	0x4c9								; case 0x2
04bf 780e       |x   |		Jump	0x4ce								; case 0x3
04c0 7811       |x   |		Jump	0x4d2								; case 0x4
04c1 7812       |x   |		Jump	0x4d4								; case 0x5
04c2 7813       |x   |		Jump	0x4d6								; case 0x6
04c3 7816       |x   |		Jump	0x4da								; case 0x7
04c4 4302       |C   |		.XXX[0x1]
04c5 00da       |    |		Load_Top	At_Offset_2
04c6 0091 0e3c  |   <|		Action	Push_String_Extended_Indexed,0xe3c				; "WORLD"
04c8 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
04c9 00db       |    |		Load_Top	At_Offset_3
04ca 00db       |    |		Load_Top	At_Offset_3
04cb 00e0       |    |		Load_Encached	Standard_Cache
04cc 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
04cd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04ce 00da       |    |		Load_Top	At_Offset_2
04cf 00e0       |    |		Load_Encached	Standard_Cache
04d0 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
04d1 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
04d2 00db       |    |		Load_Top	At_Offset_3
04d3 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04d4 00db       |    |		Load_Top	At_Offset_3
04d5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04d6 e233       | 3  |		Load	0x1,0x33
04d7 00dc       |    |		Load_Top	At_Offset_4
04d8 0267       | g  |		Execute	Discrete,Predecessor
04d9 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04da e233       | 3  |		Load	0x1,0x33
04db 00dc       |    |		Load_Top	At_Offset_4
04dc 0268       | h  |		Execute	Discrete,Successor
04dd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04de 0000 0000  |    |		.XXX[0x2]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e3       |    |		.CONST	0x04e3								; Address of begin
04e1 0004       |    |		.CONST	0x0004								; Address of exception handler
04e2 0001       |    |		.CONST	0x0001								; Number of locals
04e3			BODY_04e0:
04e3			INIT_04e0:
04e3 4607       |F   |		Jump_Case	0x8
04e4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
04e5 7807       |x   |		Jump	0x4ed								; case 0x1
04e6 780a       |x   |		Jump	0x4f1								; case 0x2
04e7 780e       |x   |		Jump	0x4f6								; case 0x3
04e8 7811       |x   |		Jump	0x4fa								; case 0x4
04e9 7812       |x   |		Jump	0x4fc								; case 0x5
04ea 7813       |x   |		Jump	0x4fe								; case 0x6
04eb 7816       |x   |		Jump	0x502								; case 0x7
04ec 4302       |C   |		.XXX[0x1]
04ed 00da       |    |		Load_Top	At_Offset_2
04ee 0091 0e3f  |   ?|		Action	Push_String_Extended_Indexed,0xe3f				; "NONE"
04f0 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
04f1 00db       |    |		Load_Top	At_Offset_3
04f2 00db       |    |		Load_Top	At_Offset_3
04f3 00e0       |    |		Load_Encached	Standard_Cache
04f4 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
04f5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04f6 00da       |    |		Load_Top	At_Offset_2
04f7 00e0       |    |		Load_Encached	Standard_Cache
04f8 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
04f9 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
04fa 00db       |    |		Load_Top	At_Offset_3
04fb 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04fc 00db       |    |		Load_Top	At_Offset_3
04fd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04fe e234       | 4  |		Load	0x1,0x34
04ff 00dc       |    |		Load_Top	At_Offset_4
0500 0267       | g  |		Execute	Discrete,Predecessor
0501 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0502 e234       | 4  |		Load	0x1,0x34
0503 00dc       |    |		Load_Top	At_Offset_4
0504 0268       | h  |		Execute	Discrete,Successor
0505 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0506 0000 0000  |    |		.XXX[0x2]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050b       |    |		.CONST	0x050b								; Address of begin
0509 0004       |    |		.CONST	0x0004								; Address of exception handler
050a 0001       |    |		.CONST	0x0001								; Number of locals
050b			BODY_0508:
050b			INIT_0508:
050b 4607       |F   |		Jump_Case	0x8
050c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
050d 7807       |x   |		Jump	0x515								; case 0x1
050e 780a       |x   |		Jump	0x519								; case 0x2
050f 780e       |x   |		Jump	0x51e								; case 0x3
0510 7811       |x   |		Jump	0x522								; case 0x4
0511 7812       |x   |		Jump	0x524								; case 0x5
0512 7813       |x   |		Jump	0x526								; case 0x6
0513 7816       |x   |		Jump	0x52a								; case 0x7
0514 4302       |C   |		.XXX[0x1]
0515 00da       |    |		Load_Top	At_Offset_2
0516 0091 0e44  |   D|		Action	Push_String_Extended_Indexed,0xe44				; "NIL_COL"
0518 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0519 00db       |    |		Load_Top	At_Offset_3
051a 00db       |    |		Load_Top	At_Offset_3
051b 00e0       |    |		Load_Encached	Standard_Cache
051c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
051d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
051e 00da       |    |		Load_Top	At_Offset_2
051f 00e0       |    |		Load_Encached	Standard_Cache
0520 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0521 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0522 00db       |    |		Load_Top	At_Offset_3
0523 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0524 00db       |    |		Load_Top	At_Offset_3
0525 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0526 e235       | 5  |		Load	0x1,0x35
0527 00dc       |    |		Load_Top	At_Offset_4
0528 0267       | g  |		Execute	Discrete,Predecessor
0529 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
052a e235       | 5  |		Load	0x1,0x35
052b 00dc       |    |		Load_Top	At_Offset_4
052c 0268       | h  |		Execute	Discrete,Successor
052d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
052e 0000 0000  |    |		.XXX[0x2]
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0533       | 3  |		.CONST	0x0533								; Address of begin
0531 0004       |    |		.CONST	0x0004								; Address of exception handler
0532 0001       |    |		.CONST	0x0001								; Number of locals
0533			BODY_0530:
0533			INIT_0530:
0533 4607       |F   |		Jump_Case	0x8
0534 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0535 7807       |x   |		Jump	0x53d								; case 0x1
0536 780a       |x   |		Jump	0x541								; case 0x2
0537 780e       |x   |		Jump	0x546								; case 0x3
0538 7811       |x   |		Jump	0x54a								; case 0x4
0539 7812       |x   |		Jump	0x54c								; case 0x5
053a 7813       |x   |		Jump	0x54e								; case 0x6
053b 7816       |x   |		Jump	0x552								; case 0x7
053c 4302       |C   |		.XXX[0x1]
053d 00da       |    |		Load_Top	At_Offset_2
053e 0091 0e48  |   H|		Action	Push_String_Extended_Indexed,0xe48				; "SEGMENT"
0540 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0541 00db       |    |		Load_Top	At_Offset_3
0542 00db       |    |		Load_Top	At_Offset_3
0543 00e0       |    |		Load_Encached	Standard_Cache
0544 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0545 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0546 00da       |    |		Load_Top	At_Offset_2
0547 00e0       |    |		Load_Encached	Standard_Cache
0548 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0549 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
054a 00db       |    |		Load_Top	At_Offset_3
054b 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
054c 00db       |    |		Load_Top	At_Offset_3
054d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
054e e236       | 6  |		Load	0x1,0x36
054f 00dc       |    |		Load_Top	At_Offset_4
0550 0267       | g  |		Execute	Discrete,Predecessor
0551 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0552 e236       | 6  |		Load	0x1,0x36
0553 00dc       |    |		Load_Top	At_Offset_4
0554 0268       | h  |		Execute	Discrete,Successor
0555 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0556 0000 0000  |    |		.XXX[0x2]
0558 ; --------------------------------------------------------------------------------------
0558 ; SUBPROGRAM
0558 ; --------------------------------------------------------------------------------------
0558 055b       | [  |		.CONST	0x055b								; Address of begin
0559 0004       |    |		.CONST	0x0004								; Address of exception handler
055a 0001       |    |		.CONST	0x0001								; Number of locals
055b			BODY_0558:
055b			INIT_0558:
055b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
055c 0000 0000  |    |		.BLANK	0000[0x4]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0563       | c  |		.CONST	0x0563								; Address of begin
0561 0004       |    |		.CONST	0x0004								; Address of exception handler
0562 0001       |    |		.CONST	0x0001								; Number of locals
0563			BODY_0560:
0563			INIT_0560:
0563 4607       |F   |		Jump_Case	0x8
0564 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0565 7807       |x   |		Jump	0x56d								; case 0x1
0566 780a       |x   |		Jump	0x571								; case 0x2
0567 780e       |x   |		Jump	0x576								; case 0x3
0568 7811       |x   |		Jump	0x57a								; case 0x4
0569 7812       |x   |		Jump	0x57c								; case 0x5
056a 7813       |x   |		Jump	0x57e								; case 0x6
056b 7816       |x   |		Jump	0x582								; case 0x7
056c 4302       |C   |		.XXX[0x1]
056d 00da       |    |		Load_Top	At_Offset_2
056e 0091 0e4a  |   J|		Action	Push_String_Extended_Indexed,0xe4a				; "NIL_ROW"
0570 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0571 00db       |    |		Load_Top	At_Offset_3
0572 00db       |    |		Load_Top	At_Offset_3
0573 00e0       |    |		Load_Encached	Standard_Cache
0574 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0575 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0576 00da       |    |		Load_Top	At_Offset_2
0577 00e0       |    |		Load_Encached	Standard_Cache
0578 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0579 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
057a 00db       |    |		Load_Top	At_Offset_3
057b 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
057c 00db       |    |		Load_Top	At_Offset_3
057d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
057e e23a       | :  |		Load	0x1,0x3a
057f 00dc       |    |		Load_Top	At_Offset_4
0580 0267       | g  |		Execute	Discrete,Predecessor
0581 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0582 e23a       | :  |		Load	0x1,0x3a
0583 00dc       |    |		Load_Top	At_Offset_4
0584 0268       | h  |		Execute	Discrete,Successor
0585 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0586 0000 0000  |    |		.XXX[0x2]
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 058b       |    |		.CONST	0x058b								; Address of begin
0589 0004       |    |		.CONST	0x0004								; Address of exception handler
058a 0001       |    |		.CONST	0x0001								; Number of locals
058b			BODY_0588:
058b			INIT_0588:
058b 4609       |F   |		Jump_Case	0xa
058c 7809       |x   |		Jump	0x596								; case 0x0
058d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
058e 781d       |x   |		Jump	0x5ac								; case 0x2
058f 7820       |x   |		Jump	0x5b0								; case 0x3
0590 7831       |x1  |		Jump	0x5c2								; case 0x4
0591 7830       |x0  |		Jump	0x5c2								; case 0x5
0592 782f       |x/  |		Jump	0x5c2								; case 0x6
0593 7822       |x"  |		Jump	0x5b6								; case 0x7
0594 7825       |x%  |		Jump	0x5ba								; case 0x8
0595 7828       |x(  |		Jump	0x5be								; case 0x9
0596 00da       |    |		Load_Top	At_Offset_2
0597 016c       | l  |		Execute	Variant_Record,Is_Constrained
0598 7009       |p   |		Jump_Nonzero	0x5a2
0599 00cf       |    |		Action	Mark_Auxiliary
059a 4800       |H   |		Short_Literal	0x0
059b e5ff       |    |		Load	0x2,-0x1
059c 1c08       |    |		Execute_Immediate	Run_Utility,0x8
059d 00d8       |    |		Load_Top	At_Offset_0
059e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
059f c5ff       |    |		Store	0x2,-0x1
05a0 00ce       |    |		Action	Pop_Auxiliary
05a1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
05a2 4800       |H   |		Short_Literal	0x0
05a3 00db       |    |		Load_Top	At_Offset_3
05a4 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
05a5 00da       |    |		Load_Top	At_Offset_2
05a6 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05a7 4800       |H   |		Short_Literal	0x0
05a8 4802       |H   |		Short_Literal	0x2
05a9 0262       | b  |		Execute	Discrete,In_Range
05aa 7000       |p   |		Jump_Nonzero	0x5ab
05ab 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
05ac 4801       |H   |		Short_Literal	0x1
05ad 4802       |H   |		Short_Literal	0x2
05ae 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
05af 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
05b0 e5fd       |    |		Load	0x2,-0x3
05b1 00db       |    |		Load_Top	At_Offset_3
05b2 1c07       |    |		Execute_Immediate	Run_Utility,0x7
05b3 e5fe       |    |		Load	0x2,-0x2
05b4 0306       |    |		Complete_Type	Variant_Record,By_Renaming
05b5 4304       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x4
05b6 00db       |    |		Load_Top	At_Offset_3
05b7 e5ff       |    |		Load	0x2,-0x1
05b8 031b       |    |		Declare_Type	Variant_Record,Constrained
05b9 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
05ba 00db       |    |		Load_Top	At_Offset_3
05bb 00db       |    |		Load_Top	At_Offset_3
05bc 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
05bd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
05be 4800       |H   |		Short_Literal	0x0
05bf 00db       |    |		Load_Top	At_Offset_3
05c0 1c07       |    |		Execute_Immediate	Run_Utility,0x7
05c1 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
05c2 0869       | i  |		Execute_Immediate	Raise,0x69
05c3 0000 0000  |    |		.BLANK	0000[0x5]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cb       |    |		.CONST	0x05cb								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0001       |    |		.CONST	0x0001								; Number of locals
05cb			BODY_05c8:
05cb			INIT_05c8:
05cb 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05cc 0000 0000  |    |		.BLANK	0000[0x4]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d3       |    |		.CONST	0x05d3								; Address of begin
05d1 0004       |    |		.CONST	0x0004								; Address of exception handler
05d2 0001       |    |		.CONST	0x0001								; Number of locals
05d3			BODY_05d0:
05d3			INIT_05d0:
05d3 4609       |F   |		Jump_Case	0xa
05d4 7809       |x   |		Jump	0x5de								; case 0x0
05d5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
05d6 781b       |x   |		Jump	0x5f2								; case 0x2
05d7 781e       |x   |		Jump	0x5f6								; case 0x3
05d8 784d       |xM  |		Jump	0x626								; case 0x4
05d9 784c       |xL  |		Jump	0x626								; case 0x5
05da 7821       |x!  |		Jump	0x5fc								; case 0x6
05db 782e       |x.  |		Jump	0x60a								; case 0x7
05dc 783e       |x>  |		Jump	0x61b								; case 0x8
05dd 7844       |xD  |		Jump	0x622								; case 0x9
05de 00da       |    |		Load_Top	At_Offset_2
05df 016c       | l  |		Execute	Variant_Record,Is_Constrained
05e0 7009       |p   |		Jump_Nonzero	0x5ea
05e1 00cf       |    |		Action	Mark_Auxiliary
05e2 4800       |H   |		Short_Literal	0x0
05e3 e5ff       |    |		Load	0x2,-0x1
05e4 1c08       |    |		Execute_Immediate	Run_Utility,0x8
05e5 00d8       |    |		Load_Top	At_Offset_0
05e6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05e7 c5ff       |    |		Store	0x2,-0x1
05e8 00ce       |    |		Action	Pop_Auxiliary
05e9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
05ea 00da       |    |		Load_Top	At_Offset_2
05eb 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05ec 4603       |F   |		Jump_Case	0x4
05ed 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
05ee 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
05ef 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
05f0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
05f1 4302       |C   |		.XXX[0x1]
05f2 4801       |H   |		Short_Literal	0x1
05f3 4807       |H   |		Short_Literal	0x7
05f4 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
05f5 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
05f6 e5fd       |    |		Load	0x2,-0x3
05f7 00db       |    |		Load_Top	At_Offset_3
05f8 1c07       |    |		Execute_Immediate	Run_Utility,0x7
05f9 e5fe       |    |		Load	0x2,-0x2
05fa 0306       |    |		Complete_Type	Variant_Record,By_Renaming
05fb 4304       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x4
05fc 00db       |    |		Load_Top	At_Offset_3
05fd 4603       |F   |		Jump_Case	0x4
05fe 7809       |x   |		Jump	0x608								; case 0x0
05ff 7804       |x   |		Jump	0x604								; case 0x1
0600 7805       |x   |		Jump	0x606								; case 0x2
0601 7800       |x   |		Jump	0x602								; case 0x3
0602 4803       |H   |		Short_Literal	0x3
0603 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0604 4801       |H   |		Short_Literal	0x1
0605 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0606 4802       |H   |		Short_Literal	0x2
0607 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0608 48ff       |H   |		Short_Literal	0xff
0609 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
060a 00db       |    |		Load_Top	At_Offset_3
060b e5fe       |    |		Load	0x2,-0x2
060c 4603       |F   |		Jump_Case	0x4
060d 7809       |x   |		Jump	0x617								; case 0x0
060e 7804       |x   |		Jump	0x613								; case 0x1
060f 7805       |x   |		Jump	0x615								; case 0x2
0610 7800       |x   |		Jump	0x611								; case 0x3
0611 4803       |H   |		Short_Literal	0x3
0612 7805       |x   |		Jump	0x618
0613 4801       |H   |		Short_Literal	0x1
0614 7803       |x   |		Jump	0x618
0615 4802       |H   |		Short_Literal	0x2
0616 7801       |x   |		Jump	0x618
0617 48ff       |H   |		Short_Literal	0xff
0618 e5ff       |    |		Load	0x2,-0x1
0619 031b       |    |		Declare_Type	Variant_Record,Constrained
061a 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
061b 00db       |    |		Load_Top	At_Offset_3
061c e5fe       |    |		Load	0x2,-0x2
061d e5ff       |    |		Load	0x2,-0x1
061e 1c06       |    |		Execute_Immediate	Run_Utility,0x6
061f e5ff       |    |		Load	0x2,-0x1
0620 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
0621 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0622 4800       |H   |		Short_Literal	0x0
0623 00db       |    |		Load_Top	At_Offset_3
0624 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0625 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0626 0869       | i  |		Execute_Immediate	Raise,0x69
0627 0000       |    |		.XXX[0x1]
0628 ; --------------------------------------------------------------------------------------
0628 ; SUBPROGRAM
0628 ; --------------------------------------------------------------------------------------
0628 062b       | +  |		.CONST	0x062b								; Address of begin
0629 0004       |    |		.CONST	0x0004								; Address of exception handler
062a 0001       |    |		.CONST	0x0001								; Number of locals
062b			BODY_0628:
062b			INIT_0628:
062b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
062c 0000 0000  |    |		.BLANK	0000[0x4]
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 0633       | 3  |		.CONST	0x0633								; Address of begin
0631 0004       |    |		.CONST	0x0004								; Address of exception handler
0632 0001       |    |		.CONST	0x0001								; Number of locals
0633			BODY_0630:
0633			INIT_0630:
0633 00da       |    |		Load_Top	At_Offset_2
0634 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0635 e5fd       |    |		Load	0x2,-0x3
0636 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0637 00da       |    |		Load_Top	At_Offset_2
0638 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0639 e5fd       |    |		Load	0x2,-0x3
063a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
063b 00da       |    |		Load_Top	At_Offset_2
063c 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
063d e5fd       |    |		Load	0x2,-0x3
063e 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
063f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0643       | C  |		.CONST	0x0643								; Address of begin
0641 0004       |    |		.CONST	0x0004								; Address of exception handler
0642 0001       |    |		.CONST	0x0001								; Number of locals
0643			BODY_0640:
0643			INIT_0640:
0643 00da       |    |		Load_Top	At_Offset_2
0644 e5fd       |    |		Load	0x2,-0x3
0645 016d       | m  |		Execute	Variant_Record,Structure_Write
0646 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0647 0000       |    |		.XXX[0x1]
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064d       | M  |		.CONST	0x064d								; Address of begin
0649 0004       |    |		.CONST	0x0004								; Address of exception handler
064a 0002       |    |		.CONST	0x0002								; Number of locals
064b			INIT_0648:
064b 029f 0973  |   s|		Declare_Subprogram	INIT_0970,For_Call
064d			BODY_0648:
064d 00db       |    |		Load_Top	At_Offset_3
064e 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
064f 0f01       |    |		Execute_Immediate	Equal,0x1
0650 6802       |h   |		Jump_Zero	0x653
0651 8402       |    |		Call	0x2,0x2
0652 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0653 00db       |    |		Load_Top	At_Offset_3
0654 e5fd       |    |		Load	0x2,-0x3
0655 016d       | m  |		Execute	Variant_Record,Structure_Write
0656 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0657 0000       |    |		.XXX[0x1]
0658 ; --------------------------------------------------------------------------------------
0658 ; SUBPROGRAM
0658 ; --------------------------------------------------------------------------------------
0658 065d       | ]  |		.CONST	0x065d								; Address of begin
0659 0004       |    |		.CONST	0x0004								; Address of exception handler
065a 0002       |    |		.CONST	0x0002								; Number of locals
065b			INIT_0658:
065b 029f 098b  |    |		Declare_Subprogram	INIT_0988,For_Call
065d			BODY_0658:
065d 00db       |    |		Load_Top	At_Offset_3
065e 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
065f 4603       |F   |		Jump_Case	0x4
0660 7805       |x   |		Jump	0x666								; case 0x0
0661 7806       |x   |		Jump	0x668								; case 0x1
0662 780d       |x   |		Jump	0x670								; case 0x2
0663 7800       |x   |		Jump	0x664								; case 0x3
0664 8402       |    |		Call	0x2,0x2
0665 781b       |x   |		Jump	0x681
0666 e248       | H  |		Load	0x1,0x48
0667 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0668 0092 0e60  |   `|		Action	Push_String_Extended,0xe60					; "  "
066a e5ff       |    |		Load	0x2,-0x1
066b 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
066c 8027       | '  |		Call	0x0,0x27
066d 8264       | d  |		Call	0x1,0x64
066e 01cc       |    |		Execute	Vector,Catenate
066f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0670 00db       |    |		Load_Top	At_Offset_3
0671 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0672 0c65       | e  |		Execute_Immediate	Greater_Equal,0x65
0673 6803       |h   |		Jump_Zero	0x677
0674 0092 0e61  |   a|		Action	Push_String_Extended,0xe61					; "   -"
0676 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0677 4825       |H%  |		Short_Literal	0x25
0678 4820       |H   |		Short_Literal	0x20
0679 4804       |H   |		Short_Literal	0x4
067a 480a       |H   |		Short_Literal	0xa
067b e5ff       |    |		Load	0x2,-0x1
067c 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
067d e02a       | *  |		Load	0x0,0x2a
067e 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
067f 01cb       |    |		Execute	Vector,Append
0680 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0681 0831       | 1  |		Execute_Immediate	Raise,0x31
0682 0000 0000  |    |		.BLANK	0000[0x6]
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 068b       |    |		.CONST	0x068b								; Address of begin
0689 0004       |    |		.CONST	0x0004								; Address of exception handler
068a 0001       |    |		.CONST	0x0001								; Number of locals
068b			BODY_0688:
068b			INIT_0688:
068b 00da       |    |		Load_Top	At_Offset_2
068c 802b       | +  |		Call	0x0,0x2b
068d 6802       |h   |		Jump_Zero	0x690
068e 4800       |H   |		Short_Literal	0x0
068f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0690 4801       |H   |		Short_Literal	0x1
0691 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0692 0000 0000  |    |		.BLANK	0000[0x6]
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 069d       |    |		.CONST	0x069d								; Address of begin
0699 0004       |    |		.CONST	0x0004								; Address of exception handler
069a 0002       |    |		.CONST	0x0002								; Number of locals
069b			INIT_0698:
069b e233       | 3  |		Load	0x1,0x33
069c 0007       |    |		Action	Break_Optional
069d			BODY_0698:
069d 00db       |    |		Load_Top	At_Offset_3
069e 802c       | ,  |		Call	0x0,0x2c
069f 01db       |    |		Execute	Vector,Length
06a0 7003       |p   |		Jump_Nonzero	0x6a4
06a1 4800       |H   |		Short_Literal	0x0
06a2 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
06a3 7809       |x   |		Jump	0x6ad
06a4 00db       |    |		Load_Top	At_Offset_3
06a5 802d       | -  |		Call	0x0,0x2d
06a6 01db       |    |		Execute	Vector,Length
06a7 7003       |p   |		Jump_Nonzero	0x6ab
06a8 4801       |H   |		Short_Literal	0x1
06a9 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
06aa 7802       |x   |		Jump	0x6ad
06ab 4802       |H   |		Short_Literal	0x2
06ac 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
06ad 00d8       |    |		Load_Top	At_Offset_0
06ae 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06af 0000       |    |		.XXX[0x1]
06b0 ; --------------------------------------------------------------------------------------
06b0 ; SUBPROGRAM
06b0 ; --------------------------------------------------------------------------------------
06b0 06b3       |    |		.CONST	0x06b3								; Address of begin
06b1 0004       |    |		.CONST	0x0004								; Address of exception handler
06b2 0001       |    |		.CONST	0x0001								; Number of locals
06b3			BODY_06b0:
06b3			INIT_06b0:
06b3 00da       |    |		Load_Top	At_Offset_2
06b4 824e       | N  |		Call	0x1,0x4e
06b5 4602       |F   |		Jump_Case	0x3
06b6 781a       |x   |		Jump	0x6d1								; case 0x0
06b7 7810       |x   |		Jump	0x6c8								; case 0x1
06b8 7800       |x   |		Jump	0x6b9								; case 0x2
06b9 00da       |    |		Load_Top	At_Offset_2
06ba 802e       | .  |		Call	0x0,0x2e
06bb 0092 0e62  |   b|		Action	Push_String_Extended,0xe62					; "."
06bd 01cc       |    |		Execute	Vector,Catenate
06be 00db       |    |		Load_Top	At_Offset_3
06bf 802c       | ,  |		Call	0x0,0x2c
06c0 01cc       |    |		Execute	Vector,Catenate
06c1 0092 0e62  |   b|		Action	Push_String_Extended,0xe62					; "."
06c3 01cc       |    |		Execute	Vector,Catenate
06c4 00db       |    |		Load_Top	At_Offset_3
06c5 802d       | -  |		Call	0x0,0x2d
06c6 01cc       |    |		Execute	Vector,Catenate
06c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06c8 00da       |    |		Load_Top	At_Offset_2
06c9 802e       | .  |		Call	0x0,0x2e
06ca 0092 0e62  |   b|		Action	Push_String_Extended,0xe62					; "."
06cc 01cc       |    |		Execute	Vector,Catenate
06cd 00db       |    |		Load_Top	At_Offset_3
06ce 802c       | ,  |		Call	0x0,0x2c
06cf 01cc       |    |		Execute	Vector,Catenate
06d0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06d1 00da       |    |		Load_Top	At_Offset_2
06d2 802e       | .  |		Call	0x0,0x2e
06d3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06d4 0000 0000  |    |		.BLANK	0000[0x4]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; SUBPROGRAM
06d8 ; --------------------------------------------------------------------------------------
06d8 06e1       |    |		.CONST	0x06e1								; Address of begin
06d9 0004       |    |		.CONST	0x0004								; Address of exception handler
06da 0003       |    |		.CONST	0x0003								; Number of locals
06db			INIT_06d8:
06db e00a       |    |		Load	0x0,0xa
06dc e246       | F  |		Load	0x1,0x46
06dd 0098       |    |		Execute	Package,Field_Read_Dynamic
06de 0322       | "  |		Declare_Variable	Record
06df 029f 09bb  |    |		Declare_Subprogram	INIT_09b8,For_Call
06e1			BODY_06d8:
06e1 e237       | 7  |		Load	0x1,0x37
06e2 0322       | "  |		Declare_Variable	Record
06e3 e5fb       |    |		Load	0x2,-0x5
06e4 00d9       |    |		Load_Top	At_Offset_1
06e5 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
06e6 4801       |H   |		Short_Literal	0x1
06e7 00d9       |    |		Load_Top	At_Offset_1
06e8 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
06e9 e5fe       |    |		Load	0x2,-0x2
06ea 00d9       |    |		Load_Top	At_Offset_1
06eb 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
06ec e5fd       |    |		Load	0x2,-0x3
06ed 00d9       |    |		Load_Top	At_Offset_1
06ee 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
06ef e5ff       |    |		Load	0x2,-0x1
06f0 00d9       |    |		Load_Top	At_Offset_1
06f1 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
06f2 e5fc       |    |		Load	0x2,-0x4
06f3 00d9       |    |		Load_Top	At_Offset_1
06f4 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
06f5 e5fa       |    |		Load	0x2,-0x6
06f6 0219       |    |		Execute	Heap_Access,All_Read
06f7 e01f       |    |		Load	0x0,0x1f
06f8 e246       | F  |		Load	0x1,0x46
06f9 0096       |    |		Execute	Package,Entry
06fa 00d9       |    |		Load_Top	At_Offset_1
06fb 4800       |H   |		Short_Literal	0x0
06fc e5fa       |    |		Load	0x2,-0x6
06fd 0219       |    |		Execute	Heap_Access,All_Read
06fe e02f       | /  |		Load	0x0,0x2f
06ff e246       | F  |		Load	0x1,0x46
0700 0096       |    |		Execute	Package,Entry
0701 00d1       |    |		Pop_Control	Pop_Count_1
0702 4801       |H   |		Short_Literal	0x1
0703 e23c       | <  |		Load	0x1,0x3c
0704 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0705 4800       |H   |		Short_Literal	0x0
0706 00d9       |    |		Load_Top	At_Offset_1
0707 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0708 00da       |    |		Load_Top	At_Offset_2
0709 e030       | 0  |		Load	0x0,0x30
070a e246       | F  |		Load	0x1,0x46
070b 0096       |    |		Execute	Package,Entry
070c e5fc       |    |		Load	0x2,-0x4
070d 824f       | O  |		Call	0x1,0x4f
070e 8403       |    |		Call	0x2,0x3
070f 00da       |    |		Load_Top	At_Offset_2
0710 e031       | 1  |		Load	0x0,0x31
0711 e246       | F  |		Load	0x1,0x46
0712 0096       |    |		Execute	Package,Entry
0713 00d9       |    |		Load_Top	At_Offset_1
0714 4801       |H   |		Short_Literal	0x1
0715 e5fa       |    |		Load	0x2,-0x6
0716 0219       |    |		Execute	Heap_Access,All_Read
0717 e02f       | /  |		Load	0x0,0x2f
0718 e246       | F  |		Load	0x1,0x46
0719 0096       |    |		Execute	Package,Entry
071a 00d1       |    |		Pop_Control	Pop_Count_1
071b 4802       |H   |		Short_Literal	0x2
071c e23c       | <  |		Load	0x1,0x3c
071d 1c08       |    |		Execute_Immediate	Run_Utility,0x8
071e 4800       |H   |		Short_Literal	0x0
071f 00d9       |    |		Load_Top	At_Offset_1
0720 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0721 00da       |    |		Load_Top	At_Offset_2
0722 e030       | 0  |		Load	0x0,0x30
0723 e246       | F  |		Load	0x1,0x46
0724 0096       |    |		Execute	Package,Entry
0725 4801       |H   |		Short_Literal	0x1
0726 e249       | I  |		Load	0x1,0x49
0727 00db       |    |		Load_Top	At_Offset_3
0728 e032       | 2  |		Load	0x0,0x32
0729 e246       | F  |		Load	0x1,0x46
072a 0096       |    |		Execute	Package,Entry
072b 4802       |H   |		Short_Literal	0x2
072c e24b       | K  |		Load	0x1,0x4b
072d 00db       |    |		Load_Top	At_Offset_3
072e e032       | 2  |		Load	0x0,0x32
072f e246       | F  |		Load	0x1,0x46
0730 0096       |    |		Execute	Package,Entry
0731 4803       |H   |		Short_Literal	0x3
0732 e24a       | J  |		Load	0x1,0x4a
0733 00db       |    |		Load_Top	At_Offset_3
0734 e032       | 2  |		Load	0x0,0x32
0735 e246       | F  |		Load	0x1,0x46
0736 0096       |    |		Execute	Package,Entry
0737 00d9       |    |		Load_Top	At_Offset_1
0738 4801       |H   |		Short_Literal	0x1
0739 e5fa       |    |		Load	0x2,-0x6
073a 0219       |    |		Execute	Heap_Access,All_Read
073b e02f       | /  |		Load	0x0,0x2f
073c e246       | F  |		Load	0x1,0x46
073d 0096       |    |		Execute	Package,Entry
073e 00d1       |    |		Pop_Control	Pop_Count_1
073f 4802       |H   |		Short_Literal	0x2
0740 e23c       | <  |		Load	0x1,0x3c
0741 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0742 4800       |H   |		Short_Literal	0x0
0743 00d9       |    |		Load_Top	At_Offset_1
0744 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0745 00da       |    |		Load_Top	At_Offset_2
0746 e030       | 0  |		Load	0x0,0x30
0747 e246       | F  |		Load	0x1,0x46
0748 0096       |    |		Execute	Package,Entry
0749 4801       |H   |		Short_Literal	0x1
074a 4801       |H   |		Short_Literal	0x1
074b 4801       |H   |		Short_Literal	0x1
074c e247       | G  |		Load	0x1,0x47
074d 01d7       |    |		Execute	Vector,Field_Read
074e e24c       | L  |		Load	0x1,0x4c
074f 01cf       |    |		Execute	Vector,Slice_Read
0750 00db       |    |		Load_Top	At_Offset_3
0751 e032       | 2  |		Load	0x0,0x32
0752 e246       | F  |		Load	0x1,0x46
0753 0096       |    |		Execute	Package,Entry
0754 4802       |H   |		Short_Literal	0x2
0755 4801       |H   |		Short_Literal	0x1
0756 4802       |H   |		Short_Literal	0x2
0757 e247       | G  |		Load	0x1,0x47
0758 01d7       |    |		Execute	Vector,Field_Read
0759 e24c       | L  |		Load	0x1,0x4c
075a 01cf       |    |		Execute	Vector,Slice_Read
075b 00db       |    |		Load_Top	At_Offset_3
075c e032       | 2  |		Load	0x0,0x32
075d e246       | F  |		Load	0x1,0x46
075e 0096       |    |		Execute	Package,Entry
075f 4803       |H   |		Short_Literal	0x3
0760 4801       |H   |		Short_Literal	0x1
0761 4803       |H   |		Short_Literal	0x3
0762 e247       | G  |		Load	0x1,0x47
0763 01d7       |    |		Execute	Vector,Field_Read
0764 0afc       |    |		Execute_Immediate	Plus,-0x4
0765 e24c       | L  |		Load	0x1,0x4c
0766 01cf       |    |		Execute	Vector,Slice_Read
0767 00db       |    |		Load_Top	At_Offset_3
0768 e032       | 2  |		Load	0x0,0x32
0769 e246       | F  |		Load	0x1,0x46
076a 0096       |    |		Execute	Package,Entry
076b e247       | G  |		Load	0x1,0x47
076c e5fa       |    |		Load	0x2,-0x6
076d 0219       |    |		Execute	Heap_Access,All_Read
076e e033       | 3  |		Load	0x0,0x33
076f e246       | F  |		Load	0x1,0x46
0770 0096       |    |		Execute	Package,Entry
0771 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0772 0000 0000  |    |		.BLANK	0000[0x6]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 0792       |    |		.CONST	0x0792								; Address of begin
0779 0004       |    |		.CONST	0x0004								; Address of exception handler
077a 000d       |    |		.CONST	0x000d								; Number of locals
077b			INIT_0778:
077b e034       | 4  |		Load	0x0,0x34
077c 0007       |    |		Action	Break_Optional
077d 00e3       |    |		Load_Encached	Natural_Cache
077e 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
077f 00e3       |    |		Load_Encached	Natural_Cache
0780 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0781 00e1       |    |		Load_Encached	Boolean_Cache
0782 e035       | 5  |		Load	0x0,0x35
0783 0007       |    |		Action	Break_Optional
0784 e005       |    |		Load	0x0,0x5
0785 0007       |    |		Action	Break_Optional
0786 00d8       |    |		Load_Top	At_Offset_0
0787 0007       |    |		Action	Break_Optional
0788 029f 09d3  |    |		Declare_Subprogram	INIT_09d0,For_Call
078a 029f 09f3  |    |		Declare_Subprogram	INIT_09f0,For_Call
078c 029f 0a33  |   3|		Declare_Subprogram	INIT_0a30,For_Call
078e 029f 0a8b  |    |		Declare_Subprogram	INIT_0a88,For_Call
0790 029f 0abb  |    |		Declare_Subprogram	INIT_0ab8,For_Call
0792			BODY_0778:
0792 e5fe       |    |		Load	0x2,-0x2
0793 6804       |h   |		Jump_Zero	0x798
0794 840d       |    |		Call	0x2,0xd
0795 840c       |    |		Call	0x2,0xc
0796 840b       |    |		Call	0x2,0xb
0797 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0798 00ea       |    |		Load_Encached	Null_String_Cache
0799 0092 0e63  |   c|		Action	Push_String_Extended,0xe63					; "Explanation of world coverage by test case"
079b e036       | 6  |		Load	0x0,0x36
079c e232       | 2  |		Load	0x1,0x32
079d 0096       |    |		Execute	Package,Entry
079e 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
079f 0000       |    |		.XXX[0x1]
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07ac       |    |		.CONST	0x07ac								; Address of begin
07a1 0004       |    |		.CONST	0x0004								; Address of exception handler
07a2 0002       |    |		.CONST	0x0002								; Number of locals
07a3			INIT_07a0:
07a3 e23f       | ?  |		Load	0x1,0x3f
07a4 02ff       |    |		Declare_Variable	Variant_Record
07a5 4802       |H   |		Short_Literal	0x2
07a6 e5ff       |    |		Load	0x2,-0x1
07a7 e037       | 7  |		Load	0x0,0x37
07a8 e246       | F  |		Load	0x1,0x46
07a9 0096       |    |		Execute	Package,Entry
07aa 00d9       |    |		Load_Top	At_Offset_1
07ab 016d       | m  |		Execute	Variant_Record,Structure_Write
07ac			BODY_07a0:
07ac 00d8       |    |		Load_Top	At_Offset_0
07ad 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07ae 0f03       |    |		Execute_Immediate	Equal,0x3
07af 7002       |p   |		Jump_Nonzero	0x7b2
07b0 4fff       |O   |		Short_Literal	-0x1
07b1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07b2 00d8       |    |		Load_Top	At_Offset_0
07b3 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
07b4 0c65       | e  |		Execute_Immediate	Greater_Equal,0x65
07b5 6802       |h   |		Jump_Zero	0x7b8
07b6 4fff       |O   |		Short_Literal	-0x1
07b7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07b8 00d8       |    |		Load_Top	At_Offset_0
07b9 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
07ba 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07bb 0000 0000  |    |		.BLANK	0000[0x5]
07c0 ; --------------------------------------------------------------------------------------
07c0 ; SUBPROGRAM
07c0 ; --------------------------------------------------------------------------------------
07c0 07c3       |    |		.CONST	0x07c3								; Address of begin
07c1 0004       |    |		.CONST	0x0004								; Address of exception handler
07c2 0001       |    |		.CONST	0x0001								; Number of locals
07c3			BODY_07c0:
07c3			INIT_07c0:
07c3 4801       |H   |		Short_Literal	0x1
07c4 00db       |    |		Load_Top	At_Offset_3
07c5 e037       | 7  |		Load	0x0,0x37
07c6 e246       | F  |		Load	0x1,0x46
07c7 0096       |    |		Execute	Package,Entry
07c8 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
07c9 8027       | '  |		Call	0x0,0x27
07ca 4801       |H   |		Short_Literal	0x1
07cb e5fe       |    |		Load	0x2,-0x2
07cc e037       | 7  |		Load	0x0,0x37
07cd e246       | F  |		Load	0x1,0x46
07ce 0096       |    |		Execute	Package,Entry
07cf 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
07d0 8027       | '  |		Call	0x0,0x27
07d1 01c1       |    |		Execute	Vector,Less
07d2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07d3 0000 0000  |    |		.BLANK	0000[0x5]
07d8 ; --------------------------------------------------------------------------------------
07d8 ; SUBPROGRAM
07d8 ; --------------------------------------------------------------------------------------
07d8 07db       |    |		.CONST	0x07db								; Address of begin
07d9 0004       |    |		.CONST	0x0004								; Address of exception handler
07da 0001       |    |		.CONST	0x0001								; Number of locals
07db			BODY_07d8:
07db			INIT_07d8:
07db 4801       |H   |		Short_Literal	0x1
07dc e5fe       |    |		Load	0x2,-0x2
07dd e037       | 7  |		Load	0x0,0x37
07de e246       | F  |		Load	0x1,0x46
07df 0096       |    |		Execute	Package,Entry
07e0 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
07e1 8027       | '  |		Call	0x0,0x27
07e2 4801       |H   |		Short_Literal	0x1
07e3 e5ff       |    |		Load	0x2,-0x1
07e4 e037       | 7  |		Load	0x0,0x37
07e5 e246       | F  |		Load	0x1,0x46
07e6 0096       |    |		Execute	Package,Entry
07e7 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
07e8 8027       | '  |		Call	0x0,0x27
07e9 01c1       |    |		Execute	Vector,Less
07ea 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07eb 0000 0000  |    |		.BLANK	0000[0x5]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07f3       |    |		.CONST	0x07f3								; Address of begin
07f1 0004       |    |		.CONST	0x0004								; Address of exception handler
07f2 0001       |    |		.CONST	0x0001								; Number of locals
07f3			BODY_07f0:
07f3			INIT_07f0:
07f3 00da       |    |		Load_Top	At_Offset_2
07f4 8252       | R  |		Call	0x1,0x52
07f5 e5fe       |    |		Load	0x2,-0x2
07f6 8252       | R  |		Call	0x1,0x52
07f7 027f       |    |		Execute	Discrete,Equal
07f8 6804       |h   |		Jump_Zero	0x7fd
07f9 00db       |    |		Load_Top	At_Offset_3
07fa 00db       |    |		Load_Top	At_Offset_3
07fb 8253       | S  |		Call	0x1,0x53
07fc 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07fd 00da       |    |		Load_Top	At_Offset_2
07fe 8252       | R  |		Call	0x1,0x52
07ff e5fe       |    |		Load	0x2,-0x2
0800 8252       | R  |		Call	0x1,0x52
0801 027c       | |  |		Execute	Discrete,Less
0802 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0803 0000 0000  |    |		.BLANK	0000[0x5]
0808 ; --------------------------------------------------------------------------------------
0808 ; SUBPROGRAM
0808 ; --------------------------------------------------------------------------------------
0808 080b       |    |		.CONST	0x080b								; Address of begin
0809 0004       |    |		.CONST	0x0004								; Address of exception handler
080a 0001       |    |		.CONST	0x0001								; Number of locals
080b			BODY_0808:
080b			INIT_0808:
080b 00da       |    |		Load_Top	At_Offset_2
080c 8252       | R  |		Call	0x1,0x52
080d e5fe       |    |		Load	0x2,-0x2
080e 8252       | R  |		Call	0x1,0x52
080f 027f       |    |		Execute	Discrete,Equal
0810 6804       |h   |		Jump_Zero	0x815
0811 00db       |    |		Load_Top	At_Offset_3
0812 00db       |    |		Load_Top	At_Offset_3
0813 8253       | S  |		Call	0x1,0x53
0814 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0815 00da       |    |		Load_Top	At_Offset_2
0816 8252       | R  |		Call	0x1,0x52
0817 e5fe       |    |		Load	0x2,-0x2
0818 8252       | R  |		Call	0x1,0x52
0819 027d       | }  |		Execute	Discrete,Greater
081a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
081b 0000 0000  |    |		.BLANK	0000[0x5]
0820 ; --------------------------------------------------------------------------------------
0820 ; SUBPROGRAM
0820 ; --------------------------------------------------------------------------------------
0820 0835       | 5  |		.CONST	0x0835								; Address of begin
0821 0004       |    |		.CONST	0x0004								; Address of exception handler
0822 0004       |    |		.CONST	0x0004								; Number of locals
0823			INIT_0820:
0823 e00b       |    |		Load	0x0,0xb
0824 e246       | F  |		Load	0x1,0x46
0825 0098       |    |		Execute	Package,Field_Read_Dynamic
0826 0322       | "  |		Declare_Variable	Record
0827 4800       |H   |		Short_Literal	0x0
0828 e5ff       |    |		Load	0x2,-0x1
0829 0219       |    |		Execute	Heap_Access,All_Read
082a e022       | "  |		Load	0x0,0x22
082b e246       | F  |		Load	0x1,0x46
082c 0096       |    |		Execute	Package,Entry
082d 00d9       |    |		Load_Top	At_Offset_1
082e 017d       | }  |		Execute	Record,Structure_Write
082f e00a       |    |		Load	0x0,0xa
0830 e246       | F  |		Load	0x1,0x46
0831 0098       |    |		Execute	Package,Field_Read_Dynamic
0832 0322       | "  |		Declare_Variable	Record
0833 029f 0acb  |    |		Declare_Subprogram	INIT_0ac8,For_Call
0835			BODY_0820:
0835 00cf       |    |		Action	Mark_Auxiliary
0836 7817       |x   |		Jump	0x84e
0837 00db       |    |		Load_Top	At_Offset_3
0838 e029       | )  |		Load	0x0,0x29
0839 e246       | F  |		Load	0x1,0x46
083a 0096       |    |		Execute	Package,Entry
083b 00db       |    |		Load_Top	At_Offset_3
083c 017d       | }  |		Execute	Record,Structure_Write
083d 00da       |    |		Load_Top	At_Offset_2
083e e01a       |    |		Load	0x0,0x1a
083f e246       | F  |		Load	0x1,0x46
0840 0096       |    |		Execute	Package,Entry
0841 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0842 4800       |H   |		Short_Literal	0x0
0843 4802       |H   |		Short_Literal	0x2
0844 0262       | b  |		Execute	Discrete,In_Range
0845 7002       |p   |		Jump_Nonzero	0x848
0846 7800       |x   |		Jump	0x847
0847 8404       |    |		Call	0x2,0x4
0848 00db       |    |		Load_Top	At_Offset_3
0849 e024       | $  |		Load	0x0,0x24
084a e246       | F  |		Load	0x1,0x46
084b 0096       |    |		Execute	Package,Entry
084c 00d1       |    |		Pop_Control	Pop_Count_1
084d 00c9       |    |		Action	Pop_Auxiliary_Loop
084e 00db       |    |		Load_Top	At_Offset_3
084f e025       | %  |		Load	0x0,0x25
0850 e246       | F  |		Load	0x1,0x46
0851 0096       |    |		Execute	Package,Entry
0852 6fe4       |o   |		Jump_Zero	0x837
0853 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0854 0000 0000  |    |		.BLANK	0000[0x4]
0858 ; --------------------------------------------------------------------------------------
0858 ; SUBPROGRAM
0858 ; --------------------------------------------------------------------------------------
0858 0863       | c  |		.CONST	0x0863								; Address of begin
0859 0004       |    |		.CONST	0x0004								; Address of exception handler
085a 0003       |    |		.CONST	0x0003								; Number of locals
085b			INIT_0858:
085b 4800       |H   |		Short_Literal	0x0
085c 00db       |    |		Load_Top	At_Offset_3
085d 482e       |H.  |		Short_Literal	0x2e
085e e02a       | *  |		Load	0x0,0x2a
085f 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0860 00e3       |    |		Load_Encached	Natural_Cache
0861 03f1       |    |		Declare_Variable	Discrete,With_Value
0862 00e3       |    |		Load_Encached	Natural_Cache
0863			BODY_0858:
0863 00d9       |    |		Load_Top	At_Offset_1
0864 7002       |p   |		Jump_Nonzero	0x867
0865 e5ff       |    |		Load	0x2,-0x1
0866 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0867 4800       |H   |		Short_Literal	0x0
0868 e5ff       |    |		Load	0x2,-0x1
0869 01dd       |    |		Execute	Vector,First
086a 00db       |    |		Load_Top	At_Offset_3
086b 0aff       |    |		Execute_Immediate	Plus,-0x1
086c e5ff       |    |		Load	0x2,-0x1
086d 01cf       |    |		Execute	Vector,Slice_Read
086e 482e       |H.  |		Short_Literal	0x2e
086f e02a       | *  |		Load	0x0,0x2a
0870 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0871 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0872 00d8       |    |		Load_Top	At_Offset_0
0873 7002       |p   |		Jump_Nonzero	0x876
0874 e5ff       |    |		Load	0x2,-0x1
0875 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0876 00d8       |    |		Load_Top	At_Offset_0
0877 0a01       |    |		Execute_Immediate	Plus,0x1
0878 00d8       |    |		Load_Top	At_Offset_0
0879 00e2       |    |		Load_Encached	Integer_Cache
087a 0260       | `  |		Execute	Discrete,In_Type
087b 7001       |p   |		Jump_Nonzero	0x87d
087c 0801       |    |		Execute_Immediate	Raise,0x1
087d e5ff       |    |		Load	0x2,-0x1
087e 01dc       |    |		Execute	Vector,Last
087f e5ff       |    |		Load	0x2,-0x1
0880 01cf       |    |		Execute	Vector,Slice_Read
0881 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0882 0000 0000  |    |		.BLANK	0000[0x6]
0888 ; --------------------------------------------------------------------------------------
0888 ; SUBPROGRAM
0888 ; --------------------------------------------------------------------------------------
0888 089b       |    |		.CONST	0x089b								; Address of begin
0889 0004       |    |		.CONST	0x0004								; Address of exception handler
088a 0003       |    |		.CONST	0x0003								; Number of locals
088b			INIT_0888:
088b e5fe       |    |		Load	0x2,-0x2
088c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
088d 00d8       |    |		Load_Top	At_Offset_0
088e 00e4       |    |		Load_Encached	Positive_Cache
088f 0260       | `  |		Execute	Discrete,In_Type
0890 7001       |p   |		Jump_Nonzero	0x892
0891 0801       |    |		Execute_Immediate	Raise,0x1
0892 e5ff       |    |		Load	0x2,-0x1
0893 0219       |    |		Execute	Heap_Access,All_Read
0894 e019       |    |		Load	0x0,0x19
0895 e246       | F  |		Load	0x1,0x46
0896 0096       |    |		Execute	Package,Entry
0897 00d8       |    |		Load_Top	At_Offset_0
0898 e01a       |    |		Load	0x0,0x1a
0899 e246       | F  |		Load	0x1,0x46
089a 0096       |    |		Execute	Package,Entry
089b			BODY_0888:
089b 00d8       |    |		Load_Top	At_Offset_0
089c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
089d 4800       |H   |		Short_Literal	0x0
089e 4802       |H   |		Short_Literal	0x2
089f 0262       | b  |		Execute	Discrete,In_Range
08a0 7005       |p   |		Jump_Nonzero	0x8a6
08a1 4800       |H   |		Short_Literal	0x0
08a2 0092 0e64  |   d|		Action	Push_String_Extended,0xe64					; "Deletion is not supported for coverage explanation images"
08a4 820e       |    |		Call	0x1,0xe
08a5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08a6 4800       |H   |		Short_Literal	0x0
08a7 0092 0e65  |   e|		Action	Push_String_Extended,0xe65					; "Delete not defined for this line"
08a9 820e       |    |		Call	0x1,0xe
08aa 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08ab 0000 0000  |    |		.BLANK	0000[0x5]
08b0 ; --------------------------------------------------------------------------------------
08b0 ; SUBPROGRAM
08b0 ; --------------------------------------------------------------------------------------
08b0 08c3       |    |		.CONST	0x08c3								; Address of begin
08b1 08df       |    |		.CONST	0x08df								; Address of exception handler
08b2 0005       |    |		.CONST	0x0005								; Number of locals
08b3			INIT_08b0:
08b3 4801       |H   |		Short_Literal	0x1
08b4 00db       |    |		Load_Top	At_Offset_3
08b5 e037       | 7  |		Load	0x0,0x37
08b6 e246       | F  |		Load	0x1,0x46
08b7 0096       |    |		Execute	Package,Entry
08b8 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
08b9 8027       | '  |		Call	0x0,0x27
08ba e005       |    |		Load	0x0,0x5
08bb 0007       |    |		Action	Break_Optional
08bc 00d8       |    |		Load_Top	At_Offset_0
08bd 0007       |    |		Action	Break_Optional
08be 4800       |H   |		Short_Literal	0x0
08bf 00db       |    |		Load_Top	At_Offset_3
08c0 482e       |H.  |		Short_Literal	0x2e
08c1 e02a       | *  |		Load	0x0,0x2a
08c2 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
08c3			BODY_08b0:
08c3 e405       |    |		Load	0x2,0x5
08c4 e602       |    |		Load	0x3,0x2
08c5 01dd       |    |		Execute	Vector,First
08c6 00da       |    |		Load_Top	At_Offset_2
08c7 0aff       |    |		Execute_Immediate	Plus,-0x1
08c8 e602       |    |		Load	0x3,0x2
08c9 01cf       |    |		Execute	Vector,Slice_Read
08ca 8013       |    |		Call	0x0,0x13
08cb 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
08cc e405       |    |		Load	0x2,0x5
08cd 00d9       |    |		Load_Top	At_Offset_1
08ce 0a01       |    |		Execute_Immediate	Plus,0x1
08cf 00d8       |    |		Load_Top	At_Offset_0
08d0 00e2       |    |		Load_Encached	Integer_Cache
08d1 0260       | `  |		Execute	Discrete,In_Type
08d2 7001       |p   |		Jump_Nonzero	0x8d4
08d3 0801       |    |		Execute_Immediate	Raise,0x1
08d4 e602       |    |		Load	0x3,0x2
08d5 01dc       |    |		Execute	Vector,Last
08d6 e602       |    |		Load	0x3,0x2
08d7 01cf       |    |		Execute	Vector,Slice_Read
08d8 8013       |    |		Call	0x0,0x13
08d9 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
08da 00da       |    |		Load_Top	At_Offset_2
08db a7fe       |    |		Store_Unchecked	0x3,-0x2
08dc 00d9       |    |		Load_Top	At_Offset_1
08dd a7fd       |    |		Store_Unchecked	0x3,-0x3
08de 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
08df			TRAP_08b0:
08df 010e       |    |		Execute	Exception,Is_Constraint_Error
08e0 6801       |h   |		Jump_Zero	0x8e2
08e1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
08e2 0100       |    |		Execute	Exception,Raise
08e3 0000 0000  |    |		.BLANK	0000[0x5]
08e8 ; --------------------------------------------------------------------------------------
08e8 ; SUBPROGRAM
08e8 ; --------------------------------------------------------------------------------------
08e8 08f0       |    |		.CONST	0x08f0								; Address of begin
08e9 0004       |    |		.CONST	0x0004								; Address of exception handler
08ea 0004       |    |		.CONST	0x0004								; Number of locals
08eb			INIT_08e8:
08eb e005       |    |		Load	0x0,0x5
08ec 0007       |    |		Action	Break_Optional
08ed 00d8       |    |		Load_Top	At_Offset_0
08ee 0007       |    |		Action	Break_Optional
08ef 00e1       |    |		Load_Encached	Boolean_Cache
08f0			BODY_08e8:
08f0 e005       |    |		Load	0x0,0x5
08f1 00d8       |    |		Load_Top	At_Offset_0
08f2 e7ff       |    |		Load	0x3,-0x1
08f3 8406       |    |		Call	0x2,0x6
08f4 c602       |    |		Store	0x3,0x2
08f5 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
08f6 00e1       |    |		Load_Encached	Boolean_Cache
08f7 e403       |    |		Load	0x2,0x3
08f8 e602       |    |		Load	0x3,0x2
08f9 e402       |    |		Load	0x2,0x2
08fa 8038       | 8  |		Call	0x0,0x38
08fb c403       |    |		Store	0x2,0x3
08fc 0059       | Y  |		Store_Top	Discrete,At_Offset_1
08fd 00d8       |    |		Load_Top	At_Offset_0
08fe 7011       |p   |		Jump_Nonzero	0x910
08ff 4800       |H   |		Short_Literal	0x0
0900 4802       |H   |		Short_Literal	0x2
0901 e021       | !  |		Load	0x0,0x21
0902 03ba       |    |		Declare_Variable	Access,By_Allocation,With_Constraint
0903 a403       |    |		Store_Unchecked	0x2,0x3
0904 e405       |    |		Load	0x2,0x5
0905 4800       |H   |		Short_Literal	0x0
0906 e602       |    |		Load	0x3,0x2
0907 8039       | 9  |		Call	0x0,0x39
0908 e403       |    |		Load	0x2,0x3
0909 0228       | (  |		Execute	Access,All_Write
090a e402       |    |		Load	0x2,0x2
090b 4800       |H   |		Short_Literal	0x0
090c e403       |    |		Load	0x2,0x3
090d e602       |    |		Load	0x3,0x2
090e 803a       | :  |		Call	0x0,0x3a
090f c402       |    |		Store	0x2,0x2
0910 e403       |    |		Load	0x2,0x3
0911 0229       | )  |		Execute	Access,All_Read
0912 00d8       |    |		Load_Top	At_Offset_0
0913 00db       |    |		Load_Top	At_Offset_3
0914 803b       | ;  |		Call	0x0,0x3b
0915 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0916 0000 0000  |    |		.XXX[0x2]
0918 ; --------------------------------------------------------------------------------------
0918 ; SUBPROGRAM
0918 ; --------------------------------------------------------------------------------------
0918 0921       | !  |		.CONST	0x0921								; Address of begin
0919 0004       |    |		.CONST	0x0004								; Address of exception handler
091a 0004       |    |		.CONST	0x0004								; Number of locals
091b			INIT_0918:
091b e03c       | <  |		Load	0x0,0x3c
091c 0322       | "  |		Declare_Variable	Record
091d 029f 0b5b  |   [|		Declare_Subprogram	INIT_0b58,For_Call
091f 029f 0b73  |   s|		Declare_Subprogram	INIT_0b70,For_Call
0921			BODY_0918:
0921 00da       |    |		Load_Top	At_Offset_2
0922 e402       |    |		Load	0x2,0x2
0923 803d       | =  |		Call	0x0,0x3d
0924 00d1       |    |		Pop_Control	Pop_Count_1
0925 e402       |    |		Load	0x2,0x2
0926 803e       | >  |		Call	0x0,0x3e
0927 0f01       |    |		Execute_Immediate	Equal,0x1
0928 6802       |h   |		Jump_Zero	0x92b
0929 8603       |    |		Call	0x3,0x3
092a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
092b 8604       |    |		Call	0x3,0x4
092c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
092d 0000 0000  |    |		.XXX[0x3]
092f 0000       |    |
0930 ; --------------------------------------------------------------------------------------
0930 ; SUBPROGRAM
0930 ; --------------------------------------------------------------------------------------
0930 093d       | =  |		.CONST	0x093d								; Address of begin
0931 0004       |    |		.CONST	0x0004								; Address of exception handler
0932 0002       |    |		.CONST	0x0002								; Number of locals
0933			INIT_0930:
0933 e00a       |    |		Load	0x0,0xa
0934 e246       | F  |		Load	0x1,0x46
0935 0098       |    |		Execute	Package,Field_Read_Dynamic
0936 0322       | "  |		Declare_Variable	Record
0937 e404       |    |		Load	0x2,0x4
0938 e029       | )  |		Load	0x0,0x29
0939 e246       | F  |		Load	0x1,0x46
093a 0096       |    |		Execute	Package,Entry
093b 00d9       |    |		Load_Top	At_Offset_1
093c 017d       | }  |		Execute	Record,Structure_Write
093d			BODY_0930:
093d 00d8       |    |		Load_Top	At_Offset_0
093e e01a       |    |		Load	0x0,0x1a
093f e246       | F  |		Load	0x1,0x46
0940 0096       |    |		Execute	Package,Entry
0941 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0942 0f03       |    |		Execute_Immediate	Equal,0x3
0943 6803       |h   |		Jump_Zero	0x947
0944 00d8       |    |		Load_Top	At_Offset_0
0945 8407       |    |		Call	0x2,0x7
0946 00d1       |    |		Pop_Control	Pop_Count_1
0947 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 0963       | c  |		.CONST	0x0963								; Address of begin
0949 0004       |    |		.CONST	0x0004								; Address of exception handler
094a 0006       |    |		.CONST	0x0006								; Number of locals
094b			INIT_0948:
094b e5ff       |    |		Load	0x2,-0x1
094c 0219       |    |		Execute	Heap_Access,All_Read
094d 0007       |    |		Action	Break_Optional
094e e5fe       |    |		Load	0x2,-0x2
094f 0219       |    |		Execute	Heap_Access,All_Read
0950 0007       |    |		Action	Break_Optional
0951 4801       |H   |		Short_Literal	0x1
0952 00da       |    |		Load_Top	At_Offset_2
0953 e019       |    |		Load	0x0,0x19
0954 e246       | F  |		Load	0x1,0x46
0955 0096       |    |		Execute	Package,Entry
0956 e026       | &  |		Load	0x0,0x26
0957 e246       | F  |		Load	0x1,0x46
0958 0096       |    |		Execute	Package,Entry
0959 4801       |H   |		Short_Literal	0x1
095a 00da       |    |		Load_Top	At_Offset_2
095b e019       |    |		Load	0x0,0x19
095c e246       | F  |		Load	0x1,0x46
095d 0096       |    |		Execute	Package,Entry
095e e026       | &  |		Load	0x0,0x26
095f e246       | F  |		Load	0x1,0x46
0960 0096       |    |		Execute	Package,Entry
0961 029f 0bd3  |    |		Declare_Subprogram	INIT_0bd0,For_Call
0963			BODY_0948:
0963 00da       |    |		Load_Top	At_Offset_2
0964 00da       |    |		Load_Top	At_Offset_2
0965 01df       |    |		Execute	Vector,Equal
0966 a402       |    |		Store_Unchecked	0x2,0x2
0967 e402       |    |		Load	0x2,0x2
0968 6801       |h   |		Jump_Zero	0x96a
0969 8606       |    |		Call	0x3,0x6
096a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
096b 0000 0000  |    |		.BLANK	0000[0x5]
0970 ; --------------------------------------------------------------------------------------
0970 ; SUBPROGRAM
0970 ; --------------------------------------------------------------------------------------
0970 0976       | v  |		.CONST	0x0976								; Address of begin
0971 0004       |    |		.CONST	0x0004								; Address of exception handler
0972 0002       |    |		.CONST	0x0002								; Number of locals
0973			INIT_0970:
0973 4801       |H   |		Short_Literal	0x1
0974 e23f       | ?  |		Load	0x1,0x3f
0975 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0976			BODY_0970:
0976 00d8       |    |		Load_Top	At_Offset_0
0977 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0978 e5fe       |    |		Load	0x2,-0x2
0979 e5ff       |    |		Load	0x2,-0x1
097a 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
097b 803f       | ?  |		Call	0x0,0x3f
097c 00d9       |    |		Load_Top	At_Offset_1
097d 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
097e 00d8       |    |		Load_Top	At_Offset_0
097f e5fd       |    |		Load	0x2,-0x3
0980 016d       | m  |		Execute	Variant_Record,Structure_Write
0981 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0982 0000 0000  |    |		.BLANK	0000[0x6]
0988 ; --------------------------------------------------------------------------------------
0988 ; SUBPROGRAM
0988 ; --------------------------------------------------------------------------------------
0988 0993       |    |		.CONST	0x0993								; Address of begin
0989 0004       |    |		.CONST	0x0004								; Address of exception handler
098a 0003       |    |		.CONST	0x0003								; Number of locals
098b			INIT_0988:
098b e5ff       |    |		Load	0x2,-0x1
098c 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
098d 00e0       |    |		Load_Encached	Standard_Cache
098e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
098f e5ff       |    |		Load	0x2,-0x1
0990 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0991 00e0       |    |		Load_Encached	Standard_Cache
0992 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0993			BODY_0988:
0993 4829       |H)  |		Short_Literal	0x29
0994 482f       |H/  |		Short_Literal	0x2f
0995 0092 0e66  |   f|		Action	Push_String_Extended,0xe66					; " ("
0997 e602       |    |		Load	0x3,0x2
0998 01dd       |    |		Execute	Vector,First
0999 0a01       |    |		Execute_Immediate	Plus,0x1
099a 00d8       |    |		Load_Top	At_Offset_0
099b 00e2       |    |		Load_Encached	Integer_Cache
099c 0260       | `  |		Execute	Discrete,In_Type
099d 7001       |p   |		Jump_Nonzero	0x99f
099e 0801       |    |		Execute_Immediate	Raise,0x1
099f e602       |    |		Load	0x3,0x2
09a0 01dc       |    |		Execute	Vector,Last
09a1 e602       |    |		Load	0x3,0x2
09a2 01cf       |    |		Execute	Vector,Slice_Read
09a3 01cc       |    |		Execute	Vector,Catenate
09a4 01cb       |    |		Execute	Vector,Append
09a5 00da       |    |		Load_Top	At_Offset_2
09a6 01dd       |    |		Execute	Vector,First
09a7 0a01       |    |		Execute_Immediate	Plus,0x1
09a8 00d8       |    |		Load_Top	At_Offset_0
09a9 00e2       |    |		Load_Encached	Integer_Cache
09aa 0260       | `  |		Execute	Discrete,In_Type
09ab 7001       |p   |		Jump_Nonzero	0x9ad
09ac 0801       |    |		Execute_Immediate	Raise,0x1
09ad 00db       |    |		Load_Top	At_Offset_3
09ae 01dc       |    |		Execute	Vector,Last
09af e603       |    |		Load	0x3,0x3
09b0 01cf       |    |		Execute	Vector,Slice_Read
09b1 01cc       |    |		Execute	Vector,Catenate
09b2 01cb       |    |		Execute	Vector,Append
09b3 00cb       |    |		Action	Pop_Block_With_Result
09b4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09b5 0000 0000  |    |		.XXX[0x3]
09b7 0000       |    |
09b8 ; --------------------------------------------------------------------------------------
09b8 ; SUBPROGRAM
09b8 ; --------------------------------------------------------------------------------------
09b8 09c1       |    |		.CONST	0x09c1								; Address of begin
09b9 0004       |    |		.CONST	0x0004								; Address of exception handler
09ba 0003       |    |		.CONST	0x0003								; Number of locals
09bb			INIT_09b8:
09bb 00da       |    |		Load_Top	At_Offset_2
09bc 01db       |    |		Execute	Vector,Length
09bd 00e2       |    |		Load_Encached	Integer_Cache
09be 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
09bf 029f 0c1b  |    |		Declare_Subprogram	INIT_0c18,For_Call
09c1			BODY_09b8:
09c1 00d9       |    |		Load_Top	At_Offset_1
09c2 0d50       | P  |		Execute_Immediate	Less,0x50
09c3 6802       |h   |		Jump_Zero	0x9c6
09c4 8603       |    |		Call	0x3,0x3
09c5 7802       |x   |		Jump	0x9c8
09c6 e7ff       |    |		Load	0x3,-0x1
09c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09c8 0831       | 1  |		Execute_Immediate	Raise,0x31
09c9 0000 0000  |    |		.BLANK	0000[0x7]
09d0 ; --------------------------------------------------------------------------------------
09d0 ; SUBPROGRAM
09d0 ; --------------------------------------------------------------------------------------
09d0 09d5       |    |		.CONST	0x09d5								; Address of begin
09d1 0004       |    |		.CONST	0x0004								; Address of exception handler
09d2 0002       |    |		.CONST	0x0002								; Number of locals
09d3			INIT_09d0:
09d3 e040       | @  |		Load	0x0,0x40
09d4 0007       |    |		Action	Break_Optional
09d5			BODY_09d0:
09d5 e040       | @  |		Load	0x0,0x40
09d6 e7ff       |    |		Load	0x3,-0x1
09d7 8041       | A  |		Call	0x0,0x41
09d8 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
09d9 00cf       |    |		Action	Mark_Auxiliary
09da 7810       |x   |		Jump	0x9eb
09db e7fe       |    |		Load	0x3,-0x2
09dc 00da       |    |		Load_Top	At_Offset_2
09dd 8042       | B  |		Call	0x0,0x42
09de 8043       | C  |		Call	0x0,0x43
09df 6807       |h   |		Jump_Zero	0x9e7
09e0 e7fe       |    |		Load	0x3,-0x2
09e1 e5fc       |    |		Load	0x2,-0x4
09e2 00db       |    |		Load_Top	At_Offset_3
09e3 8042       | B  |		Call	0x0,0x42
09e4 8044       | D  |		Call	0x0,0x44
09e5 c7fe       |    |		Store	0x3,-0x2
09e6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
09e7 00d9       |    |		Load_Top	At_Offset_1
09e8 8045       | E  |		Call	0x0,0x45
09e9 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
09ea 00c9       |    |		Action	Pop_Auxiliary_Loop
09eb 00d9       |    |		Load_Top	At_Offset_1
09ec 8046       | F  |		Call	0x0,0x46
09ed 6fed       |o   |		Jump_Zero	0x9db
09ee 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
09ef 0000       |    |		.XXX[0x1]
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 0a00       |    |		.CONST	0x0a00								; Address of begin
09f1 0004       |    |		.CONST	0x0004								; Address of exception handler
09f2 0008       |    |		.CONST	0x0008								; Number of locals
09f3			INIT_09f0:
09f3 e047       | G  |		Load	0x0,0x47
09f4 0007       |    |		Action	Break_Optional
09f5 e048       | H  |		Load	0x0,0x48
09f6 0322       | "  |		Declare_Variable	Record
09f7 00d8       |    |		Load_Top	At_Offset_0
09f8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09f9 00e1       |    |		Load_Encached	Boolean_Cache
09fa 03e9       |    |		Declare_Variable	Discrete,Duplicate
09fb 03e9       |    |		Declare_Variable	Discrete,Duplicate
09fc 029f 0c43  |   C|		Declare_Subprogram	INIT_0c40,For_Call
09fe 029f 0ceb  |    |		Declare_Subprogram	INIT_0ce8,For_Call
0a00			BODY_09f0:
0a00 e403       |    |		Load	0x2,0x3
0a01 e7ff       |    |		Load	0x3,-0x1
0a02 8049       | I  |		Call	0x0,0x49
0a03 0273       | s  |		Execute	Discrete,Plus
0a04 c403       |    |		Store	0x2,0x3
0a05 e404       |    |		Load	0x2,0x4
0a06 e7ff       |    |		Load	0x3,-0x1
0a07 804a       | J  |		Call	0x0,0x4a
0a08 0273       | s  |		Execute	Discrete,Plus
0a09 c404       |    |		Store	0x2,0x4
0a0a e047       | G  |		Load	0x0,0x47
0a0b e7ff       |    |		Load	0x3,-0x1
0a0c 804b       | K  |		Call	0x0,0x4b
0a0d c602       |    |		Store	0x3,0x2
0a0e 00cf       |    |		Action	Mark_Auxiliary
0a0f 7816       |x   |		Jump	0xa26
0a10 e602       |    |		Load	0x3,0x2
0a11 804c       | L  |		Call	0x0,0x4c
0a12 e603       |    |		Load	0x3,0x3
0a13 017d       | }  |		Execute	Record,Structure_Write
0a14 e603       |    |		Load	0x3,0x3
0a15 804d       | M  |		Call	0x0,0x4d
0a16 700b       |p   |		Jump_Nonzero	0xa22
0a17 e603       |    |		Load	0x3,0x3
0a18 804e       | N  |		Call	0x0,0x4e
0a19 a605       |    |		Store_Unchecked	0x3,0x5
0a1a e603       |    |		Load	0x3,0x3
0a1b 804f       | O  |		Call	0x0,0x4f
0a1c a606       |    |		Store_Unchecked	0x3,0x6
0a1d 00db       |    |		Load_Top	At_Offset_3
0a1e e605       |    |		Load	0x3,0x5
0a1f 0278       | x  |		Execute	Discrete,Or
0a20 6801       |h   |		Jump_Zero	0xa22
0a21 8607       |    |		Call	0x3,0x7
0a22 e602       |    |		Load	0x3,0x2
0a23 8050       | P  |		Call	0x0,0x50
0a24 c602       |    |		Store	0x3,0x2
0a25 00c9       |    |		Action	Pop_Auxiliary_Loop
0a26 e602       |    |		Load	0x3,0x2
0a27 8051       | Q  |		Call	0x0,0x51
0a28 6fe7       |o   |		Jump_Zero	0xa10
0a29 00ce       |    |		Action	Pop_Auxiliary
0a2a e7fd       |    |		Load	0x3,-0x3
0a2b 6801       |h   |		Jump_Zero	0xa2d
0a2c 8608       |    |		Call	0x3,0x8
0a2d 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0a2e 0000 0000  |    |		.XXX[0x2]
0a30 ; --------------------------------------------------------------------------------------
0a30 ; SUBPROGRAM
0a30 ; --------------------------------------------------------------------------------------
0a30 0a46       | F  |		.CONST	0x0a46								; Address of begin
0a31 0004       |    |		.CONST	0x0004								; Address of exception handler
0a32 000a       |    |		.CONST	0x000a								; Number of locals
0a33			INIT_0a30:
0a33 e040       | @  |		Load	0x0,0x40
0a34 0007       |    |		Action	Break_Optional
0a35 e035       | 5  |		Load	0x0,0x35
0a36 0007       |    |		Action	Break_Optional
0a37 4803       |H   |		Short_Literal	0x3
0a38 e23c       | <  |		Load	0x1,0x3c
0a39 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0a3a 00d8       |    |		Load_Top	At_Offset_0
0a3b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0a3c e00a       |    |		Load	0x0,0xa
0a3d e246       | F  |		Load	0x1,0x46
0a3e 0098       |    |		Execute	Package,Field_Read_Dynamic
0a3f 0322       | "  |		Declare_Variable	Record
0a40 00e3       |    |		Load_Encached	Natural_Cache
0a41 03e9       |    |		Declare_Variable	Discrete,Duplicate
0a42 03e9       |    |		Declare_Variable	Discrete,Duplicate
0a43 03e9       |    |		Declare_Variable	Discrete,Duplicate
0a44 029f 0d0b  |    |		Declare_Subprogram	INIT_0d08,For_Call
0a46			BODY_0a30:
0a46 e040       | @  |		Load	0x0,0x40
0a47 e402       |    |		Load	0x2,0x2
0a48 8041       | A  |		Call	0x0,0x41
0a49 c602       |    |		Store	0x3,0x2
0a4a 00cf       |    |		Action	Mark_Auxiliary
0a4b 7832       |x2  |		Jump	0xa7e
0a4c e602       |    |		Load	0x3,0x2
0a4d 8042       | B  |		Call	0x0,0x42
0a4e a603       |    |		Store_Unchecked	0x3,0x3
0a4f 4800       |H   |		Short_Literal	0x0
0a50 e604       |    |		Load	0x3,0x4
0a51 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a52 e605       |    |		Load	0x3,0x5
0a53 4802       |H   |		Short_Literal	0x2
0a54 e5fb       |    |		Load	0x2,-0x5
0a55 0219       |    |		Execute	Heap_Access,All_Read
0a56 e02f       | /  |		Load	0x0,0x2f
0a57 e246       | F  |		Load	0x1,0x46
0a58 0096       |    |		Execute	Package,Entry
0a59 00d1       |    |		Pop_Control	Pop_Count_1
0a5a e604       |    |		Load	0x3,0x4
0a5b e605       |    |		Load	0x3,0x5
0a5c e030       | 0  |		Load	0x0,0x30
0a5d e246       | F  |		Load	0x1,0x46
0a5e 0096       |    |		Execute	Package,Entry
0a5f e604       |    |		Load	0x3,0x4
0a60 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a61 0f00       |    |		Execute_Immediate	Equal,0x0
0a62 e605       |    |		Load	0x3,0x5
0a63 e052       | R  |		Load	0x0,0x52
0a64 e246       | F  |		Load	0x1,0x46
0a65 0096       |    |		Execute	Package,Entry
0a66 e603       |    |		Load	0x3,0x3
0a67 8053       | S  |		Call	0x0,0x53
0a68 a608       |    |		Store_Unchecked	0x3,0x8
0a69 e603       |    |		Load	0x3,0x3
0a6a 8054       | T  |		Call	0x0,0x54
0a6b 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0a6c e603       |    |		Load	0x3,0x3
0a6d 8055       | U  |		Call	0x0,0x55
0a6e a606       |    |		Store_Unchecked	0x3,0x6
0a6f e603       |    |		Load	0x3,0x3
0a70 8056       | V  |		Call	0x0,0x56
0a71 a607       |    |		Store_Unchecked	0x3,0x7
0a72 00cf       |    |		Action	Mark_Auxiliary
0a73 4803       |H   |		Short_Literal	0x3
0a74 4801       |H   |		Short_Literal	0x1
0a75 0007       |    |		Action	Break_Optional
0a76 860a       |    |		Call	0x3,0xa
0a77 00c8       |    |		Action	Pop_Auxiliary_Range
0a78 3ffd       |?   |		Loop_Increasing	0xa76
0a79 00ce       |    |		Action	Pop_Auxiliary
0a7a e602       |    |		Load	0x3,0x2
0a7b 8045       | E  |		Call	0x0,0x45
0a7c c602       |    |		Store	0x3,0x2
0a7d 00c9       |    |		Action	Pop_Auxiliary_Loop
0a7e e602       |    |		Load	0x3,0x2
0a7f 8046       | F  |		Call	0x0,0x46
0a80 6fcb       |o   |		Jump_Zero	0xa4c
0a81 00ce       |    |		Action	Pop_Auxiliary
0a82 4801       |H   |		Short_Literal	0x1
0a83 e5fb       |    |		Load	0x2,-0x5
0a84 821f       |    |		Call	0x1,0x1f
0a85 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a86 0000 0000  |    |		.XXX[0x2]
0a88 ; --------------------------------------------------------------------------------------
0a88 ; SUBPROGRAM
0a88 ; --------------------------------------------------------------------------------------
0a88 0a97       |    |		.CONST	0x0a97								; Address of begin
0a89 0004       |    |		.CONST	0x0004								; Address of exception handler
0a8a 0006       |    |		.CONST	0x0006								; Number of locals
0a8b			INIT_0a88:
0a8b e5ff       |    |		Load	0x2,-0x1
0a8c 8057       | W  |		Call	0x0,0x57
0a8d e058       | X  |		Load	0x0,0x58
0a8e 0007       |    |		Action	Break_Optional
0a8f e059       | Y  |		Load	0x0,0x59
0a90 0007       |    |		Action	Break_Optional
0a91 e05a       | Z  |		Load	0x0,0x5a
0a92 0322       | "  |		Declare_Variable	Record
0a93 00d8       |    |		Load_Top	At_Offset_0
0a94 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0a95 029f 0d9b  |    |		Declare_Subprogram	INIT_0d98,For_Call
0a97			BODY_0a88:
0a97 e5fc       |    |		Load	0x2,-0x4
0a98 805b       | [  |		Call	0x0,0x5b
0a99 a402       |    |		Store_Unchecked	0x2,0x2
0a9a 00cf       |    |		Action	Mark_Auxiliary
0a9b 7816       |x   |		Jump	0xab2
0a9c e405       |    |		Load	0x2,0x5
0a9d 680e       |h   |		Jump_Zero	0xaac
0a9e e408       |    |		Load	0x2,0x8
0a9f e5fc       |    |		Load	0x2,-0x4
0aa0 e602       |    |		Load	0x3,0x2
0aa1 0217       |    |		Execute	Heap_Access,All_Reference
0aa2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0aa3 805c       | \  |		Call	0x0,0x5c
0aa4 0092 0e62  |   b|		Action	Push_String_Extended,0xe62					; "."
0aa6 01cc       |    |		Execute	Vector,Catenate
0aa7 e406       |    |		Load	0x2,0x6
0aa8 805d       | ]  |		Call	0x0,0x5d
0aa9 01cc       |    |		Execute	Vector,Catenate
0aaa 805e       | ^  |		Call	0x0,0x5e
0aab c408       |    |		Store	0x2,0x8
0aac 8606       |    |		Call	0x3,0x6
0aad e602       |    |		Load	0x3,0x2
0aae 0217       |    |		Execute	Heap_Access,All_Reference
0aaf 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0ab0 a602       |    |		Store_Unchecked	0x3,0x2
0ab1 00c9       |    |		Action	Pop_Auxiliary_Loop
0ab2 e602       |    |		Load	0x3,0x2
0ab3 77e8       |w   |		Jump_Nonzero	0xa9c
0ab4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0ab5 0000 0000  |    |		.XXX[0x3]
0ab7 0000       |    |
0ab8 ; --------------------------------------------------------------------------------------
0ab8 ; SUBPROGRAM
0ab8 ; --------------------------------------------------------------------------------------
0ab8 0ac1       |    |		.CONST	0x0ac1								; Address of begin
0ab9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aba 0004       |    |		.CONST	0x0004								; Number of locals
0abb			INIT_0ab8:
0abb e5ff       |    |		Load	0x2,-0x1
0abc 805f       | _  |		Call	0x0,0x5f
0abd 029f 0dd3  |    |		Declare_Subprogram	INIT_0dd0,For_Call
0abf 029f 0de3  |    |		Declare_Subprogram	INIT_0de0,For_Call
0ac1			BODY_0ab8:
0ac1 8603       |    |		Call	0x3,0x3
0ac2 e405       |    |		Load	0x2,0x5
0ac3 6801       |h   |		Jump_Zero	0xac5
0ac4 8604       |    |		Call	0x3,0x4
0ac5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0ac6 0000 0000  |    |		.XXX[0x2]
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; SUBPROGRAM
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0add       |    |		.CONST	0x0add								; Address of begin
0ac9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aca 0003       |    |		.CONST	0x0003								; Number of locals
0acb			INIT_0ac8:
0acb e23f       | ?  |		Load	0x1,0x3f
0acc 02ff       |    |		Declare_Variable	Variant_Record
0acd 4802       |H   |		Short_Literal	0x2
0ace e403       |    |		Load	0x2,0x3
0acf e037       | 7  |		Load	0x0,0x37
0ad0 e246       | F  |		Load	0x1,0x46
0ad1 0096       |    |		Execute	Package,Entry
0ad2 00d9       |    |		Load_Top	At_Offset_1
0ad3 016d       | m  |		Execute	Variant_Record,Structure_Write
0ad4 e23f       | ?  |		Load	0x1,0x3f
0ad5 02ff       |    |		Declare_Variable	Variant_Record
0ad6 4803       |H   |		Short_Literal	0x3
0ad7 e403       |    |		Load	0x2,0x3
0ad8 e037       | 7  |		Load	0x0,0x37
0ad9 e246       | F  |		Load	0x1,0x46
0ada 0096       |    |		Execute	Package,Entry
0adb 00d9       |    |		Load_Top	At_Offset_1
0adc 016d       | m  |		Execute	Variant_Record,Structure_Write
0add			BODY_0ac8:
0add e5fe       |    |		Load	0x2,-0x2
0ade 6830       |h0  |		Jump_Zero	0xb0f
0adf 00d8       |    |		Load_Top	At_Offset_0
0ae0 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0ae1 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0ae2 6816       |h   |		Jump_Zero	0xaf9
0ae3 6070       |`p  |		Indirect_Literal	Discrete,0xb54,{0x00000000, 0x00320000}
0ae4 00d9       |    |		Load_Top	At_Offset_1
0ae5 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0ae6 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0ae7 0271       | q  |		Execute	Discrete,Times
0ae8 00d9       |    |		Load_Top	At_Offset_1
0ae9 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0aea 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0aeb 0270       | p  |		Execute	Discrete,Divide
0aec 00d8       |    |		Load_Top	At_Offset_0
0aed 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
0aee 7002       |p   |		Jump_Nonzero	0xaf1
0aef 6060       |``  |		Indirect_Literal	Discrete,0xb50,{0xffffffff, 0xffffc000}
0af0 7801       |x   |		Jump	0xaf2
0af1 605a       |`Z  |		Indirect_Literal	Discrete,0xb4c,{0x00000000, 0x00004000}
0af2 0273       | s  |		Execute	Discrete,Plus
0af3 09f1       |    |		Execute_Immediate	Binary_Scale,-0xf
0af4 00e3       |    |		Load_Encached	Natural_Cache
0af5 025e       | ^  |		Execute	Discrete,Convert
0af6 00da       |    |		Load_Top	At_Offset_2
0af7 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0af8 780b       |x   |		Jump	0xb04
0af9 00d8       |    |		Load_Top	At_Offset_0
0afa 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0afb 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0afc 7004       |p   |		Jump_Nonzero	0xb01
0afd 4865       |He  |		Short_Literal	0x65
0afe 00da       |    |		Load_Top	At_Offset_2
0aff 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0b00 7803       |x   |		Jump	0xb04
0b01 4800       |H   |		Short_Literal	0x0
0b02 00da       |    |		Load_Top	At_Offset_2
0b03 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0b04 00d8       |    |		Load_Top	At_Offset_0
0b05 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0b06 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b07 00d9       |    |		Load_Top	At_Offset_1
0b08 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0b09 00d8       |    |		Load_Top	At_Offset_0
0b0a 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0b0b 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0b0c 00d9       |    |		Load_Top	At_Offset_1
0b0d 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
0b0e 782f       |x/  |		Jump	0xb3e
0b0f 00d8       |    |		Load_Top	At_Offset_0
0b10 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0b11 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0b12 6816       |h   |		Jump_Zero	0xb29
0b13 6040       |`@  |		Indirect_Literal	Discrete,0xb54,{0x00000000, 0x00320000}
0b14 00d9       |    |		Load_Top	At_Offset_1
0b15 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0b16 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0b17 0271       | q  |		Execute	Discrete,Times
0b18 00d9       |    |		Load_Top	At_Offset_1
0b19 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0b1a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0b1b 0270       | p  |		Execute	Discrete,Divide
0b1c 00d8       |    |		Load_Top	At_Offset_0
0b1d 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
0b1e 7002       |p   |		Jump_Nonzero	0xb21
0b1f 6030       |`0  |		Indirect_Literal	Discrete,0xb50,{0xffffffff, 0xffffc000}
0b20 7801       |x   |		Jump	0xb22
0b21 602a       |`*  |		Indirect_Literal	Discrete,0xb4c,{0x00000000, 0x00004000}
0b22 0273       | s  |		Execute	Discrete,Plus
0b23 09f1       |    |		Execute_Immediate	Binary_Scale,-0xf
0b24 00e3       |    |		Load_Encached	Natural_Cache
0b25 025e       | ^  |		Execute	Discrete,Convert
0b26 00da       |    |		Load_Top	At_Offset_2
0b27 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0b28 780b       |x   |		Jump	0xb34
0b29 00d8       |    |		Load_Top	At_Offset_0
0b2a 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0b2b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0b2c 7004       |p   |		Jump_Nonzero	0xb31
0b2d 4865       |He  |		Short_Literal	0x65
0b2e 00da       |    |		Load_Top	At_Offset_2
0b2f 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0b30 7803       |x   |		Jump	0xb34
0b31 4800       |H   |		Short_Literal	0x0
0b32 00da       |    |		Load_Top	At_Offset_2
0b33 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0b34 00d8       |    |		Load_Top	At_Offset_0
0b35 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0b36 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0b37 00d9       |    |		Load_Top	At_Offset_1
0b38 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0b39 00d8       |    |		Load_Top	At_Offset_0
0b3a 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0b3b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0b3c 00d9       |    |		Load_Top	At_Offset_1
0b3d 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
0b3e 00d9       |    |		Load_Top	At_Offset_1
0b3f 4802       |H   |		Short_Literal	0x2
0b40 e403       |    |		Load	0x2,0x3
0b41 e060       | `  |		Load	0x0,0x60
0b42 e246       | F  |		Load	0x1,0x46
0b43 0096       |    |		Execute	Package,Entry
0b44 00d8       |    |		Load_Top	At_Offset_0
0b45 4803       |H   |		Short_Literal	0x3
0b46 e403       |    |		Load	0x2,0x3
0b47 e060       | `  |		Load	0x0,0x60
0b48 e246       | F  |		Load	0x1,0x46
0b49 0096       |    |		Execute	Package,Entry
0b4a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b4b 0000       |    |		.XXX[0x1]
0b4c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0b50 ffff ffff  |    |		.LITERAL	{0xffffffff, 0xffffc000}
0b54 0000 0000  |    |		.LITERAL	{0x00000000, 0x00320000}
0b58 ; --------------------------------------------------------------------------------------
0b58 ; SUBPROGRAM
0b58 ; --------------------------------------------------------------------------------------
0b58 0b5d       | ]  |		.CONST	0x0b5d								; Address of begin
0b59 0004       |    |		.CONST	0x0004								; Address of exception handler
0b5a 0002       |    |		.CONST	0x0002								; Number of locals
0b5b			INIT_0b58:
0b5b e021       | !  |		Load	0x0,0x21
0b5c 0007       |    |		Action	Break_Optional
0b5d			BODY_0b58:
0b5d e602       |    |		Load	0x3,0x2
0b5e 8061       | a  |		Call	0x0,0x61
0b5f e402       |    |		Load	0x2,0x2
0b60 8062       | b  |		Call	0x0,0x62
0b61 0039       | 9  |		Store_Top	Access,At_Offset_1
0b62 e405       |    |		Load	0x2,0x5
0b63 4802       |H   |		Short_Literal	0x2
0b64 8016       |    |		Call	0x0,0x16
0b65 e5fe       |    |		Load	0x2,-0x2
0b66 016d       | m  |		Execute	Variant_Record,Structure_Write
0b67 00d8       |    |		Load_Top	At_Offset_0
0b68 0227       | '  |		Execute	Access,All_Reference
0b69 e5fe       |    |		Load	0x2,-0x2
0b6a 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
0b6b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b6c 0000 0000  |    |		.BLANK	0000[0x4]
0b70 ; --------------------------------------------------------------------------------------
0b70 ; SUBPROGRAM
0b70 ; --------------------------------------------------------------------------------------
0b70 0b7e       | ~  |		.CONST	0x0b7e								; Address of begin
0b71 0004       |    |		.CONST	0x0004								; Address of exception handler
0b72 0005       |    |		.CONST	0x0005								; Number of locals
0b73			INIT_0b70:
0b73 e063       | c  |		Load	0x0,0x63
0b74 0007       |    |		Action	Break_Optional
0b75 e005       |    |		Load	0x0,0x5
0b76 0007       |    |		Action	Break_Optional
0b77 00d8       |    |		Load_Top	At_Offset_0
0b78 0007       |    |		Action	Break_Optional
0b79 e064       | d  |		Load	0x0,0x64
0b7a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0b7b 02c7       |    |		Declare_Variable	Any
0b7c 00d8       |    |		Load_Top	At_Offset_0
0b7d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0b7e			BODY_0b70:
0b7e e405       |    |		Load	0x2,0x5
0b7f 00ea       |    |		Load_Encached	Null_String_Cache
0b80 8013       |    |		Call	0x0,0x13
0b81 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0b82 e405       |    |		Load	0x2,0x5
0b83 8065       | e  |		Call	0x0,0x65
0b84 a802       |    |		Store_Unchecked	0x4,0x2
0b85 00db       |    |		Load_Top	At_Offset_3
0b86 00db       |    |		Load_Top	At_Offset_3
0b87 8066       | f  |		Call	0x0,0x66
0b88 c802       |    |		Store	0x4,0x2
0b89 00d8       |    |		Load_Top	At_Offset_0
0b8a e802       |    |		Load	0x4,0x2
0b8b 8067       | g  |		Call	0x0,0x67
0b8c c805       |    |		Store	0x4,0x5
0b8d 4801       |H   |		Short_Literal	0x1
0b8e 00d9       |    |		Load_Top	At_Offset_1
0b8f e064       | d  |		Load	0x0,0x64
0b90 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0b91 6805       |h   |		Jump_Zero	0xb97
0b92 801b       |    |		Call	0x0,0x1b
0b93 e5fe       |    |		Load	0x2,-0x2
0b94 016d       | m  |		Execute	Variant_Record,Structure_Write
0b95 00cc       |    |		Action	Pop_Block
0b96 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b97 00cf       |    |		Action	Mark_Auxiliary
0b98 780f       |x   |		Jump	0xba8
0b99 e602       |    |		Load	0x3,0x2
0b9a 8061       | a  |		Call	0x0,0x61
0b9b 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0b9c e802       |    |		Load	0x4,0x2
0b9d 00db       |    |		Load_Top	At_Offset_3
0b9e e402       |    |		Load	0x2,0x2
0b9f 8062       | b  |		Call	0x0,0x62
0ba0 0227       | '  |		Execute	Access,All_Reference
0ba1 e804       |    |		Load	0x4,0x4
0ba2 8068       | h  |		Call	0x0,0x68
0ba3 c802       |    |		Store	0x4,0x2
0ba4 e602       |    |		Load	0x3,0x2
0ba5 8069       | i  |		Call	0x0,0x69
0ba6 00d1       |    |		Pop_Control	Pop_Count_1
0ba7 00c9       |    |		Action	Pop_Auxiliary_Loop
0ba8 e602       |    |		Load	0x3,0x2
0ba9 806a       | j  |		Call	0x0,0x6a
0baa 6fee       |o   |		Jump_Zero	0xb99
0bab 00ce       |    |		Action	Pop_Auxiliary
0bac e405       |    |		Load	0x2,0x5
0bad 4801       |H   |		Short_Literal	0x1
0bae 8016       |    |		Call	0x0,0x16
0baf e5fe       |    |		Load	0x2,-0x2
0bb0 016d       | m  |		Execute	Variant_Record,Structure_Write
0bb1 e405       |    |		Load	0x2,0x5
0bb2 e802       |    |		Load	0x4,0x2
0bb3 806b       | k  |		Call	0x0,0x6b
0bb4 8013       |    |		Call	0x0,0x13
0bb5 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0bb6 00db       |    |		Load_Top	At_Offset_3
0bb7 806c       | l  |		Call	0x0,0x6c
0bb8 c802       |    |		Store	0x4,0x2
0bb9 00d8       |    |		Load_Top	At_Offset_0
0bba e802       |    |		Load	0x4,0x2
0bbb 8067       | g  |		Call	0x0,0x67
0bbc c805       |    |		Store	0x4,0x5
0bbd 4801       |H   |		Short_Literal	0x1
0bbe 00d9       |    |		Load_Top	At_Offset_1
0bbf e064       | d  |		Load	0x0,0x64
0bc0 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0bc1 6805       |h   |		Jump_Zero	0xbc7
0bc2 801b       |    |		Call	0x0,0x1b
0bc3 e5fe       |    |		Load	0x2,-0x2
0bc4 016d       | m  |		Execute	Variant_Record,Structure_Write
0bc5 00cc       |    |		Action	Pop_Block
0bc6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0bc7 00da       |    |		Load_Top	At_Offset_2
0bc8 e5fe       |    |		Load	0x2,-0x2
0bc9 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0bca 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0bcb 0000 0000  |    |		.BLANK	0000[0x5]
0bd0 ; --------------------------------------------------------------------------------------
0bd0 ; SUBPROGRAM
0bd0 ; --------------------------------------------------------------------------------------
0bd0 0beb       |    |		.CONST	0x0beb								; Address of begin
0bd1 0004       |    |		.CONST	0x0004								; Address of exception handler
0bd2 0004       |    |		.CONST	0x0004								; Number of locals
0bd3			INIT_0bd0:
0bd3 e00b       |    |		Load	0x0,0xb
0bd4 e246       | F  |		Load	0x1,0x46
0bd5 0098       |    |		Execute	Package,Field_Read_Dynamic
0bd6 0322       | "  |		Declare_Variable	Record
0bd7 4800       |H   |		Short_Literal	0x0
0bd8 e602       |    |		Load	0x3,0x2
0bd9 e022       | "  |		Load	0x0,0x22
0bda e246       | F  |		Load	0x1,0x46
0bdb 0096       |    |		Execute	Package,Entry
0bdc 00d9       |    |		Load_Top	At_Offset_1
0bdd 017d       | }  |		Execute	Record,Structure_Write
0bde e00b       |    |		Load	0x0,0xb
0bdf e246       | F  |		Load	0x1,0x46
0be0 0098       |    |		Execute	Package,Field_Read_Dynamic
0be1 0322       | "  |		Declare_Variable	Record
0be2 4800       |H   |		Short_Literal	0x0
0be3 e603       |    |		Load	0x3,0x3
0be4 e022       | "  |		Load	0x0,0x22
0be5 e246       | F  |		Load	0x1,0x46
0be6 0096       |    |		Execute	Package,Entry
0be7 00d9       |    |		Load_Top	At_Offset_1
0be8 017d       | }  |		Execute	Record,Structure_Write
0be9 029f 0e03  |    |		Declare_Subprogram	INIT_0e00,For_Call
0beb			BODY_0bd0:
0beb 00cf       |    |		Action	Mark_Auxiliary
0bec 780c       |x   |		Jump	0xbf9
0bed 8804       |    |		Call	0x4,0x4
0bee 00db       |    |		Load_Top	At_Offset_3
0bef e024       | $  |		Load	0x0,0x24
0bf0 e246       | F  |		Load	0x1,0x46
0bf1 0096       |    |		Execute	Package,Entry
0bf2 00d1       |    |		Pop_Control	Pop_Count_1
0bf3 00da       |    |		Load_Top	At_Offset_2
0bf4 e024       | $  |		Load	0x0,0x24
0bf5 e246       | F  |		Load	0x1,0x46
0bf6 0096       |    |		Execute	Package,Entry
0bf7 00d1       |    |		Pop_Control	Pop_Count_1
0bf8 00c9       |    |		Action	Pop_Auxiliary_Loop
0bf9 e402       |    |		Load	0x2,0x2
0bfa e802       |    |		Load	0x4,0x2
0bfb e025       | %  |		Load	0x0,0x25
0bfc e246       | F  |		Load	0x1,0x46
0bfd 0096       |    |		Execute	Package,Entry
0bfe 0f00       |    |		Execute_Immediate	Equal,0x0
0bff 0279       | y  |		Execute	Discrete,And
0c00 00db       |    |		Load_Top	At_Offset_3
0c01 e025       | %  |		Load	0x0,0x25
0c02 e246       | F  |		Load	0x1,0x46
0c03 0096       |    |		Execute	Package,Entry
0c04 0f00       |    |		Execute_Immediate	Equal,0x0
0c05 0279       | y  |		Execute	Discrete,And
0c06 77e6       |w   |		Jump_Nonzero	0xbed
0c07 00ce       |    |		Action	Pop_Auxiliary
0c08 00da       |    |		Load_Top	At_Offset_2
0c09 e025       | %  |		Load	0x0,0x25
0c0a e246       | F  |		Load	0x1,0x46
0c0b 0096       |    |		Execute	Package,Entry
0c0c 00da       |    |		Load_Top	At_Offset_2
0c0d e025       | %  |		Load	0x0,0x25
0c0e e246       | F  |		Load	0x1,0x46
0c0f 0096       |    |		Execute	Package,Entry
0c10 027e       | ~  |		Execute	Discrete,Not_Equal
0c11 6802       |h   |		Jump_Zero	0xc14
0c12 4800       |H   |		Short_Literal	0x0
0c13 a402       |    |		Store_Unchecked	0x2,0x2
0c14 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0c15 0000 0000  |    |		.XXX[0x3]
0c17 0000       |    |
0c18 ; --------------------------------------------------------------------------------------
0c18 ; SUBPROGRAM
0c18 ; --------------------------------------------------------------------------------------
0c18 0c34       | 4  |		.CONST	0x0c34								; Address of begin
0c19 0004       |    |		.CONST	0x0004								; Address of exception handler
0c1a 0003       |    |		.CONST	0x0003								; Number of locals
0c1b			INIT_0c18:
0c1b 4850       |HP  |		Short_Literal	0x50
0c1c e602       |    |		Load	0x3,0x2
0c1d 0272       | r  |		Execute	Discrete,Minus
0c1e 00e2       |    |		Load_Encached	Integer_Cache
0c1f 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0c20 4801       |H   |		Short_Literal	0x1
0c21 00d9       |    |		Load_Top	At_Offset_1
0c22 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
0c23 00e9       |    |		Load_Encached	String_Cache
0c24 035b       | [  |		Declare_Type	Array,Constrained
0c25 0337       | 7  |		Declare_Variable	Array
0c26 00d8       |    |		Load_Top	At_Offset_0
0c27 0335       | 5  |		Declare_Variable	Array,Duplicate
0c28 00cd       |    |		Action	Spare6_Action
0c29 00d9       |    |		Load_Top	At_Offset_1
0c2a 01d9       |    |		Execute	Vector,Reverse_Bounds
0c2b 0263       | c  |		Execute	Discrete,Above_Bound
0c2c 7005       |p   |		Jump_Nonzero	0xc32
0c2d 4820       |H   |		Short_Literal	0x20
0c2e 00d9       |    |		Load_Top	At_Offset_1
0c2f e804       |    |		Load	0x4,0x4
0c30 01d6       |    |		Execute	Vector,Field_Write
0c31 3ffb       |?   |		Loop_Increasing	0xc2d
0c32 00d9       |    |		Load_Top	At_Offset_1
0c33 01d4       |    |		Execute	Vector,Structure_Write
0c34			BODY_0c18:
0c34 00d8       |    |		Load_Top	At_Offset_0
0c35 e7ff       |    |		Load	0x3,-0x1
0c36 01cc       |    |		Execute	Vector,Catenate
0c37 00e9       |    |		Load_Encached	String_Cache
0c38 01c6       |    |		Execute	Vector,Convert_To_Formal
0c39 00cb       |    |		Action	Pop_Block_With_Result
0c3a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0c3b 0000 0000  |    |		.BLANK	0000[0x5]
0c40 ; --------------------------------------------------------------------------------------
0c40 ; SUBPROGRAM
0c40 ; --------------------------------------------------------------------------------------
0c40 0c4f       | O  |		.CONST	0x0c4f								; Address of begin
0c41 0004       |    |		.CONST	0x0004								; Address of exception handler
0c42 0007       |    |		.CONST	0x0007								; Number of locals
0c43			INIT_0c40:
0c43 e005       |    |		Load	0x0,0x5
0c44 0007       |    |		Action	Break_Optional
0c45 e06d       | m  |		Load	0x0,0x6d
0c46 0007       |    |		Action	Break_Optional
0c47 e005       |    |		Load	0x0,0x5
0c48 0007       |    |		Action	Break_Optional
0c49 e035       | 5  |		Load	0x0,0x35
0c4a 0007       |    |		Action	Break_Optional
0c4b e06e       | n  |		Load	0x0,0x6e
0c4c 0007       |    |		Action	Break_Optional
0c4d e5fc       |    |		Load	0x2,-0x4
0c4e 806f       | o  |		Call	0x0,0x6f
0c4f			BODY_0c40:
0c4f 00d9       |    |		Load_Top	At_Offset_1
0c50 e5fc       |    |		Load	0x2,-0x4
0c51 e603       |    |		Load	0x3,0x3
0c52 8070       | p  |		Call	0x0,0x70
0c53 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0c54 e06d       | m  |		Load	0x0,0x6d
0c55 e603       |    |		Load	0x3,0x3
0c56 8071       | q  |		Call	0x0,0x71
0c57 c803       |    |		Store	0x4,0x3
0c58 00cf       |    |		Action	Mark_Auxiliary
0c59 7889       |x   |		Jump	0xce3
0c5a e803       |    |		Load	0x4,0x3
0c5b 8072       | r  |		Call	0x0,0x72
0c5c a804       |    |		Store_Unchecked	0x4,0x4
0c5d e405       |    |		Load	0x2,0x5
0c5e 6815       |h   |		Jump_Zero	0xc74
0c5f e407       |    |		Load	0x2,0x7
0c60 8027       | '  |		Call	0x0,0x27
0c61 e02a       | *  |		Load	0x0,0x2a
0c62 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0c63 e804       |    |		Load	0x4,0x4
0c64 805c       | \  |		Call	0x0,0x5c
0c65 e02a       | *  |		Load	0x0,0x2a
0c66 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0c67 01df       |    |		Execute	Vector,Equal
0c68 6808       |h   |		Jump_Zero	0xc71
0c69 00db       |    |		Load_Top	At_Offset_3
0c6a e5fc       |    |		Load	0x2,-0x4
0c6b e408       |    |		Load	0x2,0x8
0c6c 8073       | s  |		Call	0x0,0x73
0c6d c805       |    |		Store	0x4,0x5
0c6e 4801       |H   |		Short_Literal	0x1
0c6f a604       |    |		Store_Unchecked	0x3,0x4
0c70 7816       |x   |		Jump	0xc87
0c71 4800       |H   |		Short_Literal	0x0
0c72 a604       |    |		Store_Unchecked	0x3,0x4
0c73 7813       |x   |		Jump	0xc87
0c74 e802       |    |		Load	0x4,0x2
0c75 e5fc       |    |		Load	0x2,-0x4
0c76 e7fe       |    |		Load	0x3,-0x2
0c77 805c       | \  |		Call	0x0,0x5c
0c78 0092 0e62  |   b|		Action	Push_String_Extended,0xe62					; "."
0c7a 01cc       |    |		Execute	Vector,Catenate
0c7b e804       |    |		Load	0x4,0x4
0c7c 805c       | \  |		Call	0x0,0x5c
0c7d 01cc       |    |		Execute	Vector,Catenate
0c7e 805e       | ^  |		Call	0x0,0x5e
0c7f c802       |    |		Store	0x4,0x2
0c80 00db       |    |		Load_Top	At_Offset_3
0c81 e5fc       |    |		Load	0x2,-0x4
0c82 e802       |    |		Load	0x4,0x2
0c83 8073       | s  |		Call	0x0,0x73
0c84 c805       |    |		Store	0x4,0x5
0c85 4801       |H   |		Short_Literal	0x1
0c86 a604       |    |		Store_Unchecked	0x3,0x4
0c87 e604       |    |		Load	0x3,0x4
0c88 6856       |hV  |		Jump_Zero	0xcdf
0c89 00db       |    |		Load_Top	At_Offset_3
0c8a e402       |    |		Load	0x2,0x2
0c8b 8074       | t  |		Call	0x0,0x74
0c8c 701c       |p   |		Jump_Nonzero	0xca9
0c8d e605       |    |		Load	0x3,0x5
0c8e 6805       |h   |		Jump_Zero	0xc94
0c8f 00db       |    |		Load_Top	At_Offset_3
0c90 e403       |    |		Load	0x2,0x3
0c91 4801       |H   |		Short_Literal	0x1
0c92 8075       | u  |		Call	0x0,0x75
0c93 c805       |    |		Store	0x4,0x5
0c94 e606       |    |		Load	0x3,0x6
0c95 6805       |h   |		Jump_Zero	0xc9b
0c96 00db       |    |		Load_Top	At_Offset_3
0c97 e404       |    |		Load	0x2,0x4
0c98 4801       |H   |		Short_Literal	0x1
0c99 8076       | v  |		Call	0x0,0x76
0c9a c805       |    |		Store	0x4,0x5
0c9b 00d9       |    |		Load_Top	At_Offset_1
0c9c 00db       |    |		Load_Top	At_Offset_3
0c9d 8077       | w  |		Call	0x0,0x77
0c9e 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0c9f 00db       |    |		Load_Top	At_Offset_3
0ca0 e5fc       |    |		Load	0x2,-0x4
0ca1 00db       |    |		Load_Top	At_Offset_3
0ca2 8078       | x  |		Call	0x0,0x78
0ca3 c805       |    |		Store	0x4,0x5
0ca4 e402       |    |		Load	0x2,0x2
0ca5 e805       |    |		Load	0x4,0x5
0ca6 8079       | y  |		Call	0x0,0x79
0ca7 c402       |    |		Store	0x2,0x2
0ca8 7836       |x6  |		Jump	0xcdf
0ca9 00db       |    |		Load_Top	At_Offset_3
0caa e402       |    |		Load	0x2,0x2
0cab 8409       |    |		Call	0x2,0x9
0cac c805       |    |		Store	0x4,0x5
0cad 00db       |    |		Load_Top	At_Offset_3
0cae 807a       | z  |		Call	0x0,0x7a
0caf 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0cb0 00da       |    |		Load_Top	At_Offset_2
0cb1 00da       |    |		Load_Top	At_Offset_2
0cb2 807b       | {  |		Call	0x0,0x7b
0cb3 702b       |p+  |		Jump_Nonzero	0xcdf
0cb4 00d9       |    |		Load_Top	At_Offset_1
0cb5 00db       |    |		Load_Top	At_Offset_3
0cb6 8077       | w  |		Call	0x0,0x77
0cb7 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0cb8 e605       |    |		Load	0x3,0x5
0cb9 680b       |h   |		Jump_Zero	0xcc5
0cba 00db       |    |		Load_Top	At_Offset_3
0cbb e805       |    |		Load	0x4,0x5
0cbc 8055       | U  |		Call	0x0,0x55
0cbd 0a01       |    |		Execute_Immediate	Plus,0x1
0cbe 00d8       |    |		Load_Top	At_Offset_0
0cbf 00e3       |    |		Load_Encached	Natural_Cache
0cc0 0260       | `  |		Execute	Discrete,In_Type
0cc1 7001       |p   |		Jump_Nonzero	0xcc3
0cc2 0801       |    |		Execute_Immediate	Raise,0x1
0cc3 807c       | |  |		Call	0x0,0x7c
0cc4 c805       |    |		Store	0x4,0x5
0cc5 e606       |    |		Load	0x3,0x6
0cc6 680b       |h   |		Jump_Zero	0xcd2
0cc7 00db       |    |		Load_Top	At_Offset_3
0cc8 e805       |    |		Load	0x4,0x5
0cc9 8053       | S  |		Call	0x0,0x53
0cca 0a01       |    |		Execute_Immediate	Plus,0x1
0ccb 00d8       |    |		Load_Top	At_Offset_0
0ccc 00e3       |    |		Load_Encached	Natural_Cache
0ccd 0260       | `  |		Execute	Discrete,In_Type
0cce 7001       |p   |		Jump_Nonzero	0xcd0
0ccf 0801       |    |		Execute_Immediate	Raise,0x1
0cd0 807d       | }  |		Call	0x0,0x7d
0cd1 c805       |    |		Store	0x4,0x5
0cd2 00db       |    |		Load_Top	At_Offset_3
0cd3 e5fc       |    |		Load	0x2,-0x4
0cd4 00db       |    |		Load_Top	At_Offset_3
0cd5 8078       | x  |		Call	0x0,0x78
0cd6 c805       |    |		Store	0x4,0x5
0cd7 e402       |    |		Load	0x2,0x2
0cd8 e805       |    |		Load	0x4,0x5
0cd9 807e       | ~  |		Call	0x0,0x7e
0cda c402       |    |		Store	0x2,0x2
0cdb e402       |    |		Load	0x2,0x2
0cdc e805       |    |		Load	0x4,0x5
0cdd 8079       | y  |		Call	0x0,0x79
0cde c402       |    |		Store	0x2,0x2
0cdf e803       |    |		Load	0x4,0x3
0ce0 807f       |    |		Call	0x0,0x7f
0ce1 c803       |    |		Store	0x4,0x3
0ce2 00c9       |    |		Action	Pop_Auxiliary_Loop
0ce3 e803       |    |		Load	0x4,0x3
0ce4 8080       |    |		Call	0x0,0x80
0ce5 6f74       |ot  |		Jump_Zero	0xc5a
0ce6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0ce7 0000       |    |		.XXX[0x1]
0ce8 ; --------------------------------------------------------------------------------------
0ce8 ; SUBPROGRAM
0ce8 ; --------------------------------------------------------------------------------------
0ce8 0cef       |    |		.CONST	0x0cef								; Address of begin
0ce9 0004       |    |		.CONST	0x0004								; Address of exception handler
0cea 0003       |    |		.CONST	0x0003								; Number of locals
0ceb			INIT_0ce8:
0ceb e040       | @  |		Load	0x0,0x40
0cec 0007       |    |		Action	Break_Optional
0ced e035       | 5  |		Load	0x0,0x35
0cee 0007       |    |		Action	Break_Optional
0cef			BODY_0ce8:
0cef e040       | @  |		Load	0x0,0x40
0cf0 e402       |    |		Load	0x2,0x2
0cf1 8041       | A  |		Call	0x0,0x41
0cf2 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0cf3 00cf       |    |		Action	Mark_Auxiliary
0cf4 780f       |x   |		Jump	0xd04
0cf5 00da       |    |		Load_Top	At_Offset_2
0cf6 8042       | B  |		Call	0x0,0x42
0cf7 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0cf8 00d9       |    |		Load_Top	At_Offset_1
0cf9 e403       |    |		Load	0x2,0x3
0cfa 8081       |    |		Call	0x0,0x81
0cfb 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0cfc 00d9       |    |		Load_Top	At_Offset_1
0cfd e404       |    |		Load	0x2,0x4
0cfe 8082       |    |		Call	0x0,0x82
0cff 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0d00 00da       |    |		Load_Top	At_Offset_2
0d01 8045       | E  |		Call	0x0,0x45
0d02 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0d03 00c9       |    |		Action	Pop_Auxiliary_Loop
0d04 00da       |    |		Load_Top	At_Offset_2
0d05 8046       | F  |		Call	0x0,0x46
0d06 6fee       |o   |		Jump_Zero	0xcf5
0d07 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0d08 ; --------------------------------------------------------------------------------------
0d08 ; SUBPROGRAM
0d08 ; --------------------------------------------------------------------------------------
0d08 0d0e       |    |		.CONST	0x0d0e								; Address of begin
0d09 0004       |    |		.CONST	0x0004								; Address of exception handler
0d0a 0002       |    |		.CONST	0x0002								; Number of locals
0d0b			INIT_0d08:
0d0b e60e       |    |		Load	0x3,0xe
0d0c e23f       | ?  |		Load	0x1,0x3f
0d0d 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0d0e			BODY_0d08:
0d0e 4803       |H   |		Short_Literal	0x3
0d0f 00d9       |    |		Load_Top	At_Offset_1
0d10 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0d11 e60e       |    |		Load	0x3,0xe
0d12 0aff       |    |		Execute_Immediate	Plus,-0x1
0d13 4602       |F   |		Jump_Case	0x3
0d14 7825       |x%  |		Jump	0xd3a								; case 0x0
0d15 782b       |x+  |		Jump	0xd41								; case 0x1
0d16 7800       |x   |		Jump	0xd17								; case 0x2
0d17 e23b       | ;  |		Load	0x1,0x3b
0d18 0322       | "  |		Declare_Variable	Record
0d19 e606       |    |		Load	0x3,0x6
0d1a 00d9       |    |		Load_Top	At_Offset_1
0d1b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0d1c e607       |    |		Load	0x3,0x7
0d1d 00d9       |    |		Load_Top	At_Offset_1
0d1e 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0d1f e608       |    |		Load	0x3,0x8
0d20 00d9       |    |		Load_Top	At_Offset_1
0d21 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0d22 e609       |    |		Load	0x3,0x9
0d23 00d9       |    |		Load_Top	At_Offset_1
0d24 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0d25 00d9       |    |		Load_Top	At_Offset_1
0d26 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
0d27 e5fd       |    |		Load	0x2,-0x3
0d28 7007       |p   |		Jump_Nonzero	0xd30
0d29 e606       |    |		Load	0x3,0x6
0d2a 00d9       |    |		Load_Top	At_Offset_1
0d2b 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0d2c e607       |    |		Load	0x3,0x7
0d2d 00d9       |    |		Load_Top	At_Offset_1
0d2e 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
0d2f 7851       |xQ  |		Jump	0xd81
0d30 e5fd       |    |		Load	0x2,-0x3
0d31 0f01       |    |		Execute_Immediate	Equal,0x1
0d32 684e       |hN  |		Jump_Zero	0xd81
0d33 e608       |    |		Load	0x3,0x8
0d34 00d9       |    |		Load_Top	At_Offset_1
0d35 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0d36 e609       |    |		Load	0x3,0x9
0d37 00d9       |    |		Load_Top	At_Offset_1
0d38 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
0d39 7847       |xG  |		Jump	0xd81
0d3a e5fc       |    |		Load	0x2,-0x4
0d3b e603       |    |		Load	0x3,0x3
0d3c 805d       | ]  |		Call	0x0,0x5d
0d3d 8013       |    |		Call	0x0,0x13
0d3e 00d9       |    |		Load_Top	At_Offset_1
0d3f 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0d40 7840       |x@  |		Jump	0xd81
0d41 e5fd       |    |		Load	0x2,-0x3
0d42 701e       |p   |		Jump_Nonzero	0xd61
0d43 e607       |    |		Load	0x3,0x7
0d44 6812       |h   |		Jump_Zero	0xd57
0d45 604a       |`J  |		Indirect_Literal	Discrete,0xd90,{0x00000000, 0x00320000}
0d46 e606       |    |		Load	0x3,0x6
0d47 0271       | q  |		Execute	Discrete,Times
0d48 e607       |    |		Load	0x3,0x7
0d49 0270       | p  |		Execute	Discrete,Divide
0d4a 00d8       |    |		Load_Top	At_Offset_0
0d4b 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
0d4c 7002       |p   |		Jump_Nonzero	0xd4f
0d4d 603e       |`>  |		Indirect_Literal	Discrete,0xd8c,{0xffffffff, 0xffffc000}
0d4e 7801       |x   |		Jump	0xd50
0d4f 6038       |`8  |		Indirect_Literal	Discrete,0xd88,{0x00000000, 0x00004000}
0d50 0273       | s  |		Execute	Discrete,Plus
0d51 09f1       |    |		Execute_Immediate	Binary_Scale,-0xf
0d52 00e3       |    |		Load_Encached	Natural_Cache
0d53 025e       | ^  |		Execute	Discrete,Convert
0d54 00d9       |    |		Load_Top	At_Offset_1
0d55 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0d56 782a       |x*  |		Jump	0xd81
0d57 e606       |    |		Load	0x3,0x6
0d58 7004       |p   |		Jump_Nonzero	0xd5d
0d59 4865       |He  |		Short_Literal	0x65
0d5a 00d9       |    |		Load_Top	At_Offset_1
0d5b 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0d5c 7824       |x$  |		Jump	0xd81
0d5d 4800       |H   |		Short_Literal	0x0
0d5e 00d9       |    |		Load_Top	At_Offset_1
0d5f 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0d60 7820       |x   |		Jump	0xd81
0d61 e5fd       |    |		Load	0x2,-0x3
0d62 0f01       |    |		Execute_Immediate	Equal,0x1
0d63 681d       |h   |		Jump_Zero	0xd81
0d64 e609       |    |		Load	0x3,0x9
0d65 6812       |h   |		Jump_Zero	0xd78
0d66 6029       |`)  |		Indirect_Literal	Discrete,0xd90,{0x00000000, 0x00320000}
0d67 e608       |    |		Load	0x3,0x8
0d68 0271       | q  |		Execute	Discrete,Times
0d69 e609       |    |		Load	0x3,0x9
0d6a 0270       | p  |		Execute	Discrete,Divide
0d6b 00d8       |    |		Load_Top	At_Offset_0
0d6c 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
0d6d 7002       |p   |		Jump_Nonzero	0xd70
0d6e 601d       |`   |		Indirect_Literal	Discrete,0xd8c,{0xffffffff, 0xffffc000}
0d6f 7801       |x   |		Jump	0xd71
0d70 6017       |`   |		Indirect_Literal	Discrete,0xd88,{0x00000000, 0x00004000}
0d71 0273       | s  |		Execute	Discrete,Plus
0d72 09f1       |    |		Execute_Immediate	Binary_Scale,-0xf
0d73 00e3       |    |		Load_Encached	Natural_Cache
0d74 025e       | ^  |		Execute	Discrete,Convert
0d75 00d9       |    |		Load_Top	At_Offset_1
0d76 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0d77 7809       |x   |		Jump	0xd81
0d78 e608       |    |		Load	0x3,0x8
0d79 7004       |p   |		Jump_Nonzero	0xd7e
0d7a 4865       |He  |		Short_Literal	0x65
0d7b 00d9       |    |		Load_Top	At_Offset_1
0d7c 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0d7d 7803       |x   |		Jump	0xd81
0d7e 4800       |H   |		Short_Literal	0x0
0d7f 00d9       |    |		Load_Top	At_Offset_1
0d80 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0d81 00d8       |    |		Load_Top	At_Offset_0
0d82 e60e       |    |		Load	0x3,0xe
0d83 e605       |    |		Load	0x3,0x5
0d84 e060       | `  |		Load	0x0,0x60
0d85 e246       | F  |		Load	0x1,0x46
0d86 0096       |    |		Execute	Package,Entry
0d87 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0d88 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0d8c ffff ffff  |    |		.LITERAL	{0xffffffff, 0xffffc000}
0d90 0000 0000  |    |		.LITERAL	{0x00000000, 0x00320000}
0d94 0000 0000  |    |		.BLANK	0000[0x4]
0d98 ; --------------------------------------------------------------------------------------
0d98 ; SUBPROGRAM
0d98 ; --------------------------------------------------------------------------------------
0d98 0d9d       |    |		.CONST	0x0d9d								; Address of begin
0d99 0dc5       |    |		.CONST	0x0dc5								; Address of exception handler
0d9a 0002       |    |		.CONST	0x0002								; Number of locals
0d9b			INIT_0d98:
0d9b 029f 0e1b  |    |		Declare_Subprogram	INIT_0e18,For_Call
0d9d			BODY_0d98:
0d9d 4800       |H   |		Short_Literal	0x0
0d9e a403       |    |		Store_Unchecked	0x2,0x3
0d9f 4800       |H   |		Short_Literal	0x0
0da0 a404       |    |		Store_Unchecked	0x2,0x4
0da1 e5fc       |    |		Load	0x2,-0x4
0da2 e5ff       |    |		Load	0x2,-0x1
0da3 802e       | .  |		Call	0x0,0x2e
0da4 8013       |    |		Call	0x0,0x13
0da5 e602       |    |		Load	0x3,0x2
0da6 0217       |    |		Execute	Heap_Access,All_Reference
0da7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0da8 8083       |    |		Call	0x0,0x83
0da9 a603       |    |		Store_Unchecked	0x3,0x3
0daa e5fc       |    |		Load	0x2,-0x4
0dab e5ff       |    |		Load	0x2,-0x1
0dac 802c       | ,  |		Call	0x0,0x2c
0dad 8013       |    |		Call	0x0,0x13
0dae e603       |    |		Load	0x3,0x3
0daf 8084       |    |		Call	0x0,0x84
0db0 a604       |    |		Store_Unchecked	0x3,0x4
0db1 e5fe       |    |		Load	0x2,-0x2
0db2 0f01       |    |		Execute_Immediate	Equal,0x1
0db3 6802       |h   |		Jump_Zero	0xdb6
0db4 8802       |    |		Call	0x4,0x2
0db5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0db6 e5fc       |    |		Load	0x2,-0x4
0db7 e5ff       |    |		Load	0x2,-0x1
0db8 802d       | -  |		Call	0x0,0x2d
0db9 8013       |    |		Call	0x0,0x13
0dba e604       |    |		Load	0x3,0x4
0dbb 8085       |    |		Call	0x0,0x85
0dbc e605       |    |		Load	0x3,0x5
0dbd 017d       | }  |		Execute	Record,Structure_Write
0dbe 4800       |H   |		Short_Literal	0x0
0dbf e602       |    |		Load	0x3,0x2
0dc0 0217       |    |		Execute	Heap_Access,All_Reference
0dc1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0dc2 e605       |    |		Load	0x3,0x5
0dc3 840a       |    |		Call	0x2,0xa
0dc4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0dc5			TRAP_0d98:
0dc5 e086       |    |		Load	0x0,0x86
0dc6 010f       |    |		Execute	Exception,Equal
0dc7 7006       |p   |		Jump_Nonzero	0xdce
0dc8 e087       |    |		Load	0x0,0x87
0dc9 010f       |    |		Execute	Exception,Equal
0dca 7003       |p   |		Jump_Nonzero	0xdce
0dcb e088       |    |		Load	0x0,0x88
0dcc 010f       |    |		Execute	Exception,Equal
0dcd 6801       |h   |		Jump_Zero	0xdcf
0dce 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0dcf 0100       |    |		Execute	Exception,Raise
0dd0 ; --------------------------------------------------------------------------------------
0dd0 ; SUBPROGRAM
0dd0 ; --------------------------------------------------------------------------------------
0dd0 0dd3       |    |		.CONST	0x0dd3								; Address of begin
0dd1 0dd8       |    |		.CONST	0x0dd8								; Address of exception handler
0dd2 0001       |    |		.CONST	0x0001								; Number of locals
0dd3			BODY_0dd0:
0dd3			INIT_0dd0:
0dd3 e602       |    |		Load	0x3,0x2
0dd4 8089       |    |		Call	0x0,0x89
0dd5 0f00       |    |		Execute_Immediate	Equal,0x0
0dd6 a405       |    |		Store_Unchecked	0x2,0x5
0dd7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0dd8			TRAP_0dd0:
0dd8 010e       |    |		Execute	Exception,Is_Constraint_Error
0dd9 6803       |h   |		Jump_Zero	0xddd
0dda 4800       |H   |		Short_Literal	0x0
0ddb a405       |    |		Store_Unchecked	0x2,0x5
0ddc 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0ddd 0100       |    |		Execute	Exception,Raise
0dde 0000 0000  |    |		.XXX[0x2]
0de0 ; --------------------------------------------------------------------------------------
0de0 ; SUBPROGRAM
0de0 ; --------------------------------------------------------------------------------------
0de0 0de5       |    |		.CONST	0x0de5								; Address of begin
0de1 0004       |    |		.CONST	0x0004								; Address of exception handler
0de2 0002       |    |		.CONST	0x0002								; Number of locals
0de3			INIT_0de0:
0de3 e040       | @  |		Load	0x0,0x40
0de4 0007       |    |		Action	Break_Optional
0de5			BODY_0de0:
0de5 e040       | @  |		Load	0x0,0x40
0de6 e602       |    |		Load	0x3,0x2
0de7 8041       | A  |		Call	0x0,0x41
0de8 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0de9 00d8       |    |		Load_Top	At_Offset_0
0dea 8046       | F  |		Call	0x0,0x46
0deb 700a       |p   |		Jump_Nonzero	0xdf6
0dec 00d8       |    |		Load_Top	At_Offset_0
0ded 8042       | B  |		Call	0x0,0x42
0dee a406       |    |		Store_Unchecked	0x2,0x6
0def e5fc       |    |		Load	0x2,-0x4
0df0 00d9       |    |		Load_Top	At_Offset_1
0df1 8042       | B  |		Call	0x0,0x42
0df2 805d       | ]  |		Call	0x0,0x5d
0df3 8013       |    |		Call	0x0,0x13
0df4 a407       |    |		Store_Unchecked	0x2,0x7
0df5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0df6 4800       |H   |		Short_Literal	0x0
0df7 a405       |    |		Store_Unchecked	0x2,0x5
0df8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0df9 0000 0000  |    |		.BLANK	0000[0x7]
0e00 ; --------------------------------------------------------------------------------------
0e00 ; SUBPROGRAM
0e00 ; --------------------------------------------------------------------------------------
0e00 0e11       |    |		.CONST	0x0e11								; Address of begin
0e01 0004       |    |		.CONST	0x0004								; Address of exception handler
0e02 0003       |    |		.CONST	0x0003								; Number of locals
0e03			INIT_0e00:
0e03 e802       |    |		Load	0x4,0x2
0e04 e029       | )  |		Load	0x0,0x29
0e05 e246       | F  |		Load	0x1,0x46
0e06 0096       |    |		Execute	Package,Entry
0e07 e026       | &  |		Load	0x0,0x26
0e08 e246       | F  |		Load	0x1,0x46
0e09 0096       |    |		Execute	Package,Entry
0e0a e803       |    |		Load	0x4,0x3
0e0b e029       | )  |		Load	0x0,0x29
0e0c e246       | F  |		Load	0x1,0x46
0e0d 0096       |    |		Execute	Package,Entry
0e0e e026       | &  |		Load	0x0,0x26
0e0f e246       | F  |		Load	0x1,0x46
0e10 0096       |    |		Execute	Package,Entry
0e11			BODY_0e00:
0e11 00d9       |    |		Load_Top	At_Offset_1
0e12 00d9       |    |		Load_Top	At_Offset_1
0e13 01df       |    |		Execute	Vector,Equal
0e14 a402       |    |		Store_Unchecked	0x2,0x2
0e15 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0e16 0000 0000  |    |		.XXX[0x2]
0e18 ; --------------------------------------------------------------------------------------
0e18 ; SUBPROGRAM
0e18 ; --------------------------------------------------------------------------------------
0e18 0e1e       |    |		.CONST	0x0e1e								; Address of begin
0e19 0004       |    |		.CONST	0x0004								; Address of exception handler
0e1a 0003       |    |		.CONST	0x0003								; Number of locals
0e1b			INIT_0e18:
0e1b e08a       |    |		Load	0x0,0x8a
0e1c 0007       |    |		Action	Break_Optional
0e1d 00e1       |    |		Load_Encached	Boolean_Cache
0e1e			BODY_0e18:
0e1e e08a       |    |		Load	0x0,0x8a
0e1f e604       |    |		Load	0x3,0x4
0e20 808b       |    |		Call	0x0,0x8b
0e21 003a       | :  |		Store_Top	Access,At_Offset_2
0e22 4800       |H   |		Short_Literal	0x0
0e23 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0e24 00cf       |    |		Action	Mark_Auxiliary
0e25 7812       |x   |		Jump	0xe38
0e26 00da       |    |		Load_Top	At_Offset_2
0e27 808c       |    |		Call	0x0,0x8c
0e28 e604       |    |		Load	0x3,0x4
0e29 8085       |    |		Call	0x0,0x85
0e2a e605       |    |		Load	0x3,0x5
0e2b 017d       | }  |		Execute	Record,Structure_Write
0e2c 00d9       |    |		Load_Top	At_Offset_1
0e2d e602       |    |		Load	0x3,0x2
0e2e 0217       |    |		Execute	Heap_Access,All_Reference
0e2f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0e30 e605       |    |		Load	0x3,0x5
0e31 840a       |    |		Call	0x2,0xa
0e32 00da       |    |		Load_Top	At_Offset_2
0e33 808d       |    |		Call	0x0,0x8d
0e34 003b       | ;  |		Store_Top	Access,At_Offset_3
0e35 4801       |H   |		Short_Literal	0x1
0e36 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0e37 00c9       |    |		Action	Pop_Auxiliary_Loop
0e38 00da       |    |		Load_Top	At_Offset_2
0e39 808e       |    |		Call	0x0,0x8e
0e3a 6feb       |o   |		Jump_Zero	0xe26
0e3b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0e3c ; --------------------------------------------------------------------------------------
0e3c ; STRING TABLE
0e3c ; --------------------------------------------------------------------------------------
0e3c 0058       | X  |		.STRTAB	0x0058->0x0e68							; "WORLD"
0e3d 005b       | [  |		.STRTAB	0x005b->0x0e6a							; "UNIT"
0e3e 005d       | ]  |		.STRTAB	0x005d->0x0e6c							; "SUBPROGRAM"
0e3f 0065       | e  |		.STRTAB	0x0065->0x0e71							; "NONE"
0e40 0067       | g  |		.STRTAB	0x0067->0x0e73							; "ALPHABETIC"
0e41 006f       | o  |		.STRTAB	0x006f->0x0e78							; "REVERSE_ALPHABETIC"
0e42 007f       |    |		.STRTAB	0x007f->0x0e81							; "COVERAGE"
0e43 0085       |    |		.STRTAB	0x0085->0x0e85							; "REVERSE_COVERAGE"
0e44 0093       |    |		.STRTAB	0x0093->0x0e8d							; "NIL_COL"
0e45 0098       |    |		.STRTAB	0x0098->0x0e91							; "NAME_COL"
0e46 009e       |    |		.STRTAB	0x009e->0x0e95							; "PERCENT_COL"
0e47 00a7       |    |		.STRTAB	0x00a7->0x0e9a							; "COVERAGE_COL"
0e48 00b1       |    |		.STRTAB	0x00b1->0x0ea0							; "SEGMENT"
0e49 00b6       |    |		.STRTAB	0x00b6->0x0ea4							; "DECISION"
0e4a 00bc       |    |		.STRTAB	0x00bc->0x0ea8							; "NIL_ROW"
0e4b 00c1       |    |		.STRTAB	0x00c1->0x0eab							; "TABLE_TITLE_ROW"
0e4c 00ce       |    |		.STRTAB	0x00ce->0x0eb3							; "COLUMN_TITLE_ROW"
0e4d 00dc       |    |		.STRTAB	0x00dc->0x0ebb							; "TEST_CASE_ROW"
0e4e 00e7       |    |		.STRTAB	0x00e7->0x0ec1							; " "
0e4f 00e6       |    |		.STRTAB	0x00e6->0x0ec2							; "    TEST CASE"
0e50 00f1       |    |		.STRTAB	0x00f1->0x0ec8							; " COVERAGE"
0e51 00f8       |    |		.STRTAB	0x00f8->0x0ecd							; "  % COV"
0e52 00fd       |    |		.STRTAB	0x00fd->0x0ed0							; "Test Case Coverage for "
0e53 0112       |    |		.STRTAB	0x0112->0x0edc							; "Explain"
0e54 0117       |    |		.STRTAB	0x0117->0x0edf							; "Definition not supported on this "
0e55 0136       | 6  |		.STRTAB	0x0136->0x0ef0							; "Definition not supported at this position"
0e56 015d       | ]  |		.STRTAB	0x015d->0x0f04							; "Elide"
0e57 0160       | `  |		.STRTAB	0x0160->0x0f07							; "Expand"
0e58 0164       | d  |		.STRTAB	0x0164->0x0f0a							; "Promote"
0e59 0169       | i  |		.STRTAB	0x0169->0x0f0d							; "Demote"
0e5a 016d       | m  |		.STRTAB	0x016d->0x0f10							; "Delete requires a selected line"
0e5b 018a       |    |		.STRTAB	0x018a->0x0f20							; "No operation defined for value "
0e5c 01a7       |    |		.STRTAB	0x01a7->0x0f2f							; "Filter"
0e5d 01ab       |    |		.STRTAB	0x01ab->0x0f32							; "Show_Differential"
0e5e 01ba       |    |		.STRTAB	0x01ba->0x0f3b							; "Generate_Test_Set"
0e5f 01c9       |    |		.STRTAB	0x01c9->0x0f43							; "S by "
0e60 01cc       |    |		.STRTAB	0x01cc->0x0f46							; "  "
0e61 01cc       |    |		.STRTAB	0x01cc->0x0f47							; "   -"
0e62 01ce       |    |		.STRTAB	0x01ce->0x0f49							; "."
0e63 01cd       |    |		.STRTAB	0x01cd->0x0f49							; "Explanation of world coverage by test case"
0e64 01f5       |    |		.STRTAB	0x01f5->0x0f5e							; "Deletion is not supported for coverage explanation images"
0e65 022c       | ,  |		.STRTAB	0x022c->0x0f7b							; "Delete not defined for this line"
0e66 024a       | J  |		.STRTAB	0x024a->0x0f8b							; " ("
0e67 024a       | J  |		.STREND 0x024a->0x0f8c
0e68 574f 524c  |WORL|		.STRTAB_STRINGS
0f8c 0000 0000  |    |		.BLANK	0000[0x4]
0f90 ; --------------------------------------------------------------------------------------
0f90 ; Debug Table
0f90 ; --------------------------------------------------------------------------------------
0f90 0004 000a  |    |		.DEBUG4	0x0004,0x000a,0x764c,0x0000,0x0001,0x0000
0f96 0000 0000  |    |		.BLANK	0000[0x6a]