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

⟦0fdf393f3⟧

    Length: 6144 (0x1800)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0

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 06c0       |    |		.CONST	0x06c0								; 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 0005       |    |		.CONST	0x0005								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0014       |    |		.CONST	0x0014								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 000f       |    |		.CONST	0x000f								; Number of locals
000b			INIT_0008:
000b 029a 001b  |    |		Declare_Subprogram	INIT_0018,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x075a,0x0000,0x0000,0x0056,0xbdc5,0x0000,0x00a6
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 00bf       |    |		Action	Accept_Activation
000e 029d 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call			; Debug Table 0x1 = .DEBUG	0x000e,0x075e,0x0000,0x0000,0x0056,0xbdd5,0x0000,0x000e
													; Debug Table 0x1.0x0 = 0xe,0xffff
													; Debug Table 0x1.0x1 = 0xe,0xfffe
													; Debug Table 0x1.0x2 = 0xe,0xfffd
													; Debug Table 0x1.0x3 = 0xe,0xfffc
0010 029d 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call			; Debug Table 0x1.0x4 = 0x10,0xfffb
0012 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x5 = 0x12,0xfffa
0013 00c7       |    |		Action	Elaborate_Subprogram
0014			BODY_0008:
0014 00bc       |    |		Action	Signal_Activated
0015 00bb       |    |		Action	Signal_Completion
0016 0000 0000  |    |		.XXX[0x2]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0047       | G  |		.CONST	0x0047								; Address of begin
0019 00c2       |    |		.CONST	0x00c2								; Address of exception handler
001a 0014       |    |		.CONST	0x0014								; Number of locals
001b			INIT_0018:
001b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2 = .DEBUG	0x001b,0x076c,0x0002,0x0000,0x0056,0xbdc5,0x0000,0x00a7
													; Debug Table 0x2.0x0 = 0x1b,0xffff
001c 4be8       |K   |		Short_Literal	0x3e8
001d 00e9       |    |		Load_Encached	String_Cache
001e 0334       | 4  |		Declare_Variable	Array,With_Constraint
001f 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x2.0x1 = 0x1f,0xfffe
0020 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0021 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2.0x2 = 0x21,0xfffd
0022 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0023 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x3 = 0x23,0xfffc
0024 e5fe       |    |		Load	0x2,-0x2
0025 0092 0535  |   5|		Action	Push_String_Extended,0x535					; "<1>"
0027 e001       |    |		Load	0x0,0x1
0028 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0029 00e2       |    |		Load_Encached	Integer_Cache
002a 03f1       |    |		Declare_Variable	Discrete,With_Value
002b 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x2.0x4 = 0x2b,0xfffb
002c 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2.0x5 = 0x2c,0xfffa
002d 029f 0123  |   #|		Declare_Subprogram	INIT_0120,For_Call				; Debug Table 0x2.0x6 = 0x2d,0xfff9
002f 029f 0133  |   3|		Declare_Subprogram	INIT_0130,For_Call				; Debug Table 0x2.0x7 = 0x2f,0xfff8
0031 029f 0143  |   C|		Declare_Subprogram	INIT_0140,For_Call				; Debug Table 0x2.0x8 = 0x31,0xfff7
0033 029f 016b  |   k|		Declare_Subprogram	INIT_0168,For_Call				; Debug Table 0x2.0x9 = 0x33,0xfff6
0035 029f 018b  |    |		Declare_Subprogram	INIT_0188,For_Call				; Debug Table 0x2.0xa = 0x35,0xfff5
0037 029f 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Call				; Debug Table 0x2.0xb = 0x37,0xfff4
0039 029f 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Call				; Debug Table 0x2.0xc = 0x39,0xfff3
003b 029f 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Call				; Debug Table 0x2.0xd = 0x3b,0xfff2
003d 029f 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Call				; Debug Table 0x2.0xe = 0x3d,0xfff1
003f 029f 0333  |   3|		Declare_Subprogram	INIT_0330,For_Call				; Debug Table 0x2.0xf = 0x3f,0xfff0
0041 029f 034b  |   K|		Declare_Subprogram	INIT_0348,For_Call				; Debug Table 0x2.0x10 = 0x41,0xffef
0043 029f 0363  |   c|		Declare_Subprogram	INIT_0360,For_Call				; Debug Table 0x2.0x11 = 0x43,0xffee
0045 029f 04bb  |    |		Declare_Subprogram	INIT_04b8,For_Call				; Debug Table 0x2.0x12 = 0x45,0xffed
0047			BODY_0018:
0047 e405       |    |		Load	0x2,0x5								; Debug Table 0x2.0x13 = 0x47,0x1
0048 7005       |p   |		Jump_Nonzero	0x4e
0049 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2.0x14 = 0x49,0x2
004a 01dd       |    |		Execute	Vector,First
004b 0afd       |    |		Execute_Immediate	Plus,-0x3
004c 0248       | H  |		Execute	Discrete,Check_In_Integer
004d a405       |    |		Store_Unchecked	0x2,0x5
004e e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2.0x15 = 0x4e,0x3
													; Debug Table 0x2.0x16 = 0x4e,0x401
004f 021d       |    |		Execute	Heap_Access,Is_Null
0050 6803       |h   |		Jump_Zero	0x54							; Debug Table 0x2.0x17 = 0x50,0x3
0051 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x18 = 0x51,0x4
0052 a406       |    |		Store_Unchecked	0x2,0x6
0053 7813       |x   |		Jump	0x67
0054 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x19 = 0x54,0x5
0055 e5fe       |    |		Load	0x2,-0x2
0056 0092 0536  |   6|		Action	Push_String_Extended,0x536					; "<2>"
0058 e001       |    |		Load	0x0,0x1
0059 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
005a a406       |    |		Store_Unchecked	0x2,0x6
005b e406       |    |		Load	0x2,0x6								; Debug Table 0x2.0x1a = 0x5b,0x6
005c 700a       |p   |		Jump_Nonzero	0x67
005d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x1b = 0x5d,0x7
005e e5fe       |    |		Load	0x2,-0x2
005f 0092 0537  |   7|		Action	Push_String_Extended,0x537					; "<3>"
0061 e001       |    |		Load	0x0,0x1
0062 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0063 a406       |    |		Store_Unchecked	0x2,0x6
0064 e406       |    |		Load	0x2,0x6								; Debug Table 0x2.0x1c = 0x64,0x8
0065 0e00       |    |		Execute_Immediate	Not_Equal,0x0
0066 a407       |    |		Store_Unchecked	0x2,0x7
0067 e406       |    |		Load	0x2,0x6								; Debug Table 0x2.0x1d = 0x67,0x9
0068 7005       |p   |		Jump_Nonzero	0x6e
0069 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2.0x1e = 0x69,0xa
006a 01dc       |    |		Execute	Vector,Last
006b 0a01       |    |		Execute_Immediate	Plus,0x1
006c 0248       | H  |		Execute	Discrete,Check_In_Integer
006d a406       |    |		Store_Unchecked	0x2,0x6
006e e405       |    |		Load	0x2,0x5								; Debug Table 0x2.0x1f = 0x6e,0xb
006f e406       |    |		Load	0x2,0x6
0070 027a       | z  |		Execute	Discrete,Less_Equal
0071 6826       |h&  |		Jump_Zero	0x98
0072 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2.0x20 = 0x72,0xc
0073 01dd       |    |		Execute	Vector,First
0074 e405       |    |		Load	0x2,0x5
0075 0aff       |    |		Execute_Immediate	Plus,-0x1
0076 0248       | H  |		Execute	Discrete,Check_In_Integer
0077 e5fe       |    |		Load	0x2,-0x2
0078 01cf       |    |		Execute	Vector,Slice_Read
0079 840a       |    |		Call	0x2,0xa
007a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x21 = 0x7a,0xd
													; Debug Table 0x2.0x22 = 0x7a,0x801
007b 021d       |    |		Execute	Heap_Access,Is_Null
007c 7003       |p   |		Jump_Nonzero	0x80							; Debug Table 0x2.0x23 = 0x7c,0xd
007d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x24 = 0x7d,0xe
007e e5ff       |    |		Load	0x2,-0x1
007f 8413       |    |		Call	0x2,0x13
0080 e405       |    |		Load	0x2,0x5								; Debug Table 0x2.0x25 = 0x80,0xf
0081 0a03       |    |		Execute_Immediate	Plus,0x3
0082 0248       | H  |		Execute	Discrete,Check_In_Integer
0083 e406       |    |		Load	0x2,0x6
0084 0aff       |    |		Execute_Immediate	Plus,-0x1
0085 0248       | H  |		Execute	Discrete,Check_In_Integer
0086 e5fe       |    |		Load	0x2,-0x2
0087 01cf       |    |		Execute	Vector,Slice_Read
0088 840a       |    |		Call	0x2,0xa
0089 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2.0x26 = 0x89,0x10
													; Debug Table 0x2.0x27 = 0x89,0xc01
008a 021d       |    |		Execute	Heap_Access,Is_Null
008b 7003       |p   |		Jump_Nonzero	0x8f							; Debug Table 0x2.0x28 = 0x8b,0x10
008c e407       |    |		Load	0x2,0x7								; Debug Table 0x2.0x29 = 0x8c,0x11
008d e5fd       |    |		Load	0x2,-0x3
008e 8413       |    |		Call	0x2,0x13
008f e406       |    |		Load	0x2,0x6								; Debug Table 0x2.0x2a = 0x8f,0x12
0090 0a03       |    |		Execute_Immediate	Plus,0x3
0091 0248       | H  |		Execute	Discrete,Check_In_Integer
0092 e5fe       |    |		Load	0x2,-0x2
0093 01dc       |    |		Execute	Vector,Last
0094 e5fe       |    |		Load	0x2,-0x2
0095 01cf       |    |		Execute	Vector,Slice_Read
0096 840a       |    |		Call	0x2,0xa
0097 7825       |x%  |		Jump	0xbd
0098 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2.0x2b = 0x98,0x13
0099 01dd       |    |		Execute	Vector,First
009a e406       |    |		Load	0x2,0x6
009b 0aff       |    |		Execute_Immediate	Plus,-0x1
009c 0248       | H  |		Execute	Discrete,Check_In_Integer
009d e5fe       |    |		Load	0x2,-0x2
009e 01cf       |    |		Execute	Vector,Slice_Read
009f 840a       |    |		Call	0x2,0xa
00a0 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2.0x2c = 0xa0,0x14
													; Debug Table 0x2.0x2d = 0xa0,0x1001
00a1 021d       |    |		Execute	Heap_Access,Is_Null
00a2 7003       |p   |		Jump_Nonzero	0xa6							; Debug Table 0x2.0x2e = 0xa2,0x14
00a3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x2f = 0xa3,0x15
00a4 e5fd       |    |		Load	0x2,-0x3
00a5 8413       |    |		Call	0x2,0x13
00a6 e406       |    |		Load	0x2,0x6								; Debug Table 0x2.0x30 = 0xa6,0x16
00a7 0a03       |    |		Execute_Immediate	Plus,0x3
00a8 0248       | H  |		Execute	Discrete,Check_In_Integer
00a9 e405       |    |		Load	0x2,0x5
00aa 0aff       |    |		Execute_Immediate	Plus,-0x1
00ab 0248       | H  |		Execute	Discrete,Check_In_Integer
00ac e5fe       |    |		Load	0x2,-0x2
00ad 01cf       |    |		Execute	Vector,Slice_Read
00ae 840a       |    |		Call	0x2,0xa
00af e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x31 = 0xaf,0x17
													; Debug Table 0x2.0x32 = 0xaf,0x1401
00b0 021d       |    |		Execute	Heap_Access,Is_Null
00b1 7003       |p   |		Jump_Nonzero	0xb5							; Debug Table 0x2.0x33 = 0xb1,0x17
00b2 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x34 = 0xb2,0x18
00b3 e5ff       |    |		Load	0x2,-0x1
00b4 8413       |    |		Call	0x2,0x13
00b5 e405       |    |		Load	0x2,0x5								; Debug Table 0x2.0x35 = 0xb5,0x19
00b6 0a03       |    |		Execute_Immediate	Plus,0x3
00b7 0248       | H  |		Execute	Discrete,Check_In_Integer
00b8 e5fe       |    |		Load	0x2,-0x2
00b9 01dc       |    |		Execute	Vector,Last
00ba e5fe       |    |		Load	0x2,-0x2
00bb 01cf       |    |		Execute	Vector,Slice_Read
00bc 840a       |    |		Call	0x2,0xa
00bd 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x36 = 0xbd,0x1a
00be e403       |    |		Load	0x2,0x3
00bf e402       |    |		Load	0x2,0x2
00c0 01cf       |    |		Execute	Vector,Slice_Read
00c1 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
00c2			TRAP_0018:
00c2 0007       |    |		Action	Break_Optional
00c3 0092 0538  |   8|		Action	Push_String_Extended,0x538					; "This message has become obsolete because of changes in the conditions that originally caused it to be generated; the original message was of the form: "
													; Debug Table 0x2.0x37 = 0xc3,0x1b
00c5 8414       |    |		Call	0x2,0x14
00c6 01cc       |    |		Execute	Vector,Catenate
00c7 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x00cb,0x07de,0x0002,0x0000,0x0056,0xbdd5,0x0000,0x001f
													; Debug Table 0x3.0x0 = 0xcb,0xffff
													; Debug Table 0x3.0x1 = 0xcb,0x1
