DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 DFS Tapes

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 DFS Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦eb83c3106⟧ SEG

    Length: 5120 (0x1400)
    Types: SEG
    Notes: 5811_R1K_CODE
    Names: »469011.SEG«

Derivation

└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
    └─ ⟦this⟧ »469011.SEG« 
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
    └─ ⟦this⟧ »469011.SEG« 
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
    └─ ⟦this⟧ »469011.SEG« 
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
    └─ ⟦this⟧ »469011.SEG« 
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
    └─ ⟦this⟧ »469011.SEG« 

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 04e8       |    |		.CONST	0x04e8								; 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 0004       |    |		.CONST	0x0004								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0090       |    |		.CONST	0x0090								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0029       | )  |		.CONST	0x0029								; Number of locals
000b			INIT_0008:
000b 03a9       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible			; Debug Table 0x0 = .DEBUG	0x000b,0x05fa,0x8000,0x0000,0x0036,0x57f4,0x0000,0x0007
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
													; Debug Table 0x0.0x2 = 0xb,0xfffd
000c 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0xc,0xfffc
000e 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0xe,0xfffb
0010 029a 00d3  |    |		Declare_Subprogram	INIT_00d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x10,0xfffa
0012 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x12,0xfff9
0014 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x14,0xfff8
0016 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x16,0xfff7
0018 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x18,0xfff6
001a 029a 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1a,0xfff5
001c 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x1c,0xfff4
001e 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x1e,0xfff3
0020 00c4       |    |		Action	Make_Default							; Debug Table 0x0.0xd = 0x20,0xfff2
0021 029a 017b  |   {|		Declare_Subprogram	INIT_0178,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x21,0xfff1
0023 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x23,0xfff0
0025 029a 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x25,0xffef
0027 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x11 = 0x27,0xffee
0028 626b       |bk  |		Indirect_Literal	Discrete,0x294,{0x00072413, 0x000000b0}		; 0x72413 = IO
0029 02a0       |    |		Declare_Subprogram	Null_Subprogram
002a 038f       |    |		Declare_Type	Package,Defined,Visible
002b 0386       |    |		Declare_Variable	Package,Visible
002c 4805       |H   |		Short_Literal	0x5							; Debug Table 0x0.0x12 = 0x2c,0xffed
002d 032b       | +  |		Declare_Type	Record,Incomplete,Visible
002e e21d       |    |		Load	0x1,0x1d							; Debug Table 0x0.0x13 = 0x2e,0xffec
002f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0030 e20d       |    |		Load	0x1,0xd
0031 03a3       |    |		Complete_Type	Heap_Access,By_Defining
0032 e20d       |    |		Load	0x1,0xd								; Debug Table 0x0.0x14 = 0x32,0xffeb
													; Debug Table 0x0.0x15 = 0x32,0xffea
0033 0129       | )  |		Execute	Any,Make_Visible
0034 c218       |    |		Store	0x1,0x18
0035 00bf       |    |		Action	Accept_Activation
0036 03a6       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible,Values_Relative	; Debug Table 0x1 = .DEBUG	0x0036,0x0628,0x8000,0x0000,0x0036,0x58a4,0x0000,0x0006
													; Debug Table 0x1.0x0 = 0x36,0xffff
													; Debug Table 0x1.0x1 = 0x36,0xfffe
													; Debug Table 0x1.0x2 = 0x36,0xfffd
													; Debug Table 0x1.0x3 = 0x36,0xfffc
0037 e20d       |    |		Load	0x1,0xd
0038 00d9       |    |		Load_Top	At_Offset_1
0039 03a2       |    |		Complete_Type	Heap_Access,By_Renaming
003a e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x4 = 0x3a,0xfffb
													; Debug Table 0x1.0x5 = 0x3a,0xfffa
003b 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
003c e21e       |    |		Load	0x1,0x1e
003d e21e       |    |		Load	0x1,0x1e
003e e21e       |    |		Load	0x1,0x1e
003f e21e       |    |		Load	0x1,0x1e
0040 029f 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Call
0042 e21d       |    |		Load	0x1,0x1d
0043 0326       | &  |		Complete_Type	Record,By_Defining
0044 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x6 = 0x44,0xfff9
0045 00c7       |    |		Action	Elaborate_Subprogram
0046 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x7 = 0x46,0xfff8
0047 00c7       |    |		Action	Elaborate_Subprogram
0048 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x8 = 0x48,0xfff7
0049 00c7       |    |		Action	Elaborate_Subprogram
004a 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x9 = 0x4a,0xfff6
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0xa = 0x4c,0xfff5
004d 00c7       |    |		Action	Elaborate_Subprogram
004e 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0xb = 0x4e,0xfff4
004f 00c7       |    |		Action	Elaborate_Subprogram
0050 029c 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call,Visible		; Debug Table 0x1.0xc = 0x50,0xfff3
0052 029c 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Outer_Call,Visible		; Debug Table 0x1.0xd = 0x52,0xfff2
0054 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0xe = 0x54,0xfff1
0055 00c7       |    |		Action	Elaborate_Subprogram
0056 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0xf = 0x56,0xfff0
0057 00c7       |    |		Action	Elaborate_Subprogram
0058 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x10 = 0x58,0xffef
0059 00c7       |    |		Action	Elaborate_Subprogram
005a 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x11 = 0x5a,0xffee
005b 00c7       |    |		Action	Elaborate_Subprogram
005c 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x12 = 0x5c,0xffed
005d 00c7       |    |		Action	Elaborate_Subprogram
005e 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x13 = 0x5e,0xffec
005f 00c7       |    |		Action	Elaborate_Subprogram
0060 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x1.0x14 = 0x60,0xffff
0062 029a 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x1.0x15 = 0x62,0xfffe
0064 029a 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x1.0x16 = 0x64,0xfffd
0066 029a 021b  |    |		Declare_Subprogram	INIT_0218,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x1.0x17 = 0x66,0xfffc
0068 029a 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x1.0x18 = 0x68,0xfffb
006a 029a 022b  |   +|		Declare_Subprogram	INIT_0228,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x1.0x19 = 0x6a,0xfffa
006c 029a 0233  |   3|		Declare_Subprogram	INIT_0230,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x1.0x1a = 0x6c,0xfff9
006e 029a 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x1.0x1b = 0x6e,0xfff8
0070 029c 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call,Visible		; Debug Table 0x1.0x1c = 0x70,0xfff7
													; Debug Table 0x1.0x1d = 0x70,0xffea
0072 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x1e = 0x72,0xffe9
0073 00c7       |    |		Action	Elaborate_Subprogram
0074 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21				; Debug Table 0x1.0x1f = 0x74,0xffff
													; Debug Table 0x1.0x20 = 0x74,0xfffe
0075 00c7       |    |		Action	Elaborate_Subprogram
0076 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22				; Debug Table 0x1.0x21 = 0x76,0xfffd
0077 00c7       |    |		Action	Elaborate_Subprogram
0078 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23				; Debug Table 0x1.0x22 = 0x78,0xfffc
0079 00c7       |    |		Action	Elaborate_Subprogram
007a 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24				; Debug Table 0x1.0x23 = 0x7a,0xfffb
007b 00c7       |    |		Action	Elaborate_Subprogram
007c 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25				; Debug Table 0x1.0x24 = 0x7c,0xfffa
007d 00c7       |    |		Action	Elaborate_Subprogram
007e 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26				; Debug Table 0x1.0x25 = 0x7e,0xfff9
007f 00c7       |    |		Action	Elaborate_Subprogram
0080 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27				; Debug Table 0x1.0x26 = 0x80,0xfff8
0081 00c7       |    |		Action	Elaborate_Subprogram
0082 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28				; Debug Table 0x1.0x27 = 0x82,0xfff7
0083 00c7       |    |		Action	Elaborate_Subprogram
0084 00b6       |    |		Action	Make_Scope							; Debug Table 0x1.0x28 = 0x84,0xffe7
0085 e002       |    |		Load	0x0,0x2
0086 e003       |    |		Load	0x0,0x3
0087 e004       |    |		Load	0x0,0x4
0088 e005       |    |		Load	0x0,0x5
0089 e006       |    |		Load	0x0,0x6
008a e001       |    |		Load	0x0,0x1
008b 4807       |H   |		Short_Literal	0x7
008c e21c       |    |		Load	0x1,0x1c
008d 020e       |    |		Execute	Module,Augment_Imports
008e e21c       |    |		Load	0x1,0x1c
008f 020f       |    |		Execute	Module,Activate
0090			BODY_0008:
0090 00bc       |    |		Action	Signal_Activated
0091 00bb       |    |		Action	Signal_Completion
0092 0000 0000  |    |		.BLANK	0000[0x6]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00bb       |    |		.CONST	0x00bb								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0009       |    |		.CONST	0x0009								; Number of locals
009b			INIT_0098:
009b 61f4       |a   |		Indirect_Literal	Discrete,0x290,{0x00000000, 0x003658a4}		; Debug Table 0x2 = .DEBUG	0x009b,0x067c,0x2802,0x0002,0x0036,0x57f4,0x0000,0x0019
													; Debug Table 0x2.0x0 = 0x9b,0xffff
009c 61ef       |a   |		Indirect_Literal	Discrete,0x28c,{0x00000000, 0x000004cc}
009d 486d       |Hm  |		Short_Literal	0x6d
009e 00e5       |    |		Load_Encached	Long_Integer_Cache
009f e20d       |    |		Load	0x1,0xd
00a0 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
00a1 e002       |    |		Load	0x0,0x2
00a2 0387       |    |		Declare_Variable	Package
00a3 00d8       |    |		Load_Top	At_Offset_0
00a4 020f       |    |		Execute	Module,Activate
00a5 e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x1 = 0xa5,0xfffe
00a6 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00a7 029e 029b  |    |		Declare_Subprogram	INIT_0298,For_Call,Unelaborated			; Debug Table 0x2.0x2 = 0xa7,0xfffd
00a9 029e 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Call,Unelaborated			; Debug Table 0x2.0x3 = 0xa9,0xfffc
00ab 4804       |H   |		Short_Literal	0x4							; Debug Table 0x2.0x4 = 0xab,0xfffb
00ac 4802       |H   |		Short_Literal	0x2
00ad 0099       |    |		Action	Reference_Dynamic
00ae 00c7       |    |		Action	Elaborate_Subprogram
00af 4805       |H   |		Short_Literal	0x5							; Debug Table 0x2.0x5 = 0xaf,0xfffa
00b0 4802       |H   |		Short_Literal	0x2
00b1 0099       |    |		Action	Reference_Dynamic
00b2 00c7       |    |		Action	Elaborate_Subprogram
00b3 4804       |H   |		Short_Literal	0x4							; Debug Table 0x2.0x6 = 0xb3,0xfff9
00b4 4802       |H   |		Short_Literal	0x2
00b5 0099       |    |		Action	Reference_Dynamic
00b6 00c6       |    |		Action	Check_Subprogram_Elaborated
00b7 e5fe       |    |		Load	0x2,-0x2
00b8 61d7       |a   |		Indirect_Literal	Discrete,0x290,{0x00000000, 0x003658a4}
00b9 61ce       |a   |		Indirect_Literal	Discrete,0x288,{0x00000000, 0x000007de}
00ba 4809       |H   |		Short_Literal	0x9
00bb			BODY_0098:
00bb e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x7 = 0xbb,0x1
00bc 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00bd 486d       |Hm  |		Short_Literal	0x6d
00be e402       |    |		Load	0x2,0x2
00bf 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
00c0 c403       |    |		Store	0x2,0x3
00c1 e406       |    |		Load	0x2,0x6								; Debug Table 0x2.0x8 = 0xc1,0x2
00c2 4807       |H   |		Short_Literal	0x7
00c3 4802       |H   |		Short_Literal	0x2
00c4 0099       |    |		Action	Reference_Dynamic
00c5 8404       |    |		Call	0x2,0x4
00c6 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
00c7 0000       |    |		.XXX[0x1]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb       |    |		.CONST	0x00cb								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0001       |    |		.CONST	0x0001								; Number of locals
00cb			BODY_00c8:
00cb			INIT_00c8:
00cb e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3 = .DEBUG	0x00cb,0x0690,0x0002,0x0000,0x0036,0x57f4,0x0000,0x0029
													; Debug Table 0x3.0x0 = 0xcb,0x1
00cc 0217       |    |		Execute	Heap_Access,All_Reference
00cd 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
00ce 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
00cf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3       |    |		.CONST	0x00d3								; Address of begin
00d1 0004       |    |		.CONST	0x0004								; Address of exception handler
00d2 0001       |    |		.CONST	0x0001								; Number of locals
00d3			BODY_00d0:
00d3			INIT_00d0:
00d3 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4 = .DEBUG	0x00d3,0x0694,0x0002,0x0000,0x0036,0x57f4,0x0000,0x0034
													; Debug Table 0x4.0x0 = 0xd3,0x1
00d4 0217       |    |		Execute	Heap_Access,All_Reference
00d5 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00d6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d7 0000       |    |		.XXX[0x1]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5 = .DEBUG	0x00db,0x0698,0x0002,0x0000,0x0036,0x57f4,0x0000,0x003d
													; Debug Table 0x5.0x0 = 0xdb,0x1
