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

⟦899f3ecfa⟧

    Length: 5120 (0x1400)
    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 05d8       |    |		.CONST	0x05d8								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0004       |    |		.CONST	0x0004								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0022       | "  |		.CONST	0x0022								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0015       |    |		.CONST	0x0015								; Number of locals
000b			INIT_0008:
000b 029a 002b  |   +|		Declare_Subprogram	INIT_0028,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x064a,0x8000,0x0000,0x0056,0xcab5,0x0000,0x0008
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
000d 029a 0043  |   C|		Declare_Subprogram	INIT_0040,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xd,0xfffd
000f 00bf       |    |		Action	Accept_Activation
0010 e001       |    |		Load	0x0,0x1								; Debug Table 0x1 = .DEBUG	0x0010,0x0652,0x8000,0x0000,0x0056,0xcaf5,0x0000,0x0009
													; Debug Table 0x1.0x0 = 0x10,0xffff
													; Debug Table 0x1.0x1 = 0x10,0xfffe
													; Debug Table 0x1.0x2 = 0x10,0xfffd
													; Debug Table 0x1.0x3 = 0x10,0xfffc
													; Debug Table 0x1.0x4 = 0x10,0xfffb
0011 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0012 e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x5 = 0x12,0xfffa
0013 191c       |    |		Execute	Package,Field_Reference,Field_Number 0x1c
0014 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x6 = 0x14,0xfff9
0015 1915       |    |		Execute	Package,Field_Reference,Field_Number 0x15
0016 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x7 = 0x16,0xfff8
0017 1916       |    |		Execute	Package,Field_Reference,Field_Number 0x16
0018 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x8 = 0x18,0xfff7
0019 1918       |    |		Execute	Package,Field_Reference,Field_Number 0x18
001a 029d 0063  |   c|		Declare_Subprogram	INIT_0060,For_Outer_Call			; Debug Table 0x1.0x9 = 0x1a,0xfff6
													; Debug Table 0x1.0xa = 0x1a,0xfff5
													; Debug Table 0x1.0xb = 0x1a,0xfff4
													; Debug Table 0x1.0xc = 0x1a,0xfff3
													; Debug Table 0x1.0xd = 0x1a,0xfff2
001c 029d 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Outer_Call			; Debug Table 0x1.0x10 = 0x1c,0xffef
													; Debug Table 0x1.0xe = 0x1c,0xfff1
													; Debug Table 0x1.0xf = 0x1c,0xfff0
001e 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x11 = 0x1e,0xffee
001f 00c7       |    |		Action	Elaborate_Subprogram
0020 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x12 = 0x20,0xffed
0021 00c7       |    |		Action	Elaborate_Subprogram
0022			BODY_0008:
0022 00bc       |    |		Action	Signal_Activated
0023 00bb       |    |		Action	Signal_Completion
0024 0000 0000  |    |		.BLANK	0000[0x4]
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 002c       | ,  |		.CONST	0x002c								; Address of begin
0029 0038       | 8  |		.CONST	0x0038								; Address of exception handler
002a 0002       |    |		.CONST	0x0002								; Number of locals
002b			INIT_0028:
002b 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x2 = .DEBUG	0x002b,0x067a,0x0002,0x0000,0x0056,0xcab5,0x0000,0x000c
													; Debug Table 0x2.0x0 = 0x2b,0xffff
002c			BODY_0028:
002c 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x2.0x1 = 0x2c,0x1
002d e5fa       |    |		Load	0x2,-0x6
002e 4800       |H   |		Short_Literal	0x0
002f e5fb       |    |		Load	0x2,-0x5
0030 e5fc       |    |		Load	0x2,-0x4
0031 e5fd       |    |		Load	0x2,-0x3
0032 e5fe       |    |		Load	0x2,-0x2
0033 e5ff       |    |		Load	0x2,-0x1
0034 8215       |    |		Call	0x1,0x15
0035 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0036 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x2 = 0x36,0x2
0037 4406       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x6
0038			TRAP_0028:
0038 6273       |bs  |		Indirect_Literal	Discrete,0x2ac,{0x00000000, 0x56caf501}
0039 010f       |    |		Execute	Exception,Equal
003a 6803       |h   |		Jump_Zero	0x3e
003b e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x2.0x3 = 0x3b,0x3
003c 0f00       |    |		Execute_Immediate	Equal,0x0
003d 4406       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x6
003e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x4 = 0x3e,0x4
003f 4406       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x6
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0044       | D  |		.CONST	0x0044								; Address of begin
0041 0059       | Y  |		.CONST	0x0059								; Address of exception handler
0042 0002       |    |		.CONST	0x0002								; Number of locals
0043			INIT_0040:
0043 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x3 = .DEBUG	0x0043,0x0686,0x0001,0x0000,0x0056,0xcab5,0x0000,0x0032
													; Debug Table 0x3.0x0 = 0x43,0xffff
0044			BODY_0040:
0044 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x3.0x1 = 0x44,0x1
0045 4800       |H   |		Short_Literal	0x0
0046 4801       |H   |		Short_Literal	0x1
0047 e5fe       |    |		Load	0x2,-0x2
0048 0227       | '  |		Execute	Access,All_Reference
0049 01dd       |    |		Execute	Vector,First
004a 00e3       |    |		Load_Encached	Natural_Cache
004b 025b       | [  |		Execute	Discrete,Check_In_Type
004c e5fe       |    |		Load	0x2,-0x2
004d e5ff       |    |		Load	0x2,-0x1
004e e5fc       |    |		Load	0x2,-0x4
004f e5fd       |    |		Load	0x2,-0x3
0050 8215       |    |		Call	0x1,0x15
0051 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0052 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x2 = 0x52,0x2
0053 e5fb       |    |		Load	0x2,-0x5
0054 027d       | }  |		Execute	Discrete,Greater
0055 6802       |h   |		Jump_Zero	0x58
0056 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x3 = 0x56,0x3
0057 c5fb       |    |		Store	0x2,-0x5
0058 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0059			TRAP_0040:
0059 0007       |    |		Action	Break_Optional
005a 624d       |bM  |		Indirect_Literal	Discrete,0x2a8,{0x00000000, 0x56cab501}		; Debug Table 0x3.0x4 = 0x5a,0x4
005b 0257       | W  |		Execute	Discrete,Raise
005c 0000 0000  |    |		.BLANK	0000[0x4]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0066       | f  |		.CONST	0x0066								; Address of begin
0061 00a6       |    |		.CONST	0x00a6								; Address of exception handler
0062 0002       |    |		.CONST	0x0002								; Number of locals
0063			INIT_0060:
0063 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4 = .DEBUG	0x0063,0x0692,0x0002,0x0000,0x0056,0xcaf5,0x0000,0x00b1
													; Debug Table 0x4.0x0 = 0x63,0xffff
0064 00db       |    |		Load_Top	At_Offset_3
0065 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0066			BODY_0060:
0066 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x1 = 0x66,0x1
0067 00eb       |    |		Load_Encached	Diana_Cache
0068 18d9       |    |		Execute	Package,Field_Execute,Field_Number 0xd9
0069 00eb       |    |		Load_Encached	Diana_Cache
006a 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
006b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x2 = 0x6b,0x401
006c 7002       |p   |		Jump_Nonzero	0x6f
006d 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4.0x3 = 0x6d,0x402
006e 7826       |x&  |		Jump	0x95
006f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x4 = 0x6f,0x403
0070 0217       |    |		Execute	Heap_Access,All_Reference
0071 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0072 6804       |h   |		Jump_Zero	0x77
0073 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x5 = 0x73,0x404
0074 0217       |    |		Execute	Heap_Access,All_Reference
0075 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0076 781e       |x   |		Jump	0x95
0077 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x6 = 0x77,0x405
0078 e404       |    |		Load	0x2,0x4								; Debug Table 0x4.0x7 = 0x78,0x801
0079 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0x4.0x8 = 0x79,0x802
007a 00d0       |    |		Action	Swap_Control							; Debug Table 0x4.0x9 = 0x7a,0x803
													; Debug Table 0x4.0xa = 0x7a,0x804
007b 00d1       |    |		Pop_Control	Pop_Count_1
007c 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0x4.0xb = 0x7c,0x405
007d 00eb       |    |		Load_Encached	Diana_Cache
007e 0098       |    |		Execute	Package,Field_Read_Dynamic
007f 012c       | ,  |		Execute	Any,Size
0080 e003       |    |		Load	0x0,0x3
0081 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0082 025b       | [  |		Execute	Discrete,Check_In_Type
0083 0273       | s  |		Execute	Discrete,Plus
0084 00d9       |    |		Load_Top	At_Offset_1
0085 e405       |    |		Load	0x2,0x5								; Debug Table 0x4.0xc = 0x85,0xc01
0086 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x4.0xd = 0x86,0xc02
0087 00d0       |    |		Action	Swap_Control							; Debug Table 0x4.0xe = 0x87,0xc03
													; Debug Table 0x4.0xf = 0x87,0xc04
0088 00d1       |    |		Pop_Control	Pop_Count_1
0089 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0x4.0x10 = 0x89,0x804
008a 00eb       |    |		Load_Encached	Diana_Cache
008b 0098       |    |		Execute	Package,Field_Read_Dynamic
008c 49c9       |I   |		Short_Literal	0x1c9
008d 00eb       |    |		Load_Encached	Diana_Cache
008e 0098       |    |		Execute	Package,Field_Read_Dynamic
008f 49ca       |I   |		Short_Literal	0x1ca
0090 00eb       |    |		Load_Encached	Diana_Cache
0091 0095       |    |		Execute	Package,Field_Reference_Dynamic
0092 e004       |    |		Load	0x0,0x4
0093 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0094 7800       |x   |		Jump	0x95
0095 00d0       |    |		Action	Swap_Control
0096 00d1       |    |		Pop_Control	Pop_Count_1
0097 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x4.0x11 = 0x97,0x1
0098 18c5       |    |		Execute	Package,Field_Execute,Field_Number 0xc5
0099 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
009a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x12 = 0x9a,0x2
009b e005       |    |		Load	0x0,0x5
009c 188c       |    |		Execute	Package,Field_Execute,Field_Number 0x8c
009d 6806       |h   |		Jump_Zero	0xa4
009e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x13 = 0x9e,0x3
009f 00d9       |    |		Load_Top	At_Offset_1
00a0 e005       |    |		Load	0x0,0x5
00a1 188b       |    |		Execute	Package,Field_Execute,Field_Number 0x8b
00a2 021f       |    |		Execute	Heap_Access,Equal
00a3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00a4 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x14 = 0xa4,0x4
00a5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00a6			TRAP_0060:
00a6 0007       |    |		Action	Break_Optional
00a7 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x15 = 0xa7,0x5
00a8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00a9 0000 0000  |    |		.BLANK	0000[0x7]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00dd       |    |		.CONST	0x00dd								; Address of begin
00b1 00e8       |    |		.CONST	0x00e8								; Address of exception handler
00b2 000d       |    |		.CONST	0x000d								; Number of locals
00b3			INIT_00b0:
00b3 029e 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Call,Unelaborated			; Debug Table 0x5 = .DEBUG	0x00b3,0x06c0,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x010a
													; Debug Table 0x5.0x0 = 0xb3,0xffff
00b5 029e 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Call,Unelaborated			; Debug Table 0x5.0x1 = 0xb5,0xfffe
00b7 e20f       |    |		Load	0x1,0xf								; Debug Table 0x5.0x2 = 0xb7,0xfffd
00b8 0322       | "  |		Declare_Variable	Record
00b9 e5ff       |    |		Load	0x2,-0x1
00ba 00d9       |    |		Load_Top	At_Offset_1
00bb 017d       | }  |		Execute	Record,Structure_Write
00bc e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x3 = 0xbc,0xfffc
00bd e006       |    |		Load	0x0,0x6
00be 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00bf 00e3       |    |		Load_Encached	Natural_Cache
00c0 03f1       |    |		Declare_Variable	Discrete,With_Value
00c1 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x5.0x4 = 0xc1,0xfffb
00c2 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00c3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x5 = 0xc3,0xfffa
00c4 00db       |    |		Load_Top	At_Offset_3
00c5 e001       |    |		Load	0x0,0x1
00c6 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00c7 00e1       |    |		Load_Encached	Boolean_Cache
00c8 03f1       |    |		Declare_Variable	Discrete,With_Value
00c9 029f 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Call				; Debug Table 0x5.0x6 = 0xc9,0xfff9
													; Debug Table 0x5.0x7 = 0xc9,0xfff8
													; Debug Table 0x5.0x8 = 0xc9,0xfff7
													; Debug Table 0x5.0x9 = 0xc9,0xfff6
													; Debug Table 0x5.0xa = 0xc9,0xfff5
00cb 029f 043b  |   ;|		Declare_Subprogram	INIT_0438,For_Call				; Debug Table 0x5.0xb = 0xcb,0xfff4
													; Debug Table 0x5.0xc = 0xcb,0xfff3
													; Debug Table 0x5.0xd = 0xcb,0xfff2
													; Debug Table 0x5.0xe = 0xcb,0xfff1
													; Debug Table 0x5.0xf = 0xcb,0xfff0
00cd 029f 050b  |    |		Declare_Subprogram	INIT_0508,For_Call				; Debug Table 0x5.0x10 = 0xcd,0xffef
													; Debug Table 0x5.0x11 = 0xcd,0xffee
													; Debug Table 0x5.0x12 = 0xcd,0xffed
													; Debug Table 0x5.0x13 = 0xcd,0xffec
													; Debug Table 0x5.0x14 = 0xcd,0xffeb
00cf 029f 0523  |   #|		Declare_Subprogram	INIT_0520,For_Call				; Debug Table 0x5.0x15 = 0xcf,0xffea
													; Debug Table 0x5.0x16 = 0xcf,0xffe9
00d1 029f 053b  |   ;|		Declare_Subprogram	INIT_0538,For_Call				; Debug Table 0x5.0x17 = 0xd1,0xffe8
													; Debug Table 0x5.0x18 = 0xd1,0xffe7
