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

⟦9b08791f0⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5811_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 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 04f0       |    |		.CONST	0x04f0								; 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 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0084       |    |		.CONST	0x0084								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 002a       | *  |		.CONST	0x002a								; Number of locals
000b			INIT_0008:
000b e001       |    |		Load	0x0,0x1								; Debug Table 0x0 = .DEBUG	0x000b,0x05aa,0x8000,0x0000,0x0037,0xdb64,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
000d 0129       | )  |		Execute	Any,Make_Visible
000e e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x1 = 0xe,0xfffe
000f 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
0010 0129       | )  |		Execute	Any,Make_Visible
0011 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x2 = 0x11,0xfffd
0012 1b4c       | L  |		Execute	Package,Field_Read,Field_Number 0x4c
0013 0129       | )  |		Execute	Any,Make_Visible
0014 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x3 = 0x14,0xfffc
0015 1b3e       | >  |		Execute	Package,Field_Read,Field_Number 0x3e
0016 0129       | )  |		Execute	Any,Make_Visible
0017 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x4 = 0x17,0xfffb
0018 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0019 0129       | )  |		Execute	Any,Make_Visible
001a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x5 = 0x1a,0xfffa
001b 4804       |H   |		Short_Literal	0x4
001c 029f 008b  |    |		Declare_Subprogram	INIT_0088,For_Call
001e 03fe       |    |		Declare_Type	Discrete,Defined,Visible
001f 029a 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x1f,0xfff9
0021 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x21,0xfff8
0023 029a 00fb  |    |		Declare_Subprogram	INIT_00f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x23,0xfff7
0025 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x25,0xfff6
0027 029a 0153  |   S|		Declare_Subprogram	INIT_0150,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x27,0xfff5
0029 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x29,0xfff4
002b 029a 0183  |    |		Declare_Subprogram	INIT_0180,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x2b,0xfff3
002d 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x2d,0xfff2
002f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0xe = 0x2f,0xfff1
0030 4803       |H   |		Short_Literal	0x3
0031 029f 0203  |    |		Declare_Subprogram	INIT_0200,For_Call
0033 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0034 029a 021b  |    |		Declare_Subprogram	INIT_0218,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x34,0xfff0
0036 029a 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x36,0xffef
0038 029a 0263  |   c|		Declare_Subprogram	INIT_0260,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x38,0xffee
003a e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x12 = 0x3a,0xffed
003b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
003c 0129       | )  |		Execute	Any,Make_Visible
003d e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x13 = 0x3d,0xffec
003e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
003f 0129       | )  |		Execute	Any,Make_Visible
0040 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x14 = 0x40,0xffeb
0041 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0042 0129       | )  |		Execute	Any,Make_Visible
0043 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x15 = 0x43,0xffea
0045 029a 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x16 = 0x45,0xffe9
0047 029a 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x17 = 0x47,0xffe8
0049 029a 02db  |    |		Declare_Subprogram	INIT_02d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x18 = 0x49,0xffe7
004b 029a 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x19 = 0x4b,0xffe6
004d 029a 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1a = 0x4d,0xffe5
004f 029a 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1b = 0x4f,0xffe4
0051 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1c = 0x51,0xffe3
0052 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1d = 0x52,0xffe2
0053 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0.0x1e = 0x53,0xffe1
0054 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0054,0x05ea,0x8000,0x0000,0x0037,0xdcc4,0x0000,0x0013
													; Debug Table 0x1.0x0 = 0x54,0xffff
0055 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x55,0xfffe
0056 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x56,0xfffd
0057 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x57,0xfffc
0058 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x4 = 0x58,0xfffb
0059 1b58       | X  |		Execute	Package,Field_Read,Field_Number 0x58
005a 190f       |    |		Execute	Package,Field_Reference,Field_Number 0xf
005b 0007       |    |		Action	Break_Optional
005c e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x5 = 0x5c,0xfffa
005d 1b58       | X  |		Execute	Package,Field_Read,Field_Number 0x58
005e 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
005f 0007       |    |		Action	Break_Optional
0060 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x6 = 0x60,0xfff9
0061 00c7       |    |		Action	Elaborate_Subprogram
0062 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x7 = 0x62,0xfff8
0063 00c7       |    |		Action	Elaborate_Subprogram
0064 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x8 = 0x64,0xfff7
0065 00c7       |    |		Action	Elaborate_Subprogram
0066 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x9 = 0x66,0xfff6
0067 00c7       |    |		Action	Elaborate_Subprogram
0068 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xa = 0x68,0xfff5
0069 00c7       |    |		Action	Elaborate_Subprogram
006a 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0xb = 0x6a,0xfff4
006b 00c7       |    |		Action	Elaborate_Subprogram
006c 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0xc = 0x6c,0xfff3
006d 00c7       |    |		Action	Elaborate_Subprogram
006e 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0xd = 0x6e,0xfff2
006f 00c7       |    |		Action	Elaborate_Subprogram
0070 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0xe = 0x70,0xfff1
0071 00c7       |    |		Action	Elaborate_Subprogram
0072 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0xf = 0x72,0xfff0
0073 00c7       |    |		Action	Elaborate_Subprogram
0074 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22				; Debug Table 0x1.0x10 = 0x74,0xffef
0075 00c7       |    |		Action	Elaborate_Subprogram
0076 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23				; Debug Table 0x1.0x11 = 0x76,0xffee
0077 00c7       |    |		Action	Elaborate_Subprogram
0078 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24				; Debug Table 0x1.0x12 = 0x78,0xffed
0079 00c7       |    |		Action	Elaborate_Subprogram
007a 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25				; Debug Table 0x1.0x13 = 0x7a,0xffec
007b 00c7       |    |		Action	Elaborate_Subprogram
007c 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26				; Debug Table 0x1.0x14 = 0x7c,0xffeb
007d 00c7       |    |		Action	Elaborate_Subprogram
007e 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27				; Debug Table 0x1.0x15 = 0x7e,0xffea
007f 00c7       |    |		Action	Elaborate_Subprogram
0080 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28				; Debug Table 0x1.0x16 = 0x80,0xffe9
0081 00c7       |    |		Action	Elaborate_Subprogram
0082 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x17 = 0x82,0xffe8
0083 00c7       |    |		Action	Elaborate_Subprogram
0084			BODY_0008:
0084 00bc       |    |		Action	Signal_Activated
0085 00bb       |    |		Action	Signal_Completion
0086 0000 0000  |    |		.XXX[0x2]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b       |    |		.CONST	0x008b								; Address of begin
0089 0004       |    |		.CONST	0x0004								; Address of exception handler
008a 0001       |    |		.CONST	0x0001								; Number of locals
008b			BODY_0088:
008b			INIT_0088:
008b 4603       |F   |		Jump_Case	0x4							; Debug Table 0x2 = .DEBUG	0x008b,0x061c,0x0005,0x0000,0x0037,0xdb64,0x0000,0x0024
008c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
008d 7802       |x   |		Jump	0x90								; case 0x1
008e 7805       |x   |		Jump	0x94								; case 0x2
008f 7809       |x   |		Jump	0x99								; case 0x3
0090 00da       |    |		Load_Top	At_Offset_2
0091 0091 0387  |    |		Action	Push_String_Extended_Indexed,0x387				; "A_LENGTH_CLAUSE"
0093 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0094 00db       |    |		Load_Top	At_Offset_3
0095 00db       |    |		Load_Top	At_Offset_3
0096 00e0       |    |		Load_Encached	Standard_Cache
0097 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0098 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0099 00da       |    |		Load_Top	At_Offset_2
009a 00e0       |    |		Load_Encached	Standard_Cache
009b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
009c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
009d 0000 0000  |    |		.XXX[0x3]
009f 0000       |    |
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00ac       |    |		.CONST	0x00ac								; Address of begin
00a1 0004       |    |		.CONST	0x0004								; Address of exception handler
00a2 0002       |    |		.CONST	0x0002								; Number of locals
00a3			INIT_00a0:
00a3 e002       |    |		Load	0x0,0x2								; Debug Table 0x3 = .DEBUG	0x00a3,0x061e,0x0002,0x0000,0x0037,0xdb64,0x0000,0x002d
													; Debug Table 0x3.0x0 = 0xa3,0xffff
