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

⟦6b0dcac33⟧

    Length: 8192 (0x2000)
    Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_07b4f8

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0a68       | h  |		.CONST	0x0a68								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0007       |    |		.CONST	0x0007								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0117       |    |		.CONST	0x0117								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0054       | T  |		.CONST	0x0054								; Number of locals
000b			INIT_0008:
000b e001       |    |		Load	0x0,0x1								; Debug Table 0x0 = .DEBUG	0x000b,0x0bf2,0x8000,0x0000,0x0032,0xc824,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
000d 0129       | )  |		Execute	Any,Make_Visible
000e e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x1 = 0xe,0xfffe
000f 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
0010 0129       | )  |		Execute	Any,Make_Visible
0011 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x2 = 0x11,0xfffd
0012 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
0013 0129       | )  |		Execute	Any,Make_Visible
0014 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x3 = 0x14,0xfffc
0015 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0016 0129       | )  |		Execute	Any,Make_Visible
0017 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x4 = 0x17,0xfffb
0018 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
0019 0129       | )  |		Execute	Any,Make_Visible
001a e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x5 = 0x1a,0xfffa
001b 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
001c 0129       | )  |		Execute	Any,Make_Visible
001d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x6 = 0x1d,0xfff9
001e 0129       | )  |		Execute	Any,Make_Visible
001f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x7 = 0x1f,0xfff8
0020 480c       |H   |		Short_Literal	0xc
0021 029f 0123  |   #|		Declare_Subprogram	INIT_0120,For_Call
0023 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0024 029a 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x24,0xfff7
0026 029a 0183  |    |		Declare_Subprogram	INIT_0180,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x26,0xfff6
0028 029a 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x28,0xfff5
002a 029a 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x2a,0xfff4
002c 029a 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x2c,0xfff3
002e 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x2e,0xfff2
0030 029a 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x30,0xfff1
0032 029a 02f3  |    |		Declare_Subprogram	INIT_02f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x32,0xfff0
0034 e212       |    |		Load	0x1,0x12							; Debug Table 0x0.0x10 = 0x34,0xffef
0035 0129       | )  |		Execute	Any,Make_Visible
0036 e212       |    |		Load	0x1,0x12							; Debug Table 0x0.0x11 = 0x36,0xffee
0037 0129       | )  |		Execute	Any,Make_Visible
0038 e212       |    |		Load	0x1,0x12							; Debug Table 0x0.0x12 = 0x38,0xffed
0039 0129       | )  |		Execute	Any,Make_Visible
003a e212       |    |		Load	0x1,0x12							; Debug Table 0x0.0x13 = 0x3a,0xffec
003b 0129       | )  |		Execute	Any,Make_Visible
003c e212       |    |		Load	0x1,0x12							; Debug Table 0x0.0x14 = 0x3c,0xffeb
003d 0129       | )  |		Execute	Any,Make_Visible
003e e212       |    |		Load	0x1,0x12							; Debug Table 0x0.0x15 = 0x3e,0xffea
003f 0129       | )  |		Execute	Any,Make_Visible
0040 e212       |    |		Load	0x1,0x12							; Debug Table 0x0.0x16 = 0x40,0xffe9
0041 0129       | )  |		Execute	Any,Make_Visible
0042 e212       |    |		Load	0x1,0x12							; Debug Table 0x0.0x17 = 0x42,0xffe8
0043 0129       | )  |		Execute	Any,Make_Visible
0044 e212       |    |		Load	0x1,0x12							; Debug Table 0x0.0x18 = 0x44,0xffe7
0045 0129       | )  |		Execute	Any,Make_Visible
0046 e212       |    |		Load	0x1,0x12							; Debug Table 0x0.0x19 = 0x46,0xffe6
0047 0129       | )  |		Execute	Any,Make_Visible
0048 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x1a = 0x48,0xffe5
0049 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
004a 0129       | )  |		Execute	Any,Make_Visible
004b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x1b = 0x4b,0xffe4
004c 4806       |H   |		Short_Literal	0x6
004d 029f 030b  |    |		Declare_Subprogram	INIT_0308,For_Call
004f 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0050 029a 0323  |   #|		Declare_Subprogram	INIT_0320,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1c = 0x50,0xffe3
0052 029a 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1d = 0x52,0xffe2
0054 029a 036b  |   k|		Declare_Subprogram	INIT_0368,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1e = 0x54,0xffe1
0056 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x1f = 0x56,0xffe0
0057 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0058 0129       | )  |		Execute	Any,Make_Visible
0059 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x20 = 0x59,0xffdf
005a 4803       |H   |		Short_Literal	0x3
005b 029f 038b  |    |		Declare_Subprogram	INIT_0388,For_Call
005d 03fe       |    |		Declare_Type	Discrete,Defined,Visible
005e 029a 03a3  |    |		Declare_Subprogram	INIT_03a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x21 = 0x5e,0xffde
0060 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x22 = 0x60,0xffdd
0061 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0062 0129       | )  |		Execute	Any,Make_Visible
0063 029a 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x23 = 0x63,0xffdc
0065 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x24 = 0x65,0xffdb
0066 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0067 0129       | )  |		Execute	Any,Make_Visible
0068 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x25 = 0x68,0xffda
0069 4804       |H   |		Short_Literal	0x4
006a 029f 040b  |    |		Declare_Subprogram	INIT_0408,For_Call
006c 03fe       |    |		Declare_Type	Discrete,Defined,Visible
006d 029a 0423  |   #|		Declare_Subprogram	INIT_0420,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x26 = 0x6d,0xffd9
006f 029a 0463  |   c|		Declare_Subprogram	INIT_0460,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x27 = 0x6f,0xffd8
0071 029a 047b  |   {|		Declare_Subprogram	INIT_0478,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x28 = 0x71,0xffd7
0073 029a 0493  |    |		Declare_Subprogram	INIT_0490,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x29 = 0x73,0xffd6
0075 029a 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2a = 0x75,0xffd5
0077 029a 04cb  |    |		Declare_Subprogram	INIT_04c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2b = 0x77,0xffd4
0079 029a 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2c = 0x79,0xffd3
007b 029a 0503  |    |		Declare_Subprogram	INIT_0500,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2d = 0x7b,0xffd2
007d 029a 0523  |   #|		Declare_Subprogram	INIT_0520,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2e = 0x7d,0xffd1
007f 029a 054b  |   K|		Declare_Subprogram	INIT_0548,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2f = 0x7f,0xffd0
0081 029a 056b  |   k|		Declare_Subprogram	INIT_0568,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x30 = 0x81,0xffcf
0083 029a 0593  |    |		Declare_Subprogram	INIT_0590,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x31 = 0x83,0xffce
0085 029a 05b3  |    |		Declare_Subprogram	INIT_05b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x32 = 0x85,0xffcd
0087 029a 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x33 = 0x87,0xffcc
0089 029a 05eb  |    |		Declare_Subprogram	INIT_05e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x34 = 0x89,0xffcb
008b 029a 060b  |    |		Declare_Subprogram	INIT_0608,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x35 = 0x8b,0xffca
008d e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x36 = 0x8d,0xffc9
008e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
008f 0129       | )  |		Execute	Any,Make_Visible
0090 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x37 = 0x90,0xffc8
0091 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0092 0129       | )  |		Execute	Any,Make_Visible
0093 029a 0623  |   #|		Declare_Subprogram	INIT_0620,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x38 = 0x93,0xffc7
0095 029a 0643  |   C|		Declare_Subprogram	INIT_0640,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x39 = 0x95,0xffc6
0097 029a 0663  |   c|		Declare_Subprogram	INIT_0660,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3a = 0x97,0xffc5
0099 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x3b = 0x99,0xffc4
009a 4803       |H   |		Short_Literal	0x3
009b 029f 067b  |   {|		Declare_Subprogram	INIT_0678,For_Call
009d 03fe       |    |		Declare_Type	Discrete,Defined,Visible
009e 029a 0693  |    |		Declare_Subprogram	INIT_0690,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3c = 0x9e,0xffc3
00a0 029a 06bb  |    |		Declare_Subprogram	INIT_06b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3d = 0xa0,0xffc2
00a2 029a 06d3  |    |		Declare_Subprogram	INIT_06d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3e = 0xa2,0xffc1
00a4 029a 06eb  |    |		Declare_Subprogram	INIT_06e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3f = 0xa4,0xffc0
00a6 029a 0703  |    |		Declare_Subprogram	INIT_0700,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x40 = 0xa6,0xffbf
00a8 029a 071b  |    |		Declare_Subprogram	INIT_0718,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x41 = 0xa8,0xffbe
00aa 029a 0733  |   3|		Declare_Subprogram	INIT_0730,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x42 = 0xaa,0xffbd
00ac 029a 074b  |   K|		Declare_Subprogram	INIT_0748,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x43 = 0xac,0xffbc
00ae 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x44 = 0xae,0xffbb
00af 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x45 = 0xaf,0xffba
00b0 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0.0x46 = 0xb0,0xffb9
00b1 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x00b1,0x0c82,0x8000,0x0000,0x0033,0xd6f4,0x0000,0x0013
													; Debug Table 0x1.0x0 = 0xb1,0xffff
00b2 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0xb2,0xfffe
00b3 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0xb3,0xfffd
00b4 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x3 = 0xb4,0xfffc
00b5 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
00b6 190f       |    |		Execute	Package,Field_Reference,Field_Number 0xf
00b7 0007       |    |		Action	Break_Optional
00b8 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x4 = 0xb8,0xfffb
00b9 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
00ba 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
00bb 0007       |    |		Action	Break_Optional
00bc 029d 0763  |   c|		Declare_Subprogram	INIT_0760,For_Outer_Call			; Debug Table 0x1.0x5 = 0xbc,0xfffa
00be 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x6 = 0xbe,0xfff9
00bf 029d 0783  |    |		Declare_Subprogram	INIT_0780,For_Outer_Call			; Debug Table 0x1.0x7 = 0xbf,0xfff8
00c1 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x8 = 0xc1,0xfff7
00c2 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x9 = 0xc2,0xfff6
00c3 00c7       |    |		Action	Elaborate_Subprogram
00c4 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0xa = 0xc4,0xfff5
00c5 00c7       |    |		Action	Elaborate_Subprogram
00c6 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xb = 0xc6,0xfff4
00c7 00c7       |    |		Action	Elaborate_Subprogram
00c8 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0xc = 0xc8,0xfff3
00c9 00c7       |    |		Action	Elaborate_Subprogram
00ca 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0xd = 0xca,0xfff2
00cb 00c7       |    |		Action	Elaborate_Subprogram
00cc 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0xe = 0xcc,0xfff1
00cd 00c7       |    |		Action	Elaborate_Subprogram
00ce 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0xf = 0xce,0xfff0
00cf 00c7       |    |		Action	Elaborate_Subprogram
00d0 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x10 = 0xd0,0xffef
00d1 00c7       |    |		Action	Elaborate_Subprogram
00d2 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29				; Debug Table 0x1.0x11 = 0xd2,0xffee
00d3 00c7       |    |		Action	Elaborate_Subprogram
00d4 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a				; Debug Table 0x1.0x12 = 0xd4,0xffed
00d5 00c7       |    |		Action	Elaborate_Subprogram
00d6 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b				; Debug Table 0x1.0x13 = 0xd6,0xffec
00d7 00c7       |    |		Action	Elaborate_Subprogram
00d8 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e				; Debug Table 0x1.0x14 = 0xd8,0xffeb
00d9 00c7       |    |		Action	Elaborate_Subprogram
00da 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30				; Debug Table 0x1.0x15 = 0xda,0xffea
00db 00c7       |    |		Action	Elaborate_Subprogram
00dc 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x16 = 0xdc,0xffe9
00dd 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33				; Debug Table 0x1.0x17 = 0xdd,0xffe8
00de 00c7       |    |		Action	Elaborate_Subprogram
00df 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34				; Debug Table 0x1.0x18 = 0xdf,0xffe7
00e0 00c7       |    |		Action	Elaborate_Subprogram
00e1 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35				; Debug Table 0x1.0x19 = 0xe1,0xffe6
00e2 00c7       |    |		Action	Elaborate_Subprogram
00e3 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36				; Debug Table 0x1.0x1a = 0xe3,0xffe5
00e4 00c7       |    |		Action	Elaborate_Subprogram
00e5 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1b = 0xe5,0xffe4
00e6 1d37       | 7  |		Execute_Immediate	Reference_Lex_1,0x37				; Debug Table 0x1.0x1c = 0xe6,0xffe3
00e7 00c7       |    |		Action	Elaborate_Subprogram
00e8 1d38       | 8  |		Execute_Immediate	Reference_Lex_1,0x38				; Debug Table 0x1.0x1d = 0xe8,0xffe2
00e9 00c7       |    |		Action	Elaborate_Subprogram
00ea 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39				; Debug Table 0x1.0x1e = 0xea,0xffe1
00eb 00c7       |    |		Action	Elaborate_Subprogram
00ec 1d3a       | :  |		Execute_Immediate	Reference_Lex_1,0x3a				; Debug Table 0x1.0x1f = 0xec,0xffe0
00ed 00c7       |    |		Action	Elaborate_Subprogram
00ee 1d3b       | ;  |		Execute_Immediate	Reference_Lex_1,0x3b				; Debug Table 0x1.0x20 = 0xee,0xffdf
00ef 00c7       |    |		Action	Elaborate_Subprogram
00f0 1d3c       | <  |		Execute_Immediate	Reference_Lex_1,0x3c				; Debug Table 0x1.0x21 = 0xf0,0xffde
00f1 00c7       |    |		Action	Elaborate_Subprogram
00f2 1d3d       | =  |		Execute_Immediate	Reference_Lex_1,0x3d				; Debug Table 0x1.0x22 = 0xf2,0xffdd
00f3 00c7       |    |		Action	Elaborate_Subprogram
00f4 1d3e       | >  |		Execute_Immediate	Reference_Lex_1,0x3e				; Debug Table 0x1.0x23 = 0xf4,0xffdc
00f5 00c7       |    |		Action	Elaborate_Subprogram
00f6 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x24 = 0xf6,0xffdb
00f7 1d3f       | ?  |		Execute_Immediate	Reference_Lex_1,0x3f				; Debug Table 0x1.0x25 = 0xf7,0xffda
00f8 00c7       |    |		Action	Elaborate_Subprogram
00f9 1d40       | @  |		Execute_Immediate	Reference_Lex_1,0x40				; Debug Table 0x1.0x26 = 0xf9,0xffd9
00fa 00c7       |    |		Action	Elaborate_Subprogram
00fb 1d41       | A  |		Execute_Immediate	Reference_Lex_1,0x41				; Debug Table 0x1.0x27 = 0xfb,0xffd8
00fc 00c7       |    |		Action	Elaborate_Subprogram
00fd 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42				; Debug Table 0x1.0x28 = 0xfd,0xffd7
00fe 00c7       |    |		Action	Elaborate_Subprogram
00ff 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x29 = 0xff,0xffd6
0100 1d45       | E  |		Execute_Immediate	Reference_Lex_1,0x45				; Debug Table 0x1.0x2a = 0x100,0xffd5
0101 00c7       |    |		Action	Elaborate_Subprogram
0102 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46				; Debug Table 0x1.0x2b = 0x102,0xffd4
0103 00c7       |    |		Action	Elaborate_Subprogram
0104 1d47       | G  |		Execute_Immediate	Reference_Lex_1,0x47				; Debug Table 0x1.0x2c = 0x104,0xffd3
0105 00c7       |    |		Action	Elaborate_Subprogram
0106 1d49       | I  |		Execute_Immediate	Reference_Lex_1,0x49				; Debug Table 0x1.0x2d = 0x106,0xffd2
0107 00c7       |    |		Action	Elaborate_Subprogram
0108 1d4a       | J  |		Execute_Immediate	Reference_Lex_1,0x4a				; Debug Table 0x1.0x2e = 0x108,0xffd1
0109 00c7       |    |		Action	Elaborate_Subprogram
010a 1d4b       | K  |		Execute_Immediate	Reference_Lex_1,0x4b				; Debug Table 0x1.0x2f = 0x10a,0xffd0
010b 00c7       |    |		Action	Elaborate_Subprogram
010c 1d4c       | L  |		Execute_Immediate	Reference_Lex_1,0x4c				; Debug Table 0x1.0x30 = 0x10c,0xffcf
010d 00c7       |    |		Action	Elaborate_Subprogram
010e 1d4d       | M  |		Execute_Immediate	Reference_Lex_1,0x4d				; Debug Table 0x1.0x31 = 0x10e,0xffce
010f 00c7       |    |		Action	Elaborate_Subprogram
0110 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x32 = 0x110,0xffcd
0111 1d4e       | N  |		Execute_Immediate	Reference_Lex_1,0x4e				; Debug Table 0x1.0x33 = 0x111,0xffcc
0112 00c7       |    |		Action	Elaborate_Subprogram
0113 1d4f       | O  |		Execute_Immediate	Reference_Lex_1,0x4f				; Debug Table 0x1.0x34 = 0x113,0xffcb
0114 00c7       |    |		Action	Elaborate_Subprogram
0115 1d50       | P  |		Execute_Immediate	Reference_Lex_1,0x50				; Debug Table 0x1.0x35 = 0x115,0xffca
0116 00c7       |    |		Action	Elaborate_Subprogram
0117			BODY_0008:
0117 00bc       |    |		Action	Signal_Activated
0118 00bb       |    |		Action	Signal_Completion
0119 0000 0000  |    |		.BLANK	0000[0x7]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123       | #  |		.CONST	0x0123								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0001       |    |		.CONST	0x0001								; Number of locals
0123			BODY_0120:
0123			INIT_0120:
0123 4603       |F   |		Jump_Case	0x4							; Debug Table 0x2 = .DEBUG	0x0123,0x0cf0,0x0005,0x0000,0x0032,0xc824,0x0000,0x002e
0124 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0125 7802       |x   |		Jump	0x128								; case 0x1
0126 7805       |x   |		Jump	0x12c								; case 0x2
0127 7809       |x   |		Jump	0x131								; case 0x3
0128 00da       |    |		Load_Top	At_Offset_2
0129 0091 0795  |    |		Action	Push_String_Extended_Indexed,0x795				; "A_SUBTYPE_INDICATION"
012b 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
012c 00db       |    |		Load_Top	At_Offset_3
012d 00db       |    |		Load_Top	At_Offset_3
012e 00e0       |    |		Load_Encached	Standard_Cache
012f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0130 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0131 00da       |    |		Load_Top	At_Offset_2
0132 00e0       |    |		Load_Encached	Standard_Cache
0133 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0134 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0135 0000 0000  |    |		.XXX[0x3]
0137 0000       |    |
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013c       | <  |		.CONST	0x013c								; Address of begin
0139 0004       |    |		.CONST	0x0004								; Address of exception handler
013a 0002       |    |		.CONST	0x0002								; Number of locals
013b			INIT_0138:
013b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3 = .DEBUG	0x013b,0x0cf2,0x0002,0x0000,0x0032,0xc824,0x0000,0x003f
													; Debug Table 0x3.0x0 = 0x13b,0xffff
013c			BODY_0138:
013c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x1 = 0x13c,0x1
013d 8251       | Q  |		Call	0x1,0x51
013e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
013f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x2 = 0x13f,0x2
0140 00eb       |    |		Load_Encached	Diana_Cache
0141 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0142 0b66       | f  |		Execute_Immediate	Case_Compare,0x66
0143 7020       |p   |		Jump_Nonzero	0x164
0144 0b6e       | n  |		Execute_Immediate	Case_Compare,0x6e
0145 7020       |p   |		Jump_Nonzero	0x166
0146 0b67       | g  |		Execute_Immediate	Case_Compare,0x67
0147 701e       |p   |		Jump_Nonzero	0x166
0148 0b6f       | o  |		Execute_Immediate	Case_Compare,0x6f
0149 701e       |p   |		Jump_Nonzero	0x168
014a 0b6a       | j  |		Execute_Immediate	Case_Compare,0x6a
014b 701c       |p   |		Jump_Nonzero	0x168
014c 0b65       | e  |		Execute_Immediate	Case_Compare,0x65
014d 701c       |p   |		Jump_Nonzero	0x16a
014e 0b69       | i  |		Execute_Immediate	Case_Compare,0x69
014f 701a       |p   |		Jump_Nonzero	0x16a
0150 0b64       | d  |		Execute_Immediate	Case_Compare,0x64
0151 701a       |p   |		Jump_Nonzero	0x16c
0152 0b68       | h  |		Execute_Immediate	Case_Compare,0x68
0153 7018       |p   |		Jump_Nonzero	0x16c
0154 0b6c       | l  |		Execute_Immediate	Case_Compare,0x6c
0155 7018       |p   |		Jump_Nonzero	0x16e
0156 0b72       | r  |		Execute_Immediate	Case_Compare,0x72
0157 7018       |p   |		Jump_Nonzero	0x170
0158 0b6b       | k  |		Execute_Immediate	Case_Compare,0x6b
0159 7018       |p   |		Jump_Nonzero	0x172
015a 0b6d       | m  |		Execute_Immediate	Case_Compare,0x6d
015b 7018       |p   |		Jump_Nonzero	0x174
015c 0b73       | s  |		Execute_Immediate	Case_Compare,0x73
015d 7018       |p   |		Jump_Nonzero	0x176
015e 0b71       | q  |		Execute_Immediate	Case_Compare,0x71
015f 7018       |p   |		Jump_Nonzero	0x178
0160 0b70       | p  |		Execute_Immediate	Case_Compare,0x70
0161 7018       |p   |		Jump_Nonzero	0x17a
0162 480c       |H   |		Short_Literal	0xc							; Debug Table 0x3.0x3 = 0x162,0xf
0163 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0164 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x4 = 0x164,0x3
0165 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0166 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x5 = 0x166,0x4
0167 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0168 4802       |H   |		Short_Literal	0x2							; Debug Table 0x3.0x6 = 0x168,0x5
0169 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
016a 4803       |H   |		Short_Literal	0x3							; Debug Table 0x3.0x7 = 0x16a,0x6
016b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
016c 4804       |H   |		Short_Literal	0x4							; Debug Table 0x3.0x8 = 0x16c,0x7
016d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
016e 4805       |H   |		Short_Literal	0x5							; Debug Table 0x3.0x9 = 0x16e,0x8
016f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0170 4806       |H   |		Short_Literal	0x6							; Debug Table 0x3.0xa = 0x170,0x9
0171 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0172 4807       |H   |		Short_Literal	0x7							; Debug Table 0x3.0xb = 0x172,0xa
0173 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0174 4808       |H   |		Short_Literal	0x8							; Debug Table 0x3.0xc = 0x174,0xb
0175 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0176 4809       |H   |		Short_Literal	0x9							; Debug Table 0x3.0xd = 0x176,0xc
0177 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0178 480a       |H   |		Short_Literal	0xa							; Debug Table 0x3.0xe = 0x178,0xd
0179 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
017a 480b       |H   |		Short_Literal	0xb							; Debug Table 0x3.0xf = 0x17a,0xe
017b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
017c 0000 0000  |    |		.BLANK	0000[0x4]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0187       |    |		.CONST	0x0187								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0002       |    |		.CONST	0x0002								; Number of locals
0183			INIT_0180:
0183 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4 = .DEBUG	0x0183,0x0d14,0x0002,0x0000,0x0032,0xc824,0x0000,0x0048
													; Debug Table 0x4.0x0 = 0x183,0xffff
0184 00db       |    |		Load_Top	At_Offset_3
0185 8251       | Q  |		Call	0x1,0x51
0186 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0187			BODY_0180:
0187 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x1 = 0x187,0x1
0188 e002       |    |		Load	0x0,0x2
0189 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
018a 7009       |p   |		Jump_Nonzero	0x194
018b 0092 07b6  |    |		Action	Push_String_Extended,0x7b6					; "Element is not a Type Definition"
													; Debug Table 0x4.0x2 = 0x18b,0x2
018d e003       |    |		Load	0x0,0x3
018e 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
018f e004       |    |		Load	0x0,0x4
0190 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0191 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x3 = 0x191,0x3
0192 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0193 0257       | W  |		Execute	Discrete,Raise
0194 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x4 = 0x194,0x4
0195 e005       |    |		Load	0x0,0x5
0196 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0197 8252       | R  |		Call	0x1,0x52
0198 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0199 0000 0000  |    |		.BLANK	0000[0x7]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a4       |    |		.CONST	0x01a4								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0002       |    |		.CONST	0x0002								; Number of locals
01a3			INIT_01a0:
01a3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x5 = .DEBUG	0x01a3,0x0d20,0x0002,0x0000,0x0032,0xc824,0x0000,0x0051
													; Debug Table 0x5.0x0 = 0x1a3,0xffff
01a4			BODY_01a0:
01a4 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x1 = 0x1a4,0x1
01a5 8251       | Q  |		Call	0x1,0x51
01a6 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01a7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x2 = 0x1a7,0x2
01a8 00eb       |    |		Load_Encached	Diana_Cache
01a9 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01aa 0b6e       | n  |		Execute_Immediate	Case_Compare,0x6e
01ab 7024       |p$  |		Jump_Nonzero	0x1d0
01ac 0b6d       | m  |		Execute_Immediate	Case_Compare,0x6d
01ad 7022       |p"  |		Jump_Nonzero	0x1d0
01ae 0b6b       | k  |		Execute_Immediate	Case_Compare,0x6b
01af 7020       |p   |		Jump_Nonzero	0x1d0
01b0 0b6c       | l  |		Execute_Immediate	Case_Compare,0x6c
01b1 701e       |p   |		Jump_Nonzero	0x1d0
01b2 0b72       | r  |		Execute_Immediate	Case_Compare,0x72
01b3 701c       |p   |		Jump_Nonzero	0x1d0
01b4 0b73       | s  |		Execute_Immediate	Case_Compare,0x73
01b5 701a       |p   |		Jump_Nonzero	0x1d0
01b6 0b71       | q  |		Execute_Immediate	Case_Compare,0x71
01b7 7018       |p   |		Jump_Nonzero	0x1d0
01b8 0b70       | p  |		Execute_Immediate	Case_Compare,0x70
01b9 7016       |p   |		Jump_Nonzero	0x1d0
01ba 00d8       |    |		Load_Top	At_Offset_0
01bb 4867       |Hg  |		Short_Literal	0x67
01bc 486a       |Hj  |		Short_Literal	0x6a
01bd 0262       | b  |		Execute	Discrete,In_Range
01be 7011       |p   |		Jump_Nonzero	0x1d0
01bf 0b66       | f  |		Execute_Immediate	Case_Compare,0x66
01c0 7011       |p   |		Jump_Nonzero	0x1d2
01c1 0b6f       | o  |		Execute_Immediate	Case_Compare,0x6f
01c2 7016       |p   |		Jump_Nonzero	0x1d9
01c3 0b65       | e  |		Execute_Immediate	Case_Compare,0x65
01c4 7014       |p   |		Jump_Nonzero	0x1d9
01c5 0b64       | d  |		Execute_Immediate	Case_Compare,0x64
01c6 7012       |p   |		Jump_Nonzero	0x1d9
01c7 0092 07b6  |    |		Action	Push_String_Extended,0x7b6					; "Element is not a Type Definition"
													; Debug Table 0x5.0x3 = 0x1c7,0x6
01c9 e003       |    |		Load	0x0,0x3
01ca 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
01cb e004       |    |		Load	0x0,0x4
01cc 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01cd e001       |    |		Load	0x0,0x1								; Debug Table 0x5.0x4 = 0x1cd,0x7
01ce 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
01cf 0257       | W  |		Execute	Discrete,Raise
01d0 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x5 = 0x1d0,0x3
01d1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01d2 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x6 = 0x1d2,0x4
01d3 00eb       |    |		Load_Encached	Diana_Cache
01d4 18f7       |    |		Execute	Package,Field_Execute,Field_Number 0xf7
01d5 e006       |    |		Load	0x0,0x6
01d6 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
01d7 8252       | R  |		Call	0x1,0x52
01d8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01d9 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x7 = 0x1d9,0x5
01da 00eb       |    |		Load_Encached	Diana_Cache
01db 18f7       |    |		Execute	Package,Field_Execute,Field_Number 0xf7
01dc e006       |    |		Load	0x0,0x6
01dd 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
01de 8252       | R  |		Call	0x1,0x52
01df 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e6       |    |		.CONST	0x01e6								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0003       |    |		.CONST	0x0003								; Number of locals
01e3			INIT_01e0:
01e3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6 = .DEBUG	0x01e3,0x0d32,0x0002,0x0000,0x0032,0xc824,0x0000,0x005a
													; Debug Table 0x6.0x0 = 0x1e3,0xffff
01e4 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x6.0x1 = 0x1e4,0xfffe
01e5 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
01e6			BODY_01e0:
01e6 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6.0x2 = 0x1e6,0x1
01e7 8251       | Q  |		Call	0x1,0x51
01e8 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
01e9 00cf       |    |		Action	Mark_Auxiliary
01ea 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x3 = 0x1ea,0x2
01eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x4 = 0x1eb,0x3
01ec 00eb       |    |		Load_Encached	Diana_Cache
01ed 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01ee 0b6e       | n  |		Execute_Immediate	Case_Compare,0x6e
01ef 7024       |p$  |		Jump_Nonzero	0x214
01f0 0b6b       | k  |		Execute_Immediate	Case_Compare,0x6b
01f1 7022       |p"  |		Jump_Nonzero	0x214
01f2 0b6c       | l  |		Execute_Immediate	Case_Compare,0x6c
01f3 7020       |p   |		Jump_Nonzero	0x214
01f4 0b72       | r  |		Execute_Immediate	Case_Compare,0x72
01f5 701e       |p   |		Jump_Nonzero	0x214
01f6 0b73       | s  |		Execute_Immediate	Case_Compare,0x73
01f7 701c       |p   |		Jump_Nonzero	0x214
01f8 0b71       | q  |		Execute_Immediate	Case_Compare,0x71
01f9 701a       |p   |		Jump_Nonzero	0x214
01fa 0b70       | p  |		Execute_Immediate	Case_Compare,0x70
01fb 7018       |p   |		Jump_Nonzero	0x214
01fc 00d8       |    |		Load_Top	At_Offset_0
01fd 4867       |Hg  |		Short_Literal	0x67
01fe 486a       |Hj  |		Short_Literal	0x6a
01ff 0262       | b  |		Execute	Discrete,In_Range
0200 7013       |p   |		Jump_Nonzero	0x214
0201 0b6d       | m  |		Execute_Immediate	Case_Compare,0x6d
0202 7013       |p   |		Jump_Nonzero	0x216
0203 0b66       | f  |		Execute_Immediate	Case_Compare,0x66
0204 7016       |p   |		Jump_Nonzero	0x21b
0205 0b6f       | o  |		Execute_Immediate	Case_Compare,0x6f
0206 701d       |p   |		Jump_Nonzero	0x224
0207 0b65       | e  |		Execute_Immediate	Case_Compare,0x65
0208 701b       |p   |		Jump_Nonzero	0x224
0209 0b64       | d  |		Execute_Immediate	Case_Compare,0x64
020a 7022       |p"  |		Jump_Nonzero	0x22d
020b 0092 07b6  |    |		Action	Push_String_Extended,0x7b6					; "Element is not a Type Definition"
													; Debug Table 0x6.0x5 = 0x20b,0xd
020d e003       |    |		Load	0x0,0x3
020e 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
020f e004       |    |		Load	0x0,0x4
0210 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0211 e001       |    |		Load	0x0,0x1								; Debug Table 0x6.0x6 = 0x211,0xe
0212 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0213 0257       | W  |		Execute	Discrete,Raise
0214 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x6.0x7 = 0x214,0x4
0215 781c       |x   |		Jump	0x232
0216 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x8 = 0x216,0x5
0217 00eb       |    |		Load_Encached	Diana_Cache
0218 18b9       |    |		Execute	Package,Field_Execute,Field_Number 0xb9
0219 a402       |    |		Store_Unchecked	0x2,0x2
021a 7814       |x   |		Jump	0x22f
021b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x9 = 0x21b,0x6
021c 4908       |I   |		Short_Literal	0x108
021d 00eb       |    |		Load_Encached	Diana_Cache
021e 0096       |    |		Execute	Package,Entry
021f a402       |    |		Store_Unchecked	0x2,0x2
0220 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0xa = 0x220,0x7
0221 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0222 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x6.0xb = 0x222,0x8
0223 780e       |x   |		Jump	0x232
0224 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0xc = 0x224,0x9
0225 4908       |I   |		Short_Literal	0x108
0226 00eb       |    |		Load_Encached	Diana_Cache
0227 0096       |    |		Execute	Package,Entry
0228 a402       |    |		Store_Unchecked	0x2,0x2
0229 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0xd = 0x229,0xa
022a 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
022b 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x6.0xe = 0x22b,0xb
022c 7805       |x   |		Jump	0x232
022d 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x6.0xf = 0x22d,0xc
022e 7803       |x   |		Jump	0x232
022f 00d1       |    |		Pop_Control	Pop_Count_1
0230 00c9       |    |		Action	Pop_Auxiliary_Loop
0231 7fb9       |    |		Jump	0x1eb
0232 00ce       |    |		Action	Pop_Auxiliary
0233 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x10 = 0x233,0xf
0234 6804       |h   |		Jump_Zero	0x239
0235 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x11 = 0x235,0x10
0236 e006       |    |		Load	0x0,0x6
0237 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0238 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0239 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x12 = 0x239,0x11
023a 8252       | R  |		Call	0x1,0x52
023b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
023c 0000 0000  |    |		.BLANK	0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0246       | F  |		.CONST	0x0246								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0003       |    |		.CONST	0x0003								; Number of locals
0243			INIT_0240:
0243 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x7 = .DEBUG	0x0243,0x0d5a,0x0002,0x0000,0x0032,0xc824,0x0000,0x0063
													; Debug Table 0x7.0x0 = 0x243,0xffff
0244 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x1 = 0x244,0xfffe
0245 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0246			BODY_0240:
0246 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0x2 = 0x246,0x1
0247 8251       | Q  |		Call	0x1,0x51
0248 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0249 00cf       |    |		Action	Mark_Auxiliary
024a 0007       |    |		Action	Break_Optional							; Debug Table 0x7.0x3 = 0x24a,0x2
024b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x4 = 0x24b,0x3
024c 00eb       |    |		Load_Encached	Diana_Cache
024d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
024e 0b6e       | n  |		Execute_Immediate	Case_Compare,0x6e
024f 7024       |p$  |		Jump_Nonzero	0x274
0250 0b6b       | k  |		Execute_Immediate	Case_Compare,0x6b
0251 7022       |p"  |		Jump_Nonzero	0x274
0252 0b6c       | l  |		Execute_Immediate	Case_Compare,0x6c
0253 7020       |p   |		Jump_Nonzero	0x274
0254 0b72       | r  |		Execute_Immediate	Case_Compare,0x72
0255 701e       |p   |		Jump_Nonzero	0x274
0256 0b73       | s  |		Execute_Immediate	Case_Compare,0x73
0257 701c       |p   |		Jump_Nonzero	0x274
0258 0b71       | q  |		Execute_Immediate	Case_Compare,0x71
0259 701a       |p   |		Jump_Nonzero	0x274
025a 0b70       | p  |		Execute_Immediate	Case_Compare,0x70
025b 7018       |p   |		Jump_Nonzero	0x274
025c 00d8       |    |		Load_Top	At_Offset_0
025d 4867       |Hg  |		Short_Literal	0x67
025e 486a       |Hj  |		Short_Literal	0x6a
025f 0262       | b  |		Execute	Discrete,In_Range
0260 7013       |p   |		Jump_Nonzero	0x274
0261 0b6d       | m  |		Execute_Immediate	Case_Compare,0x6d
0262 7013       |p   |		Jump_Nonzero	0x276
0263 0b66       | f  |		Execute_Immediate	Case_Compare,0x66
0264 7016       |p   |		Jump_Nonzero	0x27b
0265 0b6f       | o  |		Execute_Immediate	Case_Compare,0x6f
0266 702f       |p/  |		Jump_Nonzero	0x296
0267 0b65       | e  |		Execute_Immediate	Case_Compare,0x65
0268 702d       |p-  |		Jump_Nonzero	0x296
0269 0b64       | d  |		Execute_Immediate	Case_Compare,0x64
026a 7034       |p4  |		Jump_Nonzero	0x29f
026b 0092 07b6  |    |		Action	Push_String_Extended,0x7b6					; "Element is not a Type Definition"
													; Debug Table 0x7.0x5 = 0x26b,0x10
026d e003       |    |		Load	0x0,0x3
026e 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
026f e004       |    |		Load	0x0,0x4
0270 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0271 e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0x6 = 0x271,0x11
0272 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0273 0257       | W  |		Execute	Discrete,Raise
0274 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x7.0x7 = 0x274,0x4
0275 782e       |x.  |		Jump	0x2a4
0276 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x8 = 0x276,0x5
0277 00eb       |    |		Load_Encached	Diana_Cache
0278 18b9       |    |		Execute	Package,Field_Execute,Field_Number 0xb9
0279 a402       |    |		Store_Unchecked	0x2,0x2
027a 7826       |x&  |		Jump	0x2a1
027b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x9 = 0x27b,0x6
027c 4908       |I   |		Short_Literal	0x108
027d 00eb       |    |		Load_Encached	Diana_Cache
027e 0096       |    |		Execute	Package,Entry
027f 00eb       |    |		Load_Encached	Diana_Cache
0280 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0281 0b6e       | n  |		Execute_Immediate	Case_Compare,0x6e
0282 700b       |p   |		Jump_Nonzero	0x28e
0283 0b72       | r  |		Execute_Immediate	Case_Compare,0x72
0284 7009       |p   |		Jump_Nonzero	0x28e
0285 e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0xa = 0x285,0x9
0286 4908       |I   |		Short_Literal	0x108
0287 00eb       |    |		Load_Encached	Diana_Cache
0288 0096       |    |		Execute	Package,Entry
0289 a402       |    |		Store_Unchecked	0x2,0x2
028a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0xb = 0x28a,0xa
028b a403       |    |		Store_Unchecked	0x2,0x3
028c 00d2       |    |		Pop_Control	Pop_Count_2						; Debug Table 0x7.0xc = 0x28c,0xb
028d 7816       |x   |		Jump	0x2a4
028e e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0xd = 0x28e,0x7
028f 00eb       |    |		Load_Encached	Diana_Cache
0290 18f7       |    |		Execute	Package,Field_Execute,Field_Number 0xf7
0291 a402       |    |		Store_Unchecked	0x2,0x2
0292 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0xe = 0x292,0x8
0293 a403       |    |		Store_Unchecked	0x2,0x3
0294 00d1       |    |		Pop_Control	Pop_Count_1
0295 780b       |x   |		Jump	0x2a1
0296 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0xf = 0x296,0xc
0297 4908       |I   |		Short_Literal	0x108
0298 00eb       |    |		Load_Encached	Diana_Cache
0299 0096       |    |		Execute	Package,Entry
029a a402       |    |		Store_Unchecked	0x2,0x2
029b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x10 = 0x29b,0xd
029c 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
029d 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x7.0x11 = 0x29d,0xe
029e 7805       |x   |		Jump	0x2a4
029f 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x7.0x12 = 0x29f,0xf
02a0 7803       |x   |		Jump	0x2a4
02a1 00d1       |    |		Pop_Control	Pop_Count_1
02a2 00c9       |    |		Action	Pop_Auxiliary_Loop
02a3 7fa7       |    |		Jump	0x24b
02a4 00ce       |    |		Action	Pop_Auxiliary
02a5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x13 = 0x2a5,0x12
02a6 6804       |h   |		Jump_Zero	0x2ab
02a7 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x14 = 0x2a7,0x13
02a8 e006       |    |		Load	0x0,0x6
02a9 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
02aa 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
02ab 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x15 = 0x2ab,0x14
02ac 8252       | R  |		Call	0x1,0x52
02ad 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ae 0000 0000  |    |		.XXX[0x2]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b7       |    |		.CONST	0x02b7								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0004       |    |		.CONST	0x0004								; Number of locals
02b3			INIT_02b0:
02b3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x8 = .DEBUG	0x02b3,0x0d88,0x0002,0x0000,0x0032,0xc824,0x0000,0x006c
													; Debug Table 0x8.0x0 = 0x2b3,0xffff
02b4 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x8.0x1 = 0x2b4,0xfffe
02b5 e212       |    |		Load	0x1,0x12							; Debug Table 0x8.0x2 = 0x2b5,0xfffd
02b6 0007       |    |		Action	Break_Optional
02b7			BODY_02b0:
02b7 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x3 = 0x2b7,0x1
02b8 8251       | Q  |		Call	0x1,0x51
02b9 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
02ba 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0x4 = 0x2ba,0x2
02bb 00eb       |    |		Load_Encached	Diana_Cache
02bc 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02bd 0f66       | f  |		Execute_Immediate	Equal,0x66
02be 681b       |h   |		Jump_Zero	0x2da
02bf 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0x5 = 0x2bf,0x3
02c0 00eb       |    |		Load_Encached	Diana_Cache
02c1 18f9       |    |		Execute	Package,Field_Execute,Field_Number 0xf9
02c2 e006       |    |		Load	0x0,0x6
02c3 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
02c4 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
02c5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x8.0x6 = 0x2c5,0x4
02c6 00eb       |    |		Load_Encached	Diana_Cache
02c7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02c8 6803       |h   |		Jump_Zero	0x2cc
02c9 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x7 = 0x2c9,0x5
02ca 8217       |    |		Call	0x1,0x17
02cb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02cc 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x8.0x8 = 0x2cc,0x6
02cd 8252       | R  |		Call	0x1,0x52
02ce 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02cf 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x9 = 0x2cf,0x7
02d0 8215       |    |		Call	0x1,0x15
02d1 0e0c       |    |		Execute_Immediate	Not_Equal,0xc
02d2 6802       |h   |		Jump_Zero	0x2d5
02d3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0xa = 0x2d3,0x8
02d4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x8.0xb = 0x2d5,0x9
02d6 00eb       |    |		Load_Encached	Diana_Cache
02d7 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
02d8 8252       | R  |		Call	0x1,0x52
02d9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02da e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0xc = 0x2da,0xa
02db 8217       |    |		Call	0x1,0x17
02dc 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02dd 0000 0000  |    |		.XXX[0x3]
02df 0000       |    |
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e3       |    |		.CONST	0x02e3								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0001       |    |		.CONST	0x0001								; Number of locals
02e3			BODY_02e0:
02e3			INIT_02e0:
02e3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9 = .DEBUG	0x02e3,0x0da4,0x0002,0x0000,0x0032,0xc824,0x0000,0x0075
													; Debug Table 0x9.0x0 = 0x2e3,0x1
02e4 8251       | Q  |		Call	0x1,0x51
02e5 4976       |Iv  |		Short_Literal	0x176
02e6 00eb       |    |		Load_Encached	Diana_Cache
02e7 0098       |    |		Execute	Package,Field_Read_Dynamic
02e8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02e9 4976       |Iv  |		Short_Literal	0x176
02ea 00eb       |    |		Load_Encached	Diana_Cache
02eb 0098       |    |		Execute	Package,Field_Read_Dynamic
02ec 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02ed 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ee 0000 0000  |    |		.XXX[0x2]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02f7       |    |		.CONST	0x02f7								; Address of begin
02f1 0004       |    |		.CONST	0x0004								; Address of exception handler
02f2 0002       |    |		.CONST	0x0002								; Number of locals
02f3			INIT_02f0:
02f3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa = .DEBUG	0x02f3,0x0da8,0x0002,0x0000,0x0032,0xc824,0x0000,0x007e
													; Debug Table 0xa.0x0 = 0x2f3,0xffff
02f4 00db       |    |		Load_Top	At_Offset_3
02f5 8251       | Q  |		Call	0x1,0x51
02f6 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02f7			BODY_02f0:
02f7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x1 = 0x2f7,0x1
02f8 00eb       |    |		Load_Encached	Diana_Cache
02f9 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02fa 0b74       | t  |		Execute_Immediate	Case_Compare,0x74
02fb 7006       |p   |		Jump_Nonzero	0x302
02fc 0b75       | u  |		Execute_Immediate	Case_Compare,0x75
02fd 7004       |p   |		Jump_Nonzero	0x302
02fe 0b76       | v  |		Execute_Immediate	Case_Compare,0x76
02ff 7002       |p   |		Jump_Nonzero	0x302
0300 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x2 = 0x300,0x3
0301 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0302 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x3 = 0x302,0x2
0303 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0304 0000 0000  |    |		.BLANK	0000[0x4]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b       |    |		.CONST	0x030b								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0001       |    |		.CONST	0x0001								; Number of locals
030b			BODY_0308:
030b			INIT_0308:
030b 4603       |F   |		Jump_Case	0x4							; Debug Table 0xb = .DEBUG	0x030b,0x0db2,0x0005,0x0000,0x0032,0xc824,0x0000,0x00b5
030c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
030d 7802       |x   |		Jump	0x310								; case 0x1
030e 7805       |x   |		Jump	0x314								; case 0x2
030f 7809       |x   |		Jump	0x319								; case 0x3
0310 00da       |    |		Load_Top	At_Offset_2
0311 0091 07a2  |    |		Action	Push_String_Extended_Indexed,0x7a2				; "A_SIMPLE_RANGE"
0313 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0314 00db       |    |		Load_Top	At_Offset_3
0315 00db       |    |		Load_Top	At_Offset_3
0316 00e0       |    |		Load_Encached	Standard_Cache
0317 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0318 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0319 00da       |    |		Load_Top	At_Offset_2
031a 00e0       |    |		Load_Encached	Standard_Cache
031b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
031c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
031d 0000 0000  |    |		.XXX[0x3]
031f 0000       |    |
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0327       | '  |		.CONST	0x0327								; Address of begin
0321 0004       |    |		.CONST	0x0004								; Address of exception handler
0322 0002       |    |		.CONST	0x0002								; Number of locals
0323			INIT_0320:
0323 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xc = .DEBUG	0x0323,0x0db4,0x0002,0x0000,0x0032,0xc824,0x0000,0x00c0
													; Debug Table 0xc.0x0 = 0x323,0xffff
0324 00db       |    |		Load_Top	At_Offset_3
0325 8251       | Q  |		Call	0x1,0x51
0326 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0327			BODY_0320:
0327 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x1 = 0x327,0x1
0328 00eb       |    |		Load_Encached	Diana_Cache
0329 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
032a 0b62       | b  |		Execute_Immediate	Case_Compare,0x62
032b 700e       |p   |		Jump_Nonzero	0x33a
032c 0b64       | d  |		Execute_Immediate	Case_Compare,0x64
032d 700e       |p   |		Jump_Nonzero	0x33c
032e 0b65       | e  |		Execute_Immediate	Case_Compare,0x65
032f 700e       |p   |		Jump_Nonzero	0x33e
0330 0b61       | a  |		Execute_Immediate	Case_Compare,0x61
0331 700e       |p   |		Jump_Nonzero	0x340
0332 0b63       | c  |		Execute_Immediate	Case_Compare,0x63
0333 700e       |p   |		Jump_Nonzero	0x342
0334 0b0e       |    |		Execute_Immediate	Case_Compare,0xe
0335 700e       |p   |		Jump_Nonzero	0x344
0336 0b0f       |    |		Execute_Immediate	Case_Compare,0xf
0337 700c       |p   |		Jump_Nonzero	0x344
0338 4806       |H   |		Short_Literal	0x6							; Debug Table 0xc.0x2 = 0x338,0x8
0339 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
033a 4805       |H   |		Short_Literal	0x5							; Debug Table 0xc.0x3 = 0x33a,0x2
033b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
033c 4803       |H   |		Short_Literal	0x3							; Debug Table 0xc.0x4 = 0x33c,0x3
033d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
033e 4802       |H   |		Short_Literal	0x2							; Debug Table 0xc.0x5 = 0x33e,0x4
033f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0340 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x6 = 0x340,0x5
0341 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0342 4804       |H   |		Short_Literal	0x4							; Debug Table 0xc.0x7 = 0x342,0x6
0343 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0344 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x8 = 0x344,0x7
0345 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0346 0000 0000  |    |		.XXX[0x2]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034f       | O  |		.CONST	0x034f								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0002       |    |		.CONST	0x0002								; Number of locals
034b			INIT_0348:
034b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd = .DEBUG	0x034b,0x0dc8,0x0002,0x0000,0x0032,0xc824,0x0000,0x00c9
													; Debug Table 0xd.0x0 = 0x34b,0xffff
034c 00db       |    |		Load_Top	At_Offset_3
034d 8251       | Q  |		Call	0x1,0x51
034e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
034f			BODY_0348:
034f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x1 = 0x34f,0x1
0350 8229       | )  |		Call	0x1,0x29
0351 0e04       |    |		Execute_Immediate	Not_Equal,0x4
0352 6809       |h   |		Jump_Zero	0x35c
0353 0092 07b7  |    |		Action	Push_String_Extended,0x7b7					; "Element is not an Index Constraint"
													; Debug Table 0xd.0x2 = 0x353,0x2
