DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦c47ac0652⟧

    Length: 5120 (0x1400)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0668       | h  |		.CONST	0x0668								; 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 008e       |    |		.CONST	0x008e								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001e       |    |		.CONST	0x001e								; Number of locals
000b			INIT_0008:
000b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x0 = .DEBUG	0x000b,0x0792,0x8000,0x0000,0x0059,0x8ba5,0x0000,0x000c
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
													; Debug Table 0x0.0x2 = 0xb,0xfffd
													; Debug Table 0x0.0x3 = 0xb,0xfffc
000c 032b       | +  |		Declare_Type	Record,Incomplete,Visible
000d 00c4       |    |		Action	Make_Default							; Debug Table 0x0.0x4 = 0xd,0xfffb
000e 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0xe,0xfffa
0010 029a 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x10,0xfff9
0012 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x0.0x7 = 0x12,0xfff8
0013 00e3       |    |		Load_Encached	Natural_Cache
0014 02a0       |    |		Declare_Subprogram	Null_Subprogram
0015 4802       |H   |		Short_Literal	0x2
0016 032e       | .  |		Declare_Type	Record,Defined,Visible
0017 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x8 = 0x17,0xfff7
0018 0322       | "  |		Declare_Variable	Record
0019 4800       |H   |		Short_Literal	0x0
001a 00d9       |    |		Load_Top	At_Offset_1
001b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
001c 4800       |H   |		Short_Literal	0x0
001d 00d9       |    |		Load_Top	At_Offset_1
001e 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
001f 0129       | )  |		Execute	Any,Make_Visible
0020 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x0.0x9 = 0x20,0xfff6
0021 0322       | "  |		Declare_Variable	Record
0022 4801       |H   |		Short_Literal	0x1
0023 00d9       |    |		Load_Top	At_Offset_1
0024 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0025 4801       |H   |		Short_Literal	0x1
0026 00d9       |    |		Load_Top	At_Offset_1
0027 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0028 0129       | )  |		Execute	Any,Make_Visible
0029 60ee       |`   |		Indirect_Literal	Discrete,0x118,{0x00000000, 0x598ba501}		; Debug Table 0x0.0xa = 0x29,0xfff5
002a 0129       | )  |		Execute	Any,Make_Visible
002b 60e8       |`   |		Indirect_Literal	Discrete,0x114,{0x00000000, 0x598ba502}		; Debug Table 0x0.0xb = 0x2b,0xfff4
002c 0129       | )  |		Execute	Any,Make_Visible
002d 60e2       |`   |		Indirect_Literal	Discrete,0x110,{0x00000000, 0x598ba503}		; Debug Table 0x0.0xc = 0x2d,0xfff3
002e 0129       | )  |		Execute	Any,Make_Visible
002f 60dc       |`   |		Indirect_Literal	Discrete,0x10c,{0x00000000, 0x598ba504}		; Debug Table 0x0.0xd = 0x2f,0xfff2
0030 0129       | )  |		Execute	Any,Make_Visible
0031 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0xe = 0x31,0xfff1
0032 60d5       |`   |		Indirect_Literal	Discrete,0x108,{0x006cd40e, 0x00003430}
0033 02a0       |    |		Declare_Subprogram	Null_Subprogram
0034 038f       |    |		Declare_Type	Package,Defined,Visible
0035 0386       |    |		Declare_Variable	Package,Visible
0036 e211       |    |		Load	0x1,0x11							; Debug Table 0x0.0xf = 0x36,0xfff0
0037 00e3       |    |		Load_Encached	Natural_Cache
0038 00e5       |    |		Load_Encached	Long_Integer_Cache
0039 02a0       |    |		Declare_Subprogram	Null_Subprogram
003a 4803       |H   |		Short_Literal	0x3
003b 032e       | .  |		Declare_Type	Record,Defined,Visible
003c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x10 = 0x3c,0xffef
003d 0322       | "  |		Declare_Variable	Record
003e e212       |    |		Load	0x1,0x12
003f 00d9       |    |		Load_Top	At_Offset_1
0040 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0041 4800       |H   |		Short_Literal	0x0
0042 00d9       |    |		Load_Top	At_Offset_1
0043 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0044 4800       |H   |		Short_Literal	0x0
0045 00d9       |    |		Load_Top	At_Offset_1
0046 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0047 0129       | )  |		Execute	Any,Make_Visible
0048 4803       |H   |		Short_Literal	0x3							; Debug Table 0x0.0x11 = 0x48,0xffee
0049 60ba       |`   |		Indirect_Literal	Discrete,0x104,{0x006cd40e, 0x00001230}
004a 02a0       |    |		Declare_Subprogram	Null_Subprogram
004b 038d       |    |		Declare_Type	Package,Defined,Visible,Not_Elaborated
004c e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x12 = 0x4c,0xffed
004d 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
004e e002       |    |		Load	0x0,0x2
004f 1b66       | f  |		Execute	Package,Field_Read,Field_Number 0x66
0050 029f 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Call
0052 e20d       |    |		Load	0x1,0xd
0053 0326       | &  |		Complete_Type	Record,By_Defining
0054 e20d       |    |		Load	0x1,0xd								; Debug Table 0x0.0x13 = 0x54,0xffec
0055 0322       | "  |		Declare_Variable	Record
0056 e001       |    |		Load	0x0,0x1
0057 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0058 00d9       |    |		Load_Top	At_Offset_1
0059 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
005a e002       |    |		Load	0x0,0x2
005b 1b67       | g  |		Execute	Package,Field_Read,Field_Number 0x67
005c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
005d e002       |    |		Load	0x0,0x2
005e 1b66       | f  |		Execute	Package,Field_Read,Field_Number 0x66
005f 0119       |    |		Execute	Any,Check_In_Formal_Type
0060 00d9       |    |		Load_Top	At_Offset_1
0061 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0062 0129       | )  |		Execute	Any,Make_Visible
0063 c20e       |    |		Store	0x1,0xe
0064 00bf       |    |		Action	Accept_Activation
0065 029d 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call			; Debug Table 0x1 = .DEBUG	0x0065,0x07bc,0x8000,0x0000,0x0059,0x8c85,0x0000,0x0019
													; Debug Table 0x1.0x0 = 0x65,0xffff
													; Debug Table 0x1.0x1 = 0x65,0xfffe
0067 029d 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call			; Debug Table 0x1.0x2 = 0x67,0xfffd
0069 029d 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call			; Debug Table 0x1.0x3 = 0x69,0xfffc
006b 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x4 = 0x6b,0xfffb
006c 00c7       |    |		Action	Elaborate_Subprogram
006d 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x5 = 0x6d,0xfffa
006e 00c7       |    |		Action	Elaborate_Subprogram
006f e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x6 = 0x6f,0xfff9
0070 e003       |    |		Load	0x0,0x3
0071 e002       |    |		Load	0x0,0x2
0072 e004       |    |		Load	0x0,0x4
0073 00b6       |    |		Action	Make_Scope
0074 e005       |    |		Load	0x0,0x5
0075 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0076 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0077 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0078 e006       |    |		Load	0x0,0x6
0079 e007       |    |		Load	0x0,0x7
007a e008       |    |		Load	0x0,0x8
007b 480c       |H   |		Short_Literal	0xc
007c e218       |    |		Load	0x1,0x18
007d 020e       |    |		Execute	Module,Augment_Imports
007e e218       |    |		Load	0x1,0x18
007f 020f       |    |		Execute	Module,Activate
0080 e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x7 = 0x80,0xfff8
0081 e009       |    |		Load	0x0,0x9
0082 e001       |    |		Load	0x0,0x1
0083 e004       |    |		Load	0x0,0x4
0084 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0085 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0086 e00a       |    |		Load	0x0,0xa
0087 00b6       |    |		Action	Make_Scope
0088 e003       |    |		Load	0x0,0x3
0089 4809       |H   |		Short_Literal	0x9
008a e21b       |    |		Load	0x1,0x1b
008b 020e       |    |		Execute	Module,Augment_Imports
008c 00db       |    |		Load_Top	At_Offset_3
008d 020d       |    |		Execute	Module,Elaborate
008e			BODY_0008:
008e 00bc       |    |		Action	Signal_Activated
008f 00bb       |    |		Action	Signal_Completion
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093       |    |		.CONST	0x0093								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0001       |    |		.CONST	0x0001								; Number of locals
0093			BODY_0090:
0093			INIT_0090:
0093 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2 = .DEBUG	0x0093,0x07ce,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x0026
													; Debug Table 0x2.0x0 = 0x93,0x1
0094 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0095 e001       |    |		Load	0x0,0x1
0096 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0097 e002       |    |		Load	0x0,0x2
0098 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0099 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
009a 0000 0000  |    |		.BLANK	0000[0x6]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3       |    |		.CONST	0x00a3								; Address of begin
00a1 0004       |    |		.CONST	0x0004								; Address of exception handler
00a2 0001       |    |		.CONST	0x0001								; Number of locals
00a3			BODY_00a0:
00a3			INIT_00a0:
00a3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x00a3,0x07d2,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x002f
													; Debug Table 0x3.0x0 = 0xa3,0x1
00a4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00a5 e002       |    |		Load	0x0,0x2
00a6 1b67       | g  |		Execute	Package,Field_Read,Field_Number 0x67
00a7 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
00a8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00a9 0000 0000  |    |		.BLANK	0000[0x7]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3       |    |		.CONST	0x00b3								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0001       |    |		.CONST	0x0001								; Number of locals
00b3			BODY_00b0:
00b3			INIT_00b0:
00b3 4608       |F   |		Jump_Case	0x9							; Debug Table 0x4 = .DEBUG	0x00b3,0x07d6,0x0005,0x0000,0x0059,0x8ba5,0x0000,0x01a6
00b4 7808       |x   |		Jump	0xbd								; case 0x0
00b5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
00b6 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
00b7 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
00b8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
00b9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
00ba 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
00bb 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
00bc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
00bd 00da       |    |		Load_Top	At_Offset_2
00be 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
00bf 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00c0 00da       |    |		Load_Top	At_Offset_2
00c1 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00c2 0125       | %  |		Execute	Any,Set_Constraint
00c3 00da       |    |		Load_Top	At_Offset_2
00c4 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00c5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00c6 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
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 e211       |    |		Load	0x1,0x11							; Debug Table 0x5 = .DEBUG	0x00cb,0x07d8,0x0002,0x0000,0x0059,0x8c85,0x0000,0x001d
													; Debug Table 0x5.0x0 = 0xcb,0x1
00cc 0322       | "  |		Declare_Variable	Record
00cd 00db       |    |		Load_Top	At_Offset_3
00ce 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00cf 00d9       |    |		Load_Top	At_Offset_1
00d0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00d1 00db       |    |		Load_Top	At_Offset_3
00d2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00d3 00d9       |    |		Load_Top	At_Offset_1
00d4 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00d5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d6 0000 0000  |    |		.XXX[0x2]
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 e00a       |    |		Load	0x0,0xa								; Debug Table 0x6 = .DEBUG	0x00db,0x07dc,0x0002,0x0000,0x0059,0x8c85,0x0000,0x0034
													; Debug Table 0x6.0x0 = 0xdb,0x1
00dc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00dd 0322       | "  |		Declare_Variable	Record
00de 00db       |    |		Load_Top	At_Offset_3
00df 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00e0 00d9       |    |		Load_Top	At_Offset_1
00e1 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00e2 00db       |    |		Load_Top	At_Offset_3
00e3 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00e4 00d9       |    |		Load_Top	At_Offset_1
00e5 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x00eb,0x07e0,0x0001,0x0000,0x0059,0x8c85,0x0000,0x004b
													; Debug Table 0x7.0x0 = 0xeb,0x1
00ec 460d       |F   |		Jump_Case	0xe
00ed 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x0
00ee 7812       |x   |		Jump	0x101								; case 0x1
00ef 7811       |x   |		Jump	0x101								; case 0x2
00f0 7810       |x   |		Jump	0x101								; case 0x3
00f1 780f       |x   |		Jump	0x101								; case 0x4
00f2 780e       |x   |		Jump	0x101								; case 0x5
00f3 780d       |x   |		Jump	0x101								; case 0x6
00f4 7806       |x   |		Jump	0xfb								; case 0x7
00f5 7807       |x   |		Jump	0xfd								; case 0x8
00f6 7808       |x   |		Jump	0xff								; case 0x9
00f7 7805       |x   |		Jump	0xfd								; case 0xa
00f8 7808       |x   |		Jump	0x101								; case 0xb
00f9 7807       |x   |		Jump	0x101								; case 0xc
00fa 7806       |x   |		Jump	0x101								; case 0xd
00fb e217       |    |		Load	0x1,0x17							; Debug Table 0x7.0x1 = 0xfb,0x3
00fc 0257       | W  |		Execute	Discrete,Raise
00fd e216       |    |		Load	0x1,0x16							; Debug Table 0x7.0x2 = 0xfd,0x4
00fe 0257       | W  |		Execute	Discrete,Raise
00ff e214       |    |		Load	0x1,0x14							; Debug Table 0x7.0x3 = 0xff,0x5
0100 0257       | W  |		Execute	Discrete,Raise
0101 e215       |    |		Load	0x1,0x15							; Debug Table 0x7.0x4 = 0x101,0x6
0102 0257       | W  |		Execute	Discrete,Raise
0103 0000       |    |		.XXX[0x1]
0104 006c d40e  | l  |		.LITERAL	{0x006cd40e, 0x00001230}
0108 006c d40e  | l  |		.LITERAL	{0x006cd40e, 0x00003430}
010c 0000 0000  |    |		.LITERAL	{0x00000000, 0x598ba504}
0110 0000 0000  |    |		.LITERAL	{0x00000000, 0x598ba503}
0114 0000 0000  |    |		.LITERAL	{0x00000000, 0x598ba502}
0118 0000 0000  |    |		.LITERAL	{0x00000000, 0x598ba501}
011c 0000 0000  |    |		.BLANK	0000[0x4]
0120 0140 0004  | @  |		.XXX[0x3]
0122 0016       |    |
0123 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x8 = .DEBUG	0x0123,0x07ec,0x4000,0x0000,0x0059,0x8ba5,0x0000,0x013f
													; Debug Table 0x8.0x0 = 0x123,0xffff