00dc 0217       |    |		Execute	Heap_Access,All_Reference
00dd 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
00de 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00df 0000       |    |		.XXX[0x1]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3       |    |		.CONST	0x00e3								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0001       |    |		.CONST	0x0001								; Number of locals
00e3			BODY_00e0:
00e3			INIT_00e0:
00e3 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6 = .DEBUG	0x00e3,0x069c,0x0002,0x0000,0x0036,0x57f4,0x0000,0x0046
													; Debug Table 0x6.0x0 = 0xe3,0x1
00e4 0217       |    |		Execute	Heap_Access,All_Reference
00e5 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00e6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00e7 0000       |    |		.XXX[0x1]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb       |    |		.CONST	0x00eb								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0001       |    |		.CONST	0x0001								; Number of locals
00eb			BODY_00e8:
00eb			INIT_00e8:
00eb e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7 = .DEBUG	0x00eb,0x06a0,0x0002,0x0000,0x0036,0x57f4,0x0000,0x004f
													; Debug Table 0x7.0x0 = 0xeb,0x1
00ec 0217       |    |		Execute	Heap_Access,All_Reference
00ed 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
00ee 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ef 0000       |    |		.XXX[0x1]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 0101       |    |		.CONST	0x0101								; Address of begin
00f1 0004       |    |		.CONST	0x0004								; Address of exception handler
00f2 0004       |    |		.CONST	0x0004								; Number of locals
00f3			INIT_00f0:
00f3 619c       |a   |		Indirect_Literal	Discrete,0x290,{0x00000000, 0x003658a4}		; Debug Table 0x8 = .DEBUG	0x00f3,0x06a4,0x0002,0x0000,0x0036,0x57f4,0x0000,0x0058
													; Debug Table 0x8.0x0 = 0xf3,0xffff
00f4 491d       |I   |		Short_Literal	0x11d
00f5 480d       |H   |		Short_Literal	0xd
00f6 e20d       |    |		Load	0x1,0xd
00f7 e20d       |    |		Load	0x1,0xd
00f8 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
00f9 e002       |    |		Load	0x0,0x2
00fa 0387       |    |		Declare_Variable	Package
00fb 00d8       |    |		Load_Top	At_Offset_0
00fc 020f       |    |		Execute	Module,Activate
00fd e402       |    |		Load	0x2,0x2								; Debug Table 0x8.0x1 = 0xfd,0xfffe
00fe 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00ff 029f 0363  |   c|		Declare_Subprogram	INIT_0360,For_Call				; Debug Table 0x8.0x2 = 0xff,0xfffd
0101			BODY_00f0:
0101 e402       |    |		Load	0x2,0x2								; Debug Table 0x8.0x3 = 0x101,0x1
0102 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0103 480d       |H   |		Short_Literal	0xd
0104 e402       |    |		Load	0x2,0x2
0105 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0106 c403       |    |		Store	0x2,0x3
0107 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0x4 = 0x107,0x2
0108 e5ff       |    |		Load	0x2,-0x1
0109 8404       |    |		Call	0x2,0x4
010a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
010b 0000 0000  |    |		.BLANK	0000[0x5]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113       |    |		.CONST	0x0113								; Address of begin
0111 0004       |    |		.CONST	0x0004								; Address of exception handler
0112 0001       |    |		.CONST	0x0001								; Number of locals
0113			BODY_0110:
0113			INIT_0110:
0113 e21d       |    |		Load	0x1,0x1d							; Debug Table 0x9 = .DEBUG	0x0113,0x06b0,0x0002,0x0000,0x0036,0x57f4,0x0000,0x0067
													; Debug Table 0x9.0x0 = 0x113,0x1
0114 0322       | "  |		Declare_Variable	Record
0115 e5ff       |    |		Load	0x2,-0x1
0116 e402       |    |		Load	0x2,0x2
0117 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0118 e21e       |    |		Load	0x1,0x1e
0119 e402       |    |		Load	0x2,0x2
011a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
011b e21e       |    |		Load	0x1,0x1e
011c e402       |    |		Load	0x2,0x2
011d 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
011e e21e       |    |		Load	0x1,0x1e
011f e402       |    |		Load	0x2,0x2
0120 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0121 e21e       |    |		Load	0x1,0x1e
0122 e402       |    |		Load	0x2,0x2
0123 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0124 e20d       |    |		Load	0x1,0xd
0125 e5fe       |    |		Load	0x2,-0x2
0126 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
0127 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b       | +  |		.CONST	0x012b								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0001       |    |		.CONST	0x0001								; Number of locals
012b			BODY_0128:
012b			INIT_0128:
012b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa = .DEBUG	0x012b,0x06b4,0x0001,0x0000,0x0036,0x57f4,0x0000,0x0078
													; Debug Table 0xa.0x0 = 0x12b,0x1
012c 0217       |    |		Execute	Heap_Access,All_Reference
012d 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
012e 021c       |    |		Execute	Heap_Access,Not_Null
012f e5ff       |    |		Load	0x2,-0x1
0130 0217       |    |		Execute	Heap_Access,All_Reference
0131 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0132 021c       |    |		Execute	Heap_Access,Not_Null
0133 0278       | x  |		Execute	Discrete,Or
0134 6802       |h   |		Jump_Zero	0x137
0135 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0xa.0x1 = 0x135,0x2
0136 0257       | W  |		Execute	Discrete,Raise
0137 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x2 = 0x137,0x3
0138 e5ff       |    |		Load	0x2,-0x1
0139 0217       |    |		Execute	Heap_Access,All_Reference
013a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
013b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0x3 = 0x13b,0x4
013c 0217       |    |		Execute	Heap_Access,All_Reference
013d 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
013e e5fe       |    |		Load	0x2,-0x2
013f 0217       |    |		Execute	Heap_Access,All_Reference
0140 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0141 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0142 0000 0000  |    |		.BLANK	0000[0x6]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b       | K  |		.CONST	0x014b								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0001       |    |		.CONST	0x0001								; Number of locals
014b			BODY_0148:
014b			INIT_0148:
014b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb = .DEBUG	0x014b,0x06be,0x0001,0x0000,0x0036,0x57f4,0x0000,0x0081
													; Debug Table 0xb.0x0 = 0x14b,0x1
014c 0217       |    |		Execute	Heap_Access,All_Reference
014d 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
014e 021c       |    |		Execute	Heap_Access,Not_Null
014f e5ff       |    |		Load	0x2,-0x1
0150 0217       |    |		Execute	Heap_Access,All_Reference
0151 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0152 021c       |    |		Execute	Heap_Access,Not_Null
0153 0278       | x  |		Execute	Discrete,Or
0154 6802       |h   |		Jump_Zero	0x157
0155 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0xb.0x1 = 0x155,0x2
0156 0257       | W  |		Execute	Discrete,Raise
0157 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x2 = 0x157,0x3
0158 0217       |    |		Execute	Heap_Access,All_Reference
0159 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
015a 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
015b 460d       |F   |		Jump_Case	0xe
015c 780d       |x   |		Jump	0x16a								; case 0x0
015d 780c       |x   |		Jump	0x16a								; case 0x1
015e 780b       |x   |		Jump	0x16a								; case 0x2
015f 780a       |x   |		Jump	0x16a								; case 0x3
0160 7809       |x   |		Jump	0x16a								; case 0x4
0161 7808       |x   |		Jump	0x16a								; case 0x5
0162 7807       |x   |		Jump	0x16a								; case 0x6
0163 7806       |x   |		Jump	0x16a								; case 0x7
0164 7807       |x   |		Jump	0x16c								; case 0x8
0165 7806       |x   |		Jump	0x16c								; case 0x9
0166 7805       |x   |		Jump	0x16c								; case 0xa
0167 7804       |x   |		Jump	0x16c								; case 0xb
0168 7803       |x   |		Jump	0x16c								; case 0xc
0169 7800       |x   |		Jump	0x16a								; case 0xd
016a 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0xb.0x3 = 0x16a,0x5
016b 0257       | W  |		Execute	Discrete,Raise
016c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x4 = 0x16c,0x6
016d e5ff       |    |		Load	0x2,-0x1
016e 0217       |    |		Execute	Heap_Access,All_Reference
016f 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0170 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x5 = 0x170,0x7
0171 e5fe       |    |		Load	0x2,-0x2
0172 0217       |    |		Execute	Heap_Access,All_Reference
0173 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0174 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0175 0000 0000  |    |		.XXX[0x3]
0177 0000       |    |
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 0189       |    |		.CONST	0x0189								; Address of begin
0179 0004       |    |		.CONST	0x0004								; Address of exception handler
017a 0004       |    |		.CONST	0x0004								; Number of locals
017b			INIT_0178:
017b 6114       |a   |		Indirect_Literal	Discrete,0x290,{0x00000000, 0x003658a4}		; Debug Table 0xc = .DEBUG	0x017b,0x06cc,0x0002,0x0000,0x0036,0x57f4,0x0000,0x008e
													; Debug Table 0xc.0x0 = 0x17b,0xffff
017c 4a4a       |JJ  |		Short_Literal	0x24a
017d 480d       |H   |		Short_Literal	0xd
017e e20d       |    |		Load	0x1,0xd
017f e20d       |    |		Load	0x1,0xd
0180 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0181 e002       |    |		Load	0x0,0x2
0182 0387       |    |		Declare_Variable	Package
0183 00d8       |    |		Load_Top	At_Offset_0
0184 020f       |    |		Execute	Module,Activate
0185 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x1 = 0x185,0xfffe
0186 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0187 029f 03db  |    |		Declare_Subprogram	INIT_03d8,For_Call				; Debug Table 0xc.0x2 = 0x187,0xfffd
0189			BODY_0178:
0189 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x3 = 0x189,0x1
018a 7002       |p   |		Jump_Nonzero	0x18d
018b e20d       |    |		Load	0x1,0xd								; Debug Table 0xc.0x4 = 0x18b,0x2
018c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
018d e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x5 = 0x18d,0x3
018e 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
018f 480d       |H   |		Short_Literal	0xd
0190 e402       |    |		Load	0x2,0x2
0191 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0192 c403       |    |		Store	0x2,0x3
0193 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x6 = 0x193,0x4
0194 e5ff       |    |		Load	0x2,-0x1
0195 8404       |    |		Call	0x2,0x4
0196 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0197 0000       |    |		.XXX[0x1]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b       |    |		.CONST	0x019b								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0001       |    |		.CONST	0x0001								; Number of locals
019b			BODY_0198:
019b			INIT_0198:
019b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xd = .DEBUG	0x019b,0x06dc,0x0002,0x0000,0x0036,0x57f4,0x0000,0x009d
													; Debug Table 0xd.0x0 = 0x19b,0x1
019c 021d       |    |		Execute	Heap_Access,Is_Null
019d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
019e 0000 0000  |    |		.XXX[0x2]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3       |    |		.CONST	0x01a3								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0001       |    |		.CONST	0x0001								; Number of locals
01a3			BODY_01a0:
01a3			INIT_01a0:
01a3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xe = .DEBUG	0x01a3,0x06e0,0x0001,0x0000,0x0036,0x57f4,0x0000,0x00a6
													; Debug Table 0xe.0x0 = 0x1a3,0x1
01a4 0217       |    |		Execute	Heap_Access,All_Reference
01a5 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
01a6 021c       |    |		Execute	Heap_Access,Not_Null
01a7 e5ff       |    |		Load	0x2,-0x1
01a8 0217       |    |		Execute	Heap_Access,All_Reference
01a9 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
01aa 021c       |    |		Execute	Heap_Access,Not_Null
01ab 0278       | x  |		Execute	Discrete,Or
01ac 6802       |h   |		Jump_Zero	0x1af
01ad 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0xe.0x1 = 0x1ad,0x2
01ae 0257       | W  |		Execute	Discrete,Raise
01af e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xe.0x2 = 0x1af,0x3
01b0 0217       |    |		Execute	Heap_Access,All_Reference
01b1 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
01b2 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01b3 0b02       |    |		Execute_Immediate	Case_Compare,0x2
01b4 7004       |p   |		Jump_Nonzero	0x1b9
01b5 0b03       |    |		Execute_Immediate	Case_Compare,0x3
01b6 7002       |p   |		Jump_Nonzero	0x1b9
01b7 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0xe.0x3 = 0x1b7,0x5
01b8 0257       | W  |		Execute	Discrete,Raise
01b9 00d1       |    |		Pop_Control	Pop_Count_1
01ba e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xe.0x4 = 0x1ba,0x6
01bb e5ff       |    |		Load	0x2,-0x1
01bc 0217       |    |		Execute	Heap_Access,All_Reference
01bd 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
01be 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01bf 0000       |    |		.XXX[0x1]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3       |    |		.CONST	0x01c3								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0001       |    |		.CONST	0x0001								; Number of locals
01c3			BODY_01c0:
01c3			INIT_01c0:
01c3 4608       |F   |		Jump_Case	0x9							; Debug Table 0xf = .DEBUG	0x01c3,0x06ec,0x0005,0x0000,0x0036,0x58a4,0x0000,0x0035
01c4 7808       |x   |		Jump	0x1cd								; case 0x0
01c5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
01c6 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
01c7 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
01c8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
01c9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
01ca 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
01cb 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
01cc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
01cd e5ff       |    |		Load	0x2,-0x1
01ce 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
01cf 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
01d1 0000 0000  |    |		.BLANK	0000[0x7]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01db       |    |		.CONST	0x01db								; Address of begin
01d9 0004       |    |		.CONST	0x0004								; Address of exception handler
01da 0001       |    |		.CONST	0x0001								; Number of locals
01db			BODY_01d8:
01db			INIT_01d8:
01db e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x10 = .DEBUG	0x01db,0x06ee,0x0002,0x0000,0x0036,0x58a4,0x0000,0x00ca
													; Debug Table 0x10.0x0 = 0x1db,0x1