00a4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00a5 02ff       |    |		Declare_Variable	Variant_Record
00a6 00db       |    |		Load_Top	At_Offset_3
00a7 8229       | )  |		Call	0x1,0x29
00a8 e002       |    |		Load	0x0,0x2
00a9 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00aa 00d9       |    |		Load_Top	At_Offset_1
00ab 016d       | m  |		Execute	Variant_Record,Structure_Write
00ac			BODY_00a0:
00ac 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x1 = 0xac,0x1
00ad 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00ae 0f05       |    |		Execute_Immediate	Equal,0x5
00af 6803       |h   |		Jump_Zero	0xb3
00b0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x2 = 0xb0,0x2
00b1 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
00b2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00b3 4804       |H   |		Short_Literal	0x4							; Debug Table 0x3.0x3 = 0xb3,0x3
00b4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00b5 0000 0000  |    |		.XXX[0x3]
00b7 0000       |    |
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00c0       |    |		.CONST	0x00c0								; Address of begin
00b9 00ea       |    |		.CONST	0x00ea								; Address of exception handler
00ba 0003       |    |		.CONST	0x0003								; Number of locals
00bb			INIT_00b8:
00bb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4 = .DEBUG	0x00bb,0x0628,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0036
													; Debug Table 0x4.0x0 = 0xbb,0xffff
00bc 00db       |    |		Load_Top	At_Offset_3
00bd 8229       | )  |		Call	0x1,0x29
00be 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00bf 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4.0x1 = 0xbf,0xfffe
00c0			BODY_00b8:
00c0 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x2 = 0xc0,0x1
00c1 00eb       |    |		Load_Encached	Diana_Cache
00c2 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
00c3 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00c4 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x3 = 0xc4,0x2
00c5 00eb       |    |		Load_Encached	Diana_Cache
00c6 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00c7 0b44       | D  |		Execute_Immediate	Case_Compare,0x44
00c8 700d       |p   |		Jump_Nonzero	0xd6
00c9 0b43       | C  |		Execute_Immediate	Case_Compare,0x43
00ca 701a       |p   |		Jump_Nonzero	0xe5
00cb 0b42       | B  |		Execute_Immediate	Case_Compare,0x42
00cc 7018       |p   |		Jump_Nonzero	0xe5
00cd 0092 0390  |    |		Action	Push_String_Extended,0x390					; "Element is not a Representation Clause"
													; Debug Table 0x4.0x4 = 0xcd,0x7
00cf e003       |    |		Load	0x0,0x3
00d0 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
00d1 e004       |    |		Load	0x0,0x4
00d2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00d3 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x5 = 0xd3,0x8
00d4 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
00d5 0257       | W  |		Execute	Discrete,Raise
00d6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x6 = 0xd6,0x3
00d7 00eb       |    |		Load_Encached	Diana_Cache
00d8 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00d9 0f0e       |    |		Execute_Immediate	Equal,0xe
00da 6805       |h   |		Jump_Zero	0xe0
00db 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x7 = 0xdb,0x4
00dc e005       |    |		Load	0x0,0x5
00dd 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00de 822a       | *  |		Call	0x1,0x2a
00df 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00e0 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x8 = 0xe0,0x5
00e1 e005       |    |		Load	0x0,0x5
00e2 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00e3 822a       | *  |		Call	0x1,0x2a
00e4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00e5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x9 = 0xe5,0x6
00e6 e005       |    |		Load	0x0,0x5
00e7 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00e8 822a       | *  |		Call	0x1,0x2a
00e9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ea			TRAP_00b8:
00ea 010e       |    |		Execute	Exception,Is_Constraint_Error
00eb 6809       |h   |		Jump_Zero	0xf5
00ec 0092 0390  |    |		Action	Push_String_Extended,0x390					; "Element is not a Representation Clause"
													; Debug Table 0x4.0xa = 0xec,0x9
00ee e003       |    |		Load	0x0,0x3
00ef 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
00f0 e004       |    |		Load	0x0,0x4
00f1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00f2 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0xb = 0xf2,0xa
00f3 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
00f4 0257       | W  |		Execute	Discrete,Raise
00f5 0100       |    |		Execute	Exception,Raise
00f6 0000 0000  |    |		.XXX[0x2]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00ff       |    |		.CONST	0x00ff								; Address of begin
00f9 0004       |    |		.CONST	0x0004								; Address of exception handler
00fa 0002       |    |		.CONST	0x0002								; Number of locals
00fb			INIT_00f8:
00fb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x5 = .DEBUG	0x00fb,0x0642,0x0002,0x0000,0x0037,0xdb64,0x0000,0x003f
													; Debug Table 0x5.0x0 = 0xfb,0xffff
00fc 00db       |    |		Load_Top	At_Offset_3
00fd 8229       | )  |		Call	0x1,0x29
00fe 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00ff			BODY_00f8:
00ff 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x1 = 0xff,0x1
0100 00eb       |    |		Load_Encached	Diana_Cache
0101 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0102 0b6d       | m  |		Execute_Immediate	Case_Compare,0x6d
0103 701f       |p   |		Jump_Nonzero	0x123
0104 0b6e       | n  |		Execute_Immediate	Case_Compare,0x6e
0105 701d       |p   |		Jump_Nonzero	0x123
0106 0b6f       | o  |		Execute_Immediate	Case_Compare,0x6f
0107 701b       |p   |		Jump_Nonzero	0x123
0108 0b65       | e  |		Execute_Immediate	Case_Compare,0x65
0109 7019       |p   |		Jump_Nonzero	0x123
010a 0b64       | d  |		Execute_Immediate	Case_Compare,0x64
010b 7017       |p   |		Jump_Nonzero	0x123
010c 0b6c       | l  |		Execute_Immediate	Case_Compare,0x6c
010d 7015       |p   |		Jump_Nonzero	0x123
010e 0b72       | r  |		Execute_Immediate	Case_Compare,0x72
010f 7013       |p   |		Jump_Nonzero	0x123
0110 0b6b       | k  |		Execute_Immediate	Case_Compare,0x6b
0111 7011       |p   |		Jump_Nonzero	0x123
0112 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x2 = 0x112,0x3
0113 e006       |    |		Load	0x0,0x6
0114 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0115 0b0c       |    |		Execute_Immediate	Case_Compare,0xc
0116 7003       |p   |		Jump_Nonzero	0x11a
0117 e001       |    |		Load	0x0,0x1								; Debug Table 0x5.0x3 = 0x117,0x6
0118 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0119 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
011a 0092 0391  |    |		Action	Push_String_Extended,0x391					; "Element is not a Type Definition"
													; Debug Table 0x5.0x4 = 0x11a,0x4
011c e003       |    |		Load	0x0,0x3
011d 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
011e e004       |    |		Load	0x0,0x4
011f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0120 e001       |    |		Load	0x0,0x1								; Debug Table 0x5.0x5 = 0x120,0x5
0121 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
0122 0257       | W  |		Execute	Discrete,Raise
0123 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x6 = 0x123,0x2
0124 4903       |I   |		Short_Literal	0x103
0125 00eb       |    |		Load_Encached	Diana_Cache
0126 0096       |    |		Execute	Package,Entry
0127 822a       | *  |		Call	0x1,0x2a
0128 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0129 0000 0000  |    |		.BLANK	0000[0x7]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0137       | 7  |		.CONST	0x0137								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0002       |    |		.CONST	0x0002								; Number of locals
0133			INIT_0130:
0133 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6 = .DEBUG	0x0133,0x0652,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0048
													; Debug Table 0x6.0x0 = 0x133,0xffff
0134 00db       |    |		Load_Top	At_Offset_3
0135 8229       | )  |		Call	0x1,0x29
0136 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0137			BODY_0130:
0137 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x1 = 0x137,0x1
0138 00eb       |    |		Load_Encached	Diana_Cache
0139 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
013a 0b6d       | m  |		Execute_Immediate	Case_Compare,0x6d
013b 700d       |p   |		Jump_Nonzero	0x149
013c 0b6b       | k  |		Execute_Immediate	Case_Compare,0x6b
013d 700b       |p   |		Jump_Nonzero	0x149
013e 0b73       | s  |		Execute_Immediate	Case_Compare,0x73
013f 7009       |p   |		Jump_Nonzero	0x149
0140 0092 0392  |    |		Action	Push_String_Extended,0x392					; "Element can't have a Storage Size Rep"
													; Debug Table 0x6.0x2 = 0x140,0x3
0142 e003       |    |		Load	0x0,0x3
0143 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0144 e004       |    |		Load	0x0,0x4
0145 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0146 e001       |    |		Load	0x0,0x1								; Debug Table 0x6.0x3 = 0x146,0x4
0147 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
0148 0257       | W  |		Execute	Discrete,Raise
0149 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x4 = 0x149,0x2
014a 4906       |I   |		Short_Literal	0x106
014b 00eb       |    |		Load_Encached	Diana_Cache
014c 0096       |    |		Execute	Package,Entry
014d 822a       | *  |		Call	0x1,0x2a
014e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
014f 0000       |    |		.XXX[0x1]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0157       | W  |		.CONST	0x0157								; Address of begin
0151 0004       |    |		.CONST	0x0004								; Address of exception handler
0152 0002       |    |		.CONST	0x0002								; Number of locals
0153			INIT_0150:
0153 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x7 = .DEBUG	0x0153,0x065e,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0051
													; Debug Table 0x7.0x0 = 0x153,0xffff
