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

⟦edbc3fe06⟧

    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 0630       | 0  |		.CONST	0x0630								; 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 0036       | 6  |		.CONST	0x0036								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001d       |    |		.CONST	0x001d								; Number of locals
000b			INIT_0008:
000b 029a 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x06d2,0x0000,0x0000,0x0057,0x9775,0x0000,0x0574
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 00bf       |    |		Action	Accept_Activation
0010 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0010,0x06d8,0x0000,0x0000,0x0057,0x99d5,0x0000,0x000a
													; Debug Table 0x1.0x0 = 0x10,0xffff
0011 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x11,0xfffe
0012 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x12,0xfffd
0013 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x13,0xfffc
0014 029d 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call			; Debug Table 0x1.0x4 = 0x14,0xfffb
0016 029d 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call			; Debug Table 0x1.0x5 = 0x16,0xfffa
0018 029d 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call			; Debug Table 0x1.0x6 = 0x18,0xfff9
001a 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x7 = 0x1a,0xfff8
001b 00c7       |    |		Action	Elaborate_Subprogram
001c 029d 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call			; Debug Table 0x1.0x8 = 0x1c,0xfff7
001e 029d 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call			; Debug Table 0x1.0x9 = 0x1e,0xfff6
0020 029d 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call			; Debug Table 0x1.0xa = 0x20,0xfff5
0022 029d 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call			; Debug Table 0x1.0xb = 0x22,0xfff4
0024 029d 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call			; Debug Table 0x1.0xc = 0x24,0xfff3
0026 029d 03b3  |    |		Declare_Subprogram	INIT_03b0,For_Outer_Call			; Debug Table 0x1.0xd = 0x26,0xfff2
0028 029d 03f3  |    |		Declare_Subprogram	INIT_03f0,For_Outer_Call			; Debug Table 0x1.0xe = 0x28,0xfff1
002a 029d 043b  |   ;|		Declare_Subprogram	INIT_0438,For_Outer_Call			; Debug Table 0x1.0xf = 0x2a,0xfff0
002c 029d 0493  |    |		Declare_Subprogram	INIT_0490,For_Outer_Call			; Debug Table 0x1.0x10 = 0x2c,0xffef
002e 029d 04eb  |    |		Declare_Subprogram	INIT_04e8,For_Outer_Call			; Debug Table 0x1.0x11 = 0x2e,0xffee
0030 029d 0543  |   C|		Declare_Subprogram	INIT_0540,For_Outer_Call			; Debug Table 0x1.0x12 = 0x30,0xffed
0032 029d 059b  |    |		Declare_Subprogram	INIT_0598,For_Outer_Call			; Debug Table 0x1.0x13 = 0x32,0xffec
0034 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x14 = 0x34,0xffeb
0035 00c7       |    |		Action	Elaborate_Subprogram
0036			BODY_0008:
0036 00bc       |    |		Action	Signal_Activated
0037 00bb       |    |		Action	Signal_Completion
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0054       | T  |		.CONST	0x0054								; Address of begin
0039 00f5       |    |		.CONST	0x00f5								; Address of exception handler
003a 0008       |    |		.CONST	0x0008								; Number of locals
003b			INIT_0038:
003b e001       |    |		Load	0x0,0x1								; Debug Table 0x2 = .DEBUG	0x003b,0x0704,0x0001,0x0000,0x0057,0x9775,0x0000,0x0575
													; Debug Table 0x2.0x0 = 0x3b,0xffff
003c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
003d 02c7       |    |		Declare_Variable	Any
003e 00d8       |    |		Load_Top	At_Offset_0
003f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0040 e002       |    |		Load	0x0,0x2								; Debug Table 0x2.0x1 = 0x40,0xfffe
0041 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0042 e003       |    |		Load	0x0,0x3								; Debug Table 0x2.0x2 = 0x42,0xfffd
0043 0322       | "  |		Declare_Variable	Record
0044 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2.0x3 = 0x44,0xfffc
0045 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x2.0x4 = 0x45,0xfffb
0046 00ed       |    |		Load_Encached	Diana_Symbol_Rep_Cache					; Debug Table 0x2.0x5 = 0x46,0xfffa
0047 02c7       |    |		Declare_Variable	Any
0048 00d8       |    |		Load_Top	At_Offset_0
0049 1c00       |    |		Execute_Immediate	Run_Utility,0x0
004a e002       |    |		Load	0x0,0x2								; Debug Table 0x2.0x6 = 0x4a,0xfff9
004b 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
004c 02ff       |    |		Declare_Variable	Variant_Record
004d e5fe       |    |		Load	0x2,-0x2
004e e004       |    |		Load	0x0,0x4
004f 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0050 e004       |    |		Load	0x0,0x4
0051 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0052 00d9       |    |		Load_Top	At_Offset_1
0053 016d       | m  |		Execute	Variant_Record,Structure_Write
0054			BODY_0038:
0054 e005       |    |		Load	0x0,0x5								; Debug Table 0x2.0x7 = 0x54,0x1
0055 a5fc       |    |		Store_Unchecked	0x2,-0x4
0056 e005       |    |		Load	0x0,0x5								; Debug Table 0x2.0x8 = 0x56,0x2
0057 a5fd       |    |		Store_Unchecked	0x2,-0x3
0058 e002       |    |		Load	0x0,0x2								; Debug Table 0x2.0x9 = 0x58,0x3
0059 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
005a e402       |    |		Load	0x2,0x2
005b 0120       |    |		Execute	Any,Is_Value
005c 6803       |h   |		Jump_Zero	0x60
005d e001       |    |		Load	0x0,0x1
005e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
005f 7801       |x   |		Jump	0x61
0060 e402       |    |		Load	0x2,0x2
0061 62aa       |b   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
0062 e5fb       |    |		Load	0x2,-0x5
0063 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0064 e408       |    |		Load	0x2,0x8
0065 e001       |    |		Load	0x0,0x1
0066 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0067 c402       |    |		Store	0x2,0x2
0068 c403       |    |		Store	0x2,0x3
0069 e403       |    |		Load	0x2,0x3								; Debug Table 0x2.0xa = 0x69,0x4
006a 6817       |h   |		Jump_Zero	0x82
006b e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2.0xb = 0x6b,0x5
006c 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
006d 0092 05fd  |    |		Action	Push_String_Extended,0x5fd					; "can't open source unit "
006f 00da       |    |		Load_Top	At_Offset_2
0070 e002       |    |		Load	0x0,0x2
0071 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0072 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0073 01cc       |    |		Execute	Vector,Catenate
0074 0092 05fe  |    |		Action	Push_String_Extended,0x5fe					; " ("
0076 01cc       |    |		Execute	Vector,Catenate
0077 e403       |    |		Load	0x2,0x3
0078 e002       |    |		Load	0x0,0x2
0079 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
007a 025e       | ^  |		Execute	Discrete,Convert
007b 1c01       |    |		Execute_Immediate	Run_Utility,0x1
007c 01cc       |    |		Execute	Vector,Catenate
007d 0092 05ff  |    |		Action	Push_String_Extended,0x5ff					; ")"
007f 01cc       |    |		Execute	Vector,Catenate
0080 8006       |    |		Call	0x0,0x6
0081 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x2.0xc = 0x81,0x6
0082 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0xd = 0x82,0x7
0083 4975       |Iu  |		Short_Literal	0x175
0084 00eb       |    |		Load_Encached	Diana_Cache
0085 0098       |    |		Execute	Package,Field_Read_Dynamic
0086 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
0087 682e       |h.  |		Jump_Zero	0xb6
0088 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0xe = 0x88,0x8
0089 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0xf = 0x89,0x401
008a 0217       |    |		Execute	Heap_Access,All_Reference
008b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
008c a405       |    |		Store_Unchecked	0x2,0x5							; Debug Table 0x2.0x10 = 0x8c,0x8
008d 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0x11 = 0x8d,0x9
008e 00ed       |    |		Load_Encached	Diana_Symbol_Rep_Cache					; Debug Table 0x2.0x12 = 0x8e,0xf7ff
008f 02c7       |    |		Declare_Variable	Any
0090 e405       |    |		Load	0x2,0x5
0091 00eb       |    |		Load_Encached	Diana_Cache
0092 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0093 c409       |    |		Store	0x2,0x9
0094 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x13 = 0x94,0xf7fe
0095 00eb       |    |		Load_Encached	Diana_Cache
0096 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0097 e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x14 = 0x97,0x801
0098 e001       |    |		Load	0x0,0x1
0099 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
009a 4801       |H   |		Short_Literal	0x1
009b 0263       | c  |		Execute	Discrete,Above_Bound
009c 7017       |p   |		Jump_Nonzero	0xb4
009d 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0x15 = 0x9d,0x802
009e e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x16 = 0x9e,0xf3ff
009f 00d9       |    |		Load_Top	At_Offset_1
00a0 e001       |    |		Load	0x0,0x1
00a1 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
00a2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x17 = 0xa2,0xc01
00a3 01db       |    |		Execute	Vector,Length
00a4 680d       |h   |		Jump_Zero	0xb2
00a5 00d8       |    |		Load_Top	At_Offset_0
00a6 8212       |    |		Call	0x1,0x12
00a7 700a       |p   |		Jump_Nonzero	0xb2
00a8 e404       |    |		Load	0x2,0x4								; Debug Table 0x2.0x18 = 0xa8,0xc02
00a9 e5fb       |    |		Load	0x2,-0x5
00aa e40a       |    |		Load	0x2,0xa
00ab e409       |    |		Load	0x2,0x9
00ac e405       |    |		Load	0x2,0x5
00ad e40c       |    |		Load	0x2,0xc
00ae e40d       |    |		Load	0x2,0xd
00af e402       |    |		Load	0x2,0x2
00b0 821d       |    |		Call	0x1,0x1d
00b1 00d1       |    |		Pop_Control	Pop_Count_1
00b2 00d1       |    |		Pop_Control	Pop_Count_1
00b3 3fe9       |?   |		Loop_Increasing	0x9d
00b4 00d2       |    |		Pop_Control	Pop_Count_2
00b5 7834       |x4  |		Jump	0xea
00b6 e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x19 = 0xb6,0xa
00b7 e001       |    |		Load	0x0,0x1
00b8 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
00b9 4801       |H   |		Short_Literal	0x1
00ba 0263       | c  |		Execute	Discrete,Above_Bound
00bb 702e       |p.  |		Jump_Nonzero	0xea
00bc 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0x1a = 0xbc,0xb
00bd e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x1b = 0xbd,0xefff
00be 00d9       |    |		Load_Top	At_Offset_1
00bf e001       |    |		Load	0x0,0x1
00c0 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
00c1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x1c = 0xc1,0x1001
00c2 01db       |    |		Execute	Vector,Length
00c3 6824       |h$  |		Jump_Zero	0xe8
00c4 00d8       |    |		Load_Top	At_Offset_0
00c5 8212       |    |		Call	0x1,0x12
00c6 7021       |p!  |		Jump_Nonzero	0xe8
00c7 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x1d = 0xc7,0x1002
00c8 a406       |    |		Store_Unchecked	0x2,0x6
00c9 781a       |x   |		Jump	0xe4
00ca 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0x1e = 0xca,0x1004
00cb e406       |    |		Load	0x2,0x6								; Debug Table 0x2.0x1f = 0xcb,0x1401
00cc 0217       |    |		Execute	Heap_Access,All_Reference
00cd 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00ce a405       |    |		Store_Unchecked	0x2,0x5							; Debug Table 0x2.0x20 = 0xce,0x1004
00cf e405       |    |		Load	0x2,0x5								; Debug Table 0x2.0x21 = 0xcf,0x1005
00d0 00eb       |    |		Load_Encached	Diana_Cache
00d1 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
00d2 c407       |    |		Store	0x2,0x7
00d3 e404       |    |		Load	0x2,0x4								; Debug Table 0x2.0x22 = 0xd3,0x1006
00d4 e5fb       |    |		Load	0x2,-0x5
00d5 e407       |    |		Load	0x2,0x7
00d6 00eb       |    |		Load_Encached	Diana_Cache
00d7 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
00d8 e407       |    |		Load	0x2,0x7
00d9 e405       |    |		Load	0x2,0x5
00da e40a       |    |		Load	0x2,0xa
00db e40b       |    |		Load	0x2,0xb
00dc e402       |    |		Load	0x2,0x2
00dd 821d       |    |		Call	0x1,0x1d
00de 00d1       |    |		Pop_Control	Pop_Count_1
00df 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0x23 = 0xdf,0x1007
00e0 e406       |    |		Load	0x2,0x6								; Debug Table 0x2.0x24 = 0xe0,0x1801
00e1 0217       |    |		Execute	Heap_Access,All_Reference
00e2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00e3 a406       |    |		Store_Unchecked	0x2,0x6							; Debug Table 0x2.0x25 = 0xe3,0x1007
00e4 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0x26 = 0xe4,0x1003
00e5 e406       |    |		Load	0x2,0x6								; Debug Table 0x2.0x27 = 0xe5,0x1c01
00e6 021d       |    |		Execute	Heap_Access,Is_Null
00e7 6fe2       |o   |		Jump_Zero	0xca							; Debug Table 0x2.0x28 = 0xe7,0x1003
00e8 00d1       |    |		Pop_Control	Pop_Count_1
00e9 3fd2       |?   |		Loop_Increasing	0xbc
00ea e002       |    |		Load	0x0,0x2								; Debug Table 0x2.0x29 = 0xea,0xc
00eb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00ec e402       |    |		Load	0x2,0x2
00ed e001       |    |		Load	0x0,0x1
00ee 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00ef c402       |    |		Store	0x2,0x2
00f0 c403       |    |		Store	0x2,0x3
00f1 e404       |    |		Load	0x2,0x4								; Debug Table 0x2.0x2a = 0xf1,0xd
00f2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00f3 a5fd       |    |		Store_Unchecked	0x2,-0x3
00f4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00f5			TRAP_0038:
00f5 0007       |    |		Action	Break_Optional
00f6 e002       |    |		Load	0x0,0x2								; Debug Table 0x2.0x2b = 0xf6,0xe
00f7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00f8 e402       |    |		Load	0x2,0x2
00f9 e001       |    |		Load	0x0,0x1
00fa 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00fb c402       |    |		Store	0x2,0x2
00fc c403       |    |		Store	0x2,0x3
00fd e404       |    |		Load	0x2,0x4								; Debug Table 0x2.0x2c = 0xfd,0xf
00fe 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00ff a5fd       |    |		Store_Unchecked	0x2,-0x3
0100 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0101 0000 0000  |    |		.BLANK	0000[0x7]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 011c       |    |		.CONST	0x011c								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0006       |    |		.CONST	0x0006								; Number of locals
010b			INIT_0108:
010b e002       |    |		Load	0x0,0x2								; Debug Table 0x3 = .DEBUG	0x010b,0x0760,0x0001,0x0000,0x0057,0x9775,0x0000,0x0595
													; Debug Table 0x3.0x0 = 0x10b,0xffff