00cc 0ae0       |    |		Execute_Immediate	Plus,-0x20
00cd 00d8       |    |		Load_Top	At_Offset_0
00ce 00e8       |    |		Load_Encached	Character_Cache
00cf 0260       | `  |		Execute	Discrete,In_Type
00d0 7002       |p   |		Jump_Nonzero	0xd3
00d1 48e0       |H   |		Short_Literal	0xe0
00d2 0257       | W  |		Execute	Discrete,Raise
00d3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d4 0000 0000  |    |		.BLANK	0000[0x4]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00dd       |    |		.CONST	0x00dd								; Address of begin
00d9 0116       |    |		.CONST	0x0116								; Address of exception handler
00da 0003       |    |		.CONST	0x0003								; Number of locals
00db			INIT_00d8:
00db 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4 = .DEBUG	0x00db,0x07e4,0x0002,0x0000,0x0056,0xbdd5,0x0000,0x004a
													; Debug Table 0x4.0x0 = 0xdb,0xffff
00dc 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4.0x1 = 0xdc,0xfffe
00dd			BODY_00d8:
00dd 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x2 = 0xdd,0x1
00de e002       |    |		Load	0x0,0x2
00df 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
00e0 6809       |h   |		Jump_Zero	0xea
00e1 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x3 = 0xe1,0x2
00e2 e002       |    |		Load	0x0,0x2
00e3 1845       | E  |		Execute	Package,Field_Execute,Field_Number 0x45
00e4 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00e5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x4 = 0xe5,0x3
													; Debug Table 0x4.0x5 = 0xe5,0x401
00e6 021d       |    |		Execute	Heap_Access,Is_Null
00e7 7002       |p   |		Jump_Nonzero	0xea							; Debug Table 0x4.0x6 = 0xe7,0x3
00e8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x7 = 0xe8,0x4
00e9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ea 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x8 = 0xea,0x5
00eb 00eb       |    |		Load_Encached	Diana_Cache
00ec 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
00ed 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
00ee e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x9 = 0xee,0x6
													; Debug Table 0x4.0xa = 0xee,0x801
00ef 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x4.0xb = 0xef,0x802
00f0 0b3b       | ;  |		Execute_Immediate	Case_Compare,0x3b				; Debug Table 0x4.0xc = 0xf0,0x803
													; Debug Table 0x4.0xd = 0xf0,0x804
													; Debug Table 0x4.0xe = 0xf0,0x6
00f1 7003       |p   |		Jump_Nonzero	0xf5
00f2 0b3c       | <  |		Execute_Immediate	Case_Compare,0x3c
00f3 7010       |p   |		Jump_Nonzero	0x104
00f4 781e       |x   |		Jump	0x113								; Debug Table 0x4.0xf = 0xf4,0xd
00f5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x10 = 0xf5,0x7
00f6 00eb       |    |		Load_Encached	Diana_Cache
00f7 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
00f8 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
00f9 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x11 = 0xf9,0x8
													; Debug Table 0x4.0x12 = 0xf9,0xc01
00fa 021d       |    |		Execute	Heap_Access,Is_Null
00fb 7017       |p   |		Jump_Nonzero	0x113							; Debug Table 0x4.0x13 = 0xfb,0x8
00fc 00da       |    |		Load_Top	At_Offset_2
00fd 00eb       |    |		Load_Encached	Diana_Cache
00fe 18e8       |    |		Execute	Package,Field_Execute,Field_Number 0xe8
00ff 00de       |    |		Load_Top	At_Offset_6
0100 021f       |    |		Execute	Heap_Access,Equal
0101 6811       |h   |		Jump_Zero	0x113
0102 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x14 = 0x102,0x9
0103 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0104 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x15 = 0x104,0xa
0105 00eb       |    |		Load_Encached	Diana_Cache
0106 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
0107 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0108 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x16 = 0x108,0xb
													; Debug Table 0x4.0x17 = 0x108,0x1001
0109 021d       |    |		Execute	Heap_Access,Is_Null
010a 7008       |p   |		Jump_Nonzero	0x113							; Debug Table 0x4.0x18 = 0x10a,0xb
010b 00da       |    |		Load_Top	At_Offset_2
010c 00eb       |    |		Load_Encached	Diana_Cache
010d 18b9       |    |		Execute	Package,Field_Execute,Field_Number 0xb9
010e 00de       |    |		Load_Top	At_Offset_6
010f 021f       |    |		Execute	Heap_Access,Equal
0110 6802       |h   |		Jump_Zero	0x113
0111 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x19 = 0x111,0xc
0112 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0113 00d1       |    |		Pop_Control	Pop_Count_1
0114 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x1a = 0x114,0xe
0115 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0116			TRAP_00d8:
0116 0007       |    |		Action	Break_Optional
0117 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0x4.0x1b = 0x117,0xf
0118 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0119 0000 0000  |    |		.BLANK	0000[0x7]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123       | #  |		.CONST	0x0123								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0001       |    |		.CONST	0x0001								; Number of locals
0123			BODY_0120:
0123			INIT_0120:
0123 e403       |    |		Load	0x2,0x3								; Debug Table 0x5 = .DEBUG	0x0123,0x081e,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0134
													; Debug Table 0x5.0x0 = 0x123,0x1
0124 4be8       |K   |		Short_Literal	0x3e8
0125 027c       | |  |		Execute	Discrete,Less
0126 6808       |h   |		Jump_Zero	0x12f
0127 e403       |    |		Load	0x2,0x3								; Debug Table 0x5.0x1 = 0x127,0x2
0128 0a01       |    |		Execute_Immediate	Plus,0x1
0129 0248       | H  |		Execute	Discrete,Check_In_Integer
012a a403       |    |		Store_Unchecked	0x2,0x3
012b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x2 = 0x12b,0x3
012c e403       |    |		Load	0x2,0x3
012d e402       |    |		Load	0x2,0x2
012e 01d6       |    |		Execute	Vector,Field_Write
012f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133       | 3  |		.CONST	0x0133								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0001       |    |		.CONST	0x0001								; Number of locals
0133			BODY_0130:
0133			INIT_0130:
0133 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x0133,0x0826,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0157
													; Debug Table 0x6.0x0 = 0x133,0x1
0134 01d9       |    |		Execute	Vector,Reverse_Bounds
0135 0263       | c  |		Execute	Discrete,Above_Bound
0136 7005       |p   |		Jump_Nonzero	0x13c
0137 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x1 = 0x137,0x2
0138 00dd       |    |		Load_Top	At_Offset_5
0139 01d7       |    |		Execute	Vector,Field_Read
013a 8408       |    |		Call	0x2,0x8
013b 3ffb       |?   |		Loop_Increasing	0x137
013c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
013d 0000 0000  |    |		.XXX[0x3]
013f 0000       |    |
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143       | C  |		.CONST	0x0143								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0001       |    |		.CONST	0x0001								; Number of locals
0143			BODY_0140:
0143			INIT_0140:
0143 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x0143,0x082c,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0171
													; Debug Table 0x7.0x0 = 0x143,0x1
0144 01db       |    |		Execute	Vector,Length
0145 7001       |p   |		Jump_Nonzero	0x147
0146 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x7.0x1 = 0x146,0x2
0147 e404       |    |		Load	0x2,0x4								; Debug Table 0x7.0x2 = 0x147,0x3
0148 681a       |h   |		Jump_Zero	0x163
0149 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x3 = 0x149,0x4
014a a404       |    |		Store_Unchecked	0x2,0x4
014b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x4 = 0x14b,0x5
014c 01dd       |    |		Execute	Vector,First
014d 00db       |    |		Load_Top	At_Offset_3
014e 01d7       |    |		Execute	Vector,Field_Read
014f 4861       |Ha  |		Short_Literal	0x61
0150 487a       |Hz  |		Short_Literal	0x7a
0151 0262       | b  |		Execute	Discrete,In_Range
0152 6810       |h   |		Jump_Zero	0x163
0153 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x5 = 0x153,0x6
0154 01dd       |    |		Execute	Vector,First
0155 00db       |    |		Load_Top	At_Offset_3
0156 01d7       |    |		Execute	Vector,Field_Read
0157 820e       |    |		Call	0x1,0xe
0158 8408       |    |		Call	0x2,0x8
0159 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x6 = 0x159,0x7
015a 01dd       |    |		Execute	Vector,First
015b 0a01       |    |		Execute_Immediate	Plus,0x1
015c 0248       | H  |		Execute	Discrete,Check_In_Integer
015d 00db       |    |		Load_Top	At_Offset_3
015e 01dc       |    |		Execute	Vector,Last
015f 00dc       |    |		Load_Top	At_Offset_4
0160 01cf       |    |		Execute	Vector,Slice_Read
0161 8409       |    |		Call	0x2,0x9
0162 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x7.0x7 = 0x162,0x8
0163 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x8 = 0x163,0x9
0164 8409       |    |		Call	0x2,0x9
0165 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0166 0000 0000  |    |		.XXX[0x2]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b       | k  |		.CONST	0x016b								; Address of begin
0169 0004       |    |		.CONST	0x0004								; Address of exception handler
016a 0001       |    |		.CONST	0x0001								; Number of locals
016b			BODY_0168:
016b			INIT_0168:
016b e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x8 = .DEBUG	0x016b,0x0840,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x01be
													; Debug Table 0x8.0x0 = 0x16b,0x1
													; Debug Table 0x8.0x1 = 0x16b,0x401
016c 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x8.0x2 = 0x16c,0x402
016d 0b33       | 3  |		Execute_Immediate	Case_Compare,0x33				; Debug Table 0x8.0x3 = 0x16d,0x403
													; Debug Table 0x8.0x4 = 0x16d,0x404
													; Debug Table 0x8.0x5 = 0x16d,0x1
016e 7009       |p   |		Jump_Nonzero	0x178
016f 0b0b       |    |		Execute_Immediate	Case_Compare,0xb
0170 7007       |p   |		Jump_Nonzero	0x178
0171 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x6 = 0x171,0x3
0172 00eb       |    |		Load_Encached	Diana_Cache
0173 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0174 00eb       |    |		Load_Encached	Diana_Cache
0175 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0176 840a       |    |		Call	0x2,0xa
0177 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0178 4822       |H"  |		Short_Literal	0x22							; Debug Table 0x8.0x7 = 0x178,0x2
0179 4822       |H"  |		Short_Literal	0x22
017a 00dd       |    |		Load_Top	At_Offset_5
017b 00eb       |    |		Load_Encached	Diana_Cache
017c 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
017d 00eb       |    |		Load_Encached	Diana_Cache
017e 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
017f 01ca       |    |		Execute	Vector,Prepend
0180 01cb       |    |		Execute	Vector,Append
0181 840a       |    |		Call	0x2,0xa
0182 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0183 0000 0000  |    |		.BLANK	0000[0x5]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 0192       |    |		.CONST	0x0192								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0004       |    |		.CONST	0x0004								; Number of locals
018b			INIT_0188:
018b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9 = .DEBUG	0x018b,0x0852,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0205
													; Debug Table 0x9.0x0 = 0x18b,0xffff
018c 00db       |    |		Load_Top	At_Offset_3
018d 820f       |    |		Call	0x1,0xf
018e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
018f 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9.0x1 = 0x18f,0xfffe
0190 029f 0523  |   #|		Declare_Subprogram	INIT_0520,For_Call
0192			BODY_0188:
0192 e602       |    |		Load	0x3,0x2								; Debug Table 0x9.0x2 = 0x192,0x1
													; Debug Table 0x9.0x3 = 0x192,0x401
0193 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x9.0x4 = 0x193,0x402
0194 008a       |    |		Action	Discrete,Diana_Spare0						; Debug Table 0x9.0x5 = 0x194,0x403
0195 7010       |p   |		Jump_Nonzero	0x1a6							; Debug Table 0x9.0x6 = 0x195,0x404
													; Debug Table 0x9.0x7 = 0x195,0x405
													; Debug Table 0x9.0x8 = 0x195,0x406
													; Debug Table 0x9.0x9 = 0x195,0x1
0196 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x9.0xa = 0x196,0x2
													; Debug Table 0x9.0xb = 0x196,0x801
0197 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x9.0xc = 0x197,0x802
0198 0bab       |    |		Execute_Immediate	Case_Compare,0xab				; Debug Table 0x9.0xd = 0x198,0x803
													; Debug Table 0x9.0xe = 0x198,0x804
													; Debug Table 0x9.0xf = 0x198,0x2
0199 7007       |p   |		Jump_Nonzero	0x1a1
019a 0b78       | x  |		Execute_Immediate	Case_Compare,0x78
019b 7005       |p   |		Jump_Nonzero	0x1a1
019c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9.0x10 = 0x19c,0x4
019d e003       |    |		Load	0x0,0x3
019e 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
019f 840a       |    |		Call	0x2,0xa
01a0 7803       |x   |		Jump	0x1a4
01a1 0092 0539  |   9|		Action	Push_String_Extended,0x539					; "[nonterminal]"
													; Debug Table 0x9.0x11 = 0x1a1,0x3
01a3 840a       |    |		Call	0x2,0xa
01a4 00d1       |    |		Pop_Control	Pop_Count_1
01a5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x9.0x12 = 0x1a5,0x5
01a6 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x9.0x13 = 0x1a6,0x6
01a7 6801       |h   |		Jump_Zero	0x1a9
01a8 8604       |    |		Call	0x3,0x4								; Debug Table 0x9.0x14 = 0x1a8,0x7
01a9 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x15 = 0x1a9,0x8
01aa 840b       |    |		Call	0x2,0xb
01ab 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01ac 0000 0000  |    |		.BLANK	0000[0x4]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01ba       |    |		.CONST	0x01ba								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0002       |    |		.CONST	0x0002								; Number of locals
01b3			INIT_01b0:
01b3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa = .DEBUG	0x01b3,0x0880,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x028e
													; Debug Table 0xa.0x0 = 0x1b3,0xffff
01b4 00db       |    |		Load_Top	At_Offset_3
01b5 4902       |I   |		Short_Literal	0x102
01b6 00eb       |    |		Load_Encached	Diana_Cache
01b7 0096       |    |		Execute	Package,Entry
01b8 820f       |    |		Call	0x1,0xf
01b9 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01ba			BODY_01b0:
01ba e602       |    |		Load	0x3,0x2								; Debug Table 0xa.0x1 = 0x1ba,0x1
													; Debug Table 0xa.0x2 = 0x1ba,0x401
01bb 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xa.0x3 = 0x1bb,0x402
01bc 0b2f       | /  |		Execute_Immediate	Case_Compare,0x2f				; Debug Table 0xa.0x4 = 0x1bc,0x403
													; Debug Table 0xa.0x5 = 0x1bc,0x404
													; Debug Table 0xa.0x6 = 0x1bc,0x1
01bd 700d       |p   |		Jump_Nonzero	0x1cb
01be 0b2d       | -  |		Execute_Immediate	Case_Compare,0x2d
01bf 700b       |p   |		Jump_Nonzero	0x1cb
01c0 0b2a       | *  |		Execute_Immediate	Case_Compare,0x2a
01c1 7009       |p   |		Jump_Nonzero	0x1cb
01c2 0b2b       | +  |		Execute_Immediate	Case_Compare,0x2b
01c3 7007       |p   |		Jump_Nonzero	0x1cb
01c4 0b6c       | l  |		Execute_Immediate	Case_Compare,0x6c
01c5 700d       |p   |		Jump_Nonzero	0x1d3
01c6 0b66       | f  |		Execute_Immediate	Case_Compare,0x66
01c7 7011       |p   |		Jump_Nonzero	0x1d9
01c8 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0xa.0x7 = 0x1c8,0xa
01c9 840a       |    |		Call	0x2,0xa
01ca 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01cb 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x8 = 0x1cb,0x2
01cc 00da       |    |		Load_Top	At_Offset_2
01cd 840c       |    |		Call	0x2,0xc
01ce 4820       |H   |		Short_Literal	0x20							; Debug Table 0xa.0x9 = 0x1ce,0x3
01cf 8408       |    |		Call	0x2,0x8
01d0 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0xa.0xa = 0x1d0,0x4
01d1 840a       |    |		Call	0x2,0xa
01d2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01d3 0092 053a  |   :|		Action	Push_String_Extended,0x53a					; "array "
													; Debug Table 0xa.0xb = 0x1d3,0x5
01d5 840a       |    |		Call	0x2,0xa
01d6 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0xa.0xc = 0x1d6,0x6
01d7 840a       |    |		Call	0x2,0xa
01d8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01d9 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0xd = 0x1d9,0x7
01da 00da       |    |		Load_Top	At_Offset_2
01db 00eb       |    |		Load_Encached	Diana_Cache
01dc 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
01dd 840c       |    |		Call	0x2,0xc
01de 4820       |H   |		Short_Literal	0x20							; Debug Table 0xa.0xe = 0x1de,0x8
01df 8408       |    |		Call	0x2,0x8
01e0 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0xa.0xf = 0x1e0,0x9
01e1 840a       |    |		Call	0x2,0xa
01e2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01e3 0000 0000  |    |		.BLANK	0000[0x5]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01ec       |    |		.CONST	0x01ec								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0002       |    |		.CONST	0x0002								; Number of locals
01eb			INIT_01e8:
01eb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xb = .DEBUG	0x01eb,0x08a2,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0300
													; Debug Table 0xb.0x0 = 0x1eb,0xffff
01ec			BODY_01e8:
01ec e7ff       |    |		Load	0x3,-0x1							; Debug Table 0xb.0x1 = 0x1ec,0x1
													; Debug Table 0xb.0x2 = 0x1ec,0x401
01ed 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xb.0x3 = 0x1ed,0x402
01ee 0b1c       |    |		Execute_Immediate	Case_Compare,0x1c				; Debug Table 0xb.0x4 = 0x1ee,0x403
													; Debug Table 0xb.0x5 = 0x1ee,0x404
													; Debug Table 0xb.0x6 = 0x1ee,0x1
01ef 7031       |p1  |		Jump_Nonzero	0x221
01f0 0b1d       |    |		Execute_Immediate	Case_Compare,0x1d
01f1 7034       |p4  |		Jump_Nonzero	0x226
01f2 0b1e       |    |		Execute_Immediate	Case_Compare,0x1e
01f3 7037       |p7  |		Jump_Nonzero	0x22b
01f4 0b1f       |    |		Execute_Immediate	Case_Compare,0x1f
01f5 703a       |p:  |		Jump_Nonzero	0x230
01f6 0b31       | 1  |		Execute_Immediate	Case_Compare,0x31
01f7 7050       |pP  |		Jump_Nonzero	0x248
01f8 0b20       |    |		Execute_Immediate	Case_Compare,0x20
01f9 7053       |pS  |		Jump_Nonzero	0x24d
01fa 0b21       | !  |		Execute_Immediate	Case_Compare,0x21
01fb 7055       |pU  |		Jump_Nonzero	0x251
01fc 0b22       | "  |		Execute_Immediate	Case_Compare,0x22
01fd 7057       |pW  |		Jump_Nonzero	0x255
01fe 0b23       | #  |		Execute_Immediate	Case_Compare,0x23
01ff 7074       |pt  |		Jump_Nonzero	0x274
0200 0b25       | %  |		Execute_Immediate	Case_Compare,0x25
0201 7072       |pr  |		Jump_Nonzero	0x274
0202 0b24       | $  |		Execute_Immediate	Case_Compare,0x24
0203 7070       |pp  |		Jump_Nonzero	0x274
0204 0b26       | &  |		Execute_Immediate	Case_Compare,0x26
0205 7073       |ps  |		Jump_Nonzero	0x279
0206 0b27       | '  |		Execute_Immediate	Case_Compare,0x27
0207 7076       |pv  |		Jump_Nonzero	0x27e
0208 0b59       | Y  |		Execute_Immediate	Case_Compare,0x59
0209 7078       |px  |		Jump_Nonzero	0x282
020a 0b28       | (  |		Execute_Immediate	Case_Compare,0x28
020b 708f       |p   |		Jump_Nonzero	0x29b
020c 0b29       | )  |		Execute_Immediate	Case_Compare,0x29
020d 7092       |p   |		Jump_Nonzero	0x2a0
020e 0b2a       | *  |		Execute_Immediate	Case_Compare,0x2a
020f 7094       |p   |		Jump_Nonzero	0x2a4
0210 0b2b       | +  |		Execute_Immediate	Case_Compare,0x2b
0211 7096       |p   |		Jump_Nonzero	0x2a8
0212 0b2f       | /  |		Execute_Immediate	Case_Compare,0x2f
0213 7098       |p   |		Jump_Nonzero	0x2ac
0214 0b2d       | -  |		Execute_Immediate	Case_Compare,0x2d
0215 709a       |p   |		Jump_Nonzero	0x2b0
0216 0b2c       | ,  |		Execute_Immediate	Case_Compare,0x2c
0217 709c       |p   |		Jump_Nonzero	0x2b4
0218 0b2e       | .  |		Execute_Immediate	Case_Compare,0x2e
0219 709e       |p   |		Jump_Nonzero	0x2b8
021a 0b30       | 0  |		Execute_Immediate	Case_Compare,0x30
021b 70a0       |p   |		Jump_Nonzero	0x2bc
021c 0b32       | 2  |		Execute_Immediate	Case_Compare,0x32
021d 70a3       |p   |		Jump_Nonzero	0x2c1
021e 0b33       | 3  |		Execute_Immediate	Case_Compare,0x33
021f 70a6       |p   |		Jump_Nonzero	0x2c6
0220 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0xb.0x7 = 0x220,0x24
0221 0092 053b  |   ;|		Action	Push_String_Extended,0x53b					; "component "
													; Debug Table 0xb.0x8 = 0x221,0x2
0223 00dd       |    |		Load_Top	At_Offset_5
0224 840d       |    |		Call	0x2,0xd
0225 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0226 0092 053c  |   <|		Action	Push_String_Extended,0x53c					; "constant "
													; Debug Table 0xb.0x9 = 0x226,0x3
0228 00dd       |    |		Load_Top	At_Offset_5
0229 840d       |    |		Call	0x2,0xd
022a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
022b 0092 053d  |   =|		Action	Push_String_Extended,0x53d					; "discriminant "
													; Debug Table 0xb.0xa = 0x22b,0x4
022d 00dd       |    |		Load_Top	At_Offset_5
022e 840d       |    |		Call	0x2,0xd
022f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0230 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0xb.0xb = 0x230,0x5
0231 4904       |I   |		Short_Literal	0x104
0232 00eb       |    |		Load_Encached	Diana_Cache
0233 0096       |    |		Execute	Package,Entry
0234 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0235 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0xc = 0x235,0x6
													; Debug Table 0xb.0xd = 0x235,0x801
0236 021d       |    |		Execute	Heap_Access,Is_Null
0237 7008       |p   |		Jump_Nonzero	0x240							; Debug Table 0xb.0xe = 0x237,0x6
0238 00d9       |    |		Load_Top	At_Offset_1
0239 00eb       |    |		Load_Encached	Diana_Cache
023a 18c3       |    |		Execute	Package,Field_Execute,Field_Number 0xc3
023b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0xf = 0x23b,0xc01
023c 021d       |    |		Execute	Heap_Access,Is_Null
023d 00d0       |    |		Action	Swap_Control
023e 00d1       |    |		Pop_Control	Pop_Count_1
023f 6804       |h   |		Jump_Zero	0x244							; Debug Table 0xb.0x10 = 0x23f,0x801
0240 0092 053e  |   >|		Action	Push_String_Extended,0x53e					; "entry "
													; Debug Table 0xb.0x11 = 0x240,0x7
0242 840a       |    |		Call	0x2,0xa
0243 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0244 0092 053f  |   ?|		Action	Push_String_Extended,0x53f					; "entry family "
													; Debug Table 0xb.0x12 = 0x244,0x8
0246 840a       |    |		Call	0x2,0xa
0247 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0248 0092 0540  |   @|		Action	Push_String_Extended,0x540					; "enumeration literal "
													; Debug Table 0xb.0x13 = 0x248,0x9
024a 00dd       |    |		Load_Top	At_Offset_5
024b 840d       |    |		Call	0x2,0xd
024c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
024d 0092 0541  |   A|		Action	Push_String_Extended,0x541					; "exception "
													; Debug Table 0xb.0x14 = 0x24d,0xa
024f 840a       |    |		Call	0x2,0xa
0250 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0251 0092 0542  |   B|		Action	Push_String_Extended,0x542					; "function "
													; Debug Table 0xb.0x15 = 0x251,0xb
0253 840a       |    |		Call	0x2,0xa
0254 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0255 0092 0543  |   C|		Action	Push_String_Extended,0x543					; "generic "
													; Debug Table 0xb.0x16 = 0x255,0xc
0257 840a       |    |		Call	0x2,0xa
0258 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0xb.0x17 = 0x258,0xd
0259 4904       |I   |		Short_Literal	0x104
025a 00eb       |    |		Load_Encached	Diana_Cache
025b 0096       |    |		Execute	Package,Entry
025c e604       |    |		Load	0x3,0x4								; Debug Table 0xb.0x18 = 0x25c,0x1001
025d 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xb.0x19 = 0x25d,0x1002
025e 00d0       |    |		Action	Swap_Control							; Debug Table 0xb.0x1a = 0x25e,0x1003
													; Debug Table 0xb.0x1b = 0x25e,0x1004
025f 00d1       |    |		Pop_Control	Pop_Count_1
0260 0b7a       | z  |		Execute_Immediate	Case_Compare,0x7a				; Debug Table 0xb.0x1c = 0x260,0xd
0261 7005       |p   |		Jump_Nonzero	0x267
0262 0b7b       | {  |		Execute_Immediate	Case_Compare,0x7b
0263 7007       |p   |		Jump_Nonzero	0x26b
0264 0b7c       | |  |		Execute_Immediate	Case_Compare,0x7c
0265 7009       |p   |		Jump_Nonzero	0x26f
0266 780b       |x   |		Jump	0x272								; Debug Table 0xb.0x1d = 0x266,0x11
0267 0092 0542  |   B|		Action	Push_String_Extended,0x542					; "function "
													; Debug Table 0xb.0x1e = 0x267,0xe
0269 840a       |    |		Call	0x2,0xa
026a 7807       |x   |		Jump	0x272
026b 0092 0544  |   D|		Action	Push_String_Extended,0x544					; "procedure "
													; Debug Table 0xb.0x1f = 0x26b,0xf
026d 840a       |    |		Call	0x2,0xa
026e 7803       |x   |		Jump	0x272
026f 0092 0545  |   E|		Action	Push_String_Extended,0x545					; "package "
													; Debug Table 0xb.0x20 = 0x26f,0x10
0271 840a       |    |		Call	0x2,0xa
0272 00d1       |    |		Pop_Control	Pop_Count_1
0273 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0274 0092 0546  |   F|		Action	Push_String_Extended,0x546					; "parameter "
													; Debug Table 0xb.0x21 = 0x274,0x12
0276 00dd       |    |		Load_Top	At_Offset_5
0277 840d       |    |		Call	0x2,0xd
0278 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0279 0092 0547  |   G|		Action	Push_String_Extended,0x547					; "loop parameter "
													; Debug Table 0xb.0x22 = 0x279,0x13
027b 00dd       |    |		Load_Top	At_Offset_5
027c 840d       |    |		Call	0x2,0xd
027d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
027e 0092 0548  |   H|		Action	Push_String_Extended,0x548					; "label "
													; Debug Table 0xb.0x23 = 0x27e,0x14
0280 840a       |    |		Call	0x2,0xa
0281 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0282 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0xb.0x24 = 0x282,0x15
0283 4905       |I   |		Short_Literal	0x105
0284 00eb       |    |		Load_Encached	Diana_Cache
0285 0096       |    |		Execute	Package,Entry
0286 e604       |    |		Load	0x3,0x4								; Debug Table 0xb.0x25 = 0x286,0x1401
0287 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xb.0x26 = 0x287,0x1402
0288 00d0       |    |		Action	Swap_Control							; Debug Table 0xb.0x27 = 0x288,0x1403
													; Debug Table 0xb.0x28 = 0x288,0x1404
0289 00d1       |    |		Pop_Control	Pop_Count_1
028a 0b4a       | J  |		Execute_Immediate	Case_Compare,0x4a				; Debug Table 0xb.0x29 = 0x28a,0x15
028b 7006       |p   |		Jump_Nonzero	0x292
028c 0b4e       | N  |		Execute_Immediate	Case_Compare,0x4e
028d 7008       |p   |		Jump_Nonzero	0x296
028e 0092 0549  |   I|		Action	Push_String_Extended,0x549					; "statement name "
													; Debug Table 0xb.0x2a = 0x28e,0x18
0290 840a       |    |		Call	0x2,0xa
0291 7807       |x   |		Jump	0x299
0292 0092 054a  |   J|		Action	Push_String_Extended,0x54a					; "loop name "
													; Debug Table 0xb.0x2b = 0x292,0x16
0294 840a       |    |		Call	0x2,0xa
0295 7803       |x   |		Jump	0x299
0296 0092 054b  |   K|		Action	Push_String_Extended,0x54b					; "block name "
													; Debug Table 0xb.0x2c = 0x296,0x17
0298 840a       |    |		Call	0x2,0xa
0299 00d1       |    |		Pop_Control	Pop_Count_1
029a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
029b 0092 054c  |   L|		Action	Push_String_Extended,0x54c					; "named number "
													; Debug Table 0xb.0x2d = 0x29b,0x19
029d 00dd       |    |		Load_Top	At_Offset_5
029e 840d       |    |		Call	0x2,0xd
029f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02a0 0092 0545  |   E|		Action	Push_String_Extended,0x545					; "package "
													; Debug Table 0xb.0x2e = 0x2a0,0x1a
02a2 840a       |    |		Call	0x2,0xa
02a3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02a4 0092 054d  |   M|		Action	Push_String_Extended,0x54d					; "private type "
													; Debug Table 0xb.0x2f = 0x2a4,0x1b
02a6 840a       |    |		Call	0x2,0xa
02a7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02a8 0092 054e  |   N|		Action	Push_String_Extended,0x54e					; "limited private type "
													; Debug Table 0xb.0x30 = 0x2a8,0x1c
02aa 840a       |    |		Call	0x2,0xa
02ab 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02ac 0092 054f  |   O|		Action	Push_String_Extended,0x54f					; "type "
													; Debug Table 0xb.0x31 = 0x2ac,0x1d
02ae 840a       |    |		Call	0x2,0xa
02af 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02b0 0092 0550  |   P|		Action	Push_String_Extended,0x550					; "subtype "
													; Debug Table 0xb.0x32 = 0x2b0,0x1e
02b2 840a       |    |		Call	0x2,0xa
02b3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02b4 0092 0544  |   D|		Action	Push_String_Extended,0x544					; "procedure "
													; Debug Table 0xb.0x33 = 0x2b4,0x1f
02b6 840a       |    |		Call	0x2,0xa
02b7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02b8 0092 0551  |   Q|		Action	Push_String_Extended,0x551					; "task "
													; Debug Table 0xb.0x34 = 0x2b8,0x20
02ba 840a       |    |		Call	0x2,0xa
02bb 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02bc 0092 0552  |   R|		Action	Push_String_Extended,0x552					; "variable "
													; Debug Table 0xb.0x35 = 0x2bc,0x21
02be 00dd       |    |		Load_Top	At_Offset_5
02bf 840d       |    |		Call	0x2,0xd
02c0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02c1 0092 0553  |   S|		Action	Push_String_Extended,0x553					; "literal "
													; Debug Table 0xb.0x36 = 0x2c1,0x22
02c3 00dd       |    |		Load_Top	At_Offset_5
02c4 840d       |    |		Call	0x2,0xd
02c5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02c6 0092 0554  |   T|		Action	Push_String_Extended,0x554					; "operator "
													; Debug Table 0xb.0x37 = 0x2c6,0x23
02c8 840a       |    |		Call	0x2,0xa
02c9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02ca 0000 0000  |    |		.BLANK	0000[0x6]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02da       |    |		.CONST	0x02da								; Address of begin
02d1 02e3       |    |		.CONST	0x02e3								; Address of exception handler
02d2 0002       |    |		.CONST	0x0002								; Number of locals
02d3			INIT_02d0:
02d3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xc = .DEBUG	0x02d3,0x0914,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0490
													; Debug Table 0xc.0x0 = 0x2d3,0xffff
02d4 00db       |    |		Load_Top	At_Offset_3
02d5 4976       |Iv  |		Short_Literal	0x176
02d6 00eb       |    |		Load_Encached	Diana_Cache
02d7 0098       |    |		Execute	Package,Field_Read_Dynamic
02d8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02d9 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02da			BODY_02d0:
02da 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x1 = 0x2da,0x1
													; Debug Table 0xc.0x2 = 0x2da,0x401
02db 021d       |    |		Execute	Heap_Access,Is_Null
02dc 6803       |h   |		Jump_Zero	0x2e0							; Debug Table 0xc.0x3 = 0x2dc,0x1
02dd 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0xc.0x4 = 0x2dd,0x2
02de 840a       |    |		Call	0x2,0xa
02df 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02e0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x5 = 0x2e0,0x3
02e1 840e       |    |		Call	0x2,0xe
02e2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02e3			TRAP_02d0:
02e3 0007       |    |		Action	Break_Optional
02e4 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0xc.0x6 = 0x2e4,0x4
02e5 840a       |    |		Call	0x2,0xa
02e6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02e7 0000       |    |		.XXX[0x1]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02f1       |    |		.CONST	0x02f1								; Address of begin
02e9 0325       | %  |		.CONST	0x0325								; Address of exception handler
02ea 0002       |    |		.CONST	0x0002								; Number of locals
02eb			INIT_02e8:
02eb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd = .DEBUG	0x02eb,0x0924,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x04ca
													; Debug Table 0xd.0x0 = 0x2eb,0xffff
02ec 00db       |    |		Load_Top	At_Offset_3
02ed 00eb       |    |		Load_Encached	Diana_Cache
02ee 18fc       |    |		Execute	Package,Field_Execute,Field_Number 0xfc
02ef 820f       |    |		Call	0x1,0xf
02f0 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02f1			BODY_02e8:
02f1 e602       |    |		Load	0x3,0x2								; Debug Table 0xd.0x1 = 0x2f1,0x1
													; Debug Table 0xd.0x2 = 0x2f1,0x401
02f2 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xd.0x3 = 0x2f2,0x402
02f3 0b2f       | /  |		Execute_Immediate	Case_Compare,0x2f				; Debug Table 0xd.0x4 = 0x2f3,0x403
													; Debug Table 0xd.0x5 = 0x2f3,0x404
													; Debug Table 0xd.0x6 = 0x2f3,0x1
02f4 701a       |p   |		Jump_Nonzero	0x30f
02f5 0b2d       | -  |		Execute_Immediate	Case_Compare,0x2d
02f6 7018       |p   |		Jump_Nonzero	0x30f
02f7 0b2a       | *  |		Execute_Immediate	Case_Compare,0x2a
02f8 7016       |p   |		Jump_Nonzero	0x30f
02f9 0b2b       | +  |		Execute_Immediate	Case_Compare,0x2b
02fa 7014       |p   |		Jump_Nonzero	0x30f
02fb 0b6c       | l  |		Execute_Immediate	Case_Compare,0x6c
02fc 701a       |p   |		Jump_Nonzero	0x317
02fd 0b66       | f  |		Execute_Immediate	Case_Compare,0x66
02fe 701c       |p   |		Jump_Nonzero	0x31b
02ff e7ff       |    |		Load	0x3,-0x1							; Debug Table 0xd.0x7 = 0x2ff,0x9
													; Debug Table 0xd.0x8 = 0x2ff,0x801
0300 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xd.0x9 = 0x300,0x802
0301 0b16       |    |		Execute_Immediate	Case_Compare,0x16				; Debug Table 0xd.0xa = 0x301,0x803
													; Debug Table 0xd.0xb = 0x301,0x804
													; Debug Table 0xd.0xc = 0x301,0x9
0302 7007       |p   |		Jump_Nonzero	0x30a
0303 0b12       |    |		Execute_Immediate	Case_Compare,0x12
0304 7005       |p   |		Jump_Nonzero	0x30a
0305 0b0c       |    |		Execute_Immediate	Case_Compare,0xc
0306 7003       |p   |		Jump_Nonzero	0x30a
0307 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0xd.0xd = 0x307,0xb
0308 840a       |    |		Call	0x2,0xa
0309 7803       |x   |		Jump	0x30d
030a 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0xd.0xe = 0x30a,0xa
030b 00de       |    |		Load_Top	At_Offset_6
030c 840f       |    |		Call	0x2,0xf
030d 00d1       |    |		Pop_Control	Pop_Count_1
030e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
030f 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0xf = 0x30f,0x2
0310 00da       |    |		Load_Top	At_Offset_2
0311 840c       |    |		Call	0x2,0xc
0312 4820       |H   |		Short_Literal	0x20							; Debug Table 0xd.0x10 = 0x312,0x3
0313 8408       |    |		Call	0x2,0x8
0314 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0xd.0x11 = 0x314,0x4
0315 840a       |    |		Call	0x2,0xa
0316 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0317 0092 053a  |   :|		Action	Push_String_Extended,0x53a					; "array "
													; Debug Table 0xd.0x12 = 0x317,0x5
0319 840a       |    |		Call	0x2,0xa
031a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
031b 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x13 = 0x31b,0x6
031c 00da       |    |		Load_Top	At_Offset_2
031d 00eb       |    |		Load_Encached	Diana_Cache
031e 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
031f 840c       |    |		Call	0x2,0xc
0320 4820       |H   |		Short_Literal	0x20							; Debug Table 0xd.0x14 = 0x320,0x7
0321 8408       |    |		Call	0x2,0x8
0322 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0xd.0x15 = 0x322,0x8
0323 840a       |    |		Call	0x2,0xa
0324 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0325			TRAP_02e8:
0325 0007       |    |		Action	Break_Optional
0326 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0xd.0x16 = 0x326,0xc
0327 840a       |    |		Call	0x2,0xa
0328 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0329 0000 0000  |    |		.BLANK	0000[0x7]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0333       | 3  |		.CONST	0x0333								; Address of begin
0331 0004       |    |		.CONST	0x0004								; Address of exception handler
0332 0001       |    |		.CONST	0x0001								; Number of locals
0333			BODY_0330:
0333			INIT_0330:
0333 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe = .DEBUG	0x0333,0x0954,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x055d
													; Debug Table 0xe.0x0 = 0x333,0x1
0334 4976       |Iv  |		Short_Literal	0x176
0335 00eb       |    |		Load_Encached	Diana_Cache
0336 0098       |    |		Execute	Package,Field_Read_Dynamic
0337 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0338 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x1 = 0x338,0x401
0339 021d       |    |		Execute	Heap_Access,Is_Null
033a 00d0       |    |		Action	Swap_Control
033b 00d1       |    |		Pop_Control	Pop_Count_1
033c 6804       |h   |		Jump_Zero	0x341							; Debug Table 0xe.0x2 = 0x33c,0x1
033d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x3 = 0x33d,0x2
033e 00db       |    |		Load_Top	At_Offset_3
033f 8410       |    |		Call	0x2,0x10
0340 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0341 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x4 = 0x341,0x3
0342 00db       |    |		Load_Top	At_Offset_3
0343 840f       |    |		Call	0x2,0xf
0344 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0345 0000 0000  |    |		.XXX[0x3]
0347 0000       |    |
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034b       | K  |		.CONST	0x034b								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0001       |    |		.CONST	0x0001								; Number of locals
034b			BODY_0348:
034b			INIT_0348:
034b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xf = .DEBUG	0x034b,0x0960,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0589
													; Debug Table 0xf.0x0 = 0x34b,0x1
034c 00eb       |    |		Load_Encached	Diana_Cache
034d 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
034e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x1 = 0x34e,0x401
034f 021d       |    |		Execute	Heap_Access,Is_Null
0350 00d0       |    |		Action	Swap_Control
0351 00d1       |    |		Pop_Control	Pop_Count_1
0352 6803       |h   |		Jump_Zero	0x356							; Debug Table 0xf.0x2 = 0x352,0x1
0353 0092 0555  |   U|		Action	Push_String_Extended,0x555					; "empty "
													; Debug Table 0xf.0x3 = 0x353,0x2
0355 840a       |    |		Call	0x2,0xa
0356 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xf.0x4 = 0x356,0x3
0357 840a       |    |		Call	0x2,0xa
0358 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0359 0000 0000  |    |		.BLANK	0000[0x7]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0363       | c  |		.CONST	0x0363								; Address of begin
0361 0004       |    |		.CONST	0x0004								; Address of exception handler
0362 0001       |    |		.CONST	0x0001								; Number of locals
0363			BODY_0360:
0363			INIT_0360:
0363 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x10 = .DEBUG	0x0363,0x096c,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x05b1
													; Debug Table 0x10.0x0 = 0x363,0x1
													; Debug Table 0x10.0x1 = 0x363,0x401
0364 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x10.0x2 = 0x364,0x402
0365 46ad       |F   |		Jump_Case	0xae							; Debug Table 0x10.0x3 = 0x365,0x403
													; Debug Table 0x10.0x4 = 0x365,0x404
													; Debug Table 0x10.0x5 = 0x365,0x1
0366 7948       |yH  |		Jump	0x4af								; case 0x0
0367 78e9       |x   |		Jump	0x451								; case 0x1
0368 7946       |yF  |		Jump	0x4af								; case 0x2
0369 78f1       |x   |		Jump	0x45b								; case 0x3
036a 78f0       |x   |		Jump	0x45b								; case 0x4
036b 78ef       |x   |		Jump	0x45b								; case 0x5
036c 78ee       |x   |		Jump	0x45b								; case 0x6
036d 78f2       |x   |		Jump	0x460								; case 0x7
036e 78f5       |x   |		Jump	0x464								; case 0x8
036f 78eb       |x   |		Jump	0x45b								; case 0x9
0370 78ea       |x   |		Jump	0x45b								; case 0xa
0371 78f2       |x   |		Jump	0x464								; case 0xb
0372 78f6       |x   |		Jump	0x469								; case 0xc
0373 78e7       |x   |		Jump	0x45b								; case 0xd
0374 78e1       |x   |		Jump	0x456								; case 0xe
0375 78e0       |x   |		Jump	0x456								; case 0xf
0376 78e4       |x   |		Jump	0x45b								; case 0x10
0377 78e3       |x   |		Jump	0x45b								; case 0x11
0378 78fa       |x   |		Jump	0x473								; case 0x12
0379 78e1       |x   |		Jump	0x45b								; case 0x13
037a 78b1       |x   |		Jump	0x42c								; case 0x14
037b 78b5       |x   |		Jump	0x431								; case 0x15
037c 78f1       |x   |		Jump	0x46e								; case 0x16
037d 78b7       |x   |		Jump	0x435								; case 0x17
037e 78b2       |x   |		Jump	0x431								; case 0x18
037f 792f       |y/  |		Jump	0x4af								; case 0x19
0380 792e       |y.  |		Jump	0x4af								; case 0x1a
0381 792d       |y-  |		Jump	0x4af								; case 0x1b
0382 7891       |x   |		Jump	0x414								; case 0x1c
0383 7890       |x   |		Jump	0x414								; case 0x1d
0384 788f       |x   |		Jump	0x414								; case 0x1e
0385 7891       |x   |		Jump	0x417								; case 0x1f
0386 788d       |x   |		Jump	0x414								; case 0x20
0387 788f       |x   |		Jump	0x417								; case 0x21
0388 788e       |x   |		Jump	0x417								; case 0x22
0389 788a       |x   |		Jump	0x414								; case 0x23
038a 7889       |x   |		Jump	0x414								; case 0x24
038b 7888       |x   |		Jump	0x414								; case 0x25
038c 7887       |x   |		Jump	0x414								; case 0x26
038d 7886       |x   |		Jump	0x414								; case 0x27
038e 7885       |x   |		Jump	0x414								; case 0x28
038f 788a       |x   |		Jump	0x41a								; case 0x29
0390 7883       |x   |		Jump	0x414								; case 0x2a
0391 7882       |x   |		Jump	0x414								; case 0x2b
0392 7884       |x   |		Jump	0x417								; case 0x2c
0393 7880       |x   |		Jump	0x414								; case 0x2d
0394 787f       |x   |		Jump	0x414								; case 0x2e
0395 787e       |x~  |		Jump	0x414								; case 0x2f
0396 787d       |x}  |		Jump	0x414								; case 0x30
0397 787c       |x|  |		Jump	0x414								; case 0x31
0398 787b       |x{  |		Jump	0x414								; case 0x32
0399 787d       |x}  |		Jump	0x417								; case 0x33
039a 7914       |y   |		Jump	0x4af								; case 0x34
039b 7913       |y   |		Jump	0x4af								; case 0x35
039c 7912       |y   |		Jump	0x4af								; case 0x36
039d 7911       |y   |		Jump	0x4af								; case 0x37
039e 7910       |y   |		Jump	0x4af								; case 0x38
039f 790f       |y   |		Jump	0x4af								; case 0x39
03a0 790e       |y   |		Jump	0x4af								; case 0x3a
03a1 790d       |y   |		Jump	0x4af								; case 0x3b
03a2 790c       |y   |		Jump	0x4af								; case 0x3c
03a3 790b       |y   |		Jump	0x4af								; case 0x3d
03a4 790a       |y   |		Jump	0x4af								; case 0x3e
03a5 7909       |y   |		Jump	0x4af								; case 0x3f
03a6 7908       |y   |		Jump	0x4af								; case 0x40
03a7 7907       |y   |		Jump	0x4af								; case 0x41
03a8 7906       |y   |		Jump	0x4af								; case 0x42
03a9 7905       |y   |		Jump	0x4af								; case 0x43
03aa 7904       |y   |		Jump	0x4af								; case 0x44
03ab 7903       |y   |		Jump	0x4af								; case 0x45
03ac 7902       |y   |		Jump	0x4af								; case 0x46
03ad 7901       |y   |		Jump	0x4af								; case 0x47
03ae 7900       |y   |		Jump	0x4af								; case 0x48
03af 78ff       |x   |		Jump	0x4af								; case 0x49
03b0 78fe       |x   |		Jump	0x4af								; case 0x4a
03b1 78fd       |x   |		Jump	0x4af								; case 0x4b
03b2 78fc       |x   |		Jump	0x4af								; case 0x4c
03b3 78fb       |x   |		Jump	0x4af								; case 0x4d
03b4 78fa       |x   |		Jump	0x4af								; case 0x4e
03b5 78f9       |x   |		Jump	0x4af								; case 0x4f
03b6 78f8       |x   |		Jump	0x4af								; case 0x50
03b7 78f7       |x   |		Jump	0x4af								; case 0x51
03b8 78f6       |x   |		Jump	0x4af								; case 0x52
03b9 78be       |x   |		Jump	0x478								; case 0x53
03ba 78f4       |x   |		Jump	0x4af								; case 0x54
03bb 78f3       |x   |		Jump	0x4af								; case 0x55
03bc 78f2       |x   |		Jump	0x4af								; case 0x56
03bd 78f1       |x   |		Jump	0x4af								; case 0x57
03be 78f0       |x   |		Jump	0x4af								; case 0x58
03bf 7854       |xT  |		Jump	0x414								; case 0x59
03c0 78ee       |x   |		Jump	0x4af								; case 0x5a
03c1 78ba       |x   |		Jump	0x47c								; case 0x5b
03c2 78ec       |x   |		Jump	0x4af								; case 0x5c
03c3 78eb       |x   |		Jump	0x4af								; case 0x5d
03c4 78ea       |x   |		Jump	0x4af								; case 0x5e
03c5 78e9       |x   |		Jump	0x4af								; case 0x5f
03c6 78e8       |x   |		Jump	0x4af								; case 0x60
03c7 78d0       |x   |		Jump	0x498								; case 0x61
03c8 78e6       |x   |		Jump	0x4af								; case 0x62
03c9 78e5       |x   |		Jump	0x4af								; case 0x63
03ca 78b5       |x   |		Jump	0x480								; case 0x64
03cb 78b4       |x   |		Jump	0x480								; case 0x65
03cc 78b3       |x   |		Jump	0x480								; case 0x66
03cd 78b6       |x   |		Jump	0x484								; case 0x67
03ce 78b5       |x   |		Jump	0x484								; case 0x68
03cf 78b4       |x   |		Jump	0x484								; case 0x69
03d0 78b3       |x   |		Jump	0x484								; case 0x6a
03d1 78ae       |x   |		Jump	0x480								; case 0x6b
03d2 78ad       |x   |		Jump	0x480								; case 0x6c
03d3 78ac       |x   |		Jump	0x480								; case 0x6d
03d4 78ab       |x   |		Jump	0x480								; case 0x6e
03d5 78aa       |x   |		Jump	0x480								; case 0x6f
03d6 78a9       |x   |		Jump	0x480								; case 0x70
03d7 78a8       |x   |		Jump	0x480								; case 0x71
03d8 78a7       |x   |		Jump	0x480								; case 0x72
03d9 78ae       |x   |		Jump	0x488								; case 0x73
03da 78a5       |x   |		Jump	0x480								; case 0x74
03db 78a4       |x   |		Jump	0x480								; case 0x75
03dc 78a3       |x   |		Jump	0x480								; case 0x76
03dd 78d1       |x   |		Jump	0x4af								; case 0x77
03de 78d0       |x   |		Jump	0x4af								; case 0x78
03df 7863       |xc  |		Jump	0x443								; case 0x79
03e0 7862       |xb  |		Jump	0x443								; case 0x7a
03e1 7861       |xa  |		Jump	0x443								; case 0x7b
03e2 78cc       |x   |		Jump	0x4af								; case 0x7c
03e3 78cb       |x   |		Jump	0x4af								; case 0x7d
03e4 78ca       |x   |		Jump	0x4af								; case 0x7e
03e5 78c9       |x   |		Jump	0x4af								; case 0x7f
03e6 78c8       |x   |		Jump	0x4af								; case 0x80
03e7 78c7       |x   |		Jump	0x4af								; case 0x81
03e8 78c6       |x   |		Jump	0x4af								; case 0x82
03e9 78c5       |x   |		Jump	0x4af								; case 0x83
03ea 78c4       |x   |		Jump	0x4af								; case 0x84
03eb 78c3       |x   |		Jump	0x4af								; case 0x85
03ec 78c2       |x   |		Jump	0x4af								; case 0x86
03ed 78c1       |x   |		Jump	0x4af								; case 0x87
03ee 78c0       |x   |		Jump	0x4af								; case 0x88
03ef 78bf       |x   |		Jump	0x4af								; case 0x89
03f0 78be       |x   |		Jump	0x4af								; case 0x8a
03f1 78bd       |x   |		Jump	0x4af								; case 0x8b
03f2 78bc       |x   |		Jump	0x4af								; case 0x8c
03f3 784a       |xJ  |		Jump	0x43e								; case 0x8d
03f4 7844       |xD  |		Jump	0x439								; case 0x8e
03f5 78b9       |x   |		Jump	0x4af								; case 0x8f
03f6 78b8       |x   |		Jump	0x4af								; case 0x90
03f7 78b7       |x   |		Jump	0x4af								; case 0x91
03f8 78b6       |x   |		Jump	0x4af								; case 0x92
03f9 783f       |x?  |		Jump	0x439								; case 0x93
03fa 784c       |xL  |		Jump	0x447								; case 0x94
03fb 78b3       |x   |		Jump	0x4af								; case 0x95
03fc 78b2       |x   |		Jump	0x4af								; case 0x96
03fd 78b1       |x   |		Jump	0x4af								; case 0x97
03fe 78b0       |x   |		Jump	0x4af								; case 0x98
03ff 784c       |xL  |		Jump	0x44c								; case 0x99
0400 78ae       |x   |		Jump	0x4af								; case 0x9a
0401 78ad       |x   |		Jump	0x4af								; case 0x9b
0402 78ac       |x   |		Jump	0x4af								; case 0x9c
0403 78ab       |x   |		Jump	0x4af								; case 0x9d
0404 78aa       |x   |		Jump	0x4af								; case 0x9e
0405 78a9       |x   |		Jump	0x4af								; case 0x9f
0406 78a8       |x   |		Jump	0x4af								; case 0xa0
0407 78a7       |x   |		Jump	0x4af								; case 0xa1
0408 78a6       |x   |		Jump	0x4af								; case 0xa2
0409 78a5       |x   |		Jump	0x4af								; case 0xa3
040a 78a4       |x   |		Jump	0x4af								; case 0xa4
040b 78a3       |x   |		Jump	0x4af								; case 0xa5
040c 78a2       |x   |		Jump	0x4af								; case 0xa6
040d 78a1       |x   |		Jump	0x4af								; case 0xa7
040e 78a0       |x   |		Jump	0x4af								; case 0xa8
040f 789f       |x   |		Jump	0x4af								; case 0xa9
0410 789e       |x   |		Jump	0x4af								; case 0xaa
0411 789d       |x   |		Jump	0x4af								; case 0xab
0412 789c       |x   |		Jump	0x4af								; case 0xac
0413 789b       |x   |		Jump	0x4af								; case 0xad
0414 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x6 = 0x414,0x2
0415 840e       |    |		Call	0x2,0xe
0416 7898       |x   |		Jump	0x4af
0417 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x7 = 0x417,0x3
0418 840e       |    |		Call	0x2,0xe
0419 7895       |x   |		Jump	0x4af
041a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x8 = 0x41a,0x4
041b 00eb       |    |		Load_Encached	Diana_Cache
041c 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
041d e602       |    |		Load	0x3,0x2								; Debug Table 0x10.0x9 = 0x41d,0x801
041e 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x10.0xa = 0x41e,0x802
041f 00d0       |    |		Action	Swap_Control							; Debug Table 0x10.0xb = 0x41f,0x803
													; Debug Table 0x10.0xc = 0x41f,0x804
0420 00d1       |    |		Pop_Control	Pop_Count_1
0421 0b47       | G  |		Execute_Immediate	Case_Compare,0x47				; Debug Table 0x10.0xd = 0x421,0x4
0422 7004       |p   |		Jump_Nonzero	0x427
0423 0092 0545  |   E|		Action	Push_String_Extended,0x545					; "package "
													; Debug Table 0x10.0xe = 0x423,0x6
0425 840a       |    |		Call	0x2,0xa
0426 7803       |x   |		Jump	0x42a
0427 0092 0556  |   V|		Action	Push_String_Extended,0x556					; "package body "
													; Debug Table 0x10.0xf = 0x427,0x5
0429 840a       |    |		Call	0x2,0xa
042a 00d1       |    |		Pop_Control	Pop_Count_1
042b 7883       |x   |		Jump	0x4af
042c 0092 0554  |   T|		Action	Push_String_Extended,0x554					; "operator "
													; Debug Table 0x10.0x10 = 0x42c,0x7
042e 00db       |    |		Load_Top	At_Offset_3
042f 840f       |    |		Call	0x2,0xf
0430 787e       |x~  |		Jump	0x4af
0431 0092 0557  |   W|		Action	Push_String_Extended,0x557					; "predefined operator "
													; Debug Table 0x10.0x11 = 0x431,0x8
0433 840a       |    |		Call	0x2,0xa
0434 787a       |xz  |		Jump	0x4af
0435 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x10.0x12 = 0x435,0x9
0436 00db       |    |		Load_Top	At_Offset_3
0437 840f       |    |		Call	0x2,0xf
0438 7876       |xv  |		Jump	0x4af
0439 0092 0558  |   X|		Action	Push_String_Extended,0x558					; "parameter list "
													; Debug Table 0x10.0x13 = 0x439,0xa
043b 00db       |    |		Load_Top	At_Offset_3
043c 8412       |    |		Call	0x2,0x12
043d 7871       |xq  |		Jump	0x4af
043e 0092 0559  |   Y|		Action	Push_String_Extended,0x559					; "index list "
													; Debug Table 0x10.0x14 = 0x43e,0xb
0440 00db       |    |		Load_Top	At_Offset_3
0441 8412       |    |		Call	0x2,0x12
0442 786c       |xl  |		Jump	0x4af
0443 0092 055a  |   Z|		Action	Push_String_Extended,0x55a					; "specification "
													; Debug Table 0x10.0x15 = 0x443,0xc
0445 840a       |    |		Call	0x2,0xa
0446 7868       |xh  |		Jump	0x4af
0447 0092 055a  |   Z|		Action	Push_String_Extended,0x55a					; "specification "
													; Debug Table 0x10.0x16 = 0x447,0xd
0449 00db       |    |		Load_Top	At_Offset_3
044a 8412       |    |		Call	0x2,0x12
044b 7863       |xc  |		Jump	0x4af
044c 0092 055b  |   [|		Action	Push_String_Extended,0x55b					; "discriminant part "
													; Debug Table 0x10.0x17 = 0x44c,0xe
044e 00db       |    |		Load_Top	At_Offset_3
044f 8412       |    |		Call	0x2,0x12
0450 785e       |x^  |		Jump	0x4af
0451 0092 055c  |   \|		Action	Push_String_Extended,0x55c					; "aggregate "
													; Debug Table 0x10.0x18 = 0x451,0xf
0453 00db       |    |		Load_Top	At_Offset_3
0454 8410       |    |		Call	0x2,0x10
0455 7859       |xY  |		Jump	0x4af
0456 0092 055d  |   ]|		Action	Push_String_Extended,0x55d					; "attribute "
													; Debug Table 0x10.0x19 = 0x456,0x10
0458 00db       |    |		Load_Top	At_Offset_3
0459 8410       |    |		Call	0x2,0x10
045a 7854       |xT  |		Jump	0x4af
045b 0092 055e  |   ^|		Action	Push_String_Extended,0x55e					; "expression "
													; Debug Table 0x10.0x1a = 0x45b,0x11
045d 00db       |    |		Load_Top	At_Offset_3
045e 8410       |    |		Call	0x2,0x10
045f 784f       |xO  |		Jump	0x4af
0460 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x10.0x1b = 0x460,0x12
0461 00db       |    |		Load_Top	At_Offset_3
0462 8410       |    |		Call	0x2,0x10
0463 784b       |xK  |		Jump	0x4af
0464 0092 0553  |   S|		Action	Push_String_Extended,0x553					; "literal "
													; Debug Table 0x10.0x1c = 0x464,0x13
0466 00db       |    |		Load_Top	At_Offset_3
0467 8410       |    |		Call	0x2,0x10
0468 7846       |xF  |		Jump	0x4af
0469 0092 0553  |   S|		Action	Push_String_Extended,0x553					; "literal "
													; Debug Table 0x10.0x1d = 0x469,0x14
046b 00db       |    |		Load_Top	At_Offset_3
046c 8411       |    |		Call	0x2,0x11
046d 7841       |xA  |		Jump	0x4af
046e 0092 055f  |   _|		Action	Push_String_Extended,0x55f					; "object "
													; Debug Table 0x10.0x1e = 0x46e,0x15
0470 00db       |    |		Load_Top	At_Offset_3
0471 8411       |    |		Call	0x2,0x11
0472 783c       |x<  |		Jump	0x4af
0473 0092 0560  |   `|		Action	Push_String_Extended,0x560					; "expanded name "
													; Debug Table 0x10.0x1f = 0x473,0x16