0154 00db       |    |		Load_Top	At_Offset_3
0155 8229       | )  |		Call	0x1,0x29
0156 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0157			BODY_0150:
0157 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x1 = 0x157,0x1
0158 00eb       |    |		Load_Encached	Diana_Cache
0159 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
015a 0b31       | 1  |		Execute_Immediate	Case_Compare,0x31
015b 700b       |p   |		Jump_Nonzero	0x167
015c 0b32       | 2  |		Execute_Immediate	Case_Compare,0x32
015d 7009       |p   |		Jump_Nonzero	0x167
015e 0092 0393  |    |		Action	Push_String_Extended,0x393					; "Element isn't an Enumeration Element"
													; Debug Table 0x7.0x2 = 0x15e,0x3
0160 e003       |    |		Load	0x0,0x3
0161 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0162 e004       |    |		Load	0x0,0x4
0163 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0164 e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0x3 = 0x164,0x4
0165 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
0166 0257       | W  |		Execute	Discrete,Raise
0167 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x4 = 0x167,0x2
0168 4903       |I   |		Short_Literal	0x103
0169 00eb       |    |		Load_Encached	Diana_Cache
016a 0096       |    |		Execute	Package,Entry
016b 822a       | *  |		Call	0x1,0x2a
016c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
016d 0000 0000  |    |		.XXX[0x3]
016f 0000       |    |
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173       | s  |		.CONST	0x0173								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0001       |    |		.CONST	0x0001								; Number of locals
0173			BODY_0170:
0173			INIT_0170:
0173 0092 0394  |    |		Action	Push_String_Extended,0x394					; "The LONG_INTEGER form of Associated_Enumeration_Representation is not yet implemented"
													; Debug Table 0x8 = .DEBUG	0x0173,0x066a,0x0002,0x0000,0x0037,0xdb64,0x0000,0x005a
													; Debug Table 0x8.0x0 = 0x173,0x1
0175 e003       |    |		Load	0x0,0x3
0176 1b22       | "  |		Execute	Package,Field_Read,Field_Number 0x22
0177 e004       |    |		Load	0x0,0x4
0178 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0179 e001       |    |		Load	0x0,0x1								; Debug Table 0x8.0x1 = 0x179,0x2
017a 1b5a       | Z  |		Execute	Package,Field_Read,Field_Number 0x5a
017b 0257       | W  |		Execute	Discrete,Raise
017c 0000 0000  |    |		.BLANK	0000[0x4]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0187       |    |		.CONST	0x0187								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0002       |    |		.CONST	0x0002								; Number of locals
0183			INIT_0180:
0183 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9 = .DEBUG	0x0183,0x0670,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0063
													; Debug Table 0x9.0x0 = 0x183,0xffff
0184 00db       |    |		Load_Top	At_Offset_3
0185 8229       | )  |		Call	0x1,0x29
0186 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0187			BODY_0180:
0187 00cf       |    |		Action	Mark_Auxiliary
0188 0007       |    |		Action	Break_Optional							; Debug Table 0x9.0x1 = 0x188,0x1
0189 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x2 = 0x189,0x2
018a 00eb       |    |		Load_Encached	Diana_Cache
018b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
018c 0b1c       |    |		Execute_Immediate	Case_Compare,0x1c
018d 700d       |p   |		Jump_Nonzero	0x19b
018e 0b72       | r  |		Execute_Immediate	Case_Compare,0x72
018f 7011       |p   |		Jump_Nonzero	0x1a1
0190 0b39       | 9  |		Execute_Immediate	Case_Compare,0x39
0191 7015       |p   |		Jump_Nonzero	0x1a7
0192 0092 0395  |    |		Action	Push_String_Extended,0x395					; "Element can't have a record rep"
													; Debug Table 0x9.0x3 = 0x192,0x6
0194 e003       |    |		Load	0x0,0x3
0195 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0196 e004       |    |		Load	0x0,0x4
0197 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0198 e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x4 = 0x198,0x7
0199 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
019a 0257       | W  |		Execute	Discrete,Raise
019b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x5 = 0x19b,0x3
019c 4909       |I   |		Short_Literal	0x109
019d 00eb       |    |		Load_Encached	Diana_Cache
019e 0096       |    |		Execute	Package,Entry
019f 822a       | *  |		Call	0x1,0x2a
01a0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x6 = 0x1a1,0x4
01a2 490e       |I   |		Short_Literal	0x10e
01a3 00eb       |    |		Load_Encached	Diana_Cache
01a4 0096       |    |		Execute	Package,Entry
01a5 822a       | *  |		Call	0x1,0x2a
01a6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x7 = 0x1a7,0x5
01a8 00eb       |    |		Load_Encached	Diana_Cache
01a9 18d0       |    |		Execute	Package,Field_Execute,Field_Number 0xd0
01aa 00eb       |    |		Load_Encached	Diana_Cache
01ab 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
01ac 00eb       |    |		Load_Encached	Diana_Cache
01ad 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
01ae 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
01af 00d1       |    |		Pop_Control	Pop_Count_1
01b0 00c9       |    |		Action	Pop_Auxiliary_Loop
01b1 7fd7       |    |		Jump	0x189
01b2 0000 0000  |    |		.BLANK	0000[0x6]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bf       |    |		.CONST	0x01bf								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0002       |    |		.CONST	0x0002								; Number of locals
01bb			INIT_01b8:
01bb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa = .DEBUG	0x01bb,0x0682,0x0002,0x0000,0x0037,0xdb64,0x0000,0x006e
													; Debug Table 0xa.0x0 = 0x1bb,0xffff
01bc 00db       |    |		Load_Top	At_Offset_3
01bd 8229       | )  |		Call	0x1,0x29
01be 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01bf			BODY_01b8:
01bf 00cf       |    |		Action	Mark_Auxiliary
01c0 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x1 = 0x1c0,0x1
01c1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x2 = 0x1c1,0x2
01c2 00eb       |    |		Load_Encached	Diana_Cache
01c3 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01c4 0b30       | 0  |		Execute_Immediate	Case_Compare,0x30
01c5 701b       |p   |		Jump_Nonzero	0x1e1
01c6 0b1d       |    |		Execute_Immediate	Case_Compare,0x1d
01c7 7019       |p   |		Jump_Nonzero	0x1e1
01c8 0b29       | )  |		Execute_Immediate	Case_Compare,0x29
01c9 7017       |p   |		Jump_Nonzero	0x1e1
01ca 0b1f       |    |		Execute_Immediate	Case_Compare,0x1f
01cb 7015       |p   |		Jump_Nonzero	0x1e1
01cc 0b73       | s  |		Execute_Immediate	Case_Compare,0x73
01cd 7013       |p   |		Jump_Nonzero	0x1e1
01ce 0b39       | 9  |		Execute_Immediate	Case_Compare,0x39
01cf 7016       |p   |		Jump_Nonzero	0x1e6
01d0 0b38       | 8  |		Execute_Immediate	Case_Compare,0x38
01d1 7014       |p   |		Jump_Nonzero	0x1e6
01d2 0b02       |    |		Execute_Immediate	Case_Compare,0x2
01d3 7012       |p   |		Jump_Nonzero	0x1e6
01d4 0b3e       | >  |		Execute_Immediate	Case_Compare,0x3e
01d5 7019       |p   |		Jump_Nonzero	0x1ef
01d6 0b3d       | =  |		Execute_Immediate	Case_Compare,0x3d
01d7 701c       |p   |		Jump_Nonzero	0x1f4
01d8 0092 0396  |    |		Action	Push_String_Extended,0x396					; "Element can't have an Address Rep"
													; Debug Table 0xa.0x3 = 0x1d8,0x7