0125 029a 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x8.0x1 = 0x125,0xfffe
0127 029a 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x8.0x2 = 0x127,0xfffd
0129 029a 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x8.0x3 = 0x129,0xfffc
012b 00bf       |    |		Action	Accept_Activation
012c 029d 0263  |   c|		Declare_Subprogram	INIT_0260,For_Outer_Call			; Debug Table 0x9 = .DEBUG	0x012c,0x07f6,0x4000,0x0000,0x0059,0x8c85,0x0000,0x049c
													; Debug Table 0x9.0x0 = 0x12c,0xffff
012e 029d 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call			; Debug Table 0x9.0x1 = 0x12e,0xfffe
0130 6207       |b   |		Indirect_Literal	Discrete,0x338,{0x00000000, 0x00598c85}		; Debug Table 0x9.0x2 = 0x130,0xfffd
0131 6202       |b   |		Indirect_Literal	Discrete,0x334,{0x00000000, 0x0000057e}
0132 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0133 e001       |    |		Load	0x0,0x1
0134 1b60       | `  |		Execute	Package,Field_Read,Field_Number 0x60
0135 0387       |    |		Declare_Variable	Package
0136 00d8       |    |		Load_Top	At_Offset_0
0137 020f       |    |		Execute	Module,Activate
0138 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x9.0x3 = 0x138,0xfffc
0139 00c7       |    |		Action	Elaborate_Subprogram
013a 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x9.0x4 = 0x13a,0xfffb
013b 00c7       |    |		Action	Elaborate_Subprogram
013c 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x9.0x5 = 0x13c,0xfffa
013d 00c7       |    |		Action	Elaborate_Subprogram
013e 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x9.0x6 = 0x13e,0xfff9
013f 00c7       |    |		Action	Elaborate_Subprogram
0140 00bc       |    |		Action	Signal_Activated
0141 00bb       |    |		Action	Signal_Completion
0142 0000 0000  |    |		.BLANK	0000[0x6]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0157       | W  |		.CONST	0x0157								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0005       |    |		.CONST	0x0005								; Number of locals
014b			INIT_0148:
014b e002       |    |		Load	0x0,0x2								; Debug Table 0xa = .DEBUG	0x014b,0x0806,0x1001,0x0000,0x0059,0x8ba5,0x0000,0x014e
													; Debug Table 0xa.0x0 = 0x14b,0xffff
014c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
014d 02c7       |    |		Declare_Variable	Any
014e 00d8       |    |		Load_Top	At_Offset_0
014f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0150 e003       |    |		Load	0x0,0x3								; Debug Table 0xa.0x1 = 0x150,0xfffe
0151 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0152 e004       |    |		Load	0x0,0x4								; Debug Table 0xa.0x2 = 0x152,0xfffd
0153 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
0154 0322       | "  |		Declare_Variable	Record
0155 e004       |    |		Load	0x0,0x4								; Debug Table 0xa.0x3 = 0x155,0xfffc
0156 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0157			BODY_0148:
0157 e003       |    |		Load	0x0,0x3								; Debug Table 0xa.0x4 = 0x157,0x1
0158 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0159 e004       |    |		Load	0x0,0x4
015a 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
015b e402       |    |		Load	0x2,0x2
015c 0120       |    |		Execute	Any,Is_Value
015d 6803       |h   |		Jump_Zero	0x161
015e e002       |    |		Load	0x0,0x2
015f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0160 7801       |x   |		Jump	0x162
0161 e402       |    |		Load	0x2,0x2
0162 4800       |H   |		Short_Literal	0x0
0163 e5ff       |    |		Load	0x2,-0x1
0164 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0165 e003       |    |		Load	0x0,0x3
0166 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
0167 c402       |    |		Store	0x2,0x2
0168 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0169 005b       | [  |		Store_Top	Discrete,At_Offset_3
016a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x5 = 0x16a,0x2
016b 8005       |    |		Call	0x0,0x5
016c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x6 = 0x16c,0x3
016d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
016e e216       |    |		Load	0x1,0x16
016f 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0170 e5fe       |    |		Load	0x2,-0x2
0171 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0172 00e4       |    |		Load_Encached	Positive_Cache
0173 025b       | [  |		Execute	Discrete,Check_In_Type
0174 e5fe       |    |		Load	0x2,-0x2
0175 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0176 8006       |    |		Call	0x0,0x6
0177 e402       |    |		Load	0x2,0x2
0178 e001       |    |		Load	0x0,0x1
0179 1887       |    |		Execute	Package,Field_Execute,Field_Number 0x87
017a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x7 = 0x17a,0x4
017b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
017c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
017d 0aff       |    |		Execute_Immediate	Plus,-0x1
017e 00da       |    |		Load_Top	At_Offset_2
017f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0180 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x8 = 0x180,0x5
0181 00da       |    |		Load_Top	At_Offset_2
0182 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0183 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x9 = 0x183,0x6
0184 00da       |    |		Load_Top	At_Offset_2
0185 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0186 e003       |    |		Load	0x0,0x3								; Debug Table 0xa.0xa = 0x186,0x7
0187 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0188 00da       |    |		Load_Top	At_Offset_2
0189 e5ff       |    |		Load	0x2,-0x1
018a 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
018b e003       |    |		Load	0x0,0x3
018c 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
018d 005b       | [  |		Store_Top	Discrete,At_Offset_3
018e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0xb = 0x18e,0x8
018f 8005       |    |		Call	0x0,0x5
0190 e003       |    |		Load	0x0,0x3								; Debug Table 0xa.0xc = 0x190,0x9
0191 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0192 00d9       |    |		Load_Top	At_Offset_1
0193 e5ff       |    |		Load	0x2,-0x1
0194 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0195 e003       |    |		Load	0x0,0x3
0196 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
0197 005b       | [  |		Store_Top	Discrete,At_Offset_3
0198 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0xd = 0x198,0xa
0199 8005       |    |		Call	0x0,0x5
019a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
019b 0000 0000  |    |		.BLANK	0000[0x5]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01b2       |    |		.CONST	0x01b2								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0004       |    |		.CONST	0x0004								; Number of locals
01a3			INIT_01a0:
01a3 e001       |    |		Load	0x0,0x1								; Debug Table 0xb = .DEBUG	0x01a3,0x0824,0x1001,0x0000,0x0059,0x8ba5,0x0000,0x015a
													; Debug Table 0xb.0x0 = 0x1a3,0xffff
01a4 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01a5 02c7       |    |		Declare_Variable	Any
01a6 00d8       |    |		Load_Top	At_Offset_0
01a7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01a8 e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x1 = 0x1a8,0xfffe
01a9 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01aa 0322       | "  |		Declare_Variable	Record
01ab 00d8       |    |		Load_Top	At_Offset_0
01ac 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01ad e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x2 = 0x1ad,0xfffd
01ae 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01af 0322       | "  |		Declare_Variable	Record
01b0 00d8       |    |		Load_Top	At_Offset_0
01b1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01b2			BODY_01a0:
01b2 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x3 = 0x1b2,0x1
01b3 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
01b4 e003       |    |		Load	0x0,0x3
01b5 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
01b6 c402       |    |		Store	0x2,0x2
01b7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x4 = 0x1b7,0x2
01b8 00da       |    |		Load_Top	At_Offset_2
01b9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01ba e007       |    |		Load	0x0,0x7								; Debug Table 0xb.0x5 = 0x1ba,0x3
01bb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01bc 0322       | "  |		Declare_Variable	Record
01bd e5fe       |    |		Load	0x2,-0x2
01be 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01bf 00d9       |    |		Load_Top	At_Offset_1
01c0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01c1 e5fe       |    |		Load	0x2,-0x2
01c2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01c3 00d9       |    |		Load_Top	At_Offset_1
01c4 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01c5 00da       |    |		Load_Top	At_Offset_2
01c6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01c7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x6 = 0x1c7,0x4
01c8 00d9       |    |		Load_Top	At_Offset_1
01c9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01ca e007       |    |		Load	0x0,0x7								; Debug Table 0xb.0x7 = 0x1ca,0x5
01cb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01cc 0322       | "  |		Declare_Variable	Record
01cd e5fd       |    |		Load	0x2,-0x3
01ce 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01cf 00d9       |    |		Load_Top	At_Offset_1
01d0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01d1 e5fd       |    |		Load	0x2,-0x3
01d2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01d3 00d9       |    |		Load_Top	At_Offset_1
01d4 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01d5 00d9       |    |		Load_Top	At_Offset_1
01d6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01d7 e216       |    |		Load	0x1,0x16							; Debug Table 0xb.0x8 = 0x1d7,0x6
01d8 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01d9 00d9       |    |		Load_Top	At_Offset_1
01da 00db       |    |		Load_Top	At_Offset_3
01db e001       |    |		Load	0x0,0x1
01dc 1b62       | b  |		Execute	Package,Field_Read,Field_Number 0x62
01dd 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
01de 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01df 0000       |    |		.XXX[0x1]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01f7       |    |		.CONST	0x01f7								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0009       |    |		.CONST	0x0009								; Number of locals
01e3			INIT_01e0:
01e3 e008       |    |		Load	0x0,0x8								; Debug Table 0xc = .DEBUG	0x01e3,0x0838,0x1002,0x0000,0x0059,0x8ba5,0x0000,0x016a
													; Debug Table 0xc.0x0 = 0x1e3,0xffff
01e4 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01e5 0322       | "  |		Declare_Variable	Record
01e6 e008       |    |		Load	0x0,0x8
01e7 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01e8 00d9       |    |		Load_Top	At_Offset_1
01e9 017d       | }  |		Execute	Record,Structure_Write
01ea 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xc.0x1 = 0x1ea,0xfffe
01eb 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
01ec 029f 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Call				; Debug Table 0xc.0x2 = 0x1ec,0xfffd
01ee 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0xc.0x3 = 0x1ee,0xfffc
01ef 00c6       |    |		Action	Check_Subprogram_Elaborated
01f0 00e3       |    |		Load_Encached	Natural_Cache
01f1 4804       |H   |		Short_Literal	0x4
01f2 4802       |H   |		Short_Literal	0x2
01f3 0099       |    |		Action	Reference_Dynamic
01f4 6143       |aC  |		Indirect_Literal	Discrete,0x338,{0x00000000, 0x00598c85}
01f5 613a       |a:  |		Indirect_Literal	Discrete,0x330,{0x00000000, 0x00000702}
01f6 4809       |H   |		Short_Literal	0x9
01f7			BODY_01e0:
01f7 e403       |    |		Load	0x2,0x3								; Debug Table 0xc.0x4 = 0x1f7,0x1
01f8 4801       |H   |		Short_Literal	0x1
01f9 e008       |    |		Load	0x0,0x8
01fa 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
01fb e5ff       |    |		Load	0x2,-0x1
01fc e405       |    |		Load	0x2,0x5
01fd 4806       |H   |		Short_Literal	0x6
01fe 4802       |H   |		Short_Literal	0x2
01ff 0099       |    |		Action	Reference_Dynamic
0200 4807       |H   |		Short_Literal	0x7
0201 4802       |H   |		Short_Literal	0x2
0202 0099       |    |		Action	Reference_Dynamic
0203 8213       |    |		Call	0x1,0x13
0204 c403       |    |		Store	0x2,0x3
0205 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x5 = 0x205,0x2
0206 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0207 0000       |    |		.XXX[0x1]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 021f       |    |		.CONST	0x021f								; Address of begin
0209 024f       | O  |		.CONST	0x024f								; Address of exception handler
020a 0009       |    |		.CONST	0x0009								; Number of locals
020b			INIT_0208:
020b e002       |    |		Load	0x0,0x2								; Debug Table 0xd = .DEBUG	0x020b,0x0846,0x3801,0x0002,0x0059,0x8ba5,0x0000,0x0177
													; Debug Table 0xd.0x0 = 0x20b,0xffff
020c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
020d 02c7       |    |		Declare_Variable	Any
020e 00d8       |    |		Load_Top	At_Offset_0
020f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0210 e003       |    |		Load	0x0,0x3								; Debug Table 0xd.0x1 = 0x210,0xfffe
0211 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0212 e004       |    |		Load	0x0,0x4								; Debug Table 0xd.0x2 = 0x212,0xfffd
0213 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0214 029f 030b  |    |		Declare_Subprogram	INIT_0308,For_Call				; Debug Table 0xd.0x3 = 0x214,0xfffc
													; Debug Table 0xd.0x4 = 0x214,0xfffb
0216 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x5 = 0x216,0xfffa
0217 198c       |    |		Execute	Package,Field_Reference,Field_Number 0x8c
0218 00c6       |    |		Action	Check_Subprogram_Elaborated
0219 4805       |H   |		Short_Literal	0x5
021a 4802       |H   |		Short_Literal	0x2
021b 0099       |    |		Action	Reference_Dynamic
021c 611b       |a   |		Indirect_Literal	Discrete,0x338,{0x00000000, 0x00598c85}
021d 610e       |a   |		Indirect_Literal	Discrete,0x32c,{0x00000000, 0x0000078e}
021e 4809       |H   |		Short_Literal	0x9
021f			BODY_0208:
021f e003       |    |		Load	0x0,0x3								; Debug Table 0xd.0x6 = 0x21f,0x1
0220 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0221 e004       |    |		Load	0x0,0x4
0222 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0223 e402       |    |		Load	0x2,0x2
0224 0120       |    |		Execute	Any,Is_Value
0225 6803       |h   |		Jump_Zero	0x229
0226 e002       |    |		Load	0x0,0x2
0227 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0228 7801       |x   |		Jump	0x22a
0229 e402       |    |		Load	0x2,0x2
022a 4800       |H   |		Short_Literal	0x0
022b e5fc       |    |		Load	0x2,-0x4
022c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
022d e003       |    |		Load	0x0,0x3
022e 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
022f c402       |    |		Store	0x2,0x2
0230 c404       |    |		Store	0x2,0x4
0231 c403       |    |		Store	0x2,0x3
0232 e403       |    |		Load	0x2,0x3								; Debug Table 0xd.0x7 = 0x232,0x2
0233 8005       |    |		Call	0x0,0x5
0234 e216       |    |		Load	0x1,0x16							; Debug Table 0xd.0x8 = 0x234,0x3
0235 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0236 e5fa       |    |		Load	0x2,-0x6
0237 e5fb       |    |		Load	0x2,-0x5
0238 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0239 e5fb       |    |		Load	0x2,-0x5
023a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
023b e402       |    |		Load	0x2,0x2
023c 4806       |H   |		Short_Literal	0x6
023d 4802       |H   |		Short_Literal	0x2
023e 0099       |    |		Action	Reference_Dynamic
023f 4807       |H   |		Short_Literal	0x7
0240 4802       |H   |		Short_Literal	0x2
0241 0099       |    |		Action	Reference_Dynamic
0242 e001       |    |		Load	0x0,0x1
0243 188c       |    |		Execute	Package,Field_Execute,Field_Number 0x8c
0244 e003       |    |		Load	0x0,0x3								; Debug Table 0xd.0x9 = 0x244,0x4
0245 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0246 e404       |    |		Load	0x2,0x4
0247 e5fc       |    |		Load	0x2,-0x4
0248 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0249 e003       |    |		Load	0x0,0x3
024a 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
024b c403       |    |		Store	0x2,0x3
024c e403       |    |		Load	0x2,0x3								; Debug Table 0xd.0xa = 0x24c,0x5
024d 8005       |    |		Call	0x0,0x5
024e 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
024f			TRAP_0208:
024f 60d8       |`   |		Indirect_Literal	Discrete,0x328,{0x00000000, 0x598c8502}
0250 010f       |    |		Execute	Exception,Equal
0251 680b       |h   |		Jump_Zero	0x25d
0252 e003       |    |		Load	0x0,0x3								; Debug Table 0xd.0xb = 0x252,0x6
0253 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0254 e404       |    |		Load	0x2,0x4
0255 e5fc       |    |		Load	0x2,-0x4
0256 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0257 e003       |    |		Load	0x0,0x3
0258 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
0259 c403       |    |		Store	0x2,0x3
025a e403       |    |		Load	0x2,0x3								; Debug Table 0xd.0xc = 0x25a,0x7
025b 8005       |    |		Call	0x0,0x5
025c 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
025d 0100       |    |		Execute	Exception,Raise
025e 0000 0000  |    |		.XXX[0x2]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0279       | y  |		.CONST	0x0279								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0004       |    |		.CONST	0x0004								; Number of locals
0263			INIT_0260:
0263 e001       |    |		Load	0x0,0x1								; Debug Table 0xe = .DEBUG	0x0263,0x0862,0x1002,0x0000,0x0059,0x8c85,0x0000,0x049d
													; Debug Table 0xe.0x0 = 0x263,0xffff