0475 00db       |    |		Load_Top	At_Offset_3
0476 8411       |    |		Call	0x2,0x11
0477 7837       |x7  |		Jump	0x4af
0478 0092 0561  |   a|		Action	Push_String_Extended,0x561					; "entry call "
													; Debug Table 0x10.0x20 = 0x478,0x17
047a 840a       |    |		Call	0x2,0xa
047b 7833       |x3  |		Jump	0x4af
047c 0092 0562  |   b|		Action	Push_String_Extended,0x562					; "procedure call "
													; Debug Table 0x10.0x21 = 0x47c,0x18
047e 840a       |    |		Call	0x2,0xa
047f 782f       |x/  |		Jump	0x4af
0480 0092 054f  |   O|		Action	Push_String_Extended,0x54f					; "type "
													; Debug Table 0x10.0x22 = 0x480,0x19
0482 840a       |    |		Call	0x2,0xa
0483 782b       |x+  |		Jump	0x4af
0484 0092 0563  |   c|		Action	Push_String_Extended,0x563					; "formal type "
													; Debug Table 0x10.0x23 = 0x484,0x1a
0486 840a       |    |		Call	0x2,0xa
0487 7827       |x'  |		Jump	0x4af
0488 0092 0551  |   Q|		Action	Push_String_Extended,0x551					; "task "
													; Debug Table 0x10.0x24 = 0x488,0x1b