00d3 029f 055b  |   [|		Declare_Subprogram	INIT_0558,For_Call				; Debug Table 0x5.0x19 = 0xd3,0xffe6
00d5 4803       |H   |		Short_Literal	0x3							; Debug Table 0x5.0x1a = 0xd5,0xffe5
													; Debug Table 0x5.0x1b = 0xd5,0xffe4
													; Debug Table 0x5.0x1c = 0xd5,0xffe3
													; Debug Table 0x5.0x1d = 0xd5,0xffe2
													; Debug Table 0x5.0x1e = 0xd5,0xffe1
00d6 4802       |H   |		Short_Literal	0x2
00d7 0099       |    |		Action	Reference_Dynamic
00d8 00c7       |    |		Action	Elaborate_Subprogram
00d9 4802       |H   |		Short_Literal	0x2							; Debug Table 0x5.0x1f = 0xd9,0xffe0
00da 4802       |H   |		Short_Literal	0x2
00db 0099       |    |		Action	Reference_Dynamic
00dc 00c7       |    |		Action	Elaborate_Subprogram
00dd			BODY_00b0:
00dd e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x5.0x20 = 0xdd,0x1
00de e5fc       |    |		Load	0x2,-0x4
00df e5fd       |    |		Load	0x2,-0x3
00e0 8402       |    |		Call	0x2,0x2
00e1 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x5.0x21 = 0xe1,0x2
00e2 6802       |h   |		Jump_Zero	0xe5
00e3 61c4       |a   |		Indirect_Literal	Discrete,0x2a8,{0x00000000, 0x56cab501}		; Debug Table 0x5.0x22 = 0xe3,0x3
00e4 0257       | W  |		Execute	Discrete,Raise
00e5 e405       |    |		Load	0x2,0x5								; Debug Table 0x5.0x23 = 0xe5,0x4
00e6 a5f8       |    |		Store_Unchecked	0x2,-0x8
00e7 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
00e8			TRAP_00b0:
00e8 61bb       |a   |		Indirect_Literal	Discrete,0x2a4,{0x00000000, 0x56caf503}
00e9 010f       |    |		Execute	Exception,Equal
00ea 6803       |h   |		Jump_Zero	0xee
00eb e405       |    |		Load	0x2,0x5								; Debug Table 0x5.0x24 = 0xeb,0x5
00ec a5f8       |    |		Store_Unchecked	0x2,-0x8
00ed 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
00ee 0100       |    |		Execute	Exception,Raise
00ef 0000       |    |		.XXX[0x1]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f5       |    |		.CONST	0x00f5								; Address of begin
00f1 0299       |    |		.CONST	0x0299								; Address of exception handler
00f2 0002       |    |		.CONST	0x0002								; Number of locals
00f3			INIT_00f0:
00f3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6 = .DEBUG	0x00f3,0x070c,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x0135
													; Debug Table 0x6.0x0 = 0xf3,0xffff
00f4 0227       | '  |		Execute	Access,All_Reference
00f5			BODY_00f0:
00f5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x1 = 0xf5,0x1
00f6 01dc       |    |		Execute	Vector,Last
00f7 e7fd       |    |		Load	0x3,-0x3
00f8 0263       | c  |		Execute	Discrete,Above_Bound
00f9 719e       |q   |		Jump_Nonzero	0x298
00fa 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x2 = 0xfa,0x2
													; Debug Table 0x6.0x3 = 0xfa,0xfbff
00fb 00db       |    |		Load_Top	At_Offset_3
00fc 01d5       |    |		Execute	Vector,Field_Reference
00fd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x4 = 0xfd,0x401
00fe 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00ff 460a       |F   |		Jump_Case	0xb
0100 780a       |x   |		Jump	0x10b								; case 0x0
0101 798a       |y   |		Jump	0x28c								; case 0x1
0102 780c       |x   |		Jump	0x10f								; case 0x2
0103 784e       |xN  |		Jump	0x152								; case 0x3
0104 788b       |x   |		Jump	0x190								; case 0x4
0105 7809       |x   |		Jump	0x10f								; case 0x5
0106 7845       |xE  |		Jump	0x14c								; case 0x6
0107 78a8       |x   |		Jump	0x1b0								; case 0x7
0108 7983       |y   |		Jump	0x28c								; case 0x8
0109 797a       |yz  |		Jump	0x284								; case 0x9
010a 796a       |yj  |		Jump	0x275								; case 0xa
010b e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x5 = 0x10b,0x402
010c 0a07       |    |		Execute_Immediate	Plus,0x7
010d c405       |    |		Store	0x2,0x5
010e 797d       |y}  |		Jump	0x28c
010f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x6 = 0x10f,0x404
0110 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
0111 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0112 4603       |F   |		Jump_Case	0x4
0113 782b       |x+  |		Jump	0x13f								; case 0x0
0114 782a       |x*  |		Jump	0x13f								; case 0x1
0115 7814       |x   |		Jump	0x12a								; case 0x2
0116 7800       |x   |		Jump	0x117								; case 0x3
0117 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x6.0x7 = 0x117,0x405
0118 7002       |p   |		Jump_Nonzero	0x11b
0119 6192       |a   |		Indirect_Literal	Discrete,0x2ac,{0x00000000, 0x56caf501}		; Debug Table 0x6.0x8 = 0x119,0x406
011a 0257       | W  |		Execute	Discrete,Raise
011b e404       |    |		Load	0x2,0x4								; Debug Table 0x6.0x9 = 0x11b,0x407
011c e001       |    |		Load	0x0,0x1
011d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
011e 00d9       |    |		Load_Top	At_Offset_1
011f 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
0120 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0121 0273       | s  |		Execute	Discrete,Plus
0122 c405       |    |		Store	0x2,0x5
0123 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0xa = 0x123,0x408
0124 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
0125 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0126 e7ff       |    |		Load	0x3,-0x1
0127 8210       |    |		Call	0x1,0x10
0128 8408       |    |		Call	0x2,0x8
0129 7962       |yb  |		Jump	0x28c
012a e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x6.0xb = 0x12a,0x409
012b 7004       |p   |		Jump_Nonzero	0x130
012c e5f9       |    |		Load	0x2,-0x7
012d 7002       |p   |		Jump_Nonzero	0x130
012e 617d       |a}  |		Indirect_Literal	Discrete,0x2ac,{0x00000000, 0x56caf501}		; Debug Table 0x6.0xc = 0x12e,0x40a
012f 0257       | W  |		Execute	Discrete,Raise
0130 e404       |    |		Load	0x2,0x4								; Debug Table 0x6.0xd = 0x130,0x40b
0131 e001       |    |		Load	0x0,0x1
0132 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0133 00d9       |    |		Load_Top	At_Offset_1
0134 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
0135 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0136 0273       | s  |		Execute	Discrete,Plus
0137 c405       |    |		Store	0x2,0x5
0138 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0xe = 0x138,0x40c
0139 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
013a 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
013b e7ff       |    |		Load	0x3,-0x1
013c 8210       |    |		Call	0x1,0x10
013d 8408       |    |		Call	0x2,0x8
013e 794d       |yM  |		Jump	0x28c
013f e406       |    |		Load	0x2,0x6								; Debug Table 0x6.0xf = 0x13f,0x40d
0140 00d9       |    |		Load_Top	At_Offset_1
0141 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
0142 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0143 0273       | s  |		Execute	Discrete,Plus
0144 c406       |    |		Store	0x2,0x6
0145 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x10 = 0x145,0x40e
0146 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
0147 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0148 e7ff       |    |		Load	0x3,-0x1
0149 8210       |    |		Call	0x1,0x10
014a 8408       |    |		Call	0x2,0x8
014b 7940       |y@  |		Jump	0x28c
014c e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x11 = 0x14c,0x40f
014d 00d9       |    |		Load_Top	At_Offset_1
014e 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
014f 0273       | s  |		Execute	Discrete,Plus
0150 c405       |    |		Store	0x2,0x5
0151 793a       |y:  |		Jump	0x28c
0152 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x12 = 0x152,0x410
													; Debug Table 0x6.0x13 = 0x152,0xf7ff
0153 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0154 0227       | '  |		Execute	Access,All_Reference
0155 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x14 = 0x155,0xf7fe
0156 01dd       |    |		Execute	Vector,First
0157 00e3       |    |		Load_Encached	Natural_Cache
0158 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0159 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x15 = 0x159,0xf7fd
015a 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
015b e7ff       |    |		Load	0x3,-0x1
015c 8210       |    |		Call	0x1,0x10
015d e608       |    |		Load	0x3,0x8								; Debug Table 0x6.0x16 = 0x15d,0xc01
015e 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x6.0x17 = 0x15e,0xc02
015f 00d0       |    |		Action	Swap_Control							; Debug Table 0x6.0x18 = 0x15f,0xc03
													; Debug Table 0x6.0x19 = 0x15f,0xc04
0160 00d1       |    |		Pop_Control	Pop_Count_1
0161 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x6.0x1a = 0x161,0xf7fd
0162 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0163 03f1       |    |		Declare_Variable	Discrete,With_Value
0164 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x1b = 0x164,0x801
													; Debug Table 0x6.0x1c = 0x164,0x802