0355 e003       |    |		Load	0x0,0x3
0356 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0357 e004       |    |		Load	0x0,0x4
0358 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0359 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x3 = 0x359,0x3
035a 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
035b 0257       | W  |		Execute	Discrete,Raise
035c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x4 = 0x35c,0x4
035d 00eb       |    |		Load_Encached	Diana_Cache
035e 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
035f e001       |    |		Load	0x0,0x1
0360 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
0361 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0362 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0363 0000 0000  |    |		.BLANK	0000[0x5]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036f       | o  |		.CONST	0x036f								; Address of begin
0369 0004       |    |		.CONST	0x0004								; Address of exception handler
036a 0002       |    |		.CONST	0x0002								; Number of locals
036b			INIT_0368:
036b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xe = .DEBUG	0x036b,0x0dd4,0x0002,0x0000,0x0032,0xc824,0x0000,0x00d4
													; Debug Table 0xe.0x0 = 0x36b,0xffff
036c 00db       |    |		Load_Top	At_Offset_3
036d 8251       | Q  |		Call	0x1,0x51
036e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
036f			BODY_0368:
036f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x1 = 0x36f,0x1
0370 8229       | )  |		Call	0x1,0x29
0371 0e05       |    |		Execute_Immediate	Not_Equal,0x5
0372 6809       |h   |		Jump_Zero	0x37c
0373 0092 07b8  |    |		Action	Push_String_Extended,0x7b8					; "Element is not a Discriminant Constraint"
													; Debug Table 0xe.0x2 = 0x373,0x2