048a 840a       |    |		Call	0x2,0xa
048b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x25 = 0x48b,0x1c
048c 00eb       |    |		Load_Encached	Diana_Cache
048d 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
048e e602       |    |		Load	0x3,0x2								; Debug Table 0x10.0x26 = 0x48e,0xc01
048f 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x10.0x27 = 0x48f,0xc02
0490 00d0       |    |		Action	Swap_Control							; Debug Table 0x10.0x28 = 0x490,0xc03
													; Debug Table 0x10.0x29 = 0x490,0xc04
0491 00d1       |    |		Pop_Control	Pop_Count_1
0492 0f3b       | ;  |		Execute_Immediate	Equal,0x3b					; Debug Table 0x10.0x2a = 0x492,0x1c
0493 681b       |h   |		Jump_Zero	0x4af
0494 0092 054f  |   O|		Action	Push_String_Extended,0x54f					; "type "
													; Debug Table 0x10.0x2b = 0x494,0x1d
0496 840a       |    |		Call	0x2,0xa
0497 7817       |x   |		Jump	0x4af
0498 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x2c = 0x498,0x1e
0499 00eb       |    |		Load_Encached	Diana_Cache
049a 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
049b e602       |    |		Load	0x3,0x2								; Debug Table 0x10.0x2d = 0x49b,0x1001
049c 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x10.0x2e = 0x49c,0x1002
049d 00d0       |    |		Action	Swap_Control							; Debug Table 0x10.0x2f = 0x49d,0x1003
													; Debug Table 0x10.0x30 = 0x49d,0x1004
