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

⟦430e45a75⟧

    Length: 9216 (0x2400)
    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 1080       |    |		.CONST	0x1080								; 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 0280       |    |		.CONST	0x0280								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 005a       | Z  |		.CONST	0x005a								; Number of locals
000b			INIT_0008:
000b 4800       |H   |		Short_Literal	0x0
000c 480f       |H   |		Short_Literal	0xf
000d 029f 028b  |    |		Declare_Subprogram	INIT_0288,For_Call
000f 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0010 00c4       |    |		Action	Make_Default
0011 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated
0013 029a 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call,Visible,Unelaborated
0015 029a 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call,Visible,Unelaborated
0017 029a 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Outer_Call,Visible,Unelaborated
0019 029a 03cb  |    |		Declare_Subprogram	INIT_03c8,For_Outer_Call,Visible,Unelaborated
001b 029a 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call,Visible,Unelaborated
001d 029a 03e3  |    |		Declare_Subprogram	INIT_03e0,For_Outer_Call,Visible,Unelaborated
001f 029a 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Outer_Call,Visible,Unelaborated
0021 029a 03f3  |    |		Declare_Subprogram	INIT_03f0,For_Outer_Call,Visible,Unelaborated
0023 029a 042b  |   +|		Declare_Subprogram	INIT_0428,For_Outer_Call,Visible,Unelaborated
0025 029a 0493  |    |		Declare_Subprogram	INIT_0490,For_Outer_Call,Visible,Unelaborated
0027 029a 049b  |    |		Declare_Subprogram	INIT_0498,For_Outer_Call,Visible,Unelaborated
0029 029a 04f3  |    |		Declare_Subprogram	INIT_04f0,For_Outer_Call,Visible,Unelaborated
002b 029a 055b  |   [|		Declare_Subprogram	INIT_0558,For_Outer_Call,Visible,Unelaborated
002d 029a 05a3  |    |		Declare_Subprogram	INIT_05a0,For_Outer_Call,Visible,Unelaborated
002f 029a 05e3  |    |		Declare_Subprogram	INIT_05e0,For_Outer_Call,Visible,Unelaborated
0031 e20d       |    |		Load	0x1,0xd
0032 4808       |H   |		Short_Literal	0x8
0033 4800       |H   |		Short_Literal	0x0
0034 4801       |H   |		Short_Literal	0x1
0035 4815       |H   |		Short_Literal	0x15
0036 0319       |    |		Declare_Type	Variant_Record,Incomplete,Visible
0037 029f 05eb  |    |		Declare_Subprogram	INIT_05e8,For_Call
0039 00d9       |    |		Load_Top	At_Offset_1
003a 012a       | *  |		Execute	Any,Change_Utility
003b 0007       |    |		Action	Break_Optional
003c 00d8       |    |		Load_Top	At_Offset_0
003d 02a0       |    |		Declare_Subprogram	Null_Subprogram
003e 03ae       |    |		Declare_Type	Heap_Access,Defined,Visible
003f 00d8       |    |		Load_Top	At_Offset_0
0040 0129       | )  |		Execute	Any,Make_Visible
0041 c20e       |    |		Store	0x1,0xe
0042 e20d       |    |		Load	0x1,0xd
0043 4808       |H   |		Short_Literal	0x8
0044 4800       |H   |		Short_Literal	0x0
0045 4801       |H   |		Short_Literal	0x1
0046 480b       |H   |		Short_Literal	0xb
0047 0319       |    |		Declare_Type	Variant_Record,Incomplete,Visible
0048 029f 06c3  |    |		Declare_Subprogram	INIT_06c0,For_Call
004a 00d9       |    |		Load_Top	At_Offset_1
004b 012a       | *  |		Execute	Any,Change_Utility
004c 0007       |    |		Action	Break_Optional
004d 00d8       |    |		Load_Top	At_Offset_0
004e 02a0       |    |		Declare_Subprogram	Null_Subprogram
004f 03ae       |    |		Declare_Type	Heap_Access,Defined,Visible
0050 00bf       |    |		Action	Accept_Activation
0051 8002       |    |		Call	0x0,0x2
0052 00e2       |    |		Load_Encached	Integer_Cache
0053 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0054 e003       |    |		Load	0x0,0x3
0055 e004       |    |		Load	0x0,0x4
0056 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0057 02a0       |    |		Declare_Subprogram	Null_Subprogram
0058 4802       |H   |		Short_Literal	0x2
0059 032d       | -  |		Declare_Type	Record,Defined
005a e005       |    |		Load	0x0,0x5
005b 00d9       |    |		Load_Top	At_Offset_1
005c 00e1       |    |		Load_Encached	Boolean_Cache
005d 00e1       |    |		Load_Encached	Boolean_Cache
005e 029f 078b  |    |		Declare_Subprogram	INIT_0788,For_Call
0060 4804       |H   |		Short_Literal	0x4
0061 032d       | -  |		Declare_Type	Record,Defined
0062 03a8       |    |		Declare_Type	Heap_Access,Indirect_Literal
0063 e220       |    |		Load	0x1,0x20
0064 00e2       |    |		Load_Encached	Integer_Cache
0065 029f 079b  |    |		Declare_Subprogram	INIT_0798,For_Call
0067 4802       |H   |		Short_Literal	0x2
0068 032d       | -  |		Declare_Type	Record,Defined
0069 00d8       |    |		Load_Top	At_Offset_0
006a 02a0       |    |		Declare_Subprogram	Null_Subprogram
006b 00db       |    |		Load_Top	At_Offset_3
006c 03a3       |    |		Complete_Type	Heap_Access,By_Defining
006d 4809       |H   |		Short_Literal	0x9
006e 480b       |H   |		Short_Literal	0xb
006f e20d       |    |		Load	0x1,0xd
0070 03f8       |    |		Declare_Type	Discrete,Constrained
0071 4800       |H   |		Short_Literal	0x0
0072 4808       |H   |		Short_Literal	0x8
0073 e001       |    |		Load	0x0,0x1
0074 01d7       |    |		Execute	Vector,Field_Read
0075 02a0       |    |		Declare_Subprogram	Null_Subprogram
0076 038e       |    |		Declare_Type	Package,Defined
0077 e001       |    |		Load	0x0,0x1
0078 4807       |H   |		Short_Literal	0x7
0079 e001       |    |		Load	0x0,0x1
007a 01d7       |    |		Execute	Vector,Field_Read
007b e226       | &  |		Load	0x1,0x26
007c 4803       |H   |		Short_Literal	0x3
007d e22a       | *  |		Load	0x1,0x2a
007e 020e       |    |		Execute	Module,Augment_Imports
007f 0387       |    |		Declare_Variable	Package
0080 4800       |H   |		Short_Literal	0x0
0081 480c       |H   |		Short_Literal	0xc
0082 e001       |    |		Load	0x0,0x1
0083 01d7       |    |		Execute	Vector,Field_Read
0084 02a0       |    |		Declare_Subprogram	Null_Subprogram
0085 038e       |    |		Declare_Type	Package,Defined
0086 e001       |    |		Load	0x0,0x1
0087 480b       |H   |		Short_Literal	0xb
0088 e001       |    |		Load	0x0,0x1
0089 01d7       |    |		Execute	Vector,Field_Read
008a e226       | &  |		Load	0x1,0x26
008b e004       |    |		Load	0x0,0x4
008c e227       | '  |		Load	0x1,0x27
008d 4805       |H   |		Short_Literal	0x5
008e e22b       | +  |		Load	0x1,0x2b
008f 020e       |    |		Execute	Module,Augment_Imports
0090 0387       |    |		Declare_Variable	Package
0091 4800       |H   |		Short_Literal	0x0
0092 480e       |H   |		Short_Literal	0xe
0093 e001       |    |		Load	0x0,0x1
0094 01d7       |    |		Execute	Vector,Field_Read
0095 02a0       |    |		Declare_Subprogram	Null_Subprogram
0096 038e       |    |		Declare_Type	Package,Defined
0097 e001       |    |		Load	0x0,0x1
0098 480d       |H   |		Short_Literal	0xd
0099 e001       |    |		Load	0x0,0x1
009a 01d7       |    |		Execute	Vector,Field_Read
009b e226       | &  |		Load	0x1,0x26
009c 4803       |H   |		Short_Literal	0x3
009d e22c       | ,  |		Load	0x1,0x2c
009e 020e       |    |		Execute	Module,Augment_Imports
009f 0387       |    |		Declare_Variable	Package
00a0 4800       |H   |		Short_Literal	0x0
00a1 4810       |H   |		Short_Literal	0x10
00a2 e001       |    |		Load	0x0,0x1
00a3 01d7       |    |		Execute	Vector,Field_Read
00a4 02a0       |    |		Declare_Subprogram	Null_Subprogram
00a5 038e       |    |		Declare_Type	Package,Defined
00a6 e001       |    |		Load	0x0,0x1
00a7 480f       |H   |		Short_Literal	0xf
00a8 e001       |    |		Load	0x0,0x1
00a9 01d7       |    |		Execute	Vector,Field_Read
00aa 4802       |H   |		Short_Literal	0x2
00ab 00db       |    |		Load_Top	At_Offset_3
00ac 020e       |    |		Execute	Module,Augment_Imports
00ad 0387       |    |		Declare_Variable	Package
00ae 4800       |H   |		Short_Literal	0x0
00af 4802       |H   |		Short_Literal	0x2
00b0 e001       |    |		Load	0x0,0x1
00b1 01d7       |    |		Execute	Vector,Field_Read
00b2 02a0       |    |		Declare_Subprogram	Null_Subprogram
00b3 038e       |    |		Declare_Type	Package,Defined
00b4 e001       |    |		Load	0x0,0x1
00b5 4801       |H   |		Short_Literal	0x1
00b6 e001       |    |		Load	0x0,0x1
00b7 01d7       |    |		Execute	Vector,Field_Read
00b8 e226       | &  |		Load	0x1,0x26
00b9 4803       |H   |		Short_Literal	0x3
00ba e22e       | .  |		Load	0x1,0x2e
00bb 020e       |    |		Execute	Module,Augment_Imports
00bc 0387       |    |		Declare_Variable	Package
00bd 4800       |H   |		Short_Literal	0x0
00be 4804       |H   |		Short_Literal	0x4
00bf e001       |    |		Load	0x0,0x1
00c0 01d7       |    |		Execute	Vector,Field_Read
00c1 02a0       |    |		Declare_Subprogram	Null_Subprogram
00c2 038e       |    |		Declare_Type	Package,Defined
00c3 e001       |    |		Load	0x0,0x1
00c4 4803       |H   |		Short_Literal	0x3
00c5 e001       |    |		Load	0x0,0x1
00c6 01d7       |    |		Execute	Vector,Field_Read
00c7 4802       |H   |		Short_Literal	0x2
00c8 00db       |    |		Load_Top	At_Offset_3
00c9 020e       |    |		Execute	Module,Augment_Imports
00ca 0387       |    |		Declare_Variable	Package
00cb 4800       |H   |		Short_Literal	0x0
00cc 480a       |H   |		Short_Literal	0xa
00cd e001       |    |		Load	0x0,0x1
00ce 01d7       |    |		Execute	Vector,Field_Read
00cf 02a0       |    |		Declare_Subprogram	Null_Subprogram
00d0 038e       |    |		Declare_Type	Package,Defined
00d1 e001       |    |		Load	0x0,0x1
00d2 4809       |H   |		Short_Literal	0x9
00d3 e001       |    |		Load	0x0,0x1
00d4 01d7       |    |		Execute	Vector,Field_Read
00d5 4802       |H   |		Short_Literal	0x2
00d6 00db       |    |		Load_Top	At_Offset_3
00d7 020e       |    |		Execute	Module,Augment_Imports
00d8 0387       |    |		Declare_Variable	Package
00d9 4800       |H   |		Short_Literal	0x0
00da 4806       |H   |		Short_Literal	0x6
00db e001       |    |		Load	0x0,0x1
00dc 01d7       |    |		Execute	Vector,Field_Read
00dd 02a0       |    |		Declare_Subprogram	Null_Subprogram
00de 038e       |    |		Declare_Type	Package,Defined
00df e001       |    |		Load	0x0,0x1
00e0 4805       |H   |		Short_Literal	0x5
00e1 e001       |    |		Load	0x0,0x1
00e2 01d7       |    |		Execute	Vector,Field_Read
00e3 e220       |    |		Load	0x1,0x20
00e4 4803       |H   |		Short_Literal	0x3
00e5 e231       | 1  |		Load	0x1,0x31
00e6 020e       |    |		Execute	Module,Augment_Imports
00e7 0387       |    |		Declare_Variable	Package
00e8 e003       |    |		Load	0x0,0x3
00e9 e220       |    |		Load	0x1,0x20
00ea 00d8       |    |		Load_Top	At_Offset_0
00eb e220       |    |		Load	0x1,0x20
00ec 00d8       |    |		Load_Top	At_Offset_0
00ed 00e1       |    |		Load_Encached	Boolean_Cache
00ee e004       |    |		Load	0x0,0x4
00ef 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00f0 e227       | '  |		Load	0x1,0x27
00f1 00d8       |    |		Load_Top	At_Offset_0
00f2 00e1       |    |		Load_Encached	Boolean_Cache
00f3 00e1       |    |		Load_Encached	Boolean_Cache
00f4 00e1       |    |		Load_Encached	Boolean_Cache
00f5 4801       |H   |		Short_Literal	0x1
00f6 e22c       | ,  |		Load	0x1,0x2c
00f7 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
00f8 4801       |H   |		Short_Literal	0x1
00f9 e231       | 1  |		Load	0x1,0x31
00fa 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
00fb 4801       |H   |		Short_Literal	0x1
00fc e230       | 0  |		Load	0x1,0x30
00fd 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
00fe 4801       |H   |		Short_Literal	0x1
00ff e22d       | -  |		Load	0x1,0x2d
0100 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0101 4801       |H   |		Short_Literal	0x1
0102 e22e       | .  |		Load	0x1,0x2e
0103 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0104 4801       |H   |		Short_Literal	0x1
0105 e22f       | /  |		Load	0x1,0x2f
0106 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0107 4801       |H   |		Short_Literal	0x1
0108 e22b       | +  |		Load	0x1,0x2b
0109 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
010a 4801       |H   |		Short_Literal	0x1
010b e22a       | *  |		Load	0x1,0x2a
010c 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
010d 029f 05eb  |    |		Declare_Subprogram	INIT_05e8,For_Call
010f 4808       |H   |		Short_Literal	0x8
0110 480c       |H   |		Short_Literal	0xc
0111 e21f       |    |		Load	0x1,0x1f
0112 0307       |    |		Complete_Type	Variant_Record,By_Defining
0113 e220       |    |		Load	0x1,0x20
0114 03a0       |    |		Complete_Type	Heap_Access,By_Component_Completion
0115 00e1       |    |		Load_Encached	Boolean_Cache
0116 e220       |    |		Load	0x1,0x20
0117 4801       |H   |		Short_Literal	0x1
0118 00db       |    |		Load_Top	At_Offset_3
0119 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
011a 4801       |H   |		Short_Literal	0x1
011b e230       | 0  |		Load	0x1,0x30
011c 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
011d 4801       |H   |		Short_Literal	0x1
011e e22d       | -  |		Load	0x1,0x2d
011f 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0120 4801       |H   |		Short_Literal	0x1
0121 e22e       | .  |		Load	0x1,0x2e
0122 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0123 4801       |H   |		Short_Literal	0x1
0124 e22f       | /  |		Load	0x1,0x2f
0125 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0126 4801       |H   |		Short_Literal	0x1
0127 e22b       | +  |		Load	0x1,0x2b
0128 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0129 4801       |H   |		Short_Literal	0x1
012a e22c       | ,  |		Load	0x1,0x2c
012b 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
012c 4801       |H   |		Short_Literal	0x1
012d e22a       | *  |		Load	0x1,0x2a
012e 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
012f 029f 06c3  |    |		Declare_Subprogram	INIT_06c0,For_Call
0131 4808       |H   |		Short_Literal	0x8
0132 4802       |H   |		Short_Literal	0x2
0133 e221       | !  |		Load	0x1,0x21
0134 0307       |    |		Complete_Type	Variant_Record,By_Defining
0135 e222       | "  |		Load	0x1,0x22
0136 03a0       |    |		Complete_Type	Heap_Access,By_Component_Completion
0137 029d 07ab  |    |		Declare_Subprogram	INIT_07a8,For_Outer_Call
0139 029d 07bb  |    |		Declare_Subprogram	INIT_07b8,For_Outer_Call
013b 029d 07fb  |    |		Declare_Subprogram	INIT_07f8,For_Outer_Call
013d 029d 0813  |    |		Declare_Subprogram	INIT_0810,For_Outer_Call
013f 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0140 00c7       |    |		Action	Elaborate_Subprogram
0141 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0142 00c7       |    |		Action	Elaborate_Subprogram
0143 029d 081b  |    |		Declare_Subprogram	INIT_0818,For_Outer_Call
0145 029d 0823  |   #|		Declare_Subprogram	INIT_0820,For_Outer_Call
0147 029d 083b  |   ;|		Declare_Subprogram	INIT_0838,For_Outer_Call
0149 029d 0853  |   S|		Declare_Subprogram	INIT_0850,For_Outer_Call
014b 029d 0873  |   s|		Declare_Subprogram	INIT_0870,For_Outer_Call
014d 029d 0883  |    |		Declare_Subprogram	INIT_0880,For_Outer_Call
014f 029d 08b3  |    |		Declare_Subprogram	INIT_08b0,For_Outer_Call
0151 029d 08e3  |    |		Declare_Subprogram	INIT_08e0,For_Outer_Call
0153 029d 090b  |    |		Declare_Subprogram	INIT_0908,For_Outer_Call
0155 029d 092b  |   +|		Declare_Subprogram	INIT_0928,For_Outer_Call
0157 029d 094b  |   K|		Declare_Subprogram	INIT_0948,For_Outer_Call
0159 029d 0973  |   s|		Declare_Subprogram	INIT_0970,For_Outer_Call
015b 029d 0993  |    |		Declare_Subprogram	INIT_0990,For_Outer_Call
015d 029d 09a3  |    |		Declare_Subprogram	INIT_09a0,For_Outer_Call
015f 029d 0a13  |    |		Declare_Subprogram	INIT_0a10,For_Outer_Call
0161 029d 0a2b  |   +|		Declare_Subprogram	INIT_0a28,For_Outer_Call
0163 029d 0a8b  |    |		Declare_Subprogram	INIT_0a88,For_Outer_Call
0165 029d 0a93  |    |		Declare_Subprogram	INIT_0a90,For_Outer_Call
0167 029d 0acb  |    |		Declare_Subprogram	INIT_0ac8,For_Outer_Call
0169 029d 0adb  |    |		Declare_Subprogram	INIT_0ad8,For_Outer_Call
016b 029d 0afb  |    |		Declare_Subprogram	INIT_0af8,For_Outer_Call
016d 029d 0b23  |   #|		Declare_Subprogram	INIT_0b20,For_Outer_Call
016f 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0170 00c7       |    |		Action	Elaborate_Subprogram
0171 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0172 00c7       |    |		Action	Elaborate_Subprogram
0173 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0174 00c7       |    |		Action	Elaborate_Subprogram
0175 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0176 00c7       |    |		Action	Elaborate_Subprogram
0177 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0178 00c7       |    |		Action	Elaborate_Subprogram
0179 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
017a 00c7       |    |		Action	Elaborate_Subprogram
017b 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
017c 00c7       |    |		Action	Elaborate_Subprogram
017d 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
017e 00c7       |    |		Action	Elaborate_Subprogram
017f 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
0180 00c7       |    |		Action	Elaborate_Subprogram
0181 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
0182 00c7       |    |		Action	Elaborate_Subprogram
0183 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
0184 00c7       |    |		Action	Elaborate_Subprogram
0185 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0186 00c7       |    |		Action	Elaborate_Subprogram
0187 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0188 00c7       |    |		Action	Elaborate_Subprogram
0189 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
018a 00c7       |    |		Action	Elaborate_Subprogram
018b 029d 0b53  |   S|		Declare_Subprogram	INIT_0b50,For_Outer_Call
018d 029d 0b6b  |   k|		Declare_Subprogram	INIT_0b68,For_Outer_Call
018f 029d 0b7b  |   {|		Declare_Subprogram	INIT_0b78,For_Outer_Call
0191 029b 0b8b  |    |		Declare_Subprogram	INIT_0b88,For_Outer_Call,Unelaborated
0193 029d 0ba3  |    |		Declare_Subprogram	INIT_0ba0,For_Outer_Call
0195 029d 0bbb  |    |		Declare_Subprogram	INIT_0bb8,For_Outer_Call
0197 029d 0bd3  |    |		Declare_Subprogram	INIT_0bd0,For_Outer_Call
0199 029d 0be3  |    |		Declare_Subprogram	INIT_0be0,For_Outer_Call
019b 029d 0c03  |    |		Declare_Subprogram	INIT_0c00,For_Outer_Call
019d 029d 0c2b  |   +|		Declare_Subprogram	INIT_0c28,For_Outer_Call
019f 029d 0ca3  |    |		Declare_Subprogram	INIT_0ca0,For_Outer_Call
01a1 029d 0ce3  |    |		Declare_Subprogram	INIT_0ce0,For_Outer_Call
01a3 029d 0cf3  |    |		Declare_Subprogram	INIT_0cf0,For_Outer_Call
01a5 1d4f       | O  |		Execute_Immediate	Reference_Lex_1,0x4f
01a6 00c7       |    |		Action	Elaborate_Subprogram
01a7 029d 0d13  |    |		Declare_Subprogram	INIT_0d10,For_Outer_Call
01a9 029d 0d43  |   C|		Declare_Subprogram	INIT_0d40,For_Outer_Call
01ab e006       |    |		Load	0x0,0x6
01ac 1d48       | H  |		Execute_Immediate	Reference_Lex_1,0x48
01ad 1d43       | C  |		Execute_Immediate	Reference_Lex_1,0x43
01ae 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
01af a007       |    |		Store_Unchecked	0x0,0x7
01b0 1d41       | A  |		Execute_Immediate	Reference_Lex_1,0x41
01b1 1d4c       | L  |		Execute_Immediate	Reference_Lex_1,0x4c
01b2 1d52       | R  |		Execute_Immediate	Reference_Lex_1,0x52
01b3 e227       | '  |		Load	0x1,0x27
01b4 1d50       | P  |		Execute_Immediate	Reference_Lex_1,0x50
01b5 1d51       | Q  |		Execute_Immediate	Reference_Lex_1,0x51
01b6 a008       |    |		Store_Unchecked	0x0,0x8
01b7 a009       |    |		Store_Unchecked	0x0,0x9
01b8 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46
01b9 1d37       | 7  |		Execute_Immediate	Reference_Lex_1,0x37
01ba e00a       |    |		Load	0x0,0xa
01bb e00b       |    |		Load	0x0,0xb
01bc e004       |    |		Load	0x0,0x4
01bd e003       |    |		Load	0x0,0x3
01be 1d54       | T  |		Execute_Immediate	Reference_Lex_1,0x54
01bf 4814       |H   |		Short_Literal	0x14
01c0 e22c       | ,  |		Load	0x1,0x2c
01c1 020e       |    |		Execute	Module,Augment_Imports
01c2 e22c       | ,  |		Load	0x1,0x2c
01c3 020f       |    |		Execute	Module,Activate
01c4 a00c       |    |		Store_Unchecked	0x0,0xc
01c5 e220       |    |		Load	0x1,0x20
01c6 a00d       |    |		Store_Unchecked	0x0,0xd
01c7 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
01c8 a00e       |    |		Store_Unchecked	0x0,0xe
01c9 a00f       |    |		Store_Unchecked	0x0,0xf
01ca e010       |    |		Load	0x0,0x10
01cb e011       |    |		Load	0x0,0x11
01cc 1d50       | P  |		Execute_Immediate	Reference_Lex_1,0x50
01cd 1d59       | Y  |		Execute_Immediate	Reference_Lex_1,0x59
01ce 1d52       | R  |		Execute_Immediate	Reference_Lex_1,0x52
01cf 1d51       | Q  |		Execute_Immediate	Reference_Lex_1,0x51
01d0 a008       |    |		Store_Unchecked	0x0,0x8
01d1 a009       |    |		Store_Unchecked	0x0,0x9
01d2 1d44       | D  |		Execute_Immediate	Reference_Lex_1,0x44
01d3 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46
01d4 e003       |    |		Load	0x0,0x3
01d5 1d56       | V  |		Execute_Immediate	Reference_Lex_1,0x56
01d6 a012       |    |		Store_Unchecked	0x0,0x12
01d7 a013       |    |		Store_Unchecked	0x0,0x13
01d8 a007       |    |		Store_Unchecked	0x0,0x7
01d9 1d5a       | Z  |		Execute_Immediate	Reference_Lex_1,0x5a
01da 4816       |H   |		Short_Literal	0x16
01db e22a       | *  |		Load	0x1,0x2a
01dc 020e       |    |		Execute	Module,Augment_Imports
01dd e22a       | *  |		Load	0x1,0x2a
01de 020f       |    |		Execute	Module,Activate
01df a00d       |    |		Store_Unchecked	0x0,0xd
01e0 e220       |    |		Load	0x1,0x20
01e1 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
01e2 a014       |    |		Store_Unchecked	0x0,0x14
01e3 1d50       | P  |		Execute_Immediate	Reference_Lex_1,0x50
01e4 1d59       | Y  |		Execute_Immediate	Reference_Lex_1,0x59
01e5 1d52       | R  |		Execute_Immediate	Reference_Lex_1,0x52
01e6 1d51       | Q  |		Execute_Immediate	Reference_Lex_1,0x51
01e7 e010       |    |		Load	0x0,0x10
01e8 e011       |    |		Load	0x0,0x11
01e9 a008       |    |		Store_Unchecked	0x0,0x8
01ea a009       |    |		Store_Unchecked	0x0,0x9
01eb 1d44       | D  |		Execute_Immediate	Reference_Lex_1,0x44
01ec a015       |    |		Store_Unchecked	0x0,0x15
01ed 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
01ee 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
01ef 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46
01f0 a016       |    |		Store_Unchecked	0x0,0x16
01f1 e017       |    |		Load	0x0,0x17
01f2 a018       |    |		Store_Unchecked	0x0,0x18
01f3 a013       |    |		Store_Unchecked	0x0,0x13
01f4 e019       |    |		Load	0x0,0x19
01f5 1d55       | U  |		Execute_Immediate	Reference_Lex_1,0x55
01f6 1d56       | V  |		Execute_Immediate	Reference_Lex_1,0x56
01f7 1d4e       | N  |		Execute_Immediate	Reference_Lex_1,0x4e
01f8 1d5a       | Z  |		Execute_Immediate	Reference_Lex_1,0x5a
01f9 e034       | 4  |		Load	0x0,0x34
01fa a021       | !  |		Store_Unchecked	0x0,0x21
01fb e031       | 1  |		Load	0x0,0x31
01fc a032       | 2  |		Store_Unchecked	0x0,0x32
01fd e04e       | N  |		Load	0x0,0x4e
01fe a04f       | O  |		Store_Unchecked	0x0,0x4f
01ff a050       | P  |		Store_Unchecked	0x0,0x50
0200 a051       | Q  |		Store_Unchecked	0x0,0x51
0201 e223       | #  |		Load	0x1,0x23
0202 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
0203 a052       | R  |		Store_Unchecked	0x0,0x52
0204 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
0205 a007       |    |		Store_Unchecked	0x0,0x7
0206 4827       |H'  |		Short_Literal	0x27
0207 e22b       | +  |		Load	0x1,0x2b
0208 020e       |    |		Execute	Module,Augment_Imports
0209 e22b       | +  |		Load	0x1,0x2b
020a 020f       |    |		Execute	Module,Activate
020b e226       | &  |		Load	0x1,0x26
020c e017       |    |		Load	0x0,0x17
020d a01a       |    |		Store_Unchecked	0x0,0x1a
020e a00d       |    |		Store_Unchecked	0x0,0xd
020f a01b       |    |		Store_Unchecked	0x0,0x1b
0210 a012       |    |		Store_Unchecked	0x0,0x12
0211 a013       |    |		Store_Unchecked	0x0,0x13
0212 a01c       |    |		Store_Unchecked	0x0,0x1c
0213 e220       |    |		Load	0x1,0x20
0214 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
0215 1d56       | V  |		Execute_Immediate	Reference_Lex_1,0x56
0216 1d50       | P  |		Execute_Immediate	Reference_Lex_1,0x50
0217 1d59       | Y  |		Execute_Immediate	Reference_Lex_1,0x59
0218 1d52       | R  |		Execute_Immediate	Reference_Lex_1,0x52
0219 1d51       | Q  |		Execute_Immediate	Reference_Lex_1,0x51
021a e010       |    |		Load	0x0,0x10
021b e011       |    |		Load	0x0,0x11
021c a008       |    |		Store_Unchecked	0x0,0x8
021d a009       |    |		Store_Unchecked	0x0,0x9
021e a016       |    |		Store_Unchecked	0x0,0x16
021f 1d44       | D  |		Execute_Immediate	Reference_Lex_1,0x44
0220 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46
0221 e005       |    |		Load	0x0,0x5
0222 a01d       |    |		Store_Unchecked	0x0,0x1d
0223 1d55       | U  |		Execute_Immediate	Reference_Lex_1,0x55
0224 a01e       |    |		Store_Unchecked	0x0,0x1e
0225 1d4e       | N  |		Execute_Immediate	Reference_Lex_1,0x4e
0226 1d5a       | Z  |		Execute_Immediate	Reference_Lex_1,0x5a
0227 481c       |H   |		Short_Literal	0x1c
0228 e230       | 0  |		Load	0x1,0x30
0229 020e       |    |		Execute	Module,Augment_Imports
022a e230       | 0  |		Load	0x1,0x30
022b 020f       |    |		Execute	Module,Activate
022c e226       | &  |		Load	0x1,0x26
022d e017       |    |		Load	0x0,0x17
022e a01f       |    |		Store_Unchecked	0x0,0x1f
022f a01b       |    |		Store_Unchecked	0x0,0x1b
0230 a020       |    |		Store_Unchecked	0x0,0x20
0231 a012       |    |		Store_Unchecked	0x0,0x12
0232 a013       |    |		Store_Unchecked	0x0,0x13
0233 a01c       |    |		Store_Unchecked	0x0,0x1c
0234 1d55       | U  |		Execute_Immediate	Reference_Lex_1,0x55
0235 1d50       | P  |		Execute_Immediate	Reference_Lex_1,0x50
0236 1d51       | Q  |		Execute_Immediate	Reference_Lex_1,0x51
0237 1d52       | R  |		Execute_Immediate	Reference_Lex_1,0x52
0238 a008       |    |		Store_Unchecked	0x0,0x8
0239 a009       |    |		Store_Unchecked	0x0,0x9
023a 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
023b 1d44       | D  |		Execute_Immediate	Reference_Lex_1,0x44
023c 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46
023d a021       | !  |		Store_Unchecked	0x0,0x21
023e e006       |    |		Load	0x0,0x6
023f a022       | "  |		Store_Unchecked	0x0,0x22
0240 a023       | #  |		Store_Unchecked	0x0,0x23
0241 1d4e       | N  |		Execute_Immediate	Reference_Lex_1,0x4e
0242 4816       |H   |		Short_Literal	0x16
0243 e22d       | -  |		Load	0x1,0x2d
0244 020e       |    |		Execute	Module,Augment_Imports
0245 e22d       | -  |		Load	0x1,0x2d
0246 020f       |    |		Execute	Module,Activate
0247 e017       |    |		Load	0x0,0x17
0248 a024       | $  |		Store_Unchecked	0x0,0x24
0249 e220       |    |		Load	0x1,0x20
024a e00b       |    |		Load	0x0,0xb
024b a013       |    |		Store_Unchecked	0x0,0x13
024c 1d55       | U  |		Execute_Immediate	Reference_Lex_1,0x55
024d a007       |    |		Store_Unchecked	0x0,0x7
024e e010       |    |		Load	0x0,0x10
024f 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
0250 e011       |    |		Load	0x0,0x11
0251 1d50       | P  |		Execute_Immediate	Reference_Lex_1,0x50
0252 e227       | '  |		Load	0x1,0x27
0253 1d51       | Q  |		Execute_Immediate	Reference_Lex_1,0x51
0254 a008       |    |		Store_Unchecked	0x0,0x8
0255 a009       |    |		Store_Unchecked	0x0,0x9
0256 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46
0257 1d4e       | N  |		Execute_Immediate	Reference_Lex_1,0x4e
0258 4811       |H   |		Short_Literal	0x11
0259 e22e       | .  |		Load	0x1,0x2e
025a 020e       |    |		Execute	Module,Augment_Imports
025b e22e       | .  |		Load	0x1,0x2e
025c 020f       |    |		Execute	Module,Activate
025d e226       | &  |		Load	0x1,0x26
025e e017       |    |		Load	0x0,0x17
025f a025       | %  |		Store_Unchecked	0x0,0x25
0260 a01b       |    |		Store_Unchecked	0x0,0x1b
0261 a012       |    |		Store_Unchecked	0x0,0x12
0262 a013       |    |		Store_Unchecked	0x0,0x13
0263 a01c       |    |		Store_Unchecked	0x0,0x1c
0264 1d50       | P  |		Execute_Immediate	Reference_Lex_1,0x50
0265 1d51       | Q  |		Execute_Immediate	Reference_Lex_1,0x51
0266 1d52       | R  |		Execute_Immediate	Reference_Lex_1,0x52
0267 a008       |    |		Store_Unchecked	0x0,0x8
0268 a009       |    |		Store_Unchecked	0x0,0x9
0269 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
026a 1d44       | D  |		Execute_Immediate	Reference_Lex_1,0x44
026b 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46
026c a026       | &  |		Store_Unchecked	0x0,0x26
026d 1d55       | U  |		Execute_Immediate	Reference_Lex_1,0x55
026e 1d4e       | N  |		Execute_Immediate	Reference_Lex_1,0x4e
026f 4812       |H   |		Short_Literal	0x12
0270 e22f       | /  |		Load	0x1,0x2f
0271 020e       |    |		Execute	Module,Augment_Imports
0272 e22f       | /  |		Load	0x1,0x2f
0273 020f       |    |		Execute	Module,Activate
0274 a027       | '  |		Store_Unchecked	0x0,0x27
0275 1d43       | C  |		Execute_Immediate	Reference_Lex_1,0x43
0276 1d45       | E  |		Execute_Immediate	Reference_Lex_1,0x45
0277 e005       |    |		Load	0x0,0x5
0278 a028       | (  |		Store_Unchecked	0x0,0x28
0279 e029       | )  |		Load	0x0,0x29
027a a02a       | *  |		Store_Unchecked	0x0,0x2a
027b 4807       |H   |		Short_Literal	0x7
027c e231       | 1  |		Load	0x1,0x31
027d 020e       |    |		Execute	Module,Augment_Imports
027e e231       | 1  |		Load	0x1,0x31
027f 020f       |    |		Execute	Module,Activate
0280			BODY_0008:
0280 00bc       |    |		Action	Signal_Activated
0281 00bb       |    |		Action	Signal_Completion
0282 0000 0000  |    |		.BLANK	0000[0x6]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b       |    |		.CONST	0x028b								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0001       |    |		.CONST	0x0001								; Number of locals
028b			BODY_0288:
028b			INIT_0288:
028b 4607       |F   |		Jump_Case	0x8
028c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
028d 7807       |x   |		Jump	0x295								; case 0x1
028e 780a       |x   |		Jump	0x299								; case 0x2
028f 780e       |x   |		Jump	0x29e								; case 0x3
0290 7811       |x   |		Jump	0x2a2								; case 0x4
0291 7812       |x   |		Jump	0x2a4								; case 0x5
0292 7813       |x   |		Jump	0x2a6								; case 0x6
0293 7816       |x   |		Jump	0x2aa								; case 0x7
0294 4302       |C   |		.XXX[0x1]
0295 00da       |    |		Load_Top	At_Offset_2
0296 0091 0ee7  |    |		Action	Push_String_Extended_Indexed,0xee7				; "NONE"
0298 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0299 00db       |    |		Load_Top	At_Offset_3
029a 00db       |    |		Load_Top	At_Offset_3
029b 00e0       |    |		Load_Encached	Standard_Cache
029c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
029d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
029e 00da       |    |		Load_Top	At_Offset_2
029f 00e0       |    |		Load_Encached	Standard_Cache
02a0 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02a1 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
02a2 00db       |    |		Load_Top	At_Offset_3
02a3 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02a4 00db       |    |		Load_Top	At_Offset_3
02a5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02a6 e20d       |    |		Load	0x1,0xd
02a7 00dc       |    |		Load_Top	At_Offset_4
02a8 0267       | g  |		Execute	Discrete,Predecessor
02a9 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02aa e20d       |    |		Load	0x1,0xd
02ab 00dc       |    |		Load_Top	At_Offset_4
02ac 0268       | h  |		Execute	Discrete,Successor
02ad 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02ae 0000 0000  |    |		.XXX[0x2]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3       |    |		.CONST	0x02b3								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0001       |    |		.CONST	0x0001								; Number of locals
02b3			BODY_02b0:
02b3			INIT_02b0:
02b3 00da       |    |		Load_Top	At_Offset_2
02b4 021d       |    |		Execute	Heap_Access,Is_Null
02b5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b6 0000 0000  |    |		.XXX[0x2]
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 00da       |    |		Load_Top	At_Offset_2
02bc 0217       |    |		Execute	Heap_Access,All_Reference
02bd 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
02be 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02bf 0000       |    |		.XXX[0x1]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02dc       |    |		.CONST	0x02dc								; Address of begin
02c1 0004       |    |		.CONST	0x0004								; Address of exception handler
02c2 0007       |    |		.CONST	0x0007								; Number of locals
02c3			INIT_02c0:
02c3 00da       |    |		Load_Top	At_Offset_2
02c4 8248       | H  |		Call	0x1,0x48
02c5 e20d       |    |		Load	0x1,0xd
02c6 03f1       |    |		Declare_Variable	Discrete,With_Value
02c7 00d8       |    |		Load_Top	At_Offset_0
02c8 00d8       |    |		Load_Top	At_Offset_0
02c9 e21f       |    |		Load	0x1,0x1f
02ca 1c06       |    |		Execute_Immediate	Run_Utility,0x6
02cb e220       |    |		Load	0x1,0x20
02cc e5fc       |    |		Load	0x2,-0x4
02cd 039a       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Constraint
02ce 00d8       |    |		Load_Top	At_Offset_0
02cf 0217       |    |		Execute	Heap_Access,All_Reference
02d0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02d1 e017       |    |		Load	0x0,0x17
02d2 0322       | "  |		Declare_Variable	Record
02d3 e5fe       |    |		Load	0x2,-0x2
02d4 00d9       |    |		Load_Top	At_Offset_1
02d5 017d       | }  |		Execute	Record,Structure_Write
02d6 e003       |    |		Load	0x0,0x3
02d7 0007       |    |		Action	Break_Optional
02d8 e220       |    |		Load	0x1,0x20
02d9 0007       |    |		Action	Break_Optional
02da e003       |    |		Load	0x0,0x3
02db 0007       |    |		Action	Break_Optional
02dc			BODY_02c0:
02dc e5ff       |    |		Load	0x2,-0x1
02dd e403       |    |		Load	0x2,0x3
02de 0217       |    |		Execute	Heap_Access,All_Reference
02df 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02e0 e5fd       |    |		Load	0x2,-0x3
02e1 e403       |    |		Load	0x2,0x3
02e2 0217       |    |		Execute	Heap_Access,All_Reference
02e3 2804       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
02e4 00db       |    |		Load_Top	At_Offset_3
02e5 e003       |    |		Load	0x0,0x3
02e6 e403       |    |		Load	0x2,0x3
02e7 0217       |    |		Execute	Heap_Access,All_Reference
02e8 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
02e9 0e0e       |    |		Execute_Immediate	Not_Equal,0xe
02ea 823d       | =  |		Call	0x1,0x3d
02eb 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
02ec 00d1       |    |		Pop_Control	Pop_Count_1
02ed 00d8       |    |		Load_Top	At_Offset_0
02ee 802b       | +  |		Call	0x0,0x2b
02ef 7012       |p   |		Jump_Nonzero	0x302
02f0 e220       |    |		Load	0x1,0x20
02f1 e402       |    |		Load	0x2,0x2
02f2 e5fb       |    |		Load	0x2,-0x5
02f3 e5fc       |    |		Load	0x2,-0x4
02f4 e5fd       |    |		Load	0x2,-0x3
02f5 e404       |    |		Load	0x2,0x4
02f6 e407       |    |		Load	0x2,0x7
02f7 824a       | J  |		Call	0x1,0x4a
02f8 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
02f9 00d9       |    |		Load_Top	At_Offset_1
02fa e403       |    |		Load	0x2,0x3
02fb 0217       |    |		Execute	Heap_Access,All_Reference
02fc 2805       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
02fd 00d9       |    |		Load_Top	At_Offset_1
02fe e403       |    |		Load	0x2,0x3
02ff 0217       |    |		Execute	Heap_Access,All_Reference
0300 2806       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6
0301 7823       |x#  |		Jump	0x325
0302 e5fd       |    |		Load	0x2,-0x3
0303 820f       |    |		Call	0x1,0xf
0304 6805       |h   |		Jump_Zero	0x30a
0305 e220       |    |		Load	0x1,0x20
0306 e403       |    |		Load	0x2,0x3
0307 0217       |    |		Execute	Heap_Access,All_Reference
0308 2806       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6
0309 781b       |x   |		Jump	0x325
030a e5fd       |    |		Load	0x2,-0x3
030b 0217       |    |		Execute	Heap_Access,All_Reference
030c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
030d e229       | )  |		Load	0x1,0x29
030e 0260       | `  |		Execute	Discrete,In_Type
030f 6809       |h   |		Jump_Zero	0x319
0310 e5fd       |    |		Load	0x2,-0x3
0311 e403       |    |		Load	0x2,0x3
0312 0217       |    |		Execute	Heap_Access,All_Reference
0313 2806       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6
0314 4801       |H   |		Short_Literal	0x1
0315 e403       |    |		Load	0x2,0x3
0316 0217       |    |		Execute	Heap_Access,All_Reference
0317 2807       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x7
0318 780c       |x   |		Jump	0x325
0319 e5fd       |    |		Load	0x2,-0x3
031a 0217       |    |		Execute	Heap_Access,All_Reference
031b 2c06       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6
031c e403       |    |		Load	0x2,0x3
031d 0217       |    |		Execute	Heap_Access,All_Reference
031e 2806       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6
031f e5fd       |    |		Load	0x2,-0x3
0320 0217       |    |		Execute	Heap_Access,All_Reference
0321 2c07       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7
0322 e403       |    |		Load	0x2,0x3
0323 0217       |    |		Execute	Heap_Access,All_Reference
0324 2807       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x7
0325 e027       | '  |		Load	0x0,0x27
0326 e403       |    |		Load	0x2,0x3
0327 0217       |    |		Execute	Heap_Access,All_Reference
0328 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0329 4800       |H   |		Short_Literal	0x0
032a e403       |    |		Load	0x2,0x3
032b 0217       |    |		Execute	Heap_Access,All_Reference
032c 280b       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0xb
032d e402       |    |		Load	0x2,0x2
032e 460f       |F   |		Jump_Case	0x10
032f 780f       |x   |		Jump	0x33f								; case 0x0
0330 7814       |x   |		Jump	0x345								; case 0x1
0331 7813       |x   |		Jump	0x345								; case 0x2
0332 780c       |x   |		Jump	0x33f								; case 0x3
0333 780b       |x   |		Jump	0x33f								; case 0x4
0334 780a       |x   |		Jump	0x33f								; case 0x5
0335 7809       |x   |		Jump	0x33f								; case 0x6
0336 7808       |x   |		Jump	0x33f								; case 0x7
0337 7807       |x   |		Jump	0x33f								; case 0x8
0338 7806       |x   |		Jump	0x33f								; case 0x9
0339 7805       |x   |		Jump	0x33f								; case 0xa
033a 7804       |x   |		Jump	0x33f								; case 0xb
033b 7803       |x   |		Jump	0x33f								; case 0xc
033c 7808       |x   |		Jump	0x345								; case 0xd
033d 7801       |x   |		Jump	0x33f								; case 0xe
033e 7800       |x   |		Jump	0x33f								; case 0xf
033f e00e       |    |		Load	0x0,0xe
0340 4800       |H   |		Short_Literal	0x0
0341 e403       |    |		Load	0x2,0x3
0342 e5ff       |    |		Load	0x2,-0x1
0343 802c       | ,  |		Call	0x0,0x2c
0344 c00e       |    |		Store	0x0,0xe
0345 e402       |    |		Load	0x2,0x2
0346 460f       |F   |		Jump_Case	0x10
0347 780f       |x   |		Jump	0x357								; case 0x0
0348 781b       |x   |		Jump	0x364								; case 0x1
0349 781a       |x   |		Jump	0x364								; case 0x2
034a 7823       |x#  |		Jump	0x36e								; case 0x3
034b 7822       |x"  |		Jump	0x36e								; case 0x4
034c 782b       |x+  |		Jump	0x378								; case 0x5
034d 7852       |xR  |		Jump	0x3a0								; case 0x6
034e 7847       |xG  |		Jump	0x396								; case 0x7
034f 7807       |x   |		Jump	0x357								; case 0x8
0350 7831       |x1  |		Jump	0x382								; case 0x9
0351 7830       |x0  |		Jump	0x382								; case 0xa
0352 782f       |x/  |		Jump	0x382								; case 0xb
0353 7838       |x8  |		Jump	0x38c								; case 0xc
0354 780f       |x   |		Jump	0x364								; case 0xd
0355 7802       |x   |		Jump	0x358								; case 0xe
0356 7800       |x   |		Jump	0x357								; case 0xf
0357 0833       | 3  |		Execute_Immediate	Raise,0x33
0358 e403       |    |		Load	0x2,0x3
0359 e5f9       |    |		Load	0x2,-0x7
035a 4800       |H   |		Short_Literal	0x0
035b e5fb       |    |		Load	0x2,-0x5
035c e5fc       |    |		Load	0x2,-0x4
035d e5fd       |    |		Load	0x2,-0x3
035e e5fe       |    |		Load	0x2,-0x2
035f e5ff       |    |		Load	0x2,-0x1
0360 e22c       | ,  |		Load	0x1,0x2c
0361 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0362 c403       |    |		Store	0x2,0x3
0363 7846       |xF  |		Jump	0x3aa
0364 e403       |    |		Load	0x2,0x3
0365 e5fb       |    |		Load	0x2,-0x5
0366 e5fc       |    |		Load	0x2,-0x4
0367 e5fd       |    |		Load	0x2,-0x3
0368 e5fe       |    |		Load	0x2,-0x2
0369 e5ff       |    |		Load	0x2,-0x1
036a e231       | 1  |		Load	0x1,0x31
036b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
036c c403       |    |		Store	0x2,0x3
036d 783c       |x<  |		Jump	0x3aa
036e e403       |    |		Load	0x2,0x3
036f e5fb       |    |		Load	0x2,-0x5
0370 e5fc       |    |		Load	0x2,-0x4
0371 e5fd       |    |		Load	0x2,-0x3
0372 e5fe       |    |		Load	0x2,-0x2
0373 e5ff       |    |		Load	0x2,-0x1
0374 e230       | 0  |		Load	0x1,0x30
0375 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0376 c403       |    |		Store	0x2,0x3
0377 7832       |x2  |		Jump	0x3aa
0378 e403       |    |		Load	0x2,0x3
0379 e5fb       |    |		Load	0x2,-0x5
037a e5fc       |    |		Load	0x2,-0x4
037b e5fd       |    |		Load	0x2,-0x3
037c e5fe       |    |		Load	0x2,-0x2
037d e5ff       |    |		Load	0x2,-0x1
037e e22f       | /  |		Load	0x1,0x2f
037f 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0380 c403       |    |		Store	0x2,0x3
0381 7828       |x(  |		Jump	0x3aa
0382 e403       |    |		Load	0x2,0x3
0383 e5fb       |    |		Load	0x2,-0x5
0384 e5fc       |    |		Load	0x2,-0x4
0385 e5fd       |    |		Load	0x2,-0x3
0386 e5fe       |    |		Load	0x2,-0x2
0387 e5ff       |    |		Load	0x2,-0x1
0388 e22b       | +  |		Load	0x1,0x2b
0389 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
038a c403       |    |		Store	0x2,0x3
038b 781e       |x   |		Jump	0x3aa
038c e403       |    |		Load	0x2,0x3
038d e5fb       |    |		Load	0x2,-0x5
038e e5fc       |    |		Load	0x2,-0x4
038f e5fd       |    |		Load	0x2,-0x3
0390 e5fe       |    |		Load	0x2,-0x2
0391 e5ff       |    |		Load	0x2,-0x1
0392 e22a       | *  |		Load	0x1,0x2a
0393 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0394 c403       |    |		Store	0x2,0x3
0395 7814       |x   |		Jump	0x3aa
0396 e403       |    |		Load	0x2,0x3
0397 e5fb       |    |		Load	0x2,-0x5
0398 e5fc       |    |		Load	0x2,-0x4
0399 e5fd       |    |		Load	0x2,-0x3
039a e5fe       |    |		Load	0x2,-0x2
039b e5ff       |    |		Load	0x2,-0x1
039c e22d       | -  |		Load	0x1,0x2d
039d 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
039e c403       |    |		Store	0x2,0x3
039f 780a       |x   |		Jump	0x3aa
03a0 e403       |    |		Load	0x2,0x3
03a1 4800       |H   |		Short_Literal	0x0
03a2 e5fb       |    |		Load	0x2,-0x5
03a3 e5fc       |    |		Load	0x2,-0x4
03a4 e5fd       |    |		Load	0x2,-0x3
03a5 e5fe       |    |		Load	0x2,-0x2
03a6 e5ff       |    |		Load	0x2,-0x1
03a7 e22e       | .  |		Load	0x1,0x2e
03a8 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
03a9 c403       |    |		Store	0x2,0x3
03aa e5fa       |    |		Load	0x2,-0x6
03ab 680a       |h   |		Jump_Zero	0x3b6
03ac e402       |    |		Load	0x2,0x2
03ad 8249       | I  |		Call	0x1,0x49
03ae 6807       |h   |		Jump_Zero	0x3b6
03af e5fb       |    |		Load	0x2,-0x5
03b0 e5fc       |    |		Load	0x2,-0x4
03b1 e5fd       |    |		Load	0x2,-0x3
03b2 e403       |    |		Load	0x2,0x3
03b3 e5ff       |    |		Load	0x2,-0x1
03b4 824b       | K  |		Call	0x1,0x4b
03b5 4407       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x7
03b6 e403       |    |		Load	0x2,0x3
03b7 4407       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x7
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb       |    |		.CONST	0x03bb								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0001       |    |		.CONST	0x0001								; Number of locals
03bb			BODY_03b8:
03bb			INIT_03b8:
03bb 4800       |H   |		Short_Literal	0x0
03bc 00d8       |    |		Load_Top	At_Offset_0
03bd e21f       |    |		Load	0x1,0x1f
03be 1c06       |    |		Execute_Immediate	Run_Utility,0x6
03bf e220       |    |		Load	0x1,0x20
03c0 e5ff       |    |		Load	0x2,-0x1
03c1 039a       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Constraint
03c2 00d8       |    |		Load_Top	At_Offset_0
03c3 0217       |    |		Execute	Heap_Access,All_Reference
03c4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03c5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03c6 0000 0000  |    |		.XXX[0x2]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb       |    |		.CONST	0x03cb								; Address of begin
03c9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ca 0001       |    |		.CONST	0x0001								; Number of locals
03cb			BODY_03c8:
03cb			INIT_03c8:
03cb 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03cc 0000 0000  |    |		.BLANK	0000[0x4]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d3       |    |		.CONST	0x03d3								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0001       |    |		.CONST	0x0001								; Number of locals
03d3			BODY_03d0:
03d3			INIT_03d0:
03d3 e5fd       |    |		Load	0x2,-0x3
03d4 8213       |    |		Call	0x1,0x13
03d5 c5fd       |    |		Store	0x2,-0x3
03d6 00db       |    |		Load_Top	At_Offset_3
03d7 8212       |    |		Call	0x1,0x12
03d8 a5fd       |    |		Store_Unchecked	0x2,-0x3
03d9 00da       |    |		Load_Top	At_Offset_2
03da a5fd       |    |		Store_Unchecked	0x2,-0x3
03db 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03dc 0000 0000  |    |		.BLANK	0000[0x4]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3       |    |		.CONST	0x03e3								; Address of begin
03e1 0004       |    |		.CONST	0x0004								; Address of exception handler
03e2 0001       |    |		.CONST	0x0001								; Number of locals
03e3			BODY_03e0:
03e3			INIT_03e0:
03e3 00da       |    |		Load_Top	At_Offset_2
03e4 e5fe       |    |		Load	0x2,-0x2
03e5 021f       |    |		Execute	Heap_Access,Equal
03e6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03e7 0000       |    |		.XXX[0x1]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb       |    |		.CONST	0x03eb								; Address of begin
03e9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ea 0001       |    |		.CONST	0x0001								; Number of locals
03eb			BODY_03e8:
03eb			INIT_03e8:
03eb 00da       |    |		Load_Top	At_Offset_2
03ec 0217       |    |		Execute	Heap_Access,All_Reference
03ed 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03ee 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ef 0000       |    |		.XXX[0x1]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3       |    |		.CONST	0x03f3								; Address of begin
03f1 0004       |    |		.CONST	0x0004								; Address of exception handler
03f2 0001       |    |		.CONST	0x0001								; Number of locals
03f3			BODY_03f0:
03f3			INIT_03f0:
03f3 00da       |    |		Load_Top	At_Offset_2
03f4 0217       |    |		Execute	Heap_Access,All_Reference
03f5 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
03f6 460f       |F   |		Jump_Case	0x10
03f7 780f       |x   |		Jump	0x407								; case 0x0
03f8 7813       |x   |		Jump	0x40c								; case 0x1
03f9 7812       |x   |		Jump	0x40c								; case 0x2
03fa 7815       |x   |		Jump	0x410								; case 0x3
03fb 7814       |x   |		Jump	0x410								; case 0x4
03fc 7817       |x   |		Jump	0x414								; case 0x5
03fd 781e       |x   |		Jump	0x41c								; case 0x6
03fe 7819       |x   |		Jump	0x418								; case 0x7
03ff 7807       |x   |		Jump	0x407								; case 0x8
0400 781f       |x   |		Jump	0x420								; case 0x9
0401 781e       |x   |		Jump	0x420								; case 0xa
0402 781d       |x   |		Jump	0x420								; case 0xb
0403 7820       |x   |		Jump	0x424								; case 0xc
0404 7807       |x   |		Jump	0x40c								; case 0xd
0405 7802       |x   |		Jump	0x408								; case 0xe
0406 7800       |x   |		Jump	0x407								; case 0xf
0407 0833       | 3  |		Execute_Immediate	Raise,0x33
0408 00da       |    |		Load_Top	At_Offset_2
0409 e22c       | ,  |		Load	0x1,0x2c
040a 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
040b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
040c 00da       |    |		Load_Top	At_Offset_2
040d e231       | 1  |		Load	0x1,0x31
040e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
040f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0410 00da       |    |		Load_Top	At_Offset_2
0411 e230       | 0  |		Load	0x1,0x30
0412 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0413 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0414 00da       |    |		Load_Top	At_Offset_2
0415 e22f       | /  |		Load	0x1,0x2f
0416 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0417 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0418 00da       |    |		Load_Top	At_Offset_2
0419 e22d       | -  |		Load	0x1,0x2d
041a 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
041b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
041c 00da       |    |		Load_Top	At_Offset_2
041d e22e       | .  |		Load	0x1,0x2e
041e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
041f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0420 00da       |    |		Load_Top	At_Offset_2
0421 e22b       | +  |		Load	0x1,0x2b
0422 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0423 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0424 00da       |    |		Load_Top	At_Offset_2
0425 e22a       | *  |		Load	0x1,0x2a
0426 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0427 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042b       | +  |		.CONST	0x042b								; Address of begin
0429 048b       |    |		.CONST	0x048b								; Address of exception handler
042a 0001       |    |		.CONST	0x0001								; Number of locals
042b			BODY_0428:
042b			INIT_0428:
042b e223       | #  |		Load	0x1,0x23
042c 6811       |h   |		Jump_Zero	0x43e
042d 0092 0ef7  |    |		Action	Push_String_Extended,0xef7					; "Encounter_Bkpt_Event "
042f 00db       |    |		Load_Top	At_Offset_3
0430 0217       |    |		Execute	Heap_Access,All_Reference
0431 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0432 e20d       |    |		Load	0x1,0xd
0433 011c       |    |		Execute	Any,Convert_Unchecked
0434 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0435 01cc       |    |		Execute	Vector,Catenate
0436 0092 0ef8  |    |		Action	Push_String_Extended,0xef8					; " with ID"
0438 01cc       |    |		Execute	Vector,Catenate
0439 e5fe       |    |		Load	0x2,-0x2
043a 00e0       |    |		Load_Encached	Standard_Cache
043b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
043c 01cc       |    |		Execute	Vector,Catenate
043d 8232       | 2  |		Call	0x1,0x32
043e 00da       |    |		Load_Top	At_Offset_2
043f 0217       |    |		Execute	Heap_Access,All_Reference
0440 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0441 460f       |F   |		Jump_Case	0x10
0442 780f       |x   |		Jump	0x452								; case 0x0
0443 7816       |x   |		Jump	0x45a								; case 0x1
0444 7815       |x   |		Jump	0x45a								; case 0x2
0445 781b       |x   |		Jump	0x461								; case 0x3
0446 781a       |x   |		Jump	0x461								; case 0x4
0447 7820       |x   |		Jump	0x468								; case 0x5
0448 782d       |x-  |		Jump	0x476								; case 0x6
0449 7825       |x%  |		Jump	0x46f								; case 0x7
044a 7807       |x   |		Jump	0x452								; case 0x8
044b 7831       |x1  |		Jump	0x47d								; case 0x9
044c 7830       |x0  |		Jump	0x47d								; case 0xa
044d 782f       |x/  |		Jump	0x47d								; case 0xb
044e 7835       |x5  |		Jump	0x484								; case 0xc
044f 780a       |x   |		Jump	0x45a								; case 0xd
0450 7802       |x   |		Jump	0x453								; case 0xe
0451 7800       |x   |		Jump	0x452								; case 0xf
0452 0833       | 3  |		Execute_Immediate	Raise,0x33
0453 e5fc       |    |		Load	0x2,-0x4
0454 e5fd       |    |		Load	0x2,-0x3
0455 e5fe       |    |		Load	0x2,-0x2
0456 e5ff       |    |		Load	0x2,-0x1
0457 e22c       | ,  |		Load	0x1,0x2c
0458 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0459 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
045a e5fc       |    |		Load	0x2,-0x4
045b e5fd       |    |		Load	0x2,-0x3
045c e5fe       |    |		Load	0x2,-0x2
045d e5ff       |    |		Load	0x2,-0x1
045e e231       | 1  |		Load	0x1,0x31
045f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0460 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0461 e5fc       |    |		Load	0x2,-0x4
0462 e5fd       |    |		Load	0x2,-0x3
0463 e5fe       |    |		Load	0x2,-0x2
0464 e5ff       |    |		Load	0x2,-0x1
0465 e230       | 0  |		Load	0x1,0x30
0466 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0467 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0468 e5fc       |    |		Load	0x2,-0x4
0469 e5fd       |    |		Load	0x2,-0x3
046a e5fe       |    |		Load	0x2,-0x2
046b e5ff       |    |		Load	0x2,-0x1
046c e22f       | /  |		Load	0x1,0x2f
046d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
046e 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
046f e5fc       |    |		Load	0x2,-0x4
0470 e5fd       |    |		Load	0x2,-0x3
0471 e5fe       |    |		Load	0x2,-0x2
0472 e5ff       |    |		Load	0x2,-0x1
0473 e22d       | -  |		Load	0x1,0x2d
0474 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0475 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0476 e5fc       |    |		Load	0x2,-0x4
0477 e5fd       |    |		Load	0x2,-0x3
0478 e5fe       |    |		Load	0x2,-0x2
0479 e5ff       |    |		Load	0x2,-0x1
047a e22e       | .  |		Load	0x1,0x2e
047b 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
047c 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
047d e5fc       |    |		Load	0x2,-0x4
047e e5fd       |    |		Load	0x2,-0x3
047f e5fe       |    |		Load	0x2,-0x2
0480 e5ff       |    |		Load	0x2,-0x1
0481 e22b       | +  |		Load	0x1,0x2b
0482 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0483 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0484 e5fc       |    |		Load	0x2,-0x4
0485 e5fd       |    |		Load	0x2,-0x3
0486 e5fe       |    |		Load	0x2,-0x2
0487 e5ff       |    |		Load	0x2,-0x1
0488 e22a       | *  |		Load	0x1,0x2a
0489 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
048a 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
048b			TRAP_0428:
048b 0007       |    |		Action	Break_Optional
048c 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
048d 0000 0000  |    |		.XXX[0x3]
048f 0000       |    |
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0493       |    |		.CONST	0x0493								; Address of begin
0491 0004       |    |		.CONST	0x0004								; Address of exception handler
0492 0001       |    |		.CONST	0x0001								; Number of locals
0493			BODY_0490:
0493			INIT_0490:
0493 00da       |    |		Load_Top	At_Offset_2
0494 0217       |    |		Execute	Heap_Access,All_Reference
0495 2c0c       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xc
0496 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0497 0000       |    |		.XXX[0x1]
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 049f       |    |		.CONST	0x049f								; Address of begin
0499 0004       |    |		.CONST	0x0004								; Address of exception handler
049a 0003       |    |		.CONST	0x0003								; Number of locals
049b			INIT_0498:
049b e220       |    |		Load	0x1,0x20
049c 0007       |    |		Action	Break_Optional
049d 00e1       |    |		Load_Encached	Boolean_Cache
049e 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
049f			BODY_0498:
049f 00e1       |    |		Load_Encached	Boolean_Cache
04a0 00da       |    |		Load_Top	At_Offset_2
04a1 e5ff       |    |		Load	0x2,-0x1
04a2 e00e       |    |		Load	0x0,0xe
04a3 800f       |    |		Call	0x0,0xf
04a4 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
04a5 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04a6 00d8       |    |		Load_Top	At_Offset_0
04a7 700b       |p   |		Jump_Nonzero	0x4b3
04a8 e010       |    |		Load	0x0,0x10
04a9 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
04aa 4807       |H   |		Short_Literal	0x7
04ab 0092 0ef9  |    |		Action	Push_String_Extended,0xef9					; "Attempt to mark coverage on invalid element "
04ad e5ff       |    |		Load	0x2,-0x1
04ae 802d       | -  |		Call	0x0,0x2d
04af 01cc       |    |		Execute	Vector,Catenate
04b0 e011       |    |		Load	0x0,0x11
04b1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04b2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04b3 00d9       |    |		Load_Top	At_Offset_1
04b4 0217       |    |		Execute	Heap_Access,All_Reference
04b5 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04b6 460f       |F   |		Jump_Case	0x10
04b7 780f       |x   |		Jump	0x4c7								; case 0x0
04b8 7814       |x   |		Jump	0x4cd								; case 0x1
04b9 7813       |x   |		Jump	0x4cd								; case 0x2
04ba 7817       |x   |		Jump	0x4d2								; case 0x3
04bb 7816       |x   |		Jump	0x4d2								; case 0x4
04bc 781a       |x   |		Jump	0x4d7								; case 0x5
04bd 7823       |x#  |		Jump	0x4e1								; case 0x6
04be 781d       |x   |		Jump	0x4dc								; case 0x7
04bf 7807       |x   |		Jump	0x4c7								; case 0x8
04c0 7825       |x%  |		Jump	0x4e6								; case 0x9
04c1 7824       |x$  |		Jump	0x4e6								; case 0xa
04c2 7823       |x#  |		Jump	0x4e6								; case 0xb
04c3 7827       |x'  |		Jump	0x4eb								; case 0xc
04c4 7808       |x   |		Jump	0x4cd								; case 0xd
04c5 7802       |x   |		Jump	0x4c8								; case 0xe
04c6 7800       |x   |		Jump	0x4c7								; case 0xf
04c7 0833       | 3  |		Execute_Immediate	Raise,0x33
04c8 e5fe       |    |		Load	0x2,-0x2
04c9 00da       |    |		Load_Top	At_Offset_2
04ca e22c       | ,  |		Load	0x1,0x2c
04cb 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04cc 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04cd e5fe       |    |		Load	0x2,-0x2
04ce 00da       |    |		Load_Top	At_Offset_2
04cf e231       | 1  |		Load	0x1,0x31
04d0 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04d1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04d2 e5fe       |    |		Load	0x2,-0x2
04d3 00da       |    |		Load_Top	At_Offset_2
04d4 e230       | 0  |		Load	0x1,0x30
04d5 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04d6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04d7 e5fe       |    |		Load	0x2,-0x2
04d8 00da       |    |		Load_Top	At_Offset_2
04d9 e22f       | /  |		Load	0x1,0x2f
04da 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04db 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04dc e5fe       |    |		Load	0x2,-0x2
04dd 00da       |    |		Load_Top	At_Offset_2
04de e22d       | -  |		Load	0x1,0x2d
04df 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04e0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04e1 e5fe       |    |		Load	0x2,-0x2
04e2 00da       |    |		Load_Top	At_Offset_2
04e3 e22e       | .  |		Load	0x1,0x2e
04e4 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04e5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04e6 e5fe       |    |		Load	0x2,-0x2
04e7 00da       |    |		Load_Top	At_Offset_2
04e8 e22b       | +  |		Load	0x1,0x2b
04e9 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04ea 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04eb e5fe       |    |		Load	0x2,-0x2
04ec 00da       |    |		Load_Top	At_Offset_2
04ed e22a       | *  |		Load	0x1,0x2a
04ee 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04ef 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04ff       |    |		.CONST	0x04ff								; Address of begin
04f1 0004       |    |		.CONST	0x0004								; Address of exception handler
04f2 0002       |    |		.CONST	0x0002								; Number of locals
04f3			INIT_04f0:
04f3 00da       |    |		Load_Top	At_Offset_2
04f4 0217       |    |		Execute	Heap_Access,All_Reference
04f5 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04f6 00d8       |    |		Load_Top	At_Offset_0
04f7 e221       | !  |		Load	0x1,0x21
04f8 1c06       |    |		Execute_Immediate	Run_Utility,0x6
04f9 e222       | "  |		Load	0x1,0x22
04fa e5fe       |    |		Load	0x2,-0x2
04fb 039a       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Constraint
04fc 00d8       |    |		Load_Top	At_Offset_0
04fd 0217       |    |		Execute	Heap_Access,All_Reference
04fe 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04ff			BODY_04f0:
04ff 00db       |    |		Load_Top	At_Offset_3
0500 00d9       |    |		Load_Top	At_Offset_1
0501 0217       |    |		Execute	Heap_Access,All_Reference
0502 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0503 4800       |H   |		Short_Literal	0x0
0504 00d9       |    |		Load_Top	At_Offset_1
0505 0217       |    |		Execute	Heap_Access,All_Reference
0506 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0507 00d8       |    |		Load_Top	At_Offset_0
0508 0217       |    |		Execute	Heap_Access,All_Reference
0509 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
050a 460f       |F   |		Jump_Case	0x10
050b 780f       |x   |		Jump	0x51b								; case 0x0
050c 780f       |x   |		Jump	0x51c								; case 0x1
050d 780e       |x   |		Jump	0x51c								; case 0x2
050e 781b       |x   |		Jump	0x52a								; case 0x3
050f 781a       |x   |		Jump	0x52a								; case 0x4
0510 7820       |x   |		Jump	0x531								; case 0x5
0511 782d       |x-  |		Jump	0x53f								; case 0x6
0512 7825       |x%  |		Jump	0x538								; case 0x7
0513 7807       |x   |		Jump	0x51b								; case 0x8
0514 7831       |x1  |		Jump	0x546								; case 0x9
0515 7830       |x0  |		Jump	0x546								; case 0xa
0516 782f       |x/  |		Jump	0x546								; case 0xb
0517 7835       |x5  |		Jump	0x54d								; case 0xc
0518 7803       |x   |		Jump	0x51c								; case 0xd
0519 7809       |x   |		Jump	0x523								; case 0xe
051a 7800       |x   |		Jump	0x51b								; case 0xf
051b 0833       | 3  |		Execute_Immediate	Raise,0x33
051c 00d8       |    |		Load_Top	At_Offset_0
051d e5fe       |    |		Load	0x2,-0x2
051e e5ff       |    |		Load	0x2,-0x1
051f e231       | 1  |		Load	0x1,0x31
0520 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0521 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0522 7830       |x0  |		Jump	0x553
0523 00d8       |    |		Load_Top	At_Offset_0
0524 e5fe       |    |		Load	0x2,-0x2
0525 e5ff       |    |		Load	0x2,-0x1
0526 e22c       | ,  |		Load	0x1,0x2c
0527 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0528 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0529 7829       |x)  |		Jump	0x553
052a 00d8       |    |		Load_Top	At_Offset_0
052b e5fe       |    |		Load	0x2,-0x2
052c e5ff       |    |		Load	0x2,-0x1
052d e230       | 0  |		Load	0x1,0x30
052e 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
052f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0530 7822       |x"  |		Jump	0x553
0531 00d8       |    |		Load_Top	At_Offset_0
0532 e5fe       |    |		Load	0x2,-0x2
0533 e5ff       |    |		Load	0x2,-0x1
0534 e22f       | /  |		Load	0x1,0x2f
0535 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0536 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0537 781b       |x   |		Jump	0x553
0538 00d8       |    |		Load_Top	At_Offset_0
0539 e5fe       |    |		Load	0x2,-0x2
053a e5ff       |    |		Load	0x2,-0x1
053b e22d       | -  |		Load	0x1,0x2d
053c 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
053d 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
053e 7814       |x   |		Jump	0x553
053f 00d8       |    |		Load_Top	At_Offset_0
0540 e5fe       |    |		Load	0x2,-0x2
0541 e5ff       |    |		Load	0x2,-0x1
0542 e22e       | .  |		Load	0x1,0x2e
0543 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0544 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0545 780d       |x   |		Jump	0x553
0546 00d8       |    |		Load_Top	At_Offset_0
0547 e5fe       |    |		Load	0x2,-0x2
0548 e5ff       |    |		Load	0x2,-0x1
0549 e22b       | +  |		Load	0x1,0x2b
054a 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
054b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
054c 7806       |x   |		Jump	0x553
054d 00d8       |    |		Load_Top	At_Offset_0
054e e5fe       |    |		Load	0x2,-0x2
054f e5ff       |    |		Load	0x2,-0x1
0550 e22a       | *  |		Load	0x1,0x2a
0551 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0552 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0553 00d8       |    |		Load_Top	At_Offset_0
0554 a5fd       |    |		Store_Unchecked	0x2,-0x3
0555 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
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 00da       |    |		Load_Top	At_Offset_2
055c 0217       |    |		Execute	Heap_Access,All_Reference
055d 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
055e 703c       |p<  |		Jump_Nonzero	0x59b
055f 00da       |    |		Load_Top	At_Offset_2
0560 0217       |    |		Execute	Heap_Access,All_Reference
0561 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0562 460f       |F   |		Jump_Case	0x10
0563 780f       |x   |		Jump	0x573								; case 0x0
0564 7814       |x   |		Jump	0x579								; case 0x1
0565 7813       |x   |		Jump	0x579								; case 0x2
0566 7817       |x   |		Jump	0x57e								; case 0x3
0567 7816       |x   |		Jump	0x57e								; case 0x4
0568 781a       |x   |		Jump	0x583								; case 0x5
0569 7823       |x#  |		Jump	0x58d								; case 0x6
056a 781d       |x   |		Jump	0x588								; case 0x7
056b 7807       |x   |		Jump	0x573								; case 0x8
056c 7825       |x%  |		Jump	0x592								; case 0x9
056d 7824       |x$  |		Jump	0x592								; case 0xa
056e 7823       |x#  |		Jump	0x592								; case 0xb
056f 7827       |x'  |		Jump	0x597								; case 0xc
0570 7808       |x   |		Jump	0x579								; case 0xd
0571 7802       |x   |		Jump	0x574								; case 0xe
0572 7800       |x   |		Jump	0x573								; case 0xf
0573 0833       | 3  |		Execute_Immediate	Raise,0x33
0574 00da       |    |		Load_Top	At_Offset_2
0575 e22c       | ,  |		Load	0x1,0x2c
0576 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0577 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0578 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0579 00da       |    |		Load_Top	At_Offset_2
057a e231       | 1  |		Load	0x1,0x31
057b 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
057c 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
057d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
057e 00da       |    |		Load_Top	At_Offset_2
057f e230       | 0  |		Load	0x1,0x30
0580 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0581 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0582 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0583 00da       |    |		Load_Top	At_Offset_2
0584 e22f       | /  |		Load	0x1,0x2f
0585 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0586 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0587 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0588 00da       |    |		Load_Top	At_Offset_2
0589 e22d       | -  |		Load	0x1,0x2d
058a 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
058b 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
058c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
058d 00da       |    |		Load_Top	At_Offset_2
058e e22e       | .  |		Load	0x1,0x2e
058f 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0590 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0591 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0592 00da       |    |		Load_Top	At_Offset_2
0593 e22b       | +  |		Load	0x1,0x2b
0594 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0595 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0596 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0597 00da       |    |		Load_Top	At_Offset_2
0598 e22a       | *  |		Load	0x1,0x2a
0599 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
059a 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
059b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
059c 0000 0000  |    |		.BLANK	0000[0x4]
05a0 ; --------------------------------------------------------------------------------------
05a0 ; SUBPROGRAM
05a0 ; --------------------------------------------------------------------------------------
05a0 05a3       |    |		.CONST	0x05a3								; Address of begin
05a1 0004       |    |		.CONST	0x0004								; Address of exception handler
05a2 0001       |    |		.CONST	0x0001								; Number of locals
05a3			BODY_05a0:
05a3			INIT_05a0:
05a3 00da       |    |		Load_Top	At_Offset_2
05a4 0217       |    |		Execute	Heap_Access,All_Reference
05a5 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05a6 6802       |h   |		Jump_Zero	0x5a9
05a7 e005       |    |		Load	0x0,0x5
05a8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05a9 00da       |    |		Load_Top	At_Offset_2
05aa 0217       |    |		Execute	Heap_Access,All_Reference
05ab 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05ac 460f       |F   |		Jump_Case	0x10
05ad 780f       |x   |		Jump	0x5bd								; case 0x0
05ae 7813       |x   |		Jump	0x5c2								; case 0x1
05af 7812       |x   |		Jump	0x5c2								; case 0x2
05b0 7815       |x   |		Jump	0x5c6								; case 0x3
05b1 7814       |x   |		Jump	0x5c6								; case 0x4
05b2 7817       |x   |		Jump	0x5ca								; case 0x5
05b3 781e       |x   |		Jump	0x5d2								; case 0x6
05b4 7819       |x   |		Jump	0x5ce								; case 0x7
05b5 7807       |x   |		Jump	0x5bd								; case 0x8
05b6 781f       |x   |		Jump	0x5d6								; case 0x9
05b7 781e       |x   |		Jump	0x5d6								; case 0xa
05b8 781d       |x   |		Jump	0x5d6								; case 0xb
05b9 7820       |x   |		Jump	0x5da								; case 0xc
05ba 7807       |x   |		Jump	0x5c2								; case 0xd
05bb 7802       |x   |		Jump	0x5be								; case 0xe
05bc 7800       |x   |		Jump	0x5bd								; case 0xf
05bd 0833       | 3  |		Execute_Immediate	Raise,0x33
05be 00da       |    |		Load_Top	At_Offset_2
05bf e22c       | ,  |		Load	0x1,0x2c
05c0 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05c1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05c2 00da       |    |		Load_Top	At_Offset_2
05c3 e231       | 1  |		Load	0x1,0x31
05c4 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05c5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05c6 00da       |    |		Load_Top	At_Offset_2
05c7 e230       | 0  |		Load	0x1,0x30
05c8 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05c9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05ca 00da       |    |		Load_Top	At_Offset_2
05cb e22f       | /  |		Load	0x1,0x2f
05cc 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05ce 00da       |    |		Load_Top	At_Offset_2
05cf e22d       | -  |		Load	0x1,0x2d
05d0 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05d1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05d2 00da       |    |		Load_Top	At_Offset_2
05d3 e22e       | .  |		Load	0x1,0x2e
05d4 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05d5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05d6 00da       |    |		Load_Top	At_Offset_2
05d7 e22b       | +  |		Load	0x1,0x2b
05d8 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05d9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05da 00da       |    |		Load_Top	At_Offset_2
05db e22a       | *  |		Load	0x1,0x2a
05dc 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05dd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05de 0000 0000  |    |		.XXX[0x2]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05e3       |    |		.CONST	0x05e3								; Address of begin
05e1 0004       |    |		.CONST	0x0004								; Address of exception handler
05e2 0001       |    |		.CONST	0x0001								; Number of locals
05e3			BODY_05e0:
05e3			INIT_05e0:
05e3 00da       |    |		Load_Top	At_Offset_2
05e4 0217       |    |		Execute	Heap_Access,All_Reference
05e5 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05e6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05e7 0000       |    |		.XXX[0x1]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05eb       |    |		.CONST	0x05eb								; Address of begin
05e9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ea 0001       |    |		.CONST	0x0001								; Number of locals
05eb			BODY_05e8:
05eb			BODY_05e8:
05eb			INIT_05e8:
05eb			INIT_05e8:
05eb 4609       |F   |		Jump_Case	0xa
05ec 7809       |x   |		Jump	0x5f6								; case 0x0
05ed 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
05ee 784a       |xJ  |		Jump	0x639								; case 0x2
05ef 784d       |xM  |		Jump	0x63d								; case 0x3
05f0 7852       |xR  |		Jump	0x643								; case 0x4
05f1 785c       |x\  |		Jump	0x64e								; case 0x5
05f2 7872       |xr  |		Jump	0x665								; case 0x6
05f3 7895       |x   |		Jump	0x689								; case 0x7
05f4 78bb       |x   |		Jump	0x6b0								; case 0x8
05f5 78c1       |x   |		Jump	0x6b7								; case 0x9
05f6 00da       |    |		Load_Top	At_Offset_2
05f7 016c       | l  |		Execute	Variant_Record,Is_Constrained
05f8 7009       |p   |		Jump_Nonzero	0x602
05f9 00cf       |    |		Action	Mark_Auxiliary
05fa 4800       |H   |		Short_Literal	0x0
05fb e5ff       |    |		Load	0x2,-0x1
05fc 1c08       |    |		Execute_Immediate	Run_Utility,0x8
05fd 00d8       |    |		Load_Top	At_Offset_0
05fe 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05ff c5ff       |    |		Store	0x2,-0x1
0600 00ce       |    |		Action	Pop_Auxiliary
0601 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0602 4800       |H   |		Short_Literal	0x0
0603 00db       |    |		Load_Top	At_Offset_3
0604 2807       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x7
0605 4800       |H   |		Short_Literal	0x0
0606 00db       |    |		Load_Top	At_Offset_3
0607 2808       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x8
0608 4800       |H   |		Short_Literal	0x0
0609 00db       |    |		Load_Top	At_Offset_3
060a 280b       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0xb
060b 4800       |H   |		Short_Literal	0x0
060c 00db       |    |		Load_Top	At_Offset_3
060d 280c       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0xc
060e 4800       |H   |		Short_Literal	0x0
060f 00db       |    |		Load_Top	At_Offset_3
0610 280d       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0xd
0611 00da       |    |		Load_Top	At_Offset_2
0612 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0613 460f       |F   |		Jump_Case	0x10
0614 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0615 7813       |x   |		Jump	0x629								; case 0x1
0616 7812       |x   |		Jump	0x629								; case 0x2
0617 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0618 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0619 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
061a 7812       |x   |		Jump	0x62d								; case 0x6
061b 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
061c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
061d 7813       |x   |		Jump	0x631								; case 0x9
061e 7812       |x   |		Jump	0x631								; case 0xa
061f 7811       |x   |		Jump	0x631								; case 0xb
0620 7814       |x   |		Jump	0x635								; case 0xc
0621 7807       |x   |		Jump	0x629								; case 0xd
0622 7802       |x   |		Jump	0x625								; case 0xe
0623 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0xf
0624 4302       |C   |		.XXX[0x1]
0625 00da       |    |		Load_Top	At_Offset_2
0626 260e       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xe
0627 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0628 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0629 00da       |    |		Load_Top	At_Offset_2
062a 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
062b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
062c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
062d 00da       |    |		Load_Top	At_Offset_2
062e 2612       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x12
062f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0630 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0631 00da       |    |		Load_Top	At_Offset_2
0632 2614       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x14
0633 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0634 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0635 00da       |    |		Load_Top	At_Offset_2
0636 2615       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x15
0637 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0638 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0639 4801       |H   |		Short_Literal	0x1
063a 4815       |H   |		Short_Literal	0x15
063b 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
063c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
063d e5fd       |    |		Load	0x2,-0x3
063e 00db       |    |		Load_Top	At_Offset_3
063f 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0640 e5fe       |    |		Load	0x2,-0x2
0641 0306       |    |		Complete_Type	Variant_Record,By_Renaming
0642 4304       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x4
0643 4801       |H   |		Short_Literal	0x1
0644 4815       |H   |		Short_Literal	0x15
0645 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
0646 e5fe       |    |		Load	0x2,-0x2
0647 00d8       |    |		Load_Top	At_Offset_0
0648 e5ff       |    |		Load	0x2,-0x1
0649 1c06       |    |		Execute_Immediate	Run_Utility,0x6
064a e5ff       |    |		Load	0x2,-0x1
064b 00db       |    |		Load_Top	At_Offset_3
064c 0305       |    |		Complete_Type	Variant_Record,By_Constraining_Incomplete
064d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
064e 4801       |H   |		Short_Literal	0x1
064f 00db       |    |		Load_Top	At_Offset_3
0650 0169       | i  |		Execute	Variant_Record,Read_Discriminant_Constraint
0651 460f       |F   |		Jump_Case	0x10
0652 780f       |x   |		Jump	0x662								; case 0x0
0653 780e       |x   |		Jump	0x662								; case 0x1
0654 780d       |x   |		Jump	0x662								; case 0x2
0655 780c       |x   |		Jump	0x662								; case 0x3
0656 780b       |x   |		Jump	0x662								; case 0x4
0657 780a       |x   |		Jump	0x662								; case 0x5
0658 7809       |x   |		Jump	0x662								; case 0x6
0659 7808       |x   |		Jump	0x662								; case 0x7
065a 7807       |x   |		Jump	0x662								; case 0x8
065b 7806       |x   |		Jump	0x662								; case 0x9
065c 7805       |x   |		Jump	0x662								; case 0xa
065d 7804       |x   |		Jump	0x662								; case 0xb
065e 7803       |x   |		Jump	0x662								; case 0xc
065f 7802       |x   |		Jump	0x662								; case 0xd
0660 7801       |x   |		Jump	0x662								; case 0xe
0661 7800       |x   |		Jump	0x662								; case 0xf
0662 e5ff       |    |		Load	0x2,-0x1
0663 0304       |    |		Complete_Type	Variant_Record,By_Completing_Constraint
0664 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0665 00db       |    |		Load_Top	At_Offset_3
0666 460f       |F   |		Jump_Case	0x10
0667 780f       |x   |		Jump	0x677								; case 0x0
0668 7812       |x   |		Jump	0x67b								; case 0x1
0669 7811       |x   |		Jump	0x67b								; case 0x2
066a 7812       |x   |		Jump	0x67d								; case 0x3
066b 7811       |x   |		Jump	0x67d								; case 0x4
066c 7816       |x   |		Jump	0x683								; case 0x5
066d 7813       |x   |		Jump	0x681								; case 0x6
066e 7810       |x   |		Jump	0x67f								; case 0x7
066f 7807       |x   |		Jump	0x677								; case 0x8
0670 7814       |x   |		Jump	0x685								; case 0x9
0671 7813       |x   |		Jump	0x685								; case 0xa
0672 7812       |x   |		Jump	0x685								; case 0xb
0673 7813       |x   |		Jump	0x687								; case 0xc
0674 7806       |x   |		Jump	0x67b								; case 0xd
0675 7803       |x   |		Jump	0x679								; case 0xe
0676 7800       |x   |		Jump	0x677								; case 0xf
0677 48ff       |H   |		Short_Literal	0xff
0678 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0679 4801       |H   |		Short_Literal	0x1
067a 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
067b 4802       |H   |		Short_Literal	0x2
067c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
067d 4803       |H   |		Short_Literal	0x3
067e 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
067f 4804       |H   |		Short_Literal	0x4
0680 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0681 4805       |H   |		Short_Literal	0x5
0682 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0683 4806       |H   |		Short_Literal	0x6
0684 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0685 4807       |H   |		Short_Literal	0x7
0686 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0687 4808       |H   |		Short_Literal	0x8
0688 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0689 00db       |    |		Load_Top	At_Offset_3
068a e5fe       |    |		Load	0x2,-0x2
068b 460f       |F   |		Jump_Case	0x10
068c 780f       |x   |		Jump	0x69c								; case 0x0
068d 7812       |x   |		Jump	0x6a0								; case 0x1
068e 7811       |x   |		Jump	0x6a0								; case 0x2
068f 7812       |x   |		Jump	0x6a2								; case 0x3
0690 7811       |x   |		Jump	0x6a2								; case 0x4
0691 7816       |x   |		Jump	0x6a8								; case 0x5
0692 7813       |x   |		Jump	0x6a6								; case 0x6
0693 7810       |x   |		Jump	0x6a4								; case 0x7
0694 7807       |x   |		Jump	0x69c								; case 0x8
0695 7814       |x   |		Jump	0x6aa								; case 0x9
0696 7813       |x   |		Jump	0x6aa								; case 0xa
0697 7812       |x   |		Jump	0x6aa								; case 0xb
0698 7813       |x   |		Jump	0x6ac								; case 0xc
0699 7806       |x   |		Jump	0x6a0								; case 0xd
069a 7803       |x   |		Jump	0x69e								; case 0xe
069b 7800       |x   |		Jump	0x69c								; case 0xf
069c 48ff       |H   |		Short_Literal	0xff
069d 780f       |x   |		Jump	0x6ad
069e 4801       |H   |		Short_Literal	0x1
069f 780d       |x   |		Jump	0x6ad
06a0 4802       |H   |		Short_Literal	0x2
06a1 780b       |x   |		Jump	0x6ad
06a2 4803       |H   |		Short_Literal	0x3
06a3 7809       |x   |		Jump	0x6ad
06a4 4804       |H   |		Short_Literal	0x4
06a5 7807       |x   |		Jump	0x6ad
06a6 4805       |H   |		Short_Literal	0x5
06a7 7805       |x   |		Jump	0x6ad
06a8 4806       |H   |		Short_Literal	0x6
06a9 7803       |x   |		Jump	0x6ad
06aa 4807       |H   |		Short_Literal	0x7
06ab 7801       |x   |		Jump	0x6ad
06ac 4808       |H   |		Short_Literal	0x8
06ad e5ff       |    |		Load	0x2,-0x1
06ae 031b       |    |		Declare_Type	Variant_Record,Constrained
06af 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
06b0 00db       |    |		Load_Top	At_Offset_3
06b1 e5fe       |    |		Load	0x2,-0x2
06b2 e5ff       |    |		Load	0x2,-0x1
06b3 1c06       |    |		Execute_Immediate	Run_Utility,0x6
06b4 e5ff       |    |		Load	0x2,-0x1
06b5 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
06b6 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
06b7 4800       |H   |		Short_Literal	0x0
06b8 00db       |    |		Load_Top	At_Offset_3
06b9 1c07       |    |		Execute_Immediate	Run_Utility,0x7
06ba 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
06bb 0000 0000  |    |		.BLANK	0000[0x5]
06c0 ; --------------------------------------------------------------------------------------
06c0 ; SUBPROGRAM
06c0 ; SUBPROGRAM
06c0 ; --------------------------------------------------------------------------------------
06c0 06c3       |    |		.CONST	0x06c3								; Address of begin
06c1 0004       |    |		.CONST	0x0004								; Address of exception handler
06c2 0001       |    |		.CONST	0x0001								; Number of locals
06c3			BODY_06c0:
06c3			BODY_06c0:
06c3			INIT_06c0:
06c3			INIT_06c0:
06c3 4609       |F   |		Jump_Case	0xa
06c4 7809       |x   |		Jump	0x6ce								; case 0x0
06c5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
06c6 783e       |x>  |		Jump	0x705								; case 0x2
06c7 7841       |xA  |		Jump	0x709								; case 0x3
06c8 7846       |xF  |		Jump	0x70f								; case 0x4
06c9 7850       |xP  |		Jump	0x71a								; case 0x5
06ca 7866       |xf  |		Jump	0x731								; case 0x6
06cb 7889       |x   |		Jump	0x755								; case 0x7
06cc 78af       |x   |		Jump	0x77c								; case 0x8
06cd 78b5       |x   |		Jump	0x783								; case 0x9
06ce 00da       |    |		Load_Top	At_Offset_2
06cf 016c       | l  |		Execute	Variant_Record,Is_Constrained
06d0 7009       |p   |		Jump_Nonzero	0x6da
06d1 00cf       |    |		Action	Mark_Auxiliary
06d2 4800       |H   |		Short_Literal	0x0
06d3 e5ff       |    |		Load	0x2,-0x1
06d4 1c08       |    |		Execute_Immediate	Run_Utility,0x8
06d5 00d8       |    |		Load_Top	At_Offset_0
06d6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06d7 c5ff       |    |		Store	0x2,-0x1
06d8 00ce       |    |		Action	Pop_Auxiliary
06d9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
06da 4800       |H   |		Short_Literal	0x0
06db 00db       |    |		Load_Top	At_Offset_3
06dc 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06dd 00da       |    |		Load_Top	At_Offset_2
06de 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06df 460f       |F   |		Jump_Case	0x10
06e0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
06e1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
06e2 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
06e3 780d       |x   |		Jump	0x6f1								; case 0x3
06e4 780c       |x   |		Jump	0x6f1								; case 0x4
06e5 7813       |x   |		Jump	0x6f9								; case 0x5
06e6 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
06e7 780d       |x   |		Jump	0x6f5								; case 0x7
06e8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
06e9 7813       |x   |		Jump	0x6fd								; case 0x9
06ea 7812       |x   |		Jump	0x6fd								; case 0xa
06eb 7811       |x   |		Jump	0x6fd								; case 0xb
06ec 7814       |x   |		Jump	0x701								; case 0xc
06ed 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0xd
06ee 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0xe
06ef 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0xf
06f0 4302       |C   |		.XXX[0x1]
06f1 00da       |    |		Load_Top	At_Offset_2
06f2 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
06f3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06f4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
06f5 00da       |    |		Load_Top	At_Offset_2
06f6 2606       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6
06f7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06f8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
06f9 00da       |    |		Load_Top	At_Offset_2
06fa 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
06fb 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06fc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
06fd 00da       |    |		Load_Top	At_Offset_2
06fe 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
06ff 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0700 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0701 00da       |    |		Load_Top	At_Offset_2
0702 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0703 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0704 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0705 4801       |H   |		Short_Literal	0x1
0706 480b       |H   |		Short_Literal	0xb
0707 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
0708 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0709 e5fd       |    |		Load	0x2,-0x3
070a 00db       |    |		Load_Top	At_Offset_3
070b 1c07       |    |		Execute_Immediate	Run_Utility,0x7
070c e5fe       |    |		Load	0x2,-0x2
070d 0306       |    |		Complete_Type	Variant_Record,By_Renaming
070e 4304       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x4
070f 4801       |H   |		Short_Literal	0x1
0710 480b       |H   |		Short_Literal	0xb
0711 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
0712 e5fe       |    |		Load	0x2,-0x2
0713 00d8       |    |		Load_Top	At_Offset_0
0714 e5ff       |    |		Load	0x2,-0x1
0715 1c06       |    |		Execute_Immediate	Run_Utility,0x6
0716 e5ff       |    |		Load	0x2,-0x1
0717 00db       |    |		Load_Top	At_Offset_3
0718 0305       |    |		Complete_Type	Variant_Record,By_Constraining_Incomplete
0719 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
071a 4801       |H   |		Short_Literal	0x1
071b 00db       |    |		Load_Top	At_Offset_3
071c 0169       | i  |		Execute	Variant_Record,Read_Discriminant_Constraint
071d 460f       |F   |		Jump_Case	0x10
071e 780f       |x   |		Jump	0x72e								; case 0x0
071f 780e       |x   |		Jump	0x72e								; case 0x1
0720 780d       |x   |		Jump	0x72e								; case 0x2
0721 780c       |x   |		Jump	0x72e								; case 0x3
0722 780b       |x   |		Jump	0x72e								; case 0x4
0723 780a       |x   |		Jump	0x72e								; case 0x5
0724 7809       |x   |		Jump	0x72e								; case 0x6
0725 7808       |x   |		Jump	0x72e								; case 0x7
0726 7807       |x   |		Jump	0x72e								; case 0x8
0727 7806       |x   |		Jump	0x72e								; case 0x9
0728 7805       |x   |		Jump	0x72e								; case 0xa
0729 7804       |x   |		Jump	0x72e								; case 0xb
072a 7803       |x   |		Jump	0x72e								; case 0xc
072b 7802       |x   |		Jump	0x72e								; case 0xd
072c 7801       |x   |		Jump	0x72e								; case 0xe
072d 7800       |x   |		Jump	0x72e								; case 0xf
072e e5ff       |    |		Load	0x2,-0x1
072f 0304       |    |		Complete_Type	Variant_Record,By_Completing_Constraint
0730 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0731 00db       |    |		Load_Top	At_Offset_3
0732 460f       |F   |		Jump_Case	0x10
0733 780f       |x   |		Jump	0x743								; case 0x0
0734 7810       |x   |		Jump	0x745								; case 0x1
0735 780f       |x   |		Jump	0x745								; case 0x2
0736 7810       |x   |		Jump	0x747								; case 0x3
0737 780f       |x   |		Jump	0x747								; case 0x4
0738 7814       |x   |		Jump	0x74d								; case 0x5
0739 7811       |x   |		Jump	0x74b								; case 0x6
073a 780e       |x   |		Jump	0x749								; case 0x7
073b 7807       |x   |		Jump	0x743								; case 0x8
073c 7812       |x   |		Jump	0x74f								; case 0x9
073d 7811       |x   |		Jump	0x74f								; case 0xa
073e 7810       |x   |		Jump	0x74f								; case 0xb
073f 7813       |x   |		Jump	0x753								; case 0xc
0740 7804       |x   |		Jump	0x745								; case 0xd
0741 780f       |x   |		Jump	0x751								; case 0xe
0742 7800       |x   |		Jump	0x743								; case 0xf
0743 48ff       |H   |		Short_Literal	0xff
0744 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0745 4801       |H   |		Short_Literal	0x1
0746 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0747 4802       |H   |		Short_Literal	0x2
0748 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0749 4803       |H   |		Short_Literal	0x3
074a 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
074b 4804       |H   |		Short_Literal	0x4
074c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
074d 4805       |H   |		Short_Literal	0x5
074e 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
074f 4806       |H   |		Short_Literal	0x6
0750 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0751 4807       |H   |		Short_Literal	0x7
0752 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0753 4808       |H   |		Short_Literal	0x8
0754 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0755 00db       |    |		Load_Top	At_Offset_3
0756 e5fe       |    |		Load	0x2,-0x2
0757 460f       |F   |		Jump_Case	0x10
0758 780f       |x   |		Jump	0x768								; case 0x0
0759 7810       |x   |		Jump	0x76a								; case 0x1
075a 780f       |x   |		Jump	0x76a								; case 0x2
075b 7810       |x   |		Jump	0x76c								; case 0x3
075c 780f       |x   |		Jump	0x76c								; case 0x4
075d 7814       |x   |		Jump	0x772								; case 0x5
075e 7811       |x   |		Jump	0x770								; case 0x6
075f 780e       |x   |		Jump	0x76e								; case 0x7
0760 7807       |x   |		Jump	0x768								; case 0x8
0761 7812       |x   |		Jump	0x774								; case 0x9
0762 7811       |x   |		Jump	0x774								; case 0xa
0763 7810       |x   |		Jump	0x774								; case 0xb
0764 7813       |x   |		Jump	0x778								; case 0xc
0765 7804       |x   |		Jump	0x76a								; case 0xd
0766 780f       |x   |		Jump	0x776								; case 0xe
0767 7800       |x   |		Jump	0x768								; case 0xf
0768 48ff       |H   |		Short_Literal	0xff
0769 780f       |x   |		Jump	0x779
076a 4801       |H   |		Short_Literal	0x1
076b 780d       |x   |		Jump	0x779
076c 4802       |H   |		Short_Literal	0x2
076d 780b       |x   |		Jump	0x779
076e 4803       |H   |		Short_Literal	0x3
076f 7809       |x   |		Jump	0x779
0770 4804       |H   |		Short_Literal	0x4
0771 7807       |x   |		Jump	0x779
0772 4805       |H   |		Short_Literal	0x5
0773 7805       |x   |		Jump	0x779
0774 4806       |H   |		Short_Literal	0x6
0775 7803       |x   |		Jump	0x779
0776 4807       |H   |		Short_Literal	0x7
0777 7801       |x   |		Jump	0x779
0778 4808       |H   |		Short_Literal	0x8
0779 e5ff       |    |		Load	0x2,-0x1
077a 031b       |    |		Declare_Type	Variant_Record,Constrained
077b 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
077c 00db       |    |		Load_Top	At_Offset_3
077d e5fe       |    |		Load	0x2,-0x2
077e e5ff       |    |		Load	0x2,-0x1
077f 1c06       |    |		Execute_Immediate	Run_Utility,0x6
0780 e5ff       |    |		Load	0x2,-0x1
0781 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
0782 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0783 4800       |H   |		Short_Literal	0x0
0784 00db       |    |		Load_Top	At_Offset_3
0785 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0786 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0787 0000       |    |		.XXX[0x1]
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 078b       |    |		.CONST	0x078b								; Address of begin
0789 0004       |    |		.CONST	0x0004								; Address of exception handler
078a 0001       |    |		.CONST	0x0001								; Number of locals
078b			BODY_0788:
078b			INIT_0788:
078b 4601       |F   |		Jump_Case	0x2
078c 7801       |x   |		Jump	0x78e								; case 0x0
078d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
078e 4800       |H   |		Short_Literal	0x0
078f 00db       |    |		Load_Top	At_Offset_3
0790 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0791 4800       |H   |		Short_Literal	0x0
0792 00db       |    |		Load_Top	At_Offset_3
0793 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0794 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0795 0000 0000  |    |		.XXX[0x3]
0797 0000       |    |
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 079b       |    |		.CONST	0x079b								; Address of begin
0799 0004       |    |		.CONST	0x0004								; Address of exception handler
079a 0001       |    |		.CONST	0x0001								; Number of locals
079b			BODY_0798:
079b			INIT_0798:
079b 4601       |F   |		Jump_Case	0x2
079c 7801       |x   |		Jump	0x79e								; case 0x0
079d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
079e 4800       |H   |		Short_Literal	0x0
079f 00db       |    |		Load_Top	At_Offset_3
07a0 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
07a1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
07a2 0000 0000  |    |		.BLANK	0000[0x6]
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07ab       |    |		.CONST	0x07ab								; Address of begin
07a9 0004       |    |		.CONST	0x0004								; Address of exception handler
07aa 0001       |    |		.CONST	0x0001								; Number of locals
07ab			BODY_07a8:
07ab			INIT_07a8:
07ab e223       | #  |		Load	0x1,0x23
07ac 6803       |h   |		Jump_Zero	0x7b0
07ad 00da       |    |		Load_Top	At_Offset_2
07ae e02e       | .  |		Load	0x0,0x2e
07af 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
07b0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07b1 0000 0000  |    |		.BLANK	0000[0x7]
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07cc       |    |		.CONST	0x07cc								; Address of begin
07b9 0004       |    |		.CONST	0x0004								; Address of exception handler
07ba 0006       |    |		.CONST	0x0006								; Number of locals
07bb			INIT_07b8:
07bb 4801       |H   |		Short_Literal	0x1
07bc 00ea       |    |		Load_Encached	Null_String_Cache
07bd 4800       |H   |		Short_Literal	0x0
07be e5ff       |    |		Load	0x2,-0x1
07bf 802f       | /  |		Call	0x0,0x2f
07c0 00d8       |    |		Load_Top	At_Offset_0
07c1 01dd       |    |		Execute	Vector,First
07c2 00e3       |    |		Load_Encached	Natural_Cache
07c3 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
07c4 00d9       |    |		Load_Top	At_Offset_1
07c5 01dd       |    |		Execute	Vector,First
07c6 00e3       |    |		Load_Encached	Natural_Cache
07c7 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
07c8 029f 0d5b  |   [|		Declare_Subprogram	INIT_0d58,For_Call
07ca 029f 0d9b  |    |		Declare_Subprogram	INIT_0d98,For_Call
07cc			BODY_07b8:
07cc 00cf       |    |		Action	Mark_Auxiliary
07cd 7804       |x   |		Jump	0x7d2
07ce e403       |    |		Load	0x2,0x3
07cf 0a01       |    |		Execute_Immediate	Plus,0x1
07d0 c403       |    |		Store	0x2,0x3
07d1 00c9       |    |		Action	Pop_Auxiliary_Loop
07d2 e403       |    |		Load	0x2,0x3
07d3 e402       |    |		Load	0x2,0x2
07d4 01d7       |    |		Execute	Vector,Field_Read
07d5 0f20       |    |		Execute_Immediate	Equal,0x20
07d6 77f7       |w   |		Jump_Nonzero	0x7ce
07d7 00c9       |    |		Action	Pop_Auxiliary_Loop
07d8 7804       |x   |		Jump	0x7dd
07d9 00db       |    |		Load_Top	At_Offset_3
07da 0a01       |    |		Execute_Immediate	Plus,0x1
07db c404       |    |		Store	0x2,0x4
07dc 00c9       |    |		Action	Pop_Auxiliary_Loop
07dd 00db       |    |		Load_Top	At_Offset_3
07de 8405       |    |		Call	0x2,0x5
07df 6ff9       |o   |		Jump_Zero	0x7d9
07e0 00ce       |    |		Action	Pop_Auxiliary
07e1 0092 0efa  |    |		Action	Push_String_Extended,0xefa					; "\x22"
07e3 e403       |    |		Load	0x2,0x3
07e4 e404       |    |		Load	0x2,0x4
07e5 e402       |    |		Load	0x2,0x2
07e6 01cf       |    |		Execute	Vector,Slice_Read
07e7 01cc       |    |		Execute	Vector,Catenate
07e8 0092 0efa  |    |		Action	Push_String_Extended,0xefa					; "\x22"
07ea 01cc       |    |		Execute	Vector,Catenate
07eb 0092 0efb  |    |		Action	Push_String_Extended,0xefb					; " in "
07ed 01cc       |    |		Execute	Vector,Catenate
07ee e5ff       |    |		Load	0x2,-0x1
07ef 8406       |    |		Call	0x2,0x6
07f0 01cc       |    |		Execute	Vector,Catenate
07f1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07f2 0000 0000  |    |		.BLANK	0000[0x6]
07f8 ; --------------------------------------------------------------------------------------
07f8 ; SUBPROGRAM
07f8 ; --------------------------------------------------------------------------------------
07f8 0801       |    |		.CONST	0x0801								; Address of begin
07f9 0004       |    |		.CONST	0x0004								; Address of exception handler
07fa 0002       |    |		.CONST	0x0002								; Number of locals
07fb			INIT_07f8:
07fb e227       | '  |		Load	0x1,0x27
07fc e5fd       |    |		Load	0x2,-0x3
07fd 039c       |    |		Declare_Variable	Heap_Access,By_Allocation
07fe 00d8       |    |		Load_Top	At_Offset_0
07ff 0217       |    |		Execute	Heap_Access,All_Reference
0800 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0801			BODY_07f8:
0801 00db       |    |		Load_Top	At_Offset_3
0802 00d9       |    |		Load_Top	At_Offset_1
0803 0217       |    |		Execute	Heap_Access,All_Reference
0804 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0805 e5fe       |    |		Load	0x2,-0x2
0806 00d9       |    |		Load_Top	At_Offset_1
0807 0217       |    |		Execute	Heap_Access,All_Reference
0808 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0809 00d8       |    |		Load_Top	At_Offset_0
080a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
080b 0000 0000  |    |		.BLANK	0000[0x5]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 0813       |    |		.CONST	0x0813								; Address of begin
0811 0004       |    |		.CONST	0x0004								; Address of exception handler
0812 0001       |    |		.CONST	0x0001								; Number of locals
0813			BODY_0810:
0813			INIT_0810:
0813 00da       |    |		Load_Top	At_Offset_2
0814 a5fd       |    |		Store_Unchecked	0x2,-0x3
0815 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0816 0000 0000  |    |		.XXX[0x2]
0818 ; --------------------------------------------------------------------------------------
0818 ; SUBPROGRAM
0818 ; --------------------------------------------------------------------------------------
0818 081b       |    |		.CONST	0x081b								; Address of begin
0819 0004       |    |		.CONST	0x0004								; Address of exception handler
081a 0001       |    |		.CONST	0x0001								; Number of locals
081b			BODY_0818:
081b			INIT_0818:
081b 00da       |    |		Load_Top	At_Offset_2
081c e030       | 0  |		Load	0x0,0x30
081d e004       |    |		Load	0x0,0x4
081e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
081f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0820 ; --------------------------------------------------------------------------------------
0820 ; SUBPROGRAM
0820 ; --------------------------------------------------------------------------------------
0820 082e       | .  |		.CONST	0x082e								; Address of begin
0821 0004       |    |		.CONST	0x0004								; Address of exception handler
0822 0003       |    |		.CONST	0x0003								; Number of locals
0823			INIT_0820:
0823 e031       | 1  |		Load	0x0,0x31
0824 0322       | "  |		Declare_Variable	Record
0825 00db       |    |		Load_Top	At_Offset_3
0826 8021       | !  |		Call	0x0,0x21
0827 8032       | 2  |		Call	0x0,0x32
0828 00d9       |    |		Load_Top	At_Offset_1
0829 017d       | }  |		Execute	Record,Structure_Write
082a 00d8       |    |		Load_Top	At_Offset_0
082b 8033       | 3  |		Call	0x0,0x33
082c e034       | 4  |		Load	0x0,0x34
082d 03f1       |    |		Declare_Variable	Discrete,With_Value
082e			BODY_0820:
082e 00d8       |    |		Load_Top	At_Offset_0
082f 8236       | 6  |		Call	0x1,0x36
0830 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0831 0000 0000  |    |		.BLANK	0000[0x7]
0838 ; --------------------------------------------------------------------------------------
0838 ; SUBPROGRAM
0838 ; --------------------------------------------------------------------------------------
0838 083f       | ?  |		.CONST	0x083f								; Address of begin
0839 0846       | F  |		.CONST	0x0846								; Address of exception handler
083a 0002       |    |		.CONST	0x0002								; Number of locals
083b			INIT_0838:
083b e031       | 1  |		Load	0x0,0x31
083c 0322       | "  |		Declare_Variable	Record
083d 00d8       |    |		Load_Top	At_Offset_0
083e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
083f			BODY_0838:
083f 00db       |    |		Load_Top	At_Offset_3
0840 8021       | !  |		Call	0x0,0x21
0841 8032       | 2  |		Call	0x0,0x32
0842 00d9       |    |		Load_Top	At_Offset_1
0843 017d       | }  |		Execute	Record,Structure_Write
0844 4801       |H   |		Short_Literal	0x1
0845 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0846			TRAP_0838:
0846 0007       |    |		Action	Break_Optional
0847 4800       |H   |		Short_Literal	0x0
0848 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0849 0000 0000  |    |		.BLANK	0000[0x7]
0850 ; --------------------------------------------------------------------------------------
0850 ; SUBPROGRAM
0850 ; --------------------------------------------------------------------------------------
0850 0859       | Y  |		.CONST	0x0859								; Address of begin
0851 0004       |    |		.CONST	0x0004								; Address of exception handler
0852 0002       |    |		.CONST	0x0002								; Number of locals
0853			INIT_0850:
0853 e017       |    |		Load	0x0,0x17
0854 0322       | "  |		Declare_Variable	Record
0855 00db       |    |		Load_Top	At_Offset_3
0856 801a       |    |		Call	0x0,0x1a
0857 00d9       |    |		Load_Top	At_Offset_1
0858 017d       | }  |		Execute	Record,Structure_Write
0859			BODY_0850:
0859 00cf       |    |		Action	Mark_Auxiliary
085a 780a       |x   |		Jump	0x865
085b 00d9       |    |		Load_Top	At_Offset_1
085c 8013       |    |		Call	0x0,0x13
085d 801e       |    |		Call	0x0,0x1e
085e 6802       |h   |		Jump_Zero	0x861
085f 4804       |H   |		Short_Literal	0x4
0860 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0861 00d9       |    |		Load_Top	At_Offset_1
0862 801c       |    |		Call	0x0,0x1c
0863 00d1       |    |		Pop_Control	Pop_Count_1
0864 00c9       |    |		Action	Pop_Auxiliary_Loop
0865 00d9       |    |		Load_Top	At_Offset_1
0866 8012       |    |		Call	0x0,0x12
0867 6ff3       |o   |		Jump_Zero	0x85b
0868 00ce       |    |		Action	Pop_Auxiliary
0869 4803       |H   |		Short_Literal	0x3
086a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
086b 0000 0000  |    |		.BLANK	0000[0x5]
0870 ; --------------------------------------------------------------------------------------
0870 ; SUBPROGRAM
0870 ; --------------------------------------------------------------------------------------
0870 0873       | s  |		.CONST	0x0873								; Address of begin
0871 0004       |    |		.CONST	0x0004								; Address of exception handler
0872 0001       |    |		.CONST	0x0001								; Number of locals
0873			BODY_0870:
0873			INIT_0870:
0873 00da       |    |		Load_Top	At_Offset_2
0874 8035       | 5  |		Call	0x0,0x35
0875 4602       |F   |		Jump_Case	0x3
0876 7804       |x   |		Jump	0x87b								; case 0x0
0877 7805       |x   |		Jump	0x87d								; case 0x1
0878 7800       |x   |		Jump	0x879								; case 0x2
0879 480b       |H   |		Short_Literal	0xb
087a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
087b 4809       |H   |		Short_Literal	0x9
087c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
087d 480a       |H   |		Short_Literal	0xa
087e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
087f 0000       |    |		.XXX[0x1]
0880 ; --------------------------------------------------------------------------------------
0880 ; SUBPROGRAM
0880 ; --------------------------------------------------------------------------------------
0880 0883       |    |		.CONST	0x0883								; Address of begin
0881 0004       |    |		.CONST	0x0004								; Address of exception handler
0882 0001       |    |		.CONST	0x0001								; Number of locals
0883			BODY_0880:
0883			INIT_0880:
0883 00da       |    |		Load_Top	At_Offset_2
0884 8036       | 6  |		Call	0x0,0x36
0885 4613       |F   |		Jump_Case	0x14
0886 7813       |x   |		Jump	0x89a								; case 0x0
0887 7812       |x   |		Jump	0x89a								; case 0x1
0888 7811       |x   |		Jump	0x89a								; case 0x2
0889 7812       |x   |		Jump	0x89c								; case 0x3
088a 780f       |x   |		Jump	0x89a								; case 0x4
088b 780e       |x   |		Jump	0x89a								; case 0x5
088c 780d       |x   |		Jump	0x89a								; case 0x6
088d 780c       |x   |		Jump	0x89a								; case 0x7
088e 780b       |x   |		Jump	0x89a								; case 0x8
088f 780a       |x   |		Jump	0x89a								; case 0x9
0890 7809       |x   |		Jump	0x89a								; case 0xa
0891 780c       |x   |		Jump	0x89e								; case 0xb
0892 780e       |x   |		Jump	0x8a1								; case 0xc
0893 780f       |x   |		Jump	0x8a3								; case 0xd
0894 7811       |x   |		Jump	0x8a6								; case 0xe
0895 7814       |x   |		Jump	0x8aa								; case 0xf
0896 7811       |x   |		Jump	0x8a8								; case 0x10
0897 7802       |x   |		Jump	0x89a								; case 0x11
0898 7801       |x   |		Jump	0x89a								; case 0x12
0899 7800       |x   |		Jump	0x89a								; case 0x13
089a 480e       |H   |		Short_Literal	0xe
089b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
089c 480c       |H   |		Short_Literal	0xc
089d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
089e 00da       |    |		Load_Top	At_Offset_2
089f 8239       | 9  |		Call	0x1,0x39
08a0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08a1 4805       |H   |		Short_Literal	0x5
08a2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08a3 00da       |    |		Load_Top	At_Offset_2
08a4 823a       | :  |		Call	0x1,0x3a
08a5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08a6 480d       |H   |		Short_Literal	0xd
08a7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08a8 4807       |H   |		Short_Literal	0x7
08a9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08aa 4806       |H   |		Short_Literal	0x6
08ab 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08ac 0000 0000  |    |		.BLANK	0000[0x4]
08b0 ; --------------------------------------------------------------------------------------
08b0 ; SUBPROGRAM
08b0 ; --------------------------------------------------------------------------------------
08b0 08b3       |    |		.CONST	0x08b3								; Address of begin
08b1 0004       |    |		.CONST	0x0004								; Address of exception handler
08b2 0001       |    |		.CONST	0x0001								; Number of locals
08b3			BODY_08b0:
08b3			INIT_08b0:
08b3 00da       |    |		Load_Top	At_Offset_2
08b4 8028       | (  |		Call	0x0,0x28
08b5 00d8       |    |		Load_Top	At_Offset_0
08b6 0c1b       |    |		Execute_Immediate	Greater_Equal,0x1b
08b7 701e       |p   |		Jump_Nonzero	0x8d6
08b8 461a       |F   |		Jump_Case	0x1b
08b9 781d       |x   |		Jump	0x8d7								; case 0x0
08ba 781c       |x   |		Jump	0x8d7								; case 0x1
08bb 781b       |x   |		Jump	0x8d7								; case 0x2
08bc 781a       |x   |		Jump	0x8d7								; case 0x3
08bd 7819       |x   |		Jump	0x8d7								; case 0x4
08be 7818       |x   |		Jump	0x8d7								; case 0x5
08bf 7817       |x   |		Jump	0x8d7								; case 0x6
08c0 7816       |x   |		Jump	0x8d7								; case 0x7
08c1 7815       |x   |		Jump	0x8d7								; case 0x8
08c2 7814       |x   |		Jump	0x8d7								; case 0x9
08c3 7813       |x   |		Jump	0x8d7								; case 0xa
08c4 7814       |x   |		Jump	0x8d9								; case 0xb
08c5 7811       |x   |		Jump	0x8d7								; case 0xc
08c6 7812       |x   |		Jump	0x8d9								; case 0xd
08c7 780f       |x   |		Jump	0x8d7								; case 0xe
08c8 780e       |x   |		Jump	0x8d7								; case 0xf
08c9 780d       |x   |		Jump	0x8d7								; case 0x10
08ca 780c       |x   |		Jump	0x8d7								; case 0x11
08cb 780b       |x   |		Jump	0x8d7								; case 0x12
08cc 780a       |x   |		Jump	0x8d7								; case 0x13
08cd 7809       |x   |		Jump	0x8d7								; case 0x14
08ce 7808       |x   |		Jump	0x8d7								; case 0x15
08cf 7807       |x   |		Jump	0x8d7								; case 0x16
08d0 7806       |x   |		Jump	0x8d7								; case 0x17
08d1 7805       |x   |		Jump	0x8d7								; case 0x18
08d2 7804       |x   |		Jump	0x8d7								; case 0x19
08d3 7800       |x   |		Jump	0x8d4								; case 0x1a
08d4 4802       |H   |		Short_Literal	0x2
08d5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08d6 00d1       |    |		Pop_Control	Pop_Count_1
08d7 480e       |H   |		Short_Literal	0xe
08d8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08d9 4801       |H   |		Short_Literal	0x1
08da 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08db 0000 0000  |    |		.BLANK	0000[0x5]
08e0 ; --------------------------------------------------------------------------------------
08e0 ; SUBPROGRAM
08e0 ; --------------------------------------------------------------------------------------
08e0 08e5       |    |		.CONST	0x08e5								; Address of begin
08e1 0004       |    |		.CONST	0x0004								; Address of exception handler
08e2 0002       |    |		.CONST	0x0002								; Number of locals
08e3			INIT_08e0:
08e3 e003       |    |		Load	0x0,0x3
08e4 0007       |    |		Action	Break_Optional
08e5			BODY_08e0:
08e5 e5fd       |    |		Load	0x2,-0x3
08e6 8012       |    |		Call	0x0,0x12
08e7 7016       |p   |		Jump_Nonzero	0x8fe
08e8 00cf       |    |		Action	Mark_Auxiliary
08e9 e5fd       |    |		Load	0x2,-0x3
08ea 8013       |    |		Call	0x0,0x13
08eb 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
08ec e5fd       |    |		Load	0x2,-0x3
08ed 801c       |    |		Call	0x0,0x1c
08ee 00d1       |    |		Pop_Control	Pop_Count_1
08ef e5ff       |    |		Load	0x2,-0x1
08f0 7004       |p   |		Jump_Nonzero	0x8f5
08f1 00d9       |    |		Load_Top	At_Offset_1
08f2 823b       | ;  |		Call	0x1,0x3b
08f3 0e0e       |    |		Execute_Immediate	Not_Equal,0xe
08f4 6803       |h   |		Jump_Zero	0x8f8
08f5 00d9       |    |		Load_Top	At_Offset_1
08f6 a5fe       |    |		Store_Unchecked	0x2,-0x2
08f7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
08f8 e5fd       |    |		Load	0x2,-0x3
08f9 8012       |    |		Call	0x0,0x12
08fa 7002       |p   |		Jump_Nonzero	0x8fd
08fb 00c9       |    |		Action	Pop_Auxiliary_Loop
08fc 7fec       |    |		Jump	0x8e9
08fd 00ce       |    |		Action	Pop_Auxiliary
08fe e006       |    |		Load	0x0,0x6
08ff a5fe       |    |		Store_Unchecked	0x2,-0x2
0900 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0901 0000 0000  |    |		.BLANK	0000[0x7]
0908 ; --------------------------------------------------------------------------------------
0908 ; SUBPROGRAM
0908 ; --------------------------------------------------------------------------------------
0908 090f       |    |		.CONST	0x090f								; Address of begin
0909 0004       |    |		.CONST	0x0004								; Address of exception handler
090a 0003       |    |		.CONST	0x0003								; Number of locals
090b			INIT_0908:
090b e003       |    |		Load	0x0,0x3
090c 0007       |    |		Action	Break_Optional
090d 00d8       |    |		Load_Top	At_Offset_0
090e 0007       |    |		Action	Break_Optional
090f			BODY_0908:
090f e5fc       |    |		Load	0x2,-0x4
0910 8012       |    |		Call	0x0,0x12
0911 7003       |p   |		Jump_Nonzero	0x915
0912 e5fc       |    |		Load	0x2,-0x4
0913 8013       |    |		Call	0x0,0x13
0914 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0915 e5fc       |    |		Load	0x2,-0x4
0916 e003       |    |		Load	0x0,0x3
0917 e5ff       |    |		Load	0x2,-0x1
0918 823d       | =  |		Call	0x1,0x3d
0919 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
091a 00d1       |    |		Pop_Control	Pop_Count_1
091b 00d8       |    |		Load_Top	At_Offset_0
091c a5fe       |    |		Store_Unchecked	0x2,-0x2
091d 00d9       |    |		Load_Top	At_Offset_1
091e 00d9       |    |		Load_Top	At_Offset_1
091f 021f       |    |		Execute	Heap_Access,Equal
0920 a5fd       |    |		Store_Unchecked	0x2,-0x3
0921 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0922 0000 0000  |    |		.BLANK	0000[0x6]
0928 ; --------------------------------------------------------------------------------------
0928 ; SUBPROGRAM
0928 ; --------------------------------------------------------------------------------------
0928 0932       | 2  |		.CONST	0x0932								; Address of begin
0929 0004       |    |		.CONST	0x0004								; Address of exception handler
092a 0003       |    |		.CONST	0x0003								; Number of locals
092b			INIT_0928:
092b 00da       |    |		Load_Top	At_Offset_2
092c 8021       | !  |		Call	0x0,0x21
092d 00d8       |    |		Load_Top	At_Offset_0
092e 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind
092f 00eb       |    |		Load_Encached	Diana_Cache
0930 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0931 03f1       |    |		Declare_Variable	Discrete,With_Value
0932			BODY_0928:
0932 00cf       |    |		Action	Mark_Auxiliary
0933 00d9       |    |		Load_Top	At_Offset_1
0934 4857       |HW  |		Short_Literal	0x57
0935 4858       |HX  |		Short_Literal	0x58
0936 0262       | b  |		Execute	Discrete,In_Range
0937 7003       |p   |		Jump_Nonzero	0x93b
0938 00da       |    |		Load_Top	At_Offset_2
0939 8022       | "  |		Call	0x0,0x22
093a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
093b 00da       |    |		Load_Top	At_Offset_2
093c 00eb       |    |		Load_Encached	Diana_Cache
093d 18e0       |    |		Execute	Package,Field_Execute,Field_Number 0xe0
093e 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
093f 00da       |    |		Load_Top	At_Offset_2
0940 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind
0941 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0942 00c9       |    |		Action	Pop_Auxiliary_Loop
0943 7fef       |    |		Jump	0x933
0944 0000 0000  |    |		.BLANK	0000[0x4]
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 094d       | M  |		.CONST	0x094d								; Address of begin
0949 0004       |    |		.CONST	0x0004								; Address of exception handler
094a 0003       |    |		.CONST	0x0003								; Number of locals
094b			INIT_0948:
094b 00ec       |    |		Load_Encached	Diana_Tree_Cache
094c 039d       |    |		Declare_Variable	Heap_Access,Duplicate
094d			BODY_0948:
094d e5ff       |    |		Load	0x2,-0x1
094e 8021       | !  |		Call	0x0,0x21
094f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0950 00cf       |    |		Action	Mark_Auxiliary
0951 00d9       |    |		Load_Top	At_Offset_1
0952 00eb       |    |		Load_Encached	Diana_Cache
0953 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0954 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0955 00da       |    |		Load_Top	At_Offset_2
0956 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind
0957 0f9f       |    |		Execute_Immediate	Equal,-0x61
0958 700a       |p   |		Jump_Nonzero	0x963
0959 00da       |    |		Load_Top	At_Offset_2
095a 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind
095b 0f9e       |    |		Execute_Immediate	Equal,-0x62
095c 7006       |p   |		Jump_Nonzero	0x963
095d 00da       |    |		Load_Top	At_Offset_2
095e 6804       |h   |		Jump_Zero	0x963
095f 00da       |    |		Load_Top	At_Offset_2
0960 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0961 00c9       |    |		Action	Pop_Auxiliary_Loop
0962 7fee       |    |		Jump	0x951
0963 00ce       |    |		Action	Pop_Auxiliary
0964 00d9       |    |		Load_Top	At_Offset_1
0965 6803       |h   |		Jump_Zero	0x969
0966 00d9       |    |		Load_Top	At_Offset_1
0967 8022       | "  |		Call	0x0,0x22
0968 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0969 e006       |    |		Load	0x0,0x6
096a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
096b 0000 0000  |    |		.BLANK	0000[0x5]
0970 ; --------------------------------------------------------------------------------------
0970 ; SUBPROGRAM
0970 ; --------------------------------------------------------------------------------------
0970 0973       | s  |		.CONST	0x0973								; Address of begin
0971 097e       | ~  |		.CONST	0x097e								; Address of exception handler
0972 0001       |    |		.CONST	0x0001								; Number of locals
0973			BODY_0970:
0973			INIT_0970:
0973 e5fc       |    |		Load	0x2,-0x4
0974 0f00       |    |		Execute_Immediate	Equal,0x0
0975 6803       |h   |		Jump_Zero	0x979
0976 00da       |    |		Load_Top	At_Offset_2
0977 8237       | 7  |		Call	0x1,0x37
0978 a5fc       |    |		Store_Unchecked	0x2,-0x4
0979 00db       |    |		Load_Top	At_Offset_3
097a e5fd       |    |		Load	0x2,-0x3
097b e5fc       |    |		Load	0x2,-0x4
097c 8014       |    |		Call	0x0,0x14
097d 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
097e			TRAP_0970:
097e e00a       |    |		Load	0x0,0xa
097f 010f       |    |		Execute	Exception,Equal
0980 680b       |h   |		Jump_Zero	0x98c
0981 e010       |    |		Load	0x0,0x10
0982 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0983 4806       |H   |		Short_Literal	0x6
0984 0092 0efc  |    |		Action	Push_String_Extended,0xefc					; "No code generated for "
0986 e5ff       |    |		Load	0x2,-0x1
0987 8233       | 3  |		Call	0x1,0x33
0988 01cc       |    |		Execute	Vector,Catenate
0989 e011       |    |		Load	0x0,0x11
098a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
098b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
098c 0100       |    |		Execute	Exception,Raise
098d 0000 0000  |    |		.XXX[0x3]
098f 0000       |    |
0990 ; --------------------------------------------------------------------------------------
0990 ; SUBPROGRAM
0990 ; --------------------------------------------------------------------------------------
0990 0993       |    |		.CONST	0x0993								; Address of begin
0991 0004       |    |		.CONST	0x0004								; Address of exception handler
0992 0001       |    |		.CONST	0x0001								; Number of locals
0993			BODY_0990:
0993			INIT_0990:
0993 00da       |    |		Load_Top	At_Offset_2
0994 0219       |    |		Execute	Heap_Access,All_Read
0995 00d8       |    |		Load_Top	At_Offset_0
0996 2c08       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x8
0997 e5ff       |    |		Load	0x2,-0x1
0998 4800       |H   |		Short_Literal	0x0
0999 e5ff       |    |		Load	0x2,-0x1
099a 0217       |    |		Execute	Heap_Access,All_Reference
099b 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
099c 8241       | A  |		Call	0x1,0x41
099d 00d9       |    |		Load_Top	At_Offset_1
099e 2808       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x8
099f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
09a0 ; --------------------------------------------------------------------------------------
09a0 ; SUBPROGRAM
09a0 ; --------------------------------------------------------------------------------------
09a0 09a3       |    |		.CONST	0x09a3								; Address of begin
09a1 0004       |    |		.CONST	0x0004								; Address of exception handler
09a2 0001       |    |		.CONST	0x0001								; Number of locals
09a3			BODY_09a0:
09a3			INIT_09a0:
09a3 00da       |    |		Load_Top	At_Offset_2
09a4 0217       |    |		Execute	Heap_Access,All_Reference
09a5 2c0d       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xd
09a6 680c       |h   |		Jump_Zero	0x9b3
09a7 00da       |    |		Load_Top	At_Offset_2
09a8 0217       |    |		Execute	Heap_Access,All_Reference
09a9 2c06       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6
09aa 820f       |    |		Call	0x1,0xf
09ab 7007       |p   |		Jump_Nonzero	0x9b3
09ac e5fd       |    |		Load	0x2,-0x3
09ad e5fe       |    |		Load	0x2,-0x2
09ae e5ff       |    |		Load	0x2,-0x1
09af 0217       |    |		Execute	Heap_Access,All_Reference
09b0 2c06       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6
09b1 8243       | C  |		Call	0x1,0x43
09b2 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
09b3 00db       |    |		Load_Top	At_Offset_3
09b4 0219       |    |		Execute	Heap_Access,All_Read
09b5 00d8       |    |		Load_Top	At_Offset_0
09b6 2c09       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
09b7 e015       |    |		Load	0x0,0x15
09b8 e5ff       |    |		Load	0x2,-0x1
09b9 0217       |    |		Execute	Heap_Access,All_Reference
09ba 2c09       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
09bb 8235       | 5  |		Call	0x1,0x35
09bc 00d9       |    |		Load_Top	At_Offset_1
09bd 2809       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x9
09be 00d1       |    |		Pop_Control	Pop_Count_1
09bf e015       |    |		Load	0x0,0x15
09c0 e5fd       |    |		Load	0x2,-0x3
09c1 e5fe       |    |		Load	0x2,-0x2
09c2 8234       | 4  |		Call	0x1,0x34
09c3 00db       |    |		Load_Top	At_Offset_3
09c4 0217       |    |		Execute	Heap_Access,All_Reference
09c5 2809       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x9
09c6 00da       |    |		Load_Top	At_Offset_2
09c7 0217       |    |		Execute	Heap_Access,All_Reference
09c8 2c08       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x8
09c9 0f00       |    |		Execute_Immediate	Equal,0x0
09ca 6844       |hD  |		Jump_Zero	0xa0f
09cb 00da       |    |		Load_Top	At_Offset_2
09cc 0217       |    |		Execute	Heap_Access,All_Reference
09cd 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09ce 460f       |F   |		Jump_Case	0x10
09cf 780f       |x   |		Jump	0x9df								; case 0x0
09d0 7815       |x   |		Jump	0x9e6								; case 0x1
09d1 7814       |x   |		Jump	0x9e6								; case 0x2
09d2 7819       |x   |		Jump	0x9ec								; case 0x3
09d3 7818       |x   |		Jump	0x9ec								; case 0x4
09d4 781d       |x   |		Jump	0x9f2								; case 0x5
09d5 7834       |x4  |		Jump	0xa0a								; case 0x6
09d6 782d       |x-  |		Jump	0xa04								; case 0x7
09d7 7807       |x   |		Jump	0x9df								; case 0x8
09d8 781f       |x   |		Jump	0x9f8								; case 0x9
09d9 781e       |x   |		Jump	0x9f8								; case 0xa
09da 781d       |x   |		Jump	0x9f8								; case 0xb
09db 7822       |x"  |		Jump	0x9fe								; case 0xc
09dc 7809       |x   |		Jump	0x9e6								; case 0xd
09dd 7802       |x   |		Jump	0x9e0								; case 0xe
09de 7800       |x   |		Jump	0x9df								; case 0xf
09df 0833       | 3  |		Execute_Immediate	Raise,0x33
09e0 e5fd       |    |		Load	0x2,-0x3
09e1 e5fe       |    |		Load	0x2,-0x2
09e2 e5ff       |    |		Load	0x2,-0x1
09e3 e22c       | ,  |		Load	0x1,0x2c
09e4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
09e5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
09e6 e5fd       |    |		Load	0x2,-0x3
09e7 e5fe       |    |		Load	0x2,-0x2
09e8 e5ff       |    |		Load	0x2,-0x1
09e9 e231       | 1  |		Load	0x1,0x31
09ea 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
09eb 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
09ec e5fd       |    |		Load	0x2,-0x3
09ed e5fe       |    |		Load	0x2,-0x2
09ee e5ff       |    |		Load	0x2,-0x1
09ef e230       | 0  |		Load	0x1,0x30
09f0 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
09f1 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
09f2 e5fd       |    |		Load	0x2,-0x3
09f3 e5fe       |    |		Load	0x2,-0x2
09f4 e5ff       |    |		Load	0x2,-0x1
09f5 e22f       | /  |		Load	0x1,0x2f
09f6 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
09f7 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
09f8 e5fd       |    |		Load	0x2,-0x3
09f9 e5fe       |    |		Load	0x2,-0x2
09fa e5ff       |    |		Load	0x2,-0x1
09fb e22b       | +  |		Load	0x1,0x2b
09fc 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
09fd 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
09fe e5fd       |    |		Load	0x2,-0x3
09ff e5fe       |    |		Load	0x2,-0x2
0a00 e5ff       |    |		Load	0x2,-0x1
0a01 e22a       | *  |		Load	0x1,0x2a
0a02 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a03 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0a04 e5fd       |    |		Load	0x2,-0x3
0a05 e5fe       |    |		Load	0x2,-0x2
0a06 e5ff       |    |		Load	0x2,-0x1
0a07 e22d       | -  |		Load	0x1,0x2d
0a08 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a09 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0a0a e5fd       |    |		Load	0x2,-0x3
0a0b e5fe       |    |		Load	0x2,-0x2
0a0c e5ff       |    |		Load	0x2,-0x1
0a0d e22e       | .  |		Load	0x1,0x2e
0a0e 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a0f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0a10 ; --------------------------------------------------------------------------------------
0a10 ; SUBPROGRAM
0a10 ; --------------------------------------------------------------------------------------
0a10 0a13       |    |		.CONST	0x0a13								; Address of begin
0a11 0004       |    |		.CONST	0x0004								; Address of exception handler
0a12 0001       |    |		.CONST	0x0001								; Number of locals
0a13			BODY_0a10:
0a13			INIT_0a10:
0a13 00da       |    |		Load_Top	At_Offset_2
0a14 0217       |    |		Execute	Heap_Access,All_Reference
0a15 2c08       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x8
0a16 0f00       |    |		Execute_Immediate	Equal,0x0
0a17 680d       |h   |		Jump_Zero	0xa25
0a18 00da       |    |		Load_Top	At_Offset_2
0a19 0219       |    |		Execute	Heap_Access,All_Read
0a1a 00d8       |    |		Load_Top	At_Offset_0
0a1b 2c08       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x8
0a1c e5ff       |    |		Load	0x2,-0x1
0a1d 4800       |H   |		Short_Literal	0x0
0a1e e5ff       |    |		Load	0x2,-0x1
0a1f 0217       |    |		Execute	Heap_Access,All_Reference
0a20 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a21 8241       | A  |		Call	0x1,0x41
0a22 00d9       |    |		Load_Top	At_Offset_1
0a23 2808       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x8
0a24 00d1       |    |		Pop_Control	Pop_Count_1
0a25 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0a26 0000 0000  |    |		.XXX[0x2]
0a28 ; --------------------------------------------------------------------------------------
0a28 ; SUBPROGRAM
0a28 ; --------------------------------------------------------------------------------------
0a28 0a2b       | +  |		.CONST	0x0a2b								; Address of begin
0a29 0004       |    |		.CONST	0x0004								; Address of exception handler
0a2a 0001       |    |		.CONST	0x0001								; Number of locals
0a2b			BODY_0a28:
0a2b			INIT_0a28:
0a2b 00da       |    |		Load_Top	At_Offset_2
0a2c 0217       |    |		Execute	Heap_Access,All_Reference
0a2d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a2e 0e09       |    |		Execute_Immediate	Not_Equal,0x9
0a2f 6813       |h   |		Jump_Zero	0xa43
0a30 00db       |    |		Load_Top	At_Offset_3
0a31 0219       |    |		Execute	Heap_Access,All_Read
0a32 00d8       |    |		Load_Top	At_Offset_0
0a33 2c0a       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xa
0a34 e015       |    |		Load	0x0,0x15
0a35 e5ff       |    |		Load	0x2,-0x1
0a36 0217       |    |		Execute	Heap_Access,All_Reference
0a37 2c0a       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xa
0a38 8235       | 5  |		Call	0x1,0x35
0a39 00d9       |    |		Load_Top	At_Offset_1
0a3a 280a       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0xa
0a3b 00d1       |    |		Pop_Control	Pop_Count_1
0a3c e015       |    |		Load	0x0,0x15
0a3d e5fd       |    |		Load	0x2,-0x3
0a3e e5fe       |    |		Load	0x2,-0x2
0a3f 8234       | 4  |		Call	0x1,0x34
0a40 00db       |    |		Load_Top	At_Offset_3
0a41 0217       |    |		Execute	Heap_Access,All_Reference
0a42 280a       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0xa
0a43 00da       |    |		Load_Top	At_Offset_2
0a44 0217       |    |		Execute	Heap_Access,All_Reference
0a45 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a46 460f       |F   |		Jump_Case	0x10
0a47 780f       |x   |		Jump	0xa57								; case 0x0
0a48 7815       |x   |		Jump	0xa5e								; case 0x1
0a49 7814       |x   |		Jump	0xa5e								; case 0x2
0a4a 7819       |x   |		Jump	0xa64								; case 0x3
0a4b 7818       |x   |		Jump	0xa64								; case 0x4
0a4c 781d       |x   |		Jump	0xa6a								; case 0x5
0a4d 7834       |x4  |		Jump	0xa82								; case 0x6
0a4e 782d       |x-  |		Jump	0xa7c								; case 0x7
0a4f 7807       |x   |		Jump	0xa57								; case 0x8
0a50 781f       |x   |		Jump	0xa70								; case 0x9
0a51 781e       |x   |		Jump	0xa70								; case 0xa
0a52 781d       |x   |		Jump	0xa70								; case 0xb
0a53 7822       |x"  |		Jump	0xa76								; case 0xc
0a54 7809       |x   |		Jump	0xa5e								; case 0xd
0a55 7802       |x   |		Jump	0xa58								; case 0xe
0a56 7800       |x   |		Jump	0xa57								; case 0xf
0a57 0833       | 3  |		Execute_Immediate	Raise,0x33
0a58 e5fd       |    |		Load	0x2,-0x3
0a59 e5fe       |    |		Load	0x2,-0x2
0a5a e5ff       |    |		Load	0x2,-0x1
0a5b e22c       | ,  |		Load	0x1,0x2c
0a5c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a5d 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0a5e e5fd       |    |		Load	0x2,-0x3
0a5f e5fe       |    |		Load	0x2,-0x2
0a60 e5ff       |    |		Load	0x2,-0x1
0a61 e231       | 1  |		Load	0x1,0x31
0a62 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a63 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0a64 e5fd       |    |		Load	0x2,-0x3
0a65 e5fe       |    |		Load	0x2,-0x2
0a66 e5ff       |    |		Load	0x2,-0x1
0a67 e230       | 0  |		Load	0x1,0x30
0a68 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a69 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0a6a e5fd       |    |		Load	0x2,-0x3
0a6b e5fe       |    |		Load	0x2,-0x2
0a6c e5ff       |    |		Load	0x2,-0x1
0a6d e22f       | /  |		Load	0x1,0x2f
0a6e 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a6f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0a70 e5fd       |    |		Load	0x2,-0x3
0a71 e5fe       |    |		Load	0x2,-0x2
0a72 e5ff       |    |		Load	0x2,-0x1
0a73 e22b       | +  |		Load	0x1,0x2b
0a74 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a75 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0a76 e5fd       |    |		Load	0x2,-0x3
0a77 e5fe       |    |		Load	0x2,-0x2
0a78 e5ff       |    |		Load	0x2,-0x1
0a79 e22a       | *  |		Load	0x1,0x2a
0a7a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a7b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0a7c e5fd       |    |		Load	0x2,-0x3
0a7d e5fe       |    |		Load	0x2,-0x2
0a7e e5ff       |    |		Load	0x2,-0x1
0a7f e22d       | -  |		Load	0x1,0x2d
0a80 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a81 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0a82 e5fd       |    |		Load	0x2,-0x3
0a83 e5fe       |    |		Load	0x2,-0x2
0a84 e5ff       |    |		Load	0x2,-0x1
0a85 e22e       | .  |		Load	0x1,0x2e
0a86 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a87 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0a88 ; --------------------------------------------------------------------------------------
0a88 ; SUBPROGRAM
0a88 ; --------------------------------------------------------------------------------------
0a88 0a8b       |    |		.CONST	0x0a8b								; Address of begin
0a89 0004       |    |		.CONST	0x0004								; Address of exception handler
0a8a 0001       |    |		.CONST	0x0001								; Number of locals
0a8b			BODY_0a88:
0a8b			INIT_0a88:
0a8b 0833       | 3  |		Execute_Immediate	Raise,0x33
0a8c 0000 0000  |    |		.BLANK	0000[0x4]
0a90 ; --------------------------------------------------------------------------------------
0a90 ; SUBPROGRAM
0a90 ; --------------------------------------------------------------------------------------
0a90 0a93       |    |		.CONST	0x0a93								; Address of begin
0a91 0004       |    |		.CONST	0x0004								; Address of exception handler
0a92 0001       |    |		.CONST	0x0001								; Number of locals
0a93			BODY_0a90:
0a93			INIT_0a90:
0a93 00da       |    |		Load_Top	At_Offset_2
0a94 0217       |    |		Execute	Heap_Access,All_Reference
0a95 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a96 460f       |F   |		Jump_Case	0x10
0a97 780f       |x   |		Jump	0xaa7								; case 0x0
0a98 7813       |x   |		Jump	0xaac								; case 0x1
0a99 7812       |x   |		Jump	0xaac								; case 0x2
0a9a 7815       |x   |		Jump	0xab0								; case 0x3
0a9b 7814       |x   |		Jump	0xab0								; case 0x4
0a9c 7817       |x   |		Jump	0xab4								; case 0x5
0a9d 7826       |x&  |		Jump	0xac4								; case 0x6
0a9e 7821       |x!  |		Jump	0xac0								; case 0x7
0a9f 7807       |x   |		Jump	0xaa7								; case 0x8
0aa0 7817       |x   |		Jump	0xab8								; case 0x9
0aa1 7816       |x   |		Jump	0xab8								; case 0xa
0aa2 7815       |x   |		Jump	0xab8								; case 0xb
0aa3 7818       |x   |		Jump	0xabc								; case 0xc
0aa4 7807       |x   |		Jump	0xaac								; case 0xd
0aa5 7802       |x   |		Jump	0xaa8								; case 0xe
0aa6 7800       |x   |		Jump	0xaa7								; case 0xf
0aa7 0833       | 3  |		Execute_Immediate	Raise,0x33
0aa8 00da       |    |		Load_Top	At_Offset_2
0aa9 e22c       | ,  |		Load	0x1,0x2c
0aaa 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0aab 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0aac 00da       |    |		Load_Top	At_Offset_2
0aad e231       | 1  |		Load	0x1,0x31
0aae 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0aaf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ab0 00da       |    |		Load_Top	At_Offset_2
0ab1 e230       | 0  |		Load	0x1,0x30
0ab2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0ab3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ab4 00da       |    |		Load_Top	At_Offset_2
0ab5 e22f       | /  |		Load	0x1,0x2f
0ab6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0ab7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ab8 00da       |    |		Load_Top	At_Offset_2
0ab9 e22b       | +  |		Load	0x1,0x2b
0aba 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0abb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0abc 00da       |    |		Load_Top	At_Offset_2
0abd e22a       | *  |		Load	0x1,0x2a
0abe 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0abf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ac0 00da       |    |		Load_Top	At_Offset_2
0ac1 e22d       | -  |		Load	0x1,0x2d
0ac2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0ac3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ac4 00da       |    |		Load_Top	At_Offset_2
0ac5 e22e       | .  |		Load	0x1,0x2e
0ac6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0ac7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; SUBPROGRAM
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0acb       |    |		.CONST	0x0acb								; Address of begin
0ac9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aca 0001       |    |		.CONST	0x0001								; Number of locals
0acb			BODY_0ac8:
0acb			INIT_0ac8:
0acb 00da       |    |		Load_Top	At_Offset_2
0acc 8037       | 7  |		Call	0x0,0x37
0acd 0f02       |    |		Execute_Immediate	Equal,0x2
0ace 6803       |h   |		Jump_Zero	0xad2
0acf 00da       |    |		Load_Top	At_Offset_2
0ad0 823c       | <  |		Call	0x1,0x3c
0ad1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ad2 00da       |    |		Load_Top	At_Offset_2
0ad3 823b       | ;  |		Call	0x1,0x3b
0ad4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ad5 0000 0000  |    |		.XXX[0x3]
0ad7 0000       |    |
0ad8 ; --------------------------------------------------------------------------------------
0ad8 ; SUBPROGRAM
0ad8 ; --------------------------------------------------------------------------------------
0ad8 0adb       |    |		.CONST	0x0adb								; Address of begin
0ad9 0004       |    |		.CONST	0x0004								; Address of exception handler
0ada 0001       |    |		.CONST	0x0001								; Number of locals
0adb			BODY_0ad8:
0adb			INIT_0ad8:
0adb 00da       |    |		Load_Top	At_Offset_2
0adc 460f       |F   |		Jump_Case	0x10
0add 780f       |x   |		Jump	0xaed								; case 0x0
0ade 780e       |x   |		Jump	0xaed								; case 0x1
0adf 780d       |x   |		Jump	0xaed								; case 0x2
0ae0 780e       |x   |		Jump	0xaef								; case 0x3
0ae1 780d       |x   |		Jump	0xaef								; case 0x4
0ae2 780c       |x   |		Jump	0xaef								; case 0x5
0ae3 7809       |x   |		Jump	0xaed								; case 0x6
0ae4 780a       |x   |		Jump	0xaef								; case 0x7
0ae5 7807       |x   |		Jump	0xaed								; case 0x8
0ae6 7808       |x   |		Jump	0xaef								; case 0x9
0ae7 7807       |x   |		Jump	0xaef								; case 0xa
0ae8 7806       |x   |		Jump	0xaef								; case 0xb
0ae9 7805       |x   |		Jump	0xaef								; case 0xc
0aea 7802       |x   |		Jump	0xaed								; case 0xd
0aeb 7801       |x   |		Jump	0xaed								; case 0xe
0aec 7800       |x   |		Jump	0xaed								; case 0xf
0aed 4800       |H   |		Short_Literal	0x0
0aee 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0aef 4801       |H   |		Short_Literal	0x1
0af0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0af1 0000 0000  |    |		.BLANK	0000[0x7]
0af8 ; --------------------------------------------------------------------------------------
0af8 ; SUBPROGRAM
0af8 ; --------------------------------------------------------------------------------------
0af8 0b04       |    |		.CONST	0x0b04								; Address of begin
0af9 0004       |    |		.CONST	0x0004								; Address of exception handler
0afa 0006       |    |		.CONST	0x0006								; Number of locals
0afb			INIT_0af8:
0afb 00e1       |    |		Load_Encached	Boolean_Cache
0afc e220       |    |		Load	0x1,0x20
0afd 0007       |    |		Action	Break_Optional
0afe e5ff       |    |		Load	0x2,-0x1
0aff 823f       | ?  |		Call	0x1,0x3f
0b00 e220       |    |		Load	0x1,0x20
0b01 0007       |    |		Action	Break_Optional
0b02 e20d       |    |		Load	0x1,0xd
0b03 0007       |    |		Action	Break_Optional
0b04			BODY_0af8:
0b04 00e1       |    |		Load_Encached	Boolean_Cache
0b05 e403       |    |		Load	0x2,0x3
0b06 e404       |    |		Load	0x2,0x4
0b07 e00e       |    |		Load	0x0,0xe
0b08 800f       |    |		Call	0x0,0xf
0b09 c403       |    |		Store	0x2,0x3
0b0a c402       |    |		Store	0x2,0x2
0b0b e402       |    |		Load	0x2,0x2
0b0c 6803       |h   |		Jump_Zero	0xb10
0b0d 00db       |    |		Load_Top	At_Offset_3
0b0e a5f9       |    |		Store_Unchecked	0x2,-0x7
0b0f 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0b10 e006       |    |		Load	0x0,0x6
0b11 e5fa       |    |		Load	0x2,-0x6
0b12 8249       | I  |		Call	0x1,0x49
0b13 e5fb       |    |		Load	0x2,-0x5
0b14 e5fc       |    |		Load	0x2,-0x4
0b15 e5fd       |    |		Load	0x2,-0x3
0b16 e5fe       |    |		Load	0x2,-0x2
0b17 e404       |    |		Load	0x2,0x4
0b18 8211       |    |		Call	0x1,0x11
0b19 a5f9       |    |		Store_Unchecked	0x2,-0x7
0b1a 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0b1b 0000 0000  |    |		.BLANK	0000[0x5]
0b20 ; --------------------------------------------------------------------------------------
0b20 ; SUBPROGRAM
0b20 ; --------------------------------------------------------------------------------------
0b20 0b2b       | +  |		.CONST	0x0b2b								; Address of begin
0b21 0004       |    |		.CONST	0x0004								; Address of exception handler
0b22 0002       |    |		.CONST	0x0002								; Number of locals
0b23			INIT_0b20:
0b23 480e       |H   |		Short_Literal	0xe
0b24 4801       |H   |		Short_Literal	0x1
0b25 e220       |    |		Load	0x1,0x20
0b26 e5fc       |    |		Load	0x2,-0x4
0b27 039a       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Constraint
0b28 00d8       |    |		Load_Top	At_Offset_0
0b29 0217       |    |		Execute	Heap_Access,All_Reference
0b2a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0b2b			BODY_0b20:
0b2b 00db       |    |		Load_Top	At_Offset_3
0b2c 00d9       |    |		Load_Top	At_Offset_1
0b2d 0217       |    |		Execute	Heap_Access,All_Reference
0b2e 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0b2f e5fd       |    |		Load	0x2,-0x3
0b30 00d9       |    |		Load_Top	At_Offset_1
0b31 0217       |    |		Execute	Heap_Access,All_Reference
0b32 2804       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
0b33 e5fe       |    |		Load	0x2,-0x2
0b34 00d9       |    |		Load_Top	At_Offset_1
0b35 0217       |    |		Execute	Heap_Access,All_Reference
0b36 2805       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
0b37 e5fe       |    |		Load	0x2,-0x2
0b38 00d9       |    |		Load_Top	At_Offset_1
0b39 0217       |    |		Execute	Heap_Access,All_Reference
0b3a 2806       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6
0b3b e027       | '  |		Load	0x0,0x27
0b3c 00d9       |    |		Load_Top	At_Offset_1
0b3d 0217       |    |		Execute	Heap_Access,All_Reference
0b3e 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0b3f 00d8       |    |		Load_Top	At_Offset_0
0b40 e006       |    |		Load	0x0,0x6
0b41 4801       |H   |		Short_Literal	0x1
0b42 e5fb       |    |		Load	0x2,-0x5
0b43 e5fc       |    |		Load	0x2,-0x4
0b44 e5fd       |    |		Load	0x2,-0x3
0b45 e00b       |    |		Load	0x0,0xb
0b46 e5ff       |    |		Load	0x2,-0x1
0b47 e22c       | ,  |		Load	0x1,0x2c
0b48 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0b49 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0b4a e038       | 8  |		Load	0x0,0x38
0b4b 00d9       |    |		Load_Top	At_Offset_1
0b4c 8039       | 9  |		Call	0x0,0x39
0b4d 00d1       |    |		Pop_Control	Pop_Count_1
0b4e 00d8       |    |		Load_Top	At_Offset_0
0b4f 4405       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x5
0b50 ; --------------------------------------------------------------------------------------
0b50 ; SUBPROGRAM
0b50 ; --------------------------------------------------------------------------------------
0b50 0b53       | S  |		.CONST	0x0b53								; Address of begin
0b51 0004       |    |		.CONST	0x0004								; Address of exception handler
0b52 0001       |    |		.CONST	0x0001								; Number of locals
0b53			BODY_0b50:
0b53			INIT_0b50:
0b53 e223       | #  |		Load	0x1,0x23
0b54 6807       |h   |		Jump_Zero	0xb5c
0b55 0092 0efd  |    |		Action	Push_String_Extended,0xefd					; "  Mark_Covered"
0b57 e5fe       |    |		Load	0x2,-0x2
0b58 00e0       |    |		Load_Encached	Standard_Cache
0b59 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0b5a 01cc       |    |		Execute	Vector,Catenate
0b5b 8232       | 2  |		Call	0x1,0x32
0b5c e008       |    |		Load	0x0,0x8
0b5d 00db       |    |		Load_Top	At_Offset_3
0b5e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0b5f 8009       |    |		Call	0x0,0x9
0b60 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0b61 0000 0000  |    |		.BLANK	0000[0x7]
0b68 ; --------------------------------------------------------------------------------------
0b68 ; SUBPROGRAM
0b68 ; --------------------------------------------------------------------------------------
0b68 0b6d       | m  |		.CONST	0x0b6d								; Address of begin
0b69 0004       |    |		.CONST	0x0004								; Address of exception handler
0b6a 0002       |    |		.CONST	0x0002								; Number of locals
0b6b			INIT_0b68:
0b6b 029f 0dcb  |    |		Declare_Subprogram	INIT_0dc8,For_Call
0b6d			BODY_0b68:
0b6d e00d       |    |		Load	0x0,0xd
0b6e 6803       |h   |		Jump_Zero	0xb72
0b6f 00db       |    |		Load_Top	At_Offset_3
0b70 8402       |    |		Call	0x2,0x2
0b71 6802       |h   |		Jump_Zero	0xb74
0b72 e5fe       |    |		Load	0x2,-0x2
0b73 803a       | :  |		Call	0x0,0x3a
0b74 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0b75 0000 0000  |    |		.XXX[0x3]
0b77 0000       |    |
0b78 ; --------------------------------------------------------------------------------------
0b78 ; SUBPROGRAM
0b78 ; --------------------------------------------------------------------------------------
0b78 0b7b       | {  |		.CONST	0x0b7b								; Address of begin
0b79 0004       |    |		.CONST	0x0004								; Address of exception handler
0b7a 0001       |    |		.CONST	0x0001								; Number of locals
0b7b			BODY_0b78:
0b7b			INIT_0b78:
0b7b e5fc       |    |		Load	0x2,-0x4
0b7c e5fe       |    |		Load	0x2,-0x2
0b7d 824c       | L  |		Call	0x1,0x4c
0b7e 00db       |    |		Load_Top	At_Offset_3
0b7f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b80 6803       |h   |		Jump_Zero	0xb84
0b81 e5fd       |    |		Load	0x2,-0x3
0b82 00db       |    |		Load_Top	At_Offset_3
0b83 824d       | M  |		Call	0x1,0x4d
0b84 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0b85 0000 0000  |    |		.XXX[0x3]
0b87 0000       |    |
0b88 ; --------------------------------------------------------------------------------------
0b88 ; SUBPROGRAM
0b88 ; --------------------------------------------------------------------------------------
0b88 0b93       |    |		.CONST	0x0b93								; Address of begin
0b89 0004       |    |		.CONST	0x0004								; Address of exception handler
0b8a 0004       |    |		.CONST	0x0004								; Number of locals
0b8b			INIT_0b88:
0b8b 00da       |    |		Load_Top	At_Offset_2
0b8c 8258       | X  |		Call	0x1,0x58
0b8d 0093 0000  |    |		push_full_address	0x0
0b8f 6008       |`   |		Indirect_Literal	Discrete,0xb98,{0x80000000, 0x00010000}
0b90 0273       | s  |		Execute	Discrete,Plus
0b91 029f 0dd3  |    |		Declare_Subprogram	INIT_0dd0,For_Call
0b93			BODY_0b88:
0b93 00da       |    |		Load_Top	At_Offset_2
0b94 803b       | ;  |		Call	0x0,0x3b
0b95 7001       |p   |		Jump_Nonzero	0xb97
0b96 8404       |    |		Call	0x2,0x4
0b97 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0b98 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0b9c 0000 0000  |    |		.BLANK	0000[0x4]
0ba0 ; --------------------------------------------------------------------------------------
0ba0 ; SUBPROGRAM
0ba0 ; --------------------------------------------------------------------------------------
0ba0 0ba3       |    |		.CONST	0x0ba3								; Address of begin
0ba1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ba2 0001       |    |		.CONST	0x0001								; Number of locals
0ba3			BODY_0ba0:
0ba3			INIT_0ba0:
0ba3 00da       |    |		Load_Top	At_Offset_2
0ba4 6811       |h   |		Jump_Zero	0xbb6
0ba5 e5fd       |    |		Load	0x2,-0x3
0ba6 e5fe       |    |		Load	0x2,-0x2
0ba7 e5ff       |    |		Load	0x2,-0x1
0ba8 0217       |    |		Execute	Heap_Access,All_Reference
0ba9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0baa e5ff       |    |		Load	0x2,-0x1
0bab 0217       |    |		Execute	Heap_Access,All_Reference
0bac 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0bad 8218       |    |		Call	0x1,0x18
0bae e010       |    |		Load	0x0,0x10
0baf 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0bb0 4801       |H   |		Short_Literal	0x1
0bb1 e010       |    |		Load	0x0,0x10
0bb2 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0bb3 6802       |h   |		Jump_Zero	0xbb6
0bb4 e5fd       |    |		Load	0x2,-0x3
0bb5 824f       | O  |		Call	0x1,0x4f
0bb6 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0bb7 0000       |    |		.XXX[0x1]
0bb8 ; --------------------------------------------------------------------------------------
0bb8 ; SUBPROGRAM
0bb8 ; --------------------------------------------------------------------------------------
0bb8 0bbb       |    |		.CONST	0x0bbb								; Address of begin
0bb9 0004       |    |		.CONST	0x0004								; Address of exception handler
0bba 0001       |    |		.CONST	0x0001								; Number of locals
0bbb			BODY_0bb8:
0bbb			INIT_0bb8:
0bbb 00da       |    |		Load_Top	At_Offset_2
0bbc 6811       |h   |		Jump_Zero	0xbce
0bbd e5fd       |    |		Load	0x2,-0x3
0bbe e5fe       |    |		Load	0x2,-0x2
0bbf e5ff       |    |		Load	0x2,-0x1
0bc0 0217       |    |		Execute	Heap_Access,All_Reference
0bc1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0bc2 e5ff       |    |		Load	0x2,-0x1
0bc3 0217       |    |		Execute	Heap_Access,All_Reference
0bc4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0bc5 8218       |    |		Call	0x1,0x18
0bc6 e010       |    |		Load	0x0,0x10
0bc7 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0bc8 4801       |H   |		Short_Literal	0x1
0bc9 e010       |    |		Load	0x0,0x10
0bca 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0bcb 6802       |h   |		Jump_Zero	0xbce
0bcc e5fd       |    |		Load	0x2,-0x3
0bcd 824f       | O  |		Call	0x1,0x4f
0bce 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0bcf 0000       |    |		.XXX[0x1]
0bd0 ; --------------------------------------------------------------------------------------
0bd0 ; SUBPROGRAM
0bd0 ; --------------------------------------------------------------------------------------
0bd0 0bd5       |    |		.CONST	0x0bd5								; Address of begin
0bd1 0004       |    |		.CONST	0x0004								; Address of exception handler
0bd2 0002       |    |		.CONST	0x0002								; Number of locals
0bd3			INIT_0bd0:
0bd3 029f 0e23  |   #|		Declare_Subprogram	INIT_0e20,For_Call
0bd5			BODY_0bd0:
0bd5 e00d       |    |		Load	0x0,0xd
0bd6 6803       |h   |		Jump_Zero	0xbda
0bd7 00db       |    |		Load_Top	At_Offset_3
0bd8 8402       |    |		Call	0x2,0x2
0bd9 6802       |h   |		Jump_Zero	0xbdc
0bda e5fe       |    |		Load	0x2,-0x2
0bdb 803a       | :  |		Call	0x0,0x3a
0bdc 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0bdd 0000 0000  |    |		.XXX[0x3]
0bdf 0000       |    |
0be0 ; --------------------------------------------------------------------------------------
0be0 ; SUBPROGRAM
0be0 ; --------------------------------------------------------------------------------------
0be0 0be8       |    |		.CONST	0x0be8								; Address of begin
0be1 0004       |    |		.CONST	0x0004								; Address of exception handler
0be2 0002       |    |		.CONST	0x0002								; Number of locals
0be3			INIT_0be0:
0be3 e017       |    |		Load	0x0,0x17
0be4 0322       | "  |		Declare_Variable	Record
0be5 00db       |    |		Load_Top	At_Offset_3
0be6 00d9       |    |		Load_Top	At_Offset_1
0be7 017d       | }  |		Execute	Record,Structure_Write
0be8			BODY_0be0:
0be8 00cf       |    |		Action	Mark_Auxiliary
0be9 00d9       |    |		Load_Top	At_Offset_1
0bea 8012       |    |		Call	0x0,0x12
0beb 7009       |p   |		Jump_Nonzero	0xbf5
0bec 00d9       |    |		Load_Top	At_Offset_1
0bed 8013       |    |		Call	0x0,0x13
0bee 8036       | 6  |		Call	0x0,0x36
0bef 7005       |p   |		Jump_Nonzero	0xbf5
0bf0 00d9       |    |		Load_Top	At_Offset_1
0bf1 801c       |    |		Call	0x0,0x1c
0bf2 00d1       |    |		Pop_Control	Pop_Count_1
0bf3 00c9       |    |		Action	Pop_Auxiliary_Loop
0bf4 7ff4       |    |		Jump	0xbe9
0bf5 00ce       |    |		Action	Pop_Auxiliary
0bf6 00d8       |    |		Load_Top	At_Offset_0
0bf7 8012       |    |		Call	0x0,0x12
0bf8 6802       |h   |		Jump_Zero	0xbfb
0bf9 e006       |    |		Load	0x0,0x6
0bfa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0bfb 00d8       |    |		Load_Top	At_Offset_0
0bfc 8013       |    |		Call	0x0,0x13
0bfd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0bfe 0000 0000  |    |		.XXX[0x2]
0c00 ; --------------------------------------------------------------------------------------
0c00 ; SUBPROGRAM
0c00 ; --------------------------------------------------------------------------------------
0c00 0c0e       |    |		.CONST	0x0c0e								; Address of begin
0c01 0004       |    |		.CONST	0x0004								; Address of exception handler
0c02 0005       |    |		.CONST	0x0005								; Number of locals
0c03			INIT_0c00:
0c03 e017       |    |		Load	0x0,0x17
0c04 0322       | "  |		Declare_Variable	Record
0c05 00db       |    |		Load_Top	At_Offset_3
0c06 00d9       |    |		Load_Top	At_Offset_1
0c07 017d       | }  |		Execute	Record,Structure_Write
0c08 e004       |    |		Load	0x0,0x4
0c09 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c0a 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0c0b e003       |    |		Load	0x0,0x3
0c0c 029f 0e5b  |   [|		Declare_Subprogram	INIT_0e58,For_Call
0c0e			BODY_0c00:
0c0e 00cf       |    |		Action	Mark_Auxiliary
0c0f e402       |    |		Load	0x2,0x2
0c10 8012       |    |		Call	0x0,0x12
0c11 7006       |p   |		Jump_Nonzero	0xc18
0c12 8405       |    |		Call	0x2,0x5
0c13 e402       |    |		Load	0x2,0x2
0c14 801c       |    |		Call	0x0,0x1c
0c15 00d1       |    |		Pop_Control	Pop_Count_1
0c16 00c9       |    |		Action	Pop_Auxiliary_Loop
0c17 7ff7       |    |		Jump	0xc0f
0c18 00ce       |    |		Action	Pop_Auxiliary
0c19 00db       |    |		Load_Top	At_Offset_3
0c1a 8012       |    |		Call	0x0,0x12
0c1b 6805       |h   |		Jump_Zero	0xc21
0c1c e006       |    |		Load	0x0,0x6
0c1d a5fd       |    |		Store_Unchecked	0x2,-0x3
0c1e 4800       |H   |		Short_Literal	0x0
0c1f a5fc       |    |		Store_Unchecked	0x2,-0x4
0c20 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0c21 00d9       |    |		Load_Top	At_Offset_1
0c22 a5fd       |    |		Store_Unchecked	0x2,-0x3
0c23 00da       |    |		Load_Top	At_Offset_2
0c24 a5fc       |    |		Store_Unchecked	0x2,-0x4
0c25 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0c26 0000 0000  |    |		.XXX[0x2]
0c28 ; --------------------------------------------------------------------------------------
0c28 ; SUBPROGRAM
0c28 ; --------------------------------------------------------------------------------------
0c28 0c34       | 4  |		.CONST	0x0c34								; Address of begin
0c29 0004       |    |		.CONST	0x0004								; Address of exception handler
0c2a 0004       |    |		.CONST	0x0004								; Number of locals
0c2b			INIT_0c28:
0c2b e017       |    |		Load	0x0,0x17
0c2c 0322       | "  |		Declare_Variable	Record
0c2d 00db       |    |		Load_Top	At_Offset_3
0c2e 00d9       |    |		Load_Top	At_Offset_1
0c2f 017d       | }  |		Execute	Record,Structure_Write
0c30 e003       |    |		Load	0x0,0x3
0c31 0007       |    |		Action	Break_Optional
0c32 e220       |    |		Load	0x1,0x20
0c33 0007       |    |		Action	Break_Optional
0c34			BODY_0c28:
0c34 e5fb       |    |		Load	0x2,-0x5
0c35 e5f8       |    |		Load	0x2,-0x8
0c36 e5fe       |    |		Load	0x2,-0x2
0c37 8007       |    |		Call	0x0,0x7
0c38 e5f7       |    |		Load	0x2,-0x9
0c39 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0c3a 00da       |    |		Load_Top	At_Offset_2
0c3b e003       |    |		Load	0x0,0x3
0c3c 4800       |H   |		Short_Literal	0x0
0c3d 823d       | =  |		Call	0x1,0x3d
0c3e 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0c3f 00d1       |    |		Pop_Control	Pop_Count_1
0c40 00d9       |    |		Load_Top	At_Offset_1
0c41 802b       | +  |		Call	0x0,0x2b
0c42 701b       |p   |		Jump_Nonzero	0xc5e
0c43 e220       |    |		Load	0x1,0x20
0c44 4800       |H   |		Short_Literal	0x0
0c45 e5f9       |    |		Load	0x2,-0x7
0c46 e5fb       |    |		Load	0x2,-0x5
0c47 e5fd       |    |		Load	0x2,-0x3
0c48 e402       |    |		Load	0x2,0x2
0c49 e403       |    |		Load	0x2,0x3
0c4a 824a       | J  |		Call	0x1,0x4a
0c4b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0c4c e5f7       |    |		Load	0x2,-0x9
0c4d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0c4e e5f7       |    |		Load	0x2,-0x9
0c4f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0c50 e004       |    |		Load	0x0,0x4
0c51 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c52 e003       |    |		Load	0x0,0x3
0c53 e404       |    |		Load	0x2,0x4
0c54 0217       |    |		Execute	Heap_Access,All_Reference
0c55 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0c56 e5ff       |    |		Load	0x2,-0x1
0c57 8254       | T  |		Call	0x1,0x54
0c58 00da       |    |		Load_Top	At_Offset_2
0c59 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0c5a 00da       |    |		Load_Top	At_Offset_2
0c5b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0c5c 00d2       |    |		Pop_Control	Pop_Count_2
0c5d 780f       |x   |		Jump	0xc6d
0c5e e5f7       |    |		Load	0x2,-0x9
0c5f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0c60 e5f7       |    |		Load	0x2,-0x9
0c61 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0c62 e004       |    |		Load	0x0,0x4
0c63 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c64 e003       |    |		Load	0x0,0x3
0c65 e006       |    |		Load	0x0,0x6
0c66 e5ff       |    |		Load	0x2,-0x1
0c67 8254       | T  |		Call	0x1,0x54
0c68 00da       |    |		Load_Top	At_Offset_2
0c69 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0c6a 00da       |    |		Load_Top	At_Offset_2
0c6b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0c6c 00d2       |    |		Pop_Control	Pop_Count_2
0c6d e5f7       |    |		Load	0x2,-0x9
0c6e 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0c6f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0c70 802b       | +  |		Call	0x0,0x2b
0c71 680f       |h   |		Jump_Zero	0xc81
0c72 e5fb       |    |		Load	0x2,-0x5
0c73 4800       |H   |		Short_Literal	0x0
0c74 e5fe       |    |		Load	0x2,-0x2
0c75 8007       |    |		Call	0x0,0x7
0c76 e5f7       |    |		Load	0x2,-0x9
0c77 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0c78 e5fd       |    |		Load	0x2,-0x3
0c79 0217       |    |		Execute	Heap_Access,All_Reference
0c7a 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0c7b 8238       | 8  |		Call	0x1,0x38
0c7c 0f00       |    |		Execute_Immediate	Equal,0x0
0c7d e5fd       |    |		Load	0x2,-0x3
0c7e 0217       |    |		Execute	Heap_Access,All_Reference
0c7f 280d       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0xd
0c80 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
0c81 e5f7       |    |		Load	0x2,-0x9
0c82 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0c83 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0c84 00da       |    |		Load_Top	At_Offset_2
0c85 021f       |    |		Execute	Heap_Access,Equal
0c86 6808       |h   |		Jump_Zero	0xc8f
0c87 e5fa       |    |		Load	0x2,-0x6
0c88 e5fd       |    |		Load	0x2,-0x3
0c89 00da       |    |		Load_Top	At_Offset_2
0c8a 8243       | C  |		Call	0x1,0x43
0c8b 4800       |H   |		Short_Literal	0x0
0c8c e5f7       |    |		Load	0x2,-0x9
0c8d 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0c8e 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
0c8f e5f7       |    |		Load	0x2,-0x9
0c90 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0c91 00d8       |    |		Load_Top	At_Offset_0
0c92 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0c93 e5fd       |    |		Load	0x2,-0x3
0c94 e5fa       |    |		Load	0x2,-0x6
0c95 e5f7       |    |		Load	0x2,-0x9
0c96 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0c97 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0c98 8241       | A  |		Call	0x1,0x41
0c99 00d9       |    |		Load_Top	At_Offset_1
0c9a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0c9b 00d1       |    |		Pop_Control	Pop_Count_1
0c9c 4801       |H   |		Short_Literal	0x1
0c9d e5f7       |    |		Load	0x2,-0x9
0c9e 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0c9f 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
0ca0 ; --------------------------------------------------------------------------------------
0ca0 ; SUBPROGRAM
0ca0 ; --------------------------------------------------------------------------------------
0ca0 0ca6       |    |		.CONST	0x0ca6								; Address of begin
0ca1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ca2 0002       |    |		.CONST	0x0002								; Number of locals
0ca3			INIT_0ca0:
0ca3 e220       |    |		Load	0x1,0x20
0ca4 00db       |    |		Load_Top	At_Offset_3
0ca5 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0ca6			BODY_0ca0:
0ca6 e5fc       |    |		Load	0x2,-0x4
0ca7 e220       |    |		Load	0x1,0x20
0ca8 021e       |    |		Execute	Heap_Access,Maximum
0ca9 6802       |h   |		Jump_Zero	0xcac
0caa e5fc       |    |		Load	0x2,-0x4
0cab 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0cac 4800       |H   |		Short_Literal	0x0
0cad e5fb       |    |		Load	0x2,-0x5
0cae 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0caf 4800       |H   |		Short_Literal	0x0
0cb0 e5fb       |    |		Load	0x2,-0x5
0cb1 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0cb2 00db       |    |		Load_Top	At_Offset_3
0cb3 0217       |    |		Execute	Heap_Access,All_Reference
0cb4 2c05       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5
0cb5 820f       |    |		Call	0x1,0xf
0cb6 7007       |p   |		Jump_Nonzero	0xcbe
0cb7 e5fe       |    |		Load	0x2,-0x2
0cb8 00d9       |    |		Load_Top	At_Offset_1
0cb9 e5ff       |    |		Load	0x2,-0x1
0cba 0217       |    |		Execute	Heap_Access,All_Reference
0cbb 2c05       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5
0cbc 8245       | E  |		Call	0x1,0x45
0cbd 7813       |x   |		Jump	0xcd1
0cbe 00db       |    |		Load_Top	At_Offset_3
0cbf 0217       |    |		Execute	Heap_Access,All_Reference
0cc0 2c06       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6
0cc1 820f       |    |		Call	0x1,0xf
0cc2 7007       |p   |		Jump_Nonzero	0xcca
0cc3 e5fe       |    |		Load	0x2,-0x2
0cc4 00d9       |    |		Load_Top	At_Offset_1
0cc5 e5ff       |    |		Load	0x2,-0x1
0cc6 0217       |    |		Execute	Heap_Access,All_Reference
0cc7 2c06       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6
0cc8 8245       | E  |		Call	0x1,0x45
0cc9 7807       |x   |		Jump	0xcd1
0cca 4801       |H   |		Short_Literal	0x1
0ccb e5fb       |    |		Load	0x2,-0x5
0ccc 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0ccd 4801       |H   |		Short_Literal	0x1
0cce 00d9       |    |		Load_Top	At_Offset_1
0ccf 0217       |    |		Execute	Heap_Access,All_Reference
0cd0 280c       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0xc
0cd1 e5fd       |    |		Load	0x2,-0x3
0cd2 4801       |H   |		Short_Literal	0x1
0cd3 00da       |    |		Load_Top	At_Offset_2
0cd4 0217       |    |		Execute	Heap_Access,All_Reference
0cd5 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0cd6 8007       |    |		Call	0x0,0x7
0cd7 e5fb       |    |		Load	0x2,-0x5
0cd8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0cd9 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0cda 0000 0000  |    |		.BLANK	0000[0x6]
0ce0 ; --------------------------------------------------------------------------------------
0ce0 ; SUBPROGRAM
0ce0 ; --------------------------------------------------------------------------------------
0ce0 0ce3       |    |		.CONST	0x0ce3								; Address of begin
0ce1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ce2 0001       |    |		.CONST	0x0001								; Number of locals
0ce3			BODY_0ce0:
0ce3			INIT_0ce0:
0ce3 00da       |    |		Load_Top	At_Offset_2
0ce4 803c       | <  |		Call	0x0,0x3c
0ce5 e004       |    |		Load	0x0,0x4
0ce6 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0ce7 e004       |    |		Load	0x0,0x4
0ce8 184c       | L  |		Execute	Package,Field_Execute,Field_Number 0x4c
0ce9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0cea 0000 0000  |    |		.BLANK	0000[0x6]
0cf0 ; --------------------------------------------------------------------------------------
0cf0 ; SUBPROGRAM
0cf0 ; --------------------------------------------------------------------------------------
0cf0 0cf6       |    |		.CONST	0x0cf6								; Address of begin
0cf1 0004       |    |		.CONST	0x0004								; Address of exception handler
0cf2 0003       |    |		.CONST	0x0003								; Number of locals
0cf3			INIT_0cf0:
0cf3 00e1       |    |		Load_Encached	Boolean_Cache
0cf4 e03d       | =  |		Load	0x0,0x3d
0cf5 0007       |    |		Action	Break_Optional
0cf6			BODY_0cf0:
0cf6 00e1       |    |		Load_Encached	Boolean_Cache
0cf7 00d9       |    |		Load_Top	At_Offset_1
0cf8 e5ff       |    |		Load	0x2,-0x1
0cf9 e03e       | >  |		Load	0x0,0x3e
0cfa 803f       | ?  |		Call	0x0,0x3f
0cfb 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0cfc 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0cfd 00d9       |    |		Load_Top	At_Offset_1
0cfe 7009       |p   |		Jump_Nonzero	0xd08
0cff e015       |    |		Load	0x0,0x15
0d00 8040       | @  |		Call	0x0,0x40
0d01 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0d02 e03e       | >  |		Load	0x0,0x3e
0d03 4800       |H   |		Short_Literal	0x0
0d04 00da       |    |		Load_Top	At_Offset_2
0d05 e5ff       |    |		Load	0x2,-0x1
0d06 8041       | A  |		Call	0x0,0x41
0d07 c03e       | >  |		Store	0x0,0x3e
0d08 00d8       |    |		Load_Top	At_Offset_0
0d09 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0d0a 0000 0000  |    |		.BLANK	0000[0x6]
0d10 ; --------------------------------------------------------------------------------------
0d10 ; SUBPROGRAM
0d10 ; --------------------------------------------------------------------------------------
0d10 0d1b       |    |		.CONST	0x0d1b								; Address of begin
0d11 0004       |    |		.CONST	0x0004								; Address of exception handler
0d12 0003       |    |		.CONST	0x0003								; Number of locals
0d13			INIT_0d10:
0d13 e5fd       |    |		Load	0x2,-0x3
0d14 8258       | X  |		Call	0x1,0x58
0d15 e015       |    |		Load	0x0,0x15
0d16 e5fd       |    |		Load	0x2,-0x3
0d17 8257       | W  |		Call	0x1,0x57
0d18 e5fe       |    |		Load	0x2,-0x2
0d19 e5ff       |    |		Load	0x2,-0x1
0d1a 8042       | B  |		Call	0x0,0x42
0d1b			BODY_0d10:
0d1b 0092 0efe  |    |		Action	Push_String_Extended,0xefe					; "ENTER Push_Decision_Point"
0d1d 8232       | 2  |		Call	0x1,0x32
0d1e 00d9       |    |		Load_Top	At_Offset_1
0d1f 00d9       |    |		Load_Top	At_Offset_1
0d20 8043       | C  |		Call	0x0,0x43
0d21 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0d22 e224       | $  |		Load	0x1,0x24
0d23 0a01       |    |		Execute_Immediate	Plus,0x1
0d24 c224       | $  |		Store	0x1,0x24
0d25 e5ff       |    |		Load	0x2,-0x1
0d26 0217       |    |		Execute	Heap_Access,All_Reference
0d27 2c0c       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xc
0d28 6807       |h   |		Jump_Zero	0xd30
0d29 4801       |H   |		Short_Literal	0x1
0d2a 00da       |    |		Load_Top	At_Offset_2
0d2b 8044       | D  |		Call	0x0,0x44
0d2c e5fd       |    |		Load	0x2,-0x3
0d2d 8257       | W  |		Call	0x1,0x57
0d2e 00da       |    |		Load_Top	At_Offset_2
0d2f 8045       | E  |		Call	0x0,0x45
0d30 e223       | #  |		Load	0x1,0x23
0d31 6807       |h   |		Jump_Zero	0xd39
0d32 0092 0eff  |    |		Action	Push_String_Extended,0xeff					; "  Task Element Stack Size ="
0d34 e224       | $  |		Load	0x1,0x24
0d35 00e0       |    |		Load_Encached	Standard_Cache
0d36 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0d37 01cc       |    |		Execute	Vector,Catenate
0d38 8232       | 2  |		Call	0x1,0x32
0d39 0092 0f00  |    |		Action	Push_String_Extended,0xf00					; "EXIT Push_Decision_Point"
0d3b 8232       | 2  |		Call	0x1,0x32
0d3c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0d3d 0000 0000  |    |		.XXX[0x3]
0d3f 0000       |    |
0d40 ; --------------------------------------------------------------------------------------
0d40 ; SUBPROGRAM
0d40 ; --------------------------------------------------------------------------------------
0d40 0d47       | G  |		.CONST	0x0d47								; Address of begin
0d41 0004       |    |		.CONST	0x0004								; Address of exception handler
0d42 0003       |    |		.CONST	0x0003								; Number of locals
0d43			INIT_0d40:
0d43 e5fc       |    |		Load	0x2,-0x4
0d44 8258       | X  |		Call	0x1,0x58
0d45 029f 0e7b  |   {|		Declare_Subprogram	INIT_0e78,For_Call
0d47			BODY_0d40:
0d47 0092 0f01  |    |		Action	Push_String_Extended,0xf01					; "ENTER Base_Class_Process_Decision_Arm_Bkpt"
0d49 8232       | 2  |		Call	0x1,0x32
0d4a 00d9       |    |		Load_Top	At_Offset_1
0d4b 803b       | ;  |		Call	0x0,0x3b
0d4c 7004       |p   |		Jump_Nonzero	0xd51
0d4d 0092 0f02  |    |		Action	Push_String_Extended,0xf02					; "  Stack not EMPTY"
0d4f 8232       | 2  |		Call	0x1,0x32
0d50 8403       |    |		Call	0x2,0x3
0d51 0092 0f03  |    |		Action	Push_String_Extended,0xf03					; "EXIT Base_Class_Process_Decision_Arm_Bkpt"
0d53 8232       | 2  |		Call	0x1,0x32
0d54 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0d55 0000 0000  |    |		.XXX[0x3]
0d57 0000       |    |
0d58 ; --------------------------------------------------------------------------------------
0d58 ; SUBPROGRAM
0d58 ; --------------------------------------------------------------------------------------
0d58 0d5b       | [  |		.CONST	0x0d5b								; Address of begin
0d59 0004       |    |		.CONST	0x0004								; Address of exception handler
0d5a 0001       |    |		.CONST	0x0001								; Number of locals
0d5b			BODY_0d58:
0d5b			INIT_0d58:
0d5b 00da       |    |		Load_Top	At_Offset_2
0d5c e402       |    |		Load	0x2,0x2
0d5d 01d7       |    |		Execute	Vector,Field_Read
0d5e 0f3b       | ;  |		Execute_Immediate	Equal,0x3b
0d5f 6802       |h   |		Jump_Zero	0xd62
0d60 4801       |H   |		Short_Literal	0x1
0d61 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0d62 00da       |    |		Load_Top	At_Offset_2
0d63 0a04       |    |		Execute_Immediate	Plus,0x4
0d64 e402       |    |		Load	0x2,0x2
0d65 01dc       |    |		Execute	Vector,Last
0d66 027a       | z  |		Execute	Discrete,Less_Equal
0d67 6821       |h!  |		Jump_Zero	0xd89
0d68 00da       |    |		Load_Top	At_Offset_2
0d69 00db       |    |		Load_Top	At_Offset_3
0d6a 0a04       |    |		Execute_Immediate	Plus,0x4
0d6b 00d8       |    |		Load_Top	At_Offset_0
0d6c 00e2       |    |		Load_Encached	Integer_Cache
0d6d 0260       | `  |		Execute	Discrete,In_Type
0d6e 7001       |p   |		Jump_Nonzero	0xd70
0d6f 0801       |    |		Execute_Immediate	Raise,0x1
0d70 e402       |    |		Load	0x2,0x2
0d71 01cf       |    |		Execute	Vector,Slice_Read
0d72 0092 0f04  |    |		Action	Push_String_Extended,0xf04					; " loop"
0d74 01df       |    |		Execute	Vector,Equal
0d75 00db       |    |		Load_Top	At_Offset_3
0d76 e7ff       |    |		Load	0x3,-0x1
0d77 0a04       |    |		Execute_Immediate	Plus,0x4
0d78 00d8       |    |		Load_Top	At_Offset_0
0d79 00e2       |    |		Load_Encached	Integer_Cache
0d7a 0260       | `  |		Execute	Discrete,In_Type
0d7b 7001       |p   |		Jump_Nonzero	0xd7d
0d7c 0801       |    |		Execute_Immediate	Raise,0x1
0d7d e402       |    |		Load	0x2,0x2
0d7e 01cf       |    |		Execute	Vector,Slice_Read
0d7f 0092 0f05  |    |		Action	Push_String_Extended,0xf05					; " then"
0d81 01df       |    |		Execute	Vector,Equal
0d82 0278       | x  |		Execute	Discrete,Or
0d83 6805       |h   |		Jump_Zero	0xd89
0d84 e404       |    |		Load	0x2,0x4
0d85 0a04       |    |		Execute_Immediate	Plus,0x4
0d86 c404       |    |		Store	0x2,0x4
0d87 4801       |H   |		Short_Literal	0x1
0d88 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0d89 00da       |    |		Load_Top	At_Offset_2
0d8a e402       |    |		Load	0x2,0x2
0d8b 01dc       |    |		Execute	Vector,Last
0d8c 027f       |    |		Execute	Discrete,Equal
0d8d 6802       |h   |		Jump_Zero	0xd90
0d8e 4801       |H   |		Short_Literal	0x1
0d8f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0d90 4800       |H   |		Short_Literal	0x0
0d91 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0d92 0000 0000  |    |		.BLANK	0000[0x6]
0d98 ; --------------------------------------------------------------------------------------
0d98 ; SUBPROGRAM
0d98 ; --------------------------------------------------------------------------------------
0d98 0da3       |    |		.CONST	0x0da3								; Address of begin
0d99 0dbe       |    |		.CONST	0x0dbe								; Address of exception handler
0d9a 0003       |    |		.CONST	0x0003								; Number of locals
0d9b			INIT_0d98:
0d9b 0092 0f06  |    |		Action	Push_String_Extended,0xf06					; "<FULL>"
0d9d 00db       |    |		Load_Top	At_Offset_3
0d9e 8046       | F  |		Call	0x0,0x46
0d9f 00d8       |    |		Load_Top	At_Offset_0
0da0 01dc       |    |		Execute	Vector,Last
0da1 00e3       |    |		Load_Encached	Natural_Cache
0da2 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0da3			BODY_0d98:
0da3 00cf       |    |		Action	Mark_Auxiliary
0da4 7804       |x   |		Jump	0xda9
0da5 00d9       |    |		Load_Top	At_Offset_1
0da6 0aff       |    |		Execute_Immediate	Plus,-0x1
0da7 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0da8 00c9       |    |		Action	Pop_Auxiliary_Loop
0da9 00d9       |    |		Load_Top	At_Offset_1
0daa 00db       |    |		Load_Top	At_Offset_3
0dab 01d7       |    |		Execute	Vector,Field_Read
0dac 0e3b       | ;  |		Execute_Immediate	Not_Equal,0x3b
0dad 77f7       |w   |		Jump_Nonzero	0xda5
0dae 00ce       |    |		Action	Pop_Auxiliary
0daf 00d8       |    |		Load_Top	At_Offset_0
0db0 0aff       |    |		Execute_Immediate	Plus,-0x1
0db1 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0db2 00d9       |    |		Load_Top	At_Offset_1
0db3 01dd       |    |		Execute	Vector,First
0db4 0a02       |    |		Execute_Immediate	Plus,0x2
0db5 00d8       |    |		Load_Top	At_Offset_0
0db6 00e2       |    |		Load_Encached	Integer_Cache
0db7 0260       | `  |		Execute	Discrete,In_Type
0db8 7001       |p   |		Jump_Nonzero	0xdba
0db9 0801       |    |		Execute_Immediate	Raise,0x1
0dba 00d9       |    |		Load_Top	At_Offset_1
0dbb 00db       |    |		Load_Top	At_Offset_3
0dbc 01cf       |    |		Execute	Vector,Slice_Read
0dbd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0dbe			TRAP_0d98:
0dbe 0007       |    |		Action	Break_Optional
0dbf 00da       |    |		Load_Top	At_Offset_2
0dc0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0dc1 0000 0000  |    |		.BLANK	0000[0x7]
0dc8 ; --------------------------------------------------------------------------------------
0dc8 ; SUBPROGRAM
0dc8 ; --------------------------------------------------------------------------------------
0dc8 0dcb       |    |		.CONST	0x0dcb								; Address of begin
0dc9 0004       |    |		.CONST	0x0004								; Address of exception handler
0dca 0001       |    |		.CONST	0x0001								; Number of locals
0dcb			BODY_0dc8:
0dcb			INIT_0dc8:
0dcb 00da       |    |		Load_Top	At_Offset_2
0dcc 0217       |    |		Execute	Heap_Access,All_Reference
0dcd 2c0b       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xb
0dce 0f00       |    |		Execute_Immediate	Equal,0x0
0dcf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0dd0 ; --------------------------------------------------------------------------------------
0dd0 ; SUBPROGRAM
0dd0 ; --------------------------------------------------------------------------------------
0dd0 0ddd       |    |		.CONST	0x0ddd								; Address of begin
0dd1 0004       |    |		.CONST	0x0004								; Address of exception handler
0dd2 0004       |    |		.CONST	0x0004								; Number of locals
0dd3			INIT_0dd0:
0dd3 e402       |    |		Load	0x2,0x2
0dd4 8047       | G  |		Call	0x0,0x47
0dd5 00d8       |    |		Load_Top	At_Offset_0
0dd6 8048       | H  |		Call	0x0,0x48
0dd7 00e3       |    |		Load_Encached	Natural_Cache
0dd8 03f1       |    |		Declare_Variable	Discrete,With_Value
0dd9 e5ff       |    |		Load	0x2,-0x1
0dda 8257       | W  |		Call	0x1,0x57
0ddb 00e3       |    |		Load_Encached	Natural_Cache
0ddc 03f1       |    |		Declare_Variable	Discrete,With_Value
0ddd			BODY_0dd0:
0ddd 00d9       |    |		Load_Top	At_Offset_1
0dde 00d9       |    |		Load_Top	At_Offset_1
0ddf 027b       | {  |		Execute	Discrete,Greater_Equal
0de0 683e       |h>  |		Jump_Zero	0xe1f
0de1 e010       |    |		Load	0x0,0x10
0de2 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0de3 4801       |H   |		Short_Literal	0x1
0de4 0092 0f07  |    |		Action	Push_String_Extended,0xf07					; "ERROR IN DECISION PROCESSING"
0de6 e011       |    |		Load	0x0,0x11
0de7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0de8 e010       |    |		Load	0x0,0x10
0de9 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0dea 4801       |H   |		Short_Literal	0x1
0deb 0092 0f08  |    |		Action	Push_String_Extended,0xf08					; "Task Element Stack Size ="
0ded e224       | $  |		Load	0x1,0x24
0dee 00e0       |    |		Load_Encached	Standard_Cache
0def 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0df0 01cc       |    |		Execute	Vector,Catenate
0df1 e011       |    |		Load	0x0,0x11
0df2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0df3 e010       |    |		Load	0x0,0x10
0df4 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0df5 4801       |H   |		Short_Literal	0x1
0df6 0092 0f09  |    |		Action	Push_String_Extended,0xf09					; "Return Bkpt Count ="
0df8 e049       | I  |		Load	0x0,0x49
0df9 00e0       |    |		Load_Encached	Standard_Cache
0dfa 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0dfb 01cc       |    |		Execute	Vector,Catenate
0dfc 0092 0f0a  |    |		Action	Push_String_Extended,0xf0a					; "Exc Propagation ="
0dfe 01cc       |    |		Execute	Vector,Catenate
0dff e04a       | J  |		Load	0x0,0x4a
0e00 00e0       |    |		Load_Encached	Standard_Cache
0e01 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e02 01cc       |    |		Execute	Vector,Catenate
0e03 e011       |    |		Load	0x0,0x11
0e04 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0e05 e010       |    |		Load	0x0,0x10
0e06 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0e07 4801       |H   |		Short_Literal	0x1
0e08 0092 0f0b  |    |		Action	Push_String_Extended,0xf0b					; "Top Depth ="
0e0a e602       |    |		Load	0x3,0x2
0e0b 8048       | H  |		Call	0x0,0x48
0e0c 00e0       |    |		Load_Encached	Standard_Cache
0e0d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e0e 01cc       |    |		Execute	Vector,Catenate
0e0f e011       |    |		Load	0x0,0x11
0e10 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0e11 e010       |    |		Load	0x0,0x10
0e12 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0e13 4801       |H   |		Short_Literal	0x1
0e14 0092 0f0c  |    |		Action	Push_String_Extended,0xf0c					; "Top = "
0e16 e602       |    |		Load	0x3,0x2
0e17 804b       | K  |		Call	0x0,0x4b
0e18 8216       |    |		Call	0x1,0x16
0e19 8233       | 3  |		Call	0x1,0x33
0e1a 01cc       |    |		Execute	Vector,Catenate
0e1b e011       |    |		Load	0x0,0x11
0e1c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0e1d e402       |    |		Load	0x2,0x2
0e1e 804c       | L  |		Call	0x0,0x4c
0e1f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0e20 ; --------------------------------------------------------------------------------------
0e20 ; SUBPROGRAM
0e20 ; --------------------------------------------------------------------------------------
0e20 0e34       | 4  |		.CONST	0x0e34								; Address of begin
0e21 0004       |    |		.CONST	0x0004								; Address of exception handler
0e22 0004       |    |		.CONST	0x0004								; Number of locals
0e23			INIT_0e20:
0e23 00da       |    |		Load_Top	At_Offset_2
0e24 0217       |    |		Execute	Heap_Access,All_Reference
0e25 2c0b       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xb
0e26 7006       |p   |		Jump_Nonzero	0xe2d
0e27 00da       |    |		Load_Top	At_Offset_2
0e28 0217       |    |		Execute	Heap_Access,All_Reference
0e29 2c0a       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xa
0e2a e227       | '  |		Load	0x1,0x27
0e2b 021e       |    |		Execute	Heap_Access,Maximum
0e2c 7801       |x   |		Jump	0xe2e
0e2d 4801       |H   |		Short_Literal	0x1
0e2e 00e1       |    |		Load_Encached	Boolean_Cache
0e2f 03f1       |    |		Declare_Variable	Discrete,With_Value
0e30 e220       |    |		Load	0x1,0x20
0e31 0007       |    |		Action	Break_Optional
0e32 029f 0edb  |    |		Declare_Subprogram	INIT_0ed8,For_Call
0e34			BODY_0e20:
0e34 00da       |    |		Load_Top	At_Offset_2
0e35 701b       |p   |		Jump_Nonzero	0xe51
0e36 e7ff       |    |		Load	0x3,-0x1
0e37 8604       |    |		Call	0x3,0x4
0e38 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0e39 00cf       |    |		Action	Mark_Auxiliary
0e3a 7812       |x   |		Jump	0xe4d
0e3b 00da       |    |		Load_Top	At_Offset_2
0e3c 0217       |    |		Execute	Heap_Access,All_Reference
0e3d 2c0b       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xb
0e3e 7006       |p   |		Jump_Nonzero	0xe45
0e3f 00da       |    |		Load_Top	At_Offset_2
0e40 0217       |    |		Execute	Heap_Access,All_Reference
0e41 2c0a       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xa
0e42 e227       | '  |		Load	0x1,0x27
0e43 021e       |    |		Execute	Heap_Access,Maximum
0e44 7801       |x   |		Jump	0xe46
0e45 4801       |H   |		Short_Literal	0x1
0e46 a602       |    |		Store_Unchecked	0x3,0x2
0e47 00db       |    |		Load_Top	At_Offset_3
0e48 7007       |p   |		Jump_Nonzero	0xe50
0e49 00da       |    |		Load_Top	At_Offset_2
0e4a 8604       |    |		Call	0x3,0x4
0e4b 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0e4c 00c9       |    |		Action	Pop_Auxiliary_Loop
0e4d 00da       |    |		Load_Top	At_Offset_2
0e4e 820f       |    |		Call	0x1,0xf
0e4f 6feb       |o   |		Jump_Zero	0xe3b
0e50 00ce       |    |		Action	Pop_Auxiliary
0e51 00da       |    |		Load_Top	At_Offset_2
0e52 0f00       |    |		Execute_Immediate	Equal,0x0
0e53 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0e54 0000 0000  |    |		.BLANK	0000[0x4]
0e58 ; --------------------------------------------------------------------------------------
0e58 ; SUBPROGRAM
0e58 ; --------------------------------------------------------------------------------------
0e58 0e5b       | [  |		.CONST	0x0e5b								; Address of begin
0e59 0e6c       | l  |		.CONST	0x0e6c								; Address of exception handler
0e5a 0001       |    |		.CONST	0x0001								; Number of locals
0e5b			BODY_0e58:
0e5b			INIT_0e58:
0e5b e402       |    |		Load	0x2,0x2
0e5c 8013       |    |		Call	0x0,0x13
0e5d a404       |    |		Store_Unchecked	0x2,0x4
0e5e e404       |    |		Load	0x2,0x4
0e5f e5fe       |    |		Load	0x2,-0x2
0e60 021f       |    |		Execute	Heap_Access,Equal
0e61 6802       |h   |		Jump_Zero	0xe64
0e62 00cc       |    |		Action	Pop_Block
0e63 7db4       |}   |		Jump	0xc18
0e64 e404       |    |		Load	0x2,0x4
0e65 8237       | 7  |		Call	0x1,0x37
0e66 a403       |    |		Store_Unchecked	0x2,0x3
0e67 e403       |    |		Load	0x2,0x3
0e68 6802       |h   |		Jump_Zero	0xe6b
0e69 00cc       |    |		Action	Pop_Block
0e6a 7dad       |}   |		Jump	0xc18
0e6b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0e6c			TRAP_0e58:
0e6c e00a       |    |		Load	0x0,0xa
0e6d 010f       |    |		Execute	Exception,Equal
0e6e 6801       |h   |		Jump_Zero	0xe70
0e6f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0e70 0100       |    |		Execute	Exception,Raise
0e71 0000 0000  |    |		.BLANK	0000[0x7]
0e78 ; --------------------------------------------------------------------------------------
0e78 ; SUBPROGRAM
0e78 ; --------------------------------------------------------------------------------------
0e78 0e81       |    |		.CONST	0x0e81								; Address of begin
0e79 0004       |    |		.CONST	0x0004								; Address of exception handler
0e7a 0003       |    |		.CONST	0x0003								; Number of locals
0e7b			INIT_0e78:
0e7b e402       |    |		Load	0x2,0x2
0e7c 8047       | G  |		Call	0x0,0x47
0e7d e5fc       |    |		Load	0x2,-0x4
0e7e 8257       | W  |		Call	0x1,0x57
0e7f 00e3       |    |		Load_Encached	Natural_Cache
0e80 03f1       |    |		Declare_Variable	Discrete,With_Value
0e81			BODY_0e78:
0e81 e223       | #  |		Load	0x1,0x23
0e82 6837       |h7  |		Jump_Zero	0xeba
0e83 0092 0eff  |    |		Action	Push_String_Extended,0xeff					; "  Task Element Stack Size ="
0e85 e224       | $  |		Load	0x1,0x24
0e86 00e0       |    |		Load_Encached	Standard_Cache
0e87 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e88 01cc       |    |		Execute	Vector,Catenate
0e89 8232       | 2  |		Call	0x1,0x32
0e8a 0092 0f0d  |    |		Action	Push_String_Extended,0xf0d					; "  Return Bkpt Count ="
0e8c e049       | I  |		Load	0x0,0x49
0e8d 00e0       |    |		Load_Encached	Standard_Cache
0e8e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e8f 01cc       |    |		Execute	Vector,Catenate
0e90 0092 0f0e  |    |		Action	Push_String_Extended,0xf0e					; "  Exc Propagation ="
0e92 01cc       |    |		Execute	Vector,Catenate
0e93 e04a       | J  |		Load	0x0,0x4a
0e94 00e0       |    |		Load_Encached	Standard_Cache
0e95 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e96 01cc       |    |		Execute	Vector,Catenate
0e97 8232       | 2  |		Call	0x1,0x32
0e98 0092 0f0f  |    |		Action	Push_String_Extended,0xf0f					; "  Task Depth ="
0e9a 00d9       |    |		Load_Top	At_Offset_1
0e9b 00e0       |    |		Load_Encached	Standard_Cache
0e9c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e9d 01cc       |    |		Execute	Vector,Catenate
0e9e 0092 0f10  |    |		Action	Push_String_Extended,0xf10					; "  Top Depth ="
0ea0 01cc       |    |		Execute	Vector,Catenate
0ea1 00da       |    |		Load_Top	At_Offset_2
0ea2 8048       | H  |		Call	0x0,0x48
0ea3 00e0       |    |		Load_Encached	Standard_Cache
0ea4 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0ea5 01cc       |    |		Execute	Vector,Catenate
0ea6 8232       | 2  |		Call	0x1,0x32
0ea7 0092 0f11  |    |		Action	Push_String_Extended,0xf11					; "  The_Fcp = "
0ea9 0092 0f06  |    |		Action	Push_String_Extended,0xf06					; "<FULL>"
0eab e5fe       |    |		Load	0x2,-0x2
0eac 8216       |    |		Call	0x1,0x16
0ead 8046       | F  |		Call	0x0,0x46
0eae 01cc       |    |		Execute	Vector,Catenate
0eaf 8232       | 2  |		Call	0x1,0x32
0eb0 0092 0f12  |    |		Action	Push_String_Extended,0xf12					; "  Top     = "
0eb2 0092 0f06  |    |		Action	Push_String_Extended,0xf06					; "<FULL>"
0eb4 00db       |    |		Load_Top	At_Offset_3
0eb5 804b       | K  |		Call	0x0,0x4b
0eb6 8216       |    |		Call	0x1,0x16
0eb7 8046       | F  |		Call	0x0,0x46
0eb8 01cc       |    |		Execute	Vector,Catenate
0eb9 8232       | 2  |		Call	0x1,0x32
0eba 00d9       |    |		Load_Top	At_Offset_1
0ebb 804b       | K  |		Call	0x0,0x4b
0ebc e5fe       |    |		Load	0x2,-0x2
0ebd 021f       |    |		Execute	Heap_Access,Equal
0ebe 6817       |h   |		Jump_Zero	0xed6
0ebf 00d9       |    |		Load_Top	At_Offset_1
0ec0 8048       | H  |		Call	0x0,0x48
0ec1 00d9       |    |		Load_Top	At_Offset_1
0ec2 027b       | {  |		Execute	Discrete,Greater_Equal
0ec3 6812       |h   |		Jump_Zero	0xed6
0ec4 0092 0f13  |    |		Action	Push_String_Extended,0xf13					; "  Mark Covered"
0ec6 8232       | 2  |		Call	0x1,0x32
0ec7 e5fd       |    |		Load	0x2,-0x3
0ec8 e5ff       |    |		Load	0x2,-0x1
0ec9 824c       | L  |		Call	0x1,0x4c
0eca e402       |    |		Load	0x2,0x2
0ecb 804c       | L  |		Call	0x0,0x4c
0ecc e224       | $  |		Load	0x1,0x24
0ecd 0aff       |    |		Execute_Immediate	Plus,-0x1
0ece c224       | $  |		Store	0x1,0x24
0ecf e5fe       |    |		Load	0x2,-0x2
0ed0 0217       |    |		Execute	Heap_Access,All_Reference
0ed1 2c0c       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xc
0ed2 6803       |h   |		Jump_Zero	0xed6
0ed3 4801       |H   |		Short_Literal	0x1
0ed4 e402       |    |		Load	0x2,0x2
0ed5 804d       | M  |		Call	0x0,0x4d
0ed6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0ed7 0000       |    |		.XXX[0x1]
0ed8 ; --------------------------------------------------------------------------------------
0ed8 ; SUBPROGRAM
0ed8 ; --------------------------------------------------------------------------------------
0ed8 0edb       |    |		.CONST	0x0edb								; Address of begin
0ed9 0004       |    |		.CONST	0x0004								; Address of exception handler
0eda 0001       |    |		.CONST	0x0001								; Number of locals
0edb			BODY_0ed8:
0edb			INIT_0ed8:
0edb 00da       |    |		Load_Top	At_Offset_2
0edc 0217       |    |		Execute	Heap_Access,All_Reference
0edd 2c09       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
0ede 6806       |h   |		Jump_Zero	0xee5
0edf 00da       |    |		Load_Top	At_Offset_2
0ee0 0217       |    |		Execute	Heap_Access,All_Reference
0ee1 2c09       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
0ee2 0217       |    |		Execute	Heap_Access,All_Reference
0ee3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0ee4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ee5 e220       |    |		Load	0x1,0x20
0ee6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ee7 ; --------------------------------------------------------------------------------------
0ee7 ; STRING TABLE
0ee7 ; --------------------------------------------------------------------------------------
0ee7 005c       | \  |		.STRTAB	0x005c->0x0f15							; "NONE"
0ee8 005e       | ^  |		.STRTAB	0x005e->0x0f17							; "SUBP_ENTRY_POINT"
0ee9 006c       | l  |		.STRTAB	0x006c->0x0f1f							; "TASK_ENTRY_POINT"
0eea 007a       | z  |		.STRTAB	0x007a->0x0f27							; "IF_POINT"
0eeb 0080       |    |		.STRTAB	0x0080->0x0f2b							; "IF_ELSE_POINT"
0eec 008b       |    |		.STRTAB	0x008b->0x0f31							; "CASE_POINT"
0eed 0093       |    |		.STRTAB	0x0093->0x0f36							; "ACCEPT_POINT"
0eee 009d       |    |		.STRTAB	0x009d->0x0f3c							; "SELECT_POINT"
0eef 00a7       |    |		.STRTAB	0x00a7->0x0f42							; "EXCEPTION_POINT"
0ef0 00b4       |    |		.STRTAB	0x00b4->0x0f4a							; "FOR_LOOP_POINT"
0ef1 00c0       |    |		.STRTAB	0x00c0->0x0f51							; "WHILE_LOOP_POINT"
0ef2 00ce       |    |		.STRTAB	0x00ce->0x0f59							; "LOOP_POINT"
0ef3 00d6       |    |		.STRTAB	0x00d6->0x0f5e							; "EXIT_LOOP_POINT"
0ef4 00e3       |    |		.STRTAB	0x00e3->0x0f65							; "BLOCK_POINT"
0ef5 00ec       |    |		.STRTAB	0x00ec->0x0f6b							; "SEGMENT_POINT"
0ef6 00f7       |    |		.STRTAB	0x00f7->0x0f71							; "RETURN_POINT"
0ef7 0101       |    |		.STRTAB	0x0101->0x0f77							; "Encounter_Bkpt_Event "
0ef8 0114       |    |		.STRTAB	0x0114->0x0f82							; " with ID"
0ef9 011a       |    |		.STRTAB	0x011a->0x0f86							; "Attempt to mark coverage on invalid element "
0efa 0144       | D  |		.STRTAB	0x0144->0x0f9c							; "\x22"
0efb 0143       | C  |		.STRTAB	0x0143->0x0f9c							; " in "
0efc 0145       | E  |		.STRTAB	0x0145->0x0f9e							; "No code generated for "
0efd 0159       | Y  |		.STRTAB	0x0159->0x0fa9							; "  Mark_Covered"
0efe 0165       | e  |		.STRTAB	0x0165->0x0fb0							; "ENTER Push_Decision_Point"
0eff 017c       | |  |		.STRTAB	0x017c->0x0fbd							; "  Task Element Stack Size ="
0f00 0195       |    |		.STRTAB	0x0195->0x0fca							; "EXIT Push_Decision_Point"
0f01 01ab       |    |		.STRTAB	0x01ab->0x0fd6							; "ENTER Base_Class_Process_Decision_Arm_Bkpt"
0f02 01d3       |    |		.STRTAB	0x01d3->0x0feb							; "  Stack not EMPTY"
0f03 01e2       |    |		.STRTAB	0x01e2->0x0ff4							; "EXIT Base_Class_Process_Decision_Arm_Bkpt"
0f04 0209       |    |		.STRTAB	0x0209->0x1008							; " loop"
0f05 020c       |    |		.STRTAB	0x020c->0x100b							; " then"
0f06 020f       |    |		.STRTAB	0x020f->0x100d							; "<FULL>"
0f07 0213       |    |		.STRTAB	0x0213->0x1010							; "ERROR IN DECISION PROCESSING"
0f08 022d       | -  |		.STRTAB	0x022d->0x101e							; "Task Element Stack Size ="
0f09 0244       | D  |		.STRTAB	0x0244->0x102b							; "Return Bkpt Count ="
0f0a 0255       | U  |		.STRTAB	0x0255->0x1034							; "Exc Propagation ="
0f0b 0264       | d  |		.STRTAB	0x0264->0x103d							; "Top Depth ="
0f0c 026d       | m  |		.STRTAB	0x026d->0x1042							; "Top = "
0f0d 0271       | q  |		.STRTAB	0x0271->0x1045							; "  Return Bkpt Count ="
0f0e 0284       |    |		.STRTAB	0x0284->0x1050							; "  Exc Propagation ="
0f0f 0295       |    |		.STRTAB	0x0295->0x1059							; "  Task Depth ="
0f10 02a1       |    |		.STRTAB	0x02a1->0x1060							; "  Top Depth ="
0f11 02ac       |    |		.STRTAB	0x02ac->0x1067							; "  The_Fcp = "
0f12 02b6       |    |		.STRTAB	0x02b6->0x106d							; "  Top     = "
0f13 02c0       |    |		.STRTAB	0x02c0->0x1073							; "  Mark Covered"
0f14 02cc       |    |		.STREND 0x02cc->0x107a
0f15 4e4f 4e45  |NONE|		.STRTAB_STRINGS
107a 0000 0000  |    |		.BLANK	0000[0x6]
1080 ; --------------------------------------------------------------------------------------
1080 ; Debug Table
1080 ; --------------------------------------------------------------------------------------
1080 0004 000a  |    |		.DEBUG4	0x0004,0x000a,0xa1a5,0x0000,0x0001,0x0000
1086 0000 0000  |    |		.BLANK	0000[0x17a]