0375 e003       |    |		Load	0x0,0x3
0376 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0377 e004       |    |		Load	0x0,0x4
0378 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0379 e001       |    |		Load	0x0,0x1								; Debug Table 0xe.0x3 = 0x379,0x3
037a 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
037b 0257       | W  |		Execute	Discrete,Raise
037c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x4 = 0x37c,0x4
037d 00eb       |    |		Load_Encached	Diana_Cache
037e 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
037f e001       |    |		Load	0x0,0x1
0380 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
0381 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0382 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0383 0000 0000  |    |		.BLANK	0000[0x5]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b       |    |		.CONST	0x038b								; Address of begin
0389 0004       |    |		.CONST	0x0004								; Address of exception handler
038a 0001       |    |		.CONST	0x0001								; Number of locals
038b			BODY_0388:
038b			INIT_0388:
038b 4603       |F   |		Jump_Case	0x4							; Debug Table 0xf = .DEBUG	0x038b,0x0de0,0x0005,0x0000,0x0032,0xc824,0x0000,0x00e5
038c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
038d 7802       |x   |		Jump	0x390								; case 0x1
038e 7805       |x   |		Jump	0x394								; case 0x2
038f 7809       |x   |		Jump	0x399								; case 0x3
0390 00da       |    |		Load_Top	At_Offset_2
0391 0091 07a9  |    |		Action	Push_String_Extended_Indexed,0x7a9				; "A_SIMPLE_RANGE"
0393 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0394 00db       |    |		Load_Top	At_Offset_3
0395 00db       |    |		Load_Top	At_Offset_3
0396 00e0       |    |		Load_Encached	Standard_Cache
0397 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0398 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0399 00da       |    |		Load_Top	At_Offset_2
039a 00e0       |    |		Load_Encached	Standard_Cache
039b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
039c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
039d 0000 0000  |    |		.XXX[0x3]
039f 0000       |    |
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3       |    |		.CONST	0x03a3								; Address of begin
03a1 0004       |    |		.CONST	0x0004								; Address of exception handler
03a2 0001       |    |		.CONST	0x0001								; Number of locals
03a3			BODY_03a0:
03a3			INIT_03a0:
03a3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10 = .DEBUG	0x03a3,0x0de2,0x0002,0x0000,0x0032,0xc824,0x0000,0x00ed
													; Debug Table 0x10.0x0 = 0x3a3,0x1
03a4 8251       | Q  |		Call	0x1,0x51
03a5 00eb       |    |		Load_Encached	Diana_Cache
03a6 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03a7 0b66       | f  |		Execute_Immediate	Case_Compare,0x66
03a8 7008       |p   |		Jump_Nonzero	0x3b1
03a9 0b61       | a  |		Execute_Immediate	Case_Compare,0x61
03aa 7008       |p   |		Jump_Nonzero	0x3b3
03ab 0b0e       |    |		Execute_Immediate	Case_Compare,0xe
03ac 7008       |p   |		Jump_Nonzero	0x3b5
03ad 0b0f       |    |		Execute_Immediate	Case_Compare,0xf
03ae 7006       |p   |		Jump_Nonzero	0x3b5
03af 4803       |H   |		Short_Literal	0x3							; Debug Table 0x10.0x1 = 0x3af,0x5
03b0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03b1 4802       |H   |		Short_Literal	0x2							; Debug Table 0x10.0x2 = 0x3b1,0x2
03b2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03b3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0x3 = 0x3b3,0x3
03b4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03b5 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x4 = 0x3b5,0x4
03b6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03b7 0000       |    |		.XXX[0x1]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03c1       |    |		.CONST	0x03c1								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0004       |    |		.CONST	0x0004								; Number of locals
03bb			INIT_03b8:
03bb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x11 = .DEBUG	0x03bb,0x0dee,0x0001,0x0000,0x0032,0xc824,0x0000,0x00fc
													; Debug Table 0x11.0x0 = 0x3bb,0xffff
03bc 00db       |    |		Load_Top	At_Offset_3
03bd 8251       | Q  |		Call	0x1,0x51
03be 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
03bf 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x11.0x1 = 0x3bf,0xfffe
03c0 039d       |    |		Declare_Variable	Heap_Access,Duplicate
03c1			BODY_03b8:
03c1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0x2 = 0x3c1,0x1
03c2 00eb       |    |		Load_Encached	Diana_Cache
03c3 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03c4 0b66       | f  |		Execute_Immediate	Case_Compare,0x66
03c5 700f       |p   |		Jump_Nonzero	0x3d5
03c6 0b61       | a  |		Execute_Immediate	Case_Compare,0x61
03c7 7015       |p   |		Jump_Nonzero	0x3dd
03c8 0b0e       |    |		Execute_Immediate	Case_Compare,0xe
03c9 701c       |p   |		Jump_Nonzero	0x3e6
03ca 0b0f       |    |		Execute_Immediate	Case_Compare,0xf
03cb 701a       |p   |		Jump_Nonzero	0x3e6
03cc 0092 07b9  |    |		Action	Push_String_Extended,0x7b9					; "Element is not a Range"
													; Debug Table 0x11.0x3 = 0x3cc,0x9
03ce e003       |    |		Load	0x0,0x3
03cf 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
03d0 e004       |    |		Load	0x0,0x4
03d1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03d2 e001       |    |		Load	0x0,0x1								; Debug Table 0x11.0x4 = 0x3d2,0xa
03d3 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
03d4 0257       | W  |		Execute	Discrete,Raise
03d5 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x11.0x5 = 0x3d5,0x2
03d6 00ec       |    |		Load_Encached	Diana_Tree_Cache
03d7 e402       |    |		Load	0x2,0x2
03d8 e005       |    |		Load	0x0,0x5
03d9 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03da c403       |    |		Store	0x2,0x3
03db 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
03dc 7820       |x   |		Jump	0x3fd
03dd 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11.0x6 = 0x3dd,0x3
03de 00eb       |    |		Load_Encached	Diana_Cache
03df 18c6       |    |		Execute	Package,Field_Execute,Field_Number 0xc6
03e0 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
03e1 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11.0x7 = 0x3e1,0x4
03e2 00eb       |    |		Load_Encached	Diana_Cache
03e3 18c7       |    |		Execute	Package,Field_Execute,Field_Number 0xc7
03e4 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
03e5 7817       |x   |		Jump	0x3fd
03e6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11.0x8 = 0x3e6,0x5
03e7 e005       |    |		Load	0x0,0x5
03e8 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
03e9 680a       |h   |		Jump_Zero	0x3f4
03ea 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x11.0x9 = 0x3ea,0x6
03eb 00ec       |    |		Load_Encached	Diana_Tree_Cache
03ec e402       |    |		Load	0x2,0x2
03ed e005       |    |		Load	0x0,0x5
03ee 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03ef e005       |    |		Load	0x0,0x5
03f0 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03f1 c403       |    |		Store	0x2,0x3
03f2 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
03f3 7809       |x   |		Jump	0x3fd
03f4 0092 07b9  |    |		Action	Push_String_Extended,0x7b9					; "Element is not a Range"
													; Debug Table 0x11.0xa = 0x3f4,0x7
03f6 e003       |    |		Load	0x0,0x3
03f7 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
03f8 e004       |    |		Load	0x0,0x4
03f9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03fa e001       |    |		Load	0x0,0x1								; Debug Table 0x11.0xb = 0x3fa,0x8
03fb 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
03fc 0257       | W  |		Execute	Discrete,Raise
03fd 00d1       |    |		Pop_Control	Pop_Count_1
03fe 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0xc = 0x3fe,0xb
03ff 8252       | R  |		Call	0x1,0x52
0400 a5fd       |    |		Store_Unchecked	0x2,-0x3
0401 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0xd = 0x401,0xc
0402 8252       | R  |		Call	0x1,0x52
0403 a5fe       |    |		Store_Unchecked	0x2,-0x2
0404 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0405 0000 0000  |    |		.XXX[0x3]
0407 0000       |    |
0408 ; --------------------------------------------------------------------------------------
0408 ; SUBPROGRAM
0408 ; --------------------------------------------------------------------------------------
0408 040b       |    |		.CONST	0x040b								; Address of begin
0409 0004       |    |		.CONST	0x0004								; Address of exception handler
040a 0001       |    |		.CONST	0x0001								; Number of locals
040b			BODY_0408:
040b			INIT_0408:
040b 4603       |F   |		Jump_Case	0x4							; Debug Table 0x12 = .DEBUG	0x040b,0x0e0c,0x0005,0x0000,0x0032,0xc824,0x0000,0x010f
040c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
040d 7802       |x   |		Jump	0x410								; case 0x1
040e 7805       |x   |		Jump	0x414								; case 0x2
040f 7809       |x   |		Jump	0x419								; case 0x3
0410 00da       |    |		Load_Top	At_Offset_2
0411 0091 07ad  |    |		Action	Push_String_Extended_Indexed,0x7ad				; "A_SIMPLE_EXPRESSION"
0413 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0414 00db       |    |		Load_Top	At_Offset_3
0415 00db       |    |		Load_Top	At_Offset_3
0416 00e0       |    |		Load_Encached	Standard_Cache
0417 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0418 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0419 00da       |    |		Load_Top	At_Offset_2
041a 00e0       |    |		Load_Encached	Standard_Cache
041b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
041c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
041d 0000 0000  |    |		.XXX[0x3]
041f 0000       |    |
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0423       | #  |		.CONST	0x0423								; Address of begin
0421 0004       |    |		.CONST	0x0004								; Address of exception handler
0422 0001       |    |		.CONST	0x0001								; Number of locals
0423			BODY_0420:
0423			INIT_0420:
0423 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13 = .DEBUG	0x0423,0x0e0e,0x0002,0x0000,0x0032,0xc824,0x0000,0x0118
													; Debug Table 0x13.0x0 = 0x423,0x1