0264 1b69       | i  |		Execute	Package,Field_Read,Field_Number 0x69
0265 02c7       |    |		Declare_Variable	Any
0266 00d8       |    |		Load_Top	At_Offset_0
0267 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0268 e004       |    |		Load	0x0,0x4								; Debug Table 0xe.0x1 = 0x268,0xfffe
0269 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
026a 0322       | "  |		Declare_Variable	Record
026b e5ff       |    |		Load	0x2,-0x1
026c e001       |    |		Load	0x0,0x1
026d 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
026e 00d9       |    |		Load_Top	At_Offset_1
026f 017d       | }  |		Execute	Record,Structure_Write
0270 e009       |    |		Load	0x0,0x9								; Debug Table 0xe.0x2 = 0x270,0xfffd
0271 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0272 e009       |    |		Load	0x0,0x9
0273 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0274 e003       |    |		Load	0x0,0x3
0275 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0276 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0277 e003       |    |		Load	0x0,0x3
0278 1849       | I  |		Execute	Package,Field_Execute,Field_Number 0x49
0279			BODY_0260:
0279 00be       |    |		Action	Activate_Tasks
027a 00cf       |    |		Action	Mark_Auxiliary
027b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x3 = 0x27b,0x1
027c 01d9       |    |		Execute	Vector,Reverse_Bounds
027d 0263       | c  |		Execute	Discrete,Above_Bound
027e 702b       |p+  |		Jump_Nonzero	0x2aa
027f e403       |    |		Load	0x2,0x3								; Debug Table 0xe.0x4 = 0x27f,0x2
0280 00d9       |    |		Load_Top	At_Offset_1
0281 e404       |    |		Load	0x2,0x4
0282 01d5       |    |		Execute	Vector,Field_Reference
0283 e003       |    |		Load	0x0,0x3
0284 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0285 017f       |    |		Execute	Record,Equal
0286 6821       |h!  |		Jump_Zero	0x2a8
0287 e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x5 = 0x287,0x3
0288 00d9       |    |		Load_Top	At_Offset_1
0289 e404       |    |		Load	0x2,0x4
028a 01d5       |    |		Execute	Vector,Field_Reference
028b e003       |    |		Load	0x0,0x3
028c 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
028d e001       |    |		Load	0x0,0x1
028e 186a       | j  |		Execute	Package,Field_Execute,Field_Number 0x6a
028f c402       |    |		Store	0x2,0x2
0290 e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x6 = 0x290,0x4
0291 e001       |    |		Load	0x0,0x1
0292 186c       | l  |		Execute	Package,Field_Execute,Field_Number 0x6c
0293 6803       |h   |		Jump_Zero	0x297
0294 e008       |    |		Load	0x0,0x8								; Debug Table 0xe.0x7 = 0x294,0x5
0295 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0296 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0297 e008       |    |		Load	0x0,0x8								; Debug Table 0xe.0x8 = 0x297,0x6
0298 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0299 0322       | "  |		Declare_Variable	Record
029a 00d9       |    |		Load_Top	At_Offset_1
029b e404       |    |		Load	0x2,0x4
029c 01d5       |    |		Execute	Vector,Field_Reference
029d 00d9       |    |		Load_Top	At_Offset_1
029e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
029f e402       |    |		Load	0x2,0x2
02a0 e001       |    |		Load	0x0,0x1
02a1 186d       | m  |		Execute	Package,Field_Execute,Field_Number 0x6d
02a2 e001       |    |		Load	0x0,0x1
02a3 1b66       | f  |		Execute	Package,Field_Read,Field_Number 0x66
02a4 0119       |    |		Execute	Any,Check_In_Formal_Type
02a5 00d9       |    |		Load_Top	At_Offset_1
02a6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02a7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02a8 00c8       |    |		Action	Pop_Auxiliary_Range
02a9 3fd5       |?   |		Loop_Increasing	0x27f
02aa 00ce       |    |		Action	Pop_Auxiliary
02ab e008       |    |		Load	0x0,0x8								; Debug Table 0xe.0x9 = 0x2ab,0x7
02ac 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02ad 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ae 0000 0000  |    |		.XXX[0x2]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02ba       |    |		.CONST	0x02ba								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0003       |    |		.CONST	0x0003								; Number of locals
02b3			INIT_02b0:
02b3 e008       |    |		Load	0x0,0x8								; Debug Table 0xf = .DEBUG	0x02b3,0x0878,0x1001,0x0000,0x0059,0x8c85,0x0000,0x0521
													; Debug Table 0xf.0x0 = 0x2b3,0xffff
02b4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02b5 0322       | "  |		Declare_Variable	Record
02b6 00d8       |    |		Load_Top	At_Offset_0
02b7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02b8 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xf.0x1 = 0x2b8,0xfffe
02b9 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
02ba			BODY_02b0:
02ba 00cf       |    |		Action	Mark_Auxiliary
02bb e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xf.0x2 = 0x2bb,0x1
02bc 01d9       |    |		Execute	Vector,Reverse_Bounds
02bd 0263       | c  |		Execute	Discrete,Above_Bound
02be 701d       |p   |		Jump_Nonzero	0x2dc
02bf 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xf.0x3 = 0x2bf,0x2
02c0 7004       |p   |		Jump_Nonzero	0x2c5
02c1 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf.0x4 = 0x2c1,0x3
02c2 8214       |    |		Call	0x1,0x14
02c3 e402       |    |		Load	0x2,0x2
02c4 017d       | }  |		Execute	Record,Structure_Write
02c5 e008       |    |		Load	0x0,0x8								; Debug Table 0xf.0x5 = 0x2c5,0x4
02c6 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
02c7 0322       | "  |		Declare_Variable	Record
02c8 00d8       |    |		Load_Top	At_Offset_0
02c9 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
02ca e5fd       |    |		Load	0x2,-0x3
02cb 00d9       |    |		Load_Top	At_Offset_1
02cc 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02cd e5fc       |    |		Load	0x2,-0x4
02ce 00d0       |    |		Action	Swap_Control
02cf 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02d0 e5fb       |    |		Load	0x2,-0x5
02d1 00d9       |    |		Load_Top	At_Offset_1
02d2 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02d3 00d9       |    |		Load_Top	At_Offset_1
02d4 e5fe       |    |		Load	0x2,-0x2
02d5 01d7       |    |		Execute	Vector,Field_Read
02d6 00d9       |    |		Load_Top	At_Offset_1
02d7 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
02d8 e402       |    |		Load	0x2,0x2
02d9 820f       |    |		Call	0x1,0xf
02da 00c8       |    |		Action	Pop_Auxiliary_Range
02db 3fe3       |?   |		Loop_Increasing	0x2bf
02dc 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
02dd 0000 0000  |    |		.XXX[0x3]
02df 0000       |    |
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e3       |    |		.CONST	0x02e3								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0001       |    |		.CONST	0x0001								; Number of locals
02e3			BODY_02e0:
02e3			INIT_02e0:
02e3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10 = .DEBUG	0x02e3,0x0886,0x1001,0x0000,0x0059,0x8c85,0x0000,0x06af
													; Debug Table 0x10.0x0 = 0x2e3,0x1
02e4 a7fd       |    |		Store_Unchecked	0x3,-0x3
02e5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x1 = 0x2e5,0x2
02e6 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
02e7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02e8 e5fe       |    |		Load	0x2,-0x2
02e9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02ea 027c       | |  |		Execute	Discrete,Less
02eb 6801       |h   |		Jump_Zero	0x2ed
02ec 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x10.0x2 = 0x2ec,0x3
02ed 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x3 = 0x2ed,0x4
02ee 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
02ef 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02f0 e5fe       |    |		Load	0x2,-0x2
02f1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02f2 027a       | z  |		Execute	Discrete,Less_Equal
02f3 6811       |h   |		Jump_Zero	0x305
02f4 00da       |    |		Load_Top	At_Offset_2
02f5 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
02f6 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02f7 00db       |    |		Load_Top	At_Offset_3
02f8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02f9 0273       | s  |		Execute	Discrete,Plus
02fa e5fe       |    |		Load	0x2,-0x2
02fb 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02fc 027b       | {  |		Execute	Discrete,Greater_Equal
02fd 6807       |h   |		Jump_Zero	0x305
02fe 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x4 = 0x2fe,0x5
02ff 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0300 e402       |    |		Load	0x2,0x2
0301 017d       | }  |		Execute	Record,Structure_Write
0302 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x5 = 0x302,0x6
0303 a7fd       |    |		Store_Unchecked	0x3,-0x3
0304 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0305 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x6 = 0x305,0x7
0306 a7fd       |    |		Store_Unchecked	0x3,-0x3
0307 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 0314       |    |		.CONST	0x0314								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0002       |    |		.CONST	0x0002								; Number of locals
030b			INIT_0308:
030b e008       |    |		Load	0x0,0x8								; Debug Table 0x11 = .DEBUG	0x030b,0x0896,0x1801,0x0002,0x0059,0x8c85,0x0000,0x0750
													; Debug Table 0x11.0x0 = 0x30b,0xffff
030c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
030d 0322       | "  |		Declare_Variable	Record
030e 00db       |    |		Load_Top	At_Offset_3
030f 00d9       |    |		Load_Top	At_Offset_1
0310 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0311 e7fe       |    |		Load	0x3,-0x2
0312 00d9       |    |		Load_Top	At_Offset_1
0313 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0314			BODY_0308:
0314 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x11.0x1 = 0x314,0x1
0315 e5f9       |    |		Load	0x2,-0x7
0316 e008       |    |		Load	0x0,0x8
0317 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0318 0322       | "  |		Declare_Variable	Record
0319 00db       |    |		Load_Top	At_Offset_3
031a 00d9       |    |		Load_Top	At_Offset_1
031b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
031c e7fd       |    |		Load	0x3,-0x3
031d 00d9       |    |		Load_Top	At_Offset_1
031e 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
031f e7fc       |    |		Load	0x3,-0x4
0320 00d9       |    |		Load_Top	At_Offset_1
0321 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0322 85fe       |    |		Call	0x2,-0x2
0323 c5f9       |    |		Store	0x2,-0x7
0324 c7fb       |    |		Store	0x3,-0x5
0325 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0326 0000 0000  |    |		.XXX[0x2]
0328 0000 0000  |    |		.LITERAL	{0x00000000, 0x598c8502}
032c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000078e}
0330 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000702}
0334 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000057e}
0338 0000 0000  |    |		.LITERAL	{0x00000000, 0x00598c85}
033c 0000 0000  |    |		.BLANK	0000[0x4]
0340 038d 0004  |    |		.XXX[0x3]
0342 001e       |    |
0343 029a 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x12 = .DEBUG	0x0343,0x089c,0x0000,0x0000,0x0059,0x8ba5,0x0000,0x0072
													; Debug Table 0x12.0x0 = 0x343,0xffff