010c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
010d 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
010e 02c7       |    |		Declare_Variable	Any
010f 00d8       |    |		Load_Top	At_Offset_0
0110 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0111 e002       |    |		Load	0x0,0x2								; Debug Table 0x3.0x1 = 0x111,0xfffe
0112 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0113 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0114 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3.0x2 = 0x114,0xfffd
0115 e002       |    |		Load	0x0,0x2								; Debug Table 0x3.0x3 = 0x115,0xfffc
0116 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0117 e002       |    |		Load	0x0,0x2								; Debug Table 0x3.0x4 = 0x117,0xfffb
0118 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0119 02c7       |    |		Declare_Variable	Any
011a 00d8       |    |		Load_Top	At_Offset_0
011b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
011c			BODY_0108:
011c e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0x5 = 0x11c,0x1
011d 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
011e 6883       |h   |		Jump_Zero	0x1a2
011f e002       |    |		Load	0x0,0x2								; Debug Table 0x3.0x6 = 0x11f,0x2
0120 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0121 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0122 e402       |    |		Load	0x2,0x2
0123 61e8       |a   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
0124 e007       |    |		Load	0x0,0x7
0125 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0126 e008       |    |		Load	0x0,0x8
0127 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0128 e009       |    |		Load	0x0,0x9
0129 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
012a 4801       |H   |		Short_Literal	0x1
012b 4800       |H   |		Short_Literal	0x0
012c e008       |    |		Load	0x0,0x8
012d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
012e e002       |    |		Load	0x0,0x2
012f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0130 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0131 e5ff       |    |		Load	0x2,-0x1
0132 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
0133 0217       |    |		Execute	Heap_Access,All_Reference
0134 e002       |    |		Load	0x0,0x2
0135 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0136 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0137 c402       |    |		Store	0x2,0x2
0138 c403       |    |		Store	0x2,0x3
0139 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x7 = 0x139,0x3
013a 6862       |hb  |		Jump_Zero	0x19d
013b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0x8 = 0x13b,0x4
013c 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
013d 0092 0600  |    |		Action	Push_String_Extended,0x600					; "Can't resolve "
013f e5ff       |    |		Load	0x2,-0x1
0140 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
0141 0217       |    |		Execute	Heap_Access,All_Reference
0142 01cc       |    |		Execute	Vector,Catenate
0143 0092 05fe  |    |		Action	Push_String_Extended,0x5fe					; " ("
0145 01cc       |    |		Execute	Vector,Catenate
0146 e403       |    |		Load	0x2,0x3
0147 e002       |    |		Load	0x0,0x2
0148 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0149 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
014a 025e       | ^  |		Execute	Discrete,Convert
014b 1c01       |    |		Execute_Immediate	Run_Utility,0x1
014c 01cc       |    |		Execute	Vector,Catenate
014d 0092 05ff  |    |		Action	Push_String_Extended,0x5ff					; ")"
014f 01cc       |    |		Execute	Vector,Catenate
0150 8006       |    |		Call	0x0,0x6
0151 61b6       |a   |		Indirect_Literal	Discrete,0x308,{0x00000000, 0x57977501}		; Debug Table 0x3.0x9 = 0x151,0x5
0152 0257       | W  |		Execute	Discrete,Raise
0153 e002       |    |		Load	0x0,0x2								; Debug Table 0x3.0xa = 0x153,0x7
0154 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0155 00d9       |    |		Load_Top	At_Offset_1
0156 0120       |    |		Execute	Any,Is_Value
0157 6803       |h   |		Jump_Zero	0x15b
0158 e002       |    |		Load	0x0,0x2
0159 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
015a 7801       |x   |		Jump	0x15c
015b 00d9       |    |		Load_Top	At_Offset_1
015c e402       |    |		Load	0x2,0x2
015d e002       |    |		Load	0x0,0x2
015e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
015f 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0160 c406       |    |		Store	0x2,0x6
0161 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0162 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0xb = 0x162,0x8
0163 6817       |h   |		Jump_Zero	0x17b
0164 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0xc = 0x164,0x9
0165 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
0166 0092 0601  |    |		Action	Push_String_Extended,0x601					; "Can't get object of "
0168 e402       |    |		Load	0x2,0x2
0169 e002       |    |		Load	0x0,0x2
016a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
016b 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
016c 01cc       |    |		Execute	Vector,Catenate
016d 0092 05fe  |    |		Action	Push_String_Extended,0x5fe					; " ("
016f 01cc       |    |		Execute	Vector,Catenate
0170 00db       |    |		Load_Top	At_Offset_3
0171 e002       |    |		Load	0x0,0x2
0172 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0173 025e       | ^  |		Execute	Discrete,Convert
0174 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0175 01cc       |    |		Execute	Vector,Catenate
0176 0092 05ff  |    |		Action	Push_String_Extended,0x5ff					; ")"
0178 01cc       |    |		Execute	Vector,Catenate
0179 8006       |    |		Call	0x0,0x6
017a 781d       |x   |		Jump	0x198
017b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0xd = 0x17b,0xa
017c e00a       |    |		Load	0x0,0xa
017d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
017e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0xe = 0x17e,0xb
017f e004       |    |		Load	0x0,0x4
0180 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0181 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0182 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0xf = 0x182,0xc
0183 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0184 00db       |    |		Load_Top	At_Offset_3
0185 4975       |Iu  |		Short_Literal	0x175
0186 00eb       |    |		Load_Encached	Diana_Cache
0187 0098       |    |		Execute	Package,Field_Read_Dynamic
0188 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0189 700e       |p   |		Jump_Nonzero	0x198
018a 00da       |    |		Load_Top	At_Offset_2
018b e002       |    |		Load	0x0,0x2
018c 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
018d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
018e 6809       |h   |		Jump_Zero	0x198
018f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0x10 = 0x18f,0xd
0190 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
0191 e5ff       |    |		Load	0x2,-0x1
0192 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0193 e404       |    |		Load	0x2,0x4
0194 00eb       |    |		Load_Encached	Diana_Cache
0195 1875       | u  |		Execute	Package,Field_Execute,Field_Number 0x75
0196 e5ff       |    |		Load	0x2,-0x1
0197 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0198 e402       |    |		Load	0x2,0x2								; Debug Table 0x3.0x11 = 0x198,0xe
0199 e002       |    |		Load	0x0,0x2
019a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
019b 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
019c c402       |    |		Store	0x2,0x2
019d e402       |    |		Load	0x2,0x2								; Debug Table 0x3.0x12 = 0x19d,0x6
019e e002       |    |		Load	0x0,0x2
019f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01a0 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01a1 6fb1       |o   |		Jump_Zero	0x153
01a2 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0x13 = 0x1a2,0xf
01a3 3c0f       |<   |		Execute	Record,Field_Read,Field_Number 0xf
01a4 6803       |h   |		Jump_Zero	0x1a8
01a5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0x14 = 0x1a5,0x10
01a6 8211       |    |		Call	0x1,0x11
01a7 00d1       |    |		Pop_Control	Pop_Count_1
01a8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01a9 0000 0000  |    |		.BLANK	0000[0x7]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b8       |    |		.CONST	0x01b8								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0002       |    |		.CONST	0x0002								; Number of locals
01b3			INIT_01b0:
01b3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4 = .DEBUG	0x01b3,0x078c,0x0001,0x0000,0x0057,0x99d5,0x0000,0x0037
													; Debug Table 0x4.0x0 = 0x1b3,0xffff
01b4 00db       |    |		Load_Top	At_Offset_3
01b5 e004       |    |		Load	0x0,0x4
01b6 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01b7 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01b8			BODY_01b0:
01b8 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x1 = 0x1b8,0x1
01b9 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
01ba 00d9       |    |		Load_Top	At_Offset_1
01bb 4975       |Iu  |		Short_Literal	0x175
01bc 00eb       |    |		Load_Encached	Diana_Cache
01bd 0098       |    |		Execute	Package,Field_Read_Dynamic
01be 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
01bf 7011       |p   |		Jump_Nonzero	0x1d1
01c0 00d8       |    |		Load_Top	At_Offset_0
01c1 e002       |    |		Load	0x0,0x2
01c2 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
01c3 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01c4 680c       |h   |		Jump_Zero	0x1d1
01c5 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x2 = 0x1c5,0x2
01c6 e00a       |    |		Load	0x0,0xa
01c7 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01c8 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x3 = 0x1c8,0x3
01c9 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
01ca e5fe       |    |		Load	0x2,-0x2
01cb 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
01cc 00da       |    |		Load_Top	At_Offset_2
01cd 00eb       |    |		Load_Encached	Diana_Cache
01ce 1875       | u  |		Execute	Package,Field_Execute,Field_Number 0x75
01cf e5fe       |    |		Load	0x2,-0x2
01d0 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01d1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01d2 0000 0000  |    |		.BLANK	0000[0x6]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01ed       |    |		.CONST	0x01ed								; Address of begin
01d9 0004       |    |		.CONST	0x0004								; Address of exception handler
01da 0005       |    |		.CONST	0x0005								; Number of locals
01db			INIT_01d8:
01db e002       |    |		Load	0x0,0x2								; Debug Table 0x5 = .DEBUG	0x01db,0x0796,0x0001,0x0000,0x0057,0x99d5,0x0000,0x0083
													; Debug Table 0x5.0x0 = 0x1db,0xffff
01dc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01dd e002       |    |		Load	0x0,0x2								; Debug Table 0x5.0x1 = 0x1dd,0xfffe
01de 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
01df 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
01e0 02c7       |    |		Declare_Variable	Any
01e1 00d8       |    |		Load_Top	At_Offset_0
01e2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01e3 e002       |    |		Load	0x0,0x2								; Debug Table 0x5.0x2 = 0x1e3,0xfffd
01e4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01e5 02c7       |    |		Declare_Variable	Any
01e6 00d8       |    |		Load_Top	At_Offset_0
01e7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01e8 e002       |    |		Load	0x0,0x2								; Debug Table 0x5.0x3 = 0x1e8,0xfffc
01e9 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01ea 02ff       |    |		Declare_Variable	Variant_Record
01eb 00d8       |    |		Load_Top	At_Offset_0
01ec 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01ed			BODY_01d8:
01ed e002       |    |		Load	0x0,0x2								; Debug Table 0x5.0x4 = 0x1ed,0x1
01ee 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ef 00db       |    |		Load_Top	At_Offset_3
01f0 0120       |    |		Execute	Any,Is_Value
01f1 6804       |h   |		Jump_Zero	0x1f6
01f2 e002       |    |		Load	0x0,0x2
01f3 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
01f4 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
01f5 7801       |x   |		Jump	0x1f7
01f6 00db       |    |		Load_Top	At_Offset_3
01f7 6114       |a   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
01f8 e5fe       |    |		Load	0x2,-0x2
01f9 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
01fa e5ff       |    |		Load	0x2,-0x1
01fb e002       |    |		Load	0x0,0x2
01fc 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01fd 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01fe e002       |    |		Load	0x0,0x2
01ff 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0200 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0201 c403       |    |		Store	0x2,0x3
0202 c402       |    |		Store	0x2,0x2
0203 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x5 = 0x203,0x2
0204 683a       |h:  |		Jump_Zero	0x23f
0205 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x6 = 0x205,0x3
0206 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
0207 0092 0602  |    |		Action	Push_String_Extended,0x602					; "can't check for subunits of "
0209 e5ff       |    |		Load	0x2,-0x1
020a e002       |    |		Load	0x0,0x2
020b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
020c 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
020d 01cc       |    |		Execute	Vector,Catenate
020e 0092 05fe  |    |		Action	Push_String_Extended,0x5fe					; " ("
0210 01cc       |    |		Execute	Vector,Catenate
0211 e402       |    |		Load	0x2,0x2
0212 e002       |    |		Load	0x0,0x2
0213 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0214 025e       | ^  |		Execute	Discrete,Convert
0215 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0216 01cc       |    |		Execute	Vector,Catenate
0217 0092 05ff  |    |		Action	Push_String_Extended,0x5ff					; ")"
0219 01cc       |    |		Execute	Vector,Catenate
021a 8006       |    |		Call	0x0,0x6
021b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x5.0x7 = 0x21b,0x4
021c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x8 = 0x21c,0x6
021d e002       |    |		Load	0x0,0x2
021e 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
021f 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
0220 c404       |    |		Store	0x2,0x4
0221 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x9 = 0x221,0x7
0222 e004       |    |		Load	0x0,0x4
0223 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0224 00d9       |    |		Load_Top	At_Offset_1
0225 016d       | m  |		Execute	Variant_Record,Structure_Write
0226 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0xa = 0x226,0x8
0227 e002       |    |		Load	0x0,0x2
0228 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0229 7010       |p   |		Jump_Nonzero	0x23a
022a 00d9       |    |		Load_Top	At_Offset_1
022b e002       |    |		Load	0x0,0x2
022c 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
022d e002       |    |		Load	0x0,0x2
022e 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
022f 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0230 012f       | /  |		Execute	Any,Equal
0231 6808       |h   |		Jump_Zero	0x23a
0232 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0xb = 0x232,0x9
0233 00da       |    |		Load_Top	At_Offset_2
0234 820f       |    |		Call	0x1,0xf
0235 00d1       |    |		Pop_Control	Pop_Count_1
0236 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0xc = 0x236,0xa
0237 00da       |    |		Load_Top	At_Offset_2
0238 8210       |    |		Call	0x1,0x10
0239 00d1       |    |		Pop_Control	Pop_Count_1
023a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0xd = 0x23a,0xb
023b e002       |    |		Load	0x0,0x2
023c 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
023d 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
023e c403       |    |		Store	0x2,0x3
023f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0xe = 0x23f,0x5
0240 e002       |    |		Load	0x0,0x2
0241 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0242 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0243 6fd8       |o   |		Jump_Zero	0x21c
0244 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0245 0000 0000  |    |		.XXX[0x3]
0247 0000       |    |
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 0267       | g  |		.CONST	0x0267								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0007       |    |		.CONST	0x0007								; Number of locals
024b			INIT_0248:
024b 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x6 = .DEBUG	0x024b,0x07b6,0x0001,0x0000,0x0057,0x99d5,0x0000,0x0136
													; Debug Table 0x6.0x0 = 0x24b,0xffff