01da e003       |    |		Load	0x0,0x3
01db 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
01dc e004       |    |		Load	0x0,0x4
01dd 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01de e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x4 = 0x1de,0x8
01df 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
01e0 0257       | W  |		Execute	Discrete,Raise
01e1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x5 = 0x1e1,0x3
01e2 00eb       |    |		Load_Encached	Diana_Cache
01e3 18f6       |    |		Execute	Package,Field_Execute,Field_Number 0xf6
01e4 822a       | *  |		Call	0x1,0x2a
01e5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01e6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x6 = 0x1e6,0x4
01e7 00eb       |    |		Load_Encached	Diana_Cache
01e8 18d0       |    |		Execute	Package,Field_Execute,Field_Number 0xd0
01e9 00eb       |    |		Load_Encached	Diana_Cache
01ea 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
01eb 00eb       |    |		Load_Encached	Diana_Cache
01ec 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
01ed 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
01ee 7809       |x   |		Jump	0x1f8
01ef 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x7 = 0x1ef,0x5
01f0 00eb       |    |		Load_Encached	Diana_Cache
01f1 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
01f2 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
01f3 7804       |x   |		Jump	0x1f8
01f4 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x8 = 0x1f4,0x6
01f5 00eb       |    |		Load_Encached	Diana_Cache
01f6 18bf       |    |		Execute	Package,Field_Execute,Field_Number 0xbf
01f7 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
01f8 00d1       |    |		Pop_Control	Pop_Count_1
01f9 00c9       |    |		Action	Pop_Auxiliary_Loop
01fa 7fc6       |    |		Jump	0x1c1
01fb 0000 0000  |    |		.BLANK	0000[0x5]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203       |    |		.CONST	0x0203								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0001       |    |		.CONST	0x0001								; Number of locals
0203			BODY_0200:
0203			INIT_0200:
0203 4603       |F   |		Jump_Case	0x4							; Debug Table 0xb = .DEBUG	0x0203,0x0696,0x0005,0x0000,0x0037,0xdb64,0x0000,0x007b
0204 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0205 7802       |x   |		Jump	0x208								; case 0x1
0206 7805       |x   |		Jump	0x20c								; case 0x2
0207 7809       |x   |		Jump	0x211								; case 0x3
0208 00da       |    |		Load_Top	At_Offset_2
0209 0091 038c  |    |		Action	Push_String_Extended_Indexed,0x38c				; "SIZE"
020b 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
020c 00db       |    |		Load_Top	At_Offset_3
020d 00db       |    |		Load_Top	At_Offset_3
020e 00e0       |    |		Load_Encached	Standard_Cache
020f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0210 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0211 00da       |    |		Load_Top	At_Offset_2
0212 00e0       |    |		Load_Encached	Standard_Cache
0213 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0214 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0215 0000 0000  |    |		.XXX[0x3]
0217 0000       |    |
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0222       | "  |		.CONST	0x0222								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0004       |    |		.CONST	0x0004								; Number of locals
021b			INIT_0218:
021b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xc = .DEBUG	0x021b,0x0698,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0083
													; Debug Table 0xc.0x0 = 0x21b,0xffff
021c 00db       |    |		Load_Top	At_Offset_3
021d 8229       | )  |		Call	0x1,0x29
021e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
021f 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xc.0x1 = 0x21f,0xfffe
0220 029f 035b  |   [|		Declare_Subprogram	INIT_0358,For_Call
0222			BODY_0218:
0222 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x2 = 0x222,0x1
0223 00eb       |    |		Load_Encached	Diana_Cache
0224 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0225 0f44       | D  |		Execute_Immediate	Equal,0x44
0226 6806       |h   |		Jump_Zero	0x22d
0227 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x3 = 0x227,0x2
0228 00eb       |    |		Load_Encached	Diana_Cache
0229 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
022a 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
022b 8404       |    |		Call	0x2,0x4								; Debug Table 0xc.0x4 = 0x22b,0x3
022c 7809       |x   |		Jump	0x236
022d 0092 0397  |    |		Action	Push_String_Extended,0x397					; "Element isn't a Length Clause"
													; Debug Table 0xc.0x5 = 0x22d,0x4
022f e003       |    |		Load	0x0,0x3
0230 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0231 e004       |    |		Load	0x0,0x4
0232 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0233 e001       |    |		Load	0x0,0x1								; Debug Table 0xc.0x6 = 0x233,0x5
0234 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
0235 0257       | W  |		Execute	Discrete,Raise
0236 4831       |H1  |		Short_Literal	0x31
0237 0257       | W  |		Execute	Discrete,Raise
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023f       | ?  |		.CONST	0x023f								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0002       |    |		.CONST	0x0002								; Number of locals
023b			INIT_0238:
023b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd = .DEBUG	0x023b,0x06a8,0x0002,0x0000,0x0037,0xdb64,0x0000,0x008c
													; Debug Table 0xd.0x0 = 0x23b,0xffff
023c 00db       |    |		Load_Top	At_Offset_3
023d 8229       | )  |		Call	0x1,0x29
023e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
023f			BODY_0238:
023f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x1 = 0x23f,0x1
0240 00eb       |    |		Load_Encached	Diana_Cache
0241 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0242 0f44       | D  |		Execute_Immediate	Equal,0x44
0243 680c       |h   |		Jump_Zero	0x250
0244 00d8       |    |		Load_Top	At_Offset_0
0245 00eb       |    |		Load_Encached	Diana_Cache
0246 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
0247 00eb       |    |		Load_Encached	Diana_Cache
0248 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0249 0f0e       |    |		Execute_Immediate	Equal,0xe
024a 7005       |p   |		Jump_Nonzero	0x250
024b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x2 = 0x24b,0x2
024c 00eb       |    |		Load_Encached	Diana_Cache
024d 18c5       |    |		Execute	Package,Field_Execute,Field_Number 0xc5
024e 822a       | *  |		Call	0x1,0x2a
024f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0250 0092 0398  |    |		Action	Push_String_Extended,0x398					; "Element isn't a Representation Aggregate"
													; Debug Table 0xd.0x3 = 0x250,0x3
0252 e003       |    |		Load	0x0,0x3
0253 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0254 e004       |    |		Load	0x0,0x4
0255 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0256 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x4 = 0x256,0x4
0257 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
0258 0257       | W  |		Execute	Discrete,Raise
0259 0000 0000  |    |		.BLANK	0000[0x7]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0268       | h  |		.CONST	0x0268								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0003       |    |		.CONST	0x0003								; Number of locals
0263			INIT_0260:
0263 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xe = .DEBUG	0x0263,0x06b4,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0095
													; Debug Table 0xe.0x0 = 0x263,0xffff
0264 00db       |    |		Load_Top	At_Offset_3
0265 8229       | )  |		Call	0x1,0x29
0266 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0267 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xe.0x1 = 0x267,0xfffe
0268			BODY_0260:
0268 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x2 = 0x268,0x1
0269 00eb       |    |		Load_Encached	Diana_Cache
026a 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
026b 0f43       | C  |		Execute_Immediate	Equal,0x43
026c 6810       |h   |		Jump_Zero	0x27d
026d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x3 = 0x26d,0x2
026e 00eb       |    |		Load_Encached	Diana_Cache
026f 18b3       |    |		Execute	Package,Field_Execute,Field_Number 0xb3
0270 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0271 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x4 = 0x271,0x3
0272 00eb       |    |		Load_Encached	Diana_Cache
0273 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0274 6803       |h   |		Jump_Zero	0x278
0275 e001       |    |		Load	0x0,0x1								; Debug Table 0xe.0x5 = 0x275,0x4
0276 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0277 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0278 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x6 = 0x278,0x5
0279 00eb       |    |		Load_Encached	Diana_Cache
027a 18ca       |    |		Execute	Package,Field_Execute,Field_Number 0xca
027b 822a       | *  |		Call	0x1,0x2a
027c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
027d 0092 0399  |    |		Action	Push_String_Extended,0x399					; "Element isn't an Alignment Expression"
													; Debug Table 0xe.0x7 = 0x27d,0x6
027f e003       |    |		Load	0x0,0x3
0280 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0281 e004       |    |		Load	0x0,0x4
0282 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0283 e001       |    |		Load	0x0,0x1								; Debug Table 0xe.0x8 = 0x283,0x7
0284 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
0285 0257       | W  |		Execute	Discrete,Raise
0286 0000 0000  |    |		.XXX[0x2]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028f       |    |		.CONST	0x028f								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0002       |    |		.CONST	0x0002								; Number of locals
028b			INIT_0288:
028b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xf = .DEBUG	0x028b,0x06c8,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00b0
													; Debug Table 0xf.0x0 = 0x28b,0xffff
028c 00db       |    |		Load_Top	At_Offset_3
028d 8229       | )  |		Call	0x1,0x29
028e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
028f			BODY_0288:
028f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x1 = 0x28f,0x1
0290 00eb       |    |		Load_Encached	Diana_Cache
0291 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0292 0f43       | C  |		Execute_Immediate	Equal,0x43
0293 6809       |h   |		Jump_Zero	0x29d
0294 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x2 = 0x294,0x2
0295 00eb       |    |		Load_Encached	Diana_Cache
0296 18b8       |    |		Execute	Package,Field_Execute,Field_Number 0xb8
0297 00eb       |    |		Load_Encached	Diana_Cache
0298 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
0299 e001       |    |		Load	0x0,0x1
029a 1b58       | X  |		Execute	Package,Field_Read,Field_Number 0x58
029b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
029c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
029d 0092 039a  |    |		Action	Push_String_Extended,0x39a					; "Element isn't a Record Rep"
													; Debug Table 0xf.0x3 = 0x29d,0x3