049e 00d1       |    |		Pop_Control	Pop_Count_1
049f 0b66       | f  |		Execute_Immediate	Case_Compare,0x66				; Debug Table 0x10.0x31 = 0x49f,0x1e
04a0 700a       |p   |		Jump_Nonzero	0x4ab
04a1 0b6f       | o  |		Execute_Immediate	Case_Compare,0x6f
04a2 7008       |p   |		Jump_Nonzero	0x4ab
04a3 0b65       | e  |		Execute_Immediate	Case_Compare,0x65
04a4 7006       |p   |		Jump_Nonzero	0x4ab
04a5 0b64       | d  |		Execute_Immediate	Case_Compare,0x64
04a6 7004       |p   |		Jump_Nonzero	0x4ab
04a7 0092 0564  |   d|		Action	Push_String_Extended,0x564					; "range "
													; Debug Table 0x10.0x32 = 0x4a7,0x20
04a9 840a       |    |		Call	0x2,0xa
04aa 7803       |x   |		Jump	0x4ae
04ab 0092 0565  |   e|		Action	Push_String_Extended,0x565					; "range constraint "
													; Debug Table 0x10.0x33 = 0x4ab,0x1f
04ad 840a       |    |		Call	0x2,0xa
04ae 00d1       |    |		Pop_Control	Pop_Count_1
04af 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10.0x34 = 0x4af,0x22
04b0 00db       |    |		Load_Top	At_Offset_3
04b1 840c       |    |		Call	0x2,0xc
04b2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04b3 0000 0000  |    |		.BLANK	0000[0x5]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04bb       |    |		.CONST	0x04bb								; Address of begin
04b9 0512       |    |		.CONST	0x0512								; Address of exception handler
04ba 0001       |    |		.CONST	0x0001								; Number of locals
04bb			BODY_04b8:
04bb			INIT_04b8:
04bb 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11 = .DEBUG	0x04bb,0x09d8,0x0002,0x0000,0x0056,0xbdd5,0x0000,0x07d4
													; Debug Table 0x11.0x0 = 0x4bb,0x1