0345 029a 03db  |    |		Declare_Subprogram	INIT_03d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x12.0x1 = 0x345,0xfffe
0347 029a 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x12.0x2 = 0x347,0xfffd
0349 029a 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x12.0x3 = 0x349,0xfffc
034b 029a 041b  |    |		Declare_Subprogram	INIT_0418,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x12.0x4 = 0x34b,0xfffb
034d 029a 045b  |   [|		Declare_Subprogram	INIT_0458,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x12.0x5 = 0x34d,0xfffa
034f 029a 046b  |   k|		Declare_Subprogram	INIT_0468,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x12.0x6 = 0x34f,0xfff9
0351 4800       |H   |		Short_Literal	0x0							; Debug Table 0x12.0x7 = 0x351,0xfff8
0352 4802       |H   |		Short_Literal	0x2
0353 029f 0483  |    |		Declare_Subprogram	INIT_0480,For_Call
0355 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0356 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0x12.0x8 = 0x356,0xfff7
0357 0266       | f  |		Execute	Discrete,Bounds
0358 00da       |    |		Load_Top	At_Offset_2
0359 02a0       |    |		Declare_Subprogram	Null_Subprogram
035a 4801       |H   |		Short_Literal	0x1
035b 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
035c 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x12.0x9 = 0x35c,0xfff6
035d 00d9       |    |		Load_Top	At_Offset_1
035e 00e9       |    |		Load_Encached	String_Cache
035f 029f 049b  |    |		Declare_Subprogram	INIT_0498,For_Call
0361 4800       |H   |		Short_Literal	0x0
0362 4802       |H   |		Short_Literal	0x2
0363 4800       |H   |		Short_Literal	0x0
0364 4800       |H   |		Short_Literal	0x0
0365 4802       |H   |		Short_Literal	0x2
0366 4801       |H   |		Short_Literal	0x1
0367 031e       |    |		Declare_Type	Variant_Record,Defined,Visible
0368 029a 04cb  |    |		Declare_Subprogram	INIT_04c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x12.0xa = 0x368,0xfff5
036a 029a 0553  |   S|		Declare_Subprogram	INIT_0550,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x12.0xb = 0x36a,0xfff4
036c 029a 0573  |   s|		Declare_Subprogram	INIT_0570,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x12.0xc = 0x36c,0xfff3
036e 00bf       |    |		Action	Accept_Activation
036f 029d 05e3  |    |		Declare_Subprogram	INIT_05e0,For_Outer_Call			; Debug Table 0x13 = .DEBUG	0x036f,0x08b8,0x0000,0x0000,0x0059,0x8c85,0x0000,0x00b7
													; Debug Table 0x13.0x0 = 0x36f,0xffff
0371 029d 05f3  |    |		Declare_Subprogram	INIT_05f0,For_Outer_Call			; Debug Table 0x13.0x1 = 0x371,0xfffe
0373 029d 0603  |    |		Declare_Subprogram	INIT_0600,For_Outer_Call			; Debug Table 0x13.0x2 = 0x373,0xfffd
0375 029d 0613  |    |		Declare_Subprogram	INIT_0610,For_Outer_Call			; Debug Table 0x13.0x3 = 0x375,0xfffc
0377 029d 0633  |   3|		Declare_Subprogram	INIT_0630,For_Outer_Call			; Debug Table 0x13.0x4 = 0x377,0xfffb
0379 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x13.0x5 = 0x379,0xfffa
037a 00c7       |    |		Action	Elaborate_Subprogram
037b 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x13.0x6 = 0x37b,0xfff9
037c 00c7       |    |		Action	Elaborate_Subprogram
037d 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x13.0x7 = 0x37d,0xfff8
037e 00c7       |    |		Action	Elaborate_Subprogram
037f 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x13.0x8 = 0x37f,0xfff7
0380 00c7       |    |		Action	Elaborate_Subprogram
0381 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x13.0x9 = 0x381,0xfff6
0382 00c7       |    |		Action	Elaborate_Subprogram
0383 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x13.0xa = 0x383,0xfff5
0384 00c7       |    |		Action	Elaborate_Subprogram
0385 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x13.0xb = 0x385,0xfff4
0386 00c7       |    |		Action	Elaborate_Subprogram
0387 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x13.0xc = 0x387,0xfff3
0388 00c7       |    |		Action	Elaborate_Subprogram
0389 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x13.0xd = 0x389,0xfff2
038a 00c7       |    |		Action	Elaborate_Subprogram
038b 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x13.0xe = 0x38b,0xfff1
038c 00c7       |    |		Action	Elaborate_Subprogram
038d 00bc       |    |		Action	Signal_Activated
038e 00bb       |    |		Action	Signal_Completion
038f 0000       |    |		.XXX[0x1]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 039c       |    |		.CONST	0x039c								; Address of begin
0391 0004       |    |		.CONST	0x0004								; Address of exception handler
0392 0002       |    |		.CONST	0x0002								; Number of locals
0393			INIT_0390:
0393 e001       |    |		Load	0x0,0x1								; Debug Table 0x14 = .DEBUG	0x0393,0x08d8,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x0073
													; Debug Table 0x14.0x0 = 0x393,0xffff
0394 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0395 0322       | "  |		Declare_Variable	Record
0396 e002       |    |		Load	0x0,0x2
0397 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0398 e001       |    |		Load	0x0,0x1
0399 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
039a 00d9       |    |		Load_Top	At_Offset_1
039b 017d       | }  |		Execute	Record,Structure_Write
039c			BODY_0390:
039c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x1 = 0x39c,0x1
039d e001       |    |		Load	0x0,0x1								; Debug Table 0x14.0x2 = 0x39d,0x401
039e 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
039f 0322       | "  |		Declare_Variable	Record
03a0 e001       |    |		Load	0x0,0x1
03a1 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
03a2 e003       |    |		Load	0x0,0x3
03a3 1b66       | f  |		Execute	Package,Field_Read,Field_Number 0x66
03a4 0119       |    |		Execute	Any,Check_In_Formal_Type
03a5 00d9       |    |		Load_Top	At_Offset_1
03a6 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03a7 e001       |    |		Load	0x0,0x1
03a8 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03a9 00d9       |    |		Load_Top	At_Offset_1
03aa 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03ab 4800       |H   |		Short_Literal	0x0
03ac 00d9       |    |		Load_Top	At_Offset_1
03ad 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03ae 4800       |H   |		Short_Literal	0x0
03af 00d9       |    |		Load_Top	At_Offset_1
03b0 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
03b1 e004       |    |		Load	0x0,0x4
03b2 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
03b3 00d9       |    |		Load_Top	At_Offset_1
03b4 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
03b5 e001       |    |		Load	0x0,0x1
03b6 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03b7 00d9       |    |		Load_Top	At_Offset_1
03b8 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
03b9 4800       |H   |		Short_Literal	0x0
03ba 00d9       |    |		Load_Top	At_Offset_1
03bb 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
03bc 4800       |H   |		Short_Literal	0x0
03bd 00d9       |    |		Load_Top	At_Offset_1
03be 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
03bf e004       |    |		Load	0x0,0x4
03c0 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
03c1 00d9       |    |		Load_Top	At_Offset_1
03c2 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
03c3 017f       |    |		Execute	Record,Equal							; Debug Table 0x14.0x3 = 0x3c3,0x1
03c4 6803       |h   |		Jump_Zero	0x3c8
03c5 e005       |    |		Load	0x0,0x5								; Debug Table 0x14.0x4 = 0x3c5,0x2
03c6 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
03c7 0257       | W  |		Execute	Discrete,Raise
03c8 e005       |    |		Load	0x0,0x5								; Debug Table 0x14.0x5 = 0x3c8,0x3
03c9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03ca 0322       | "  |		Declare_Variable	Record
03cb 00d9       |    |		Load_Top	At_Offset_1
03cc 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
03cd 00d9       |    |		Load_Top	At_Offset_1
03ce 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03cf 00d9       |    |		Load_Top	At_Offset_1
03d0 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03d1 e003       |    |		Load	0x0,0x3
03d2 1b66       | f  |		Execute	Package,Field_Read,Field_Number 0x66
03d3 0119       |    |		Execute	Any,Check_In_Formal_Type
03d4 00d9       |    |		Load_Top	At_Offset_1
03d5 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03d6 00ca       |    |		Action	Exit_Nullary_Function
03d7 0000       |    |		.XXX[0x1]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db       |    |		.CONST	0x03db								; Address of begin
03d9 0004       |    |		.CONST	0x0004								; Address of exception handler
03da 0001       |    |		.CONST	0x0001								; Number of locals
03db			BODY_03d8:
03db			INIT_03d8:
03db 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15 = .DEBUG	0x03db,0x08e6,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x0078
													; Debug Table 0x15.0x0 = 0x3db,0x1
03dc 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
03dd e001       |    |		Load	0x0,0x1
03de 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
03df 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03e0 e006       |    |		Load	0x0,0x6
03e1 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
03e2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03e3 0000 0000  |    |		.BLANK	0000[0x5]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb       |    |		.CONST	0x03eb								; Address of begin
03e9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ea 0001       |    |		.CONST	0x0001								; Number of locals
03eb			BODY_03e8:
03eb			INIT_03e8:
03eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x16 = .DEBUG	0x03eb,0x08ea,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x0081
													; Debug Table 0x16.0x0 = 0x3eb,0x1
03ec e005       |    |		Load	0x0,0x5
03ed 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
03ee 6805       |h   |		Jump_Zero	0x3f4
03ef 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x16.0x1 = 0x3ef,0x2
03f0 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
03f1 e001       |    |		Load	0x0,0x1
03f2 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
03f3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03f4 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x16.0x2 = 0x3f4,0x3
03f5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03f6 0000 0000  |    |		.XXX[0x2]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 0404       |    |		.CONST	0x0404								; Address of begin
03f9 0004       |    |		.CONST	0x0004								; Address of exception handler
03fa 0002       |    |		.CONST	0x0002								; Number of locals
03fb			INIT_03f8:
03fb e001       |    |		Load	0x0,0x1								; Debug Table 0x17 = .DEBUG	0x03fb,0x08f2,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x008a
													; Debug Table 0x17.0x0 = 0x3fb,0xffff
03fc 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
03fd 0322       | "  |		Declare_Variable	Record
03fe e002       |    |		Load	0x0,0x2
03ff 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0400 e001       |    |		Load	0x0,0x1
0401 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0402 00d9       |    |		Load_Top	At_Offset_1
0403 017d       | }  |		Execute	Record,Structure_Write
0404			BODY_03f8:
0404 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x1 = 0x404,0x1
0405 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0406 e5ff       |    |		Load	0x2,-0x1
0407 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0408 012f       | /  |		Execute	Any,Equal
0409 6804       |h   |		Jump_Zero	0x40e
040a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x2 = 0x40a,0x2
040b 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
040c 8007       |    |		Call	0x0,0x7
040d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
040e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17.0x3 = 0x40e,0x3
040f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0410 e003       |    |		Load	0x0,0x3
0411 1b67       | g  |		Execute	Package,Field_Read,Field_Number 0x67
0412 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0413 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0414 8007       |    |		Call	0x0,0x7
0415 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0416 0000 0000  |    |		.XXX[0x2]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 042d       | -  |		.CONST	0x042d								; Address of begin
0419 0004       |    |		.CONST	0x0004								; Address of exception handler
041a 0005       |    |		.CONST	0x0005								; Number of locals
041b			INIT_0418:
041b e004       |    |		Load	0x0,0x4								; Debug Table 0x18 = .DEBUG	0x041b,0x08fc,0x0001,0x0000,0x0059,0x8ba5,0x0000,0x0093
													; Debug Table 0x18.0x0 = 0x41b,0xffff
