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

⟦1be7fdeb0⟧

    Length: 7168 (0x1c00)
    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 0900       |    |		.CONST	0x0900								; 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 0006       |    |		.CONST	0x0006								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0165       | e  |		.CONST	0x0165								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 004b       | K  |		.CONST	0x004b								; Number of locals
000b			INIT_0008:
000b 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x0a72,0x0000,0x0000,0x0056,0xba95,0x0000,0x0a5c
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 017b  |   {|		Declare_Subprogram	INIT_0178,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 018b  |    |		Declare_Subprogram	INIT_0188,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 029a 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x1d,0xfff6
001f 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1f,0xfff5
0021 029a 0303  |    |		Declare_Subprogram	INIT_0300,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x21,0xfff4
0023 029a 0353  |   S|		Declare_Subprogram	INIT_0350,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x23,0xfff3
0025 029a 03a3  |    |		Declare_Subprogram	INIT_03a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x25,0xfff2
0027 029a 03ab  |    |		Declare_Subprogram	INIT_03a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x27,0xfff1
0029 029a 03b3  |    |		Declare_Subprogram	INIT_03b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x29,0xfff0
002b 029a 03c3  |    |		Declare_Subprogram	INIT_03c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x2b,0xffef
002d 029a 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x2d,0xffee
002f 029a 03e3  |    |		Declare_Subprogram	INIT_03e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x12 = 0x2f,0xffed
0031 029a 03f3  |    |		Declare_Subprogram	INIT_03f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x13 = 0x31,0xffec
0033 029a 0403  |    |		Declare_Subprogram	INIT_0400,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x14 = 0x33,0xffeb
0035 029a 0413  |    |		Declare_Subprogram	INIT_0410,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x15 = 0x35,0xffea
0037 029a 0423  |   #|		Declare_Subprogram	INIT_0420,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x16 = 0x37,0xffe9
0039 029a 0433  |   3|		Declare_Subprogram	INIT_0430,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x17 = 0x39,0xffe8
003b 029a 0443  |   C|		Declare_Subprogram	INIT_0440,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x18 = 0x3b,0xffe7
003d 029a 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x19 = 0x3d,0xffe6
003f 029a 05db  |    |		Declare_Subprogram	INIT_05d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1a = 0x3f,0xffe5
0041 029a 064b  |   K|		Declare_Subprogram	INIT_0648,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1b = 0x41,0xffe4
0043 029a 06c3  |    |		Declare_Subprogram	INIT_06c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1c = 0x43,0xffe3
0045 029a 06cb  |    |		Declare_Subprogram	INIT_06c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1d = 0x45,0xffe2
0047 029a 06d3  |    |		Declare_Subprogram	INIT_06d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1e = 0x47,0xffe1
0049 029a 0733  |   3|		Declare_Subprogram	INIT_0730,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1f = 0x49,0xffe0
004b 029a 0743  |   C|		Declare_Subprogram	INIT_0740,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x20 = 0x4b,0xffdf
004d 029a 0753  |   S|		Declare_Subprogram	INIT_0750,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x21 = 0x4d,0xffde
004f 029a 076b  |   k|		Declare_Subprogram	INIT_0768,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x22 = 0x4f,0xffdd
0051 029a 078b  |    |		Declare_Subprogram	INIT_0788,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x23 = 0x51,0xffdc
0053 029a 07a3  |    |		Declare_Subprogram	INIT_07a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x24 = 0x53,0xffdb
0055 029a 07d3  |    |		Declare_Subprogram	INIT_07d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x25 = 0x55,0xffda
0057 029a 0813  |    |		Declare_Subprogram	INIT_0810,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x26 = 0x57,0xffd9
0059 029a 0833  |   3|		Declare_Subprogram	INIT_0830,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x27 = 0x59,0xffd8
005b 029a 084b  |   K|		Declare_Subprogram	INIT_0848,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x28 = 0x5b,0xffd7
005d 029a 085b  |   [|		Declare_Subprogram	INIT_0858,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x29 = 0x5d,0xffd6
005f 00bf       |    |		Action	Accept_Activation
0060 0092 089d  |    |		Action	Push_String_Extended,0x89d					; "SM_SIZE"
													; Debug Table 0x1 = .DEBUG	0x0060,0x0ac8,0x0000,0x0000,0x0056,0xbb95,0x0000,0x000a
													; Debug Table 0x1.0x0 = 0x60,0xffff
													; Debug Table 0x1.0x1 = 0x60,0xfffe
													; Debug Table 0x1.0x2 = 0x60,0xfffd
0062 4973       |Is  |		Short_Literal	0x173
0063 00eb       |    |		Load_Encached	Diana_Cache
0064 0098       |    |		Execute	Package,Field_Read_Dynamic
0065 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0066 00eb       |    |		Load_Encached	Diana_Cache
0067 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0068 03f1       |    |		Declare_Variable	Discrete,With_Value
0069 0092 089e  |    |		Action	Push_String_Extended,0x89e					; "SM_STORAGE_SIZE"
													; Debug Table 0x1.0x3 = 0x69,0xfffc
006b 4973       |Is  |		Short_Literal	0x173
006c 00eb       |    |		Load_Encached	Diana_Cache
006d 0098       |    |		Execute	Package,Field_Read_Dynamic
006e 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
006f 00eb       |    |		Load_Encached	Diana_Cache
0070 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0071 03f1       |    |		Declare_Variable	Discrete,With_Value
0072 0092 089f  |    |		Action	Push_String_Extended,0x89f					; "SM_CONTROLLED"
													; Debug Table 0x1.0x4 = 0x72,0xfffb
0074 4973       |Is  |		Short_Literal	0x173
0075 00eb       |    |		Load_Encached	Diana_Cache
0076 0098       |    |		Execute	Package,Field_Read_Dynamic
0077 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0078 00eb       |    |		Load_Encached	Diana_Cache
0079 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
007a 03f1       |    |		Declare_Variable	Discrete,With_Value
007b 0092 08a0  |    |		Action	Push_String_Extended,0x8a0					; "SM_PACKING"
													; Debug Table 0x1.0x5 = 0x7b,0xfffa
007d 4973       |Is  |		Short_Literal	0x173
007e 00eb       |    |		Load_Encached	Diana_Cache
007f 0098       |    |		Execute	Package,Field_Read_Dynamic
0080 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0081 00eb       |    |		Load_Encached	Diana_Cache
0082 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0083 03f1       |    |		Declare_Variable	Discrete,With_Value
0084 0092 08a1  |    |		Action	Push_String_Extended,0x8a1					; "SM_ACTUAL_DELTA"
													; Debug Table 0x1.0x6 = 0x84,0xfff9
0086 4973       |Is  |		Short_Literal	0x173
0087 00eb       |    |		Load_Encached	Diana_Cache
0088 0098       |    |		Execute	Package,Field_Read_Dynamic
0089 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
008a 00eb       |    |		Load_Encached	Diana_Cache
008b 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
008c 03f1       |    |		Declare_Variable	Discrete,With_Value
008d 0092 08a2  |    |		Action	Push_String_Extended,0x8a2					; "NEW_SM_ACTUAL_DELTA"
													; Debug Table 0x1.0x7 = 0x8d,0xfff8
008f 4973       |Is  |		Short_Literal	0x173
0090 00eb       |    |		Load_Encached	Diana_Cache
0091 0098       |    |		Execute	Package,Field_Read_Dynamic
0092 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0093 00eb       |    |		Load_Encached	Diana_Cache
0094 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0095 03f1       |    |		Declare_Variable	Discrete,With_Value
0096 0092 08a3  |    |		Action	Push_String_Extended,0x8a3					; "SM_LOCATION"
													; Debug Table 0x1.0x8 = 0x96,0xfff7
0098 4973       |Is  |		Short_Literal	0x173
0099 00eb       |    |		Load_Encached	Diana_Cache
009a 0098       |    |		Execute	Package,Field_Read_Dynamic
009b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
009c 00eb       |    |		Load_Encached	Diana_Cache
009d 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
009e 03f1       |    |		Declare_Variable	Discrete,With_Value
009f 0092 08a4  |    |		Action	Push_String_Extended,0x8a4					; "SM_ADDRESS"
													; Debug Table 0x1.0x9 = 0x9f,0xfff6
00a1 4973       |Is  |		Short_Literal	0x173
00a2 00eb       |    |		Load_Encached	Diana_Cache
00a3 0098       |    |		Execute	Package,Field_Read_Dynamic
00a4 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00a5 00eb       |    |		Load_Encached	Diana_Cache
00a6 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00a7 03f1       |    |		Declare_Variable	Discrete,With_Value
00a8 0092 08a5  |    |		Action	Push_String_Extended,0x8a5					; "SM_COMP_SPEC"
													; Debug Table 0x1.0xa = 0xa8,0xfff5
00aa 4973       |Is  |		Short_Literal	0x173
00ab 00eb       |    |		Load_Encached	Diana_Cache
00ac 0098       |    |		Execute	Package,Field_Read_Dynamic
00ad 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00ae 00eb       |    |		Load_Encached	Diana_Cache
00af 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00b0 03f1       |    |		Declare_Variable	Discrete,With_Value
00b1 0092 08a6  |    |		Action	Push_String_Extended,0x8a6					; "SM_RECORD_SPEC"
													; Debug Table 0x1.0xb = 0xb1,0xfff4
00b3 4973       |Is  |		Short_Literal	0x173
00b4 00eb       |    |		Load_Encached	Diana_Cache
00b5 0098       |    |		Execute	Package,Field_Read_Dynamic
00b6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00b7 00eb       |    |		Load_Encached	Diana_Cache
00b8 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00b9 03f1       |    |		Declare_Variable	Discrete,With_Value
00ba 0092 08a7  |    |		Action	Push_String_Extended,0x8a7					; "SM_INT_VALUE"
													; Debug Table 0x1.0xc = 0xba,0xfff3
00bc 4973       |Is  |		Short_Literal	0x173
00bd 00eb       |    |		Load_Encached	Diana_Cache
00be 0098       |    |		Execute	Package,Field_Read_Dynamic
00bf 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00c0 00eb       |    |		Load_Encached	Diana_Cache
00c1 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00c2 03f1       |    |		Declare_Variable	Discrete,With_Value
00c3 0092 08a8  |    |		Action	Push_String_Extended,0x8a8					; "SM_REAL_VALUE"
													; Debug Table 0x1.0xd = 0xc3,0xfff2
00c5 4973       |Is  |		Short_Literal	0x173
00c6 00eb       |    |		Load_Encached	Diana_Cache
00c7 0098       |    |		Execute	Package,Field_Read_Dynamic
00c8 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00c9 00eb       |    |		Load_Encached	Diana_Cache
00ca 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00cb 03f1       |    |		Declare_Variable	Discrete,With_Value
00cc 0092 08a9  |    |		Action	Push_String_Extended,0x8a9					; "SM_BIG_INT_VALUE"
													; Debug Table 0x1.0xe = 0xcc,0xfff1
00ce 4973       |Is  |		Short_Literal	0x173
00cf 00eb       |    |		Load_Encached	Diana_Cache
00d0 0098       |    |		Execute	Package,Field_Read_Dynamic
00d1 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00d2 00eb       |    |		Load_Encached	Diana_Cache
00d3 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00d4 03f1       |    |		Declare_Variable	Discrete,With_Value
00d5 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0xf = 0xd5,0xfff0
00d6 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
00d7 e001       |    |		Load	0x0,0x1
00d8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00d9 03f1       |    |		Declare_Variable	Discrete,With_Value
00da e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x10 = 0xda,0xffef
00db 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
00dc e001       |    |		Load	0x0,0x1
00dd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00de 03f1       |    |		Declare_Variable	Discrete,With_Value
00df 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1.0x11 = 0xdf,0xffee
00e0 1b96       |    |		Execute	Package,Field_Read,Field_Number 0x96
00e1 0322       | "  |		Declare_Variable	Record
00e2 4803       |H   |		Short_Literal	0x3
00e3 49aa       |I   |		Short_Literal	0x1aa
00e4 00eb       |    |		Load_Encached	Diana_Cache
00e5 0098       |    |		Execute	Package,Field_Read_Dynamic
00e6 1c08       |    |		Execute_Immediate	Run_Utility,0x8
00e7 00d9       |    |		Load_Top	At_Offset_1
00e8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00e9 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1.0x12 = 0xe9,0xffed
00ea 1b96       |    |		Execute	Package,Field_Read,Field_Number 0x96
00eb 0322       | "  |		Declare_Variable	Record
00ec 4802       |H   |		Short_Literal	0x2
00ed 49aa       |I   |		Short_Literal	0x1aa
00ee 00eb       |    |		Load_Encached	Diana_Cache
00ef 0098       |    |		Execute	Package,Field_Read_Dynamic
00f0 1c08       |    |		Execute_Immediate	Run_Utility,0x8
00f1 00d9       |    |		Load_Top	At_Offset_1
00f2 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00f3 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1.0x13 = 0xf3,0xffec
00f4 1b96       |    |		Execute	Package,Field_Read,Field_Number 0x96
00f5 0322       | "  |		Declare_Variable	Record
00f6 4800       |H   |		Short_Literal	0x0
00f7 49aa       |I   |		Short_Literal	0x1aa
00f8 00eb       |    |		Load_Encached	Diana_Cache
00f9 0098       |    |		Execute	Package,Field_Read_Dynamic
00fa 1c08       |    |		Execute_Immediate	Run_Utility,0x8
00fb 00dd       |    |		Load_Top	At_Offset_5
00fc 00d9       |    |		Load_Top	At_Offset_1
00fd 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
00fe 00d9       |    |		Load_Top	At_Offset_1
00ff 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0100 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1.0x14 = 0x100,0xffeb
0101 1b96       |    |		Execute	Package,Field_Read,Field_Number 0x96
0102 0322       | "  |		Declare_Variable	Record
0103 4800       |H   |		Short_Literal	0x0
0104 49aa       |I   |		Short_Literal	0x1aa
0105 00eb       |    |		Load_Encached	Diana_Cache
0106 0098       |    |		Execute	Package,Field_Read_Dynamic
0107 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0108 00dd       |    |		Load_Top	At_Offset_5
0109 00d9       |    |		Load_Top	At_Offset_1
010a 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
010b 00d9       |    |		Load_Top	At_Offset_1
010c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
010d 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x15 = 0x10d,0xffea
010e 00c7       |    |		Action	Elaborate_Subprogram
010f 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x16 = 0x10f,0xffe9
0110 00c7       |    |		Action	Elaborate_Subprogram
0111 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x17 = 0x111,0xffe8
0112 00c7       |    |		Action	Elaborate_Subprogram
0113 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x18 = 0x113,0xffe7
0114 00c7       |    |		Action	Elaborate_Subprogram
0115 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x19 = 0x115,0xffe6
0116 00c7       |    |		Action	Elaborate_Subprogram
0117 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x1a = 0x117,0xffe5
0118 00c7       |    |		Action	Elaborate_Subprogram
0119 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x1b = 0x119,0xffe4
011a 00c7       |    |		Action	Elaborate_Subprogram
011b 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x1c = 0x11b,0xffe3
011c 00c7       |    |		Action	Elaborate_Subprogram
011d 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x1d = 0x11d,0xffe2
011e 00c7       |    |		Action	Elaborate_Subprogram
011f 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35				; Debug Table 0x1.0x1e = 0x11f,0xffe1
0120 00c7       |    |		Action	Elaborate_Subprogram
0121 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36				; Debug Table 0x1.0x1f = 0x121,0xffe0
0122 00c7       |    |		Action	Elaborate_Subprogram
0123 029d 086b  |   k|		Declare_Subprogram	INIT_0868,For_Outer_Call			; Debug Table 0x1.0x20 = 0x123,0xffdf
0125 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b				; Debug Table 0x1.0x21 = 0x125,0xffde
0126 00c7       |    |		Action	Elaborate_Subprogram
0127 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c				; Debug Table 0x1.0x22 = 0x127,0xffdd
0128 00c7       |    |		Action	Elaborate_Subprogram
0129 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d				; Debug Table 0x1.0x23 = 0x129,0xffdc
012a 00c7       |    |		Action	Elaborate_Subprogram
012b 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e				; Debug Table 0x1.0x24 = 0x12b,0xffdb
012c 00c7       |    |		Action	Elaborate_Subprogram
012d 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f				; Debug Table 0x1.0x25 = 0x12d,0xffda
012e 00c7       |    |		Action	Elaborate_Subprogram
012f 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30				; Debug Table 0x1.0x26 = 0x12f,0xffd9
0130 00c7       |    |		Action	Elaborate_Subprogram
0131 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31				; Debug Table 0x1.0x27 = 0x131,0xffd8
0132 00c7       |    |		Action	Elaborate_Subprogram
0133 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x28 = 0x133,0xffd7
0134 00c7       |    |		Action	Elaborate_Subprogram
0135 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x29 = 0x135,0xffd6
0136 00c7       |    |		Action	Elaborate_Subprogram
0137 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x2a = 0x137,0xffd5
0138 00c7       |    |		Action	Elaborate_Subprogram
0139 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0x2b = 0x139,0xffd4
013a 00c7       |    |		Action	Elaborate_Subprogram
013b 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0x2c = 0x13b,0xffd3
013c 00c7       |    |		Action	Elaborate_Subprogram
013d 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0x2d = 0x13d,0xffd2
013e 00c7       |    |		Action	Elaborate_Subprogram
013f 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x2e = 0x13f,0xffd1
0140 00c7       |    |		Action	Elaborate_Subprogram
0141 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f				; Debug Table 0x1.0x2f = 0x141,0xffd0
0142 00c7       |    |		Action	Elaborate_Subprogram
0143 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20				; Debug Table 0x1.0x30 = 0x143,0xffcf
0144 00c7       |    |		Action	Elaborate_Subprogram
0145 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21				; Debug Table 0x1.0x31 = 0x145,0xffce
0146 00c7       |    |		Action	Elaborate_Subprogram
0147 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22				; Debug Table 0x1.0x32 = 0x147,0xffcd
0148 00c7       |    |		Action	Elaborate_Subprogram
0149 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23				; Debug Table 0x1.0x33 = 0x149,0xffcc
014a 00c7       |    |		Action	Elaborate_Subprogram
014b 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24				; Debug Table 0x1.0x34 = 0x14b,0xffcb
014c 00c7       |    |		Action	Elaborate_Subprogram
014d 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34				; Debug Table 0x1.0x35 = 0x14d,0xffca
014e 00c7       |    |		Action	Elaborate_Subprogram
014f 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32				; Debug Table 0x1.0x36 = 0x14f,0xffc9
0150 00c7       |    |		Action	Elaborate_Subprogram
0151 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33				; Debug Table 0x1.0x37 = 0x151,0xffc8
0152 00c7       |    |		Action	Elaborate_Subprogram
0153 029d 087b  |   {|		Declare_Subprogram	INIT_0878,For_Outer_Call			; Debug Table 0x1.0x38 = 0x153,0xffc7
0155 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25				; Debug Table 0x1.0x39 = 0x155,0xffc6
0156 00c7       |    |		Action	Elaborate_Subprogram
0157 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26				; Debug Table 0x1.0x3a = 0x157,0xffc5
0158 00c7       |    |		Action	Elaborate_Subprogram
0159 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27				; Debug Table 0x1.0x3b = 0x159,0xffc4
015a 00c7       |    |		Action	Elaborate_Subprogram
015b 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28				; Debug Table 0x1.0x3c = 0x15b,0xffc3
015c 00c7       |    |		Action	Elaborate_Subprogram
015d 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0x3d = 0x15d,0xffc2
015e 00c7       |    |		Action	Elaborate_Subprogram
015f 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x3e = 0x15f,0xffc1
0160 00c7       |    |		Action	Elaborate_Subprogram
0161 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29				; Debug Table 0x1.0x3f = 0x161,0xffc0
0162 00c7       |    |		Action	Elaborate_Subprogram
0163 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a				; Debug Table 0x1.0x40 = 0x163,0xffbf
0164 00c7       |    |		Action	Elaborate_Subprogram
0165			BODY_0008:
0165 00bc       |    |		Action	Signal_Activated
0166 00bb       |    |		Action	Signal_Completion
0167 0000       |    |		.XXX[0x1]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b       | k  |		.CONST	0x016b								; Address of begin
0169 0004       |    |		.CONST	0x0004								; Address of exception handler
016a 0001       |    |		.CONST	0x0001								; Number of locals
016b			BODY_0168:
016b			INIT_0168:
016b e239       | 9  |		Load	0x1,0x39							; Debug Table 0x2 = .DEBUG	0x016b,0x0b4c,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a5d
													; Debug Table 0x2.0x0 = 0x16b,0x1
016c 00db       |    |		Load_Top	At_Offset_3
016d 4973       |Is  |		Short_Literal	0x173
016e 00eb       |    |		Load_Encached	Diana_Cache
016f 0098       |    |		Execute	Package,Field_Read_Dynamic
0170 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0171 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0172 0000 0000  |    |		.BLANK	0000[0x6]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b       | {  |		.CONST	0x017b								; Address of begin
0179 0004       |    |		.CONST	0x0004								; Address of exception handler
017a 0001       |    |		.CONST	0x0001								; Number of locals
017b			BODY_0178:
017b			INIT_0178:
017b e23a       | :  |		Load	0x1,0x3a							; Debug Table 0x3 = .DEBUG	0x017b,0x0b50,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a66
													; Debug Table 0x3.0x0 = 0x17b,0x1
017c 00db       |    |		Load_Top	At_Offset_3
017d 4973       |Is  |		Short_Literal	0x173
017e 00eb       |    |		Load_Encached	Diana_Cache
017f 0098       |    |		Execute	Package,Field_Read_Dynamic
0180 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0181 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0182 0000 0000  |    |		.BLANK	0000[0x6]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018c       |    |		.CONST	0x018c								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0002       |    |		.CONST	0x0002								; Number of locals
018b			INIT_0188:
018b 00e6       |    |		Load_Encached	Float_Cache						; Debug Table 0x4 = .DEBUG	0x018b,0x0b54,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a6f
													; Debug Table 0x4.0x0 = 0x18b,0xffff
018c			BODY_0188:
018c e23b       | ;  |		Load	0x1,0x3b							; Debug Table 0x4.0x1 = 0x18c,0x1
018d 00dc       |    |		Load_Top	At_Offset_4
018e 4973       |Is  |		Short_Literal	0x173
018f 00eb       |    |		Load_Encached	Diana_Cache
0190 0098       |    |		Execute	Package,Field_Read_Dynamic
0191 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
0192 680d       |h   |		Jump_Zero	0x1a0
0193 e23b       | ;  |		Load	0x1,0x3b							; Debug Table 0x4.0x2 = 0x193,0x2
0194 00dc       |    |		Load_Top	At_Offset_4
0195 4973       |Is  |		Short_Literal	0x173
0196 00eb       |    |		Load_Encached	Diana_Cache
0197 0098       |    |		Execute	Package,Field_Read_Dynamic
0198 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0199 0041       | A  |		Store_Top_Unchecked	Float,At_Offset_1
019a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x3 = 0x19a,0x3
019b e001       |    |		Load	0x0,0x1
019c 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
019d e001       |    |		Load	0x0,0x1
019e 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
019f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a0 e23c       | <  |		Load	0x1,0x3c							; Debug Table 0x4.0x4 = 0x1a0,0x4
01a1 00dc       |    |		Load_Top	At_Offset_4
01a2 4973       |Is  |		Short_Literal	0x173
01a3 00eb       |    |		Load_Encached	Diana_Cache
01a4 0098       |    |		Execute	Package,Field_Read_Dynamic
01a5 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01a6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a7 0000       |    |		.XXX[0x1]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab       |    |		.CONST	0x01ab								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0001       |    |		.CONST	0x0001								; Number of locals
01ab			BODY_01a8:
01ab			INIT_01a8:
01ab e23e       | >  |		Load	0x1,0x3e							; Debug Table 0x5 = .DEBUG	0x01ab,0x0b60,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a7a
													; Debug Table 0x5.0x0 = 0x1ab,0x1
01ac 00db       |    |		Load_Top	At_Offset_3
01ad 4973       |Is  |		Short_Literal	0x173
01ae 00eb       |    |		Load_Encached	Diana_Cache
01af 0098       |    |		Execute	Package,Field_Read_Dynamic
01b0 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
01b1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01b2 0000 0000  |    |		.BLANK	0000[0x6]
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 e237       | 7  |		Load	0x1,0x37							; Debug Table 0x6 = .DEBUG	0x01bb,0x0b64,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a83
													; Debug Table 0x6.0x0 = 0x1bb,0x1
01bc 00db       |    |		Load_Top	At_Offset_3
01bd 4973       |Is  |		Short_Literal	0x173
01be 00eb       |    |		Load_Encached	Diana_Cache
01bf 0098       |    |		Execute	Package,Field_Read_Dynamic
01c0 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
01c1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01c2 0000 0000  |    |		.BLANK	0000[0x6]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb       |    |		.CONST	0x01cb								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0001       |    |		.CONST	0x0001								; Number of locals
01cb			BODY_01c8:
01cb			INIT_01c8:
01cb e23d       | =  |		Load	0x1,0x3d							; Debug Table 0x7 = .DEBUG	0x01cb,0x0b68,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a8c
													; Debug Table 0x7.0x0 = 0x1cb,0x1
01cc 00db       |    |		Load_Top	At_Offset_3
01cd 4973       |Is  |		Short_Literal	0x173
01ce 00eb       |    |		Load_Encached	Diana_Cache
01cf 0098       |    |		Execute	Package,Field_Read_Dynamic
01d0 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
01d1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01d2 0000 0000  |    |		.BLANK	0000[0x6]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01db       |    |		.CONST	0x01db								; Address of begin
01d9 0004       |    |		.CONST	0x0004								; Address of exception handler
01da 0001       |    |		.CONST	0x0001								; Number of locals
01db			BODY_01d8:
01db			INIT_01d8:
01db e238       | 8  |		Load	0x1,0x38							; Debug Table 0x8 = .DEBUG	0x01db,0x0b6c,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a95
													; Debug Table 0x8.0x0 = 0x1db,0x1
01dc 00db       |    |		Load_Top	At_Offset_3
01dd 4973       |Is  |		Short_Literal	0x173
01de 00eb       |    |		Load_Encached	Diana_Cache
01df 0098       |    |		Execute	Package,Field_Read_Dynamic
01e0 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
01e1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01e2 0000 0000  |    |		.BLANK	0000[0x6]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb       |    |		.CONST	0x01eb								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0001       |    |		.CONST	0x0001								; Number of locals
01eb			BODY_01e8:
01eb			INIT_01e8:
01eb e23f       | ?  |		Load	0x1,0x3f							; Debug Table 0x9 = .DEBUG	0x01eb,0x0b70,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a9e
													; Debug Table 0x9.0x0 = 0x1eb,0x1
01ec 00db       |    |		Load_Top	At_Offset_3
01ed 4973       |Is  |		Short_Literal	0x173
01ee 00eb       |    |		Load_Encached	Diana_Cache
01ef 0098       |    |		Execute	Package,Field_Read_Dynamic
01f0 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
01f1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f2 0000 0000  |    |		.BLANK	0000[0x6]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb       |    |		.CONST	0x01fb								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0001       |    |		.CONST	0x0001								; Number of locals
01fb			BODY_01f8:
01fb			INIT_01f8:
01fb e240       | @  |		Load	0x1,0x40							; Debug Table 0xa = .DEBUG	0x01fb,0x0b74,0x0002,0x0000,0x0056,0xba95,0x0000,0x0aa7
													; Debug Table 0xa.0x0 = 0x1fb,0x1
01fc 00db       |    |		Load_Top	At_Offset_3
01fd 4973       |Is  |		Short_Literal	0x173
01fe 00eb       |    |		Load_Encached	Diana_Cache
01ff 0098       |    |		Execute	Package,Field_Read_Dynamic
0200 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0201 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0202 0000 0000  |    |		.BLANK	0000[0x6]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b       |    |		.CONST	0x020b								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0001       |    |		.CONST	0x0001								; Number of locals
020b			BODY_0208:
020b			INIT_0208:
020b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x020b,0x0b78,0x0002,0x0000,0x0056,0xba95,0x0000,0x0ab0
													; Debug Table 0xb.0x0 = 0x20b,0x1
020c 0217       |    |		Execute	Heap_Access,All_Reference
020d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
020e 0b08       |    |		Execute_Immediate	Case_Compare,0x8
020f 7016       |p   |		Jump_Nonzero	0x226
0210 0b10       |    |		Execute_Immediate	Case_Compare,0x10
0211 701a       |p   |		Jump_Nonzero	0x22c
0212 0b0c       |    |		Execute_Immediate	Case_Compare,0xc
0213 701e       |p   |		Jump_Nonzero	0x232
0214 0b16       |    |		Execute_Immediate	Case_Compare,0x16
0215 701c       |p   |		Jump_Nonzero	0x232
0216 0b09       |    |		Execute_Immediate	Case_Compare,0x9
0217 7020       |p   |		Jump_Nonzero	0x238
0218 0b06       |    |		Execute_Immediate	Case_Compare,0x6
0219 7024       |p$  |		Jump_Nonzero	0x23e
021a 0b04       |    |		Execute_Immediate	Case_Compare,0x4
021b 7028       |p(  |		Jump_Nonzero	0x244
021c 0b0e       |    |		Execute_Immediate	Case_Compare,0xe
021d 702c       |p,  |		Jump_Nonzero	0x24a
021e 0b12       |    |		Execute_Immediate	Case_Compare,0x12
021f 7030       |p0  |		Jump_Nonzero	0x250
0220 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x1 = 0x220,0xa
0221 0217       |    |		Execute	Heap_Access,All_Reference
0222 2e29       |.)  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x29
0223 00dc       |    |		Load_Top	At_Offset_4
0224 822b       | +  |		Call	0x1,0x2b
0225 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0226 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x2 = 0x226,0x2
0227 0217       |    |		Execute	Heap_Access,All_Reference
0228 2e9c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9c
0229 00dc       |    |		Load_Top	At_Offset_4
022a 822b       | +  |		Call	0x1,0x2b
022b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
022c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x3 = 0x22c,0x3
022d 0217       |    |		Execute	Heap_Access,All_Reference
022e 2e6d       |.m  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6d
022f 00dc       |    |		Load_Top	At_Offset_4
0230 822b       | +  |		Call	0x1,0x2b
0231 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0232 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x4 = 0x232,0x4
0233 0217       |    |		Execute	Heap_Access,All_Reference
0234 2ec1       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc1
0235 00dc       |    |		Load_Top	At_Offset_4
0236 822b       | +  |		Call	0x1,0x2b
0237 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0238 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x5 = 0x238,0x5
0239 0217       |    |		Execute	Heap_Access,All_Reference
023a 2e9f       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9f
023b 00dc       |    |		Load_Top	At_Offset_4
023c 822b       | +  |		Call	0x1,0x2b
023d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
023e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x6 = 0x23e,0x6
023f 0217       |    |		Execute	Heap_Access,All_Reference
0240 2e94       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x94
0241 00dc       |    |		Load_Top	At_Offset_4
0242 822b       | +  |		Call	0x1,0x2b
0243 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0244 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x7 = 0x244,0x7
0245 0217       |    |		Execute	Heap_Access,All_Reference
0246 2e2e       |..  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2e
0247 00dc       |    |		Load_Top	At_Offset_4
0248 822b       | +  |		Call	0x1,0x2b
0249 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
024a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x8 = 0x24a,0x8
024b 0217       |    |		Execute	Heap_Access,All_Reference
024c 2e25       |.%  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x25
024d 00dc       |    |		Load_Top	At_Offset_4
024e 822b       | +  |		Call	0x1,0x2b
024f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0250 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x9 = 0x250,0x9
0251 0217       |    |		Execute	Heap_Access,All_Reference
0252 2eac       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xac
0253 00dc       |    |		Load_Top	At_Offset_4
0254 822b       | +  |		Call	0x1,0x2b
0255 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0256 0000 0000  |    |		.XXX[0x2]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b       | [  |		.CONST	0x025b								; Address of begin
0259 0004       |    |		.CONST	0x0004								; Address of exception handler
025a 0001       |    |		.CONST	0x0001								; Number of locals
025b			BODY_0258:
025b			INIT_0258:
025b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x025b,0x0b8e,0x0002,0x0000,0x0056,0xba95,0x0000,0x0ab9
													; Debug Table 0xc.0x0 = 0x25b,0x1
025c 0217       |    |		Execute	Heap_Access,All_Reference
025d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
025e 0b01       |    |		Execute_Immediate	Case_Compare,0x1
025f 7026       |p&  |		Jump_Nonzero	0x286
0260 0b0d       |    |		Execute_Immediate	Case_Compare,0xd
0261 702c       |p,  |		Jump_Nonzero	0x28e
0262 0b03       |    |		Execute_Immediate	Case_Compare,0x3
0263 7032       |p2  |		Jump_Nonzero	0x296
0264 0b0e       |    |		Execute_Immediate	Case_Compare,0xe
0265 7038       |p8  |		Jump_Nonzero	0x29e
0266 0b04       |    |		Execute_Immediate	Case_Compare,0x4
0267 703e       |p>  |		Jump_Nonzero	0x2a6
0268 0b10       |    |		Execute_Immediate	Case_Compare,0x10
0269 7044       |pD  |		Jump_Nonzero	0x2ae
026a 0b11       |    |		Execute_Immediate	Case_Compare,0x11
026b 704a       |pJ  |		Jump_Nonzero	0x2b6
026c 0b06       |    |		Execute_Immediate	Case_Compare,0x6
026d 7050       |pP  |		Jump_Nonzero	0x2be
026e 0b07       |    |		Execute_Immediate	Case_Compare,0x7
026f 7056       |pV  |		Jump_Nonzero	0x2c6
0270 0b08       |    |		Execute_Immediate	Case_Compare,0x8
0271 705c       |p\  |		Jump_Nonzero	0x2ce
0272 0b09       |    |		Execute_Immediate	Case_Compare,0x9
0273 7062       |pb  |		Jump_Nonzero	0x2d6
0274 0b12       |    |		Execute_Immediate	Case_Compare,0x12
0275 7068       |ph  |		Jump_Nonzero	0x2de
0276 0b13       |    |		Execute_Immediate	Case_Compare,0x13
0277 706e       |pn  |		Jump_Nonzero	0x2e6
0278 0b0b       |    |		Execute_Immediate	Case_Compare,0xb
0279 7074       |pt  |		Jump_Nonzero	0x2ee
027a 0b0c       |    |		Execute_Immediate	Case_Compare,0xc
027b 707a       |pz  |		Jump_Nonzero	0x2f6
027c 0b16       |    |		Execute_Immediate	Case_Compare,0x16
027d 7078       |px  |		Jump_Nonzero	0x2f6
027e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x1 = 0x27e,0x11
027f 0217       |    |		Execute	Heap_Access,All_Reference
0280 2e28       |.(  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x28
0281 00dc       |    |		Load_Top	At_Offset_4
0282 49ae       |I   |		Short_Literal	0x1ae
0283 00eb       |    |		Load_Encached	Diana_Cache
0284 0096       |    |		Execute	Package,Entry
0285 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0286 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x2 = 0x286,0x2
0287 0217       |    |		Execute	Heap_Access,All_Reference
0288 2e14       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x14
0289 00dc       |    |		Load_Top	At_Offset_4
028a 49ae       |I   |		Short_Literal	0x1ae
028b 00eb       |    |		Load_Encached	Diana_Cache
028c 0096       |    |		Execute	Package,Entry
028d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
028e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x3 = 0x28e,0x3
028f 0217       |    |		Execute	Heap_Access,All_Reference
0290 2e1b       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x1b
0291 00dc       |    |		Load_Top	At_Offset_4
0292 49ae       |I   |		Short_Literal	0x1ae
0293 00eb       |    |		Load_Encached	Diana_Cache
0294 0096       |    |		Execute	Package,Entry
0295 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0296 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x4 = 0x296,0x4
0297 0217       |    |		Execute	Heap_Access,All_Reference
0298 2e1d       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x1d
0299 00dc       |    |		Load_Top	At_Offset_4
029a 49ae       |I   |		Short_Literal	0x1ae
029b 00eb       |    |		Load_Encached	Diana_Cache
029c 0096       |    |		Execute	Package,Entry
029d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
029e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x5 = 0x29e,0x5
029f 0217       |    |		Execute	Heap_Access,All_Reference
02a0 2e24       |.$  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x24
02a1 00dc       |    |		Load_Top	At_Offset_4
02a2 49ae       |I   |		Short_Literal	0x1ae
02a3 00eb       |    |		Load_Encached	Diana_Cache
02a4 0096       |    |		Execute	Package,Entry
02a5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02a6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x6 = 0x2a6,0x6
02a7 0217       |    |		Execute	Heap_Access,All_Reference
02a8 2e2d       |.-  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2d
02a9 00dc       |    |		Load_Top	At_Offset_4
02aa 49ae       |I   |		Short_Literal	0x1ae
02ab 00eb       |    |		Load_Encached	Diana_Cache
02ac 0096       |    |		Execute	Package,Entry
02ad 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ae 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x7 = 0x2ae,0x7
02af 0217       |    |		Execute	Heap_Access,All_Reference
02b0 2e6c       |.l  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6c
02b1 00dc       |    |		Load_Top	At_Offset_4
02b2 49ae       |I   |		Short_Literal	0x1ae
02b3 00eb       |    |		Load_Encached	Diana_Cache
02b4 0096       |    |		Execute	Package,Entry
02b5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x8 = 0x2b6,0x8
02b7 0217       |    |		Execute	Heap_Access,All_Reference
02b8 2e7d       |.}  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7d
02b9 00dc       |    |		Load_Top	At_Offset_4
02ba 49ae       |I   |		Short_Literal	0x1ae
02bb 00eb       |    |		Load_Encached	Diana_Cache
02bc 0096       |    |		Execute	Package,Entry
02bd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02be 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x9 = 0x2be,0x9
02bf 0217       |    |		Execute	Heap_Access,All_Reference
02c0 2e93       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x93
02c1 00dc       |    |		Load_Top	At_Offset_4
02c2 49ae       |I   |		Short_Literal	0x1ae
02c3 00eb       |    |		Load_Encached	Diana_Cache
02c4 0096       |    |		Execute	Package,Entry
02c5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02c6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0xa = 0x2c6,0xa
02c7 0217       |    |		Execute	Heap_Access,All_Reference
02c8 2e95       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x95
02c9 00dc       |    |		Load_Top	At_Offset_4
02ca 49ae       |I   |		Short_Literal	0x1ae
02cb 00eb       |    |		Load_Encached	Diana_Cache
02cc 0096       |    |		Execute	Package,Entry
02cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ce 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0xb = 0x2ce,0xb
02cf 0217       |    |		Execute	Heap_Access,All_Reference
02d0 2e9b       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9b
02d1 00dc       |    |		Load_Top	At_Offset_4
02d2 49ae       |I   |		Short_Literal	0x1ae
02d3 00eb       |    |		Load_Encached	Diana_Cache
02d4 0096       |    |		Execute	Package,Entry
02d5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0xc = 0x2d6,0xc
02d7 0217       |    |		Execute	Heap_Access,All_Reference
02d8 2e9e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9e
02d9 00dc       |    |		Load_Top	At_Offset_4
02da 49ae       |I   |		Short_Literal	0x1ae
02db 00eb       |    |		Load_Encached	Diana_Cache
02dc 0096       |    |		Execute	Package,Entry
02dd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02de 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0xd = 0x2de,0xd
02df 0217       |    |		Execute	Heap_Access,All_Reference
02e0 2eab       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xab
02e1 00dc       |    |		Load_Top	At_Offset_4
02e2 49ae       |I   |		Short_Literal	0x1ae
02e3 00eb       |    |		Load_Encached	Diana_Cache
02e4 0096       |    |		Execute	Package,Entry
02e5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02e6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0xe = 0x2e6,0xe
02e7 0217       |    |		Execute	Heap_Access,All_Reference
02e8 2eaf       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xaf
02e9 00dc       |    |		Load_Top	At_Offset_4
02ea 49ae       |I   |		Short_Literal	0x1ae
02eb 00eb       |    |		Load_Encached	Diana_Cache
02ec 0096       |    |		Execute	Package,Entry
02ed 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ee 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0xf = 0x2ee,0xf
02ef 0217       |    |		Execute	Heap_Access,All_Reference
02f0 2eb2       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xb2
02f1 00dc       |    |		Load_Top	At_Offset_4
02f2 49ae       |I   |		Short_Literal	0x1ae
02f3 00eb       |    |		Load_Encached	Diana_Cache
02f4 0096       |    |		Execute	Package,Entry
02f5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02f6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x10 = 0x2f6,0x10
02f7 0217       |    |		Execute	Heap_Access,All_Reference
02f8 2ec0       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc0
02f9 00dc       |    |		Load_Top	At_Offset_4
02fa 49ae       |I   |		Short_Literal	0x1ae
02fb 00eb       |    |		Load_Encached	Diana_Cache
02fc 0096       |    |		Execute	Package,Entry
02fd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02fe 0000 0000  |    |		.XXX[0x2]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303       |    |		.CONST	0x0303								; Address of begin
0301 0004       |    |		.CONST	0x0004								; Address of exception handler
0302 0001       |    |		.CONST	0x0001								; Number of locals
0303			BODY_0300:
0303			INIT_0300:
0303 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd = .DEBUG	0x0303,0x0bb2,0x0002,0x0000,0x0056,0xba95,0x0000,0x0ac2
													; Debug Table 0xd.0x0 = 0x303,0x1
0304 0217       |    |		Execute	Heap_Access,All_Reference
0305 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0306 0b26       | &  |		Execute_Immediate	Case_Compare,0x26
0307 7016       |p   |		Jump_Nonzero	0x31e
0308 0b24       | $  |		Execute_Immediate	Case_Compare,0x24
0309 701c       |p   |		Jump_Nonzero	0x326
030a 0b25       | %  |		Execute_Immediate	Case_Compare,0x25
030b 701a       |p   |		Jump_Nonzero	0x326
030c 0b32       | 2  |		Execute_Immediate	Case_Compare,0x32
030d 7020       |p   |		Jump_Nonzero	0x32e
030e 0b31       | 1  |		Execute_Immediate	Case_Compare,0x31
030f 701e       |p   |		Jump_Nonzero	0x32e
0310 0b1d       |    |		Execute_Immediate	Case_Compare,0x1d
0311 7020       |p   |		Jump_Nonzero	0x332
0312 0b23       | #  |		Execute_Immediate	Case_Compare,0x23
0313 7022       |p"  |		Jump_Nonzero	0x336
0314 0b1e       |    |		Execute_Immediate	Case_Compare,0x1e
0315 7028       |p(  |		Jump_Nonzero	0x33e
0316 0b28       | (  |		Execute_Immediate	Case_Compare,0x28
0317 702e       |p.  |		Jump_Nonzero	0x346
0318 0b30       | 0  |		Execute_Immediate	Case_Compare,0x30
0319 702c       |p,  |		Jump_Nonzero	0x346
031a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x1 = 0x31a,0x9
031b 0217       |    |		Execute	Heap_Access,All_Reference
031c 2e30       |.0  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x30
031d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
031e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x2 = 0x31e,0x2
031f 0217       |    |		Execute	Heap_Access,All_Reference
0320 2e85       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x85
0321 00dc       |    |		Load_Top	At_Offset_4
0322 49ae       |I   |		Short_Literal	0x1ae
0323 00eb       |    |		Load_Encached	Diana_Cache
0324 0096       |    |		Execute	Package,Entry
0325 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0326 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x3 = 0x326,0x3
0327 0217       |    |		Execute	Heap_Access,All_Reference
0328 2e78       |.x  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x78
0329 00dc       |    |		Load_Top	At_Offset_4
032a 49ae       |I   |		Short_Literal	0x1ae
032b 00eb       |    |		Load_Encached	Diana_Cache
032c 0096       |    |		Execute	Package,Entry
032d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
032e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x4 = 0x32e,0x4
032f 0217       |    |		Execute	Heap_Access,All_Reference
0330 2e4b       |.K  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4b
0331 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0332 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x5 = 0x332,0x5
0333 0217       |    |		Execute	Heap_Access,All_Reference
0334 2e38       |.8  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x38
0335 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0336 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x6 = 0x336,0x6
0337 0217       |    |		Execute	Heap_Access,All_Reference
0338 2e3d       |.=  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3d
0339 00dc       |    |		Load_Top	At_Offset_4
033a 49ae       |I   |		Short_Literal	0x1ae
033b 00eb       |    |		Load_Encached	Diana_Cache
033c 0096       |    |		Execute	Package,Entry
033d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
033e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x7 = 0x33e,0x7
033f 0217       |    |		Execute	Heap_Access,All_Reference
0340 2e42       |.B  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x42
0341 00dc       |    |		Load_Top	At_Offset_4
0342 49ae       |I   |		Short_Literal	0x1ae
0343 00eb       |    |		Load_Encached	Diana_Cache
0344 0096       |    |		Execute	Package,Entry
0345 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0346 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x8 = 0x346,0x8
0347 0217       |    |		Execute	Heap_Access,All_Reference
0348 2e97       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x97
0349 00dc       |    |		Load_Top	At_Offset_4
034a 49ae       |I   |		Short_Literal	0x1ae
034b 00eb       |    |		Load_Encached	Diana_Cache
034c 0096       |    |		Execute	Package,Entry
034d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
034e 0000 0000  |    |		.XXX[0x2]
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0353       | S  |		.CONST	0x0353								; Address of begin
0351 0004       |    |		.CONST	0x0004								; Address of exception handler
0352 0001       |    |		.CONST	0x0001								; Number of locals
0353			BODY_0350:
0353			INIT_0350:
0353 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe = .DEBUG	0x0353,0x0bc6,0x0002,0x0000,0x0056,0xba95,0x0000,0x0acb
													; Debug Table 0xe.0x0 = 0x353,0x1
0354 0217       |    |		Execute	Heap_Access,All_Reference
0355 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0356 0b1d       |    |		Execute_Immediate	Case_Compare,0x1d
0357 7014       |p   |		Jump_Nonzero	0x36c
0358 0b23       | #  |		Execute_Immediate	Case_Compare,0x23
0359 701a       |p   |		Jump_Nonzero	0x374
035a 0b1e       |    |		Execute_Immediate	Case_Compare,0x1e
035b 7020       |p   |		Jump_Nonzero	0x37c
035c 0b22       | "  |		Execute_Immediate	Case_Compare,0x22
035d 7026       |p&  |		Jump_Nonzero	0x384
035e 0b24       | $  |		Execute_Immediate	Case_Compare,0x24
035f 702c       |p,  |		Jump_Nonzero	0x38c
0360 0b25       | %  |		Execute_Immediate	Case_Compare,0x25
0361 702a       |p*  |		Jump_Nonzero	0x38c
0362 0b2f       | /  |		Execute_Immediate	Case_Compare,0x2f
0363 7030       |p0  |		Jump_Nonzero	0x394
0364 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x1 = 0x364,0x8
0365 0217       |    |		Execute	Heap_Access,All_Reference
0366 2e53       |.S  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x53
0367 00dc       |    |		Load_Top	At_Offset_4
0368 49ae       |I   |		Short_Literal	0x1ae
0369 00eb       |    |		Load_Encached	Diana_Cache
036a 0096       |    |		Execute	Package,Entry
036b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
036c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x2 = 0x36c,0x2
036d 0217       |    |		Execute	Heap_Access,All_Reference
036e 2e3a       |.:  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3a
036f 00dc       |    |		Load_Top	At_Offset_4
0370 49ae       |I   |		Short_Literal	0x1ae
0371 00eb       |    |		Load_Encached	Diana_Cache
0372 0096       |    |		Execute	Package,Entry
0373 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0374 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x3 = 0x374,0x3
0375 0217       |    |		Execute	Heap_Access,All_Reference
0376 2e3f       |.?  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3f
0377 00dc       |    |		Load_Top	At_Offset_4
0378 49ae       |I   |		Short_Literal	0x1ae
0379 00eb       |    |		Load_Encached	Diana_Cache
037a 0096       |    |		Execute	Package,Entry
037b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
037c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x4 = 0x37c,0x4
037d 0217       |    |		Execute	Heap_Access,All_Reference
037e 2e44       |.D  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x44
037f 00dc       |    |		Load_Top	At_Offset_4
0380 49ae       |I   |		Short_Literal	0x1ae
0381 00eb       |    |		Load_Encached	Diana_Cache
0382 0096       |    |		Execute	Package,Entry
0383 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0384 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x5 = 0x384,0x5
0385 0217       |    |		Execute	Heap_Access,All_Reference
0386 2e75       |.u  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x75
0387 00dc       |    |		Load_Top	At_Offset_4
0388 49ae       |I   |		Short_Literal	0x1ae
0389 00eb       |    |		Load_Encached	Diana_Cache
038a 0096       |    |		Execute	Package,Entry
038b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
038c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x6 = 0x38c,0x6
038d 0217       |    |		Execute	Heap_Access,All_Reference
038e 2e79       |.y  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x79
038f 00dc       |    |		Load_Top	At_Offset_4
0390 49ae       |I   |		Short_Literal	0x1ae
0391 00eb       |    |		Load_Encached	Diana_Cache
0392 0096       |    |		Execute	Package,Entry
0393 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0394 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x7 = 0x394,0x7
0395 0217       |    |		Execute	Heap_Access,All_Reference
0396 2eba       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xba
0397 00dc       |    |		Load_Top	At_Offset_4
0398 49ae       |I   |		Short_Literal	0x1ae
0399 00eb       |    |		Load_Encached	Diana_Cache
039a 0096       |    |		Execute	Package,Entry
039b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
039c 0000 0000  |    |		.BLANK	0000[0x4]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3       |    |		.CONST	0x03a3								; Address of begin
03a1 0004       |    |		.CONST	0x0004								; Address of exception handler
03a2 0001       |    |		.CONST	0x0001								; Number of locals
03a3			BODY_03a0:
03a3			INIT_03a0:
03a3 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0xf = .DEBUG	0x03a3,0x0bd8,0x0002,0x0000,0x0056,0xba95,0x0000,0x0ad4
													; Debug Table 0xf.0x0 = 0x3a3,0x1
03a4 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
03a5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03a6 0000 0000  |    |		.XXX[0x2]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab       |    |		.CONST	0x03ab								; Address of begin
03a9 0004       |    |		.CONST	0x0004								; Address of exception handler
03aa 0001       |    |		.CONST	0x0001								; Number of locals
03ab			BODY_03a8:
03ab			INIT_03a8:
03ab 00ef       |    |		Load_Encached	Diana_Sequence_Cache					; Debug Table 0x10 = .DEBUG	0x03ab,0x0bdc,0x0002,0x0000,0x0056,0xba95,0x0000,0x0add
													; Debug Table 0x10.0x0 = 0x3ab,0x1
03ac 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ad 0000 0000  |    |		.XXX[0x3]
03af 0000       |    |
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03b3       |    |		.CONST	0x03b3								; Address of begin
03b1 0004       |    |		.CONST	0x0004								; Address of exception handler
03b2 0001       |    |		.CONST	0x0001								; Number of locals
03b3			BODY_03b0:
03b3			INIT_03b0:
03b3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11 = .DEBUG	0x03b3,0x0be0,0x0001,0x0000,0x0056,0xba95,0x0000,0x0ae6
													; Debug Table 0x11.0x0 = 0x3b3,0x1
03b4 e239       | 9  |		Load	0x1,0x39
03b5 00dc       |    |		Load_Top	At_Offset_4
03b6 4973       |Is  |		Short_Literal	0x173
03b7 00eb       |    |		Load_Encached	Diana_Cache
03b8 0098       |    |		Execute	Package,Field_Read_Dynamic
03b9 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
03ba 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03bb 0000 0000  |    |		.BLANK	0000[0x5]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3       |    |		.CONST	0x03c3								; Address of begin
03c1 0004       |    |		.CONST	0x0004								; Address of exception handler
03c2 0001       |    |		.CONST	0x0001								; Number of locals
03c3			BODY_03c0:
03c3			INIT_03c0:
03c3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12 = .DEBUG	0x03c3,0x0be4,0x0001,0x0000,0x0056,0xba95,0x0000,0x0af2
													; Debug Table 0x12.0x0 = 0x3c3,0x1
03c4 e23a       | :  |		Load	0x1,0x3a
03c5 00dc       |    |		Load_Top	At_Offset_4
03c6 4973       |Is  |		Short_Literal	0x173
03c7 00eb       |    |		Load_Encached	Diana_Cache
03c8 0098       |    |		Execute	Package,Field_Read_Dynamic
03c9 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
03ca 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03cb 0000 0000  |    |		.BLANK	0000[0x5]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d3       |    |		.CONST	0x03d3								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0001       |    |		.CONST	0x0001								; Number of locals
03d3			BODY_03d0:
03d3			INIT_03d0:
03d3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x13 = .DEBUG	0x03d3,0x0be8,0x0001,0x0000,0x0056,0xba95,0x0000,0x0afe
													; Debug Table 0x13.0x0 = 0x3d3,0x1
03d4 e23c       | <  |		Load	0x1,0x3c
03d5 00dc       |    |		Load_Top	At_Offset_4
03d6 4973       |Is  |		Short_Literal	0x173
03d7 00eb       |    |		Load_Encached	Diana_Cache
03d8 0098       |    |		Execute	Package,Field_Read_Dynamic
03d9 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
03da 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03db 0000 0000  |    |		.BLANK	0000[0x5]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3       |    |		.CONST	0x03e3								; Address of begin
03e1 0004       |    |		.CONST	0x0004								; Address of exception handler
03e2 0001       |    |		.CONST	0x0001								; Number of locals
03e3			BODY_03e0:
03e3			INIT_03e0:
03e3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x14 = .DEBUG	0x03e3,0x0bec,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b0c
													; Debug Table 0x14.0x0 = 0x3e3,0x1
03e4 e23e       | >  |		Load	0x1,0x3e
03e5 00dc       |    |		Load_Top	At_Offset_4
03e6 4973       |Is  |		Short_Literal	0x173
03e7 00eb       |    |		Load_Encached	Diana_Cache
03e8 0098       |    |		Execute	Package,Field_Read_Dynamic
03e9 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
03ea 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03eb 0000 0000  |    |		.BLANK	0000[0x5]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3       |    |		.CONST	0x03f3								; Address of begin
03f1 0004       |    |		.CONST	0x0004								; Address of exception handler
03f2 0001       |    |		.CONST	0x0001								; Number of locals
03f3			BODY_03f0:
03f3			INIT_03f0:
03f3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x15 = .DEBUG	0x03f3,0x0bf0,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b18
													; Debug Table 0x15.0x0 = 0x3f3,0x1
03f4 e23d       | =  |		Load	0x1,0x3d
03f5 00dc       |    |		Load_Top	At_Offset_4
03f6 4973       |Is  |		Short_Literal	0x173
03f7 00eb       |    |		Load_Encached	Diana_Cache
03f8 0098       |    |		Execute	Package,Field_Read_Dynamic
03f9 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
03fa 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03fb 0000 0000  |    |		.BLANK	0000[0x5]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403       |    |		.CONST	0x0403								; Address of begin
0401 0004       |    |		.CONST	0x0004								; Address of exception handler
0402 0001       |    |		.CONST	0x0001								; Number of locals
0403			BODY_0400:
0403			INIT_0400:
0403 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x16 = .DEBUG	0x0403,0x0bf4,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b24
													; Debug Table 0x16.0x0 = 0x403,0x1
0404 e237       | 7  |		Load	0x1,0x37
0405 00dc       |    |		Load_Top	At_Offset_4
0406 4973       |Is  |		Short_Literal	0x173
0407 00eb       |    |		Load_Encached	Diana_Cache
0408 0098       |    |		Execute	Package,Field_Read_Dynamic
0409 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
040a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
040b 0000 0000  |    |		.BLANK	0000[0x5]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0413       |    |		.CONST	0x0413								; Address of begin
0411 0004       |    |		.CONST	0x0004								; Address of exception handler
0412 0001       |    |		.CONST	0x0001								; Number of locals
0413			BODY_0410:
0413			INIT_0410:
0413 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17 = .DEBUG	0x0413,0x0bf8,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b30
													; Debug Table 0x17.0x0 = 0x413,0x1
0414 e238       | 8  |		Load	0x1,0x38
0415 00dc       |    |		Load_Top	At_Offset_4
0416 4973       |Is  |		Short_Literal	0x173
0417 00eb       |    |		Load_Encached	Diana_Cache
0418 0098       |    |		Execute	Package,Field_Read_Dynamic
0419 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
041a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
041b 0000 0000  |    |		.BLANK	0000[0x5]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0423       | #  |		.CONST	0x0423								; Address of begin
0421 0004       |    |		.CONST	0x0004								; Address of exception handler
0422 0001       |    |		.CONST	0x0001								; Number of locals
0423			BODY_0420:
0423			INIT_0420:
0423 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18 = .DEBUG	0x0423,0x0bfc,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b3c
													; Debug Table 0x18.0x0 = 0x423,0x1
0424 e23f       | ?  |		Load	0x1,0x3f
0425 00dc       |    |		Load_Top	At_Offset_4
0426 4973       |Is  |		Short_Literal	0x173
0427 00eb       |    |		Load_Encached	Diana_Cache
0428 0098       |    |		Execute	Package,Field_Read_Dynamic
0429 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
042a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
042b 0000 0000  |    |		.BLANK	0000[0x5]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0433       | 3  |		.CONST	0x0433								; Address of begin
0431 0004       |    |		.CONST	0x0004								; Address of exception handler
0432 0001       |    |		.CONST	0x0001								; Number of locals
0433			BODY_0430:
0433			INIT_0430:
0433 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x19 = .DEBUG	0x0433,0x0c00,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b48
													; Debug Table 0x19.0x0 = 0x433,0x1
0434 e240       | @  |		Load	0x1,0x40
0435 00dc       |    |		Load_Top	At_Offset_4
0436 4973       |Is  |		Short_Literal	0x173
0437 00eb       |    |		Load_Encached	Diana_Cache
0438 0098       |    |		Execute	Package,Field_Read_Dynamic
0439 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
043a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
043b 0000 0000  |    |		.BLANK	0000[0x5]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0443       | C  |		.CONST	0x0443								; Address of begin
0441 0004       |    |		.CONST	0x0004								; Address of exception handler
0442 0001       |    |		.CONST	0x0001								; Number of locals
0443			BODY_0440:
0443			INIT_0440:
0443 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a = .DEBUG	0x0443,0x0c04,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b54
													; Debug Table 0x1a.0x0 = 0x443,0x1
0444 0217       |    |		Execute	Heap_Access,All_Reference
0445 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0446 0b0c       |    |		Execute_Immediate	Case_Compare,0xc
0447 701f       |p   |		Jump_Nonzero	0x467
0448 0b16       |    |		Execute_Immediate	Case_Compare,0x16
0449 701d       |p   |		Jump_Nonzero	0x467
044a 0b09       |    |		Execute_Immediate	Case_Compare,0x9
044b 702a       |p*  |		Jump_Nonzero	0x476
044c 0b08       |    |		Execute_Immediate	Case_Compare,0x8
044d 7037       |p7  |		Jump_Nonzero	0x485
044e 0b06       |    |		Execute_Immediate	Case_Compare,0x6
044f 7044       |pD  |		Jump_Nonzero	0x494
0450 0b10       |    |		Execute_Immediate	Case_Compare,0x10
0451 7051       |pQ  |		Jump_Nonzero	0x4a3
0452 0b04       |    |		Execute_Immediate	Case_Compare,0x4
0453 705e       |p^  |		Jump_Nonzero	0x4b2
0454 0b0e       |    |		Execute_Immediate	Case_Compare,0xe
0455 706b       |pk  |		Jump_Nonzero	0x4c1
0456 0b12       |    |		Execute_Immediate	Case_Compare,0x12
0457 7078       |px  |		Jump_Nonzero	0x4d0
0458 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x1 = 0x458,0xa
0459 0219       |    |		Execute	Heap_Access,All_Read
045a 49b2       |I   |		Short_Literal	0x1b2
045b 00eb       |    |		Load_Encached	Diana_Cache
045c 0098       |    |		Execute	Package,Field_Read_Dynamic
045d 00d9       |    |		Load_Top	At_Offset_1
045e 2e29       |.)  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x29
045f 00d1       |    |		Pop_Control	Pop_Count_1
0460 00de       |    |		Load_Top	At_Offset_6
0461 00de       |    |		Load_Top	At_Offset_6
0462 824b       | K  |		Call	0x1,0x4b
0463 00d9       |    |		Load_Top	At_Offset_1
0464 2a29       |*)  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x29
0465 00d1       |    |		Pop_Control	Pop_Count_1
0466 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0467 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x2 = 0x467,0x2
0468 0219       |    |		Execute	Heap_Access,All_Read
0469 49b2       |I   |		Short_Literal	0x1b2
046a 00eb       |    |		Load_Encached	Diana_Cache
046b 0098       |    |		Execute	Package,Field_Read_Dynamic
046c 00d9       |    |		Load_Top	At_Offset_1
046d 2ec1       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc1
046e 00d1       |    |		Pop_Control	Pop_Count_1
046f 00de       |    |		Load_Top	At_Offset_6
0470 00de       |    |		Load_Top	At_Offset_6
0471 824b       | K  |		Call	0x1,0x4b
0472 00d9       |    |		Load_Top	At_Offset_1
0473 2ac1       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc1
0474 00d1       |    |		Pop_Control	Pop_Count_1
0475 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0476 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x3 = 0x476,0x3
0477 0219       |    |		Execute	Heap_Access,All_Read
0478 49b2       |I   |		Short_Literal	0x1b2
0479 00eb       |    |		Load_Encached	Diana_Cache
047a 0098       |    |		Execute	Package,Field_Read_Dynamic
047b 00d9       |    |		Load_Top	At_Offset_1
047c 2e9f       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9f
047d 00d1       |    |		Pop_Control	Pop_Count_1
047e 00de       |    |		Load_Top	At_Offset_6
047f 00de       |    |		Load_Top	At_Offset_6
0480 824b       | K  |		Call	0x1,0x4b
0481 00d9       |    |		Load_Top	At_Offset_1
0482 2a9f       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9f
0483 00d1       |    |		Pop_Control	Pop_Count_1
0484 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0485 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x4 = 0x485,0x4
0486 0219       |    |		Execute	Heap_Access,All_Read
0487 49b2       |I   |		Short_Literal	0x1b2
0488 00eb       |    |		Load_Encached	Diana_Cache
0489 0098       |    |		Execute	Package,Field_Read_Dynamic
048a 00d9       |    |		Load_Top	At_Offset_1
048b 2e9c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9c
048c 00d1       |    |		Pop_Control	Pop_Count_1
048d 00de       |    |		Load_Top	At_Offset_6
048e 00de       |    |		Load_Top	At_Offset_6
048f 824b       | K  |		Call	0x1,0x4b
0490 00d9       |    |		Load_Top	At_Offset_1
0491 2a9c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9c
0492 00d1       |    |		Pop_Control	Pop_Count_1
0493 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0494 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x5 = 0x494,0x5
0495 0219       |    |		Execute	Heap_Access,All_Read
0496 49b2       |I   |		Short_Literal	0x1b2
0497 00eb       |    |		Load_Encached	Diana_Cache
0498 0098       |    |		Execute	Package,Field_Read_Dynamic
0499 00d9       |    |		Load_Top	At_Offset_1
049a 2e94       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x94
049b 00d1       |    |		Pop_Control	Pop_Count_1
049c 00de       |    |		Load_Top	At_Offset_6
049d 00de       |    |		Load_Top	At_Offset_6
049e 824b       | K  |		Call	0x1,0x4b
049f 00d9       |    |		Load_Top	At_Offset_1
04a0 2a94       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x94
04a1 00d1       |    |		Pop_Control	Pop_Count_1
04a2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04a3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x6 = 0x4a3,0x6
04a4 0219       |    |		Execute	Heap_Access,All_Read
04a5 49b2       |I   |		Short_Literal	0x1b2
04a6 00eb       |    |		Load_Encached	Diana_Cache
04a7 0098       |    |		Execute	Package,Field_Read_Dynamic
04a8 00d9       |    |		Load_Top	At_Offset_1
04a9 2e6d       |.m  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6d
04aa 00d1       |    |		Pop_Control	Pop_Count_1
04ab 00de       |    |		Load_Top	At_Offset_6
04ac 00de       |    |		Load_Top	At_Offset_6
04ad 824b       | K  |		Call	0x1,0x4b
04ae 00d9       |    |		Load_Top	At_Offset_1
04af 2a6d       |*m  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6d
04b0 00d1       |    |		Pop_Control	Pop_Count_1
04b1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04b2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x7 = 0x4b2,0x7
04b3 0219       |    |		Execute	Heap_Access,All_Read
04b4 49b2       |I   |		Short_Literal	0x1b2
04b5 00eb       |    |		Load_Encached	Diana_Cache
04b6 0098       |    |		Execute	Package,Field_Read_Dynamic
04b7 00d9       |    |		Load_Top	At_Offset_1
04b8 2e2e       |..  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2e
04b9 00d1       |    |		Pop_Control	Pop_Count_1
04ba 00de       |    |		Load_Top	At_Offset_6
04bb 00de       |    |		Load_Top	At_Offset_6
04bc 824b       | K  |		Call	0x1,0x4b
04bd 00d9       |    |		Load_Top	At_Offset_1
04be 2a2e       |*.  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2e
04bf 00d1       |    |		Pop_Control	Pop_Count_1
04c0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04c1 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x8 = 0x4c1,0x8
04c2 0219       |    |		Execute	Heap_Access,All_Read
04c3 49b2       |I   |		Short_Literal	0x1b2
04c4 00eb       |    |		Load_Encached	Diana_Cache
04c5 0098       |    |		Execute	Package,Field_Read_Dynamic
04c6 00d9       |    |		Load_Top	At_Offset_1
04c7 2e25       |.%  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x25
04c8 00d1       |    |		Pop_Control	Pop_Count_1
04c9 00de       |    |		Load_Top	At_Offset_6
04ca 00de       |    |		Load_Top	At_Offset_6
04cb 824b       | K  |		Call	0x1,0x4b
04cc 00d9       |    |		Load_Top	At_Offset_1
04cd 2a25       |*%  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x25
04ce 00d1       |    |		Pop_Control	Pop_Count_1
04cf 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04d0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x9 = 0x4d0,0x9
04d1 0219       |    |		Execute	Heap_Access,All_Read
04d2 49b2       |I   |		Short_Literal	0x1b2
04d3 00eb       |    |		Load_Encached	Diana_Cache
04d4 0098       |    |		Execute	Package,Field_Read_Dynamic
04d5 00d9       |    |		Load_Top	At_Offset_1
04d6 2eac       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xac
04d7 00d1       |    |		Pop_Control	Pop_Count_1
04d8 00de       |    |		Load_Top	At_Offset_6
04d9 00de       |    |		Load_Top	At_Offset_6
04da 824b       | K  |		Call	0x1,0x4b
04db 00d9       |    |		Load_Top	At_Offset_1
04dc 2aac       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xac
04dd 00d1       |    |		Pop_Control	Pop_Count_1
04de 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04df 0000       |    |		.XXX[0x1]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e3       |    |		.CONST	0x04e3								; Address of begin
04e1 0004       |    |		.CONST	0x0004								; Address of exception handler
04e2 0001       |    |		.CONST	0x0001								; Number of locals
04e3			BODY_04e0:
04e3			INIT_04e0:
04e3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1b = .DEBUG	0x04e3,0x0c1a,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b60
													; Debug Table 0x1b.0x0 = 0x4e3,0x1
04e4 0217       |    |		Execute	Heap_Access,All_Reference
04e5 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04e6 0b01       |    |		Execute_Immediate	Case_Compare,0x1
04e7 702b       |p+  |		Jump_Nonzero	0x513
04e8 0b0d       |    |		Execute_Immediate	Case_Compare,0xd
04e9 7036       |p6  |		Jump_Nonzero	0x520
04ea 0b03       |    |		Execute_Immediate	Case_Compare,0x3
04eb 7041       |pA  |		Jump_Nonzero	0x52d
04ec 0b0e       |    |		Execute_Immediate	Case_Compare,0xe
04ed 704c       |pL  |		Jump_Nonzero	0x53a
04ee 0b04       |    |		Execute_Immediate	Case_Compare,0x4
04ef 7057       |pW  |		Jump_Nonzero	0x547
04f0 0b10       |    |		Execute_Immediate	Case_Compare,0x10
04f1 7062       |pb  |		Jump_Nonzero	0x554
04f2 0b11       |    |		Execute_Immediate	Case_Compare,0x11
04f3 706d       |pm  |		Jump_Nonzero	0x561
04f4 0b06       |    |		Execute_Immediate	Case_Compare,0x6
04f5 7078       |px  |		Jump_Nonzero	0x56e
04f6 0b07       |    |		Execute_Immediate	Case_Compare,0x7
04f7 7083       |p   |		Jump_Nonzero	0x57b
04f8 0b08       |    |		Execute_Immediate	Case_Compare,0x8
04f9 708e       |p   |		Jump_Nonzero	0x588
04fa 0b09       |    |		Execute_Immediate	Case_Compare,0x9
04fb 7099       |p   |		Jump_Nonzero	0x595
04fc 0b12       |    |		Execute_Immediate	Case_Compare,0x12
04fd 70a4       |p   |		Jump_Nonzero	0x5a2
04fe 0b13       |    |		Execute_Immediate	Case_Compare,0x13
04ff 70af       |p   |		Jump_Nonzero	0x5af
0500 0b0b       |    |		Execute_Immediate	Case_Compare,0xb
0501 70ba       |p   |		Jump_Nonzero	0x5bc
0502 0b0c       |    |		Execute_Immediate	Case_Compare,0xc
0503 70c5       |p   |		Jump_Nonzero	0x5c9
0504 0b16       |    |		Execute_Immediate	Case_Compare,0x16
0505 70c3       |p   |		Jump_Nonzero	0x5c9
0506 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x1 = 0x506,0x11
0507 0219       |    |		Execute	Heap_Access,All_Read
0508 00d8       |    |		Load_Top	At_Offset_0
0509 2e28       |.(  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x28
050a 00de       |    |		Load_Top	At_Offset_6
050b 00de       |    |		Load_Top	At_Offset_6
050c 49b0       |I   |		Short_Literal	0x1b0
050d 00eb       |    |		Load_Encached	Diana_Cache
050e 0096       |    |		Execute	Package,Entry
050f 00d9       |    |		Load_Top	At_Offset_1
0510 2a28       |*(  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x28
0511 00d1       |    |		Pop_Control	Pop_Count_1
0512 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0513 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x2 = 0x513,0x2
0514 0219       |    |		Execute	Heap_Access,All_Read
0515 00d8       |    |		Load_Top	At_Offset_0
0516 2e14       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x14
0517 00de       |    |		Load_Top	At_Offset_6
0518 00de       |    |		Load_Top	At_Offset_6
0519 49b0       |I   |		Short_Literal	0x1b0
051a 00eb       |    |		Load_Encached	Diana_Cache
051b 0096       |    |		Execute	Package,Entry
051c 00d9       |    |		Load_Top	At_Offset_1
051d 2a14       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x14
051e 00d1       |    |		Pop_Control	Pop_Count_1
051f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0520 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x3 = 0x520,0x3
0521 0219       |    |		Execute	Heap_Access,All_Read
0522 00d8       |    |		Load_Top	At_Offset_0
0523 2e1b       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x1b
0524 00de       |    |		Load_Top	At_Offset_6
0525 00de       |    |		Load_Top	At_Offset_6
0526 49b0       |I   |		Short_Literal	0x1b0
0527 00eb       |    |		Load_Encached	Diana_Cache
0528 0096       |    |		Execute	Package,Entry
0529 00d9       |    |		Load_Top	At_Offset_1
052a 2a1b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x1b
052b 00d1       |    |		Pop_Control	Pop_Count_1
052c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
052d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x4 = 0x52d,0x4
052e 0219       |    |		Execute	Heap_Access,All_Read
052f 00d8       |    |		Load_Top	At_Offset_0
0530 2e1d       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x1d
0531 00de       |    |		Load_Top	At_Offset_6
0532 00de       |    |		Load_Top	At_Offset_6
0533 49b0       |I   |		Short_Literal	0x1b0
0534 00eb       |    |		Load_Encached	Diana_Cache
0535 0096       |    |		Execute	Package,Entry
0536 00d9       |    |		Load_Top	At_Offset_1
0537 2a1d       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x1d
0538 00d1       |    |		Pop_Control	Pop_Count_1
0539 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
053a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x5 = 0x53a,0x5
053b 0219       |    |		Execute	Heap_Access,All_Read
053c 00d8       |    |		Load_Top	At_Offset_0
053d 2e24       |.$  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x24
053e 00de       |    |		Load_Top	At_Offset_6
053f 00de       |    |		Load_Top	At_Offset_6
0540 49b0       |I   |		Short_Literal	0x1b0
0541 00eb       |    |		Load_Encached	Diana_Cache
0542 0096       |    |		Execute	Package,Entry
0543 00d9       |    |		Load_Top	At_Offset_1
0544 2a24       |*$  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x24
0545 00d1       |    |		Pop_Control	Pop_Count_1
0546 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0547 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x6 = 0x547,0x6
0548 0219       |    |		Execute	Heap_Access,All_Read
0549 00d8       |    |		Load_Top	At_Offset_0
054a 2e2d       |.-  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2d
054b 00de       |    |		Load_Top	At_Offset_6
054c 00de       |    |		Load_Top	At_Offset_6
054d 49b0       |I   |		Short_Literal	0x1b0
054e 00eb       |    |		Load_Encached	Diana_Cache
054f 0096       |    |		Execute	Package,Entry
0550 00d9       |    |		Load_Top	At_Offset_1
0551 2a2d       |*-  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2d
0552 00d1       |    |		Pop_Control	Pop_Count_1
0553 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0554 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x7 = 0x554,0x7
0555 0219       |    |		Execute	Heap_Access,All_Read
0556 00d8       |    |		Load_Top	At_Offset_0
0557 2e6c       |.l  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6c
0558 00de       |    |		Load_Top	At_Offset_6
0559 00de       |    |		Load_Top	At_Offset_6
055a 49b0       |I   |		Short_Literal	0x1b0
055b 00eb       |    |		Load_Encached	Diana_Cache
055c 0096       |    |		Execute	Package,Entry
055d 00d9       |    |		Load_Top	At_Offset_1
055e 2a6c       |*l  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6c
055f 00d1       |    |		Pop_Control	Pop_Count_1
0560 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0561 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x8 = 0x561,0x8
0562 0219       |    |		Execute	Heap_Access,All_Read
0563 00d8       |    |		Load_Top	At_Offset_0
0564 2e7d       |.}  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7d
0565 00de       |    |		Load_Top	At_Offset_6
0566 00de       |    |		Load_Top	At_Offset_6
0567 49b0       |I   |		Short_Literal	0x1b0
0568 00eb       |    |		Load_Encached	Diana_Cache
0569 0096       |    |		Execute	Package,Entry
056a 00d9       |    |		Load_Top	At_Offset_1
056b 2a7d       |*}  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7d
056c 00d1       |    |		Pop_Control	Pop_Count_1
056d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
056e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x9 = 0x56e,0x9
056f 0219       |    |		Execute	Heap_Access,All_Read
0570 00d8       |    |		Load_Top	At_Offset_0
0571 2e93       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x93
0572 00de       |    |		Load_Top	At_Offset_6
0573 00de       |    |		Load_Top	At_Offset_6
0574 49b0       |I   |		Short_Literal	0x1b0
0575 00eb       |    |		Load_Encached	Diana_Cache
0576 0096       |    |		Execute	Package,Entry
0577 00d9       |    |		Load_Top	At_Offset_1
0578 2a93       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x93
0579 00d1       |    |		Pop_Control	Pop_Count_1
057a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
057b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0xa = 0x57b,0xa
057c 0219       |    |		Execute	Heap_Access,All_Read
057d 00d8       |    |		Load_Top	At_Offset_0
057e 2e95       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x95
057f 00de       |    |		Load_Top	At_Offset_6
0580 00de       |    |		Load_Top	At_Offset_6
0581 49b0       |I   |		Short_Literal	0x1b0
0582 00eb       |    |		Load_Encached	Diana_Cache
0583 0096       |    |		Execute	Package,Entry
0584 00d9       |    |		Load_Top	At_Offset_1
0585 2a95       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x95
0586 00d1       |    |		Pop_Control	Pop_Count_1
0587 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0588 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0xb = 0x588,0xb
0589 0219       |    |		Execute	Heap_Access,All_Read
058a 00d8       |    |		Load_Top	At_Offset_0
058b 2e9b       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9b
058c 00de       |    |		Load_Top	At_Offset_6
058d 00de       |    |		Load_Top	At_Offset_6
058e 49b0       |I   |		Short_Literal	0x1b0
058f 00eb       |    |		Load_Encached	Diana_Cache
0590 0096       |    |		Execute	Package,Entry
0591 00d9       |    |		Load_Top	At_Offset_1
0592 2a9b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9b
0593 00d1       |    |		Pop_Control	Pop_Count_1
0594 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0595 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0xc = 0x595,0xc
0596 0219       |    |		Execute	Heap_Access,All_Read
0597 00d8       |    |		Load_Top	At_Offset_0
0598 2e9e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9e
0599 00de       |    |		Load_Top	At_Offset_6
059a 00de       |    |		Load_Top	At_Offset_6
059b 49b0       |I   |		Short_Literal	0x1b0
059c 00eb       |    |		Load_Encached	Diana_Cache
059d 0096       |    |		Execute	Package,Entry
059e 00d9       |    |		Load_Top	At_Offset_1
059f 2a9e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9e
05a0 00d1       |    |		Pop_Control	Pop_Count_1
05a1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05a2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0xd = 0x5a2,0xd
05a3 0219       |    |		Execute	Heap_Access,All_Read
05a4 00d8       |    |		Load_Top	At_Offset_0
05a5 2eab       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xab
05a6 00de       |    |		Load_Top	At_Offset_6
05a7 00de       |    |		Load_Top	At_Offset_6
05a8 49b0       |I   |		Short_Literal	0x1b0
05a9 00eb       |    |		Load_Encached	Diana_Cache
05aa 0096       |    |		Execute	Package,Entry
05ab 00d9       |    |		Load_Top	At_Offset_1
05ac 2aab       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xab
05ad 00d1       |    |		Pop_Control	Pop_Count_1
05ae 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05af 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0xe = 0x5af,0xe
05b0 0219       |    |		Execute	Heap_Access,All_Read
05b1 00d8       |    |		Load_Top	At_Offset_0
05b2 2eaf       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xaf
05b3 00de       |    |		Load_Top	At_Offset_6
05b4 00de       |    |		Load_Top	At_Offset_6
05b5 49b0       |I   |		Short_Literal	0x1b0
05b6 00eb       |    |		Load_Encached	Diana_Cache
05b7 0096       |    |		Execute	Package,Entry
05b8 00d9       |    |		Load_Top	At_Offset_1
05b9 2aaf       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xaf
05ba 00d1       |    |		Pop_Control	Pop_Count_1
05bb 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05bc 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0xf = 0x5bc,0xf
05bd 0219       |    |		Execute	Heap_Access,All_Read
05be 00d8       |    |		Load_Top	At_Offset_0
05bf 2eb2       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xb2
05c0 00de       |    |		Load_Top	At_Offset_6
05c1 00de       |    |		Load_Top	At_Offset_6
05c2 49b0       |I   |		Short_Literal	0x1b0
05c3 00eb       |    |		Load_Encached	Diana_Cache
05c4 0096       |    |		Execute	Package,Entry
05c5 00d9       |    |		Load_Top	At_Offset_1
05c6 2ab2       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb2
05c7 00d1       |    |		Pop_Control	Pop_Count_1
05c8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05c9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x10 = 0x5c9,0x10
05ca 0219       |    |		Execute	Heap_Access,All_Read
05cb 00d8       |    |		Load_Top	At_Offset_0
05cc 2ec0       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc0
05cd 00de       |    |		Load_Top	At_Offset_6
05ce 00de       |    |		Load_Top	At_Offset_6
05cf 49b0       |I   |		Short_Literal	0x1b0
05d0 00eb       |    |		Load_Encached	Diana_Cache
05d1 0096       |    |		Execute	Package,Entry
05d2 00d9       |    |		Load_Top	At_Offset_1
05d3 2ac0       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc0
05d4 00d1       |    |		Pop_Control	Pop_Count_1
05d5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05d6 0000 0000  |    |		.XXX[0x2]
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05db       |    |		.CONST	0x05db								; Address of begin
05d9 0004       |    |		.CONST	0x0004								; Address of exception handler
05da 0001       |    |		.CONST	0x0001								; Number of locals
05db			BODY_05d8:
05db			INIT_05d8:
05db 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1c = .DEBUG	0x05db,0x0c3e,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b6c
													; Debug Table 0x1c.0x0 = 0x5db,0x1
05dc 0217       |    |		Execute	Heap_Access,All_Reference
05dd 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05de 0b24       | $  |		Execute_Immediate	Case_Compare,0x24
05df 7017       |p   |		Jump_Nonzero	0x5f7
05e0 0b25       | %  |		Execute_Immediate	Case_Compare,0x25
05e1 7015       |p   |		Jump_Nonzero	0x5f7
05e2 0b32       | 2  |		Execute_Immediate	Case_Compare,0x32
05e3 7020       |p   |		Jump_Nonzero	0x604
05e4 0b31       | 1  |		Execute_Immediate	Case_Compare,0x31
05e5 701e       |p   |		Jump_Nonzero	0x604
05e6 0b1d       |    |		Execute_Immediate	Case_Compare,0x1d
05e7 7021       |p!  |		Jump_Nonzero	0x609
05e8 0b23       | #  |		Execute_Immediate	Case_Compare,0x23
05e9 7024       |p$  |		Jump_Nonzero	0x60e
05ea 0b1e       |    |		Execute_Immediate	Case_Compare,0x1e
05eb 702f       |p/  |		Jump_Nonzero	0x61b
05ec 0b28       | (  |		Execute_Immediate	Case_Compare,0x28
05ed 703a       |p:  |		Jump_Nonzero	0x628
05ee 0b30       | 0  |		Execute_Immediate	Case_Compare,0x30
05ef 7038       |p8  |		Jump_Nonzero	0x628
05f0 0b26       | &  |		Execute_Immediate	Case_Compare,0x26
05f1 7043       |pC  |		Jump_Nonzero	0x635
05f2 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x1c.0x1 = 0x5f2,0x9
05f3 00dc       |    |		Load_Top	At_Offset_4
05f4 0217       |    |		Execute	Heap_Access,All_Reference
05f5 2a30       |*0  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x30
05f6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05f7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1c.0x2 = 0x5f7,0x2
05f8 0219       |    |		Execute	Heap_Access,All_Read
05f9 00d8       |    |		Load_Top	At_Offset_0
05fa 2e78       |.x  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x78
05fb 00de       |    |		Load_Top	At_Offset_6
05fc 00de       |    |		Load_Top	At_Offset_6
05fd 49b0       |I   |		Short_Literal	0x1b0
05fe 00eb       |    |		Load_Encached	Diana_Cache
05ff 0096       |    |		Execute	Package,Entry
0600 00d9       |    |		Load_Top	At_Offset_1
0601 2a78       |*x  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x78
0602 00d1       |    |		Pop_Control	Pop_Count_1
0603 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0604 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x1c.0x3 = 0x604,0x3
0605 00dc       |    |		Load_Top	At_Offset_4
0606 0217       |    |		Execute	Heap_Access,All_Reference
0607 2a4b       |*K  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4b
0608 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0609 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x1c.0x4 = 0x609,0x4
060a 00dc       |    |		Load_Top	At_Offset_4
060b 0217       |    |		Execute	Heap_Access,All_Reference
060c 2a38       |*8  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x38
060d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
060e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1c.0x5 = 0x60e,0x5
060f 0219       |    |		Execute	Heap_Access,All_Read
0610 00d8       |    |		Load_Top	At_Offset_0
0611 2e3d       |.=  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3d
0612 00de       |    |		Load_Top	At_Offset_6
0613 00de       |    |		Load_Top	At_Offset_6
0614 49b0       |I   |		Short_Literal	0x1b0
0615 00eb       |    |		Load_Encached	Diana_Cache
0616 0096       |    |		Execute	Package,Entry
0617 00d9       |    |		Load_Top	At_Offset_1
0618 2a3d       |*=  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3d
0619 00d1       |    |		Pop_Control	Pop_Count_1
061a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
061b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1c.0x6 = 0x61b,0x6
061c 0219       |    |		Execute	Heap_Access,All_Read
061d 00d8       |    |		Load_Top	At_Offset_0
061e 2e42       |.B  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x42
061f 00de       |    |		Load_Top	At_Offset_6
0620 00de       |    |		Load_Top	At_Offset_6
0621 49b0       |I   |		Short_Literal	0x1b0
0622 00eb       |    |		Load_Encached	Diana_Cache
0623 0096       |    |		Execute	Package,Entry
0624 00d9       |    |		Load_Top	At_Offset_1
0625 2a42       |*B  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x42
0626 00d1       |    |		Pop_Control	Pop_Count_1
0627 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0628 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1c.0x7 = 0x628,0x7
0629 0219       |    |		Execute	Heap_Access,All_Read
062a 00d8       |    |		Load_Top	At_Offset_0
062b 2e97       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x97
062c 00de       |    |		Load_Top	At_Offset_6
062d 00de       |    |		Load_Top	At_Offset_6
062e 49b0       |I   |		Short_Literal	0x1b0
062f 00eb       |    |		Load_Encached	Diana_Cache
0630 0096       |    |		Execute	Package,Entry
0631 00d9       |    |		Load_Top	At_Offset_1
0632 2a97       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x97
0633 00d1       |    |		Pop_Control	Pop_Count_1
0634 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0635 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1c.0x8 = 0x635,0x8
0636 0219       |    |		Execute	Heap_Access,All_Read
0637 00d8       |    |		Load_Top	At_Offset_0
0638 2e85       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x85
0639 00de       |    |		Load_Top	At_Offset_6
063a 00de       |    |		Load_Top	At_Offset_6
063b 49b0       |I   |		Short_Literal	0x1b0
063c 00eb       |    |		Load_Encached	Diana_Cache
063d 0096       |    |		Execute	Package,Entry
063e 00d9       |    |		Load_Top	At_Offset_1
063f 2a85       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x85
0640 00d1       |    |		Pop_Control	Pop_Count_1
0641 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0642 0000 0000  |    |		.BLANK	0000[0x6]
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064b       | K  |		.CONST	0x064b								; Address of begin
0649 0004       |    |		.CONST	0x0004								; Address of exception handler
064a 0001       |    |		.CONST	0x0001								; Number of locals
064b			BODY_0648:
064b			INIT_0648:
064b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1d = .DEBUG	0x064b,0x0c52,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b78
													; Debug Table 0x1d.0x0 = 0x64b,0x1
064c 0217       |    |		Execute	Heap_Access,All_Reference
064d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
064e 0b33       | 3  |		Execute_Immediate	Case_Compare,0x33
064f 7021       |p!  |		Jump_Nonzero	0x671
0650 0b21       | !  |		Execute_Immediate	Case_Compare,0x21
0651 701f       |p   |		Jump_Nonzero	0x671
0652 0b29       | )  |		Execute_Immediate	Case_Compare,0x29
0653 701d       |p   |		Jump_Nonzero	0x671
0654 0b2c       | ,  |		Execute_Immediate	Case_Compare,0x2c
0655 701b       |p   |		Jump_Nonzero	0x671
0656 0b2e       | .  |		Execute_Immediate	Case_Compare,0x2e
0657 7019       |p   |		Jump_Nonzero	0x671
0658 0b22       | "  |		Execute_Immediate	Case_Compare,0x22
0659 7024       |p$  |		Jump_Nonzero	0x67e
065a 0b24       | $  |		Execute_Immediate	Case_Compare,0x24
065b 702f       |p/  |		Jump_Nonzero	0x68b
065c 0b25       | %  |		Execute_Immediate	Case_Compare,0x25
065d 702d       |p-  |		Jump_Nonzero	0x68b
065e 0b2f       | /  |		Execute_Immediate	Case_Compare,0x2f
065f 7038       |p8  |		Jump_Nonzero	0x698
0660 0b1e       |    |		Execute_Immediate	Case_Compare,0x1e
0661 7043       |pC  |		Jump_Nonzero	0x6a5
0662 0b23       | #  |		Execute_Immediate	Case_Compare,0x23
0663 704e       |pN  |		Jump_Nonzero	0x6b2
0664 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d.0x1 = 0x664,0x8
0665 0219       |    |		Execute	Heap_Access,All_Read
0666 00d8       |    |		Load_Top	At_Offset_0
0667 2e3a       |.:  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3a
0668 00de       |    |		Load_Top	At_Offset_6
0669 00de       |    |		Load_Top	At_Offset_6
066a 49b0       |I   |		Short_Literal	0x1b0
066b 00eb       |    |		Load_Encached	Diana_Cache
066c 0096       |    |		Execute	Package,Entry
066d 00d9       |    |		Load_Top	At_Offset_1
066e 2a3a       |*:  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3a
066f 00d1       |    |		Pop_Control	Pop_Count_1
0670 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0671 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d.0x2 = 0x671,0x2
0672 0219       |    |		Execute	Heap_Access,All_Read
0673 00d8       |    |		Load_Top	At_Offset_0
0674 2e53       |.S  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x53
0675 00de       |    |		Load_Top	At_Offset_6
0676 00de       |    |		Load_Top	At_Offset_6
0677 49b0       |I   |		Short_Literal	0x1b0
0678 00eb       |    |		Load_Encached	Diana_Cache
0679 0096       |    |		Execute	Package,Entry
067a 00d9       |    |		Load_Top	At_Offset_1
067b 2a53       |*S  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x53
067c 00d1       |    |		Pop_Control	Pop_Count_1
067d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
067e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d.0x3 = 0x67e,0x3
067f 0219       |    |		Execute	Heap_Access,All_Read
0680 00d8       |    |		Load_Top	At_Offset_0
0681 2e75       |.u  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x75
0682 00de       |    |		Load_Top	At_Offset_6
0683 00de       |    |		Load_Top	At_Offset_6
0684 49b0       |I   |		Short_Literal	0x1b0
0685 00eb       |    |		Load_Encached	Diana_Cache
0686 0096       |    |		Execute	Package,Entry
0687 00d9       |    |		Load_Top	At_Offset_1
0688 2a75       |*u  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x75
0689 00d1       |    |		Pop_Control	Pop_Count_1
068a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
068b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d.0x4 = 0x68b,0x4
068c 0219       |    |		Execute	Heap_Access,All_Read
068d 00d8       |    |		Load_Top	At_Offset_0
068e 2e79       |.y  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x79
068f 00de       |    |		Load_Top	At_Offset_6
0690 00de       |    |		Load_Top	At_Offset_6
0691 49b0       |I   |		Short_Literal	0x1b0
0692 00eb       |    |		Load_Encached	Diana_Cache
0693 0096       |    |		Execute	Package,Entry
0694 00d9       |    |		Load_Top	At_Offset_1
0695 2a79       |*y  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x79
0696 00d1       |    |		Pop_Control	Pop_Count_1
0697 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0698 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d.0x5 = 0x698,0x5
0699 0219       |    |		Execute	Heap_Access,All_Read
069a 00d8       |    |		Load_Top	At_Offset_0
069b 2eba       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xba
069c 00de       |    |		Load_Top	At_Offset_6
069d 00de       |    |		Load_Top	At_Offset_6
069e 49b0       |I   |		Short_Literal	0x1b0
069f 00eb       |    |		Load_Encached	Diana_Cache
06a0 0096       |    |		Execute	Package,Entry
06a1 00d9       |    |		Load_Top	At_Offset_1
06a2 2aba       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xba
06a3 00d1       |    |		Pop_Control	Pop_Count_1
06a4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
06a5 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d.0x6 = 0x6a5,0x6
06a6 0219       |    |		Execute	Heap_Access,All_Read
06a7 00d8       |    |		Load_Top	At_Offset_0
06a8 2e44       |.D  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x44
06a9 00de       |    |		Load_Top	At_Offset_6
06aa 00de       |    |		Load_Top	At_Offset_6
06ab 49b0       |I   |		Short_Literal	0x1b0
06ac 00eb       |    |		Load_Encached	Diana_Cache
06ad 0096       |    |		Execute	Package,Entry
06ae 00d9       |    |		Load_Top	At_Offset_1
06af 2a44       |*D  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x44
06b0 00d1       |    |		Pop_Control	Pop_Count_1
06b1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
06b2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d.0x7 = 0x6b2,0x7
06b3 0219       |    |		Execute	Heap_Access,All_Read
06b4 00d8       |    |		Load_Top	At_Offset_0
06b5 2e3f       |.?  |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3f
06b6 00de       |    |		Load_Top	At_Offset_6
06b7 00de       |    |		Load_Top	At_Offset_6
06b8 49b0       |I   |		Short_Literal	0x1b0
06b9 00eb       |    |		Load_Encached	Diana_Cache
06ba 0096       |    |		Execute	Package,Entry
06bb 00d9       |    |		Load_Top	At_Offset_1
06bc 2a3f       |*?  |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3f
06bd 00d1       |    |		Pop_Control	Pop_Count_1
06be 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
06bf 0000       |    |		.XXX[0x1]
06c0 ; --------------------------------------------------------------------------------------
06c0 ; SUBPROGRAM
06c0 ; --------------------------------------------------------------------------------------
06c0 06c3       |    |		.CONST	0x06c3								; Address of begin
06c1 0004       |    |		.CONST	0x0004								; Address of exception handler
06c2 0001       |    |		.CONST	0x0001								; Number of locals
06c3			BODY_06c0:
06c3			INIT_06c0:
06c3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x1e = .DEBUG	0x06c3,0x0c64,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b84
													; Debug Table 0x1e.0x0 = 0x6c3,0x1
06c4 0000 0000  |    |		.BLANK	0000[0x4]
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06cb       |    |		.CONST	0x06cb								; Address of begin
06c9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ca 0001       |    |		.CONST	0x0001								; Number of locals
06cb			BODY_06c8:
06cb			INIT_06c8:
06cb 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x1f = .DEBUG	0x06cb,0x0c68,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b90
													; Debug Table 0x1f.0x0 = 0x6cb,0x1
06cc 0000 0000  |    |		.BLANK	0000[0x4]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d3       |    |		.CONST	0x06d3								; Address of begin
06d1 0004       |    |		.CONST	0x0004								; Address of exception handler
06d2 0001       |    |		.CONST	0x0001								; Number of locals
06d3			BODY_06d0:
06d3			INIT_06d0:
06d3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x20 = .DEBUG	0x06d3,0x0c6c,0x0002,0x0000,0x0056,0xba95,0x0000,0x0b9c
													; Debug Table 0x20.0x0 = 0x6d3,0x1
06d4 0b00       |    |		Execute_Immediate	Case_Compare,0x0
06d5 701c       |p   |		Jump_Nonzero	0x6f2
06d6 0b01       |    |		Execute_Immediate	Case_Compare,0x1
06d7 701c       |p   |		Jump_Nonzero	0x6f4
06d8 0bfa       |    |		Execute_Immediate	Case_Compare,0xfa
06d9 701c       |p   |		Jump_Nonzero	0x6f6
06da 0bfb       |    |		Execute_Immediate	Case_Compare,0xfb
06db 701c       |p   |		Jump_Nonzero	0x6f8
06dc 0bfc       |    |		Execute_Immediate	Case_Compare,0xfc
06dd 701c       |p   |		Jump_Nonzero	0x6fa
06de 0bfd       |    |		Execute_Immediate	Case_Compare,0xfd
06df 702d       |p-  |		Jump_Nonzero	0x70d
06e0 0bfe       |    |		Execute_Immediate	Case_Compare,0xfe
06e1 703e       |p>  |		Jump_Nonzero	0x720
06e2 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x20.0x1 = 0x6e2,0x9
06e3 1b96       |    |		Execute	Package,Field_Read,Field_Number 0x96
06e4 0322       | "  |		Declare_Variable	Record
06e5 4800       |H   |		Short_Literal	0x0
06e6 49aa       |I   |		Short_Literal	0x1aa
06e7 00eb       |    |		Load_Encached	Diana_Cache
06e8 0098       |    |		Execute	Package,Field_Read_Dynamic
06e9 1c08       |    |		Execute_Immediate	Run_Utility,0x8
06ea 00de       |    |		Load_Top	At_Offset_6
06eb e001       |    |		Load	0x0,0x1
06ec 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
06ed 00d9       |    |		Load_Top	At_Offset_1
06ee 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
06ef 00d9       |    |		Load_Top	At_Offset_1
06f0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
06f1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06f2 e246       | F  |		Load	0x1,0x46							; Debug Table 0x20.0x2 = 0x6f2,0x2
06f3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06f4 e247       | G  |		Load	0x1,0x47							; Debug Table 0x20.0x3 = 0x6f4,0x3
06f5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06f6 e248       | H  |		Load	0x1,0x48							; Debug Table 0x20.0x4 = 0x6f6,0x4
06f7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06f8 e249       | I  |		Load	0x1,0x49							; Debug Table 0x20.0x5 = 0x6f8,0x5
06f9 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06fa 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x20.0x6 = 0x6fa,0x6
06fb 1b96       |    |		Execute	Package,Field_Read,Field_Number 0x96
06fc 0322       | "  |		Declare_Variable	Record
06fd 4800       |H   |		Short_Literal	0x0
06fe 49aa       |I   |		Short_Literal	0x1aa
06ff 00eb       |    |		Load_Encached	Diana_Cache
0700 0098       |    |		Execute	Package,Field_Read_Dynamic
0701 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0702 e241       | A  |		Load	0x1,0x41
0703 00de       |    |		Load_Top	At_Offset_6
0704 4973       |Is  |		Short_Literal	0x173
0705 00eb       |    |		Load_Encached	Diana_Cache
0706 0098       |    |		Execute	Package,Field_Read_Dynamic
0707 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0708 00d9       |    |		Load_Top	At_Offset_1
0709 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
070a 00d9       |    |		Load_Top	At_Offset_1
070b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
070c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
070d 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x20.0x7 = 0x70d,0x7
070e 1b96       |    |		Execute	Package,Field_Read,Field_Number 0x96
070f 0322       | "  |		Declare_Variable	Record
0710 4801       |H   |		Short_Literal	0x1
0711 49aa       |I   |		Short_Literal	0x1aa
0712 00eb       |    |		Load_Encached	Diana_Cache
0713 0098       |    |		Execute	Package,Field_Read_Dynamic
0714 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0715 e242       | B  |		Load	0x1,0x42
0716 00de       |    |		Load_Top	At_Offset_6
0717 4973       |Is  |		Short_Literal	0x173
0718 00eb       |    |		Load_Encached	Diana_Cache
0719 0098       |    |		Execute	Package,Field_Read_Dynamic
071a 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
071b 00d9       |    |		Load_Top	At_Offset_1
071c 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
071d 00d9       |    |		Load_Top	At_Offset_1
071e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
071f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0720 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x20.0x8 = 0x720,0x8
0721 1b96       |    |		Execute	Package,Field_Read,Field_Number 0x96
0722 0322       | "  |		Declare_Variable	Record
0723 4801       |H   |		Short_Literal	0x1
0724 49aa       |I   |		Short_Literal	0x1aa
0725 00eb       |    |		Load_Encached	Diana_Cache
0726 0098       |    |		Execute	Package,Field_Read_Dynamic
0727 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0728 e001       |    |		Load	0x0,0x1
0729 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
072a 00d9       |    |		Load_Top	At_Offset_1
072b 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
072c 00d9       |    |		Load_Top	At_Offset_1
072d 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
072e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
072f 0000       |    |		.XXX[0x1]
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 0733       | 3  |		.CONST	0x0733								; Address of begin
0731 0004       |    |		.CONST	0x0004								; Address of exception handler
0732 0001       |    |		.CONST	0x0001								; Number of locals
0733			BODY_0730:
0733			INIT_0730:
0733 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x21 = .DEBUG	0x0733,0x0c80,0x0002,0x0000,0x0056,0xba95,0x0000,0x0ba9
													; Debug Table 0x21.0x0 = 0x733,0x1
0734 00d8       |    |		Load_Top	At_Offset_0
0735 4802       |H   |		Short_Literal	0x2
0736 48fc       |H   |		Short_Literal	0xfc
0737 0262       | b  |		Execute	Discrete,In_Range
0738 7004       |p   |		Jump_Nonzero	0x73d
0739 0bff       |    |		Execute_Immediate	Case_Compare,0xff
073a 7002       |p   |		Jump_Nonzero	0x73d
073b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x21.0x1 = 0x73b,0x3
073c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
073d 4801       |H   |		Short_Literal	0x1							; Debug Table 0x21.0x2 = 0x73d,0x2
073e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
073f 0000       |    |		.XXX[0x1]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0743       | C  |		.CONST	0x0743								; Address of begin
0741 0004       |    |		.CONST	0x0004								; Address of exception handler
0742 0001       |    |		.CONST	0x0001								; Number of locals
0743			BODY_0740:
0743			INIT_0740:
0743 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x22 = .DEBUG	0x0743,0x0c88,0x0002,0x0000,0x0056,0xba95,0x0000,0x0bb2
													; Debug Table 0x22.0x0 = 0x743,0x1
0744 00d8       |    |		Load_Top	At_Offset_0
0745 48fd       |H   |		Short_Literal	0xfd
0746 48fe       |H   |		Short_Literal	0xfe
0747 0262       | b  |		Execute	Discrete,In_Range
0748 7002       |p   |		Jump_Nonzero	0x74b
0749 4800       |H   |		Short_Literal	0x0							; Debug Table 0x22.0x1 = 0x749,0x3
074a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
074b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x22.0x2 = 0x74b,0x2
074c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
074d 0000 0000  |    |		.XXX[0x3]
074f 0000       |    |
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 0753       | S  |		.CONST	0x0753								; Address of begin
0751 0004       |    |		.CONST	0x0004								; Address of exception handler
0752 0001       |    |		.CONST	0x0001								; Number of locals
0753			BODY_0750:
0753			INIT_0750:
0753 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x23 = .DEBUG	0x0753,0x0c90,0x0002,0x0000,0x0056,0xba95,0x0000,0x0bbb
													; Debug Table 0x23.0x0 = 0x753,0x1
0754 0ffc       |    |		Execute_Immediate	Equal,-0x4
0755 680e       |h   |		Jump_Zero	0x764
0756 e241       | A  |		Load	0x1,0x41
0757 00db       |    |		Load_Top	At_Offset_3
0758 4973       |Is  |		Short_Literal	0x173
0759 00eb       |    |		Load_Encached	Diana_Cache
075a 0098       |    |		Execute	Package,Field_Read_Dynamic
075b 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
075c 7007       |p   |		Jump_Nonzero	0x764
075d e243       | C  |		Load	0x1,0x43
075e 00db       |    |		Load_Top	At_Offset_3
075f 4973       |Is  |		Short_Literal	0x173
0760 00eb       |    |		Load_Encached	Diana_Cache
0761 0098       |    |		Execute	Package,Field_Read_Dynamic
0762 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
0763 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0764 4800       |H   |		Short_Literal	0x0
0765 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0766 0000 0000  |    |		.XXX[0x2]
0768 ; --------------------------------------------------------------------------------------
0768 ; SUBPROGRAM
0768 ; --------------------------------------------------------------------------------------
0768 076b       | k  |		.CONST	0x076b								; Address of begin
0769 0004       |    |		.CONST	0x0004								; Address of exception handler
076a 0001       |    |		.CONST	0x0001								; Number of locals
076b			BODY_0768:
076b			INIT_0768:
076b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x24 = .DEBUG	0x076b,0x0c94,0x0002,0x0000,0x0056,0xba95,0x0000,0x0bc8
													; Debug Table 0x24.0x0 = 0x76b,0x1
076c 0bfa       |    |		Execute_Immediate	Case_Compare,0xfa
076d 7008       |p   |		Jump_Nonzero	0x776
076e 0bfb       |    |		Execute_Immediate	Case_Compare,0xfb
076f 7008       |p   |		Jump_Nonzero	0x778
0770 0bfc       |    |		Execute_Immediate	Case_Compare,0xfc
0771 7008       |p   |		Jump_Nonzero	0x77a
0772 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x24.0x1 = 0x772,0x5
0773 e001       |    |		Load	0x0,0x1
0774 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
0775 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0776 e244       | D  |		Load	0x1,0x44							; Debug Table 0x24.0x2 = 0x776,0x2
0777 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0778 e245       | E  |		Load	0x1,0x45							; Debug Table 0x24.0x3 = 0x778,0x3
0779 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
077a e241       | A  |		Load	0x1,0x41							; Debug Table 0x24.0x4 = 0x77a,0x4
077b 00dc       |    |		Load_Top	At_Offset_4
077c 4973       |Is  |		Short_Literal	0x173
077d 00eb       |    |		Load_Encached	Diana_Cache
077e 0098       |    |		Execute	Package,Field_Read_Dynamic
077f 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0780 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0781 0000 0000  |    |		.BLANK	0000[0x7]
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 078b       |    |		.CONST	0x078b								; Address of begin
0789 0004       |    |		.CONST	0x0004								; Address of exception handler
078a 0001       |    |		.CONST	0x0001								; Number of locals
078b			BODY_0788:
078b			INIT_0788:
078b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25 = .DEBUG	0x078b,0x0ca0,0x0002,0x0000,0x0056,0xba95,0x0000,0x0bd7
													; Debug Table 0x25.0x0 = 0x78b,0x1
078c 0bfe       |    |		Execute_Immediate	Case_Compare,0xfe
078d 7004       |p   |		Jump_Nonzero	0x792
078e 0bfd       |    |		Execute_Immediate	Case_Compare,0xfd
078f 7005       |p   |		Jump_Nonzero	0x795
0790 48e0       |H   |		Short_Literal	0xe0							; Debug Table 0x25.0x1 = 0x790,0x4
0791 0257       | W  |		Execute	Discrete,Raise
0792 e001       |    |		Load	0x0,0x1								; Debug Table 0x25.0x2 = 0x792,0x2
0793 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
0794 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0795 e242       | B  |		Load	0x1,0x42							; Debug Table 0x25.0x3 = 0x795,0x3
0796 00dc       |    |		Load_Top	At_Offset_4
0797 4973       |Is  |		Short_Literal	0x173
0798 00eb       |    |		Load_Encached	Diana_Cache
0799 0098       |    |		Execute	Package,Field_Read_Dynamic
079a 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
079b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
079c 0000 0000  |    |		.BLANK	0000[0x4]
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a3       |    |		.CONST	0x07a3								; Address of begin
07a1 0004       |    |		.CONST	0x0004								; Address of exception handler
07a2 0001       |    |		.CONST	0x0001								; Number of locals
07a3			BODY_07a0:
07a3			INIT_07a0:
07a3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x26 = .DEBUG	0x07a3,0x0caa,0x0002,0x0000,0x0056,0xba95,0x0000,0x0be6
													; Debug Table 0x26.0x0 = 0x7a3,0x1
07a4 0bfa       |    |		Execute_Immediate	Case_Compare,0xfa
07a5 700a       |p   |		Jump_Nonzero	0x7b0
07a6 0bfb       |    |		Execute_Immediate	Case_Compare,0xfb
07a7 700c       |p   |		Jump_Nonzero	0x7b4
07a8 0bfc       |    |		Execute_Immediate	Case_Compare,0xfc
07a9 700e       |p   |		Jump_Nonzero	0x7b8
07aa 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x26.0x1 = 0x7aa,0x7
07ab e001       |    |		Load	0x0,0x1
07ac 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
07ad e001       |    |		Load	0x0,0x1
07ae 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
07af 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07b0 e244       | D  |		Load	0x1,0x44							; Debug Table 0x26.0x2 = 0x7b0,0x2
07b1 e001       |    |		Load	0x0,0x1
07b2 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
07b3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07b4 e245       | E  |		Load	0x1,0x45							; Debug Table 0x26.0x3 = 0x7b4,0x3
07b5 e001       |    |		Load	0x0,0x1
07b6 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
07b7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07b8 e241       | A  |		Load	0x1,0x41							; Debug Table 0x26.0x4 = 0x7b8,0x4
07b9 00dc       |    |		Load_Top	At_Offset_4
07ba 4973       |Is  |		Short_Literal	0x173
07bb 00eb       |    |		Load_Encached	Diana_Cache
07bc 0098       |    |		Execute	Package,Field_Read_Dynamic
07bd 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
07be 6809       |h   |		Jump_Zero	0x7c8
07bf e241       | A  |		Load	0x1,0x41							; Debug Table 0x26.0x5 = 0x7bf,0x5
07c0 00dc       |    |		Load_Top	At_Offset_4
07c1 4973       |Is  |		Short_Literal	0x173
07c2 00eb       |    |		Load_Encached	Diana_Cache
07c3 0098       |    |		Execute	Package,Field_Read_Dynamic
07c4 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
07c5 e001       |    |		Load	0x0,0x1
07c6 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
07c7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07c8 e243       | C  |		Load	0x1,0x43							; Debug Table 0x26.0x6 = 0x7c8,0x6
07c9 00dc       |    |		Load_Top	At_Offset_4
07ca 4973       |Is  |		Short_Literal	0x173
07cb 00eb       |    |		Load_Encached	Diana_Cache
07cc 0098       |    |		Execute	Package,Field_Read_Dynamic
07cd 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
07ce 824a       | J  |		Call	0x1,0x4a
07cf 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07d3       |    |		.CONST	0x07d3								; Address of begin
07d1 0004       |    |		.CONST	0x0004								; Address of exception handler
07d2 0001       |    |		.CONST	0x0001								; Number of locals
07d3			BODY_07d0:
07d3			INIT_07d0:
07d3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27 = .DEBUG	0x07d3,0x0cba,0x0001,0x0000,0x0056,0xba95,0x0000,0x0bf5
													; Debug Table 0x27.0x0 = 0x7d3,0x1
07d4 e001       |    |		Load	0x0,0x1
07d5 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
07d6 027f       |    |		Execute	Discrete,Equal
07d7 6803       |h   |		Jump_Zero	0x7db
07d8 48fa       |H   |		Short_Literal	0xfa							; Debug Table 0x27.0x1 = 0x7d8,0x2
07d9 0055       | U  |		Store_Top_Unchecked	Discrete,At_Offset_5
07da 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
07db 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0x2 = 0x7db,0x3
07dc e001       |    |		Load	0x0,0x1
07dd 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
07de 027f       |    |		Execute	Discrete,Equal
07df 6803       |h   |		Jump_Zero	0x7e3
07e0 48fb       |H   |		Short_Literal	0xfb							; Debug Table 0x27.0x3 = 0x7e0,0x4
07e1 0055       | U  |		Store_Top_Unchecked	Discrete,At_Offset_5
07e2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
07e3 4802       |H   |		Short_Literal	0x2							; Debug Table 0x27.0x4 = 0x7e3,0x5
07e4 e001       |    |		Load	0x0,0x1
07e5 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
07e6 00dc       |    |		Load_Top	At_Offset_4
07e7 e001       |    |		Load	0x0,0x1
07e8 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07e9 6807       |h   |		Jump_Zero	0x7f1
07ea 48fa       |H   |		Short_Literal	0xfa
07eb e001       |    |		Load	0x0,0x1
07ec 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
07ed 00dc       |    |		Load_Top	At_Offset_4
07ee e001       |    |		Load	0x0,0x1
07ef 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
07f0 7801       |x   |		Jump	0x7f2
07f1 4800       |H   |		Short_Literal	0x0
07f2 7006       |p   |		Jump_Nonzero	0x7f9
07f3 00db       |    |		Load_Top	At_Offset_3
07f4 48ff       |H   |		Short_Literal	0xff
07f5 e001       |    |		Load	0x0,0x1
07f6 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
07f7 027f       |    |		Execute	Discrete,Equal
07f8 6809       |h   |		Jump_Zero	0x802
07f9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0x5 = 0x7f9,0x6
07fa e001       |    |		Load	0x0,0x1
07fb 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
07fc 49b2       |I   |		Short_Literal	0x1b2
07fd 00eb       |    |		Load_Encached	Diana_Cache
07fe 0098       |    |		Execute	Package,Field_Read_Dynamic
07ff 025b       | [  |		Execute	Discrete,Check_In_Type
0800 0055       | U  |		Store_Top_Unchecked	Discrete,At_Offset_5
0801 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0802 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0x6 = 0x802,0x7
0803 e241       | A  |		Load	0x1,0x41
0804 00dc       |    |		Load_Top	At_Offset_4
0805 4973       |Is  |		Short_Literal	0x173
0806 00eb       |    |		Load_Encached	Diana_Cache
0807 0098       |    |		Execute	Package,Field_Read_Dynamic
0808 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0809 48fc       |H   |		Short_Literal	0xfc							; Debug Table 0x27.0x7 = 0x809,0x8
080a 0055       | U  |		Store_Top_Unchecked	Discrete,At_Offset_5
080b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
080c 0000 0000  |    |		.BLANK	0000[0x4]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 0813       |    |		.CONST	0x0813								; Address of begin
0811 0004       |    |		.CONST	0x0004								; Address of exception handler
0812 0001       |    |		.CONST	0x0001								; Number of locals
0813			BODY_0810:
0813			INIT_0810:
0813 e241       | A  |		Load	0x1,0x41							; Debug Table 0x28 = .DEBUG	0x0813,0x0ccc,0x0001,0x0000,0x0056,0xba95,0x0000,0x0c07
													; Debug Table 0x28.0x0 = 0x813,0x1
0814 00db       |    |		Load_Top	At_Offset_3
0815 4973       |Is  |		Short_Literal	0x173
0816 00eb       |    |		Load_Encached	Diana_Cache
0817 0098       |    |		Execute	Package,Field_Read_Dynamic
0818 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0819 0092 08aa  |    |		Action	Push_String_Extended,0x8aa					; "1"
													; Debug Table 0x28.0x1 = 0x819,0x2
081b 4820       |H   |		Short_Literal	0x20
081c 00dd       |    |		Load_Top	At_Offset_5
081d e001       |    |		Load	0x0,0x1
081e 1881       |    |		Execute	Package,Field_Execute,Field_Number 0x81
081f e002       |    |		Load	0x0,0x2
0820 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0821 e001       |    |		Load	0x0,0x1
0822 1861       | a  |		Execute	Package,Field_Execute,Field_Number 0x61
0823 e243       | C  |		Load	0x1,0x43
0824 00dc       |    |		Load_Top	At_Offset_4
0825 4973       |Is  |		Short_Literal	0x173
0826 00eb       |    |		Load_Encached	Diana_Cache
0827 0098       |    |		Execute	Package,Field_Read_Dynamic
0828 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
0829 48fc       |H   |		Short_Literal	0xfc							; Debug Table 0x28.0x2 = 0x829,0x3
082a 0055       | U  |		Store_Top_Unchecked	Discrete,At_Offset_5
082b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
082c 0000 0000  |    |		.BLANK	0000[0x4]
0830 ; --------------------------------------------------------------------------------------
0830 ; SUBPROGRAM
0830 ; --------------------------------------------------------------------------------------
0830 0833       | 3  |		.CONST	0x0833								; Address of begin
0831 0004       |    |		.CONST	0x0004								; Address of exception handler
0832 0001       |    |		.CONST	0x0001								; Number of locals
0833			BODY_0830:
0833			INIT_0830:
0833 e001       |    |		Load	0x0,0x1								; Debug Table 0x29 = .DEBUG	0x0833,0x0cd4,0x0001,0x0000,0x0056,0xba95,0x0000,0x0c19
													; Debug Table 0x29.0x0 = 0x833,0x1
0834 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
0835 00dc       |    |		Load_Top	At_Offset_4
0836 e001       |    |		Load	0x0,0x1
0837 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
0838 6803       |h   |		Jump_Zero	0x83c
0839 48fe       |H   |		Short_Literal	0xfe							; Debug Table 0x29.0x1 = 0x839,0x2
083a 0055       | U  |		Store_Top_Unchecked	Discrete,At_Offset_5
083b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
083c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x29.0x2 = 0x83c,0x3
083d e242       | B  |		Load	0x1,0x42
083e 00dc       |    |		Load_Top	At_Offset_4
083f 4973       |Is  |		Short_Literal	0x173
0840 00eb       |    |		Load_Encached	Diana_Cache
0841 0098       |    |		Execute	Package,Field_Read_Dynamic
0842 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
0843 48fd       |H   |		Short_Literal	0xfd							; Debug Table 0x29.0x3 = 0x843,0x4
0844 0055       | U  |		Store_Top_Unchecked	Discrete,At_Offset_5
0845 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0846 0000 0000  |    |		.XXX[0x2]
0848 ; --------------------------------------------------------------------------------------
0848 ; SUBPROGRAM
0848 ; --------------------------------------------------------------------------------------
0848 084b       | K  |		.CONST	0x084b								; Address of begin
0849 0004       |    |		.CONST	0x0004								; Address of exception handler
084a 0001       |    |		.CONST	0x0001								; Number of locals
084b			BODY_0848:
084b			INIT_0848:
084b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2a = .DEBUG	0x084b,0x0cde,0x0002,0x0000,0x0056,0xba95,0x0000,0x0c2b
													; Debug Table 0x2a.0x0 = 0x84b,0x1
084c e003       |    |		Load	0x0,0x3
084d 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
084e 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
084f 00db       |    |		Load_Top	At_Offset_3
0850 e004       |    |		Load	0x0,0x4
0851 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0852 e004       |    |		Load	0x0,0x4
0853 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0854 e001       |    |		Load	0x0,0x1
0855 1886       |    |		Execute	Package,Field_Execute,Field_Number 0x86
0856 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0857 0000       |    |		.XXX[0x1]
0858 ; --------------------------------------------------------------------------------------
0858 ; SUBPROGRAM
0858 ; --------------------------------------------------------------------------------------
0858 085b       | [  |		.CONST	0x085b								; Address of begin
0859 0004       |    |		.CONST	0x0004								; Address of exception handler
085a 0001       |    |		.CONST	0x0001								; Number of locals
085b			BODY_0858:
085b			INIT_0858:
085b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2b = .DEBUG	0x085b,0x0ce2,0x0002,0x0000,0x0056,0xba95,0x0000,0x0c3c
													; Debug Table 0x2b.0x0 = 0x85b,0x1
085c e003       |    |		Load	0x0,0x3
085d 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
085e 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
085f 00db       |    |		Load_Top	At_Offset_3
0860 e001       |    |		Load	0x0,0x1
0861 1885       |    |		Execute	Package,Field_Execute,Field_Number 0x85
0862 e004       |    |		Load	0x0,0x4
0863 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0864 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0865 0000 0000  |    |		.XXX[0x3]
0867 0000       |    |
0868 ; --------------------------------------------------------------------------------------
0868 ; SUBPROGRAM
0868 ; --------------------------------------------------------------------------------------
0868 086b       | k  |		.CONST	0x086b								; Address of begin
0869 0004       |    |		.CONST	0x0004								; Address of exception handler
086a 0001       |    |		.CONST	0x0001								; Number of locals
086b			BODY_0868:
086b			INIT_0868:
086b 4820       |H   |		Short_Literal	0x20							; Debug Table 0x2c = .DEBUG	0x086b,0x0ce6,0x0002,0x0000,0x0056,0xbb95,0x0000,0x0226
													; Debug Table 0x2c.0x0 = 0x86b,0x1
086c 00db       |    |		Load_Top	At_Offset_3
086d e001       |    |		Load	0x0,0x1
086e 1869       | i  |		Execute	Package,Field_Execute,Field_Number 0x69
086f e002       |    |		Load	0x0,0x2
0870 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0871 e001       |    |		Load	0x0,0x1
0872 1882       |    |		Execute	Package,Field_Execute,Field_Number 0x82
0873 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0874 0000 0000  |    |		.BLANK	0000[0x4]
0878 ; --------------------------------------------------------------------------------------
0878 ; SUBPROGRAM
0878 ; --------------------------------------------------------------------------------------
0878 087b       | {  |		.CONST	0x087b								; Address of begin
0879 0004       |    |		.CONST	0x0004								; Address of exception handler
087a 0001       |    |		.CONST	0x0001								; Number of locals
087b			BODY_0878:
087b			INIT_0878:
087b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2d = .DEBUG	0x087b,0x0cea,0x0001,0x0000,0x0056,0xbb95,0x0000,0x07ed
													; Debug Table 0x2d.0x0 = 0x87b,0x1
087c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
087d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
087e 4603       |F   |		Jump_Case	0x4
087f 7809       |x   |		Jump	0x889								; case 0x0
0880 7812       |x   |		Jump	0x893								; case 0x1
0881 7804       |x   |		Jump	0x886								; case 0x2
0882 7800       |x   |		Jump	0x883								; case 0x3
0883 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2d.0x1 = 0x883,0x2
0884 0055       | U  |		Store_Top_Unchecked	Discrete,At_Offset_5
0885 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0886 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2d.0x2 = 0x886,0x3
0887 0055       | U  |		Store_Top_Unchecked	Discrete,At_Offset_5
0888 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0889 49b2       |I   |		Short_Literal	0x1b2							; Debug Table 0x2d.0x3 = 0x889,0x4
088a 00eb       |    |		Load_Encached	Diana_Cache
088b 0098       |    |		Execute	Package,Field_Read_Dynamic
088c 00dc       |    |		Load_Top	At_Offset_4
088d 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
088e 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
088f 00dc       |    |		Load_Top	At_Offset_4
0890 8232       | 2  |		Call	0x1,0x32
0891 005d       | ]  |		Store_Top	Discrete,At_Offset_5
0892 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0893 49b2       |I   |		Short_Literal	0x1b2							; Debug Table 0x2d.0x4 = 0x893,0x5
0894 00eb       |    |		Load_Encached	Diana_Cache
0895 0098       |    |		Execute	Package,Field_Read_Dynamic
0896 00dc       |    |		Load_Top	At_Offset_4
0897 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0898 2603       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
0899 00dc       |    |		Load_Top	At_Offset_4
089a 8234       | 4  |		Call	0x1,0x34
089b 005d       | ]  |		Store_Top	Discrete,At_Offset_5
089c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
089d ; --------------------------------------------------------------------------------------
089d ; STRING TABLE
089d ; --------------------------------------------------------------------------------------
089d 001e       |    |		.STRTAB	0x001e->0x08ac							; "SM_SIZE"
089e 0023       | #  |		.STRTAB	0x0023->0x08af							; "SM_STORAGE_SIZE"
089f 0030       | 0  |		.STRTAB	0x0030->0x08b7							; "SM_CONTROLLED"
08a0 003b       | ;  |		.STRTAB	0x003b->0x08bd							; "SM_PACKING"
08a1 0043       | C  |		.STRTAB	0x0043->0x08c2							; "SM_ACTUAL_DELTA"
08a2 0050       | P  |		.STRTAB	0x0050->0x08ca							; "NEW_SM_ACTUAL_DELTA"
08a3 0061       | a  |		.STRTAB	0x0061->0x08d3							; "SM_LOCATION"
08a4 006a       | j  |		.STRTAB	0x006a->0x08d9							; "SM_ADDRESS"
08a5 0072       | r  |		.STRTAB	0x0072->0x08de							; "SM_COMP_SPEC"
08a6 007c       | |  |		.STRTAB	0x007c->0x08e4							; "SM_RECORD_SPEC"
08a7 0088       |    |		.STRTAB	0x0088->0x08eb							; "SM_INT_VALUE"
08a8 0092       |    |		.STRTAB	0x0092->0x08f1							; "SM_REAL_VALUE"
08a9 009d       |    |		.STRTAB	0x009d->0x08f7							; "SM_BIG_INT_VALUE"
08aa 00ab       |    |		.STRTAB	0x00ab->0x08ff							; "1"
08ab 00aa       |    |		.STREND 0x00aa->0x0900
08ac 534d 5f53  |SM_S|		.STRTAB_STRINGS
0900 ; --------------------------------------------------------------------------------------
0900 ; Debug Table
0900 ; --------------------------------------------------------------------------------------
0900 0003 002e  |   .|		.CONST	0x0003,0x002e
0902 000b 0a72  |   r|		.DEBUG	0x000b,0x0a72,0x0000,0x0000,0x0056,0xba95,0x0000,0x0a5c
090a 0060 0ac8  | `  |		.DEBUG	0x0060,0x0ac8,0x0000,0x0000,0x0056,0xbb95,0x0000,0x000a
0912 016b 0b4c  | k L|		.DEBUG	0x016b,0x0b4c,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a5d
091a 017b 0b50  | { P|		.DEBUG	0x017b,0x0b50,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a66
0922 018b 0b54  |   T|		.DEBUG	0x018b,0x0b54,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a6f
092a 01ab 0b60  |   `|		.DEBUG	0x01ab,0x0b60,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a7a
0932 01bb 0b64  |   d|		.DEBUG	0x01bb,0x0b64,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a83
093a 01cb 0b68  |   h|		.DEBUG	0x01cb,0x0b68,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a8c
0942 01db 0b6c  |   l|		.DEBUG	0x01db,0x0b6c,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a95
094a 01eb 0b70  |   p|		.DEBUG	0x01eb,0x0b70,0x0002,0x0000,0x0056,0xba95,0x0000,0x0a9e
0952 01fb 0b74  |   t|		.DEBUG	0x01fb,0x0b74,0x0002,0x0000,0x0056,0xba95,0x0000,0x0aa7
095a 020b 0b78  |   x|		.DEBUG	0x020b,0x0b78,0x0002,0x0000,0x0056,0xba95,0x0000,0x0ab0
0962 025b 0b8e  | [  |		.DEBUG	0x025b,0x0b8e,0x0002,0x0000,0x0056,0xba95,0x0000,0x0ab9
096a 0303 0bb2  |    |		.DEBUG	0x0303,0x0bb2,0x0002,0x0000,0x0056,0xba95,0x0000,0x0ac2
0972 0353 0bc6  | S  |		.DEBUG	0x0353,0x0bc6,0x0002,0x0000,0x0056,0xba95,0x0000,0x0acb
097a 03a3 0bd8  |    |		.DEBUG	0x03a3,0x0bd8,0x0002,0x0000,0x0056,0xba95,0x0000,0x0ad4
0982 03ab 0bdc  |    |		.DEBUG	0x03ab,0x0bdc,0x0002,0x0000,0x0056,0xba95,0x0000,0x0add
098a 03b3 0be0  |    |		.DEBUG	0x03b3,0x0be0,0x0001,0x0000,0x0056,0xba95,0x0000,0x0ae6
0992 03c3 0be4  |    |		.DEBUG	0x03c3,0x0be4,0x0001,0x0000,0x0056,0xba95,0x0000,0x0af2
099a 03d3 0be8  |    |		.DEBUG	0x03d3,0x0be8,0x0001,0x0000,0x0056,0xba95,0x0000,0x0afe
09a2 03e3 0bec  |    |		.DEBUG	0x03e3,0x0bec,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b0c
09aa 03f3 0bf0  |    |		.DEBUG	0x03f3,0x0bf0,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b18
09b2 0403 0bf4  |    |		.DEBUG	0x0403,0x0bf4,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b24
09ba 0413 0bf8  |    |		.DEBUG	0x0413,0x0bf8,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b30
09c2 0423 0bfc  | #  |		.DEBUG	0x0423,0x0bfc,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b3c
09ca 0433 0c00  | 3  |		.DEBUG	0x0433,0x0c00,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b48
09d2 0443 0c04  | C  |		.DEBUG	0x0443,0x0c04,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b54
09da 04e3 0c1a  |    |		.DEBUG	0x04e3,0x0c1a,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b60
09e2 05db 0c3e  |   >|		.DEBUG	0x05db,0x0c3e,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b6c
09ea 064b 0c52  | K R|		.DEBUG	0x064b,0x0c52,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b78
09f2 06c3 0c64  |   d|		.DEBUG	0x06c3,0x0c64,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b84
09fa 06cb 0c68  |   h|		.DEBUG	0x06cb,0x0c68,0x0001,0x0000,0x0056,0xba95,0x0000,0x0b90
0a02 06d3 0c6c  |   l|		.DEBUG	0x06d3,0x0c6c,0x0002,0x0000,0x0056,0xba95,0x0000,0x0b9c
0a0a 0733 0c80  | 3  |		.DEBUG	0x0733,0x0c80,0x0002,0x0000,0x0056,0xba95,0x0000,0x0ba9
0a12 0743 0c88  | C  |		.DEBUG	0x0743,0x0c88,0x0002,0x0000,0x0056,0xba95,0x0000,0x0bb2
0a1a 0753 0c90  | S  |		.DEBUG	0x0753,0x0c90,0x0002,0x0000,0x0056,0xba95,0x0000,0x0bbb
0a22 076b 0c94  | k  |		.DEBUG	0x076b,0x0c94,0x0002,0x0000,0x0056,0xba95,0x0000,0x0bc8
0a2a 078b 0ca0  |    |		.DEBUG	0x078b,0x0ca0,0x0002,0x0000,0x0056,0xba95,0x0000,0x0bd7
0a32 07a3 0caa  |    |		.DEBUG	0x07a3,0x0caa,0x0002,0x0000,0x0056,0xba95,0x0000,0x0be6
0a3a 07d3 0cba  |    |		.DEBUG	0x07d3,0x0cba,0x0001,0x0000,0x0056,0xba95,0x0000,0x0bf5
0a42 0813 0ccc  |    |		.DEBUG	0x0813,0x0ccc,0x0001,0x0000,0x0056,0xba95,0x0000,0x0c07
0a4a 0833 0cd4  | 3  |		.DEBUG	0x0833,0x0cd4,0x0001,0x0000,0x0056,0xba95,0x0000,0x0c19
0a52 084b 0cde  | K  |		.DEBUG	0x084b,0x0cde,0x0002,0x0000,0x0056,0xba95,0x0000,0x0c2b
0a5a 085b 0ce2  | [  |		.DEBUG	0x085b,0x0ce2,0x0002,0x0000,0x0056,0xba95,0x0000,0x0c3c
0a62 086b 0ce6  | k  |		.DEBUG	0x086b,0x0ce6,0x0002,0x0000,0x0056,0xbb95,0x0000,0x0226
0a6a 087b 0cea  | {  |		.DEBUG	0x087b,0x0cea,0x0001,0x0000,0x0056,0xbb95,0x0000,0x07ed
0a72 ; --------------------------------------------------------------------------------------
0a72 ; Debug3 Subtable 0x0
0a72 ; --------------------------------------------------------------------------------------
0a72 002a 0000  | *  |		.DBG3TAB	0x002a,0x0000
0a74 000b ffff  |    |		.CONST	0x000b,0xffff
0a76 000d fffe  |    |		.CONST	0x000d,0xfffe
0a78 000f fffd  |    |		.CONST	0x000f,0xfffd
0a7a 0011 fffc  |    |		.CONST	0x0011,0xfffc
0a7c 0013 fffb  |    |		.CONST	0x0013,0xfffb
0a7e 0015 fffa  |    |		.CONST	0x0015,0xfffa
0a80 0017 fff9  |    |		.CONST	0x0017,0xfff9
0a82 0019 fff8  |    |		.CONST	0x0019,0xfff8
0a84 001b fff7  |    |		.CONST	0x001b,0xfff7
0a86 001d fff6  |    |		.CONST	0x001d,0xfff6
0a88 001f fff5  |    |		.CONST	0x001f,0xfff5
0a8a 0021 fff4  | !  |		.CONST	0x0021,0xfff4
0a8c 0023 fff3  | #  |		.CONST	0x0023,0xfff3
0a8e 0025 fff2  | %  |		.CONST	0x0025,0xfff2
0a90 0027 fff1  | '  |		.CONST	0x0027,0xfff1
0a92 0029 fff0  | )  |		.CONST	0x0029,0xfff0
0a94 002b ffef  | +  |		.CONST	0x002b,0xffef
0a96 002d ffee  | -  |		.CONST	0x002d,0xffee
0a98 002f ffed  | /  |		.CONST	0x002f,0xffed
0a9a 0031 ffec  | 1  |		.CONST	0x0031,0xffec
0a9c 0033 ffeb  | 3  |		.CONST	0x0033,0xffeb
0a9e 0035 ffea  | 5  |		.CONST	0x0035,0xffea
0aa0 0037 ffe9  | 7  |		.CONST	0x0037,0xffe9
0aa2 0039 ffe8  | 9  |		.CONST	0x0039,0xffe8
0aa4 003b ffe7  | ;  |		.CONST	0x003b,0xffe7
0aa6 003d ffe6  | =  |		.CONST	0x003d,0xffe6
0aa8 003f ffe5  | ?  |		.CONST	0x003f,0xffe5
0aaa 0041 ffe4  | A  |		.CONST	0x0041,0xffe4
0aac 0043 ffe3  | C  |		.CONST	0x0043,0xffe3
0aae 0045 ffe2  | E  |		.CONST	0x0045,0xffe2
0ab0 0047 ffe1  | G  |		.CONST	0x0047,0xffe1
0ab2 0049 ffe0  | I  |		.CONST	0x0049,0xffe0
0ab4 004b ffdf  | K  |		.CONST	0x004b,0xffdf
0ab6 004d ffde  | M  |		.CONST	0x004d,0xffde
0ab8 004f ffdd  | O  |		.CONST	0x004f,0xffdd
0aba 0051 ffdc  | Q  |		.CONST	0x0051,0xffdc
0abc 0053 ffdb  | S  |		.CONST	0x0053,0xffdb
0abe 0055 ffda  | U  |		.CONST	0x0055,0xffda
0ac0 0057 ffd9  | W  |		.CONST	0x0057,0xffd9
0ac2 0059 ffd8  | Y  |		.CONST	0x0059,0xffd8
0ac4 005b ffd7  | [  |		.CONST	0x005b,0xffd7
0ac6 005d ffd6  | ]  |		.CONST	0x005d,0xffd6
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; Debug3 Subtable 0x1
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0041 0000  | A  |		.DBG3TAB	0x0041,0x0000
0aca 0060 ffff  | `  |		.CONST	0x0060,0xffff
0acc 0060 fffe  | `  |		.CONST	0x0060,0xfffe
0ace 0060 fffd  | `  |		.CONST	0x0060,0xfffd
0ad0 0069 fffc  | i  |		.CONST	0x0069,0xfffc
0ad2 0072 fffb  | r  |		.CONST	0x0072,0xfffb
0ad4 007b fffa  | {  |		.CONST	0x007b,0xfffa
0ad6 0084 fff9  |    |		.CONST	0x0084,0xfff9
0ad8 008d fff8  |    |		.CONST	0x008d,0xfff8
0ada 0096 fff7  |    |		.CONST	0x0096,0xfff7
0adc 009f fff6  |    |		.CONST	0x009f,0xfff6
0ade 00a8 fff5  |    |		.CONST	0x00a8,0xfff5
0ae0 00b1 fff4  |    |		.CONST	0x00b1,0xfff4
0ae2 00ba fff3  |    |		.CONST	0x00ba,0xfff3
0ae4 00c3 fff2  |    |		.CONST	0x00c3,0xfff2
0ae6 00cc fff1  |    |		.CONST	0x00cc,0xfff1
0ae8 00d5 fff0  |    |		.CONST	0x00d5,0xfff0
0aea 00da ffef  |    |		.CONST	0x00da,0xffef
0aec 00df ffee  |    |		.CONST	0x00df,0xffee
0aee 00e9 ffed  |    |		.CONST	0x00e9,0xffed
0af0 00f3 ffec  |    |		.CONST	0x00f3,0xffec
0af2 0100 ffeb  |    |		.CONST	0x0100,0xffeb
0af4 010d ffea  |    |		.CONST	0x010d,0xffea
0af6 010f ffe9  |    |		.CONST	0x010f,0xffe9
0af8 0111 ffe8  |    |		.CONST	0x0111,0xffe8
0afa 0113 ffe7  |    |		.CONST	0x0113,0xffe7
0afc 0115 ffe6  |    |		.CONST	0x0115,0xffe6
0afe 0117 ffe5  |    |		.CONST	0x0117,0xffe5
0b00 0119 ffe4  |    |		.CONST	0x0119,0xffe4
0b02 011b ffe3  |    |		.CONST	0x011b,0xffe3
0b04 011d ffe2  |    |		.CONST	0x011d,0xffe2
0b06 011f ffe1  |    |		.CONST	0x011f,0xffe1
0b08 0121 ffe0  | !  |		.CONST	0x0121,0xffe0
0b0a 0123 ffdf  | #  |		.CONST	0x0123,0xffdf
0b0c 0125 ffde  | %  |		.CONST	0x0125,0xffde
0b0e 0127 ffdd  | '  |		.CONST	0x0127,0xffdd
0b10 0129 ffdc  | )  |		.CONST	0x0129,0xffdc
0b12 012b ffdb  | +  |		.CONST	0x012b,0xffdb
0b14 012d ffda  | -  |		.CONST	0x012d,0xffda
0b16 012f ffd9  | /  |		.CONST	0x012f,0xffd9
0b18 0131 ffd8  | 1  |		.CONST	0x0131,0xffd8
0b1a 0133 ffd7  | 3  |		.CONST	0x0133,0xffd7
0b1c 0135 ffd6  | 5  |		.CONST	0x0135,0xffd6
0b1e 0137 ffd5  | 7  |		.CONST	0x0137,0xffd5
0b20 0139 ffd4  | 9  |		.CONST	0x0139,0xffd4
0b22 013b ffd3  | ;  |		.CONST	0x013b,0xffd3
0b24 013d ffd2  | =  |		.CONST	0x013d,0xffd2
0b26 013f ffd1  | ?  |		.CONST	0x013f,0xffd1
0b28 0141 ffd0  | A  |		.CONST	0x0141,0xffd0
0b2a 0143 ffcf  | C  |		.CONST	0x0143,0xffcf
0b2c 0145 ffce  | E  |		.CONST	0x0145,0xffce
0b2e 0147 ffcd  | G  |		.CONST	0x0147,0xffcd
0b30 0149 ffcc  | I  |		.CONST	0x0149,0xffcc
0b32 014b ffcb  | K  |		.CONST	0x014b,0xffcb
0b34 014d ffca  | M  |		.CONST	0x014d,0xffca
0b36 014f ffc9  | O  |		.CONST	0x014f,0xffc9
0b38 0151 ffc8  | Q  |		.CONST	0x0151,0xffc8
0b3a 0153 ffc7  | S  |		.CONST	0x0153,0xffc7
0b3c 0155 ffc6  | U  |		.CONST	0x0155,0xffc6
0b3e 0157 ffc5  | W  |		.CONST	0x0157,0xffc5
0b40 0159 ffc4  | Y  |		.CONST	0x0159,0xffc4
0b42 015b ffc3  | [  |		.CONST	0x015b,0xffc3
0b44 015d ffc2  | ]  |		.CONST	0x015d,0xffc2
0b46 015f ffc1  | _  |		.CONST	0x015f,0xffc1
0b48 0161 ffc0  | a  |		.CONST	0x0161,0xffc0
0b4a 0163 ffbf  | c  |		.CONST	0x0163,0xffbf
0b4c ; --------------------------------------------------------------------------------------
0b4c ; Debug3 Subtable 0x2
0b4c ; --------------------------------------------------------------------------------------
0b4c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0b4e 016b 0001  | k  |		.CONST	0x016b,0x0001
0b50 ; --------------------------------------------------------------------------------------
0b50 ; Debug3 Subtable 0x3
0b50 ; --------------------------------------------------------------------------------------
0b50 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0b52 017b 0001  | {  |		.CONST	0x017b,0x0001
0b54 ; --------------------------------------------------------------------------------------
0b54 ; Debug3 Subtable 0x4
0b54 ; --------------------------------------------------------------------------------------
0b54 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0b56 018b ffff  |    |		.CONST	0x018b,0xffff
0b58 018c 0001  |    |		.CONST	0x018c,0x0001
0b5a 0193 0002  |    |		.CONST	0x0193,0x0002
0b5c 019a 0003  |    |		.CONST	0x019a,0x0003
0b5e 01a0 0004  |    |		.CONST	0x01a0,0x0004
0b60 ; --------------------------------------------------------------------------------------
0b60 ; Debug3 Subtable 0x5
0b60 ; --------------------------------------------------------------------------------------
0b60 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0b62 01ab 0001  |    |		.CONST	0x01ab,0x0001
0b64 ; --------------------------------------------------------------------------------------
0b64 ; Debug3 Subtable 0x6
0b64 ; --------------------------------------------------------------------------------------
0b64 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0b66 01bb 0001  |    |		.CONST	0x01bb,0x0001
0b68 ; --------------------------------------------------------------------------------------
0b68 ; Debug3 Subtable 0x7
0b68 ; --------------------------------------------------------------------------------------
0b68 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0b6a 01cb 0001  |    |		.CONST	0x01cb,0x0001
0b6c ; --------------------------------------------------------------------------------------
0b6c ; Debug3 Subtable 0x8
0b6c ; --------------------------------------------------------------------------------------
0b6c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0b6e 01db 0001  |    |		.CONST	0x01db,0x0001
0b70 ; --------------------------------------------------------------------------------------
0b70 ; Debug3 Subtable 0x9
0b70 ; --------------------------------------------------------------------------------------
0b70 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0b72 01eb 0001  |    |		.CONST	0x01eb,0x0001
0b74 ; --------------------------------------------------------------------------------------
0b74 ; Debug3 Subtable 0xa
0b74 ; --------------------------------------------------------------------------------------
0b74 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0b76 01fb 0001  |    |		.CONST	0x01fb,0x0001
0b78 ; --------------------------------------------------------------------------------------
0b78 ; Debug3 Subtable 0xb
0b78 ; --------------------------------------------------------------------------------------
0b78 0000 000a  |    |		.DBG3TAB	0x0000,0x000a
0b7a 020b 0001  |    |		.CONST	0x020b,0x0001
0b7c 0220 000a  |    |		.CONST	0x0220,0x000a
0b7e 0226 0002  | &  |		.CONST	0x0226,0x0002
0b80 022c 0003  | ,  |		.CONST	0x022c,0x0003
0b82 0232 0004  | 2  |		.CONST	0x0232,0x0004
0b84 0238 0005  | 8  |		.CONST	0x0238,0x0005
0b86 023e 0006  | >  |		.CONST	0x023e,0x0006
0b88 0244 0007  | D  |		.CONST	0x0244,0x0007
0b8a 024a 0008  | J  |		.CONST	0x024a,0x0008
0b8c 0250 0009  | P  |		.CONST	0x0250,0x0009
0b8e ; --------------------------------------------------------------------------------------
0b8e ; Debug3 Subtable 0xc
0b8e ; --------------------------------------------------------------------------------------
0b8e 0000 0011  |    |		.DBG3TAB	0x0000,0x0011
0b90 025b 0001  | [  |		.CONST	0x025b,0x0001
0b92 027e 0011  | ~  |		.CONST	0x027e,0x0011
0b94 0286 0002  |    |		.CONST	0x0286,0x0002
0b96 028e 0003  |    |		.CONST	0x028e,0x0003
0b98 0296 0004  |    |		.CONST	0x0296,0x0004
0b9a 029e 0005  |    |		.CONST	0x029e,0x0005
0b9c 02a6 0006  |    |		.CONST	0x02a6,0x0006
0b9e 02ae 0007  |    |		.CONST	0x02ae,0x0007
0ba0 02b6 0008  |    |		.CONST	0x02b6,0x0008
0ba2 02be 0009  |    |		.CONST	0x02be,0x0009
0ba4 02c6 000a  |    |		.CONST	0x02c6,0x000a
0ba6 02ce 000b  |    |		.CONST	0x02ce,0x000b
0ba8 02d6 000c  |    |		.CONST	0x02d6,0x000c
0baa 02de 000d  |    |		.CONST	0x02de,0x000d
0bac 02e6 000e  |    |		.CONST	0x02e6,0x000e
0bae 02ee 000f  |    |		.CONST	0x02ee,0x000f
0bb0 02f6 0010  |    |		.CONST	0x02f6,0x0010
0bb2 ; --------------------------------------------------------------------------------------
0bb2 ; Debug3 Subtable 0xd
0bb2 ; --------------------------------------------------------------------------------------
0bb2 0000 0009  |    |		.DBG3TAB	0x0000,0x0009
0bb4 0303 0001  |    |		.CONST	0x0303,0x0001
0bb6 031a 0009  |    |		.CONST	0x031a,0x0009
0bb8 031e 0002  |    |		.CONST	0x031e,0x0002
0bba 0326 0003  | &  |		.CONST	0x0326,0x0003
0bbc 032e 0004  | .  |		.CONST	0x032e,0x0004
0bbe 0332 0005  | 2  |		.CONST	0x0332,0x0005
0bc0 0336 0006  | 6  |		.CONST	0x0336,0x0006
0bc2 033e 0007  | >  |		.CONST	0x033e,0x0007
0bc4 0346 0008  | F  |		.CONST	0x0346,0x0008
0bc6 ; --------------------------------------------------------------------------------------
0bc6 ; Debug3 Subtable 0xe
0bc6 ; --------------------------------------------------------------------------------------
0bc6 0000 0008  |    |		.DBG3TAB	0x0000,0x0008
0bc8 0353 0001  | S  |		.CONST	0x0353,0x0001
0bca 0364 0008  | d  |		.CONST	0x0364,0x0008
0bcc 036c 0002  | l  |		.CONST	0x036c,0x0002
0bce 0374 0003  | t  |		.CONST	0x0374,0x0003
0bd0 037c 0004  | |  |		.CONST	0x037c,0x0004
0bd2 0384 0005  |    |		.CONST	0x0384,0x0005
0bd4 038c 0006  |    |		.CONST	0x038c,0x0006
0bd6 0394 0007  |    |		.CONST	0x0394,0x0007
0bd8 ; --------------------------------------------------------------------------------------
0bd8 ; Debug3 Subtable 0xf
0bd8 ; --------------------------------------------------------------------------------------
0bd8 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0bda 03a3 0001  |    |		.CONST	0x03a3,0x0001
0bdc ; --------------------------------------------------------------------------------------
0bdc ; Debug3 Subtable 0x10
0bdc ; --------------------------------------------------------------------------------------
0bdc 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0bde 03ab 0001  |    |		.CONST	0x03ab,0x0001
0be0 ; --------------------------------------------------------------------------------------
0be0 ; Debug3 Subtable 0x11
0be0 ; --------------------------------------------------------------------------------------
0be0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0be2 03b3 0001  |    |		.CONST	0x03b3,0x0001
0be4 ; --------------------------------------------------------------------------------------
0be4 ; Debug3 Subtable 0x12
0be4 ; --------------------------------------------------------------------------------------
0be4 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0be6 03c3 0001  |    |		.CONST	0x03c3,0x0001
0be8 ; --------------------------------------------------------------------------------------
0be8 ; Debug3 Subtable 0x13
0be8 ; --------------------------------------------------------------------------------------
0be8 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0bea 03d3 0001  |    |		.CONST	0x03d3,0x0001
0bec ; --------------------------------------------------------------------------------------
0bec ; Debug3 Subtable 0x14
0bec ; --------------------------------------------------------------------------------------
0bec 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0bee 03e3 0001  |    |		.CONST	0x03e3,0x0001
0bf0 ; --------------------------------------------------------------------------------------
0bf0 ; Debug3 Subtable 0x15
0bf0 ; --------------------------------------------------------------------------------------
0bf0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0bf2 03f3 0001  |    |		.CONST	0x03f3,0x0001
0bf4 ; --------------------------------------------------------------------------------------
0bf4 ; Debug3 Subtable 0x16
0bf4 ; --------------------------------------------------------------------------------------
0bf4 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0bf6 0403 0001  |    |		.CONST	0x0403,0x0001
0bf8 ; --------------------------------------------------------------------------------------
0bf8 ; Debug3 Subtable 0x17
0bf8 ; --------------------------------------------------------------------------------------
0bf8 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0bfa 0413 0001  |    |		.CONST	0x0413,0x0001
0bfc ; --------------------------------------------------------------------------------------
0bfc ; Debug3 Subtable 0x18
0bfc ; --------------------------------------------------------------------------------------
0bfc 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0bfe 0423 0001  | #  |		.CONST	0x0423,0x0001
0c00 ; --------------------------------------------------------------------------------------
0c00 ; Debug3 Subtable 0x19
0c00 ; --------------------------------------------------------------------------------------
0c00 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0c02 0433 0001  | 3  |		.CONST	0x0433,0x0001
0c04 ; --------------------------------------------------------------------------------------
0c04 ; Debug3 Subtable 0x1a
0c04 ; --------------------------------------------------------------------------------------
0c04 0000 000a  |    |		.DBG3TAB	0x0000,0x000a
0c06 0443 0001  | C  |		.CONST	0x0443,0x0001
0c08 0458 000a  | X  |		.CONST	0x0458,0x000a
0c0a 0467 0002  | g  |		.CONST	0x0467,0x0002
0c0c 0476 0003  | v  |		.CONST	0x0476,0x0003
0c0e 0485 0004  |    |		.CONST	0x0485,0x0004
0c10 0494 0005  |    |		.CONST	0x0494,0x0005
0c12 04a3 0006  |    |		.CONST	0x04a3,0x0006
0c14 04b2 0007  |    |		.CONST	0x04b2,0x0007
0c16 04c1 0008  |    |		.CONST	0x04c1,0x0008
0c18 04d0 0009  |    |		.CONST	0x04d0,0x0009
0c1a ; --------------------------------------------------------------------------------------
0c1a ; Debug3 Subtable 0x1b
0c1a ; --------------------------------------------------------------------------------------
0c1a 0000 0011  |    |		.DBG3TAB	0x0000,0x0011
0c1c 04e3 0001  |    |		.CONST	0x04e3,0x0001
0c1e 0506 0011  |    |		.CONST	0x0506,0x0011
0c20 0513 0002  |    |		.CONST	0x0513,0x0002
0c22 0520 0003  |    |		.CONST	0x0520,0x0003
0c24 052d 0004  | -  |		.CONST	0x052d,0x0004
0c26 053a 0005  | :  |		.CONST	0x053a,0x0005
0c28 0547 0006  | G  |		.CONST	0x0547,0x0006
0c2a 0554 0007  | T  |		.CONST	0x0554,0x0007
0c2c 0561 0008  | a  |		.CONST	0x0561,0x0008
0c2e 056e 0009  | n  |		.CONST	0x056e,0x0009
0c30 057b 000a  | {  |		.CONST	0x057b,0x000a
0c32 0588 000b  |    |		.CONST	0x0588,0x000b
0c34 0595 000c  |    |		.CONST	0x0595,0x000c
0c36 05a2 000d  |    |		.CONST	0x05a2,0x000d
0c38 05af 000e  |    |		.CONST	0x05af,0x000e
0c3a 05bc 000f  |    |		.CONST	0x05bc,0x000f
0c3c 05c9 0010  |    |		.CONST	0x05c9,0x0010
0c3e ; --------------------------------------------------------------------------------------
0c3e ; Debug3 Subtable 0x1c
0c3e ; --------------------------------------------------------------------------------------
0c3e 0000 0009  |    |		.DBG3TAB	0x0000,0x0009
0c40 05db 0001  |    |		.CONST	0x05db,0x0001
0c42 05f2 0009  |    |		.CONST	0x05f2,0x0009
0c44 05f7 0002  |    |		.CONST	0x05f7,0x0002
0c46 0604 0003  |    |		.CONST	0x0604,0x0003
0c48 0609 0004  |    |		.CONST	0x0609,0x0004
0c4a 060e 0005  |    |		.CONST	0x060e,0x0005
0c4c 061b 0006  |    |		.CONST	0x061b,0x0006
0c4e 0628 0007  | (  |		.CONST	0x0628,0x0007
0c50 0635 0008  | 5  |		.CONST	0x0635,0x0008
0c52 ; --------------------------------------------------------------------------------------
0c52 ; Debug3 Subtable 0x1d
0c52 ; --------------------------------------------------------------------------------------
0c52 0000 0008  |    |		.DBG3TAB	0x0000,0x0008
0c54 064b 0001  | K  |		.CONST	0x064b,0x0001
0c56 0664 0008  | d  |		.CONST	0x0664,0x0008
0c58 0671 0002  | q  |		.CONST	0x0671,0x0002
0c5a 067e 0003  | ~  |		.CONST	0x067e,0x0003
0c5c 068b 0004  |    |		.CONST	0x068b,0x0004
0c5e 0698 0005  |    |		.CONST	0x0698,0x0005
0c60 06a5 0006  |    |		.CONST	0x06a5,0x0006
0c62 06b2 0007  |    |		.CONST	0x06b2,0x0007
0c64 ; --------------------------------------------------------------------------------------
0c64 ; Debug3 Subtable 0x1e
0c64 ; --------------------------------------------------------------------------------------
0c64 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0c66 06c3 0001  |    |		.CONST	0x06c3,0x0001
0c68 ; --------------------------------------------------------------------------------------
0c68 ; Debug3 Subtable 0x1f
0c68 ; --------------------------------------------------------------------------------------
0c68 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0c6a 06cb 0001  |    |		.CONST	0x06cb,0x0001
0c6c ; --------------------------------------------------------------------------------------
0c6c ; Debug3 Subtable 0x20
0c6c ; --------------------------------------------------------------------------------------
0c6c 0000 0009  |    |		.DBG3TAB	0x0000,0x0009
0c6e 06d3 0001  |    |		.CONST	0x06d3,0x0001
0c70 06e2 0009  |    |		.CONST	0x06e2,0x0009
0c72 06f2 0002  |    |		.CONST	0x06f2,0x0002
0c74 06f4 0003  |    |		.CONST	0x06f4,0x0003
0c76 06f6 0004  |    |		.CONST	0x06f6,0x0004
0c78 06f8 0005  |    |		.CONST	0x06f8,0x0005
0c7a 06fa 0006  |    |		.CONST	0x06fa,0x0006
0c7c 070d 0007  |    |		.CONST	0x070d,0x0007
0c7e 0720 0008  |    |		.CONST	0x0720,0x0008
0c80 ; --------------------------------------------------------------------------------------
0c80 ; Debug3 Subtable 0x21
0c80 ; --------------------------------------------------------------------------------------
0c80 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0c82 0733 0001  | 3  |		.CONST	0x0733,0x0001
0c84 073b 0003  | ;  |		.CONST	0x073b,0x0003
0c86 073d 0002  | =  |		.CONST	0x073d,0x0002
0c88 ; --------------------------------------------------------------------------------------
0c88 ; Debug3 Subtable 0x22
0c88 ; --------------------------------------------------------------------------------------
0c88 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0c8a 0743 0001  | C  |		.CONST	0x0743,0x0001
0c8c 0749 0003  | I  |		.CONST	0x0749,0x0003
0c8e 074b 0002  | K  |		.CONST	0x074b,0x0002
0c90 ; --------------------------------------------------------------------------------------
0c90 ; Debug3 Subtable 0x23
0c90 ; --------------------------------------------------------------------------------------
0c90 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0c92 0753 0001  | S  |		.CONST	0x0753,0x0001
0c94 ; --------------------------------------------------------------------------------------
0c94 ; Debug3 Subtable 0x24
0c94 ; --------------------------------------------------------------------------------------
0c94 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
0c96 076b 0001  | k  |		.CONST	0x076b,0x0001
0c98 0772 0005  | r  |		.CONST	0x0772,0x0005
0c9a 0776 0002  | v  |		.CONST	0x0776,0x0002
0c9c 0778 0003  | x  |		.CONST	0x0778,0x0003
0c9e 077a 0004  | z  |		.CONST	0x077a,0x0004
0ca0 ; --------------------------------------------------------------------------------------
0ca0 ; Debug3 Subtable 0x25
0ca0 ; --------------------------------------------------------------------------------------
0ca0 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0ca2 078b 0001  |    |		.CONST	0x078b,0x0001
0ca4 0790 0004  |    |		.CONST	0x0790,0x0004
0ca6 0792 0002  |    |		.CONST	0x0792,0x0002
0ca8 0795 0003  |    |		.CONST	0x0795,0x0003
0caa ; --------------------------------------------------------------------------------------
0caa ; Debug3 Subtable 0x26
0caa ; --------------------------------------------------------------------------------------
0caa 0000 0007  |    |		.DBG3TAB	0x0000,0x0007
0cac 07a3 0001  |    |		.CONST	0x07a3,0x0001
0cae 07aa 0007  |    |		.CONST	0x07aa,0x0007
0cb0 07b0 0002  |    |		.CONST	0x07b0,0x0002
0cb2 07b4 0003  |    |		.CONST	0x07b4,0x0003
0cb4 07b8 0004  |    |		.CONST	0x07b8,0x0004
0cb6 07bf 0005  |    |		.CONST	0x07bf,0x0005
0cb8 07c8 0006  |    |		.CONST	0x07c8,0x0006
0cba ; --------------------------------------------------------------------------------------
0cba ; Debug3 Subtable 0x27
0cba ; --------------------------------------------------------------------------------------
0cba 0000 0008  |    |		.DBG3TAB	0x0000,0x0008
0cbc 07d3 0001  |    |		.CONST	0x07d3,0x0001
0cbe 07d8 0002  |    |		.CONST	0x07d8,0x0002
0cc0 07db 0003  |    |		.CONST	0x07db,0x0003
0cc2 07e0 0004  |    |		.CONST	0x07e0,0x0004
0cc4 07e3 0005  |    |		.CONST	0x07e3,0x0005
0cc6 07f9 0006  |    |		.CONST	0x07f9,0x0006
0cc8 0802 0007  |    |		.CONST	0x0802,0x0007
0cca 0809 0008  |    |		.CONST	0x0809,0x0008
0ccc ; --------------------------------------------------------------------------------------
0ccc ; Debug3 Subtable 0x28
0ccc ; --------------------------------------------------------------------------------------
0ccc 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0cce 0813 0001  |    |		.CONST	0x0813,0x0001
0cd0 0819 0002  |    |		.CONST	0x0819,0x0002
0cd2 0829 0003  | )  |		.CONST	0x0829,0x0003
0cd4 ; --------------------------------------------------------------------------------------
0cd4 ; Debug3 Subtable 0x29
0cd4 ; --------------------------------------------------------------------------------------
0cd4 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0cd6 0833 0001  | 3  |		.CONST	0x0833,0x0001
0cd8 0839 0002  | 9  |		.CONST	0x0839,0x0002
0cda 083c 0003  | <  |		.CONST	0x083c,0x0003
0cdc 0843 0004  | C  |		.CONST	0x0843,0x0004
0cde ; --------------------------------------------------------------------------------------
0cde ; Debug3 Subtable 0x2a
0cde ; --------------------------------------------------------------------------------------
0cde 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0ce0 084b 0001  | K  |		.CONST	0x084b,0x0001
0ce2 ; --------------------------------------------------------------------------------------
0ce2 ; Debug3 Subtable 0x2b
0ce2 ; --------------------------------------------------------------------------------------
0ce2 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0ce4 085b 0001  | [  |		.CONST	0x085b,0x0001
0ce6 ; --------------------------------------------------------------------------------------
0ce6 ; Debug3 Subtable 0x2c
0ce6 ; --------------------------------------------------------------------------------------
0ce6 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0ce8 086b 0001  | k  |		.CONST	0x086b,0x0001
0cea ; --------------------------------------------------------------------------------------
0cea ; Debug3 Subtable 0x2d
0cea ; --------------------------------------------------------------------------------------
0cea 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
0cec 087b 0001  | {  |		.CONST	0x087b,0x0001
0cee 0883 0002  |    |		.CONST	0x0883,0x0002
0cf0 0886 0003  |    |		.CONST	0x0886,0x0003
0cf2 0889 0004  |    |		.CONST	0x0889,0x0004
0cf4 0893 0005  |    |		.CONST	0x0893,0x0005
0cf6 0000 0000  |    |		.BLANK	0000[0x10a]