0165 00db       |    |		Load_Top	At_Offset_3
0166 01dc       |    |		Execute	Vector,Last
0167 027d       | }  |		Execute	Discrete,Greater
0168 680b       |h   |		Jump_Zero	0x174
0169 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x1d = 0x169,0x803
016a 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
016b 0227       | '  |		Execute	Access,All_Reference
016c 01dd       |    |		Execute	Vector,First
016d 00e3       |    |		Load_Encached	Natural_Cache
016e 025b       | [  |		Execute	Discrete,Check_In_Type
016f e605       |    |		Load	0x3,0x5
0170 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
0171 e7ff       |    |		Load	0x3,-0x1
0172 8402       |    |		Call	0x2,0x2
0173 781a       |x   |		Jump	0x18e								; Debug Table 0x6.0x1e = 0x173,0x804
0174 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x1f = 0x174,0x805
0175 00da       |    |		Load_Top	At_Offset_2
0176 e606       |    |		Load	0x3,0x6
0177 01d5       |    |		Execute	Vector,Field_Reference
0178 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0179 027f       |    |		Execute	Discrete,Equal
017a 680f       |h   |		Jump_Zero	0x18a
017b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x20 = 0x17b,0x806
017c 00db       |    |		Load_Top	At_Offset_3
017d 01d5       |    |		Execute	Vector,Field_Reference
017e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
017f 0227       | '  |		Execute	Access,All_Reference
0180 01dd       |    |		Execute	Vector,First
0181 00e3       |    |		Load_Encached	Natural_Cache
0182 025b       | [  |		Execute	Discrete,Check_In_Type
0183 00da       |    |		Load_Top	At_Offset_2
0184 e606       |    |		Load	0x3,0x6
0185 01d5       |    |		Execute	Vector,Field_Reference
0186 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0187 e7ff       |    |		Load	0x3,-0x1
0188 8402       |    |		Call	0x2,0x2
0189 7804       |x   |		Jump	0x18e								; Debug Table 0x6.0x21 = 0x189,0x807
018a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x22 = 0x18a,0x808
018b 0a01       |    |		Execute_Immediate	Plus,0x1
018c 005a       | Z  |		Store_Top	Discrete,At_Offset_2
018d 7fd6       |    |		Jump	0x164
018e 00d3       |    |		Pop_Control	Pop_Count_3
018f 78fc       |x   |		Jump	0x28c
0190 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x23 = 0x190,0x411
0191 2e09       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9
0192 e7ff       |    |		Load	0x3,-0x1
0193 8210       |    |		Call	0x1,0x10
0194 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x24 = 0x194,0x1001
0195 021d       |    |		Execute	Heap_Access,Is_Null
0196 00d0       |    |		Action	Swap_Control
0197 00d1       |    |		Pop_Control	Pop_Count_1
0198 70f3       |p   |		Jump_Nonzero	0x28c							; Debug Table 0x6.0x25 = 0x198,0x411
0199 00d8       |    |		Load_Top	At_Offset_0
019a 2e09       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9
019b e7ff       |    |		Load	0x3,-0x1
019c 8210       |    |		Call	0x1,0x10
019d 00eb       |    |		Load_Encached	Diana_Cache
019e 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
019f 4975       |Iu  |		Short_Literal	0x175
01a0 00eb       |    |		Load_Encached	Diana_Cache
01a1 0098       |    |		Execute	Package,Field_Read_Dynamic
01a2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01a3 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
01a4 68e7       |h   |		Jump_Zero	0x28c
01a5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x26 = 0x1a5,0x412
01a6 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
01a7 0227       | '  |		Execute	Access,All_Reference
01a8 01dd       |    |		Execute	Vector,First
01a9 00e3       |    |		Load_Encached	Natural_Cache
01aa 025b       | [  |		Execute	Discrete,Check_In_Type
01ab 00d9       |    |		Load_Top	At_Offset_1
01ac 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
01ad e7ff       |    |		Load	0x3,-0x1
01ae 8402       |    |		Call	0x2,0x2
01af 78dc       |x   |		Jump	0x28c
01b0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x27 = 0x1b0,0x413
01b1 2e0b       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xb
01b2 460b       |F   |		Jump_Case	0xc
01b3 7824       |x$  |		Jump	0x1d8								; case 0x0
01b4 7835       |x5  |		Jump	0x1ea								; case 0x1
01b5 7847       |xG  |		Jump	0x1fd								; case 0x2
01b6 786b       |xk  |		Jump	0x222								; case 0x3
01b7 7853       |xS  |		Jump	0x20b								; case 0x4
01b8 7863       |xc  |		Jump	0x21c								; case 0x5
01b9 78a0       |x   |		Jump	0x25a								; case 0x6
01ba 786d       |xm  |		Jump	0x228								; case 0x7
01bb 7803       |x   |		Jump	0x1bf								; case 0x8
01bc 7833       |x3  |		Jump	0x1f0								; case 0x9
01bd 78ab       |x   |		Jump	0x269								; case 0xa
01be 78b0       |x   |		Jump	0x26f								; case 0xb
01bf 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x28 = 0x1bf,0x414
01c0 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
01c1 e7ff       |    |		Load	0x3,-0x1
01c2 8210       |    |		Call	0x1,0x10
01c3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x29 = 0x1c3,0x1401
01c4 e005       |    |		Load	0x0,0x5
01c5 1895       |    |		Execute	Package,Field_Execute,Field_Number 0x95
01c6 680c       |h   |		Jump_Zero	0x1d3
01c7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x2a = 0x1c7,0x1402
01c8 e005       |    |		Load	0x0,0x5
01c9 1894       |    |		Execute	Package,Field_Execute,Field_Number 0x94
01ca 6804       |h   |		Jump_Zero	0x1cf
01cb e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x2b = 0x1cb,0x1403
01cc 0a09       |    |		Execute_Immediate	Plus,0x9
01cd c405       |    |		Store	0x2,0x5
01ce 7807       |x   |		Jump	0x1d6
01cf e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x2c = 0x1cf,0x1404
01d0 0a08       |    |		Execute_Immediate	Plus,0x8
01d1 c405       |    |		Store	0x2,0x5
01d2 7803       |x   |		Jump	0x1d6
01d3 e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x2d = 0x1d3,0x1405
01d4 0a07       |    |		Execute_Immediate	Plus,0x7
01d5 c405       |    |		Store	0x2,0x5
01d6 00d1       |    |		Pop_Control	Pop_Count_1
01d7 78b4       |x   |		Jump	0x28c
01d8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x2e = 0x1d8,0x415
01d9 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
01da e7ff       |    |		Load	0x3,-0x1
01db 8210       |    |		Call	0x1,0x10
01dc e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x2f = 0x1dc,0x1801
01dd 00d9       |    |		Load_Top	At_Offset_1
01de e007       |    |		Load	0x0,0x7
01df 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01e0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x30 = 0x1e0,0x1c01
01e1 01db       |    |		Execute	Vector,Length
01e2 00e3       |    |		Load_Encached	Natural_Cache
01e3 025b       | [  |		Execute	Discrete,Check_In_Type
01e4 00d0       |    |		Action	Swap_Control
01e5 00d1       |    |		Pop_Control	Pop_Count_1
01e6 0273       | s  |		Execute	Discrete,Plus							; Debug Table 0x6.0x31 = 0x1e6,0x1801
01e7 c405       |    |		Store	0x2,0x5
01e8 00d1       |    |		Pop_Control	Pop_Count_1
01e9 78a2       |x   |		Jump	0x28c
01ea 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x32 = 0x1ea,0x416
01eb 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
01ec e7ff       |    |		Load	0x3,-0x1
01ed 8210       |    |		Call	0x1,0x10
01ee 8409       |    |		Call	0x2,0x9
01ef 789c       |x   |		Jump	0x28c
01f0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x33 = 0x1f0,0x417
01f1 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
01f2 e7ff       |    |		Load	0x3,-0x1
01f3 8210       |    |		Call	0x1,0x10
01f4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x34 = 0x1f4,0x2001
01f5 e005       |    |		Load	0x0,0x5
01f6 188c       |    |		Execute	Package,Field_Execute,Field_Number 0x8c
01f7 7003       |p   |		Jump_Nonzero	0x1fb
01f8 e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x35 = 0x1f8,0x2002
01f9 0a04       |    |		Execute_Immediate	Plus,0x4
01fa c405       |    |		Store	0x2,0x5
01fb 00d1       |    |		Pop_Control	Pop_Count_1
01fc 788f       |x   |		Jump	0x28c
01fd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x36 = 0x1fd,0x418
01fe 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
01ff e7ff       |    |		Load	0x3,-0x1
0200 8210       |    |		Call	0x1,0x10
0201 e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x37 = 0x201,0x2401
0202 00d9       |    |		Load_Top	At_Offset_1
0203 00eb       |    |		Load_Encached	Diana_Cache
0204 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0205 00eb       |    |		Load_Encached	Diana_Cache
0206 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0207 0273       | s  |		Execute	Discrete,Plus
0208 c405       |    |		Store	0x2,0x5
0209 00d1       |    |		Pop_Control	Pop_Count_1
020a 7881       |x   |		Jump	0x28c
020b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x38 = 0x20b,0x419
020c 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
020d e7ff       |    |		Load	0x3,-0x1
020e 8210       |    |		Call	0x1,0x10
020f e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x39 = 0x20f,0x2801
0210 4801       |H   |		Short_Literal	0x1
0211 00da       |    |		Load_Top	At_Offset_2
0212 00eb       |    |		Load_Encached	Diana_Cache
0213 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
0214 0272       | r  |		Execute	Discrete,Minus
0215 4803       |H   |		Short_Literal	0x3
0216 0271       | q  |		Execute	Discrete,Times
0217 0248       | H  |		Execute	Discrete,Check_In_Integer
0218 0273       | s  |		Execute	Discrete,Plus
0219 c405       |    |		Store	0x2,0x5
021a 00d1       |    |		Pop_Control	Pop_Count_1
021b 7870       |xp  |		Jump	0x28c
021c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x3a = 0x21c,0x41a
021d 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
021e e7ff       |    |		Load	0x3,-0x1
021f 8210       |    |		Call	0x1,0x10
0220 840c       |    |		Call	0x2,0xc
0221 786a       |xj  |		Jump	0x28c
0222 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x3b = 0x222,0x41b
0223 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
0224 e7ff       |    |		Load	0x3,-0x1
0225 8210       |    |		Call	0x1,0x10
0226 840d       |    |		Call	0x2,0xd
0227 7864       |xd  |		Jump	0x28c
0228 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x3c = 0x228,0x41c
0229 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
022a e7ff       |    |		Load	0x3,-0x1
022b 8210       |    |		Call	0x1,0x10
022c 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6.0x3d = 0x22c,0xd3ff
022d 00d9       |    |		Load_Top	At_Offset_1
022e 00eb       |    |		Load_Encached	Diana_Cache
022f 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0230 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0231 e607       |    |		Load	0x3,0x7								; Debug Table 0x6.0x3e = 0x231,0x2c01
													; Debug Table 0x6.0x3f = 0x231,0x3001
0232 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x6.0x40 = 0x232,0x3002
0233 0b10       |    |		Execute_Immediate	Case_Compare,0x10				; Debug Table 0x6.0x41 = 0x233,0x3003
													; Debug Table 0x6.0x42 = 0x233,0x3004
													; Debug Table 0x6.0x43 = 0x233,0x2c01
0234 700f       |p   |		Jump_Nonzero	0x244
0235 0b12       |    |		Execute_Immediate	Case_Compare,0x12
0236 7015       |p   |		Jump_Nonzero	0x24c
0237 0b93       |    |		Execute_Immediate	Case_Compare,0x93
0238 7013       |p   |		Jump_Nonzero	0x24c
0239 0ba7       |    |		Execute_Immediate	Case_Compare,0xa7
023a 7011       |p   |		Jump_Nonzero	0x24c
023b 0b8e       |    |		Execute_Immediate	Case_Compare,0x8e
023c 700f       |p   |		Jump_Nonzero	0x24c
023d 0ba9       |    |		Execute_Immediate	Case_Compare,0xa9
023e 700d       |p   |		Jump_Nonzero	0x24c
023f 0b80       |    |		Execute_Immediate	Case_Compare,0x80
0240 700b       |p   |		Jump_Nonzero	0x24c
0241 0b3d       | =  |		Execute_Immediate	Case_Compare,0x3d
0242 7009       |p   |		Jump_Nonzero	0x24c
0243 780b       |x   |		Jump	0x24f								; Debug Table 0x6.0x44 = 0x243,0x2c05
0244 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x45 = 0x244,0x2c02
0245 00eb       |    |		Load_Encached	Diana_Cache
0246 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0247 6807       |h   |		Jump_Zero	0x24f
0248 e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x46 = 0x248,0x2c03
0249 0a02       |    |		Execute_Immediate	Plus,0x2
024a c405       |    |		Store	0x2,0x5
024b 7803       |x   |		Jump	0x24f
024c e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x47 = 0x24c,0x2c04
024d 0a02       |    |		Execute_Immediate	Plus,0x2
024e c405       |    |		Store	0x2,0x5
024f 00d1       |    |		Pop_Control	Pop_Count_1
0250 e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x48 = 0x250,0x2c06
0251 00da       |    |		Load_Top	At_Offset_2
0252 00eb       |    |		Load_Encached	Diana_Cache
0253 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0254 00eb       |    |		Load_Encached	Diana_Cache
0255 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0256 0273       | s  |		Execute	Discrete,Plus
0257 c405       |    |		Store	0x2,0x5
0258 00d2       |    |		Pop_Control	Pop_Count_2
0259 7832       |x2  |		Jump	0x28c
025a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x49 = 0x25a,0x41d
025b 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
025c e7ff       |    |		Load	0x3,-0x1
025d 8210       |    |		Call	0x1,0x10
025e e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x4a = 0x25e,0x3401
025f 00d9       |    |		Load_Top	At_Offset_1
0260 00eb       |    |		Load_Encached	Diana_Cache
0261 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0262 00eb       |    |		Load_Encached	Diana_Cache
0263 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0264 01db       |    |		Execute	Vector,Length
0265 0273       | s  |		Execute	Discrete,Plus
0266 c405       |    |		Store	0x2,0x5
0267 00d1       |    |		Pop_Control	Pop_Count_1
0268 7823       |x#  |		Jump	0x28c
0269 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x4b = 0x269,0x41e
026a 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
026b e7ff       |    |		Load	0x3,-0x1
026c 8210       |    |		Call	0x1,0x10
026d 840b       |    |		Call	0x2,0xb
026e 781d       |x   |		Jump	0x28c
026f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x4c = 0x26f,0x41f
0270 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
0271 e7ff       |    |		Load	0x3,-0x1
0272 8210       |    |		Call	0x1,0x10
0273 840a       |    |		Call	0x2,0xa
0274 7817       |x   |		Jump	0x28c
0275 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x6.0x4d = 0x275,0x421
0276 6802       |h   |		Jump_Zero	0x279
0277 602c       |`,  |		Indirect_Literal	Discrete,0x2a4,{0x00000000, 0x56caf503}		; Debug Table 0x6.0x4e = 0x277,0x422
0278 0257       | W  |		Execute	Discrete,Raise
0279 e404       |    |		Load	0x2,0x4								; Debug Table 0x6.0x4f = 0x279,0x423
027a e001       |    |		Load	0x0,0x1
027b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
027c e405       |    |		Load	0x2,0x5
027d 027d       | }  |		Execute	Discrete,Greater
027e 680d       |h   |		Jump_Zero	0x28c
027f e404       |    |		Load	0x2,0x4								; Debug Table 0x6.0x50 = 0x27f,0x424
0280 e001       |    |		Load	0x0,0x1
0281 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0282 a405       |    |		Store_Unchecked	0x2,0x5
0283 7808       |x   |		Jump	0x28c
0284 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x6.0x51 = 0x284,0x425
0285 0f00       |    |		Execute_Immediate	Equal,0x0
0286 e5f9       |    |		Load	0x2,-0x7
0287 0f00       |    |		Execute_Immediate	Equal,0x0
0288 0279       | y  |		Execute	Discrete,And
0289 6802       |h   |		Jump_Zero	0x28c
028a 6021       |`!  |		Indirect_Literal	Discrete,0x2ac,{0x00000000, 0x56caf501}		; Debug Table 0x6.0x52 = 0x28a,0x426
028b 0257       | W  |		Execute	Discrete,Raise
028c 00d1       |    |		Pop_Control	Pop_Count_1
028d e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x53 = 0x28d,0x3
028e e406       |    |		Load	0x2,0x6
028f 0273       | s  |		Execute	Discrete,Plus
0290 e001       |    |		Load	0x0,0x1
0291 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0292 027d       | }  |		Execute	Discrete,Greater
0293 6802       |h   |		Jump_Zero	0x296
0294 600b       |`   |		Indirect_Literal	Discrete,0x2a0,{0x00000000, 0x56caf502}		; Debug Table 0x6.0x54 = 0x294,0x4
0295 0257       | W  |		Execute	Discrete,Raise
0296 00a4 00fa  |    |		Action	Loop_Increasing_Extended,0xfa
0298 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0299			TRAP_00f0:
0299 010e       |    |		Execute	Exception,Is_Constraint_Error
029a 6801       |h   |		Jump_Zero	0x29c
029b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x6.0x55 = 0x29b,0x5
029c 0100       |    |		Execute	Exception,Raise
029d 0000 0000  |    |		.XXX[0x3]
029f 0000       |    |
02a0 0000 0000  |    |		.LITERAL	{0x00000000, 0x56caf502}
02a4 0000 0000  |    |		.LITERAL	{0x00000000, 0x56caf503}
02a8 0000 0000  |    |		.LITERAL	{0x00000000, 0x56cab501}
02ac 0000 0000  |    |		.LITERAL	{0x00000000, 0x56caf501}
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02ba       |    |		.CONST	0x02ba								; Address of begin
02b1 03dd       |    |		.CONST	0x03dd								; Address of exception handler
02b2 0004       |    |		.CONST	0x0004								; Number of locals
02b3			INIT_02b0:
02b3 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x7 = .DEBUG	0x02b3,0x07ba,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x0149
													; Debug Table 0x7.0x0 = 0x2b3,0xffff
02b4 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x7.0x1 = 0x2b4,0xfffe
02b5 e20f       |    |		Load	0x1,0xf								; Debug Table 0x7.0x2 = 0x2b5,0xfffd
02b6 0322       | "  |		Declare_Variable	Record
02b7 e404       |    |		Load	0x2,0x4
02b8 00d9       |    |		Load_Top	At_Offset_1
02b9 017d       | }  |		Execute	Record,Structure_Write
02ba			BODY_02b0:
02ba 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x3 = 0x2ba,0x1
02bb e404       |    |		Load	0x2,0x4
02bc e001       |    |		Load	0x0,0x1
02bd 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
02be e404       |    |		Load	0x2,0x4
02bf 017d       | }  |		Execute	Record,Structure_Write
02c0 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x7.0x4 = 0x2c0,0x2
02c1 00eb       |    |		Load_Encached	Diana_Cache
02c2 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
02c3 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
02c4 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x5 = 0x2c4,0x3
													; Debug Table 0x7.0x6 = 0x2c4,0x401
02c5 021d       |    |		Execute	Heap_Access,Is_Null
02c6 680b       |h   |		Jump_Zero	0x2d2							; Debug Table 0x7.0x7 = 0x2c6,0x3
02c7 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x7.0x8 = 0x2c7,0x4
02c8 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
02c9 0227       | '  |		Execute	Access,All_Reference
02ca 01dd       |    |		Execute	Vector,First
02cb 00e3       |    |		Load_Encached	Natural_Cache
02cc 025b       | [  |		Execute	Discrete,Check_In_Type
02cd e7fe       |    |		Load	0x3,-0x2
02ce 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
02cf e7ff       |    |		Load	0x3,-0x1
02d0 8402       |    |		Call	0x2,0x2
02d1 78f2       |x   |		Jump	0x3c4
02d2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x9 = 0x2d2,0x5
													; Debug Table 0x7.0xa = 0x2d2,0x801
02d3 7002       |p   |		Jump_Nonzero	0x2d6
02d4 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x7.0xb = 0x2d4,0x802
02d5 7803       |x   |		Jump	0x2d9
02d6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0xc = 0x2d6,0x803
02d7 0217       |    |		Execute	Heap_Access,All_Reference
02d8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02d9 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2					; Debug Table 0x7.0xd = 0x2d9,0x5
02da 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0xe = 0x2da,0x6
													; Debug Table 0x7.0xf = 0x2da,0xc01
02db 021d       |    |		Execute	Heap_Access,Is_Null
02dc 6837       |h7  |		Jump_Zero	0x314							; Debug Table 0x7.0x10 = 0x2dc,0x6
02dd e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x7.0x11 = 0x2dd,0x7
02de 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
02df 0227       | '  |		Execute	Access,All_Reference
02e0 01dd       |    |		Execute	Vector,First
02e1 00e3       |    |		Load_Encached	Natural_Cache
02e2 025b       | [  |		Execute	Discrete,Check_In_Type
02e3 e7fe       |    |		Load	0x3,-0x2
02e4 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
02e5 e602       |    |		Load	0x3,0x2
02e6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x12 = 0x2e6,0x1001
02e7 7002       |p   |		Jump_Nonzero	0x2ea
02e8 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x7.0x13 = 0x2e8,0x1002
02e9 7826       |x&  |		Jump	0x310
02ea 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x14 = 0x2ea,0x1003
02eb 0217       |    |		Execute	Heap_Access,All_Reference
02ec 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02ed 6804       |h   |		Jump_Zero	0x2f2
02ee 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x15 = 0x2ee,0x1004
02ef 0217       |    |		Execute	Heap_Access,All_Reference
02f0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
02f1 781e       |x   |		Jump	0x310
02f2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x16 = 0x2f2,0x1005
02f3 e608       |    |		Load	0x3,0x8								; Debug Table 0x7.0x17 = 0x2f3,0x1401
02f4 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0x7.0x18 = 0x2f4,0x1402
02f5 00d0       |    |		Action	Swap_Control							; Debug Table 0x7.0x19 = 0x2f5,0x1403
													; Debug Table 0x7.0x1a = 0x2f5,0x1404
02f6 00d1       |    |		Pop_Control	Pop_Count_1
02f7 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0x7.0x1b = 0x2f7,0x1005
02f8 00eb       |    |		Load_Encached	Diana_Cache
02f9 0098       |    |		Execute	Package,Field_Read_Dynamic
02fa 012c       | ,  |		Execute	Any,Size
02fb e003       |    |		Load	0x0,0x3
02fc 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
02fd 025b       | [  |		Execute	Discrete,Check_In_Type
02fe 0273       | s  |		Execute	Discrete,Plus
02ff 00d9       |    |		Load_Top	At_Offset_1
0300 e609       |    |		Load	0x3,0x9								; Debug Table 0x7.0x1c = 0x300,0x1801
0301 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x7.0x1d = 0x301,0x1802
0302 00d0       |    |		Action	Swap_Control							; Debug Table 0x7.0x1e = 0x302,0x1803
													; Debug Table 0x7.0x1f = 0x302,0x1804
0303 00d1       |    |		Pop_Control	Pop_Count_1
0304 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0x7.0x20 = 0x304,0x1404
0305 00eb       |    |		Load_Encached	Diana_Cache
0306 0098       |    |		Execute	Package,Field_Read_Dynamic
0307 49c9       |I   |		Short_Literal	0x1c9
0308 00eb       |    |		Load_Encached	Diana_Cache
0309 0098       |    |		Execute	Package,Field_Read_Dynamic
030a 49ca       |I   |		Short_Literal	0x1ca
030b 00eb       |    |		Load_Encached	Diana_Cache
030c 0095       |    |		Execute	Package,Field_Reference_Dynamic
030d e004       |    |		Load	0x0,0x4
030e 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
030f 7800       |x   |		Jump	0x310
0310 00d0       |    |		Action	Swap_Control
0311 00d1       |    |		Pop_Control	Pop_Count_1
0312 8402       |    |		Call	0x2,0x2								; Debug Table 0x7.0x21 = 0x312,0x7
0313 78b0       |x   |		Jump	0x3c4
0314 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x7.0x22 = 0x314,0x8
0315 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0316 0227       | '  |		Execute	Access,All_Reference
0317 01dd       |    |		Execute	Vector,First
0318 00e3       |    |		Load_Encached	Natural_Cache
0319 025b       | [  |		Execute	Discrete,Check_In_Type
031a e7fe       |    |		Load	0x3,-0x2
031b 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
031c e602       |    |		Load	0x3,0x2
031d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x23 = 0x31d,0x1c01
031e 7002       |p   |		Jump_Nonzero	0x321
031f 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x7.0x24 = 0x31f,0x1c02
0320 7826       |x&  |		Jump	0x347
0321 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x25 = 0x321,0x1c03
0322 0217       |    |		Execute	Heap_Access,All_Reference
0323 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0324 6804       |h   |		Jump_Zero	0x329
0325 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x26 = 0x325,0x1c04
0326 0217       |    |		Execute	Heap_Access,All_Reference
0327 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0328 781e       |x   |		Jump	0x347
0329 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x27 = 0x329,0x1c05
032a e608       |    |		Load	0x3,0x8								; Debug Table 0x7.0x28 = 0x32a,0x2001
032b 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0x7.0x29 = 0x32b,0x2002
032c 00d0       |    |		Action	Swap_Control							; Debug Table 0x7.0x2a = 0x32c,0x2003
													; Debug Table 0x7.0x2b = 0x32c,0x2004
032d 00d1       |    |		Pop_Control	Pop_Count_1
032e 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0x7.0x2c = 0x32e,0x1c05
032f 00eb       |    |		Load_Encached	Diana_Cache
0330 0098       |    |		Execute	Package,Field_Read_Dynamic
0331 012c       | ,  |		Execute	Any,Size
0332 e003       |    |		Load	0x0,0x3
0333 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0334 025b       | [  |		Execute	Discrete,Check_In_Type
0335 0273       | s  |		Execute	Discrete,Plus
0336 00d9       |    |		Load_Top	At_Offset_1
0337 e609       |    |		Load	0x3,0x9								; Debug Table 0x7.0x2d = 0x337,0x2401
0338 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x7.0x2e = 0x338,0x2402
0339 00d0       |    |		Action	Swap_Control							; Debug Table 0x7.0x2f = 0x339,0x2403
													; Debug Table 0x7.0x30 = 0x339,0x2404
033a 00d1       |    |		Pop_Control	Pop_Count_1
033b 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0x7.0x31 = 0x33b,0x2004
033c 00eb       |    |		Load_Encached	Diana_Cache
033d 0098       |    |		Execute	Package,Field_Read_Dynamic
033e 49c9       |I   |		Short_Literal	0x1c9
033f 00eb       |    |		Load_Encached	Diana_Cache
0340 0098       |    |		Execute	Package,Field_Read_Dynamic
0341 49ca       |I   |		Short_Literal	0x1ca
0342 00eb       |    |		Load_Encached	Diana_Cache
0343 0095       |    |		Execute	Package,Field_Reference_Dynamic
0344 e004       |    |		Load	0x0,0x4
0345 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0346 7800       |x   |		Jump	0x347
0347 00d0       |    |		Action	Swap_Control
0348 00d1       |    |		Pop_Control	Pop_Count_1
0349 8402       |    |		Call	0x2,0x2								; Debug Table 0x7.0x32 = 0x349,0x8
034a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x33 = 0x34a,0x9
													; Debug Table 0x7.0x34 = 0x34a,0xa
034b 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
034c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x35 = 0x34c,0xb
													; Debug Table 0x7.0x36 = 0x34c,0x2801
034d 7002       |p   |		Jump_Nonzero	0x350
034e 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x7.0x37 = 0x34e,0x2802
034f 7803       |x   |		Jump	0x353
0350 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x38 = 0x350,0x2803
0351 0217       |    |		Execute	Heap_Access,All_Reference
0352 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0353 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2					; Debug Table 0x7.0x39 = 0x353,0xb
0354 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x3a = 0x354,0xc
													; Debug Table 0x7.0x3b = 0x354,0x2c01
0355 021d       |    |		Execute	Heap_Access,Is_Null
0356 7037       |p7  |		Jump_Nonzero	0x38e							; Debug Table 0x7.0x3c = 0x356,0xc
0357 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x7.0x3d = 0x357,0xd
0358 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0359 0227       | '  |		Execute	Access,All_Reference
035a 01dd       |    |		Execute	Vector,First
035b 00e3       |    |		Load_Encached	Natural_Cache
035c 025b       | [  |		Execute	Discrete,Check_In_Type
035d e7fe       |    |		Load	0x3,-0x2
035e 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
035f e602       |    |		Load	0x3,0x2
0360 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x3e = 0x360,0x3001
0361 7002       |p   |		Jump_Nonzero	0x364
0362 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x7.0x3f = 0x362,0x3002
0363 7826       |x&  |		Jump	0x38a
0364 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x40 = 0x364,0x3003
0365 0217       |    |		Execute	Heap_Access,All_Reference
0366 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0367 6804       |h   |		Jump_Zero	0x36c
0368 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x41 = 0x368,0x3004
0369 0217       |    |		Execute	Heap_Access,All_Reference
036a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
036b 781e       |x   |		Jump	0x38a
036c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x42 = 0x36c,0x3005
036d e608       |    |		Load	0x3,0x8								; Debug Table 0x7.0x43 = 0x36d,0x3401
036e 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0x7.0x44 = 0x36e,0x3402
036f 00d0       |    |		Action	Swap_Control							; Debug Table 0x7.0x45 = 0x36f,0x3403
													; Debug Table 0x7.0x46 = 0x36f,0x3404
0370 00d1       |    |		Pop_Control	Pop_Count_1
0371 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0x7.0x47 = 0x371,0x3005
0372 00eb       |    |		Load_Encached	Diana_Cache
0373 0098       |    |		Execute	Package,Field_Read_Dynamic
0374 012c       | ,  |		Execute	Any,Size
0375 e003       |    |		Load	0x0,0x3
0376 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0377 025b       | [  |		Execute	Discrete,Check_In_Type
0378 0273       | s  |		Execute	Discrete,Plus
0379 00d9       |    |		Load_Top	At_Offset_1
037a e609       |    |		Load	0x3,0x9								; Debug Table 0x7.0x48 = 0x37a,0x3801
037b 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x7.0x49 = 0x37b,0x3802
037c 00d0       |    |		Action	Swap_Control							; Debug Table 0x7.0x4a = 0x37c,0x3803
													; Debug Table 0x7.0x4b = 0x37c,0x3804
037d 00d1       |    |		Pop_Control	Pop_Count_1
037e 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0x7.0x4c = 0x37e,0x3404
037f 00eb       |    |		Load_Encached	Diana_Cache
0380 0098       |    |		Execute	Package,Field_Read_Dynamic
0381 49c9       |I   |		Short_Literal	0x1c9
0382 00eb       |    |		Load_Encached	Diana_Cache
0383 0098       |    |		Execute	Package,Field_Read_Dynamic
0384 49ca       |I   |		Short_Literal	0x1ca
0385 00eb       |    |		Load_Encached	Diana_Cache
0386 0095       |    |		Execute	Package,Field_Reference_Dynamic
0387 e004       |    |		Load	0x0,0x4
0388 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0389 7800       |x   |		Jump	0x38a
038a 00d0       |    |		Action	Swap_Control
038b 00d1       |    |		Pop_Control	Pop_Count_1
038c 8402       |    |		Call	0x2,0x2								; Debug Table 0x7.0x4d = 0x38c,0xd
038d 7fbc       |    |		Jump	0x34a
038e e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x7.0x4e = 0x38e,0xe
038f 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0390 0227       | '  |		Execute	Access,All_Reference
0391 01dd       |    |		Execute	Vector,First
0392 00e3       |    |		Load_Encached	Natural_Cache
0393 025b       | [  |		Execute	Discrete,Check_In_Type
0394 e7fe       |    |		Load	0x3,-0x2
0395 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0396 e602       |    |		Load	0x3,0x2
0397 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x4f = 0x397,0x3c01
0398 7002       |p   |		Jump_Nonzero	0x39b
0399 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x7.0x50 = 0x399,0x3c02
039a 7826       |x&  |		Jump	0x3c1
039b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x51 = 0x39b,0x3c03
039c 0217       |    |		Execute	Heap_Access,All_Reference
039d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
039e 6804       |h   |		Jump_Zero	0x3a3
039f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x52 = 0x39f,0x3c04
03a0 0217       |    |		Execute	Heap_Access,All_Reference
03a1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03a2 781e       |x   |		Jump	0x3c1
03a3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x53 = 0x3a3,0x3c05
03a4 e608       |    |		Load	0x3,0x8								; Debug Table 0x7.0x54 = 0x3a4,0x4001
03a5 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0x7.0x55 = 0x3a5,0x4002
03a6 00d0       |    |		Action	Swap_Control							; Debug Table 0x7.0x56 = 0x3a6,0x4003
													; Debug Table 0x7.0x57 = 0x3a6,0x4004
03a7 00d1       |    |		Pop_Control	Pop_Count_1
03a8 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0x7.0x58 = 0x3a8,0x3c05
03a9 00eb       |    |		Load_Encached	Diana_Cache
03aa 0098       |    |		Execute	Package,Field_Read_Dynamic
03ab 012c       | ,  |		Execute	Any,Size
03ac e003       |    |		Load	0x0,0x3
03ad 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
03ae 025b       | [  |		Execute	Discrete,Check_In_Type
03af 0273       | s  |		Execute	Discrete,Plus
03b0 00d9       |    |		Load_Top	At_Offset_1
03b1 e609       |    |		Load	0x3,0x9								; Debug Table 0x7.0x59 = 0x3b1,0x4401
03b2 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x7.0x5a = 0x3b2,0x4402
03b3 00d0       |    |		Action	Swap_Control							; Debug Table 0x7.0x5b = 0x3b3,0x4403
													; Debug Table 0x7.0x5c = 0x3b3,0x4404
03b4 00d1       |    |		Pop_Control	Pop_Count_1
03b5 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0x7.0x5d = 0x3b5,0x4004
03b6 00eb       |    |		Load_Encached	Diana_Cache
03b7 0098       |    |		Execute	Package,Field_Read_Dynamic
03b8 49c9       |I   |		Short_Literal	0x1c9
03b9 00eb       |    |		Load_Encached	Diana_Cache
03ba 0098       |    |		Execute	Package,Field_Read_Dynamic
03bb 49ca       |I   |		Short_Literal	0x1ca
03bc 00eb       |    |		Load_Encached	Diana_Cache
03bd 0095       |    |		Execute	Package,Field_Reference_Dynamic
03be e004       |    |		Load	0x0,0x4
03bf 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
03c0 7800       |x   |		Jump	0x3c1
03c1 00d0       |    |		Action	Swap_Control
03c2 00d1       |    |		Pop_Control	Pop_Count_1
03c3 8402       |    |		Call	0x2,0x2								; Debug Table 0x7.0x5e = 0x3c3,0xe
03c4 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x7.0x5f = 0x3c4,0xf
03c5 7013       |p   |		Jump_Nonzero	0x3d9
03c6 e7ff       |    |		Load	0x3,-0x1
03c7 e407       |    |		Load	0x2,0x7								; Debug Table 0x7.0x60 = 0x3c7,0x4801
03c8 700a       |p   |		Jump_Nonzero	0x3d3
03c9 00d8       |    |		Load_Top	At_Offset_0
03ca 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x61 = 0x3ca,0x4c01
03cb e008       |    |		Load	0x0,0x8
03cc 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
03cd e008       |    |		Load	0x0,0x8
03ce 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
03cf 0f00       |    |		Execute_Immediate	Equal,0x0
03d0 00d0       |    |		Action	Swap_Control
03d1 00d1       |    |		Pop_Control	Pop_Count_1
03d2 7801       |x   |		Jump	0x3d4								; Debug Table 0x7.0x62 = 0x3d2,0x4801
03d3 4800       |H   |		Short_Literal	0x0
03d4 00d0       |    |		Action	Swap_Control
03d5 00d1       |    |		Pop_Control	Pop_Count_1
03d6 6802       |h   |		Jump_Zero	0x3d9							; Debug Table 0x7.0x63 = 0x3d6,0xf
03d7 66d4       |f   |		Indirect_Literal	Discrete,0x2ac,{0x00000000, 0x56caf501}		; Debug Table 0x7.0x64 = 0x3d7,0x10
03d8 0257       | W  |		Execute	Discrete,Raise
03d9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x65 = 0x3d9,0x11
03da e404       |    |		Load	0x2,0x4
03db 017d       | }  |		Execute	Record,Structure_Write
03dc 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03dd			TRAP_02b0:
03dd 66c6       |f   |		Indirect_Literal	Discrete,0x2a4,{0x00000000, 0x56caf503}
03de 010f       |    |		Execute	Exception,Equal
03df 6802       |h   |		Jump_Zero	0x3e2
03e0 66c7       |f   |		Indirect_Literal	Discrete,0x2a8,{0x00000000, 0x56cab501}		; Debug Table 0x7.0x66 = 0x3e0,0x12
03e1 0257       | W  |		Execute	Discrete,Raise
03e2 0100       |    |		Execute	Exception,Raise
03e3 0000 0000  |    |		.BLANK	0000[0x5]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03f5       |    |		.CONST	0x03f5								; Address of begin
03e9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ea 0002       |    |		.CONST	0x0002								; Number of locals
03eb			INIT_03e8:
03eb e002       |    |		Load	0x0,0x2								; Debug Table 0x8 = .DEBUG	0x03eb,0x088a,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x01be
													; Debug Table 0x8.0x0 = 0x3eb,0xffff
03ec 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
03ed 02ff       |    |		Declare_Variable	Variant_Record
03ee e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x8.0x1 = 0x3ee,0x401
03ef 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x8.0x2 = 0x3ef,0x402
03f0 e002       |    |		Load	0x0,0x2								; Debug Table 0x8.0x3 = 0x3f0,0x403
													; Debug Table 0x8.0x4 = 0x3f0,0x404
													; Debug Table 0x8.0x5 = 0x3f0,0xffff
03f1 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
03f2 01d5       |    |		Execute	Vector,Field_Reference
03f3 00d9       |    |		Load_Top	At_Offset_1
03f4 016d       | m  |		Execute	Variant_Record,Structure_Write
03f5			BODY_03e8:
03f5 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x8.0x6 = 0x3f5,0x1
03f6 7013       |p   |		Jump_Nonzero	0x40a
03f7 00db       |    |		Load_Top	At_Offset_3
03f8 e407       |    |		Load	0x2,0x7								; Debug Table 0x8.0x7 = 0x3f8,0x801
03f9 700a       |p   |		Jump_Nonzero	0x404
03fa 00d8       |    |		Load_Top	At_Offset_0
03fb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x8 = 0x3fb,0xc01
03fc e008       |    |		Load	0x0,0x8
03fd 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
03fe e008       |    |		Load	0x0,0x8
03ff 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0400 0f00       |    |		Execute_Immediate	Equal,0x0
0401 00d0       |    |		Action	Swap_Control
0402 00d1       |    |		Pop_Control	Pop_Count_1
0403 7801       |x   |		Jump	0x405								; Debug Table 0x8.0x9 = 0x403,0x801
0404 4800       |H   |		Short_Literal	0x0
0405 00d0       |    |		Action	Swap_Control
0406 00d1       |    |		Pop_Control	Pop_Count_1
0407 6802       |h   |		Jump_Zero	0x40a							; Debug Table 0x8.0xa = 0x407,0x1
0408 66a3       |f   |		Indirect_Literal	Discrete,0x2ac,{0x00000000, 0x56caf501}		; Debug Table 0x8.0xb = 0x408,0x2
0409 0257       | W  |		Execute	Discrete,Raise
040a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0xc = 0x40a,0x3
040b 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
040c 6804       |h   |		Jump_Zero	0x411
040d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0xd = 0x40d,0x4
040e e7ff       |    |		Load	0x3,-0x1
040f 8403       |    |		Call	0x2,0x3
0410 780a       |x   |		Jump	0x41b
0411 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0xe = 0x411,0x5
0412 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0413 0227       | '  |		Execute	Access,All_Reference
0414 01dd       |    |		Execute	Vector,First
0415 00e3       |    |		Load_Encached	Natural_Cache
0416 025b       | [  |		Execute	Discrete,Check_In_Type
0417 00d9       |    |		Load_Top	At_Offset_1
0418 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0419 e7ff       |    |		Load	0x3,-0x1
041a 8402       |    |		Call	0x2,0x2
041b e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x8.0xf = 0x41b,0x6
041c 7013       |p   |		Jump_Nonzero	0x430
041d 00db       |    |		Load_Top	At_Offset_3
041e e407       |    |		Load	0x2,0x7								; Debug Table 0x8.0x10 = 0x41e,0x1001
041f 700a       |p   |		Jump_Nonzero	0x42a
0420 00d8       |    |		Load_Top	At_Offset_0
0421 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x11 = 0x421,0x1401
0422 e008       |    |		Load	0x0,0x8
0423 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0424 e008       |    |		Load	0x0,0x8
0425 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0426 0f00       |    |		Execute_Immediate	Equal,0x0
0427 00d0       |    |		Action	Swap_Control
0428 00d1       |    |		Pop_Control	Pop_Count_1
0429 7801       |x   |		Jump	0x42b								; Debug Table 0x8.0x12 = 0x429,0x1001
042a 4800       |H   |		Short_Literal	0x0
042b 00d0       |    |		Action	Swap_Control
042c 00d1       |    |		Pop_Control	Pop_Count_1
042d 6802       |h   |		Jump_Zero	0x430							; Debug Table 0x8.0x13 = 0x42d,0x6
042e 667d       |f}  |		Indirect_Literal	Discrete,0x2ac,{0x00000000, 0x56caf501}		; Debug Table 0x8.0x14 = 0x42e,0x7
042f 0257       | W  |		Execute	Discrete,Raise
0430 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0431 0000 0000  |    |		.BLANK	0000[0x7]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 0447       | G  |		.CONST	0x0447								; Address of begin
0439 0004       |    |		.CONST	0x0004								; Address of exception handler
043a 0005       |    |		.CONST	0x0005								; Number of locals
043b			INIT_0438:
043b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9 = .DEBUG	0x043b,0x08b6,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x0279
													; Debug Table 0x9.0x0 = 0x43b,0xffff
043c 00db       |    |		Load_Top	At_Offset_3
043d 00eb       |    |		Load_Encached	Diana_Cache
043e 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
043f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0440 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9.0x1 = 0x440,0xfffe
0441 e7ff       |    |		Load	0x3,-0x1
0442 00eb       |    |		Load_Encached	Diana_Cache
0443 18d9       |    |		Execute	Package,Field_Execute,Field_Number 0xd9
0444 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0445 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x9.0x2 = 0x445,0xfffd
0446 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9.0x3 = 0x446,0xfffc
0447			BODY_0438:
0447 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x9.0x4 = 0x447,0x1
0448 8214       |    |		Call	0x1,0x14
0449 683c       |h<  |		Jump_Zero	0x486
044a e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x9.0x5 = 0x44a,0x2
044b 00eb       |    |		Load_Encached	Diana_Cache
044c 18d9       |    |		Execute	Package,Field_Execute,Field_Number 0xd9
044d 00eb       |    |		Load_Encached	Diana_Cache
044e 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
044f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x6 = 0x44f,0x401
0450 7002       |p   |		Jump_Nonzero	0x453
0451 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9.0x7 = 0x451,0x402
0452 7826       |x&  |		Jump	0x479
0453 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x8 = 0x453,0x403
0454 0217       |    |		Execute	Heap_Access,All_Reference
0455 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0456 6804       |h   |		Jump_Zero	0x45b
0457 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x9 = 0x457,0x404
0458 0217       |    |		Execute	Heap_Access,All_Reference
0459 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
045a 781e       |x   |		Jump	0x479
045b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0xa = 0x45b,0x405
045c e607       |    |		Load	0x3,0x7								; Debug Table 0x9.0xb = 0x45c,0x801
045d 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0x9.0xc = 0x45d,0x802
045e 00d0       |    |		Action	Swap_Control							; Debug Table 0x9.0xd = 0x45e,0x803
													; Debug Table 0x9.0xe = 0x45e,0x804
045f 00d1       |    |		Pop_Control	Pop_Count_1
0460 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0x9.0xf = 0x460,0x405
0461 00eb       |    |		Load_Encached	Diana_Cache
0462 0098       |    |		Execute	Package,Field_Read_Dynamic
0463 012c       | ,  |		Execute	Any,Size
0464 e003       |    |		Load	0x0,0x3
0465 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0466 025b       | [  |		Execute	Discrete,Check_In_Type
0467 0273       | s  |		Execute	Discrete,Plus
0468 00d9       |    |		Load_Top	At_Offset_1
0469 e608       |    |		Load	0x3,0x8								; Debug Table 0x9.0x10 = 0x469,0xc01
046a 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x9.0x11 = 0x46a,0xc02
046b 00d0       |    |		Action	Swap_Control							; Debug Table 0x9.0x12 = 0x46b,0xc03
													; Debug Table 0x9.0x13 = 0x46b,0xc04
046c 00d1       |    |		Pop_Control	Pop_Count_1
046d 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0x9.0x14 = 0x46d,0x804
046e 00eb       |    |		Load_Encached	Diana_Cache
046f 0098       |    |		Execute	Package,Field_Read_Dynamic
0470 49c9       |I   |		Short_Literal	0x1c9
0471 00eb       |    |		Load_Encached	Diana_Cache
0472 0098       |    |		Execute	Package,Field_Read_Dynamic
0473 49ca       |I   |		Short_Literal	0x1ca
0474 00eb       |    |		Load_Encached	Diana_Cache
0475 0095       |    |		Execute	Package,Field_Reference_Dynamic
0476 e004       |    |		Load	0x0,0x4
0477 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0478 7800       |x   |		Jump	0x479
0479 00d0       |    |		Action	Swap_Control
047a 00d1       |    |		Pop_Control	Pop_Count_1
047b 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x9.0x15 = 0x47b,0x2
047c 18c5       |    |		Execute	Package,Field_Execute,Field_Number 0xc5
047d 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
047e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x16 = 0x47e,0x3
047f 00eb       |    |		Load_Encached	Diana_Cache
0480 18d9       |    |		Execute	Package,Field_Execute,Field_Number 0xd9
0481 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0482 e405       |    |		Load	0x2,0x5								; Debug Table 0x9.0x17 = 0x482,0x4
0483 0a02       |    |		Execute_Immediate	Plus,0x2
0484 c405       |    |		Store	0x2,0x5
0485 7802       |x   |		Jump	0x488
0486 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9.0x18 = 0x486,0x5
0487 8408       |    |		Call	0x2,0x8
0488 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x9.0x19 = 0x488,0x6
0489 00eb       |    |		Load_Encached	Diana_Cache
048a 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
048b 6806       |h   |		Jump_Zero	0x492
048c e405       |    |		Load	0x2,0x5								; Debug Table 0x9.0x1a = 0x48c,0x7
048d 0a02       |    |		Execute_Immediate	Plus,0x2
048e c405       |    |		Store	0x2,0x5
048f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x1b = 0x48f,0x8
0490 8408       |    |		Call	0x2,0x8
0491 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0492 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x1c = 0x492,0x9
0493 00eb       |    |		Load_Encached	Diana_Cache
0494 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
0495 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0496 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x1d = 0x496,0xa
0497 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x1e = 0x497,0x1001
0498 7002       |p   |		Jump_Nonzero	0x49b
0499 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9.0x1f = 0x499,0x1002
049a 7826       |x&  |		Jump	0x4c1
049b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x20 = 0x49b,0x1003
049c 0217       |    |		Execute	Heap_Access,All_Reference
049d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
049e 6804       |h   |		Jump_Zero	0x4a3
049f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x21 = 0x49f,0x1004
04a0 0217       |    |		Execute	Heap_Access,All_Reference
04a1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
04a2 781e       |x   |		Jump	0x4c1
04a3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x22 = 0x4a3,0x1005
04a4 e607       |    |		Load	0x3,0x7								; Debug Table 0x9.0x23 = 0x4a4,0x1401
04a5 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0x9.0x24 = 0x4a5,0x1402
04a6 00d0       |    |		Action	Swap_Control							; Debug Table 0x9.0x25 = 0x4a6,0x1403
													; Debug Table 0x9.0x26 = 0x4a6,0x1404
04a7 00d1       |    |		Pop_Control	Pop_Count_1
04a8 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0x9.0x27 = 0x4a8,0x1005
04a9 00eb       |    |		Load_Encached	Diana_Cache
04aa 0098       |    |		Execute	Package,Field_Read_Dynamic
04ab 012c       | ,  |		Execute	Any,Size
04ac e003       |    |		Load	0x0,0x3
04ad 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
04ae 025b       | [  |		Execute	Discrete,Check_In_Type
04af 0273       | s  |		Execute	Discrete,Plus
04b0 00d9       |    |		Load_Top	At_Offset_1
04b1 e608       |    |		Load	0x3,0x8								; Debug Table 0x9.0x28 = 0x4b1,0x1801
04b2 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x9.0x29 = 0x4b2,0x1802
04b3 00d0       |    |		Action	Swap_Control							; Debug Table 0x9.0x2a = 0x4b3,0x1803
													; Debug Table 0x9.0x2b = 0x4b3,0x1804
04b4 00d1       |    |		Pop_Control	Pop_Count_1
04b5 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0x9.0x2c = 0x4b5,0x1404
04b6 00eb       |    |		Load_Encached	Diana_Cache
04b7 0098       |    |		Execute	Package,Field_Read_Dynamic
04b8 49c9       |I   |		Short_Literal	0x1c9
04b9 00eb       |    |		Load_Encached	Diana_Cache
04ba 0098       |    |		Execute	Package,Field_Read_Dynamic
04bb 49ca       |I   |		Short_Literal	0x1ca
04bc 00eb       |    |		Load_Encached	Diana_Cache
04bd 0095       |    |		Execute	Package,Field_Reference_Dynamic
04be e004       |    |		Load	0x0,0x4
04bf 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
04c0 7800       |x   |		Jump	0x4c1
04c1 00d0       |    |		Action	Swap_Control
04c2 00d1       |    |		Pop_Control	Pop_Count_1
04c3 8408       |    |		Call	0x2,0x8								; Debug Table 0x9.0x2d = 0x4c3,0xa
04c4 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x2e = 0x4c4,0xb
04c5 4975       |Iu  |		Short_Literal	0x175
04c6 00eb       |    |		Load_Encached	Diana_Cache
04c7 0098       |    |		Execute	Package,Field_Read_Dynamic
04c8 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
04c9 6804       |h   |		Jump_Zero	0x4ce
04ca e405       |    |		Load	0x2,0x5								; Debug Table 0x9.0x2f = 0x4ca,0xc
04cb 0a01       |    |		Execute_Immediate	Plus,0x1
04cc c405       |    |		Store	0x2,0x5
04cd 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04ce e405       |    |		Load	0x2,0x5								; Debug Table 0x9.0x30 = 0x4ce,0xd
04cf 0a02       |    |		Execute_Immediate	Plus,0x2
04d0 c405       |    |		Store	0x2,0x5
04d1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x31 = 0x4d1,0xe
													; Debug Table 0x9.0x32 = 0x4d1,0x1c01
04d2 7002       |p   |		Jump_Nonzero	0x4d5
04d3 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x9.0x33 = 0x4d3,0x1c02
04d4 7803       |x   |		Jump	0x4d8
04d5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x34 = 0x4d5,0x1c03
04d6 0217       |    |		Execute	Heap_Access,All_Reference
04d7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
04d8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x35 = 0x4d8,0xe
													; Debug Table 0x9.0x36 = 0x4d8,0x2001
04d9 7002       |p   |		Jump_Nonzero	0x4dc
04da 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9.0x37 = 0x4da,0x2002
04db 7826       |x&  |		Jump	0x502
04dc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x38 = 0x4dc,0x2003
04dd 0217       |    |		Execute	Heap_Access,All_Reference
04de 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04df 6804       |h   |		Jump_Zero	0x4e4
04e0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x39 = 0x4e0,0x2004
04e1 0217       |    |		Execute	Heap_Access,All_Reference
04e2 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
04e3 781e       |x   |		Jump	0x502
04e4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x3a = 0x4e4,0x2005
04e5 e607       |    |		Load	0x3,0x7								; Debug Table 0x9.0x3b = 0x4e5,0x2401
04e6 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0x9.0x3c = 0x4e6,0x2402
04e7 00d0       |    |		Action	Swap_Control							; Debug Table 0x9.0x3d = 0x4e7,0x2403
													; Debug Table 0x9.0x3e = 0x4e7,0x2404
04e8 00d1       |    |		Pop_Control	Pop_Count_1
04e9 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0x9.0x3f = 0x4e9,0x2005
04ea 00eb       |    |		Load_Encached	Diana_Cache
04eb 0098       |    |		Execute	Package,Field_Read_Dynamic
04ec 012c       | ,  |		Execute	Any,Size
04ed e003       |    |		Load	0x0,0x3
04ee 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
04ef 025b       | [  |		Execute	Discrete,Check_In_Type
04f0 0273       | s  |		Execute	Discrete,Plus
04f1 00d9       |    |		Load_Top	At_Offset_1
04f2 e608       |    |		Load	0x3,0x8								; Debug Table 0x9.0x40 = 0x4f2,0x2801
04f3 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x9.0x41 = 0x4f3,0x2802
04f4 00d0       |    |		Action	Swap_Control							; Debug Table 0x9.0x42 = 0x4f4,0x2803
													; Debug Table 0x9.0x43 = 0x4f4,0x2804
04f5 00d1       |    |		Pop_Control	Pop_Count_1
04f6 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0x9.0x44 = 0x4f6,0x2404
04f7 00eb       |    |		Load_Encached	Diana_Cache
04f8 0098       |    |		Execute	Package,Field_Read_Dynamic
04f9 49c9       |I   |		Short_Literal	0x1c9
04fa 00eb       |    |		Load_Encached	Diana_Cache
04fb 0098       |    |		Execute	Package,Field_Read_Dynamic
04fc 49ca       |I   |		Short_Literal	0x1ca
04fd 00eb       |    |		Load_Encached	Diana_Cache
04fe 0095       |    |		Execute	Package,Field_Reference_Dynamic
04ff e004       |    |		Load	0x0,0x4
0500 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0501 7800       |x   |		Jump	0x502
0502 00d0       |    |		Action	Swap_Control
0503 00d1       |    |		Pop_Control	Pop_Count_1
0504 8408       |    |		Call	0x2,0x8								; Debug Table 0x9.0x45 = 0x504,0xe
0505 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0506 0000 0000  |    |		.XXX[0x2]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050b       |    |		.CONST	0x050b								; Address of begin
0509 0004       |    |		.CONST	0x0004								; Address of exception handler
050a 0001       |    |		.CONST	0x0001								; Number of locals
050b			BODY_0508:
050b			INIT_0508:
050b e405       |    |		Load	0x2,0x5								; Debug Table 0xa = .DEBUG	0x050b,0x0944,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x0376
													; Debug Table 0xa.0x0 = 0x50b,0x1
050c 0a07       |    |		Execute_Immediate	Plus,0x7
050d c405       |    |		Store	0x2,0x5
050e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x1 = 0x50e,0x2
050f 00eb       |    |		Load_Encached	Diana_Cache
0510 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
0511 8408       |    |		Call	0x2,0x8
0512 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x2 = 0x512,0x3
0513 00eb       |    |		Load_Encached	Diana_Cache
0514 18d9       |    |		Execute	Package,Field_Execute,Field_Number 0xd9
0515 8408       |    |		Call	0x2,0x8
0516 e405       |    |		Load	0x2,0x5								; Debug Table 0xa.0x3 = 0x516,0x4
0517 0a01       |    |		Execute_Immediate	Plus,0x1
0518 c405       |    |		Store	0x2,0x5
0519 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
051a 0000 0000  |    |		.BLANK	0000[0x6]
0520 ; --------------------------------------------------------------------------------------
0520 ; SUBPROGRAM
0520 ; --------------------------------------------------------------------------------------
0520 0523       | #  |		.CONST	0x0523								; Address of begin
0521 0004       |    |		.CONST	0x0004								; Address of exception handler
0522 0001       |    |		.CONST	0x0001								; Number of locals
0523			BODY_0520:
0523			INIT_0520:
0523 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x0523,0x094e,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x03cb
													; Debug Table 0xb.0x0 = 0x523,0x1
0524 e005       |    |		Load	0x0,0x5
0525 188c       |    |		Execute	Package,Field_Execute,Field_Number 0x8c
0526 680b       |h   |		Jump_Zero	0x532
0527 e405       |    |		Load	0x2,0x5								; Debug Table 0xb.0x1 = 0x527,0x2
0528 0a04       |    |		Execute_Immediate	Plus,0x4
0529 c405       |    |		Store	0x2,0x5
052a e406       |    |		Load	0x2,0x6								; Debug Table 0xb.0x2 = 0x52a,0x3
052b 0a04       |    |		Execute_Immediate	Plus,0x4
052c c406       |    |		Store	0x2,0x6
052d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x3 = 0x52d,0x4
052e 00eb       |    |		Load_Encached	Diana_Cache
052f 1885       |    |		Execute	Package,Field_Execute,Field_Number 0x85
0530 8408       |    |		Call	0x2,0x8
0531 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0532 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x4 = 0x532,0x5
0533 8408       |    |		Call	0x2,0x8
0534 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0535 0000 0000  |    |		.XXX[0x3]
0537 0000       |    |
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 0540       | @  |		.CONST	0x0540								; Address of begin
0539 0004       |    |		.CONST	0x0004								; Address of exception handler
053a 0002       |    |		.CONST	0x0002								; Number of locals
053b			INIT_0538:
053b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x053b,0x095a,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x0403
													; Debug Table 0xc.0x0 = 0x53b,0xffff
053c 00eb       |    |		Load_Encached	Diana_Cache
053d 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
053e 00eb       |    |		Load_Encached	Diana_Cache
053f 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0540			BODY_0538:
0540 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x1 = 0x540,0x1
0541 01dc       |    |		Execute	Vector,Last
0542 00d9       |    |		Load_Top	At_Offset_1
0543 01dd       |    |		Execute	Vector,First
0544 0263       | c  |		Execute	Discrete,Above_Bound
0545 7009       |p   |		Jump_Nonzero	0x54f
0546 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x2 = 0x546,0x2
0547 00db       |    |		Load_Top	At_Offset_3
0548 01d7       |    |		Execute	Vector,Field_Read
0549 0f22       | "  |		Execute_Immediate	Equal,0x22
054a 6803       |h   |		Jump_Zero	0x54e
054b e405       |    |		Load	0x2,0x5								; Debug Table 0xc.0x3 = 0x54b,0x3
054c 0a01       |    |		Execute_Immediate	Plus,0x1
054d c405       |    |		Store	0x2,0x5
054e 3ff7       |?   |		Loop_Increasing	0x546
054f e405       |    |		Load	0x2,0x5								; Debug Table 0xc.0x4 = 0x54f,0x4
0550 00d9       |    |		Load_Top	At_Offset_1
0551 01db       |    |		Execute	Vector,Length
0552 0273       | s  |		Execute	Discrete,Plus
0553 0248       | H  |		Execute	Discrete,Check_In_Integer
0554 0a02       |    |		Execute_Immediate	Plus,0x2
0555 c405       |    |		Store	0x2,0x5
0556 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0557 0000       |    |		.XXX[0x1]
0558 ; --------------------------------------------------------------------------------------
0558 ; SUBPROGRAM
0558 ; --------------------------------------------------------------------------------------
0558 0561       | a  |		.CONST	0x0561								; Address of begin
0559 0004       |    |		.CONST	0x0004								; Address of exception handler
055a 0003       |    |		.CONST	0x0003								; Number of locals
055b			INIT_0558:
055b 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xd = .DEBUG	0x055b,0x0966,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x044b
													; Debug Table 0xd.0x0 = 0x55b,0xffff
055c 00db       |    |		Load_Top	At_Offset_3
055d 00eb       |    |		Load_Encached	Diana_Cache
055e 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
055f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0560 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd.0x1 = 0x560,0xfffe
0561			BODY_0558:
0561 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x2 = 0x561,0x1
													; Debug Table 0xd.0x3 = 0x561,0x2
													; Debug Table 0xd.0x4 = 0x561,0x401
0562 021d       |    |		Execute	Heap_Access,Is_Null
0563 706e       |pn  |		Jump_Nonzero	0x5d2							; Debug Table 0xd.0x5 = 0x563,0x2
0564 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x6 = 0x564,0x3
0565 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x7 = 0x565,0x801
0566 7002       |p   |		Jump_Nonzero	0x569
0567 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd.0x8 = 0x567,0x802
0568 7826       |x&  |		Jump	0x58f
0569 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x9 = 0x569,0x803
056a 0217       |    |		Execute	Heap_Access,All_Reference
056b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
056c 6804       |h   |		Jump_Zero	0x571
056d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0xa = 0x56d,0x804
056e 0217       |    |		Execute	Heap_Access,All_Reference
056f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0570 781e       |x   |		Jump	0x58f
0571 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0xb = 0x571,0x805
0572 e605       |    |		Load	0x3,0x5								; Debug Table 0xd.0xc = 0x572,0xc01
0573 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0xd.0xd = 0x573,0xc02
0574 00d0       |    |		Action	Swap_Control							; Debug Table 0xd.0xe = 0x574,0xc03
													; Debug Table 0xd.0xf = 0x574,0xc04
0575 00d1       |    |		Pop_Control	Pop_Count_1
0576 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0xd.0x10 = 0x576,0x805
0577 00eb       |    |		Load_Encached	Diana_Cache
0578 0098       |    |		Execute	Package,Field_Read_Dynamic
0579 012c       | ,  |		Execute	Any,Size
057a e003       |    |		Load	0x0,0x3
057b 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
057c 025b       | [  |		Execute	Discrete,Check_In_Type
057d 0273       | s  |		Execute	Discrete,Plus
057e 00d9       |    |		Load_Top	At_Offset_1
057f e606       |    |		Load	0x3,0x6								; Debug Table 0xd.0x11 = 0x57f,0x1001
0580 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0xd.0x12 = 0x580,0x1002
0581 00d0       |    |		Action	Swap_Control							; Debug Table 0xd.0x13 = 0x581,0x1003
													; Debug Table 0xd.0x14 = 0x581,0x1004
0582 00d1       |    |		Pop_Control	Pop_Count_1
0583 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0xd.0x15 = 0x583,0xc04
0584 00eb       |    |		Load_Encached	Diana_Cache
0585 0098       |    |		Execute	Package,Field_Read_Dynamic
0586 49c9       |I   |		Short_Literal	0x1c9
0587 00eb       |    |		Load_Encached	Diana_Cache
0588 0098       |    |		Execute	Package,Field_Read_Dynamic
0589 49ca       |I   |		Short_Literal	0x1ca
058a 00eb       |    |		Load_Encached	Diana_Cache
058b 0095       |    |		Execute	Package,Field_Reference_Dynamic
058c e004       |    |		Load	0x0,0x4
058d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
058e 7800       |x   |		Jump	0x58f
058f 00d0       |    |		Action	Swap_Control
0590 00d1       |    |		Pop_Control	Pop_Count_1
0591 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1					; Debug Table 0xd.0x16 = 0x591,0x3
0592 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0xd.0x17 = 0x592,0x4
0593 7013       |p   |		Jump_Nonzero	0x5a7
0594 00d8       |    |		Load_Top	At_Offset_0
0595 e407       |    |		Load	0x2,0x7								; Debug Table 0xd.0x18 = 0x595,0x1401
0596 700a       |p   |		Jump_Nonzero	0x5a1
0597 00d8       |    |		Load_Top	At_Offset_0
0598 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x19 = 0x598,0x1801
0599 e008       |    |		Load	0x0,0x8
059a 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
059b e008       |    |		Load	0x0,0x8
059c 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
059d 0f00       |    |		Execute_Immediate	Equal,0x0
059e 00d0       |    |		Action	Swap_Control
059f 00d1       |    |		Pop_Control	Pop_Count_1
05a0 7801       |x   |		Jump	0x5a2								; Debug Table 0xd.0x1a = 0x5a0,0x1401
05a1 4800       |H   |		Short_Literal	0x0
05a2 00d0       |    |		Action	Swap_Control
05a3 00d1       |    |		Pop_Control	Pop_Count_1
05a4 6802       |h   |		Jump_Zero	0x5a7							; Debug Table 0xd.0x1b = 0x5a4,0x4
05a5 602e       |`.  |		Indirect_Literal	Discrete,0x5d4,{0x00000000, 0x56caf501}		; Debug Table 0xd.0x1c = 0x5a5,0x5
05a6 0257       | W  |		Execute	Discrete,Raise
05a7 e405       |    |		Load	0x2,0x5								; Debug Table 0xd.0x1d = 0x5a7,0x6
05a8 0a04       |    |		Execute_Immediate	Plus,0x4
05a9 c405       |    |		Store	0x2,0x5
05aa 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x1e = 0x5aa,0x7
05ab e405       |    |		Load	0x2,0x5								; Debug Table 0xd.0x1f = 0x5ab,0x1c01
05ac 00d9       |    |		Load_Top	At_Offset_1
05ad 00eb       |    |		Load_Encached	Diana_Cache
05ae 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
05af 00eb       |    |		Load_Encached	Diana_Cache
05b0 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
05b1 0273       | s  |		Execute	Discrete,Plus
05b2 c405       |    |		Store	0x2,0x5
05b3 00d1       |    |		Pop_Control	Pop_Count_1
05b4 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0xd.0x20 = 0x5b4,0x8
05b5 7013       |p   |		Jump_Nonzero	0x5c9
05b6 00d8       |    |		Load_Top	At_Offset_0
05b7 e407       |    |		Load	0x2,0x7								; Debug Table 0xd.0x21 = 0x5b7,0x2001
05b8 700a       |p   |		Jump_Nonzero	0x5c3
05b9 00d8       |    |		Load_Top	At_Offset_0
05ba 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x22 = 0x5ba,0x2401
05bb e008       |    |		Load	0x0,0x8
05bc 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
05bd e008       |    |		Load	0x0,0x8
05be 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
05bf 0f00       |    |		Execute_Immediate	Equal,0x0
05c0 00d0       |    |		Action	Swap_Control
05c1 00d1       |    |		Pop_Control	Pop_Count_1
05c2 7801       |x   |		Jump	0x5c4								; Debug Table 0xd.0x23 = 0x5c2,0x2001
05c3 4800       |H   |		Short_Literal	0x0
05c4 00d0       |    |		Action	Swap_Control
05c5 00d1       |    |		Pop_Control	Pop_Count_1
05c6 6802       |h   |		Jump_Zero	0x5c9							; Debug Table 0xd.0x24 = 0x5c6,0x8
05c7 600c       |`   |		Indirect_Literal	Discrete,0x5d4,{0x00000000, 0x56caf501}		; Debug Table 0xd.0x25 = 0x5c7,0x9
05c8 0257       | W  |		Execute	Discrete,Raise
05c9 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x26 = 0x5c9,0xa
													; Debug Table 0xd.0x27 = 0x5c9,0x2801
05ca 7002       |p   |		Jump_Nonzero	0x5cd
05cb 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xd.0x28 = 0x5cb,0x2802
05cc 7803       |x   |		Jump	0x5d0
05cd 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x29 = 0x5cd,0x2803
05ce 0217       |    |		Execute	Heap_Access,All_Reference
05cf 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05d0 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2					; Debug Table 0xd.0x2a = 0x5d0,0xa
05d1 7f8f       |    |		Jump	BODY_0558
05d2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05d3 0000       |    |		.XXX[0x1]
05d4 0000 0000  |    |		.LITERAL	{0x00000000, 0x56caf501}
05d8 ; --------------------------------------------------------------------------------------
05d8 ; Debug Table
05d8 ; --------------------------------------------------------------------------------------
05d8 0003 000e  |    |		.CONST	0x0003,0x000e
05da 000b 064a  |   J|		.DEBUG	0x000b,0x064a,0x8000,0x0000,0x0056,0xcab5,0x0000,0x0008
05e2 0010 0652  |   R|		.DEBUG	0x0010,0x0652,0x8000,0x0000,0x0056,0xcaf5,0x0000,0x0009
05ea 002b 067a  | + z|		.DEBUG	0x002b,0x067a,0x0002,0x0000,0x0056,0xcab5,0x0000,0x000c
05f2 0043 0686  | C  |		.DEBUG	0x0043,0x0686,0x0001,0x0000,0x0056,0xcab5,0x0000,0x0032
05fa 0063 0692  | c  |		.DEBUG	0x0063,0x0692,0x0002,0x0000,0x0056,0xcaf5,0x0000,0x00b1
0602 00b3 06c0  |    |		.DEBUG	0x00b3,0x06c0,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x010a
060a 00f3 070c  |    |		.DEBUG	0x00f3,0x070c,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x0135
0612 02b3 07ba  |    |		.DEBUG	0x02b3,0x07ba,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x0149
061a 03eb 088a  |    |		.DEBUG	0x03eb,0x088a,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x01be
0622 043b 08b6  | ;  |		.DEBUG	0x043b,0x08b6,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x0279
062a 050b 0944  |   D|		.DEBUG	0x050b,0x0944,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x0376
0632 0523 094e  | # N|		.DEBUG	0x0523,0x094e,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x03cb
063a 053b 095a  | ; Z|		.DEBUG	0x053b,0x095a,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x0403
0642 055b 0966  | [ f|		.DEBUG	0x055b,0x0966,0x0001,0x0000,0x0056,0xcaf5,0x0000,0x044b
064a ; --------------------------------------------------------------------------------------
064a ; Debug3 Subtable 0x0
064a ; --------------------------------------------------------------------------------------
064a 0003 0000  |    |		.DBG3TAB	0x0003,0x0000
064c 000b ffff  |    |		.CONST	0x000b,0xffff
064e 000b fffe  |    |		.CONST	0x000b,0xfffe
0650 000d fffd  |    |		.CONST	0x000d,0xfffd
0652 ; --------------------------------------------------------------------------------------
0652 ; Debug3 Subtable 0x1
0652 ; --------------------------------------------------------------------------------------
0652 0013 0000  |    |		.DBG3TAB	0x0013,0x0000
0654 0010 ffff  |    |		.CONST	0x0010,0xffff
0656 0010 fffe  |    |		.CONST	0x0010,0xfffe
0658 0010 fffd  |    |		.CONST	0x0010,0xfffd
065a 0010 fffc  |    |		.CONST	0x0010,0xfffc
065c 0010 fffb  |    |		.CONST	0x0010,0xfffb
065e 0012 fffa  |    |		.CONST	0x0012,0xfffa
0660 0014 fff9  |    |		.CONST	0x0014,0xfff9
0662 0016 fff8  |    |		.CONST	0x0016,0xfff8
0664 0018 fff7  |    |		.CONST	0x0018,0xfff7
0666 001a fff6  |    |		.CONST	0x001a,0xfff6
0668 001a fff5  |    |		.CONST	0x001a,0xfff5
066a 001a fff4  |    |		.CONST	0x001a,0xfff4
066c 001a fff3  |    |		.CONST	0x001a,0xfff3
066e 001a fff2  |    |		.CONST	0x001a,0xfff2
0670 001c fff1  |    |		.CONST	0x001c,0xfff1
0672 001c fff0  |    |		.CONST	0x001c,0xfff0
0674 001c ffef  |    |		.CONST	0x001c,0xffef
0676 001e ffee  |    |		.CONST	0x001e,0xffee
0678 0020 ffed  |    |		.CONST	0x0020,0xffed
067a ; --------------------------------------------------------------------------------------
067a ; Debug3 Subtable 0x2
067a ; --------------------------------------------------------------------------------------
067a 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
067c 002b ffff  | +  |		.CONST	0x002b,0xffff
067e 002c 0001  | ,  |		.CONST	0x002c,0x0001
0680 0036 0002  | 6  |		.CONST	0x0036,0x0002
0682 003b 0003  | ;  |		.CONST	0x003b,0x0003
0684 003e 0004  | >  |		.CONST	0x003e,0x0004
0686 ; --------------------------------------------------------------------------------------
0686 ; Debug3 Subtable 0x3
0686 ; --------------------------------------------------------------------------------------
0686 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0688 0043 ffff  | C  |		.CONST	0x0043,0xffff
068a 0044 0001  | D  |		.CONST	0x0044,0x0001
068c 0052 0002  | R  |		.CONST	0x0052,0x0002
068e 0056 0003  | V  |		.CONST	0x0056,0x0003
0690 005a 0004  | Z  |		.CONST	0x005a,0x0004
0692 ; --------------------------------------------------------------------------------------
0692 ; Debug3 Subtable 0x4
0692 ; --------------------------------------------------------------------------------------
0692 0001 0015  |    |		.DBG3TAB	0x0001,0x0015
0694 0063 ffff  | c  |		.CONST	0x0063,0xffff
0696 0066 0001  | f  |		.CONST	0x0066,0x0001
0698 006b 0401  | k  |		.CONST	0x006b,0x0401
069a 006d 0402  | m  |		.CONST	0x006d,0x0402
069c 006f 0403  | o  |		.CONST	0x006f,0x0403
069e 0073 0404  | s  |		.CONST	0x0073,0x0404
06a0 0077 0405  | w  |		.CONST	0x0077,0x0405
06a2 0078 0801  | x  |		.CONST	0x0078,0x0801
06a4 0079 0802  | y  |		.CONST	0x0079,0x0802
06a6 007a 0803  | z  |		.CONST	0x007a,0x0803
06a8 007a 0804  | z  |		.CONST	0x007a,0x0804
06aa 007c 0405  | |  |		.CONST	0x007c,0x0405
06ac 0085 0c01  |    |		.CONST	0x0085,0x0c01
06ae 0086 0c02  |    |		.CONST	0x0086,0x0c02
06b0 0087 0c03  |    |		.CONST	0x0087,0x0c03
06b2 0087 0c04  |    |		.CONST	0x0087,0x0c04
06b4 0089 0804  |    |		.CONST	0x0089,0x0804
06b6 0097 0001  |    |		.CONST	0x0097,0x0001
06b8 009a 0002  |    |		.CONST	0x009a,0x0002
06ba 009e 0003  |    |		.CONST	0x009e,0x0003
06bc 00a4 0004  |    |		.CONST	0x00a4,0x0004
06be 00a7 0005  |    |		.CONST	0x00a7,0x0005
06c0 ; --------------------------------------------------------------------------------------
06c0 ; Debug3 Subtable 0x5
06c0 ; --------------------------------------------------------------------------------------
06c0 0020 0005  |    |		.DBG3TAB	0x0020,0x0005
06c2 00b3 ffff  |    |		.CONST	0x00b3,0xffff
06c4 00b5 fffe  |    |		.CONST	0x00b5,0xfffe
06c6 00b7 fffd  |    |		.CONST	0x00b7,0xfffd
06c8 00bc fffc  |    |		.CONST	0x00bc,0xfffc
06ca 00c1 fffb  |    |		.CONST	0x00c1,0xfffb
06cc 00c3 fffa  |    |		.CONST	0x00c3,0xfffa
06ce 00c9 fff9  |    |		.CONST	0x00c9,0xfff9
06d0 00c9 fff8  |    |		.CONST	0x00c9,0xfff8
06d2 00c9 fff7  |    |		.CONST	0x00c9,0xfff7
06d4 00c9 fff6  |    |		.CONST	0x00c9,0xfff6
06d6 00c9 fff5  |    |		.CONST	0x00c9,0xfff5
06d8 00cb fff4  |    |		.CONST	0x00cb,0xfff4
06da 00cb fff3  |    |		.CONST	0x00cb,0xfff3
06dc 00cb fff2  |    |		.CONST	0x00cb,0xfff2
06de 00cb fff1  |    |		.CONST	0x00cb,0xfff1
06e0 00cb fff0  |    |		.CONST	0x00cb,0xfff0
06e2 00cd ffef  |    |		.CONST	0x00cd,0xffef
06e4 00cd ffee  |    |		.CONST	0x00cd,0xffee
06e6 00cd ffed  |    |		.CONST	0x00cd,0xffed
06e8 00cd ffec  |    |		.CONST	0x00cd,0xffec
06ea 00cd ffeb  |    |		.CONST	0x00cd,0xffeb
06ec 00cf ffea  |    |		.CONST	0x00cf,0xffea
06ee 00cf ffe9  |    |		.CONST	0x00cf,0xffe9
06f0 00d1 ffe8  |    |		.CONST	0x00d1,0xffe8
06f2 00d1 ffe7  |    |		.CONST	0x00d1,0xffe7
06f4 00d3 ffe6  |    |		.CONST	0x00d3,0xffe6
06f6 00d5 ffe5  |    |		.CONST	0x00d5,0xffe5
06f8 00d5 ffe4  |    |		.CONST	0x00d5,0xffe4
06fa 00d5 ffe3  |    |		.CONST	0x00d5,0xffe3
06fc 00d5 ffe2  |    |		.CONST	0x00d5,0xffe2
06fe 00d5 ffe1  |    |		.CONST	0x00d5,0xffe1
0700 00d9 ffe0  |    |		.CONST	0x00d9,0xffe0
0702 00dd 0001  |    |		.CONST	0x00dd,0x0001
0704 00e1 0002  |    |		.CONST	0x00e1,0x0002
0706 00e3 0003  |    |		.CONST	0x00e3,0x0003
0708 00e5 0004  |    |		.CONST	0x00e5,0x0004
070a 00eb 0005  |    |		.CONST	0x00eb,0x0005
070c ; --------------------------------------------------------------------------------------
070c ; Debug3 Subtable 0x6
070c ; --------------------------------------------------------------------------------------
070c 0007 004f  |   O|		.DBG3TAB	0x0007,0x004f
070e 00f3 ffff  |    |		.CONST	0x00f3,0xffff
0710 00f5 0001  |    |		.CONST	0x00f5,0x0001
0712 00fa 0002  |    |		.CONST	0x00fa,0x0002
0714 00fa fbff  |    |		.CONST	0x00fa,0xfbff
0716 00fd 0401  |    |		.CONST	0x00fd,0x0401
0718 010b 0402  |    |		.CONST	0x010b,0x0402
071a 010f 0404  |    |		.CONST	0x010f,0x0404
071c 0117 0405  |    |		.CONST	0x0117,0x0405
071e 0119 0406  |    |		.CONST	0x0119,0x0406
0720 011b 0407  |    |		.CONST	0x011b,0x0407
0722 0123 0408  | #  |		.CONST	0x0123,0x0408
0724 012a 0409  | *  |		.CONST	0x012a,0x0409
0726 012e 040a  | .  |		.CONST	0x012e,0x040a
0728 0130 040b  | 0  |		.CONST	0x0130,0x040b
072a 0138 040c  | 8  |		.CONST	0x0138,0x040c
072c 013f 040d  | ?  |		.CONST	0x013f,0x040d
072e 0145 040e  | E  |		.CONST	0x0145,0x040e
0730 014c 040f  | L  |		.CONST	0x014c,0x040f
0732 0152 0410  | R  |		.CONST	0x0152,0x0410
0734 0152 f7ff  | R  |		.CONST	0x0152,0xf7ff
0736 0155 f7fe  | U  |		.CONST	0x0155,0xf7fe
0738 0159 f7fd  | Y  |		.CONST	0x0159,0xf7fd
073a 015d 0c01  | ]  |		.CONST	0x015d,0x0c01
073c 015e 0c02  | ^  |		.CONST	0x015e,0x0c02
073e 015f 0c03  | _  |		.CONST	0x015f,0x0c03
0740 015f 0c04  | _  |		.CONST	0x015f,0x0c04
0742 0161 f7fd  | a  |		.CONST	0x0161,0xf7fd
0744 0164 0801  | d  |		.CONST	0x0164,0x0801
0746 0164 0802  | d  |		.CONST	0x0164,0x0802
0748 0169 0803  | i  |		.CONST	0x0169,0x0803
074a 0173 0804  | s  |		.CONST	0x0173,0x0804
074c 0174 0805  | t  |		.CONST	0x0174,0x0805
074e 017b 0806  | {  |		.CONST	0x017b,0x0806
0750 0189 0807  |    |		.CONST	0x0189,0x0807
0752 018a 0808  |    |		.CONST	0x018a,0x0808
0754 0190 0411  |    |		.CONST	0x0190,0x0411
0756 0194 1001  |    |		.CONST	0x0194,0x1001
0758 0198 0411  |    |		.CONST	0x0198,0x0411
075a 01a5 0412  |    |		.CONST	0x01a5,0x0412
075c 01b0 0413  |    |		.CONST	0x01b0,0x0413
075e 01bf 0414  |    |		.CONST	0x01bf,0x0414
0760 01c3 1401  |    |		.CONST	0x01c3,0x1401
0762 01c7 1402  |    |		.CONST	0x01c7,0x1402
0764 01cb 1403  |    |		.CONST	0x01cb,0x1403
0766 01cf 1404  |    |		.CONST	0x01cf,0x1404
0768 01d3 1405  |    |		.CONST	0x01d3,0x1405
076a 01d8 0415  |    |		.CONST	0x01d8,0x0415
076c 01dc 1801  |    |		.CONST	0x01dc,0x1801
076e 01e0 1c01  |    |		.CONST	0x01e0,0x1c01
0770 01e6 1801  |    |		.CONST	0x01e6,0x1801
0772 01ea 0416  |    |		.CONST	0x01ea,0x0416
0774 01f0 0417  |    |		.CONST	0x01f0,0x0417
0776 01f4 2001  |    |		.CONST	0x01f4,0x2001
0778 01f8 2002  |    |		.CONST	0x01f8,0x2002
077a 01fd 0418  |    |		.CONST	0x01fd,0x0418
077c 0201 2401  |  $ |		.CONST	0x0201,0x2401
077e 020b 0419  |    |		.CONST	0x020b,0x0419
0780 020f 2801  |  ( |		.CONST	0x020f,0x2801
0782 021c 041a  |    |		.CONST	0x021c,0x041a
0784 0222 041b  | "  |		.CONST	0x0222,0x041b
0786 0228 041c  | (  |		.CONST	0x0228,0x041c
0788 022c d3ff  | ,  |		.CONST	0x022c,0xd3ff
078a 0231 2c01  | 1, |		.CONST	0x0231,0x2c01
078c 0231 3001  | 10 |		.CONST	0x0231,0x3001
078e 0232 3002  | 20 |		.CONST	0x0232,0x3002
0790 0233 3003  | 30 |		.CONST	0x0233,0x3003
0792 0233 3004  | 30 |		.CONST	0x0233,0x3004
0794 0233 2c01  | 3, |		.CONST	0x0233,0x2c01
0796 0243 2c05  | C, |		.CONST	0x0243,0x2c05
0798 0244 2c02  | D, |		.CONST	0x0244,0x2c02
079a 0248 2c03  | H, |		.CONST	0x0248,0x2c03
079c 024c 2c04  | L, |		.CONST	0x024c,0x2c04
079e 0250 2c06  | P, |		.CONST	0x0250,0x2c06
07a0 025a 041d  | Z  |		.CONST	0x025a,0x041d
07a2 025e 3401  | ^4 |		.CONST	0x025e,0x3401
07a4 0269 041e  | i  |		.CONST	0x0269,0x041e
07a6 026f 041f  | o  |		.CONST	0x026f,0x041f
07a8 0275 0421  | u !|		.CONST	0x0275,0x0421
07aa 0277 0422  | w "|		.CONST	0x0277,0x0422
07ac 0279 0423  | y #|		.CONST	0x0279,0x0423
07ae 027f 0424  |   $|		.CONST	0x027f,0x0424
07b0 0284 0425  |   %|		.CONST	0x0284,0x0425
07b2 028a 0426  |   &|		.CONST	0x028a,0x0426
07b4 028d 0003  |    |		.CONST	0x028d,0x0003
07b6 0294 0004  |    |		.CONST	0x0294,0x0004
07b8 029b 0005  |    |		.CONST	0x029b,0x0005
07ba ; --------------------------------------------------------------------------------------
07ba ; Debug3 Subtable 0x7
07ba ; --------------------------------------------------------------------------------------
07ba 0003 0064  |   d|		.DBG3TAB	0x0003,0x0064
07bc 02b3 ffff  |    |		.CONST	0x02b3,0xffff
07be 02b4 fffe  |    |		.CONST	0x02b4,0xfffe
07c0 02b5 fffd  |    |		.CONST	0x02b5,0xfffd
07c2 02ba 0001  |    |		.CONST	0x02ba,0x0001
07c4 02c0 0002  |    |		.CONST	0x02c0,0x0002
07c6 02c4 0003  |    |		.CONST	0x02c4,0x0003
07c8 02c4 0401  |    |		.CONST	0x02c4,0x0401
07ca 02c6 0003  |    |		.CONST	0x02c6,0x0003
07cc 02c7 0004  |    |		.CONST	0x02c7,0x0004
07ce 02d2 0005  |    |		.CONST	0x02d2,0x0005
07d0 02d2 0801  |    |		.CONST	0x02d2,0x0801
07d2 02d4 0802  |    |		.CONST	0x02d4,0x0802
07d4 02d6 0803  |    |		.CONST	0x02d6,0x0803
07d6 02d9 0005  |    |		.CONST	0x02d9,0x0005
07d8 02da 0006  |    |		.CONST	0x02da,0x0006
07da 02da 0c01  |    |		.CONST	0x02da,0x0c01
07dc 02dc 0006  |    |		.CONST	0x02dc,0x0006
07de 02dd 0007  |    |		.CONST	0x02dd,0x0007
07e0 02e6 1001  |    |		.CONST	0x02e6,0x1001
07e2 02e8 1002  |    |		.CONST	0x02e8,0x1002
07e4 02ea 1003  |    |		.CONST	0x02ea,0x1003
07e6 02ee 1004  |    |		.CONST	0x02ee,0x1004
07e8 02f2 1005  |    |		.CONST	0x02f2,0x1005
07ea 02f3 1401  |    |		.CONST	0x02f3,0x1401
07ec 02f4 1402  |    |		.CONST	0x02f4,0x1402
07ee 02f5 1403  |    |		.CONST	0x02f5,0x1403
07f0 02f5 1404  |    |		.CONST	0x02f5,0x1404
07f2 02f7 1005  |    |		.CONST	0x02f7,0x1005
07f4 0300 1801  |    |		.CONST	0x0300,0x1801
07f6 0301 1802  |    |		.CONST	0x0301,0x1802
07f8 0302 1803  |    |		.CONST	0x0302,0x1803
07fa 0302 1804  |    |		.CONST	0x0302,0x1804
07fc 0304 1404  |    |		.CONST	0x0304,0x1404
07fe 0312 0007  |    |		.CONST	0x0312,0x0007
0800 0314 0008  |    |		.CONST	0x0314,0x0008
0802 031d 1c01  |    |		.CONST	0x031d,0x1c01
0804 031f 1c02  |    |		.CONST	0x031f,0x1c02
0806 0321 1c03  | !  |		.CONST	0x0321,0x1c03
0808 0325 1c04  | %  |		.CONST	0x0325,0x1c04
080a 0329 1c05  | )  |		.CONST	0x0329,0x1c05
080c 032a 2001  | *  |		.CONST	0x032a,0x2001
080e 032b 2002  | +  |		.CONST	0x032b,0x2002
0810 032c 2003  | ,  |		.CONST	0x032c,0x2003
0812 032c 2004  | ,  |		.CONST	0x032c,0x2004
0814 032e 1c05  | .  |		.CONST	0x032e,0x1c05
0816 0337 2401  | 7$ |		.CONST	0x0337,0x2401
0818 0338 2402  | 8$ |		.CONST	0x0338,0x2402
081a 0339 2403  | 9$ |		.CONST	0x0339,0x2403
081c 0339 2404  | 9$ |		.CONST	0x0339,0x2404
081e 033b 2004  | ;  |		.CONST	0x033b,0x2004
0820 0349 0008  | I  |		.CONST	0x0349,0x0008
0822 034a 0009  | J  |		.CONST	0x034a,0x0009
0824 034a 000a  | J  |		.CONST	0x034a,0x000a
0826 034c 000b  | L  |		.CONST	0x034c,0x000b
0828 034c 2801  | L( |		.CONST	0x034c,0x2801
082a 034e 2802  | N( |		.CONST	0x034e,0x2802
082c 0350 2803  | P( |		.CONST	0x0350,0x2803
082e 0353 000b  | S  |		.CONST	0x0353,0x000b
0830 0354 000c  | T  |		.CONST	0x0354,0x000c
0832 0354 2c01  | T, |		.CONST	0x0354,0x2c01
0834 0356 000c  | V  |		.CONST	0x0356,0x000c
0836 0357 000d  | W  |		.CONST	0x0357,0x000d
0838 0360 3001  | `0 |		.CONST	0x0360,0x3001
083a 0362 3002  | b0 |		.CONST	0x0362,0x3002
083c 0364 3003  | d0 |		.CONST	0x0364,0x3003
083e 0368 3004  | h0 |		.CONST	0x0368,0x3004
0840 036c 3005  | l0 |		.CONST	0x036c,0x3005
0842 036d 3401  | m4 |		.CONST	0x036d,0x3401
0844 036e 3402  | n4 |		.CONST	0x036e,0x3402
0846 036f 3403  | o4 |		.CONST	0x036f,0x3403
0848 036f 3404  | o4 |		.CONST	0x036f,0x3404
084a 0371 3005  | q0 |		.CONST	0x0371,0x3005
084c 037a 3801  | z8 |		.CONST	0x037a,0x3801
084e 037b 3802  | {8 |		.CONST	0x037b,0x3802
0850 037c 3803  | |8 |		.CONST	0x037c,0x3803
0852 037c 3804  | |8 |		.CONST	0x037c,0x3804
0854 037e 3404  | ~4 |		.CONST	0x037e,0x3404
0856 038c 000d  |    |		.CONST	0x038c,0x000d
0858 038e 000e  |    |		.CONST	0x038e,0x000e
085a 0397 3c01  |  < |		.CONST	0x0397,0x3c01
085c 0399 3c02  |  < |		.CONST	0x0399,0x3c02
085e 039b 3c03  |  < |		.CONST	0x039b,0x3c03
0860 039f 3c04  |  < |		.CONST	0x039f,0x3c04
0862 03a3 3c05  |  < |		.CONST	0x03a3,0x3c05
0864 03a4 4001  |  @ |		.CONST	0x03a4,0x4001
0866 03a5 4002  |  @ |		.CONST	0x03a5,0x4002
0868 03a6 4003  |  @ |		.CONST	0x03a6,0x4003
086a 03a6 4004  |  @ |		.CONST	0x03a6,0x4004
086c 03a8 3c05  |  < |		.CONST	0x03a8,0x3c05
086e 03b1 4401  |  D |		.CONST	0x03b1,0x4401
0870 03b2 4402  |  D |		.CONST	0x03b2,0x4402
0872 03b3 4403  |  D |		.CONST	0x03b3,0x4403
0874 03b3 4404  |  D |		.CONST	0x03b3,0x4404
0876 03b5 4004  |  @ |		.CONST	0x03b5,0x4004
0878 03c3 000e  |    |		.CONST	0x03c3,0x000e
087a 03c4 000f  |    |		.CONST	0x03c4,0x000f
087c 03c7 4801  |  H |		.CONST	0x03c7,0x4801
087e 03ca 4c01  |  L |		.CONST	0x03ca,0x4c01
0880 03d2 4801  |  H |		.CONST	0x03d2,0x4801
0882 03d6 000f  |    |		.CONST	0x03d6,0x000f
0884 03d7 0010  |    |		.CONST	0x03d7,0x0010
0886 03d9 0011  |    |		.CONST	0x03d9,0x0011
0888 03e0 0012  |    |		.CONST	0x03e0,0x0012
088a ; --------------------------------------------------------------------------------------
088a ; Debug3 Subtable 0x8
088a ; --------------------------------------------------------------------------------------
088a 0002 0013  |    |		.DBG3TAB	0x0002,0x0013
088c 03eb ffff  |    |		.CONST	0x03eb,0xffff
088e 03ee 0401  |    |		.CONST	0x03ee,0x0401
0890 03ef 0402  |    |		.CONST	0x03ef,0x0402
0892 03f0 0403  |    |		.CONST	0x03f0,0x0403
0894 03f0 0404  |    |		.CONST	0x03f0,0x0404
0896 03f0 ffff  |    |		.CONST	0x03f0,0xffff
0898 03f5 0001  |    |		.CONST	0x03f5,0x0001
089a 03f8 0801  |    |		.CONST	0x03f8,0x0801
089c 03fb 0c01  |    |		.CONST	0x03fb,0x0c01
089e 0403 0801  |    |		.CONST	0x0403,0x0801
08a0 0407 0001  |    |		.CONST	0x0407,0x0001
08a2 0408 0002  |    |		.CONST	0x0408,0x0002
08a4 040a 0003  |    |		.CONST	0x040a,0x0003
08a6 040d 0004  |    |		.CONST	0x040d,0x0004
08a8 0411 0005  |    |		.CONST	0x0411,0x0005
08aa 041b 0006  |    |		.CONST	0x041b,0x0006
08ac 041e 1001  |    |		.CONST	0x041e,0x1001
08ae 0421 1401  | !  |		.CONST	0x0421,0x1401
08b0 0429 1001  | )  |		.CONST	0x0429,0x1001
08b2 042d 0006  | -  |		.CONST	0x042d,0x0006
08b4 042e 0007  | .  |		.CONST	0x042e,0x0007
08b6 ; --------------------------------------------------------------------------------------
08b6 ; Debug3 Subtable 0x9
08b6 ; --------------------------------------------------------------------------------------
08b6 0004 0042  |   B|		.DBG3TAB	0x0004,0x0042
08b8 043b ffff  | ;  |		.CONST	0x043b,0xffff
08ba 0440 fffe  | @  |		.CONST	0x0440,0xfffe
08bc 0445 fffd  | E  |		.CONST	0x0445,0xfffd
08be 0446 fffc  | F  |		.CONST	0x0446,0xfffc
08c0 0447 0001  | G  |		.CONST	0x0447,0x0001
08c2 044a 0002  | J  |		.CONST	0x044a,0x0002
08c4 044f 0401  | O  |		.CONST	0x044f,0x0401
08c6 0451 0402  | Q  |		.CONST	0x0451,0x0402
08c8 0453 0403  | S  |		.CONST	0x0453,0x0403
08ca 0457 0404  | W  |		.CONST	0x0457,0x0404
08cc 045b 0405  | [  |		.CONST	0x045b,0x0405
08ce 045c 0801  | \  |		.CONST	0x045c,0x0801
08d0 045d 0802  | ]  |		.CONST	0x045d,0x0802
08d2 045e 0803  | ^  |		.CONST	0x045e,0x0803
08d4 045e 0804  | ^  |		.CONST	0x045e,0x0804
08d6 0460 0405  | `  |		.CONST	0x0460,0x0405
08d8 0469 0c01  | i  |		.CONST	0x0469,0x0c01
08da 046a 0c02  | j  |		.CONST	0x046a,0x0c02
08dc 046b 0c03  | k  |		.CONST	0x046b,0x0c03
08de 046b 0c04  | k  |		.CONST	0x046b,0x0c04
08e0 046d 0804  | m  |		.CONST	0x046d,0x0804
08e2 047b 0002  | {  |		.CONST	0x047b,0x0002
08e4 047e 0003  | ~  |		.CONST	0x047e,0x0003
08e6 0482 0004  |    |		.CONST	0x0482,0x0004
08e8 0486 0005  |    |		.CONST	0x0486,0x0005
08ea 0488 0006  |    |		.CONST	0x0488,0x0006
08ec 048c 0007  |    |		.CONST	0x048c,0x0007
08ee 048f 0008  |    |		.CONST	0x048f,0x0008
08f0 0492 0009  |    |		.CONST	0x0492,0x0009
08f2 0496 000a  |    |		.CONST	0x0496,0x000a
08f4 0497 1001  |    |		.CONST	0x0497,0x1001
08f6 0499 1002  |    |		.CONST	0x0499,0x1002
08f8 049b 1003  |    |		.CONST	0x049b,0x1003
08fa 049f 1004  |    |		.CONST	0x049f,0x1004
08fc 04a3 1005  |    |		.CONST	0x04a3,0x1005
08fe 04a4 1401  |    |		.CONST	0x04a4,0x1401
0900 04a5 1402  |    |		.CONST	0x04a5,0x1402
0902 04a6 1403  |    |		.CONST	0x04a6,0x1403
0904 04a6 1404  |    |		.CONST	0x04a6,0x1404
0906 04a8 1005  |    |		.CONST	0x04a8,0x1005
0908 04b1 1801  |    |		.CONST	0x04b1,0x1801
090a 04b2 1802  |    |		.CONST	0x04b2,0x1802
090c 04b3 1803  |    |		.CONST	0x04b3,0x1803
090e 04b3 1804  |    |		.CONST	0x04b3,0x1804
0910 04b5 1404  |    |		.CONST	0x04b5,0x1404
0912 04c3 000a  |    |		.CONST	0x04c3,0x000a
0914 04c4 000b  |    |		.CONST	0x04c4,0x000b
0916 04ca 000c  |    |		.CONST	0x04ca,0x000c
0918 04ce 000d  |    |		.CONST	0x04ce,0x000d
091a 04d1 000e  |    |		.CONST	0x04d1,0x000e
091c 04d1 1c01  |    |		.CONST	0x04d1,0x1c01
091e 04d3 1c02  |    |		.CONST	0x04d3,0x1c02
0920 04d5 1c03  |    |		.CONST	0x04d5,0x1c03
0922 04d8 000e  |    |		.CONST	0x04d8,0x000e
0924 04d8 2001  |    |		.CONST	0x04d8,0x2001
0926 04da 2002  |    |		.CONST	0x04da,0x2002
0928 04dc 2003  |    |		.CONST	0x04dc,0x2003
092a 04e0 2004  |    |		.CONST	0x04e0,0x2004
092c 04e4 2005  |    |		.CONST	0x04e4,0x2005
092e 04e5 2401  |  $ |		.CONST	0x04e5,0x2401
0930 04e6 2402  |  $ |		.CONST	0x04e6,0x2402
0932 04e7 2403  |  $ |		.CONST	0x04e7,0x2403
0934 04e7 2404  |  $ |		.CONST	0x04e7,0x2404
0936 04e9 2005  |    |		.CONST	0x04e9,0x2005
0938 04f2 2801  |  ( |		.CONST	0x04f2,0x2801
093a 04f3 2802  |  ( |		.CONST	0x04f3,0x2802
093c 04f4 2803  |  ( |		.CONST	0x04f4,0x2803
093e 04f4 2804  |  ( |		.CONST	0x04f4,0x2804
0940 04f6 2404  |  $ |		.CONST	0x04f6,0x2404
0942 0504 000e  |    |		.CONST	0x0504,0x000e
0944 ; --------------------------------------------------------------------------------------
0944 ; Debug3 Subtable 0xa
0944 ; --------------------------------------------------------------------------------------
0944 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0946 050b 0001  |    |		.CONST	0x050b,0x0001
0948 050e 0002  |    |		.CONST	0x050e,0x0002
094a 0512 0003  |    |		.CONST	0x0512,0x0003
094c 0516 0004  |    |		.CONST	0x0516,0x0004
094e ; --------------------------------------------------------------------------------------
094e ; Debug3 Subtable 0xb
094e ; --------------------------------------------------------------------------------------
094e 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
0950 0523 0001  | #  |		.CONST	0x0523,0x0001
0952 0527 0002  | '  |		.CONST	0x0527,0x0002
0954 052a 0003  | *  |		.CONST	0x052a,0x0003
0956 052d 0004  | -  |		.CONST	0x052d,0x0004
0958 0532 0005  | 2  |		.CONST	0x0532,0x0005
095a ; --------------------------------------------------------------------------------------
095a ; Debug3 Subtable 0xc
095a ; --------------------------------------------------------------------------------------
095a 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
095c 053b ffff  | ;  |		.CONST	0x053b,0xffff
095e 0540 0001  | @  |		.CONST	0x0540,0x0001
0960 0546 0002  | F  |		.CONST	0x0546,0x0002
0962 054b 0003  | K  |		.CONST	0x054b,0x0003
0964 054f 0004  | O  |		.CONST	0x054f,0x0004
0966 ; --------------------------------------------------------------------------------------
0966 ; Debug3 Subtable 0xd
0966 ; --------------------------------------------------------------------------------------
0966 0002 0029  |   )|		.DBG3TAB	0x0002,0x0029
0968 055b ffff  | [  |		.CONST	0x055b,0xffff
096a 0560 fffe  | `  |		.CONST	0x0560,0xfffe
096c 0561 0001  | a  |		.CONST	0x0561,0x0001
096e 0561 0002  | a  |		.CONST	0x0561,0x0002
0970 0561 0401  | a  |		.CONST	0x0561,0x0401
0972 0563 0002  | c  |		.CONST	0x0563,0x0002
0974 0564 0003  | d  |		.CONST	0x0564,0x0003
0976 0565 0801  | e  |		.CONST	0x0565,0x0801
0978 0567 0802  | g  |		.CONST	0x0567,0x0802
097a 0569 0803  | i  |		.CONST	0x0569,0x0803
097c 056d 0804  | m  |		.CONST	0x056d,0x0804
097e 0571 0805  | q  |		.CONST	0x0571,0x0805
0980 0572 0c01  | r  |		.CONST	0x0572,0x0c01
0982 0573 0c02  | s  |		.CONST	0x0573,0x0c02
0984 0574 0c03  | t  |		.CONST	0x0574,0x0c03
0986 0574 0c04  | t  |		.CONST	0x0574,0x0c04
0988 0576 0805  | v  |		.CONST	0x0576,0x0805
098a 057f 1001  |    |		.CONST	0x057f,0x1001
098c 0580 1002  |    |		.CONST	0x0580,0x1002
098e 0581 1003  |    |		.CONST	0x0581,0x1003
0990 0581 1004  |    |		.CONST	0x0581,0x1004
0992 0583 0c04  |    |		.CONST	0x0583,0x0c04
0994 0591 0003  |    |		.CONST	0x0591,0x0003
0996 0592 0004  |    |		.CONST	0x0592,0x0004
0998 0595 1401  |    |		.CONST	0x0595,0x1401
099a 0598 1801  |    |		.CONST	0x0598,0x1801
099c 05a0 1401  |    |		.CONST	0x05a0,0x1401
099e 05a4 0004  |    |		.CONST	0x05a4,0x0004
09a0 05a5 0005  |    |		.CONST	0x05a5,0x0005
09a2 05a7 0006  |    |		.CONST	0x05a7,0x0006
09a4 05aa 0007  |    |		.CONST	0x05aa,0x0007
09a6 05ab 1c01  |    |		.CONST	0x05ab,0x1c01
09a8 05b4 0008  |    |		.CONST	0x05b4,0x0008
09aa 05b7 2001  |    |		.CONST	0x05b7,0x2001
09ac 05ba 2401  |  $ |		.CONST	0x05ba,0x2401
09ae 05c2 2001  |    |		.CONST	0x05c2,0x2001
09b0 05c6 0008  |    |		.CONST	0x05c6,0x0008
09b2 05c7 0009  |    |		.CONST	0x05c7,0x0009
09b4 05c9 000a  |    |		.CONST	0x05c9,0x000a
09b6 05c9 2801  |  ( |		.CONST	0x05c9,0x2801
09b8 05cb 2802  |  ( |		.CONST	0x05cb,0x2802
09ba 05cd 2803  |  ( |		.CONST	0x05cd,0x2803
09bc 05d0 000a  |    |		.CONST	0x05d0,0x000a
09be 0000 0000  |    |		.BLANK	0000[0x42]