041c 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
041d 0322       | "  |		Declare_Variable	Record
041e e004       |    |		Load	0x0,0x4
041f 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0420 0322       | "  |		Declare_Variable	Record
0421 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0x1 = 0x421,0xfffe
0422 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0423 e001       |    |		Load	0x0,0x1
0424 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0425 e003       |    |		Load	0x0,0x3
0426 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0427 011e       |    |		Execute	Any,Convert
0428 e003       |    |		Load	0x0,0x3								; Debug Table 0x18.0x2 = 0x428,0xfffd
0429 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
042a 02c7       |    |		Declare_Variable	Any
042b 00d8       |    |		Load_Top	At_Offset_0
042c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
042d			BODY_0418:
042d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x18.0x3 = 0x42d,0x1
042e e402       |    |		Load	0x2,0x2
042f 00da       |    |		Load_Top	At_Offset_2
0430 0120       |    |		Execute	Any,Is_Value
0431 6803       |h   |		Jump_Zero	0x435
0432 e003       |    |		Load	0x0,0x3
0433 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0434 7801       |x   |		Jump	0x436
0435 00da       |    |		Load_Top	At_Offset_2
0436 e404       |    |		Load	0x2,0x4
0437 e003       |    |		Load	0x0,0x3
0438 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0439 e003       |    |		Load	0x0,0x3
043a 188a       |    |		Execute	Package,Field_Execute,Field_Number 0x8a
043b c405       |    |		Store	0x2,0x5
043c 00d2       |    |		Pop_Control	Pop_Count_2
043d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x4 = 0x43d,0x2
043e 00da       |    |		Load_Top	At_Offset_2
043f 012f       | /  |		Execute	Any,Equal
0440 6809       |h   |		Jump_Zero	0x44a
0441 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x5 = 0x441,0x3
0442 8007       |    |		Call	0x0,0x7
0443 e5fe       |    |		Load	0x2,-0x2
0444 017d       | }  |		Execute	Record,Structure_Write
0445 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x18.0x6 = 0x445,0x4
0446 8007       |    |		Call	0x0,0x7
0447 e5fd       |    |		Load	0x2,-0x3
0448 017d       | }  |		Execute	Record,Structure_Write
0449 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
044a e005       |    |		Load	0x0,0x5								; Debug Table 0x18.0x7 = 0x44a,0x5
044b 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
044c e5fe       |    |		Load	0x2,-0x2
044d 017d       | }  |		Execute	Record,Structure_Write
044e e005       |    |		Load	0x0,0x5								; Debug Table 0x18.0x8 = 0x44e,0x6
044f 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0450 e5fd       |    |		Load	0x2,-0x3
0451 017d       | }  |		Execute	Record,Structure_Write
0452 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0453 0000 0000  |    |		.BLANK	0000[0x5]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045b       | [  |		.CONST	0x045b								; Address of begin
0459 0004       |    |		.CONST	0x0004								; Address of exception handler
045a 0001       |    |		.CONST	0x0001								; Number of locals
045b			BODY_0458:
045b			INIT_0458:
045b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19 = .DEBUG	0x045b,0x0910,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x00a0
													; Debug Table 0x19.0x0 = 0x45b,0x1
045c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
045d e001       |    |		Load	0x0,0x1
045e 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
045f e003       |    |		Load	0x0,0x3
0460 1848       | H  |		Execute	Package,Field_Execute,Field_Number 0x48
0461 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0462 8007       |    |		Call	0x0,0x7
0463 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0464 0000 0000  |    |		.BLANK	0000[0x4]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 046d       | m  |		.CONST	0x046d								; Address of begin
0469 0004       |    |		.CONST	0x0004								; Address of exception handler
046a 0002       |    |		.CONST	0x0002								; Number of locals
046b			INIT_0468:
046b e004       |    |		Load	0x0,0x4								; Debug Table 0x1a = .DEBUG	0x046b,0x0914,0x0001,0x0000,0x0059,0x8ba5,0x0000,0x00a9
													; Debug Table 0x1a.0x0 = 0x46b,0xffff
046c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
046d			BODY_0468:
046d e001       |    |		Load	0x0,0x1								; Debug Table 0x1a.0x1 = 0x46d,0x1
046e 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
046f 821b       |    |		Call	0x1,0x1b
0470 4800       |H   |		Short_Literal	0x0
0471 4800       |H   |		Short_Literal	0x0
0472 4801       |H   |		Short_Literal	0x1
0473 e5fe       |    |		Load	0x2,-0x2
0474 8008       |    |		Call	0x0,0x8
0475 e5ff       |    |		Load	0x2,-0x1
0476 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0477 e001       |    |		Load	0x0,0x1
0478 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0479 0059       | Y  |		Store_Top	Discrete,At_Offset_1
047a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0x2 = 0x47a,0x2
047b 8009       |    |		Call	0x0,0x9
047c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
047d 0000 0000  |    |		.XXX[0x3]
047f 0000       |    |
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0483       |    |		.CONST	0x0483								; Address of begin
0481 0004       |    |		.CONST	0x0004								; Address of exception handler
0482 0001       |    |		.CONST	0x0001								; Number of locals
0483			BODY_0480:
0483			INIT_0480:
0483 4603       |F   |		Jump_Case	0x4							; Debug Table 0x1b = .DEBUG	0x0483,0x091c,0x0005,0x0000,0x0059,0x8ba5,0x0000,0x00b5
0484 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0485 7802       |x   |		Jump	0x488								; case 0x1
0486 7805       |x   |		Jump	0x48c								; case 0x2
0487 7809       |x   |		Jump	0x491								; case 0x3
0488 00da       |    |		Load_Top	At_Offset_2
0489 0091 0653  |   S|		Action	Push_String_Extended_Indexed,0x653				; "TEXT"
048b 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
048c 00db       |    |		Load_Top	At_Offset_3
048d 00db       |    |		Load_Top	At_Offset_3
048e 00e0       |    |		Load_Encached	Standard_Cache
048f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0490 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0491 00da       |    |		Load_Top	At_Offset_2
0492 00e0       |    |		Load_Encached	Standard_Cache
0493 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0494 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0495 0000 0000  |    |		.XXX[0x3]
0497 0000       |    |
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 049b       |    |		.CONST	0x049b								; Address of begin
0499 0004       |    |		.CONST	0x0004								; Address of exception handler
049a 0001       |    |		.CONST	0x0001								; Number of locals
049b			BODY_0498:
049b			INIT_0498:
049b 4608       |F   |		Jump_Case	0x9							; Debug Table 0x1c = .DEBUG	0x049b,0x091e,0x0005,0x0000,0x0059,0x8ba5,0x0000,0x00c5
049c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
049d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
049e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
049f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
04a0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
04a1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
04a2 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
04a3 7801       |x   |		Jump	0x4a5								; case 0x7
04a4 780d       |x   |		Jump	0x4b2								; case 0x8
04a5 00db       |    |		Load_Top	At_Offset_3
04a6 4801       |H   |		Short_Literal	0x1
04a7 e5fe       |    |		Load	0x2,-0x2
04a8 e215       |    |		Load	0x1,0x15
04a9 035b       | [  |		Declare_Type	Array,Constrained
04aa 4801       |H   |		Short_Literal	0x1
04ab e5fe       |    |		Load	0x2,-0x2
04ac 00e9       |    |		Load_Encached	String_Cache
04ad 035b       | [  |		Declare_Type	Array,Constrained
04ae 4802       |H   |		Short_Literal	0x2
04af e5ff       |    |		Load	0x2,-0x1
04b0 031b       |    |		Declare_Type	Variant_Record,Constrained
04b1 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04b2 00db       |    |		Load_Top	At_Offset_3
04b3 00db       |    |		Load_Top	At_Offset_3
04b4 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
04b5 4801       |H   |		Short_Literal	0x1
04b6 e5fe       |    |		Load	0x2,-0x2
04b7 e215       |    |		Load	0x1,0x15
04b8 0334       | 4  |		Declare_Variable	Array,With_Constraint
04b9 2d02       |-   |		Execute	Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x2
04ba 4801       |H   |		Short_Literal	0x1
04bb e5fe       |    |		Load	0x2,-0x2
04bc 00e9       |    |		Load_Encached	String_Cache
04bd 0334       | 4  |		Declare_Variable	Array,With_Constraint
04be 2d03       |-   |		Execute	Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
04bf 016a       | j  |		QQ_execute	Variant_Record,XXX
04c0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04c1 0000 0000  |    |		.BLANK	0000[0x7]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cb       |    |		.CONST	0x04cb								; Address of begin
04c9 053c       | <  |		.CONST	0x053c								; Address of exception handler
04ca 0001       |    |		.CONST	0x0001								; Number of locals
04cb			BODY_04c8:
04cb			INIT_04c8:
04cb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1d = .DEBUG	0x04cb,0x0920,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x00df
													; Debug Table 0x1d.0x0 = 0x4cb,0x1
04cc 821e       |    |		Call	0x1,0x1e
04cd 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d.0x1 = 0x4cd,0x2
04ce 00db       |    |		Load_Top	At_Offset_3
04cf 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
04d0 e001       |    |		Load	0x0,0x1
04d1 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
04d2 e003       |    |		Load	0x0,0x3
04d3 1848       | H  |		Execute	Package,Field_Execute,Field_Number 0x48
04d4 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
04d5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04d6 027d       | }  |		Execute	Discrete,Greater
04d7 6834       |h4  |		Jump_Zero	0x50c
04d8 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0x2 = 0x4d8,0x3
04d9 e216       |    |		Load	0x1,0x16
04da 1c08       |    |		Execute_Immediate	Run_Utility,0x8
04db 4801       |H   |		Short_Literal	0x1
04dc 4800       |H   |		Short_Literal	0x0
04dd e215       |    |		Load	0x1,0x15
04de 035b       | [  |		Declare_Type	Array,Constrained
04df 0337       | 7  |		Declare_Variable	Array
04e0 00d9       |    |		Load_Top	At_Offset_1
04e1 00d8       |    |		Load_Top	At_Offset_0
04e2 2502       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x2
04e3 00da       |    |		Load_Top	At_Offset_2
04e4 01da       |    |		Execute	Vector,Bounds
04e5 00da       |    |		Load_Top	At_Offset_2
04e6 01da       |    |		Execute	Vector,Bounds
04e7 00da       |    |		Load_Top	At_Offset_2
04e8 027f       |    |		Execute	Discrete,Equal
04e9 7002       |p   |		Jump_Nonzero	0x4ec
04ea 48e0       |H   |		Short_Literal	0xe0
04eb 0257       | W  |		Execute	Discrete,Raise
04ec 00d0       |    |		Action	Swap_Control
04ed 00d1       |    |		Pop_Control	Pop_Count_1
04ee 027f       |    |		Execute	Discrete,Equal
04ef 7002       |p   |		Jump_Nonzero	0x4f2
04f0 48e0       |H   |		Short_Literal	0xe0
04f1 0257       | W  |		Execute	Discrete,Raise
04f2 00d2       |    |		Pop_Control	Pop_Count_2
04f3 00d9       |    |		Load_Top	At_Offset_1
04f4 2902       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x2
04f5 00ea       |    |		Load_Encached	Null_String_Cache
04f6 00d9       |    |		Load_Top	At_Offset_1
04f7 00d8       |    |		Load_Top	At_Offset_0
04f8 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
04f9 00da       |    |		Load_Top	At_Offset_2
04fa 01da       |    |		Execute	Vector,Bounds
04fb 00da       |    |		Load_Top	At_Offset_2
04fc 01da       |    |		Execute	Vector,Bounds
04fd 00da       |    |		Load_Top	At_Offset_2
04fe 027f       |    |		Execute	Discrete,Equal
04ff 7002       |p   |		Jump_Nonzero	0x502
0500 48e0       |H   |		Short_Literal	0xe0
0501 0257       | W  |		Execute	Discrete,Raise
0502 00d0       |    |		Action	Swap_Control
0503 00d1       |    |		Pop_Control	Pop_Count_1
0504 027f       |    |		Execute	Discrete,Equal
0505 7002       |p   |		Jump_Nonzero	0x508
0506 48e0       |H   |		Short_Literal	0xe0
0507 0257       | W  |		Execute	Discrete,Raise
0508 00d2       |    |		Pop_Control	Pop_Count_2
0509 00d9       |    |		Load_Top	At_Offset_1
050a 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
050b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
050c 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x1d.0x3 = 0x50c,0x4
050d e003       |    |		Load	0x0,0x3								; Debug Table 0x1d.0x4 = 0x50d,0xfbff
050e 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
050f 0322       | "  |		Declare_Variable	Record
0510 e5ff       |    |		Load	0x2,-0x1
0511 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0512 e001       |    |		Load	0x0,0x1
0513 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0514 e003       |    |		Load	0x0,0x3
0515 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0516 0119       |    |		Execute	Any,Check_In_Formal_Type
0517 00d9       |    |		Load_Top	At_Offset_1
0518 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0519 00d8       |    |		Load_Top	At_Offset_0
051a 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
051b e5fe       |    |		Load	0x2,-0x2
051c 00d9       |    |		Load_Top	At_Offset_1
051d 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
051e 4801       |H   |		Short_Literal	0x1
051f 00d0       |    |		Action	Swap_Control
0520 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0521 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0x5 = 0x521,0xfbfe
0522 e003       |    |		Load	0x0,0x3
0523 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
0524 00e3       |    |		Load_Encached	Natural_Cache
0525 03f1       |    |		Declare_Variable	Discrete,With_Value
0526 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0x6 = 0x526,0xfbfd
0527 e216       |    |		Load	0x1,0x16
0528 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0529 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1d.0x7 = 0x529,0x401
052a 821e       |    |		Call	0x1,0x1e
052b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1d.0x8 = 0x52b,0x402
052c 00db       |    |		Load_Top	At_Offset_3
052d e003       |    |		Load	0x0,0x3
052e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
052f 00d9       |    |		Load_Top	At_Offset_1
0530 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0531 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1d.0x9 = 0x531,0x403
0532 00db       |    |		Load_Top	At_Offset_3
0533 e003       |    |		Load	0x0,0x3
0534 1850       | P  |		Execute	Package,Field_Execute,Field_Number 0x50
0535 821d       |    |		Call	0x1,0x1d
0536 00d9       |    |		Load_Top	At_Offset_1
0537 2902       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x2
0538 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1d.0xa = 0x538,0x404
0539 821e       |    |		Call	0x1,0x1e
053a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0xb = 0x53a,0x405
053b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
053c			TRAP_04c8:
053c 010e       |    |		Execute	Exception,Is_Constraint_Error
053d 6803       |h   |		Jump_Zero	0x541
053e e005       |    |		Load	0x0,0x5								; Debug Table 0x1d.0xc = 0x53e,0x5
053f 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0540 0257       | W  |		Execute	Discrete,Raise
0541 e003       |    |		Load	0x0,0x3
0542 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0543 010f       |    |		Execute	Exception,Equal
0544 6803       |h   |		Jump_Zero	0x548
0545 e005       |    |		Load	0x0,0x5								; Debug Table 0x1d.0xd = 0x545,0x6
0546 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0547 0257       | W  |		Execute	Discrete,Raise
0548 e005       |    |		Load	0x0,0x5								; Debug Table 0x1d.0xe = 0x548,0x7
0549 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
054a 0257       | W  |		Execute	Discrete,Raise
054b 0000 0000  |    |		.BLANK	0000[0x5]
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 055c       | \  |		.CONST	0x055c								; Address of begin
0551 0004       |    |		.CONST	0x0004								; Address of exception handler
0552 0003       |    |		.CONST	0x0003								; Number of locals
0553			INIT_0550:
0553 e004       |    |		Load	0x0,0x4								; Debug Table 0x1e = .DEBUG	0x0553,0x0940,0x0001,0x0000,0x0059,0x8ba5,0x0000,0x00ec
													; Debug Table 0x1e.0x0 = 0x553,0xffff
0554 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0555 0322       | "  |		Declare_Variable	Record
0556 e5fc       |    |		Load	0x2,-0x4
0557 8008       |    |		Call	0x0,0x8
0558 00d9       |    |		Load_Top	At_Offset_1
0559 017d       | }  |		Execute	Record,Structure_Write
055a e004       |    |		Load	0x0,0x4								; Debug Table 0x1e.0x1 = 0x55a,0xfffe
055b 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
055c			BODY_0550:
055c e001       |    |		Load	0x0,0x1								; Debug Table 0x1e.0x2 = 0x55c,0x1
055d 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
055e 00da       |    |		Load_Top	At_Offset_2
055f 821b       |    |		Call	0x1,0x1b
0560 e5fd       |    |		Load	0x2,-0x3
0561 e5fe       |    |		Load	0x2,-0x2
0562 e5ff       |    |		Load	0x2,-0x1
0563 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0564 e001       |    |		Load	0x0,0x1
0565 1856       | V  |		Execute	Package,Field_Execute,Field_Number 0x56
0566 00d1       |    |		Pop_Control	Pop_Count_1
0567 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0568 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0x3 = 0x568,0x2
0569 8009       |    |		Call	0x0,0x9
056a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1e.0x4 = 0x56a,0x3
056b 8007       |    |		Call	0x0,0x7
056c e5fc       |    |		Load	0x2,-0x4
056d 017d       | }  |		Execute	Record,Structure_Write
056e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
056f 0000       |    |		.XXX[0x1]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 05a6       |    |		.CONST	0x05a6								; Address of begin
0571 0004       |    |		.CONST	0x0004								; Address of exception handler
0572 0006       |    |		.CONST	0x0006								; Number of locals
0573			INIT_0570:
0573 e004       |    |		Load	0x0,0x4								; Debug Table 0x1f = .DEBUG	0x0573,0x094c,0x0001,0x0000,0x0059,0x8ba5,0x0000,0x0100
													; Debug Table 0x1f.0x0 = 0x573,0xffff
0574 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0575 0322       | "  |		Declare_Variable	Record
0576 e5fc       |    |		Load	0x2,-0x4
0577 8008       |    |		Call	0x0,0x8
0578 00d9       |    |		Load_Top	At_Offset_1
0579 017d       | }  |		Execute	Record,Structure_Write
057a e004       |    |		Load	0x0,0x4								; Debug Table 0x1f.0x1 = 0x57a,0xfffe
057b 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
057c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1f.0x2 = 0x57c,0xfffd
057d e5fd       |    |		Load	0x2,-0x3
057e 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
057f 00e9       |    |		Load_Encached	String_Cache
0580 0334       | 4  |		Declare_Variable	Array,With_Constraint
0581 e5fd       |    |		Load	0x2,-0x3
0582 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0583 00d9       |    |		Load_Top	At_Offset_1
0584 01d4       |    |		Execute	Vector,Structure_Write
0585 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1f.0x3 = 0x585,0xfffc
0586 e5fd       |    |		Load	0x2,-0x3
0587 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0588 e003       |    |		Load	0x0,0x3
0589 1b4a       | J  |		Execute	Package,Field_Read,Field_Number 0x4a
058a 0334       | 4  |		Declare_Variable	Array,With_Constraint
058b e00a       |    |		Load	0x0,0xa								; Debug Table 0x1f.0x4 = 0x58b,0xfffb
058c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
058d 0322       | "  |		Declare_Variable	Record
058e 4800       |H   |		Short_Literal	0x0
058f 00d9       |    |		Load_Top	At_Offset_1
0590 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0591 4802       |H   |		Short_Literal	0x2
0592 00d9       |    |		Load_Top	At_Offset_1
0593 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0594 4800       |H   |		Short_Literal	0x0
0595 00d9       |    |		Load_Top	At_Offset_1
0596 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0597 e00a       |    |		Load	0x0,0xa
0598 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0599 0337       | 7  |		Declare_Variable	Array
059a 4803       |H   |		Short_Literal	0x3
059b 4800       |H   |		Short_Literal	0x0
059c 4800       |H   |		Short_Literal	0x0
059d 00d9       |    |		Load_Top	At_Offset_1
059e e407       |    |		Load	0x2,0x7
059f 01d6       |    |		Execute	Vector,Field_Write
05a0 3ffb       |?   |		Loop_Increasing	0x59c
05a1 e00a       |    |		Load	0x0,0xa
05a2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05a3 0119       |    |		Execute	Any,Check_In_Formal_Type
05a4 00d9       |    |		Load_Top	At_Offset_1
05a5 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
05a6			BODY_0570:
05a6 00cf       |    |		Action	Mark_Auxiliary
05a7 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x1f.0x5 = 0x5a7,0x1
05a8 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05a9 4801       |H   |		Short_Literal	0x1
05aa 0263       | c  |		Execute	Discrete,Above_Bound
05ab 701a       |p   |		Jump_Nonzero	0x5c6
05ac 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x6 = 0x5ac,0x2
05ad e5fd       |    |		Load	0x2,-0x3
05ae 2502       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x2
05af 01d7       |    |		Execute	Vector,Field_Read
05b0 4602       |F   |		Jump_Case	0x3
05b1 7802       |x   |		Jump	0x5b4								; case 0x0
05b2 7807       |x   |		Jump	0x5ba								; case 0x1
05b3 780c       |x   |		Jump	0x5c0								; case 0x2
05b4 e00a       |    |		Load	0x0,0xa								; Debug Table 0x1f.0x7 = 0x5b4,0x3
05b5 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
05b6 00d9       |    |		Load_Top	At_Offset_1
05b7 e405       |    |		Load	0x2,0x5
05b8 01d6       |    |		Execute	Vector,Field_Write
05b9 780a       |x   |		Jump	0x5c4
05ba e00a       |    |		Load	0x0,0xa								; Debug Table 0x1f.0x8 = 0x5ba,0x4
05bb 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
05bc 00d9       |    |		Load_Top	At_Offset_1
05bd e405       |    |		Load	0x2,0x5
05be 01d6       |    |		Execute	Vector,Field_Write
05bf 7804       |x   |		Jump	0x5c4
05c0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1f.0x9 = 0x5c0,0x5
05c1 00d9       |    |		Load_Top	At_Offset_1
05c2 e405       |    |		Load	0x2,0x5
05c3 01d6       |    |		Execute	Vector,Field_Write
05c4 00c8       |    |		Action	Pop_Auxiliary_Range
05c5 3fe6       |?   |		Loop_Increasing	0x5ac
05c6 00ce       |    |		Action	Pop_Auxiliary
05c7 e001       |    |		Load	0x0,0x1								; Debug Table 0x1f.0xa = 0x5c7,0x6
05c8 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
05c9 e402       |    |		Load	0x2,0x2
05ca 821b       |    |		Call	0x1,0x1b
05cb e405       |    |		Load	0x2,0x5
05cc e404       |    |		Load	0x2,0x4
05cd e5fe       |    |		Load	0x2,-0x2
05ce e5ff       |    |		Load	0x2,-0x1
05cf 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
05d0 e001       |    |		Load	0x0,0x1
05d1 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
05d2 00d1       |    |		Pop_Control	Pop_Count_1
05d3 c403       |    |		Store	0x2,0x3
05d4 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1f.0xb = 0x5d4,0x7
05d5 8009       |    |		Call	0x0,0x9
05d6 e402       |    |		Load	0x2,0x2								; Debug Table 0x1f.0xc = 0x5d6,0x8
05d7 8007       |    |		Call	0x0,0x7
05d8 e5fc       |    |		Load	0x2,-0x4
05d9 017d       | }  |		Execute	Record,Structure_Write
05da 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
05db 0000 0000  |    |		.BLANK	0000[0x5]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05e3       |    |		.CONST	0x05e3								; Address of begin
05e1 05e8       |    |		.CONST	0x05e8								; Address of exception handler
05e2 0001       |    |		.CONST	0x0001								; Number of locals
05e3			BODY_05e0:
05e3			INIT_05e0:
05e3 e00b       |    |		Load	0x0,0xb								; Debug Table 0x20 = .DEBUG	0x05e3,0x0968,0x0002,0x0000,0x0059,0x8c85,0x0000,0x00b8
													; Debug Table 0x20.0x0 = 0x5e3,0x1