029f e003       |    |		Load	0x0,0x3
02a0 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
02a1 e004       |    |		Load	0x0,0x4
02a2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02a3 e001       |    |		Load	0x0,0x1								; Debug Table 0xf.0x4 = 0x2a3,0x4
02a4 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
02a5 0257       | W  |		Execute	Discrete,Raise
02a6 0000 0000  |    |		.XXX[0x2]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab       |    |		.CONST	0x02ab								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0001       |    |		.CONST	0x0001								; Number of locals
02ab			BODY_02a8:
02ab			INIT_02a8:
02ab 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10 = .DEBUG	0x02ab,0x06d4,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00b9
													; Debug Table 0x10.0x0 = 0x2ab,0x1
02ac 8229       | )  |		Call	0x1,0x29
02ad 00eb       |    |		Load_Encached	Diana_Cache
02ae 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02af 0fa0       |    |		Execute_Immediate	Equal,-0x60
02b0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b1 0000 0000  |    |		.BLANK	0000[0x7]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bf       |    |		.CONST	0x02bf								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0002       |    |		.CONST	0x0002								; Number of locals
02bb			INIT_02b8:
02bb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x11 = .DEBUG	0x02bb,0x06d8,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00c2
													; Debug Table 0x11.0x0 = 0x2bb,0xffff
02bc 00db       |    |		Load_Top	At_Offset_3
02bd 8229       | )  |		Call	0x1,0x29
02be 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02bf			BODY_02b8:
02bf 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x1 = 0x2bf,0x1
02c0 00eb       |    |		Load_Encached	Diana_Cache
02c1 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02c2 0fa0       |    |		Execute_Immediate	Equal,-0x60
02c3 6804       |h   |		Jump_Zero	0x2c8
02c4 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11.0x2 = 0x2c4,0x2
02c5 e001       |    |		Load	0x0,0x1
02c6 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
02c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02c8 0092 039b  |    |		Action	Push_String_Extended,0x39b					; "Element isn't a Component Clause"
													; Debug Table 0x11.0x3 = 0x2c8,0x3
02ca e003       |    |		Load	0x0,0x3
02cb 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
02cc e004       |    |		Load	0x0,0x4
02cd 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02ce e001       |    |		Load	0x0,0x1								; Debug Table 0x11.0x4 = 0x2ce,0x4
02cf 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
02d0 0257       | W  |		Execute	Discrete,Raise
02d1 0000 0000  |    |		.BLANK	0000[0x7]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02df       |    |		.CONST	0x02df								; Address of begin
02d9 0004       |    |		.CONST	0x0004								; Address of exception handler
02da 0002       |    |		.CONST	0x0002								; Number of locals
02db			INIT_02d8:
02db 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x12 = .DEBUG	0x02db,0x06e4,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00cb
													; Debug Table 0x12.0x0 = 0x2db,0xffff
02dc 00db       |    |		Load_Top	At_Offset_3
02dd 8229       | )  |		Call	0x1,0x29
02de 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02df			BODY_02d8:
02df 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x1 = 0x2df,0x1
02e0 00eb       |    |		Load_Encached	Diana_Cache
02e1 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02e2 0fa0       |    |		Execute_Immediate	Equal,-0x60
02e3 6805       |h   |		Jump_Zero	0x2e9
02e4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x2 = 0x2e4,0x2
02e5 00eb       |    |		Load_Encached	Diana_Cache
02e6 18c5       |    |		Execute	Package,Field_Execute,Field_Number 0xc5
02e7 822a       | *  |		Call	0x1,0x2a
02e8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02e9 0092 039b  |    |		Action	Push_String_Extended,0x39b					; "Element isn't a Component Clause"
													; Debug Table 0x12.0x3 = 0x2e9,0x3
02eb e003       |    |		Load	0x0,0x3
02ec 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
02ed e004       |    |		Load	0x0,0x4
02ee 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02ef e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x4 = 0x2ef,0x4
02f0 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
02f1 0257       | W  |		Execute	Discrete,Raise
02f2 0000 0000  |    |		.BLANK	0000[0x6]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02ff       |    |		.CONST	0x02ff								; Address of begin
02f9 0004       |    |		.CONST	0x0004								; Address of exception handler
02fa 0002       |    |		.CONST	0x0002								; Number of locals
02fb			INIT_02f8:
02fb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x13 = .DEBUG	0x02fb,0x06f0,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00d4
													; Debug Table 0x13.0x0 = 0x2fb,0xffff
02fc 00db       |    |		Load_Top	At_Offset_3
02fd 8229       | )  |		Call	0x1,0x29
02fe 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02ff			BODY_02f8:
02ff 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x1 = 0x2ff,0x1
0300 00eb       |    |		Load_Encached	Diana_Cache
0301 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0302 0fa0       |    |		Execute_Immediate	Equal,-0x60
0303 6805       |h   |		Jump_Zero	0x309
0304 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x2 = 0x304,0x2
0305 00eb       |    |		Load_Encached	Diana_Cache
0306 18dc       |    |		Execute	Package,Field_Execute,Field_Number 0xdc
0307 822a       | *  |		Call	0x1,0x2a
0308 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0309 0092 039b  |    |		Action	Push_String_Extended,0x39b					; "Element isn't a Component Clause"
													; Debug Table 0x13.0x3 = 0x309,0x3
030b e003       |    |		Load	0x0,0x3
030c 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
030d e004       |    |		Load	0x0,0x4
030e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
030f e001       |    |		Load	0x0,0x1								; Debug Table 0x13.0x4 = 0x30f,0x4
0310 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
0311 0257       | W  |		Execute	Discrete,Raise
0312 0000 0000  |    |		.BLANK	0000[0x6]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 031f       |    |		.CONST	0x031f								; Address of begin
0319 0004       |    |		.CONST	0x0004								; Address of exception handler
031a 0002       |    |		.CONST	0x0002								; Number of locals
031b			INIT_0318:
031b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x14 = .DEBUG	0x031b,0x06fc,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00dd
													; Debug Table 0x14.0x0 = 0x31b,0xffff
031c 00db       |    |		Load_Top	At_Offset_3
031d 8229       | )  |		Call	0x1,0x29
031e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
031f			BODY_0318:
031f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x1 = 0x31f,0x1
0320 00eb       |    |		Load_Encached	Diana_Cache
0321 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0322 0f42       | B  |		Execute_Immediate	Equal,0x42
0323 6806       |h   |		Jump_Zero	0x32a
0324 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0x2 = 0x324,0x2
0325 00d9       |    |		Load_Top	At_Offset_1
0326 e007       |    |		Load	0x0,0x7
0327 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0328 822a       | *  |		Call	0x1,0x2a
0329 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
032a 0092 039c  |    |		Action	Push_String_Extended,0x39c					; "Element isn't an Address Clause"
													; Debug Table 0x14.0x3 = 0x32a,0x3
032c e003       |    |		Load	0x0,0x3
032d 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
032e e004       |    |		Load	0x0,0x4
032f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0330 e001       |    |		Load	0x0,0x1								; Debug Table 0x14.0x4 = 0x330,0x4
0331 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
0332 0257       | W  |		Execute	Discrete,Raise
0333 0000 0000  |    |		.BLANK	0000[0x5]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033f       | ?  |		.CONST	0x033f								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 0002       |    |		.CONST	0x0002								; Number of locals
033b			INIT_0338:
033b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x15 = .DEBUG	0x033b,0x0708,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00e6
													; Debug Table 0x15.0x0 = 0x33b,0xffff
033c 00db       |    |		Load_Top	At_Offset_3
033d 8229       | )  |		Call	0x1,0x29
033e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
033f			BODY_0338:
033f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x1 = 0x33f,0x1
0340 00eb       |    |		Load_Encached	Diana_Cache
0341 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0342 0f42       | B  |		Execute_Immediate	Equal,0x42
0343 6805       |h   |		Jump_Zero	0x349
0344 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x2 = 0x344,0x2
0345 00eb       |    |		Load_Encached	Diana_Cache
0346 18c5       |    |		Execute	Package,Field_Execute,Field_Number 0xc5
0347 822a       | *  |		Call	0x1,0x2a
0348 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0349 0092 039c  |    |		Action	Push_String_Extended,0x39c					; "Element isn't an Address Clause"
													; Debug Table 0x15.0x3 = 0x349,0x3
