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

⟦a96803618⟧

    Length: 4096 (0x1000)
    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 05a8       |    |		.CONST	0x05a8								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 01b1       |    |		.CONST	0x01b1								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0016       |    |		.CONST	0x0016								; Number of locals
000b			INIT_0008:
000b 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x05f2,0x0000,0x0000,0x0056,0xba95,0x0000,0x08ef
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 02cb  |    |		Declare_Subprogram	INIT_02c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 038b  |    |		Declare_Subprogram	INIT_0388,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 039b  |    |		Declare_Subprogram	INIT_0398,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 0493  |    |		Declare_Subprogram	INIT_0490,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 058b  |    |		Declare_Subprogram	INIT_0588,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 00bf       |    |		Action	Accept_Activation
001a 0092 059a  |    |		Action	Push_String_Extended,0x59a					; "LX_LINE_COUNT"
													; Debug Table 0x1 = .DEBUG	0x001a,0x0602,0x0000,0x0000,0x0056,0xbc25,0x0000,0x0004
													; Debug Table 0x1.0x0 = 0x1a,0xffff
													; Debug Table 0x1.0x1 = 0x1a,0xfffe
													; Debug Table 0x1.0x2 = 0x1a,0xfffd
001c 4973       |Is  |		Short_Literal	0x173
001d 00eb       |    |		Load_Encached	Diana_Cache
001e 0098       |    |		Execute	Package,Field_Read_Dynamic
001f 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0020 00eb       |    |		Load_Encached	Diana_Cache
0021 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0022 03f1       |    |		Declare_Variable	Discrete,With_Value
0023 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1.0x3 = 0x23,0xfffc
0024 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0025 0266       | f  |		Execute	Discrete,Bounds
0026 00e1       |    |		Load_Encached	Boolean_Cache
0027 02a0       |    |		Declare_Subprogram	Null_Subprogram
0028 4801       |H   |		Short_Literal	0x1
0029 035d       | ]  |		Declare_Type	Array,Defined
002a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x4 = 0x2a,0xfffb
002b 0337       | 7  |		Declare_Variable	Array
002c 00d9       |    |		Load_Top	At_Offset_1
002d 0337       | 7  |		Declare_Variable	Array
002e 4801       |H   |		Short_Literal	0x1
002f 484b       |HK  |		Short_Literal	0x4b
0030 00da       |    |		Load_Top	At_Offset_2
0031 01d6       |    |		Execute	Vector,Field_Write
0032 4801       |H   |		Short_Literal	0x1
0033 4852       |HR  |		Short_Literal	0x52
0034 00da       |    |		Load_Top	At_Offset_2
0035 01d6       |    |		Execute	Vector,Field_Write
0036 4801       |H   |		Short_Literal	0x1
0037 4855       |HU  |		Short_Literal	0x55
0038 00da       |    |		Load_Top	At_Offset_2
0039 01d6       |    |		Execute	Vector,Field_Write
003a 4801       |H   |		Short_Literal	0x1
003b 485c       |H\  |		Short_Literal	0x5c
003c 00da       |    |		Load_Top	At_Offset_2
003d 01d6       |    |		Execute	Vector,Field_Write
003e 4801       |H   |		Short_Literal	0x1
003f 485d       |H]  |		Short_Literal	0x5d
0040 00da       |    |		Load_Top	At_Offset_2
0041 01d6       |    |		Execute	Vector,Field_Write
0042 4801       |H   |		Short_Literal	0x1
0043 4842       |HB  |		Short_Literal	0x42
0044 00da       |    |		Load_Top	At_Offset_2
0045 01d6       |    |		Execute	Vector,Field_Write
0046 4801       |H   |		Short_Literal	0x1
0047 4844       |HD  |		Short_Literal	0x44
0048 00da       |    |		Load_Top	At_Offset_2
0049 01d6       |    |		Execute	Vector,Field_Write
004a 4801       |H   |		Short_Literal	0x1
004b 489f       |H   |		Short_Literal	0x9f
004c 00da       |    |		Load_Top	At_Offset_2
004d 01d6       |    |		Execute	Vector,Field_Write
004e 4801       |H   |		Short_Literal	0x1
004f 484d       |HM  |		Short_Literal	0x4d
0050 00da       |    |		Load_Top	At_Offset_2
0051 01d6       |    |		Execute	Vector,Field_Write
0052 4801       |H   |		Short_Literal	0x1
0053 4850       |HP  |		Short_Literal	0x50
0054 00da       |    |		Load_Top	At_Offset_2
0055 01d6       |    |		Execute	Vector,Field_Write
0056 4801       |H   |		Short_Literal	0x1
0057 484f       |HO  |		Short_Literal	0x4f
0058 00da       |    |		Load_Top	At_Offset_2
0059 01d6       |    |		Execute	Vector,Field_Write
005a 4801       |H   |		Short_Literal	0x1
005b 4851       |HQ  |		Short_Literal	0x51
005c 00da       |    |		Load_Top	At_Offset_2
005d 01d6       |    |		Execute	Vector,Field_Write
005e 4801       |H   |		Short_Literal	0x1
005f 4860       |H`  |		Short_Literal	0x60
0060 00da       |    |		Load_Top	At_Offset_2
0061 01d6       |    |		Execute	Vector,Field_Write
0062 4801       |H   |		Short_Literal	0x1
0063 4879       |Hy  |		Short_Literal	0x79
0064 00da       |    |		Load_Top	At_Offset_2
0065 01d6       |    |		Execute	Vector,Field_Write
0066 4801       |H   |		Short_Literal	0x1
0067 48a1       |H   |		Short_Literal	0xa1
0068 00da       |    |		Load_Top	At_Offset_2
0069 01d6       |    |		Execute	Vector,Field_Write
006a 4801       |H   |		Short_Literal	0x1
006b 489e       |H   |		Short_Literal	0x9e
006c 00da       |    |		Load_Top	At_Offset_2
006d 01d6       |    |		Execute	Vector,Field_Write
006e 4801       |H   |		Short_Literal	0x1
006f 4802       |H   |		Short_Literal	0x2
0070 00da       |    |		Load_Top	At_Offset_2
0071 01d6       |    |		Execute	Vector,Field_Write
0072 4801       |H   |		Short_Literal	0x1
0073 4837       |H7  |		Short_Literal	0x37
0074 00da       |    |		Load_Top	At_Offset_2
0075 01d6       |    |		Execute	Vector,Field_Write
0076 4801       |H   |		Short_Literal	0x1
0077 4857       |HW  |		Short_Literal	0x57
0078 00da       |    |		Load_Top	At_Offset_2
0079 01d6       |    |		Execute	Vector,Field_Write
007a 4801       |H   |		Short_Literal	0x1
007b 4858       |HX  |		Short_Literal	0x58
007c 00da       |    |		Load_Top	At_Offset_2
007d 01d6       |    |		Execute	Vector,Field_Write
007e 4801       |H   |		Short_Literal	0x1
007f 483a       |H:  |		Short_Literal	0x3a
0080 00da       |    |		Load_Top	At_Offset_2
0081 01d6       |    |		Execute	Vector,Field_Write
0082 4801       |H   |		Short_Literal	0x1
0083 4847       |HG  |		Short_Literal	0x47
0084 00da       |    |		Load_Top	At_Offset_2
0085 01d6       |    |		Execute	Vector,Field_Write
0086 4801       |H   |		Short_Literal	0x1
0087 4846       |HF  |		Short_Literal	0x46
0088 00da       |    |		Load_Top	At_Offset_2
0089 01d6       |    |		Execute	Vector,Field_Write
008a 4801       |H   |		Short_Literal	0x1
008b 483e       |H>  |		Short_Literal	0x3e
008c 00da       |    |		Load_Top	At_Offset_2
008d 01d6       |    |		Execute	Vector,Field_Write
008e 4801       |H   |		Short_Literal	0x1
008f 483f       |H?  |		Short_Literal	0x3f
0090 00da       |    |		Load_Top	At_Offset_2
0091 01d6       |    |		Execute	Vector,Field_Write
0092 4801       |H   |		Short_Literal	0x1
0093 487c       |H|  |		Short_Literal	0x7c
0094 00da       |    |		Load_Top	At_Offset_2
0095 01d6       |    |		Execute	Vector,Field_Write
0096 4801       |H   |		Short_Literal	0x1
0097 4840       |H@  |		Short_Literal	0x40
0098 00da       |    |		Load_Top	At_Offset_2
0099 01d6       |    |		Execute	Vector,Field_Write
009a 4801       |H   |		Short_Literal	0x1
009b 485e       |H^  |		Short_Literal	0x5e
009c 00da       |    |		Load_Top	At_Offset_2
009d 01d6       |    |		Execute	Vector,Field_Write
009e 4801       |H   |		Short_Literal	0x1
009f 483c       |H<  |		Short_Literal	0x3c
00a0 00da       |    |		Load_Top	At_Offset_2
00a1 01d6       |    |		Execute	Vector,Field_Write
00a2 4801       |H   |		Short_Literal	0x1
00a3 4849       |HI  |		Short_Literal	0x49
00a4 00da       |    |		Load_Top	At_Offset_2
00a5 01d6       |    |		Execute	Vector,Field_Write
00a6 4801       |H   |		Short_Literal	0x1
00a7 484c       |HL  |		Short_Literal	0x4c
00a8 00da       |    |		Load_Top	At_Offset_2
00a9 01d6       |    |		Execute	Vector,Field_Write
00aa 4801       |H   |		Short_Literal	0x1
00ab 484e       |HN  |		Short_Literal	0x4e
00ac 00da       |    |		Load_Top	At_Offset_2
00ad 01d6       |    |		Execute	Vector,Field_Write
00ae 4801       |H   |		Short_Literal	0x1
00af 4838       |H8  |		Short_Literal	0x38
00b0 00da       |    |		Load_Top	At_Offset_2
00b1 01d6       |    |		Execute	Vector,Field_Write
00b2 4801       |H   |		Short_Literal	0x1
00b3 4839       |H9  |		Short_Literal	0x39
00b4 00da       |    |		Load_Top	At_Offset_2
00b5 01d6       |    |		Execute	Vector,Field_Write
00b6 4801       |H   |		Short_Literal	0x1
00b7 4853       |HS  |		Short_Literal	0x53
00b8 00da       |    |		Load_Top	At_Offset_2
00b9 01d6       |    |		Execute	Vector,Field_Write
00ba 4801       |H   |		Short_Literal	0x1
00bb 485b       |H[  |		Short_Literal	0x5b
00bc 00da       |    |		Load_Top	At_Offset_2
00bd 01d6       |    |		Execute	Vector,Field_Write
00be 4801       |H   |		Short_Literal	0x1
00bf 4854       |HT  |		Short_Literal	0x54
00c0 00da       |    |		Load_Top	At_Offset_2
00c1 01d6       |    |		Execute	Vector,Field_Write
00c2 4801       |H   |		Short_Literal	0x1
00c3 4841       |HA  |		Short_Literal	0x41
00c4 00da       |    |		Load_Top	At_Offset_2
00c5 01d6       |    |		Execute	Vector,Field_Write
00c6 4801       |H   |		Short_Literal	0x1
00c7 4848       |HH  |		Short_Literal	0x48
00c8 00da       |    |		Load_Top	At_Offset_2
00c9 01d6       |    |		Execute	Vector,Field_Write
00ca 4801       |H   |		Short_Literal	0x1
00cb 483d       |H=  |		Short_Literal	0x3d
00cc 00da       |    |		Load_Top	At_Offset_2
00cd 01d6       |    |		Execute	Vector,Field_Write
00ce 4801       |H   |		Short_Literal	0x1
00cf 4843       |HC  |		Short_Literal	0x43
00d0 00da       |    |		Load_Top	At_Offset_2
00d1 01d6       |    |		Execute	Vector,Field_Write
00d2 4801       |H   |		Short_Literal	0x1
00d3 483b       |H;  |		Short_Literal	0x3b
00d4 00da       |    |		Load_Top	At_Offset_2
00d5 01d6       |    |		Execute	Vector,Field_Write
00d6 4801       |H   |		Short_Literal	0x1
00d7 4872       |Hr  |		Short_Literal	0x72
00d8 00da       |    |		Load_Top	At_Offset_2
00d9 01d6       |    |		Execute	Vector,Field_Write
00da 4801       |H   |		Short_Literal	0x1
00db 4889       |H   |		Short_Literal	0x89
00dc 00da       |    |		Load_Top	At_Offset_2
00dd 01d6       |    |		Execute	Vector,Field_Write
00de 4801       |H   |		Short_Literal	0x1
00df 48a3       |H   |		Short_Literal	0xa3
00e0 00da       |    |		Load_Top	At_Offset_2
00e1 01d6       |    |		Execute	Vector,Field_Write
00e2 4801       |H   |		Short_Literal	0x1
00e3 4884       |H   |		Short_Literal	0x84
00e4 00da       |    |		Load_Top	At_Offset_2
00e5 01d6       |    |		Execute	Vector,Field_Write
00e6 4801       |H   |		Short_Literal	0x1
00e7 4856       |HV  |		Short_Literal	0x56
00e8 00da       |    |		Load_Top	At_Offset_2
00e9 01d6       |    |		Execute	Vector,Field_Write
00ea 4801       |H   |		Short_Literal	0x1
00eb 4895       |H   |		Short_Literal	0x95
00ec 00da       |    |		Load_Top	At_Offset_2
00ed 01d6       |    |		Execute	Vector,Field_Write
00ee 4801       |H   |		Short_Literal	0x1
00ef 4896       |H   |		Short_Literal	0x96
00f0 00da       |    |		Load_Top	At_Offset_2
00f1 01d6       |    |		Execute	Vector,Field_Write
00f2 4801       |H   |		Short_Literal	0x1
00f3 4897       |H   |		Short_Literal	0x97
00f4 00da       |    |		Load_Top	At_Offset_2
00f5 01d6       |    |		Execute	Vector,Field_Write
00f6 4801       |H   |		Short_Literal	0x1
00f7 4845       |HE  |		Short_Literal	0x45
00f8 00da       |    |		Load_Top	At_Offset_2
00f9 01d6       |    |		Execute	Vector,Field_Write
00fa 4801       |H   |		Short_Literal	0x1
00fb 4885       |H   |		Short_Literal	0x85
00fc 00da       |    |		Load_Top	At_Offset_2
00fd 01d6       |    |		Execute	Vector,Field_Write
00fe 4801       |H   |		Short_Literal	0x1
00ff 488c       |H   |		Short_Literal	0x8c
0100 00da       |    |		Load_Top	At_Offset_2
0101 01d6       |    |		Execute	Vector,Field_Write
0102 4801       |H   |		Short_Literal	0x1
0103 4891       |H   |		Short_Literal	0x91
0104 00da       |    |		Load_Top	At_Offset_2
0105 01d6       |    |		Execute	Vector,Field_Write
0106 4801       |H   |		Short_Literal	0x1
0107 488f       |H   |		Short_Literal	0x8f
0108 00da       |    |		Load_Top	At_Offset_2
0109 01d6       |    |		Execute	Vector,Field_Write
010a 4801       |H   |		Short_Literal	0x1
010b 4894       |H   |		Short_Literal	0x94
010c 00da       |    |		Load_Top	At_Offset_2
010d 01d6       |    |		Execute	Vector,Field_Write
010e 4801       |H   |		Short_Literal	0x1
010f 48a8       |H   |		Short_Literal	0xa8
0110 00da       |    |		Load_Top	At_Offset_2
0111 01d6       |    |		Execute	Vector,Field_Write
0112 4801       |H   |		Short_Literal	0x1
0113 484a       |HJ  |		Short_Literal	0x4a
0114 00da       |    |		Load_Top	At_Offset_2
0115 01d6       |    |		Execute	Vector,Field_Write
0116 4801       |H   |		Short_Literal	0x1
0117 4873       |Hs  |		Short_Literal	0x73
0118 00da       |    |		Load_Top	At_Offset_2
0119 01d6       |    |		Execute	Vector,Field_Write
011a 4801       |H   |		Short_Literal	0x1
011b 48ab       |H   |		Short_Literal	0xab
011c 00da       |    |		Load_Top	At_Offset_2
011d 01d6       |    |		Execute	Vector,Field_Write
011e 4801       |H   |		Short_Literal	0x1
011f 485f       |H_  |		Short_Literal	0x5f
0120 00da       |    |		Load_Top	At_Offset_2
0121 01d6       |    |		Execute	Vector,Field_Write
0122 4801       |H   |		Short_Literal	0x1
0123 485a       |HZ  |		Short_Literal	0x5a
0124 00da       |    |		Load_Top	At_Offset_2
0125 01d6       |    |		Execute	Vector,Field_Write
0126 4800       |H   |		Short_Literal	0x0
0127 4800       |H   |		Short_Literal	0x0
0128 00da       |    |		Load_Top	At_Offset_2
0129 01d6       |    |		Execute	Vector,Field_Write
012a 4800       |H   |		Short_Literal	0x0
012b 4801       |H   |		Short_Literal	0x1
012c 00da       |    |		Load_Top	At_Offset_2
012d 01d6       |    |		Execute	Vector,Field_Write
012e 4836       |H6  |		Short_Literal	0x36
012f 4803       |H   |		Short_Literal	0x3
0130 4800       |H   |		Short_Literal	0x0
0131 00d9       |    |		Load_Top	At_Offset_1
0132 00dc       |    |		Load_Top	At_Offset_4
0133 01d6       |    |		Execute	Vector,Field_Write
0134 3ffb       |?   |		Loop_Increasing	0x130
0135 4800       |H   |		Short_Literal	0x0
0136 4859       |HY  |		Short_Literal	0x59
0137 00da       |    |		Load_Top	At_Offset_2
0138 01d6       |    |		Execute	Vector,Field_Write
0139 4871       |Hq  |		Short_Literal	0x71
013a 4861       |Ha  |		Short_Literal	0x61
013b 4800       |H   |		Short_Literal	0x0
013c 00d9       |    |		Load_Top	At_Offset_1
013d 00dc       |    |		Load_Top	At_Offset_4
013e 01d6       |    |		Execute	Vector,Field_Write
013f 3ffb       |?   |		Loop_Increasing	0x13b
0140 4878       |Hx  |		Short_Literal	0x78
0141 4874       |Ht  |		Short_Literal	0x74
0142 4800       |H   |		Short_Literal	0x0
0143 00d9       |    |		Load_Top	At_Offset_1
0144 00dc       |    |		Load_Top	At_Offset_4
0145 01d6       |    |		Execute	Vector,Field_Write
0146 3ffb       |?   |		Loop_Increasing	0x142
0147 4800       |H   |		Short_Literal	0x0
0148 487a       |Hz  |		Short_Literal	0x7a
0149 00da       |    |		Load_Top	At_Offset_2
014a 01d6       |    |		Execute	Vector,Field_Write
014b 4800       |H   |		Short_Literal	0x0
014c 487b       |H{  |		Short_Literal	0x7b
014d 00da       |    |		Load_Top	At_Offset_2
014e 01d6       |    |		Execute	Vector,Field_Write
014f 4883       |H   |		Short_Literal	0x83
0150 487d       |H}  |		Short_Literal	0x7d
0151 4800       |H   |		Short_Literal	0x0
0152 00d9       |    |		Load_Top	At_Offset_1
0153 00dc       |    |		Load_Top	At_Offset_4
0154 01d6       |    |		Execute	Vector,Field_Write
0155 3ffb       |?   |		Loop_Increasing	0x151
0156 4888       |H   |		Short_Literal	0x88
0157 4886       |H   |		Short_Literal	0x86
0158 4800       |H   |		Short_Literal	0x0
0159 00d9       |    |		Load_Top	At_Offset_1
015a 00dc       |    |		Load_Top	At_Offset_4
015b 01d6       |    |		Execute	Vector,Field_Write
015c 3ffb       |?   |		Loop_Increasing	0x158
015d 4800       |H   |		Short_Literal	0x0
015e 488a       |H   |		Short_Literal	0x8a
015f 00da       |    |		Load_Top	At_Offset_2
0160 01d6       |    |		Execute	Vector,Field_Write
0161 4800       |H   |		Short_Literal	0x0
0162 488b       |H   |		Short_Literal	0x8b
0163 00da       |    |		Load_Top	At_Offset_2
0164 01d6       |    |		Execute	Vector,Field_Write
0165 4800       |H   |		Short_Literal	0x0
0166 488d       |H   |		Short_Literal	0x8d
0167 00da       |    |		Load_Top	At_Offset_2
0168 01d6       |    |		Execute	Vector,Field_Write
0169 4800       |H   |		Short_Literal	0x0
016a 488e       |H   |		Short_Literal	0x8e
016b 00da       |    |		Load_Top	At_Offset_2
016c 01d6       |    |		Execute	Vector,Field_Write
016d 4800       |H   |		Short_Literal	0x0
016e 4890       |H   |		Short_Literal	0x90
016f 00da       |    |		Load_Top	At_Offset_2
0170 01d6       |    |		Execute	Vector,Field_Write
0171 4800       |H   |		Short_Literal	0x0
0172 4892       |H   |		Short_Literal	0x92
0173 00da       |    |		Load_Top	At_Offset_2
0174 01d6       |    |		Execute	Vector,Field_Write
0175 4800       |H   |		Short_Literal	0x0
0176 4893       |H   |		Short_Literal	0x93
0177 00da       |    |		Load_Top	At_Offset_2
0178 01d6       |    |		Execute	Vector,Field_Write
0179 489d       |H   |		Short_Literal	0x9d
017a 4898       |H   |		Short_Literal	0x98
017b 4800       |H   |		Short_Literal	0x0
017c 00d9       |    |		Load_Top	At_Offset_1
017d 00dc       |    |		Load_Top	At_Offset_4
017e 01d6       |    |		Execute	Vector,Field_Write
017f 3ffb       |?   |		Loop_Increasing	0x17b
0180 4800       |H   |		Short_Literal	0x0
0181 48a0       |H   |		Short_Literal	0xa0
0182 00da       |    |		Load_Top	At_Offset_2
0183 01d6       |    |		Execute	Vector,Field_Write
0184 4800       |H   |		Short_Literal	0x0
0185 48a2       |H   |		Short_Literal	0xa2
0186 00da       |    |		Load_Top	At_Offset_2
0187 01d6       |    |		Execute	Vector,Field_Write
0188 48a7       |H   |		Short_Literal	0xa7
0189 48a4       |H   |		Short_Literal	0xa4
018a 4800       |H   |		Short_Literal	0x0
018b 00d9       |    |		Load_Top	At_Offset_1
018c 00dc       |    |		Load_Top	At_Offset_4
018d 01d6       |    |		Execute	Vector,Field_Write
018e 3ffb       |?   |		Loop_Increasing	0x18a
018f 4800       |H   |		Short_Literal	0x0
0190 48a9       |H   |		Short_Literal	0xa9
0191 00da       |    |		Load_Top	At_Offset_2
0192 01d6       |    |		Execute	Vector,Field_Write
0193 4800       |H   |		Short_Literal	0x0
0194 48aa       |H   |		Short_Literal	0xaa
0195 00da       |    |		Load_Top	At_Offset_2
0196 01d6       |    |		Execute	Vector,Field_Write
0197 4800       |H   |		Short_Literal	0x0
0198 48ac       |H   |		Short_Literal	0xac
0199 00da       |    |		Load_Top	At_Offset_2
019a 01d6       |    |		Execute	Vector,Field_Write
019b 4800       |H   |		Short_Literal	0x0
019c 48ad       |H   |		Short_Literal	0xad
019d 00da       |    |		Load_Top	At_Offset_2
019e 01d6       |    |		Execute	Vector,Field_Write
019f 00da       |    |		Load_Top	At_Offset_2
01a0 01c3       |    |		Execute	Vector,Check_In_Type
01a1 00d9       |    |		Load_Top	At_Offset_1
01a2 01d4       |    |		Execute	Vector,Structure_Write
01a3 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x5 = 0x1a3,0xfffa
01a4 00c7       |    |		Action	Elaborate_Subprogram
01a5 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x6 = 0x1a5,0xfff9
01a6 00c7       |    |		Action	Elaborate_Subprogram
01a7 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x7 = 0x1a7,0xfff8
01a8 00c7       |    |		Action	Elaborate_Subprogram
01a9 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x8 = 0x1a9,0xfff7
01aa 00c7       |    |		Action	Elaborate_Subprogram
01ab 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x9 = 0x1ab,0xfff6
01ac 00c7       |    |		Action	Elaborate_Subprogram
01ad 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0xa = 0x1ad,0xfff5
01ae 00c7       |    |		Action	Elaborate_Subprogram
01af 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0xb = 0x1af,0xfff4
01b0 00c7       |    |		Action	Elaborate_Subprogram
01b1			BODY_0008:
01b1 00bc       |    |		Action	Signal_Activated
01b2 00bb       |    |		Action	Signal_Completion
01b3 0000 0000  |    |		.BLANK	0000[0x5]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb       |    |		.CONST	0x01bb								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0001       |    |		.CONST	0x0001								; Number of locals
01bb			BODY_01b8:
01bb			INIT_01b8:
01bb e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2 = .DEBUG	0x01bb,0x061c,0x0002,0x0000,0x0056,0xba95,0x0000,0x08f0
													; Debug Table 0x2.0x0 = 0x1bb,0x1
01bc 008a       |    |		Action	Discrete,Diana_Spare0						; Debug Table 0x2.0x1 = 0x1bc,0x2
01bd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1				; Debug Table 0x2.0x2 = 0x1bd,0x3
01be 4831       |H1  |		Short_Literal	0x31							; Debug Table 0x2.0x3 = 0x1be,0x4
													; Debug Table 0x2.0x4 = 0x1be,0x5
01bf 0257       | W  |		Execute	Discrete,Raise
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c8       |    |		.CONST	0x01c8								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0002       |    |		.CONST	0x0002								; Number of locals
01c3			INIT_01c0:
01c3 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x3 = .DEBUG	0x01c3,0x0628,0x0002,0x0000,0x0056,0xba95,0x0000,0x08f9
													; Debug Table 0x3.0x0 = 0x1c3,0xffff
01c4 00db       |    |		Load_Top	At_Offset_3
01c5 00eb       |    |		Load_Encached	Diana_Cache
01c6 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01c7 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01c8			BODY_01c0:
01c8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x1 = 0x1c8,0x1
01c9 0217       |    |		Execute	Heap_Access,All_Reference
01ca 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01cb 0b1b       |    |		Execute_Immediate	Case_Compare,0x1b
01cc 7048       |pH  |		Jump_Nonzero	0x215
01cd 0b19       |    |		Execute_Immediate	Case_Compare,0x19
01ce 7046       |pF  |		Jump_Nonzero	0x215
01cf 0b1c       |    |		Execute_Immediate	Case_Compare,0x1c
01d0 704c       |pL  |		Jump_Nonzero	0x21d
01d1 0b28       | (  |		Execute_Immediate	Case_Compare,0x28
01d2 7052       |pR  |		Jump_Nonzero	0x225
01d3 0b30       | 0  |		Execute_Immediate	Case_Compare,0x30
01d4 7050       |pP  |		Jump_Nonzero	0x225
01d5 0b1d       |    |		Execute_Immediate	Case_Compare,0x1d
01d6 7056       |pV  |		Jump_Nonzero	0x22d
01d7 0b23       | #  |		Execute_Immediate	Case_Compare,0x23
01d8 705c       |p\  |		Jump_Nonzero	0x235
01d9 0b1e       |    |		Execute_Immediate	Case_Compare,0x1e
01da 7062       |pb  |		Jump_Nonzero	0x23d
01db 0b32       | 2  |		Execute_Immediate	Case_Compare,0x32
01dc 7068       |ph  |		Jump_Nonzero	0x245
01dd 0b31       | 1  |		Execute_Immediate	Case_Compare,0x31
01de 7066       |pf  |		Jump_Nonzero	0x245
01df 0b33       | 3  |		Execute_Immediate	Case_Compare,0x33
01e0 706c       |pl  |		Jump_Nonzero	0x24d
01e1 0b21       | !  |		Execute_Immediate	Case_Compare,0x21
01e2 706a       |pj  |		Jump_Nonzero	0x24d
01e3 0b29       | )  |		Execute_Immediate	Case_Compare,0x29
01e4 7068       |ph  |		Jump_Nonzero	0x24d
01e5 0b2c       | ,  |		Execute_Immediate	Case_Compare,0x2c
01e6 7066       |pf  |		Jump_Nonzero	0x24d
01e7 0b2e       | .  |		Execute_Immediate	Case_Compare,0x2e
01e8 7064       |pd  |		Jump_Nonzero	0x24d
01e9 0b1f       |    |		Execute_Immediate	Case_Compare,0x1f
01ea 706a       |pj  |		Jump_Nonzero	0x255
01eb 0b20       |    |		Execute_Immediate	Case_Compare,0x20
01ec 7070       |pp  |		Jump_Nonzero	0x25d
01ed 0b22       | "  |		Execute_Immediate	Case_Compare,0x22
01ee 7076       |pv  |		Jump_Nonzero	0x265
01ef 0b24       | $  |		Execute_Immediate	Case_Compare,0x24
01f0 707c       |p|  |		Jump_Nonzero	0x26d
01f1 0b25       | %  |		Execute_Immediate	Case_Compare,0x25
01f2 707a       |pz  |		Jump_Nonzero	0x26d
01f3 0b26       | &  |		Execute_Immediate	Case_Compare,0x26
01f4 7080       |p   |		Jump_Nonzero	0x275
01f5 0b2b       | +  |		Execute_Immediate	Case_Compare,0x2b
01f6 7086       |p   |		Jump_Nonzero	0x27d
01f7 0b2a       | *  |		Execute_Immediate	Case_Compare,0x2a
01f8 7084       |p   |		Jump_Nonzero	0x27d
01f9 0b2d       | -  |		Execute_Immediate	Case_Compare,0x2d
01fa 7082       |p   |		Jump_Nonzero	0x27d
01fb 0b27       | '  |		Execute_Immediate	Case_Compare,0x27
01fc 7088       |p   |		Jump_Nonzero	0x285
01fd 0b59       | Y  |		Execute_Immediate	Case_Compare,0x59
01fe 7086       |p   |		Jump_Nonzero	0x285
01ff 0b1a       |    |		Execute_Immediate	Case_Compare,0x1a
0200 708c       |p   |		Jump_Nonzero	0x28d
0201 0b0b       |    |		Execute_Immediate	Case_Compare,0xb
0202 7092       |p   |		Jump_Nonzero	0x295
0203 0b2f       | /  |		Execute_Immediate	Case_Compare,0x2f
0204 7098       |p   |		Jump_Nonzero	0x29d
0205 0b18       |    |		Execute_Immediate	Case_Compare,0x18
0206 709e       |p   |		Jump_Nonzero	0x2a5
0207 0b15       |    |		Execute_Immediate	Case_Compare,0x15
0208 709c       |p   |		Jump_Nonzero	0x2a5
0209 0b0c       |    |		Execute_Immediate	Case_Compare,0xc
020a 70a2       |p   |		Jump_Nonzero	0x2ad
020b 0b16       |    |		Execute_Immediate	Case_Compare,0x16
020c 70a0       |p   |		Jump_Nonzero	0x2ad
020d 0b17       |    |		Execute_Immediate	Case_Compare,0x17
020e 70a6       |p   |		Jump_Nonzero	0x2b5
020f 0b14       |    |		Execute_Immediate	Case_Compare,0x14
0210 70a4       |p   |		Jump_Nonzero	0x2b5
0211 0bab       |    |		Execute_Immediate	Case_Compare,0xab
0212 70aa       |p   |		Jump_Nonzero	0x2bd
0213 48e0       |H   |		Short_Literal	0xe0							; Debug Table 0x3.0x2 = 0x213,0x18
0214 0257       | W  |		Execute	Discrete,Raise
0215 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x3 = 0x215,0x2
0216 00dd       |    |		Load_Top	At_Offset_5
0217 0217       |    |		Execute	Heap_Access,All_Reference
0218 2e21       |.!  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x21
0219 49ed       |I   |		Short_Literal	0x1ed
021a 00eb       |    |		Load_Encached	Diana_Cache
021b 0096       |    |		Execute	Package,Entry
021c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
021d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x4 = 0x21d,0x3
021e 00dd       |    |		Load_Top	At_Offset_5
021f 0217       |    |		Execute	Heap_Access,All_Reference
0220 2e2f       |./  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2f
0221 49ed       |I   |		Short_Literal	0x1ed
0222 00eb       |    |		Load_Encached	Diana_Cache
0223 0096       |    |		Execute	Package,Entry
0224 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0225 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x5 = 0x225,0x4
0226 00dd       |    |		Load_Top	At_Offset_5
0227 0217       |    |		Execute	Heap_Access,All_Reference
0228 2e96       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x96
0229 49ed       |I   |		Short_Literal	0x1ed
022a 00eb       |    |		Load_Encached	Diana_Cache
022b 0096       |    |		Execute	Package,Entry
022c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
022d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x6 = 0x22d,0x5
022e 00dd       |    |		Load_Top	At_Offset_5
022f 0217       |    |		Execute	Heap_Access,All_Reference
0230 2e37       |.7  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x37
0231 49ed       |I   |		Short_Literal	0x1ed
0232 00eb       |    |		Load_Encached	Diana_Cache
0233 0096       |    |		Execute	Package,Entry
0234 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0235 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x7 = 0x235,0x6
0236 00dd       |    |		Load_Top	At_Offset_5
0237 0217       |    |		Execute	Heap_Access,All_Reference
0238 2e3c       |.<  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3c
0239 49ed       |I   |		Short_Literal	0x1ed
023a 00eb       |    |		Load_Encached	Diana_Cache
023b 0096       |    |		Execute	Package,Entry
023c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
023d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x8 = 0x23d,0x7
023e 00dd       |    |		Load_Top	At_Offset_5
023f 0217       |    |		Execute	Heap_Access,All_Reference
0240 2e41       |.A  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x41
0241 49ed       |I   |		Short_Literal	0x1ed
0242 00eb       |    |		Load_Encached	Diana_Cache
0243 0096       |    |		Execute	Package,Entry
0244 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0245 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x9 = 0x245,0x8
0246 00dd       |    |		Load_Top	At_Offset_5
0247 0217       |    |		Execute	Heap_Access,All_Reference
0248 2e4a       |.J  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4a
0249 49ed       |I   |		Short_Literal	0x1ed
024a 00eb       |    |		Load_Encached	Diana_Cache
024b 0096       |    |		Execute	Package,Entry
024c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
024d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0xa = 0x24d,0x9
024e 00dd       |    |		Load_Top	At_Offset_5
024f 0217       |    |		Execute	Heap_Access,All_Reference
0250 2e4f       |.O  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4f
0251 49ed       |I   |		Short_Literal	0x1ed
0252 00eb       |    |		Load_Encached	Diana_Cache
0253 0096       |    |		Execute	Package,Entry
0254 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0255 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0xb = 0x255,0xa
0256 00dd       |    |		Load_Top	At_Offset_5
0257 0217       |    |		Execute	Heap_Access,All_Reference
0258 2e5b       |.[  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5b
0259 49ed       |I   |		Short_Literal	0x1ed
025a 00eb       |    |		Load_Encached	Diana_Cache
025b 0096       |    |		Execute	Package,Entry
025c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
025d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0xc = 0x25d,0xb
025e 00dd       |    |		Load_Top	At_Offset_5
025f 0217       |    |		Execute	Heap_Access,All_Reference
0260 2e5d       |.]  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5d
0261 49ed       |I   |		Short_Literal	0x1ed
0262 00eb       |    |		Load_Encached	Diana_Cache
0263 0096       |    |		Execute	Package,Entry
0264 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0265 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0xd = 0x265,0xc
0266 00dd       |    |		Load_Top	At_Offset_5
0267 0217       |    |		Execute	Heap_Access,All_Reference
0268 2e70       |.p  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x70
0269 49ed       |I   |		Short_Literal	0x1ed
026a 00eb       |    |		Load_Encached	Diana_Cache
026b 0096       |    |		Execute	Package,Entry
026c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
026d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0xe = 0x26d,0xd
026e 00dd       |    |		Load_Top	At_Offset_5
026f 0217       |    |		Execute	Heap_Access,All_Reference
0270 2e77       |.w  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x77
0271 49ed       |I   |		Short_Literal	0x1ed
0272 00eb       |    |		Load_Encached	Diana_Cache
0273 0096       |    |		Execute	Package,Entry
0274 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0275 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0xf = 0x275,0xe
0276 00dd       |    |		Load_Top	At_Offset_5
0277 0217       |    |		Execute	Heap_Access,All_Reference
0278 2e84       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x84
0279 49ed       |I   |		Short_Literal	0x1ed
027a 00eb       |    |		Load_Encached	Diana_Cache
027b 0096       |    |		Execute	Package,Entry
027c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
027d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x10 = 0x27d,0xf
027e 00dd       |    |		Load_Top	At_Offset_5
027f 0217       |    |		Execute	Heap_Access,All_Reference
0280 2e87       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x87
0281 49ed       |I   |		Short_Literal	0x1ed
0282 00eb       |    |		Load_Encached	Diana_Cache
0283 0096       |    |		Execute	Package,Entry
0284 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0285 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x11 = 0x285,0x10
0286 00dd       |    |		Load_Top	At_Offset_5
0287 0217       |    |		Execute	Heap_Access,All_Reference
0288 2e8a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8a
0289 49ed       |I   |		Short_Literal	0x1ed
028a 00eb       |    |		Load_Encached	Diana_Cache
028b 0096       |    |		Execute	Package,Entry
028c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
028d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x12 = 0x28d,0x11
028e 00dd       |    |		Load_Top	At_Offset_5
028f 0217       |    |		Execute	Heap_Access,All_Reference
0290 2ea1       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa1
0291 49ed       |I   |		Short_Literal	0x1ed
0292 00eb       |    |		Load_Encached	Diana_Cache
0293 0096       |    |		Execute	Package,Entry
0294 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0295 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x13 = 0x295,0x12
0296 00dd       |    |		Load_Top	At_Offset_5
0297 0217       |    |		Execute	Heap_Access,All_Reference
0298 2eb1       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xb1
0299 49ed       |I   |		Short_Literal	0x1ed
029a 00eb       |    |		Load_Encached	Diana_Cache
029b 0096       |    |		Execute	Package,Entry
029c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
029d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x14 = 0x29d,0x13
029e 00dd       |    |		Load_Top	At_Offset_5
029f 0217       |    |		Execute	Heap_Access,All_Reference
02a0 2eb8       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xb8
02a1 49ed       |I   |		Short_Literal	0x1ed
02a2 00eb       |    |		Load_Encached	Diana_Cache
02a3 0096       |    |		Execute	Package,Entry
02a4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02a5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x15 = 0x2a5,0x14
02a6 00dd       |    |		Load_Top	At_Offset_5
02a7 0217       |    |		Execute	Heap_Access,All_Reference
02a8 2ebc       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xbc
02a9 49ed       |I   |		Short_Literal	0x1ed
02aa 00eb       |    |		Load_Encached	Diana_Cache
02ab 0096       |    |		Execute	Package,Entry
02ac 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ad 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x16 = 0x2ad,0x15
02ae 00dd       |    |		Load_Top	At_Offset_5
02af 0217       |    |		Execute	Heap_Access,All_Reference
02b0 2ebe       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xbe
02b1 49ed       |I   |		Short_Literal	0x1ed
02b2 00eb       |    |		Load_Encached	Diana_Cache
02b3 0096       |    |		Execute	Package,Entry
02b4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x17 = 0x2b5,0x16
02b6 00dd       |    |		Load_Top	At_Offset_5
02b7 0217       |    |		Execute	Heap_Access,All_Reference
02b8 2ec2       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc2
02b9 49ed       |I   |		Short_Literal	0x1ed
02ba 00eb       |    |		Load_Encached	Diana_Cache
02bb 0096       |    |		Execute	Package,Entry
02bc 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02bd 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x18 = 0x2bd,0x17
02be 00dd       |    |		Load_Top	At_Offset_5
02bf 0217       |    |		Execute	Heap_Access,All_Reference
02c0 2ec9       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc9
02c1 49ed       |I   |		Short_Literal	0x1ed
02c2 00eb       |    |		Load_Encached	Diana_Cache
02c3 0096       |    |		Execute	Package,Entry
02c4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02c5 0000 0000  |    |		.XXX[0x3]
02c7 0000       |    |
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb       |    |		.CONST	0x02cb								; Address of begin
02c9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ca 0001       |    |		.CONST	0x0001								; Number of locals
02cb			BODY_02c8:
02cb			INIT_02c8:
02cb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4 = .DEBUG	0x02cb,0x065c,0x0001,0x0000,0x0056,0xba95,0x0000,0x0902
													; Debug Table 0x4.0x0 = 0x2cb,0x1
02cc 0217       |    |		Execute	Heap_Access,All_Reference
02cd 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
02ce 0b1b       |    |		Execute_Immediate	Case_Compare,0x1b
02cf 7048       |pH  |		Jump_Nonzero	0x318
02d0 0b19       |    |		Execute_Immediate	Case_Compare,0x19
02d1 7046       |pF  |		Jump_Nonzero	0x318
02d2 0b1c       |    |		Execute_Immediate	Case_Compare,0x1c
02d3 7049       |pI  |		Jump_Nonzero	0x31d
02d4 0b28       | (  |		Execute_Immediate	Case_Compare,0x28
02d5 704c       |pL  |		Jump_Nonzero	0x322
02d6 0b30       | 0  |		Execute_Immediate	Case_Compare,0x30
02d7 704a       |pJ  |		Jump_Nonzero	0x322
02d8 0b1d       |    |		Execute_Immediate	Case_Compare,0x1d
02d9 704d       |pM  |		Jump_Nonzero	0x327
02da 0b23       | #  |		Execute_Immediate	Case_Compare,0x23
02db 7050       |pP  |		Jump_Nonzero	0x32c
02dc 0b1e       |    |		Execute_Immediate	Case_Compare,0x1e
02dd 7053       |pS  |		Jump_Nonzero	0x331
02de 0b32       | 2  |		Execute_Immediate	Case_Compare,0x32
02df 7056       |pV  |		Jump_Nonzero	0x336
02e0 0b31       | 1  |		Execute_Immediate	Case_Compare,0x31
02e1 7054       |pT  |		Jump_Nonzero	0x336
02e2 0b33       | 3  |		Execute_Immediate	Case_Compare,0x33
02e3 7057       |pW  |		Jump_Nonzero	0x33b
02e4 0b21       | !  |		Execute_Immediate	Case_Compare,0x21
02e5 7055       |pU  |		Jump_Nonzero	0x33b
02e6 0b29       | )  |		Execute_Immediate	Case_Compare,0x29
02e7 7053       |pS  |		Jump_Nonzero	0x33b
02e8 0b2c       | ,  |		Execute_Immediate	Case_Compare,0x2c
02e9 7051       |pQ  |		Jump_Nonzero	0x33b
02ea 0b2e       | .  |		Execute_Immediate	Case_Compare,0x2e
02eb 704f       |pO  |		Jump_Nonzero	0x33b
02ec 0b1f       |    |		Execute_Immediate	Case_Compare,0x1f
02ed 7052       |pR  |		Jump_Nonzero	0x340
02ee 0b20       |    |		Execute_Immediate	Case_Compare,0x20
02ef 7055       |pU  |		Jump_Nonzero	0x345
02f0 0b22       | "  |		Execute_Immediate	Case_Compare,0x22
02f1 7058       |pX  |		Jump_Nonzero	0x34a
02f2 0b24       | $  |		Execute_Immediate	Case_Compare,0x24
02f3 705b       |p[  |		Jump_Nonzero	0x34f
02f4 0b25       | %  |		Execute_Immediate	Case_Compare,0x25
02f5 7059       |pY  |		Jump_Nonzero	0x34f
02f6 0b26       | &  |		Execute_Immediate	Case_Compare,0x26
02f7 705c       |p\  |		Jump_Nonzero	0x354
02f8 0b2b       | +  |		Execute_Immediate	Case_Compare,0x2b
02f9 705f       |p_  |		Jump_Nonzero	0x359
02fa 0b2a       | *  |		Execute_Immediate	Case_Compare,0x2a
02fb 705d       |p]  |		Jump_Nonzero	0x359
02fc 0b2d       | -  |		Execute_Immediate	Case_Compare,0x2d
02fd 705b       |p[  |		Jump_Nonzero	0x359
02fe 0b27       | '  |		Execute_Immediate	Case_Compare,0x27
02ff 705e       |p^  |		Jump_Nonzero	0x35e
0300 0b59       | Y  |		Execute_Immediate	Case_Compare,0x59
0301 705c       |p\  |		Jump_Nonzero	0x35e
0302 0b1a       |    |		Execute_Immediate	Case_Compare,0x1a
0303 705f       |p_  |		Jump_Nonzero	0x363
0304 0b0b       |    |		Execute_Immediate	Case_Compare,0xb
0305 7062       |pb  |		Jump_Nonzero	0x368
0306 0b2f       | /  |		Execute_Immediate	Case_Compare,0x2f
0307 7065       |pe  |		Jump_Nonzero	0x36d
0308 0b18       |    |		Execute_Immediate	Case_Compare,0x18
0309 7068       |ph  |		Jump_Nonzero	0x372
030a 0b15       |    |		Execute_Immediate	Case_Compare,0x15
030b 7066       |pf  |		Jump_Nonzero	0x372
030c 0b0c       |    |		Execute_Immediate	Case_Compare,0xc
030d 7069       |pi  |		Jump_Nonzero	0x377
030e 0b16       |    |		Execute_Immediate	Case_Compare,0x16
030f 7067       |pg  |		Jump_Nonzero	0x377
0310 0b17       |    |		Execute_Immediate	Case_Compare,0x17
0311 706a       |pj  |		Jump_Nonzero	0x37c
0312 0b14       |    |		Execute_Immediate	Case_Compare,0x14
0313 7068       |ph  |		Jump_Nonzero	0x37c
0314 0bab       |    |		Execute_Immediate	Case_Compare,0xab
0315 706b       |pk  |		Jump_Nonzero	0x381
0316 48e0       |H   |		Short_Literal	0xe0							; Debug Table 0x4.0x1 = 0x316,0x18
0317 0257       | W  |		Execute	Discrete,Raise
0318 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x2 = 0x318,0x2
0319 00dc       |    |		Load_Top	At_Offset_4
031a 0217       |    |		Execute	Heap_Access,All_Reference
031b 2a21       |*!  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x21
031c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
031d 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x3 = 0x31d,0x3
031e 00dc       |    |		Load_Top	At_Offset_4
031f 0217       |    |		Execute	Heap_Access,All_Reference
0320 2a2f       |*/  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2f
0321 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0322 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x4 = 0x322,0x4
0323 00dc       |    |		Load_Top	At_Offset_4
0324 0217       |    |		Execute	Heap_Access,All_Reference
0325 2a96       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x96
0326 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0327 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x5 = 0x327,0x5
0328 00dc       |    |		Load_Top	At_Offset_4
0329 0217       |    |		Execute	Heap_Access,All_Reference
032a 2a37       |*7  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x37
032b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
032c 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x6 = 0x32c,0x6
032d 00dc       |    |		Load_Top	At_Offset_4
032e 0217       |    |		Execute	Heap_Access,All_Reference
032f 2a3c       |*<  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3c
0330 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0331 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x7 = 0x331,0x7
0332 00dc       |    |		Load_Top	At_Offset_4
0333 0217       |    |		Execute	Heap_Access,All_Reference
0334 2a41       |*A  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x41
0335 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0336 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x8 = 0x336,0x8
0337 00dc       |    |		Load_Top	At_Offset_4
0338 0217       |    |		Execute	Heap_Access,All_Reference
0339 2a4a       |*J  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4a
033a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
033b 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x9 = 0x33b,0x9
033c 00dc       |    |		Load_Top	At_Offset_4
033d 0217       |    |		Execute	Heap_Access,All_Reference
033e 2a4f       |*O  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4f
033f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0340 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0xa = 0x340,0xa
0341 00dc       |    |		Load_Top	At_Offset_4
0342 0217       |    |		Execute	Heap_Access,All_Reference
0343 2a5b       |*[  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5b
0344 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0345 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0xb = 0x345,0xb
0346 00dc       |    |		Load_Top	At_Offset_4
0347 0217       |    |		Execute	Heap_Access,All_Reference
0348 2a5d       |*]  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5d
0349 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
034a 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0xc = 0x34a,0xc
034b 00dc       |    |		Load_Top	At_Offset_4
034c 0217       |    |		Execute	Heap_Access,All_Reference
034d 2a70       |*p  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x70
034e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
034f 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0xd = 0x34f,0xd
0350 00dc       |    |		Load_Top	At_Offset_4
0351 0217       |    |		Execute	Heap_Access,All_Reference
0352 2a77       |*w  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x77
0353 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0354 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0xe = 0x354,0xe
0355 00dc       |    |		Load_Top	At_Offset_4
0356 0217       |    |		Execute	Heap_Access,All_Reference
0357 2a84       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x84
0358 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0359 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0xf = 0x359,0xf
035a 00dc       |    |		Load_Top	At_Offset_4
035b 0217       |    |		Execute	Heap_Access,All_Reference
035c 2a87       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x87
035d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
035e 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x10 = 0x35e,0x10
035f 00dc       |    |		Load_Top	At_Offset_4
0360 0217       |    |		Execute	Heap_Access,All_Reference
0361 2a8a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8a
0362 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0363 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x11 = 0x363,0x11
0364 00dc       |    |		Load_Top	At_Offset_4
0365 0217       |    |		Execute	Heap_Access,All_Reference
0366 2aa1       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa1
0367 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0368 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x12 = 0x368,0x12
0369 00dc       |    |		Load_Top	At_Offset_4
036a 0217       |    |		Execute	Heap_Access,All_Reference
036b 2ab1       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb1
036c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
036d 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x13 = 0x36d,0x13
036e 00dc       |    |		Load_Top	At_Offset_4
036f 0217       |    |		Execute	Heap_Access,All_Reference
0370 2ab8       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb8
0371 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0372 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x14 = 0x372,0x14
0373 00dc       |    |		Load_Top	At_Offset_4
0374 0217       |    |		Execute	Heap_Access,All_Reference
0375 2abc       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xbc
0376 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0377 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x15 = 0x377,0x15
0378 00dc       |    |		Load_Top	At_Offset_4
0379 0217       |    |		Execute	Heap_Access,All_Reference
037a 2abe       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xbe
037b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
037c 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x16 = 0x37c,0x16
037d 00dc       |    |		Load_Top	At_Offset_4
037e 0217       |    |		Execute	Heap_Access,All_Reference
037f 2ac2       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc2
0380 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0381 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x4.0x17 = 0x381,0x17
0382 00dc       |    |		Load_Top	At_Offset_4
0383 0217       |    |		Execute	Heap_Access,All_Reference
0384 2ac9       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc9
0385 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0386 0000 0000  |    |		.XXX[0x2]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b       |    |		.CONST	0x038b								; Address of begin
0389 0004       |    |		.CONST	0x0004								; Address of exception handler
038a 0001       |    |		.CONST	0x0001								; Number of locals
038b			BODY_0388:
038b			INIT_0388:
038b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5 = .DEBUG	0x038b,0x068e,0x0001,0x0000,0x0056,0xba95,0x0000,0x090e
													; Debug Table 0x5.0x0 = 0x38b,0x1
038c 49ee       |I   |		Short_Literal	0x1ee
038d 00eb       |    |		Load_Encached	Diana_Cache
038e 0096       |    |		Execute	Package,Entry
038f 00db       |    |		Load_Top	At_Offset_3
0390 820f       |    |		Call	0x1,0xf
0391 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0392 0000 0000  |    |		.BLANK	0000[0x6]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039b       |    |		.CONST	0x039b								; Address of begin
0399 0004       |    |		.CONST	0x0004								; Address of exception handler
039a 0001       |    |		.CONST	0x0001								; Number of locals
039b			BODY_0398:
039b			INIT_0398:
039b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x039b,0x0692,0x0002,0x0000,0x0056,0xba95,0x0000,0x091a
													; Debug Table 0x6.0x0 = 0x39b,0x1
039c 0217       |    |		Execute	Heap_Access,All_Reference
039d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
039e 46ad       |F   |		Jump_Case	0xae
039f 78d9       |x   |		Jump	0x479								; case 0x0
03a0 78d8       |x   |		Jump	0x479								; case 0x1
03a1 78af       |x   |		Jump	0x451								; case 0x2
03a2 78d6       |x   |		Jump	0x479								; case 0x3
03a3 78d5       |x   |		Jump	0x479								; case 0x4
03a4 78d4       |x   |		Jump	0x479								; case 0x5
03a5 78d3       |x   |		Jump	0x479								; case 0x6
03a6 78d2       |x   |		Jump	0x479								; case 0x7
03a7 78d1       |x   |		Jump	0x479								; case 0x8
03a8 78d0       |x   |		Jump	0x479								; case 0x9
03a9 78cf       |x   |		Jump	0x479								; case 0xa
03aa 78ce       |x   |		Jump	0x479								; case 0xb
03ab 78cd       |x   |		Jump	0x479								; case 0xc
03ac 78cc       |x   |		Jump	0x479								; case 0xd
03ad 78cb       |x   |		Jump	0x479								; case 0xe
03ae 78ca       |x   |		Jump	0x479								; case 0xf
03af 78c9       |x   |		Jump	0x479								; case 0x10
03b0 78c8       |x   |		Jump	0x479								; case 0x11
03b1 78c7       |x   |		Jump	0x479								; case 0x12
03b2 78c6       |x   |		Jump	0x479								; case 0x13
03b3 78c5       |x   |		Jump	0x479								; case 0x14
03b4 78c4       |x   |		Jump	0x479								; case 0x15
03b5 78c3       |x   |		Jump	0x479								; case 0x16
03b6 78c2       |x   |		Jump	0x479								; case 0x17
03b7 78c1       |x   |		Jump	0x479								; case 0x18
03b8 78c0       |x   |		Jump	0x479								; case 0x19
03b9 78bf       |x   |		Jump	0x479								; case 0x1a
03ba 78be       |x   |		Jump	0x479								; case 0x1b
03bb 78bd       |x   |		Jump	0x479								; case 0x1c
03bc 78bc       |x   |		Jump	0x479								; case 0x1d
03bd 78bb       |x   |		Jump	0x479								; case 0x1e
03be 78ba       |x   |		Jump	0x479								; case 0x1f
03bf 78b9       |x   |		Jump	0x479								; case 0x20
03c0 78b8       |x   |		Jump	0x479								; case 0x21
03c1 78b7       |x   |		Jump	0x479								; case 0x22
03c2 78b6       |x   |		Jump	0x479								; case 0x23
03c3 78b5       |x   |		Jump	0x479								; case 0x24
03c4 78b4       |x   |		Jump	0x479								; case 0x25
03c5 78b3       |x   |		Jump	0x479								; case 0x26
03c6 78b2       |x   |		Jump	0x479								; case 0x27
03c7 78b1       |x   |		Jump	0x479								; case 0x28
03c8 78b0       |x   |		Jump	0x479								; case 0x29
03c9 78af       |x   |		Jump	0x479								; case 0x2a
03ca 78ae       |x   |		Jump	0x479								; case 0x2b
03cb 78ad       |x   |		Jump	0x479								; case 0x2c
03cc 78ac       |x   |		Jump	0x479								; case 0x2d
03cd 78ab       |x   |		Jump	0x479								; case 0x2e
03ce 78aa       |x   |		Jump	0x479								; case 0x2f
03cf 78a9       |x   |		Jump	0x479								; case 0x30
03d0 78a8       |x   |		Jump	0x479								; case 0x31
03d1 78a7       |x   |		Jump	0x479								; case 0x32
03d2 78a6       |x   |		Jump	0x479								; case 0x33
03d3 78a5       |x   |		Jump	0x479								; case 0x34
03d4 78a4       |x   |		Jump	0x479								; case 0x35
03d5 78a3       |x   |		Jump	0x479								; case 0x36
03d6 787a       |xz  |		Jump	0x451								; case 0x37
03d7 787d       |x}  |		Jump	0x455								; case 0x38
03d8 787c       |x|  |		Jump	0x455								; case 0x39
03d9 7877       |xw  |		Jump	0x451								; case 0x3a
03da 787a       |xz  |		Jump	0x455								; case 0x3b
03db 7875       |xu  |		Jump	0x451								; case 0x3c
03dc 7878       |xx  |		Jump	0x455								; case 0x3d
03dd 7873       |xs  |		Jump	0x451								; case 0x3e
03de 7872       |xr  |		Jump	0x451								; case 0x3f
03df 7871       |xq  |		Jump	0x451								; case 0x40
03e0 7874       |xt  |		Jump	0x455								; case 0x41
03e1 786f       |xo  |		Jump	0x451								; case 0x42
03e2 7872       |xr  |		Jump	0x455								; case 0x43
03e3 786d       |xm  |		Jump	0x451								; case 0x44
03e4 7874       |xt  |		Jump	0x459								; case 0x45
03e5 786b       |xk  |		Jump	0x451								; case 0x46
03e6 786a       |xj  |		Jump	0x451								; case 0x47
03e7 786d       |xm  |		Jump	0x455								; case 0x48
03e8 7868       |xh  |		Jump	0x451								; case 0x49
03e9 787b       |x{  |		Jump	0x465								; case 0x4a
03ea 7862       |xb  |		Jump	0x44d								; case 0x4b
03eb 7869       |xi  |		Jump	0x455								; case 0x4c
03ec 7864       |xd  |		Jump	0x451								; case 0x4d
03ed 7867       |xg  |		Jump	0x455								; case 0x4e
03ee 7862       |xb  |		Jump	0x451								; case 0x4f
03ef 7861       |xa  |		Jump	0x451								; case 0x50
03f0 7860       |x`  |		Jump	0x451								; case 0x51
03f1 785b       |x[  |		Jump	0x44d								; case 0x52
03f2 7862       |xb  |		Jump	0x455								; case 0x53
03f3 7861       |xa  |		Jump	0x455								; case 0x54
03f4 7858       |xX  |		Jump	0x44d								; case 0x55
03f5 7863       |xc  |		Jump	0x459								; case 0x56
03f6 785a       |xZ  |		Jump	0x451								; case 0x57
03f7 7859       |xY  |		Jump	0x451								; case 0x58
03f8 7880       |x   |		Jump	0x479								; case 0x59
03f9 787b       |x{  |		Jump	0x475								; case 0x5a
03fa 785a       |xZ  |		Jump	0x455								; case 0x5b
03fb 7851       |xQ  |		Jump	0x44d								; case 0x5c
03fc 7850       |xP  |		Jump	0x44d								; case 0x5d
03fd 7853       |xS  |		Jump	0x451								; case 0x5e
03fe 7876       |xv  |		Jump	0x475								; case 0x5f
03ff 7851       |xQ  |		Jump	0x451								; case 0x60
0400 7878       |xx  |		Jump	0x479								; case 0x61
0401 7877       |xw  |		Jump	0x479								; case 0x62
0402 7876       |xv  |		Jump	0x479								; case 0x63
0403 7875       |xu  |		Jump	0x479								; case 0x64
0404 7874       |xt  |		Jump	0x479								; case 0x65
0405 7873       |xs  |		Jump	0x479								; case 0x66
0406 7872       |xr  |		Jump	0x479								; case 0x67
0407 7871       |xq  |		Jump	0x479								; case 0x68
0408 7870       |xp  |		Jump	0x479								; case 0x69
0409 786f       |xo  |		Jump	0x479								; case 0x6a
040a 786e       |xn  |		Jump	0x479								; case 0x6b
040b 786d       |xm  |		Jump	0x479								; case 0x6c
040c 786c       |xl  |		Jump	0x479								; case 0x6d
040d 786b       |xk  |		Jump	0x479								; case 0x6e
040e 786a       |xj  |		Jump	0x479								; case 0x6f
040f 7869       |xi  |		Jump	0x479								; case 0x70
0410 7868       |xh  |		Jump	0x479								; case 0x71
0411 7857       |xW  |		Jump	0x469								; case 0x72
0412 785a       |xZ  |		Jump	0x46d								; case 0x73
0413 7865       |xe  |		Jump	0x479								; case 0x74
0414 7864       |xd  |		Jump	0x479								; case 0x75
0415 7863       |xc  |		Jump	0x479								; case 0x76
0416 7862       |xb  |		Jump	0x479								; case 0x77
0417 7861       |xa  |		Jump	0x479								; case 0x78
0418 7838       |x8  |		Jump	0x451								; case 0x79
0419 785f       |x_  |		Jump	0x479								; case 0x7a
041a 785e       |x^  |		Jump	0x479								; case 0x7b
041b 7835       |x5  |		Jump	0x451								; case 0x7c
041c 785c       |x\  |		Jump	0x479								; case 0x7d
041d 785b       |x[  |		Jump	0x479								; case 0x7e
041e 785a       |xZ  |		Jump	0x479								; case 0x7f
041f 7859       |xY  |		Jump	0x479								; case 0x80
0420 7858       |xX  |		Jump	0x479								; case 0x81
0421 7857       |xW  |		Jump	0x479								; case 0x82
0422 7856       |xV  |		Jump	0x479								; case 0x83
0423 7835       |x5  |		Jump	0x459								; case 0x84
0424 7834       |x4  |		Jump	0x459								; case 0x85
0425 7853       |xS  |		Jump	0x479								; case 0x86
0426 7852       |xR  |		Jump	0x479								; case 0x87
0427 7851       |xQ  |		Jump	0x479								; case 0x88
0428 7830       |x0  |		Jump	0x459								; case 0x89
0429 784f       |xO  |		Jump	0x479								; case 0x8a
042a 784e       |xN  |		Jump	0x479								; case 0x8b
042b 7831       |x1  |		Jump	0x45d								; case 0x8c
042c 784c       |xL  |		Jump	0x479								; case 0x8d
042d 784b       |xK  |		Jump	0x479								; case 0x8e
042e 782e       |x.  |		Jump	0x45d								; case 0x8f
042f 7849       |xI  |		Jump	0x479								; case 0x90
0430 782c       |x,  |		Jump	0x45d								; case 0x91
0431 7847       |xG  |		Jump	0x479								; case 0x92
0432 7846       |xF  |		Jump	0x479								; case 0x93
0433 7829       |x)  |		Jump	0x45d								; case 0x94
0434 7824       |x$  |		Jump	0x459								; case 0x95
0435 7823       |x#  |		Jump	0x459								; case 0x96
0436 7822       |x"  |		Jump	0x459								; case 0x97
0437 7841       |xA  |		Jump	0x479								; case 0x98
0438 7840       |x@  |		Jump	0x479								; case 0x99
0439 783f       |x?  |		Jump	0x479								; case 0x9a
043a 783e       |x>  |		Jump	0x479								; case 0x9b
043b 783d       |x=  |		Jump	0x479								; case 0x9c
043c 783c       |x<  |		Jump	0x479								; case 0x9d
043d 7813       |x   |		Jump	0x451								; case 0x9e
043e 7812       |x   |		Jump	0x451								; case 0x9f
043f 7839       |x9  |		Jump	0x479								; case 0xa0
0440 7810       |x   |		Jump	0x451								; case 0xa1
0441 7837       |x7  |		Jump	0x479								; case 0xa2
0442 7816       |x   |		Jump	0x459								; case 0xa3
0443 7835       |x5  |		Jump	0x479								; case 0xa4
0444 7834       |x4  |		Jump	0x479								; case 0xa5
0445 7833       |x3  |		Jump	0x479								; case 0xa6
0446 7832       |x2  |		Jump	0x479								; case 0xa7
0447 7819       |x   |		Jump	0x461								; case 0xa8
0448 7830       |x0  |		Jump	0x479								; case 0xa9
0449 782f       |x/  |		Jump	0x479								; case 0xaa
044a 7826       |x&  |		Jump	0x471								; case 0xab
044b 782d       |x-  |		Jump	0x479								; case 0xac
044c 782c       |x,  |		Jump	0x479								; case 0xad
044d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x1 = 0x44d,0x2
044e 0217       |    |		Execute	Heap_Access,All_Reference
044f 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0450 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0451 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x2 = 0x451,0x3
0452 0217       |    |		Execute	Heap_Access,All_Reference
0453 2e0b       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xb
0454 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0455 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x3 = 0x455,0x4
0456 0217       |    |		Execute	Heap_Access,All_Reference
0457 2e12       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x12
0458 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0459 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x4 = 0x459,0x5
045a 0217       |    |		Execute	Heap_Access,All_Reference
045b 2e19       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x19
045c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
045d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x5 = 0x45d,0x6
045e 0217       |    |		Execute	Heap_Access,All_Reference
045f 2e20       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x20
0460 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0461 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x6 = 0x461,0x7
0462 0217       |    |		Execute	Heap_Access,All_Reference
0463 2e36       |.6  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x36
0464 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0465 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x7 = 0x465,0x8
0466 0217       |    |		Execute	Heap_Access,All_Reference
0467 2e8f       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8f
0468 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0469 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x8 = 0x469,0x9
046a 0217       |    |		Execute	Heap_Access,All_Reference
046b 2ea8       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa8
046c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
046d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x9 = 0x46d,0xa
046e 0217       |    |		Execute	Heap_Access,All_Reference
046f 2eb7       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xb7
0470 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0471 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0xa = 0x471,0xb
0472 0217       |    |		Execute	Heap_Access,All_Reference
0473 2ec8       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc8
0474 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0475 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0xb = 0x475,0xc
0476 0217       |    |		Execute	Heap_Access,All_Reference
0477 2eca       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xca
0478 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0479 e214       |    |		Load	0x1,0x14							; Debug Table 0x6.0xc = 0x479,0xd
047a 00db       |    |		Load_Top	At_Offset_3
047b 4973       |Is  |		Short_Literal	0x173
047c 00eb       |    |		Load_Encached	Diana_Cache
047d 0098       |    |		Execute	Package,Field_Read_Dynamic
047e 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
047f 680b       |h   |		Jump_Zero	0x48b
0480 e214       |    |		Load	0x1,0x14							; Debug Table 0x6.0xd = 0x480,0xe
0481 00db       |    |		Load_Top	At_Offset_3
0482 4973       |Is  |		Short_Literal	0x173
0483 00eb       |    |		Load_Encached	Diana_Cache
0484 0098       |    |		Execute	Package,Field_Read_Dynamic
0485 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0486 4997       |I   |		Short_Literal	0x197
0487 00eb       |    |		Load_Encached	Diana_Cache
0488 0098       |    |		Execute	Package,Field_Read_Dynamic
0489 025b       | [  |		Execute	Discrete,Check_In_Type
048a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
048b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0xe = 0x48b,0xf
048c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
048d 0000 0000  |    |		.XXX[0x3]
048f 0000       |    |
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0493       |    |		.CONST	0x0493								; Address of begin
0491 0004       |    |		.CONST	0x0004								; Address of exception handler
0492 0001       |    |		.CONST	0x0001								; Number of locals
0493			BODY_0490:
0493			INIT_0490:
0493 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x0493,0x06b2,0x0001,0x0000,0x0056,0xba95,0x0000,0x0923
													; Debug Table 0x7.0x0 = 0x493,0x1
0494 0217       |    |		Execute	Heap_Access,All_Reference
0495 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0496 46ad       |F   |		Jump_Case	0xae
0497 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; case 0x0
0498 78e3       |x   |		Jump	0x57c								; case 0x1
0499 78b0       |x   |		Jump	0x54a								; case 0x2
049a 78e1       |x   |		Jump	0x57c								; case 0x3
049b 78e0       |x   |		Jump	0x57c								; case 0x4
049c 78df       |x   |		Jump	0x57c								; case 0x5
049d 78de       |x   |		Jump	0x57c								; case 0x6
049e 78dd       |x   |		Jump	0x57c								; case 0x7
049f 78dc       |x   |		Jump	0x57c								; case 0x8
04a0 78db       |x   |		Jump	0x57c								; case 0x9
04a1 78da       |x   |		Jump	0x57c								; case 0xa
04a2 78d9       |x   |		Jump	0x57c								; case 0xb
04a3 78d8       |x   |		Jump	0x57c								; case 0xc
04a4 78d7       |x   |		Jump	0x57c								; case 0xd
04a5 78d6       |x   |		Jump	0x57c								; case 0xe
04a6 78d5       |x   |		Jump	0x57c								; case 0xf
04a7 78d4       |x   |		Jump	0x57c								; case 0x10
04a8 78d3       |x   |		Jump	0x57c								; case 0x11
04a9 78d2       |x   |		Jump	0x57c								; case 0x12
04aa 78d1       |x   |		Jump	0x57c								; case 0x13
04ab 78d0       |x   |		Jump	0x57c								; case 0x14
04ac 78cf       |x   |		Jump	0x57c								; case 0x15
04ad 78ce       |x   |		Jump	0x57c								; case 0x16
04ae 78cd       |x   |		Jump	0x57c								; case 0x17
04af 78cc       |x   |		Jump	0x57c								; case 0x18
04b0 78cb       |x   |		Jump	0x57c								; case 0x19
04b1 78ca       |x   |		Jump	0x57c								; case 0x1a
04b2 78c9       |x   |		Jump	0x57c								; case 0x1b
04b3 78c8       |x   |		Jump	0x57c								; case 0x1c
04b4 78c7       |x   |		Jump	0x57c								; case 0x1d
04b5 78c6       |x   |		Jump	0x57c								; case 0x1e
04b6 78c5       |x   |		Jump	0x57c								; case 0x1f
04b7 78c4       |x   |		Jump	0x57c								; case 0x20
04b8 78c3       |x   |		Jump	0x57c								; case 0x21
04b9 78c2       |x   |		Jump	0x57c								; case 0x22
04ba 78c1       |x   |		Jump	0x57c								; case 0x23
04bb 78c0       |x   |		Jump	0x57c								; case 0x24
04bc 78bf       |x   |		Jump	0x57c								; case 0x25
04bd 78be       |x   |		Jump	0x57c								; case 0x26
04be 78bd       |x   |		Jump	0x57c								; case 0x27
04bf 78bc       |x   |		Jump	0x57c								; case 0x28
04c0 78bb       |x   |		Jump	0x57c								; case 0x29
04c1 78ba       |x   |		Jump	0x57c								; case 0x2a
04c2 78b9       |x   |		Jump	0x57c								; case 0x2b
04c3 78b8       |x   |		Jump	0x57c								; case 0x2c
04c4 78b7       |x   |		Jump	0x57c								; case 0x2d
04c5 78b6       |x   |		Jump	0x57c								; case 0x2e
04c6 78b5       |x   |		Jump	0x57c								; case 0x2f
04c7 78b4       |x   |		Jump	0x57c								; case 0x30
04c8 78b3       |x   |		Jump	0x57c								; case 0x31
04c9 78b2       |x   |		Jump	0x57c								; case 0x32
04ca 78b1       |x   |		Jump	0x57c								; case 0x33
04cb 78b0       |x   |		Jump	0x57c								; case 0x34
04cc 78af       |x   |		Jump	0x57c								; case 0x35
04cd 78ae       |x   |		Jump	0x57c								; case 0x36
04ce 787b       |x{  |		Jump	0x54a								; case 0x37
04cf 787f       |x   |		Jump	0x54f								; case 0x38
04d0 787e       |x~  |		Jump	0x54f								; case 0x39
04d1 7878       |xx  |		Jump	0x54a								; case 0x3a
04d2 787c       |x|  |		Jump	0x54f								; case 0x3b
04d3 7876       |xv  |		Jump	0x54a								; case 0x3c
04d4 787a       |xz  |		Jump	0x54f								; case 0x3d
04d5 7874       |xt  |		Jump	0x54a								; case 0x3e
04d6 7873       |xs  |		Jump	0x54a								; case 0x3f
04d7 7872       |xr  |		Jump	0x54a								; case 0x40
04d8 7876       |xv  |		Jump	0x54f								; case 0x41
04d9 7870       |xp  |		Jump	0x54a								; case 0x42
04da 7874       |xt  |		Jump	0x54f								; case 0x43
04db 786e       |xn  |		Jump	0x54a								; case 0x44
04dc 7877       |xw  |		Jump	0x554								; case 0x45
04dd 786c       |xl  |		Jump	0x54a								; case 0x46
04de 786b       |xk  |		Jump	0x54a								; case 0x47
04df 786f       |xo  |		Jump	0x54f								; case 0x48
04e0 7869       |xi  |		Jump	0x54a								; case 0x49
04e1 7881       |x   |		Jump	0x563								; case 0x4a
04e2 7862       |xb  |		Jump	0x545								; case 0x4b
04e3 786b       |xk  |		Jump	0x54f								; case 0x4c
04e4 7865       |xe  |		Jump	0x54a								; case 0x4d
04e5 7869       |xi  |		Jump	0x54f								; case 0x4e
04e6 7863       |xc  |		Jump	0x54a								; case 0x4f
04e7 7862       |xb  |		Jump	0x54a								; case 0x50
04e8 7861       |xa  |		Jump	0x54a								; case 0x51
04e9 785b       |x[  |		Jump	0x545								; case 0x52
04ea 7864       |xd  |		Jump	0x54f								; case 0x53
04eb 7863       |xc  |		Jump	0x54f								; case 0x54
04ec 7858       |xX  |		Jump	0x545								; case 0x55
04ed 7866       |xf  |		Jump	0x554								; case 0x56
04ee 785b       |x[  |		Jump	0x54a								; case 0x57
04ef 785a       |xZ  |		Jump	0x54a								; case 0x58
04f0 788b       |x   |		Jump	0x57c								; case 0x59
04f1 7885       |x   |		Jump	0x577								; case 0x5a
04f2 785c       |x\  |		Jump	0x54f								; case 0x5b
04f3 7851       |xQ  |		Jump	0x545								; case 0x5c
04f4 7850       |xP  |		Jump	0x545								; case 0x5d
04f5 7854       |xT  |		Jump	0x54a								; case 0x5e
04f6 7880       |x   |		Jump	0x577								; case 0x5f
04f7 7852       |xR  |		Jump	0x54a								; case 0x60
04f8 7883       |x   |		Jump	0x57c								; case 0x61
04f9 7882       |x   |		Jump	0x57c								; case 0x62
04fa 7881       |x   |		Jump	0x57c								; case 0x63
04fb 7880       |x   |		Jump	0x57c								; case 0x64
04fc 787f       |x   |		Jump	0x57c								; case 0x65
04fd 787e       |x~  |		Jump	0x57c								; case 0x66
04fe 787d       |x}  |		Jump	0x57c								; case 0x67
04ff 787c       |x|  |		Jump	0x57c								; case 0x68
0500 787b       |x{  |		Jump	0x57c								; case 0x69
0501 787a       |xz  |		Jump	0x57c								; case 0x6a
0502 7879       |xy  |		Jump	0x57c								; case 0x6b
0503 7878       |xx  |		Jump	0x57c								; case 0x6c
0504 7877       |xw  |		Jump	0x57c								; case 0x6d
0505 7876       |xv  |		Jump	0x57c								; case 0x6e
0506 7875       |xu  |		Jump	0x57c								; case 0x6f
0507 7874       |xt  |		Jump	0x57c								; case 0x70
0508 7873       |xs  |		Jump	0x57c								; case 0x71
0509 785e       |x^  |		Jump	0x568								; case 0x72
050a 7862       |xb  |		Jump	0x56d								; case 0x73
050b 7870       |xp  |		Jump	0x57c								; case 0x74
050c 786f       |xo  |		Jump	0x57c								; case 0x75
050d 786e       |xn  |		Jump	0x57c								; case 0x76
050e 786d       |xm  |		Jump	0x57c								; case 0x77
050f 786c       |xl  |		Jump	0x57c								; case 0x78
0510 7839       |x9  |		Jump	0x54a								; case 0x79
0511 786a       |xj  |		Jump	0x57c								; case 0x7a
0512 7869       |xi  |		Jump	0x57c								; case 0x7b
0513 7836       |x6  |		Jump	0x54a								; case 0x7c
0514 7867       |xg  |		Jump	0x57c								; case 0x7d
0515 7866       |xf  |		Jump	0x57c								; case 0x7e
0516 7865       |xe  |		Jump	0x57c								; case 0x7f
0517 7864       |xd  |		Jump	0x57c								; case 0x80
0518 7863       |xc  |		Jump	0x57c								; case 0x81
0519 7862       |xb  |		Jump	0x57c								; case 0x82
051a 7861       |xa  |		Jump	0x57c								; case 0x83
051b 7838       |x8  |		Jump	0x554								; case 0x84
051c 7837       |x7  |		Jump	0x554								; case 0x85
051d 785e       |x^  |		Jump	0x57c								; case 0x86
051e 785d       |x]  |		Jump	0x57c								; case 0x87
051f 785c       |x\  |		Jump	0x57c								; case 0x88
0520 7833       |x3  |		Jump	0x554								; case 0x89
0521 785a       |xZ  |		Jump	0x57c								; case 0x8a
0522 7859       |xY  |		Jump	0x57c								; case 0x8b
0523 7835       |x5  |		Jump	0x559								; case 0x8c
0524 7857       |xW  |		Jump	0x57c								; case 0x8d
0525 7856       |xV  |		Jump	0x57c								; case 0x8e
0526 7832       |x2  |		Jump	0x559								; case 0x8f
0527 7854       |xT  |		Jump	0x57c								; case 0x90
0528 7830       |x0  |		Jump	0x559								; case 0x91
0529 7852       |xR  |		Jump	0x57c								; case 0x92
052a 7851       |xQ  |		Jump	0x57c								; case 0x93
052b 782d       |x-  |		Jump	0x559								; case 0x94
052c 7827       |x'  |		Jump	0x554								; case 0x95
052d 7826       |x&  |		Jump	0x554								; case 0x96
052e 7825       |x%  |		Jump	0x554								; case 0x97
052f 784c       |xL  |		Jump	0x57c								; case 0x98
0530 784b       |xK  |		Jump	0x57c								; case 0x99
0531 784a       |xJ  |		Jump	0x57c								; case 0x9a
0532 7849       |xI  |		Jump	0x57c								; case 0x9b
0533 7848       |xH  |		Jump	0x57c								; case 0x9c
0534 7847       |xG  |		Jump	0x57c								; case 0x9d
0535 7814       |x   |		Jump	0x54a								; case 0x9e
0536 7813       |x   |		Jump	0x54a								; case 0x9f
0537 7844       |xD  |		Jump	0x57c								; case 0xa0
0538 7811       |x   |		Jump	0x54a								; case 0xa1
0539 7842       |xB  |		Jump	0x57c								; case 0xa2
053a 7819       |x   |		Jump	0x554								; case 0xa3
053b 7840       |x@  |		Jump	0x57c								; case 0xa4
053c 783f       |x?  |		Jump	0x57c								; case 0xa5
053d 783e       |x>  |		Jump	0x57c								; case 0xa6
053e 783d       |x=  |		Jump	0x57c								; case 0xa7
053f 781e       |x   |		Jump	0x55e								; case 0xa8
0540 783b       |x;  |		Jump	0x57c								; case 0xa9
0541 783a       |x:  |		Jump	0x57c								; case 0xaa
0542 782f       |x/  |		Jump	0x572								; case 0xab
0543 7838       |x8  |		Jump	0x57c								; case 0xac
0544 7837       |x7  |		Jump	0x57c								; case 0xad
0545 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x1 = 0x545,0x2
0546 00db       |    |		Load_Top	At_Offset_3
0547 0217       |    |		Execute	Heap_Access,All_Reference
0548 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0549 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
054a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x2 = 0x54a,0x3
054b 00db       |    |		Load_Top	At_Offset_3
054c 0217       |    |		Execute	Heap_Access,All_Reference
054d 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
054e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
054f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x3 = 0x54f,0x4
0550 00db       |    |		Load_Top	At_Offset_3
0551 0217       |    |		Execute	Heap_Access,All_Reference
0552 2a12       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x12
0553 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0554 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x4 = 0x554,0x5
0555 00db       |    |		Load_Top	At_Offset_3
0556 0217       |    |		Execute	Heap_Access,All_Reference
0557 2a19       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x19
0558 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0559 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x5 = 0x559,0x6
055a 00db       |    |		Load_Top	At_Offset_3
055b 0217       |    |		Execute	Heap_Access,All_Reference
055c 2a20       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x20
055d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
055e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x6 = 0x55e,0x7
055f 00db       |    |		Load_Top	At_Offset_3
0560 0217       |    |		Execute	Heap_Access,All_Reference
0561 2a36       |*6  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x36
0562 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0563 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x7 = 0x563,0x8
0564 00db       |    |		Load_Top	At_Offset_3
0565 0217       |    |		Execute	Heap_Access,All_Reference
0566 2a8f       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8f
0567 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0568 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x8 = 0x568,0x9
0569 00db       |    |		Load_Top	At_Offset_3
056a 0217       |    |		Execute	Heap_Access,All_Reference
056b 2aa8       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa8
056c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
056d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x9 = 0x56d,0xa
056e 00db       |    |		Load_Top	At_Offset_3
056f 0217       |    |		Execute	Heap_Access,All_Reference
0570 2ab7       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb7
0571 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0572 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0xa = 0x572,0xb
0573 00db       |    |		Load_Top	At_Offset_3
0574 0217       |    |		Execute	Heap_Access,All_Reference
0575 2ac8       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc8
0576 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0577 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0xb = 0x577,0xc
0578 00db       |    |		Load_Top	At_Offset_3
0579 0217       |    |		Execute	Heap_Access,All_Reference
057a 2aca       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xca
057b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
057c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0xc = 0x57c,0xe
057d e214       |    |		Load	0x1,0x14
057e 00dc       |    |		Load_Top	At_Offset_4
057f 4973       |Is  |		Short_Literal	0x173
0580 00eb       |    |		Load_Encached	Diana_Cache
0581 0098       |    |		Execute	Package,Field_Read_Dynamic
0582 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0583 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0584 0000 0000  |    |		.BLANK	0000[0x4]
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 058b       |    |		.CONST	0x058b								; Address of begin
0589 0004       |    |		.CONST	0x0004								; Address of exception handler
058a 0001       |    |		.CONST	0x0001								; Number of locals
058b			BODY_0588:
058b			INIT_0588:
058b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x058b,0x06ce,0x0002,0x0000,0x0056,0xba95,0x0000,0x092f
													; Debug Table 0x8.0x0 = 0x58b,0x1
058c 00eb       |    |		Load_Encached	Diana_Cache
058d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
058e e216       |    |		Load	0x1,0x16
058f 01d7       |    |		Execute	Vector,Field_Read
0590 7007       |p   |		Jump_Nonzero	0x598
0591 e214       |    |		Load	0x1,0x14
0592 00db       |    |		Load_Top	At_Offset_3
0593 4973       |Is  |		Short_Literal	0x173
0594 00eb       |    |		Load_Encached	Diana_Cache
0595 0098       |    |		Execute	Package,Field_Read_Dynamic
0596 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
0597 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0598 4801       |H   |		Short_Literal	0x1
0599 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
059a ; --------------------------------------------------------------------------------------
059a ; STRING TABLE
059a ; --------------------------------------------------------------------------------------
059a 0004       |    |		.STRTAB	0x0004->0x059c							; "LX_LINE_COUNT"
059b 000f       |    |		.STREND 0x000f->0x05a2
059c 4c58 5f4c  |LX_L|		.STRTAB_STRINGS
05a3 0000 0000  |    |		.BLANK	0000[0x5]
05a8 ; --------------------------------------------------------------------------------------
05a8 ; Debug Table
05a8 ; --------------------------------------------------------------------------------------
05a8 0003 0009  |    |		.CONST	0x0003,0x0009
05aa 000b 05f2  |    |		.DEBUG	0x000b,0x05f2,0x0000,0x0000,0x0056,0xba95,0x0000,0x08ef
05b2 001a 0602  |    |		.DEBUG	0x001a,0x0602,0x0000,0x0000,0x0056,0xbc25,0x0000,0x0004
05ba 01bb 061c  |    |		.DEBUG	0x01bb,0x061c,0x0002,0x0000,0x0056,0xba95,0x0000,0x08f0
05c2 01c3 0628  |   (|		.DEBUG	0x01c3,0x0628,0x0002,0x0000,0x0056,0xba95,0x0000,0x08f9
05ca 02cb 065c  |   \|		.DEBUG	0x02cb,0x065c,0x0001,0x0000,0x0056,0xba95,0x0000,0x0902
05d2 038b 068e  |    |		.DEBUG	0x038b,0x068e,0x0001,0x0000,0x0056,0xba95,0x0000,0x090e
05da 039b 0692  |    |		.DEBUG	0x039b,0x0692,0x0002,0x0000,0x0056,0xba95,0x0000,0x091a
05e2 0493 06b2  |    |		.DEBUG	0x0493,0x06b2,0x0001,0x0000,0x0056,0xba95,0x0000,0x0923
05ea 058b 06ce  |    |		.DEBUG	0x058b,0x06ce,0x0002,0x0000,0x0056,0xba95,0x0000,0x092f
05f2 ; --------------------------------------------------------------------------------------
05f2 ; Debug3 Subtable 0x0
05f2 ; --------------------------------------------------------------------------------------
05f2 0007 0000  |    |		.DBG3TAB	0x0007,0x0000
05f4 000b ffff  |    |		.CONST	0x000b,0xffff
05f6 000d fffe  |    |		.CONST	0x000d,0xfffe
05f8 000f fffd  |    |		.CONST	0x000f,0xfffd
05fa 0011 fffc  |    |		.CONST	0x0011,0xfffc
05fc 0013 fffb  |    |		.CONST	0x0013,0xfffb
05fe 0015 fffa  |    |		.CONST	0x0015,0xfffa
0600 0017 fff9  |    |		.CONST	0x0017,0xfff9
0602 ; --------------------------------------------------------------------------------------
0602 ; Debug3 Subtable 0x1
0602 ; --------------------------------------------------------------------------------------
0602 000c 0000  |    |		.DBG3TAB	0x000c,0x0000
0604 001a ffff  |    |		.CONST	0x001a,0xffff
0606 001a fffe  |    |		.CONST	0x001a,0xfffe
0608 001a fffd  |    |		.CONST	0x001a,0xfffd
060a 0023 fffc  | #  |		.CONST	0x0023,0xfffc
060c 002a fffb  | *  |		.CONST	0x002a,0xfffb
060e 01a3 fffa  |    |		.CONST	0x01a3,0xfffa
0610 01a5 fff9  |    |		.CONST	0x01a5,0xfff9
0612 01a7 fff8  |    |		.CONST	0x01a7,0xfff8
0614 01a9 fff7  |    |		.CONST	0x01a9,0xfff7
0616 01ab fff6  |    |		.CONST	0x01ab,0xfff6
0618 01ad fff5  |    |		.CONST	0x01ad,0xfff5
061a 01af fff4  |    |		.CONST	0x01af,0xfff4
061c ; --------------------------------------------------------------------------------------
061c ; Debug3 Subtable 0x2
061c ; --------------------------------------------------------------------------------------
061c 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
061e 01bb 0001  |    |		.CONST	0x01bb,0x0001
0620 01bc 0002  |    |		.CONST	0x01bc,0x0002
0622 01bd 0003  |    |		.CONST	0x01bd,0x0003
0624 01be 0004  |    |		.CONST	0x01be,0x0004
0626 01be 0005  |    |		.CONST	0x01be,0x0005
0628 ; --------------------------------------------------------------------------------------
0628 ; Debug3 Subtable 0x3
0628 ; --------------------------------------------------------------------------------------
0628 0001 0018  |    |		.DBG3TAB	0x0001,0x0018
062a 01c3 ffff  |    |		.CONST	0x01c3,0xffff
062c 01c8 0001  |    |		.CONST	0x01c8,0x0001
062e 0213 0018  |    |		.CONST	0x0213,0x0018
0630 0215 0002  |    |		.CONST	0x0215,0x0002
0632 021d 0003  |    |		.CONST	0x021d,0x0003
0634 0225 0004  | %  |		.CONST	0x0225,0x0004
0636 022d 0005  | -  |		.CONST	0x022d,0x0005
0638 0235 0006  | 5  |		.CONST	0x0235,0x0006
063a 023d 0007  | =  |		.CONST	0x023d,0x0007
063c 0245 0008  | E  |		.CONST	0x0245,0x0008
063e 024d 0009  | M  |		.CONST	0x024d,0x0009
0640 0255 000a  | U  |		.CONST	0x0255,0x000a
0642 025d 000b  | ]  |		.CONST	0x025d,0x000b
0644 0265 000c  | e  |		.CONST	0x0265,0x000c
0646 026d 000d  | m  |		.CONST	0x026d,0x000d
0648 0275 000e  | u  |		.CONST	0x0275,0x000e
064a 027d 000f  | }  |		.CONST	0x027d,0x000f
064c 0285 0010  |    |		.CONST	0x0285,0x0010
064e 028d 0011  |    |		.CONST	0x028d,0x0011
0650 0295 0012  |    |		.CONST	0x0295,0x0012
0652 029d 0013  |    |		.CONST	0x029d,0x0013
0654 02a5 0014  |    |		.CONST	0x02a5,0x0014
0656 02ad 0015  |    |		.CONST	0x02ad,0x0015
0658 02b5 0016  |    |		.CONST	0x02b5,0x0016
065a 02bd 0017  |    |		.CONST	0x02bd,0x0017
065c ; --------------------------------------------------------------------------------------
065c ; Debug3 Subtable 0x4
065c ; --------------------------------------------------------------------------------------
065c 0000 0018  |    |		.DBG3TAB	0x0000,0x0018
065e 02cb 0001  |    |		.CONST	0x02cb,0x0001
0660 0316 0018  |    |		.CONST	0x0316,0x0018
0662 0318 0002  |    |		.CONST	0x0318,0x0002
0664 031d 0003  |    |		.CONST	0x031d,0x0003
0666 0322 0004  | "  |		.CONST	0x0322,0x0004
0668 0327 0005  | '  |		.CONST	0x0327,0x0005
066a 032c 0006  | ,  |		.CONST	0x032c,0x0006
066c 0331 0007  | 1  |		.CONST	0x0331,0x0007
066e 0336 0008  | 6  |		.CONST	0x0336,0x0008
0670 033b 0009  | ;  |		.CONST	0x033b,0x0009
0672 0340 000a  | @  |		.CONST	0x0340,0x000a
0674 0345 000b  | E  |		.CONST	0x0345,0x000b
0676 034a 000c  | J  |		.CONST	0x034a,0x000c
0678 034f 000d  | O  |		.CONST	0x034f,0x000d
067a 0354 000e  | T  |		.CONST	0x0354,0x000e
067c 0359 000f  | Y  |		.CONST	0x0359,0x000f
067e 035e 0010  | ^  |		.CONST	0x035e,0x0010
0680 0363 0011  | c  |		.CONST	0x0363,0x0011
0682 0368 0012  | h  |		.CONST	0x0368,0x0012
0684 036d 0013  | m  |		.CONST	0x036d,0x0013
0686 0372 0014  | r  |		.CONST	0x0372,0x0014
0688 0377 0015  | w  |		.CONST	0x0377,0x0015
068a 037c 0016  | |  |		.CONST	0x037c,0x0016
068c 0381 0017  |    |		.CONST	0x0381,0x0017
068e ; --------------------------------------------------------------------------------------
068e ; Debug3 Subtable 0x5
068e ; --------------------------------------------------------------------------------------
068e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0690 038b 0001  |    |		.CONST	0x038b,0x0001
0692 ; --------------------------------------------------------------------------------------
0692 ; Debug3 Subtable 0x6
0692 ; --------------------------------------------------------------------------------------
0692 0000 000f  |    |		.DBG3TAB	0x0000,0x000f
0694 039b 0001  |    |		.CONST	0x039b,0x0001
0696 044d 0002  | M  |		.CONST	0x044d,0x0002
0698 0451 0003  | Q  |		.CONST	0x0451,0x0003
069a 0455 0004  | U  |		.CONST	0x0455,0x0004
069c 0459 0005  | Y  |		.CONST	0x0459,0x0005
069e 045d 0006  | ]  |		.CONST	0x045d,0x0006
06a0 0461 0007  | a  |		.CONST	0x0461,0x0007
06a2 0465 0008  | e  |		.CONST	0x0465,0x0008
06a4 0469 0009  | i  |		.CONST	0x0469,0x0009
06a6 046d 000a  | m  |		.CONST	0x046d,0x000a
06a8 0471 000b  | q  |		.CONST	0x0471,0x000b
06aa 0475 000c  | u  |		.CONST	0x0475,0x000c
06ac 0479 000d  | y  |		.CONST	0x0479,0x000d
06ae 0480 000e  |    |		.CONST	0x0480,0x000e
06b0 048b 000f  |    |		.CONST	0x048b,0x000f
06b2 ; --------------------------------------------------------------------------------------
06b2 ; Debug3 Subtable 0x7
06b2 ; --------------------------------------------------------------------------------------
06b2 0000 000d  |    |		.DBG3TAB	0x0000,0x000d
06b4 0493 0001  |    |		.CONST	0x0493,0x0001
06b6 0545 0002  | E  |		.CONST	0x0545,0x0002
06b8 054a 0003  | J  |		.CONST	0x054a,0x0003
06ba 054f 0004  | O  |		.CONST	0x054f,0x0004
06bc 0554 0005  | T  |		.CONST	0x0554,0x0005
06be 0559 0006  | Y  |		.CONST	0x0559,0x0006
06c0 055e 0007  | ^  |		.CONST	0x055e,0x0007
06c2 0563 0008  | c  |		.CONST	0x0563,0x0008
06c4 0568 0009  | h  |		.CONST	0x0568,0x0009
06c6 056d 000a  | m  |		.CONST	0x056d,0x000a
06c8 0572 000b  | r  |		.CONST	0x0572,0x000b
06ca 0577 000c  | w  |		.CONST	0x0577,0x000c
06cc 057c 000e  | |  |		.CONST	0x057c,0x000e
06ce ; --------------------------------------------------------------------------------------
06ce ; Debug3 Subtable 0x8
06ce ; --------------------------------------------------------------------------------------
06ce 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06d0 058b 0001  |    |		.CONST	0x058b,0x0001
06d2 0000 0000  |    |		.BLANK	0000[0x12e]