05e4 1860       | `  |		Execute	Package,Field_Execute,Field_Number 0x60
05e5 e00c       |    |		Load	0x0,0xc
05e6 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05e7 00ca       |    |		Action	Exit_Nullary_Function
05e8			TRAP_05e0:
05e8 e00b       |    |		Load	0x0,0xb
05e9 1b64       | d  |		Execute	Package,Field_Read,Field_Number 0x64
05ea 010f       |    |		Execute	Exception,Equal
05eb 6802       |h   |		Jump_Zero	0x5ee
05ec 4800       |H   |		Short_Literal	0x0							; Debug Table 0x20.0x1 = 0x5ec,0x2
05ed 00ca       |    |		Action	Exit_Nullary_Function
05ee 0100       |    |		Execute	Exception,Raise
05ef 0000       |    |		.XXX[0x1]
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05f7       |    |		.CONST	0x05f7								; Address of begin
05f1 0004       |    |		.CONST	0x0004								; Address of exception handler
05f2 0002       |    |		.CONST	0x0002								; Number of locals
05f3			INIT_05f0:
05f3 821a       |    |		Call	0x1,0x1a							; Debug Table 0x21 = .DEBUG	0x05f3,0x096e,0x0002,0x0000,0x0059,0x8c85,0x0000,0x00da
													; Debug Table 0x21.0x0 = 0x5f3,0xffff
05f4 e00c       |    |		Load	0x0,0xc
05f5 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
05f6 03f1       |    |		Declare_Variable	Discrete,With_Value
05f7			BODY_05f0:
05f7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x21.0x1 = 0x5f7,0x1
05f8 7003       |p   |		Jump_Nonzero	0x5fc
05f9 e002       |    |		Load	0x0,0x2								; Debug Table 0x21.0x2 = 0x5f9,0x2
05fa 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05fb 00ca       |    |		Action	Exit_Nullary_Function
05fc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x21.0x3 = 0x5fc,0x3
05fd 00ca       |    |		Action	Exit_Nullary_Function
05fe 0000 0000  |    |		.XXX[0x2]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0603       |    |		.CONST	0x0603								; Address of begin
0601 0004       |    |		.CONST	0x0004								; Address of exception handler
0602 0001       |    |		.CONST	0x0001								; Number of locals
0603			BODY_0600:
0603			INIT_0600:
0603 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x22 = .DEBUG	0x0603,0x0978,0x0002,0x0000,0x0059,0x8c85,0x0000,0x0101
													; Debug Table 0x22.0x0 = 0x603,0x1
0604 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0605 4602       |F   |		Jump_Case	0x3
0606 7802       |x   |		Jump	0x609								; case 0x0
0607 7803       |x   |		Jump	0x60b								; case 0x1
0608 7804       |x   |		Jump	0x60d								; case 0x2
0609 4800       |H   |		Short_Literal	0x0							; Debug Table 0x22.0x1 = 0x609,0x2
060a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
060b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x22.0x2 = 0x60b,0x3
060c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
060d 4802       |H   |		Short_Literal	0x2							; Debug Table 0x22.0x3 = 0x60d,0x4
060e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
060f 0000       |    |		.XXX[0x1]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0618       |    |		.CONST	0x0618								; Address of begin
0611 0004       |    |		.CONST	0x0004								; Address of exception handler
0612 0002       |    |		.CONST	0x0002								; Number of locals
0613			INIT_0610:
0613 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x23 = .DEBUG	0x0613,0x0982,0x0002,0x0000,0x0059,0x8c85,0x0000,0x012d
													; Debug Table 0x23.0x0 = 0x613,0xffff
0614 01da       |    |		Execute	Vector,Bounds
0615 e215       |    |		Load	0x1,0x15
0616 035b       | [  |		Declare_Type	Array,Constrained
0617 0337       | 7  |		Declare_Variable	Array
0618			BODY_0610:
0618 00cf       |    |		Action	Mark_Auxiliary
0619 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x23.0x1 = 0x619,0x1
061a 01d9       |    |		Execute	Vector,Reverse_Bounds
061b 0263       | c  |		Execute	Discrete,Above_Bound
061c 7009       |p   |		Jump_Nonzero	0x626
061d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x23.0x2 = 0x61d,0x2
061e e5ff       |    |		Load	0x2,-0x1
061f 01d5       |    |		Execute	Vector,Field_Reference
0620 821c       |    |		Call	0x1,0x1c
0621 00d9       |    |		Load_Top	At_Offset_1
0622 e402       |    |		Load	0x2,0x2
0623 01d6       |    |		Execute	Vector,Field_Write
0624 00c8       |    |		Action	Pop_Auxiliary_Range
0625 3ff7       |?   |		Loop_Increasing	0x61d
0626 00ce       |    |		Action	Pop_Auxiliary
0627 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x23.0x3 = 0x627,0x3
0628 e215       |    |		Load	0x1,0x15
0629 01c6       |    |		Execute	Vector,Convert_To_Formal
062a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
062b 0000 0000  |    |		.BLANK	0000[0x5]
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 063d       | =  |		.CONST	0x063d								; Address of begin
0631 0004       |    |		.CONST	0x0004								; Address of exception handler
0632 0002       |    |		.CONST	0x0002								; Number of locals
0633			INIT_0630:
0633 e002       |    |		Load	0x0,0x2								; Debug Table 0x24 = .DEBUG	0x0633,0x098c,0x0001,0x0000,0x0059,0x8c85,0x0000,0x015a
													; Debug Table 0x24.0x0 = 0x633,0xffff
0634 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0635 e001       |    |		Load	0x0,0x1
0636 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0637 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0638 e001       |    |		Load	0x0,0x1
0639 184e       | N  |		Execute	Package,Field_Execute,Field_Number 0x4e
063a e00c       |    |		Load	0x0,0xc
063b 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
063c 03f1       |    |		Declare_Variable	Discrete,With_Value
063d			BODY_0630:
063d e002       |    |		Load	0x0,0x2								; Debug Table 0x24.0x1 = 0x63d,0xfffe
													; Debug Table 0x24.0x2 = 0x63d,0x1
063e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
063f 00d9       |    |		Load_Top	At_Offset_1
0640 027f       |    |		Execute	Discrete,Equal
0641 7007       |p   |		Jump_Nonzero	0x649
0642 821a       |    |		Call	0x1,0x1a
0643 00d9       |    |		Load_Top	At_Offset_1
0644 027f       |    |		Execute	Discrete,Equal
0645 7003       |p   |		Jump_Nonzero	0x649
0646 e005       |    |		Load	0x0,0x5								; Debug Table 0x24.0x3 = 0x646,0x2
0647 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0648 0257       | W  |		Execute	Discrete,Raise
0649 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x24.0x4 = 0x649,0x3
064a 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
064b e001       |    |		Load	0x0,0x1
064c 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
064d 0f05       |    |		Execute_Immediate	Equal,0x5
064e 6803       |h   |		Jump_Zero	0x652
064f e005       |    |		Load	0x0,0x5								; Debug Table 0x24.0x5 = 0x64f,0x4
0650 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0651 0257       | W  |		Execute	Discrete,Raise
0652 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0653 ; --------------------------------------------------------------------------------------
0653 ; STRING TABLE
0653 ; --------------------------------------------------------------------------------------
0653 0008       |    |		.STRTAB	0x0008->0x0657							; "TEXT"
0654 000a       |    |		.STRTAB	0x000a->0x0659							; "PROMPT"
0655 000e       |    |		.STRTAB	0x000e->0x065c							; "PROTECTED"
0656 0015       |    |		.STREND 0x0015->0x0660
0657 5445 5854  |TEXT|		.STRTAB_STRINGS
0661 0000 0000  |    |		.BLANK	0000[0x7]
0668 ; --------------------------------------------------------------------------------------
0668 ; Debug Table
0668 ; --------------------------------------------------------------------------------------
0668 0003 0025  |   %|		.CONST	0x0003,0x0025
066a 000b 0792  |    |		.DEBUG	0x000b,0x0792,0x8000,0x0000,0x0059,0x8ba5,0x0000,0x000c
0672 0065 07bc  | e  |		.DEBUG	0x0065,0x07bc,0x8000,0x0000,0x0059,0x8c85,0x0000,0x0019
067a 0093 07ce  |    |		.DEBUG	0x0093,0x07ce,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x0026
0682 00a3 07d2  |    |		.DEBUG	0x00a3,0x07d2,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x002f
068a 00b3 07d6  |    |		.DEBUG	0x00b3,0x07d6,0x0005,0x0000,0x0059,0x8ba5,0x0000,0x01a6
0692 00cb 07d8  |    |		.DEBUG	0x00cb,0x07d8,0x0002,0x0000,0x0059,0x8c85,0x0000,0x001d
069a 00db 07dc  |    |		.DEBUG	0x00db,0x07dc,0x0002,0x0000,0x0059,0x8c85,0x0000,0x0034
06a2 00eb 07e0  |    |		.DEBUG	0x00eb,0x07e0,0x0001,0x0000,0x0059,0x8c85,0x0000,0x004b
06aa 0123 07ec  | #  |		.DEBUG	0x0123,0x07ec,0x4000,0x0000,0x0059,0x8ba5,0x0000,0x013f
06b2 012c 07f6  | ,  |		.DEBUG	0x012c,0x07f6,0x4000,0x0000,0x0059,0x8c85,0x0000,0x049c
06ba 014b 0806  | K  |		.DEBUG	0x014b,0x0806,0x1001,0x0000,0x0059,0x8ba5,0x0000,0x014e
06c2 01a3 0824  |   $|		.DEBUG	0x01a3,0x0824,0x1001,0x0000,0x0059,0x8ba5,0x0000,0x015a
06ca 01e3 0838  |   8|		.DEBUG	0x01e3,0x0838,0x1002,0x0000,0x0059,0x8ba5,0x0000,0x016a
06d2 020b 0846  |   F|		.DEBUG	0x020b,0x0846,0x3801,0x0002,0x0059,0x8ba5,0x0000,0x0177
06da 0263 0862  | c b|		.DEBUG	0x0263,0x0862,0x1002,0x0000,0x0059,0x8c85,0x0000,0x049d
06e2 02b3 0878  |   x|		.DEBUG	0x02b3,0x0878,0x1001,0x0000,0x0059,0x8c85,0x0000,0x0521
06ea 02e3 0886  |    |		.DEBUG	0x02e3,0x0886,0x1001,0x0000,0x0059,0x8c85,0x0000,0x06af
06f2 030b 0896  |    |		.DEBUG	0x030b,0x0896,0x1801,0x0002,0x0059,0x8c85,0x0000,0x0750
06fa 0343 089c  | C  |		.DEBUG	0x0343,0x089c,0x0000,0x0000,0x0059,0x8ba5,0x0000,0x0072
0702 036f 08b8  | o  |		.DEBUG	0x036f,0x08b8,0x0000,0x0000,0x0059,0x8c85,0x0000,0x00b7
070a 0393 08d8  |    |		.DEBUG	0x0393,0x08d8,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x0073
0712 03db 08e6  |    |		.DEBUG	0x03db,0x08e6,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x0078
071a 03eb 08ea  |    |		.DEBUG	0x03eb,0x08ea,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x0081
0722 03fb 08f2  |    |		.DEBUG	0x03fb,0x08f2,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x008a
072a 041b 08fc  |    |		.DEBUG	0x041b,0x08fc,0x0001,0x0000,0x0059,0x8ba5,0x0000,0x0093
0732 045b 0910  | [  |		.DEBUG	0x045b,0x0910,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x00a0
073a 046b 0914  | k  |		.DEBUG	0x046b,0x0914,0x0001,0x0000,0x0059,0x8ba5,0x0000,0x00a9
0742 0483 091c  |    |		.DEBUG	0x0483,0x091c,0x0005,0x0000,0x0059,0x8ba5,0x0000,0x00b5
074a 049b 091e  |    |		.DEBUG	0x049b,0x091e,0x0005,0x0000,0x0059,0x8ba5,0x0000,0x00c5
0752 04cb 0920  |    |		.DEBUG	0x04cb,0x0920,0x0002,0x0000,0x0059,0x8ba5,0x0000,0x00df
075a 0553 0940  | S @|		.DEBUG	0x0553,0x0940,0x0001,0x0000,0x0059,0x8ba5,0x0000,0x00ec
0762 0573 094c  | s L|		.DEBUG	0x0573,0x094c,0x0001,0x0000,0x0059,0x8ba5,0x0000,0x0100
076a 05e3 0968  |   h|		.DEBUG	0x05e3,0x0968,0x0002,0x0000,0x0059,0x8c85,0x0000,0x00b8
0772 05f3 096e  |   n|		.DEBUG	0x05f3,0x096e,0x0002,0x0000,0x0059,0x8c85,0x0000,0x00da
077a 0603 0978  |   x|		.DEBUG	0x0603,0x0978,0x0002,0x0000,0x0059,0x8c85,0x0000,0x0101
0782 0613 0982  |    |		.DEBUG	0x0613,0x0982,0x0002,0x0000,0x0059,0x8c85,0x0000,0x012d
078a 0633 098c  | 3  |		.DEBUG	0x0633,0x098c,0x0001,0x0000,0x0059,0x8c85,0x0000,0x015a
0792 ; --------------------------------------------------------------------------------------
0792 ; Debug3 Subtable 0x0
0792 ; --------------------------------------------------------------------------------------
0792 0014 0000  |    |		.DBG3TAB	0x0014,0x0000
0794 000b ffff  |    |		.CONST	0x000b,0xffff
0796 000b fffe  |    |		.CONST	0x000b,0xfffe
0798 000b fffd  |    |		.CONST	0x000b,0xfffd
079a 000b fffc  |    |		.CONST	0x000b,0xfffc
079c 000d fffb  |    |		.CONST	0x000d,0xfffb
079e 000e fffa  |    |		.CONST	0x000e,0xfffa
07a0 0010 fff9  |    |		.CONST	0x0010,0xfff9
07a2 0012 fff8  |    |		.CONST	0x0012,0xfff8
07a4 0017 fff7  |    |		.CONST	0x0017,0xfff7
07a6 0020 fff6  |    |		.CONST	0x0020,0xfff6
07a8 0029 fff5  | )  |		.CONST	0x0029,0xfff5
07aa 002b fff4  | +  |		.CONST	0x002b,0xfff4
07ac 002d fff3  | -  |		.CONST	0x002d,0xfff3
07ae 002f fff2  | /  |		.CONST	0x002f,0xfff2
07b0 0031 fff1  | 1  |		.CONST	0x0031,0xfff1
07b2 0036 fff0  | 6  |		.CONST	0x0036,0xfff0
07b4 003c ffef  | <  |		.CONST	0x003c,0xffef
07b6 0048 ffee  | H  |		.CONST	0x0048,0xffee
07b8 004c ffed  | L  |		.CONST	0x004c,0xffed
07ba 0054 ffec  | T  |		.CONST	0x0054,0xffec
07bc ; --------------------------------------------------------------------------------------
07bc ; Debug3 Subtable 0x1
07bc ; --------------------------------------------------------------------------------------
07bc 0008 0000  |    |		.DBG3TAB	0x0008,0x0000
07be 0065 ffff  | e  |		.CONST	0x0065,0xffff
07c0 0065 fffe  | e  |		.CONST	0x0065,0xfffe
07c2 0067 fffd  | g  |		.CONST	0x0067,0xfffd
07c4 0069 fffc  | i  |		.CONST	0x0069,0xfffc
07c6 006b fffb  | k  |		.CONST	0x006b,0xfffb
07c8 006d fffa  | m  |		.CONST	0x006d,0xfffa
07ca 006f fff9  | o  |		.CONST	0x006f,0xfff9
07cc 0080 fff8  |    |		.CONST	0x0080,0xfff8
07ce ; --------------------------------------------------------------------------------------
07ce ; Debug3 Subtable 0x2
07ce ; --------------------------------------------------------------------------------------
07ce 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
07d0 0093 0001  |    |		.CONST	0x0093,0x0001
07d2 ; --------------------------------------------------------------------------------------
07d2 ; Debug3 Subtable 0x3
07d2 ; --------------------------------------------------------------------------------------
07d2 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
07d4 00a3 0001  |    |		.CONST	0x00a3,0x0001
07d6 ; --------------------------------------------------------------------------------------
07d6 ; Debug3 Subtable 0x4
07d6 ; --------------------------------------------------------------------------------------
07d6 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
07d8 ; --------------------------------------------------------------------------------------
07d8 ; Debug3 Subtable 0x5
07d8 ; --------------------------------------------------------------------------------------
07d8 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
07da 00cb 0001  |    |		.CONST	0x00cb,0x0001
07dc ; --------------------------------------------------------------------------------------
07dc ; Debug3 Subtable 0x6
07dc ; --------------------------------------------------------------------------------------
07dc 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
07de 00db 0001  |    |		.CONST	0x00db,0x0001
07e0 ; --------------------------------------------------------------------------------------
07e0 ; Debug3 Subtable 0x7
07e0 ; --------------------------------------------------------------------------------------
07e0 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
07e2 00eb 0001  |    |		.CONST	0x00eb,0x0001
07e4 00fb 0003  |    |		.CONST	0x00fb,0x0003
07e6 00fd 0004  |    |		.CONST	0x00fd,0x0004
07e8 00ff 0005  |    |		.CONST	0x00ff,0x0005
07ea 0101 0006  |    |		.CONST	0x0101,0x0006
07ec ; --------------------------------------------------------------------------------------
07ec ; Debug3 Subtable 0x8
07ec ; --------------------------------------------------------------------------------------
07ec 0004 0000  |    |		.DBG3TAB	0x0004,0x0000
07ee 0123 ffff  | #  |		.CONST	0x0123,0xffff
07f0 0125 fffe  | %  |		.CONST	0x0125,0xfffe
07f2 0127 fffd  | '  |		.CONST	0x0127,0xfffd
07f4 0129 fffc  | )  |		.CONST	0x0129,0xfffc
07f6 ; --------------------------------------------------------------------------------------
07f6 ; Debug3 Subtable 0x9
07f6 ; --------------------------------------------------------------------------------------
07f6 0007 0000  |    |		.DBG3TAB	0x0007,0x0000
07f8 012c ffff  | ,  |		.CONST	0x012c,0xffff
07fa 012e fffe  | .  |		.CONST	0x012e,0xfffe
07fc 0130 fffd  | 0  |		.CONST	0x0130,0xfffd
07fe 0138 fffc  | 8  |		.CONST	0x0138,0xfffc
0800 013a fffb  | :  |		.CONST	0x013a,0xfffb
0802 013c fffa  | <  |		.CONST	0x013c,0xfffa
0804 013e fff9  | >  |		.CONST	0x013e,0xfff9
0806 ; --------------------------------------------------------------------------------------
0806 ; Debug3 Subtable 0xa
0806 ; --------------------------------------------------------------------------------------
0806 0004 000a  |    |		.DBG3TAB	0x0004,0x000a
0808 014b ffff  | K  |		.CONST	0x014b,0xffff
080a 0150 fffe  | P  |		.CONST	0x0150,0xfffe
080c 0152 fffd  | R  |		.CONST	0x0152,0xfffd
080e 0155 fffc  | U  |		.CONST	0x0155,0xfffc
0810 0157 0001  | W  |		.CONST	0x0157,0x0001
0812 016a 0002  | j  |		.CONST	0x016a,0x0002
0814 016c 0003  | l  |		.CONST	0x016c,0x0003
0816 017a 0004  | z  |		.CONST	0x017a,0x0004
0818 0180 0005  |    |		.CONST	0x0180,0x0005
081a 0183 0006  |    |		.CONST	0x0183,0x0006
081c 0186 0007  |    |		.CONST	0x0186,0x0007
081e 018e 0008  |    |		.CONST	0x018e,0x0008
0820 0190 0009  |    |		.CONST	0x0190,0x0009
0822 0198 000a  |    |		.CONST	0x0198,0x000a
0824 ; --------------------------------------------------------------------------------------
0824 ; Debug3 Subtable 0xb
0824 ; --------------------------------------------------------------------------------------
0824 0003 0006  |    |		.DBG3TAB	0x0003,0x0006
0826 01a3 ffff  |    |		.CONST	0x01a3,0xffff
0828 01a8 fffe  |    |		.CONST	0x01a8,0xfffe
082a 01ad fffd  |    |		.CONST	0x01ad,0xfffd
082c 01b2 0001  |    |		.CONST	0x01b2,0x0001
082e 01b7 0002  |    |		.CONST	0x01b7,0x0002
0830 01ba 0003  |    |		.CONST	0x01ba,0x0003
0832 01c7 0004  |    |		.CONST	0x01c7,0x0004
0834 01ca 0005  |    |		.CONST	0x01ca,0x0005
0836 01d7 0006  |    |		.CONST	0x01d7,0x0006
0838 ; --------------------------------------------------------------------------------------
0838 ; Debug3 Subtable 0xc
0838 ; --------------------------------------------------------------------------------------
0838 0004 0002  |    |		.DBG3TAB	0x0004,0x0002
083a 01e3 ffff  |    |		.CONST	0x01e3,0xffff
083c 01ea fffe  |    |		.CONST	0x01ea,0xfffe
083e 01ec fffd  |    |		.CONST	0x01ec,0xfffd
0840 01ee fffc  |    |		.CONST	0x01ee,0xfffc
0842 01f7 0001  |    |		.CONST	0x01f7,0x0001
0844 0205 0002  |    |		.CONST	0x0205,0x0002
0846 ; --------------------------------------------------------------------------------------
0846 ; Debug3 Subtable 0xd
0846 ; --------------------------------------------------------------------------------------
0846 0006 0007  |    |		.DBG3TAB	0x0006,0x0007
0848 020b ffff  |    |		.CONST	0x020b,0xffff
084a 0210 fffe  |    |		.CONST	0x0210,0xfffe
084c 0212 fffd  |    |		.CONST	0x0212,0xfffd
084e 0214 fffc  |    |		.CONST	0x0214,0xfffc
0850 0214 fffb  |    |		.CONST	0x0214,0xfffb
0852 0216 fffa  |    |		.CONST	0x0216,0xfffa
0854 021f 0001  |    |		.CONST	0x021f,0x0001
0856 0232 0002  | 2  |		.CONST	0x0232,0x0002
0858 0234 0003  | 4  |		.CONST	0x0234,0x0003
085a 0244 0004  | D  |		.CONST	0x0244,0x0004
085c 024c 0005  | L  |		.CONST	0x024c,0x0005
085e 0252 0006  | R  |		.CONST	0x0252,0x0006
0860 025a 0007  | Z  |		.CONST	0x025a,0x0007
0862 ; --------------------------------------------------------------------------------------
0862 ; Debug3 Subtable 0xe
0862 ; --------------------------------------------------------------------------------------
0862 0003 0007  |    |		.DBG3TAB	0x0003,0x0007
0864 0263 ffff  | c  |		.CONST	0x0263,0xffff
0866 0268 fffe  | h  |		.CONST	0x0268,0xfffe
0868 0270 fffd  | p  |		.CONST	0x0270,0xfffd
086a 027b 0001  | {  |		.CONST	0x027b,0x0001
086c 027f 0002  |    |		.CONST	0x027f,0x0002
086e 0287 0003  |    |		.CONST	0x0287,0x0003
0870 0290 0004  |    |		.CONST	0x0290,0x0004
0872 0294 0005  |    |		.CONST	0x0294,0x0005
0874 0297 0006  |    |		.CONST	0x0297,0x0006
0876 02ab 0007  |    |		.CONST	0x02ab,0x0007
0878 ; --------------------------------------------------------------------------------------
0878 ; Debug3 Subtable 0xf
0878 ; --------------------------------------------------------------------------------------
0878 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
087a 02b3 ffff  |    |		.CONST	0x02b3,0xffff
087c 02b8 fffe  |    |		.CONST	0x02b8,0xfffe
087e 02bb 0001  |    |		.CONST	0x02bb,0x0001
0880 02bf 0002  |    |		.CONST	0x02bf,0x0002
0882 02c1 0003  |    |		.CONST	0x02c1,0x0003
0884 02c5 0004  |    |		.CONST	0x02c5,0x0004
0886 ; --------------------------------------------------------------------------------------
0886 ; Debug3 Subtable 0x10
0886 ; --------------------------------------------------------------------------------------
0886 0000 0007  |    |		.DBG3TAB	0x0000,0x0007
0888 02e3 0001  |    |		.CONST	0x02e3,0x0001
088a 02e5 0002  |    |		.CONST	0x02e5,0x0002
088c 02ec 0003  |    |		.CONST	0x02ec,0x0003
088e 02ed 0004  |    |		.CONST	0x02ed,0x0004
0890 02fe 0005  |    |		.CONST	0x02fe,0x0005
0892 0302 0006  |    |		.CONST	0x0302,0x0006
0894 0305 0007  |    |		.CONST	0x0305,0x0007
0896 ; --------------------------------------------------------------------------------------
0896 ; Debug3 Subtable 0x11
0896 ; --------------------------------------------------------------------------------------
0896 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
0898 030b ffff  |    |		.CONST	0x030b,0xffff
089a 0314 0001  |    |		.CONST	0x0314,0x0001
089c ; --------------------------------------------------------------------------------------
089c ; Debug3 Subtable 0x12
089c ; --------------------------------------------------------------------------------------
089c 000d 0000  |    |		.DBG3TAB	0x000d,0x0000
089e 0343 ffff  | C  |		.CONST	0x0343,0xffff
08a0 0345 fffe  | E  |		.CONST	0x0345,0xfffe
08a2 0347 fffd  | G  |		.CONST	0x0347,0xfffd
08a4 0349 fffc  | I  |		.CONST	0x0349,0xfffc
08a6 034b fffb  | K  |		.CONST	0x034b,0xfffb
08a8 034d fffa  | M  |		.CONST	0x034d,0xfffa
08aa 034f fff9  | O  |		.CONST	0x034f,0xfff9
08ac 0351 fff8  | Q  |		.CONST	0x0351,0xfff8
08ae 0356 fff7  | V  |		.CONST	0x0356,0xfff7
08b0 035c fff6  | \  |		.CONST	0x035c,0xfff6
08b2 0368 fff5  | h  |		.CONST	0x0368,0xfff5
08b4 036a fff4  | j  |		.CONST	0x036a,0xfff4
08b6 036c fff3  | l  |		.CONST	0x036c,0xfff3
08b8 ; --------------------------------------------------------------------------------------
08b8 ; Debug3 Subtable 0x13
08b8 ; --------------------------------------------------------------------------------------
08b8 000f 0000  |    |		.DBG3TAB	0x000f,0x0000
08ba 036f ffff  | o  |		.CONST	0x036f,0xffff
08bc 0371 fffe  | q  |		.CONST	0x0371,0xfffe
08be 0373 fffd  | s  |		.CONST	0x0373,0xfffd
08c0 0375 fffc  | u  |		.CONST	0x0375,0xfffc
08c2 0377 fffb  | w  |		.CONST	0x0377,0xfffb
08c4 0379 fffa  | y  |		.CONST	0x0379,0xfffa
08c6 037b fff9  | {  |		.CONST	0x037b,0xfff9
08c8 037d fff8  | }  |		.CONST	0x037d,0xfff8
08ca 037f fff7  |    |		.CONST	0x037f,0xfff7
08cc 0381 fff6  |    |		.CONST	0x0381,0xfff6
08ce 0383 fff5  |    |		.CONST	0x0383,0xfff5
08d0 0385 fff4  |    |		.CONST	0x0385,0xfff4
08d2 0387 fff3  |    |		.CONST	0x0387,0xfff3
08d4 0389 fff2  |    |		.CONST	0x0389,0xfff2
08d6 038b fff1  |    |		.CONST	0x038b,0xfff1
08d8 ; --------------------------------------------------------------------------------------
08d8 ; Debug3 Subtable 0x14
08d8 ; --------------------------------------------------------------------------------------
08d8 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
08da 0393 ffff  |    |		.CONST	0x0393,0xffff
08dc 039c 0001  |    |		.CONST	0x039c,0x0001
08de 039d 0401  |    |		.CONST	0x039d,0x0401
08e0 03c3 0001  |    |		.CONST	0x03c3,0x0001
08e2 03c5 0002  |    |		.CONST	0x03c5,0x0002
08e4 03c8 0003  |    |		.CONST	0x03c8,0x0003
08e6 ; --------------------------------------------------------------------------------------
08e6 ; Debug3 Subtable 0x15
08e6 ; --------------------------------------------------------------------------------------
08e6 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
08e8 03db 0001  |    |		.CONST	0x03db,0x0001
08ea ; --------------------------------------------------------------------------------------
08ea ; Debug3 Subtable 0x16
08ea ; --------------------------------------------------------------------------------------
08ea 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
08ec 03eb 0001  |    |		.CONST	0x03eb,0x0001
08ee 03ef 0002  |    |		.CONST	0x03ef,0x0002
08f0 03f4 0003  |    |		.CONST	0x03f4,0x0003
08f2 ; --------------------------------------------------------------------------------------
08f2 ; Debug3 Subtable 0x17
08f2 ; --------------------------------------------------------------------------------------
08f2 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
08f4 03fb ffff  |    |		.CONST	0x03fb,0xffff
08f6 0404 0001  |    |		.CONST	0x0404,0x0001
08f8 040a 0002  |    |		.CONST	0x040a,0x0002
08fa 040e 0003  |    |		.CONST	0x040e,0x0003
08fc ; --------------------------------------------------------------------------------------
08fc ; Debug3 Subtable 0x18
08fc ; --------------------------------------------------------------------------------------
08fc 0003 0006  |    |		.DBG3TAB	0x0003,0x0006
08fe 041b ffff  |    |		.CONST	0x041b,0xffff
0900 0421 fffe  | !  |		.CONST	0x0421,0xfffe
0902 0428 fffd  | (  |		.CONST	0x0428,0xfffd
0904 042d 0001  | -  |		.CONST	0x042d,0x0001
0906 043d 0002  | =  |		.CONST	0x043d,0x0002
0908 0441 0003  | A  |		.CONST	0x0441,0x0003
090a 0445 0004  | E  |		.CONST	0x0445,0x0004
090c 044a 0005  | J  |		.CONST	0x044a,0x0005
090e 044e 0006  | N  |		.CONST	0x044e,0x0006
0910 ; --------------------------------------------------------------------------------------
0910 ; Debug3 Subtable 0x19
0910 ; --------------------------------------------------------------------------------------
0910 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0912 045b 0001  | [  |		.CONST	0x045b,0x0001
0914 ; --------------------------------------------------------------------------------------
0914 ; Debug3 Subtable 0x1a
0914 ; --------------------------------------------------------------------------------------
0914 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0916 046b ffff  | k  |		.CONST	0x046b,0xffff
0918 046d 0001  | m  |		.CONST	0x046d,0x0001
091a 047a 0002  | z  |		.CONST	0x047a,0x0002
091c ; --------------------------------------------------------------------------------------
091c ; Debug3 Subtable 0x1b
091c ; --------------------------------------------------------------------------------------
091c 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
091e ; --------------------------------------------------------------------------------------
091e ; Debug3 Subtable 0x1c
091e ; --------------------------------------------------------------------------------------
091e 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0920 ; --------------------------------------------------------------------------------------
0920 ; Debug3 Subtable 0x1d
0920 ; --------------------------------------------------------------------------------------
0920 0003 000c  |    |		.DBG3TAB	0x0003,0x000c
0922 04cb 0001  |    |		.CONST	0x04cb,0x0001
0924 04cd 0002  |    |		.CONST	0x04cd,0x0002
0926 04d8 0003  |    |		.CONST	0x04d8,0x0003
0928 050c 0004  |    |		.CONST	0x050c,0x0004
092a 050d fbff  |    |		.CONST	0x050d,0xfbff
092c 0521 fbfe  | !  |		.CONST	0x0521,0xfbfe
092e 0526 fbfd  | &  |		.CONST	0x0526,0xfbfd
0930 0529 0401  | )  |		.CONST	0x0529,0x0401
0932 052b 0402  | +  |		.CONST	0x052b,0x0402
0934 0531 0403  | 1  |		.CONST	0x0531,0x0403
0936 0538 0404  | 8  |		.CONST	0x0538,0x0404
0938 053a 0405  | :  |		.CONST	0x053a,0x0405
093a 053e 0005  | >  |		.CONST	0x053e,0x0005
093c 0545 0006  | E  |		.CONST	0x0545,0x0006
093e 0548 0007  | H  |		.CONST	0x0548,0x0007
0940 ; --------------------------------------------------------------------------------------
0940 ; Debug3 Subtable 0x1e
0940 ; --------------------------------------------------------------------------------------
0940 0002 0003  |    |		.DBG3TAB	0x0002,0x0003
0942 0553 ffff  | S  |		.CONST	0x0553,0xffff
0944 055a fffe  | Z  |		.CONST	0x055a,0xfffe
0946 055c 0001  | \  |		.CONST	0x055c,0x0001
0948 0568 0002  | h  |		.CONST	0x0568,0x0002
094a 056a 0003  | j  |		.CONST	0x056a,0x0003
094c ; --------------------------------------------------------------------------------------
094c ; Debug3 Subtable 0x1f
094c ; --------------------------------------------------------------------------------------
094c 0005 0008  |    |		.DBG3TAB	0x0005,0x0008
094e 0573 ffff  | s  |		.CONST	0x0573,0xffff
0950 057a fffe  | z  |		.CONST	0x057a,0xfffe
0952 057c fffd  | |  |		.CONST	0x057c,0xfffd
0954 0585 fffc  |    |		.CONST	0x0585,0xfffc
0956 058b fffb  |    |		.CONST	0x058b,0xfffb
0958 05a7 0001  |    |		.CONST	0x05a7,0x0001
095a 05ac 0002  |    |		.CONST	0x05ac,0x0002
095c 05b4 0003  |    |		.CONST	0x05b4,0x0003
095e 05ba 0004  |    |		.CONST	0x05ba,0x0004
0960 05c0 0005  |    |		.CONST	0x05c0,0x0005
0962 05c7 0006  |    |		.CONST	0x05c7,0x0006
0964 05d4 0007  |    |		.CONST	0x05d4,0x0007
0966 05d6 0008  |    |		.CONST	0x05d6,0x0008
0968 ; --------------------------------------------------------------------------------------
0968 ; Debug3 Subtable 0x20
0968 ; --------------------------------------------------------------------------------------
0968 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
096a 05e3 0001  |    |		.CONST	0x05e3,0x0001
096c 05ec 0002  |    |		.CONST	0x05ec,0x0002
096e ; --------------------------------------------------------------------------------------
096e ; Debug3 Subtable 0x21
096e ; --------------------------------------------------------------------------------------
096e 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0970 05f3 ffff  |    |		.CONST	0x05f3,0xffff
0972 05f7 0001  |    |		.CONST	0x05f7,0x0001
0974 05f9 0002  |    |		.CONST	0x05f9,0x0002
0976 05fc 0003  |    |		.CONST	0x05fc,0x0003
0978 ; --------------------------------------------------------------------------------------
0978 ; Debug3 Subtable 0x22
0978 ; --------------------------------------------------------------------------------------
0978 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
097a 0603 0001  |    |		.CONST	0x0603,0x0001
097c 0609 0002  |    |		.CONST	0x0609,0x0002
097e 060b 0003  |    |		.CONST	0x060b,0x0003
0980 060d 0004  |    |		.CONST	0x060d,0x0004
0982 ; --------------------------------------------------------------------------------------
0982 ; Debug3 Subtable 0x23
0982 ; --------------------------------------------------------------------------------------
0982 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0984 0613 ffff  |    |		.CONST	0x0613,0xffff
0986 0619 0001  |    |		.CONST	0x0619,0x0001
0988 061d 0002  |    |		.CONST	0x061d,0x0002
098a 0627 0003  | '  |		.CONST	0x0627,0x0003
098c ; --------------------------------------------------------------------------------------
098c ; Debug3 Subtable 0x24
098c ; --------------------------------------------------------------------------------------
098c 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
098e 0633 ffff  | 3  |		.CONST	0x0633,0xffff
0990 063d fffe  | =  |		.CONST	0x063d,0xfffe
0992 063d 0001  | =  |		.CONST	0x063d,0x0001
0994 0646 0002  | F  |		.CONST	0x0646,0x0002
0996 0649 0003  | I  |		.CONST	0x0649,0x0003
0998 064f 0004  | O  |		.CONST	0x064f,0x0004
099a 0000 0000  |    |		.BLANK	0000[0x66]