034b e003       |    |		Load	0x0,0x3
034c 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
034d e004       |    |		Load	0x0,0x4
034e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
034f e001       |    |		Load	0x0,0x1								; Debug Table 0x15.0x4 = 0x34f,0x4
0350 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
0351 0257       | W  |		Execute	Discrete,Raise
0352 0000 0000  |    |		.BLANK	0000[0x6]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 035e       | ^  |		.CONST	0x035e								; Address of begin
0359 0004       |    |		.CONST	0x0004								; Address of exception handler
035a 0002       |    |		.CONST	0x0002								; Number of locals
035b			INIT_0358:
035b e403       |    |		Load	0x2,0x3								; Debug Table 0x16 = .DEBUG	0x035b,0x0714,0x0004,0x0000,0x0037,0xdcc4,0x0000,0x038e
													; Debug Table 0x16.0x0 = 0x35b,0xffff
035c e005       |    |		Load	0x0,0x5
035d 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
035e			BODY_0358:
035e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x1 = 0x35e,0x1
035f 0092 038c  |    |		Action	Push_String_Extended,0x38c					; "SIZE"
0361 01df       |    |		Execute	Vector,Equal
0362 6803       |h   |		Jump_Zero	0x366
0363 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0x2 = 0x363,0x2
0364 00cb       |    |		Action	Pop_Block_With_Result
0365 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0366 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x3 = 0x366,0x3
0367 0092 039d  |    |		Action	Push_String_Extended,0x39d					; "STORAGE_SIZE"
0369 01df       |    |		Execute	Vector,Equal
036a 6812       |h   |		Jump_Zero	0x37d
036b e403       |    |		Load	0x2,0x3								; Debug Table 0x16.0x4 = 0x36b,0x4
036c e005       |    |		Load	0x0,0x5
036d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
036e 00eb       |    |		Load_Encached	Diana_Cache
036f 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0370 0b6b       | k  |		Execute_Immediate	Case_Compare,0x6b
0371 7003       |p   |		Jump_Nonzero	0x375
0372 0b73       | s  |		Execute_Immediate	Case_Compare,0x73
0373 7004       |p   |		Jump_Nonzero	0x378
0374 7806       |x   |		Jump	0x37b								; Debug Table 0x16.0x5 = 0x374,0x7
0375 4801       |H   |		Short_Literal	0x1							; Debug Table 0x16.0x6 = 0x375,0x5
0376 00cb       |    |		Action	Pop_Block_With_Result
0377 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0378 4802       |H   |		Short_Literal	0x2							; Debug Table 0x16.0x7 = 0x378,0x6
0379 00cb       |    |		Action	Pop_Block_With_Result
037a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
037b 00d1       |    |		Pop_Control	Pop_Count_1
037c 7808       |x   |		Jump	0x385
037d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x8 = 0x37d,0x8
037e 0092 038f  |    |		Action	Push_String_Extended,0x38f					; "SMALL"
0380 01df       |    |		Execute	Vector,Equal
0381 6803       |h   |		Jump_Zero	0x385
0382 4803       |H   |		Short_Literal	0x3							; Debug Table 0x16.0x9 = 0x382,0x9
0383 00cb       |    |		Action	Pop_Block_With_Result
0384 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0385 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x16.0xa = 0x385,0xa
0386 0257       | W  |		Execute	Discrete,Raise
0387 ; --------------------------------------------------------------------------------------
0387 ; STRING TABLE
0387 ; --------------------------------------------------------------------------------------
0387 0030       | 0  |		.STRTAB	0x0030->0x039f							; "A_LENGTH_CLAUSE"
0388 003d       | =  |		.STRTAB	0x003d->0x03a6							; "AN_ENUMERATION_REPRESENTATION_CLAUSE"
0389 005f       | _  |		.STRTAB	0x005f->0x03b8							; "A_RECORD_REPRESENTATION_CLAUSE"
038a 007b       | {  |		.STRTAB	0x007b->0x03c7							; "AN_ADDRESS_CLAUSE"
038b 008a       |    |		.STRTAB	0x008a->0x03d0							; "NOT_A_REPRESENTATION_CLAUSE"
038c 00a3       |    |		.STRTAB	0x00a3->0x03dd							; "SIZE"
038d 00a5       |    |		.STRTAB	0x00a5->0x03df							; "COLLECTION_STORAGE_SIZE"
038e 00ba       |    |		.STRTAB	0x00ba->0x03eb							; "TASK_STORAGE_SIZE"
038f 00c9       |    |		.STRTAB	0x00c9->0x03f3							; "SMALL"
0390 00cc       |    |		.STRTAB	0x00cc->0x03f6							; "Element is not a Representation Clause"
0391 00f0       |    |		.STRTAB	0x00f0->0x0409							; "Element is not a Type Definition"
0392 010e       |    |		.STRTAB	0x010e->0x0419							; "Element can't have a Storage Size Rep"
0393 0131       | 1  |		.STRTAB	0x0131->0x042b							; "Element isn't an Enumeration Element"
0394 0153       | S  |		.STRTAB	0x0153->0x043d							; "The LONG_INTEGER form of Associated_Enumeration_Representation is not yet implemented"
0395 01a6       |    |		.STRTAB	0x01a6->0x0468							; "Element can't have a record rep"
0396 01c3       |    |		.STRTAB	0x01c3->0x0477							; "Element can't have an Address Rep"
0397 01e2       |    |		.STRTAB	0x01e2->0x0488							; "Element isn't a Length Clause"
0398 01fd       |    |		.STRTAB	0x01fd->0x0496							; "Element isn't a Representation Aggregate"
0399 0223       | #  |		.STRTAB	0x0223->0x04aa							; "Element isn't an Alignment Expression"
039a 0246       | F  |		.STRTAB	0x0246->0x04bd							; "Element isn't a Record Rep"
039b 025e       | ^  |		.STRTAB	0x025e->0x04ca							; "Element isn't a Component Clause"
039c 027c       | |  |		.STRTAB	0x027c->0x04da							; "Element isn't an Address Clause"
039d 0299       |    |		.STRTAB	0x0299->0x04e9							; "STORAGE_SIZE"
039e 02a3       |    |		.STREND 0x02a3->0x04ef
039f 415f 4c45  |A_LE|		.STRTAB_STRINGS
04f0 ; --------------------------------------------------------------------------------------
04f0 ; Debug Table
04f0 ; --------------------------------------------------------------------------------------
04f0 0003 0017  |    |		.CONST	0x0003,0x0017
04f2 000b 05aa  |    |		.DEBUG	0x000b,0x05aa,0x8000,0x0000,0x0037,0xdb64,0x0000,0x0005
04fa 0054 05ea  | T  |		.DEBUG	0x0054,0x05ea,0x8000,0x0000,0x0037,0xdcc4,0x0000,0x0013
0502 008b 061c  |    |		.DEBUG	0x008b,0x061c,0x0005,0x0000,0x0037,0xdb64,0x0000,0x0024
050a 00a3 061e  |    |		.DEBUG	0x00a3,0x061e,0x0002,0x0000,0x0037,0xdb64,0x0000,0x002d
0512 00bb 0628  |   (|		.DEBUG	0x00bb,0x0628,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0036
051a 00fb 0642  |   B|		.DEBUG	0x00fb,0x0642,0x0002,0x0000,0x0037,0xdb64,0x0000,0x003f
0522 0133 0652  | 3 R|		.DEBUG	0x0133,0x0652,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0048
052a 0153 065e  | S ^|		.DEBUG	0x0153,0x065e,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0051
0532 0173 066a  | s j|		.DEBUG	0x0173,0x066a,0x0002,0x0000,0x0037,0xdb64,0x0000,0x005a
053a 0183 0670  |   p|		.DEBUG	0x0183,0x0670,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0063
0542 01bb 0682  |    |		.DEBUG	0x01bb,0x0682,0x0002,0x0000,0x0037,0xdb64,0x0000,0x006e
054a 0203 0696  |    |		.DEBUG	0x0203,0x0696,0x0005,0x0000,0x0037,0xdb64,0x0000,0x007b
0552 021b 0698  |    |		.DEBUG	0x021b,0x0698,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0083
055a 023b 06a8  | ;  |		.DEBUG	0x023b,0x06a8,0x0002,0x0000,0x0037,0xdb64,0x0000,0x008c
0562 0263 06b4  | c  |		.DEBUG	0x0263,0x06b4,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0095
056a 028b 06c8  |    |		.DEBUG	0x028b,0x06c8,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00b0
0572 02ab 06d4  |    |		.DEBUG	0x02ab,0x06d4,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00b9
057a 02bb 06d8  |    |		.DEBUG	0x02bb,0x06d8,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00c2
0582 02db 06e4  |    |		.DEBUG	0x02db,0x06e4,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00cb
058a 02fb 06f0  |    |		.DEBUG	0x02fb,0x06f0,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00d4
0592 031b 06fc  |    |		.DEBUG	0x031b,0x06fc,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00dd
059a 033b 0708  | ;  |		.DEBUG	0x033b,0x0708,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00e6
05a2 035b 0714  | [  |		.DEBUG	0x035b,0x0714,0x0004,0x0000,0x0037,0xdcc4,0x0000,0x038e
05aa ; --------------------------------------------------------------------------------------
05aa ; Debug3 Subtable 0x0
05aa ; --------------------------------------------------------------------------------------
05aa 001f 0000  |    |		.DBG3TAB	0x001f,0x0000
05ac 000b ffff  |    |		.CONST	0x000b,0xffff
05ae 000e fffe  |    |		.CONST	0x000e,0xfffe
05b0 0011 fffd  |    |		.CONST	0x0011,0xfffd
05b2 0014 fffc  |    |		.CONST	0x0014,0xfffc
05b4 0017 fffb  |    |		.CONST	0x0017,0xfffb
05b6 001a fffa  |    |		.CONST	0x001a,0xfffa
05b8 001f fff9  |    |		.CONST	0x001f,0xfff9
05ba 0021 fff8  | !  |		.CONST	0x0021,0xfff8
05bc 0023 fff7  | #  |		.CONST	0x0023,0xfff7
05be 0025 fff6  | %  |		.CONST	0x0025,0xfff6
05c0 0027 fff5  | '  |		.CONST	0x0027,0xfff5
05c2 0029 fff4  | )  |		.CONST	0x0029,0xfff4
05c4 002b fff3  | +  |		.CONST	0x002b,0xfff3
05c6 002d fff2  | -  |		.CONST	0x002d,0xfff2
05c8 002f fff1  | /  |		.CONST	0x002f,0xfff1
05ca 0034 fff0  | 4  |		.CONST	0x0034,0xfff0
05cc 0036 ffef  | 6  |		.CONST	0x0036,0xffef
05ce 0038 ffee  | 8  |		.CONST	0x0038,0xffee
05d0 003a ffed  | :  |		.CONST	0x003a,0xffed
05d2 003d ffec  | =  |		.CONST	0x003d,0xffec
05d4 0040 ffeb  | @  |		.CONST	0x0040,0xffeb
05d6 0043 ffea  | C  |		.CONST	0x0043,0xffea
05d8 0045 ffe9  | E  |		.CONST	0x0045,0xffe9
05da 0047 ffe8  | G  |		.CONST	0x0047,0xffe8
05dc 0049 ffe7  | I  |		.CONST	0x0049,0xffe7
05de 004b ffe6  | K  |		.CONST	0x004b,0xffe6
05e0 004d ffe5  | M  |		.CONST	0x004d,0xffe5
05e2 004f ffe4  | O  |		.CONST	0x004f,0xffe4
05e4 0051 ffe3  | Q  |		.CONST	0x0051,0xffe3
05e6 0052 ffe2  | R  |		.CONST	0x0052,0xffe2
05e8 0053 ffe1  | S  |		.CONST	0x0053,0xffe1
05ea ; --------------------------------------------------------------------------------------
05ea ; Debug3 Subtable 0x1
05ea ; --------------------------------------------------------------------------------------
05ea 0018 0000  |    |		.DBG3TAB	0x0018,0x0000
05ec 0054 ffff  | T  |		.CONST	0x0054,0xffff
05ee 0055 fffe  | U  |		.CONST	0x0055,0xfffe
05f0 0056 fffd  | V  |		.CONST	0x0056,0xfffd
05f2 0057 fffc  | W  |		.CONST	0x0057,0xfffc
05f4 0058 fffb  | X  |		.CONST	0x0058,0xfffb
05f6 005c fffa  | \  |		.CONST	0x005c,0xfffa
05f8 0060 fff9  | `  |		.CONST	0x0060,0xfff9
05fa 0062 fff8  | b  |		.CONST	0x0062,0xfff8
05fc 0064 fff7  | d  |		.CONST	0x0064,0xfff7
05fe 0066 fff6  | f  |		.CONST	0x0066,0xfff6
0600 0068 fff5  | h  |		.CONST	0x0068,0xfff5
0602 006a fff4  | j  |		.CONST	0x006a,0xfff4
0604 006c fff3  | l  |		.CONST	0x006c,0xfff3
0606 006e fff2  | n  |		.CONST	0x006e,0xfff2
0608 0070 fff1  | p  |		.CONST	0x0070,0xfff1
060a 0072 fff0  | r  |		.CONST	0x0072,0xfff0
060c 0074 ffef  | t  |		.CONST	0x0074,0xffef
060e 0076 ffee  | v  |		.CONST	0x0076,0xffee
0610 0078 ffed  | x  |		.CONST	0x0078,0xffed
0612 007a ffec  | z  |		.CONST	0x007a,0xffec
0614 007c ffeb  | |  |		.CONST	0x007c,0xffeb
0616 007e ffea  | ~  |		.CONST	0x007e,0xffea
0618 0080 ffe9  |    |		.CONST	0x0080,0xffe9
061a 0082 ffe8  |    |		.CONST	0x0082,0xffe8
061c ; --------------------------------------------------------------------------------------
061c ; Debug3 Subtable 0x2
061c ; --------------------------------------------------------------------------------------
061c 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
061e ; --------------------------------------------------------------------------------------
061e ; Debug3 Subtable 0x3
061e ; --------------------------------------------------------------------------------------
061e 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0620 00a3 ffff  |    |		.CONST	0x00a3,0xffff
0622 00ac 0001  |    |		.CONST	0x00ac,0x0001
0624 00b0 0002  |    |		.CONST	0x00b0,0x0002
0626 00b3 0003  |    |		.CONST	0x00b3,0x0003
0628 ; --------------------------------------------------------------------------------------
0628 ; Debug3 Subtable 0x4
0628 ; --------------------------------------------------------------------------------------
0628 0002 000a  |    |		.DBG3TAB	0x0002,0x000a
062a 00bb ffff  |    |		.CONST	0x00bb,0xffff
062c 00bf fffe  |    |		.CONST	0x00bf,0xfffe
062e 00c0 0001  |    |		.CONST	0x00c0,0x0001
0630 00c4 0002  |    |		.CONST	0x00c4,0x0002
0632 00cd 0007  |    |		.CONST	0x00cd,0x0007
0634 00d3 0008  |    |		.CONST	0x00d3,0x0008
0636 00d6 0003  |    |		.CONST	0x00d6,0x0003
0638 00db 0004  |    |		.CONST	0x00db,0x0004
063a 00e0 0005  |    |		.CONST	0x00e0,0x0005
063c 00e5 0006  |    |		.CONST	0x00e5,0x0006
063e 00ec 0009  |    |		.CONST	0x00ec,0x0009
0640 00f2 000a  |    |		.CONST	0x00f2,0x000a
0642 ; --------------------------------------------------------------------------------------
0642 ; Debug3 Subtable 0x5
0642 ; --------------------------------------------------------------------------------------
0642 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
0644 00fb ffff  |    |		.CONST	0x00fb,0xffff
0646 00ff 0001  |    |		.CONST	0x00ff,0x0001
0648 0112 0003  |    |		.CONST	0x0112,0x0003
064a 0117 0006  |    |		.CONST	0x0117,0x0006
064c 011a 0004  |    |		.CONST	0x011a,0x0004
064e 0120 0005  |    |		.CONST	0x0120,0x0005
0650 0123 0002  | #  |		.CONST	0x0123,0x0002
0652 ; --------------------------------------------------------------------------------------
0652 ; Debug3 Subtable 0x6
0652 ; --------------------------------------------------------------------------------------
0652 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0654 0133 ffff  | 3  |		.CONST	0x0133,0xffff
0656 0137 0001  | 7  |		.CONST	0x0137,0x0001
0658 0140 0003  | @  |		.CONST	0x0140,0x0003
065a 0146 0004  | F  |		.CONST	0x0146,0x0004
065c 0149 0002  | I  |		.CONST	0x0149,0x0002
065e ; --------------------------------------------------------------------------------------
065e ; Debug3 Subtable 0x7
065e ; --------------------------------------------------------------------------------------
065e 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0660 0153 ffff  | S  |		.CONST	0x0153,0xffff
0662 0157 0001  | W  |		.CONST	0x0157,0x0001
0664 015e 0003  | ^  |		.CONST	0x015e,0x0003
0666 0164 0004  | d  |		.CONST	0x0164,0x0004
0668 0167 0002  | g  |		.CONST	0x0167,0x0002
066a ; --------------------------------------------------------------------------------------
066a ; Debug3 Subtable 0x8
066a ; --------------------------------------------------------------------------------------
066a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
066c 0173 0001  | s  |		.CONST	0x0173,0x0001
066e 0179 0002  | y  |		.CONST	0x0179,0x0002
0670 ; --------------------------------------------------------------------------------------
0670 ; Debug3 Subtable 0x9
0670 ; --------------------------------------------------------------------------------------
0670 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
0672 0183 ffff  |    |		.CONST	0x0183,0xffff
0674 0188 0001  |    |		.CONST	0x0188,0x0001
0676 0189 0002  |    |		.CONST	0x0189,0x0002
0678 0192 0006  |    |		.CONST	0x0192,0x0006
067a 0198 0007  |    |		.CONST	0x0198,0x0007
067c 019b 0003  |    |		.CONST	0x019b,0x0003
067e 01a1 0004  |    |		.CONST	0x01a1,0x0004
0680 01a7 0005  |    |		.CONST	0x01a7,0x0005
0682 ; --------------------------------------------------------------------------------------
0682 ; Debug3 Subtable 0xa
0682 ; --------------------------------------------------------------------------------------
0682 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
0684 01bb ffff  |    |		.CONST	0x01bb,0xffff
0686 01c0 0001  |    |		.CONST	0x01c0,0x0001
0688 01c1 0002  |    |		.CONST	0x01c1,0x0002
068a 01d8 0007  |    |		.CONST	0x01d8,0x0007
068c 01de 0008  |    |		.CONST	0x01de,0x0008
068e 01e1 0003  |    |		.CONST	0x01e1,0x0003
0690 01e6 0004  |    |		.CONST	0x01e6,0x0004
0692 01ef 0005  |    |		.CONST	0x01ef,0x0005
0694 01f4 0006  |    |		.CONST	0x01f4,0x0006
0696 ; --------------------------------------------------------------------------------------
0696 ; Debug3 Subtable 0xb
0696 ; --------------------------------------------------------------------------------------
0696 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0698 ; --------------------------------------------------------------------------------------
0698 ; Debug3 Subtable 0xc
0698 ; --------------------------------------------------------------------------------------
0698 0002 0005  |    |		.DBG3TAB	0x0002,0x0005
069a 021b ffff  |    |		.CONST	0x021b,0xffff
069c 021f fffe  |    |		.CONST	0x021f,0xfffe
069e 0222 0001  | "  |		.CONST	0x0222,0x0001
06a0 0227 0002  | '  |		.CONST	0x0227,0x0002
06a2 022b 0003  | +  |		.CONST	0x022b,0x0003
06a4 022d 0004  | -  |		.CONST	0x022d,0x0004
06a6 0233 0005  | 3  |		.CONST	0x0233,0x0005
06a8 ; --------------------------------------------------------------------------------------
06a8 ; Debug3 Subtable 0xd
06a8 ; --------------------------------------------------------------------------------------
06a8 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
06aa 023b ffff  | ;  |		.CONST	0x023b,0xffff
06ac 023f 0001  | ?  |		.CONST	0x023f,0x0001
06ae 024b 0002  | K  |		.CONST	0x024b,0x0002
06b0 0250 0003  | P  |		.CONST	0x0250,0x0003
06b2 0256 0004  | V  |		.CONST	0x0256,0x0004
06b4 ; --------------------------------------------------------------------------------------
06b4 ; Debug3 Subtable 0xe
06b4 ; --------------------------------------------------------------------------------------
06b4 0002 0007  |    |		.DBG3TAB	0x0002,0x0007
06b6 0263 ffff  | c  |		.CONST	0x0263,0xffff
06b8 0267 fffe  | g  |		.CONST	0x0267,0xfffe
06ba 0268 0001  | h  |		.CONST	0x0268,0x0001
06bc 026d 0002  | m  |		.CONST	0x026d,0x0002
06be 0271 0003  | q  |		.CONST	0x0271,0x0003
06c0 0275 0004  | u  |		.CONST	0x0275,0x0004
06c2 0278 0005  | x  |		.CONST	0x0278,0x0005
06c4 027d 0006  | }  |		.CONST	0x027d,0x0006
06c6 0283 0007  |    |		.CONST	0x0283,0x0007
06c8 ; --------------------------------------------------------------------------------------
06c8 ; Debug3 Subtable 0xf
06c8 ; --------------------------------------------------------------------------------------
06c8 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
06ca 028b ffff  |    |		.CONST	0x028b,0xffff
06cc 028f 0001  |    |		.CONST	0x028f,0x0001
06ce 0294 0002  |    |		.CONST	0x0294,0x0002
06d0 029d 0003  |    |		.CONST	0x029d,0x0003
06d2 02a3 0004  |    |		.CONST	0x02a3,0x0004
06d4 ; --------------------------------------------------------------------------------------
06d4 ; Debug3 Subtable 0x10
06d4 ; --------------------------------------------------------------------------------------
06d4 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06d6 02ab 0001  |    |		.CONST	0x02ab,0x0001
06d8 ; --------------------------------------------------------------------------------------
06d8 ; Debug3 Subtable 0x11
06d8 ; --------------------------------------------------------------------------------------
06d8 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
06da 02bb ffff  |    |		.CONST	0x02bb,0xffff
06dc 02bf 0001  |    |		.CONST	0x02bf,0x0001
06de 02c4 0002  |    |		.CONST	0x02c4,0x0002
06e0 02c8 0003  |    |		.CONST	0x02c8,0x0003
06e2 02ce 0004  |    |		.CONST	0x02ce,0x0004
06e4 ; --------------------------------------------------------------------------------------
06e4 ; Debug3 Subtable 0x12
06e4 ; --------------------------------------------------------------------------------------
06e4 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
06e6 02db ffff  |    |		.CONST	0x02db,0xffff
06e8 02df 0001  |    |		.CONST	0x02df,0x0001
06ea 02e4 0002  |    |		.CONST	0x02e4,0x0002
06ec 02e9 0003  |    |		.CONST	0x02e9,0x0003
06ee 02ef 0004  |    |		.CONST	0x02ef,0x0004
06f0 ; --------------------------------------------------------------------------------------
06f0 ; Debug3 Subtable 0x13
06f0 ; --------------------------------------------------------------------------------------
06f0 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
06f2 02fb ffff  |    |		.CONST	0x02fb,0xffff
06f4 02ff 0001  |    |		.CONST	0x02ff,0x0001
06f6 0304 0002  |    |		.CONST	0x0304,0x0002
06f8 0309 0003  |    |		.CONST	0x0309,0x0003
06fa 030f 0004  |    |		.CONST	0x030f,0x0004
06fc ; --------------------------------------------------------------------------------------
06fc ; Debug3 Subtable 0x14
06fc ; --------------------------------------------------------------------------------------
06fc 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
06fe 031b ffff  |    |		.CONST	0x031b,0xffff
0700 031f 0001  |    |		.CONST	0x031f,0x0001
0702 0324 0002  | $  |		.CONST	0x0324,0x0002
0704 032a 0003  | *  |		.CONST	0x032a,0x0003
0706 0330 0004  | 0  |		.CONST	0x0330,0x0004
0708 ; --------------------------------------------------------------------------------------
0708 ; Debug3 Subtable 0x15
0708 ; --------------------------------------------------------------------------------------
0708 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
070a 033b ffff  | ;  |		.CONST	0x033b,0xffff
070c 033f 0001  | ?  |		.CONST	0x033f,0x0001
070e 0344 0002  | D  |		.CONST	0x0344,0x0002
0710 0349 0003  | I  |		.CONST	0x0349,0x0003
0712 034f 0004  | O  |		.CONST	0x034f,0x0004
0714 ; --------------------------------------------------------------------------------------
0714 ; Debug3 Subtable 0x16
0714 ; --------------------------------------------------------------------------------------
0714 0001 000a  |    |		.DBG3TAB	0x0001,0x000a
0716 035b ffff  | [  |		.CONST	0x035b,0xffff
0718 035e 0001  | ^  |		.CONST	0x035e,0x0001
071a 0363 0002  | c  |		.CONST	0x0363,0x0002
071c 0366 0003  | f  |		.CONST	0x0366,0x0003
071e 036b 0004  | k  |		.CONST	0x036b,0x0004
0720 0374 0007  | t  |		.CONST	0x0374,0x0007
0722 0375 0005  | u  |		.CONST	0x0375,0x0005
0724 0378 0006  | x  |		.CONST	0x0378,0x0006
0726 037d 0008  | }  |		.CONST	0x037d,0x0008
0728 0382 0009  |    |		.CONST	0x0382,0x0009
072a 0385 000a  |    |		.CONST	0x0385,0x000a
072c 0000 0000  |    |		.BLANK	0000[0xd4]