04bc a403       |    |		Store_Unchecked	0x2,0x3
04bd e405       |    |		Load	0x2,0x5								; Debug Table 0x11.0x1 = 0x4bd,0x2
04be e406       |    |		Load	0x2,0x6
04bf 027a       | z  |		Execute	Discrete,Less_Equal
04c0 6826       |h&  |		Jump_Zero	0x4e7
04c1 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0x2 = 0x4c1,0x3
04c2 01dd       |    |		Execute	Vector,First
04c3 e405       |    |		Load	0x2,0x5
04c4 0aff       |    |		Execute_Immediate	Plus,-0x1
04c5 0248       | H  |		Execute	Discrete,Check_In_Integer
04c6 e5fe       |    |		Load	0x2,-0x2
04c7 01cf       |    |		Execute	Vector,Slice_Read
04c8 840a       |    |		Call	0x2,0xa
04c9 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x3 = 0x4c9,0x4
													; Debug Table 0x11.0x4 = 0x4c9,0x401
04ca 021d       |    |		Execute	Heap_Access,Is_Null
04cb 7003       |p   |		Jump_Nonzero	0x4cf							; Debug Table 0x11.0x5 = 0x4cb,0x4
04cc 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x6 = 0x4cc,0x5
04cd e5ff       |    |		Load	0x2,-0x1
04ce 8413       |    |		Call	0x2,0x13
04cf e405       |    |		Load	0x2,0x5								; Debug Table 0x11.0x7 = 0x4cf,0x6
04d0 0a03       |    |		Execute_Immediate	Plus,0x3
04d1 0248       | H  |		Execute	Discrete,Check_In_Integer
04d2 e406       |    |		Load	0x2,0x6
04d3 0aff       |    |		Execute_Immediate	Plus,-0x1
04d4 0248       | H  |		Execute	Discrete,Check_In_Integer
04d5 e5fe       |    |		Load	0x2,-0x2
04d6 01cf       |    |		Execute	Vector,Slice_Read
04d7 840a       |    |		Call	0x2,0xa
04d8 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x11.0x8 = 0x4d8,0x7
													; Debug Table 0x11.0x9 = 0x4d8,0x801
04d9 021d       |    |		Execute	Heap_Access,Is_Null
04da 7003       |p   |		Jump_Nonzero	0x4de							; Debug Table 0x11.0xa = 0x4da,0x7
04db 0092 0566  |   f|		Action	Push_String_Extended,0x566					; " ... "
													; Debug Table 0x11.0xb = 0x4db,0x8
04dd 840a       |    |		Call	0x2,0xa
04de e406       |    |		Load	0x2,0x6								; Debug Table 0x11.0xc = 0x4de,0x9
04df 0a03       |    |		Execute_Immediate	Plus,0x3
04e0 0248       | H  |		Execute	Discrete,Check_In_Integer
04e1 e5fe       |    |		Load	0x2,-0x2
04e2 01dc       |    |		Execute	Vector,Last
04e3 e5fe       |    |		Load	0x2,-0x2
04e4 01cf       |    |		Execute	Vector,Slice_Read
04e5 840a       |    |		Call	0x2,0xa
04e6 7825       |x%  |		Jump	0x50c
04e7 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0xd = 0x4e7,0xa
04e8 01dd       |    |		Execute	Vector,First
04e9 e406       |    |		Load	0x2,0x6
04ea 0aff       |    |		Execute_Immediate	Plus,-0x1
04eb 0248       | H  |		Execute	Discrete,Check_In_Integer
04ec e5fe       |    |		Load	0x2,-0x2
04ed 01cf       |    |		Execute	Vector,Slice_Read
04ee 840a       |    |		Call	0x2,0xa
04ef e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x11.0xe = 0x4ef,0xb
													; Debug Table 0x11.0xf = 0x4ef,0xc01
04f0 021d       |    |		Execute	Heap_Access,Is_Null
04f1 7003       |p   |		Jump_Nonzero	0x4f5							; Debug Table 0x11.0x10 = 0x4f1,0xb
04f2 0092 0566  |   f|		Action	Push_String_Extended,0x566					; " ... "
													; Debug Table 0x11.0x11 = 0x4f2,0xc
04f4 840a       |    |		Call	0x2,0xa
04f5 e406       |    |		Load	0x2,0x6								; Debug Table 0x11.0x12 = 0x4f5,0xd
04f6 0a03       |    |		Execute_Immediate	Plus,0x3
04f7 0248       | H  |		Execute	Discrete,Check_In_Integer
04f8 e405       |    |		Load	0x2,0x5
04f9 0aff       |    |		Execute_Immediate	Plus,-0x1
04fa 0248       | H  |		Execute	Discrete,Check_In_Integer
04fb e5fe       |    |		Load	0x2,-0x2
04fc 01cf       |    |		Execute	Vector,Slice_Read
04fd 840a       |    |		Call	0x2,0xa
04fe e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x13 = 0x4fe,0xe
													; Debug Table 0x11.0x14 = 0x4fe,0x1001
04ff 021d       |    |		Execute	Heap_Access,Is_Null
0500 7003       |p   |		Jump_Nonzero	0x504							; Debug Table 0x11.0x15 = 0x500,0xe
0501 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x16 = 0x501,0xf
0502 e5ff       |    |		Load	0x2,-0x1
0503 8413       |    |		Call	0x2,0x13
0504 e405       |    |		Load	0x2,0x5								; Debug Table 0x11.0x17 = 0x504,0x10
0505 0a03       |    |		Execute_Immediate	Plus,0x3
0506 0248       | H  |		Execute	Discrete,Check_In_Integer
0507 e5fe       |    |		Load	0x2,-0x2
0508 01dc       |    |		Execute	Vector,Last
0509 e5fe       |    |		Load	0x2,-0x2
050a 01cf       |    |		Execute	Vector,Slice_Read
050b 840a       |    |		Call	0x2,0xa
050c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x11.0x18 = 0x50c,0x11
050d e403       |    |		Load	0x2,0x3
050e e402       |    |		Load	0x2,0x2
050f 01cf       |    |		Execute	Vector,Slice_Read
0510 0335       | 5  |		Declare_Variable	Array,Duplicate
0511 00ca       |    |		Action	Exit_Nullary_Function
0512			TRAP_04b8:
0512 0007       |    |		Action	Break_Optional
0513 0092 0567  |   g|		Action	Push_String_Extended,0x567					; "... "
													; Debug Table 0x11.0x19 = 0x513,0x12
0515 e5fe       |    |		Load	0x2,-0x2
0516 01cc       |    |		Execute	Vector,Catenate
0517 0092 0568  |   h|		Action	Push_String_Extended,0x568					; " ..."
0519 01cc       |    |		Execute	Vector,Catenate
051a 00ca       |    |		Action	Exit_Nullary_Function
051b 0000 0000  |    |		.BLANK	0000[0x5]
0520 ; --------------------------------------------------------------------------------------
0520 ; SUBPROGRAM
0520 ; --------------------------------------------------------------------------------------
0520 0523       | #  |		.CONST	0x0523								; Address of begin
0521 0533       | 3  |		.CONST	0x0533								; Address of exception handler
0522 0001       |    |		.CONST	0x0001								; Number of locals
0523			BODY_0520:
0523			INIT_0520:
0523 e602       |    |		Load	0x3,0x2								; Debug Table 0x12 = .DEBUG	0x0523,0x0a0e,0x0004,0x0000,0x0056,0xbdd5,0x0000,0x0282
													; Debug Table 0x12.0x0 = 0x523,0x1
0524 e002       |    |		Load	0x0,0x2
0525 1848       | H  |		Execute	Package,Field_Execute,Field_Number 0x48
0526 a603       |    |		Store_Unchecked	0x3,0x3
0527 e603       |    |		Load	0x3,0x3								; Debug Table 0x12.0x1 = 0x527,0x2
													; Debug Table 0x12.0x2 = 0x527,0x401
0528 021d       |    |		Execute	Heap_Access,Is_Null
0529 7008       |p   |		Jump_Nonzero	0x532							; Debug Table 0x12.0x3 = 0x529,0x2
052a e603       |    |		Load	0x3,0x3								; Debug Table 0x12.0x4 = 0x52a,0x801
052b 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x12.0x5 = 0x52b,0x802
052c 008a       |    |		Action	Discrete,Diana_Spare0						; Debug Table 0x12.0x6 = 0x52c,0x803
052d 6804       |h   |		Jump_Zero	0x532							; Debug Table 0x12.0x7 = 0x52d,0x804
													; Debug Table 0x12.0x8 = 0x52d,0x805
													; Debug Table 0x12.0x9 = 0x52d,0x806
													; Debug Table 0x12.0xa = 0x52d,0x401