0424 8251       | Q  |		Call	0x1,0x51
0425 00eb       |    |		Load_Encached	Diana_Cache
0426 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0427 0ba4       |    |		Execute_Immediate	Case_Compare,0xa4
0428 7024       |p$  |		Jump_Nonzero	0x44d
0429 0b08       |    |		Execute_Immediate	Case_Compare,0x8
042a 7024       |p$  |		Jump_Nonzero	0x44f
042b 0b07       |    |		Execute_Immediate	Case_Compare,0x7
042c 7022       |p"  |		Jump_Nonzero	0x44f
042d 0b01       |    |		Execute_Immediate	Case_Compare,0x1
042e 7020       |p   |		Jump_Nonzero	0x44f
042f 0b0b       |    |		Execute_Immediate	Case_Compare,0xb
0430 701e       |p   |		Jump_Nonzero	0x44f
0431 0b03       |    |		Execute_Immediate	Case_Compare,0x3
0432 701c       |p   |		Jump_Nonzero	0x44f
0433 0b05       |    |		Execute_Immediate	Case_Compare,0x5
0434 701a       |p   |		Jump_Nonzero	0x44f
0435 0b0a       |    |		Execute_Immediate	Case_Compare,0xa
0436 7018       |p   |		Jump_Nonzero	0x44f
0437 0b09       |    |		Execute_Immediate	Case_Compare,0x9
0438 7016       |p   |		Jump_Nonzero	0x44f
0439 0b17       |    |		Execute_Immediate	Case_Compare,0x17
043a 7016       |p   |		Jump_Nonzero	0x451
043b 0b16       |    |		Execute_Immediate	Case_Compare,0x16
043c 7014       |p   |		Jump_Nonzero	0x451
043d 0b0c       |    |		Execute_Immediate	Case_Compare,0xc
043e 7012       |p   |		Jump_Nonzero	0x451
043f 0b12       |    |		Execute_Immediate	Case_Compare,0x12
0440 7010       |p   |		Jump_Nonzero	0x451
0441 0b66       | f  |		Execute_Immediate	Case_Compare,0x66
0442 7010       |p   |		Jump_Nonzero	0x453
0443 0b88       |    |		Execute_Immediate	Case_Compare,0x88
0444 700e       |p   |		Jump_Nonzero	0x453
0445 0b61       | a  |		Execute_Immediate	Case_Compare,0x61
0446 700c       |p   |		Jump_Nonzero	0x453
0447 0b0e       |    |		Execute_Immediate	Case_Compare,0xe
0448 700c       |p   |		Jump_Nonzero	0x455
0449 0b0f       |    |		Execute_Immediate	Case_Compare,0xf
044a 700a       |p   |		Jump_Nonzero	0x455
044b 4804       |H   |		Short_Literal	0x4							; Debug Table 0x13.0x1 = 0x44b,0x9
044c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
044d 4802       |H   |		Short_Literal	0x2							; Debug Table 0x13.0x2 = 0x44d,0x2
044e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
044f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x13.0x3 = 0x44f,0x3
0450 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0451 4803       |H   |		Short_Literal	0x3							; Debug Table 0x13.0x4 = 0x451,0x4
0452 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0453 4801       |H   |		Short_Literal	0x1							; Debug Table 0x13.0x5 = 0x453,0x5
0454 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0455 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x13.0x6 = 0x455,0x6
0456 8251       | Q  |		Call	0x1,0x51
0457 e005       |    |		Load	0x0,0x5
0458 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0459 6802       |h   |		Jump_Zero	0x45c
045a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x13.0x7 = 0x45a,0x7
045b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
045c 4800       |H   |		Short_Literal	0x0							; Debug Table 0x13.0x8 = 0x45c,0x8
045d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
045e 0000 0000  |    |		.XXX[0x2]
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 0463       | c  |		.CONST	0x0463								; Address of begin
0461 0004       |    |		.CONST	0x0004								; Address of exception handler
0462 0001       |    |		.CONST	0x0001								; Number of locals
0463			BODY_0460:
0463			INIT_0460:
0463 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14 = .DEBUG	0x0463,0x0e22,0x0002,0x0000,0x0032,0xc824,0x0000,0x0121
													; Debug Table 0x14.0x0 = 0x463,0x1
0464 8233       | 3  |		Call	0x1,0x33
0465 7002       |p   |		Jump_Nonzero	0x468
0466 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14.0x1 = 0x466,0x2
0467 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0468 0092 07ba  |    |		Action	Push_String_Extended,0x7ba					; "Element is not a Choice Expression"
													; Debug Table 0x14.0x2 = 0x468,0x3