01dc 60a7       |`   |		Indirect_Literal	Discrete,0x284,{0x00000000, 0x7fffffff}
01dd 0a01       |    |		Execute_Immediate	Plus,0x1
01de 026f       | o  |		Execute	Discrete,Remainder
01df 0248       | H  |		Execute	Discrete,Check_In_Integer
01e0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01e1 0000 0000  |    |		.BLANK	0000[0x7]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb       |    |		.CONST	0x01eb								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0001       |    |		.CONST	0x0001								; Number of locals
01eb			BODY_01e8:
01eb			INIT_01e8:
01eb e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11 = .DEBUG	0x01eb,0x06f2,0x0002,0x0000,0x0036,0x58a4,0x0000,0x00ea
													; Debug Table 0x11.0x0 = 0x1eb,0x1
01ec 7002       |p   |		Jump_Nonzero	0x1ef
01ed 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x1 = 0x1ed,0x2
01ee 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ef e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x2 = 0x1ef,0x3
01f0 0217       |    |		Execute	Heap_Access,All_Reference
01f1 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
01f2 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01f3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f4 0000 0000  |    |		.BLANK	0000[0x4]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01ff       |    |		.CONST	0x01ff								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0002       |    |		.CONST	0x0002								; Number of locals
01fb			INIT_01f8:
01fb 00e5       |    |		Load_Encached	Long_Integer_Cache					; Debug Table 0x12 = .DEBUG	0x01fb,0x06fa,0x2802,0x0002,0x0036,0x58a4,0x0000,0x0417
													; Debug Table 0x12.0x0 = 0x1fb,0xffff
01fc 026a       | j  |		Execute	Discrete,First
01fd 00e5       |    |		Load_Encached	Long_Integer_Cache
01fe 03f1       |    |		Declare_Variable	Discrete,With_Value
01ff			BODY_01f8:
01ff e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x12.0x1 = 0x1ff,0xfffe
													; Debug Table 0x12.0x2 = 0x1ff,0xfffd
													; Debug Table 0x12.0x3 = 0x1ff,0x1
													; Debug Table 0x12.0x4 = 0x1ff,0x401
0200 0116       |    |		Execute	Any,Address_Of_Type						; Debug Table 0x12.0x5 = 0x200,0x402
0201 c402       |    |		Store	0x2,0x2								; Debug Table 0x12.0x6 = 0x201,0x403
0202 e402       |    |		Load	0x2,0x2								; Debug Table 0x12.0x7 = 0x202,0x2
0203 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0204 0000 0000  |    |		.BLANK	0000[0x4]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b       |    |		.CONST	0x020b								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0001       |    |		.CONST	0x0001								; Number of locals
020b			BODY_0208:
020b			INIT_0208:
020b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x13 = .DEBUG	0x020b,0x070c,0x0001,0x0000,0x0036,0x58a4,0x0000,0x0421
													; Debug Table 0x13.0x0 = 0x20b,0x1
020c 0177       | w  |		Execute	Record,Field_Type_Dynamic					; Debug Table 0x13.0x1 = 0x20c,0x2
020d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
020e 0000 0000  |    |		.XXX[0x2]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213       |    |		.CONST	0x0213								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0001       |    |		.CONST	0x0001								; Number of locals
0213			BODY_0210:
0213			INIT_0210:
0213 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x14 = .DEBUG	0x0213,0x0712,0x0001,0x0000,0x0036,0x58a4,0x0000,0x042b
													; Debug Table 0x14.0x0 = 0x213,0x1
0214 015d       | ]  |		Execute	Variant_Record,Field_Type_Dynamic				; Debug Table 0x14.0x1 = 0x214,0x2
0215 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0216 0000 0000  |    |		.XXX[0x2]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b       |    |		.CONST	0x021b								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0001       |    |		.CONST	0x0001								; Number of locals
021b			BODY_0218:
021b			INIT_0218:
021b 01d8       |    |		Execute	Vector,Element_Type						; Debug Table 0x15 = .DEBUG	0x021b,0x0718,0x0001,0x0000,0x0036,0x58a4,0x0000,0x0435
													; Debug Table 0x15.0x0 = 0x21b,0x1
021c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
021d 0000 0000  |    |		.XXX[0x3]
021f 0000       |    |
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 01a8       |    |		Execute	Matrix,Element_Type						; Debug Table 0x16 = .DEBUG	0x0223,0x071c,0x0001,0x0000,0x0036,0x58a4,0x0000,0x0439
													; Debug Table 0x16.0x0 = 0x223,0x1
0224 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0225 0000 0000  |    |		.XXX[0x3]
0227 0000       |    |
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b       | +  |		.CONST	0x022b								; Address of begin
0229 0004       |    |		.CONST	0x0004								; Address of exception handler
022a 0001       |    |		.CONST	0x0001								; Number of locals
022b			BODY_0228:
022b			INIT_0228:
022b 01f8       |    |		Execute	Array,Element_Type						; Debug Table 0x17 = .DEBUG	0x022b,0x0720,0x0001,0x0000,0x0036,0x58a4,0x0000,0x043d
													; Debug Table 0x17.0x0 = 0x22b,0x1
022c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
022d 0000 0000  |    |		.XXX[0x3]
022f 0000       |    |
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233       | 3  |		.CONST	0x0233								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0001       |    |		.CONST	0x0001								; Number of locals
0233			BODY_0230:
0233			INIT_0230:
0233 022a       | *  |		Execute	Access,Element_Type						; Debug Table 0x18 = .DEBUG	0x0233,0x0724,0x0001,0x0000,0x0036,0x58a4,0x0000,0x0441
													; Debug Table 0x18.0x0 = 0x233,0x1
0234 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0235 0000 0000  |    |		.XXX[0x3]
0237 0000       |    |
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b       | ;  |		.CONST	0x023b								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0001       |    |		.CONST	0x0001								; Number of locals
023b			BODY_0238:
023b			INIT_0238:
023b 021a       |    |		Execute	Heap_Access,Element_Type					; Debug Table 0x19 = .DEBUG	0x023b,0x0728,0x0001,0x0000,0x0036,0x58a4,0x0000,0x0445
													; Debug Table 0x19.0x0 = 0x23b,0x1
023c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
023d 0000 0000  |    |		.XXX[0x3]
023f 0000       |    |
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 024c       | L  |		.CONST	0x024c								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0003       |    |		.CONST	0x0003								; Number of locals
0243			INIT_0240:
0243 e20d       |    |		Load	0x1,0xd								; Debug Table 0x1a = .DEBUG	0x0243,0x072c,0x0002,0x0000,0x0036,0x58a4,0x0000,0x0457
													; Debug Table 0x1a.0x0 = 0x243,0xffff
0244 e5ff       |    |		Load	0x2,-0x1
0245 0217       |    |		Execute	Heap_Access,All_Reference
0246 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0247 0217       |    |		Execute	Heap_Access,All_Reference
0248 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0249 c402       |    |		Store	0x2,0x2
024a e001       |    |		Load	0x0,0x1								; Debug Table 0x1a.0x1 = 0x24a,0xfffe
024b 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
024c			BODY_0240:
024c e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1a.0x2 = 0x24c,0x1
024d 0217       |    |		Execute	Heap_Access,All_Reference
024e 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
024f 0217       |    |		Execute	Heap_Access,All_Reference
0250 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0251 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0252 460d       |F   |		Jump_Case	0xe
0253 781c       |x   |		Jump	0x270								; case 0x0
0254 781b       |x   |		Jump	0x270								; case 0x1
0255 781a       |x   |		Jump	0x270								; case 0x2
0256 7819       |x   |		Jump	0x270								; case 0x3
0257 7818       |x   |		Jump	0x270								; case 0x4
0258 7817       |x   |		Jump	0x270								; case 0x5
0259 7816       |x   |		Jump	0x270								; case 0x6
025a 7815       |x   |		Jump	0x270								; case 0x7
025b 7814       |x   |		Jump	0x270								; case 0x8
025c 7813       |x   |		Jump	0x270								; case 0x9
025d 7803       |x   |		Jump	0x261								; case 0xa
025e 7802       |x   |		Jump	0x261								; case 0xb
025f 7804       |x   |		Jump	0x264								; case 0xc
0260 780f       |x   |		Jump	0x270								; case 0xd
0261 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1a.0x3 = 0x261,0x2
0262 a403       |    |		Store_Unchecked	0x2,0x3
0263 7817       |x   |		Jump	0x27b
0264 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1a.0x4 = 0x264,0x3
0265 0217       |    |		Execute	Heap_Access,All_Reference
0266 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0267 0217       |    |		Execute	Heap_Access,All_Reference
0268 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0269 e001       |    |		Load	0x0,0x1
026a 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
026b 0161       | a  |		Execute	Variant_Record,Check_In_Formal_Type
026c e001       |    |		Load	0x0,0x1
026d 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
026e a403       |    |		Store_Unchecked	0x2,0x3
026f 780b       |x   |		Jump	0x27b
0270 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x1a.0x5 = 0x270,0x4
0271 0257       | W  |		Execute	Discrete,Raise
0272 e001       |    |		Load	0x0,0x1								; Debug Table 0x1a.0x6 = 0x272,0x6
0273 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0274 e403       |    |		Load	0x2,0x3
0275 0268       | h  |		Execute	Discrete,Successor
0276 a403       |    |		Store_Unchecked	0x2,0x3
0277 e402       |    |		Load	0x2,0x2								; Debug Table 0x1a.0x7 = 0x277,0x7
0278 0217       |    |		Execute	Heap_Access,All_Reference
0279 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
027a a402       |    |		Store_Unchecked	0x2,0x2
027b e402       |    |		Load	0x2,0x2								; Debug Table 0x1a.0x8 = 0x27b,0x5
027c e5ff       |    |		Load	0x2,-0x1
027d 021e       |    |		Execute	Heap_Access,Maximum
027e 77f3       |w   |		Jump_Nonzero	0x272
027f e403       |    |		Load	0x2,0x3								; Debug Table 0x1a.0x9 = 0x27f,0x8
0280 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0281 0000 0000  |    |		.XXX[0x3]
0283 0000       |    |
0284 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
0288 0000 0000  |    |		.LITERAL	{0x00000000, 0x000007de}
028c 0000 0000  |    |		.LITERAL	{0x00000000, 0x000004cc}
0290 0000 0000  |    |		.LITERAL	{0x00000000, 0x003658a4}
0294 0007 2413  |  $ |		.LITERAL	{0x00072413, 0x000000b0}
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 02a9       |    |		.CONST	0x02a9								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 000a       |    |		.CONST	0x000a								; Number of locals
029b			INIT_0298:
029b e20d       |    |		Load	0x1,0xd								; Debug Table 0x1b = .DEBUG	0x029b,0x0742,0x2802,0x0003,0x0036,0x58a4,0x0000,0x04e4
													; Debug Table 0x1b.0x0 = 0x29b,0xffff
029c e20d       |    |		Load	0x1,0xd								; Debug Table 0x1b.0x1 = 0x29c,0xfffe
029d 6242       |bB  |		Indirect_Literal	Discrete,0x4e0,{0xffffffff, 0x80000001}		; Debug Table 0x1b.0x2 = 0x29d,0xfffd
029e 00e2       |    |		Load_Encached	Integer_Cache
029f 03f1       |    |		Declare_Variable	Discrete,With_Value
02a0 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1b.0x3 = 0x2a0,0xfffc
02a1 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21				; Debug Table 0x1b.0x4 = 0x2a1,0xfffb
02a2 00c6       |    |		Action	Check_Subprogram_Elaborated
02a3 e7fe       |    |		Load	0x3,-0x2
02a4 67eb       |g   |		Indirect_Literal	Discrete,0x290,{0x00000000, 0x003658a4}
02a5 6236       |b6  |		Indirect_Literal	Discrete,0x4dc,{0x00000000, 0x0000051b}
02a6 4809       |H   |		Short_Literal	0x9
02a7 029f 0423  |   #|		Declare_Subprogram	INIT_0420,For_Call				; Debug Table 0x1b.0x5 = 0x2a7,0xfffa
02a9			BODY_0298:
02a9 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1b.0x6 = 0x2a9,0x1
02aa e602       |    |		Load	0x3,0x2
02ab e606       |    |		Load	0x3,0x6
02ac 4807       |H   |		Short_Literal	0x7
02ad 4803       |H   |		Short_Literal	0x3
02ae 0099       |    |		Action	Reference_Dynamic
02af 8221       | !  |		Call	0x1,0x21
02b0 e403       |    |		Load	0x2,0x3
02b1 e402       |    |		Load	0x2,0x2
02b2 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
02b3 c602       |    |		Store	0x3,0x2
02b4 c605       |    |		Store	0x3,0x5
02b5 e605       |    |		Load	0x3,0x5								; Debug Table 0x1b.0x7 = 0x2b5,0x2
02b6 7014       |p   |		Jump_Nonzero	0x2cb
02b7 e001       |    |		Load	0x0,0x1								; Debug Table 0x1b.0x8 = 0x2b7,0x3
													; Debug Table 0x1b.0x9 = 0x2b7,0xfbff
02b8 1912       |    |		Execute	Package,Field_Reference,Field_Number 0x12
02b9 00c6       |    |		Action	Check_Subprogram_Elaborated
02ba e7fe       |    |		Load	0x3,-0x2
02bb 480a       |H   |		Short_Literal	0xa
02bc 4803       |H   |		Short_Literal	0x3
02bd 0099       |    |		Action	Reference_Dynamic
02be 67d1       |g   |		Indirect_Literal	Discrete,0x290,{0x00000000, 0x003658a4}
02bf 6218       |b   |		Indirect_Literal	Discrete,0x4d8,{0x00000000, 0x0000060e}
02c0 480f       |H   |		Short_Literal	0xf
02c1 e60b       |    |		Load	0x3,0xb								; Debug Table 0x1b.0xa = 0x2c1,0x401
02c2 480c       |H   |		Short_Literal	0xc
02c3 4803       |H   |		Short_Literal	0x3
02c4 0099       |    |		Action	Reference_Dynamic
02c5 480d       |H   |		Short_Literal	0xd
02c6 4803       |H   |		Short_Literal	0x3
02c7 0099       |    |		Action	Reference_Dynamic
02c8 e001       |    |		Load	0x0,0x1
02c9 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02ca 00d5       |    |		Pop_Control	Pop_Count_5
02cb e602       |    |		Load	0x3,0x2								; Debug Table 0x1b.0xb = 0x2cb,0x4
02cc 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02cd 0000 0000  |    |		.XXX[0x3]
02cf 0000       |    |
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02e5       |    |		.CONST	0x02e5								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 0008       |    |		.CONST	0x0008								; Number of locals
02d3			INIT_02d0:
02d3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1c = .DEBUG	0x02d3,0x075c,0x2802,0x0003,0x0036,0x58a4,0x0000,0x04ee
													; Debug Table 0x1c.0x0 = 0x2d3,0xffff
													; Debug Table 0x1c.0x1 = 0x2d3,0xfffe
													; Debug Table 0x1c.0x2 = 0x2d3,0xfffd
02d4 e7fc       |    |		Load	0x3,-0x4
02d5 e20d       |    |		Load	0x1,0xd
02d6 02a0       |    |		Declare_Subprogram	Null_Subprogram
02d7 4801       |H   |		Short_Literal	0x1
02d8 035d       | ]  |		Declare_Type	Array,Defined
02d9 00d8       |    |		Load_Top	At_Offset_0
02da 0337       | 7  |		Declare_Variable	Array
02db e001       |    |		Load	0x0,0x1								; Debug Table 0x1c.0x3 = 0x2db,0xfffc
02dc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02dd 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x1c.0x4 = 0x2dd,0xfffb
02de 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
02df e001       |    |		Load	0x0,0x1								; Debug Table 0x1c.0x5 = 0x2df,0xfffa
02e0 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
02e1 029f 049b  |    |		Declare_Subprogram	INIT_0498,For_Call				; Debug Table 0x1c.0x6 = 0x2e1,0xfff9
02e3 029f 04bb  |    |		Declare_Subprogram	INIT_04b8,For_Call				; Debug Table 0x1c.0x7 = 0x2e3,0xfff8
02e5			BODY_02d0:
02e5 8607       |    |		Call	0x3,0x7								; Debug Table 0x1c.0x8 = 0x2e5,0x1
02e6 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1c.0x9 = 0x2e6,0x2
02e7 e605       |    |		Load	0x3,0x5								; Debug Table 0x1c.0xa = 0x2e7,0x3
													; Debug Table 0x1c.0xb = 0x2e7,0x4
02e8 e603       |    |		Load	0x3,0x3
02e9 01d7       |    |		Execute	Vector,Field_Read
02ea 0217       |    |		Execute	Heap_Access,All_Reference
02eb 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
02ec 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
02ed a604       |    |		Store_Unchecked	0x3,0x4
02ee e605       |    |		Load	0x3,0x5								; Debug Table 0x1c.0xc = 0x2ee,0x5
02ef e603       |    |		Load	0x3,0x3
02f0 01dc       |    |		Execute	Vector,Last
02f1 027f       |    |		Execute	Discrete,Equal
02f2 705d       |p]  |		Jump_Nonzero	0x350
02f3 e604       |    |		Load	0x3,0x4								; Debug Table 0x1c.0xd = 0x2f3,0x6
02f4 0f09       |    |		Execute_Immediate	Equal,0x9
02f5 6820       |h   |		Jump_Zero	0x316
02f6 e605       |    |		Load	0x3,0x5								; Debug Table 0x1c.0xe = 0x2f6,0x7
02f7 e603       |    |		Load	0x3,0x3
02f8 01d7       |    |		Execute	Vector,Field_Read
02f9 0217       |    |		Execute	Heap_Access,All_Reference
02fa 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
02fb 0217       |    |		Execute	Heap_Access,All_Reference
02fc 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02fd 0217       |    |		Execute	Heap_Access,All_Reference
02fe 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
02ff 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0300 0f05       |    |		Execute_Immediate	Equal,0x5
0301 7002       |p   |		Jump_Nonzero	0x304
0302 01d8       |    |		Execute	Vector,Element_Type						; Debug Table 0x1c.0x10 = 0x302,0x401
													; Debug Table 0x1c.0xf = 0x302,0x8
0303 7847       |xG  |		Jump	0x34b
0304 e605       |    |		Load	0x3,0x5								; Debug Table 0x1c.0x11 = 0x304,0x9
0305 e603       |    |		Load	0x3,0x3
0306 01d7       |    |		Execute	Vector,Field_Read
0307 0217       |    |		Execute	Heap_Access,All_Reference
0308 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0309 0217       |    |		Execute	Heap_Access,All_Reference
030a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
030b 0217       |    |		Execute	Heap_Access,All_Reference
030c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
030d 0217       |    |		Execute	Heap_Access,All_Reference
030e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
030f 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0310 0f05       |    |		Execute_Immediate	Equal,0x5
0311 7002       |p   |		Jump_Nonzero	0x314
0312 01a8       |    |		Execute	Matrix,Element_Type						; Debug Table 0x1c.0x12 = 0x312,0xa
													; Debug Table 0x1c.0x13 = 0x312,0x801
0313 7837       |x7  |		Jump	0x34b
0314 01f8       |    |		Execute	Array,Element_Type						; Debug Table 0x1c.0x14 = 0x314,0xb
													; Debug Table 0x1c.0x15 = 0x314,0xc01
0315 7835       |x5  |		Jump	0x34b
0316 e604       |    |		Load	0x3,0x4								; Debug Table 0x1c.0x16 = 0x316,0xc
0317 0f0a       |    |		Execute_Immediate	Equal,0xa
0318 680a       |h   |		Jump_Zero	0x323
0319 e605       |    |		Load	0x3,0x5								; Debug Table 0x1c.0x17 = 0x319,0xd
031a 0a01       |    |		Execute_Immediate	Plus,0x1
031b 0248       | H  |		Execute	Discrete,Check_In_Integer
031c e603       |    |		Load	0x3,0x3
031d 01d7       |    |		Execute	Vector,Field_Read
031e 8229       | )  |		Call	0x1,0x29
031f a606       |    |		Store_Unchecked	0x3,0x6
0320 e606       |    |		Load	0x3,0x6								; Debug Table 0x1c.0x18 = 0x320,0xe
													; Debug Table 0x1c.0x19 = 0x320,0x1001
0321 0177       | w  |		Execute	Record,Field_Type_Dynamic					; Debug Table 0x1c.0x1a = 0x321,0x1002
0322 7828       |x(  |		Jump	0x34b
0323 e604       |    |		Load	0x3,0x4								; Debug Table 0x1c.0x1b = 0x323,0xf
0324 0f0b       |    |		Execute_Immediate	Equal,0xb
0325 681c       |h   |		Jump_Zero	0x342
0326 e605       |    |		Load	0x3,0x5								; Debug Table 0x1c.0x1c = 0x326,0x10
0327 0a01       |    |		Execute_Immediate	Plus,0x1
0328 0248       | H  |		Execute	Discrete,Check_In_Integer
0329 e603       |    |		Load	0x3,0x3
032a 01d7       |    |		Execute	Vector,Field_Read
032b 0217       |    |		Execute	Heap_Access,All_Reference
032c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
032d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
032e 0f0c       |    |		Execute_Immediate	Equal,0xc
032f 7008       |p   |		Jump_Nonzero	0x338
0330 e605       |    |		Load	0x3,0x5								; Debug Table 0x1c.0x1d = 0x330,0x11
0331 0a01       |    |		Execute_Immediate	Plus,0x1
0332 0248       | H  |		Execute	Discrete,Check_In_Integer
0333 e603       |    |		Load	0x3,0x3
0334 01d7       |    |		Execute	Vector,Field_Read
0335 8229       | )  |		Call	0x1,0x29
0336 a606       |    |		Store_Unchecked	0x3,0x6
0337 7807       |x   |		Jump	0x33f
0338 e605       |    |		Load	0x3,0x5								; Debug Table 0x1c.0x1e = 0x338,0x12
0339 0a02       |    |		Execute_Immediate	Plus,0x2
033a 0248       | H  |		Execute	Discrete,Check_In_Integer
033b e603       |    |		Load	0x3,0x3
033c 01d7       |    |		Execute	Vector,Field_Read
033d 8229       | )  |		Call	0x1,0x29
033e a606       |    |		Store_Unchecked	0x3,0x6
033f e606       |    |		Load	0x3,0x6								; Debug Table 0x1c.0x1f = 0x33f,0x13
													; Debug Table 0x1c.0x20 = 0x33f,0x1401
0340 015d       | ]  |		Execute	Variant_Record,Field_Type_Dynamic				; Debug Table 0x1c.0x21 = 0x340,0x1402
0341 7809       |x   |		Jump	0x34b
0342 e604       |    |		Load	0x3,0x4								; Debug Table 0x1c.0x22 = 0x342,0x14
0343 0f08       |    |		Execute_Immediate	Equal,0x8
0344 e604       |    |		Load	0x3,0x4
0345 0f0c       |    |		Execute_Immediate	Equal,0xc
0346 0278       | x  |		Execute	Discrete,Or
0347 6801       |h   |		Jump_Zero	0x349
0348 7802       |x   |		Jump	0x34b								; Debug Table 0x1c.0x23 = 0x348,0x15
0349 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x1c.0x24 = 0x349,0x16
034a 0257       | W  |		Execute	Discrete,Raise
034b e605       |    |		Load	0x3,0x5								; Debug Table 0x1c.0x25 = 0x34b,0x17
034c 0a01       |    |		Execute_Immediate	Plus,0x1
034d 0248       | H  |		Execute	Discrete,Check_In_Integer
034e a605       |    |		Store_Unchecked	0x3,0x5
034f 7f97       |    |		Jump	0x2e7
0350 e604       |    |		Load	0x3,0x4								; Debug Table 0x1c.0x26 = 0x350,0x18
0351 0f02       |    |		Execute_Immediate	Equal,0x2
0352 6802       |h   |		Jump_Zero	0x355
0353 022a       | *  |		Execute	Access,Element_Type						; Debug Table 0x1c.0x27 = 0x353,0x19
													; Debug Table 0x1c.0x28 = 0x353,0x1801
0354 7807       |x   |		Jump	0x35c
0355 e604       |    |		Load	0x3,0x4								; Debug Table 0x1c.0x29 = 0x355,0x1a
0356 0f03       |    |		Execute_Immediate	Equal,0x3
0357 6802       |h   |		Jump_Zero	0x35a
0358 021a       |    |		Execute	Heap_Access,Element_Type					; Debug Table 0x1c.0x2a = 0x358,0x1b
													; Debug Table 0x1c.0x2b = 0x358,0x1c01
0359 7802       |x   |		Jump	0x35c
035a 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x1c.0x2c = 0x35a,0x1c
035b 0257       | W  |		Execute	Discrete,Raise
035c 8608       |    |		Call	0x3,0x8								; Debug Table 0x1c.0x2d = 0x35c,0x1d
035d 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
035e 0000 0000  |    |		.XXX[0x2]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0365       | e  |		.CONST	0x0365								; Address of begin
0361 0004       |    |		.CONST	0x0004								; Address of exception handler
0362 0003       |    |		.CONST	0x0003								; Number of locals
0363			INIT_0360:
0363 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1d = .DEBUG	0x0363,0x07ba,0x0002,0x0000,0x0036,0x58a4,0x0000,0x013f
													; Debug Table 0x1d.0x0 = 0x363,0xffff
0364 e20d       |    |		Load	0x1,0xd								; Debug Table 0x1d.0x1 = 0x364,0xfffe
0365			BODY_0360:
0365 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1d.0x2 = 0x365,0x1
0366 e7fe       |    |		Load	0x3,-0x2
0367 021f       |    |		Execute	Heap_Access,Equal
0368 6802       |h   |		Jump_Zero	0x36b
0369 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1d.0x3 = 0x369,0x2
036a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
036b e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1d.0x4 = 0x36b,0x3
036c 7002       |p   |		Jump_Nonzero	0x36f
036d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0x5 = 0x36d,0x4
036e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
036f e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1d.0x6 = 0x36f,0x5
0370 7002       |p   |		Jump_Nonzero	0x373
0371 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0x7 = 0x371,0x6
0372 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0373 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1d.0x8 = 0x373,0x7
0374 0217       |    |		Execute	Heap_Access,All_Reference
0375 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0376 e7fe       |    |		Load	0x3,-0x2
0377 0217       |    |		Execute	Heap_Access,All_Reference
0378 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0379 016f       | o  |		Execute	Variant_Record,Equal
037a 7002       |p   |		Jump_Nonzero	0x37d
037b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0x9 = 0x37b,0x8
037c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
037d e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1d.0xa = 0x37d,0x9
037e 0217       |    |		Execute	Heap_Access,All_Reference
037f 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0380 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0381 0f04       |    |		Execute_Immediate	Equal,0x4
0382 6804       |h   |		Jump_Zero	0x387
0383 e5fd       |    |		Load	0x2,-0x3
0384 7002       |p   |		Jump_Nonzero	0x387
0385 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0xb = 0x385,0xa
0386 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0387 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1d.0xc = 0x387,0xb
0388 e603       |    |		Load	0x3,0x3
0389 e7ff       |    |		Load	0x3,-0x1
038a e403       |    |		Load	0x2,0x3
038b e402       |    |		Load	0x2,0x2
038c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
038d c603       |    |		Store	0x3,0x3
038e c602       |    |		Store	0x3,0x2
038f e602       |    |		Load	0x3,0x2								; Debug Table 0x1d.0xd = 0x38f,0xc
0390 6804       |h   |		Jump_Zero	0x395
0391 e603       |    |		Load	0x3,0x3								; Debug Table 0x1d.0xe = 0x391,0xd
0392 e7fe       |    |		Load	0x3,-0x2
0393 021f       |    |		Execute	Heap_Access,Equal
0394 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0395 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1d.0xf = 0x395,0xe
0396 e603       |    |		Load	0x3,0x3
0397 e7fe       |    |		Load	0x3,-0x2
0398 e403       |    |		Load	0x2,0x3
0399 e402       |    |		Load	0x2,0x2
039a 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
039b c603       |    |		Store	0x3,0x3
039c c602       |    |		Store	0x3,0x2
039d e602       |    |		Load	0x3,0x2								; Debug Table 0x1d.0x10 = 0x39d,0xf
039e 6808       |h   |		Jump_Zero	0x3a7
039f e603       |    |		Load	0x3,0x3								; Debug Table 0x1d.0x11 = 0x39f,0x10
03a0 e7ff       |    |		Load	0x3,-0x1
03a1 021f       |    |		Execute	Heap_Access,Equal
03a2 6802       |h   |		Jump_Zero	0x3a5
03a3 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x1d.0x12 = 0x3a3,0x11
03a4 0257       | W  |		Execute	Discrete,Raise
03a5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0x13 = 0x3a5,0x12
03a6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03a7 e403       |    |		Load	0x2,0x3								; Debug Table 0x1d.0x14 = 0x3a7,0x13
03a8 4801       |H   |		Short_Literal	0x1
03a9 e7fe       |    |		Load	0x3,-0x2
03aa e7ff       |    |		Load	0x3,-0x1
03ab e402       |    |		Load	0x2,0x2
03ac 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03ad c403       |    |		Store	0x2,0x3
03ae e403       |    |		Load	0x2,0x3								; Debug Table 0x1d.0x15 = 0x3ae,0x14
03af 4801       |H   |		Short_Literal	0x1
03b0 e7ff       |    |		Load	0x3,-0x1
03b1 e7fe       |    |		Load	0x3,-0x2
03b2 e402       |    |		Load	0x2,0x2
03b3 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03b4 c403       |    |		Store	0x2,0x3
03b5 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1d.0x16 = 0x3b5,0x15
03b6 0217       |    |		Execute	Heap_Access,All_Reference
03b7 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03b8 e7ff       |    |		Load	0x3,-0x1
03b9 0217       |    |		Execute	Heap_Access,All_Reference
03ba 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03bb 8404       |    |		Call	0x2,0x4
03bc 7002       |p   |		Jump_Nonzero	0x3bf
03bd 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0x17 = 0x3bd,0x16
03be 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03bf e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1d.0x18 = 0x3bf,0x17
03c0 0217       |    |		Execute	Heap_Access,All_Reference
03c1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03c2 e7ff       |    |		Load	0x3,-0x1
03c3 0217       |    |		Execute	Heap_Access,All_Reference
03c4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03c5 8404       |    |		Call	0x2,0x4
03c6 7002       |p   |		Jump_Nonzero	0x3c9
03c7 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0x19 = 0x3c7,0x18
03c8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03c9 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1d.0x1a = 0x3c9,0x19
03ca 0217       |    |		Execute	Heap_Access,All_Reference
03cb 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
03cc e7ff       |    |		Load	0x3,-0x1
03cd 0217       |    |		Execute	Heap_Access,All_Reference
03ce 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
03cf 8404       |    |		Call	0x2,0x4
03d0 7002       |p   |		Jump_Nonzero	0x3d3
03d1 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0x1b = 0x3d1,0x1a
03d2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03d3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1d.0x1c = 0x3d3,0x1b
03d4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03d5 0000 0000  |    |		.XXX[0x3]
03d7 0000       |    |
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03dd       |    |		.CONST	0x03dd								; Address of begin
03d9 0004       |    |		.CONST	0x0004								; Address of exception handler
03da 0003       |    |		.CONST	0x0003								; Number of locals
03db			INIT_03d8:
03db e20d       |    |		Load	0x1,0xd								; Debug Table 0x1e = .DEBUG	0x03db,0x07f6,0x0002,0x0000,0x0036,0x58a4,0x0000,0x026c
													; Debug Table 0x1e.0x0 = 0x3db,0xffff
03dc 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1e.0x1 = 0x3dc,0xfffe
03dd			BODY_03d8:
03dd e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1e.0x2 = 0x3dd,0x1
03de 681a       |h   |		Jump_Zero	0x3f9
03df 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1e.0x3 = 0x3df,0x2
03e0 e602       |    |		Load	0x3,0x2
03e1 e7ff       |    |		Load	0x3,-0x1
03e2 e403       |    |		Load	0x2,0x3
03e3 e402       |    |		Load	0x2,0x2
03e4 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03e5 c602       |    |		Store	0x3,0x2
03e6 c603       |    |		Store	0x3,0x3
03e7 e603       |    |		Load	0x3,0x3								; Debug Table 0x1e.0x4 = 0x3e7,0x3
03e8 6802       |h   |		Jump_Zero	0x3eb
03e9 e602       |    |		Load	0x3,0x2								; Debug Table 0x1e.0x5 = 0x3e9,0x4
03ea 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03eb e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x1e.0x6 = 0x3eb,0x5
03ec e7ff       |    |		Load	0x3,-0x1
03ed 0217       |    |		Execute	Heap_Access,All_Reference
03ee 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
03ef 8215       |    |		Call	0x1,0x15
03f0 a602       |    |		Store_Unchecked	0x3,0x2
03f1 e403       |    |		Load	0x2,0x3								; Debug Table 0x1e.0x7 = 0x3f1,0x6
03f2 4801       |H   |		Short_Literal	0x1
03f3 e602       |    |		Load	0x3,0x2
03f4 e7ff       |    |		Load	0x3,-0x1
03f5 e402       |    |		Load	0x2,0x2
03f6 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03f7 c403       |    |		Store	0x2,0x3
03f8 7806       |x   |		Jump	0x3ff
03f9 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x1e.0x8 = 0x3f9,0x7
03fa e7ff       |    |		Load	0x3,-0x1
03fb 0217       |    |		Execute	Heap_Access,All_Reference
03fc 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
03fd 8215       |    |		Call	0x1,0x15
03fe a602       |    |		Store_Unchecked	0x3,0x2
03ff e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1e.0x9 = 0x3ff,0x8
0400 0217       |    |		Execute	Heap_Access,All_Reference
0401 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0402 6806       |h   |		Jump_Zero	0x409
0403 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1e.0xa = 0x403,0x9
0404 e7ff       |    |		Load	0x3,-0x1
0405 8210       |    |		Call	0x1,0x10
0406 8404       |    |		Call	0x2,0x4
0407 e602       |    |		Load	0x3,0x2
0408 8216       |    |		Call	0x1,0x16
0409 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1e.0xb = 0x409,0xa
040a 0217       |    |		Execute	Heap_Access,All_Reference
040b 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
040c 6806       |h   |		Jump_Zero	0x413
040d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1e.0xc = 0x40d,0xb
040e e7ff       |    |		Load	0x3,-0x1
040f 8211       |    |		Call	0x1,0x11
0410 8404       |    |		Call	0x2,0x4
0411 e602       |    |		Load	0x3,0x2
0412 8217       |    |		Call	0x1,0x17
0413 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1e.0xd = 0x413,0xc
0414 0217       |    |		Execute	Heap_Access,All_Reference
0415 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0416 6806       |h   |		Jump_Zero	0x41d
0417 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1e.0xe = 0x417,0xd
0418 e7ff       |    |		Load	0x3,-0x1
0419 8213       |    |		Call	0x1,0x13
041a 8404       |    |		Call	0x2,0x4
041b e602       |    |		Load	0x3,0x2
041c 821b       |    |		Call	0x1,0x1b
041d e602       |    |		Load	0x3,0x2								; Debug Table 0x1e.0xf = 0x41d,0xe
041e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
041f 0000       |    |		.XXX[0x1]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0428       | (  |		.CONST	0x0428								; Address of begin
0421 0004       |    |		.CONST	0x0004								; Address of exception handler
0422 0002       |    |		.CONST	0x0002								; Number of locals
0423			INIT_0420:
0423 e20d       |    |		Load	0x1,0xd								; Debug Table 0x1f = .DEBUG	0x0423,0x0818,0x0801,0x0003,0x0036,0x58a4,0x0000,0x0525
													; Debug Table 0x1f.0x0 = 0x423,0xffff
0424 e5fd       |    |		Load	0x2,-0x3
0425 e9ff       |    |		Load	0x4,-0x1
0426 8215       |    |		Call	0x1,0x15
0427 c802       |    |		Store	0x4,0x2
0428			BODY_0420:
0428 e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x1f.0x1 = 0x428,0x1
0429 7012       |p   |		Jump_Nonzero	0x43c
042a e602       |    |		Load	0x3,0x2								; Debug Table 0x1f.0x2 = 0x42a,0x2
042b 6802       |h   |		Jump_Zero	0x42e
042c 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x1f.0x3 = 0x42c,0x3
042d 0257       | W  |		Execute	Discrete,Raise
042e e802       |    |		Load	0x4,0x2								; Debug Table 0x1f.0x4 = 0x42e,0x4
042f a602       |    |		Store_Unchecked	0x3,0x2
0430 e403       |    |		Load	0x2,0x3								; Debug Table 0x1f.0x5 = 0x430,0x5
0431 4801       |H   |		Short_Literal	0x1
0432 e602       |    |		Load	0x3,0x2
0433 e606       |    |		Load	0x3,0x6
0434 4807       |H   |		Short_Literal	0x7
0435 4803       |H   |		Short_Literal	0x3
0436 0099       |    |		Action	Reference_Dynamic
0437 8221       | !  |		Call	0x1,0x21
0438 e402       |    |		Load	0x2,0x2
0439 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
043a c403       |    |		Store	0x2,0x3
043b 7837       |x7  |		Jump	0x473
043c e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x1f.0x6 = 0x43c,0x6
043d e604       |    |		Load	0x3,0x4
043e 027a       | z  |		Execute	Discrete,Less_Equal
043f 681c       |h   |		Jump_Zero	0x45c
0440 e604       |    |		Load	0x3,0x4								; Debug Table 0x1f.0x7 = 0x440,0x7
0441 e9fe       |    |		Load	0x4,-0x2
0442 0272       | r  |		Execute	Discrete,Minus
0443 0248       | H  |		Execute	Discrete,Check_In_Integer
0444 4801       |H   |		Short_Literal	0x1
0445 0263       | c  |		Execute	Discrete,Above_Bound
0446 700b       |p   |		Jump_Nonzero	0x452
0447 e603       |    |		Load	0x3,0x3								; Debug Table 0x1f.0x8 = 0x447,0x8
0448 0217       |    |		Execute	Heap_Access,All_Reference
0449 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
044a 6802       |h   |		Jump_Zero	0x44d
044b 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x1f.0x9 = 0x44b,0x9
044c 0257       | W  |		Execute	Discrete,Raise
044d e603       |    |		Load	0x3,0x3								; Debug Table 0x1f.0xa = 0x44d,0xa
044e 0217       |    |		Execute	Heap_Access,All_Reference
044f 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0450 a603       |    |		Store_Unchecked	0x3,0x3
0451 3ff5       |?   |		Loop_Increasing	0x447
0452 e603       |    |		Load	0x3,0x3								; Debug Table 0x1f.0xb = 0x452,0xb
0453 0217       |    |		Execute	Heap_Access,All_Reference
0454 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0455 6802       |h   |		Jump_Zero	0x458
0456 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x1f.0xc = 0x456,0xc
0457 0257       | W  |		Execute	Discrete,Raise
0458 e802       |    |		Load	0x4,0x2								; Debug Table 0x1f.0xd = 0x458,0xd
0459 e603       |    |		Load	0x3,0x3
045a 8216       |    |		Call	0x1,0x16
045b 7817       |x   |		Jump	0x473
045c e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x1f.0xe = 0x45c,0xe
045d e604       |    |		Load	0x3,0x4
045e 0a01       |    |		Execute_Immediate	Plus,0x1
045f 027f       |    |		Execute	Discrete,Equal
0460 6810       |h   |		Jump_Zero	0x471
0461 e603       |    |		Load	0x3,0x3								; Debug Table 0x1f.0xf = 0x461,0xf
0462 0217       |    |		Execute	Heap_Access,All_Reference
0463 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0464 021c       |    |		Execute	Heap_Access,Not_Null
0465 e603       |    |		Load	0x3,0x3
0466 0217       |    |		Execute	Heap_Access,All_Reference
0467 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0468 021c       |    |		Execute	Heap_Access,Not_Null
0469 0278       | x  |		Execute	Discrete,Or
046a 6802       |h   |		Jump_Zero	0x46d
046b 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x1f.0x10 = 0x46b,0x10
046c 0257       | W  |		Execute	Discrete,Raise
046d e802       |    |		Load	0x4,0x2								; Debug Table 0x1f.0x11 = 0x46d,0x11
046e e603       |    |		Load	0x3,0x3
046f 8217       |    |		Call	0x1,0x17
0470 7802       |x   |		Jump	0x473
0471 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x1f.0x12 = 0x471,0x12
0472 0257       | W  |		Execute	Discrete,Raise
0473 e802       |    |		Load	0x4,0x2								; Debug Table 0x1f.0x13 = 0x473,0x13
0474 a603       |    |		Store_Unchecked	0x3,0x3
0475 e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x1f.0x14 = 0x475,0x14
0476 a604       |    |		Store_Unchecked	0x3,0x4
0477 e9ff       |    |		Load	0x4,-0x1							; Debug Table 0x1f.0x15 = 0x477,0x15
0478 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0479 0b02       |    |		Execute_Immediate	Case_Compare,0x2
047a 7003       |p   |		Jump_Nonzero	0x47e
047b 0b03       |    |		Execute_Immediate	Case_Compare,0x3
047c 7001       |p   |		Jump_Nonzero	0x47e
047d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x1f.0x16 = 0x47d,0x17
047e 4805       |H   |		Short_Literal	0x5							; Debug Table 0x1f.0x17 = 0x47e,0x16
													; Debug Table 0x1f.0x18 = 0x47e,0xfbff
047f 4802       |H   |		Short_Literal	0x2
0480 0099       |    |		Action	Reference_Dynamic
0481 00c6       |    |		Action	Check_Subprogram_Elaborated
0482 e7fe       |    |		Load	0x3,-0x2
0483 660c       |f   |		Indirect_Literal	Discrete,0x290,{0x00000000, 0x003658a4}
0484 604f       |`O  |		Indirect_Literal	Discrete,0x4d4,{0x00000000, 0x000005d4}
0485 4807       |H   |		Short_Literal	0x7
0486 e604       |    |		Load	0x3,0x4								; Debug Table 0x1f.0x19 = 0x486,0x401
0487 00e3       |    |		Load_Encached	Natural_Cache
0488 025b       | [  |		Execute	Discrete,Check_In_Type
0489 e603       |    |		Load	0x3,0x3
048a e804       |    |		Load	0x4,0x4
048b 4805       |H   |		Short_Literal	0x5
048c 4804       |H   |		Short_Literal	0x4
048d 0099       |    |		Action	Reference_Dynamic
048e 8405       |    |		Call	0x2,0x5
048f e603       |    |		Load	0x3,0x3
0490 821b       |    |		Call	0x1,0x1b
0491 00d4       |    |		Pop_Control	Pop_Count_4
0492 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0493 0000 0000  |    |		.BLANK	0000[0x5]
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 04a2       |    |		.CONST	0x04a2								; Address of begin
0499 0004       |    |		.CONST	0x0004								; Address of exception handler
049a 0003       |    |		.CONST	0x0003								; Number of locals
049b			INIT_0498:
049b e20d       |    |		Load	0x1,0xd								; Debug Table 0x20 = .DEBUG	0x049b,0x084e,0x0801,0x0003,0x0036,0x58a4,0x0000,0x0665
													; Debug Table 0x20.0x0 = 0x49b,0xffff
049c e7fd       |    |		Load	0x3,-0x3
049d c802       |    |		Store	0x4,0x2
049e 4801       |H   |		Short_Literal	0x1							; Debug Table 0x20.0x1 = 0x49e,0xfffe
049f 4801       |H   |		Short_Literal	0x1
04a0 00e1       |    |		Load_Encached	Boolean_Cache
04a1 03f8       |    |		Declare_Type	Discrete,Constrained
04a2			BODY_0498:
04a2 e603       |    |		Load	0x3,0x3								; Debug Table 0x20.0x2 = 0x4a2,0x1
04a3 01da       |    |		Execute	Vector,Bounds
04a4 0264       | d  |		Execute	Discrete,Below_Bound
04a5 7009       |p   |		Jump_Nonzero	0x4af
04a6 e802       |    |		Load	0x4,0x2								; Debug Table 0x20.0x3 = 0x4a6,0x2
04a7 e805       |    |		Load	0x4,0x5
04a8 e603       |    |		Load	0x3,0x3
04a9 01d6       |    |		Execute	Vector,Field_Write
04aa e802       |    |		Load	0x4,0x2								; Debug Table 0x20.0x4 = 0x4aa,0x3
04ab 0217       |    |		Execute	Heap_Access,All_Reference
04ac 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
04ad a802       |    |		Store_Unchecked	0x4,0x2
04ae 37f7       |7   |		Loop_Decreasing	0x4a6
04af e802       |    |		Load	0x4,0x2								; Debug Table 0x20.0x5 = 0x4af,0x4
04b0 021d       |    |		Execute	Heap_Access,Is_Null
04b1 c803       |    |		Store	0x4,0x3
04b2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
04b3 0000 0000  |    |		.BLANK	0000[0x5]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04c8       |    |		.CONST	0x04c8								; Address of begin
04b9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ba 0006       |    |		.CONST	0x0006								; Number of locals
04bb			INIT_04b8:
04bb 02a0       |    |		Declare_Subprogram	Null_Subprogram					; Debug Table 0x21 = .DEBUG	0x04bb,0x085c,0x0802,0x0003,0x0036,0x58a4,0x0000,0x0697
													; Debug Table 0x21.0x0 = 0x4bb,0xffff
04bc 4800       |H   |		Short_Literal	0x0
04bd 032d       | -  |		Declare_Type	Record,Defined
04be 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x21.0x1 = 0x4be,0xfffe
04bf e9ff       |    |		Load	0x4,-0x1							; Debug Table 0x21.0x2 = 0x4bf,0xfffd
04c0 4804       |H   |		Short_Literal	0x4							; Debug Table 0x21.0x3 = 0x4c0,0xfffc
04c1 4802       |H   |		Short_Literal	0x2
04c2 0099       |    |		Action	Reference_Dynamic
04c3 00c6       |    |		Action	Check_Subprogram_Elaborated
04c4 e802       |    |		Load	0x4,0x2
04c5 65ca       |e   |		Indirect_Literal	Discrete,0x290,{0x00000000, 0x003658a4}
04c6 6009       |`   |		Indirect_Literal	Discrete,0x4d0,{0x00000000, 0x000006c0}
04c7 4806       |H   |		Short_Literal	0x6
04c8			BODY_04b8:
04c8 e803       |    |		Load	0x4,0x3								; Debug Table 0x21.0x4 = 0x4c8,0x1
04c9 4804       |H   |		Short_Literal	0x4
04ca 4804       |H   |		Short_Literal	0x4
04cb 0099       |    |		Action	Reference_Dynamic
04cc 8404       |    |		Call	0x2,0x4
04cd 00ca       |    |		Action	Exit_Nullary_Function
04ce 0000 0000  |    |		.XXX[0x2]
04d0 0000 0000  |    |		.LITERAL	{0x00000000, 0x000006c0}
04d4 0000 0000  |    |		.LITERAL	{0x00000000, 0x000005d4}
04d8 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000060e}
04dc 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000051b}
04e0 ffff ffff  |    |		.LITERAL	{0xffffffff, 0x80000001}
04e4 0000 0000  |    |		.BLANK	0000[0x4]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; Debug Table
04e8 ; --------------------------------------------------------------------------------------
04e8 0003 0022  |   "|		.CONST	0x0003,0x0022
04ea 000b 05fa  |    |		.DEBUG	0x000b,0x05fa,0x8000,0x0000,0x0036,0x57f4,0x0000,0x0007
04f2 0036 0628  | 6 (|		.DEBUG	0x0036,0x0628,0x8000,0x0000,0x0036,0x58a4,0x0000,0x0006
04fa 009b 067c  |   ||		.DEBUG	0x009b,0x067c,0x2802,0x0002,0x0036,0x57f4,0x0000,0x0019
0502 00cb 0690  |    |		.DEBUG	0x00cb,0x0690,0x0002,0x0000,0x0036,0x57f4,0x0000,0x0029
050a 00d3 0694  |    |		.DEBUG	0x00d3,0x0694,0x0002,0x0000,0x0036,0x57f4,0x0000,0x0034
0512 00db 0698  |    |		.DEBUG	0x00db,0x0698,0x0002,0x0000,0x0036,0x57f4,0x0000,0x003d
051a 00e3 069c  |    |		.DEBUG	0x00e3,0x069c,0x0002,0x0000,0x0036,0x57f4,0x0000,0x0046
0522 00eb 06a0  |    |		.DEBUG	0x00eb,0x06a0,0x0002,0x0000,0x0036,0x57f4,0x0000,0x004f
052a 00f3 06a4  |    |		.DEBUG	0x00f3,0x06a4,0x0002,0x0000,0x0036,0x57f4,0x0000,0x0058
0532 0113 06b0  |    |		.DEBUG	0x0113,0x06b0,0x0002,0x0000,0x0036,0x57f4,0x0000,0x0067
053a 012b 06b4  | +  |		.DEBUG	0x012b,0x06b4,0x0001,0x0000,0x0036,0x57f4,0x0000,0x0078
0542 014b 06be  | K  |		.DEBUG	0x014b,0x06be,0x0001,0x0000,0x0036,0x57f4,0x0000,0x0081
054a 017b 06cc  | {  |		.DEBUG	0x017b,0x06cc,0x0002,0x0000,0x0036,0x57f4,0x0000,0x008e
0552 019b 06dc  |    |		.DEBUG	0x019b,0x06dc,0x0002,0x0000,0x0036,0x57f4,0x0000,0x009d
055a 01a3 06e0  |    |		.DEBUG	0x01a3,0x06e0,0x0001,0x0000,0x0036,0x57f4,0x0000,0x00a6
0562 01c3 06ec  |    |		.DEBUG	0x01c3,0x06ec,0x0005,0x0000,0x0036,0x58a4,0x0000,0x0035
056a 01db 06ee  |    |		.DEBUG	0x01db,0x06ee,0x0002,0x0000,0x0036,0x58a4,0x0000,0x00ca
0572 01eb 06f2  |    |		.DEBUG	0x01eb,0x06f2,0x0002,0x0000,0x0036,0x58a4,0x0000,0x00ea
057a 01fb 06fa  |    |		.DEBUG	0x01fb,0x06fa,0x2802,0x0002,0x0036,0x58a4,0x0000,0x0417
0582 020b 070c  |    |		.DEBUG	0x020b,0x070c,0x0001,0x0000,0x0036,0x58a4,0x0000,0x0421
058a 0213 0712  |    |		.DEBUG	0x0213,0x0712,0x0001,0x0000,0x0036,0x58a4,0x0000,0x042b
0592 021b 0718  |    |		.DEBUG	0x021b,0x0718,0x0001,0x0000,0x0036,0x58a4,0x0000,0x0435
059a 0223 071c  | #  |		.DEBUG	0x0223,0x071c,0x0001,0x0000,0x0036,0x58a4,0x0000,0x0439
05a2 022b 0720  | +  |		.DEBUG	0x022b,0x0720,0x0001,0x0000,0x0036,0x58a4,0x0000,0x043d
05aa 0233 0724  | 3 $|		.DEBUG	0x0233,0x0724,0x0001,0x0000,0x0036,0x58a4,0x0000,0x0441
05b2 023b 0728  | ; (|		.DEBUG	0x023b,0x0728,0x0001,0x0000,0x0036,0x58a4,0x0000,0x0445
05ba 0243 072c  | C ,|		.DEBUG	0x0243,0x072c,0x0002,0x0000,0x0036,0x58a4,0x0000,0x0457
05c2 029b 0742  |   B|		.DEBUG	0x029b,0x0742,0x2802,0x0003,0x0036,0x58a4,0x0000,0x04e4
05ca 02d3 075c  |   \|		.DEBUG	0x02d3,0x075c,0x2802,0x0003,0x0036,0x58a4,0x0000,0x04ee
05d2 0363 07ba  | c  |		.DEBUG	0x0363,0x07ba,0x0002,0x0000,0x0036,0x58a4,0x0000,0x013f
05da 03db 07f6  |    |		.DEBUG	0x03db,0x07f6,0x0002,0x0000,0x0036,0x58a4,0x0000,0x026c
05e2 0423 0818  | #  |		.DEBUG	0x0423,0x0818,0x0801,0x0003,0x0036,0x58a4,0x0000,0x0525
05ea 049b 084e  |   N|		.DEBUG	0x049b,0x084e,0x0801,0x0003,0x0036,0x58a4,0x0000,0x0665
05f2 04bb 085c  |   \|		.DEBUG	0x04bb,0x085c,0x0802,0x0003,0x0036,0x58a4,0x0000,0x0697
05fa ; --------------------------------------------------------------------------------------
05fa ; Debug3 Subtable 0x0
05fa ; --------------------------------------------------------------------------------------
05fa 0016 0000  |    |		.DBG3TAB	0x0016,0x0000
05fc 000b ffff  |    |		.CONST	0x000b,0xffff
05fe 000b fffe  |    |		.CONST	0x000b,0xfffe
0600 000b fffd  |    |		.CONST	0x000b,0xfffd
0602 000c fffc  |    |		.CONST	0x000c,0xfffc
0604 000e fffb  |    |		.CONST	0x000e,0xfffb
0606 0010 fffa  |    |		.CONST	0x0010,0xfffa
0608 0012 fff9  |    |		.CONST	0x0012,0xfff9
060a 0014 fff8  |    |		.CONST	0x0014,0xfff8
060c 0016 fff7  |    |		.CONST	0x0016,0xfff7
060e 0018 fff6  |    |		.CONST	0x0018,0xfff6
0610 001a fff5  |    |		.CONST	0x001a,0xfff5
0612 001c fff4  |    |		.CONST	0x001c,0xfff4
0614 001e fff3  |    |		.CONST	0x001e,0xfff3
0616 0020 fff2  |    |		.CONST	0x0020,0xfff2
0618 0021 fff1  | !  |		.CONST	0x0021,0xfff1
061a 0023 fff0  | #  |		.CONST	0x0023,0xfff0
061c 0025 ffef  | %  |		.CONST	0x0025,0xffef
061e 0027 ffee  | '  |		.CONST	0x0027,0xffee
0620 002c ffed  | ,  |		.CONST	0x002c,0xffed
0622 002e ffec  | .  |		.CONST	0x002e,0xffec
0624 0032 ffeb  | 2  |		.CONST	0x0032,0xffeb
0626 0032 ffea  | 2  |		.CONST	0x0032,0xffea
0628 ; --------------------------------------------------------------------------------------
0628 ; Debug3 Subtable 0x1
0628 ; --------------------------------------------------------------------------------------
0628 0029 0000  | )  |		.DBG3TAB	0x0029,0x0000
062a 0036 ffff  | 6  |		.CONST	0x0036,0xffff
062c 0036 fffe  | 6  |		.CONST	0x0036,0xfffe
062e 0036 fffd  | 6  |		.CONST	0x0036,0xfffd
0630 0036 fffc  | 6  |		.CONST	0x0036,0xfffc
0632 003a fffb  | :  |		.CONST	0x003a,0xfffb
0634 003a fffa  | :  |		.CONST	0x003a,0xfffa
0636 0044 fff9  | D  |		.CONST	0x0044,0xfff9
0638 0046 fff8  | F  |		.CONST	0x0046,0xfff8
063a 0048 fff7  | H  |		.CONST	0x0048,0xfff7
063c 004a fff6  | J  |		.CONST	0x004a,0xfff6
063e 004c fff5  | L  |		.CONST	0x004c,0xfff5
0640 004e fff4  | N  |		.CONST	0x004e,0xfff4
0642 0050 fff3  | P  |		.CONST	0x0050,0xfff3
0644 0052 fff2  | R  |		.CONST	0x0052,0xfff2
0646 0054 fff1  | T  |		.CONST	0x0054,0xfff1
0648 0056 fff0  | V  |		.CONST	0x0056,0xfff0
064a 0058 ffef  | X  |		.CONST	0x0058,0xffef
064c 005a ffee  | Z  |		.CONST	0x005a,0xffee
064e 005c ffed  | \  |		.CONST	0x005c,0xffed
0650 005e ffec  | ^  |		.CONST	0x005e,0xffec
0652 0060 ffff  | `  |		.CONST	0x0060,0xffff
0654 0062 fffe  | b  |		.CONST	0x0062,0xfffe
0656 0064 fffd  | d  |		.CONST	0x0064,0xfffd
0658 0066 fffc  | f  |		.CONST	0x0066,0xfffc
065a 0068 fffb  | h  |		.CONST	0x0068,0xfffb
065c 006a fffa  | j  |		.CONST	0x006a,0xfffa
065e 006c fff9  | l  |		.CONST	0x006c,0xfff9
0660 006e fff8  | n  |		.CONST	0x006e,0xfff8
0662 0070 fff7  | p  |		.CONST	0x0070,0xfff7
0664 0070 ffea  | p  |		.CONST	0x0070,0xffea
0666 0072 ffe9  | r  |		.CONST	0x0072,0xffe9
0668 0074 ffff  | t  |		.CONST	0x0074,0xffff
066a 0074 fffe  | t  |		.CONST	0x0074,0xfffe
066c 0076 fffd  | v  |		.CONST	0x0076,0xfffd
066e 0078 fffc  | x  |		.CONST	0x0078,0xfffc
0670 007a fffb  | z  |		.CONST	0x007a,0xfffb
0672 007c fffa  | |  |		.CONST	0x007c,0xfffa
0674 007e fff9  | ~  |		.CONST	0x007e,0xfff9
0676 0080 fff8  |    |		.CONST	0x0080,0xfff8
0678 0082 fff7  |    |		.CONST	0x0082,0xfff7
067a 0084 ffe7  |    |		.CONST	0x0084,0xffe7
067c ; --------------------------------------------------------------------------------------
067c ; Debug3 Subtable 0x2
067c ; --------------------------------------------------------------------------------------
067c 0007 0002  |    |		.DBG3TAB	0x0007,0x0002
067e 009b ffff  |    |		.CONST	0x009b,0xffff
0680 00a5 fffe  |    |		.CONST	0x00a5,0xfffe
0682 00a7 fffd  |    |		.CONST	0x00a7,0xfffd
0684 00a9 fffc  |    |		.CONST	0x00a9,0xfffc
0686 00ab fffb  |    |		.CONST	0x00ab,0xfffb
0688 00af fffa  |    |		.CONST	0x00af,0xfffa
068a 00b3 fff9  |    |		.CONST	0x00b3,0xfff9
068c 00bb 0001  |    |		.CONST	0x00bb,0x0001
068e 00c1 0002  |    |		.CONST	0x00c1,0x0002
0690 ; --------------------------------------------------------------------------------------
0690 ; Debug3 Subtable 0x3
0690 ; --------------------------------------------------------------------------------------
0690 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0692 00cb 0001  |    |		.CONST	0x00cb,0x0001
0694 ; --------------------------------------------------------------------------------------
0694 ; Debug3 Subtable 0x4
0694 ; --------------------------------------------------------------------------------------
0694 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0696 00d3 0001  |    |		.CONST	0x00d3,0x0001
0698 ; --------------------------------------------------------------------------------------
0698 ; Debug3 Subtable 0x5
0698 ; --------------------------------------------------------------------------------------
0698 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
069a 00db 0001  |    |		.CONST	0x00db,0x0001
069c ; --------------------------------------------------------------------------------------
069c ; Debug3 Subtable 0x6
069c ; --------------------------------------------------------------------------------------
069c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
069e 00e3 0001  |    |		.CONST	0x00e3,0x0001
06a0 ; --------------------------------------------------------------------------------------
06a0 ; Debug3 Subtable 0x7
06a0 ; --------------------------------------------------------------------------------------
06a0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06a2 00eb 0001  |    |		.CONST	0x00eb,0x0001
06a4 ; --------------------------------------------------------------------------------------
06a4 ; Debug3 Subtable 0x8
06a4 ; --------------------------------------------------------------------------------------
06a4 0003 0002  |    |		.DBG3TAB	0x0003,0x0002
06a6 00f3 ffff  |    |		.CONST	0x00f3,0xffff
06a8 00fd fffe  |    |		.CONST	0x00fd,0xfffe
06aa 00ff fffd  |    |		.CONST	0x00ff,0xfffd
06ac 0101 0001  |    |		.CONST	0x0101,0x0001
06ae 0107 0002  |    |		.CONST	0x0107,0x0002
06b0 ; --------------------------------------------------------------------------------------
06b0 ; Debug3 Subtable 0x9
06b0 ; --------------------------------------------------------------------------------------
06b0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06b2 0113 0001  |    |		.CONST	0x0113,0x0001
06b4 ; --------------------------------------------------------------------------------------
06b4 ; Debug3 Subtable 0xa
06b4 ; --------------------------------------------------------------------------------------
06b4 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
06b6 012b 0001  | +  |		.CONST	0x012b,0x0001
06b8 0135 0002  | 5  |		.CONST	0x0135,0x0002
06ba 0137 0003  | 7  |		.CONST	0x0137,0x0003
06bc 013b 0004  | ;  |		.CONST	0x013b,0x0004
06be ; --------------------------------------------------------------------------------------
06be ; Debug3 Subtable 0xb
06be ; --------------------------------------------------------------------------------------
06be 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
06c0 014b 0001  | K  |		.CONST	0x014b,0x0001
06c2 0155 0002  | U  |		.CONST	0x0155,0x0002
06c4 0157 0003  | W  |		.CONST	0x0157,0x0003
06c6 016a 0005  | j  |		.CONST	0x016a,0x0005
06c8 016c 0006  | l  |		.CONST	0x016c,0x0006
06ca 0170 0007  | p  |		.CONST	0x0170,0x0007
06cc ; --------------------------------------------------------------------------------------
06cc ; Debug3 Subtable 0xc
06cc ; --------------------------------------------------------------------------------------
06cc 0003 0004  |    |		.DBG3TAB	0x0003,0x0004
06ce 017b ffff  | {  |		.CONST	0x017b,0xffff
06d0 0185 fffe  |    |		.CONST	0x0185,0xfffe
06d2 0187 fffd  |    |		.CONST	0x0187,0xfffd
06d4 0189 0001  |    |		.CONST	0x0189,0x0001
06d6 018b 0002  |    |		.CONST	0x018b,0x0002
06d8 018d 0003  |    |		.CONST	0x018d,0x0003
06da 0193 0004  |    |		.CONST	0x0193,0x0004
06dc ; --------------------------------------------------------------------------------------
06dc ; Debug3 Subtable 0xd
06dc ; --------------------------------------------------------------------------------------
06dc 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06de 019b 0001  |    |		.CONST	0x019b,0x0001
06e0 ; --------------------------------------------------------------------------------------
06e0 ; Debug3 Subtable 0xe
06e0 ; --------------------------------------------------------------------------------------
06e0 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
06e2 01a3 0001  |    |		.CONST	0x01a3,0x0001
06e4 01ad 0002  |    |		.CONST	0x01ad,0x0002
06e6 01af 0003  |    |		.CONST	0x01af,0x0003
06e8 01b7 0005  |    |		.CONST	0x01b7,0x0005
06ea 01ba 0006  |    |		.CONST	0x01ba,0x0006
06ec ; --------------------------------------------------------------------------------------
06ec ; Debug3 Subtable 0xf
06ec ; --------------------------------------------------------------------------------------
06ec 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
06ee ; --------------------------------------------------------------------------------------
06ee ; Debug3 Subtable 0x10
06ee ; --------------------------------------------------------------------------------------
06ee 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06f0 01db 0001  |    |		.CONST	0x01db,0x0001
06f2 ; --------------------------------------------------------------------------------------
06f2 ; Debug3 Subtable 0x11
06f2 ; --------------------------------------------------------------------------------------
06f2 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
06f4 01eb 0001  |    |		.CONST	0x01eb,0x0001
06f6 01ed 0002  |    |		.CONST	0x01ed,0x0002
06f8 01ef 0003  |    |		.CONST	0x01ef,0x0003
06fa ; --------------------------------------------------------------------------------------
06fa ; Debug3 Subtable 0x12
06fa ; --------------------------------------------------------------------------------------
06fa 0003 0005  |    |		.DBG3TAB	0x0003,0x0005
06fc 01fb ffff  |    |		.CONST	0x01fb,0xffff
06fe 01ff fffe  |    |		.CONST	0x01ff,0xfffe
0700 01ff fffd  |    |		.CONST	0x01ff,0xfffd
0702 01ff 0001  |    |		.CONST	0x01ff,0x0001
0704 01ff 0401  |    |		.CONST	0x01ff,0x0401
0706 0200 0402  |    |		.CONST	0x0200,0x0402
0708 0201 0403  |    |		.CONST	0x0201,0x0403
070a 0202 0002  |    |		.CONST	0x0202,0x0002
070c ; --------------------------------------------------------------------------------------
070c ; Debug3 Subtable 0x13
070c ; --------------------------------------------------------------------------------------
070c 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
070e 020b 0001  |    |		.CONST	0x020b,0x0001
0710 020c 0002  |    |		.CONST	0x020c,0x0002
0712 ; --------------------------------------------------------------------------------------
0712 ; Debug3 Subtable 0x14
0712 ; --------------------------------------------------------------------------------------
0712 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0714 0213 0001  |    |		.CONST	0x0213,0x0001
0716 0214 0002  |    |		.CONST	0x0214,0x0002
0718 ; --------------------------------------------------------------------------------------
0718 ; Debug3 Subtable 0x15
0718 ; --------------------------------------------------------------------------------------
0718 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
071a 021b 0001  |    |		.CONST	0x021b,0x0001
071c ; --------------------------------------------------------------------------------------
071c ; Debug3 Subtable 0x16
071c ; --------------------------------------------------------------------------------------
071c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
071e 0223 0001  | #  |		.CONST	0x0223,0x0001
0720 ; --------------------------------------------------------------------------------------
0720 ; Debug3 Subtable 0x17
0720 ; --------------------------------------------------------------------------------------
0720 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0722 022b 0001  | +  |		.CONST	0x022b,0x0001
0724 ; --------------------------------------------------------------------------------------
0724 ; Debug3 Subtable 0x18
0724 ; --------------------------------------------------------------------------------------
0724 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0726 0233 0001  | 3  |		.CONST	0x0233,0x0001
0728 ; --------------------------------------------------------------------------------------
0728 ; Debug3 Subtable 0x19
0728 ; --------------------------------------------------------------------------------------
0728 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
072a 023b 0001  | ;  |		.CONST	0x023b,0x0001
072c ; --------------------------------------------------------------------------------------
072c ; Debug3 Subtable 0x1a
072c ; --------------------------------------------------------------------------------------
072c 0002 0008  |    |		.DBG3TAB	0x0002,0x0008
072e 0243 ffff  | C  |		.CONST	0x0243,0xffff
0730 024a fffe  | J  |		.CONST	0x024a,0xfffe
0732 024c 0001  | L  |		.CONST	0x024c,0x0001
0734 0261 0002  | a  |		.CONST	0x0261,0x0002
0736 0264 0003  | d  |		.CONST	0x0264,0x0003
0738 0270 0004  | p  |		.CONST	0x0270,0x0004
073a 0272 0006  | r  |		.CONST	0x0272,0x0006
073c 0277 0007  | w  |		.CONST	0x0277,0x0007
073e 027b 0005  | {  |		.CONST	0x027b,0x0005
0740 027f 0008  |    |		.CONST	0x027f,0x0008
0742 ; --------------------------------------------------------------------------------------
0742 ; Debug3 Subtable 0x1b
0742 ; --------------------------------------------------------------------------------------
0742 0007 0005  |    |		.DBG3TAB	0x0007,0x0005
0744 029b ffff  |    |		.CONST	0x029b,0xffff
0746 029c fffe  |    |		.CONST	0x029c,0xfffe
0748 029d fffd  |    |		.CONST	0x029d,0xfffd
074a 02a0 fffc  |    |		.CONST	0x02a0,0xfffc
074c 02a1 fffb  |    |		.CONST	0x02a1,0xfffb
074e 02a7 fffa  |    |		.CONST	0x02a7,0xfffa
0750 02a9 0001  |    |		.CONST	0x02a9,0x0001
0752 02b5 0002  |    |		.CONST	0x02b5,0x0002
0754 02b7 0003  |    |		.CONST	0x02b7,0x0003
0756 02b7 fbff  |    |		.CONST	0x02b7,0xfbff
0758 02c1 0401  |    |		.CONST	0x02c1,0x0401
075a 02cb 0004  |    |		.CONST	0x02cb,0x0004
075c ; --------------------------------------------------------------------------------------
075c ; Debug3 Subtable 0x1c
075c ; --------------------------------------------------------------------------------------
075c 0008 0026  |   &|		.DBG3TAB	0x0008,0x0026
075e 02d3 ffff  |    |		.CONST	0x02d3,0xffff
0760 02d3 fffe  |    |		.CONST	0x02d3,0xfffe
0762 02d3 fffd  |    |		.CONST	0x02d3,0xfffd
0764 02db fffc  |    |		.CONST	0x02db,0xfffc
0766 02dd fffb  |    |		.CONST	0x02dd,0xfffb
0768 02df fffa  |    |		.CONST	0x02df,0xfffa
076a 02e1 fff9  |    |		.CONST	0x02e1,0xfff9
076c 02e3 fff8  |    |		.CONST	0x02e3,0xfff8
076e 02e5 0001  |    |		.CONST	0x02e5,0x0001
0770 02e6 0002  |    |		.CONST	0x02e6,0x0002
0772 02e7 0003  |    |		.CONST	0x02e7,0x0003
0774 02e7 0004  |    |		.CONST	0x02e7,0x0004
0776 02ee 0005  |    |		.CONST	0x02ee,0x0005
0778 02f3 0006  |    |		.CONST	0x02f3,0x0006
077a 02f6 0007  |    |		.CONST	0x02f6,0x0007
077c 0302 0008  |    |		.CONST	0x0302,0x0008
077e 0302 0401  |    |		.CONST	0x0302,0x0401
0780 0304 0009  |    |		.CONST	0x0304,0x0009
0782 0312 000a  |    |		.CONST	0x0312,0x000a
0784 0312 0801  |    |		.CONST	0x0312,0x0801
0786 0314 000b  |    |		.CONST	0x0314,0x000b
0788 0314 0c01  |    |		.CONST	0x0314,0x0c01
078a 0316 000c  |    |		.CONST	0x0316,0x000c
078c 0319 000d  |    |		.CONST	0x0319,0x000d
078e 0320 000e  |    |		.CONST	0x0320,0x000e
0790 0320 1001  |    |		.CONST	0x0320,0x1001
0792 0321 1002  | !  |		.CONST	0x0321,0x1002
0794 0323 000f  | #  |		.CONST	0x0323,0x000f
0796 0326 0010  | &  |		.CONST	0x0326,0x0010
0798 0330 0011  | 0  |		.CONST	0x0330,0x0011
079a 0338 0012  | 8  |		.CONST	0x0338,0x0012
079c 033f 0013  | ?  |		.CONST	0x033f,0x0013
079e 033f 1401  | ?  |		.CONST	0x033f,0x1401
07a0 0340 1402  | @  |		.CONST	0x0340,0x1402
07a2 0342 0014  | B  |		.CONST	0x0342,0x0014
07a4 0348 0015  | H  |		.CONST	0x0348,0x0015
07a6 0349 0016  | I  |		.CONST	0x0349,0x0016
07a8 034b 0017  | K  |		.CONST	0x034b,0x0017
07aa 0350 0018  | P  |		.CONST	0x0350,0x0018
07ac 0353 0019  | S  |		.CONST	0x0353,0x0019
07ae 0353 1801  | S  |		.CONST	0x0353,0x1801
07b0 0355 001a  | U  |		.CONST	0x0355,0x001a
07b2 0358 001b  | X  |		.CONST	0x0358,0x001b
07b4 0358 1c01  | X  |		.CONST	0x0358,0x1c01
07b6 035a 001c  | Z  |		.CONST	0x035a,0x001c
07b8 035c 001d  | \  |		.CONST	0x035c,0x001d
07ba ; --------------------------------------------------------------------------------------
07ba ; Debug3 Subtable 0x1d
07ba ; --------------------------------------------------------------------------------------
07ba 0002 001b  |    |		.DBG3TAB	0x0002,0x001b
07bc 0363 ffff  | c  |		.CONST	0x0363,0xffff
07be 0364 fffe  | d  |		.CONST	0x0364,0xfffe
07c0 0365 0001  | e  |		.CONST	0x0365,0x0001
07c2 0369 0002  | i  |		.CONST	0x0369,0x0002
07c4 036b 0003  | k  |		.CONST	0x036b,0x0003
07c6 036d 0004  | m  |		.CONST	0x036d,0x0004
07c8 036f 0005  | o  |		.CONST	0x036f,0x0005
07ca 0371 0006  | q  |		.CONST	0x0371,0x0006
07cc 0373 0007  | s  |		.CONST	0x0373,0x0007
07ce 037b 0008  | {  |		.CONST	0x037b,0x0008
07d0 037d 0009  | }  |		.CONST	0x037d,0x0009
07d2 0385 000a  |    |		.CONST	0x0385,0x000a
07d4 0387 000b  |    |		.CONST	0x0387,0x000b
07d6 038f 000c  |    |		.CONST	0x038f,0x000c
07d8 0391 000d  |    |		.CONST	0x0391,0x000d
07da 0395 000e  |    |		.CONST	0x0395,0x000e
07dc 039d 000f  |    |		.CONST	0x039d,0x000f
07de 039f 0010  |    |		.CONST	0x039f,0x0010
07e0 03a3 0011  |    |		.CONST	0x03a3,0x0011
07e2 03a5 0012  |    |		.CONST	0x03a5,0x0012
07e4 03a7 0013  |    |		.CONST	0x03a7,0x0013
07e6 03ae 0014  |    |		.CONST	0x03ae,0x0014
07e8 03b5 0015  |    |		.CONST	0x03b5,0x0015
07ea 03bd 0016  |    |		.CONST	0x03bd,0x0016
07ec 03bf 0017  |    |		.CONST	0x03bf,0x0017
07ee 03c7 0018  |    |		.CONST	0x03c7,0x0018
07f0 03c9 0019  |    |		.CONST	0x03c9,0x0019
07f2 03d1 001a  |    |		.CONST	0x03d1,0x001a
07f4 03d3 001b  |    |		.CONST	0x03d3,0x001b
07f6 ; --------------------------------------------------------------------------------------
07f6 ; Debug3 Subtable 0x1e
07f6 ; --------------------------------------------------------------------------------------
07f6 0002 000e  |    |		.DBG3TAB	0x0002,0x000e
07f8 03db ffff  |    |		.CONST	0x03db,0xffff
07fa 03dc fffe  |    |		.CONST	0x03dc,0xfffe
07fc 03dd 0001  |    |		.CONST	0x03dd,0x0001
07fe 03df 0002  |    |		.CONST	0x03df,0x0002
0800 03e7 0003  |    |		.CONST	0x03e7,0x0003
0802 03e9 0004  |    |		.CONST	0x03e9,0x0004
0804 03eb 0005  |    |		.CONST	0x03eb,0x0005
0806 03f1 0006  |    |		.CONST	0x03f1,0x0006
0808 03f9 0007  |    |		.CONST	0x03f9,0x0007
080a 03ff 0008  |    |		.CONST	0x03ff,0x0008
080c 0403 0009  |    |		.CONST	0x0403,0x0009
080e 0409 000a  |    |		.CONST	0x0409,0x000a
0810 040d 000b  |    |		.CONST	0x040d,0x000b
0812 0413 000c  |    |		.CONST	0x0413,0x000c
0814 0417 000d  |    |		.CONST	0x0417,0x000d
0816 041d 000e  |    |		.CONST	0x041d,0x000e
0818 ; --------------------------------------------------------------------------------------
0818 ; Debug3 Subtable 0x1f
0818 ; --------------------------------------------------------------------------------------
0818 0002 0018  |    |		.DBG3TAB	0x0002,0x0018
081a 0423 ffff  | #  |		.CONST	0x0423,0xffff
081c 0428 0001  | (  |		.CONST	0x0428,0x0001
081e 042a 0002  | *  |		.CONST	0x042a,0x0002
0820 042c 0003  | ,  |		.CONST	0x042c,0x0003
0822 042e 0004  | .  |		.CONST	0x042e,0x0004
0824 0430 0005  | 0  |		.CONST	0x0430,0x0005
0826 043c 0006  | <  |		.CONST	0x043c,0x0006
0828 0440 0007  | @  |		.CONST	0x0440,0x0007
082a 0447 0008  | G  |		.CONST	0x0447,0x0008
082c 044b 0009  | K  |		.CONST	0x044b,0x0009
082e 044d 000a  | M  |		.CONST	0x044d,0x000a
0830 0452 000b  | R  |		.CONST	0x0452,0x000b
0832 0456 000c  | V  |		.CONST	0x0456,0x000c
0834 0458 000d  | X  |		.CONST	0x0458,0x000d
0836 045c 000e  | \  |		.CONST	0x045c,0x000e
0838 0461 000f  | a  |		.CONST	0x0461,0x000f
083a 046b 0010  | k  |		.CONST	0x046b,0x0010
083c 046d 0011  | m  |		.CONST	0x046d,0x0011
083e 0471 0012  | q  |		.CONST	0x0471,0x0012
0840 0473 0013  | s  |		.CONST	0x0473,0x0013
0842 0475 0014  | u  |		.CONST	0x0475,0x0014
0844 0477 0015  | w  |		.CONST	0x0477,0x0015
0846 047d 0017  | }  |		.CONST	0x047d,0x0017
0848 047e 0016  | ~  |		.CONST	0x047e,0x0016
084a 047e fbff  | ~  |		.CONST	0x047e,0xfbff
084c 0486 0401  |    |		.CONST	0x0486,0x0401
084e ; --------------------------------------------------------------------------------------
084e ; Debug3 Subtable 0x20
084e ; --------------------------------------------------------------------------------------
084e 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
0850 049b ffff  |    |		.CONST	0x049b,0xffff
0852 049e fffe  |    |		.CONST	0x049e,0xfffe
0854 04a2 0001  |    |		.CONST	0x04a2,0x0001
0856 04a6 0002  |    |		.CONST	0x04a6,0x0002
0858 04aa 0003  |    |		.CONST	0x04aa,0x0003
085a 04af 0004  |    |		.CONST	0x04af,0x0004
085c ; --------------------------------------------------------------------------------------
085c ; Debug3 Subtable 0x21
085c ; --------------------------------------------------------------------------------------
085c 0004 0001  |    |		.DBG3TAB	0x0004,0x0001
085e 04bb ffff  |    |		.CONST	0x04bb,0xffff
0860 04be fffe  |    |		.CONST	0x04be,0xfffe
0862 04bf fffd  |    |		.CONST	0x04bf,0xfffd
0864 04c0 fffc  |    |		.CONST	0x04c0,0xfffc
0866 04c8 0001  |    |		.CONST	0x04c8,0x0001
0868 0000 0000  |    |		.BLANK	0000[0x198]