052e e603       |    |		Load	0x3,0x3								; Debug Table 0x12.0xb = 0x52e,0x3
052f 840b       |    |		Call	0x2,0xb
0530 482e       |H.  |		Short_Literal	0x2e							; Debug Table 0x12.0xc = 0x530,0x4
0531 8408       |    |		Call	0x2,0x8
0532 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0533			TRAP_0520:
0533 0007       |    |		Action	Break_Optional
0534 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x12.0xd = 0x534,0x5
0535 ; --------------------------------------------------------------------------------------
0535 ; STRING TABLE
0535 ; --------------------------------------------------------------------------------------
0535 006a       | j  |		.STRTAB	0x006a->0x056a							; "<1>"
0536 006b       | k  |		.STRTAB	0x006b->0x056b							; "<2>"
0537 006c       | l  |		.STRTAB	0x006c->0x056d							; "<3>"
0538 006d       | m  |		.STRTAB	0x006d->0x056e							; "This message has become obsolete because of changes in the conditions that originally caused it to be generated; the original message was of the form: "
0539 0102       |    |		.STRTAB	0x0102->0x05ba							; "[nonterminal]"
053a 010d       |    |		.STRTAB	0x010d->0x05c0							; "array "
053b 0111       |    |		.STRTAB	0x0111->0x05c3							; "component "
053c 0119       |    |		.STRTAB	0x0119->0x05c8							; "constant "
053d 0120       |    |		.STRTAB	0x0120->0x05cd							; "discriminant "
053e 012b       | +  |		.STRTAB	0x012b->0x05d3							; "entry "
053f 012f       | /  |		.STRTAB	0x012f->0x05d6							; "entry family "
0540 013a       | :  |		.STRTAB	0x013a->0x05dd							; "enumeration literal "
0541 014c       | L  |		.STRTAB	0x014c->0x05e7							; "exception "
0542 0154       | T  |		.STRTAB	0x0154->0x05ec							; "function "
0543 015b       | [  |		.STRTAB	0x015b->0x05f0							; "generic "
0544 0161       | a  |		.STRTAB	0x0161->0x05f4							; "procedure "
0545 0169       | i  |		.STRTAB	0x0169->0x05f9							; "package "
0546 016f       | o  |		.STRTAB	0x016f->0x05fd							; "parameter "
0547 0177       | w  |		.STRTAB	0x0177->0x0602							; "loop parameter "
0548 0184       |    |		.STRTAB	0x0184->0x060a							; "label "
0549 0188       |    |		.STRTAB	0x0188->0x060d							; "statement name "
054a 0195       |    |		.STRTAB	0x0195->0x0614							; "loop name "
054b 019d       |    |		.STRTAB	0x019d->0x0619							; "block name "
054c 01a6       |    |		.STRTAB	0x01a6->0x061f							; "named number "
054d 01b1       |    |		.STRTAB	0x01b1->0x0625							; "private type "
054e 01bc       |    |		.STRTAB	0x01bc->0x062c							; "limited private type "
054f 01cf       |    |		.STRTAB	0x01cf->0x0636							; "type "
0550 01d2       |    |		.STRTAB	0x01d2->0x0639							; "subtype "
0551 01d8       |    |		.STRTAB	0x01d8->0x063d							; "task "
0552 01db       |    |		.STRTAB	0x01db->0x063f							; "variable "
0553 01e2       |    |		.STRTAB	0x01e2->0x0644							; "literal "
0554 01e8       |    |		.STRTAB	0x01e8->0x0648							; "operator "
0555 01ef       |    |		.STRTAB	0x01ef->0x064c							; "empty "
0556 01f3       |    |		.STRTAB	0x01f3->0x064f							; "package body "
0557 01fe       |    |		.STRTAB	0x01fe->0x0656							; "predefined operator "
0558 0210       |    |		.STRTAB	0x0210->0x0660							; "parameter list "
0559 021d       |    |		.STRTAB	0x021d->0x0667							; "index list "
055a 0226       | &  |		.STRTAB	0x0226->0x066d							; "specification "
055b 0232       | 2  |		.STRTAB	0x0232->0x0674							; "discriminant part "
055c 0242       | B  |		.STRTAB	0x0242->0x067d							; "aggregate "
055d 024a       | J  |		.STRTAB	0x024a->0x0682							; "attribute "
055e 0252       | R  |		.STRTAB	0x0252->0x0687							; "expression "
055f 025b       | [  |		.STRTAB	0x025b->0x068c							; "object "
0560 0260       | `  |		.STRTAB	0x0260->0x0690							; "expanded name "
0561 026c       | l  |		.STRTAB	0x026c->0x0697							; "entry call "
0562 0275       | u  |		.STRTAB	0x0275->0x069c							; "procedure call "
0563 0282       |    |		.STRTAB	0x0282->0x06a4							; "formal type "
0564 028c       |    |		.STRTAB	0x028c->0x06aa							; "range "
0565 0290       |    |		.STRTAB	0x0290->0x06ad							; "range constraint "
0566 029f       |    |		.STRTAB	0x029f->0x06b5							; " ... "
0567 02a2       |    |		.STRTAB	0x02a2->0x06b8							; "... "
0568 02a4       |    |		.STRTAB	0x02a4->0x06ba							; " ..."
0569 02a6       |    |		.STREND 0x02a6->0x06bc
056a 3c31 3e3c  |<1><|		.STRTAB_STRINGS
06bc 0000 0000  |    |		.BLANK	0000[0x4]
06c0 ; --------------------------------------------------------------------------------------
06c0 ; Debug Table
06c0 ; --------------------------------------------------------------------------------------
06c0 0003 0013  |    |		.CONST	0x0003,0x0013
06c2 000b 075a  |   Z|		.DEBUG	0x000b,0x075a,0x0000,0x0000,0x0056,0xbdc5,0x0000,0x00a6
06ca 000e 075e  |   ^|		.DEBUG	0x000e,0x075e,0x0000,0x0000,0x0056,0xbdd5,0x0000,0x000e
06d2 001b 076c  |   l|		.DEBUG	0x001b,0x076c,0x0002,0x0000,0x0056,0xbdc5,0x0000,0x00a7
06da 00cb 07de  |    |		.DEBUG	0x00cb,0x07de,0x0002,0x0000,0x0056,0xbdd5,0x0000,0x001f
06e2 00db 07e4  |    |		.DEBUG	0x00db,0x07e4,0x0002,0x0000,0x0056,0xbdd5,0x0000,0x004a
06ea 0123 081e  | #  |		.DEBUG	0x0123,0x081e,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0134
06f2 0133 0826  | 3 &|		.DEBUG	0x0133,0x0826,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0157
06fa 0143 082c  | C ,|		.DEBUG	0x0143,0x082c,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0171
0702 016b 0840  | k @|		.DEBUG	0x016b,0x0840,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x01be
070a 018b 0852  |   R|		.DEBUG	0x018b,0x0852,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0205
0712 01b3 0880  |    |		.DEBUG	0x01b3,0x0880,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x028e
071a 01eb 08a2  |    |		.DEBUG	0x01eb,0x08a2,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0300
0722 02d3 0914  |    |		.DEBUG	0x02d3,0x0914,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0490
072a 02eb 0924  |   $|		.DEBUG	0x02eb,0x0924,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x04ca
0732 0333 0954  | 3 T|		.DEBUG	0x0333,0x0954,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x055d
073a 034b 0960  | K `|		.DEBUG	0x034b,0x0960,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x0589
0742 0363 096c  | c l|		.DEBUG	0x0363,0x096c,0x0001,0x0000,0x0056,0xbdd5,0x0000,0x05b1
074a 04bb 09d8  |    |		.DEBUG	0x04bb,0x09d8,0x0002,0x0000,0x0056,0xbdd5,0x0000,0x07d4
0752 0523 0a0e  | #  |		.DEBUG	0x0523,0x0a0e,0x0004,0x0000,0x0056,0xbdd5,0x0000,0x0282
075a ; --------------------------------------------------------------------------------------
075a ; Debug3 Subtable 0x0
075a ; --------------------------------------------------------------------------------------
075a 0001 0000  |    |		.DBG3TAB	0x0001,0x0000
075c 000b ffff  |    |		.CONST	0x000b,0xffff
075e ; --------------------------------------------------------------------------------------
075e ; Debug3 Subtable 0x1
075e ; --------------------------------------------------------------------------------------
075e 0006 0000  |    |		.DBG3TAB	0x0006,0x0000
0760 000e ffff  |    |		.CONST	0x000e,0xffff
0762 000e fffe  |    |		.CONST	0x000e,0xfffe
0764 000e fffd  |    |		.CONST	0x000e,0xfffd
0766 000e fffc  |    |		.CONST	0x000e,0xfffc
0768 0010 fffb  |    |		.CONST	0x0010,0xfffb
076a 0012 fffa  |    |		.CONST	0x0012,0xfffa
076c ; --------------------------------------------------------------------------------------
076c ; Debug3 Subtable 0x2
076c ; --------------------------------------------------------------------------------------
076c 0013 0025  |   %|		.DBG3TAB	0x0013,0x0025
076e 001b ffff  |    |		.CONST	0x001b,0xffff
0770 001f fffe  |    |		.CONST	0x001f,0xfffe
0772 0021 fffd  | !  |		.CONST	0x0021,0xfffd
0774 0023 fffc  | #  |		.CONST	0x0023,0xfffc
0776 002b fffb  | +  |		.CONST	0x002b,0xfffb
0778 002c fffa  | ,  |		.CONST	0x002c,0xfffa
077a 002d fff9  | -  |		.CONST	0x002d,0xfff9
077c 002f fff8  | /  |		.CONST	0x002f,0xfff8
077e 0031 fff7  | 1  |		.CONST	0x0031,0xfff7
0780 0033 fff6  | 3  |		.CONST	0x0033,0xfff6
0782 0035 fff5  | 5  |		.CONST	0x0035,0xfff5
0784 0037 fff4  | 7  |		.CONST	0x0037,0xfff4
0786 0039 fff3  | 9  |		.CONST	0x0039,0xfff3
0788 003b fff2  | ;  |		.CONST	0x003b,0xfff2
078a 003d fff1  | =  |		.CONST	0x003d,0xfff1
078c 003f fff0  | ?  |		.CONST	0x003f,0xfff0
078e 0041 ffef  | A  |		.CONST	0x0041,0xffef
0790 0043 ffee  | C  |		.CONST	0x0043,0xffee
0792 0045 ffed  | E  |		.CONST	0x0045,0xffed
0794 0047 0001  | G  |		.CONST	0x0047,0x0001
0796 0049 0002  | I  |		.CONST	0x0049,0x0002
0798 004e 0003  | N  |		.CONST	0x004e,0x0003
079a 004e 0401  | N  |		.CONST	0x004e,0x0401
079c 0050 0003  | P  |		.CONST	0x0050,0x0003
079e 0051 0004  | Q  |		.CONST	0x0051,0x0004
07a0 0054 0005  | T  |		.CONST	0x0054,0x0005
07a2 005b 0006  | [  |		.CONST	0x005b,0x0006
07a4 005d 0007  | ]  |		.CONST	0x005d,0x0007
07a6 0064 0008  | d  |		.CONST	0x0064,0x0008
07a8 0067 0009  | g  |		.CONST	0x0067,0x0009
07aa 0069 000a  | i  |		.CONST	0x0069,0x000a
07ac 006e 000b  | n  |		.CONST	0x006e,0x000b
07ae 0072 000c  | r  |		.CONST	0x0072,0x000c
07b0 007a 000d  | z  |		.CONST	0x007a,0x000d
07b2 007a 0801  | z  |		.CONST	0x007a,0x0801
07b4 007c 000d  | |  |		.CONST	0x007c,0x000d
07b6 007d 000e  | }  |		.CONST	0x007d,0x000e
07b8 0080 000f  |    |		.CONST	0x0080,0x000f
07ba 0089 0010  |    |		.CONST	0x0089,0x0010
07bc 0089 0c01  |    |		.CONST	0x0089,0x0c01
07be 008b 0010  |    |		.CONST	0x008b,0x0010
07c0 008c 0011  |    |		.CONST	0x008c,0x0011
07c2 008f 0012  |    |		.CONST	0x008f,0x0012
07c4 0098 0013  |    |		.CONST	0x0098,0x0013
07c6 00a0 0014  |    |		.CONST	0x00a0,0x0014
07c8 00a0 1001  |    |		.CONST	0x00a0,0x1001
07ca 00a2 0014  |    |		.CONST	0x00a2,0x0014
07cc 00a3 0015  |    |		.CONST	0x00a3,0x0015
07ce 00a6 0016  |    |		.CONST	0x00a6,0x0016
07d0 00af 0017  |    |		.CONST	0x00af,0x0017
07d2 00af 1401  |    |		.CONST	0x00af,0x1401
07d4 00b1 0017  |    |		.CONST	0x00b1,0x0017
07d6 00b2 0018  |    |		.CONST	0x00b2,0x0018
07d8 00b5 0019  |    |		.CONST	0x00b5,0x0019
07da 00bd 001a  |    |		.CONST	0x00bd,0x001a
07dc 00c3 001b  |    |		.CONST	0x00c3,0x001b
07de ; --------------------------------------------------------------------------------------
07de ; Debug3 Subtable 0x3
07de ; --------------------------------------------------------------------------------------
07de 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
07e0 00cb ffff  |    |		.CONST	0x00cb,0xffff
07e2 00cb 0001  |    |		.CONST	0x00cb,0x0001
07e4 ; --------------------------------------------------------------------------------------
07e4 ; Debug3 Subtable 0x4
07e4 ; --------------------------------------------------------------------------------------
07e4 0002 001a  |    |		.DBG3TAB	0x0002,0x001a
07e6 00db ffff  |    |		.CONST	0x00db,0xffff
07e8 00dc fffe  |    |		.CONST	0x00dc,0xfffe
07ea 00dd 0001  |    |		.CONST	0x00dd,0x0001
07ec 00e1 0002  |    |		.CONST	0x00e1,0x0002
07ee 00e5 0003  |    |		.CONST	0x00e5,0x0003
07f0 00e5 0401  |    |		.CONST	0x00e5,0x0401
07f2 00e7 0003  |    |		.CONST	0x00e7,0x0003
07f4 00e8 0004  |    |		.CONST	0x00e8,0x0004
07f6 00ea 0005  |    |		.CONST	0x00ea,0x0005
07f8 00ee 0006  |    |		.CONST	0x00ee,0x0006
07fa 00ee 0801  |    |		.CONST	0x00ee,0x0801
07fc 00ef 0802  |    |		.CONST	0x00ef,0x0802
07fe 00f0 0803  |    |		.CONST	0x00f0,0x0803
0800 00f0 0804  |    |		.CONST	0x00f0,0x0804
0802 00f0 0006  |    |		.CONST	0x00f0,0x0006
0804 00f4 000d  |    |		.CONST	0x00f4,0x000d
0806 00f5 0007  |    |		.CONST	0x00f5,0x0007
0808 00f9 0008  |    |		.CONST	0x00f9,0x0008
080a 00f9 0c01  |    |		.CONST	0x00f9,0x0c01
080c 00fb 0008  |    |		.CONST	0x00fb,0x0008
080e 0102 0009  |    |		.CONST	0x0102,0x0009
0810 0104 000a  |    |		.CONST	0x0104,0x000a
0812 0108 000b  |    |		.CONST	0x0108,0x000b
0814 0108 1001  |    |		.CONST	0x0108,0x1001
0816 010a 000b  |    |		.CONST	0x010a,0x000b
0818 0111 000c  |    |		.CONST	0x0111,0x000c
081a 0114 000e  |    |		.CONST	0x0114,0x000e
081c 0117 000f  |    |		.CONST	0x0117,0x000f
081e ; --------------------------------------------------------------------------------------
081e ; Debug3 Subtable 0x5
081e ; --------------------------------------------------------------------------------------
081e 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0820 0123 0001  | #  |		.CONST	0x0123,0x0001
0822 0127 0002  | '  |		.CONST	0x0127,0x0002
0824 012b 0003  | +  |		.CONST	0x012b,0x0003
0826 ; --------------------------------------------------------------------------------------
0826 ; Debug3 Subtable 0x6
0826 ; --------------------------------------------------------------------------------------
0826 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0828 0133 0001  | 3  |		.CONST	0x0133,0x0001
082a 0137 0002  | 7  |		.CONST	0x0137,0x0002
082c ; --------------------------------------------------------------------------------------
082c ; Debug3 Subtable 0x7
082c ; --------------------------------------------------------------------------------------
082c 0000 0009  |    |		.DBG3TAB	0x0000,0x0009
082e 0143 0001  | C  |		.CONST	0x0143,0x0001
0830 0146 0002  | F  |		.CONST	0x0146,0x0002
0832 0147 0003  | G  |		.CONST	0x0147,0x0003
0834 0149 0004  | I  |		.CONST	0x0149,0x0004
0836 014b 0005  | K  |		.CONST	0x014b,0x0005
0838 0153 0006  | S  |		.CONST	0x0153,0x0006
083a 0159 0007  | Y  |		.CONST	0x0159,0x0007
083c 0162 0008  | b  |		.CONST	0x0162,0x0008
083e 0163 0009  | c  |		.CONST	0x0163,0x0009
0840 ; --------------------------------------------------------------------------------------
0840 ; Debug3 Subtable 0x8
0840 ; --------------------------------------------------------------------------------------
0840 0000 0008  |    |		.DBG3TAB	0x0000,0x0008
0842 016b 0001  | k  |		.CONST	0x016b,0x0001
0844 016b 0401  | k  |		.CONST	0x016b,0x0401
0846 016c 0402  | l  |		.CONST	0x016c,0x0402
0848 016d 0403  | m  |		.CONST	0x016d,0x0403
084a 016d 0404  | m  |		.CONST	0x016d,0x0404
084c 016d 0001  | m  |		.CONST	0x016d,0x0001
084e 0171 0003  | q  |		.CONST	0x0171,0x0003
0850 0178 0002  | x  |		.CONST	0x0178,0x0002
0852 ; --------------------------------------------------------------------------------------
0852 ; Debug3 Subtable 0x9
0852 ; --------------------------------------------------------------------------------------
0852 0002 0014  |    |		.DBG3TAB	0x0002,0x0014
0854 018b ffff  |    |		.CONST	0x018b,0xffff
0856 018f fffe  |    |		.CONST	0x018f,0xfffe
0858 0192 0001  |    |		.CONST	0x0192,0x0001
085a 0192 0401  |    |		.CONST	0x0192,0x0401
085c 0193 0402  |    |		.CONST	0x0193,0x0402
085e 0194 0403  |    |		.CONST	0x0194,0x0403
0860 0195 0404  |    |		.CONST	0x0195,0x0404
0862 0195 0405  |    |		.CONST	0x0195,0x0405
0864 0195 0406  |    |		.CONST	0x0195,0x0406
0866 0195 0001  |    |		.CONST	0x0195,0x0001
0868 0196 0002  |    |		.CONST	0x0196,0x0002
086a 0196 0801  |    |		.CONST	0x0196,0x0801
086c 0197 0802  |    |		.CONST	0x0197,0x0802
086e 0198 0803  |    |		.CONST	0x0198,0x0803
0870 0198 0804  |    |		.CONST	0x0198,0x0804
0872 0198 0002  |    |		.CONST	0x0198,0x0002
0874 019c 0004  |    |		.CONST	0x019c,0x0004
0876 01a1 0003  |    |		.CONST	0x01a1,0x0003
0878 01a5 0005  |    |		.CONST	0x01a5,0x0005
087a 01a6 0006  |    |		.CONST	0x01a6,0x0006
087c 01a8 0007  |    |		.CONST	0x01a8,0x0007
087e 01a9 0008  |    |		.CONST	0x01a9,0x0008
0880 ; --------------------------------------------------------------------------------------
0880 ; Debug3 Subtable 0xa
0880 ; --------------------------------------------------------------------------------------
0880 0001 000f  |    |		.DBG3TAB	0x0001,0x000f
0882 01b3 ffff  |    |		.CONST	0x01b3,0xffff
0884 01ba 0001  |    |		.CONST	0x01ba,0x0001
0886 01ba 0401  |    |		.CONST	0x01ba,0x0401
0888 01bb 0402  |    |		.CONST	0x01bb,0x0402
088a 01bc 0403  |    |		.CONST	0x01bc,0x0403
088c 01bc 0404  |    |		.CONST	0x01bc,0x0404
088e 01bc 0001  |    |		.CONST	0x01bc,0x0001
0890 01c8 000a  |    |		.CONST	0x01c8,0x000a
0892 01cb 0002  |    |		.CONST	0x01cb,0x0002
0894 01ce 0003  |    |		.CONST	0x01ce,0x0003
0896 01d0 0004  |    |		.CONST	0x01d0,0x0004
0898 01d3 0005  |    |		.CONST	0x01d3,0x0005
089a 01d6 0006  |    |		.CONST	0x01d6,0x0006
089c 01d9 0007  |    |		.CONST	0x01d9,0x0007
089e 01de 0008  |    |		.CONST	0x01de,0x0008
08a0 01e0 0009  |    |		.CONST	0x01e0,0x0009
08a2 ; --------------------------------------------------------------------------------------
08a2 ; Debug3 Subtable 0xb
08a2 ; --------------------------------------------------------------------------------------
08a2 0001 0037  |   7|		.DBG3TAB	0x0001,0x0037
08a4 01eb ffff  |    |		.CONST	0x01eb,0xffff
08a6 01ec 0001  |    |		.CONST	0x01ec,0x0001
08a8 01ec 0401  |    |		.CONST	0x01ec,0x0401
08aa 01ed 0402  |    |		.CONST	0x01ed,0x0402
08ac 01ee 0403  |    |		.CONST	0x01ee,0x0403
08ae 01ee 0404  |    |		.CONST	0x01ee,0x0404
08b0 01ee 0001  |    |		.CONST	0x01ee,0x0001
08b2 0220 0024  |   $|		.CONST	0x0220,0x0024
08b4 0221 0002  | !  |		.CONST	0x0221,0x0002
08b6 0226 0003  | &  |		.CONST	0x0226,0x0003
08b8 022b 0004  | +  |		.CONST	0x022b,0x0004
08ba 0230 0005  | 0  |		.CONST	0x0230,0x0005
08bc 0235 0006  | 5  |		.CONST	0x0235,0x0006
08be 0235 0801  | 5  |		.CONST	0x0235,0x0801
08c0 0237 0006  | 7  |		.CONST	0x0237,0x0006
08c2 023b 0c01  | ;  |		.CONST	0x023b,0x0c01
08c4 023f 0801  | ?  |		.CONST	0x023f,0x0801
08c6 0240 0007  | @  |		.CONST	0x0240,0x0007
08c8 0244 0008  | D  |		.CONST	0x0244,0x0008
08ca 0248 0009  | H  |		.CONST	0x0248,0x0009
08cc 024d 000a  | M  |		.CONST	0x024d,0x000a
08ce 0251 000b  | Q  |		.CONST	0x0251,0x000b
08d0 0255 000c  | U  |		.CONST	0x0255,0x000c
08d2 0258 000d  | X  |		.CONST	0x0258,0x000d
08d4 025c 1001  | \  |		.CONST	0x025c,0x1001
08d6 025d 1002  | ]  |		.CONST	0x025d,0x1002
08d8 025e 1003  | ^  |		.CONST	0x025e,0x1003
08da 025e 1004  | ^  |		.CONST	0x025e,0x1004
08dc 0260 000d  | `  |		.CONST	0x0260,0x000d
08de 0266 0011  | f  |		.CONST	0x0266,0x0011
08e0 0267 000e  | g  |		.CONST	0x0267,0x000e
08e2 026b 000f  | k  |		.CONST	0x026b,0x000f
08e4 026f 0010  | o  |		.CONST	0x026f,0x0010
08e6 0274 0012  | t  |		.CONST	0x0274,0x0012
08e8 0279 0013  | y  |		.CONST	0x0279,0x0013
08ea 027e 0014  | ~  |		.CONST	0x027e,0x0014
08ec 0282 0015  |    |		.CONST	0x0282,0x0015
08ee 0286 1401  |    |		.CONST	0x0286,0x1401
08f0 0287 1402  |    |		.CONST	0x0287,0x1402
08f2 0288 1403  |    |		.CONST	0x0288,0x1403
08f4 0288 1404  |    |		.CONST	0x0288,0x1404
08f6 028a 0015  |    |		.CONST	0x028a,0x0015
08f8 028e 0018  |    |		.CONST	0x028e,0x0018
08fa 0292 0016  |    |		.CONST	0x0292,0x0016
08fc 0296 0017  |    |		.CONST	0x0296,0x0017
08fe 029b 0019  |    |		.CONST	0x029b,0x0019
0900 02a0 001a  |    |		.CONST	0x02a0,0x001a
0902 02a4 001b  |    |		.CONST	0x02a4,0x001b
0904 02a8 001c  |    |		.CONST	0x02a8,0x001c
0906 02ac 001d  |    |		.CONST	0x02ac,0x001d
0908 02b0 001e  |    |		.CONST	0x02b0,0x001e
090a 02b4 001f  |    |		.CONST	0x02b4,0x001f
090c 02b8 0020  |    |		.CONST	0x02b8,0x0020
090e 02bc 0021  |   !|		.CONST	0x02bc,0x0021
0910 02c1 0022  |   "|		.CONST	0x02c1,0x0022
0912 02c6 0023  |   #|		.CONST	0x02c6,0x0023
0914 ; --------------------------------------------------------------------------------------
0914 ; Debug3 Subtable 0xc
0914 ; --------------------------------------------------------------------------------------
0914 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
0916 02d3 ffff  |    |		.CONST	0x02d3,0xffff
0918 02da 0001  |    |		.CONST	0x02da,0x0001
091a 02da 0401  |    |		.CONST	0x02da,0x0401
091c 02dc 0001  |    |		.CONST	0x02dc,0x0001
091e 02dd 0002  |    |		.CONST	0x02dd,0x0002
0920 02e0 0003  |    |		.CONST	0x02e0,0x0003
0922 02e4 0004  |    |		.CONST	0x02e4,0x0004
0924 ; --------------------------------------------------------------------------------------
0924 ; Debug3 Subtable 0xd
0924 ; --------------------------------------------------------------------------------------
0924 0001 0016  |    |		.DBG3TAB	0x0001,0x0016
0926 02eb ffff  |    |		.CONST	0x02eb,0xffff
0928 02f1 0001  |    |		.CONST	0x02f1,0x0001
092a 02f1 0401  |    |		.CONST	0x02f1,0x0401
092c 02f2 0402  |    |		.CONST	0x02f2,0x0402
092e 02f3 0403  |    |		.CONST	0x02f3,0x0403
0930 02f3 0404  |    |		.CONST	0x02f3,0x0404
0932 02f3 0001  |    |		.CONST	0x02f3,0x0001
0934 02ff 0009  |    |		.CONST	0x02ff,0x0009
0936 02ff 0801  |    |		.CONST	0x02ff,0x0801
0938 0300 0802  |    |		.CONST	0x0300,0x0802
093a 0301 0803  |    |		.CONST	0x0301,0x0803
093c 0301 0804  |    |		.CONST	0x0301,0x0804
093e 0301 0009  |    |		.CONST	0x0301,0x0009
0940 0307 000b  |    |		.CONST	0x0307,0x000b
0942 030a 000a  |    |		.CONST	0x030a,0x000a
0944 030f 0002  |    |		.CONST	0x030f,0x0002
0946 0312 0003  |    |		.CONST	0x0312,0x0003
0948 0314 0004  |    |		.CONST	0x0314,0x0004
094a 0317 0005  |    |		.CONST	0x0317,0x0005
094c 031b 0006  |    |		.CONST	0x031b,0x0006
094e 0320 0007  |    |		.CONST	0x0320,0x0007
0950 0322 0008  | "  |		.CONST	0x0322,0x0008
0952 0326 000c  | &  |		.CONST	0x0326,0x000c
0954 ; --------------------------------------------------------------------------------------
0954 ; Debug3 Subtable 0xe
0954 ; --------------------------------------------------------------------------------------
0954 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
0956 0333 0001  | 3  |		.CONST	0x0333,0x0001
0958 0338 0401  | 8  |		.CONST	0x0338,0x0401
095a 033c 0001  | <  |		.CONST	0x033c,0x0001
095c 033d 0002  | =  |		.CONST	0x033d,0x0002
095e 0341 0003  | A  |		.CONST	0x0341,0x0003
0960 ; --------------------------------------------------------------------------------------
0960 ; Debug3 Subtable 0xf
0960 ; --------------------------------------------------------------------------------------
0960 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
0962 034b 0001  | K  |		.CONST	0x034b,0x0001
0964 034e 0401  | N  |		.CONST	0x034e,0x0401
0966 0352 0001  | R  |		.CONST	0x0352,0x0001
0968 0353 0002  | S  |		.CONST	0x0353,0x0002
096a 0356 0003  | V  |		.CONST	0x0356,0x0003
096c ; --------------------------------------------------------------------------------------
096c ; Debug3 Subtable 0x10
096c ; --------------------------------------------------------------------------------------
096c 0000 0035  |   5|		.DBG3TAB	0x0000,0x0035
096e 0363 0001  | c  |		.CONST	0x0363,0x0001
0970 0363 0401  | c  |		.CONST	0x0363,0x0401
0972 0364 0402  | d  |		.CONST	0x0364,0x0402
0974 0365 0403  | e  |		.CONST	0x0365,0x0403
0976 0365 0404  | e  |		.CONST	0x0365,0x0404
0978 0365 0001  | e  |		.CONST	0x0365,0x0001
097a 0414 0002  |    |		.CONST	0x0414,0x0002
097c 0417 0003  |    |		.CONST	0x0417,0x0003
097e 041a 0004  |    |		.CONST	0x041a,0x0004
0980 041d 0801  |    |		.CONST	0x041d,0x0801
0982 041e 0802  |    |		.CONST	0x041e,0x0802
0984 041f 0803  |    |		.CONST	0x041f,0x0803
0986 041f 0804  |    |		.CONST	0x041f,0x0804
0988 0421 0004  | !  |		.CONST	0x0421,0x0004
098a 0423 0006  | #  |		.CONST	0x0423,0x0006
098c 0427 0005  | '  |		.CONST	0x0427,0x0005
098e 042c 0007  | ,  |		.CONST	0x042c,0x0007
0990 0431 0008  | 1  |		.CONST	0x0431,0x0008
0992 0435 0009  | 5  |		.CONST	0x0435,0x0009
0994 0439 000a  | 9  |		.CONST	0x0439,0x000a
0996 043e 000b  | >  |		.CONST	0x043e,0x000b
0998 0443 000c  | C  |		.CONST	0x0443,0x000c
099a 0447 000d  | G  |		.CONST	0x0447,0x000d
099c 044c 000e  | L  |		.CONST	0x044c,0x000e
099e 0451 000f  | Q  |		.CONST	0x0451,0x000f
09a0 0456 0010  | V  |		.CONST	0x0456,0x0010
09a2 045b 0011  | [  |		.CONST	0x045b,0x0011
09a4 0460 0012  | `  |		.CONST	0x0460,0x0012
09a6 0464 0013  | d  |		.CONST	0x0464,0x0013
09a8 0469 0014  | i  |		.CONST	0x0469,0x0014
09aa 046e 0015  | n  |		.CONST	0x046e,0x0015
09ac 0473 0016  | s  |		.CONST	0x0473,0x0016
09ae 0478 0017  | x  |		.CONST	0x0478,0x0017
09b0 047c 0018  | |  |		.CONST	0x047c,0x0018
09b2 0480 0019  |    |		.CONST	0x0480,0x0019
09b4 0484 001a  |    |		.CONST	0x0484,0x001a
09b6 0488 001b  |    |		.CONST	0x0488,0x001b
09b8 048b 001c  |    |		.CONST	0x048b,0x001c
09ba 048e 0c01  |    |		.CONST	0x048e,0x0c01
09bc 048f 0c02  |    |		.CONST	0x048f,0x0c02
09be 0490 0c03  |    |		.CONST	0x0490,0x0c03
09c0 0490 0c04  |    |		.CONST	0x0490,0x0c04
09c2 0492 001c  |    |		.CONST	0x0492,0x001c
09c4 0494 001d  |    |		.CONST	0x0494,0x001d
09c6 0498 001e  |    |		.CONST	0x0498,0x001e
09c8 049b 1001  |    |		.CONST	0x049b,0x1001
09ca 049c 1002  |    |		.CONST	0x049c,0x1002
09cc 049d 1003  |    |		.CONST	0x049d,0x1003
09ce 049d 1004  |    |		.CONST	0x049d,0x1004
09d0 049f 001e  |    |		.CONST	0x049f,0x001e
09d2 04a7 0020  |    |		.CONST	0x04a7,0x0020
09d4 04ab 001f  |    |		.CONST	0x04ab,0x001f
09d6 04af 0022  |   "|		.CONST	0x04af,0x0022
09d8 ; --------------------------------------------------------------------------------------
09d8 ; Debug3 Subtable 0x11
09d8 ; --------------------------------------------------------------------------------------
09d8 0000 001a  |    |		.DBG3TAB	0x0000,0x001a
09da 04bb 0001  |    |		.CONST	0x04bb,0x0001
09dc 04bd 0002  |    |		.CONST	0x04bd,0x0002
09de 04c1 0003  |    |		.CONST	0x04c1,0x0003
09e0 04c9 0004  |    |		.CONST	0x04c9,0x0004
09e2 04c9 0401  |    |		.CONST	0x04c9,0x0401
09e4 04cb 0004  |    |		.CONST	0x04cb,0x0004
09e6 04cc 0005  |    |		.CONST	0x04cc,0x0005
09e8 04cf 0006  |    |		.CONST	0x04cf,0x0006
09ea 04d8 0007  |    |		.CONST	0x04d8,0x0007
09ec 04d8 0801  |    |		.CONST	0x04d8,0x0801
09ee 04da 0007  |    |		.CONST	0x04da,0x0007
09f0 04db 0008  |    |		.CONST	0x04db,0x0008
09f2 04de 0009  |    |		.CONST	0x04de,0x0009
09f4 04e7 000a  |    |		.CONST	0x04e7,0x000a
09f6 04ef 000b  |    |		.CONST	0x04ef,0x000b
09f8 04ef 0c01  |    |		.CONST	0x04ef,0x0c01
09fa 04f1 000b  |    |		.CONST	0x04f1,0x000b
09fc 04f2 000c  |    |		.CONST	0x04f2,0x000c
09fe 04f5 000d  |    |		.CONST	0x04f5,0x000d
0a00 04fe 000e  |    |		.CONST	0x04fe,0x000e
0a02 04fe 1001  |    |		.CONST	0x04fe,0x1001
0a04 0500 000e  |    |		.CONST	0x0500,0x000e
0a06 0501 000f  |    |		.CONST	0x0501,0x000f
0a08 0504 0010  |    |		.CONST	0x0504,0x0010
0a0a 050c 0011  |    |		.CONST	0x050c,0x0011
0a0c 0513 0012  |    |		.CONST	0x0513,0x0012
0a0e ; --------------------------------------------------------------------------------------
0a0e ; Debug3 Subtable 0x12
0a0e ; --------------------------------------------------------------------------------------
0a0e 0000 000e  |    |		.DBG3TAB	0x0000,0x000e
0a10 0523 0001  | #  |		.CONST	0x0523,0x0001
0a12 0527 0002  | '  |		.CONST	0x0527,0x0002
0a14 0527 0401  | '  |		.CONST	0x0527,0x0401
0a16 0529 0002  | )  |		.CONST	0x0529,0x0002
0a18 052a 0801  | *  |		.CONST	0x052a,0x0801
0a1a 052b 0802  | +  |		.CONST	0x052b,0x0802
0a1c 052c 0803  | ,  |		.CONST	0x052c,0x0803
0a1e 052d 0804  | -  |		.CONST	0x052d,0x0804
0a20 052d 0805  | -  |		.CONST	0x052d,0x0805
0a22 052d 0806  | -  |		.CONST	0x052d,0x0806
0a24 052d 0401  | -  |		.CONST	0x052d,0x0401
0a26 052e 0003  | .  |		.CONST	0x052e,0x0003
0a28 0530 0004  | 0  |		.CONST	0x0530,0x0004
0a2a 0534 0005  | 4  |		.CONST	0x0534,0x0005
0a2c 0000 0000  |    |		.BLANK	0000[0x1d4]