046a e003       |    |		Load	0x0,0x3
046b 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
046c e004       |    |		Load	0x0,0x4
046d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
046e e001       |    |		Load	0x0,0x1								; Debug Table 0x14.0x3 = 0x46e,0x4
046f 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0470 0257       | W  |		Execute	Discrete,Raise
0471 0000 0000  |    |		.BLANK	0000[0x7]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047b       | {  |		.CONST	0x047b								; Address of begin
0479 0004       |    |		.CONST	0x0004								; Address of exception handler
047a 0001       |    |		.CONST	0x0001								; Number of locals
047b			BODY_0478:
047b			INIT_0478:
047b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15 = .DEBUG	0x047b,0x0e2c,0x0002,0x0000,0x0032,0xc824,0x0000,0x012a
													; Debug Table 0x15.0x0 = 0x47b,0x1
047c 8233       | 3  |		Call	0x1,0x33
047d 0f01       |    |		Execute_Immediate	Equal,0x1
047e 6802       |h   |		Jump_Zero	0x481
047f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15.0x1 = 0x47f,0x2
0480 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0481 0092 07bb  |    |		Action	Push_String_Extended,0x7bb					; "Element is not a Choice Discrete Range"
													; Debug Table 0x15.0x2 = 0x481,0x3
0483 e003       |    |		Load	0x0,0x3
0484 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0485 e004       |    |		Load	0x0,0x4
0486 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0487 e001       |    |		Load	0x0,0x1								; Debug Table 0x15.0x3 = 0x487,0x4
0488 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0489 0257       | W  |		Execute	Discrete,Raise
048a 0000 0000  |    |		.BLANK	0000[0x6]
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						; Debug Table 0x16 = .DEBUG	0x0493,0x0e36,0x0002,0x0000,0x0032,0xc824,0x0000,0x0133
													; Debug Table 0x16.0x0 = 0x493,0x1
0494 8233       | 3  |		Call	0x1,0x33
0495 0f03       |    |		Execute_Immediate	Equal,0x3
0496 6802       |h   |		Jump_Zero	0x499
0497 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x16.0x1 = 0x497,0x2
0498 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0499 0092 07bc  |    |		Action	Push_String_Extended,0x7bc					; "Element is not a Choice Identifier Reference"
													; Debug Table 0x16.0x2 = 0x499,0x3
049b e003       |    |		Load	0x0,0x3
049c 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
049d e004       |    |		Load	0x0,0x4
049e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
049f e001       |    |		Load	0x0,0x1								; Debug Table 0x16.0x3 = 0x49f,0x4
04a0 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
04a1 0257       | W  |		Execute	Discrete,Raise
04a2 0000 0000  |    |		.BLANK	0000[0x6]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04af       |    |		.CONST	0x04af								; Address of begin
04a9 0004       |    |		.CONST	0x0004								; Address of exception handler
04aa 0002       |    |		.CONST	0x0002								; Number of locals
04ab			INIT_04a8:
04ab 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x17 = .DEBUG	0x04ab,0x0e40,0x0002,0x0000,0x0032,0xc824,0x0000,0x013c
													; Debug Table 0x17.0x0 = 0x4ab,0xffff
04ac 00db       |    |		Load_Top	At_Offset_3
04ad 8251       | Q  |		Call	0x1,0x51
04ae 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
04af			BODY_04a8:
04af 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x1 = 0x4af,0x1
04b0 00eb       |    |		Load_Encached	Diana_Cache
04b1 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
04b2 0b66       | f  |		Execute_Immediate	Case_Compare,0x66
04b3 700b       |p   |		Jump_Nonzero	0x4bf
04b4 0b88       |    |		Execute_Immediate	Case_Compare,0x88
04b5 7009       |p   |		Jump_Nonzero	0x4bf
04b6 0092 07bd  |    |		Action	Push_String_Extended,0x7bd					; "Element is not a Subtype Indication or Index Subtype"
													; Debug Table 0x17.0x2 = 0x4b6,0x3
04b8 e003       |    |		Load	0x0,0x3
04b9 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
04ba e004       |    |		Load	0x0,0x4
04bb 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04bc e001       |    |		Load	0x0,0x1								; Debug Table 0x17.0x3 = 0x4bc,0x4
04bd 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
04be 0257       | W  |		Execute	Discrete,Raise
04bf 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x17.0x4 = 0x4bf,0x2
04c0 00eb       |    |		Load_Encached	Diana_Cache
04c1 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
04c2 8252       | R  |		Call	0x1,0x52
04c3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04c4 0000 0000  |    |		.BLANK	0000[0x4]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cf       |    |		.CONST	0x04cf								; Address of begin
04c9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ca 0002       |    |		.CONST	0x0002								; Number of locals
04cb			INIT_04c8:
04cb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x18 = .DEBUG	0x04cb,0x0e4c,0x0002,0x0000,0x0032,0xc824,0x0000,0x0145
													; Debug Table 0x18.0x0 = 0x4cb,0xffff
04cc 00db       |    |		Load_Top	At_Offset_3
04cd 8251       | Q  |		Call	0x1,0x51
04ce 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
04cf			BODY_04c8:
04cf 0092 07be  |    |		Action	Push_String_Extended,0x7be					; "a Subtype Indication"
													; Debug Table 0x18.0x1 = 0x4cf,0x1
04d1 00d9       |    |		Load_Top	At_Offset_1
04d2 4866       |Hf  |		Short_Literal	0x66
04d3 8254       | T  |		Call	0x1,0x54
04d4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x2 = 0x4d4,0x2
04d5 00eb       |    |		Load_Encached	Diana_Cache
04d6 18ba       |    |		Execute	Package,Field_Execute,Field_Number 0xba
04d7 8252       | R  |		Call	0x1,0x52
04d8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04d9 0000 0000  |    |		.BLANK	0000[0x7]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e7       |    |		.CONST	0x04e7								; Address of begin
04e1 0004       |    |		.CONST	0x0004								; Address of exception handler
04e2 0002       |    |		.CONST	0x0002								; Number of locals
04e3			INIT_04e0:
04e3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x19 = .DEBUG	0x04e3,0x0e54,0x0002,0x0000,0x0032,0xc824,0x0000,0x014e
													; Debug Table 0x19.0x0 = 0x4e3,0xffff
04e4 00db       |    |		Load_Top	At_Offset_3
04e5 8251       | Q  |		Call	0x1,0x51
04e6 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
04e7			BODY_04e0:
04e7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x1 = 0x4e7,0x1
04e8 00eb       |    |		Load_Encached	Diana_Cache
04e9 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
04ea 0f67       | g  |		Execute_Immediate	Equal,0x67
04eb 6803       |h   |		Jump_Zero	0x4ef
04ec e001       |    |		Load	0x0,0x1								; Debug Table 0x19.0x2 = 0x4ec,0x2
04ed 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
04ee 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04ef 0092 07bf  |    |		Action	Push_String_Extended,0x7bf					; "an Enumeration Type Definition"
													; Debug Table 0x19.0x3 = 0x4ef,0x3
04f1 00d9       |    |		Load_Top	At_Offset_1
04f2 486e       |Hn  |		Short_Literal	0x6e
04f3 8254       | T  |		Call	0x1,0x54
04f4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x4 = 0x4f4,0x4
04f5 00eb       |    |		Load_Encached	Diana_Cache
04f6 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
04f7 e001       |    |		Load	0x0,0x1
04f8 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
04f9 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
04fa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04fb 0000 0000  |    |		.BLANK	0000[0x5]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0507       |    |		.CONST	0x0507								; Address of begin
0501 0004       |    |		.CONST	0x0004								; Address of exception handler
0502 0002       |    |		.CONST	0x0002								; Number of locals
0503			INIT_0500:
0503 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1a = .DEBUG	0x0503,0x0e60,0x0002,0x0000,0x0032,0xc824,0x0000,0x0159
													; Debug Table 0x1a.0x0 = 0x503,0xffff
0504 00db       |    |		Load_Top	At_Offset_3
0505 8251       | Q  |		Call	0x1,0x51
0506 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0507			BODY_0500:
0507 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0x1 = 0x507,0x1
0508 00eb       |    |		Load_Encached	Diana_Cache
0509 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
050a 0f6a       | j  |		Execute_Immediate	Equal,0x6a
050b 6803       |h   |		Jump_Zero	0x50f
050c e001       |    |		Load	0x0,0x1								; Debug Table 0x1a.0x2 = 0x50c,0x2
050d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
050e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
050f 0092 07c0  |    |		Action	Push_String_Extended,0x7c0					; "an Integer Type Definition"
													; Debug Table 0x1a.0x3 = 0x50f,0x3
0511 00d9       |    |		Load_Top	At_Offset_1
0512 486f       |Ho  |		Short_Literal	0x6f
0513 8254       | T  |		Call	0x1,0x54
0514 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0x4 = 0x514,0x4
0515 00eb       |    |		Load_Encached	Diana_Cache
0516 18dc       |    |		Execute	Package,Field_Execute,Field_Number 0xdc
0517 8252       | R  |		Call	0x1,0x52
0518 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0519 0000 0000  |    |		.BLANK	0000[0x7]
0520 ; --------------------------------------------------------------------------------------
0520 ; SUBPROGRAM
0520 ; --------------------------------------------------------------------------------------
0520 0528       | (  |		.CONST	0x0528								; Address of begin
0521 0004       |    |		.CONST	0x0004								; Address of exception handler
0522 0003       |    |		.CONST	0x0003								; Number of locals
0523			INIT_0520:
0523 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1b = .DEBUG	0x0523,0x0e6c,0x0002,0x0000,0x0032,0xc824,0x0000,0x0162
													; Debug Table 0x1b.0x0 = 0x523,0xffff
0524 00db       |    |		Load_Top	At_Offset_3
0525 8251       | Q  |		Call	0x1,0x51
0526 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0527 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1b.0x1 = 0x527,0xfffe
0528			BODY_0520:
0528 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1b.0x2 = 0x528,0x1
0529 00eb       |    |		Load_Encached	Diana_Cache
052a 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
052b 0f66       | f  |		Execute_Immediate	Equal,0x66
052c 6805       |h   |		Jump_Zero	0x532
052d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1b.0x3 = 0x52d,0x2
052e 00eb       |    |		Load_Encached	Diana_Cache
052f 18f9       |    |		Execute	Package,Field_Execute,Field_Number 0xf9
0530 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0531 7802       |x   |		Jump	0x534
0532 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1b.0x4 = 0x532,0x3
0533 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0534 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1b.0x5 = 0x534,0x4
0535 00eb       |    |		Load_Encached	Diana_Cache
0536 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0537 0f69       | i  |		Execute_Immediate	Equal,0x69
0538 6803       |h   |		Jump_Zero	0x53c
0539 e001       |    |		Load	0x0,0x1								; Debug Table 0x1b.0x6 = 0x539,0x5
053a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
053b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
053c 0092 07c1  |    |		Action	Push_String_Extended,0x7c1					; "Floating Type Definition"
													; Debug Table 0x1b.0x7 = 0x53c,0x6
053e 00d9       |    |		Load_Top	At_Offset_1
053f 4865       |He  |		Short_Literal	0x65
0540 8254       | T  |		Call	0x1,0x54
0541 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1b.0x8 = 0x541,0x7
0542 00eb       |    |		Load_Encached	Diana_Cache
0543 18c5       |    |		Execute	Package,Field_Execute,Field_Number 0xc5
0544 8252       | R  |		Call	0x1,0x52
0545 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0546 0000 0000  |    |		.XXX[0x2]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054f       | O  |		.CONST	0x054f								; Address of begin
0549 0004       |    |		.CONST	0x0004								; Address of exception handler
054a 0002       |    |		.CONST	0x0002								; Number of locals
054b			INIT_0548:
054b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1c = .DEBUG	0x054b,0x0e80,0x0002,0x0000,0x0032,0xc824,0x0000,0x016b
													; Debug Table 0x1c.0x0 = 0x54b,0xffff
054c 00db       |    |		Load_Top	At_Offset_3
054d 8251       | Q  |		Call	0x1,0x51
054e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
054f			BODY_0548:
054f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1c.0x1 = 0x54f,0x1
0550 00eb       |    |		Load_Encached	Diana_Cache
0551 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0552 0f69       | i  |		Execute_Immediate	Equal,0x69
0553 6803       |h   |		Jump_Zero	0x557
0554 e001       |    |		Load	0x0,0x1								; Debug Table 0x1c.0x2 = 0x554,0x2
0555 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0556 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0557 0092 07c1  |    |		Action	Push_String_Extended,0x7c1					; "Floating Type Definition"
													; Debug Table 0x1c.0x3 = 0x557,0x3
0559 00d9       |    |		Load_Top	At_Offset_1
055a 4865       |He  |		Short_Literal	0x65
055b 8254       | T  |		Call	0x1,0x54
055c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1c.0x4 = 0x55c,0x4
055d 00eb       |    |		Load_Encached	Diana_Cache
055e 18dd       |    |		Execute	Package,Field_Execute,Field_Number 0xdd
055f 8252       | R  |		Call	0x1,0x52
0560 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0561 0000 0000  |    |		.BLANK	0000[0x7]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 0570       | p  |		.CONST	0x0570								; Address of begin
0569 0004       |    |		.CONST	0x0004								; Address of exception handler
056a 0003       |    |		.CONST	0x0003								; Number of locals
056b			INIT_0568:
056b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1d = .DEBUG	0x056b,0x0e8c,0x0002,0x0000,0x0032,0xc824,0x0000,0x0174
													; Debug Table 0x1d.0x0 = 0x56b,0xffff
056c 00db       |    |		Load_Top	At_Offset_3
056d 8251       | Q  |		Call	0x1,0x51
056e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
056f 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1d.0x1 = 0x56f,0xfffe
0570			BODY_0568:
0570 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1d.0x2 = 0x570,0x1
0571 00eb       |    |		Load_Encached	Diana_Cache
0572 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0573 0f66       | f  |		Execute_Immediate	Equal,0x66
0574 6805       |h   |		Jump_Zero	0x57a
0575 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1d.0x3 = 0x575,0x2
0576 00eb       |    |		Load_Encached	Diana_Cache
0577 18f9       |    |		Execute	Package,Field_Execute,Field_Number 0xf9
0578 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0579 7802       |x   |		Jump	0x57c
057a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1d.0x4 = 0x57a,0x3
057b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
057c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1d.0x5 = 0x57c,0x4
057d 00eb       |    |		Load_Encached	Diana_Cache
057e 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
057f 0f68       | h  |		Execute_Immediate	Equal,0x68
0580 6803       |h   |		Jump_Zero	0x584
0581 e001       |    |		Load	0x0,0x1								; Debug Table 0x1d.0x6 = 0x581,0x5
0582 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0583 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0584 0092 07c2  |    |		Action	Push_String_Extended,0x7c2					; "Fixed Type Definition"
													; Debug Table 0x1d.0x7 = 0x584,0x6
0586 00d9       |    |		Load_Top	At_Offset_1
0587 4864       |Hd  |		Short_Literal	0x64
0588 8254       | T  |		Call	0x1,0x54
0589 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0x8 = 0x589,0x7
058a 00eb       |    |		Load_Encached	Diana_Cache
058b 18c5       |    |		Execute	Package,Field_Execute,Field_Number 0xc5
058c 8252       | R  |		Call	0x1,0x52
058d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
058e 0000 0000  |    |		.XXX[0x2]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0597       |    |		.CONST	0x0597								; Address of begin
0591 0004       |    |		.CONST	0x0004								; Address of exception handler
0592 0002       |    |		.CONST	0x0002								; Number of locals
0593			INIT_0590:
0593 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1e = .DEBUG	0x0593,0x0ea0,0x0002,0x0000,0x0032,0xc824,0x0000,0x017d
													; Debug Table 0x1e.0x0 = 0x593,0xffff
0594 00db       |    |		Load_Top	At_Offset_3
0595 8251       | Q  |		Call	0x1,0x51
0596 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0597			BODY_0590:
0597 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0x1 = 0x597,0x1
0598 00eb       |    |		Load_Encached	Diana_Cache
0599 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
059a 0f68       | h  |		Execute_Immediate	Equal,0x68
059b 6803       |h   |		Jump_Zero	0x59f
059c e001       |    |		Load	0x0,0x1								; Debug Table 0x1e.0x2 = 0x59c,0x2
059d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
059e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
059f 0092 07c2  |    |		Action	Push_String_Extended,0x7c2					; "Fixed Type Definition"
													; Debug Table 0x1e.0x3 = 0x59f,0x3
05a1 00d9       |    |		Load_Top	At_Offset_1
05a2 4864       |Hd  |		Short_Literal	0x64
05a3 8254       | T  |		Call	0x1,0x54
05a4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0x4 = 0x5a4,0x4
05a5 00eb       |    |		Load_Encached	Diana_Cache
05a6 18dd       |    |		Execute	Package,Field_Execute,Field_Number 0xdd
05a7 8252       | R  |		Call	0x1,0x52
05a8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05a9 0000 0000  |    |		.BLANK	0000[0x7]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b7       |    |		.CONST	0x05b7								; Address of begin
05b1 0004       |    |		.CONST	0x0004								; Address of exception handler
05b2 0002       |    |		.CONST	0x0002								; Number of locals
05b3			INIT_05b0:
05b3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1f = .DEBUG	0x05b3,0x0eac,0x0002,0x0000,0x0032,0xc824,0x0000,0x0186
													; Debug Table 0x1f.0x0 = 0x5b3,0xffff
05b4 00db       |    |		Load_Top	At_Offset_3
05b5 8251       | Q  |		Call	0x1,0x51
05b6 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
05b7			BODY_05b0:
05b7 0092 07c3  |    |		Action	Push_String_Extended,0x7c3					; "an Array Type Definition"
													; Debug Table 0x1f.0x1 = 0x5b7,0x1
05b9 00d9       |    |		Load_Top	At_Offset_1
05ba 486c       |Hl  |		Short_Literal	0x6c
05bb 8254       | T  |		Call	0x1,0x54
05bc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x2 = 0x5bc,0x2
05bd 00eb       |    |		Load_Encached	Diana_Cache
05be 18c2       |    |		Execute	Package,Field_Execute,Field_Number 0xc2
05bf 00eb       |    |		Load_Encached	Diana_Cache
05c0 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
05c1 00eb       |    |		Load_Encached	Diana_Cache
05c2 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
05c3 00eb       |    |		Load_Encached	Diana_Cache
05c4 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
05c5 0f88       |    |		Execute_Immediate	Equal,-0x78
05c6 0f00       |    |		Execute_Immediate	Equal,0x0
05c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cf       |    |		.CONST	0x05cf								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0002       |    |		.CONST	0x0002								; Number of locals
05cb			INIT_05c8:
05cb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x20 = .DEBUG	0x05cb,0x0eb4,0x0002,0x0000,0x0032,0xc824,0x0000,0x018f
													; Debug Table 0x20.0x0 = 0x5cb,0xffff
05cc 00db       |    |		Load_Top	At_Offset_3
05cd 8251       | Q  |		Call	0x1,0x51
05ce 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
05cf			BODY_05c8:
05cf 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x20.0x1 = 0x5cf,0x1
05d0 823f       | ?  |		Call	0x1,0x3f
05d1 7009       |p   |		Jump_Nonzero	0x5db
05d2 0092 07c4  |    |		Action	Push_String_Extended,0x7c4					; "Element is not a Constrained Array Type"
													; Debug Table 0x20.0x2 = 0x5d2,0x2
05d4 e003       |    |		Load	0x0,0x3
05d5 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
05d6 e004       |    |		Load	0x0,0x4
05d7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05d8 e001       |    |		Load	0x0,0x1								; Debug Table 0x20.0x3 = 0x5d8,0x3
05d9 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
05da 0257       | W  |		Execute	Discrete,Raise
05db 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x20.0x4 = 0x5db,0x4
05dc 00eb       |    |		Load_Encached	Diana_Cache
05dd 18c2       |    |		Execute	Package,Field_Execute,Field_Number 0xc2
05de 00eb       |    |		Load_Encached	Diana_Cache
05df 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
05e0 e001       |    |		Load	0x0,0x1
05e1 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
05e2 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
05e3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05e4 0000 0000  |    |		.BLANK	0000[0x4]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05ef       |    |		.CONST	0x05ef								; Address of begin
05e9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ea 0002       |    |		.CONST	0x0002								; Number of locals
05eb			INIT_05e8:
05eb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x21 = .DEBUG	0x05eb,0x0ec0,0x0002,0x0000,0x0032,0xc824,0x0000,0x019a
													; Debug Table 0x21.0x0 = 0x5eb,0xffff
05ec 00db       |    |		Load_Top	At_Offset_3
05ed 8251       | Q  |		Call	0x1,0x51
05ee 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
05ef			BODY_05e8:
05ef 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x21.0x1 = 0x5ef,0x1
05f0 823f       | ?  |		Call	0x1,0x3f
05f1 6809       |h   |		Jump_Zero	0x5fb
05f2 0092 07c5  |    |		Action	Push_String_Extended,0x7c5					; "Element is a Constrained Array Type"
													; Debug Table 0x21.0x2 = 0x5f2,0x2
05f4 e003       |    |		Load	0x0,0x3
05f5 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
05f6 e004       |    |		Load	0x0,0x4
05f7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05f8 e001       |    |		Load	0x0,0x1								; Debug Table 0x21.0x3 = 0x5f8,0x3
05f9 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
05fa 0257       | W  |		Execute	Discrete,Raise
05fb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x21.0x4 = 0x5fb,0x4
05fc 00eb       |    |		Load_Encached	Diana_Cache
05fd 18c2       |    |		Execute	Package,Field_Execute,Field_Number 0xc2
05fe 00eb       |    |		Load_Encached	Diana_Cache
05ff 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
0600 e001       |    |		Load	0x0,0x1
0601 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
0602 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0603 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0604 0000 0000  |    |		.BLANK	0000[0x4]
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060f       |    |		.CONST	0x060f								; Address of begin
0609 0004       |    |		.CONST	0x0004								; Address of exception handler
060a 0002       |    |		.CONST	0x0002								; Number of locals
060b			INIT_0608:
060b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x22 = .DEBUG	0x060b,0x0ecc,0x0002,0x0000,0x0032,0xc824,0x0000,0x01a5
													; Debug Table 0x22.0x0 = 0x60b,0xffff
060c 00db       |    |		Load_Top	At_Offset_3
060d 8251       | Q  |		Call	0x1,0x51
060e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
060f			BODY_0608:
060f 0092 07c3  |    |		Action	Push_String_Extended,0x7c3					; "an Array Type Definition"
													; Debug Table 0x22.0x1 = 0x60f,0x1
0611 00d9       |    |		Load_Top	At_Offset_1
0612 486c       |Hl  |		Short_Literal	0x6c
0613 8254       | T  |		Call	0x1,0x54
0614 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x22.0x2 = 0x614,0x2
0615 00eb       |    |		Load_Encached	Diana_Cache
0616 18b9       |    |		Execute	Package,Field_Execute,Field_Number 0xb9
0617 8252       | R  |		Call	0x1,0x52
0618 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0619 0000 0000  |    |		.BLANK	0000[0x7]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 0627       | '  |		.CONST	0x0627								; Address of begin
0621 0004       |    |		.CONST	0x0004								; Address of exception handler
0622 0002       |    |		.CONST	0x0002								; Number of locals
0623			INIT_0620:
0623 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x23 = .DEBUG	0x0623,0x0ed4,0x0002,0x0000,0x0032,0xc824,0x0000,0x01ba
													; Debug Table 0x23.0x0 = 0x623,0xffff
0624 00db       |    |		Load_Top	At_Offset_3
0625 8251       | Q  |		Call	0x1,0x51
0626 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0627			BODY_0620:
0627 0092 07c6  |    |		Action	Push_String_Extended,0x7c6					; "a Record Type Definition"
													; Debug Table 0x23.0x1 = 0x627,0x1
0629 00d9       |    |		Load_Top	At_Offset_1
062a 4872       |Hr  |		Short_Literal	0x72
062b 8254       | T  |		Call	0x1,0x54
062c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x23.0x2 = 0x62c,0x2
062d 00eb       |    |		Load_Encached	Diana_Cache
062e 18fb       |    |		Execute	Package,Field_Execute,Field_Number 0xfb
062f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0630 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x23.0x3 = 0x630,0x3
0631 00eb       |    |		Load_Encached	Diana_Cache
0632 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0633 7009       |p   |		Jump_Nonzero	0x63d
0634 00d8       |    |		Load_Top	At_Offset_0
0635 00eb       |    |		Load_Encached	Diana_Cache
0636 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
0637 4975       |Iu  |		Short_Literal	0x175
0638 00eb       |    |		Load_Encached	Diana_Cache
0639 0098       |    |		Execute	Package,Field_Read_Dynamic
063a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
063b 0e00       |    |		Execute_Immediate	Not_Equal,0x0
063c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
063d 4800       |H   |		Short_Literal	0x0
063e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
063f 0000       |    |		.XXX[0x1]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0647       | G  |		.CONST	0x0647								; Address of begin
0641 0004       |    |		.CONST	0x0004								; Address of exception handler
0642 0002       |    |		.CONST	0x0002								; Number of locals
0643			INIT_0640:
0643 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x24 = .DEBUG	0x0643,0x0ede,0x0002,0x0000,0x0032,0xc824,0x0000,0x01c3
													; Debug Table 0x24.0x0 = 0x643,0xffff
0644 00db       |    |		Load_Top	At_Offset_3
0645 8251       | Q  |		Call	0x1,0x51
0646 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0647			BODY_0640:
0647 0092 07c6  |    |		Action	Push_String_Extended,0x7c6					; "a Record Type Definition"
													; Debug Table 0x24.0x1 = 0x647,0x1
0649 00d9       |    |		Load_Top	At_Offset_1
064a 4872       |Hr  |		Short_Literal	0x72
064b 8254       | T  |		Call	0x1,0x54
064c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x24.0x2 = 0x64c,0x2
064d 00eb       |    |		Load_Encached	Diana_Cache
064e 18fb       |    |		Execute	Package,Field_Execute,Field_Number 0xfb
064f 00eb       |    |		Load_Encached	Diana_Cache
0650 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0651 700b       |p   |		Jump_Nonzero	0x65d
0652 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x24.0x3 = 0x652,0x3
0653 00eb       |    |		Load_Encached	Diana_Cache
0654 18fb       |    |		Execute	Package,Field_Execute,Field_Number 0xfb
0655 e006       |    |		Load	0x0,0x6
0656 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0657 00eb       |    |		Load_Encached	Diana_Cache
0658 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
0659 e001       |    |		Load	0x0,0x1
065a 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
065b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
065c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
065d e001       |    |		Load	0x0,0x1								; Debug Table 0x24.0x4 = 0x65d,0x4
065e 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
065f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0660 ; --------------------------------------------------------------------------------------
0660 ; SUBPROGRAM
0660 ; --------------------------------------------------------------------------------------
0660 0667       | g  |		.CONST	0x0667								; Address of begin
0661 0004       |    |		.CONST	0x0004								; Address of exception handler
0662 0002       |    |		.CONST	0x0002								; Number of locals
0663			INIT_0660:
0663 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x25 = .DEBUG	0x0663,0x0eea,0x0002,0x0000,0x0032,0xc824,0x0000,0x01ce
													; Debug Table 0x25.0x0 = 0x663,0xffff
0664 00db       |    |		Load_Top	At_Offset_3
0665 8251       | Q  |		Call	0x1,0x51
0666 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0667			BODY_0660:
0667 0092 07c6  |    |		Action	Push_String_Extended,0x7c6					; "a Record Type Definition"
													; Debug Table 0x25.0x1 = 0x667,0x1
0669 00d9       |    |		Load_Top	At_Offset_1
066a 4872       |Hr  |		Short_Literal	0x72
066b 8254       | T  |		Call	0x1,0x54
066c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x25.0x2 = 0x66c,0x2
066d 00eb       |    |		Load_Encached	Diana_Cache
066e 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
066f e001       |    |		Load	0x0,0x1
0670 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
0671 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0672 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0673 0000 0000  |    |		.BLANK	0000[0x5]
0678 ; --------------------------------------------------------------------------------------
0678 ; SUBPROGRAM
0678 ; --------------------------------------------------------------------------------------
0678 067b       | {  |		.CONST	0x067b								; Address of begin
0679 0004       |    |		.CONST	0x0004								; Address of exception handler
067a 0001       |    |		.CONST	0x0001								; Number of locals
067b			BODY_0678:
067b			INIT_0678:
067b 4603       |F   |		Jump_Case	0x4							; Debug Table 0x26 = .DEBUG	0x067b,0x0ef2,0x0005,0x0000,0x0032,0xc824,0x0000,0x01d9
067c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
067d 7802       |x   |		Jump	0x680								; case 0x1
067e 7805       |x   |		Jump	0x684								; case 0x2
067f 7809       |x   |		Jump	0x689								; case 0x3
0680 00da       |    |		Load_Top	At_Offset_2
0681 0091 07b2  |    |		Action	Push_String_Extended_Indexed,0x7b2				; "A_NULL_COMPONENT"
0683 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0684 00db       |    |		Load_Top	At_Offset_3
0685 00db       |    |		Load_Top	At_Offset_3
0686 00e0       |    |		Load_Encached	Standard_Cache
0687 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0688 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0689 00da       |    |		Load_Top	At_Offset_2
068a 00e0       |    |		Load_Encached	Standard_Cache
068b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
068c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
068d 0000 0000  |    |		.XXX[0x3]
068f 0000       |    |
0690 ; --------------------------------------------------------------------------------------
0690 ; SUBPROGRAM
0690 ; --------------------------------------------------------------------------------------
0690 0697       |    |		.CONST	0x0697								; Address of begin
0691 0004       |    |		.CONST	0x0004								; Address of exception handler
0692 0002       |    |		.CONST	0x0002								; Number of locals
0693			INIT_0690:
0693 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x27 = .DEBUG	0x0693,0x0ef4,0x0002,0x0000,0x0032,0xc824,0x0000,0x01e1
													; Debug Table 0x27.0x0 = 0x693,0xffff
0694 00db       |    |		Load_Top	At_Offset_3
0695 8251       | Q  |		Call	0x1,0x51
0696 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0697			BODY_0690:
0697 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x27.0x1 = 0x697,0x1
0698 00eb       |    |		Load_Encached	Diana_Cache
0699 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
069a 0b39       | 9  |		Execute_Immediate	Case_Compare,0x39
069b 7006       |p   |		Jump_Nonzero	0x6a2
069c 0ba6       |    |		Execute_Immediate	Case_Compare,0xa6
069d 7013       |p   |		Jump_Nonzero	0x6b1
069e 0ba5       |    |		Execute_Immediate	Case_Compare,0xa5
069f 7013       |p   |		Jump_Nonzero	0x6b3
06a0 4803       |H   |		Short_Literal	0x3							; Debug Table 0x27.0x2 = 0x6a0,0x7
06a1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06a2 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x27.0x3 = 0x6a2,0x2
06a3 00eb       |    |		Load_Encached	Diana_Cache
06a4 18d0       |    |		Execute	Package,Field_Execute,Field_Number 0xd0
06a5 00eb       |    |		Load_Encached	Diana_Cache
06a6 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
06a7 00eb       |    |		Load_Encached	Diana_Cache
06a8 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
06a9 00eb       |    |		Load_Encached	Diana_Cache
06aa 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
06ab 0f1c       |    |		Execute_Immediate	Equal,0x1c
06ac 6802       |h   |		Jump_Zero	0x6af
06ad 4801       |H   |		Short_Literal	0x1							; Debug Table 0x27.0x4 = 0x6ad,0x3
06ae 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06af 4803       |H   |		Short_Literal	0x3							; Debug Table 0x27.0x5 = 0x6af,0x4
06b0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06b1 4802       |H   |		Short_Literal	0x2							; Debug Table 0x27.0x6 = 0x6b1,0x5
06b2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06b3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x27.0x7 = 0x6b3,0x6
06b4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06b5 0000 0000  |    |		.XXX[0x3]
06b7 0000       |    |
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06bf       |    |		.CONST	0x06bf								; Address of begin
06b9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ba 0002       |    |		.CONST	0x0002								; Number of locals
06bb			INIT_06b8:
06bb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x28 = .DEBUG	0x06bb,0x0f06,0x0002,0x0000,0x0032,0xc824,0x0000,0x01ea
													; Debug Table 0x28.0x0 = 0x6bb,0xffff
06bc 00db       |    |		Load_Top	At_Offset_3
06bd 8251       | Q  |		Call	0x1,0x51
06be 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
06bf			BODY_06b8:
06bf 0092 07c7  |    |		Action	Push_String_Extended,0x7c7					; "a Variant Record Component"
													; Debug Table 0x28.0x1 = 0x6bf,0x1
06c1 00d9       |    |		Load_Top	At_Offset_1
06c2 48a6       |H   |		Short_Literal	0xa6
06c3 8254       | T  |		Call	0x1,0x54
06c4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x28.0x2 = 0x6c4,0x2
06c5 00eb       |    |		Load_Encached	Diana_Cache
06c6 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
06c7 8252       | R  |		Call	0x1,0x52
06c8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06c9 0000 0000  |    |		.BLANK	0000[0x7]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d7       |    |		.CONST	0x06d7								; Address of begin
06d1 0004       |    |		.CONST	0x0004								; Address of exception handler
06d2 0002       |    |		.CONST	0x0002								; Number of locals
06d3			INIT_06d0:
06d3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x29 = .DEBUG	0x06d3,0x0f0e,0x0002,0x0000,0x0032,0xc824,0x0000,0x01f3
													; Debug Table 0x29.0x0 = 0x6d3,0xffff
06d4 00db       |    |		Load_Top	At_Offset_3
06d5 8251       | Q  |		Call	0x1,0x51
06d6 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
06d7			BODY_06d0:
06d7 0092 07c7  |    |		Action	Push_String_Extended,0x7c7					; "a Variant Record Component"
													; Debug Table 0x29.0x1 = 0x6d7,0x1
06d9 00d9       |    |		Load_Top	At_Offset_1
06da 48a6       |H   |		Short_Literal	0xa6
06db 8254       | T  |		Call	0x1,0x54
06dc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x29.0x2 = 0x6dc,0x2
06dd 00eb       |    |		Load_Encached	Diana_Cache
06de 18ea       |    |		Execute	Package,Field_Execute,Field_Number 0xea
06df 00eb       |    |		Load_Encached	Diana_Cache
06e0 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
06e1 e001       |    |		Load	0x0,0x1
06e2 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
06e3 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
06e4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06e5 0000 0000  |    |		.XXX[0x3]
06e7 0000       |    |
06e8 ; --------------------------------------------------------------------------------------
06e8 ; SUBPROGRAM
06e8 ; --------------------------------------------------------------------------------------
06e8 06ef       |    |		.CONST	0x06ef								; Address of begin
06e9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ea 0002       |    |		.CONST	0x0002								; Number of locals
06eb			INIT_06e8:
06eb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2a = .DEBUG	0x06eb,0x0f16,0x0002,0x0000,0x0032,0xc824,0x0000,0x01fe
													; Debug Table 0x2a.0x0 = 0x6eb,0xffff
06ec 00db       |    |		Load_Top	At_Offset_3
06ed 8251       | Q  |		Call	0x1,0x51
06ee 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
06ef			BODY_06e8:
06ef 0092 07c7  |    |		Action	Push_String_Extended,0x7c7					; "a Variant Record Component"
													; Debug Table 0x2a.0x1 = 0x6ef,0x1
06f1 00d9       |    |		Load_Top	At_Offset_1
06f2 489a       |H   |		Short_Literal	0x9a
06f3 8254       | T  |		Call	0x1,0x54
06f4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2a.0x2 = 0x6f4,0x2
06f5 00eb       |    |		Load_Encached	Diana_Cache
06f6 18b7       |    |		Execute	Package,Field_Execute,Field_Number 0xb7
06f7 00eb       |    |		Load_Encached	Diana_Cache
06f8 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
06f9 e001       |    |		Load	0x0,0x1
06fa 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
06fb 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
06fc 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06fd 0000 0000  |    |		.XXX[0x3]
06ff 0000       |    |
0700 ; --------------------------------------------------------------------------------------
0700 ; SUBPROGRAM
0700 ; --------------------------------------------------------------------------------------
0700 0707       |    |		.CONST	0x0707								; Address of begin
0701 0004       |    |		.CONST	0x0004								; Address of exception handler
0702 0002       |    |		.CONST	0x0002								; Number of locals
0703			INIT_0700:
0703 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2b = .DEBUG	0x0703,0x0f1e,0x0002,0x0000,0x0032,0xc824,0x0000,0x0209
													; Debug Table 0x2b.0x0 = 0x703,0xffff
0704 00db       |    |		Load_Top	At_Offset_3
0705 8251       | Q  |		Call	0x1,0x51
0706 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0707			BODY_0700:
0707 0092 07c7  |    |		Action	Push_String_Extended,0x7c7					; "a Variant Record Component"
													; Debug Table 0x2b.0x1 = 0x707,0x1
0709 00d9       |    |		Load_Top	At_Offset_1
070a 489a       |H   |		Short_Literal	0x9a
070b 8254       | T  |		Call	0x1,0x54
070c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2b.0x2 = 0x70c,0x2
070d 00eb       |    |		Load_Encached	Diana_Cache
070e 18de       |    |		Execute	Package,Field_Execute,Field_Number 0xde
070f 00eb       |    |		Load_Encached	Diana_Cache
0710 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
0711 e001       |    |		Load	0x0,0x1
0712 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
0713 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0714 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0715 0000 0000  |    |		.XXX[0x3]
0717 0000       |    |
0718 ; --------------------------------------------------------------------------------------
0718 ; SUBPROGRAM
0718 ; --------------------------------------------------------------------------------------
0718 071f       |    |		.CONST	0x071f								; Address of begin
0719 0004       |    |		.CONST	0x0004								; Address of exception handler
071a 0002       |    |		.CONST	0x0002								; Number of locals
071b			INIT_0718:
071b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2c = .DEBUG	0x071b,0x0f26,0x0002,0x0000,0x0032,0xc824,0x0000,0x0214
													; Debug Table 0x2c.0x0 = 0x71b,0xffff
071c 00db       |    |		Load_Top	At_Offset_3
071d 8251       | Q  |		Call	0x1,0x51
071e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
071f			BODY_0718:
071f 0092 07c8  |    |		Action	Push_String_Extended,0x7c8					; "an Access Type Definition"
													; Debug Table 0x2c.0x1 = 0x71f,0x1
0721 00d9       |    |		Load_Top	At_Offset_1
0722 486b       |Hk  |		Short_Literal	0x6b
0723 8254       | T  |		Call	0x1,0x54
0724 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2c.0x2 = 0x724,0x2
0725 00eb       |    |		Load_Encached	Diana_Cache
0726 18b9       |    |		Execute	Package,Field_Execute,Field_Number 0xb9
0727 8252       | R  |		Call	0x1,0x52
0728 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0729 0000 0000  |    |		.BLANK	0000[0x7]
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 0737       | 7  |		.CONST	0x0737								; Address of begin
0731 0004       |    |		.CONST	0x0004								; Address of exception handler
0732 0002       |    |		.CONST	0x0002								; Number of locals
0733			INIT_0730:
0733 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2d = .DEBUG	0x0733,0x0f2e,0x0002,0x0000,0x0032,0xc824,0x0000,0x021d
													; Debug Table 0x2d.0x0 = 0x733,0xffff
0734 00db       |    |		Load_Top	At_Offset_3
0735 8251       | Q  |		Call	0x1,0x51
0736 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0737			BODY_0730:
0737 0092 07c9  |    |		Action	Push_String_Extended,0x7c9					; "a Derived Type Definition"
													; Debug Table 0x2d.0x1 = 0x737,0x1
0739 00d9       |    |		Load_Top	At_Offset_1
073a 486d       |Hm  |		Short_Literal	0x6d
073b 8254       | T  |		Call	0x1,0x54
073c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2d.0x2 = 0x73c,0x2
073d 00eb       |    |		Load_Encached	Diana_Cache
073e 18b9       |    |		Execute	Package,Field_Execute,Field_Number 0xb9
073f 8252       | R  |		Call	0x1,0x52
0740 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0741 0000 0000  |    |		.BLANK	0000[0x7]
0748 ; --------------------------------------------------------------------------------------
0748 ; SUBPROGRAM
0748 ; --------------------------------------------------------------------------------------
0748 074f       | O  |		.CONST	0x074f								; Address of begin
0749 0004       |    |		.CONST	0x0004								; Address of exception handler
074a 0002       |    |		.CONST	0x0002								; Number of locals
074b			INIT_0748:
074b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2e = .DEBUG	0x074b,0x0f36,0x0002,0x0000,0x0032,0xc824,0x0000,0x0226
													; Debug Table 0x2e.0x0 = 0x74b,0xffff
074c 00db       |    |		Load_Top	At_Offset_3
074d 8251       | Q  |		Call	0x1,0x51
074e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
074f			BODY_0748:
074f 0092 07ca  |    |		Action	Push_String_Extended,0x7ca					; "a Task Specification"
													; Debug Table 0x2e.0x1 = 0x74f,0x1
0751 00d9       |    |		Load_Top	At_Offset_1
0752 4873       |Hs  |		Short_Literal	0x73
0753 8254       | T  |		Call	0x1,0x54
0754 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2e.0x2 = 0x754,0x2
0755 00eb       |    |		Load_Encached	Diana_Cache
0756 18bc       |    |		Execute	Package,Field_Execute,Field_Number 0xbc
0757 00eb       |    |		Load_Encached	Diana_Cache
0758 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
0759 e001       |    |		Load	0x0,0x1
075a 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
075b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
075c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
075d 0000 0000  |    |		.XXX[0x3]
075f 0000       |    |
0760 ; --------------------------------------------------------------------------------------
0760 ; SUBPROGRAM
0760 ; --------------------------------------------------------------------------------------
0760 0763       | c  |		.CONST	0x0763								; Address of begin
0761 0004       |    |		.CONST	0x0004								; Address of exception handler
0762 0001       |    |		.CONST	0x0001								; Number of locals
0763			BODY_0760:
0763			INIT_0760:
0763 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2f = .DEBUG	0x0763,0x0f3e,0x0001,0x0000,0x0033,0xd6f4,0x0000,0x005e
													; Debug Table 0x2f.0x0 = 0x763,0x1
0764 e001       |    |		Load	0x0,0x1
0765 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0766 00db       |    |		Load_Top	At_Offset_3
0767 027f       |    |		Execute	Discrete,Equal
0768 700f       |p   |		Jump_Nonzero	0x778
0769 0092 07cb  |    |		Action	Push_String_Extended,0x7cb					; "Element is not "
													; Debug Table 0x2f.0x1 = 0x769,0x2
076b 00db       |    |		Load_Top	At_Offset_3
076c e001       |    |		Load	0x0,0x1
076d 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
076e 025e       | ^  |		Execute	Discrete,Convert
076f 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0770 01cc       |    |		Execute	Vector,Catenate
0771 e003       |    |		Load	0x0,0x3
0772 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0773 e004       |    |		Load	0x0,0x4
0774 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0775 e001       |    |		Load	0x0,0x1								; Debug Table 0x2f.0x2 = 0x775,0x3
0776 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0777 0257       | W  |		Execute	Discrete,Raise
0778 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0779 0000 0000  |    |		.BLANK	0000[0x7]
0780 ; --------------------------------------------------------------------------------------
0780 ; SUBPROGRAM
0780 ; --------------------------------------------------------------------------------------
0780 0783       |    |		.CONST	0x0783								; Address of begin
0781 0004       |    |		.CONST	0x0004								; Address of exception handler
0782 0001       |    |		.CONST	0x0001								; Number of locals
0783			BODY_0780:
0783			INIT_0780:
0783 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x30 = .DEBUG	0x0783,0x0f46,0x0001,0x0000,0x0033,0xd6f4,0x0000,0x009a
													; Debug Table 0x30.0x0 = 0x783,0x1
0784 00eb       |    |		Load_Encached	Diana_Cache
0785 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0786 00db       |    |		Load_Top	At_Offset_3
0787 027f       |    |		Execute	Discrete,Equal
0788 700b       |p   |		Jump_Nonzero	0x794
0789 0092 07cb  |    |		Action	Push_String_Extended,0x7cb					; "Element is not "
													; Debug Table 0x30.0x1 = 0x789,0x2
078b e5fd       |    |		Load	0x2,-0x3
078c 01cc       |    |		Execute	Vector,Catenate
078d e003       |    |		Load	0x0,0x3
078e 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
078f e004       |    |		Load	0x0,0x4
0790 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0791 e001       |    |		Load	0x0,0x1								; Debug Table 0x30.0x2 = 0x791,0x3
0792 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0793 0257       | W  |		Execute	Discrete,Raise
0794 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0795 ; --------------------------------------------------------------------------------------
0795 ; STRING TABLE
0795 ; --------------------------------------------------------------------------------------
0795 0070       | p  |		.STRTAB	0x0070->0x07cd							; "A_SUBTYPE_INDICATION"
0796 0082       |    |		.STRTAB	0x0082->0x07d7							; "AN_ENUMERATION_TYPE_DEFINITION"
0797 009e       |    |		.STRTAB	0x009e->0x07e6							; "AN_INTEGER_TYPE_DEFINITION"
0798 00b6       |    |		.STRTAB	0x00b6->0x07f3							; "A_FLOAT_TYPE_DEFINITION"
0799 00cb       |    |		.STRTAB	0x00cb->0x07fe							; "A_FIXED_TYPE_DEFINITION"
079a 00e0       |    |		.STRTAB	0x00e0->0x080a							; "AN_ARRAY_TYPE_DEFINITION"
079b 00f6       |    |		.STRTAB	0x00f6->0x0816							; "A_RECORD_TYPE_DEFINITION"
079c 010c       |    |		.STRTAB	0x010c->0x0822							; "AN_ACCESS_TYPE_DEFINITION"
079d 0123       | #  |		.STRTAB	0x0123->0x082e							; "A_DERIVED_TYPE_DEFINITION"
079e 013a       | :  |		.STRTAB	0x013a->0x083b							; "A_TASK_TYPE_DEFINITION"
079f 014e       | N  |		.STRTAB	0x014e->0x0846							; "A_PRIVATE_TYPE_DEFINITION"
07a0 0165       | e  |		.STRTAB	0x0165->0x0852							; "A_LIMITED_PRIVATE_TYPE_DEFINITION"
07a1 0184       |    |		.STRTAB	0x0184->0x0863							; "NOT_A_TYPE_DEFINITION"
07a2 0197       |    |		.STRTAB	0x0197->0x086d							; "A_SIMPLE_RANGE"
07a3 01a3       |    |		.STRTAB	0x01a3->0x0874							; "A_RANGE_ATTRIBUTE"
07a4 01b2       |    |		.STRTAB	0x01b2->0x087d							; "A_FLOATING_POINT_CONSTRAINT"
07a5 01cb       |    |		.STRTAB	0x01cb->0x088a							; "A_FIXED_POINT_CONSTRAINT"
07a6 01e1       |    |		.STRTAB	0x01e1->0x0896							; "AN_INDEX_CONSTRAINT"
07a7 01f2       |    |		.STRTAB	0x01f2->0x08a0							; "A_DISCRIMINANT_CONSTRAINT"
07a8 0209       |    |		.STRTAB	0x0209->0x08ac							; "NOT_A_CONSTRAINT"
07a9 0217       |    |		.STRTAB	0x0217->0x08b4							; "A_SIMPLE_RANGE"
07aa 0223       | #  |		.STRTAB	0x0223->0x08bb							; "A_RANGE_ATTRIBUTE"
07ab 0232       | 2  |		.STRTAB	0x0232->0x08c4							; "A_SUBTYPE_INDICATION"
07ac 0244       | D  |		.STRTAB	0x0244->0x08ce							; "NOT_A_RANGE"
07ad 024d       | M  |		.STRTAB	0x024d->0x08d3							; "A_SIMPLE_EXPRESSION"
07ae 025e       | ^  |		.STRTAB	0x025e->0x08dd							; "A_DISCRETE_RANGE"
07af 026c       | l  |		.STRTAB	0x026c->0x08e5							; "OTHERS_CHOICE"
07b0 0277       | w  |		.STRTAB	0x0277->0x08eb							; "AN_IDENTIFIER_REFERENCE"
07b1 028c       |    |		.STRTAB	0x028c->0x08f7							; "NOT_A_CHOICE"
07b2 0296       |    |		.STRTAB	0x0296->0x08fd							; "A_NULL_COMPONENT"
07b3 02a4       |    |		.STRTAB	0x02a4->0x0905							; "A_VARIABLE_COMPONENT"
07b4 02b6       |    |		.STRTAB	0x02b6->0x090f							; "A_VARIANT_PART_COMPONENT"
07b5 02cc       |    |		.STRTAB	0x02cc->0x091b							; "NOT_A_COMPONENT"
07b6 02d9       |    |		.STRTAB	0x02d9->0x0922							; "Element is not a Type Definition"
07b7 02f7       |    |		.STRTAB	0x02f7->0x0932							; "Element is not an Index Constraint"
07b8 0317       |    |		.STRTAB	0x0317->0x0943							; "Element is not a Discriminant Constraint"
07b9 033d       | =  |		.STRTAB	0x033d->0x0957							; "Element is not a Range"
07ba 0351       | Q  |		.STRTAB	0x0351->0x0962							; "Element is not a Choice Expression"
07bb 0371       | q  |		.STRTAB	0x0371->0x0973							; "Element is not a Choice Discrete Range"
07bc 0395       |    |		.STRTAB	0x0395->0x0986							; "Element is not a Choice Identifier Reference"
07bd 03bf       |    |		.STRTAB	0x03bf->0x099c							; "Element is not a Subtype Indication or Index Subtype"
07be 03f1       |    |		.STRTAB	0x03f1->0x09b6							; "a Subtype Indication"
07bf 0403       |    |		.STRTAB	0x0403->0x09c0							; "an Enumeration Type Definition"
07c0 041f       |    |		.STRTAB	0x041f->0x09cf							; "an Integer Type Definition"
07c1 0437       | 7  |		.STRTAB	0x0437->0x09dc							; "Floating Type Definition"
07c2 044d       | M  |		.STRTAB	0x044d->0x09e8							; "Fixed Type Definition"
07c3 0460       | `  |		.STRTAB	0x0460->0x09f3							; "an Array Type Definition"
07c4 0476       | v  |		.STRTAB	0x0476->0x09ff							; "Element is not a Constrained Array Type"
07c5 049b       |    |		.STRTAB	0x049b->0x0a12							; "Element is a Constrained Array Type"
07c6 04bc       |    |		.STRTAB	0x04bc->0x0a24							; "a Record Type Definition"
07c7 04d2       |    |		.STRTAB	0x04d2->0x0a30							; "a Variant Record Component"
07c8 04ea       |    |		.STRTAB	0x04ea->0x0a3d							; "an Access Type Definition"
07c9 0501       |    |		.STRTAB	0x0501->0x0a49							; "a Derived Type Definition"
07ca 0518       |    |		.STRTAB	0x0518->0x0a56							; "a Task Specification"
07cb 052a       | *  |		.STRTAB	0x052a->0x0a60							; "Element is not "
07cc 0537       | 7  |		.STREND 0x0537->0x0a67
07cd 415f 5355  |A_SU|		.STRTAB_STRINGS
0a68 ; --------------------------------------------------------------------------------------
0a68 ; Debug Table
0a68 ; --------------------------------------------------------------------------------------
0a68 0003 0031  |   1|		.CONST	0x0003,0x0031
0a6a 000b 0bf2  |    |		.DEBUG	0x000b,0x0bf2,0x8000,0x0000,0x0032,0xc824,0x0000,0x0005
0a72 00b1 0c82  |    |		.DEBUG	0x00b1,0x0c82,0x8000,0x0000,0x0033,0xd6f4,0x0000,0x0013
0a7a 0123 0cf0  | #  |		.DEBUG	0x0123,0x0cf0,0x0005,0x0000,0x0032,0xc824,0x0000,0x002e
0a82 013b 0cf2  | ;  |		.DEBUG	0x013b,0x0cf2,0x0002,0x0000,0x0032,0xc824,0x0000,0x003f
0a8a 0183 0d14  |    |		.DEBUG	0x0183,0x0d14,0x0002,0x0000,0x0032,0xc824,0x0000,0x0048
0a92 01a3 0d20  |    |		.DEBUG	0x01a3,0x0d20,0x0002,0x0000,0x0032,0xc824,0x0000,0x0051
0a9a 01e3 0d32  |   2|		.DEBUG	0x01e3,0x0d32,0x0002,0x0000,0x0032,0xc824,0x0000,0x005a
0aa2 0243 0d5a  | C Z|		.DEBUG	0x0243,0x0d5a,0x0002,0x0000,0x0032,0xc824,0x0000,0x0063
0aaa 02b3 0d88  |    |		.DEBUG	0x02b3,0x0d88,0x0002,0x0000,0x0032,0xc824,0x0000,0x006c
0ab2 02e3 0da4  |    |		.DEBUG	0x02e3,0x0da4,0x0002,0x0000,0x0032,0xc824,0x0000,0x0075
0aba 02f3 0da8  |    |		.DEBUG	0x02f3,0x0da8,0x0002,0x0000,0x0032,0xc824,0x0000,0x007e
0ac2 030b 0db2  |    |		.DEBUG	0x030b,0x0db2,0x0005,0x0000,0x0032,0xc824,0x0000,0x00b5
0aca 0323 0db4  | #  |		.DEBUG	0x0323,0x0db4,0x0002,0x0000,0x0032,0xc824,0x0000,0x00c0
0ad2 034b 0dc8  | K  |		.DEBUG	0x034b,0x0dc8,0x0002,0x0000,0x0032,0xc824,0x0000,0x00c9
0ada 036b 0dd4  | k  |		.DEBUG	0x036b,0x0dd4,0x0002,0x0000,0x0032,0xc824,0x0000,0x00d4
0ae2 038b 0de0  |    |		.DEBUG	0x038b,0x0de0,0x0005,0x0000,0x0032,0xc824,0x0000,0x00e5
0aea 03a3 0de2  |    |		.DEBUG	0x03a3,0x0de2,0x0002,0x0000,0x0032,0xc824,0x0000,0x00ed
0af2 03bb 0dee  |    |		.DEBUG	0x03bb,0x0dee,0x0001,0x0000,0x0032,0xc824,0x0000,0x00fc
0afa 040b 0e0c  |    |		.DEBUG	0x040b,0x0e0c,0x0005,0x0000,0x0032,0xc824,0x0000,0x010f
0b02 0423 0e0e  | #  |		.DEBUG	0x0423,0x0e0e,0x0002,0x0000,0x0032,0xc824,0x0000,0x0118
0b0a 0463 0e22  | c "|		.DEBUG	0x0463,0x0e22,0x0002,0x0000,0x0032,0xc824,0x0000,0x0121
0b12 047b 0e2c  | { ,|		.DEBUG	0x047b,0x0e2c,0x0002,0x0000,0x0032,0xc824,0x0000,0x012a
0b1a 0493 0e36  |   6|		.DEBUG	0x0493,0x0e36,0x0002,0x0000,0x0032,0xc824,0x0000,0x0133
0b22 04ab 0e40  |   @|		.DEBUG	0x04ab,0x0e40,0x0002,0x0000,0x0032,0xc824,0x0000,0x013c
0b2a 04cb 0e4c  |   L|		.DEBUG	0x04cb,0x0e4c,0x0002,0x0000,0x0032,0xc824,0x0000,0x0145
0b32 04e3 0e54  |   T|		.DEBUG	0x04e3,0x0e54,0x0002,0x0000,0x0032,0xc824,0x0000,0x014e
0b3a 0503 0e60  |   `|		.DEBUG	0x0503,0x0e60,0x0002,0x0000,0x0032,0xc824,0x0000,0x0159
0b42 0523 0e6c  | # l|		.DEBUG	0x0523,0x0e6c,0x0002,0x0000,0x0032,0xc824,0x0000,0x0162
0b4a 054b 0e80  | K  |		.DEBUG	0x054b,0x0e80,0x0002,0x0000,0x0032,0xc824,0x0000,0x016b
0b52 056b 0e8c  | k  |		.DEBUG	0x056b,0x0e8c,0x0002,0x0000,0x0032,0xc824,0x0000,0x0174
0b5a 0593 0ea0  |    |		.DEBUG	0x0593,0x0ea0,0x0002,0x0000,0x0032,0xc824,0x0000,0x017d
0b62 05b3 0eac  |    |		.DEBUG	0x05b3,0x0eac,0x0002,0x0000,0x0032,0xc824,0x0000,0x0186
0b6a 05cb 0eb4  |    |		.DEBUG	0x05cb,0x0eb4,0x0002,0x0000,0x0032,0xc824,0x0000,0x018f
0b72 05eb 0ec0  |    |		.DEBUG	0x05eb,0x0ec0,0x0002,0x0000,0x0032,0xc824,0x0000,0x019a
0b7a 060b 0ecc  |    |		.DEBUG	0x060b,0x0ecc,0x0002,0x0000,0x0032,0xc824,0x0000,0x01a5
0b82 0623 0ed4  | #  |		.DEBUG	0x0623,0x0ed4,0x0002,0x0000,0x0032,0xc824,0x0000,0x01ba
0b8a 0643 0ede  | C  |		.DEBUG	0x0643,0x0ede,0x0002,0x0000,0x0032,0xc824,0x0000,0x01c3
0b92 0663 0eea  | c  |		.DEBUG	0x0663,0x0eea,0x0002,0x0000,0x0032,0xc824,0x0000,0x01ce
0b9a 067b 0ef2  | {  |		.DEBUG	0x067b,0x0ef2,0x0005,0x0000,0x0032,0xc824,0x0000,0x01d9
0ba2 0693 0ef4  |    |		.DEBUG	0x0693,0x0ef4,0x0002,0x0000,0x0032,0xc824,0x0000,0x01e1
0baa 06bb 0f06  |    |		.DEBUG	0x06bb,0x0f06,0x0002,0x0000,0x0032,0xc824,0x0000,0x01ea
0bb2 06d3 0f0e  |    |		.DEBUG	0x06d3,0x0f0e,0x0002,0x0000,0x0032,0xc824,0x0000,0x01f3
0bba 06eb 0f16  |    |		.DEBUG	0x06eb,0x0f16,0x0002,0x0000,0x0032,0xc824,0x0000,0x01fe
0bc2 0703 0f1e  |    |		.DEBUG	0x0703,0x0f1e,0x0002,0x0000,0x0032,0xc824,0x0000,0x0209
0bca 071b 0f26  |   &|		.DEBUG	0x071b,0x0f26,0x0002,0x0000,0x0032,0xc824,0x0000,0x0214
0bd2 0733 0f2e  | 3 .|		.DEBUG	0x0733,0x0f2e,0x0002,0x0000,0x0032,0xc824,0x0000,0x021d
0bda 074b 0f36  | K 6|		.DEBUG	0x074b,0x0f36,0x0002,0x0000,0x0032,0xc824,0x0000,0x0226
0be2 0763 0f3e  | c >|		.DEBUG	0x0763,0x0f3e,0x0001,0x0000,0x0033,0xd6f4,0x0000,0x005e
0bea 0783 0f46  |   F|		.DEBUG	0x0783,0x0f46,0x0001,0x0000,0x0033,0xd6f4,0x0000,0x009a
0bf2 ; --------------------------------------------------------------------------------------
0bf2 ; Debug3 Subtable 0x0
0bf2 ; --------------------------------------------------------------------------------------
0bf2 0047 0000  | G  |		.DBG3TAB	0x0047,0x0000
0bf4 000b ffff  |    |		.CONST	0x000b,0xffff
0bf6 000e fffe  |    |		.CONST	0x000e,0xfffe
0bf8 0011 fffd  |    |		.CONST	0x0011,0xfffd
0bfa 0014 fffc  |    |		.CONST	0x0014,0xfffc
0bfc 0017 fffb  |    |		.CONST	0x0017,0xfffb
0bfe 001a fffa  |    |		.CONST	0x001a,0xfffa
0c00 001d fff9  |    |		.CONST	0x001d,0xfff9
0c02 001f fff8  |    |		.CONST	0x001f,0xfff8
0c04 0024 fff7  | $  |		.CONST	0x0024,0xfff7
0c06 0026 fff6  | &  |		.CONST	0x0026,0xfff6
0c08 0028 fff5  | (  |		.CONST	0x0028,0xfff5
0c0a 002a fff4  | *  |		.CONST	0x002a,0xfff4
0c0c 002c fff3  | ,  |		.CONST	0x002c,0xfff3
0c0e 002e fff2  | .  |		.CONST	0x002e,0xfff2
0c10 0030 fff1  | 0  |		.CONST	0x0030,0xfff1
0c12 0032 fff0  | 2  |		.CONST	0x0032,0xfff0
0c14 0034 ffef  | 4  |		.CONST	0x0034,0xffef
0c16 0036 ffee  | 6  |		.CONST	0x0036,0xffee
0c18 0038 ffed  | 8  |		.CONST	0x0038,0xffed
0c1a 003a ffec  | :  |		.CONST	0x003a,0xffec
0c1c 003c ffeb  | <  |		.CONST	0x003c,0xffeb
0c1e 003e ffea  | >  |		.CONST	0x003e,0xffea
0c20 0040 ffe9  | @  |		.CONST	0x0040,0xffe9
0c22 0042 ffe8  | B  |		.CONST	0x0042,0xffe8
0c24 0044 ffe7  | D  |		.CONST	0x0044,0xffe7
0c26 0046 ffe6  | F  |		.CONST	0x0046,0xffe6
0c28 0048 ffe5  | H  |		.CONST	0x0048,0xffe5
0c2a 004b ffe4  | K  |		.CONST	0x004b,0xffe4
0c2c 0050 ffe3  | P  |		.CONST	0x0050,0xffe3
0c2e 0052 ffe2  | R  |		.CONST	0x0052,0xffe2
0c30 0054 ffe1  | T  |		.CONST	0x0054,0xffe1
0c32 0056 ffe0  | V  |		.CONST	0x0056,0xffe0
0c34 0059 ffdf  | Y  |		.CONST	0x0059,0xffdf
0c36 005e ffde  | ^  |		.CONST	0x005e,0xffde
0c38 0060 ffdd  | `  |		.CONST	0x0060,0xffdd
0c3a 0063 ffdc  | c  |		.CONST	0x0063,0xffdc
0c3c 0065 ffdb  | e  |		.CONST	0x0065,0xffdb
0c3e 0068 ffda  | h  |		.CONST	0x0068,0xffda
0c40 006d ffd9  | m  |		.CONST	0x006d,0xffd9
0c42 006f ffd8  | o  |		.CONST	0x006f,0xffd8
0c44 0071 ffd7  | q  |		.CONST	0x0071,0xffd7
0c46 0073 ffd6  | s  |		.CONST	0x0073,0xffd6
0c48 0075 ffd5  | u  |		.CONST	0x0075,0xffd5
0c4a 0077 ffd4  | w  |		.CONST	0x0077,0xffd4
0c4c 0079 ffd3  | y  |		.CONST	0x0079,0xffd3
0c4e 007b ffd2  | {  |		.CONST	0x007b,0xffd2
0c50 007d ffd1  | }  |		.CONST	0x007d,0xffd1
0c52 007f ffd0  |    |		.CONST	0x007f,0xffd0
0c54 0081 ffcf  |    |		.CONST	0x0081,0xffcf
0c56 0083 ffce  |    |		.CONST	0x0083,0xffce
0c58 0085 ffcd  |    |		.CONST	0x0085,0xffcd
0c5a 0087 ffcc  |    |		.CONST	0x0087,0xffcc
0c5c 0089 ffcb  |    |		.CONST	0x0089,0xffcb
0c5e 008b ffca  |    |		.CONST	0x008b,0xffca
0c60 008d ffc9  |    |		.CONST	0x008d,0xffc9
0c62 0090 ffc8  |    |		.CONST	0x0090,0xffc8
0c64 0093 ffc7  |    |		.CONST	0x0093,0xffc7
0c66 0095 ffc6  |    |		.CONST	0x0095,0xffc6
0c68 0097 ffc5  |    |		.CONST	0x0097,0xffc5
0c6a 0099 ffc4  |    |		.CONST	0x0099,0xffc4
0c6c 009e ffc3  |    |		.CONST	0x009e,0xffc3
0c6e 00a0 ffc2  |    |		.CONST	0x00a0,0xffc2
0c70 00a2 ffc1  |    |		.CONST	0x00a2,0xffc1
0c72 00a4 ffc0  |    |		.CONST	0x00a4,0xffc0
0c74 00a6 ffbf  |    |		.CONST	0x00a6,0xffbf
0c76 00a8 ffbe  |    |		.CONST	0x00a8,0xffbe
0c78 00aa ffbd  |    |		.CONST	0x00aa,0xffbd
0c7a 00ac ffbc  |    |		.CONST	0x00ac,0xffbc
0c7c 00ae ffbb  |    |		.CONST	0x00ae,0xffbb
0c7e 00af ffba  |    |		.CONST	0x00af,0xffba
0c80 00b0 ffb9  |    |		.CONST	0x00b0,0xffb9
0c82 ; --------------------------------------------------------------------------------------
0c82 ; Debug3 Subtable 0x1
0c82 ; --------------------------------------------------------------------------------------
0c82 0036 0000  | 6  |		.DBG3TAB	0x0036,0x0000
0c84 00b1 ffff  |    |		.CONST	0x00b1,0xffff
0c86 00b2 fffe  |    |		.CONST	0x00b2,0xfffe
0c88 00b3 fffd  |    |		.CONST	0x00b3,0xfffd
0c8a 00b4 fffc  |    |		.CONST	0x00b4,0xfffc
0c8c 00b8 fffb  |    |		.CONST	0x00b8,0xfffb
0c8e 00bc fffa  |    |		.CONST	0x00bc,0xfffa
0c90 00be fff9  |    |		.CONST	0x00be,0xfff9
0c92 00bf fff8  |    |		.CONST	0x00bf,0xfff8
0c94 00c1 fff7  |    |		.CONST	0x00c1,0xfff7
0c96 00c2 fff6  |    |		.CONST	0x00c2,0xfff6
0c98 00c4 fff5  |    |		.CONST	0x00c4,0xfff5
0c9a 00c6 fff4  |    |		.CONST	0x00c6,0xfff4
0c9c 00c8 fff3  |    |		.CONST	0x00c8,0xfff3
0c9e 00ca fff2  |    |		.CONST	0x00ca,0xfff2
0ca0 00cc fff1  |    |		.CONST	0x00cc,0xfff1
0ca2 00ce fff0  |    |		.CONST	0x00ce,0xfff0
0ca4 00d0 ffef  |    |		.CONST	0x00d0,0xffef
0ca6 00d2 ffee  |    |		.CONST	0x00d2,0xffee
0ca8 00d4 ffed  |    |		.CONST	0x00d4,0xffed
0caa 00d6 ffec  |    |		.CONST	0x00d6,0xffec
0cac 00d8 ffeb  |    |		.CONST	0x00d8,0xffeb
0cae 00da ffea  |    |		.CONST	0x00da,0xffea
0cb0 00dc ffe9  |    |		.CONST	0x00dc,0xffe9
0cb2 00dd ffe8  |    |		.CONST	0x00dd,0xffe8
0cb4 00df ffe7  |    |		.CONST	0x00df,0xffe7
0cb6 00e1 ffe6  |    |		.CONST	0x00e1,0xffe6
0cb8 00e3 ffe5  |    |		.CONST	0x00e3,0xffe5
0cba 00e5 ffe4  |    |		.CONST	0x00e5,0xffe4
0cbc 00e6 ffe3  |    |		.CONST	0x00e6,0xffe3
0cbe 00e8 ffe2  |    |		.CONST	0x00e8,0xffe2
0cc0 00ea ffe1  |    |		.CONST	0x00ea,0xffe1
0cc2 00ec ffe0  |    |		.CONST	0x00ec,0xffe0
0cc4 00ee ffdf  |    |		.CONST	0x00ee,0xffdf
0cc6 00f0 ffde  |    |		.CONST	0x00f0,0xffde
0cc8 00f2 ffdd  |    |		.CONST	0x00f2,0xffdd
0cca 00f4 ffdc  |    |		.CONST	0x00f4,0xffdc
0ccc 00f6 ffdb  |    |		.CONST	0x00f6,0xffdb
0cce 00f7 ffda  |    |		.CONST	0x00f7,0xffda
0cd0 00f9 ffd9  |    |		.CONST	0x00f9,0xffd9
0cd2 00fb ffd8  |    |		.CONST	0x00fb,0xffd8
0cd4 00fd ffd7  |    |		.CONST	0x00fd,0xffd7
0cd6 00ff ffd6  |    |		.CONST	0x00ff,0xffd6
0cd8 0100 ffd5  |    |		.CONST	0x0100,0xffd5
0cda 0102 ffd4  |    |		.CONST	0x0102,0xffd4
0cdc 0104 ffd3  |    |		.CONST	0x0104,0xffd3
0cde 0106 ffd2  |    |		.CONST	0x0106,0xffd2
0ce0 0108 ffd1  |    |		.CONST	0x0108,0xffd1
0ce2 010a ffd0  |    |		.CONST	0x010a,0xffd0
0ce4 010c ffcf  |    |		.CONST	0x010c,0xffcf
0ce6 010e ffce  |    |		.CONST	0x010e,0xffce
0ce8 0110 ffcd  |    |		.CONST	0x0110,0xffcd
0cea 0111 ffcc  |    |		.CONST	0x0111,0xffcc
0cec 0113 ffcb  |    |		.CONST	0x0113,0xffcb
0cee 0115 ffca  |    |		.CONST	0x0115,0xffca
0cf0 ; --------------------------------------------------------------------------------------
0cf0 ; Debug3 Subtable 0x2
0cf0 ; --------------------------------------------------------------------------------------
0cf0 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0cf2 ; --------------------------------------------------------------------------------------
0cf2 ; Debug3 Subtable 0x3
0cf2 ; --------------------------------------------------------------------------------------
0cf2 0001 000f  |    |		.DBG3TAB	0x0001,0x000f
0cf4 013b ffff  | ;  |		.CONST	0x013b,0xffff
0cf6 013c 0001  | <  |		.CONST	0x013c,0x0001
0cf8 013f 0002  | ?  |		.CONST	0x013f,0x0002
0cfa 0162 000f  | b  |		.CONST	0x0162,0x000f
0cfc 0164 0003  | d  |		.CONST	0x0164,0x0003
0cfe 0166 0004  | f  |		.CONST	0x0166,0x0004
0d00 0168 0005  | h  |		.CONST	0x0168,0x0005
0d02 016a 0006  | j  |		.CONST	0x016a,0x0006
0d04 016c 0007  | l  |		.CONST	0x016c,0x0007
0d06 016e 0008  | n  |		.CONST	0x016e,0x0008
0d08 0170 0009  | p  |		.CONST	0x0170,0x0009
0d0a 0172 000a  | r  |		.CONST	0x0172,0x000a
0d0c 0174 000b  | t  |		.CONST	0x0174,0x000b
0d0e 0176 000c  | v  |		.CONST	0x0176,0x000c
0d10 0178 000d  | x  |		.CONST	0x0178,0x000d
0d12 017a 000e  | z  |		.CONST	0x017a,0x000e
0d14 ; --------------------------------------------------------------------------------------
0d14 ; Debug3 Subtable 0x4
0d14 ; --------------------------------------------------------------------------------------
0d14 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0d16 0183 ffff  |    |		.CONST	0x0183,0xffff
0d18 0187 0001  |    |		.CONST	0x0187,0x0001
0d1a 018b 0002  |    |		.CONST	0x018b,0x0002
0d1c 0191 0003  |    |		.CONST	0x0191,0x0003
0d1e 0194 0004  |    |		.CONST	0x0194,0x0004
0d20 ; --------------------------------------------------------------------------------------
0d20 ; Debug3 Subtable 0x5
0d20 ; --------------------------------------------------------------------------------------
0d20 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
0d22 01a3 ffff  |    |		.CONST	0x01a3,0xffff
0d24 01a4 0001  |    |		.CONST	0x01a4,0x0001
0d26 01a7 0002  |    |		.CONST	0x01a7,0x0002
0d28 01c7 0006  |    |		.CONST	0x01c7,0x0006
0d2a 01cd 0007  |    |		.CONST	0x01cd,0x0007
0d2c 01d0 0003  |    |		.CONST	0x01d0,0x0003
0d2e 01d2 0004  |    |		.CONST	0x01d2,0x0004
0d30 01d9 0005  |    |		.CONST	0x01d9,0x0005
0d32 ; --------------------------------------------------------------------------------------
0d32 ; Debug3 Subtable 0x6
0d32 ; --------------------------------------------------------------------------------------
0d32 0002 0011  |    |		.DBG3TAB	0x0002,0x0011
0d34 01e3 ffff  |    |		.CONST	0x01e3,0xffff
0d36 01e4 fffe  |    |		.CONST	0x01e4,0xfffe
0d38 01e6 0001  |    |		.CONST	0x01e6,0x0001
0d3a 01ea 0002  |    |		.CONST	0x01ea,0x0002
0d3c 01eb 0003  |    |		.CONST	0x01eb,0x0003
0d3e 020b 000d  |    |		.CONST	0x020b,0x000d
0d40 0211 000e  |    |		.CONST	0x0211,0x000e
0d42 0214 0004  |    |		.CONST	0x0214,0x0004
0d44 0216 0005  |    |		.CONST	0x0216,0x0005
0d46 021b 0006  |    |		.CONST	0x021b,0x0006
0d48 0220 0007  |    |		.CONST	0x0220,0x0007
0d4a 0222 0008  | "  |		.CONST	0x0222,0x0008
0d4c 0224 0009  | $  |		.CONST	0x0224,0x0009
0d4e 0229 000a  | )  |		.CONST	0x0229,0x000a
0d50 022b 000b  | +  |		.CONST	0x022b,0x000b
0d52 022d 000c  | -  |		.CONST	0x022d,0x000c
0d54 0233 000f  | 3  |		.CONST	0x0233,0x000f
0d56 0235 0010  | 5  |		.CONST	0x0235,0x0010
0d58 0239 0011  | 9  |		.CONST	0x0239,0x0011
0d5a ; --------------------------------------------------------------------------------------
0d5a ; Debug3 Subtable 0x7
0d5a ; --------------------------------------------------------------------------------------
0d5a 0002 0014  |    |		.DBG3TAB	0x0002,0x0014
0d5c 0243 ffff  | C  |		.CONST	0x0243,0xffff
0d5e 0244 fffe  | D  |		.CONST	0x0244,0xfffe
0d60 0246 0001  | F  |		.CONST	0x0246,0x0001
0d62 024a 0002  | J  |		.CONST	0x024a,0x0002
0d64 024b 0003  | K  |		.CONST	0x024b,0x0003
0d66 026b 0010  | k  |		.CONST	0x026b,0x0010
0d68 0271 0011  | q  |		.CONST	0x0271,0x0011
0d6a 0274 0004  | t  |		.CONST	0x0274,0x0004
0d6c 0276 0005  | v  |		.CONST	0x0276,0x0005
0d6e 027b 0006  | {  |		.CONST	0x027b,0x0006
0d70 0285 0009  |    |		.CONST	0x0285,0x0009
0d72 028a 000a  |    |		.CONST	0x028a,0x000a
0d74 028c 000b  |    |		.CONST	0x028c,0x000b
0d76 028e 0007  |    |		.CONST	0x028e,0x0007
0d78 0292 0008  |    |		.CONST	0x0292,0x0008
0d7a 0296 000c  |    |		.CONST	0x0296,0x000c
0d7c 029b 000d  |    |		.CONST	0x029b,0x000d
0d7e 029d 000e  |    |		.CONST	0x029d,0x000e
0d80 029f 000f  |    |		.CONST	0x029f,0x000f
0d82 02a5 0012  |    |		.CONST	0x02a5,0x0012
0d84 02a7 0013  |    |		.CONST	0x02a7,0x0013
0d86 02ab 0014  |    |		.CONST	0x02ab,0x0014
0d88 ; --------------------------------------------------------------------------------------
0d88 ; Debug3 Subtable 0x8
0d88 ; --------------------------------------------------------------------------------------
0d88 0003 000a  |    |		.DBG3TAB	0x0003,0x000a
0d8a 02b3 ffff  |    |		.CONST	0x02b3,0xffff
0d8c 02b4 fffe  |    |		.CONST	0x02b4,0xfffe
0d8e 02b5 fffd  |    |		.CONST	0x02b5,0xfffd
0d90 02b7 0001  |    |		.CONST	0x02b7,0x0001
0d92 02ba 0002  |    |		.CONST	0x02ba,0x0002
0d94 02bf 0003  |    |		.CONST	0x02bf,0x0003
0d96 02c5 0004  |    |		.CONST	0x02c5,0x0004
0d98 02c9 0005  |    |		.CONST	0x02c9,0x0005
0d9a 02cc 0006  |    |		.CONST	0x02cc,0x0006
0d9c 02cf 0007  |    |		.CONST	0x02cf,0x0007
0d9e 02d3 0008  |    |		.CONST	0x02d3,0x0008
0da0 02d5 0009  |    |		.CONST	0x02d5,0x0009
0da2 02da 000a  |    |		.CONST	0x02da,0x000a
0da4 ; --------------------------------------------------------------------------------------
0da4 ; Debug3 Subtable 0x9
0da4 ; --------------------------------------------------------------------------------------
0da4 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0da6 02e3 0001  |    |		.CONST	0x02e3,0x0001
0da8 ; --------------------------------------------------------------------------------------
0da8 ; Debug3 Subtable 0xa
0da8 ; --------------------------------------------------------------------------------------
0da8 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0daa 02f3 ffff  |    |		.CONST	0x02f3,0xffff
0dac 02f7 0001  |    |		.CONST	0x02f7,0x0001
0dae 0300 0003  |    |		.CONST	0x0300,0x0003
0db0 0302 0002  |    |		.CONST	0x0302,0x0002
0db2 ; --------------------------------------------------------------------------------------
0db2 ; Debug3 Subtable 0xb
0db2 ; --------------------------------------------------------------------------------------
0db2 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0db4 ; --------------------------------------------------------------------------------------
0db4 ; Debug3 Subtable 0xc
0db4 ; --------------------------------------------------------------------------------------
0db4 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
0db6 0323 ffff  | #  |		.CONST	0x0323,0xffff
0db8 0327 0001  | '  |		.CONST	0x0327,0x0001
0dba 0338 0008  | 8  |		.CONST	0x0338,0x0008
0dbc 033a 0002  | :  |		.CONST	0x033a,0x0002
0dbe 033c 0003  | <  |		.CONST	0x033c,0x0003
0dc0 033e 0004  | >  |		.CONST	0x033e,0x0004
0dc2 0340 0005  | @  |		.CONST	0x0340,0x0005
0dc4 0342 0006  | B  |		.CONST	0x0342,0x0006
0dc6 0344 0007  | D  |		.CONST	0x0344,0x0007
0dc8 ; --------------------------------------------------------------------------------------
0dc8 ; Debug3 Subtable 0xd
0dc8 ; --------------------------------------------------------------------------------------
0dc8 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0dca 034b ffff  | K  |		.CONST	0x034b,0xffff
0dcc 034f 0001  | O  |		.CONST	0x034f,0x0001
0dce 0353 0002  | S  |		.CONST	0x0353,0x0002
0dd0 0359 0003  | Y  |		.CONST	0x0359,0x0003
0dd2 035c 0004  | \  |		.CONST	0x035c,0x0004
0dd4 ; --------------------------------------------------------------------------------------
0dd4 ; Debug3 Subtable 0xe
0dd4 ; --------------------------------------------------------------------------------------
0dd4 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0dd6 036b ffff  | k  |		.CONST	0x036b,0xffff
0dd8 036f 0001  | o  |		.CONST	0x036f,0x0001
0dda 0373 0002  | s  |		.CONST	0x0373,0x0002
0ddc 0379 0003  | y  |		.CONST	0x0379,0x0003
0dde 037c 0004  | |  |		.CONST	0x037c,0x0004
0de0 ; --------------------------------------------------------------------------------------
0de0 ; Debug3 Subtable 0xf
0de0 ; --------------------------------------------------------------------------------------
0de0 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0de2 ; --------------------------------------------------------------------------------------
0de2 ; Debug3 Subtable 0x10
0de2 ; --------------------------------------------------------------------------------------
0de2 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
0de4 03a3 0001  |    |		.CONST	0x03a3,0x0001
0de6 03af 0005  |    |		.CONST	0x03af,0x0005
0de8 03b1 0002  |    |		.CONST	0x03b1,0x0002
0dea 03b3 0003  |    |		.CONST	0x03b3,0x0003
0dec 03b5 0004  |    |		.CONST	0x03b5,0x0004
0dee ; --------------------------------------------------------------------------------------
0dee ; Debug3 Subtable 0x11
0dee ; --------------------------------------------------------------------------------------
0dee 0002 000c  |    |		.DBG3TAB	0x0002,0x000c
0df0 03bb ffff  |    |		.CONST	0x03bb,0xffff
0df2 03bf fffe  |    |		.CONST	0x03bf,0xfffe
0df4 03c1 0001  |    |		.CONST	0x03c1,0x0001
0df6 03cc 0009  |    |		.CONST	0x03cc,0x0009
0df8 03d2 000a  |    |		.CONST	0x03d2,0x000a
0dfa 03d5 0002  |    |		.CONST	0x03d5,0x0002
0dfc 03dd 0003  |    |		.CONST	0x03dd,0x0003
0dfe 03e1 0004  |    |		.CONST	0x03e1,0x0004
0e00 03e6 0005  |    |		.CONST	0x03e6,0x0005
0e02 03ea 0006  |    |		.CONST	0x03ea,0x0006
0e04 03f4 0007  |    |		.CONST	0x03f4,0x0007
0e06 03fa 0008  |    |		.CONST	0x03fa,0x0008
0e08 03fe 000b  |    |		.CONST	0x03fe,0x000b
0e0a 0401 000c  |    |		.CONST	0x0401,0x000c
0e0c ; --------------------------------------------------------------------------------------
0e0c ; Debug3 Subtable 0x12
0e0c ; --------------------------------------------------------------------------------------
0e0c 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0e0e ; --------------------------------------------------------------------------------------
0e0e ; Debug3 Subtable 0x13
0e0e ; --------------------------------------------------------------------------------------
0e0e 0000 0009  |    |		.DBG3TAB	0x0000,0x0009
0e10 0423 0001  | #  |		.CONST	0x0423,0x0001
0e12 044b 0009  | K  |		.CONST	0x044b,0x0009
0e14 044d 0002  | M  |		.CONST	0x044d,0x0002
0e16 044f 0003  | O  |		.CONST	0x044f,0x0003
0e18 0451 0004  | Q  |		.CONST	0x0451,0x0004
0e1a 0453 0005  | S  |		.CONST	0x0453,0x0005
0e1c 0455 0006  | U  |		.CONST	0x0455,0x0006
0e1e 045a 0007  | Z  |		.CONST	0x045a,0x0007
0e20 045c 0008  | \  |		.CONST	0x045c,0x0008
0e22 ; --------------------------------------------------------------------------------------
0e22 ; Debug3 Subtable 0x14
0e22 ; --------------------------------------------------------------------------------------
0e22 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0e24 0463 0001  | c  |		.CONST	0x0463,0x0001
0e26 0466 0002  | f  |		.CONST	0x0466,0x0002
0e28 0468 0003  | h  |		.CONST	0x0468,0x0003
0e2a 046e 0004  | n  |		.CONST	0x046e,0x0004
0e2c ; --------------------------------------------------------------------------------------
0e2c ; Debug3 Subtable 0x15
0e2c ; --------------------------------------------------------------------------------------
0e2c 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0e2e 047b 0001  | {  |		.CONST	0x047b,0x0001
0e30 047f 0002  |    |		.CONST	0x047f,0x0002
0e32 0481 0003  |    |		.CONST	0x0481,0x0003
0e34 0487 0004  |    |		.CONST	0x0487,0x0004
0e36 ; --------------------------------------------------------------------------------------
0e36 ; Debug3 Subtable 0x16
0e36 ; --------------------------------------------------------------------------------------
0e36 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0e38 0493 0001  |    |		.CONST	0x0493,0x0001
0e3a 0497 0002  |    |		.CONST	0x0497,0x0002
0e3c 0499 0003  |    |		.CONST	0x0499,0x0003
0e3e 049f 0004  |    |		.CONST	0x049f,0x0004
0e40 ; --------------------------------------------------------------------------------------
0e40 ; Debug3 Subtable 0x17
0e40 ; --------------------------------------------------------------------------------------
0e40 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0e42 04ab ffff  |    |		.CONST	0x04ab,0xffff
0e44 04af 0001  |    |		.CONST	0x04af,0x0001
0e46 04b6 0003  |    |		.CONST	0x04b6,0x0003
0e48 04bc 0004  |    |		.CONST	0x04bc,0x0004
0e4a 04bf 0002  |    |		.CONST	0x04bf,0x0002
0e4c ; --------------------------------------------------------------------------------------
0e4c ; Debug3 Subtable 0x18
0e4c ; --------------------------------------------------------------------------------------
0e4c 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0e4e 04cb ffff  |    |		.CONST	0x04cb,0xffff
0e50 04cf 0001  |    |		.CONST	0x04cf,0x0001
0e52 04d4 0002  |    |		.CONST	0x04d4,0x0002
0e54 ; --------------------------------------------------------------------------------------
0e54 ; Debug3 Subtable 0x19
0e54 ; --------------------------------------------------------------------------------------
0e54 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0e56 04e3 ffff  |    |		.CONST	0x04e3,0xffff
0e58 04e7 0001  |    |		.CONST	0x04e7,0x0001
0e5a 04ec 0002  |    |		.CONST	0x04ec,0x0002
0e5c 04ef 0003  |    |		.CONST	0x04ef,0x0003
0e5e 04f4 0004  |    |		.CONST	0x04f4,0x0004
0e60 ; --------------------------------------------------------------------------------------
0e60 ; Debug3 Subtable 0x1a
0e60 ; --------------------------------------------------------------------------------------
0e60 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0e62 0503 ffff  |    |		.CONST	0x0503,0xffff
0e64 0507 0001  |    |		.CONST	0x0507,0x0001
0e66 050c 0002  |    |		.CONST	0x050c,0x0002
0e68 050f 0003  |    |		.CONST	0x050f,0x0003
0e6a 0514 0004  |    |		.CONST	0x0514,0x0004
0e6c ; --------------------------------------------------------------------------------------
0e6c ; Debug3 Subtable 0x1b
0e6c ; --------------------------------------------------------------------------------------
0e6c 0002 0007  |    |		.DBG3TAB	0x0002,0x0007
0e6e 0523 ffff  | #  |		.CONST	0x0523,0xffff
0e70 0527 fffe  | '  |		.CONST	0x0527,0xfffe
0e72 0528 0001  | (  |		.CONST	0x0528,0x0001
0e74 052d 0002  | -  |		.CONST	0x052d,0x0002
0e76 0532 0003  | 2  |		.CONST	0x0532,0x0003
0e78 0534 0004  | 4  |		.CONST	0x0534,0x0004
0e7a 0539 0005  | 9  |		.CONST	0x0539,0x0005
0e7c 053c 0006  | <  |		.CONST	0x053c,0x0006
0e7e 0541 0007  | A  |		.CONST	0x0541,0x0007
0e80 ; --------------------------------------------------------------------------------------
0e80 ; Debug3 Subtable 0x1c
0e80 ; --------------------------------------------------------------------------------------
0e80 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0e82 054b ffff  | K  |		.CONST	0x054b,0xffff
0e84 054f 0001  | O  |		.CONST	0x054f,0x0001
0e86 0554 0002  | T  |		.CONST	0x0554,0x0002
0e88 0557 0003  | W  |		.CONST	0x0557,0x0003
0e8a 055c 0004  | \  |		.CONST	0x055c,0x0004
0e8c ; --------------------------------------------------------------------------------------
0e8c ; Debug3 Subtable 0x1d
0e8c ; --------------------------------------------------------------------------------------
0e8c 0002 0007  |    |		.DBG3TAB	0x0002,0x0007
0e8e 056b ffff  | k  |		.CONST	0x056b,0xffff
0e90 056f fffe  | o  |		.CONST	0x056f,0xfffe
0e92 0570 0001  | p  |		.CONST	0x0570,0x0001
0e94 0575 0002  | u  |		.CONST	0x0575,0x0002
0e96 057a 0003  | z  |		.CONST	0x057a,0x0003
0e98 057c 0004  | |  |		.CONST	0x057c,0x0004
0e9a 0581 0005  |    |		.CONST	0x0581,0x0005
0e9c 0584 0006  |    |		.CONST	0x0584,0x0006
0e9e 0589 0007  |    |		.CONST	0x0589,0x0007
0ea0 ; --------------------------------------------------------------------------------------
0ea0 ; Debug3 Subtable 0x1e
0ea0 ; --------------------------------------------------------------------------------------
0ea0 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0ea2 0593 ffff  |    |		.CONST	0x0593,0xffff
0ea4 0597 0001  |    |		.CONST	0x0597,0x0001
0ea6 059c 0002  |    |		.CONST	0x059c,0x0002
0ea8 059f 0003  |    |		.CONST	0x059f,0x0003
0eaa 05a4 0004  |    |		.CONST	0x05a4,0x0004
0eac ; --------------------------------------------------------------------------------------
0eac ; Debug3 Subtable 0x1f
0eac ; --------------------------------------------------------------------------------------
0eac 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0eae 05b3 ffff  |    |		.CONST	0x05b3,0xffff
0eb0 05b7 0001  |    |		.CONST	0x05b7,0x0001
0eb2 05bc 0002  |    |		.CONST	0x05bc,0x0002
0eb4 ; --------------------------------------------------------------------------------------
0eb4 ; Debug3 Subtable 0x20
0eb4 ; --------------------------------------------------------------------------------------
0eb4 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0eb6 05cb ffff  |    |		.CONST	0x05cb,0xffff
0eb8 05cf 0001  |    |		.CONST	0x05cf,0x0001
0eba 05d2 0002  |    |		.CONST	0x05d2,0x0002
0ebc 05d8 0003  |    |		.CONST	0x05d8,0x0003
0ebe 05db 0004  |    |		.CONST	0x05db,0x0004
0ec0 ; --------------------------------------------------------------------------------------
0ec0 ; Debug3 Subtable 0x21
0ec0 ; --------------------------------------------------------------------------------------
0ec0 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0ec2 05eb ffff  |    |		.CONST	0x05eb,0xffff
0ec4 05ef 0001  |    |		.CONST	0x05ef,0x0001
0ec6 05f2 0002  |    |		.CONST	0x05f2,0x0002
0ec8 05f8 0003  |    |		.CONST	0x05f8,0x0003
0eca 05fb 0004  |    |		.CONST	0x05fb,0x0004
0ecc ; --------------------------------------------------------------------------------------
0ecc ; Debug3 Subtable 0x22
0ecc ; --------------------------------------------------------------------------------------
0ecc 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0ece 060b ffff  |    |		.CONST	0x060b,0xffff
0ed0 060f 0001  |    |		.CONST	0x060f,0x0001
0ed2 0614 0002  |    |		.CONST	0x0614,0x0002
0ed4 ; --------------------------------------------------------------------------------------
0ed4 ; Debug3 Subtable 0x23
0ed4 ; --------------------------------------------------------------------------------------
0ed4 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0ed6 0623 ffff  | #  |		.CONST	0x0623,0xffff
0ed8 0627 0001  | '  |		.CONST	0x0627,0x0001
0eda 062c 0002  | ,  |		.CONST	0x062c,0x0002
0edc 0630 0003  | 0  |		.CONST	0x0630,0x0003
0ede ; --------------------------------------------------------------------------------------
0ede ; Debug3 Subtable 0x24
0ede ; --------------------------------------------------------------------------------------
0ede 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0ee0 0643 ffff  | C  |		.CONST	0x0643,0xffff
0ee2 0647 0001  | G  |		.CONST	0x0647,0x0001
0ee4 064c 0002  | L  |		.CONST	0x064c,0x0002
0ee6 0652 0003  | R  |		.CONST	0x0652,0x0003
0ee8 065d 0004  | ]  |		.CONST	0x065d,0x0004
0eea ; --------------------------------------------------------------------------------------
0eea ; Debug3 Subtable 0x25
0eea ; --------------------------------------------------------------------------------------
0eea 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0eec 0663 ffff  | c  |		.CONST	0x0663,0xffff
0eee 0667 0001  | g  |		.CONST	0x0667,0x0001
0ef0 066c 0002  | l  |		.CONST	0x066c,0x0002
0ef2 ; --------------------------------------------------------------------------------------
0ef2 ; Debug3 Subtable 0x26
0ef2 ; --------------------------------------------------------------------------------------
0ef2 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0ef4 ; --------------------------------------------------------------------------------------
0ef4 ; Debug3 Subtable 0x27
0ef4 ; --------------------------------------------------------------------------------------
0ef4 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
0ef6 0693 ffff  |    |		.CONST	0x0693,0xffff
0ef8 0697 0001  |    |		.CONST	0x0697,0x0001
0efa 06a0 0007  |    |		.CONST	0x06a0,0x0007
0efc 06a2 0002  |    |		.CONST	0x06a2,0x0002
0efe 06ad 0003  |    |		.CONST	0x06ad,0x0003
0f00 06af 0004  |    |		.CONST	0x06af,0x0004
0f02 06b1 0005  |    |		.CONST	0x06b1,0x0005
0f04 06b3 0006  |    |		.CONST	0x06b3,0x0006
0f06 ; --------------------------------------------------------------------------------------
0f06 ; Debug3 Subtable 0x28
0f06 ; --------------------------------------------------------------------------------------
0f06 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0f08 06bb ffff  |    |		.CONST	0x06bb,0xffff
0f0a 06bf 0001  |    |		.CONST	0x06bf,0x0001
0f0c 06c4 0002  |    |		.CONST	0x06c4,0x0002
0f0e ; --------------------------------------------------------------------------------------
0f0e ; Debug3 Subtable 0x29
0f0e ; --------------------------------------------------------------------------------------
0f0e 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0f10 06d3 ffff  |    |		.CONST	0x06d3,0xffff
0f12 06d7 0001  |    |		.CONST	0x06d7,0x0001
0f14 06dc 0002  |    |		.CONST	0x06dc,0x0002
0f16 ; --------------------------------------------------------------------------------------
0f16 ; Debug3 Subtable 0x2a
0f16 ; --------------------------------------------------------------------------------------
0f16 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0f18 06eb ffff  |    |		.CONST	0x06eb,0xffff
0f1a 06ef 0001  |    |		.CONST	0x06ef,0x0001
0f1c 06f4 0002  |    |		.CONST	0x06f4,0x0002
0f1e ; --------------------------------------------------------------------------------------
0f1e ; Debug3 Subtable 0x2b
0f1e ; --------------------------------------------------------------------------------------
0f1e 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0f20 0703 ffff  |    |		.CONST	0x0703,0xffff
0f22 0707 0001  |    |		.CONST	0x0707,0x0001
0f24 070c 0002  |    |		.CONST	0x070c,0x0002
0f26 ; --------------------------------------------------------------------------------------
0f26 ; Debug3 Subtable 0x2c
0f26 ; --------------------------------------------------------------------------------------
0f26 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0f28 071b ffff  |    |		.CONST	0x071b,0xffff
0f2a 071f 0001  |    |		.CONST	0x071f,0x0001
0f2c 0724 0002  | $  |		.CONST	0x0724,0x0002
0f2e ; --------------------------------------------------------------------------------------
0f2e ; Debug3 Subtable 0x2d
0f2e ; --------------------------------------------------------------------------------------
0f2e 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0f30 0733 ffff  | 3  |		.CONST	0x0733,0xffff
0f32 0737 0001  | 7  |		.CONST	0x0737,0x0001
0f34 073c 0002  | <  |		.CONST	0x073c,0x0002
0f36 ; --------------------------------------------------------------------------------------
0f36 ; Debug3 Subtable 0x2e
0f36 ; --------------------------------------------------------------------------------------
0f36 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0f38 074b ffff  | K  |		.CONST	0x074b,0xffff
0f3a 074f 0001  | O  |		.CONST	0x074f,0x0001
0f3c 0754 0002  | T  |		.CONST	0x0754,0x0002
0f3e ; --------------------------------------------------------------------------------------
0f3e ; Debug3 Subtable 0x2f
0f3e ; --------------------------------------------------------------------------------------
0f3e 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0f40 0763 0001  | c  |		.CONST	0x0763,0x0001
0f42 0769 0002  | i  |		.CONST	0x0769,0x0002
0f44 0775 0003  | u  |		.CONST	0x0775,0x0003
0f46 ; --------------------------------------------------------------------------------------
0f46 ; Debug3 Subtable 0x30
0f46 ; --------------------------------------------------------------------------------------
0f46 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0f48 0783 0001  |    |		.CONST	0x0783,0x0001
0f4a 0789 0002  |    |		.CONST	0x0789,0x0002
0f4c 0791 0003  |    |		.CONST	0x0791,0x0003
0f4e 0000 0000  |    |		.BLANK	0000[0xb2]