024c 00db       |    |		Load_Top	At_Offset_3
024d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
024e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
024f e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0x1 = 0x24f,0xfffe
0250 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0251 02c7       |    |		Declare_Variable	Any
0252 00d8       |    |		Load_Top	At_Offset_0
0253 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0254 e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0x2 = 0x254,0xfffd
0255 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0256 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0257 02c7       |    |		Declare_Variable	Any
0258 00d8       |    |		Load_Top	At_Offset_0
0259 1c00       |    |		Execute_Immediate	Run_Utility,0x0
025a e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0x3 = 0x25a,0xfffc
025b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
025c 02c7       |    |		Declare_Variable	Any
025d 00d8       |    |		Load_Top	At_Offset_0
025e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
025f e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0x4 = 0x25f,0xfffb
0260 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0261 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0262 02c7       |    |		Declare_Variable	Any
0263 00d8       |    |		Load_Top	At_Offset_0
0264 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0265 e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0x5 = 0x265,0xfffa
0266 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0267			BODY_0248:
0267 7846       |xF  |		Jump	0x2ae
0268 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x6 = 0x268,0x2
0269 e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0x7 = 0x269,0x401
026a 0217       |    |		Execute	Heap_Access,All_Reference
026b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
026c e004       |    |		Load	0x0,0x4								; Debug Table 0x6.0x8 = 0x26c,0x2
026d 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
026e c403       |    |		Store	0x2,0x3
026f e403       |    |		Load	0x2,0x3								; Debug Table 0x6.0x9 = 0x26f,0x3
0270 e002       |    |		Load	0x0,0x2
0271 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0272 7036       |p6  |		Jump_Nonzero	0x2a9
0273 e403       |    |		Load	0x2,0x3								; Debug Table 0x6.0xa = 0x273,0x4
0274 e002       |    |		Load	0x0,0x2
0275 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0276 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0277 c404       |    |		Store	0x2,0x4
0278 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0xb = 0x278,0x5
0279 e404       |    |		Load	0x2,0x4
027a e002       |    |		Load	0x0,0x2
027b 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
027c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
027d 6827       |h'  |		Jump_Zero	0x2a5
027e e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0xc = 0x27e,0x6
027f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0280 00da       |    |		Load_Top	At_Offset_2
0281 0120       |    |		Execute	Any,Is_Value
0282 6804       |h   |		Jump_Zero	0x287
0283 e002       |    |		Load	0x0,0x2
0284 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0285 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0286 7801       |x   |		Jump	0x288
0287 00da       |    |		Load_Top	At_Offset_2
0288 6083       |`   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
0289 e5ff       |    |		Load	0x2,-0x1
028a 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
028b e404       |    |		Load	0x2,0x4
028c e002       |    |		Load	0x0,0x2
028d 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
028e 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
028f c406       |    |		Store	0x2,0x6
0290 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0291 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0xd = 0x291,0x7
0292 7016       |p   |		Jump_Nonzero	0x2a9
0293 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0xe = 0x293,0x8
0294 e002       |    |		Load	0x0,0x2
0295 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0296 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0297 c405       |    |		Store	0x2,0x5
0298 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0xf = 0x298,0x9
0299 e002       |    |		Load	0x0,0x2
029a 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
029b 700d       |p   |		Jump_Nonzero	0x2a9
029c e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6.0x10 = 0x29c,0xa
029d 00db       |    |		Load_Top	At_Offset_3
029e 820f       |    |		Call	0x1,0xf
029f 00d1       |    |		Pop_Control	Pop_Count_1
02a0 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6.0x11 = 0x2a0,0xb
02a1 00db       |    |		Load_Top	At_Offset_3
02a2 8210       |    |		Call	0x1,0x10
02a3 00d1       |    |		Pop_Control	Pop_Count_1
02a4 7804       |x   |		Jump	0x2a9
02a5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6.0x12 = 0x2a5,0xc
02a6 e403       |    |		Load	0x2,0x3
02a7 8210       |    |		Call	0x1,0x10
02a8 00d1       |    |		Pop_Control	Pop_Count_1
02a9 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x13 = 0x2a9,0xd
02aa e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0x14 = 0x2aa,0x801
02ab 0217       |    |		Execute	Heap_Access,All_Reference
02ac 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02ad a402       |    |		Store_Unchecked	0x2,0x2							; Debug Table 0x6.0x15 = 0x2ad,0xd
02ae 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x16 = 0x2ae,0x1
02af e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0x17 = 0x2af,0xc01
02b0 021d       |    |		Execute	Heap_Access,Is_Null
02b1 6fb6       |o   |		Jump_Zero	0x268							; Debug Table 0x6.0x18 = 0x2b1,0x1
02b2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02b3 0000 0000  |    |		.BLANK	0000[0x5]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb       |    |		.CONST	0x02bb								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0001       |    |		.CONST	0x0001								; Number of locals
02bb			BODY_02b8:
02bb			INIT_02b8:
02bb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x02bb,0x07ea,0x0002,0x0000,0x0057,0x99d5,0x0000,0x02db
													; Debug Table 0x7.0x0 = 0x2bb,0x1
02bc 01d9       |    |		Execute	Vector,Reverse_Bounds
02bd 0263       | c  |		Execute	Discrete,Above_Bound
02be 7019       |p   |		Jump_Nonzero	0x2d8
02bf 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x1 = 0x2bf,0x2
02c0 e5ff       |    |		Load	0x2,-0x1
02c1 01d7       |    |		Execute	Vector,Field_Read
02c2 0b20       |    |		Execute_Immediate	Case_Compare,0x20
02c3 7012       |p   |		Jump_Nonzero	0x2d6
02c4 0b2d       | -  |		Execute_Immediate	Case_Compare,0x2d
02c5 7002       |p   |		Jump_Nonzero	0x2c8
02c6 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x2 = 0x2c6,0x5
02c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02c8 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x3 = 0x2c8,0x4
02c9 e5ff       |    |		Load	0x2,-0x1
02ca 01dc       |    |		Execute	Vector,Last
02cb 027c       | |  |		Execute	Discrete,Less
02cc 6807       |h   |		Jump_Zero	0x2d4
02cd 00d9       |    |		Load_Top	At_Offset_1
02ce 0a01       |    |		Execute_Immediate	Plus,0x1
02cf 0248       | H  |		Execute	Discrete,Check_In_Integer
02d0 e5ff       |    |		Load	0x2,-0x1
02d1 01d7       |    |		Execute	Vector,Field_Read
02d2 0f2d       | -  |		Execute_Immediate	Equal,0x2d
02d3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d4 4800       |H   |		Short_Literal	0x0
02d5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d6 00d1       |    |		Pop_Control	Pop_Count_1
02d7 3fe7       |?   |		Loop_Increasing	0x2bf
02d8 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x4 = 0x2d8,0x6
02d9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02da 0000 0000  |    |		.BLANK	0000[0x6]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e8       |    |		.CONST	0x02e8								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0002       |    |		.CONST	0x0002								; Number of locals
02e3			INIT_02e0:
02e3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x8 = .DEBUG	0x02e3,0x07f6,0x0002,0x0000,0x0057,0x99d5,0x0000,0x031c
													; Debug Table 0x8.0x0 = 0x2e3,0xffff
02e4 00db       |    |		Load_Top	At_Offset_3
02e5 00eb       |    |		Load_Encached	Diana_Cache
02e6 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
02e7 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02e8			BODY_02e0:
02e8 0007       |    |		Action	Break_Optional							; Debug Table 0x8.0x1 = 0x2e8,0x1
02e9 e402       |    |		Load	0x2,0x2								; Debug Table 0x8.0x2 = 0x2e9,0x401
02ea 0007       |    |		Action	Break_Optional
02eb 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x8.0x3 = 0x2eb,0x402
02ec 0007       |    |		Action	Break_Optional							; Debug Table 0x8.0x4 = 0x2ec,0x403
02ed 0007       |    |		Action	Break_Optional							; Debug Table 0x8.0x5 = 0x2ed,0x404
02ee 0b12       |    |		Execute_Immediate	Case_Compare,0x12				; Debug Table 0x8.0x6 = 0x2ee,0x1
02ef 7006       |p   |		Jump_Nonzero	0x2f6
02f0 0ba6       |    |		Execute_Immediate	Case_Compare,0xa6
02f1 7004       |p   |		Jump_Nonzero	0x2f6
02f2 0b8a       |    |		Execute_Immediate	Case_Compare,0x8a
02f3 7004       |p   |		Jump_Nonzero	0x2f8
02f4 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x7 = 0x2f4,0x4
02f5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02f6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0x8 = 0x2f6,0x2
02f7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02f8 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x8.0x9 = 0x2f8,0x3
02f9 00eb       |    |		Load_Encached	Diana_Cache
02fa 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
02fb 00eb       |    |		Load_Encached	Diana_Cache
02fc 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
02fd e404       |    |		Load	0x2,0x4								; Debug Table 0x8.0xa = 0x2fd,0x801
02fe 0007       |    |		Action	Break_Optional
02ff 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x8.0xb = 0x2ff,0x802
0300 0007       |    |		Action	Break_Optional							; Debug Table 0x8.0xc = 0x300,0x803
0301 00d0       |    |		Action	Swap_Control							; Debug Table 0x8.0xd = 0x301,0x804
0302 00d1       |    |		Pop_Control	Pop_Count_1
0303 0f62       | b  |		Execute_Immediate	Equal,0x62					; Debug Table 0x8.0xe = 0x303,0x3
0304 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0305 0000 0000  |    |		.XXX[0x3]
0307 0000       |    |
0308 0000 0000  |    |		.LITERAL	{0x00000000, 0x57977501}
030c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0318       |    |		.CONST	0x0318								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0002       |    |		.CONST	0x0002								; Number of locals
0313			INIT_0310:
0313 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9 = .DEBUG	0x0313,0x0816,0x0002,0x0000,0x0057,0x99d5,0x0000,0x036e
													; Debug Table 0x9.0x0 = 0x313,0xffff
0314 00db       |    |		Load_Top	At_Offset_3
0315 00eb       |    |		Load_Encached	Diana_Cache
0316 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0317 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0318			BODY_0310:
0318 0007       |    |		Action	Break_Optional							; Debug Table 0x9.0x1 = 0x318,0x1
0319 e402       |    |		Load	0x2,0x2								; Debug Table 0x9.0x2 = 0x319,0x401
031a 0007       |    |		Action	Break_Optional
031b 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x9.0x3 = 0x31b,0x402
031c 0007       |    |		Action	Break_Optional							; Debug Table 0x9.0x4 = 0x31c,0x403
031d 0007       |    |		Action	Break_Optional							; Debug Table 0x9.0x5 = 0x31d,0x404
031e 0b12       |    |		Execute_Immediate	Case_Compare,0x12				; Debug Table 0x9.0x6 = 0x31e,0x1
031f 7004       |p   |		Jump_Nonzero	0x324
0320 0b8a       |    |		Execute_Immediate	Case_Compare,0x8a
0321 7004       |p   |		Jump_Nonzero	0x326
0322 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x7 = 0x322,0x4
0323 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0324 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0x8 = 0x324,0x2
0325 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0326 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x9 = 0x326,0x3
0327 00eb       |    |		Load_Encached	Diana_Cache
0328 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0329 00eb       |    |		Load_Encached	Diana_Cache
032a 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
032b e404       |    |		Load	0x2,0x4								; Debug Table 0x9.0xa = 0x32b,0x801
032c 0007       |    |		Action	Break_Optional
032d 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x9.0xb = 0x32d,0x802
032e 0007       |    |		Action	Break_Optional							; Debug Table 0x9.0xc = 0x32e,0x803
032f 00d0       |    |		Action	Swap_Control							; Debug Table 0x9.0xd = 0x32f,0x804
0330 00d1       |    |		Pop_Control	Pop_Count_1
0331 0f01       |    |		Execute_Immediate	Equal,0x1					; Debug Table 0x9.0xe = 0x331,0x3
0332 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0333 0000 0000  |    |		.BLANK	0000[0x5]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033f       | ?  |		.CONST	0x033f								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 0003       |    |		.CONST	0x0003								; Number of locals
033b			INIT_0338:
033b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa = .DEBUG	0x033b,0x0836,0x0002,0x0000,0x0057,0x99d5,0x0000,0x03bd
													; Debug Table 0xa.0x0 = 0x33b,0xffff
033c 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa.0x1 = 0x33c,0xfffe
033d e5ff       |    |		Load	0x2,-0x1
033e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
033f			BODY_0338:
033f 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x2 = 0x33f,0x1
0340 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x3 = 0x340,0x2
0341 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0342 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x4 = 0x342,0x3
0343 00eb       |    |		Load_Encached	Diana_Cache
0344 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0345 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0346 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x5 = 0x346,0x4
0347 e403       |    |		Load	0x2,0x3								; Debug Table 0xa.0x6 = 0x347,0x401
0348 0007       |    |		Action	Break_Optional
0349 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xa.0x7 = 0x349,0x402
034a 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x8 = 0x34a,0x403
034b 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x9 = 0x34b,0x404
034c 0b5b       | [  |		Execute_Immediate	Case_Compare,0x5b				; Debug Table 0xa.0xa = 0x34c,0x4
034d 7018       |p   |		Jump_Nonzero	0x366
034e 0b10       |    |		Execute_Immediate	Case_Compare,0x10
034f 7016       |p   |		Jump_Nonzero	0x366
0350 0b66       | f  |		Execute_Immediate	Case_Compare,0x66
0351 7014       |p   |		Jump_Nonzero	0x366
0352 0b0a       |    |		Execute_Immediate	Case_Compare,0xa
0353 7012       |p   |		Jump_Nonzero	0x366
0354 0b05       |    |		Execute_Immediate	Case_Compare,0x5
0355 7010       |p   |		Jump_Nonzero	0x366
0356 0b0e       |    |		Execute_Immediate	Case_Compare,0xe
0357 700e       |p   |		Jump_Nonzero	0x366
0358 0b0f       |    |		Execute_Immediate	Case_Compare,0xf
0359 700c       |p   |		Jump_Nonzero	0x366
035a 0b7e       | ~  |		Execute_Immediate	Case_Compare,0x7e
035b 700a       |p   |		Jump_Nonzero	0x366
035c 0b7d       | }  |		Execute_Immediate	Case_Compare,0x7d
035d 7008       |p   |		Jump_Nonzero	0x366
035e 0b7f       |    |		Execute_Immediate	Case_Compare,0x7f
035f 7006       |p   |		Jump_Nonzero	0x366
0360 0b88       |    |		Execute_Immediate	Case_Compare,0x88
0361 7004       |p   |		Jump_Nonzero	0x366
0362 0b12       |    |		Execute_Immediate	Case_Compare,0x12
0363 7009       |p   |		Jump_Nonzero	0x36d
0364 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0xb = 0x364,0x7
0365 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0366 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0xc = 0x366,0x5
0367 00eb       |    |		Load_Encached	Diana_Cache
0368 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
0369 00db       |    |		Load_Top	At_Offset_3
036a 021f       |    |		Execute	Heap_Access,Equal
036b 0f00       |    |		Execute_Immediate	Equal,0x0
036c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
036d 00d1       |    |		Pop_Control	Pop_Count_1
036e 7fd1       |    |		Jump	0x340
036f 0000       |    |		.XXX[0x1]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0376       | v  |		.CONST	0x0376								; Address of begin
0371 0004       |    |		.CONST	0x0004								; Address of exception handler
0372 0002       |    |		.CONST	0x0002								; Number of locals
0373			INIT_0370:
0373 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xb = .DEBUG	0x0373,0x0852,0x0002,0x0000,0x0057,0x99d5,0x0000,0x042c
													; Debug Table 0xb.0x0 = 0x373,0xffff
0374 00db       |    |		Load_Top	At_Offset_3
0375 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0376			BODY_0370:
0376 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x1 = 0x376,0x1
0377 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x2 = 0x377,0x2
0378 00eb       |    |		Load_Encached	Diana_Cache
0379 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
037a 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
037b 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x3 = 0x37b,0x3
037c e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0x4 = 0x37c,0x401
037d 0007       |    |		Action	Break_Optional
037e 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xb.0x5 = 0x37e,0x402
037f 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x6 = 0x37f,0x403
0380 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x7 = 0x380,0x404
0381 0b5c       | \  |		Execute_Immediate	Case_Compare,0x5c				; Debug Table 0xb.0x8 = 0x381,0x3
0382 700a       |p   |		Jump_Nonzero	0x38d
0383 0b9f       |    |		Execute_Immediate	Case_Compare,0x9f
0384 700a       |p   |		Jump_Nonzero	0x38f
0385 0b12       |    |		Execute_Immediate	Case_Compare,0x12
0386 7020       |p   |		Jump_Nonzero	0x3a7
0387 0b8a       |    |		Execute_Immediate	Case_Compare,0x8a
0388 701e       |p   |		Jump_Nonzero	0x3a7
0389 0b80       |    |		Execute_Immediate	Case_Compare,0x80
038a 7011       |p   |		Jump_Nonzero	0x39c
038b 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x9 = 0x38b,0x8
038c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
038d 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0xa = 0x38d,0x4
038e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
038f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0xb = 0x38f,0x5
0390 00eb       |    |		Load_Encached	Diana_Cache
0391 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0392 00eb       |    |		Load_Encached	Diana_Cache
0393 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0394 e404       |    |		Load	0x2,0x4								; Debug Table 0xb.0xc = 0x394,0x801
0395 0007       |    |		Action	Break_Optional
0396 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xb.0xd = 0x396,0x802
0397 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0xe = 0x397,0x803
0398 00d0       |    |		Action	Swap_Control							; Debug Table 0xb.0xf = 0x398,0x804
0399 00d1       |    |		Pop_Control	Pop_Count_1
039a 0f4e       | N  |		Execute_Immediate	Equal,0x4e					; Debug Table 0xb.0x10 = 0x39a,0x5
039b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
039c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0x11 = 0x39c,0x7
039d 00eb       |    |		Load_Encached	Diana_Cache
039e 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
039f e404       |    |		Load	0x2,0x4								; Debug Table 0xb.0x12 = 0x39f,0xc01
03a0 0007       |    |		Action	Break_Optional
03a1 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xb.0x13 = 0x3a1,0xc02
03a2 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x14 = 0x3a2,0xc03
03a3 00d0       |    |		Action	Swap_Control							; Debug Table 0xb.0x15 = 0x3a3,0xc04
03a4 00d1       |    |		Pop_Control	Pop_Count_1
03a5 0f37       | 7  |		Execute_Immediate	Equal,0x37					; Debug Table 0xb.0x16 = 0x3a5,0x7
03a6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03a7 00d1       |    |		Pop_Control	Pop_Count_1
03a8 7fce       |    |		Jump	0x377
03a9 0000 0000  |    |		.BLANK	0000[0x7]
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03b7       |    |		.CONST	0x03b7								; Address of begin
03b1 0004       |    |		.CONST	0x0004								; Address of exception handler
03b2 0003       |    |		.CONST	0x0003								; Number of locals
03b3			INIT_03b0:
03b3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xc = .DEBUG	0x03b3,0x0882,0x0002,0x0000,0x0057,0x99d5,0x0000,0x04a2
													; Debug Table 0xc.0x0 = 0x3b3,0xffff
03b4 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xc.0x1 = 0x3b4,0xfffe
03b5 e5ff       |    |		Load	0x2,-0x1
03b6 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
03b7			BODY_03b0:
03b7 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x2 = 0x3b7,0x1
03b8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x3 = 0x3b8,0x2
03b9 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
03ba 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x4 = 0x3ba,0x3
03bb 00eb       |    |		Load_Encached	Diana_Cache
03bc 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
03bd 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
03be 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x5 = 0x3be,0x4
03bf e403       |    |		Load	0x2,0x3								; Debug Table 0xc.0x6 = 0x3bf,0x401
03c0 0007       |    |		Action	Break_Optional
03c1 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xc.0x7 = 0x3c1,0x402
03c2 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x8 = 0x3c2,0x403
03c3 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x9 = 0x3c3,0x404
03c4 0b12       |    |		Execute_Immediate	Case_Compare,0x12				; Debug Table 0xc.0xa = 0x3c4,0x4
03c5 7025       |p%  |		Jump_Nonzero	0x3eb
03c6 0b36       | 6  |		Execute_Immediate	Case_Compare,0x36
03c7 7008       |p   |		Jump_Nonzero	0x3d0
03c8 0ba9       |    |		Execute_Immediate	Case_Compare,0xa9
03c9 700c       |p   |		Jump_Nonzero	0x3d6
03ca 0b93       |    |		Execute_Immediate	Case_Compare,0x93
03cb 7012       |p   |		Jump_Nonzero	0x3de
03cc 0b85       |    |		Execute_Immediate	Case_Compare,0x85
03cd 701b       |p   |		Jump_Nonzero	0x3e9
03ce 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0xb = 0x3ce,0xb
03cf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03d0 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0xc = 0x3d0,0x6
03d1 00eb       |    |		Load_Encached	Diana_Cache
03d2 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
03d3 00db       |    |		Load_Top	At_Offset_3
03d4 021f       |    |		Execute	Heap_Access,Equal
03d5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03d6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0xd = 0x3d6,0x7
03d7 00eb       |    |		Load_Encached	Diana_Cache
03d8 18b2       |    |		Execute	Package,Field_Execute,Field_Number 0xb2
03d9 00db       |    |		Load_Top	At_Offset_3
03da 021f       |    |		Execute	Heap_Access,Equal
03db 700f       |p   |		Jump_Nonzero	0x3eb
03dc 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0xe = 0x3dc,0x8
03dd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03de 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0xf = 0x3de,0x9
03df 00eb       |    |		Load_Encached	Diana_Cache
03e0 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
03e1 e405       |    |		Load	0x2,0x5								; Debug Table 0xc.0x10 = 0x3e1,0x801
03e2 0007       |    |		Action	Break_Optional
03e3 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xc.0x11 = 0x3e3,0x802
03e4 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x12 = 0x3e4,0x803
03e5 00d0       |    |		Action	Swap_Control							; Debug Table 0xc.0x13 = 0x3e5,0x804
03e6 00d1       |    |		Pop_Control	Pop_Count_1
03e7 0f40       | @  |		Execute_Immediate	Equal,0x40					; Debug Table 0xc.0x14 = 0x3e7,0x9
03e8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03e9 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x15 = 0x3e9,0xa
03ea 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03eb 00d1       |    |		Pop_Control	Pop_Count_1
03ec 7fcb       |    |		Jump	0x3b8
03ed 0000 0000  |    |		.XXX[0x3]
03ef 0000       |    |
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f7       |    |		.CONST	0x03f7								; Address of begin
03f1 0004       |    |		.CONST	0x0004								; Address of exception handler
03f2 0003       |    |		.CONST	0x0003								; Number of locals
03f3			INIT_03f0:
03f3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd = .DEBUG	0x03f3,0x08b0,0x0002,0x0000,0x0057,0x99d5,0x0000,0x0528
													; Debug Table 0xd.0x0 = 0x3f3,0xffff
03f4 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd.0x1 = 0x3f4,0xfffe
03f5 e5ff       |    |		Load	0x2,-0x1
03f6 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
03f7			BODY_03f0:
03f7 0007       |    |		Action	Break_Optional							; Debug Table 0xd.0x2 = 0x3f7,0x1
03f8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x3 = 0x3f8,0x2
03f9 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
03fa 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x4 = 0x3fa,0x3
03fb 00eb       |    |		Load_Encached	Diana_Cache
03fc 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
03fd 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
03fe 0007       |    |		Action	Break_Optional							; Debug Table 0xd.0x5 = 0x3fe,0x4
03ff e403       |    |		Load	0x2,0x3								; Debug Table 0xd.0x6 = 0x3ff,0x401
0400 0007       |    |		Action	Break_Optional
0401 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xd.0x7 = 0x401,0x402
0402 0007       |    |		Action	Break_Optional							; Debug Table 0xd.0x8 = 0x402,0x403
0403 0007       |    |		Action	Break_Optional							; Debug Table 0xd.0x9 = 0x403,0x404
0404 0b12       |    |		Execute_Immediate	Case_Compare,0x12				; Debug Table 0xd.0xa = 0x404,0x4
0405 702c       |p,  |		Jump_Nonzero	0x432
0406 0b85       |    |		Execute_Immediate	Case_Compare,0x85
0407 700a       |p   |		Jump_Nonzero	0x412
0408 0b45       | E  |		Execute_Immediate	Case_Compare,0x45
0409 7008       |p   |		Jump_Nonzero	0x412
040a 0b80       |    |		Execute_Immediate	Case_Compare,0x80
040b 7008       |p   |		Jump_Nonzero	0x414
040c 0ba9       |    |		Execute_Immediate	Case_Compare,0xa9
040d 7011       |p   |		Jump_Nonzero	0x41f
040e 0b93       |    |		Execute_Immediate	Case_Compare,0x93
040f 7017       |p   |		Jump_Nonzero	0x427
0410 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0xb = 0x410,0xb
0411 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0412 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0xc = 0x412,0x6
0413 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0414 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0xd = 0x414,0x7
0415 00eb       |    |		Load_Encached	Diana_Cache
0416 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0417 e405       |    |		Load	0x2,0x5								; Debug Table 0xd.0xe = 0x417,0x801
0418 0007       |    |		Action	Break_Optional
0419 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xd.0xf = 0x419,0x802
041a 0007       |    |		Action	Break_Optional							; Debug Table 0xd.0x10 = 0x41a,0x803
041b 00d0       |    |		Action	Swap_Control							; Debug Table 0xd.0x11 = 0x41b,0x804
041c 00d1       |    |		Pop_Control	Pop_Count_1
041d 0f3e       | >  |		Execute_Immediate	Equal,0x3e					; Debug Table 0xd.0x12 = 0x41d,0x7
041e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
041f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x13 = 0x41f,0x8
0420 00eb       |    |		Load_Encached	Diana_Cache
0421 18b2       |    |		Execute	Package,Field_Execute,Field_Number 0xb2
0422 00db       |    |		Load_Top	At_Offset_3
0423 021f       |    |		Execute	Heap_Access,Equal
0424 700d       |p   |		Jump_Nonzero	0x432
0425 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x14 = 0x425,0x9
0426 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0427 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x15 = 0x427,0xa
0428 00eb       |    |		Load_Encached	Diana_Cache
0429 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
042a e405       |    |		Load	0x2,0x5								; Debug Table 0xd.0x16 = 0x42a,0xc01
042b 0007       |    |		Action	Break_Optional
042c 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xd.0x17 = 0x42c,0xc02
042d 0007       |    |		Action	Break_Optional							; Debug Table 0xd.0x18 = 0x42d,0xc03
042e 00d0       |    |		Action	Swap_Control							; Debug Table 0xd.0x19 = 0x42e,0xc04
042f 00d1       |    |		Pop_Control	Pop_Count_1
0430 0f40       | @  |		Execute_Immediate	Equal,0x40					; Debug Table 0xd.0x1a = 0x430,0xa
0431 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0432 00d1       |    |		Pop_Control	Pop_Count_1
0433 7fc4       |    |		Jump	0x3f8
0434 0000 0000  |    |		.BLANK	0000[0x4]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043f       | ?  |		.CONST	0x043f								; Address of begin
0439 0004       |    |		.CONST	0x0004								; Address of exception handler
043a 0003       |    |		.CONST	0x0003								; Number of locals
043b			INIT_0438:
043b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xe = .DEBUG	0x043b,0x08e8,0x0002,0x0000,0x0057,0x99d5,0x0000,0x05b8
													; Debug Table 0xe.0x0 = 0x43b,0xffff
043c 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xe.0x1 = 0x43c,0xfffe
043d e5ff       |    |		Load	0x2,-0x1
043e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
043f			BODY_0438:
043f 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0x2 = 0x43f,0x1
0440 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x3 = 0x440,0x2
0441 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0442 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x4 = 0x442,0x3
0443 00eb       |    |		Load_Encached	Diana_Cache
0444 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0445 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0446 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0x5 = 0x446,0x4
0447 e403       |    |		Load	0x2,0x3								; Debug Table 0xe.0x6 = 0x447,0x401
0448 0007       |    |		Action	Break_Optional
0449 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xe.0x7 = 0x449,0x402
044a 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0x8 = 0x44a,0x403
044b 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0x9 = 0x44b,0x404
044c 0b12       |    |		Execute_Immediate	Case_Compare,0x12				; Debug Table 0xe.0xa = 0x44c,0x4
044d 703d       |p=  |		Jump_Nonzero	0x48b
044e 0b66       | f  |		Execute_Immediate	Case_Compare,0x66
044f 701a       |p   |		Jump_Nonzero	0x46a
0450 0b05       |    |		Execute_Immediate	Case_Compare,0x5
0451 7018       |p   |		Jump_Nonzero	0x46a
0452 0b0a       |    |		Execute_Immediate	Case_Compare,0xa
0453 7016       |p   |		Jump_Nonzero	0x46a
0454 0b0e       |    |		Execute_Immediate	Case_Compare,0xe
0455 7014       |p   |		Jump_Nonzero	0x46a
0456 0b0f       |    |		Execute_Immediate	Case_Compare,0xf
0457 7012       |p   |		Jump_Nonzero	0x46a
0458 0b7e       | ~  |		Execute_Immediate	Case_Compare,0x7e
0459 7010       |p   |		Jump_Nonzero	0x46a
045a 0b7f       |    |		Execute_Immediate	Case_Compare,0x7f
045b 700e       |p   |		Jump_Nonzero	0x46a
045c 0b7d       | }  |		Execute_Immediate	Case_Compare,0x7d
045d 700c       |p   |		Jump_Nonzero	0x46a
045e 0b88       |    |		Execute_Immediate	Case_Compare,0x88
045f 700a       |p   |		Jump_Nonzero	0x46a
0460 0b06       |    |		Execute_Immediate	Case_Compare,0x6
0461 700e       |p   |		Jump_Nonzero	0x470
0462 0b8e       |    |		Execute_Immediate	Case_Compare,0x8e
0463 7012       |p   |		Jump_Nonzero	0x476
0464 0ba9       |    |		Execute_Immediate	Case_Compare,0xa9
0465 7012       |p   |		Jump_Nonzero	0x478
0466 0b93       |    |		Execute_Immediate	Case_Compare,0x93
0467 7018       |p   |		Jump_Nonzero	0x480
0468 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0xb = 0x468,0xc
0469 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
046a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0xc = 0x46a,0x6
046b 00eb       |    |		Load_Encached	Diana_Cache
046c 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
046d 00db       |    |		Load_Top	At_Offset_3
046e 021f       |    |		Execute	Heap_Access,Equal
046f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0470 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0xd = 0x470,0x7
0471 00eb       |    |		Load_Encached	Diana_Cache
0472 18e7       |    |		Execute	Package,Field_Execute,Field_Number 0xe7
0473 00db       |    |		Load_Top	At_Offset_3
0474 021f       |    |		Execute	Heap_Access,Equal
0475 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0476 4801       |H   |		Short_Literal	0x1							; Debug Table 0xe.0xe = 0x476,0x8
0477 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0478 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0xf = 0x478,0x9
0479 00eb       |    |		Load_Encached	Diana_Cache
047a 18b2       |    |		Execute	Package,Field_Execute,Field_Number 0xb2
047b 00db       |    |		Load_Top	At_Offset_3
047c 021f       |    |		Execute	Heap_Access,Equal
047d 700d       |p   |		Jump_Nonzero	0x48b
047e 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x10 = 0x47e,0xa
047f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0480 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x11 = 0x480,0xb
0481 00eb       |    |		Load_Encached	Diana_Cache
0482 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0483 e405       |    |		Load	0x2,0x5								; Debug Table 0xe.0x12 = 0x483,0x801
0484 0007       |    |		Action	Break_Optional
0485 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xe.0x13 = 0x485,0x802
0486 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0x14 = 0x486,0x803
0487 00d0       |    |		Action	Swap_Control							; Debug Table 0xe.0x15 = 0x487,0x804
0488 00d1       |    |		Pop_Control	Pop_Count_1
0489 0f40       | @  |		Execute_Immediate	Equal,0x40					; Debug Table 0xe.0x16 = 0x489,0xb
048a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
048b 00d1       |    |		Pop_Control	Pop_Count_1
048c 7fb3       |    |		Jump	0x440
048d 0000 0000  |    |		.XXX[0x3]
048f 0000       |    |
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0497       |    |		.CONST	0x0497								; Address of begin
0491 0004       |    |		.CONST	0x0004								; Address of exception handler
0492 0003       |    |		.CONST	0x0003								; Number of locals
0493			INIT_0490:
0493 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xf = .DEBUG	0x0493,0x0918,0x0002,0x0000,0x0057,0x99d5,0x0000,0x0667
													; Debug Table 0xf.0x0 = 0x493,0xffff
0494 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xf.0x1 = 0x494,0xfffe
0495 e5ff       |    |		Load	0x2,-0x1
0496 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0497			BODY_0490:
0497 0007       |    |		Action	Break_Optional							; Debug Table 0xf.0x2 = 0x497,0x1
0498 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x3 = 0x498,0x2
0499 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
049a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x4 = 0x49a,0x3
049b 00eb       |    |		Load_Encached	Diana_Cache
049c 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
049d 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
049e 0007       |    |		Action	Break_Optional							; Debug Table 0xf.0x5 = 0x49e,0x4
049f e403       |    |		Load	0x2,0x3								; Debug Table 0xf.0x6 = 0x49f,0x401
04a0 0007       |    |		Action	Break_Optional
04a1 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xf.0x7 = 0x4a1,0x402
04a2 0007       |    |		Action	Break_Optional							; Debug Table 0xf.0x8 = 0x4a2,0x403
04a3 0007       |    |		Action	Break_Optional							; Debug Table 0xf.0x9 = 0x4a3,0x404
04a4 0b5b       | [  |		Execute_Immediate	Case_Compare,0x5b				; Debug Table 0xf.0xa = 0x4a4,0x4
04a5 7012       |p   |		Jump_Nonzero	0x4b8
04a6 0b53       | S  |		Execute_Immediate	Case_Compare,0x53
04a7 7010       |p   |		Jump_Nonzero	0x4b8
04a8 0b12       |    |		Execute_Immediate	Case_Compare,0x12
04a9 703c       |p<  |		Jump_Nonzero	0x4e6
04aa 0b80       |    |		Execute_Immediate	Case_Compare,0x80
04ab 7012       |p   |		Jump_Nonzero	0x4be
04ac 0b8e       |    |		Execute_Immediate	Case_Compare,0x8e
04ad 701b       |p   |		Jump_Nonzero	0x4c9
04ae 0ba9       |    |		Execute_Immediate	Case_Compare,0xa9
04af 701b       |p   |		Jump_Nonzero	0x4cb
04b0 0b93       |    |		Execute_Immediate	Case_Compare,0x93
04b1 7021       |p!  |		Jump_Nonzero	0x4d3
04b2 0b3d       | =  |		Execute_Immediate	Case_Compare,0x3d
04b3 702a       |p*  |		Jump_Nonzero	0x4de
04b4 0b85       |    |		Execute_Immediate	Case_Compare,0x85
04b5 702e       |p.  |		Jump_Nonzero	0x4e4
04b6 4800       |H   |		Short_Literal	0x0							; Debug Table 0xf.0xb = 0x4b6,0xe
04b7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04b8 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xf.0xc = 0x4b8,0x5
04b9 00eb       |    |		Load_Encached	Diana_Cache
04ba 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
04bb 00db       |    |		Load_Top	At_Offset_3
04bc 021f       |    |		Execute	Heap_Access,Equal
04bd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04be 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xf.0xd = 0x4be,0x7
04bf 00eb       |    |		Load_Encached	Diana_Cache
04c0 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
04c1 e405       |    |		Load	0x2,0x5								; Debug Table 0xf.0xe = 0x4c1,0x801
04c2 0007       |    |		Action	Break_Optional
04c3 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xf.0xf = 0x4c3,0x802
04c4 0007       |    |		Action	Break_Optional							; Debug Table 0xf.0x10 = 0x4c4,0x803
04c5 00d0       |    |		Action	Swap_Control							; Debug Table 0xf.0x11 = 0x4c5,0x804
04c6 00d1       |    |		Pop_Control	Pop_Count_1
04c7 0f3d       | =  |		Execute_Immediate	Equal,0x3d					; Debug Table 0xf.0x12 = 0x4c7,0x7
04c8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04c9 4801       |H   |		Short_Literal	0x1							; Debug Table 0xf.0x13 = 0x4c9,0x8
04ca 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04cb 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xf.0x14 = 0x4cb,0x9
04cc 00eb       |    |		Load_Encached	Diana_Cache
04cd 18b2       |    |		Execute	Package,Field_Execute,Field_Number 0xb2
04ce 00db       |    |		Load_Top	At_Offset_3
04cf 021f       |    |		Execute	Heap_Access,Equal
04d0 7015       |p   |		Jump_Nonzero	0x4e6
04d1 4800       |H   |		Short_Literal	0x0							; Debug Table 0xf.0x15 = 0x4d1,0xa
04d2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04d3 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xf.0x16 = 0x4d3,0xb
04d4 00eb       |    |		Load_Encached	Diana_Cache
04d5 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
04d6 e405       |    |		Load	0x2,0x5								; Debug Table 0xf.0x17 = 0x4d6,0xc01
04d7 0007       |    |		Action	Break_Optional
04d8 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xf.0x18 = 0x4d8,0xc02
04d9 0007       |    |		Action	Break_Optional							; Debug Table 0xf.0x19 = 0x4d9,0xc03
04da 00d0       |    |		Action	Swap_Control							; Debug Table 0xf.0x1a = 0x4da,0xc04
04db 00d1       |    |		Pop_Control	Pop_Count_1
04dc 0f40       | @  |		Execute_Immediate	Equal,0x40					; Debug Table 0xf.0x1b = 0x4dc,0xb
04dd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04de 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xf.0x1c = 0x4de,0xc
04df 00eb       |    |		Load_Encached	Diana_Cache
04e0 18e4       |    |		Execute	Package,Field_Execute,Field_Number 0xe4
04e1 00db       |    |		Load_Top	At_Offset_3
04e2 021f       |    |		Execute	Heap_Access,Equal
04e3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04e4 4801       |H   |		Short_Literal	0x1							; Debug Table 0xf.0x1d = 0x4e4,0xd
04e5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04e6 00d1       |    |		Pop_Control	Pop_Count_1
04e7 7fb0       |    |		Jump	0x498
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04ef       |    |		.CONST	0x04ef								; Address of begin
04e9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ea 0003       |    |		.CONST	0x0003								; Number of locals
04eb			INIT_04e8:
04eb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x10 = .DEBUG	0x04eb,0x0956,0x0002,0x0000,0x0057,0x99d5,0x0000,0x0721
													; Debug Table 0x10.0x0 = 0x4eb,0xffff
04ec 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x10.0x1 = 0x4ec,0xfffe
04ed e5ff       |    |		Load	0x2,-0x1
04ee 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
04ef			BODY_04e8:
04ef 0007       |    |		Action	Break_Optional							; Debug Table 0x10.0x2 = 0x4ef,0x1
04f0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x3 = 0x4f0,0x2
04f1 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
04f2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x4 = 0x4f2,0x3
04f3 00eb       |    |		Load_Encached	Diana_Cache
04f4 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
04f5 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
04f6 0007       |    |		Action	Break_Optional							; Debug Table 0x10.0x5 = 0x4f6,0x4
04f7 e403       |    |		Load	0x2,0x3								; Debug Table 0x10.0x6 = 0x4f7,0x401
04f8 0007       |    |		Action	Break_Optional
04f9 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x10.0x7 = 0x4f9,0x402
04fa 0007       |    |		Action	Break_Optional							; Debug Table 0x10.0x8 = 0x4fa,0x403
04fb 0007       |    |		Action	Break_Optional							; Debug Table 0x10.0x9 = 0x4fb,0x404
04fc 0b10       |    |		Execute_Immediate	Case_Compare,0x10				; Debug Table 0x10.0xa = 0x4fc,0x4
04fd 7010       |p   |		Jump_Nonzero	0x50e
04fe 0b12       |    |		Execute_Immediate	Case_Compare,0x12
04ff 703c       |p<  |		Jump_Nonzero	0x53c
0500 0b80       |    |		Execute_Immediate	Case_Compare,0x80
0501 7012       |p   |		Jump_Nonzero	0x514
0502 0b8e       |    |		Execute_Immediate	Case_Compare,0x8e
0503 701b       |p   |		Jump_Nonzero	0x51f
0504 0ba9       |    |		Execute_Immediate	Case_Compare,0xa9
0505 701b       |p   |		Jump_Nonzero	0x521
0506 0b93       |    |		Execute_Immediate	Case_Compare,0x93
0507 7021       |p!  |		Jump_Nonzero	0x529
0508 0b3d       | =  |		Execute_Immediate	Case_Compare,0x3d
0509 702a       |p*  |		Jump_Nonzero	0x534
050a 0b85       |    |		Execute_Immediate	Case_Compare,0x85
050b 702e       |p.  |		Jump_Nonzero	0x53a
050c 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0xb = 0x50c,0xe
050d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
050e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0xc = 0x50e,0x5
050f 00eb       |    |		Load_Encached	Diana_Cache
0510 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
0511 00db       |    |		Load_Top	At_Offset_3
0512 021f       |    |		Execute	Heap_Access,Equal
0513 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0514 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0xd = 0x514,0x7
0515 00eb       |    |		Load_Encached	Diana_Cache
0516 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0517 e405       |    |		Load	0x2,0x5								; Debug Table 0x10.0xe = 0x517,0x801
0518 0007       |    |		Action	Break_Optional
0519 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x10.0xf = 0x519,0x802
051a 0007       |    |		Action	Break_Optional							; Debug Table 0x10.0x10 = 0x51a,0x803
051b 00d0       |    |		Action	Swap_Control							; Debug Table 0x10.0x11 = 0x51b,0x804
051c 00d1       |    |		Pop_Control	Pop_Count_1
051d 0f3d       | =  |		Execute_Immediate	Equal,0x3d					; Debug Table 0x10.0x12 = 0x51d,0x7
051e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
051f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x13 = 0x51f,0x8
0520 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0521 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x14 = 0x521,0x9
0522 00eb       |    |		Load_Encached	Diana_Cache
0523 18b2       |    |		Execute	Package,Field_Execute,Field_Number 0xb2
0524 00db       |    |		Load_Top	At_Offset_3
0525 021f       |    |		Execute	Heap_Access,Equal
0526 7015       |p   |		Jump_Nonzero	0x53c
0527 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0x15 = 0x527,0xa
0528 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0529 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x16 = 0x529,0xb
052a 00eb       |    |		Load_Encached	Diana_Cache
052b 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
052c e405       |    |		Load	0x2,0x5								; Debug Table 0x10.0x17 = 0x52c,0xc01
052d 0007       |    |		Action	Break_Optional
052e 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x10.0x18 = 0x52e,0xc02
052f 0007       |    |		Action	Break_Optional							; Debug Table 0x10.0x19 = 0x52f,0xc03
0530 00d0       |    |		Action	Swap_Control							; Debug Table 0x10.0x1a = 0x530,0xc04
0531 00d1       |    |		Pop_Control	Pop_Count_1
0532 0f40       | @  |		Execute_Immediate	Equal,0x40					; Debug Table 0x10.0x1b = 0x532,0xb
0533 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0534 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x1c = 0x534,0xc
0535 00eb       |    |		Load_Encached	Diana_Cache
0536 18e4       |    |		Execute	Package,Field_Execute,Field_Number 0xe4
0537 00db       |    |		Load_Top	At_Offset_3
0538 021f       |    |		Execute	Heap_Access,Equal
0539 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
053a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x1d = 0x53a,0xd
053b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
053c 00d1       |    |		Pop_Control	Pop_Count_1
053d 7fb2       |    |		Jump	0x4f0
053e 0000 0000  |    |		.XXX[0x2]
0540 ; --------------------------------------------------------------------------------------
0540 ; SUBPROGRAM
0540 ; --------------------------------------------------------------------------------------
0540 0543       | C  |		.CONST	0x0543								; Address of begin
0541 0004       |    |		.CONST	0x0004								; Address of exception handler
0542 0001       |    |		.CONST	0x0001								; Number of locals
0543			BODY_0540:
0543			INIT_0540:
0543 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11 = .DEBUG	0x0543,0x0994,0x0002,0x0000,0x0057,0x99d5,0x0000,0x07d8
													; Debug Table 0x11.0x0 = 0x543,0x1
0544 4976       |Iv  |		Short_Literal	0x176
0545 00eb       |    |		Load_Encached	Diana_Cache
0546 0098       |    |		Execute	Package,Field_Read_Dynamic
0547 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0548 00db       |    |		Load_Top	At_Offset_3
0549 021f       |    |		Execute	Heap_Access,Equal
054a 6802       |h   |		Jump_Zero	0x54d
054b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x11.0x1 = 0x54b,0x2
054c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
054d 0007       |    |		Action	Break_Optional							; Debug Table 0x11.0x2 = 0x54d,0x3
054e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x3 = 0x54e,0x401
054f 0007       |    |		Action	Break_Optional
0550 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x11.0x4 = 0x550,0x402
0551 0007       |    |		Action	Break_Optional							; Debug Table 0x11.0x5 = 0x551,0x403
0552 0007       |    |		Action	Break_Optional							; Debug Table 0x11.0x6 = 0x552,0x404
0553 0b2c       | ,  |		Execute_Immediate	Case_Compare,0x2c				; Debug Table 0x11.0x7 = 0x553,0x3
0554 7028       |p(  |		Jump_Nonzero	0x57d
0555 0b1f       |    |		Execute_Immediate	Case_Compare,0x1f
0556 7026       |p&  |		Jump_Nonzero	0x57d
0557 0b21       | !  |		Execute_Immediate	Case_Compare,0x21
0558 7027       |p'  |		Jump_Nonzero	0x580
0559 0b33       | 3  |		Execute_Immediate	Case_Compare,0x33
055a 7025       |p%  |		Jump_Nonzero	0x580
055b 0b29       | )  |		Execute_Immediate	Case_Compare,0x29
055c 7026       |p&  |		Jump_Nonzero	0x583
055d 0b31       | 1  |		Execute_Immediate	Case_Compare,0x31
055e 7027       |p'  |		Jump_Nonzero	0x586
055f 0b30       | 0  |		Execute_Immediate	Case_Compare,0x30
0560 7025       |p%  |		Jump_Nonzero	0x586
0561 0b1d       |    |		Execute_Immediate	Case_Compare,0x1d
0562 7023       |p#  |		Jump_Nonzero	0x586
0563 0b28       | (  |		Execute_Immediate	Case_Compare,0x28
0564 7021       |p!  |		Jump_Nonzero	0x586
0565 0b23       | #  |		Execute_Immediate	Case_Compare,0x23
0566 701f       |p   |		Jump_Nonzero	0x586
0567 0b24       | $  |		Execute_Immediate	Case_Compare,0x24
0568 701d       |p   |		Jump_Nonzero	0x586
0569 0b25       | %  |		Execute_Immediate	Case_Compare,0x25
056a 701b       |p   |		Jump_Nonzero	0x586
056b 0b2f       | /  |		Execute_Immediate	Case_Compare,0x2f
056c 701c       |p   |		Jump_Nonzero	0x589
056d 0b2d       | -  |		Execute_Immediate	Case_Compare,0x2d
056e 701a       |p   |		Jump_Nonzero	0x589
056f 0b2a       | *  |		Execute_Immediate	Case_Compare,0x2a
0570 7018       |p   |		Jump_Nonzero	0x589
0571 0b2b       | +  |		Execute_Immediate	Case_Compare,0x2b
0572 7016       |p   |		Jump_Nonzero	0x589
0573 0b1c       |    |		Execute_Immediate	Case_Compare,0x1c
0574 7017       |p   |		Jump_Nonzero	0x58c
0575 0b1e       |    |		Execute_Immediate	Case_Compare,0x1e
0576 7018       |p   |		Jump_Nonzero	0x58f
0577 0b22       | "  |		Execute_Immediate	Case_Compare,0x22
0578 7019       |p   |		Jump_Nonzero	0x592
0579 0b20       |    |		Execute_Immediate	Case_Compare,0x20
057a 701a       |p   |		Jump_Nonzero	0x595
057b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x11.0x8 = 0x57b,0xd
057c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
057d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0x9 = 0x57d,0x4
057e 821a       |    |		Call	0x1,0x1a
057f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0580 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0xa = 0x580,0x5
0581 821b       |    |		Call	0x1,0x1b
0582 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0583 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0xb = 0x583,0x6
0584 8218       |    |		Call	0x1,0x18
0585 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0586 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0xc = 0x586,0x7
0587 8215       |    |		Call	0x1,0x15
0588 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0589 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0xd = 0x589,0x8
058a 8219       |    |		Call	0x1,0x19
058b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
058c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0xe = 0x58c,0x9
058d 8214       |    |		Call	0x1,0x14
058e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
058f e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0xf = 0x58f,0xa
0590 8213       |    |		Call	0x1,0x13
0591 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0592 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0x10 = 0x592,0xb
0593 8217       |    |		Call	0x1,0x17
0594 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0595 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0x11 = 0x595,0xc
0596 8216       |    |		Call	0x1,0x16
0597 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 05a8       |    |		.CONST	0x05a8								; Address of begin
0599 0004       |    |		.CONST	0x0004								; Address of exception handler
059a 0005       |    |		.CONST	0x0005								; Number of locals
059b			INIT_0598:
059b e001       |    |		Load	0x0,0x1								; Debug Table 0x12 = .DEBUG	0x059b,0x09ba,0x0001,0x0000,0x0057,0x99d5,0x0000,0x088e
													; Debug Table 0x12.0x0 = 0x59b,0xffff
059c 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
059d 0322       | "  |		Declare_Variable	Record
059e 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x12.0x1 = 0x59e,0xfffe
059f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12.0x2 = 0x59f,0xfffd
05a0 e5fe       |    |		Load	0x2,-0x2
05a1 e5fa       |    |		Load	0x2,-0x6
05a2 e00b       |    |		Load	0x0,0xb
05a3 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
05a4 00e2       |    |		Load_Encached	Integer_Cache
05a5 03f1       |    |		Declare_Variable	Discrete,With_Value
05a6 029f 05c3  |    |		Declare_Subprogram	INIT_05c0,For_Call
05a8			BODY_0598:
05a8 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x12.0x3 = 0x5a8,0x1
05a9 0d01       |    |		Execute_Immediate	Less,0x1
05aa 6801       |h   |		Jump_Zero	0x5ac
05ab 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8					; Debug Table 0x12.0x4 = 0x5ab,0x2
05ac e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x12.0x5 = 0x5ac,0x3
05ad e402       |    |		Load	0x2,0x2
05ae 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05af e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x12.0x6 = 0x5af,0x4
05b0 e402       |    |		Load	0x2,0x2
05b1 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
05b2 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x12.0x7 = 0x5b2,0x5
05b3 e402       |    |		Load	0x2,0x2
05b4 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05b5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x12.0x8 = 0x5b5,0x6
05b6 e402       |    |		Load	0x2,0x2
05b7 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
05b8 8405       |    |		Call	0x2,0x5								; Debug Table 0x12.0x9 = 0x5b8,0x7
05b9 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
05ba 0000 0000  |    |		.BLANK	0000[0x6]
05c0 ; --------------------------------------------------------------------------------------
05c0 ; SUBPROGRAM
05c0 ; --------------------------------------------------------------------------------------
05c0 05c3       |    |		.CONST	0x05c3								; Address of begin
05c1 05fb       |    |		.CONST	0x05fb								; Address of exception handler
05c2 0001       |    |		.CONST	0x0001								; Number of locals
05c3			BODY_05c0:
05c3			INIT_05c0:
05c3 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x13 = .DEBUG	0x05c3,0x09d0,0x0004,0x0000,0x0057,0x99d5,0x0000,0x0945
													; Debug Table 0x13.0x0 = 0x5c3,0x1
05c4 e402       |    |		Load	0x2,0x2
05c5 e001       |    |		Load	0x0,0x1
05c6 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
05c7 a403       |    |		Store_Unchecked	0x2,0x3
05c8 0007       |    |		Action	Break_Optional							; Debug Table 0x13.0x1 = 0x5c8,0x2
05c9 e403       |    |		Load	0x2,0x3								; Debug Table 0x13.0x2 = 0x5c9,0x401
05ca 021d       |    |		Execute	Heap_Access,Is_Null
05cb 702e       |p.  |		Jump_Nonzero	0x5fa							; Debug Table 0x13.0x3 = 0x5cb,0x2
05cc e403       |    |		Load	0x2,0x3
05cd 0007       |    |		Action	Break_Optional
05ce 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x4 = 0x5ce,0x801
05cf 0007       |    |		Action	Break_Optional
05d0 e603       |    |		Load	0x3,0x3								; Debug Table 0x13.0x5 = 0x5d0,0xc01
05d1 0007       |    |		Action	Break_Optional
05d2 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x13.0x6 = 0x5d2,0xc02
05d3 0007       |    |		Action	Break_Optional							; Debug Table 0x13.0x7 = 0x5d3,0xc03
05d4 00d0       |    |		Action	Swap_Control							; Debug Table 0x13.0x8 = 0x5d4,0xc04
05d5 00d1       |    |		Pop_Control	Pop_Count_1
05d6 49e1       |I   |		Short_Literal	0x1e1							; Debug Table 0x13.0x9 = 0x5d6,0x801
05d7 00eb       |    |		Load_Encached	Diana_Cache
05d8 0098       |    |		Execute	Package,Field_Read_Dynamic
05d9 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
05da 7800       |x   |		Jump	0x5db
05db 00d0       |    |		Action	Swap_Control
05dc 00d1       |    |		Pop_Control	Pop_Count_1
05dd 681c       |h   |		Jump_Zero	0x5fa							; Debug Table 0x13.0xa = 0x5dd,0x401
05de e403       |    |		Load	0x2,0x3
05df 00eb       |    |		Load_Encached	Diana_Cache
05e0 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
05e1 e5fb       |    |		Load	0x2,-0x5
05e2 00eb       |    |		Load_Encached	Diana_Cache
05e3 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
05e4 6815       |h   |		Jump_Zero	0x5fa
05e5 e403       |    |		Load	0x2,0x3
05e6 e00c       |    |		Load	0x0,0xc
05e7 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
05e8 7004       |p   |		Jump_Nonzero	0x5ed
05e9 e403       |    |		Load	0x2,0x3
05ea e00c       |    |		Load	0x0,0xc
05eb 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
05ec 7801       |x   |		Jump	0x5ee
05ed 4801       |H   |		Short_Literal	0x1
05ee 680b       |h   |		Jump_Zero	0x5fa
05ef e403       |    |		Load	0x2,0x3
05f0 e5fc       |    |		Load	0x2,-0x4
05f1 821c       |    |		Call	0x1,0x1c
05f2 6807       |h   |		Jump_Zero	0x5fa
05f3 e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x13.0xb = 0x5f3,0x3
05f4 e5f9       |    |		Load	0x2,-0x7
05f5 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
05f6 e403       |    |		Load	0x2,0x3
05f7 e00d       |    |		Load	0x0,0xd
05f8 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
05f9 00d1       |    |		Pop_Control	Pop_Count_1
05fa 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05fb			TRAP_05c0:
05fb 0007       |    |		Action	Break_Optional
05fc 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x13.0xc = 0x5fc,0x4
05fd ; --------------------------------------------------------------------------------------
05fd ; STRING TABLE
05fd ; --------------------------------------------------------------------------------------
05fd 000e       |    |		.STRTAB	0x000e->0x0604							; "can't open source unit "
05fe 0023       | #  |		.STRTAB	0x0023->0x060f							; " ("
05ff 0023       | #  |		.STRTAB	0x0023->0x0610							; ")"
0600 0022       | "  |		.STRTAB	0x0022->0x0611							; "Can't resolve "
0601 002e       | .  |		.STRTAB	0x002e->0x0618							; "Can't get object of "
0602 0040       | @  |		.STRTAB	0x0040->0x0622							; "can't check for subunits of "
0603 005a       | Z  |		.STREND 0x005a->0x0630
0604 6361 6e27  |can'|		.STRTAB_STRINGS
0630 ; --------------------------------------------------------------------------------------
0630 ; Debug Table
0630 ; --------------------------------------------------------------------------------------
0630 0003 0014  |    |		.CONST	0x0003,0x0014
0632 000b 06d2  |    |		.DEBUG	0x000b,0x06d2,0x0000,0x0000,0x0057,0x9775,0x0000,0x0574
063a 0010 06d8  |    |		.DEBUG	0x0010,0x06d8,0x0000,0x0000,0x0057,0x99d5,0x0000,0x000a
0642 003b 0704  | ;  |		.DEBUG	0x003b,0x0704,0x0001,0x0000,0x0057,0x9775,0x0000,0x0575
064a 010b 0760  |   `|		.DEBUG	0x010b,0x0760,0x0001,0x0000,0x0057,0x9775,0x0000,0x0595
0652 01b3 078c  |    |		.DEBUG	0x01b3,0x078c,0x0001,0x0000,0x0057,0x99d5,0x0000,0x0037
065a 01db 0796  |    |		.DEBUG	0x01db,0x0796,0x0001,0x0000,0x0057,0x99d5,0x0000,0x0083
0662 024b 07b6  | K  |		.DEBUG	0x024b,0x07b6,0x0001,0x0000,0x0057,0x99d5,0x0000,0x0136
066a 02bb 07ea  |    |		.DEBUG	0x02bb,0x07ea,0x0002,0x0000,0x0057,0x99d5,0x0000,0x02db
0672 02e3 07f6  |    |		.DEBUG	0x02e3,0x07f6,0x0002,0x0000,0x0057,0x99d5,0x0000,0x031c
067a 0313 0816  |    |		.DEBUG	0x0313,0x0816,0x0002,0x0000,0x0057,0x99d5,0x0000,0x036e
0682 033b 0836  | ; 6|		.DEBUG	0x033b,0x0836,0x0002,0x0000,0x0057,0x99d5,0x0000,0x03bd
068a 0373 0852  | s R|		.DEBUG	0x0373,0x0852,0x0002,0x0000,0x0057,0x99d5,0x0000,0x042c
0692 03b3 0882  |    |		.DEBUG	0x03b3,0x0882,0x0002,0x0000,0x0057,0x99d5,0x0000,0x04a2
069a 03f3 08b0  |    |		.DEBUG	0x03f3,0x08b0,0x0002,0x0000,0x0057,0x99d5,0x0000,0x0528
06a2 043b 08e8  | ;  |		.DEBUG	0x043b,0x08e8,0x0002,0x0000,0x0057,0x99d5,0x0000,0x05b8
06aa 0493 0918  |    |		.DEBUG	0x0493,0x0918,0x0002,0x0000,0x0057,0x99d5,0x0000,0x0667
06b2 04eb 0956  |   V|		.DEBUG	0x04eb,0x0956,0x0002,0x0000,0x0057,0x99d5,0x0000,0x0721
06ba 0543 0994  | C  |		.DEBUG	0x0543,0x0994,0x0002,0x0000,0x0057,0x99d5,0x0000,0x07d8
06c2 059b 09ba  |    |		.DEBUG	0x059b,0x09ba,0x0001,0x0000,0x0057,0x99d5,0x0000,0x088e
06ca 05c3 09d0  |    |		.DEBUG	0x05c3,0x09d0,0x0004,0x0000,0x0057,0x99d5,0x0000,0x0945
06d2 ; --------------------------------------------------------------------------------------
06d2 ; Debug3 Subtable 0x0
06d2 ; --------------------------------------------------------------------------------------
06d2 0002 0000  |    |		.DBG3TAB	0x0002,0x0000
06d4 000b ffff  |    |		.CONST	0x000b,0xffff
06d6 000d fffe  |    |		.CONST	0x000d,0xfffe
06d8 ; --------------------------------------------------------------------------------------
06d8 ; Debug3 Subtable 0x1
06d8 ; --------------------------------------------------------------------------------------
06d8 0015 0000  |    |		.DBG3TAB	0x0015,0x0000
06da 0010 ffff  |    |		.CONST	0x0010,0xffff
06dc 0011 fffe  |    |		.CONST	0x0011,0xfffe
06de 0012 fffd  |    |		.CONST	0x0012,0xfffd
06e0 0013 fffc  |    |		.CONST	0x0013,0xfffc
06e2 0014 fffb  |    |		.CONST	0x0014,0xfffb
06e4 0016 fffa  |    |		.CONST	0x0016,0xfffa
06e6 0018 fff9  |    |		.CONST	0x0018,0xfff9
06e8 001a fff8  |    |		.CONST	0x001a,0xfff8
06ea 001c fff7  |    |		.CONST	0x001c,0xfff7
06ec 001e fff6  |    |		.CONST	0x001e,0xfff6
06ee 0020 fff5  |    |		.CONST	0x0020,0xfff5
06f0 0022 fff4  | "  |		.CONST	0x0022,0xfff4
06f2 0024 fff3  | $  |		.CONST	0x0024,0xfff3
06f4 0026 fff2  | &  |		.CONST	0x0026,0xfff2
06f6 0028 fff1  | (  |		.CONST	0x0028,0xfff1
06f8 002a fff0  | *  |		.CONST	0x002a,0xfff0
06fa 002c ffef  | ,  |		.CONST	0x002c,0xffef
06fc 002e ffee  | .  |		.CONST	0x002e,0xffee
06fe 0030 ffed  | 0  |		.CONST	0x0030,0xffed
0700 0032 ffec  | 2  |		.CONST	0x0032,0xffec
0702 0034 ffeb  | 4  |		.CONST	0x0034,0xffeb
0704 ; --------------------------------------------------------------------------------------
0704 ; Debug3 Subtable 0x2
0704 ; --------------------------------------------------------------------------------------
0704 000b 0022  |   "|		.DBG3TAB	0x000b,0x0022
0706 003b ffff  | ;  |		.CONST	0x003b,0xffff
0708 0040 fffe  | @  |		.CONST	0x0040,0xfffe
070a 0042 fffd  | B  |		.CONST	0x0042,0xfffd
070c 0044 fffc  | D  |		.CONST	0x0044,0xfffc
070e 0045 fffb  | E  |		.CONST	0x0045,0xfffb
0710 0046 fffa  | F  |		.CONST	0x0046,0xfffa
0712 004a fff9  | J  |		.CONST	0x004a,0xfff9
0714 0054 0001  | T  |		.CONST	0x0054,0x0001
0716 0056 0002  | V  |		.CONST	0x0056,0x0002
0718 0058 0003  | X  |		.CONST	0x0058,0x0003
071a 0069 0004  | i  |		.CONST	0x0069,0x0004
071c 006b 0005  | k  |		.CONST	0x006b,0x0005
071e 0081 0006  |    |		.CONST	0x0081,0x0006
0720 0082 0007  |    |		.CONST	0x0082,0x0007
0722 0088 0008  |    |		.CONST	0x0088,0x0008
0724 0089 0401  |    |		.CONST	0x0089,0x0401
0726 008c 0008  |    |		.CONST	0x008c,0x0008
0728 008d 0009  |    |		.CONST	0x008d,0x0009
072a 008e f7ff  |    |		.CONST	0x008e,0xf7ff
072c 0094 f7fe  |    |		.CONST	0x0094,0xf7fe
072e 0097 0801  |    |		.CONST	0x0097,0x0801
0730 009d 0802  |    |		.CONST	0x009d,0x0802
0732 009e f3ff  |    |		.CONST	0x009e,0xf3ff
0734 00a2 0c01  |    |		.CONST	0x00a2,0x0c01
0736 00a8 0c02  |    |		.CONST	0x00a8,0x0c02
0738 00b6 000a  |    |		.CONST	0x00b6,0x000a
073a 00bc 000b  |    |		.CONST	0x00bc,0x000b
073c 00bd efff  |    |		.CONST	0x00bd,0xefff
073e 00c1 1001  |    |		.CONST	0x00c1,0x1001
0740 00c7 1002  |    |		.CONST	0x00c7,0x1002
0742 00ca 1004  |    |		.CONST	0x00ca,0x1004
0744 00cb 1401  |    |		.CONST	0x00cb,0x1401
0746 00ce 1004  |    |		.CONST	0x00ce,0x1004
0748 00cf 1005  |    |		.CONST	0x00cf,0x1005
074a 00d3 1006  |    |		.CONST	0x00d3,0x1006
074c 00df 1007  |    |		.CONST	0x00df,0x1007
074e 00e0 1801  |    |		.CONST	0x00e0,0x1801
0750 00e3 1007  |    |		.CONST	0x00e3,0x1007
0752 00e4 1003  |    |		.CONST	0x00e4,0x1003
0754 00e5 1c01  |    |		.CONST	0x00e5,0x1c01
0756 00e7 1003  |    |		.CONST	0x00e7,0x1003
0758 00ea 000c  |    |		.CONST	0x00ea,0x000c
075a 00f1 000d  |    |		.CONST	0x00f1,0x000d
075c 00f6 000e  |    |		.CONST	0x00f6,0x000e
075e 00fd 000f  |    |		.CONST	0x00fd,0x000f
0760 ; --------------------------------------------------------------------------------------
0760 ; Debug3 Subtable 0x3
0760 ; --------------------------------------------------------------------------------------
0760 0005 0010  |    |		.DBG3TAB	0x0005,0x0010
0762 010b ffff  |    |		.CONST	0x010b,0xffff
0764 0111 fffe  |    |		.CONST	0x0111,0xfffe
0766 0114 fffd  |    |		.CONST	0x0114,0xfffd
0768 0115 fffc  |    |		.CONST	0x0115,0xfffc
076a 0117 fffb  |    |		.CONST	0x0117,0xfffb
076c 011c 0001  |    |		.CONST	0x011c,0x0001
076e 011f 0002  |    |		.CONST	0x011f,0x0002
0770 0139 0003  | 9  |		.CONST	0x0139,0x0003
0772 013b 0004  | ;  |		.CONST	0x013b,0x0004
0774 0151 0005  | Q  |		.CONST	0x0151,0x0005
0776 0153 0007  | S  |		.CONST	0x0153,0x0007
0778 0162 0008  | b  |		.CONST	0x0162,0x0008
077a 0164 0009  | d  |		.CONST	0x0164,0x0009
077c 017b 000a  | {  |		.CONST	0x017b,0x000a
077e 017e 000b  | ~  |		.CONST	0x017e,0x000b
0780 0182 000c  |    |		.CONST	0x0182,0x000c
0782 018f 000d  |    |		.CONST	0x018f,0x000d
0784 0198 000e  |    |		.CONST	0x0198,0x000e
0786 019d 0006  |    |		.CONST	0x019d,0x0006
0788 01a2 000f  |    |		.CONST	0x01a2,0x000f
078a 01a5 0010  |    |		.CONST	0x01a5,0x0010
078c ; --------------------------------------------------------------------------------------
078c ; Debug3 Subtable 0x4
078c ; --------------------------------------------------------------------------------------
078c 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
078e 01b3 ffff  |    |		.CONST	0x01b3,0xffff
0790 01b8 0001  |    |		.CONST	0x01b8,0x0001
0792 01c5 0002  |    |		.CONST	0x01c5,0x0002
0794 01c8 0003  |    |		.CONST	0x01c8,0x0003
0796 ; --------------------------------------------------------------------------------------
0796 ; Debug3 Subtable 0x5
0796 ; --------------------------------------------------------------------------------------
0796 0004 000b  |    |		.DBG3TAB	0x0004,0x000b
0798 01db ffff  |    |		.CONST	0x01db,0xffff
079a 01dd fffe  |    |		.CONST	0x01dd,0xfffe
079c 01e3 fffd  |    |		.CONST	0x01e3,0xfffd
079e 01e8 fffc  |    |		.CONST	0x01e8,0xfffc
07a0 01ed 0001  |    |		.CONST	0x01ed,0x0001
07a2 0203 0002  |    |		.CONST	0x0203,0x0002
07a4 0205 0003  |    |		.CONST	0x0205,0x0003
07a6 021b 0004  |    |		.CONST	0x021b,0x0004
07a8 021c 0006  |    |		.CONST	0x021c,0x0006
07aa 0221 0007  | !  |		.CONST	0x0221,0x0007
07ac 0226 0008  | &  |		.CONST	0x0226,0x0008
07ae 0232 0009  | 2  |		.CONST	0x0232,0x0009
07b0 0236 000a  | 6  |		.CONST	0x0236,0x000a
07b2 023a 000b  | :  |		.CONST	0x023a,0x000b
07b4 023f 0005  | ?  |		.CONST	0x023f,0x0005
07b6 ; --------------------------------------------------------------------------------------
07b6 ; Debug3 Subtable 0x6
07b6 ; --------------------------------------------------------------------------------------
07b6 0006 0013  |    |		.DBG3TAB	0x0006,0x0013
07b8 024b ffff  | K  |		.CONST	0x024b,0xffff
07ba 024f fffe  | O  |		.CONST	0x024f,0xfffe
07bc 0254 fffd  | T  |		.CONST	0x0254,0xfffd
07be 025a fffc  | Z  |		.CONST	0x025a,0xfffc
07c0 025f fffb  | _  |		.CONST	0x025f,0xfffb
07c2 0265 fffa  | e  |		.CONST	0x0265,0xfffa
07c4 0268 0002  | h  |		.CONST	0x0268,0x0002
07c6 0269 0401  | i  |		.CONST	0x0269,0x0401
07c8 026c 0002  | l  |		.CONST	0x026c,0x0002
07ca 026f 0003  | o  |		.CONST	0x026f,0x0003
07cc 0273 0004  | s  |		.CONST	0x0273,0x0004
07ce 0278 0005  | x  |		.CONST	0x0278,0x0005
07d0 027e 0006  | ~  |		.CONST	0x027e,0x0006
07d2 0291 0007  |    |		.CONST	0x0291,0x0007
07d4 0293 0008  |    |		.CONST	0x0293,0x0008
07d6 0298 0009  |    |		.CONST	0x0298,0x0009
07d8 029c 000a  |    |		.CONST	0x029c,0x000a
07da 02a0 000b  |    |		.CONST	0x02a0,0x000b
07dc 02a5 000c  |    |		.CONST	0x02a5,0x000c
07de 02a9 000d  |    |		.CONST	0x02a9,0x000d
07e0 02aa 0801  |    |		.CONST	0x02aa,0x0801
07e2 02ad 000d  |    |		.CONST	0x02ad,0x000d
07e4 02ae 0001  |    |		.CONST	0x02ae,0x0001
07e6 02af 0c01  |    |		.CONST	0x02af,0x0c01
07e8 02b1 0001  |    |		.CONST	0x02b1,0x0001
07ea ; --------------------------------------------------------------------------------------
07ea ; Debug3 Subtable 0x7
07ea ; --------------------------------------------------------------------------------------
07ea 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
07ec 02bb 0001  |    |		.CONST	0x02bb,0x0001
07ee 02bf 0002  |    |		.CONST	0x02bf,0x0002
07f0 02c6 0005  |    |		.CONST	0x02c6,0x0005
07f2 02c8 0004  |    |		.CONST	0x02c8,0x0004
07f4 02d8 0006  |    |		.CONST	0x02d8,0x0006
07f6 ; --------------------------------------------------------------------------------------
07f6 ; Debug3 Subtable 0x8
07f6 ; --------------------------------------------------------------------------------------
07f6 0001 000e  |    |		.DBG3TAB	0x0001,0x000e
07f8 02e3 ffff  |    |		.CONST	0x02e3,0xffff
07fa 02e8 0001  |    |		.CONST	0x02e8,0x0001
07fc 02e9 0401  |    |		.CONST	0x02e9,0x0401
07fe 02eb 0402  |    |		.CONST	0x02eb,0x0402
0800 02ec 0403  |    |		.CONST	0x02ec,0x0403
0802 02ed 0404  |    |		.CONST	0x02ed,0x0404
0804 02ee 0001  |    |		.CONST	0x02ee,0x0001
0806 02f4 0004  |    |		.CONST	0x02f4,0x0004
0808 02f6 0002  |    |		.CONST	0x02f6,0x0002
080a 02f8 0003  |    |		.CONST	0x02f8,0x0003
080c 02fd 0801  |    |		.CONST	0x02fd,0x0801
080e 02ff 0802  |    |		.CONST	0x02ff,0x0802
0810 0300 0803  |    |		.CONST	0x0300,0x0803
0812 0301 0804  |    |		.CONST	0x0301,0x0804
0814 0303 0003  |    |		.CONST	0x0303,0x0003
0816 ; --------------------------------------------------------------------------------------
0816 ; Debug3 Subtable 0x9
0816 ; --------------------------------------------------------------------------------------
0816 0001 000e  |    |		.DBG3TAB	0x0001,0x000e
0818 0313 ffff  |    |		.CONST	0x0313,0xffff
081a 0318 0001  |    |		.CONST	0x0318,0x0001
081c 0319 0401  |    |		.CONST	0x0319,0x0401
081e 031b 0402  |    |		.CONST	0x031b,0x0402
0820 031c 0403  |    |		.CONST	0x031c,0x0403
0822 031d 0404  |    |		.CONST	0x031d,0x0404
0824 031e 0001  |    |		.CONST	0x031e,0x0001
0826 0322 0004  | "  |		.CONST	0x0322,0x0004
0828 0324 0002  | $  |		.CONST	0x0324,0x0002
082a 0326 0003  | &  |		.CONST	0x0326,0x0003
082c 032b 0801  | +  |		.CONST	0x032b,0x0801
082e 032d 0802  | -  |		.CONST	0x032d,0x0802
0830 032e 0803  | .  |		.CONST	0x032e,0x0803
0832 032f 0804  | /  |		.CONST	0x032f,0x0804
0834 0331 0003  | 1  |		.CONST	0x0331,0x0003
0836 ; --------------------------------------------------------------------------------------
0836 ; Debug3 Subtable 0xa
0836 ; --------------------------------------------------------------------------------------
0836 0002 000b  |    |		.DBG3TAB	0x0002,0x000b
0838 033b ffff  | ;  |		.CONST	0x033b,0xffff
083a 033c fffe  | <  |		.CONST	0x033c,0xfffe
083c 033f 0001  | ?  |		.CONST	0x033f,0x0001
083e 0340 0002  | @  |		.CONST	0x0340,0x0002
0840 0342 0003  | B  |		.CONST	0x0342,0x0003
0842 0346 0004  | F  |		.CONST	0x0346,0x0004
0844 0347 0401  | G  |		.CONST	0x0347,0x0401
0846 0349 0402  | I  |		.CONST	0x0349,0x0402
0848 034a 0403  | J  |		.CONST	0x034a,0x0403
084a 034b 0404  | K  |		.CONST	0x034b,0x0404
084c 034c 0004  | L  |		.CONST	0x034c,0x0004
084e 0364 0007  | d  |		.CONST	0x0364,0x0007
0850 0366 0005  | f  |		.CONST	0x0366,0x0005
0852 ; --------------------------------------------------------------------------------------
0852 ; Debug3 Subtable 0xb
0852 ; --------------------------------------------------------------------------------------
0852 0001 0016  |    |		.DBG3TAB	0x0001,0x0016
0854 0373 ffff  | s  |		.CONST	0x0373,0xffff
0856 0376 0001  | v  |		.CONST	0x0376,0x0001
0858 0377 0002  | w  |		.CONST	0x0377,0x0002
085a 037b 0003  | {  |		.CONST	0x037b,0x0003
085c 037c 0401  | |  |		.CONST	0x037c,0x0401
085e 037e 0402  | ~  |		.CONST	0x037e,0x0402
0860 037f 0403  |    |		.CONST	0x037f,0x0403
0862 0380 0404  |    |		.CONST	0x0380,0x0404
0864 0381 0003  |    |		.CONST	0x0381,0x0003
0866 038b 0008  |    |		.CONST	0x038b,0x0008
0868 038d 0004  |    |		.CONST	0x038d,0x0004
086a 038f 0005  |    |		.CONST	0x038f,0x0005
086c 0394 0801  |    |		.CONST	0x0394,0x0801
086e 0396 0802  |    |		.CONST	0x0396,0x0802
0870 0397 0803  |    |		.CONST	0x0397,0x0803
0872 0398 0804  |    |		.CONST	0x0398,0x0804
0874 039a 0005  |    |		.CONST	0x039a,0x0005
0876 039c 0007  |    |		.CONST	0x039c,0x0007
0878 039f 0c01  |    |		.CONST	0x039f,0x0c01
087a 03a1 0c02  |    |		.CONST	0x03a1,0x0c02
087c 03a2 0c03  |    |		.CONST	0x03a2,0x0c03
087e 03a3 0c04  |    |		.CONST	0x03a3,0x0c04
0880 03a5 0007  |    |		.CONST	0x03a5,0x0007
0882 ; --------------------------------------------------------------------------------------
0882 ; Debug3 Subtable 0xc
0882 ; --------------------------------------------------------------------------------------
0882 0002 0014  |    |		.DBG3TAB	0x0002,0x0014
0884 03b3 ffff  |    |		.CONST	0x03b3,0xffff
0886 03b4 fffe  |    |		.CONST	0x03b4,0xfffe
0888 03b7 0001  |    |		.CONST	0x03b7,0x0001
088a 03b8 0002  |    |		.CONST	0x03b8,0x0002
088c 03ba 0003  |    |		.CONST	0x03ba,0x0003
088e 03be 0004  |    |		.CONST	0x03be,0x0004
0890 03bf 0401  |    |		.CONST	0x03bf,0x0401
0892 03c1 0402  |    |		.CONST	0x03c1,0x0402
0894 03c2 0403  |    |		.CONST	0x03c2,0x0403
0896 03c3 0404  |    |		.CONST	0x03c3,0x0404
0898 03c4 0004  |    |		.CONST	0x03c4,0x0004
089a 03ce 000b  |    |		.CONST	0x03ce,0x000b
089c 03d0 0006  |    |		.CONST	0x03d0,0x0006
089e 03d6 0007  |    |		.CONST	0x03d6,0x0007
08a0 03dc 0008  |    |		.CONST	0x03dc,0x0008
08a2 03de 0009  |    |		.CONST	0x03de,0x0009
08a4 03e1 0801  |    |		.CONST	0x03e1,0x0801
08a6 03e3 0802  |    |		.CONST	0x03e3,0x0802
08a8 03e4 0803  |    |		.CONST	0x03e4,0x0803
08aa 03e5 0804  |    |		.CONST	0x03e5,0x0804
08ac 03e7 0009  |    |		.CONST	0x03e7,0x0009
08ae 03e9 000a  |    |		.CONST	0x03e9,0x000a
08b0 ; --------------------------------------------------------------------------------------
08b0 ; Debug3 Subtable 0xd
08b0 ; --------------------------------------------------------------------------------------
08b0 0002 0019  |    |		.DBG3TAB	0x0002,0x0019
08b2 03f3 ffff  |    |		.CONST	0x03f3,0xffff
08b4 03f4 fffe  |    |		.CONST	0x03f4,0xfffe
08b6 03f7 0001  |    |		.CONST	0x03f7,0x0001
08b8 03f8 0002  |    |		.CONST	0x03f8,0x0002
08ba 03fa 0003  |    |		.CONST	0x03fa,0x0003
08bc 03fe 0004  |    |		.CONST	0x03fe,0x0004
08be 03ff 0401  |    |		.CONST	0x03ff,0x0401
08c0 0401 0402  |    |		.CONST	0x0401,0x0402
08c2 0402 0403  |    |		.CONST	0x0402,0x0403
08c4 0403 0404  |    |		.CONST	0x0403,0x0404
08c6 0404 0004  |    |		.CONST	0x0404,0x0004
08c8 0410 000b  |    |		.CONST	0x0410,0x000b
08ca 0412 0006  |    |		.CONST	0x0412,0x0006
08cc 0414 0007  |    |		.CONST	0x0414,0x0007
08ce 0417 0801  |    |		.CONST	0x0417,0x0801
08d0 0419 0802  |    |		.CONST	0x0419,0x0802
08d2 041a 0803  |    |		.CONST	0x041a,0x0803
08d4 041b 0804  |    |		.CONST	0x041b,0x0804
08d6 041d 0007  |    |		.CONST	0x041d,0x0007
08d8 041f 0008  |    |		.CONST	0x041f,0x0008
08da 0425 0009  | %  |		.CONST	0x0425,0x0009
08dc 0427 000a  | '  |		.CONST	0x0427,0x000a
08de 042a 0c01  | *  |		.CONST	0x042a,0x0c01
08e0 042c 0c02  | ,  |		.CONST	0x042c,0x0c02
08e2 042d 0c03  | -  |		.CONST	0x042d,0x0c03
08e4 042e 0c04  | .  |		.CONST	0x042e,0x0c04
08e6 0430 000a  | 0  |		.CONST	0x0430,0x000a
08e8 ; --------------------------------------------------------------------------------------
08e8 ; Debug3 Subtable 0xe
08e8 ; --------------------------------------------------------------------------------------
08e8 0002 0015  |    |		.DBG3TAB	0x0002,0x0015
08ea 043b ffff  | ;  |		.CONST	0x043b,0xffff
08ec 043c fffe  | <  |		.CONST	0x043c,0xfffe
08ee 043f 0001  | ?  |		.CONST	0x043f,0x0001
08f0 0440 0002  | @  |		.CONST	0x0440,0x0002
08f2 0442 0003  | B  |		.CONST	0x0442,0x0003
08f4 0446 0004  | F  |		.CONST	0x0446,0x0004
08f6 0447 0401  | G  |		.CONST	0x0447,0x0401
08f8 0449 0402  | I  |		.CONST	0x0449,0x0402
08fa 044a 0403  | J  |		.CONST	0x044a,0x0403
08fc 044b 0404  | K  |		.CONST	0x044b,0x0404
08fe 044c 0004  | L  |		.CONST	0x044c,0x0004
0900 0468 000c  | h  |		.CONST	0x0468,0x000c
0902 046a 0006  | j  |		.CONST	0x046a,0x0006
0904 0470 0007  | p  |		.CONST	0x0470,0x0007
0906 0476 0008  | v  |		.CONST	0x0476,0x0008
0908 0478 0009  | x  |		.CONST	0x0478,0x0009
090a 047e 000a  | ~  |		.CONST	0x047e,0x000a
090c 0480 000b  |    |		.CONST	0x0480,0x000b
090e 0483 0801  |    |		.CONST	0x0483,0x0801
0910 0485 0802  |    |		.CONST	0x0485,0x0802
0912 0486 0803  |    |		.CONST	0x0486,0x0803
0914 0487 0804  |    |		.CONST	0x0487,0x0804
0916 0489 000b  |    |		.CONST	0x0489,0x000b
0918 ; --------------------------------------------------------------------------------------
0918 ; Debug3 Subtable 0xf
0918 ; --------------------------------------------------------------------------------------
0918 0002 001c  |    |		.DBG3TAB	0x0002,0x001c
091a 0493 ffff  |    |		.CONST	0x0493,0xffff
091c 0494 fffe  |    |		.CONST	0x0494,0xfffe
091e 0497 0001  |    |		.CONST	0x0497,0x0001
0920 0498 0002  |    |		.CONST	0x0498,0x0002
0922 049a 0003  |    |		.CONST	0x049a,0x0003
0924 049e 0004  |    |		.CONST	0x049e,0x0004
0926 049f 0401  |    |		.CONST	0x049f,0x0401
0928 04a1 0402  |    |		.CONST	0x04a1,0x0402
092a 04a2 0403  |    |		.CONST	0x04a2,0x0403
092c 04a3 0404  |    |		.CONST	0x04a3,0x0404
092e 04a4 0004  |    |		.CONST	0x04a4,0x0004
0930 04b6 000e  |    |		.CONST	0x04b6,0x000e
0932 04b8 0005  |    |		.CONST	0x04b8,0x0005
0934 04be 0007  |    |		.CONST	0x04be,0x0007
0936 04c1 0801  |    |		.CONST	0x04c1,0x0801
0938 04c3 0802  |    |		.CONST	0x04c3,0x0802
093a 04c4 0803  |    |		.CONST	0x04c4,0x0803
093c 04c5 0804  |    |		.CONST	0x04c5,0x0804
093e 04c7 0007  |    |		.CONST	0x04c7,0x0007
0940 04c9 0008  |    |		.CONST	0x04c9,0x0008
0942 04cb 0009  |    |		.CONST	0x04cb,0x0009
0944 04d1 000a  |    |		.CONST	0x04d1,0x000a
0946 04d3 000b  |    |		.CONST	0x04d3,0x000b
0948 04d6 0c01  |    |		.CONST	0x04d6,0x0c01
094a 04d8 0c02  |    |		.CONST	0x04d8,0x0c02
094c 04d9 0c03  |    |		.CONST	0x04d9,0x0c03
094e 04da 0c04  |    |		.CONST	0x04da,0x0c04
0950 04dc 000b  |    |		.CONST	0x04dc,0x000b
0952 04de 000c  |    |		.CONST	0x04de,0x000c
0954 04e4 000d  |    |		.CONST	0x04e4,0x000d
0956 ; --------------------------------------------------------------------------------------
0956 ; Debug3 Subtable 0x10
0956 ; --------------------------------------------------------------------------------------
0956 0002 001c  |    |		.DBG3TAB	0x0002,0x001c
0958 04eb ffff  |    |		.CONST	0x04eb,0xffff
095a 04ec fffe  |    |		.CONST	0x04ec,0xfffe
095c 04ef 0001  |    |		.CONST	0x04ef,0x0001
095e 04f0 0002  |    |		.CONST	0x04f0,0x0002
0960 04f2 0003  |    |		.CONST	0x04f2,0x0003
0962 04f6 0004  |    |		.CONST	0x04f6,0x0004
0964 04f7 0401  |    |		.CONST	0x04f7,0x0401
0966 04f9 0402  |    |		.CONST	0x04f9,0x0402
0968 04fa 0403  |    |		.CONST	0x04fa,0x0403
096a 04fb 0404  |    |		.CONST	0x04fb,0x0404
096c 04fc 0004  |    |		.CONST	0x04fc,0x0004
096e 050c 000e  |    |		.CONST	0x050c,0x000e
0970 050e 0005  |    |		.CONST	0x050e,0x0005
0972 0514 0007  |    |		.CONST	0x0514,0x0007
0974 0517 0801  |    |		.CONST	0x0517,0x0801
0976 0519 0802  |    |		.CONST	0x0519,0x0802
0978 051a 0803  |    |		.CONST	0x051a,0x0803
097a 051b 0804  |    |		.CONST	0x051b,0x0804
097c 051d 0007  |    |		.CONST	0x051d,0x0007
097e 051f 0008  |    |		.CONST	0x051f,0x0008
0980 0521 0009  | !  |		.CONST	0x0521,0x0009
0982 0527 000a  | '  |		.CONST	0x0527,0x000a
0984 0529 000b  | )  |		.CONST	0x0529,0x000b
0986 052c 0c01  | ,  |		.CONST	0x052c,0x0c01
0988 052e 0c02  | .  |		.CONST	0x052e,0x0c02
098a 052f 0c03  | /  |		.CONST	0x052f,0x0c03
098c 0530 0c04  | 0  |		.CONST	0x0530,0x0c04
098e 0532 000b  | 2  |		.CONST	0x0532,0x000b
0990 0534 000c  | 4  |		.CONST	0x0534,0x000c
0992 053a 000d  | :  |		.CONST	0x053a,0x000d
0994 ; --------------------------------------------------------------------------------------
0994 ; Debug3 Subtable 0x11
0994 ; --------------------------------------------------------------------------------------
0994 0000 0012  |    |		.DBG3TAB	0x0000,0x0012
0996 0543 0001  | C  |		.CONST	0x0543,0x0001
0998 054b 0002  | K  |		.CONST	0x054b,0x0002
099a 054d 0003  | M  |		.CONST	0x054d,0x0003
099c 054e 0401  | N  |		.CONST	0x054e,0x0401
099e 0550 0402  | P  |		.CONST	0x0550,0x0402
09a0 0551 0403  | Q  |		.CONST	0x0551,0x0403
09a2 0552 0404  | R  |		.CONST	0x0552,0x0404
09a4 0553 0003  | S  |		.CONST	0x0553,0x0003
09a6 057b 000d  | {  |		.CONST	0x057b,0x000d
09a8 057d 0004  | }  |		.CONST	0x057d,0x0004
09aa 0580 0005  |    |		.CONST	0x0580,0x0005
09ac 0583 0006  |    |		.CONST	0x0583,0x0006
09ae 0586 0007  |    |		.CONST	0x0586,0x0007
09b0 0589 0008  |    |		.CONST	0x0589,0x0008
09b2 058c 0009  |    |		.CONST	0x058c,0x0009
09b4 058f 000a  |    |		.CONST	0x058f,0x000a
09b6 0592 000b  |    |		.CONST	0x0592,0x000b
09b8 0595 000c  |    |		.CONST	0x0595,0x000c
09ba ; --------------------------------------------------------------------------------------
09ba ; Debug3 Subtable 0x12
09ba ; --------------------------------------------------------------------------------------
09ba 0003 0007  |    |		.DBG3TAB	0x0003,0x0007
09bc 059b ffff  |    |		.CONST	0x059b,0xffff
09be 059e fffe  |    |		.CONST	0x059e,0xfffe
09c0 059f fffd  |    |		.CONST	0x059f,0xfffd
09c2 05a8 0001  |    |		.CONST	0x05a8,0x0001
09c4 05ab 0002  |    |		.CONST	0x05ab,0x0002
09c6 05ac 0003  |    |		.CONST	0x05ac,0x0003
09c8 05af 0004  |    |		.CONST	0x05af,0x0004
09ca 05b2 0005  |    |		.CONST	0x05b2,0x0005
09cc 05b5 0006  |    |		.CONST	0x05b5,0x0006
09ce 05b8 0007  |    |		.CONST	0x05b8,0x0007
09d0 ; --------------------------------------------------------------------------------------
09d0 ; Debug3 Subtable 0x13
09d0 ; --------------------------------------------------------------------------------------
09d0 0000 000d  |    |		.DBG3TAB	0x0000,0x000d
09d2 05c3 0001  |    |		.CONST	0x05c3,0x0001
09d4 05c8 0002  |    |		.CONST	0x05c8,0x0002
09d6 05c9 0401  |    |		.CONST	0x05c9,0x0401
09d8 05cb 0002  |    |		.CONST	0x05cb,0x0002
09da 05ce 0801  |    |		.CONST	0x05ce,0x0801
09dc 05d0 0c01  |    |		.CONST	0x05d0,0x0c01
09de 05d2 0c02  |    |		.CONST	0x05d2,0x0c02
09e0 05d3 0c03  |    |		.CONST	0x05d3,0x0c03
09e2 05d4 0c04  |    |		.CONST	0x05d4,0x0c04
09e4 05d6 0801  |    |		.CONST	0x05d6,0x0801
09e6 05dd 0401  |    |		.CONST	0x05dd,0x0401
09e8 05f3 0003  |    |		.CONST	0x05f3,0x0003
09ea 05fc 0004  |    |		.CONST	0x05fc,0x0004
09ec 0000 0000  |    |		.BLANK	0000[0x14]