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

⟦c13365b3d⟧

    Length: 30720 (0x7800)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df

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 2ae0       |*   |		.CONST	0x2ae0								; 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 001d       |    |		.CONST	0x001d								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 013f       | ?  |		.CONST	0x013f								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0053       | S  |		.CONST	0x0053								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x2d3a,0x8000,0x0000,0x005a,0x8515,0x0000,0x0011
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x0.0x3 = 0xe,0xfffc
000f e001       |    |		Load	0x0,0x1
0010 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0011 029f 014b  |   K|		Declare_Subprogram	INIT_0148,For_Call
0013 4802       |H   |		Short_Literal	0x2
0014 032e       | .  |		Declare_Type	Record,Defined,Visible
0015 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x4 = 0x15,0xfffb
0016 0322       | "  |		Declare_Variable	Record
0017 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x0.0x5 = 0x17,0x401
0018 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x0.0x6 = 0x18,0xfffb
0019 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
001a e001       |    |		Load	0x0,0x1
001b 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
001c 00d9       |    |		Load_Top	At_Offset_1
001d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
001e 0129       | )  |		Execute	Any,Make_Visible
001f 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x7 = 0x1f,0xfffa
0020 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x8 = 0x20,0xfff9
0021 029a 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x21,0xfff8
0023 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x23,0xfff7
0025 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x25,0xfff6
0027 029a 021b  |    |		Declare_Subprogram	INIT_0218,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x27,0xfff5
0029 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0xd = 0x29,0xfff4
002a 4802       |H   |		Short_Literal	0x2
002b 029f 0273  |   s|		Declare_Subprogram	INIT_0270,For_Call
002d 03fe       |    |		Declare_Type	Discrete,Defined,Visible
002e 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x2e,0xfff3
0030 029a 0333  |   3|		Declare_Subprogram	INIT_0330,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x30,0xfff2
0032 029a 038b  |    |		Declare_Subprogram	INIT_0388,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x32,0xfff1
0034 029a 043b  |   ;|		Declare_Subprogram	INIT_0438,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x34,0xfff0
0036 029a 0533  |   3|		Declare_Subprogram	INIT_0530,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x12 = 0x36,0xffef
0038 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x13 = 0x38,0xffff
0039 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x14 = 0x39,0xfffe
003a 4805       |H   |		Short_Literal	0x5
003b 029f 055b  |   [|		Declare_Subprogram	INIT_0558,For_Call
003d 03fe       |    |		Declare_Type	Discrete,Defined,Visible
003e 029a 0573  |   s|		Declare_Subprogram	INIT_0570,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x15 = 0x3e,0xfffd
0040 029a 057b  |   {|		Declare_Subprogram	INIT_0578,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x16 = 0x40,0xfffc
0042 029a 058b  |    |		Declare_Subprogram	INIT_0588,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x17 = 0x42,0xfffb
0044 029a 05db  |    |		Declare_Subprogram	INIT_05d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x18 = 0x44,0xfffa
0046 00bf       |    |		Action	Accept_Activation
0047 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0047,0x2d6e,0x8000,0x0000,0x005a,0x8695,0x0000,0x002b
													; Debug Table 0x1.0x0 = 0x47,0xffff
0048 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x48,0xfffe
0049 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x49,0xfffd
004a 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x4a,0xfffc
004b 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x4 = 0x4b,0xfffb
004c 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x5 = 0x4c,0xfffa
004d 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x6 = 0x4d,0xfff9
004e 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x7 = 0x4e,0xfff8
004f 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x8 = 0x4f,0xfff7
0050 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1.0x9 = 0x50,0xfff6
0051 00ec       |    |		Load_Encached	Diana_Tree_Cache
0052 e002       |    |		Load	0x0,0x2
0053 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0054 00e1       |    |		Load_Encached	Boolean_Cache
0055 e002       |    |		Load	0x0,0x2
0056 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0057 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0058 e002       |    |		Load	0x0,0x2
0059 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
005a 00ec       |    |		Load_Encached	Diana_Tree_Cache
005b e001       |    |		Load	0x0,0x1
005c 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
005d 029f 069b  |    |		Declare_Subprogram	INIT_0698,For_Call
005f 4808       |H   |		Short_Literal	0x8
0060 032d       | -  |		Declare_Type	Record,Defined
0061 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0xa = 0x61,0xfff5
0062 0322       | "  |		Declare_Variable	Record
0063 4801       |H   |		Short_Literal	0x1
0064 00d9       |    |		Load_Top	At_Offset_1
0065 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0066 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1.0xb = 0x66,0x801
0067 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0xc = 0x67,0xfff5
0068 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0069 e002       |    |		Load	0x0,0x2
006a 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
006b e002       |    |		Load	0x0,0x2
006c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
006d 0119       |    |		Execute	Any,Check_In_Formal_Type
006e 00d9       |    |		Load_Top	At_Offset_1
006f 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0070 4800       |H   |		Short_Literal	0x0
0071 00d9       |    |		Load_Top	At_Offset_1
0072 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0073 4800       |H   |		Short_Literal	0x0
0074 00d9       |    |		Load_Top	At_Offset_1
0075 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0076 e002       |    |		Load	0x0,0x2
0077 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0078 e002       |    |		Load	0x0,0x2
0079 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
007a 0119       |    |		Execute	Any,Check_In_Formal_Type
007b 00d9       |    |		Load_Top	At_Offset_1
007c 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
007d 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1.0xd = 0x7d,0xc01
007e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0xe = 0x7e,0x801
007f 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0080 e001       |    |		Load	0x0,0x1
0081 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0082 00d9       |    |		Load_Top	At_Offset_1
0083 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0084 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0xf = 0x84,0xfff4
0085 4801       |H   |		Short_Literal	0x1
0086 029f 06cb  |    |		Declare_Subprogram	INIT_06c8,For_Call
0088 03fd       |    |		Declare_Type	Discrete,Defined
0089 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x10 = 0x89,0xfff3
008a 4802       |H   |		Short_Literal	0x2
008b 029f 06e3  |    |		Declare_Subprogram	INIT_06e0,For_Call
008d 03fd       |    |		Declare_Type	Discrete,Defined
008e 029d 06fb  |    |		Declare_Subprogram	INIT_06f8,For_Outer_Call			; Debug Table 0x1.0x11 = 0x8e,0xfff2
0090 029d 0713  |    |		Declare_Subprogram	INIT_0710,For_Outer_Call			; Debug Table 0x1.0x12 = 0x90,0xfff1
0092 029d 0783  |    |		Declare_Subprogram	INIT_0780,For_Outer_Call			; Debug Table 0x1.0x13 = 0x92,0xfff0
0094 029d 07eb  |    |		Declare_Subprogram	INIT_07e8,For_Outer_Call			; Debug Table 0x1.0x14 = 0x94,0xffef
0096 029d 08b3  |    |		Declare_Subprogram	INIT_08b0,For_Outer_Call			; Debug Table 0x1.0x15 = 0x96,0xffee
0098 029d 08db  |    |		Declare_Subprogram	INIT_08d8,For_Outer_Call			; Debug Table 0x1.0x16 = 0x98,0xffed
009a 029d 0953  |   S|		Declare_Subprogram	INIT_0950,For_Outer_Call			; Debug Table 0x1.0x17 = 0x9a,0xffec
009c 029d 09ab  |    |		Declare_Subprogram	INIT_09a8,For_Outer_Call			; Debug Table 0x1.0x18 = 0x9c,0xffeb
009e 029d 09e3  |    |		Declare_Subprogram	INIT_09e0,For_Outer_Call			; Debug Table 0x1.0x19 = 0x9e,0xffea
00a0 029d 0b03  |    |		Declare_Subprogram	INIT_0b00,For_Outer_Call			; Debug Table 0x1.0x1a = 0xa0,0xffe9
00a2 029d 0bf3  |    |		Declare_Subprogram	INIT_0bf0,For_Outer_Call			; Debug Table 0x1.0x1b = 0xa2,0xffe8
00a4 029d 0c13  |    |		Declare_Subprogram	INIT_0c10,For_Outer_Call			; Debug Table 0x1.0x1c = 0xa4,0xffe7
00a6 029d 0c43  |   C|		Declare_Subprogram	INIT_0c40,For_Outer_Call			; Debug Table 0x1.0x1d = 0xa6,0xffe6
00a8 029d 0c63  |   c|		Declare_Subprogram	INIT_0c60,For_Outer_Call			; Debug Table 0x1.0x1e = 0xa8,0xffe5
00aa 029d 0c83  |    |		Declare_Subprogram	INIT_0c80,For_Outer_Call			; Debug Table 0x1.0x1f = 0xaa,0xffe4
00ac 029d 0cab  |    |		Declare_Subprogram	INIT_0ca8,For_Outer_Call			; Debug Table 0x1.0x20 = 0xac,0xffe3
00ae 029d 0d03  |    |		Declare_Subprogram	INIT_0d00,For_Outer_Call			; Debug Table 0x1.0x21 = 0xae,0xffe2
00b0 029d 0d2b  |   +|		Declare_Subprogram	INIT_0d28,For_Outer_Call			; Debug Table 0x1.0x22 = 0xb0,0xffe1
00b2 029d 0d43  |   C|		Declare_Subprogram	INIT_0d40,For_Outer_Call			; Debug Table 0x1.0x23 = 0xb2,0xffe0
00b4 029d 0fa3  |    |		Declare_Subprogram	INIT_0fa0,For_Outer_Call			; Debug Table 0x1.0x24 = 0xb4,0xffdf
00b6 029d 0fc3  |    |		Declare_Subprogram	INIT_0fc0,For_Outer_Call			; Debug Table 0x1.0x25 = 0xb6,0xffde
00b8 029d 1013  |    |		Declare_Subprogram	INIT_1010,For_Outer_Call			; Debug Table 0x1.0x26 = 0xb8,0xffdd
00ba 029d 11ab  |    |		Declare_Subprogram	INIT_11a8,For_Outer_Call			; Debug Table 0x1.0x27 = 0xba,0xffdc
00bc 029d 1413  |    |		Declare_Subprogram	INIT_1410,For_Outer_Call			; Debug Table 0x1.0x28 = 0xbc,0xffdb
00be 029d 144b  |   K|		Declare_Subprogram	INIT_1448,For_Outer_Call			; Debug Table 0x1.0x29 = 0xbe,0xffda
00c0 029d 1493  |    |		Declare_Subprogram	INIT_1490,For_Outer_Call			; Debug Table 0x1.0x2a = 0xc0,0xffd9
00c2 029d 156b  |   k|		Declare_Subprogram	INIT_1568,For_Outer_Call			; Debug Table 0x1.0x2b = 0xc2,0xffd8
00c4 029d 15c3  |    |		Declare_Subprogram	INIT_15c0,For_Outer_Call			; Debug Table 0x1.0x2c = 0xc4,0xffd7
00c6 029d 16d3  |    |		Declare_Subprogram	INIT_16d0,For_Outer_Call			; Debug Table 0x1.0x2d = 0xc6,0xffd6
00c8 029d 17e3  |    |		Declare_Subprogram	INIT_17e0,For_Outer_Call			; Debug Table 0x1.0x2e = 0xc8,0xffd5
00ca 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x2f = 0xca,0xffd4
00cb 00c7       |    |		Action	Elaborate_Subprogram
00cc 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x30 = 0xcc,0xffd3
00cd 00c7       |    |		Action	Elaborate_Subprogram
00ce 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x31 = 0xce,0xffd2
00cf 00c7       |    |		Action	Elaborate_Subprogram
00d0 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x32 = 0xd0,0xffd1
00d1 00c7       |    |		Action	Elaborate_Subprogram
00d2 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x33 = 0xd2,0xffd0
00d3 00c7       |    |		Action	Elaborate_Subprogram
00d4 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x34 = 0xd4,0xffcf
00d5 00c7       |    |		Action	Elaborate_Subprogram
00d6 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x35 = 0xd6,0xffce
00d7 00c7       |    |		Action	Elaborate_Subprogram
00d8 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x36 = 0xd8,0xffcd
00d9 00c7       |    |		Action	Elaborate_Subprogram
00da 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x37 = 0xda,0xffcc
00db 00c7       |    |		Action	Elaborate_Subprogram
00dc 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x38 = 0xdc,0xffff
00dd 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x39 = 0xdd,0xfffe
00de 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3a = 0xde,0xfffd
00df 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x3b = 0xdf,0xfffc
00e0 4802       |H   |		Short_Literal	0x2
00e1 029f 188b  |    |		Declare_Subprogram	INIT_1888,For_Call
00e3 03fd       |    |		Declare_Type	Discrete,Defined
00e4 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1.0x3c = 0xe4,0xfffb
00e5 00d9       |    |		Load_Top	At_Offset_1
00e6 4801       |H   |		Short_Literal	0x1
00e7 4800       |H   |		Short_Literal	0x0
00e8 00ec       |    |		Load_Encached	Diana_Tree_Cache
00e9 e002       |    |		Load	0x0,0x2
00ea 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
00eb 1b33       | 3  |		Execute	Package,Field_Read,Field_Number 0x33
00ec 4804       |H   |		Short_Literal	0x4
00ed e002       |    |		Load	0x0,0x2
00ee 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00ef e003       |    |		Load	0x0,0x3
00f0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00f1 00ec       |    |		Load_Encached	Diana_Tree_Cache
00f2 00e3       |    |		Load_Encached	Natural_Cache
00f3 4805       |H   |		Short_Literal	0x5
00f4 e004       |    |		Load	0x0,0x4
00f5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00f6 00ec       |    |		Load_Encached	Diana_Tree_Cache
00f7 e002       |    |		Load	0x0,0x2
00f8 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00f9 e005       |    |		Load	0x0,0x5
00fa 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00fb e006       |    |		Load	0x0,0x6
00fc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00fd 02a0       |    |		Declare_Subprogram	Null_Subprogram
00fe 4809       |H   |		Short_Literal	0x9
00ff 4802       |H   |		Short_Literal	0x2
0100 4802       |H   |		Short_Literal	0x2
0101 4800       |H   |		Short_Literal	0x0
0102 4800       |H   |		Short_Literal	0x0
0103 031d       |    |		Declare_Type	Variant_Record,Defined
0104 029f 18a3  |    |		Declare_Subprogram	INIT_18a0,For_Call
0106 4801       |H   |		Short_Literal	0x1
0107 4800       |H   |		Short_Literal	0x0
0108 4800       |H   |		Short_Literal	0x0
0109 4801       |H   |		Short_Literal	0x1
010a 4801       |H   |		Short_Literal	0x1
010b 4802       |H   |		Short_Literal	0x2
010c 031d       |    |		Declare_Type	Variant_Record,Defined
010d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x3d = 0x10d,0xfffa
010e 4800       |H   |		Short_Literal	0x0
010f 00da       |    |		Load_Top	At_Offset_2
0110 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0111 00d8       |    |		Load_Top	At_Offset_0
0112 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0113 029d 193b  |   ;|		Declare_Subprogram	INIT_1938,For_Outer_Call			; Debug Table 0x1.0x3e = 0x113,0xfff9
0115 029d 194b  |   K|		Declare_Subprogram	INIT_1948,For_Outer_Call			; Debug Table 0x1.0x3f = 0x115,0xfff8
0117 029d 1963  |   c|		Declare_Subprogram	INIT_1960,For_Outer_Call			; Debug Table 0x1.0x40 = 0x117,0xfff7
0119 029d 1a03  |    |		Declare_Subprogram	INIT_1a00,For_Outer_Call			; Debug Table 0x1.0x41 = 0x119,0xfff6
011b 029d 1a73  |   s|		Declare_Subprogram	INIT_1a70,For_Outer_Call			; Debug Table 0x1.0x42 = 0x11b,0xfff5
011d 029d 1acb  |    |		Declare_Subprogram	INIT_1ac8,For_Outer_Call			; Debug Table 0x1.0x43 = 0x11d,0xfff4
011f 029d 1d43  |   C|		Declare_Subprogram	INIT_1d40,For_Outer_Call			; Debug Table 0x1.0x44 = 0x11f,0xfff3
0121 029d 1d83  |    |		Declare_Subprogram	INIT_1d80,For_Outer_Call			; Debug Table 0x1.0x45 = 0x121,0xfff2
0123 029d 1eb3  |    |		Declare_Subprogram	INIT_1eb0,For_Outer_Call			; Debug Table 0x1.0x46 = 0x123,0xfff1
0125 029d 1f6b  |   k|		Declare_Subprogram	INIT_1f68,For_Outer_Call			; Debug Table 0x1.0x47 = 0x125,0xfff0
0127 029d 200b  |    |		Declare_Subprogram	INIT_2008,For_Outer_Call			; Debug Table 0x1.0x48 = 0x127,0xffef
0129 029d 2093  |    |		Declare_Subprogram	INIT_2090,For_Outer_Call			; Debug Table 0x1.0x49 = 0x129,0xffee
012b 029d 2143  |  !C|		Declare_Subprogram	INIT_2140,For_Outer_Call			; Debug Table 0x1.0x4a = 0x12b,0xffed
012d 029d 218b  |  ! |		Declare_Subprogram	INIT_2188,For_Outer_Call			; Debug Table 0x1.0x4b = 0x12d,0xffec
012f 029d 2203  |  " |		Declare_Subprogram	INIT_2200,For_Outer_Call			; Debug Table 0x1.0x4c = 0x12f,0xffeb
0131 029d 2243  |  "C|		Declare_Subprogram	INIT_2240,For_Outer_Call			; Debug Table 0x1.0x4d = 0x131,0xffea
0133 029b 22cb  |  " |		Declare_Subprogram	INIT_22c8,For_Outer_Call,Unelaborated		; Debug Table 0x1.0x4e = 0x133,0xffe9
0135 1d53       | S  |		Execute_Immediate	Reference_Lex_1,0x53				; Debug Table 0x1.0x4f = 0x135,0xffe8
0136 00c7       |    |		Action	Elaborate_Subprogram
0137 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0x50 = 0x137,0xffe7
0138 00c7       |    |		Action	Elaborate_Subprogram
0139 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x51 = 0x139,0xffe6
013a 00c7       |    |		Action	Elaborate_Subprogram
013b 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x52 = 0x13b,0xffe5
013c 00c7       |    |		Action	Elaborate_Subprogram
013d 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0x53 = 0x13d,0xffe4
013e 00c7       |    |		Action	Elaborate_Subprogram
013f			BODY_0008:
013f 00bc       |    |		Action	Signal_Activated
0140 00bb       |    |		Action	Signal_Completion
0141 0000 0000  |    |		.BLANK	0000[0x7]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b       | K  |		.CONST	0x014b								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0001       |    |		.CONST	0x0001								; Number of locals
014b			BODY_0148:
014b			INIT_0148:
014b 4608       |F   |		Jump_Case	0x9							; Debug Table 0x2 = .DEBUG	0x014b,0x2e18,0x0005,0x0000,0x005a,0x8515,0x0000,0x0020
014c 7808       |x   |		Jump	0x155								; case 0x0
014d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
014e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
014f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0150 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0151 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
0152 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
0153 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
0154 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
0155 e001       |    |		Load	0x0,0x1
0156 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0157 00db       |    |		Load_Top	At_Offset_3
0158 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0159 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
015a 0000 0000  |    |		.BLANK	0000[0x6]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163       | c  |		.CONST	0x0163								; Address of begin
0161 017f       |    |		.CONST	0x017f								; Address of exception handler
0162 0001       |    |		.CONST	0x0001								; Number of locals
0163			BODY_0160:
0163			INIT_0160:
0163 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3 = .DEBUG	0x0163,0x2e1a,0x0001,0x0000,0x005a,0x8515,0x0000,0x004f
													; Debug Table 0x3.0x0 = 0x163,0x1
0164 0b00       |    |		Execute_Immediate	Case_Compare,0x0
0165 7018       |p   |		Jump_Nonzero	0x17e
0166 e007       |    |		Load	0x0,0x7								; Debug Table 0x3.0x1 = 0x166,0x3
0167 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0168 0092 24b9  |  $ |		Action	Push_String_Extended,0x24b9					; "Bad status from Directory."
													; Debug Table 0x3.0x2 = 0x168,0x4
016a e5ff       |    |		Load	0x2,-0x1
016b 01cc       |    |		Execute	Vector,Catenate
016c 0092 24ba  |  $ |		Action	Push_String_Extended,0x24ba					; ": "
016e 01cc       |    |		Execute	Vector,Catenate
016f e5fe       |    |		Load	0x2,-0x2
0170 e002       |    |		Load	0x0,0x2
0171 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0172 025e       | ^  |		Execute	Discrete,Convert
0173 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0174 01cc       |    |		Execute	Vector,Catenate
0175 e007       |    |		Load	0x0,0x7
0176 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0177 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x3 = 0x177,0x5
0178 e5fe       |    |		Load	0x2,-0x2
0179 00ea       |    |		Load_Encached	Null_String_Cache
017a e008       |    |		Load	0x0,0x8
017b 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
017c 62b7       |b   |		Indirect_Literal	Discrete,0x434,{0x00000000, 0x5a851502}		; Debug Table 0x3.0x4 = 0x17c,0x6
017d 0257       | W  |		Execute	Discrete,Raise
017e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x3.0x5 = 0x17e,0x2
017f			TRAP_0160:
017f 62b4       |b   |		Indirect_Literal	Discrete,0x434,{0x00000000, 0x5a851502}
0180 010f       |    |		Execute	Exception,Equal
0181 6802       |h   |		Jump_Zero	0x184
0182 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x6 = 0x182,0x7
0183 0101       |    |		Execute	Exception,Reraise
0184 62ab       |b   |		Indirect_Literal	Discrete,0x430,{0x00000000, 0x5a851501}
0185 010f       |    |		Execute	Exception,Equal
0186 6807       |h   |		Jump_Zero	0x18e
0187 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x7 = 0x187,0x8
0188 0092 24bb  |  $ |		Action	Push_String_Extended,0x24bb					; "Not_Possible"
018a 0092 24bc  |  $ |		Action	Push_String_Extended,0x24bc					; "Check_Directory_Status"
018c 8222       | "  |		Call	0x1,0x22
018d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
018e 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x8 = 0x18e,0x9
018f e009       |    |		Load	0x0,0x9
0190 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0191 0092 24bc  |  $ |		Action	Push_String_Extended,0x24bc					; "Check_Directory_Status"
0193 8222       | "  |		Call	0x1,0x22
0194 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0195 0000 0000  |    |		.XXX[0x3]
0197 0000       |    |
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b       |    |		.CONST	0x019b								; Address of begin
0199 01a4       |    |		.CONST	0x01a4								; Address of exception handler
019a 0001       |    |		.CONST	0x0001								; Number of locals
019b			BODY_0198:
019b			INIT_0198:
019b e20d       |    |		Load	0x1,0xd								; Debug Table 0x4 = .DEBUG	0x019b,0x2e2e,0x0002,0x0000,0x005a,0x8515,0x0000,0x005d
													; Debug Table 0x4.0x0 = 0x19b,0x1
019c 0322       | "  |		Declare_Variable	Record
019d 00db       |    |		Load_Top	At_Offset_3
019e 00d9       |    |		Load_Top	At_Offset_1
019f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01a0 e5fe       |    |		Load	0x2,-0x2
01a1 00d9       |    |		Load_Top	At_Offset_1
01a2 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01a3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01a4			TRAP_0198:
01a4 628b       |b   |		Indirect_Literal	Discrete,0x430,{0x00000000, 0x5a851501}
01a5 010f       |    |		Execute	Exception,Equal
01a6 6808       |h   |		Jump_Zero	0x1af
01a7 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x1 = 0x1a7,0x2
01a8 0092 24bb  |  $ |		Action	Push_String_Extended,0x24bb					; "Not_Possible"
01aa 0092 24bd  |  $ |		Action	Push_String_Extended,0x24bd					; "Make"
01ac 8222       | "  |		Call	0x1,0x22
01ad 4831       |H1  |		Short_Literal	0x31
01ae 0257       | W  |		Execute	Discrete,Raise
01af 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x2 = 0x1af,0x3
01b0 e009       |    |		Load	0x0,0x9
01b1 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01b2 0092 24bd  |  $ |		Action	Push_String_Extended,0x24bd					; "Make"
01b4 8222       | "  |		Call	0x1,0x22
01b5 4831       |H1  |		Short_Literal	0x31
01b6 0257       | W  |		Execute	Discrete,Raise
01b7 0000       |    |		.XXX[0x1]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01c5       |    |		.CONST	0x01c5								; Address of begin
01b9 0202       |    |		.CONST	0x0202								; Address of exception handler
01ba 0004       |    |		.CONST	0x0004								; Number of locals
01bb			INIT_01b8:
01bb e002       |    |		Load	0x0,0x2								; Debug Table 0x5 = .DEBUG	0x01bb,0x2e36,0x0002,0x0000,0x005a,0x8515,0x0000,0x0071
													; Debug Table 0x5.0x0 = 0x1bb,0xffff
01bc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01bd 02c7       |    |		Declare_Variable	Any
01be 00d8       |    |		Load_Top	At_Offset_0
01bf 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01c0 e002       |    |		Load	0x0,0x2								; Debug Table 0x5.0x1 = 0x1c0,0xfffe
01c1 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
01c2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01c3 e002       |    |		Load	0x0,0x2								; Debug Table 0x5.0x2 = 0x1c3,0xfffd
01c4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01c5			BODY_01b8:
01c5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x3 = 0x1c5,0x1
01c6 8223       | #  |		Call	0x1,0x23
01c7 682a       |h*  |		Jump_Zero	0x1f2
01c8 e002       |    |		Load	0x0,0x2								; Debug Table 0x5.0x4 = 0x1c8,0x2
01c9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ca 00db       |    |		Load_Top	At_Offset_3
01cb 0120       |    |		Execute	Any,Is_Value
01cc 6803       |h   |		Jump_Zero	0x1d0
01cd e002       |    |		Load	0x0,0x2
01ce 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01cf 7801       |x   |		Jump	0x1d1
01d0 00db       |    |		Load_Top	At_Offset_3
01d1 625a       |bZ  |		Indirect_Literal	Discrete,0x42c,{0x00000000, 0x00004000}
01d2 e004       |    |		Load	0x0,0x4
01d3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01d4 4801       |H   |		Short_Literal	0x1
01d5 e002       |    |		Load	0x0,0x2
01d6 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01d7 e5ff       |    |		Load	0x2,-0x1
01d8 e002       |    |		Load	0x0,0x2
01d9 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
01da 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01db c402       |    |		Store	0x2,0x2
01dc 0059       | Y  |		Store_Top	Discrete,At_Offset_1
01dd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x5 = 0x1dd,0x3
01de 7021       |p!  |		Jump_Nonzero	0x200
01df e002       |    |		Load	0x0,0x2								; Debug Table 0x5.0x6 = 0x1df,0x4
01e0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01e1 e002       |    |		Load	0x0,0x2
01e2 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
01e3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01e4 6247       |bG  |		Indirect_Literal	Discrete,0x42c,{0x00000000, 0x00004000}
01e5 e004       |    |		Load	0x0,0x4
01e6 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01e7 4800       |H   |		Short_Literal	0x0
01e8 e402       |    |		Load	0x2,0x2
01e9 e002       |    |		Load	0x0,0x2
01ea 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01eb 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01ec e002       |    |		Load	0x0,0x2
01ed 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
01ee 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01ef 005b       | [  |		Store_Top	Discrete,At_Offset_3
01f0 0059       | Y  |		Store_Top	Discrete,At_Offset_1
01f1 780e       |x   |		Jump	0x200
01f2 e002       |    |		Load	0x0,0x2								; Debug Table 0x5.0x7 = 0x1f2,0x5
01f3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01f4 e002       |    |		Load	0x0,0x2
01f5 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
01f6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01f7 6234       |b4  |		Indirect_Literal	Discrete,0x42c,{0x00000000, 0x00004000}
01f8 e004       |    |		Load	0x0,0x4
01f9 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01fa e5ff       |    |		Load	0x2,-0x1
01fb e002       |    |		Load	0x0,0x2
01fc 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
01fd 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01fe 005b       | [  |		Store_Top	Discrete,At_Offset_3
01ff 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0200 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x8 = 0x200,0x6
0201 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0202			TRAP_01b8:
0202 622d       |b-  |		Indirect_Literal	Discrete,0x430,{0x00000000, 0x5a851501}
0203 010f       |    |		Execute	Exception,Equal
0204 6808       |h   |		Jump_Zero	0x20d
0205 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x9 = 0x205,0x7
0206 0092 24bb  |  $ |		Action	Push_String_Extended,0x24bb					; "Not_Possible"
0208 0092 24be  |  $ |		Action	Push_String_Extended,0x24be					; "Get_Unit_State"
020a 8222       | "  |		Call	0x1,0x22
020b 4831       |H1  |		Short_Literal	0x31
020c 0257       | W  |		Execute	Discrete,Raise
020d 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0xa = 0x20d,0x8
020e e009       |    |		Load	0x0,0x9
020f 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0210 0092 24be  |  $ |		Action	Push_String_Extended,0x24be					; "Get_Unit_State"
0212 8222       | "  |		Call	0x1,0x22
0213 4831       |H1  |		Short_Literal	0x31
0214 0257       | W  |		Execute	Discrete,Raise
0215 0000 0000  |    |		.XXX[0x3]
0217 0000       |    |
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0229       | )  |		.CONST	0x0229								; Address of begin
0219 025d       | ]  |		.CONST	0x025d								; Address of exception handler
021a 0005       |    |		.CONST	0x0005								; Number of locals
021b			INIT_0218:
021b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6 = .DEBUG	0x021b,0x2e4e,0x0002,0x0000,0x005a,0x8515,0x0000,0x007e
													; Debug Table 0x6.0x0 = 0x21b,0xffff
021c e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0x1 = 0x21c,0xfffe
021d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
021e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
021f 02c7       |    |		Declare_Variable	Any
0220 00d8       |    |		Load_Top	At_Offset_0
0221 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0222 e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0x2 = 0x222,0xfffd
0223 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0224 02c7       |    |		Declare_Variable	Any
0225 00d8       |    |		Load_Top	At_Offset_0
0226 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0227 e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0x3 = 0x227,0xfffc
0228 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0229			BODY_0218:
0229 e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0x4 = 0x229,0x1
022a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
022b 00db       |    |		Load_Top	At_Offset_3
022c 0120       |    |		Execute	Any,Is_Value
022d 6804       |h   |		Jump_Zero	0x232
022e e002       |    |		Load	0x0,0x2
022f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0230 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0231 7801       |x   |		Jump	0x233
0232 00db       |    |		Load_Top	At_Offset_3
0233 e5ff       |    |		Load	0x2,-0x1
0234 e002       |    |		Load	0x0,0x2
0235 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0236 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0237 c403       |    |		Store	0x2,0x3
0238 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0239 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x5 = 0x239,0x2
023a 0092 24bf  |  $ |		Action	Push_String_Extended,0x24bf					; "Ada.Get_Unit"
023c 820f       |    |		Call	0x1,0xf
023d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x6 = 0x23d,0x3
023e e002       |    |		Load	0x0,0x2
023f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0240 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0241 c404       |    |		Store	0x2,0x4
0242 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x7 = 0x242,0x4
0243 e002       |    |		Load	0x0,0x2
0244 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0245 6803       |h   |		Jump_Zero	0x249
0246 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x8 = 0x246,0x5
0247 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6.0x9 = 0x247,0x401
0248 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1				; Debug Table 0x6.0xa = 0x248,0x5
0249 e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0xb = 0x249,0x6
024a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
024b e002       |    |		Load	0x0,0x2
024c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
024d 61de       |a   |		Indirect_Literal	Discrete,0x42c,{0x00000000, 0x00004000}
024e e004       |    |		Load	0x0,0x4
024f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0250 4800       |H   |		Short_Literal	0x0
0251 e404       |    |		Load	0x2,0x4
0252 e002       |    |		Load	0x0,0x2
0253 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0254 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0255 c402       |    |		Store	0x2,0x2
0256 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0257 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0xc = 0x257,0x7
0258 0092 24c0  |  $ |		Action	Push_String_Extended,0x24c0					; "Traversal.Get_Declaration"
025a 820f       |    |		Call	0x1,0xf
025b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0xd = 0x25b,0x8
025c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
025d			TRAP_0218:
025d 61d2       |a   |		Indirect_Literal	Discrete,0x430,{0x00000000, 0x5a851501}
025e 010f       |    |		Execute	Exception,Equal
025f 6808       |h   |		Jump_Zero	0x268
0260 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0xe = 0x260,0x9
0261 0092 24bb  |  $ |		Action	Push_String_Extended,0x24bb					; "Not_Possible"
0263 0092 24c1  |  $ |		Action	Push_String_Extended,0x24c1					; "Get_Parent_Stub"
0265 8222       | "  |		Call	0x1,0x22
0266 4831       |H1  |		Short_Literal	0x31
0267 0257       | W  |		Execute	Discrete,Raise
0268 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0xf = 0x268,0xa
0269 e009       |    |		Load	0x0,0x9
026a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
026b 0092 24c1  |  $ |		Action	Push_String_Extended,0x24c1					; "Get_Parent_Stub"
026d 8222       | "  |		Call	0x1,0x22
026e 4831       |H1  |		Short_Literal	0x31
026f 0257       | W  |		Execute	Discrete,Raise
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273       | s  |		.CONST	0x0273								; Address of begin
0271 0004       |    |		.CONST	0x0004								; Address of exception handler
0272 0001       |    |		.CONST	0x0001								; Number of locals
0273			BODY_0270:
0273			INIT_0270:
0273 4603       |F   |		Jump_Case	0x4							; Debug Table 0x7 = .DEBUG	0x0273,0x2e70,0x0005,0x0000,0x005a,0x8515,0x0000,0x008b
0274 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0275 7802       |x   |		Jump	0x278								; case 0x1
0276 7805       |x   |		Jump	0x27c								; case 0x2
0277 7809       |x   |		Jump	0x281								; case 0x3
0278 00da       |    |		Load_Top	At_Offset_2
0279 0091 24a8  |  $ |		Action	Push_String_Extended_Indexed,0x24a8				; "OBJECT_SELECTION"
027b 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
027c 00db       |    |		Load_Top	At_Offset_3
027d 00db       |    |		Load_Top	At_Offset_3
027e 00e0       |    |		Load_Encached	Standard_Cache
027f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0280 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0281 00da       |    |		Load_Top	At_Offset_2
0282 00e0       |    |		Load_Encached	Standard_Cache
0283 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0284 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0285 0000 0000  |    |		.XXX[0x3]
0287 0000       |    |
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 029e       |    |		.CONST	0x029e								; Address of begin
0289 0312       |    |		.CONST	0x0312								; Address of exception handler
028a 0006       |    |		.CONST	0x0006								; Number of locals
028b			INIT_0288:
028b e002       |    |		Load	0x0,0x2								; Debug Table 0x8 = .DEBUG	0x028b,0x2e72,0x0001,0x0000,0x005a,0x8515,0x0000,0x0092
													; Debug Table 0x8.0x0 = 0x28b,0xffff
028c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
028d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
028e 02c7       |    |		Declare_Variable	Any
028f 00d8       |    |		Load_Top	At_Offset_0
0290 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0291 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x8.0x1 = 0x291,0xfffe
0292 e002       |    |		Load	0x0,0x2								; Debug Table 0x8.0x2 = 0x292,0xfffd
0293 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0294 02c7       |    |		Declare_Variable	Any
0295 00d8       |    |		Load_Top	At_Offset_0
0296 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0297 e002       |    |		Load	0x0,0x2								; Debug Table 0x8.0x3 = 0x297,0xfffc
0298 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0299 02ff       |    |		Declare_Variable	Variant_Record
029a 00d8       |    |		Load_Top	At_Offset_0
029b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
029c e002       |    |		Load	0x0,0x2								; Debug Table 0x8.0x4 = 0x29c,0xfffb
029d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
029e			BODY_0288:
029e 0007       |    |		Action	Break_Optional							; Debug Table 0x8.0x5 = 0x29e,0x1
029f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x6 = 0x29f,0x401
02a0 021d       |    |		Execute	Heap_Access,Is_Null
02a1 6802       |h   |		Jump_Zero	0x2a4							; Debug Table 0x8.0x7 = 0x2a1,0x1
02a2 618d       |a   |		Indirect_Literal	Discrete,0x430,{0x00000000, 0x5a851501}		; Debug Table 0x8.0x8 = 0x2a2,0x2
02a3 0257       | W  |		Execute	Discrete,Raise
02a4 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x8.0x9 = 0x2a4,0x3
02a5 682e       |h.  |		Jump_Zero	0x2d4
02a6 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0xa = 0x2a6,0x4
02a7 8224       | $  |		Call	0x1,0x24
02a8 c404       |    |		Store	0x2,0x4
02a9 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0xb = 0x2a9,0x5
02aa e002       |    |		Load	0x0,0x2
02ab 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02ac 7027       |p'  |		Jump_Nonzero	0x2d4
02ad e002       |    |		Load	0x0,0x2								; Debug Table 0x8.0xc = 0x2ad,0x6
02ae 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
02af 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02b0 00db       |    |		Load_Top	At_Offset_3
02b1 e002       |    |		Load	0x0,0x2
02b2 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
02b3 012e       | .  |		Execute	Any,Not_Equal
02b4 6805       |h   |		Jump_Zero	0x2ba
02b5 0092 24c2  |  $ |		Action	Push_String_Extended,0x24c2					; "Command failed - unit is not an Ada object"
													; Debug Table 0x8.0xd = 0x2b5,0x7
02b7 e00a       |    |		Load	0x0,0xa
02b8 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
02b9 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0x8.0xe = 0x2b9,0x8
02ba e002       |    |		Load	0x0,0x2								; Debug Table 0x8.0xf = 0x2ba,0x9
02bb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02bc 00da       |    |		Load_Top	At_Offset_2
02bd 616e       |an  |		Indirect_Literal	Discrete,0x42c,{0x00000000, 0x00004000}
02be e004       |    |		Load	0x0,0x4
02bf 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02c0 4800       |H   |		Short_Literal	0x0
02c1 e404       |    |		Load	0x2,0x4
02c2 e002       |    |		Load	0x0,0x2
02c3 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
02c4 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
02c5 00d1       |    |		Pop_Control	Pop_Count_1
02c6 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02c7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x10 = 0x2c7,0xa
02c8 0092 24c3  |  $ |		Action	Push_String_Extended,0x24c3					; "Traversal.Get_Version"
02ca 820f       |    |		Call	0x1,0xf
02cb 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x8.0x11 = 0x2cb,0xb
02cc e5fe       |    |		Load	0x2,-0x2
02cd e001       |    |		Load	0x0,0x1
02ce 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
02cf 4800       |H   |		Short_Literal	0x0
02d0 e001       |    |		Load	0x0,0x1
02d1 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
02d2 00d1       |    |		Pop_Control	Pop_Count_1
02d3 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0x8.0x12 = 0x2d3,0xc
02d4 e002       |    |		Load	0x0,0x2								; Debug Table 0x8.0x13 = 0x2d4,0xd
02d5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02d6 e402       |    |		Load	0x2,0x2
02d7 0120       |    |		Execute	Any,Is_Value
02d8 6804       |h   |		Jump_Zero	0x2dd
02d9 e002       |    |		Load	0x0,0x2
02da 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
02db 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02dc 7801       |x   |		Jump	0x2de
02dd e402       |    |		Load	0x2,0x2
02de e5ff       |    |		Load	0x2,-0x1
02df e002       |    |		Load	0x0,0x2
02e0 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
02e1 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02e2 c402       |    |		Store	0x2,0x2
02e3 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02e4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x14 = 0x2e4,0xe
02e5 0092 24bf  |  $ |		Action	Push_String_Extended,0x24bf					; "Ada.Get_Unit"
02e7 820f       |    |		Call	0x1,0xf
02e8 e002       |    |		Load	0x0,0x2								; Debug Table 0x8.0x15 = 0x2e8,0xf
02e9 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
02ea 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02eb e402       |    |		Load	0x2,0x2
02ec e002       |    |		Load	0x0,0x2
02ed 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
02ee 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02ef e002       |    |		Load	0x0,0x2
02f0 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
02f1 012e       | .  |		Execute	Any,Not_Equal
02f2 6805       |h   |		Jump_Zero	0x2f8
02f3 0092 24c2  |  $ |		Action	Push_String_Extended,0x24c2					; "Command failed - unit is not an Ada object"
													; Debug Table 0x8.0x16 = 0x2f3,0x10
02f5 e00a       |    |		Load	0x0,0xa
02f6 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
02f7 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0x8.0x17 = 0x2f7,0x11
02f8 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x8.0x18 = 0x2f8,0x12
02f9 7005       |p   |		Jump_Nonzero	0x2ff
02fa e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x19 = 0x2fa,0x13
02fb e00b       |    |		Load	0x0,0xb
02fc 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02fd a403       |    |		Store_Unchecked	0x2,0x3
02fe 7802       |x   |		Jump	0x301
02ff e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x1a = 0x2ff,0x14
0300 a403       |    |		Store_Unchecked	0x2,0x3
0301 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0x1b = 0x301,0x15
0302 e5fc       |    |		Load	0x2,-0x4
0303 0e02       |    |		Execute_Immediate	Not_Equal,0x2
0304 6805       |h   |		Jump_Zero	0x30a
0305 e403       |    |		Load	0x2,0x3
0306 e00c       |    |		Load	0x0,0xc
0307 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0308 0f00       |    |		Execute_Immediate	Equal,0x0
0309 7801       |x   |		Jump	0x30b
030a 4800       |H   |		Short_Literal	0x0
030b e5fe       |    |		Load	0x2,-0x2
030c e001       |    |		Load	0x0,0x1
030d 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
030e e403       |    |		Load	0x2,0x3
030f e001       |    |		Load	0x0,0x1
0310 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0311 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0312			TRAP_0288:
0312 611d       |a   |		Indirect_Literal	Discrete,0x430,{0x00000000, 0x5a851501}
0313 010f       |    |		Execute	Exception,Equal
0314 6807       |h   |		Jump_Zero	0x31c
0315 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0x1c = 0x315,0x16
0316 0092 24bb  |  $ |		Action	Push_String_Extended,0x24bb					; "Not_Possible"
0318 0092 24c4  |  $ |		Action	Push_String_Extended,0x24c4					; "Display"
031a 8222       | "  |		Call	0x1,0x22
031b 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
031c 610b       |a   |		Indirect_Literal	Discrete,0x428,{0x00000000, 0x5a846501}
031d 010f       |    |		Execute	Exception,Equal
031e 7006       |p   |		Jump_Nonzero	0x325
031f 6104       |a   |		Indirect_Literal	Discrete,0x424,{0x00000000, 0x5a846502}
0320 010f       |    |		Execute	Exception,Equal
0321 7003       |p   |		Jump_Nonzero	0x325
0322 60fd       |`   |		Indirect_Literal	Discrete,0x420,{0x00000000, 0x5a846503}
0323 010f       |    |		Execute	Exception,Equal
0324 6801       |h   |		Jump_Zero	0x326
0325 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0x8.0x1d = 0x325,0x17
0326 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0x1e = 0x326,0x18
0327 e009       |    |		Load	0x0,0x9
0328 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0329 0092 24c4  |  $ |		Action	Push_String_Extended,0x24c4					; "Display"
032b 8222       | "  |		Call	0x1,0x22
032c 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
032d 0000 0000  |    |		.XXX[0x3]
032f 0000       |    |
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 033d       | =  |		.CONST	0x033d								; Address of begin
0331 0367       | g  |		.CONST	0x0367								; Address of exception handler
0332 0005       |    |		.CONST	0x0005								; Number of locals
0333			INIT_0330:
0333 e21e       |    |		Load	0x1,0x1e							; Debug Table 0x9 = .DEBUG	0x0333,0x2eb2,0x0001,0x0000,0x005a,0x8515,0x0000,0x00ab
													; Debug Table 0x9.0x0 = 0x333,0xffff
0334 0322       | "  |		Declare_Variable	Record
0335 00d8       |    |		Load_Top	At_Offset_0
0336 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0337 e221       | !  |		Load	0x1,0x21							; Debug Table 0x9.0x1 = 0x337,0xfffe
0338 0007       |    |		Action	Break_Optional
0339 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9.0x2 = 0x339,0xfffd
033a e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x3 = 0x33a,0xfffc
033b 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
033c 0322       | "  |		Declare_Variable	Record
033d			BODY_0330:
033d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x4 = 0x33d,0x1
033e 8225       | %  |		Call	0x1,0x25
033f e402       |    |		Load	0x2,0x2
0340 017d       | }  |		Execute	Record,Structure_Write
0341 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x9.0x5 = 0x341,0x2
0342 e221       | !  |		Load	0x1,0x21
0343 00ec       |    |		Load_Encached	Diana_Tree_Cache
0344 e402       |    |		Load	0x2,0x2
0345 4801       |H   |		Short_Literal	0x1
0346 e5fe       |    |		Load	0x2,-0x2
0347 4800       |H   |		Short_Literal	0x0
0348 e5fd       |    |		Load	0x2,-0x3
0349 823e       | >  |		Call	0x1,0x3e
034a 00d1       |    |		Pop_Control	Pop_Count_1
034b c404       |    |		Store	0x2,0x4
034c c403       |    |		Store	0x2,0x3
034d c5fb       |    |		Store	0x2,-0x5
034e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x6 = 0x34e,0x3
034f 0f01       |    |		Execute_Immediate	Equal,0x1
0350 6813       |h   |		Jump_Zero	0x364
0351 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x7 = 0x351,0x4
0352 4801       |H   |		Short_Literal	0x1
0353 4800       |H   |		Short_Literal	0x0
0354 4800       |H   |		Short_Literal	0x0
0355 e001       |    |		Load	0x0,0x1
0356 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0357 e404       |    |		Load	0x2,0x4
0358 e001       |    |		Load	0x0,0x1
0359 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
035a 00d1       |    |		Pop_Control	Pop_Count_1
035b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x8 = 0x35b,0x5
035c 00da       |    |		Load_Top	At_Offset_2
035d 00da       |    |		Load_Top	At_Offset_2
035e e001       |    |		Load	0x0,0x1
035f 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0360 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x9 = 0x360,0x6
0361 e001       |    |		Load	0x0,0x1
0362 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0363 00d1       |    |		Pop_Control	Pop_Count_1
0364 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0xa = 0x364,0x7
0365 a5fc       |    |		Store_Unchecked	0x2,-0x4
0366 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0367			TRAP_0330:
0367 60c8       |`   |		Indirect_Literal	Discrete,0x430,{0x00000000, 0x5a851501}
0368 010f       |    |		Execute	Exception,Equal
0369 6807       |h   |		Jump_Zero	0x371
036a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0xb = 0x36a,0x8
036b 0092 24bb  |  $ |		Action	Push_String_Extended,0x24bb					; "Not_Possible"
036d 0092 24c5  |  $ |		Action	Push_String_Extended,0x24c5					; "Force_State"
036f 8222       | "  |		Call	0x1,0x22
0370 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0371 60b6       |`   |		Indirect_Literal	Discrete,0x428,{0x00000000, 0x5a846501}
0372 010f       |    |		Execute	Exception,Equal
0373 7006       |p   |		Jump_Nonzero	0x37a
0374 60af       |`   |		Indirect_Literal	Discrete,0x424,{0x00000000, 0x5a846502}
0375 010f       |    |		Execute	Exception,Equal
0376 7003       |p   |		Jump_Nonzero	0x37a
0377 60a8       |`   |		Indirect_Literal	Discrete,0x420,{0x00000000, 0x5a846503}
0378 010f       |    |		Execute	Exception,Equal
0379 6801       |h   |		Jump_Zero	0x37b
037a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x9.0xc = 0x37a,0x9
037b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0xd = 0x37b,0xa
037c e009       |    |		Load	0x0,0x9
037d 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
037e 0092 24c5  |  $ |		Action	Push_String_Extended,0x24c5					; "Force_State"
0380 8222       | "  |		Call	0x1,0x22
0381 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0382 0000 0000  |    |		.BLANK	0000[0x6]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 0397       |    |		.CONST	0x0397								; Address of begin
0389 0400       |    |		.CONST	0x0400								; Address of exception handler
038a 0004       |    |		.CONST	0x0004								; Number of locals
038b			INIT_0388:
038b e21e       |    |		Load	0x1,0x1e							; Debug Table 0xa = .DEBUG	0x038b,0x2ed0,0x0001,0x0000,0x005a,0x8515,0x0000,0x00c8
													; Debug Table 0xa.0x0 = 0x38b,0xffff
038c 0322       | "  |		Declare_Variable	Record
038d 00d8       |    |		Load_Top	At_Offset_0
038e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
038f e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x1 = 0x38f,0xfffe
0390 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0391 02c7       |    |		Declare_Variable	Any
0392 00d8       |    |		Load_Top	At_Offset_0
0393 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0394 e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x2 = 0x394,0xfffd
0395 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0396 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x3 = 0x396,0xfffc
0397			BODY_0388:
0397 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0x4 = 0x397,0x1
0398 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0399 8224       | $  |		Call	0x1,0x24
039a c403       |    |		Store	0x2,0x3
039b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x5 = 0x39b,0x2
039c e002       |    |		Load	0x0,0x2
039d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
039e 6805       |h   |		Jump_Zero	0x3a4
039f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0x6 = 0x39f,0x3
03a0 8225       | %  |		Call	0x1,0x25
03a1 00db       |    |		Load_Top	At_Offset_3
03a2 017d       | }  |		Execute	Record,Structure_Write
03a3 7847       |xG  |		Jump	0x3eb
03a4 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x7 = 0x3a4,0x4
03a5 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
03a6 6805       |h   |		Jump_Zero	0x3ac
03a7 0092 24c6  |  $ |		Action	Push_String_Extended,0x24c6					; "Deletion failed - cannot delete many subunits at once"
													; Debug Table 0xa.0x8 = 0x3a7,0x5
03a9 e00a       |    |		Load	0x0,0xa
03aa 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
03ab 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xa.0x9 = 0x3ab,0x6
03ac 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0xa = 0x3ac,0x7
03ad e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0xb = 0x3ad,0xfbff
03ae 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
03af 0322       | "  |		Declare_Variable	Record
03b0 00d8       |    |		Load_Top	At_Offset_0
03b1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03b2 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa.0xc = 0x3b2,0xfbfe
03b3 e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0xd = 0x3b3,0xfbfd
03b4 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
03b5 0322       | "  |		Declare_Variable	Record
03b6 e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0xe = 0x3b6,0xfbfc
03b7 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
03b8 02ff       |    |		Declare_Variable	Variant_Record
03b9 00d8       |    |		Load_Top	At_Offset_0
03ba 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03bb e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0xf = 0x3bb,0xfbfb
03bc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03bd e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x10 = 0x3bd,0xfbfa
03be 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
03bf 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
03c0 02c7       |    |		Declare_Variable	Any
03c1 00d8       |    |		Load_Top	At_Offset_0
03c2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03c3 029f 23cb  |  # |		Declare_Subprogram	INIT_23c8,For_Call
03c5 e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x11 = 0x3c5,0x401
03c6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03c7 e408       |    |		Load	0x2,0x8
03c8 6063       |`c  |		Indirect_Literal	Discrete,0x42c,{0x00000000, 0x00004000}
03c9 e004       |    |		Load	0x0,0x4
03ca 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
03cb 4800       |H   |		Short_Literal	0x0
03cc e403       |    |		Load	0x2,0x3
03cd e002       |    |		Load	0x0,0x2
03ce 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
03cf 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
03d0 00d1       |    |		Pop_Control	Pop_Count_1
03d1 005b       | [  |		Store_Top	Discrete,At_Offset_3
03d2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x12 = 0x3d2,0x402
03d3 0092 24c3  |  $ |		Action	Push_String_Extended,0x24c3					; "Traversal.Get_Version"
03d5 820f       |    |		Call	0x1,0xf
03d6 e403       |    |		Load	0x2,0x3								; Debug Table 0xa.0x13 = 0x3d6,0x403
03d7 e405       |    |		Load	0x2,0x5
03d8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03d9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x14 = 0x3d9,0x404
03da e002       |    |		Load	0x0,0x2
03db 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03dc e405       |    |		Load	0x2,0x5
03dd 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03de e403       |    |		Load	0x2,0x3								; Debug Table 0xa.0x15 = 0x3de,0x405
03df e001       |    |		Load	0x0,0x1
03e0 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
03e1 e405       |    |		Load	0x2,0x5
03e2 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03e3 840b       |    |		Call	0x2,0xb								; Debug Table 0xa.0x16 = 0x3e3,0x406
03e4 e407       |    |		Load	0x2,0x7								; Debug Table 0xa.0x17 = 0x3e4,0x407
03e5 e406       |    |		Load	0x2,0x6
03e6 8210       |    |		Call	0x1,0x10
03e7 8225       | %  |		Call	0x1,0x25
03e8 e402       |    |		Load	0x2,0x2
03e9 017d       | }  |		Execute	Record,Structure_Write
03ea 00d7       |    |		Pop_Control	Pop_Count_7
03eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x18 = 0x3eb,0x8
03ec 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03ed e00c       |    |		Load	0x0,0xc
03ee 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03ef 6805       |h   |		Jump_Zero	0x3f5
03f0 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x19 = 0x3f0,0x9
03f1 4801       |H   |		Short_Literal	0x1
03f2 8238       | 8  |		Call	0x1,0x38
03f3 00d1       |    |		Pop_Control	Pop_Count_1
03f4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03f5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x1a = 0x3f5,0xa
03f6 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
03f7 0f02       |    |		Execute_Immediate	Equal,0x2
03f8 6802       |h   |		Jump_Zero	0x3fb
03f9 6022       |`"  |		Indirect_Literal	Discrete,0x41c,{0x00000000, 0x5a869502}		; Debug Table 0xa.0x1b = 0x3f9,0xb
03fa 0257       | W  |		Execute	Discrete,Raise
03fb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x1c = 0x3fb,0xc
03fc e5fe       |    |		Load	0x2,-0x2
03fd 8238       | 8  |		Call	0x1,0x38
03fe 00d1       |    |		Pop_Control	Pop_Count_1
03ff 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0400			TRAP_0388:
0400 601b       |`   |		Indirect_Literal	Discrete,0x41c,{0x00000000, 0x5a869502}
0401 010f       |    |		Execute	Exception,Equal
0402 6807       |h   |		Jump_Zero	0x40a
0403 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x1d = 0x403,0xd
0404 0092 24c7  |  $ |		Action	Push_String_Extended,0x24c7					; "Bad_Call"
0406 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
0408 8222       | "  |		Call	0x1,0x22
0409 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
040a 6025       |`%  |		Indirect_Literal	Discrete,0x430,{0x00000000, 0x5a851501}
040b 010f       |    |		Execute	Exception,Equal
040c 6807       |h   |		Jump_Zero	0x414
040d 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x1e = 0x40d,0xe
040e 0092 24bb  |  $ |		Action	Push_String_Extended,0x24bb					; "Not_Possible"
0410 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
0412 8222       | "  |		Call	0x1,0x22
0413 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0414 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x1f = 0x414,0xf
0415 e009       |    |		Load	0x0,0x9
0416 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0417 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
0419 8222       | "  |		Call	0x1,0x22
041a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
041b 0000       |    |		.XXX[0x1]
041c 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a869502}
0420 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a846503}
0424 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a846502}
0428 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a846501}
042c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0430 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a851501}
0434 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a851502}
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 0452       | R  |		.CONST	0x0452								; Address of begin
0439 0505       |    |		.CONST	0x0505								; Address of exception handler
043a 000a       |    |		.CONST	0x000a								; Number of locals
043b			INIT_0438:
043b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xb = .DEBUG	0x043b,0x2f12,0x0001,0x0000,0x005a,0x8515,0x0000,0x00d5
													; Debug Table 0xb.0x0 = 0x43b,0xffff
043c 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xb.0x1 = 0x43c,0xfffe
043d 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xb.0x2 = 0x43d,0xfffd
043e e21e       |    |		Load	0x1,0x1e							; Debug Table 0xb.0x3 = 0x43e,0xfffc
043f 0322       | "  |		Declare_Variable	Record
0440 00d8       |    |		Load_Top	At_Offset_0
0441 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0442 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xb.0x4 = 0x442,0xfffb
0443 e002       |    |		Load	0x0,0x2								; Debug Table 0xb.0x5 = 0x443,0xfffa
0444 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0445 02c7       |    |		Declare_Variable	Any
0446 00d8       |    |		Load_Top	At_Offset_0
0447 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0448 e002       |    |		Load	0x0,0x2								; Debug Table 0xb.0x6 = 0x448,0xfff9
0449 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
044a 02ff       |    |		Declare_Variable	Variant_Record
044b 00d8       |    |		Load_Top	At_Offset_0
044c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
044d e221       | !  |		Load	0x1,0x21							; Debug Table 0xb.0x7 = 0x44d,0xfff8
044e 0007       |    |		Action	Break_Optional
044f e002       |    |		Load	0x0,0x2								; Debug Table 0xb.0x8 = 0x44f,0xfff7
0450 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0451 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x9 = 0x451,0xfff6
0452			BODY_0438:
0452 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xb.0xa = 0x452,0x1
0453 e5fe       |    |		Load	0x2,-0x2
0454 0e01       |    |		Execute_Immediate	Not_Equal,0x1
0455 0279       | y  |		Execute	Discrete,And
0456 6802       |h   |		Jump_Zero	0x459
0457 626c       |bl  |		Indirect_Literal	Discrete,0x6c4,{0x00000000, 0x5a869503}		; Debug Table 0xb.0xb = 0x457,0x2
0458 0257       | W  |		Execute	Discrete,Raise
0459 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xb.0xc = 0x459,0x3
045a 700b       |p   |		Jump_Nonzero	0x466
045b e5fe       |    |		Load	0x2,-0x2
045c 0f01       |    |		Execute_Immediate	Equal,0x1
045d 6808       |h   |		Jump_Zero	0x466
045e 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xb.0xd = 0x45e,0x4
045f e5fc       |    |		Load	0x2,-0x4
0460 e5ff       |    |		Load	0x2,-0x1
0461 823f       | ?  |		Call	0x1,0x3f
0462 c403       |    |		Store	0x2,0x3
0463 e403       |    |		Load	0x2,0x3								; Debug Table 0xb.0xe = 0x463,0x5
0464 7001       |p   |		Jump_Nonzero	0x466
0465 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0xb.0xf = 0x465,0x6
0466 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x10 = 0x466,0x7
0467 8225       | %  |		Call	0x1,0x25
0468 e405       |    |		Load	0x2,0x5
0469 017d       | }  |		Execute	Record,Structure_Write
046a e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xb.0x11 = 0x46a,0x8
046b 680b       |h   |		Jump_Zero	0x477
046c e405       |    |		Load	0x2,0x5
046d 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
046e e002       |    |		Load	0x0,0x2
046f 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0470 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0471 6805       |h   |		Jump_Zero	0x477
0472 0092 24c9  |  $ |		Action	Push_String_Extended,0x24c9					; "Withdraw failed - parent is source"
													; Debug Table 0xb.0x12 = 0x472,0x9
0474 e00a       |    |		Load	0x0,0xa
0475 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0476 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0xb.0x13 = 0x476,0xa
0477 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xb.0x14 = 0x477,0xb
0478 e221       | !  |		Load	0x1,0x21
0479 00ec       |    |		Load_Encached	Diana_Tree_Cache
047a e405       |    |		Load	0x2,0x5
047b e5fd       |    |		Load	0x2,-0x3
047c 0f00       |    |		Execute_Immediate	Equal,0x0
047d 4802       |H   |		Short_Literal	0x2
047e 4801       |H   |		Short_Literal	0x1
047f e5fe       |    |		Load	0x2,-0x2
0480 823e       | >  |		Call	0x1,0x3e
0481 00d1       |    |		Pop_Control	Pop_Count_1
0482 c406       |    |		Store	0x2,0x6
0483 005b       | [  |		Store_Top	Discrete,At_Offset_3
0484 c402       |    |		Store	0x2,0x2
0485 e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0x15 = 0x485,0xc
0486 681a       |h   |		Jump_Zero	0x4a1
0487 e5fd       |    |		Load	0x2,-0x3
0488 6818       |h   |		Jump_Zero	0x4a1
0489 e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x16 = 0x489,0xd
048a 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
048b e406       |    |		Load	0x2,0x6
048c 8210       |    |		Call	0x1,0x10
048d 8225       | %  |		Call	0x1,0x25
048e e405       |    |		Load	0x2,0x5
048f 017d       | }  |		Execute	Record,Structure_Write
0490 e405       |    |		Load	0x2,0x5								; Debug Table 0xb.0x17 = 0x490,0xe
0491 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0492 0f02       |    |		Execute_Immediate	Equal,0x2
0493 700d       |p   |		Jump_Nonzero	0x4a1
0494 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xb.0x18 = 0x494,0xf
0495 00e1       |    |		Load_Encached	Boolean_Cache
0496 00ec       |    |		Load_Encached	Diana_Tree_Cache
0497 e405       |    |		Load	0x2,0x5
0498 4801       |H   |		Short_Literal	0x1
0499 4802       |H   |		Short_Literal	0x2
049a 4801       |H   |		Short_Literal	0x1
049b 4801       |H   |		Short_Literal	0x1
049c 8237       | 7  |		Call	0x1,0x37
049d 00d1       |    |		Pop_Control	Pop_Count_1
049e c406       |    |		Store	0x2,0x6
049f c404       |    |		Store	0x2,0x4
04a0 c402       |    |		Store	0x2,0x2
04a1 e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0x19 = 0x4a1,0x10
04a2 7001       |p   |		Jump_Nonzero	0x4a4
04a3 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0xb.0x1a = 0x4a3,0x11
04a4 e002       |    |		Load	0x0,0x2								; Debug Table 0xb.0x1b = 0x4a4,0x12
04a5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04a6 e407       |    |		Load	0x2,0x7
04a7 0120       |    |		Execute	Any,Is_Value
04a8 6803       |h   |		Jump_Zero	0x4ac
04a9 e002       |    |		Load	0x0,0x2
04aa 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
04ab 7801       |x   |		Jump	0x4ad
04ac e407       |    |		Load	0x2,0x7
04ad 677e       |g~  |		Indirect_Literal	Discrete,0x42c,{0x00000000, 0x00004000}
04ae e004       |    |		Load	0x0,0x4
04af 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
04b0 4801       |H   |		Short_Literal	0x1
04b1 e002       |    |		Load	0x0,0x2
04b2 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
04b3 e406       |    |		Load	0x2,0x6
04b4 e002       |    |		Load	0x0,0x2
04b5 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
04b6 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
04b7 c407       |    |		Store	0x2,0x7
04b8 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04b9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x1c = 0x4b9,0x13
04ba 0092 24ca  |  $ |		Action	Push_String_Extended,0x24ca					; "Traversal.Get_Object"
04bc 820f       |    |		Call	0x1,0xf
04bd e002       |    |		Load	0x0,0x2								; Debug Table 0xb.0x1d = 0x4bd,0x14
04be 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04bf 00db       |    |		Load_Top	At_Offset_3
04c0 676b       |gk  |		Indirect_Literal	Discrete,0x42c,{0x00000000, 0x00004000}
04c1 e004       |    |		Load	0x0,0x4
04c2 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
04c3 4800       |H   |		Short_Literal	0x0
04c4 e407       |    |		Load	0x2,0x7
04c5 e002       |    |		Load	0x0,0x2
04c6 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
04c7 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
04c8 00d1       |    |		Pop_Control	Pop_Count_1
04c9 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04ca 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x1e = 0x4ca,0x15
04cb 0092 24c3  |  $ |		Action	Push_String_Extended,0x24c3					; "Traversal.Get_Version"
04cd 820f       |    |		Call	0x1,0xf
04ce 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0x1f = 0x4ce,0x16
04cf 0f02       |    |		Execute_Immediate	Equal,0x2
04d0 6816       |h   |		Jump_Zero	0x4e7
04d1 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x20 = 0x4d1,0x17
04d2 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
04d3 e001       |    |		Load	0x0,0x1
04d4 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
04d5 6809       |h   |		Jump_Zero	0x4df
04d6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x21 = 0x4d6,0x18
04d7 e5fc       |    |		Load	0x2,-0x4
04d8 e001       |    |		Load	0x0,0x1
04d9 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
04da 4801       |H   |		Short_Literal	0x1
04db e001       |    |		Load	0x0,0x1
04dc 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
04dd 00d1       |    |		Pop_Control	Pop_Count_1
04de 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
04df e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xb.0x22 = 0x4df,0x19
04e0 0007       |    |		Action	Break_Optional
04e1 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xb.0x23 = 0x4e1,0x401
04e2 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x24 = 0x4e2,0x19
04e3 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
04e4 e001       |    |		Load	0x0,0x1
04e5 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
04e6 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
04e7 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x25 = 0x4e7,0x1a
04e8 e406       |    |		Load	0x2,0x6								; Debug Table 0xb.0x26 = 0x4e8,0x801
04e9 0007       |    |		Action	Break_Optional
04ea 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xb.0x27 = 0x4ea,0x802
04eb 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x28 = 0x4eb,0x803
04ec 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x29 = 0x4ec,0x804
04ed 0fab       |    |		Execute_Immediate	Equal,-0x55					; Debug Table 0xb.0x2a = 0x4ed,0x1a
04ee 680d       |h   |		Jump_Zero	0x4fc
04ef e406       |    |		Load	0x2,0x6
04f0 e00d       |    |		Load	0x0,0xd
04f1 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
04f2 7009       |p   |		Jump_Nonzero	0x4fc
04f3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x2b = 0x4f3,0x1b
04f4 e5fc       |    |		Load	0x2,-0x4
04f5 e5ff       |    |		Load	0x2,-0x1
04f6 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
04f7 4801       |H   |		Short_Literal	0x1
04f8 e001       |    |		Load	0x0,0x1
04f9 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
04fa 00d1       |    |		Pop_Control	Pop_Count_1
04fb 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
04fc 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x2c = 0x4fc,0x1c
04fd e5fc       |    |		Load	0x2,-0x4
04fe e001       |    |		Load	0x0,0x1
04ff 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0500 4801       |H   |		Short_Literal	0x1
0501 e001       |    |		Load	0x0,0x1
0502 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
0503 00d1       |    |		Pop_Control	Pop_Count_1
0504 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0505			TRAP_0438:
0505 61be       |a   |		Indirect_Literal	Discrete,0x6c4,{0x00000000, 0x5a869503}
0506 010f       |    |		Execute	Exception,Equal
0507 6807       |h   |		Jump_Zero	0x50f
0508 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x2d = 0x508,0x1d
0509 0092 24c7  |  $ |		Action	Push_String_Extended,0x24c7					; "Bad_Call"
050b 0092 24cb  |  $ |		Action	Push_String_Extended,0x24cb					; "Edit"
050d 8222       | "  |		Call	0x1,0x22
050e 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
050f 6720       |g   |		Indirect_Literal	Discrete,0x430,{0x00000000, 0x5a851501}
0510 010f       |    |		Execute	Exception,Equal
0511 6807       |h   |		Jump_Zero	0x519
0512 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x2e = 0x512,0x1e
0513 0092 24bb  |  $ |		Action	Push_String_Extended,0x24bb					; "Not_Possible"
0515 0092 24cb  |  $ |		Action	Push_String_Extended,0x24cb					; "Edit"
0517 8222       | "  |		Call	0x1,0x22
0518 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0519 670e       |g   |		Indirect_Literal	Discrete,0x428,{0x00000000, 0x5a846501}
051a 010f       |    |		Execute	Exception,Equal
051b 7006       |p   |		Jump_Nonzero	0x522
051c 6707       |g   |		Indirect_Literal	Discrete,0x424,{0x00000000, 0x5a846502}
051d 010f       |    |		Execute	Exception,Equal
051e 7003       |p   |		Jump_Nonzero	0x522
051f 6700       |g   |		Indirect_Literal	Discrete,0x420,{0x00000000, 0x5a846503}
0520 010f       |    |		Execute	Exception,Equal
0521 6801       |h   |		Jump_Zero	0x523
0522 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0xb.0x2f = 0x522,0x1f
0523 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x30 = 0x523,0x20
0524 e009       |    |		Load	0x0,0x9
0525 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0526 0092 24cb  |  $ |		Action	Push_String_Extended,0x24cb					; "Edit"
0528 8222       | "  |		Call	0x1,0x22
0529 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
052a 0000 0000  |    |		.BLANK	0000[0x6]
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0537       | 7  |		.CONST	0x0537								; Address of begin
0531 0541       | A  |		.CONST	0x0541								; Address of exception handler
0532 0002       |    |		.CONST	0x0002								; Number of locals
0533			INIT_0530:
0533 e21e       |    |		Load	0x1,0x1e							; Debug Table 0xc = .DEBUG	0x0533,0x2f76,0x0001,0x0000,0x005a,0x8515,0x0000,0x00ec
													; Debug Table 0xc.0x0 = 0x533,0xffff
0534 0322       | "  |		Declare_Variable	Record
0535 00d8       |    |		Load_Top	At_Offset_0
0536 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0537			BODY_0530:
0537 e001       |    |		Load	0x0,0x1								; Debug Table 0xc.0x1 = 0x537,0x1
0538 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0539 e5ff       |    |		Load	0x2,-0x1
053a 8210       |    |		Call	0x1,0x10
053b 8225       | %  |		Call	0x1,0x25
053c 00d9       |    |		Load_Top	At_Offset_1
053d 017d       | }  |		Execute	Record,Structure_Write
053e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x2 = 0x53e,0x2
053f 823b       | ;  |		Call	0x1,0x3b
0540 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0541			TRAP_0530:
0541 66ee       |f   |		Indirect_Literal	Discrete,0x430,{0x00000000, 0x5a851501}
0542 010f       |    |		Execute	Exception,Equal
0543 6807       |h   |		Jump_Zero	0x54b
0544 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x3 = 0x544,0x3
0545 0092 24bb  |  $ |		Action	Push_String_Extended,0x24bb					; "Not_Possible"
0547 0092 24cc  |  $ |		Action	Push_String_Extended,0x24cc					; "Install_Stub"
0549 8222       | "  |		Call	0x1,0x22
054a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
054b 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x4 = 0x54b,0x4
054c e009       |    |		Load	0x0,0x9
054d 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
054e 0092 24cc  |  $ |		Action	Push_String_Extended,0x24cc					; "Install_Stub"
0550 8222       | "  |		Call	0x1,0x22
0551 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0552 0000 0000  |    |		.BLANK	0000[0x6]
0558 ; --------------------------------------------------------------------------------------
0558 ; SUBPROGRAM
0558 ; --------------------------------------------------------------------------------------
0558 055b       | [  |		.CONST	0x055b								; Address of begin
0559 0004       |    |		.CONST	0x0004								; Address of exception handler
055a 0001       |    |		.CONST	0x0001								; Number of locals
055b			BODY_0558:
055b			INIT_0558:
055b 4603       |F   |		Jump_Case	0x4							; Debug Table 0xd = .DEBUG	0x055b,0x2f82,0x0005,0x0000,0x005a,0x8515,0x0000,0x00fa
055c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
055d 7802       |x   |		Jump	0x560								; case 0x1
055e 7805       |x   |		Jump	0x564								; case 0x2
055f 7809       |x   |		Jump	0x569								; case 0x3
0560 00da       |    |		Load_Top	At_Offset_2
0561 0091 24ab  |  $ |		Action	Push_String_Extended_Indexed,0x24ab				; "SUCCESSFUL"
0563 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0564 00db       |    |		Load_Top	At_Offset_3
0565 00db       |    |		Load_Top	At_Offset_3
0566 00e0       |    |		Load_Encached	Standard_Cache
0567 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0568 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0569 00da       |    |		Load_Top	At_Offset_2
056a 00e0       |    |		Load_Encached	Standard_Cache
056b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
056c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
056d 0000 0000  |    |		.XXX[0x3]
056f 0000       |    |
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0573       | s  |		.CONST	0x0573								; Address of begin
0571 0004       |    |		.CONST	0x0004								; Address of exception handler
0572 0001       |    |		.CONST	0x0001								; Number of locals
0573			BODY_0570:
0573			INIT_0570:
0573 0007       |    |		Action	Break_Optional							; Debug Table 0xe = .DEBUG	0x0573,0x2f84,0x0002,0x0000,0x005a,0x8515,0x0000,0x0104
													; Debug Table 0xe.0x0 = 0x573,0x1
0574 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xe.0x1 = 0x574,0x401
0575 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2				; Debug Table 0xe.0x2 = 0x575,0x1
0576 0000 0000  |    |		.XXX[0x2]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b       | {  |		.CONST	0x057b								; Address of begin
0579 0004       |    |		.CONST	0x0004								; Address of exception handler
057a 0001       |    |		.CONST	0x0001								; Number of locals
057b			BODY_0578:
057b			INIT_0578:
057b e00e       |    |		Load	0x0,0xe								; Debug Table 0xf = .DEBUG	0x057b,0x2f8c,0x0001,0x0000,0x005a,0x8515,0x0000,0x0117
													; Debug Table 0xf.0x0 = 0x57b,0x1
057c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
057d c5fe       |    |		Store	0x2,-0x2
057e 0007       |    |		Action	Break_Optional							; Debug Table 0xf.0x1 = 0x57e,0x2
057f 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xf.0x2 = 0x57f,0x401
0580 a5fd       |    |		Store_Unchecked	0x2,-0x3						; Debug Table 0xf.0x3 = 0x580,0x2
0581 0007       |    |		Action	Break_Optional							; Debug Table 0xf.0x4 = 0x581,0x3
0582 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xf.0x5 = 0x582,0x801
0583 a5fc       |    |		Store_Unchecked	0x2,-0x4						; Debug Table 0xf.0x6 = 0x583,0x3
0584 4800       |H   |		Short_Literal	0x0							; Debug Table 0xf.0x7 = 0x584,0x4
0585 a5fb       |    |		Store_Unchecked	0x2,-0x5
0586 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0587 0000       |    |		.XXX[0x1]
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 059e       |    |		.CONST	0x059e								; Address of begin
0589 05c0       |    |		.CONST	0x05c0								; Address of exception handler
058a 000a       |    |		.CONST	0x000a								; Number of locals
058b			INIT_0588:
058b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x10 = .DEBUG	0x058b,0x2f9e,0x2801,0x0002,0x005a,0x8515,0x0000,0x0139
													; Debug Table 0x10.0x0 = 0x58b,0xffff
058c 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x10.0x1 = 0x58c,0xfffe
058d 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x10.0x2 = 0x58d,0xfffd
058e 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x10.0x3 = 0x58e,0xfffc
058f 00c6       |    |		Action	Check_Subprogram_Elaborated
0590 e5fc       |    |		Load	0x2,-0x4
0591 0335       | 5  |		Declare_Variable	Array,Duplicate
0592 00d0       |    |		Action	Swap_Control
0593 00d1       |    |		Pop_Control	Pop_Count_1
0594 4ffd       |O   |		Short_Literal	-0x3
0595 4802       |H   |		Short_Literal	0x2
0596 0099       |    |		Action	Reference_Dynamic
0597 4ffe       |O   |		Short_Literal	-0x2
0598 4802       |H   |		Short_Literal	0x2
0599 0099       |    |		Action	Reference_Dynamic
059a 6125       |a%  |		Indirect_Literal	Discrete,0x6c0,{0x00000000, 0x005a86a5}
059b 6120       |a   |		Indirect_Literal	Discrete,0x6bc,{0x00000000, 0x000011b2}
059c 480a       |H   |		Short_Literal	0xa
059d 0007       |    |		Action	Break_Optional
059e			BODY_0588:
059e 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x10.0x4 = 0x59e,0x1
059f 00e3       |    |		Load_Encached	Natural_Cache
05a0 00ec       |    |		Load_Encached	Diana_Tree_Cache
05a1 e5f9       |    |		Load	0x2,-0x7
05a2 e001       |    |		Load	0x0,0x1
05a3 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
05a4 c402       |    |		Store	0x2,0x2
05a5 c403       |    |		Store	0x2,0x3
05a6 c404       |    |		Store	0x2,0x4
05a7 e404       |    |		Load	0x2,0x4								; Debug Table 0x10.0x5 = 0x5a7,0x2
05a8 7003       |p   |		Jump_Nonzero	0x5ac
05a9 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x6 = 0x5a9,0x3
05aa a5f7       |    |		Store_Unchecked	0x2,-0x9
05ab 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9					; Debug Table 0x10.0x7 = 0x5ab,0x4
05ac e219       |    |		Load	0x1,0x19							; Debug Table 0x10.0x8 = 0x5ac,0x5
05ad e402       |    |		Load	0x2,0x2
05ae e5f8       |    |		Load	0x2,-0x8
05af e5fa       |    |		Load	0x2,-0x6
05b0 e5fb       |    |		Load	0x2,-0x5
05b1 e403       |    |		Load	0x2,0x3
05b2 e405       |    |		Load	0x2,0x5
05b3 4806       |H   |		Short_Literal	0x6
05b4 4802       |H   |		Short_Literal	0x2
05b5 0099       |    |		Action	Reference_Dynamic
05b6 4807       |H   |		Short_Literal	0x7
05b7 4802       |H   |		Short_Literal	0x2
05b8 0099       |    |		Action	Reference_Dynamic
05b9 4808       |H   |		Short_Literal	0x8
05ba 4802       |H   |		Short_Literal	0x2
05bb 0099       |    |		Action	Reference_Dynamic
05bc 821d       |    |		Call	0x1,0x1d
05bd c402       |    |		Store	0x2,0x2
05be c5f7       |    |		Store	0x2,-0x9
05bf 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
05c0			TRAP_0588:
05c0 666f       |fo  |		Indirect_Literal	Discrete,0x430,{0x00000000, 0x5a851501}
05c1 010f       |    |		Execute	Exception,Equal
05c2 6809       |h   |		Jump_Zero	0x5cc
05c3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0x9 = 0x5c3,0x6
05c4 0092 24bb  |  $ |		Action	Push_String_Extended,0x24bb					; "Not_Possible"
05c6 0092 24cd  |  $ |		Action	Push_String_Extended,0x24cd					; "Target.Insert_At_Cursor"
05c8 8222       | "  |		Call	0x1,0x22
05c9 4805       |H   |		Short_Literal	0x5							; Debug Table 0x10.0xa = 0x5c9,0x7
05ca a5f7       |    |		Store_Unchecked	0x2,-0x9
05cb 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
05cc 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0xb = 0x5cc,0x8
05cd e009       |    |		Load	0x0,0x9
05ce 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
05cf 0092 24cd  |  $ |		Action	Push_String_Extended,0x24cd					; "Target.Insert_At_Cursor"
05d1 8222       | "  |		Call	0x1,0x22
05d2 4805       |H   |		Short_Literal	0x5							; Debug Table 0x10.0xc = 0x5d2,0x9
05d3 a5f7       |    |		Store_Unchecked	0x2,-0x9
05d4 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
05d5 0000 0000  |    |		.XXX[0x3]
05d7 0000       |    |
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05f2       |    |		.CONST	0x05f2								; Address of begin
05d9 0672       | r  |		.CONST	0x0672								; Address of exception handler
05da 000c       |    |		.CONST	0x000c								; Number of locals
05db			INIT_05d8:
05db 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x11 = .DEBUG	0x05db,0x2fba,0x2801,0x0002,0x005a,0x8515,0x0000,0x0192
													; Debug Table 0x11.0x0 = 0x5db,0xffff
05dc 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x11.0x1 = 0x5dc,0xfffe
05dd e219       |    |		Load	0x1,0x19							; Debug Table 0x11.0x2 = 0x5dd,0xfffd
05de 0007       |    |		Action	Break_Optional
05df e241       | A  |		Load	0x1,0x41							; Debug Table 0x11.0x3 = 0x5df,0xfffc
05e0 02ff       |    |		Declare_Variable	Variant_Record
05e1 00d8       |    |		Load_Top	At_Offset_0
05e2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05e3 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x11.0x4 = 0x5e3,0xfffb
05e4 e001       |    |		Load	0x0,0x1								; Debug Table 0x11.0x5 = 0x5e4,0xfffa
05e5 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
05e6 0322       | "  |		Declare_Variable	Record
05e7 029f 2403  |  $ |		Declare_Subprogram	INIT_2400,For_Call				; Debug Table 0x11.0x6 = 0x5e7,0xfff9
05e9 1d53       | S  |		Execute_Immediate	Reference_Lex_1,0x53				; Debug Table 0x11.0x7 = 0x5e9,0xfff8
05ea 00c6       |    |		Action	Check_Subprogram_Elaborated
05eb 4ffe       |O   |		Short_Literal	-0x2
05ec 4802       |H   |		Short_Literal	0x2
05ed 0099       |    |		Action	Reference_Dynamic
05ee 60d1       |`   |		Indirect_Literal	Discrete,0x6c0,{0x00000000, 0x005a86a5}
05ef 60c8       |`   |		Indirect_Literal	Discrete,0x6b8,{0x00000000, 0x000012ad}
05f0 480c       |H   |		Short_Literal	0xc
05f1 0007       |    |		Action	Break_Optional
05f2			BODY_05d8:
05f2 4805       |H   |		Short_Literal	0x5							; Debug Table 0x11.0x8 = 0x5f2,0x1
05f3 a5f6       |    |		Store_Unchecked	0x2,-0xa
05f4 e5f7       |    |		Load	0x2,-0x9							; Debug Table 0x11.0x9 = 0x5f4,0x2
05f5 e002       |    |		Load	0x0,0x2
05f6 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
05f7 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
05f8 680d       |h   |		Jump_Zero	0x606
05f9 e219       |    |		Load	0x1,0x19							; Debug Table 0x11.0xa = 0x5f9,0x3
05fa e405       |    |		Load	0x2,0x5
05fb e5f7       |    |		Load	0x2,-0x9
05fc e5f9       |    |		Load	0x2,-0x7
05fd e5fa       |    |		Load	0x2,-0x6
05fe e5fb       |    |		Load	0x2,-0x5
05ff 8248       | H  |		Call	0x1,0x48
0600 c5f7       |    |		Store	0x2,-0x9
0601 00d1       |    |		Pop_Control	Pop_Count_1
0602 c404       |    |		Store	0x2,0x4
0603 e404       |    |		Load	0x2,0x4								; Debug Table 0x11.0xb = 0x603,0x4
0604 8243       | C  |		Call	0x1,0x43
0605 7808       |x   |		Jump	0x60e
0606 e405       |    |		Load	0x2,0x5								; Debug Table 0x11.0xc = 0x606,0x5
0607 e5f7       |    |		Load	0x2,-0x9
0608 e5f9       |    |		Load	0x2,-0x7
0609 e5fa       |    |		Load	0x2,-0x6
060a e5fb       |    |		Load	0x2,-0x5
060b 824a       | J  |		Call	0x1,0x4a
060c c5f7       |    |		Store	0x2,-0x9
060d 00d1       |    |		Pop_Control	Pop_Count_1
060e e219       |    |		Load	0x1,0x19							; Debug Table 0x11.0xd = 0x60e,0x6
060f 00ec       |    |		Load_Encached	Diana_Tree_Cache
0610 8408       |    |		Call	0x2,0x8
0611 c402       |    |		Store	0x2,0x2
0612 c404       |    |		Store	0x2,0x4
0613 e404       |    |		Load	0x2,0x4								; Debug Table 0x11.0xe = 0x613,0x7
0614 8243       | C  |		Call	0x1,0x43
0615 e219       |    |		Load	0x1,0x19							; Debug Table 0x11.0xf = 0x615,0x8
0616 e402       |    |		Load	0x2,0x2
0617 e405       |    |		Load	0x2,0x5
0618 824b       | K  |		Call	0x1,0x4b
0619 c402       |    |		Store	0x2,0x2
061a c404       |    |		Store	0x2,0x4
061b e404       |    |		Load	0x2,0x4								; Debug Table 0x11.0x10 = 0x61b,0x9
061c 8243       | C  |		Call	0x1,0x43
061d e219       |    |		Load	0x1,0x19							; Debug Table 0x11.0x11 = 0x61d,0xa
061e e405       |    |		Load	0x2,0x5
061f e402       |    |		Load	0x2,0x2
0620 824d       | M  |		Call	0x1,0x4d
0621 00d1       |    |		Pop_Control	Pop_Count_1
0622 c404       |    |		Store	0x2,0x4
0623 e404       |    |		Load	0x2,0x4								; Debug Table 0x11.0x12 = 0x623,0xb
0624 8243       | C  |		Call	0x1,0x43
0625 e405       |    |		Load	0x2,0x5								; Debug Table 0x11.0x13 = 0x625,0xc
0626 e5fc       |    |		Load	0x2,-0x4
0627 e404       |    |		Load	0x2,0x4
0628 8250       | P  |		Call	0x1,0x50
0629 00d1       |    |		Pop_Control	Pop_Count_1
062a e404       |    |		Load	0x2,0x4								; Debug Table 0x11.0x14 = 0x62a,0xd
062b 6803       |h   |		Jump_Zero	0x62f
062c e404       |    |		Load	0x2,0x4								; Debug Table 0x11.0x15 = 0x62c,0xe
062d a5f6       |    |		Store_Unchecked	0x2,-0xa
062e 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9					; Debug Table 0x11.0x16 = 0x62e,0xf
062f e405       |    |		Load	0x2,0x5								; Debug Table 0x11.0x17 = 0x62f,0x10
0630 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0631 4602       |F   |		Jump_Case	0x3
0632 783a       |x:  |		Jump	0x66d								; case 0x0
0633 7809       |x   |		Jump	0x63d								; case 0x1
0634 7800       |x   |		Jump	0x635								; case 0x2
0635 e405       |    |		Load	0x2,0x5								; Debug Table 0x11.0x18 = 0x635,0x11
0636 824e       | N  |		Call	0x1,0x4e
0637 00d1       |    |		Pop_Control	Pop_Count_1
0638 e001       |    |		Load	0x0,0x1								; Debug Table 0x11.0x19 = 0x638,0x12
0639 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
063a e405       |    |		Load	0x2,0x5
063b 8251       | Q  |		Call	0x1,0x51
063c 7832       |x2  |		Jump	0x66f
063d e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x11.0x1a = 0x63d,0x13
063e 6810       |h   |		Jump_Zero	0x64f
063f 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x11.0x1b = 0x63f,0x14
0640 e405       |    |		Load	0x2,0x5
0641 e5fc       |    |		Load	0x2,-0x4
0642 4809       |H   |		Short_Literal	0x9
0643 4802       |H   |		Short_Literal	0x2
0644 0099       |    |		Action	Reference_Dynamic
0645 480a       |H   |		Short_Literal	0xa
0646 4802       |H   |		Short_Literal	0x2
0647 0099       |    |		Action	Reference_Dynamic
0648 8253       | S  |		Call	0x1,0x53
0649 00d1       |    |		Pop_Control	Pop_Count_1
064a c403       |    |		Store	0x2,0x3
064b e403       |    |		Load	0x2,0x3								; Debug Table 0x11.0x1c = 0x64b,0x15
064c 0f00       |    |		Execute_Immediate	Equal,0x0
064d a406       |    |		Store_Unchecked	0x2,0x6
064e 7802       |x   |		Jump	0x651
064f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x11.0x1d = 0x64f,0x16
0650 a406       |    |		Store_Unchecked	0x2,0x6
0651 e406       |    |		Load	0x2,0x6								; Debug Table 0x11.0x1e = 0x651,0x17
0652 681c       |h   |		Jump_Zero	0x66f
0653 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x1f = 0x653,0x18
0654 e405       |    |		Load	0x2,0x5
0655 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
0656 2e09       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9
0657 e001       |    |		Load	0x0,0x1
0658 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0659 e407       |    |		Load	0x2,0x7								; Debug Table 0x11.0x20 = 0x659,0x19
065a 4801       |H   |		Short_Literal	0x1
065b 4801       |H   |		Short_Literal	0x1
065c 4800       |H   |		Short_Literal	0x0
065d e001       |    |		Load	0x0,0x1
065e 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
065f e405       |    |		Load	0x2,0x5
0660 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
0661 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
0662 e001       |    |		Load	0x0,0x1
0663 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0664 00d1       |    |		Pop_Control	Pop_Count_1
0665 e407       |    |		Load	0x2,0x7								; Debug Table 0x11.0x21 = 0x665,0x1a
0666 e405       |    |		Load	0x2,0x5
0667 8251       | Q  |		Call	0x1,0x51
0668 e407       |    |		Load	0x2,0x7								; Debug Table 0x11.0x22 = 0x668,0x1b
0669 e001       |    |		Load	0x0,0x1
066a 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
066b 00d1       |    |		Pop_Control	Pop_Count_1
066c 7802       |x   |		Jump	0x66f
066d e405       |    |		Load	0x2,0x5								; Debug Table 0x11.0x23 = 0x66d,0x1c
066e 8252       | R  |		Call	0x1,0x52
066f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x24 = 0x66f,0x1d
0670 a5f6       |    |		Store_Unchecked	0x2,-0xa
0671 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
0672			TRAP_05d8:
0672 6041       |`A  |		Indirect_Literal	Discrete,0x6b4,{0x00000000, 0x5a86a504}
0673 010f       |    |		Execute	Exception,Equal
0674 6807       |h   |		Jump_Zero	0x67c
0675 e404       |    |		Load	0x2,0x4								; Debug Table 0x11.0x25 = 0x675,0x1e
0676 a5f6       |    |		Store_Unchecked	0x2,-0xa
0677 e405       |    |		Load	0x2,0x5								; Debug Table 0x11.0x26 = 0x677,0x1f
0678 e5fc       |    |		Load	0x2,-0x4
0679 e404       |    |		Load	0x2,0x4
067a 8250       | P  |		Call	0x1,0x50
067b 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
067c 65b3       |e   |		Indirect_Literal	Discrete,0x430,{0x00000000, 0x5a851501}
067d 010f       |    |		Execute	Exception,Equal
067e 6809       |h   |		Jump_Zero	0x688
067f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x27 = 0x67f,0x20
0680 0092 24bb  |  $ |		Action	Push_String_Extended,0x24bb					; "Not_Possible"
0682 0092 24ce  |  $ |		Action	Push_String_Extended,0x24ce					; "Target.Insert_In_List"
0684 8222       | "  |		Call	0x1,0x22
0685 4805       |H   |		Short_Literal	0x5							; Debug Table 0x11.0x28 = 0x685,0x21
0686 a5f6       |    |		Store_Unchecked	0x2,-0xa
0687 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
0688 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x29 = 0x688,0x22
0689 e009       |    |		Load	0x0,0x9
068a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
068b 0092 24ce  |  $ |		Action	Push_String_Extended,0x24ce					; "Target.Insert_In_List"
068d 8222       | "  |		Call	0x1,0x22
068e 4805       |H   |		Short_Literal	0x5							; Debug Table 0x11.0x2a = 0x68e,0x23
068f a5f6       |    |		Store_Unchecked	0x2,-0xa
0690 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
0691 0000 0000  |    |		.BLANK	0000[0x7]
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 069b       |    |		.CONST	0x069b								; Address of begin
0699 0004       |    |		.CONST	0x0004								; Address of exception handler
069a 0001       |    |		.CONST	0x0001								; Number of locals
069b			BODY_0698:
069b			INIT_0698:
069b 4608       |F   |		Jump_Case	0x9							; Debug Table 0x12 = .DEBUG	0x069b,0x3012,0x0005,0x0000,0x005a,0x8695,0x0000,0x0088
069c 7808       |x   |		Jump	0x6a5								; case 0x0
069d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
069e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
069f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
06a0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
06a1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
06a2 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
06a3 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
06a4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
06a5 00da       |    |		Load_Top	At_Offset_2
06a6 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
06a7 0125       | %  |		Execute	Any,Set_Constraint
06a8 00da       |    |		Load_Top	At_Offset_2
06a9 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
06aa 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06ab 00da       |    |		Load_Top	At_Offset_2
06ac 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
06ad 0125       | %  |		Execute	Any,Set_Constraint
06ae 00da       |    |		Load_Top	At_Offset_2
06af 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
06b0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06b1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
06b2 0000 0000  |    |		.XXX[0x2]
06b4 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a86a504}
06b8 0000 0000  |    |		.LITERAL	{0x00000000, 0x000012ad}
06bc 0000 0000  |    |		.LITERAL	{0x00000000, 0x000011b2}
06c0 0000 0000  |    |		.LITERAL	{0x00000000, 0x005a86a5}
06c4 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a869503}
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 4603       |F   |		Jump_Case	0x4							; Debug Table 0x13 = .DEBUG	0x06cb,0x3014,0x0005,0x0000,0x005a,0x8695,0x0000,0x00f4
06cc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
06cd 7802       |x   |		Jump	0x6d0								; case 0x1
06ce 7805       |x   |		Jump	0x6d4								; case 0x2
06cf 7809       |x   |		Jump	0x6d9								; case 0x3
06d0 00da       |    |		Load_Top	At_Offset_2
06d1 0091 24b1  |  $ |		Action	Push_String_Extended_Indexed,0x24b1				; "DEFAULT_MODE"
06d3 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
06d4 00db       |    |		Load_Top	At_Offset_3
06d5 00db       |    |		Load_Top	At_Offset_3
06d6 00e0       |    |		Load_Encached	Standard_Cache
06d7 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
06d8 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
06d9 00da       |    |		Load_Top	At_Offset_2
06da 00e0       |    |		Load_Encached	Standard_Cache
06db 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
06dc 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
06dd 0000 0000  |    |		.XXX[0x3]
06df 0000       |    |
06e0 ; --------------------------------------------------------------------------------------
06e0 ; SUBPROGRAM
06e0 ; --------------------------------------------------------------------------------------
06e0 06e3       |    |		.CONST	0x06e3								; Address of begin
06e1 0004       |    |		.CONST	0x0004								; Address of exception handler
06e2 0001       |    |		.CONST	0x0001								; Number of locals
06e3			BODY_06e0:
06e3			INIT_06e0:
06e3 4603       |F   |		Jump_Case	0x4							; Debug Table 0x14 = .DEBUG	0x06e3,0x3016,0x0005,0x0000,0x005a,0x8695,0x0000,0x00fa
06e4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
06e5 7802       |x   |		Jump	0x6e8								; case 0x1
06e6 7805       |x   |		Jump	0x6ec								; case 0x2
06e7 7809       |x   |		Jump	0x6f1								; case 0x3
06e8 00da       |    |		Load_Top	At_Offset_2
06e9 0091 24b3  |  $ |		Action	Push_String_Extended_Indexed,0x24b3				; "NONEXISTENT"
06eb 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
06ec 00db       |    |		Load_Top	At_Offset_3
06ed 00db       |    |		Load_Top	At_Offset_3
06ee 00e0       |    |		Load_Encached	Standard_Cache
06ef 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
06f0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
06f1 00da       |    |		Load_Top	At_Offset_2
06f2 00e0       |    |		Load_Encached	Standard_Cache
06f3 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
06f4 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
06f5 0000 0000  |    |		.XXX[0x3]
06f7 0000       |    |
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 06fb       |    |		.CONST	0x06fb								; Address of begin
06f9 0004       |    |		.CONST	0x0004								; Address of exception handler
06fa 0001       |    |		.CONST	0x0001								; Number of locals
06fb			BODY_06f8:
06fb			INIT_06f8:
06fb e007       |    |		Load	0x0,0x7								; Debug Table 0x15 = .DEBUG	0x06fb,0x3018,0x0001,0x0000,0x005a,0x8695,0x0000,0x0101
													; Debug Table 0x15.0x0 = 0x6fb,0x1
06fc 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
06fd 0092 24cf  |  $ |		Action	Push_String_Extended,0x24cf					; "*** Exception in Command_Utilities."
													; Debug Table 0x15.0x1 = 0x6fd,0x2
06ff 00db       |    |		Load_Top	At_Offset_3
0700 01cc       |    |		Execute	Vector,Catenate
0701 0092 24ba  |  $ |		Action	Push_String_Extended,0x24ba					; ": "
0703 01cc       |    |		Execute	Vector,Catenate
0704 e5fe       |    |		Load	0x2,-0x2
0705 01cc       |    |		Execute	Vector,Catenate
0706 e007       |    |		Load	0x0,0x7
0707 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0708 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x15.0x2 = 0x708,0x3
0709 6802       |h   |		Jump_Zero	0x70c
070a 623d       |b=  |		Indirect_Literal	Discrete,0x948,{0x00000000, 0x5a851501}		; Debug Table 0x15.0x3 = 0x70a,0x4
070b 0257       | W  |		Execute	Discrete,Raise
070c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
070d 0000 0000  |    |		.XXX[0x3]
070f 0000       |    |
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 0714       |    |		.CONST	0x0714								; Address of begin
0711 0769       | i  |		.CONST	0x0769								; Address of exception handler
0712 0002       |    |		.CONST	0x0002								; Number of locals
0713			INIT_0710:
0713 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x16 = .DEBUG	0x0713,0x3022,0x0002,0x0000,0x005a,0x8695,0x0000,0x0133
													; Debug Table 0x16.0x0 = 0x713,0xffff
0714			BODY_0710:
0714 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x16.0x1 = 0x714,0x1
0715 e00c       |    |		Load	0x0,0xc
0716 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0717 6802       |h   |		Jump_Zero	0x71a
0718 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0x2 = 0x718,0x2
0719 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
071a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x16.0x3 = 0x71a,0x3
071b e00f       |    |		Load	0x0,0xf
071c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
071d 6805       |h   |		Jump_Zero	0x723
071e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x16.0x4 = 0x71e,0x4
071f 00eb       |    |		Load_Encached	Diana_Cache
0720 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0721 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0722 7802       |x   |		Jump	0x725
0723 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x16.0x5 = 0x723,0x5
0724 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0725 0007       |    |		Action	Break_Optional							; Debug Table 0x16.0x6 = 0x725,0x6
0726 e402       |    |		Load	0x2,0x2								; Debug Table 0x16.0x7 = 0x726,0x401
0727 0007       |    |		Action	Break_Optional
0728 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x16.0x8 = 0x728,0x402
0729 0007       |    |		Action	Break_Optional							; Debug Table 0x16.0x9 = 0x729,0x403
072a 0007       |    |		Action	Break_Optional							; Debug Table 0x16.0xa = 0x72a,0x404
072b 0bab       |    |		Execute_Immediate	Case_Compare,0xab				; Debug Table 0x16.0xb = 0x72b,0x6
072c 700e       |p   |		Jump_Nonzero	0x73b
072d 0b3e       | >  |		Execute_Immediate	Case_Compare,0x3e
072e 700e       |p   |		Jump_Nonzero	0x73d
072f 0b47       | G  |		Execute_Immediate	Case_Compare,0x47
0730 7017       |p   |		Jump_Nonzero	0x748
0731 0b46       | F  |		Execute_Immediate	Case_Compare,0x46
0732 7015       |p   |		Jump_Nonzero	0x748
0733 0b48       | H  |		Execute_Immediate	Case_Compare,0x48
0734 7013       |p   |		Jump_Nonzero	0x748
0735 0b3d       | =  |		Execute_Immediate	Case_Compare,0x3d
0736 701c       |p   |		Jump_Nonzero	0x753
0737 0b41       | A  |		Execute_Immediate	Case_Compare,0x41
0738 7025       |p%  |		Jump_Nonzero	0x75e
0739 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0xc = 0x739,0xc
073a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
073b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x16.0xd = 0x73b,0x7
073c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
073d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0xe = 0x73d,0x8
073e 00eb       |    |		Load_Encached	Diana_Cache
073f 18d8       |    |		Execute	Package,Field_Execute,Field_Number 0xd8
0740 e404       |    |		Load	0x2,0x4								; Debug Table 0x16.0xf = 0x740,0x801
0741 0007       |    |		Action	Break_Optional
0742 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x16.0x10 = 0x742,0x802
0743 0007       |    |		Action	Break_Optional							; Debug Table 0x16.0x11 = 0x743,0x803
0744 00d0       |    |		Action	Swap_Control							; Debug Table 0x16.0x12 = 0x744,0x804
0745 00d1       |    |		Pop_Control	Pop_Count_1
0746 0f77       | w  |		Execute_Immediate	Equal,0x77					; Debug Table 0x16.0x13 = 0x746,0x8
0747 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0748 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0x14 = 0x748,0x9
0749 00eb       |    |		Load_Encached	Diana_Cache
074a 18b6       |    |		Execute	Package,Field_Execute,Field_Number 0xb6
074b e404       |    |		Load	0x2,0x4								; Debug Table 0x16.0x15 = 0x74b,0xc01
074c 0007       |    |		Action	Break_Optional
074d 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x16.0x16 = 0x74d,0xc02
074e 0007       |    |		Action	Break_Optional							; Debug Table 0x16.0x17 = 0x74e,0xc03
074f 00d0       |    |		Action	Swap_Control							; Debug Table 0x16.0x18 = 0x74f,0xc04
0750 00d1       |    |		Pop_Control	Pop_Count_1
0751 0f77       | w  |		Execute_Immediate	Equal,0x77					; Debug Table 0x16.0x19 = 0x751,0x9
0752 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0753 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0x1a = 0x753,0xa
0754 00eb       |    |		Load_Encached	Diana_Cache
0755 18e4       |    |		Execute	Package,Field_Execute,Field_Number 0xe4
0756 e404       |    |		Load	0x2,0x4								; Debug Table 0x16.0x1b = 0x756,0x1001
0757 0007       |    |		Action	Break_Optional
0758 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x16.0x1c = 0x758,0x1002
0759 0007       |    |		Action	Break_Optional							; Debug Table 0x16.0x1d = 0x759,0x1003
075a 00d0       |    |		Action	Swap_Control							; Debug Table 0x16.0x1e = 0x75a,0x1004
075b 00d1       |    |		Pop_Control	Pop_Count_1
075c 0f77       | w  |		Execute_Immediate	Equal,0x77					; Debug Table 0x16.0x1f = 0x75c,0xa
075d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
075e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0x20 = 0x75e,0xb
075f 00eb       |    |		Load_Encached	Diana_Cache
0760 18cc       |    |		Execute	Package,Field_Execute,Field_Number 0xcc
0761 e404       |    |		Load	0x2,0x4								; Debug Table 0x16.0x21 = 0x761,0x1401
0762 0007       |    |		Action	Break_Optional
0763 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x16.0x22 = 0x763,0x1402
0764 0007       |    |		Action	Break_Optional							; Debug Table 0x16.0x23 = 0x764,0x1403
0765 00d0       |    |		Action	Swap_Control							; Debug Table 0x16.0x24 = 0x765,0x1404
0766 00d1       |    |		Pop_Control	Pop_Count_1
0767 0f77       | w  |		Execute_Immediate	Equal,0x77					; Debug Table 0x16.0x25 = 0x767,0xb
0768 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0769			TRAP_0710:
0769 61de       |a   |		Indirect_Literal	Discrete,0x948,{0x00000000, 0x5a851501}
076a 010f       |    |		Execute	Exception,Equal
076b 6808       |h   |		Jump_Zero	0x774
076c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x16.0x26 = 0x76c,0xd
076d 0092 24bb  |  $ |		Action	Push_String_Extended,0x24bb					; "Not_Possible"
076f 0092 24d0  |  $ |		Action	Push_String_Extended,0x24d0					; "Ada_Subobject_Possible"
0771 8222       | "  |		Call	0x1,0x22
0772 4831       |H1  |		Short_Literal	0x31
0773 0257       | W  |		Execute	Discrete,Raise
0774 4801       |H   |		Short_Literal	0x1							; Debug Table 0x16.0x27 = 0x774,0xe
0775 e009       |    |		Load	0x0,0x9
0776 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0777 0092 24d0  |  $ |		Action	Push_String_Extended,0x24d0					; "Ada_Subobject_Possible"
0779 8222       | "  |		Call	0x1,0x22
077a 4831       |H1  |		Short_Literal	0x31
077b 0257       | W  |		Execute	Discrete,Raise
077c 0000 0000  |    |		.BLANK	0000[0x4]
0780 ; --------------------------------------------------------------------------------------
0780 ; SUBPROGRAM
0780 ; --------------------------------------------------------------------------------------
0780 078f       |    |		.CONST	0x078f								; Address of begin
0781 07d9       |    |		.CONST	0x07d9								; Address of exception handler
0782 0004       |    |		.CONST	0x0004								; Number of locals
0783			INIT_0780:
0783 e002       |    |		Load	0x0,0x2								; Debug Table 0x17 = .DEBUG	0x0783,0x3074,0x0002,0x0000,0x005a,0x8695,0x0000,0x01fa
													; Debug Table 0x17.0x0 = 0x783,0xffff
0784 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0785 e002       |    |		Load	0x0,0x2								; Debug Table 0x17.0x1 = 0x785,0xfffe
0786 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0787 02c7       |    |		Declare_Variable	Any
0788 00d8       |    |		Load_Top	At_Offset_0
0789 1c00       |    |		Execute_Immediate	Run_Utility,0x0
078a e002       |    |		Load	0x0,0x2								; Debug Table 0x17.0x2 = 0x78a,0xfffd
078b 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
078c 02ff       |    |		Declare_Variable	Variant_Record
078d 00d8       |    |		Load_Top	At_Offset_0
078e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
078f			BODY_0780:
078f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x17.0x3 = 0x78f,0x1
0790 8223       | #  |		Call	0x1,0x23
0791 7003       |p   |		Jump_Nonzero	0x795
0792 e002       |    |		Load	0x0,0x2								; Debug Table 0x17.0x4 = 0x792,0x2
0793 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0794 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0795 e002       |    |		Load	0x0,0x2								; Debug Table 0x17.0x5 = 0x795,0x3
0796 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0797 00da       |    |		Load_Top	At_Offset_2
0798 0120       |    |		Execute	Any,Is_Value
0799 6803       |h   |		Jump_Zero	0x79d
079a e002       |    |		Load	0x0,0x2
079b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
079c 7801       |x   |		Jump	0x79e
079d 00da       |    |		Load_Top	At_Offset_2
079e 61a5       |a   |		Indirect_Literal	Discrete,0x944,{0x00000000, 0x00004000}
079f e004       |    |		Load	0x0,0x4
07a0 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
07a1 4801       |H   |		Short_Literal	0x1
07a2 e002       |    |		Load	0x0,0x2
07a3 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
07a4 e5ff       |    |		Load	0x2,-0x1
07a5 e002       |    |		Load	0x0,0x2
07a6 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
07a7 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
07a8 c403       |    |		Store	0x2,0x3
07a9 005b       | [  |		Store_Top	Discrete,At_Offset_3
07aa 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x17.0x6 = 0x7aa,0x4
07ab 460e       |F   |		Jump_Case	0xf
07ac 7818       |x   |		Jump	0x7c5								; case 0x0
07ad 7813       |x   |		Jump	0x7c1								; case 0x1
07ae 7812       |x   |		Jump	0x7c1								; case 0x2
07af 7811       |x   |		Jump	0x7c1								; case 0x3
07b0 7810       |x   |		Jump	0x7c1								; case 0x4
07b1 7809       |x   |		Jump	0x7bb								; case 0x5
07b2 7808       |x   |		Jump	0x7bb								; case 0x6
07b3 780a       |x   |		Jump	0x7be								; case 0x7
07b4 780c       |x   |		Jump	0x7c1								; case 0x8
07b5 780b       |x   |		Jump	0x7c1								; case 0x9
07b6 780a       |x   |		Jump	0x7c1								; case 0xa
07b7 7809       |x   |		Jump	0x7c1								; case 0xb
07b8 7808       |x   |		Jump	0x7c1								; case 0xc
07b9 7807       |x   |		Jump	0x7c1								; case 0xd
07ba 7806       |x   |		Jump	0x7c1								; case 0xe
07bb e002       |    |		Load	0x0,0x2								; Debug Table 0x17.0x7 = 0x7bb,0x6
07bc 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
07bd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07be e002       |    |		Load	0x0,0x2								; Debug Table 0x17.0x8 = 0x7be,0x7
07bf 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
07c0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07c1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x17.0x9 = 0x7c1,0x8
07c2 0092 24ca  |  $ |		Action	Push_String_Extended,0x24ca					; "Traversal.Get_Object"
07c4 820f       |    |		Call	0x1,0xf
07c5 e002       |    |		Load	0x0,0x2								; Debug Table 0x17.0xa = 0x7c5,0x9
07c6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
07c7 00d9       |    |		Load_Top	At_Offset_1
07c8 617b       |a{  |		Indirect_Literal	Discrete,0x944,{0x00000000, 0x00004000}
07c9 e004       |    |		Load	0x0,0x4
07ca 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
07cb 4800       |H   |		Short_Literal	0x0
07cc e403       |    |		Load	0x2,0x3
07cd e002       |    |		Load	0x0,0x2
07ce 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
07cf 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
07d0 00d1       |    |		Pop_Control	Pop_Count_1
07d1 005b       | [  |		Store_Top	Discrete,At_Offset_3
07d2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x17.0xb = 0x7d2,0xa
07d3 7002       |p   |		Jump_Nonzero	0x7d6
07d4 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x17.0xc = 0x7d4,0xb
07d5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07d6 e002       |    |		Load	0x0,0x2								; Debug Table 0x17.0xd = 0x7d6,0xc
07d7 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
07d8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07d9			TRAP_0780:
07d9 616e       |an  |		Indirect_Literal	Discrete,0x948,{0x00000000, 0x5a851501}
07da 010f       |    |		Execute	Exception,Equal
07db 6802       |h   |		Jump_Zero	0x7de
07dc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0xe = 0x7dc,0xd
07dd 0101       |    |		Execute	Exception,Reraise
07de 4801       |H   |		Short_Literal	0x1							; Debug Table 0x17.0xf = 0x7de,0xe
07df e009       |    |		Load	0x0,0x9
07e0 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
07e1 0092 24d1  |  $ |		Action	Push_String_Extended,0x24d1					; "Get_Child_Object"
07e3 8222       | "  |		Call	0x1,0x22
07e4 4831       |H1  |		Short_Literal	0x31
07e5 0257       | W  |		Execute	Discrete,Raise
07e6 0000 0000  |    |		.XXX[0x2]
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 0806       |    |		.CONST	0x0806								; Address of begin
07e9 0899       |    |		.CONST	0x0899								; Address of exception handler
07ea 0007       |    |		.CONST	0x0007								; Number of locals
07eb			INIT_07e8:
07eb e21e       |    |		Load	0x1,0x1e							; Debug Table 0x18 = .DEBUG	0x07eb,0x3096,0x0002,0x0000,0x005a,0x8695,0x0000,0x0293
													; Debug Table 0x18.0x0 = 0x7eb,0xffff
07ec 0322       | "  |		Declare_Variable	Record
07ed 00d8       |    |		Load_Top	At_Offset_0
07ee 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07ef e002       |    |		Load	0x0,0x2								; Debug Table 0x18.0x1 = 0x7ef,0xfffe
07f0 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
07f1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
07f2 02c7       |    |		Declare_Variable	Any
07f3 00d8       |    |		Load_Top	At_Offset_0
07f4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07f5 e002       |    |		Load	0x0,0x2								; Debug Table 0x18.0x2 = 0x7f5,0xfffd
07f6 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
07f7 02ff       |    |		Declare_Variable	Variant_Record
07f8 00d8       |    |		Load_Top	At_Offset_0
07f9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07fa e002       |    |		Load	0x0,0x2								; Debug Table 0x18.0x3 = 0x7fa,0xfffc
07fb 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
07fc 02ff       |    |		Declare_Variable	Variant_Record
07fd 00d8       |    |		Load_Top	At_Offset_0
07fe 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07ff e002       |    |		Load	0x0,0x2								; Debug Table 0x18.0x4 = 0x7ff,0xfffb
0800 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0801 02c7       |    |		Declare_Variable	Any
0802 00d8       |    |		Load_Top	At_Offset_0
0803 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0804 e002       |    |		Load	0x0,0x2								; Debug Table 0x18.0x5 = 0x804,0xfffa
0805 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0806			BODY_07e8:
0806 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0x6 = 0x806,0x1
0807 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0808 0007       |    |		Action	Break_Optional
0809 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x7 = 0x809,0x401
080a 021d       |    |		Execute	Heap_Access,Is_Null
080b 00d0       |    |		Action	Swap_Control
080c 00d1       |    |		Pop_Control	Pop_Count_1
080d 6802       |h   |		Jump_Zero	0x810							; Debug Table 0x18.0x8 = 0x80d,0x1
080e e21f       |    |		Load	0x1,0x1f							; Debug Table 0x18.0x9 = 0x80e,0x2
080f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0810 4800       |H   |		Short_Literal	0x0							; Debug Table 0x18.0xa = 0x810,0x3
0811 e402       |    |		Load	0x2,0x2
0812 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0813 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0xb = 0x813,0x4
0814 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0815 e402       |    |		Load	0x2,0x2
0816 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0817 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0xc = 0x817,0x5
0818 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0819 e402       |    |		Load	0x2,0x2
081a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
081b e002       |    |		Load	0x0,0x2								; Debug Table 0x18.0xd = 0x81b,0x6
081c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
081d e403       |    |		Load	0x2,0x3
081e 0120       |    |		Execute	Any,Is_Value
081f 6804       |h   |		Jump_Zero	0x824
0820 e002       |    |		Load	0x0,0x2
0821 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0822 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0823 7801       |x   |		Jump	0x825
0824 e403       |    |		Load	0x2,0x3
0825 e402       |    |		Load	0x2,0x2
0826 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0827 e002       |    |		Load	0x0,0x2
0828 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0829 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
082a c403       |    |		Store	0x2,0x3
082b 0059       | Y  |		Store_Top	Discrete,At_Offset_1
082c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0xe = 0x82c,0x7
082d 0092 24bf  |  $ |		Action	Push_String_Extended,0x24bf					; "Ada.Get_Unit"
082f 820f       |    |		Call	0x1,0xf
0830 e403       |    |		Load	0x2,0x3								; Debug Table 0x18.0xf = 0x830,0x8
0831 e002       |    |		Load	0x0,0x2
0832 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0833 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0834 e402       |    |		Load	0x2,0x2
0835 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0836 e402       |    |		Load	0x2,0x2								; Debug Table 0x18.0x10 = 0x836,0x9
0837 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0838 e001       |    |		Load	0x0,0x1
0839 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
083a e402       |    |		Load	0x2,0x2
083b 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
083c e002       |    |		Load	0x0,0x2								; Debug Table 0x18.0x11 = 0x83c,0xa
083d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
083e e002       |    |		Load	0x0,0x2
083f 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0840 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0841 6102       |a   |		Indirect_Literal	Discrete,0x944,{0x00000000, 0x00004000}
0842 e004       |    |		Load	0x0,0x4
0843 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0844 e402       |    |		Load	0x2,0x2
0845 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0846 e002       |    |		Load	0x0,0x2
0847 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0848 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0849 e402       |    |		Load	0x2,0x2
084a 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
084b 0059       | Y  |		Store_Top	Discrete,At_Offset_1
084c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x12 = 0x84c,0xb
084d 0092 24d2  |  $ |		Action	Push_String_Extended,0x24d2					; "Decl_Ops.Get_Unit_State"
084f 820f       |    |		Call	0x1,0xf
0850 e402       |    |		Load	0x2,0x2								; Debug Table 0x18.0x13 = 0x850,0xc
0851 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0852 0f01       |    |		Execute_Immediate	Equal,0x1
0853 682a       |h*  |		Jump_Zero	0x87e
0854 e002       |    |		Load	0x0,0x2								; Debug Table 0x18.0x14 = 0x854,0xd
0855 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0856 e404       |    |		Load	0x2,0x4
0857 e402       |    |		Load	0x2,0x2
0858 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0859 e002       |    |		Load	0x0,0x2
085a 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
085b 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
085c 00d1       |    |		Pop_Control	Pop_Count_1
085d 0059       | Y  |		Store_Top	Discrete,At_Offset_1
085e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x15 = 0x85e,0xe
085f 0092 24d3  |  $ |		Action	Push_String_Extended,0x24d3					; "Ada.Get_Version"
0861 820f       |    |		Call	0x1,0xf
0862 e002       |    |		Load	0x0,0x2								; Debug Table 0x18.0x16 = 0x862,0xf
0863 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0864 00db       |    |		Load_Top	At_Offset_3
0865 60de       |`   |		Indirect_Literal	Discrete,0x944,{0x00000000, 0x00004000}
0866 e004       |    |		Load	0x0,0x4
0867 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0868 4800       |H   |		Short_Literal	0x0
0869 e402       |    |		Load	0x2,0x2
086a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
086b e002       |    |		Load	0x0,0x2
086c 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
086d 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
086e 00d1       |    |		Pop_Control	Pop_Count_1
086f 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0870 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x17 = 0x870,0x10
0871 0092 24c3  |  $ |		Action	Push_String_Extended,0x24c3					; "Traversal.Get_Version"
0873 820f       |    |		Call	0x1,0xf
0874 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x18 = 0x874,0x11
0875 00db       |    |		Load_Top	At_Offset_3
0876 016e       | n  |		Execute	Variant_Record,Not_Equal
0877 6806       |h   |		Jump_Zero	0x87e
0878 0092 24d4  |  $ |		Action	Push_String_Extended,0x24d4					; "Command failed - unit is a deleted version"
													; Debug Table 0x18.0x19 = 0x878,0x12
087a e00a       |    |		Load	0x0,0xa
087b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
087c 60cb       |`   |		Indirect_Literal	Discrete,0x948,{0x00000000, 0x5a851501}		; Debug Table 0x18.0x1a = 0x87c,0x13
087d 0257       | W  |		Execute	Discrete,Raise
087e e402       |    |		Load	0x2,0x2								; Debug Table 0x18.0x1b = 0x87e,0x14
087f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0880 8224       | $  |		Call	0x1,0x24
0881 e402       |    |		Load	0x2,0x2
0882 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0883 e002       |    |		Load	0x0,0x2								; Debug Table 0x18.0x1c = 0x883,0x15
0884 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0885 e002       |    |		Load	0x0,0x2
0886 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0887 60bc       |`   |		Indirect_Literal	Discrete,0x944,{0x00000000, 0x00004000}
0888 e004       |    |		Load	0x0,0x4
0889 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
088a 4800       |H   |		Short_Literal	0x0
088b e402       |    |		Load	0x2,0x2
088c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
088d e002       |    |		Load	0x0,0x2
088e 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
088f 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0890 e402       |    |		Load	0x2,0x2
0891 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0892 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0893 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x1d = 0x893,0x16
0894 0092 24c0  |  $ |		Action	Push_String_Extended,0x24c0					; "Traversal.Get_Declaration"
0896 820f       |    |		Call	0x1,0xf
0897 e402       |    |		Load	0x2,0x2								; Debug Table 0x18.0x1e = 0x897,0x17
0898 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0899			TRAP_07e8:
0899 60a6       |`   |		Indirect_Literal	Discrete,0x940,{0x00000000, 0x5a846502}
089a 010f       |    |		Execute	Exception,Equal
089b 6806       |h   |		Jump_Zero	0x8a2
089c e001       |    |		Load	0x0,0x1								; Debug Table 0x18.0x1f = 0x89c,0x18
089d 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
089e e402       |    |		Load	0x2,0x2
089f 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
08a0 e402       |    |		Load	0x2,0x2								; Debug Table 0x18.0x20 = 0x8a0,0x19
08a1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08a2 60a5       |`   |		Indirect_Literal	Discrete,0x948,{0x00000000, 0x5a851501}
08a3 010f       |    |		Execute	Exception,Equal
08a4 6802       |h   |		Jump_Zero	0x8a7
08a5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x21 = 0x8a5,0x1a
08a6 0101       |    |		Execute	Exception,Reraise
08a7 4801       |H   |		Short_Literal	0x1							; Debug Table 0x18.0x22 = 0x8a7,0x1b
08a8 e009       |    |		Load	0x0,0x9
08a9 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
08aa 0092 24d5  |  $ |		Action	Push_String_Extended,0x24d5					; "Get_Descriptor"
08ac 8222       | "  |		Call	0x1,0x22
08ad 4831       |H1  |		Short_Literal	0x31
08ae 0257       | W  |		Execute	Discrete,Raise
08af 0000       |    |		.XXX[0x1]
08b0 ; --------------------------------------------------------------------------------------
08b0 ; SUBPROGRAM
08b0 ; --------------------------------------------------------------------------------------
08b0 08b6       |    |		.CONST	0x08b6								; Address of begin
08b1 08c8       |    |		.CONST	0x08c8								; Address of exception handler
08b2 0003       |    |		.CONST	0x0003								; Number of locals
08b3			INIT_08b0:
08b3 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x19 = .DEBUG	0x08b3,0x30de,0x0002,0x0000,0x005a,0x8695,0x0000,0x03a2
													; Debug Table 0x19.0x0 = 0x8b3,0xffff
08b4 e002       |    |		Load	0x0,0x2								; Debug Table 0x19.0x1 = 0x8b4,0xfffe
08b5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08b6			BODY_08b0:
08b6 e002       |    |		Load	0x0,0x2								; Debug Table 0x19.0x2 = 0x8b6,0x1
08b7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08b8 00e1       |    |		Load_Encached	Boolean_Cache
08b9 608a       |`   |		Indirect_Literal	Discrete,0x944,{0x00000000, 0x00004000}
08ba e004       |    |		Load	0x0,0x4
08bb 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
08bc e5ff       |    |		Load	0x2,-0x1
08bd e002       |    |		Load	0x0,0x2
08be 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
08bf 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
08c0 005b       | [  |		Store_Top	Discrete,At_Offset_3
08c1 0059       | Y  |		Store_Top	Discrete,At_Offset_1
08c2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x3 = 0x8c2,0x2
08c3 0092 24d6  |  $ |		Action	Push_String_Extended,0x24d6					; "Object_Ops.Is_Slushy"
08c5 820f       |    |		Call	0x1,0xf
08c6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0x4 = 0x8c6,0x3
08c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08c8			TRAP_08b0:
08c8 607f       |`   |		Indirect_Literal	Discrete,0x948,{0x00000000, 0x5a851501}
08c9 010f       |    |		Execute	Exception,Equal
08ca 6802       |h   |		Jump_Zero	0x8cd
08cb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x5 = 0x8cb,0x4
08cc 0101       |    |		Execute	Exception,Reraise
08cd 4801       |H   |		Short_Literal	0x1							; Debug Table 0x19.0x6 = 0x8cd,0x5
08ce e009       |    |		Load	0x0,0x9
08cf 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
08d0 0092 24d7  |  $ |		Action	Push_String_Extended,0x24d7					; "Is_Slushy"
08d2 8222       | "  |		Call	0x1,0x22
08d3 4831       |H1  |		Short_Literal	0x31
08d4 0257       | W  |		Execute	Discrete,Raise
08d5 0000 0000  |    |		.XXX[0x3]
08d7 0000       |    |
08d8 ; --------------------------------------------------------------------------------------
08d8 ; SUBPROGRAM
08d8 ; --------------------------------------------------------------------------------------
08d8 08dd       |    |		.CONST	0x08dd								; Address of begin
08d9 0933       | 3  |		.CONST	0x0933								; Address of exception handler
08da 0002       |    |		.CONST	0x0002								; Number of locals
08db			INIT_08d8:
08db e002       |    |		Load	0x0,0x2								; Debug Table 0x1a = .DEBUG	0x08db,0x30ee,0x0001,0x0000,0x005a,0x8695,0x0000,0x03dc
													; Debug Table 0x1a.0x0 = 0x8db,0xffff
08dc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08dd			BODY_08d8:
08dd 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1a.0x1 = 0x8dd,0x1
08de a5fe       |    |		Store_Unchecked	0x2,-0x2
08df e002       |    |		Load	0x0,0x2								; Debug Table 0x1a.0x2 = 0x8df,0x2
08e0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08e1 4800       |H   |		Short_Literal	0x0
08e2 e004       |    |		Load	0x0,0x4
08e3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
08e4 4800       |H   |		Short_Literal	0x0
08e5 e5ff       |    |		Load	0x2,-0x1
08e6 e002       |    |		Load	0x0,0x2
08e7 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
08e8 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
08e9 0059       | Y  |		Store_Top	Discrete,At_Offset_1
08ea 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0x3 = 0x8ea,0x3
08eb 460e       |F   |		Jump_Case	0xf
08ec 780e       |x   |		Jump	0x8fb								; case 0x0
08ed 7810       |x   |		Jump	0x8fe								; case 0x1
08ee 783f       |x?  |		Jump	0x92e								; case 0x2
08ef 783e       |x>  |		Jump	0x92e								; case 0x3
08f0 783d       |x=  |		Jump	0x92e								; case 0x4
08f1 783c       |x<  |		Jump	0x92e								; case 0x5
08f2 783b       |x;  |		Jump	0x92e								; case 0x6
08f3 783a       |x:  |		Jump	0x92e								; case 0x7
08f4 7839       |x9  |		Jump	0x92e								; case 0x8
08f5 7838       |x8  |		Jump	0x92e								; case 0x9
08f6 780d       |x   |		Jump	0x904								; case 0xa
08f7 7819       |x   |		Jump	0x911								; case 0xb
08f8 7835       |x5  |		Jump	0x92e								; case 0xc
08f9 7834       |x4  |		Jump	0x92e								; case 0xd
08fa 7833       |x3  |		Jump	0x92e								; case 0xe
08fb 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1a.0x4 = 0x8fb,0x4
08fc a5fe       |    |		Store_Unchecked	0x2,-0x2
08fd 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
08fe 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x5 = 0x8fe,0x5
08ff 0092 24d8  |  $ |		Action	Push_String_Extended,0x24d8					; "Operation"
0901 e008       |    |		Load	0x0,0x8
0902 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0903 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0904 0092 24d9  |  $ |		Action	Push_String_Extended,0x24d9					; "Operation failed - could not backup "
													; Debug Table 0x1a.0x6 = 0x904,0x6
0906 e5ff       |    |		Load	0x2,-0x1
0907 e002       |    |		Load	0x0,0x2
0908 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0909 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
090a 01cc       |    |		Execute	Vector,Catenate
090b 0092 24da  |  $ |		Action	Push_String_Extended,0x24da					; " due to access error"
090d 01cc       |    |		Execute	Vector,Catenate
090e e00a       |    |		Load	0x0,0xa
090f 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0910 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0911 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x7 = 0x911,0x7
0912 8226       | &  |		Call	0x1,0x26
0913 680d       |h   |		Jump_Zero	0x921
0914 0092 24db  |  $ |		Action	Push_String_Extended,0x24db					; "Operation failed - "
													; Debug Table 0x1a.0x8 = 0x914,0x8
0916 e5ff       |    |		Load	0x2,-0x1
0917 e002       |    |		Load	0x0,0x2
0918 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0919 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
091a 01cc       |    |		Execute	Vector,Catenate
091b 0092 24dc  |  $ |		Action	Push_String_Extended,0x24dc					; " is not checked out"
091d 01cc       |    |		Execute	Vector,Catenate
091e e00a       |    |		Load	0x0,0xa
091f 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0920 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0921 0092 24db  |  $ |		Action	Push_String_Extended,0x24db					; "Operation failed - "
													; Debug Table 0x1a.0x9 = 0x921,0x9
0923 e5ff       |    |		Load	0x2,-0x1
0924 e002       |    |		Load	0x0,0x2
0925 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0926 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
0927 01cc       |    |		Execute	Vector,Catenate
0928 0092 24dd  |  $ |		Action	Push_String_Extended,0x24dd					; " is frozen"
092a 01cc       |    |		Execute	Vector,Catenate
092b e00a       |    |		Load	0x0,0xa
092c 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
092d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
092e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0xa = 0x92e,0xa
092f 0092 24de  |  $ |		Action	Push_String_Extended,0x24de					; "Object_Ops.Create_Backup"
0931 820f       |    |		Call	0x1,0xf
0932 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0933			TRAP_08d8:
0933 6014       |`   |		Indirect_Literal	Discrete,0x948,{0x00000000, 0x5a851501}
0934 010f       |    |		Execute	Exception,Equal
0935 6802       |h   |		Jump_Zero	0x938
0936 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0xb = 0x936,0xb
0937 0101       |    |		Execute	Exception,Reraise
0938 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1a.0xc = 0x938,0xc
0939 e009       |    |		Load	0x0,0x9
093a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
093b 0092 24df  |  $ |		Action	Push_String_Extended,0x24df					; "Create_Backup"
093d 8222       | "  |		Call	0x1,0x22
093e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
093f 0000       |    |		.XXX[0x1]
0940 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a846502}
0944 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0948 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a851501}
094c 0000 0000  |    |		.BLANK	0000[0x4]
0950 ; --------------------------------------------------------------------------------------
0950 ; SUBPROGRAM
0950 ; --------------------------------------------------------------------------------------
0950 0953       | S  |		.CONST	0x0953								; Address of begin
0951 0996       |    |		.CONST	0x0996								; Address of exception handler
0952 0001       |    |		.CONST	0x0001								; Number of locals
0953			BODY_0950:
0953			INIT_0950:
0953 0007       |    |		Action	Break_Optional							; Debug Table 0x1b = .DEBUG	0x0953,0x310a,0x0002,0x0000,0x005a,0x8695,0x0000,0x0486
													; Debug Table 0x1b.0x0 = 0x953,0x1
0954 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1b.0x1 = 0x954,0x401
0955 0007       |    |		Action	Break_Optional
0956 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x1b.0x2 = 0x956,0x402
0957 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x3 = 0x957,0x403
0958 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x4 = 0x958,0x404
0959 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x5 = 0x959,0x1
095a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x1b.0x6 = 0x95a,0x801
095b 0007       |    |		Action	Break_Optional
095c 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x1b.0x7 = 0x95c,0x802
095d 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x8 = 0x95d,0x803
095e 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x9 = 0x95e,0x804
095f 021f       |    |		Execute	Heap_Access,Equal						; Debug Table 0x1b.0xa = 0x95f,0x404
0960 6802       |h   |		Jump_Zero	0x963
0961 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0xb = 0x961,0x2
0962 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0963 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0xc = 0x963,0x3
0964 e010       |    |		Load	0x0,0x10							; Debug Table 0x1b.0xd = 0x964,0xf3ff
0965 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0966 02c7       |    |		Declare_Variable	Any
0967 00d8       |    |		Load_Top	At_Offset_0
0968 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0969 e002       |    |		Load	0x0,0x2								; Debug Table 0x1b.0xe = 0x969,0xf3fe
096a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
096b e002       |    |		Load	0x0,0x2								; Debug Table 0x1b.0xf = 0x96b,0xf3fd
096c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
096d 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
096e 02c7       |    |		Declare_Variable	Any
096f 00d8       |    |		Load_Top	At_Offset_0
0970 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0971 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1b.0x10 = 0x971,0xf3fc
0972 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x11 = 0x972,0xc01
0973 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1b.0x12 = 0x973,0x1001
0974 0007       |    |		Action	Break_Optional
0975 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x1b.0x13 = 0x975,0x1002
0976 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x14 = 0x976,0x1003
0977 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x15 = 0x977,0x1004
0978 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x16 = 0x978,0xc01
0979 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x1b.0x17 = 0x979,0x1401
097a 0007       |    |		Action	Break_Optional
097b 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x1b.0x18 = 0x97b,0x1402
097c 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x19 = 0x97c,0x1403
097d 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x1a = 0x97d,0x1404
097e e010       |    |		Load	0x0,0x10							; Debug Table 0x1b.0x1b = 0x97e,0x1004
097f 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0980 c402       |    |		Store	0x2,0x2
0981 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x1c = 0x981,0xc02
0982 e002       |    |		Load	0x0,0x2
0983 1b40       | @  |		Execute	Package,Field_Read,Field_Number 0x40
0984 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0985 c404       |    |		Store	0x2,0x4
0986 e002       |    |		Load	0x0,0x2								; Debug Table 0x1b.0x1d = 0x986,0xc03
0987 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0988 00ec       |    |		Load_Encached	Diana_Tree_Cache
0989 00db       |    |		Load_Top	At_Offset_3
098a e5fe       |    |		Load	0x2,-0x2
098b e002       |    |		Load	0x0,0x2
098c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
098d 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
098e 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
098f 005b       | [  |		Store_Top	Discrete,At_Offset_3
0990 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1b.0x1e = 0x990,0xc04
0991 0092 24e0  |  $ |		Action	Push_String_Extended,0x24e0					; "Ada.Convert"
0993 820f       |    |		Call	0x1,0xf
0994 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1b.0x1f = 0x994,0xc05
0995 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0996			TRAP_0950:
0996 67b1       |g   |		Indirect_Literal	Discrete,0x948,{0x00000000, 0x5a851501}
0997 010f       |    |		Execute	Exception,Equal
0998 6802       |h   |		Jump_Zero	0x99b
0999 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1b.0x20 = 0x999,0x4
099a 0101       |    |		Execute	Exception,Reraise
099b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1b.0x21 = 0x99b,0x5
099c e009       |    |		Load	0x0,0x9
099d 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
099e 0092 24e1  |  $ |		Action	Push_String_Extended,0x24e1					; "Convert_Tree (1)"
09a0 8222       | "  |		Call	0x1,0x22
09a1 4831       |H1  |		Short_Literal	0x31
09a2 0257       | W  |		Execute	Discrete,Raise
09a3 0000 0000  |    |		.BLANK	0000[0x5]
09a8 ; --------------------------------------------------------------------------------------
09a8 ; SUBPROGRAM
09a8 ; --------------------------------------------------------------------------------------
09a8 09b1       |    |		.CONST	0x09b1								; Address of begin
09a9 09cd       |    |		.CONST	0x09cd								; Address of exception handler
09aa 0003       |    |		.CONST	0x0003								; Number of locals
09ab			INIT_09a8:
09ab e002       |    |		Load	0x0,0x2								; Debug Table 0x1c = .DEBUG	0x09ab,0x3150,0x0002,0x0000,0x005a,0x8695,0x0000,0x051a
													; Debug Table 0x1c.0x0 = 0x9ab,0xffff
09ac 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
09ad 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1c.0x1 = 0x9ad,0xfffe
09ae e5fe       |    |		Load	0x2,-0x2
09af 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
09b0 0007       |    |		Action	Break_Optional							; Debug Table 0x1c.0x2 = 0x9b0,0xfffd
09b1			BODY_09a8:
09b1 0007       |    |		Action	Break_Optional							; Debug Table 0x1c.0x3 = 0x9b1,0x1
09b2 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x1c.0x4 = 0x9b2,0x401
09b3 0007       |    |		Action	Break_Optional
09b4 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x1c.0x5 = 0x9b4,0x402
09b5 0007       |    |		Action	Break_Optional							; Debug Table 0x1c.0x6 = 0x9b5,0x403
09b6 0007       |    |		Action	Break_Optional							; Debug Table 0x1c.0x7 = 0x9b6,0x404
09b7 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1c.0x8 = 0x9b7,0x1
09b8 e002       |    |		Load	0x0,0x2
09b9 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
09ba 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
09bb 021f       |    |		Execute	Heap_Access,Equal
09bc 680e       |h   |		Jump_Zero	0x9cb
09bd e002       |    |		Load	0x0,0x2								; Debug Table 0x1c.0x9 = 0x9bd,0x2
09be 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
09bf 00ec       |    |		Load_Encached	Diana_Tree_Cache
09c0 e5ff       |    |		Load	0x2,-0x1
09c1 e5fe       |    |		Load	0x2,-0x2
09c2 e002       |    |		Load	0x0,0x2
09c3 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
09c4 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
09c5 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
09c6 005a       | Z  |		Store_Top	Discrete,At_Offset_2
09c7 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1c.0xa = 0x9c7,0x3
09c8 0092 24e0  |  $ |		Action	Push_String_Extended,0x24e0					; "Ada.Convert"
09ca 820f       |    |		Call	0x1,0xf
09cb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1c.0xb = 0x9cb,0x4
09cc 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
09cd			TRAP_09a8:
09cd 677a       |gz  |		Indirect_Literal	Discrete,0x948,{0x00000000, 0x5a851501}
09ce 010f       |    |		Execute	Exception,Equal
09cf 6802       |h   |		Jump_Zero	0x9d2
09d0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1c.0xc = 0x9d0,0x5
09d1 0101       |    |		Execute	Exception,Reraise
09d2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1c.0xd = 0x9d2,0x6
09d3 e009       |    |		Load	0x0,0x9
09d4 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
09d5 0092 24e2  |  $ |		Action	Push_String_Extended,0x24e2					; "Convert_Tree (2)"
09d7 8222       | "  |		Call	0x1,0x22
09d8 4831       |H1  |		Short_Literal	0x31
09d9 0257       | W  |		Execute	Discrete,Raise
09da 0000 0000  |    |		.BLANK	0000[0x6]
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 0a0f       |    |		.CONST	0x0a0f								; Address of begin
09e1 0ae7       |    |		.CONST	0x0ae7								; Address of exception handler
09e2 000c       |    |		.CONST	0x000c								; Number of locals
09e3			INIT_09e0:
09e3 e004       |    |		Load	0x0,0x4								; Debug Table 0x1d = .DEBUG	0x09e3,0x316e,0x0001,0x0000,0x005a,0x8695,0x0000,0x0590
													; Debug Table 0x1d.0x0 = 0x9e3,0xffff
09e4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
09e5 02c7       |    |		Declare_Variable	Any
09e6 00d8       |    |		Load_Top	At_Offset_0
09e7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09e8 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1d.0x1 = 0x9e8,0xfffe
09e9 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1d.0x2 = 0x9e9,0xfffd
09ea 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1d.0x3 = 0x9ea,0xfffc
09eb e010       |    |		Load	0x0,0x10							; Debug Table 0x1d.0x4 = 0x9eb,0xfffb
09ec 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
09ed 02c7       |    |		Declare_Variable	Any
09ee 00d8       |    |		Load_Top	At_Offset_0
09ef 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09f0 e002       |    |		Load	0x0,0x2								; Debug Table 0x1d.0x5 = 0x9f0,0xfffa
09f1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
09f2 e002       |    |		Load	0x0,0x2								; Debug Table 0x1d.0x6 = 0x9f2,0xfff9
09f3 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
09f4 1b33       | 3  |		Execute	Package,Field_Read,Field_Number 0x33
09f5 02c7       |    |		Declare_Variable	Any
09f6 00d8       |    |		Load_Top	At_Offset_0
09f7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09f8 e002       |    |		Load	0x0,0x2								; Debug Table 0x1d.0x7 = 0x9f8,0xfff8
09f9 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
09fa 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
09fb 02c7       |    |		Declare_Variable	Any
09fc 00d8       |    |		Load_Top	At_Offset_0
09fd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09fe e00e       |    |		Load	0x0,0xe								; Debug Table 0x1d.0x8 = 0x9fe,0xfff7
09ff 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0a00 02c7       |    |		Declare_Variable	Any
0a01 e5fe       |    |		Load	0x2,-0x2
0a02 c40a       |    |		Store	0x2,0xa
0a03 e00e       |    |		Load	0x0,0xe								; Debug Table 0x1d.0x9 = 0xa03,0xfff6
0a04 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0a05 02c7       |    |		Declare_Variable	Any
0a06 e00e       |    |		Load	0x0,0xe
0a07 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0a08 c40b       |    |		Store	0x2,0xb
0a09 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x1d.0xa = 0xa09,0xfff5
0a0a e011       |    |		Load	0x0,0x11
0a0b 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a0c e012       |    |		Load	0x0,0x12
0a0d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a0e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0a0f			BODY_09e0:
0a0f e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x1d.0xb = 0xa0f,0x1
0a10 e004       |    |		Load	0x0,0x4
0a11 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0a12 012f       | /  |		Execute	Any,Equal
0a13 6806       |h   |		Jump_Zero	0xa1a
0a14 e013       |    |		Load	0x0,0x13							; Debug Table 0x1d.0xc = 0xa14,0x2
0a15 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0a16 e004       |    |		Load	0x0,0x4
0a17 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0a18 c402       |    |		Store	0x2,0x2
0a19 7802       |x   |		Jump	0xa1c
0a1a e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x1d.0xd = 0xa1a,0x3
0a1b c402       |    |		Store	0x2,0x2
0a1c e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1d.0xe = 0xa1c,0x4
0a1d 8226       | &  |		Call	0x1,0x26
0a1e 6811       |h   |		Jump_Zero	0xa30
0a1f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1d.0xf = 0xa1f,0x5
0a20 a404       |    |		Store_Unchecked	0x2,0x4
0a21 e002       |    |		Load	0x0,0x2								; Debug Table 0x1d.0x10 = 0xa21,0x6
0a22 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0a23 6720       |g   |		Indirect_Literal	Discrete,0x944,{0x00000000, 0x00004000}
0a24 e402       |    |		Load	0x2,0x2
0a25 4800       |H   |		Short_Literal	0x0
0a26 e5ff       |    |		Load	0x2,-0x1
0a27 e002       |    |		Load	0x0,0x2
0a28 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
0a29 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0a2a c407       |    |		Store	0x2,0x7
0a2b e407       |    |		Load	0x2,0x7								; Debug Table 0x1d.0x11 = 0xa2b,0x7
0a2c 0092 24e3  |  $ |		Action	Push_String_Extended,0x24e3					; "Object_Ops.Set_Slushy"
0a2e 820f       |    |		Call	0x1,0xf
0a2f 7802       |x   |		Jump	0xa32
0a30 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0x12 = 0xa30,0x8
0a31 a404       |    |		Store_Unchecked	0x2,0x4
0a32 e002       |    |		Load	0x0,0x2								; Debug Table 0x1d.0x13 = 0xa32,0x9
0a33 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0a34 e409       |    |		Load	0x2,0x9
0a35 0120       |    |		Execute	Any,Is_Value
0a36 6804       |h   |		Jump_Zero	0xa3b
0a37 e002       |    |		Load	0x0,0x2
0a38 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0a39 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0a3a 7801       |x   |		Jump	0xa3c
0a3b e409       |    |		Load	0x2,0x9
0a3c e002       |    |		Load	0x0,0x2
0a3d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0a3e 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0a3f 4800       |H   |		Short_Literal	0x0
0a40 4800       |H   |		Short_Literal	0x0
0a41 4801       |H   |		Short_Literal	0x1
0a42 4800       |H   |		Short_Literal	0x0
0a43 e402       |    |		Load	0x2,0x2
0a44 4802       |H   |		Short_Literal	0x2
0a45 e5ff       |    |		Load	0x2,-0x1
0a46 e002       |    |		Load	0x0,0x2
0a47 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0a48 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a49 e002       |    |		Load	0x0,0x2
0a4a 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0a4b 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0a4c c403       |    |		Store	0x2,0x3
0a4d c409       |    |		Store	0x2,0x9
0a4e c407       |    |		Store	0x2,0x7
0a4f e407       |    |		Load	0x2,0x7								; Debug Table 0x1d.0x14 = 0xa4f,0xa
0a50 0b00       |    |		Execute_Immediate	Case_Compare,0x0
0a51 700e       |p   |		Jump_Nonzero	0xa60
0a52 0b01       |    |		Execute_Immediate	Case_Compare,0x1
0a53 7005       |p   |		Jump_Nonzero	0xa59
0a54 e407       |    |		Load	0x2,0x7								; Debug Table 0x1d.0x15 = 0xa54,0xe
0a55 0092 24e4  |  $ |		Action	Push_String_Extended,0x24e4					; "Ada.Open"
0a57 820f       |    |		Call	0x1,0xf
0a58 7807       |x   |		Jump	0xa60
0a59 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1d.0x16 = 0xa59,0xc
0a5a 0092 24d8  |  $ |		Action	Push_String_Extended,0x24d8					; "Operation"
0a5c e008       |    |		Load	0x0,0x8
0a5d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0a5e 66e9       |f   |		Indirect_Literal	Discrete,0x948,{0x00000000, 0x5a851501}		; Debug Table 0x1d.0x17 = 0xa5e,0xd
0a5f 0257       | W  |		Execute	Discrete,Raise
0a60 00d1       |    |		Pop_Control	Pop_Count_1
0a61 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x1d.0x18 = 0xa61,0xf
0a62 e00e       |    |		Load	0x0,0xe
0a63 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0a64 a405       |    |		Store_Unchecked	0x2,0x5
0a65 0007       |    |		Action	Break_Optional							; Debug Table 0x1d.0x19 = 0xa65,0x10
0a66 e405       |    |		Load	0x2,0x5								; Debug Table 0x1d.0x1a = 0xa66,0x401
0a67 021d       |    |		Execute	Heap_Access,Is_Null
0a68 6804       |h   |		Jump_Zero	0xa6d							; Debug Table 0x1d.0x1b = 0xa68,0x10
0a69 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x1d.0x1c = 0xa69,0x11
0a6a e00e       |    |		Load	0x0,0xe
0a6b 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0a6c a405       |    |		Store_Unchecked	0x2,0x5
0a6d 0007       |    |		Action	Break_Optional							; Debug Table 0x1d.0x1d = 0xa6d,0x12
0a6e e403       |    |		Load	0x2,0x3								; Debug Table 0x1d.0x1e = 0xa6e,0x801
0a6f 0007       |    |		Action	Break_Optional
0a70 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x1d.0x1f = 0xa70,0x802
0a71 0007       |    |		Action	Break_Optional							; Debug Table 0x1d.0x20 = 0xa71,0x803
0a72 0007       |    |		Action	Break_Optional							; Debug Table 0x1d.0x21 = 0xa72,0x804
0a73 0007       |    |		Action	Break_Optional							; Debug Table 0x1d.0x22 = 0xa73,0x12
0a74 e405       |    |		Load	0x2,0x5								; Debug Table 0x1d.0x23 = 0xa74,0xc01
0a75 0007       |    |		Action	Break_Optional
0a76 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x1d.0x24 = 0xa76,0xc02
0a77 0007       |    |		Action	Break_Optional							; Debug Table 0x1d.0x25 = 0xa77,0xc03
0a78 0007       |    |		Action	Break_Optional							; Debug Table 0x1d.0x26 = 0xa78,0xc04
0a79 e010       |    |		Load	0x0,0x10							; Debug Table 0x1d.0x27 = 0xa79,0x804
0a7a 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0a7b c406       |    |		Store	0x2,0x6
0a7c e406       |    |		Load	0x2,0x6								; Debug Table 0x1d.0x28 = 0xa7c,0x13
0a7d e002       |    |		Load	0x0,0x2
0a7e 1b40       | @  |		Execute	Package,Field_Read,Field_Number 0x40
0a7f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0a80 c409       |    |		Store	0x2,0x9
0a81 e002       |    |		Load	0x0,0x2								; Debug Table 0x1d.0x29 = 0xa81,0x14
0a82 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0a83 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
0a84 c408       |    |		Store	0x2,0x8
0a85 e013       |    |		Load	0x0,0x13							; Debug Table 0x1d.0x2a = 0xa85,0x15
0a86 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0a87 4800       |H   |		Short_Literal	0x0
0a88 e403       |    |		Load	0x2,0x3
0a89 e014       |    |		Load	0x0,0x14
0a8a 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0a8b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a8c e014       |    |		Load	0x0,0x14
0a8d 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0a8e 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0a8f 7826       |x&  |		Jump	0xab6
0a90 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1d.0x2b = 0xa90,0x17
0a91 e00e       |    |		Load	0x0,0xe
0a92 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
0a93 00db       |    |		Load_Top	At_Offset_3
0a94 e00e       |    |		Load	0x0,0xe
0a95 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0a96 e409       |    |		Load	0x2,0x9
0a97 8229       | )  |		Call	0x1,0x29
0a98 e40a       |    |		Load	0x2,0xa
0a99 e00e       |    |		Load	0x0,0xe
0a9a 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0a9b e409       |    |		Load	0x2,0x9
0a9c 8229       | )  |		Call	0x1,0x29
0a9d 00db       |    |		Load_Top	At_Offset_3
0a9e e40a       |    |		Load	0x2,0xa
0a9f e00e       |    |		Load	0x0,0xe
0aa0 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0aa1 e409       |    |		Load	0x2,0x9
0aa2 8229       | )  |		Call	0x1,0x29
0aa3 e40a       |    |		Load	0x2,0xa
0aa4 e00e       |    |		Load	0x0,0xe
0aa5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0aa6 e409       |    |		Load	0x2,0x9
0aa7 8229       | )  |		Call	0x1,0x29
0aa8 e40a       |    |		Load	0x2,0xa
0aa9 e00e       |    |		Load	0x0,0xe
0aaa 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0aab e40a       |    |		Load	0x2,0xa
0aac e00e       |    |		Load	0x0,0xe
0aad 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0aae e40b       |    |		Load	0x2,0xb
0aaf e00e       |    |		Load	0x0,0xe
0ab0 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0ab1 c40b       |    |		Store	0x2,0xb
0ab2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1d.0x2c = 0xab2,0x18
0ab3 e00e       |    |		Load	0x0,0xe
0ab4 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0ab5 c40a       |    |		Store	0x2,0xa
0ab6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1d.0x2d = 0xab6,0x16
0ab7 e00e       |    |		Load	0x0,0xe
0ab8 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0ab9 6fd6       |o   |		Jump_Zero	0xa90
0aba 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1d.0x2e = 0xaba,0x19
0abb e403       |    |		Load	0x2,0x3
0abc e00e       |    |		Load	0x0,0xe
0abd 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0abe e408       |    |		Load	0x2,0x8								; Debug Table 0x1d.0x2f = 0xabe,0x1a
0abf e002       |    |		Load	0x0,0x2
0ac0 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0ac1 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0ac2 e002       |    |		Load	0x0,0x2								; Debug Table 0x1d.0x30 = 0xac2,0x1b
0ac3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0ac4 4800       |H   |		Short_Literal	0x0
0ac5 4801       |H   |		Short_Literal	0x1
0ac6 e402       |    |		Load	0x2,0x2
0ac7 e403       |    |		Load	0x2,0x3
0ac8 e002       |    |		Load	0x0,0x2
0ac9 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0aca 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0acb c407       |    |		Store	0x2,0x7
0acc e407       |    |		Load	0x2,0x7								; Debug Table 0x1d.0x31 = 0xacc,0x1c
0acd 0092 24e5  |  $ |		Action	Push_String_Extended,0x24e5					; "Ada.Close"
0acf 820f       |    |		Call	0x1,0xf
0ad0 e404       |    |		Load	0x2,0x4								; Debug Table 0x1d.0x32 = 0xad0,0x1d
0ad1 680e       |h   |		Jump_Zero	0xae0
0ad2 e002       |    |		Load	0x0,0x2								; Debug Table 0x1d.0x33 = 0xad2,0x1e
0ad3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0ad4 666f       |fo  |		Indirect_Literal	Discrete,0x944,{0x00000000, 0x00004000}
0ad5 e402       |    |		Load	0x2,0x2
0ad6 4801       |H   |		Short_Literal	0x1
0ad7 e5ff       |    |		Load	0x2,-0x1
0ad8 e002       |    |		Load	0x0,0x2
0ad9 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
0ada 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0adb c407       |    |		Store	0x2,0x7
0adc e407       |    |		Load	0x2,0x7								; Debug Table 0x1d.0x34 = 0xadc,0x1f
0add 0092 24e3  |  $ |		Action	Push_String_Extended,0x24e3					; "Object_Ops.Set_Slushy"
0adf 820f       |    |		Call	0x1,0xf
0ae0 e402       |    |		Load	0x2,0x2								; Debug Table 0x1d.0x35 = 0xae0,0x20
0ae1 4801       |H   |		Short_Literal	0x1
0ae2 4801       |H   |		Short_Literal	0x1
0ae3 e004       |    |		Load	0x0,0x4
0ae4 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0ae5 c402       |    |		Store	0x2,0x2
0ae6 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0ae7			TRAP_09e0:
0ae7 6660       |f`  |		Indirect_Literal	Discrete,0x948,{0x00000000, 0x5a851501}
0ae8 010f       |    |		Execute	Exception,Equal
0ae9 6808       |h   |		Jump_Zero	0xaf2
0aea e402       |    |		Load	0x2,0x2								; Debug Table 0x1d.0x36 = 0xaea,0x21
0aeb 4801       |H   |		Short_Literal	0x1
0aec 4800       |H   |		Short_Literal	0x0
0aed e004       |    |		Load	0x0,0x4
0aee 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0aef c402       |    |		Store	0x2,0x2
0af0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0x37 = 0xaf0,0x22
0af1 0101       |    |		Execute	Exception,Reraise
0af2 e402       |    |		Load	0x2,0x2								; Debug Table 0x1d.0x38 = 0xaf2,0x23
0af3 4801       |H   |		Short_Literal	0x1
0af4 4800       |H   |		Short_Literal	0x0
0af5 e004       |    |		Load	0x0,0x4
0af6 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0af7 c402       |    |		Store	0x2,0x2
0af8 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1d.0x39 = 0xaf8,0x24
0af9 e009       |    |		Load	0x0,0x9
0afa 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0afb 0092 24e6  |  $ |		Action	Push_String_Extended,0x24e6					; "Put_Error_Messages"
0afd 8222       | "  |		Call	0x1,0x22
0afe 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0aff 0000       |    |		.XXX[0x1]
0b00 ; --------------------------------------------------------------------------------------
0b00 ; SUBPROGRAM
0b00 ; --------------------------------------------------------------------------------------
0b00 0b24       | $  |		.CONST	0x0b24								; Address of begin
0b01 0bd7       |    |		.CONST	0x0bd7								; Address of exception handler
0b02 000d       |    |		.CONST	0x000d								; Number of locals
0b03			INIT_0b00:
0b03 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1e = .DEBUG	0x0b03,0x31e4,0x0001,0x0000,0x005a,0x8695,0x0000,0x079a
													; Debug Table 0x1e.0x0 = 0xb03,0xffff
0b04 e004       |    |		Load	0x0,0x4								; Debug Table 0x1e.0x1 = 0xb04,0xfffe
0b05 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0b06 02c7       |    |		Declare_Variable	Any
0b07 00d8       |    |		Load_Top	At_Offset_0
0b08 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0b09 e001       |    |		Load	0x0,0x1								; Debug Table 0x1e.0x2 = 0xb09,0xfffd
0b0a 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0b0b 0322       | "  |		Declare_Variable	Record
0b0c 00d8       |    |		Load_Top	At_Offset_0
0b0d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0b0e 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1e.0x3 = 0xb0e,0xfffc
0b0f 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1e.0x4 = 0xb0f,0xfffb
0b10 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1e.0x5 = 0xb10,0xfffa
0b11 00ef       |    |		Load_Encached	Diana_Sequence_Cache					; Debug Table 0x1e.0x6 = 0xb11,0xfff9
0b12 e001       |    |		Load	0x0,0x1								; Debug Table 0x1e.0x7 = 0xb12,0xfff8
0b13 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0b14 0322       | "  |		Declare_Variable	Record
0b15 e002       |    |		Load	0x0,0x2								; Debug Table 0x1e.0x8 = 0xb15,0xfff7
0b16 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0b17 02ff       |    |		Declare_Variable	Variant_Record
0b18 00d8       |    |		Load_Top	At_Offset_0
0b19 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0b1a e002       |    |		Load	0x0,0x2								; Debug Table 0x1e.0x9 = 0xb1a,0xfff6
0b1b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0b1c e002       |    |		Load	0x0,0x2								; Debug Table 0x1e.0xa = 0xb1c,0xfff5
0b1d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0b1e 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0b1f 02c7       |    |		Declare_Variable	Any
0b20 00d8       |    |		Load_Top	At_Offset_0
0b21 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0b22 029f 2443  |  $C|		Declare_Subprogram	INIT_2440,For_Call
0b24			BODY_0b00:
0b24 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x1e.0xb = 0xb24,0x1
0b25 0092 24e7  |  $ |		Action	Push_String_Extended,0x24e7					; " failed - Semantic errors found"
0b27 01cc       |    |		Execute	Vector,Catenate
0b28 e00a       |    |		Load	0x0,0xa
0b29 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0b2a e004       |    |		Load	0x0,0x4								; Debug Table 0x1e.0xc = 0xb2a,0x2
0b2b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0b2c c403       |    |		Store	0x2,0x3
0b2d e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x1e.0xd = 0xb2d,0x3
0b2e e5fd       |    |		Load	0x2,-0x3
0b2f e5ff       |    |		Load	0x2,-0x1
0b30 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b31 822a       | *  |		Call	0x1,0x2a
0b32 e013       |    |		Load	0x0,0x13							; Debug Table 0x1e.0xe = 0xb32,0x4
0b33 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0b34 e004       |    |		Load	0x0,0x4
0b35 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0b36 c403       |    |		Store	0x2,0x3
0b37 e002       |    |		Load	0x0,0x2								; Debug Table 0x1e.0xf = 0xb37,0x5
0b38 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0b39 00da       |    |		Load_Top	At_Offset_2
0b3a 0120       |    |		Execute	Any,Is_Value
0b3b 6804       |h   |		Jump_Zero	0xb40
0b3c e002       |    |		Load	0x0,0x2
0b3d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0b3e 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0b3f 7801       |x   |		Jump	0xb41
0b40 00da       |    |		Load_Top	At_Offset_2
0b41 e002       |    |		Load	0x0,0x2
0b42 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0b43 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0b44 4800       |H   |		Short_Literal	0x0
0b45 4800       |H   |		Short_Literal	0x0
0b46 4800       |H   |		Short_Literal	0x0
0b47 4800       |H   |		Short_Literal	0x0
0b48 e403       |    |		Load	0x2,0x3
0b49 4801       |H   |		Short_Literal	0x1
0b4a e5ff       |    |		Load	0x2,-0x1
0b4b 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b4c e002       |    |		Load	0x0,0x2
0b4d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0b4e 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0b4f e002       |    |		Load	0x0,0x2
0b50 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0b51 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0b52 c405       |    |		Store	0x2,0x5
0b53 c40c       |    |		Store	0x2,0xc
0b54 005b       | [  |		Store_Top	Discrete,At_Offset_3
0b55 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1e.0x10 = 0xb55,0x6
0b56 0b00       |    |		Execute_Immediate	Case_Compare,0x0
0b57 7014       |p   |		Jump_Nonzero	0xb6c
0b58 0b01       |    |		Execute_Immediate	Case_Compare,0x1
0b59 7005       |p   |		Jump_Nonzero	0xb5f
0b5a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1e.0x11 = 0xb5a,0xb
0b5b 0092 24e4  |  $ |		Action	Push_String_Extended,0x24e4					; "Ada.Open"
0b5d 820f       |    |		Call	0x1,0xf
0b5e 780d       |x   |		Jump	0xb6c
0b5f e403       |    |		Load	0x2,0x3								; Debug Table 0x1e.0x12 = 0xb5f,0x8
0b60 4801       |H   |		Short_Literal	0x1
0b61 4801       |H   |		Short_Literal	0x1
0b62 e004       |    |		Load	0x0,0x4
0b63 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0b64 c403       |    |		Store	0x2,0x3
0b65 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1e.0x13 = 0xb65,0x9
0b66 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b67 0092 24d8  |  $ |		Action	Push_String_Extended,0x24d8					; "Operation"
0b69 e008       |    |		Load	0x0,0x8
0b6a 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0b6b 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0x1e.0x14 = 0xb6b,0xa
0b6c 00d1       |    |		Pop_Control	Pop_Count_1
0b6d e405       |    |		Load	0x2,0x5								; Debug Table 0x1e.0x15 = 0xb6d,0xc
0b6e e00e       |    |		Load	0x0,0xe
0b6f 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0b70 a408       |    |		Store_Unchecked	0x2,0x8
0b71 0007       |    |		Action	Break_Optional							; Debug Table 0x1e.0x16 = 0xb71,0xd
0b72 e408       |    |		Load	0x2,0x8								; Debug Table 0x1e.0x17 = 0xb72,0x401
0b73 021d       |    |		Execute	Heap_Access,Is_Null
0b74 0f00       |    |		Execute_Immediate	Equal,0x0					; Debug Table 0x1e.0x18 = 0xb74,0xd
0b75 a407       |    |		Store_Unchecked	0x2,0x7
0b76 e002       |    |		Load	0x0,0x2								; Debug Table 0x1e.0x19 = 0xb76,0xe
0b77 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0b78 4800       |H   |		Short_Literal	0x0
0b79 4801       |H   |		Short_Literal	0x1
0b7a e403       |    |		Load	0x2,0x3
0b7b e405       |    |		Load	0x2,0x5
0b7c e002       |    |		Load	0x0,0x2
0b7d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0b7e 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0b7f 005b       | [  |		Store_Top	Discrete,At_Offset_3
0b80 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1e.0x1a = 0xb80,0xf
0b81 0092 24e5  |  $ |		Action	Push_String_Extended,0x24e5					; "Ada.Close"
0b83 820f       |    |		Call	0x1,0xf
0b84 e403       |    |		Load	0x2,0x3								; Debug Table 0x1e.0x1b = 0xb84,0x10
0b85 4801       |H   |		Short_Literal	0x1
0b86 4801       |H   |		Short_Literal	0x1
0b87 e004       |    |		Load	0x0,0x4
0b88 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0b89 c403       |    |		Store	0x2,0x3
0b8a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1e.0x1c = 0xb8a,0x11
0b8b e5fd       |    |		Load	0x2,-0x3
0b8c e008       |    |		Load	0x0,0x8
0b8d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0b8e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1e.0x1d = 0xb8e,0x12
0b8f 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0b90 e5ff       |    |		Load	0x2,-0x1
0b91 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b92 e001       |    |		Load	0x0,0x1
0b93 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0b94 e407       |    |		Load	0x2,0x7								; Debug Table 0x1e.0x1e = 0xb94,0x13
0b95 6840       |h@  |		Jump_Zero	0xbd6
0b96 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1e.0x1f = 0xb96,0x14
0b97 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0b98 e001       |    |		Load	0x0,0x1
0b99 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0b9a 6836       |h6  |		Jump_Zero	0xbd1
0b9b e002       |    |		Load	0x0,0x2								; Debug Table 0x1e.0x20 = 0xb9b,0x15
0b9c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0b9d e40a       |    |		Load	0x2,0xa
0b9e 65a5       |e   |		Indirect_Literal	Discrete,0x944,{0x00000000, 0x00004000}
0b9f e004       |    |		Load	0x0,0x4
0ba0 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0ba1 4800       |H   |		Short_Literal	0x0
0ba2 e5ff       |    |		Load	0x2,-0x1
0ba3 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0ba4 e002       |    |		Load	0x0,0x2
0ba5 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0ba6 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0ba7 00d1       |    |		Pop_Control	Pop_Count_1
0ba8 005b       | [  |		Store_Top	Discrete,At_Offset_3
0ba9 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1e.0x21 = 0xba9,0x16
0baa 0092 24c3  |  $ |		Action	Push_String_Extended,0x24c3					; "Traversal.Get_Version"
0bac 820f       |    |		Call	0x1,0xf
0bad e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1e.0x22 = 0xbad,0x17
0bae 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0baf e404       |    |		Load	0x2,0x4
0bb0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0bb1 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1e.0x23 = 0xbb1,0x18
0bb2 e002       |    |		Load	0x0,0x2
0bb3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0bb4 e404       |    |		Load	0x2,0x4
0bb5 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0bb6 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1e.0x24 = 0xbb6,0x19
0bb7 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0bb8 e404       |    |		Load	0x2,0x4
0bb9 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0bba 840d       |    |		Call	0x2,0xd								; Debug Table 0x1e.0x25 = 0xbba,0x1a
0bbb e409       |    |		Load	0x2,0x9								; Debug Table 0x1e.0x26 = 0xbbb,0x1b
0bbc e001       |    |		Load	0x0,0x1
0bbd 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0bbe 6809       |h   |		Jump_Zero	0xbc8
0bbf 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1e.0x27 = 0xbbf,0x1c
0bc0 4800       |H   |		Short_Literal	0x0
0bc1 4800       |H   |		Short_Literal	0x0
0bc2 e001       |    |		Load	0x0,0x1
0bc3 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0bc4 e405       |    |		Load	0x2,0x5
0bc5 e001       |    |		Load	0x0,0x1
0bc6 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0bc7 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0bc8 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1e.0x28 = 0xbc8,0x1d
0bc9 e409       |    |		Load	0x2,0x9
0bca e001       |    |		Load	0x0,0x1
0bcb 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0bcc e409       |    |		Load	0x2,0x9								; Debug Table 0x1e.0x29 = 0xbcc,0x1e
0bcd e001       |    |		Load	0x0,0x1
0bce 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0bcf 00d1       |    |		Pop_Control	Pop_Count_1
0bd0 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0bd1 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1e.0x2a = 0xbd1,0x1f
0bd2 e5ff       |    |		Load	0x2,-0x1
0bd3 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0bd4 e001       |    |		Load	0x0,0x1
0bd5 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0bd6 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0bd7			TRAP_0b00:
0bd7 6570       |ep  |		Indirect_Literal	Discrete,0x948,{0x00000000, 0x5a851501}
0bd8 010f       |    |		Execute	Exception,Equal
0bd9 6808       |h   |		Jump_Zero	0xbe2
0bda e403       |    |		Load	0x2,0x3								; Debug Table 0x1e.0x2b = 0xbda,0x20
0bdb 4801       |H   |		Short_Literal	0x1
0bdc 4800       |H   |		Short_Literal	0x0
0bdd e004       |    |		Load	0x0,0x4
0bde 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0bdf c403       |    |		Store	0x2,0x3
0be0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0x2c = 0xbe0,0x21
0be1 0101       |    |		Execute	Exception,Reraise
0be2 e403       |    |		Load	0x2,0x3								; Debug Table 0x1e.0x2d = 0xbe2,0x22
0be3 4801       |H   |		Short_Literal	0x1
0be4 4800       |H   |		Short_Literal	0x0
0be5 e004       |    |		Load	0x0,0x4
0be6 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0be7 c403       |    |		Store	0x2,0x3
0be8 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1e.0x2e = 0xbe8,0x23
0be9 e009       |    |		Load	0x0,0x9
0bea 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0beb 0092 24e8  |  $ |		Action	Push_String_Extended,0x24e8					; "Process_Semantic_Error"
0bed 8222       | "  |		Call	0x1,0x22
0bee 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0bef 0000       |    |		.XXX[0x1]
0bf0 ; --------------------------------------------------------------------------------------
0bf0 ; SUBPROGRAM
0bf0 ; --------------------------------------------------------------------------------------
0bf0 0bf3       |    |		.CONST	0x0bf3								; Address of begin
0bf1 0bfe       |    |		.CONST	0x0bfe								; Address of exception handler
0bf2 0001       |    |		.CONST	0x0001								; Number of locals
0bf3			BODY_0bf0:
0bf3			INIT_0bf0:
0bf3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1f = .DEBUG	0x0bf3,0x3244,0x0001,0x0000,0x005a,0x8695,0x0000,0x0954
													; Debug Table 0x1f.0x0 = 0xbf3,0x1
0bf4 0092 24e9  |  $ |		Action	Push_String_Extended,0x24e9					; " failed - Code generation errors found"
0bf6 01cc       |    |		Execute	Vector,Catenate
0bf7 e00a       |    |		Load	0x0,0xa
0bf8 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0bf9 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1f.0x1 = 0xbf9,0x2
0bfa e5fe       |    |		Load	0x2,-0x2
0bfb e008       |    |		Load	0x0,0x8
0bfc 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0bfd 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0bfe			TRAP_0bf0:
0bfe 00a2 0f9c  |    |		Action	Push_Discrete_Extended
0c00 010f       |    |		Execute	Exception,Equal
0c01 6802       |h   |		Jump_Zero	0xc04
0c02 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x2 = 0xc02,0x3
0c03 0101       |    |		Execute	Exception,Reraise
0c04 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1f.0x3 = 0xc04,0x4
0c05 e009       |    |		Load	0x0,0x9
0c06 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0c07 0092 24ea  |  $ |		Action	Push_String_Extended,0x24ea					; "Process_Cg_Error"
0c09 8222       | "  |		Call	0x1,0x22
0c0a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0c0b 0000 0000  |    |		.BLANK	0000[0x5]
0c10 ; --------------------------------------------------------------------------------------
0c10 ; SUBPROGRAM
0c10 ; --------------------------------------------------------------------------------------
0c10 0c13       |    |		.CONST	0x0c13								; Address of begin
0c11 0c31       | 1  |		.CONST	0x0c31								; Address of exception handler
0c12 0001       |    |		.CONST	0x0001								; Number of locals
0c13			BODY_0c10:
0c13			INIT_0c10:
0c13 0007       |    |		Action	Break_Optional							; Debug Table 0x20 = .DEBUG	0x0c13,0x324e,0x0001,0x0000,0x005a,0x8695,0x0000,0x0989
													; Debug Table 0x20.0x0 = 0xc13,0x1
0c14 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x1 = 0xc14,0x401
0c15 021d       |    |		Execute	Heap_Access,Is_Null
0c16 680b       |h   |		Jump_Zero	0xc22							; Debug Table 0x20.0x2 = 0xc16,0x1
0c17 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x20.0x3 = 0xc17,0x2
0c18 0092 24e9  |  $ |		Action	Push_String_Extended,0x24e9					; " failed - Code generation errors found"
0c1a 01cc       |    |		Execute	Vector,Catenate
0c1b e00a       |    |		Load	0x0,0xa
0c1c 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0c1d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x20.0x4 = 0xc1d,0x3
0c1e e5fc       |    |		Load	0x2,-0x4
0c1f e008       |    |		Load	0x0,0x8
0c20 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0c21 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0c22 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x20.0x5 = 0xc22,0x4
0c23 0092 24eb  |  $ |		Action	Push_String_Extended,0x24eb					; " failed - need to code other units"
0c25 01cc       |    |		Execute	Vector,Catenate
0c26 e00a       |    |		Load	0x0,0xa
0c27 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0c28 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x20.0x6 = 0xc28,0x5
0c29 e5fd       |    |		Load	0x2,-0x3
0c2a 0092 24ec  |  $ |		Action	Push_String_Extended,0x24ec					; "Units that should be coded to code "
0c2c e5ff       |    |		Load	0x2,-0x1
0c2d 01cc       |    |		Execute	Vector,Catenate
0c2e e015       |    |		Load	0x0,0x15
0c2f 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0c30 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0c31			TRAP_0c10:
0c31 00a2 0f9c  |    |		Action	Push_Discrete_Extended
0c33 010f       |    |		Execute	Exception,Equal
0c34 6802       |h   |		Jump_Zero	0xc37
0c35 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x20.0x7 = 0xc35,0x6
0c36 0101       |    |		Execute	Exception,Reraise
0c37 4801       |H   |		Short_Literal	0x1							; Debug Table 0x20.0x8 = 0xc37,0x7
0c38 e009       |    |		Load	0x0,0x9
0c39 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0c3a 0092 24ed  |  $ |		Action	Push_String_Extended,0x24ed					; "Process_Cg_Prerequisite_Error"
0c3c 8222       | "  |		Call	0x1,0x22
0c3d 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0c3e 0000 0000  |    |		.XXX[0x2]
0c40 ; --------------------------------------------------------------------------------------
0c40 ; SUBPROGRAM
0c40 ; --------------------------------------------------------------------------------------
0c40 0c43       | C  |		.CONST	0x0c43								; Address of begin
0c41 0c52       | R  |		.CONST	0x0c52								; Address of exception handler
0c42 0001       |    |		.CONST	0x0001								; Number of locals
0c43			BODY_0c40:
0c43			INIT_0c40:
0c43 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x21 = .DEBUG	0x0c43,0x3262,0x0001,0x0000,0x005a,0x8695,0x0000,0x09e8
													; Debug Table 0x21.0x0 = 0xc43,0x1
0c44 0092 24ee  |  $ |		Action	Push_String_Extended,0x24ee					; " failed - would obsolesce other units"
0c46 01cc       |    |		Execute	Vector,Catenate
0c47 e00a       |    |		Load	0x0,0xa
0c48 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0c49 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x21.0x1 = 0xc49,0x2
0c4a e5fd       |    |		Load	0x2,-0x3
0c4b 0092 24ef  |  $ |		Action	Push_String_Extended,0x24ef					; "Units that are obsolesced by "
0c4d e5ff       |    |		Load	0x2,-0x1
0c4e 01cc       |    |		Execute	Vector,Catenate
0c4f e015       |    |		Load	0x0,0x15
0c50 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0c51 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0c52			TRAP_0c40:
0c52 00a2 0f9c  |    |		Action	Push_Discrete_Extended
0c54 010f       |    |		Execute	Exception,Equal
0c55 6802       |h   |		Jump_Zero	0xc58
0c56 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x21.0x2 = 0xc56,0x3
0c57 0101       |    |		Execute	Exception,Reraise
0c58 4801       |H   |		Short_Literal	0x1							; Debug Table 0x21.0x3 = 0xc58,0x4
0c59 e009       |    |		Load	0x0,0x9
0c5a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0c5b 0092 24f0  |  $ |		Action	Push_String_Extended,0x24f0					; "Process_Obsolescence_Error"
0c5d 8222       | "  |		Call	0x1,0x22
0c5e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0c5f 0000       |    |		.XXX[0x1]
0c60 ; --------------------------------------------------------------------------------------
0c60 ; SUBPROGRAM
0c60 ; --------------------------------------------------------------------------------------
0c60 0c63       | c  |		.CONST	0x0c63								; Address of begin
0c61 0c70       | p  |		.CONST	0x0c70								; Address of exception handler
0c62 0001       |    |		.CONST	0x0001								; Number of locals
0c63			BODY_0c60:
0c63			INIT_0c60:
0c63 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x22 = .DEBUG	0x0c63,0x326c,0x0001,0x0000,0x005a,0x8695,0x0000,0x0a23
													; Debug Table 0x22.0x0 = 0xc63,0x1
0c64 0092 24ee  |  $ |		Action	Push_String_Extended,0x24ee					; " failed - would obsolesce other units"
0c66 01cc       |    |		Execute	Vector,Catenate
0c67 e00a       |    |		Load	0x0,0xa
0c68 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0c69 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x22.0x1 = 0xc69,0x2
0c6a e5fd       |    |		Load	0x2,-0x3
0c6b e5fc       |    |		Load	0x2,-0x4
0c6c e5ff       |    |		Load	0x2,-0x1
0c6d e015       |    |		Load	0x0,0x15
0c6e 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0c6f 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0c70			TRAP_0c60:
0c70 632b       |c+  |		Indirect_Literal	Discrete,0xf9c,{0x00000000, 0x5a851501}
0c71 010f       |    |		Execute	Exception,Equal
0c72 6802       |h   |		Jump_Zero	0xc75
0c73 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x22.0x2 = 0xc73,0x3
0c74 0101       |    |		Execute	Exception,Reraise
0c75 4801       |H   |		Short_Literal	0x1							; Debug Table 0x22.0x3 = 0xc75,0x4
0c76 e009       |    |		Load	0x0,0x9
0c77 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0c78 0092 24f1  |  $ |		Action	Push_String_Extended,0x24f1					; "Process_Demote_Obsolescence_Error"
0c7a 8222       | "  |		Call	0x1,0x22
0c7b 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0c7c 0000 0000  |    |		.BLANK	0000[0x4]
0c80 ; --------------------------------------------------------------------------------------
0c80 ; SUBPROGRAM
0c80 ; --------------------------------------------------------------------------------------
0c80 0c83       |    |		.CONST	0x0c83								; Address of begin
0c81 0c9c       |    |		.CONST	0x0c9c								; Address of exception handler
0c82 0001       |    |		.CONST	0x0001								; Number of locals
0c83			BODY_0c80:
0c83			INIT_0c80:
0c83 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x23 = .DEBUG	0x0c83,0x3276,0x0001,0x0000,0x005a,0x8695,0x0000,0x0a62
													; Debug Table 0x23.0x0 = 0xc83,0x1
0c84 0b01       |    |		Execute_Immediate	Case_Compare,0x1
0c85 700f       |p   |		Jump_Nonzero	0xc95
0c86 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x23.0x1 = 0xc86,0x3
0c87 e00e       |    |		Load	0x0,0xe
0c88 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0c89 6806       |h   |		Jump_Zero	0xc90
0c8a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x23.0x2 = 0xc8a,0x4
0c8b e5fd       |    |		Load	0x2,-0x3
0c8c e5ff       |    |		Load	0x2,-0x1
0c8d e008       |    |		Load	0x0,0x8
0c8e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0c8f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0c90 4800       |H   |		Short_Literal	0x0							; Debug Table 0x23.0x3 = 0xc90,0x5
0c91 e5fe       |    |		Load	0x2,-0x2
0c92 e008       |    |		Load	0x0,0x8
0c93 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0c94 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0c95 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x23.0x4 = 0xc95,0x2
0c96 0092 24f2  |  $ |		Action	Push_String_Extended,0x24f2					; " failed - object (or something it references) is in use"
0c98 01cc       |    |		Execute	Vector,Catenate
0c99 e00a       |    |		Load	0x0,0xa
0c9a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0c9b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0c9c			TRAP_0c80:
0c9c 62ff       |b   |		Indirect_Literal	Discrete,0xf9c,{0x00000000, 0x5a851501}
0c9d 010f       |    |		Execute	Exception,Equal
0c9e 6802       |h   |		Jump_Zero	0xca1
0c9f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x23.0x5 = 0xc9f,0x6
0ca0 0101       |    |		Execute	Exception,Reraise
0ca1 4801       |H   |		Short_Literal	0x1							; Debug Table 0x23.0x6 = 0xca1,0x7
0ca2 e009       |    |		Load	0x0,0x9
0ca3 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0ca4 0092 24f3  |  $ |		Action	Push_String_Extended,0x24f3					; "Process_Miscellaneous_Errors"
0ca6 8222       | "  |		Call	0x1,0x22
0ca7 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0ca8 ; --------------------------------------------------------------------------------------
0ca8 ; SUBPROGRAM
0ca8 ; --------------------------------------------------------------------------------------
0ca8 0cbe       |    |		.CONST	0x0cbe								; Address of begin
0ca9 0cee       |    |		.CONST	0x0cee								; Address of exception handler
0caa 0005       |    |		.CONST	0x0005								; Number of locals
0cab			INIT_0ca8:
0cab e002       |    |		Load	0x0,0x2								; Debug Table 0x24 = .DEBUG	0x0cab,0x3286,0x0002,0x0000,0x005a,0x8695,0x0000,0x0abd
													; Debug Table 0x24.0x0 = 0xcab,0xffff
0cac 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0cad 02c7       |    |		Declare_Variable	Any
0cae 00d8       |    |		Load_Top	At_Offset_0
0caf 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0cb0 e002       |    |		Load	0x0,0x2								; Debug Table 0x24.0x1 = 0xcb0,0xfffe
0cb1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0cb2 e002       |    |		Load	0x0,0x2								; Debug Table 0x24.0x2 = 0xcb2,0xfffd
0cb3 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
0cb4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0cb5 02c7       |    |		Declare_Variable	Any
0cb6 00d8       |    |		Load_Top	At_Offset_0
0cb7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0cb8 e002       |    |		Load	0x0,0x2								; Debug Table 0x24.0x3 = 0xcb8,0xfffc
0cb9 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0cba 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0cbb 02c7       |    |		Declare_Variable	Any
0cbc 00d8       |    |		Load_Top	At_Offset_0
0cbd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0cbe			BODY_0ca8:
0cbe e002       |    |		Load	0x0,0x2								; Debug Table 0x24.0x4 = 0xcbe,0x1
0cbf 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0cc0 00d9       |    |		Load_Top	At_Offset_1
0cc1 0120       |    |		Execute	Any,Is_Value
0cc2 6804       |h   |		Jump_Zero	0xcc7
0cc3 e002       |    |		Load	0x0,0x2
0cc4 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0cc5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0cc6 7801       |x   |		Jump	0xcc8
0cc7 00d9       |    |		Load_Top	At_Offset_1
0cc8 e5ff       |    |		Load	0x2,-0x1
0cc9 e002       |    |		Load	0x0,0x2
0cca 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0ccb 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0ccc c405       |    |		Store	0x2,0x5
0ccd 005b       | [  |		Store_Top	Discrete,At_Offset_3
0cce 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x24.0x5 = 0xcce,0x2
0ccf 0092 24f4  |  $ |		Action	Push_String_Extended,0x24f4					; "Control_Point.Enclosing_World"
0cd1 820f       |    |		Call	0x1,0xf
0cd2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x24.0x6 = 0xcd2,0x3
0cd3 e002       |    |		Load	0x0,0x2
0cd4 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0cd5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0cd6 c402       |    |		Store	0x2,0x2
0cd7 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x24.0x7 = 0xcd7,0x4
0cd8 0120       |    |		Execute	Any,Is_Value
0cd9 6804       |h   |		Jump_Zero	0xcde
0cda e002       |    |		Load	0x0,0x2
0cdb 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
0cdc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0cdd 7801       |x   |		Jump	0xcdf
0cde 00d9       |    |		Load_Top	At_Offset_1
0cdf e011       |    |		Load	0x0,0x11
0ce0 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0ce1 e012       |    |		Load	0x0,0x12
0ce2 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0ce3 e002       |    |		Load	0x0,0x2
0ce4 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
0ce5 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0ce6 c404       |    |		Store	0x2,0x4
0ce7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x24.0x8 = 0xce7,0x5
0ce8 00da       |    |		Load_Top	At_Offset_2
0ce9 e002       |    |		Load	0x0,0x2
0cea 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
0ceb 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0cec 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x24.0x9 = 0xcec,0x6
0ced 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0cee			TRAP_0ca8:
0cee 62ad       |b   |		Indirect_Literal	Discrete,0xf9c,{0x00000000, 0x5a851501}
0cef 010f       |    |		Execute	Exception,Equal
0cf0 6802       |h   |		Jump_Zero	0xcf3
0cf1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x24.0xa = 0xcf1,0x7
0cf2 0101       |    |		Execute	Exception,Reraise
0cf3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x24.0xb = 0xcf3,0x8
0cf4 e009       |    |		Load	0x0,0x9
0cf5 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0cf6 0092 24f5  |  $ |		Action	Push_String_Extended,0x24f5					; "Enclosing_World_Set"
0cf8 8222       | "  |		Call	0x1,0x22
0cf9 4831       |H1  |		Short_Literal	0x31
0cfa 0257       | W  |		Execute	Discrete,Raise
0cfb 0000 0000  |    |		.BLANK	0000[0x5]
0d00 ; --------------------------------------------------------------------------------------
0d00 ; SUBPROGRAM
0d00 ; --------------------------------------------------------------------------------------
0d00 0d09       |    |		.CONST	0x0d09								; Address of begin
0d01 0d21       | !  |		.CONST	0x0d21								; Address of exception handler
0d02 0003       |    |		.CONST	0x0003								; Number of locals
0d03			INIT_0d00:
0d03 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x25 = .DEBUG	0x0d03,0x32a0,0x0002,0x0000,0x005a,0x8695,0x0000,0x0b2c
													; Debug Table 0x25.0x0 = 0xd03,0xffff
0d04 e016       |    |		Load	0x0,0x16							; Debug Table 0x25.0x1 = 0xd04,0xfffe
0d05 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0d06 02c7       |    |		Declare_Variable	Any
0d07 00d8       |    |		Load_Top	At_Offset_0
0d08 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0d09			BODY_0d00:
0d09 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x25.0x2 = 0xd09,0x1
0d0a 00d9       |    |		Load_Top	At_Offset_1
0d0b 0120       |    |		Execute	Any,Is_Value
0d0c 6803       |h   |		Jump_Zero	0xd10
0d0d e016       |    |		Load	0x0,0x16
0d0e 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0d0f 7801       |x   |		Jump	0xd11
0d10 00d9       |    |		Load_Top	At_Offset_1
0d11 e011       |    |		Load	0x0,0x11
0d12 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0d13 0092 24f6  |  $ |		Action	Push_String_Extended,0x24f6					; "NOTIFY_WARNINGS"
0d15 e016       |    |		Load	0x0,0x16
0d16 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0d17 c403       |    |		Store	0x2,0x3
0d18 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0d19 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x25.0x3 = 0xd19,0x2
0d1a 6804       |h   |		Jump_Zero	0xd1f
0d1b 00d8       |    |		Load_Top	At_Offset_0
0d1c e016       |    |		Load	0x0,0x16
0d1d 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0d1e 00ca       |    |		Action	Exit_Nullary_Function
0d1f 4800       |H   |		Short_Literal	0x0
0d20 00ca       |    |		Action	Exit_Nullary_Function
0d21			TRAP_0d00:
0d21 0007       |    |		Action	Break_Optional
0d22 4800       |H   |		Short_Literal	0x0							; Debug Table 0x25.0x4 = 0xd22,0x3
0d23 00ca       |    |		Action	Exit_Nullary_Function
0d24 0000 0000  |    |		.BLANK	0000[0x4]
0d28 ; --------------------------------------------------------------------------------------
0d28 ; SUBPROGRAM
0d28 ; --------------------------------------------------------------------------------------
0d28 0d2b       | +  |		.CONST	0x0d2b								; Address of begin
0d29 0004       |    |		.CONST	0x0004								; Address of exception handler
0d2a 0001       |    |		.CONST	0x0001								; Number of locals
0d2b			BODY_0d28:
0d2b			INIT_0d28:
0d2b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x26 = .DEBUG	0x0d2b,0x32ac,0x0002,0x0000,0x005a,0x8695,0x0000,0x0b59
													; Debug Table 0x26.0x0 = 0xd2b,0x1
0d2c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0d2d 0007       |    |		Action	Break_Optional
0d2e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x26.0x1 = 0xd2e,0x401
0d2f 021d       |    |		Execute	Heap_Access,Is_Null
0d30 00d0       |    |		Action	Swap_Control
0d31 00d1       |    |		Pop_Control	Pop_Count_1
0d32 6805       |h   |		Jump_Zero	0xd38							; Debug Table 0x26.0x2 = 0xd32,0x1
0d33 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x26.0x3 = 0xd33,0x2
0d34 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0d35 e00c       |    |		Load	0x0,0xc
0d36 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0d37 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0d38 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x26.0x4 = 0xd38,0x3
0d39 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0d3a e00c       |    |		Load	0x0,0xc
0d3b 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0d3c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0d3d 0000 0000  |    |		.XXX[0x3]
0d3f 0000       |    |
0d40 ; --------------------------------------------------------------------------------------
0d40 ; SUBPROGRAM
0d40 ; --------------------------------------------------------------------------------------
0d40 0d74       | t  |		.CONST	0x0d74								; Address of begin
0d41 0f7d       | }  |		.CONST	0x0f7d								; Address of exception handler
0d42 0012       |    |		.CONST	0x0012								; Number of locals
0d43			INIT_0d40:
0d43 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x27 = .DEBUG	0x0d43,0x32b8,0x0001,0x0000,0x005a,0x8695,0x0000,0x0b85
													; Debug Table 0x27.0x0 = 0xd43,0xffff
0d44 8233       | 3  |		Call	0x1,0x33
0d45 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x27.0x1 = 0xd45,0xfffe
0d46 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0d47 8231       | 1  |		Call	0x1,0x31
0d48 e002       |    |		Load	0x0,0x2
0d49 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
0d4a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d4b 011e       |    |		Execute	Any,Convert
0d4c 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x27.0x2 = 0xd4c,0xfffd
0d4d 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x27.0x3 = 0xd4d,0xfffc
0d4e e004       |    |		Load	0x0,0x4								; Debug Table 0x27.0x4 = 0xd4e,0xfffb
0d4f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d50 02c7       |    |		Declare_Variable	Any
0d51 00d8       |    |		Load_Top	At_Offset_0
0d52 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0d53 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x27.0x5 = 0xd53,0xfffa
0d54 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x27.0x6 = 0xd54,0xfff9
0d55 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x27.0x7 = 0xd55,0xfff8
0d56 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x27.0x8 = 0xd56,0xfff7
0d57 e002       |    |		Load	0x0,0x2								; Debug Table 0x27.0x9 = 0xd57,0xfff6
0d58 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0d59 02c7       |    |		Declare_Variable	Any
0d5a 00d8       |    |		Load_Top	At_Offset_0
0d5b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0d5c e002       |    |		Load	0x0,0x2								; Debug Table 0x27.0xa = 0xd5c,0xfff5
0d5d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0d5e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0d5f 02c7       |    |		Declare_Variable	Any
0d60 00d8       |    |		Load_Top	At_Offset_0
0d61 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0d62 e00e       |    |		Load	0x0,0xe								; Debug Table 0x27.0xb = 0xd62,0xfff4
0d63 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d64 02c7       |    |		Declare_Variable	Any
0d65 00d8       |    |		Load_Top	At_Offset_0
0d66 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0d67 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x27.0xc = 0xd67,0xfff3
0d68 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x27.0xd = 0xd68,0xfff2
0d69 e002       |    |		Load	0x0,0x2								; Debug Table 0x27.0xe = 0xd69,0xfff1
0d6a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d6b e002       |    |		Load	0x0,0x2								; Debug Table 0x27.0xf = 0xd6b,0xfff0
0d6c 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0d6d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d6e e002       |    |		Load	0x0,0x2								; Debug Table 0x27.0x10 = 0xd6e,0xffef
0d6f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0d70 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0d71 02c7       |    |		Declare_Variable	Any
0d72 00d8       |    |		Load_Top	At_Offset_0
0d73 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0d74			BODY_0d40:
0d74 e004       |    |		Load	0x0,0x4								; Debug Table 0x27.0x11 = 0xd74,0x1
0d75 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0d76 c406       |    |		Store	0x2,0x6
0d77 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x27.0x12 = 0xd77,0x2
0d78 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0d79 a5fb       |    |		Store_Unchecked	0x2,-0x5
0d7a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x27.0x13 = 0xd7a,0x3
0d7b a408       |    |		Store_Unchecked	0x2,0x8
0d7c 4800       |H   |		Short_Literal	0x0							; Debug Table 0x27.0x14 = 0xd7c,0x4
0d7d a5fa       |    |		Store_Unchecked	0x2,-0x6
0d7e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x27.0x15 = 0xd7e,0x5
0d7f a409       |    |		Store_Unchecked	0x2,0x9
0d80 4800       |H   |		Short_Literal	0x0							; Debug Table 0x27.0x16 = 0xd80,0x6
0d81 a5f9       |    |		Store_Unchecked	0x2,-0x7
0d82 4801       |H   |		Short_Literal	0x1							; Debug Table 0x27.0x17 = 0xd82,0x7
0d83 a40a       |    |		Store_Unchecked	0x2,0xa
0d84 e013       |    |		Load	0x0,0x13							; Debug Table 0x27.0x18 = 0xd84,0x8
0d85 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0d86 e004       |    |		Load	0x0,0x4
0d87 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0d88 c406       |    |		Store	0x2,0x6
0d89 e002       |    |		Load	0x0,0x2								; Debug Table 0x27.0x19 = 0xd89,0x9
0d8a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d8b 00d9       |    |		Load_Top	At_Offset_1
0d8c 0120       |    |		Execute	Any,Is_Value
0d8d 6804       |h   |		Jump_Zero	0xd92
0d8e e002       |    |		Load	0x0,0x2
0d8f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0d90 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0d91 7801       |x   |		Jump	0xd93
0d92 00d9       |    |		Load_Top	At_Offset_1
0d93 e002       |    |		Load	0x0,0x2
0d94 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0d95 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0d96 4800       |H   |		Short_Literal	0x0
0d97 4801       |H   |		Short_Literal	0x1
0d98 4801       |H   |		Short_Literal	0x1
0d99 4800       |H   |		Short_Literal	0x0
0d9a e406       |    |		Load	0x2,0x6
0d9b 4801       |H   |		Short_Literal	0x1
0d9c e5fc       |    |		Load	0x2,-0x4
0d9d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0d9e e002       |    |		Load	0x0,0x2
0d9f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0da0 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0da1 e002       |    |		Load	0x0,0x2
0da2 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0da3 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0da4 e5fc       |    |		Load	0x2,-0x4
0da5 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0da6 c412       |    |		Store	0x2,0x12
0da7 005b       | [  |		Store_Top	Discrete,At_Offset_3
0da8 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0x1a = 0xda8,0xa
0da9 460e       |F   |		Jump_Case	0xf
0daa 7837       |x7  |		Jump	0xde2								; case 0x0
0dab 780d       |x   |		Jump	0xdb9								; case 0x1
0dac 7824       |x$  |		Jump	0xdd1								; case 0x2
0dad 7823       |x#  |		Jump	0xdd1								; case 0x3
0dae 7822       |x"  |		Jump	0xdd1								; case 0x4
0daf 7821       |x!  |		Jump	0xdd1								; case 0x5
0db0 7820       |x   |		Jump	0xdd1								; case 0x6
0db1 781f       |x   |		Jump	0xdd1								; case 0x7
0db2 781e       |x   |		Jump	0xdd1								; case 0x8
0db3 781d       |x   |		Jump	0xdd1								; case 0x9
0db4 781c       |x   |		Jump	0xdd1								; case 0xa
0db5 7810       |x   |		Jump	0xdc6								; case 0xb
0db6 781a       |x   |		Jump	0xdd1								; case 0xc
0db7 7819       |x   |		Jump	0xdd1								; case 0xd
0db8 7818       |x   |		Jump	0xdd1								; case 0xe
0db9 e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x1b = 0xdb9,0xc
0dba 4801       |H   |		Short_Literal	0x1
0dbb 4800       |H   |		Short_Literal	0x0
0dbc e004       |    |		Load	0x0,0x4
0dbd 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0dbe c406       |    |		Store	0x2,0x6
0dbf e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x27.0x1c = 0xdbf,0xd
0dc0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0dc1 0092 24f7  |  $ |		Action	Push_String_Extended,0x24f7					; "Promote"
0dc3 e008       |    |		Load	0x0,0x8
0dc4 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0dc5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x27.0x1d = 0xdc5,0xe
0dc6 e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x1e = 0xdc6,0xf
0dc7 4801       |H   |		Short_Literal	0x1
0dc8 4800       |H   |		Short_Literal	0x0
0dc9 e004       |    |		Load	0x0,0x4
0dca 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0dcb c406       |    |		Store	0x2,0x6
0dcc 0092 24f8  |  $ |		Action	Push_String_Extended,0x24f8					; "Promote failed - unit is frozen"
													; Debug Table 0x27.0x1f = 0xdcc,0x10
0dce e00a       |    |		Load	0x0,0xa
0dcf 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0dd0 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x27.0x20 = 0xdd0,0x11
0dd1 e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x21 = 0xdd1,0x12
0dd2 4801       |H   |		Short_Literal	0x1
0dd3 4800       |H   |		Short_Literal	0x0
0dd4 e004       |    |		Load	0x0,0x4
0dd5 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0dd6 c406       |    |		Store	0x2,0x6
0dd7 0092 24f9  |  $ |		Action	Push_String_Extended,0x24f9					; "Promote failed - "
													; Debug Table 0x27.0x22 = 0xdd7,0x13
0dd9 00db       |    |		Load_Top	At_Offset_3
0dda e002       |    |		Load	0x0,0x2
0ddb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0ddc 025e       | ^  |		Execute	Discrete,Convert
0ddd 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0dde 01cc       |    |		Execute	Vector,Catenate
0ddf e00a       |    |		Load	0x0,0xa
0de0 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0de1 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x27.0x23 = 0xde1,0x14
0de2 e002       |    |		Load	0x0,0x2								; Debug Table 0x27.0x24 = 0xde2,0x15
0de3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0de4 00e1       |    |		Load_Encached	Boolean_Cache
0de5 e5fc       |    |		Load	0x2,-0x4
0de6 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0de7 e002       |    |		Load	0x0,0x2
0de8 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0de9 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0dea c407       |    |		Store	0x2,0x7
0deb 005b       | [  |		Store_Top	Discrete,At_Offset_3
0dec 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0x25 = 0xdec,0x16
0ded 0092 24fa  |  $ |		Action	Push_String_Extended,0x24fa					; "Decl_Ops.Will_Be_A_Comp_Unit"
0def 820f       |    |		Call	0x1,0xf
0df0 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x27.0x26 = 0xdf0,0x17
0df1 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0df2 0007       |    |		Action	Break_Optional
0df3 e413       |    |		Load	0x2,0x13							; Debug Table 0x27.0x27 = 0xdf3,0x401
0df4 0007       |    |		Action	Break_Optional
0df5 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x27.0x28 = 0xdf5,0x402
0df6 0007       |    |		Action	Break_Optional							; Debug Table 0x27.0x29 = 0xdf6,0x403
0df7 00d0       |    |		Action	Swap_Control							; Debug Table 0x27.0x2a = 0xdf7,0x404
0df8 00d1       |    |		Pop_Control	Pop_Count_1
0df9 0fab       |    |		Execute_Immediate	Equal,-0x55					; Debug Table 0x27.0x2b = 0xdf9,0x17
0dfa 68aa       |h   |		Jump_Zero	0xea5
0dfb e407       |    |		Load	0x2,0x7								; Debug Table 0x27.0x2c = 0xdfb,0x18
0dfc 6873       |hs  |		Jump_Zero	0xe70
0dfd e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x27.0x2d = 0xdfd,0x19
0dfe 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0dff a405       |    |		Store_Unchecked	0x2,0x5
0e00 e002       |    |		Load	0x0,0x2								; Debug Table 0x27.0x2e = 0xe00,0x1a
0e01 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0e02 00f1       |    |		Load_Encached	Diana_Temp_Seq
0e03 e002       |    |		Load	0x0,0x2
0e04 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0e05 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0e06 e40d       |    |		Load	0x2,0xd
0e07 0120       |    |		Execute	Any,Is_Value
0e08 6803       |h   |		Jump_Zero	0xe0c
0e09 e00e       |    |		Load	0x0,0xe
0e0a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0e0b 7801       |x   |		Jump	0xe0d
0e0c e40d       |    |		Load	0x2,0xd
0e0d e40a       |    |		Load	0x2,0xa
0e0e e5fc       |    |		Load	0x2,-0x4
0e0f 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0e10 6187       |a   |		Indirect_Literal	Discrete,0xf98,{0x00000000, 0x00004000}
0e11 e406       |    |		Load	0x2,0x6
0e12 4803       |H   |		Short_Literal	0x3
0e13 e403       |    |		Load	0x2,0x3
0e14 e002       |    |		Load	0x0,0x2
0e15 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0e16 4802       |H   |		Short_Literal	0x2
0e17 e002       |    |		Load	0x0,0x2
0e18 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0e19 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0e1a e5fc       |    |		Load	0x2,-0x4
0e1b 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0e1c c40a       |    |		Store	0x2,0xa
0e1d c40d       |    |		Store	0x2,0xd
0e1e c40e       |    |		Store	0x2,0xe
0e1f c40f       |    |		Store	0x2,0xf
0e20 005b       | [  |		Store_Top	Discrete,At_Offset_3
0e21 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0x2f = 0xe21,0x1b
0e22 460e       |F   |		Jump_Case	0xf
0e23 7844       |xD  |		Jump	0xe68								; case 0x0
0e24 7831       |x1  |		Jump	0xe56								; case 0x1
0e25 780c       |x   |		Jump	0xe32								; case 0x2
0e26 782f       |x/  |		Jump	0xe56								; case 0x3
0e27 781c       |x   |		Jump	0xe44								; case 0x4
0e28 782d       |x-  |		Jump	0xe56								; case 0x5
0e29 782c       |x,  |		Jump	0xe56								; case 0x6
0e2a 782b       |x+  |		Jump	0xe56								; case 0x7
0e2b 782a       |x*  |		Jump	0xe56								; case 0x8
0e2c 7829       |x)  |		Jump	0xe56								; case 0x9
0e2d 7828       |x(  |		Jump	0xe56								; case 0xa
0e2e 7827       |x'  |		Jump	0xe56								; case 0xb
0e2f 7826       |x&  |		Jump	0xe56								; case 0xc
0e30 7825       |x%  |		Jump	0xe56								; case 0xd
0e31 7824       |x$  |		Jump	0xe56								; case 0xe
0e32 e40a       |    |		Load	0x2,0xa								; Debug Table 0x27.0x30 = 0xe32,0x1d
0e33 7009       |p   |		Jump_Nonzero	0xe3d
0e34 e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x31 = 0xe34,0x1e
0e35 4801       |H   |		Short_Literal	0x1
0e36 4800       |H   |		Short_Literal	0x0
0e37 e004       |    |		Load	0x0,0x4
0e38 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e39 c406       |    |		Store	0x2,0x6
0e3a e004       |    |		Load	0x0,0x4								; Debug Table 0x27.0x32 = 0xe3a,0x1f
0e3b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0e3c c406       |    |		Store	0x2,0x6
0e3d e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x33 = 0xe3d,0x20
0e3e e40d       |    |		Load	0x2,0xd
0e3f 0092 24f7  |  $ |		Action	Push_String_Extended,0x24f7					; "Promote"
0e41 e5fc       |    |		Load	0x2,-0x4
0e42 822b       | +  |		Call	0x1,0x2b
0e43 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x27.0x34 = 0xe43,0x21
0e44 e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x35 = 0xe44,0x22
0e45 4801       |H   |		Short_Literal	0x1
0e46 4800       |H   |		Short_Literal	0x0
0e47 e004       |    |		Load	0x0,0x4
0e48 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e49 c406       |    |		Store	0x2,0x6
0e4a e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x27.0x36 = 0xe4a,0x23
0e4b 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0e4c e5fc       |    |		Load	0x2,-0x4
0e4d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0e4e e001       |    |		Load	0x0,0x1
0e4f 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0e50 e40e       |    |		Load	0x2,0xe								; Debug Table 0x27.0x37 = 0xe50,0x24
0e51 0092 24f7  |  $ |		Action	Push_String_Extended,0x24f7					; "Promote"
0e53 e402       |    |		Load	0x2,0x2
0e54 822e       | .  |		Call	0x1,0x2e
0e55 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x27.0x38 = 0xe55,0x25
0e56 e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x39 = 0xe56,0x26
0e57 4801       |H   |		Short_Literal	0x1
0e58 4800       |H   |		Short_Literal	0x0
0e59 e004       |    |		Load	0x0,0x4
0e5a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e5b c406       |    |		Store	0x2,0x6
0e5c e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x27.0x3a = 0xe5c,0x27
0e5d 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0e5e e5fc       |    |		Load	0x2,-0x4
0e5f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0e60 e001       |    |		Load	0x0,0x1
0e61 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0e62 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0x3b = 0xe62,0x28
0e63 e40d       |    |		Load	0x2,0xd
0e64 0092 24f7  |  $ |		Action	Push_String_Extended,0x24f7					; "Promote"
0e66 8230       | 0  |		Call	0x1,0x30
0e67 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x27.0x3c = 0xe67,0x29
0e68 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x27.0x3d = 0xe68,0x2a
0e69 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0e6a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x27.0x3e = 0xe6a,0x2b
0e6b a409       |    |		Store_Unchecked	0x2,0x9
0e6c 4802       |H   |		Short_Literal	0x2							; Debug Table 0x27.0x3f = 0xe6c,0x2c
0e6d e5fc       |    |		Load	0x2,-0x4
0e6e 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0e6f 7837       |x7  |		Jump	0xea7
0e70 4801       |H   |		Short_Literal	0x1							; Debug Table 0x27.0x40 = 0xe70,0x2d
0e71 a408       |    |		Store_Unchecked	0x2,0x8
0e72 e002       |    |		Load	0x0,0x2								; Debug Table 0x27.0x41 = 0xe72,0x2e
0e73 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0e74 e002       |    |		Load	0x0,0x2
0e75 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0e76 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0e77 6120       |a   |		Indirect_Literal	Discrete,0xf98,{0x00000000, 0x00004000}
0e78 e004       |    |		Load	0x0,0x4
0e79 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0e7a e5fc       |    |		Load	0x2,-0x4
0e7b 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0e7c e002       |    |		Load	0x0,0x2
0e7d 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0e7e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0e7f 005b       | [  |		Store_Top	Discrete,At_Offset_3
0e80 005b       | [  |		Store_Top	Discrete,At_Offset_3
0e81 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0x42 = 0xe81,0x2f
0e82 0092 24fb  |  $ |		Action	Push_String_Extended,0x24fb					; "Decl_Ops.Get_Unit_State (3)"
0e84 820f       |    |		Call	0x1,0xf
0e85 e002       |    |		Load	0x0,0x2								; Debug Table 0x27.0x43 = 0xe85,0x30
0e86 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0e87 e40c       |    |		Load	0x2,0xc
0e88 0120       |    |		Execute	Any,Is_Value
0e89 6804       |h   |		Jump_Zero	0xe8e
0e8a e002       |    |		Load	0x0,0x2
0e8b 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0e8c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0e8d 7801       |x   |		Jump	0xe8f
0e8e e40c       |    |		Load	0x2,0xc
0e8f e5fc       |    |		Load	0x2,-0x4
0e90 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0e91 e002       |    |		Load	0x0,0x2
0e92 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0e93 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0e94 c40c       |    |		Store	0x2,0xc
0e95 005b       | [  |		Store_Top	Discrete,At_Offset_3
0e96 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0x44 = 0xe96,0x31
0e97 0092 24bf  |  $ |		Action	Push_String_Extended,0x24bf					; "Ada.Get_Unit"
0e99 820f       |    |		Call	0x1,0xf
0e9a e40c       |    |		Load	0x2,0xc								; Debug Table 0x27.0x45 = 0xe9a,0x32
0e9b e002       |    |		Load	0x0,0x2
0e9c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0e9d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0e9e c40b       |    |		Store	0x2,0xb
0e9f e011       |    |		Load	0x0,0x11							; Debug Table 0x27.0x46 = 0xe9f,0x33
0ea0 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0ea1 e40b       |    |		Load	0x2,0xb
0ea2 e017       |    |		Load	0x0,0x17
0ea3 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0ea4 7802       |x   |		Jump	0xea7
0ea5 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x27.0x47 = 0xea5,0x34
0ea6 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0ea7 e409       |    |		Load	0x2,0x9								; Debug Table 0x27.0x48 = 0xea7,0x35
0ea8 6825       |h%  |		Jump_Zero	0xece
0ea9 00d9       |    |		Load_Top	At_Offset_1
0eaa 0f02       |    |		Execute_Immediate	Equal,0x2
0eab 6822       |h"  |		Jump_Zero	0xece
0eac e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x49 = 0xeac,0x36
0ead 4801       |H   |		Short_Literal	0x1
0eae 4801       |H   |		Short_Literal	0x1
0eaf e004       |    |		Load	0x0,0x4
0eb0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0eb1 c406       |    |		Store	0x2,0x6
0eb2 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x27.0x4a = 0xeb2,0x37
0eb3 680d       |h   |		Jump_Zero	0xec1
0eb4 e402       |    |		Load	0x2,0x2								; Debug Table 0x27.0x4b = 0xeb4,0x38
0eb5 0092 24fc  |  $ |		Action	Push_String_Extended,0x24fc					; " changed to "
0eb7 01cc       |    |		Execute	Vector,Catenate
0eb8 4802       |H   |		Short_Literal	0x2
0eb9 e002       |    |		Load	0x0,0x2
0eba 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0ebb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0ebc 025e       | ^  |		Execute	Discrete,Convert
0ebd 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0ebe 01cc       |    |		Execute	Vector,Catenate
0ebf e00a       |    |		Load	0x0,0xa
0ec0 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0ec1 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x27.0x4c = 0xec1,0x39
0ec2 680a       |h   |		Jump_Zero	0xecd
0ec3 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x27.0x4d = 0xec3,0x3a
0ec4 e5fc       |    |		Load	0x2,-0x4
0ec5 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0ec6 8227       | '  |		Call	0x1,0x27
0ec7 c404       |    |		Store	0x2,0x4
0ec8 e404       |    |		Load	0x2,0x4								; Debug Table 0x27.0x4e = 0xec8,0x3b
0ec9 e5fc       |    |		Load	0x2,-0x4
0eca 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0ecb e001       |    |		Load	0x0,0x1
0ecc 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0ecd 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x27.0x4f = 0xecd,0x3c
0ece e002       |    |		Load	0x0,0x2								; Debug Table 0x27.0x50 = 0xece,0x3d
0ecf 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0ed0 00f1       |    |		Load_Encached	Diana_Temp_Seq
0ed1 e002       |    |		Load	0x0,0x2
0ed2 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0ed3 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0ed4 e40d       |    |		Load	0x2,0xd
0ed5 0120       |    |		Execute	Any,Is_Value
0ed6 6803       |h   |		Jump_Zero	0xeda
0ed7 e00e       |    |		Load	0x0,0xe
0ed8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0ed9 7801       |x   |		Jump	0xedb
0eda e40d       |    |		Load	0x2,0xd
0edb e40a       |    |		Load	0x2,0xa
0edc e5fc       |    |		Load	0x2,-0x4
0edd 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0ede 60b9       |`   |		Indirect_Literal	Discrete,0xf98,{0x00000000, 0x00004000}
0edf e406       |    |		Load	0x2,0x6
0ee0 4803       |H   |		Short_Literal	0x3
0ee1 e403       |    |		Load	0x2,0x3
0ee2 e002       |    |		Load	0x0,0x2
0ee3 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0ee4 e411       |    |		Load	0x2,0x11
0ee5 e002       |    |		Load	0x0,0x2
0ee6 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0ee7 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0ee8 e5fc       |    |		Load	0x2,-0x4
0ee9 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0eea c40a       |    |		Store	0x2,0xa
0eeb c40d       |    |		Store	0x2,0xd
0eec c40e       |    |		Store	0x2,0xe
0eed c40f       |    |		Store	0x2,0xf
0eee 005b       | [  |		Store_Top	Discrete,At_Offset_3
0eef 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0x51 = 0xeef,0x3e
0ef0 7007       |p   |		Jump_Nonzero	0xef8
0ef1 e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x52 = 0xef1,0x3f
0ef2 4801       |H   |		Short_Literal	0x1
0ef3 4801       |H   |		Short_Literal	0x1
0ef4 e004       |    |		Load	0x0,0x4
0ef5 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0ef6 c406       |    |		Store	0x2,0x6
0ef7 7814       |x   |		Jump	0xf0c
0ef8 e40a       |    |		Load	0x2,0xa								; Debug Table 0x27.0x53 = 0xef8,0x40
0ef9 6804       |h   |		Jump_Zero	0xefe
0efa 00da       |    |		Load_Top	At_Offset_2
0efb 0f02       |    |		Execute_Immediate	Equal,0x2
0efc 6801       |h   |		Jump_Zero	0xefe
0efd 7809       |x   |		Jump	0xf07								; Debug Table 0x27.0x54 = 0xefd,0x41
0efe e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x55 = 0xefe,0x42
0eff 4801       |H   |		Short_Literal	0x1
0f00 4800       |H   |		Short_Literal	0x0
0f01 e004       |    |		Load	0x0,0x4
0f02 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0f03 c406       |    |		Store	0x2,0x6
0f04 e004       |    |		Load	0x0,0x4								; Debug Table 0x27.0x56 = 0xf04,0x43
0f05 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0f06 c406       |    |		Store	0x2,0x6
0f07 e409       |    |		Load	0x2,0x9								; Debug Table 0x27.0x57 = 0xf07,0x44
0f08 6803       |h   |		Jump_Zero	0xf0c
0f09 e405       |    |		Load	0x2,0x5								; Debug Table 0x27.0x58 = 0xf09,0x45
0f0a e5fc       |    |		Load	0x2,-0x4
0f0b 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0f0c e408       |    |		Load	0x2,0x8								; Debug Table 0x27.0x59 = 0xf0c,0x46
0f0d 6804       |h   |		Jump_Zero	0xf12
0f0e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x27.0x5a = 0xf0e,0x47
0f0f e40b       |    |		Load	0x2,0xb
0f10 e001       |    |		Load	0x0,0x1
0f11 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0f12 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0x5b = 0xf12,0x48
0f13 460e       |F   |		Jump_Case	0xf
0f14 780e       |x   |		Jump	0xf23								; case 0x0
0f15 785b       |x[  |		Jump	0xf71								; case 0x1
0f16 7847       |xG  |		Jump	0xf5e								; case 0x2
0f17 7839       |x9  |		Jump	0xf51								; case 0x3
0f18 784c       |xL  |		Jump	0xf65								; case 0x4
0f19 7857       |xW  |		Jump	0xf71								; case 0x5
0f1a 7856       |xV  |		Jump	0xf71								; case 0x6
0f1b 7855       |xU  |		Jump	0xf71								; case 0x7
0f1c 7854       |xT  |		Jump	0xf71								; case 0x8
0f1d 7853       |xS  |		Jump	0xf71								; case 0x9
0f1e 7852       |xR  |		Jump	0xf71								; case 0xa
0f1f 7851       |xQ  |		Jump	0xf71								; case 0xb
0f20 7850       |xP  |		Jump	0xf71								; case 0xc
0f21 784f       |xO  |		Jump	0xf71								; case 0xd
0f22 784e       |xN  |		Jump	0xf71								; case 0xe
0f23 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x27.0x5c = 0xf23,0x49
0f24 6804       |h   |		Jump_Zero	0xf29
0f25 00d9       |    |		Load_Top	At_Offset_1
0f26 0f02       |    |		Execute_Immediate	Equal,0x2
0f27 6801       |h   |		Jump_Zero	0xf29
0f28 0007       |    |		Action	Break_Optional							; Debug Table 0x27.0x5d = 0xf28,0x4a
0f29 e408       |    |		Load	0x2,0x8								; Debug Table 0x27.0x5e = 0xf29,0x4b
0f2a 7005       |p   |		Jump_Nonzero	0xf30
0f2b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x27.0x5f = 0xf2b,0x4c
0f2c e5fc       |    |		Load	0x2,-0x4
0f2d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0f2e e001       |    |		Load	0x0,0x1
0f2f 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0f30 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x27.0x60 = 0xf30,0x4d
0f31 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0f32 a5fb       |    |		Store_Unchecked	0x2,-0x5
0f33 e408       |    |		Load	0x2,0x8								; Debug Table 0x27.0x61 = 0xf33,0x4e
0f34 a5fa       |    |		Store_Unchecked	0x2,-0x6
0f35 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x27.0x62 = 0xf35,0x4f
0f36 6817       |h   |		Jump_Zero	0xf4e
0f37 e40d       |    |		Load	0x2,0xd								; Debug Table 0x27.0x63 = 0xf37,0x50
0f38 e00e       |    |		Load	0x0,0xe
0f39 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0f3a 7006       |p   |		Jump_Nonzero	0xf41
0f3b 8232       | 2  |		Call	0x1,0x32
0f3c 6804       |h   |		Jump_Zero	0xf41
0f3d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x27.0x64 = 0xf3d,0x51
0f3e e40d       |    |		Load	0x2,0xd
0f3f e008       |    |		Load	0x0,0x8
0f40 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0f41 e402       |    |		Load	0x2,0x2								; Debug Table 0x27.0x65 = 0xf41,0x52
0f42 0092 24fc  |  $ |		Action	Push_String_Extended,0x24fc					; " changed to "
0f44 01cc       |    |		Execute	Vector,Catenate
0f45 00da       |    |		Load_Top	At_Offset_2
0f46 e002       |    |		Load	0x0,0x2
0f47 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0f48 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0f49 025e       | ^  |		Execute	Discrete,Convert
0f4a 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0f4b 01cc       |    |		Execute	Vector,Catenate
0f4c e00a       |    |		Load	0x0,0xa
0f4d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0f4e 4801       |H   |		Short_Literal	0x1							; Debug Table 0x27.0x66 = 0xf4e,0x53
0f4f a5f9       |    |		Store_Unchecked	0x2,-0x7
0f50 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0f51 e011       |    |		Load	0x0,0x11							; Debug Table 0x27.0x67 = 0xf51,0x54
0f52 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0f53 e5fc       |    |		Load	0x2,-0x4
0f54 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0f55 e017       |    |		Load	0x0,0x17
0f56 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0f57 e40d       |    |		Load	0x2,0xd								; Debug Table 0x27.0x68 = 0xf57,0x55
0f58 e40e       |    |		Load	0x2,0xe
0f59 0092 24f7  |  $ |		Action	Push_String_Extended,0x24f7					; "Promote"
0f5b e402       |    |		Load	0x2,0x2
0f5c 822d       | -  |		Call	0x1,0x2d
0f5d 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0f5e e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x69 = 0xf5e,0x56
0f5f e40d       |    |		Load	0x2,0xd
0f60 0092 24f7  |  $ |		Action	Push_String_Extended,0x24f7					; "Promote"
0f62 e5fc       |    |		Load	0x2,-0x4
0f63 822b       | +  |		Call	0x1,0x2b
0f64 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0f65 e011       |    |		Load	0x0,0x11							; Debug Table 0x27.0x6a = 0xf65,0x57
0f66 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0f67 e5fc       |    |		Load	0x2,-0x4
0f68 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0f69 e017       |    |		Load	0x0,0x17
0f6a 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0f6b e40e       |    |		Load	0x2,0xe								; Debug Table 0x27.0x6b = 0xf6b,0x58
0f6c 0092 24f7  |  $ |		Action	Push_String_Extended,0x24f7					; "Promote"
0f6e e402       |    |		Load	0x2,0x2
0f6f 822e       | .  |		Call	0x1,0x2e
0f70 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0f71 e011       |    |		Load	0x0,0x11							; Debug Table 0x27.0x6c = 0xf71,0x59
0f72 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0f73 e5fc       |    |		Load	0x2,-0x4
0f74 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0f75 e017       |    |		Load	0x0,0x17
0f76 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0f77 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0x6d = 0xf77,0x5a
0f78 e40d       |    |		Load	0x2,0xd
0f79 0092 24f7  |  $ |		Action	Push_String_Extended,0x24f7					; "Promote"
0f7b 8230       | 0  |		Call	0x1,0x30
0f7c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0f7d			TRAP_0d40:
0f7d 601e       |`   |		Indirect_Literal	Discrete,0xf9c,{0x00000000, 0x5a851501}
0f7e 010f       |    |		Execute	Exception,Equal
0f7f 6808       |h   |		Jump_Zero	0xf88
0f80 e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x6e = 0xf80,0x5b
0f81 4801       |H   |		Short_Literal	0x1
0f82 4800       |H   |		Short_Literal	0x0
0f83 e004       |    |		Load	0x0,0x4
0f84 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0f85 c406       |    |		Store	0x2,0x6
0f86 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x27.0x6f = 0xf86,0x5c
0f87 0101       |    |		Execute	Exception,Reraise
0f88 e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x70 = 0xf88,0x5d
0f89 4801       |H   |		Short_Literal	0x1
0f8a 4800       |H   |		Short_Literal	0x0
0f8b e004       |    |		Load	0x0,0x4
0f8c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0f8d c406       |    |		Store	0x2,0x6
0f8e 4801       |H   |		Short_Literal	0x1							; Debug Table 0x27.0x71 = 0xf8e,0x5e
0f8f e009       |    |		Load	0x0,0x9
0f90 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0f91 0092 24f7  |  $ |		Action	Push_String_Extended,0x24f7					; "Promote"
0f93 8222       | "  |		Call	0x1,0x22
0f94 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0f95 0000 0000  |    |		.XXX[0x3]
0f97 0000       |    |
0f98 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0f9c 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a851501}
0fa0 ; --------------------------------------------------------------------------------------
0fa0 ; SUBPROGRAM
0fa0 ; --------------------------------------------------------------------------------------
0fa0 0fa3       |    |		.CONST	0x0fa3								; Address of begin
0fa1 0fb1       |    |		.CONST	0x0fb1								; Address of exception handler
0fa2 0001       |    |		.CONST	0x0001								; Number of locals
0fa3			BODY_0fa0:
0fa3			INIT_0fa0:
0fa3 0007       |    |		Action	Break_Optional							; Debug Table 0x28 = .DEBUG	0x0fa3,0x339e,0x0002,0x0000,0x005a,0x8695,0x0000,0x0f84
													; Debug Table 0x28.0x0 = 0xfa3,0x1
0fa4 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x28.0x1 = 0xfa4,0x401
0fa5 0007       |    |		Action	Break_Optional
0fa6 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x28.0x2 = 0xfa6,0x402
0fa7 0007       |    |		Action	Break_Optional							; Debug Table 0x28.0x3 = 0xfa7,0x403
0fa8 0007       |    |		Action	Break_Optional							; Debug Table 0x28.0x4 = 0xfa8,0x404
0fa9 0ba1       |    |		Execute_Immediate	Case_Compare,0xa1				; Debug Table 0x28.0x5 = 0xfa9,0x1
0faa 7002       |p   |		Jump_Nonzero	0xfad
0fab 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x28.0x6 = 0xfab,0x3
0fac 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0fad 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x28.0x7 = 0xfad,0x2
0fae 00eb       |    |		Load_Encached	Diana_Cache
0faf 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0fb0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0fb1			TRAP_0fa0:
0fb1 67ea       |g   |		Indirect_Literal	Discrete,0xf9c,{0x00000000, 0x5a851501}
0fb2 010f       |    |		Execute	Exception,Equal
0fb3 6802       |h   |		Jump_Zero	0xfb6
0fb4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x28.0x8 = 0xfb4,0x4
0fb5 0101       |    |		Execute	Exception,Reraise
0fb6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x28.0x9 = 0xfb6,0x5
0fb7 e009       |    |		Load	0x0,0x9
0fb8 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0fb9 0092 24fd  |  $ |		Action	Push_String_Extended,0x24fd					; "Enclosing_Demotable_Node"
0fbb 8222       | "  |		Call	0x1,0x22
0fbc 4831       |H1  |		Short_Literal	0x31
0fbd 0257       | W  |		Execute	Discrete,Raise
0fbe 0000 0000  |    |		.XXX[0x2]
0fc0 ; --------------------------------------------------------------------------------------
0fc0 ; SUBPROGRAM
0fc0 ; --------------------------------------------------------------------------------------
0fc0 0fca       |    |		.CONST	0x0fca								; Address of begin
0fc1 0ffc       |    |		.CONST	0x0ffc								; Address of exception handler
0fc2 0003       |    |		.CONST	0x0003								; Number of locals
0fc3			INIT_0fc0:
0fc3 e002       |    |		Load	0x0,0x2								; Debug Table 0x29 = .DEBUG	0x0fc3,0x33b4,0x0002,0x0000,0x005a,0x8695,0x0000,0x0fc0
													; Debug Table 0x29.0x0 = 0xfc3,0xffff
0fc4 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0fc5 02ff       |    |		Declare_Variable	Variant_Record
0fc6 00d8       |    |		Load_Top	At_Offset_0
0fc7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0fc8 e002       |    |		Load	0x0,0x2								; Debug Table 0x29.0x1 = 0xfc8,0xfffe
0fc9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0fca			BODY_0fc0:
0fca e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x29.0x2 = 0xfca,0x1
0fcb 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0fcc 0007       |    |		Action	Break_Optional
0fcd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x29.0x3 = 0xfcd,0x401
0fce 021d       |    |		Execute	Heap_Access,Is_Null
0fcf 00d0       |    |		Action	Swap_Control
0fd0 00d1       |    |		Pop_Control	Pop_Count_1
0fd1 6813       |h   |		Jump_Zero	0xfe5							; Debug Table 0x29.0x4 = 0xfd1,0x1
0fd2 e002       |    |		Load	0x0,0x2								; Debug Table 0x29.0x5 = 0xfd2,0x2
0fd3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0fd4 00da       |    |		Load_Top	At_Offset_2
0fd5 67c2       |g   |		Indirect_Literal	Discrete,0xf98,{0x00000000, 0x00004000}
0fd6 e004       |    |		Load	0x0,0x4
0fd7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0fd8 4800       |H   |		Short_Literal	0x0
0fd9 e5ff       |    |		Load	0x2,-0x1
0fda 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0fdb e002       |    |		Load	0x0,0x2
0fdc 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0fdd 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0fde 00d1       |    |		Pop_Control	Pop_Count_1
0fdf 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0fe0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x29.0x6 = 0xfe0,0x3
0fe1 0092 24c3  |  $ |		Action	Push_String_Extended,0x24c3					; "Traversal.Get_Version"
0fe3 820f       |    |		Call	0x1,0xf
0fe4 780e       |x   |		Jump	0xff3
0fe5 e002       |    |		Load	0x0,0x2								; Debug Table 0x29.0x7 = 0xfe5,0x4
0fe6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0fe7 00da       |    |		Load_Top	At_Offset_2
0fe8 e5ff       |    |		Load	0x2,-0x1
0fe9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0fea e002       |    |		Load	0x0,0x2
0feb 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0fec 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0fed 00d1       |    |		Pop_Control	Pop_Count_1
0fee 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0fef 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x29.0x8 = 0xfef,0x5
0ff0 0092 24d3  |  $ |		Action	Push_String_Extended,0x24d3					; "Ada.Get_Version"
0ff2 820f       |    |		Call	0x1,0xf
0ff3 e004       |    |		Load	0x0,0x4								; Debug Table 0x29.0x9 = 0xff3,0x6
0ff4 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0ff5 4802       |H   |		Short_Literal	0x2
0ff6 00db       |    |		Load_Top	At_Offset_3
0ff7 e011       |    |		Load	0x0,0x11
0ff8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0ff9 e018       |    |		Load	0x0,0x18
0ffa 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0ffb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ffc			TRAP_0fc0:
0ffc 679f       |g   |		Indirect_Literal	Discrete,0xf9c,{0x00000000, 0x5a851501}
0ffd 010f       |    |		Execute	Exception,Equal
0ffe 6802       |h   |		Jump_Zero	0x1001
0fff 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x29.0xa = 0xfff,0x7
1000 0101       |    |		Execute	Exception,Reraise
1001 4801       |H   |		Short_Literal	0x1							; Debug Table 0x29.0xb = 0x1001,0x8
1002 e009       |    |		Load	0x0,0x9
1003 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1004 0092 24fe  |  $ |		Action	Push_String_Extended,0x24fe					; "Is_Writable"
1006 8222       | "  |		Call	0x1,0x22
1007 4831       |H1  |		Short_Literal	0x31
1008 0257       | W  |		Execute	Discrete,Raise
1009 0000 0000  |    |		.BLANK	0000[0x7]
1010 ; --------------------------------------------------------------------------------------
1010 ; SUBPROGRAM
1010 ; --------------------------------------------------------------------------------------
1010 103c       | <  |		.CONST	0x103c								; Address of begin
1011 118a       |    |		.CONST	0x118a								; Address of exception handler
1012 0010       |    |		.CONST	0x0010								; Number of locals
1013			INIT_1010:
1013 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2a = .DEBUG	0x1013,0x33ce,0x0001,0x0000,0x005a,0x8695,0x0000,0x1037
													; Debug Table 0x2a.0x0 = 0x1013,0xffff
1014 8233       | 3  |		Call	0x1,0x33
1015 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2a.0x1 = 0x1015,0xfffe
1016 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1017 8231       | 1  |		Call	0x1,0x31
1018 e002       |    |		Load	0x0,0x2
1019 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
101a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
101b 011e       |    |		Execute	Any,Convert
101c 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2a.0x2 = 0x101c,0xfffd
101d 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2a.0x3 = 0x101d,0xfffc
101e e002       |    |		Load	0x0,0x2								; Debug Table 0x2a.0x4 = 0x101e,0xfffb
101f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1020 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
1021 02c7       |    |		Declare_Variable	Any
1022 00d8       |    |		Load_Top	At_Offset_0
1023 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1024 e004       |    |		Load	0x0,0x4								; Debug Table 0x2a.0x5 = 0x1024,0xfffa
1025 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1026 02c7       |    |		Declare_Variable	Any
1027 00d8       |    |		Load_Top	At_Offset_0
1028 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1029 e00e       |    |		Load	0x0,0xe								; Debug Table 0x2a.0x6 = 0x1029,0xfff9
102a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
102b 02c7       |    |		Declare_Variable	Any
102c 00d8       |    |		Load_Top	At_Offset_0
102d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
102e 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x2a.0x7 = 0x102e,0xfff8
102f 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x2a.0x8 = 0x102f,0xfff7
1030 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2a.0x9 = 0x1030,0xfff6
1031 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2a.0xa = 0x1031,0xfff5
1032 e002       |    |		Load	0x0,0x2								; Debug Table 0x2a.0xb = 0x1032,0xfff4
1033 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1034 02c7       |    |		Declare_Variable	Any
1035 00d8       |    |		Load_Top	At_Offset_0
1036 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1037 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2a.0xc = 0x1037,0xfff3
1038 e002       |    |		Load	0x0,0x2								; Debug Table 0x2a.0xd = 0x1038,0xfff2
1039 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
103a e002       |    |		Load	0x0,0x2								; Debug Table 0x2a.0xe = 0x103a,0xfff1
103b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
103c			BODY_1010:
103c e004       |    |		Load	0x0,0x4								; Debug Table 0x2a.0xf = 0x103c,0x1
103d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
103e c407       |    |		Store	0x2,0x7
103f e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2a.0x10 = 0x103f,0x2
1040 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
1041 a5fa       |    |		Store_Unchecked	0x2,-0x6
1042 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2a.0x11 = 0x1042,0x3
1043 a5f9       |    |		Store_Unchecked	0x2,-0x7
1044 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2a.0x12 = 0x1044,0x4
1045 a5f8       |    |		Store_Unchecked	0x2,-0x8
1046 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2a.0x13 = 0x1046,0x5
1047 8236       | 6  |		Call	0x1,0x36
1048 700c       |p   |		Jump_Nonzero	0x1055
1049 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2a.0x14 = 0x1049,0x6
104a 6805       |h   |		Jump_Zero	0x1050
104b 0092 24ff  |  $ |		Action	Push_String_Extended,0x24ff					; "Edit failed - unit is not accessible"
													; Debug Table 0x2a.0x15 = 0x104b,0x7
104d e00a       |    |		Load	0x0,0xa
104e 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
104f 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
1050 0092 2500  |  % |		Action	Push_String_Extended,0x2500					; "Demote failed - unit is not accessible"
													; Debug Table 0x2a.0x16 = 0x1050,0x8
1052 e00a       |    |		Load	0x0,0xa
1053 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1054 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0x2a.0x17 = 0x1054,0x9
1055 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2a.0x18 = 0x1055,0xa
1056 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
1057 7010       |p   |		Jump_Nonzero	0x1068
1058 e5fb       |    |		Load	0x2,-0x5
1059 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
105a 00eb       |    |		Load_Encached	Diana_Cache
105b 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
105c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2a.0x19 = 0x105c,0x401
105d 021d       |    |		Execute	Heap_Access,Is_Null
105e 00d0       |    |		Action	Swap_Control
105f 00d1       |    |		Pop_Control	Pop_Count_1
1060 7005       |p   |		Jump_Nonzero	0x1066							; Debug Table 0x2a.0x1a = 0x1060,0xa
1061 e5fb       |    |		Load	0x2,-0x5
1062 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
1063 e002       |    |		Load	0x0,0x2
1064 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1065 7803       |x   |		Jump	0x1069
1066 4800       |H   |		Short_Literal	0x0
1067 7801       |x   |		Jump	0x1069
1068 4801       |H   |		Short_Literal	0x1
1069 a405       |    |		Store_Unchecked	0x2,0x5
106a e013       |    |		Load	0x0,0x13							; Debug Table 0x2a.0x1b = 0x106a,0xb
106b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
106c e004       |    |		Load	0x0,0x4
106d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
106e c407       |    |		Store	0x2,0x7
106f e002       |    |		Load	0x0,0x2								; Debug Table 0x2a.0x1c = 0x106f,0xc
1070 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1071 e406       |    |		Load	0x2,0x6
1072 0120       |    |		Execute	Any,Is_Value
1073 6804       |h   |		Jump_Zero	0x1078
1074 e002       |    |		Load	0x0,0x2
1075 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1076 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
1077 7801       |x   |		Jump	0x1079
1078 e406       |    |		Load	0x2,0x6
1079 e002       |    |		Load	0x0,0x2
107a 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
107b 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
107c 4800       |H   |		Short_Literal	0x0
107d 4801       |H   |		Short_Literal	0x1
107e 4800       |H   |		Short_Literal	0x0
107f 4800       |H   |		Short_Literal	0x0
1080 e407       |    |		Load	0x2,0x7
1081 4801       |H   |		Short_Literal	0x1
1082 e5fb       |    |		Load	0x2,-0x5
1083 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1084 e002       |    |		Load	0x0,0x2
1085 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1086 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1087 e002       |    |		Load	0x0,0x2
1088 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1089 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
108a c40b       |    |		Store	0x2,0xb
108b c406       |    |		Store	0x2,0x6
108c 005a       | Z  |		Store_Top	Discrete,At_Offset_2
108d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2a.0x1d = 0x108d,0xd
108e 460e       |F   |		Jump_Case	0xf
108f 780e       |x   |		Jump	0x109e								; case 0x0
1090 7819       |x   |		Jump	0x10aa								; case 0x1
1091 7830       |x0  |		Jump	0x10c2								; case 0x2
1092 782f       |x/  |		Jump	0x10c2								; case 0x3
1093 782e       |x.  |		Jump	0x10c2								; case 0x4
1094 782d       |x-  |		Jump	0x10c2								; case 0x5
1095 782c       |x,  |		Jump	0x10c2								; case 0x6
1096 782b       |x+  |		Jump	0x10c2								; case 0x7
1097 782a       |x*  |		Jump	0x10c2								; case 0x8
1098 7829       |x)  |		Jump	0x10c2								; case 0x9
1099 7828       |x(  |		Jump	0x10c2								; case 0xa
109a 781c       |x   |		Jump	0x10b7								; case 0xb
109b 7826       |x&  |		Jump	0x10c2								; case 0xc
109c 7825       |x%  |		Jump	0x10c2								; case 0xd
109d 7824       |x$  |		Jump	0x10c2								; case 0xe
109e e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2a.0x1e = 0x109e,0xe
109f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
10a0 0007       |    |		Action	Break_Optional
10a1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2a.0x1f = 0x10a1,0x801
10a2 021d       |    |		Execute	Heap_Access,Is_Null
10a3 00d0       |    |		Action	Swap_Control
10a4 00d1       |    |		Pop_Control	Pop_Count_1
10a5 6820       |h   |		Jump_Zero	0x10c6							; Debug Table 0x2a.0x20 = 0x10a5,0xe
10a6 e40b       |    |		Load	0x2,0xb								; Debug Table 0x2a.0x21 = 0x10a6,0xf
10a7 e5fb       |    |		Load	0x2,-0x5
10a8 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
10a9 781c       |x   |		Jump	0x10c6
10aa e407       |    |		Load	0x2,0x7								; Debug Table 0x2a.0x22 = 0x10aa,0x10
10ab 4801       |H   |		Short_Literal	0x1
10ac 4800       |H   |		Short_Literal	0x0
10ad e004       |    |		Load	0x0,0x4
10ae 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
10af c407       |    |		Store	0x2,0x7
10b0 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2a.0x23 = 0x10b0,0x11
10b1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
10b2 0092 2501  |  % |		Action	Push_String_Extended,0x2501					; "Demote"
10b4 e008       |    |		Load	0x0,0x8
10b5 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
10b6 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0x2a.0x24 = 0x10b6,0x12
10b7 e407       |    |		Load	0x2,0x7								; Debug Table 0x2a.0x25 = 0x10b7,0x13
10b8 4801       |H   |		Short_Literal	0x1
10b9 4800       |H   |		Short_Literal	0x0
10ba e004       |    |		Load	0x0,0x4
10bb 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
10bc c407       |    |		Store	0x2,0x7
10bd 0092 2502  |  % |		Action	Push_String_Extended,0x2502					; "Demote failed - unit is frozen"
													; Debug Table 0x2a.0x26 = 0x10bd,0x14
10bf e00a       |    |		Load	0x0,0xa
10c0 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
10c1 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0x2a.0x27 = 0x10c1,0x15
10c2 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2a.0x28 = 0x10c2,0x16
10c3 0092 24e4  |  $ |		Action	Push_String_Extended,0x24e4					; "Ada.Open"
10c5 820f       |    |		Call	0x1,0xf
10c6 e002       |    |		Load	0x0,0x2								; Debug Table 0x2a.0x29 = 0x10c6,0x17
10c7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
10c8 00f1       |    |		Load_Encached	Diana_Temp_Seq
10c9 e002       |    |		Load	0x0,0x2
10ca 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
10cb 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
10cc 00ec       |    |		Load_Encached	Diana_Tree_Cache
10cd e408       |    |		Load	0x2,0x8
10ce 0120       |    |		Execute	Any,Is_Value
10cf 6803       |h   |		Jump_Zero	0x10d3
10d0 e00e       |    |		Load	0x0,0xe
10d1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
10d2 7801       |x   |		Jump	0x10d4
10d3 e408       |    |		Load	0x2,0x8
10d4 66c3       |f   |		Indirect_Literal	Discrete,0xf98,{0x00000000, 0x00004000}
10d5 e407       |    |		Load	0x2,0x7
10d6 4803       |H   |		Short_Literal	0x3
10d7 e403       |    |		Load	0x2,0x3
10d8 e002       |    |		Load	0x0,0x2
10d9 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
10da e5fd       |    |		Load	0x2,-0x3
10db e5ff       |    |		Load	0x2,-0x1
10dc e5fb       |    |		Load	0x2,-0x5
10dd 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
10de e002       |    |		Load	0x0,0x2
10df 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
10e0 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
10e1 c408       |    |		Store	0x2,0x8
10e2 c40c       |    |		Store	0x2,0xc
10e3 c409       |    |		Store	0x2,0x9
10e4 c40a       |    |		Store	0x2,0xa
10e5 005a       | Z  |		Store_Top	Discrete,At_Offset_2
10e6 e407       |    |		Load	0x2,0x7								; Debug Table 0x2a.0x2a = 0x10e6,0x18
10e7 4801       |H   |		Short_Literal	0x1
10e8 00db       |    |		Load_Top	At_Offset_3
10e9 0f00       |    |		Execute_Immediate	Equal,0x0
10ea e004       |    |		Load	0x0,0x4
10eb 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
10ec c407       |    |		Store	0x2,0x7
10ed 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2a.0x2b = 0x10ed,0x19
10ee 460e       |F   |		Jump_Case	0xf
10ef 780e       |x   |		Jump	0x10fe								; case 0x0
10f0 788e       |x   |		Jump	0x117f								; case 0x1
10f1 788d       |x   |		Jump	0x117f								; case 0x2
10f2 7875       |xu  |		Jump	0x1168								; case 0x3
10f3 787e       |x~  |		Jump	0x1172								; case 0x4
10f4 788a       |x   |		Jump	0x117f								; case 0x5
10f5 7889       |x   |		Jump	0x117f								; case 0x6
10f6 7888       |x   |		Jump	0x117f								; case 0x7
10f7 7887       |x   |		Jump	0x117f								; case 0x8
10f8 7886       |x   |		Jump	0x117f								; case 0x9
10f9 7885       |x   |		Jump	0x117f								; case 0xa
10fa 7884       |x   |		Jump	0x117f								; case 0xb
10fb 7883       |x   |		Jump	0x117f								; case 0xc
10fc 7882       |x   |		Jump	0x117f								; case 0xd
10fd 7881       |x   |		Jump	0x117f								; case 0xe
10fe e405       |    |		Load	0x2,0x5								; Debug Table 0x2a.0x2c = 0x10fe,0x1a
10ff 6817       |h   |		Jump_Zero	0x1117
1100 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x2a.0x2d = 0x1100,0x1b
1101 6806       |h   |		Jump_Zero	0x1108
1102 0092 2503  |  % |		Action	Push_String_Extended,0x2503					; "Incrementally demoted "
													; Debug Table 0x2a.0x2e = 0x1102,0x1c
1104 e402       |    |		Load	0x2,0x2
1105 01cc       |    |		Execute	Vector,Catenate
1106 e00a       |    |		Load	0x0,0xa
1107 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
1108 e40c       |    |		Load	0x2,0xc								; Debug Table 0x2a.0x2f = 0x1108,0x1d
1109 a5fa       |    |		Store_Unchecked	0x2,-0x6
110a e40c       |    |		Load	0x2,0xc								; Debug Table 0x2a.0x30 = 0x110a,0x1e
110b 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
110c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2a.0x31 = 0x110c,0x1f
110d a5f9       |    |		Store_Unchecked	0x2,-0x7
110e e40c       |    |		Load	0x2,0xc								; Debug Table 0x2a.0x32 = 0x110e,0x20
110f 8224       | $  |		Call	0x1,0x24
1110 c40d       |    |		Store	0x2,0xd
1111 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2a.0x33 = 0x1111,0x21
1112 e5fb       |    |		Load	0x2,-0x5
1113 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1114 e001       |    |		Load	0x0,0x1
1115 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
1116 784e       |xN  |		Jump	0x1165
1117 0007       |    |		Action	Break_Optional							; Debug Table 0x2a.0x34 = 0x1117,0x22
1118 e40c       |    |		Load	0x2,0xc								; Debug Table 0x2a.0x35 = 0x1118,0xc01
1119 0007       |    |		Action	Break_Optional
111a 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x2a.0x36 = 0x111a,0xc02
111b 0007       |    |		Action	Break_Optional							; Debug Table 0x2a.0x37 = 0x111b,0xc03
111c 0007       |    |		Action	Break_Optional							; Debug Table 0x2a.0x38 = 0x111c,0xc04
111d 0fab       |    |		Execute_Immediate	Equal,-0x55					; Debug Table 0x2a.0x39 = 0x111d,0x22
111e 681f       |h   |		Jump_Zero	0x113e
111f e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x2a.0x3a = 0x111f,0x23
1120 6806       |h   |		Jump_Zero	0x1127
1121 0092 2504  |  % |		Action	Push_String_Extended,0x2504					; "Withdrew "
													; Debug Table 0x2a.0x3b = 0x1121,0x24
1123 e402       |    |		Load	0x2,0x2
1124 01cc       |    |		Execute	Vector,Catenate
1125 e00a       |    |		Load	0x0,0xa
1126 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
1127 e40c       |    |		Load	0x2,0xc								; Debug Table 0x2a.0x3c = 0x1127,0x25
1128 a5fa       |    |		Store_Unchecked	0x2,-0x6
1129 e40c       |    |		Load	0x2,0xc								; Debug Table 0x2a.0x3d = 0x1129,0x26
112a 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
112b e40c       |    |		Load	0x2,0xc								; Debug Table 0x2a.0x3e = 0x112b,0x27
112c 8224       | $  |		Call	0x1,0x24
112d c40d       |    |		Store	0x2,0xd
112e e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2a.0x3f = 0x112e,0x28
112f 6808       |h   |		Jump_Zero	0x1138
1130 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2a.0x40 = 0x1130,0x29
1131 e40d       |    |		Load	0x2,0xd
1132 8227       | '  |		Call	0x1,0x27
1133 c404       |    |		Store	0x2,0x4
1134 e404       |    |		Load	0x2,0x4								; Debug Table 0x2a.0x41 = 0x1134,0x2a
1135 e40d       |    |		Load	0x2,0xd
1136 e001       |    |		Load	0x0,0x1
1137 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
1138 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2a.0x42 = 0x1138,0x2b
1139 e5fb       |    |		Load	0x2,-0x5
113a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
113b e001       |    |		Load	0x0,0x1
113c 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
113d 7827       |x'  |		Jump	0x1165
113e e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x2a.0x43 = 0x113e,0x2c
113f 680d       |h   |		Jump_Zero	0x114d
1140 e402       |    |		Load	0x2,0x2								; Debug Table 0x2a.0x44 = 0x1140,0x2d
1141 0092 24fc  |  $ |		Action	Push_String_Extended,0x24fc					; " changed to "
1143 01cc       |    |		Execute	Vector,Catenate
1144 e5fd       |    |		Load	0x2,-0x3
1145 e002       |    |		Load	0x0,0x2
1146 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
1147 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1148 025e       | ^  |		Execute	Discrete,Convert
1149 1c01       |    |		Execute_Immediate	Run_Utility,0x1
114a 01cc       |    |		Execute	Vector,Catenate
114b e00a       |    |		Load	0x0,0xa
114c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
114d e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2a.0x45 = 0x114d,0x2e
114e 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
114f 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
1150 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2a.0x46 = 0x1150,0x2f
1151 680e       |h   |		Jump_Zero	0x1160
1152 e5fd       |    |		Load	0x2,-0x3
1153 0f02       |    |		Execute_Immediate	Equal,0x2
1154 680b       |h   |		Jump_Zero	0x1160
1155 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2a.0x47 = 0x1155,0x30
1156 e5fb       |    |		Load	0x2,-0x5
1157 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1158 8227       | '  |		Call	0x1,0x27
1159 c404       |    |		Store	0x2,0x4
115a e404       |    |		Load	0x2,0x4								; Debug Table 0x2a.0x48 = 0x115a,0x31
115b e5fb       |    |		Load	0x2,-0x5
115c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
115d e001       |    |		Load	0x0,0x1
115e 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
115f 7805       |x   |		Jump	0x1165
1160 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2a.0x49 = 0x1160,0x32
1161 e5fb       |    |		Load	0x2,-0x5
1162 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1163 e001       |    |		Load	0x0,0x1
1164 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
1165 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2a.0x4a = 0x1165,0x33
1166 a5f8       |    |		Store_Unchecked	0x2,-0x8
1167 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
1168 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2a.0x4b = 0x1168,0x34
1169 e5fb       |    |		Load	0x2,-0x5
116a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
116b e001       |    |		Load	0x0,0x1
116c 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
116d e408       |    |		Load	0x2,0x8								; Debug Table 0x2a.0x4c = 0x116d,0x35
116e 0092 2501  |  % |		Action	Push_String_Extended,0x2501					; "Demote"
1170 822c       | ,  |		Call	0x1,0x2c
1171 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
1172 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2a.0x4d = 0x1172,0x36
1173 e5fb       |    |		Load	0x2,-0x5
1174 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1175 e001       |    |		Load	0x0,0x1
1176 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
1177 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2a.0x4e = 0x1177,0x37
1178 e409       |    |		Load	0x2,0x9
1179 0092 2501  |  % |		Action	Push_String_Extended,0x2501					; "Demote"
117b e5fb       |    |		Load	0x2,-0x5
117c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
117d 822f       | /  |		Call	0x1,0x2f
117e 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
117f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2a.0x4f = 0x117f,0x38
1180 e5fb       |    |		Load	0x2,-0x5
1181 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1182 e001       |    |		Load	0x0,0x1
1183 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
1184 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2a.0x50 = 0x1184,0x39
1185 e408       |    |		Load	0x2,0x8
1186 0092 2501  |  % |		Action	Push_String_Extended,0x2501					; "Demote"
1188 8230       | 0  |		Call	0x1,0x30
1189 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
118a			TRAP_1010:
118a 6611       |f   |		Indirect_Literal	Discrete,0xf9c,{0x00000000, 0x5a851501}
118b 010f       |    |		Execute	Exception,Equal
118c 6808       |h   |		Jump_Zero	0x1195
118d e407       |    |		Load	0x2,0x7								; Debug Table 0x2a.0x51 = 0x118d,0x3a
118e 4801       |H   |		Short_Literal	0x1
118f 4800       |H   |		Short_Literal	0x0
1190 e004       |    |		Load	0x0,0x4
1191 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1192 c407       |    |		Store	0x2,0x7
1193 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2a.0x52 = 0x1193,0x3b
1194 0101       |    |		Execute	Exception,Reraise
1195 e407       |    |		Load	0x2,0x7								; Debug Table 0x2a.0x53 = 0x1195,0x3c
1196 4801       |H   |		Short_Literal	0x1
1197 4800       |H   |		Short_Literal	0x0
1198 e004       |    |		Load	0x0,0x4
1199 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
119a c407       |    |		Store	0x2,0x7
119b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2a.0x54 = 0x119b,0x3d
119c e009       |    |		Load	0x0,0x9
119d 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
119e 0092 2501  |  % |		Action	Push_String_Extended,0x2501					; "Demote"
11a0 8222       | "  |		Call	0x1,0x22
11a1 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
11a2 0000 0000  |    |		.BLANK	0000[0x6]
11a8 ; --------------------------------------------------------------------------------------
11a8 ; SUBPROGRAM
11a8 ; --------------------------------------------------------------------------------------
11a8 11e0       |    |		.CONST	0x11e0								; Address of begin
11a9 13f7       |    |		.CONST	0x13f7								; Address of exception handler
11aa 0012       |    |		.CONST	0x0012								; Number of locals
11ab			INIT_11a8:
11ab 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2b = .DEBUG	0x11ab,0x347a,0x0001,0x0000,0x005a,0x8695,0x0000,0x1318
													; Debug Table 0x2b.0x0 = 0x11ab,0xffff
11ac 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
11ad e00c       |    |		Load	0x0,0xc
11ae 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
11af e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2b.0x1 = 0x11af,0xfffe
11b0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
11b1 8231       | 1  |		Call	0x1,0x31
11b2 e002       |    |		Load	0x0,0x2
11b3 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
11b4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
11b5 011e       |    |		Execute	Any,Convert
11b6 e002       |    |		Load	0x0,0x2								; Debug Table 0x2b.0x2 = 0x11b6,0xfffd
11b7 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
11b8 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
11b9 02c7       |    |		Declare_Variable	Any
11ba 00d8       |    |		Load_Top	At_Offset_0
11bb 1c00       |    |		Execute_Immediate	Run_Utility,0x0
11bc e004       |    |		Load	0x0,0x4								; Debug Table 0x2b.0x3 = 0x11bc,0xfffc
11bd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
11be 02c7       |    |		Declare_Variable	Any
11bf 00d8       |    |		Load_Top	At_Offset_0
11c0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
11c1 e00e       |    |		Load	0x0,0xe								; Debug Table 0x2b.0x4 = 0x11c1,0xfffb
11c2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
11c3 02c7       |    |		Declare_Variable	Any
11c4 00d8       |    |		Load_Top	At_Offset_0
11c5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
11c6 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x2b.0x5 = 0x11c6,0xfffa
11c7 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x2b.0x6 = 0x11c7,0xfff9
11c8 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2b.0x7 = 0x11c8,0xfff8
11c9 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2b.0x8 = 0x11c9,0xfff7
11ca 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2b.0x9 = 0x11ca,0xfff6
11cb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2b.0xa = 0x11cb,0xfff5
11cc e002       |    |		Load	0x0,0x2								; Debug Table 0x2b.0xb = 0x11cc,0xfff4
11cd 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
11ce 02ff       |    |		Declare_Variable	Variant_Record
11cf 00d8       |    |		Load_Top	At_Offset_0
11d0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
11d1 e002       |    |		Load	0x0,0x2								; Debug Table 0x2b.0xc = 0x11d1,0xfff3
11d2 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
11d3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
11d4 02c7       |    |		Declare_Variable	Any
11d5 00d8       |    |		Load_Top	At_Offset_0
11d6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
11d7 e002       |    |		Load	0x0,0x2								; Debug Table 0x2b.0xd = 0x11d7,0xfff2
11d8 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
11d9 02c7       |    |		Declare_Variable	Any
11da 00d8       |    |		Load_Top	At_Offset_0
11db 1c00       |    |		Execute_Immediate	Run_Utility,0x0
11dc e002       |    |		Load	0x0,0x2								; Debug Table 0x2b.0xe = 0x11dc,0xfff1
11dd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
11de 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2b.0xf = 0x11de,0xfff0
11df 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2b.0x10 = 0x11df,0xffef
11e0			BODY_11a8:
11e0 e004       |    |		Load	0x0,0x4								; Debug Table 0x2b.0x11 = 0x11e0,0x1
11e1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
11e2 c405       |    |		Store	0x2,0x5
11e3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2b.0x12 = 0x11e3,0x2
11e4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
11e5 e00c       |    |		Load	0x0,0xc
11e6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
11e7 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
11e8 e002       |    |		Load	0x0,0x2								; Debug Table 0x2b.0x13 = 0x11e8,0x3
11e9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
11ea e40d       |    |		Load	0x2,0xd
11eb e5fe       |    |		Load	0x2,-0x2
11ec 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
11ed e002       |    |		Load	0x0,0x2
11ee 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
11ef 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
11f0 00d1       |    |		Pop_Control	Pop_Count_1
11f1 005b       | [  |		Store_Top	Discrete,At_Offset_3
11f2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2b.0x14 = 0x11f2,0x4
11f3 0092 24d3  |  $ |		Action	Push_String_Extended,0x24d3					; "Ada.Get_Version"
11f5 820f       |    |		Call	0x1,0xf
11f6 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2b.0x15 = 0x11f6,0x5
11f7 8236       | 6  |		Call	0x1,0x36
11f8 7005       |p   |		Jump_Nonzero	0x11fe
11f9 0092 2505  |  % |		Action	Push_String_Extended,0x2505					; "Delete failed - unit is not accessible"
													; Debug Table 0x2b.0x16 = 0x11f9,0x6
11fb e00a       |    |		Load	0x0,0xa
11fc 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
11fd 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x2b.0x17 = 0x11fd,0x7
11fe e011       |    |		Load	0x0,0x11							; Debug Table 0x2b.0x18 = 0x11fe,0x8
11ff 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
1200 e5fe       |    |		Load	0x2,-0x2
1201 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1202 e017       |    |		Load	0x0,0x17
1203 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
1204 e013       |    |		Load	0x0,0x13							; Debug Table 0x2b.0x19 = 0x1204,0x9
1205 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
1206 e004       |    |		Load	0x0,0x4
1207 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
1208 c405       |    |		Store	0x2,0x5
1209 e002       |    |		Load	0x0,0x2								; Debug Table 0x2b.0x1a = 0x1209,0xa
120a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
120b e404       |    |		Load	0x2,0x4
120c 0120       |    |		Execute	Any,Is_Value
120d 6804       |h   |		Jump_Zero	0x1212
120e e002       |    |		Load	0x0,0x2
120f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1210 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
1211 7801       |x   |		Jump	0x1213
1212 e404       |    |		Load	0x2,0x4
1213 e002       |    |		Load	0x0,0x2
1214 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1215 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
1216 e40d       |    |		Load	0x2,0xd
1217 4800       |H   |		Short_Literal	0x0
1218 4800       |H   |		Short_Literal	0x0
1219 4800       |H   |		Short_Literal	0x0
121a e405       |    |		Load	0x2,0x5
121b 4801       |H   |		Short_Literal	0x1
121c e002       |    |		Load	0x0,0x2
121d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
121e 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
121f 00d1       |    |		Pop_Control	Pop_Count_1
1220 c40b       |    |		Store	0x2,0xb
1221 c404       |    |		Store	0x2,0x4
1222 005b       | [  |		Store_Top	Discrete,At_Offset_3
1223 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2b.0x1b = 0x1223,0xb
1224 460e       |F   |		Jump_Case	0xf
1225 7829       |x)  |		Jump	0x124f								; case 0x0
1226 780d       |x   |		Jump	0x1234								; case 0x1
1227 7823       |x#  |		Jump	0x124b								; case 0x2
1228 7822       |x"  |		Jump	0x124b								; case 0x3
1229 7821       |x!  |		Jump	0x124b								; case 0x4
122a 7820       |x   |		Jump	0x124b								; case 0x5
122b 781f       |x   |		Jump	0x124b								; case 0x6
122c 781e       |x   |		Jump	0x124b								; case 0x7
122d 781d       |x   |		Jump	0x124b								; case 0x8
122e 781c       |x   |		Jump	0x124b								; case 0x9
122f 781b       |x   |		Jump	0x124b								; case 0xa
1230 780f       |x   |		Jump	0x1240								; case 0xb
1231 7819       |x   |		Jump	0x124b								; case 0xc
1232 7818       |x   |		Jump	0x124b								; case 0xd
1233 7817       |x   |		Jump	0x124b								; case 0xe
1234 e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x1c = 0x1234,0xd
1235 4801       |H   |		Short_Literal	0x1
1236 4800       |H   |		Short_Literal	0x0
1237 e004       |    |		Load	0x0,0x4
1238 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1239 c405       |    |		Store	0x2,0x5
123a e40d       |    |		Load	0x2,0xd								; Debug Table 0x2b.0x1d = 0x123a,0xe
123b 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
123d e008       |    |		Load	0x0,0x8
123e 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
123f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x2b.0x1e = 0x123f,0xf
1240 e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x1f = 0x1240,0x10
1241 4801       |H   |		Short_Literal	0x1
1242 4800       |H   |		Short_Literal	0x0
1243 e004       |    |		Load	0x0,0x4
1244 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1245 c405       |    |		Store	0x2,0x5
1246 0092 2506  |  % |		Action	Push_String_Extended,0x2506					; "Delete failed - unit is frozen"
													; Debug Table 0x2b.0x20 = 0x1246,0x11
1248 e00a       |    |		Load	0x0,0xa
1249 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
124a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x2b.0x21 = 0x124a,0x12
124b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2b.0x22 = 0x124b,0x13
124c 0092 24e4  |  $ |		Action	Push_String_Extended,0x24e4					; "Ada.Open"
124e 820f       |    |		Call	0x1,0xf
124f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2b.0x23 = 0x124f,0x14
1250 68da       |h   |		Jump_Zero	0x132b
1251 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2b.0x24 = 0x1251,0x15
1252 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
1253 e00d       |    |		Load	0x0,0xd
1254 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1255 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
1256 e002       |    |		Load	0x0,0x2								; Debug Table 0x2b.0x25 = 0x1256,0x16
1257 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1258 e40e       |    |		Load	0x2,0xe
1259 0120       |    |		Execute	Any,Is_Value
125a 6804       |h   |		Jump_Zero	0x125f
125b e002       |    |		Load	0x0,0x2
125c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
125d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
125e 7801       |x   |		Jump	0x1260
125f e40e       |    |		Load	0x2,0xe
1260 e5fe       |    |		Load	0x2,-0x2
1261 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
1262 e002       |    |		Load	0x0,0x2
1263 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1264 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
1265 c40e       |    |		Store	0x2,0xe
1266 005b       | [  |		Store_Top	Discrete,At_Offset_3
1267 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2b.0x26 = 0x1267,0x17
1268 0092 2507  |  % |		Action	Push_String_Extended,0x2507					; "Ada.Get_Object"
126a 820f       |    |		Call	0x1,0xf
126b e40e       |    |		Load	0x2,0xe								; Debug Table 0x2b.0x27 = 0x126b,0x18
126c e002       |    |		Load	0x0,0x2
126d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
126e 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
126f c40f       |    |		Store	0x2,0xf
1270 e002       |    |		Load	0x0,0x2								; Debug Table 0x2b.0x28 = 0x1270,0x19
1271 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1272 00f1       |    |		Load_Encached	Diana_Temp_Seq
1273 e002       |    |		Load	0x0,0x2
1274 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1275 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
1276 00ec       |    |		Load_Encached	Diana_Tree_Cache
1277 e406       |    |		Load	0x2,0x6
1278 0120       |    |		Execute	Any,Is_Value
1279 6803       |h   |		Jump_Zero	0x127d
127a e00e       |    |		Load	0x0,0xe
127b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
127c 7801       |x   |		Jump	0x127e
127d e406       |    |		Load	0x2,0x6
127e 6519       |e   |		Indirect_Literal	Discrete,0xf98,{0x00000000, 0x00004000}
127f e405       |    |		Load	0x2,0x5
1280 4803       |H   |		Short_Literal	0x3
1281 e403       |    |		Load	0x2,0x3
1282 e002       |    |		Load	0x0,0x2
1283 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
1284 4800       |H   |		Short_Literal	0x0
1285 4801       |H   |		Short_Literal	0x1
1286 e40b       |    |		Load	0x2,0xb
1287 e002       |    |		Load	0x0,0x2
1288 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
1289 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
128a c406       |    |		Store	0x2,0x6
128b c409       |    |		Store	0x2,0x9
128c c407       |    |		Store	0x2,0x7
128d c408       |    |		Store	0x2,0x8
128e 005b       | [  |		Store_Top	Discrete,At_Offset_3
128f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2b.0x29 = 0x128f,0x1a
1290 460e       |F   |		Jump_Case	0xf
1291 780e       |x   |		Jump	0x12a0								; case 0x0
1292 7846       |xF  |		Jump	0x12d9								; case 0x1
1293 7825       |x%  |		Jump	0x12b9								; case 0x2
1294 7814       |x   |		Jump	0x12a9								; case 0x3
1295 7831       |x1  |		Jump	0x12c7								; case 0x4
1296 7842       |xB  |		Jump	0x12d9								; case 0x5
1297 7841       |xA  |		Jump	0x12d9								; case 0x6
1298 7840       |x@  |		Jump	0x12d9								; case 0x7
1299 783f       |x?  |		Jump	0x12d9								; case 0x8
129a 783e       |x>  |		Jump	0x12d9								; case 0x9
129b 783d       |x=  |		Jump	0x12d9								; case 0xa
129c 783c       |x<  |		Jump	0x12d9								; case 0xb
129d 783b       |x;  |		Jump	0x12d9								; case 0xc
129e 783a       |x:  |		Jump	0x12d9								; case 0xd
129f 7839       |x9  |		Jump	0x12d9								; case 0xe
12a0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2b.0x2a = 0x12a0,0x1b
12a1 6849       |hI  |		Jump_Zero	0x12eb
12a2 e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x2b = 0x12a2,0x1c
12a3 4801       |H   |		Short_Literal	0x1
12a4 4801       |H   |		Short_Literal	0x1
12a5 e004       |    |		Load	0x0,0x4
12a6 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
12a7 c405       |    |		Store	0x2,0x5
12a8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x2b.0x2c = 0x12a8,0x1d
12a9 e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x2d = 0x12a9,0x1e
12aa 4801       |H   |		Short_Literal	0x1
12ab 4800       |H   |		Short_Literal	0x0
12ac e004       |    |		Load	0x0,0x4
12ad 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
12ae c405       |    |		Store	0x2,0x5
12af 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2b.0x2e = 0x12af,0x1f
12b0 e5fe       |    |		Load	0x2,-0x2
12b1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
12b2 e001       |    |		Load	0x0,0x1
12b3 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
12b4 e406       |    |		Load	0x2,0x6								; Debug Table 0x2b.0x2f = 0x12b4,0x20
12b5 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
12b7 822c       | ,  |		Call	0x1,0x2c
12b8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x2b.0x30 = 0x12b8,0x21
12b9 e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x31 = 0x12b9,0x22
12ba 4801       |H   |		Short_Literal	0x1
12bb 4800       |H   |		Short_Literal	0x0
12bc e004       |    |		Load	0x0,0x4
12bd 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
12be c405       |    |		Store	0x2,0x5
12bf e004       |    |		Load	0x0,0x4								; Debug Table 0x2b.0x32 = 0x12bf,0x23
12c0 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
12c1 e406       |    |		Load	0x2,0x6
12c2 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
12c4 e5fe       |    |		Load	0x2,-0x2
12c5 822b       | +  |		Call	0x1,0x2b
12c6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x2b.0x33 = 0x12c6,0x24
12c7 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2b.0x34 = 0x12c7,0x25
12c8 e407       |    |		Load	0x2,0x7
12c9 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
12cb e40b       |    |		Load	0x2,0xb
12cc 822f       | /  |		Call	0x1,0x2f
12cd e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x35 = 0x12cd,0x26
12ce 4801       |H   |		Short_Literal	0x1
12cf 4800       |H   |		Short_Literal	0x0
12d0 e004       |    |		Load	0x0,0x4
12d1 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
12d2 c405       |    |		Store	0x2,0x5
12d3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2b.0x36 = 0x12d3,0x27
12d4 e5fe       |    |		Load	0x2,-0x2
12d5 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
12d6 e001       |    |		Load	0x0,0x1
12d7 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
12d8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x2b.0x37 = 0x12d8,0x28
12d9 e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x38 = 0x12d9,0x29
12da 4801       |H   |		Short_Literal	0x1
12db 4800       |H   |		Short_Literal	0x0
12dc e004       |    |		Load	0x0,0x4
12dd 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
12de c405       |    |		Store	0x2,0x5
12df e011       |    |		Load	0x0,0x11							; Debug Table 0x2b.0x39 = 0x12df,0x2a
12e0 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
12e1 e5fe       |    |		Load	0x2,-0x2
12e2 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
12e3 e017       |    |		Load	0x0,0x17
12e4 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
12e5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2b.0x3a = 0x12e5,0x2b
12e6 e406       |    |		Load	0x2,0x6
12e7 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
12e9 8230       | 0  |		Call	0x1,0x30
12ea 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x2b.0x3b = 0x12ea,0x2c
12eb e011       |    |		Load	0x0,0x11							; Debug Table 0x2b.0x3c = 0x12eb,0x2d
12ec 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
12ed e40f       |    |		Load	0x2,0xf
12ee e017       |    |		Load	0x0,0x17
12ef 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
12f0 e002       |    |		Load	0x0,0x2								; Debug Table 0x2b.0x3d = 0x12f0,0x2e
12f1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
12f2 e404       |    |		Load	0x2,0x4
12f3 0120       |    |		Execute	Any,Is_Value
12f4 6804       |h   |		Jump_Zero	0x12f9
12f5 e002       |    |		Load	0x0,0x2
12f6 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
12f7 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
12f8 7801       |x   |		Jump	0x12fa
12f9 e404       |    |		Load	0x2,0x4
12fa e002       |    |		Load	0x0,0x2
12fb 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
12fc 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
12fd 4800       |H   |		Short_Literal	0x0
12fe 4800       |H   |		Short_Literal	0x0
12ff 4800       |H   |		Short_Literal	0x0
1300 4800       |H   |		Short_Literal	0x0
1301 e405       |    |		Load	0x2,0x5
1302 4801       |H   |		Short_Literal	0x1
1303 e40f       |    |		Load	0x2,0xf
1304 e002       |    |		Load	0x0,0x2
1305 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1306 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1307 e002       |    |		Load	0x0,0x2
1308 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1309 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
130a c40a       |    |		Store	0x2,0xa
130b c404       |    |		Store	0x2,0x4
130c 005b       | [  |		Store_Top	Discrete,At_Offset_3
130d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2b.0x3e = 0x130d,0x2f
130e 0b00       |    |		Execute_Immediate	Case_Compare,0x0
130f 7007       |p   |		Jump_Nonzero	0x1317
1310 0b01       |    |		Execute_Immediate	Case_Compare,0x1
1311 700b       |p   |		Jump_Nonzero	0x131d
1312 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2b.0x3f = 0x1312,0x34
1313 0092 24e4  |  $ |		Action	Push_String_Extended,0x24e4					; "Ada.Open"
1315 820f       |    |		Call	0x1,0xf
1316 7812       |x   |		Jump	0x1329
1317 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2b.0x40 = 0x1317,0x30
1318 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
1319 e40a       |    |		Load	0x2,0xa
131a 8228       | (  |		Call	0x1,0x28
131b a40a       |    |		Store_Unchecked	0x2,0xa
131c 780c       |x   |		Jump	0x1329
131d e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x41 = 0x131d,0x31
131e 4801       |H   |		Short_Literal	0x1
131f 4800       |H   |		Short_Literal	0x0
1320 e004       |    |		Load	0x0,0x4
1321 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1322 c405       |    |		Store	0x2,0x5
1323 e40f       |    |		Load	0x2,0xf								; Debug Table 0x2b.0x42 = 0x1323,0x32
1324 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
1326 e008       |    |		Load	0x0,0x8
1327 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
1328 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x2b.0x43 = 0x1328,0x33
1329 00d1       |    |		Pop_Control	Pop_Count_1
132a 7803       |x   |		Jump	0x132e
132b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2b.0x44 = 0x132b,0x35
132c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
132d a40a       |    |		Store_Unchecked	0x2,0xa
132e e002       |    |		Load	0x0,0x2								; Debug Table 0x2b.0x45 = 0x132e,0x36
132f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1330 00f1       |    |		Load_Encached	Diana_Temp_Seq
1331 e002       |    |		Load	0x0,0x2
1332 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1333 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
1334 00ec       |    |		Load_Encached	Diana_Tree_Cache
1335 e406       |    |		Load	0x2,0x6
1336 0120       |    |		Execute	Any,Is_Value
1337 6803       |h   |		Jump_Zero	0x133b
1338 e00e       |    |		Load	0x0,0xe
1339 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
133a 7801       |x   |		Jump	0x133c
133b e406       |    |		Load	0x2,0x6
133c 00a2 0f98  |    |		Action	Push_Discrete_Extended
133e e405       |    |		Load	0x2,0x5
133f 4803       |H   |		Short_Literal	0x3
1340 e403       |    |		Load	0x2,0x3
1341 e002       |    |		Load	0x0,0x2
1342 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
1343 4800       |H   |		Short_Literal	0x0
1344 e5ff       |    |		Load	0x2,-0x1
1345 e40a       |    |		Load	0x2,0xa
1346 e002       |    |		Load	0x0,0x2
1347 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
1348 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
1349 c406       |    |		Store	0x2,0x6
134a c409       |    |		Store	0x2,0x9
134b c407       |    |		Store	0x2,0x7
134c c408       |    |		Store	0x2,0x8
134d 005b       | [  |		Store_Top	Discrete,At_Offset_3
134e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2b.0x46 = 0x134e,0x37
134f 460e       |F   |		Jump_Case	0xf
1350 780e       |x   |		Jump	0x135f								; case 0x0
1351 788d       |x   |		Jump	0x13df								; case 0x1
1352 783d       |x=  |		Jump	0x1390								; case 0x2
1353 7825       |x%  |		Jump	0x1379								; case 0x3
1354 7870       |xp  |		Jump	0x13c5								; case 0x4
1355 7889       |x   |		Jump	0x13df								; case 0x5
1356 7888       |x   |		Jump	0x13df								; case 0x6
1357 7887       |x   |		Jump	0x13df								; case 0x7
1358 7886       |x   |		Jump	0x13df								; case 0x8
1359 7885       |x   |		Jump	0x13df								; case 0x9
135a 7884       |x   |		Jump	0x13df								; case 0xa
135b 7883       |x   |		Jump	0x13df								; case 0xb
135c 7882       |x   |		Jump	0x13df								; case 0xc
135d 7881       |x   |		Jump	0x13df								; case 0xd
135e 7880       |x   |		Jump	0x13df								; case 0xe
135f e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x47 = 0x135f,0x38
1360 4801       |H   |		Short_Literal	0x1
1361 4801       |H   |		Short_Literal	0x1
1362 e004       |    |		Load	0x0,0x4
1363 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1364 c405       |    |		Store	0x2,0x5
1365 e402       |    |		Load	0x2,0x2								; Debug Table 0x2b.0x48 = 0x1365,0x39
1366 0092 2508  |  % |		Action	Push_String_Extended,0x2508					; " is deleted"
1368 01cc       |    |		Execute	Vector,Catenate
1369 e00a       |    |		Load	0x0,0xa
136a 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
136b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2b.0x49 = 0x136b,0x3a
136c 6805       |h   |		Jump_Zero	0x1372
136d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2b.0x4a = 0x136d,0x3b
136e e40f       |    |		Load	0x2,0xf
136f e001       |    |		Load	0x0,0x1
1370 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
1371 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1372 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2b.0x4b = 0x1372,0x3c
1373 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
1374 e5fe       |    |		Load	0x2,-0x2
1375 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1376 e001       |    |		Load	0x0,0x1
1377 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
1378 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1379 e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x4c = 0x1379,0x3d
137a 4801       |H   |		Short_Literal	0x1
137b 4800       |H   |		Short_Literal	0x0
137c e004       |    |		Load	0x0,0x4
137d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
137e c405       |    |		Store	0x2,0x5
137f e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2b.0x4d = 0x137f,0x3e
1380 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
1381 e5fe       |    |		Load	0x2,-0x2
1382 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1383 e001       |    |		Load	0x0,0x1
1384 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
1385 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2b.0x4e = 0x1385,0x3f
1386 6804       |h   |		Jump_Zero	0x138b
1387 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2b.0x4f = 0x1387,0x40
1388 e40f       |    |		Load	0x2,0xf
1389 e001       |    |		Load	0x0,0x1
138a 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
138b e406       |    |		Load	0x2,0x6								; Debug Table 0x2b.0x50 = 0x138b,0x41
138c 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
138e 822c       | ,  |		Call	0x1,0x2c
138f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1390 e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x51 = 0x1390,0x42
1391 4801       |H   |		Short_Literal	0x1
1392 4800       |H   |		Short_Literal	0x0
1393 e004       |    |		Load	0x0,0x4
1394 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1395 c405       |    |		Store	0x2,0x5
1396 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2b.0x52 = 0x1396,0x43
1397 6825       |h%  |		Jump_Zero	0x13bd
1398 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2b.0x53 = 0x1398,0x44
1399 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
139a e5fe       |    |		Load	0x2,-0x2
139b 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
139c e001       |    |		Load	0x0,0x1
139d 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
139e e002       |    |		Load	0x0,0x2								; Debug Table 0x2b.0x54 = 0x139e,0x45
139f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
13a0 e002       |    |		Load	0x0,0x2
13a1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
13a2 00a2 0f98  |    |		Action	Push_Discrete_Extended
13a4 e004       |    |		Load	0x0,0x4
13a5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
13a6 4800       |H   |		Short_Literal	0x0
13a7 e40f       |    |		Load	0x2,0xf
13a8 e002       |    |		Load	0x0,0x2
13a9 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
13aa 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
13ab c40c       |    |		Store	0x2,0xc
13ac 005b       | [  |		Store_Top	Discrete,At_Offset_3
13ad 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2b.0x55 = 0x13ad,0x46
13ae 0092 24c0  |  $ |		Action	Push_String_Extended,0x24c0					; "Traversal.Get_Declaration"
13b0 820f       |    |		Call	0x1,0xf
13b1 e004       |    |		Load	0x0,0x4								; Debug Table 0x2b.0x56 = 0x13b1,0x47
13b2 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
13b3 e406       |    |		Load	0x2,0x6
13b4 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
13b6 e001       |    |		Load	0x0,0x1
13b7 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
13b8 e40c       |    |		Load	0x2,0xc
13b9 8210       |    |		Call	0x1,0x10
13ba 8225       | %  |		Call	0x1,0x25
13bb 822b       | +  |		Call	0x1,0x2b
13bc 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
13bd e004       |    |		Load	0x0,0x4								; Debug Table 0x2b.0x57 = 0x13bd,0x48
13be 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
13bf e406       |    |		Load	0x2,0x6
13c0 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
13c2 e5fe       |    |		Load	0x2,-0x2
13c3 822b       | +  |		Call	0x1,0x2b
13c4 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
13c5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2b.0x58 = 0x13c5,0x49
13c6 e407       |    |		Load	0x2,0x7
13c7 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
13c9 e40a       |    |		Load	0x2,0xa
13ca 822f       | /  |		Call	0x1,0x2f
13cb e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x59 = 0x13cb,0x4a
13cc 4801       |H   |		Short_Literal	0x1
13cd 4800       |H   |		Short_Literal	0x0
13ce e004       |    |		Load	0x0,0x4
13cf 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
13d0 c405       |    |		Store	0x2,0x5
13d1 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2b.0x5a = 0x13d1,0x4b
13d2 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
13d3 e5fe       |    |		Load	0x2,-0x2
13d4 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
13d5 e001       |    |		Load	0x0,0x1
13d6 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
13d7 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2b.0x5b = 0x13d7,0x4c
13d8 6805       |h   |		Jump_Zero	0x13de
13d9 e011       |    |		Load	0x0,0x11							; Debug Table 0x2b.0x5c = 0x13d9,0x4d
13da 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
13db e40f       |    |		Load	0x2,0xf
13dc e017       |    |		Load	0x0,0x17
13dd 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
13de 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
13df e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x5d = 0x13df,0x4e
13e0 4801       |H   |		Short_Literal	0x1
13e1 4800       |H   |		Short_Literal	0x0
13e2 e004       |    |		Load	0x0,0x4
13e3 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
13e4 c405       |    |		Store	0x2,0x5
13e5 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2b.0x5e = 0x13e5,0x4f
13e6 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
13e7 e5fe       |    |		Load	0x2,-0x2
13e8 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
13e9 e001       |    |		Load	0x0,0x1
13ea 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
13eb 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2b.0x5f = 0x13eb,0x50
13ec 6804       |h   |		Jump_Zero	0x13f1
13ed 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2b.0x60 = 0x13ed,0x51
13ee e40f       |    |		Load	0x2,0xf
13ef e001       |    |		Load	0x0,0x1
13f0 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
13f1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2b.0x61 = 0x13f1,0x52
13f2 e406       |    |		Load	0x2,0x6
13f3 0092 24c8  |  $ |		Action	Push_String_Extended,0x24c8					; "Delete"
13f5 8230       | 0  |		Call	0x1,0x30
13f6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
13f7			TRAP_11a8:
13f7 00a2 0f9c  |    |		Action	Push_Discrete_Extended
13f9 010f       |    |		Execute	Exception,Equal
13fa 6808       |h   |		Jump_Zero	0x1403
13fb e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x62 = 0x13fb,0x53
13fc 4801       |H   |		Short_Literal	0x1
13fd 4800       |H   |		Short_Literal	0x0
13fe e004       |    |		Load	0x0,0x4
13ff 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1400 c405       |    |		Store	0x2,0x5
1401 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2b.0x63 = 0x1401,0x54
1402 0101       |    |		Execute	Exception,Reraise
1403 e405       |    |		Load	0x2,0x5								; Debug Table 0x2b.0x64 = 0x1403,0x55
1404 4801       |H   |		Short_Literal	0x1
1405 4800       |H   |		Short_Literal	0x0
1406 e004       |    |		Load	0x0,0x4
1407 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1408 c405       |    |		Store	0x2,0x5
1409 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2b.0x65 = 0x1409,0x56
140a e009       |    |		Load	0x0,0x9
140b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
140c 0092 2509  |  % |		Action	Push_String_Extended,0x2509					; "Delete_By_Demotion"
140e 8222       | "  |		Call	0x1,0x22
140f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1410 ; --------------------------------------------------------------------------------------
1410 ; SUBPROGRAM
1410 ; --------------------------------------------------------------------------------------
1410 1414       |    |		.CONST	0x1414								; Address of begin
1411 1429       | )  |		.CONST	0x1429								; Address of exception handler
1412 0001       |    |		.CONST	0x0001								; Number of locals
1413			INIT_1410:
1413 0007       |    |		Action	Break_Optional							; Debug Table 0x2c = .DEBUG	0x1413,0x3548,0x0002,0x0000,0x005a,0x8695,0x0000,0x170b
													; Debug Table 0x2c.0x0 = 0x1413,0xffff
1414			BODY_1410:
1414 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2c.0x1 = 0x1414,0x1
1415 0b84       |    |		Execute_Immediate	Case_Compare,0x84
1416 700e       |p   |		Jump_Nonzero	0x1425
1417 0b8c       |    |		Execute_Immediate	Case_Compare,0x8c
1418 700c       |p   |		Jump_Nonzero	0x1425
1419 0b91       |    |		Execute_Immediate	Case_Compare,0x91
141a 700a       |p   |		Jump_Nonzero	0x1425
141b 0b8f       |    |		Execute_Immediate	Case_Compare,0x8f
141c 7008       |p   |		Jump_Nonzero	0x1425
141d 0b95       |    |		Execute_Immediate	Case_Compare,0x95
141e 7006       |p   |		Jump_Nonzero	0x1425
141f 0b97       |    |		Execute_Immediate	Case_Compare,0x97
1420 7006       |p   |		Jump_Nonzero	0x1427
1421 0b89       |    |		Execute_Immediate	Case_Compare,0x89
1422 7004       |p   |		Jump_Nonzero	0x1427
1423 62a4       |b   |		Indirect_Literal	Discrete,0x16c8,{0x00000000, 0x5a869501}	; Debug Table 0x2c.0x2 = 0x1423,0x4
1424 0257       | W  |		Execute	Discrete,Raise
1425 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2c.0x3 = 0x1425,0x2
1426 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1427 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2c.0x4 = 0x1427,0x3
1428 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1429			TRAP_1410:
1429 629e       |b   |		Indirect_Literal	Discrete,0x16c8,{0x00000000, 0x5a869501}
142a 010f       |    |		Execute	Exception,Equal
142b 6808       |h   |		Jump_Zero	0x1434
142c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2c.0x5 = 0x142c,0x5
142d 0092 24c7  |  $ |		Action	Push_String_Extended,0x24c7					; "Bad_Call"
142f 0092 250a  |  % |		Action	Push_String_Extended,0x250a					; "Can_Be_Empty"
1431 8222       | "  |		Call	0x1,0x22
1432 4831       |H1  |		Short_Literal	0x31
1433 0257       | W  |		Execute	Discrete,Raise
1434 628f       |b   |		Indirect_Literal	Discrete,0x16c4,{0x00000000, 0x5a851501}
1435 010f       |    |		Execute	Exception,Equal
1436 6802       |h   |		Jump_Zero	0x1439
1437 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2c.0x6 = 0x1437,0x6
1438 0101       |    |		Execute	Exception,Reraise
1439 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2c.0x7 = 0x1439,0x7
143a e009       |    |		Load	0x0,0x9
143b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
143c 0092 250a  |  % |		Action	Push_String_Extended,0x250a					; "Can_Be_Empty"
143e 8222       | "  |		Call	0x1,0x22
143f 4831       |H1  |		Short_Literal	0x31
1440 0257       | W  |		Execute	Discrete,Raise
1441 0000 0000  |    |		.BLANK	0000[0x7]
1448 ; --------------------------------------------------------------------------------------
1448 ; SUBPROGRAM
1448 ; --------------------------------------------------------------------------------------
1448 144e       | N  |		.CONST	0x144e								; Address of begin
1449 1483       |    |		.CONST	0x1483								; Address of exception handler
144a 0003       |    |		.CONST	0x0003								; Number of locals
144b			INIT_1448:
144b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2d = .DEBUG	0x144b,0x355a,0x0001,0x0000,0x005a,0x8695,0x0000,0x175e
													; Debug Table 0x2d.0x0 = 0x144b,0xffff
144c e002       |    |		Load	0x0,0x2								; Debug Table 0x2d.0x1 = 0x144c,0xfffe
144d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
144e			BODY_1448:
144e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2d.0x2 = 0x144e,0x1
144f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1450 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
1451 0007       |    |		Action	Break_Optional							; Debug Table 0x2d.0x3 = 0x1451,0x2
1452 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2d.0x4 = 0x1452,0x401
1453 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2d.0x5 = 0x1453,0x2
1454 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
1455 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2d.0x6 = 0x1455,0x3
1456 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
1457 e5ff       |    |		Load	0x2,-0x1
1458 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
1459 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2d.0x7 = 0x1459,0x4
145a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
145b e001       |    |		Load	0x0,0x1
145c 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
145d e5ff       |    |		Load	0x2,-0x1
145e 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
145f e002       |    |		Load	0x0,0x2								; Debug Table 0x2d.0x8 = 0x145f,0x5
1460 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
1461 e5ff       |    |		Load	0x2,-0x1
1462 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
1463 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2d.0x9 = 0x1463,0x6
1464 e5ff       |    |		Load	0x2,-0x1
1465 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
1466 e001       |    |		Load	0x0,0x1								; Debug Table 0x2d.0xa = 0x1466,0x7
1467 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
1468 e5ff       |    |		Load	0x2,-0x1
1469 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
146a e002       |    |		Load	0x0,0x2								; Debug Table 0x2d.0xb = 0x146a,0x8
146b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
146c e002       |    |		Load	0x0,0x2
146d 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
146e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
146f 6250       |bP  |		Indirect_Literal	Discrete,0x16c0,{0x00000000, 0x00004000}
1470 e004       |    |		Load	0x0,0x4
1471 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1472 4800       |H   |		Short_Literal	0x0
1473 e5ff       |    |		Load	0x2,-0x1
1474 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1475 e002       |    |		Load	0x0,0x2
1476 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1477 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1478 e002       |    |		Load	0x0,0x2
1479 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
147a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
147b e5ff       |    |		Load	0x2,-0x1
147c 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
147d 0059       | Y  |		Store_Top	Discrete,At_Offset_1
147e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2d.0xc = 0x147e,0x9
147f 0092 24d2  |  $ |		Action	Push_String_Extended,0x24d2					; "Decl_Ops.Get_Unit_State"
1481 820f       |    |		Call	0x1,0xf
1482 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1483			TRAP_1448:
1483 6240       |b@  |		Indirect_Literal	Discrete,0x16c4,{0x00000000, 0x5a851501}
1484 010f       |    |		Execute	Exception,Equal
1485 6802       |h   |		Jump_Zero	0x1488
1486 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2d.0xd = 0x1486,0xa
1487 0101       |    |		Execute	Exception,Reraise
1488 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2d.0xe = 0x1488,0xb
1489 e009       |    |		Load	0x0,0x9
148a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
148b 0092 250b  |  % |		Action	Push_String_Extended,0x250b					; "Convert_To_Child"
148d 8222       | "  |		Call	0x1,0x22
148e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
148f 0000       |    |		.XXX[0x1]
1490 ; --------------------------------------------------------------------------------------
1490 ; SUBPROGRAM
1490 ; --------------------------------------------------------------------------------------
1490 14ad       |    |		.CONST	0x14ad								; Address of begin
1491 154e       | N  |		.CONST	0x154e								; Address of exception handler
1492 000a       |    |		.CONST	0x000a								; Number of locals
1493			INIT_1490:
1493 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2e = .DEBUG	0x1493,0x357a,0x0001,0x0000,0x005a,0x8695,0x0000,0x17d8
													; Debug Table 0x2e.0x0 = 0x1493,0xffff
1494 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1495 e00c       |    |		Load	0x0,0xc
1496 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
1497 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2e.0x1 = 0x1497,0xfffe
1498 e004       |    |		Load	0x0,0x4								; Debug Table 0x2e.0x2 = 0x1498,0xfffd
1499 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
149a 02c7       |    |		Declare_Variable	Any
149b 00d8       |    |		Load_Top	At_Offset_0
149c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
149d e00e       |    |		Load	0x0,0xe								; Debug Table 0x2e.0x3 = 0x149d,0xfffc
149e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
149f 02c7       |    |		Declare_Variable	Any
14a0 00d8       |    |		Load_Top	At_Offset_0
14a1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
14a2 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x2e.0x4 = 0x14a2,0xfffb
14a3 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x2e.0x5 = 0x14a3,0xfffa
14a4 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2e.0x6 = 0x14a4,0xfff9
14a5 e002       |    |		Load	0x0,0x2								; Debug Table 0x2e.0x7 = 0x14a5,0xfff8
14a6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
14a7 e002       |    |		Load	0x0,0x2								; Debug Table 0x2e.0x8 = 0x14a7,0xfff7
14a8 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
14a9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
14aa 02c7       |    |		Declare_Variable	Any
14ab 00d8       |    |		Load_Top	At_Offset_0
14ac 1c00       |    |		Execute_Immediate	Run_Utility,0x0
14ad			BODY_1490:
14ad e004       |    |		Load	0x0,0x4								; Debug Table 0x2e.0x9 = 0x14ad,0x1
14ae 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
14af c404       |    |		Store	0x2,0x4
14b0 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2e.0xa = 0x14b0,0x2
14b1 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
14b2 0007       |    |		Action	Break_Optional
14b3 e40b       |    |		Load	0x2,0xb								; Debug Table 0x2e.0xb = 0x14b3,0x401
14b4 0007       |    |		Action	Break_Optional
14b5 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x2e.0xc = 0x14b5,0x402
14b6 0007       |    |		Action	Break_Optional							; Debug Table 0x2e.0xd = 0x14b6,0x403
14b7 00d0       |    |		Action	Swap_Control							; Debug Table 0x2e.0xe = 0x14b7,0x404
14b8 00d1       |    |		Pop_Control	Pop_Count_1
14b9 0fab       |    |		Execute_Immediate	Equal,-0x55					; Debug Table 0x2e.0xf = 0x14b9,0x2
14ba 6892       |h   |		Jump_Zero	0x154d
14bb e002       |    |		Load	0x0,0x2								; Debug Table 0x2e.0x10 = 0x14bb,0x3
14bc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
14bd 00e1       |    |		Load_Encached	Boolean_Cache
14be e5ff       |    |		Load	0x2,-0x1
14bf 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
14c0 e002       |    |		Load	0x0,0x2
14c1 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
14c2 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
14c3 c403       |    |		Store	0x2,0x3
14c4 005a       | Z  |		Store_Top	Discrete,At_Offset_2
14c5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2e.0x11 = 0x14c5,0x4
14c6 0092 24fa  |  $ |		Action	Push_String_Extended,0x24fa					; "Decl_Ops.Will_Be_A_Comp_Unit"
14c8 820f       |    |		Call	0x1,0xf
14c9 e403       |    |		Load	0x2,0x3								; Debug Table 0x2e.0x12 = 0x14c9,0x5
14ca 6882       |h   |		Jump_Zero	0x154d
14cb 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2e.0x13 = 0x14cb,0x6
14cc 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
14cd e011       |    |		Load	0x0,0x11							; Debug Table 0x2e.0x14 = 0x14cd,0x7
14ce 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
14cf e5ff       |    |		Load	0x2,-0x1
14d0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
14d1 e017       |    |		Load	0x0,0x17
14d2 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
14d3 e013       |    |		Load	0x0,0x13							; Debug Table 0x2e.0x15 = 0x14d3,0x8
14d4 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
14d5 e004       |    |		Load	0x0,0x4
14d6 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
14d7 c404       |    |		Store	0x2,0x4
14d8 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2e.0x16 = 0x14d8,0x9
14d9 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
14da 8231       | 1  |		Call	0x1,0x31
14db c40a       |    |		Store	0x2,0xa
14dc e002       |    |		Load	0x0,0x2								; Debug Table 0x2e.0x17 = 0x14dc,0xa
14dd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
14de 00f1       |    |		Load_Encached	Diana_Temp_Seq
14df e002       |    |		Load	0x0,0x2
14e0 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
14e1 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
14e2 e405       |    |		Load	0x2,0x5
14e3 0120       |    |		Execute	Any,Is_Value
14e4 6803       |h   |		Jump_Zero	0x14e8
14e5 e00e       |    |		Load	0x0,0xe
14e6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
14e7 7801       |x   |		Jump	0x14e9
14e8 e405       |    |		Load	0x2,0x5
14e9 e408       |    |		Load	0x2,0x8
14ea e5ff       |    |		Load	0x2,-0x1
14eb 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
14ec 61d3       |a   |		Indirect_Literal	Discrete,0x16c0,{0x00000000, 0x00004000}
14ed e404       |    |		Load	0x2,0x4
14ee 4803       |H   |		Short_Literal	0x3
14ef e40a       |    |		Load	0x2,0xa
14f0 e002       |    |		Load	0x0,0x2
14f1 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
14f2 4802       |H   |		Short_Literal	0x2
14f3 e002       |    |		Load	0x0,0x2
14f4 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
14f5 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
14f6 e5ff       |    |		Load	0x2,-0x1
14f7 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
14f8 c408       |    |		Store	0x2,0x8
14f9 c405       |    |		Store	0x2,0x5
14fa c406       |    |		Store	0x2,0x6
14fb c407       |    |		Store	0x2,0x7
14fc 005a       | Z  |		Store_Top	Discrete,At_Offset_2
14fd 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2e.0x18 = 0x14fd,0xb
14fe 460e       |F   |		Jump_Case	0xf
14ff 780e       |x   |		Jump	0x150e								; case 0x0
1500 783c       |x<  |		Jump	0x153d								; case 0x1
1501 7818       |x   |		Jump	0x151a								; case 0x2
1502 783a       |x:  |		Jump	0x153d								; case 0x3
1503 7828       |x(  |		Jump	0x152c								; case 0x4
1504 7838       |x8  |		Jump	0x153d								; case 0x5
1505 7837       |x7  |		Jump	0x153d								; case 0x6
1506 7836       |x6  |		Jump	0x153d								; case 0x7
1507 7835       |x5  |		Jump	0x153d								; case 0x8
1508 7834       |x4  |		Jump	0x153d								; case 0x9
1509 7833       |x3  |		Jump	0x153d								; case 0xa
150a 7832       |x2  |		Jump	0x153d								; case 0xb
150b 7831       |x1  |		Jump	0x153d								; case 0xc
150c 7830       |x0  |		Jump	0x153d								; case 0xd
150d 782f       |x/  |		Jump	0x153d								; case 0xe
150e e404       |    |		Load	0x2,0x4								; Debug Table 0x2e.0x19 = 0x150e,0xc
150f 4801       |H   |		Short_Literal	0x1
1510 4801       |H   |		Short_Literal	0x1
1511 e004       |    |		Load	0x0,0x4
1512 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1513 c404       |    |		Store	0x2,0x4
1514 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2e.0x1a = 0x1514,0xd
1515 e5ff       |    |		Load	0x2,-0x1
1516 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1517 e001       |    |		Load	0x0,0x1
1518 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
1519 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
151a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2e.0x1b = 0x151a,0xe
151b 7009       |p   |		Jump_Nonzero	0x1525
151c e404       |    |		Load	0x2,0x4								; Debug Table 0x2e.0x1c = 0x151c,0xf
151d 4801       |H   |		Short_Literal	0x1
151e 4800       |H   |		Short_Literal	0x0
151f e004       |    |		Load	0x0,0x4
1520 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1521 c404       |    |		Store	0x2,0x4
1522 e004       |    |		Load	0x0,0x4								; Debug Table 0x2e.0x1d = 0x1522,0x10
1523 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1524 c404       |    |		Store	0x2,0x4
1525 e404       |    |		Load	0x2,0x4								; Debug Table 0x2e.0x1e = 0x1525,0x11
1526 e405       |    |		Load	0x2,0x5
1527 0092 24cc  |  $ |		Action	Push_String_Extended,0x24cc					; "Install_Stub"
1529 e5ff       |    |		Load	0x2,-0x1
152a 822b       | +  |		Call	0x1,0x2b
152b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
152c e404       |    |		Load	0x2,0x4								; Debug Table 0x2e.0x1f = 0x152c,0x12
152d 4801       |H   |		Short_Literal	0x1
152e 4800       |H   |		Short_Literal	0x0
152f e004       |    |		Load	0x0,0x4
1530 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1531 c404       |    |		Store	0x2,0x4
1532 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2e.0x20 = 0x1532,0x13
1533 e5ff       |    |		Load	0x2,-0x1
1534 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1535 e001       |    |		Load	0x0,0x1
1536 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
1537 e406       |    |		Load	0x2,0x6								; Debug Table 0x2e.0x21 = 0x1537,0x14
1538 0092 24cc  |  $ |		Action	Push_String_Extended,0x24cc					; "Install_Stub"
153a e402       |    |		Load	0x2,0x2
153b 822e       | .  |		Call	0x1,0x2e
153c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
153d e404       |    |		Load	0x2,0x4								; Debug Table 0x2e.0x22 = 0x153d,0x15
153e 4801       |H   |		Short_Literal	0x1
153f 4800       |H   |		Short_Literal	0x0
1540 e004       |    |		Load	0x0,0x4
1541 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1542 c404       |    |		Store	0x2,0x4
1543 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2e.0x23 = 0x1543,0x16
1544 e5ff       |    |		Load	0x2,-0x1
1545 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1546 e001       |    |		Load	0x0,0x1
1547 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
1548 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2e.0x24 = 0x1548,0x17
1549 e405       |    |		Load	0x2,0x5
154a 0092 24cc  |  $ |		Action	Push_String_Extended,0x24cc					; "Install_Stub"
154c 8230       | 0  |		Call	0x1,0x30
154d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
154e			TRAP_1490:
154e 6175       |au  |		Indirect_Literal	Discrete,0x16c4,{0x00000000, 0x5a851501}
154f 010f       |    |		Execute	Exception,Equal
1550 6808       |h   |		Jump_Zero	0x1559
1551 e404       |    |		Load	0x2,0x4								; Debug Table 0x2e.0x25 = 0x1551,0x18
1552 4801       |H   |		Short_Literal	0x1
1553 4800       |H   |		Short_Literal	0x0
1554 e004       |    |		Load	0x0,0x4
1555 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1556 c404       |    |		Store	0x2,0x4
1557 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2e.0x26 = 0x1557,0x19
1558 0101       |    |		Execute	Exception,Reraise
1559 e404       |    |		Load	0x2,0x4								; Debug Table 0x2e.0x27 = 0x1559,0x1a
155a 4801       |H   |		Short_Literal	0x1
155b 4800       |H   |		Short_Literal	0x0
155c e004       |    |		Load	0x0,0x4
155d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
155e c404       |    |		Store	0x2,0x4
155f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2e.0x28 = 0x155f,0x1b
1560 e009       |    |		Load	0x0,0x9
1561 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1562 0092 250c  |  % |		Action	Push_String_Extended,0x250c					; "Install_Parent_Stub"
1564 8222       | "  |		Call	0x1,0x22
1565 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1566 0000 0000  |    |		.XXX[0x2]
1568 ; --------------------------------------------------------------------------------------
1568 ; SUBPROGRAM
1568 ; --------------------------------------------------------------------------------------
1568 157d       | }  |		.CONST	0x157d								; Address of begin
1569 15b3       |    |		.CONST	0x15b3								; Address of exception handler
156a 0007       |    |		.CONST	0x0007								; Number of locals
156b			INIT_1568:
156b e001       |    |		Load	0x0,0x1								; Debug Table 0x2f = .DEBUG	0x156b,0x35ce,0x0001,0x0000,0x005a,0x8695,0x0000,0x193b
													; Debug Table 0x2f.0x0 = 0x156b,0xffff
156c 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
156d 0322       | "  |		Declare_Variable	Record
156e 00d8       |    |		Load_Top	At_Offset_0
156f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1570 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2f.0x1 = 0x1570,0xfffe
1571 e002       |    |		Load	0x0,0x2								; Debug Table 0x2f.0x2 = 0x1571,0xfffd
1572 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
1573 02ff       |    |		Declare_Variable	Variant_Record
1574 00d8       |    |		Load_Top	At_Offset_0
1575 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1576 e001       |    |		Load	0x0,0x1								; Debug Table 0x2f.0x3 = 0x1576,0xfffc
1577 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
1578 0322       | "  |		Declare_Variable	Record
1579 e002       |    |		Load	0x0,0x2								; Debug Table 0x2f.0x4 = 0x1579,0xfffb
157a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
157b 029f 245b  |  $[|		Declare_Subprogram	INIT_2458,For_Call
157d			BODY_1568:
157d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2f.0x5 = 0x157d,0x1
157e 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
157f e001       |    |		Load	0x0,0x1
1580 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
1581 682c       |h,  |		Jump_Zero	0x15ae
1582 e002       |    |		Load	0x0,0x2								; Debug Table 0x2f.0x6 = 0x1582,0x2
1583 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1584 e404       |    |		Load	0x2,0x4
1585 613a       |a:  |		Indirect_Literal	Discrete,0x16c0,{0x00000000, 0x00004000}
1586 e004       |    |		Load	0x0,0x4
1587 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1588 4800       |H   |		Short_Literal	0x0
1589 e5ff       |    |		Load	0x2,-0x1
158a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
158b e002       |    |		Load	0x0,0x2
158c 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
158d 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
158e 00d1       |    |		Pop_Control	Pop_Count_1
158f 005a       | Z  |		Store_Top	Discrete,At_Offset_2
1590 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2f.0x7 = 0x1590,0x3
1591 0092 24c3  |  $ |		Action	Push_String_Extended,0x24c3					; "Traversal.Get_Version"
1593 820f       |    |		Call	0x1,0xf
1594 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2f.0x8 = 0x1594,0x4
1595 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1596 e402       |    |		Load	0x2,0x2
1597 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
1598 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2f.0x9 = 0x1598,0x5
1599 e002       |    |		Load	0x0,0x2
159a 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
159b e402       |    |		Load	0x2,0x2
159c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
159d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2f.0xa = 0x159d,0x6
159e 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
159f e402       |    |		Load	0x2,0x2
15a0 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
15a1 8407       |    |		Call	0x2,0x7								; Debug Table 0x2f.0xb = 0x15a1,0x7
15a2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2f.0xc = 0x15a2,0x8
15a3 e001       |    |		Load	0x0,0x1
15a4 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
15a5 7007       |p   |		Jump_Nonzero	0x15ad
15a6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2f.0xd = 0x15a6,0x9
15a7 e001       |    |		Load	0x0,0x1
15a8 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
15a9 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2f.0xe = 0x15a9,0xa
15aa e001       |    |		Load	0x0,0x1
15ab 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
15ac 00d1       |    |		Pop_Control	Pop_Count_1
15ad 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
15ae e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2f.0xf = 0x15ae,0xb
15af 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
15b0 e001       |    |		Load	0x0,0x1
15b1 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
15b2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
15b3			TRAP_1568:
15b3 6110       |a   |		Indirect_Literal	Discrete,0x16c4,{0x00000000, 0x5a851501}
15b4 010f       |    |		Execute	Exception,Equal
15b5 6802       |h   |		Jump_Zero	0x15b8
15b6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2f.0x10 = 0x15b6,0xc
15b7 0101       |    |		Execute	Exception,Reraise
15b8 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2f.0x11 = 0x15b8,0xd
15b9 e009       |    |		Load	0x0,0x9
15ba 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
15bb 0092 250d  |  % |		Action	Push_String_Extended,0x250d					; "Make_Read_Only"
15bd 8222       | "  |		Call	0x1,0x22
15be 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
15bf 0000       |    |		.XXX[0x1]
15c0 ; --------------------------------------------------------------------------------------
15c0 ; SUBPROGRAM
15c0 ; --------------------------------------------------------------------------------------
15c0 15dd       |    |		.CONST	0x15dd								; Address of begin
15c1 16a8       |    |		.CONST	0x16a8								; Address of exception handler
15c2 0009       |    |		.CONST	0x0009								; Number of locals
15c3			INIT_15c0:
15c3 e004       |    |		Load	0x0,0x4								; Debug Table 0x30 = .DEBUG	0x15c3,0x35f4,0x0001,0x0000,0x005a,0x8695,0x0000,0x19e5
													; Debug Table 0x30.0x0 = 0x15c3,0xffff
15c4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
15c5 02c7       |    |		Declare_Variable	Any
15c6 00d8       |    |		Load_Top	At_Offset_0
15c7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
15c8 e002       |    |		Load	0x0,0x2								; Debug Table 0x30.0x1 = 0x15c8,0xfffe
15c9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
15ca 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x30.0x2 = 0x15ca,0xfffd
15cb e00e       |    |		Load	0x0,0xe								; Debug Table 0x30.0x3 = 0x15cb,0xfffc
15cc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
15cd 02c7       |    |		Declare_Variable	Any
15ce 00d8       |    |		Load_Top	At_Offset_0
15cf 1c00       |    |		Execute_Immediate	Run_Utility,0x0
15d0 e002       |    |		Load	0x0,0x2								; Debug Table 0x30.0x4 = 0x15d0,0xfffb
15d1 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
15d2 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
15d3 02c7       |    |		Declare_Variable	Any
15d4 00d8       |    |		Load_Top	At_Offset_0
15d5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
15d6 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x30.0x5 = 0x15d6,0xfffa
15d7 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x30.0x6 = 0x15d7,0xfff9
15d8 e002       |    |		Load	0x0,0x2								; Debug Table 0x30.0x7 = 0x15d8,0xfff8
15d9 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
15da 02ff       |    |		Declare_Variable	Variant_Record
15db 00d8       |    |		Load_Top	At_Offset_0
15dc 1c00       |    |		Execute_Immediate	Run_Utility,0x0
15dd			BODY_15c0:
15dd e013       |    |		Load	0x0,0x13							; Debug Table 0x30.0x8 = 0x15dd,0x1
15de 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
15df e004       |    |		Load	0x0,0x4
15e0 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
15e1 c402       |    |		Store	0x2,0x2
15e2 e002       |    |		Load	0x0,0x2								; Debug Table 0x30.0x9 = 0x15e2,0x2
15e3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
15e4 e406       |    |		Load	0x2,0x6
15e5 0120       |    |		Execute	Any,Is_Value
15e6 6804       |h   |		Jump_Zero	0x15eb
15e7 e002       |    |		Load	0x0,0x2
15e8 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
15e9 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
15ea 7801       |x   |		Jump	0x15ec
15eb e406       |    |		Load	0x2,0x6
15ec e002       |    |		Load	0x0,0x2
15ed 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
15ee 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
15ef 4800       |H   |		Short_Literal	0x0
15f0 4801       |H   |		Short_Literal	0x1
15f1 4800       |H   |		Short_Literal	0x0
15f2 4800       |H   |		Short_Literal	0x0
15f3 e402       |    |		Load	0x2,0x2
15f4 4801       |H   |		Short_Literal	0x1
15f5 e5ff       |    |		Load	0x2,-0x1
15f6 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
15f7 e002       |    |		Load	0x0,0x2
15f8 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
15f9 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
15fa e002       |    |		Load	0x0,0x2
15fb 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
15fc 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
15fd c404       |    |		Store	0x2,0x4
15fe c406       |    |		Store	0x2,0x6
15ff c403       |    |		Store	0x2,0x3
1600 e403       |    |		Load	0x2,0x3								; Debug Table 0x30.0xa = 0x1600,0x3
1601 460e       |F   |		Jump_Case	0xf
1602 7837       |x7  |		Jump	0x163a								; case 0x0
1603 780d       |x   |		Jump	0x1611								; case 0x1
1604 7824       |x$  |		Jump	0x1629								; case 0x2
1605 7823       |x#  |		Jump	0x1629								; case 0x3
1606 7822       |x"  |		Jump	0x1629								; case 0x4
1607 7821       |x!  |		Jump	0x1629								; case 0x5
1608 7820       |x   |		Jump	0x1629								; case 0x6
1609 781f       |x   |		Jump	0x1629								; case 0x7
160a 781e       |x   |		Jump	0x1629								; case 0x8
160b 781d       |x   |		Jump	0x1629								; case 0x9
160c 781c       |x   |		Jump	0x1629								; case 0xa
160d 7810       |x   |		Jump	0x161e								; case 0xb
160e 781a       |x   |		Jump	0x1629								; case 0xc
160f 7819       |x   |		Jump	0x1629								; case 0xd
1610 7818       |x   |		Jump	0x1629								; case 0xe
1611 e402       |    |		Load	0x2,0x2								; Debug Table 0x30.0xb = 0x1611,0x5
1612 4801       |H   |		Short_Literal	0x1
1613 4800       |H   |		Short_Literal	0x0
1614 e004       |    |		Load	0x0,0x4
1615 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1616 c402       |    |		Store	0x2,0x2
1617 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x30.0xc = 0x1617,0x6
1618 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1619 0092 250e  |  % |		Action	Push_String_Extended,0x250e					; "Creation of child unit"
161b e008       |    |		Load	0x0,0x8
161c 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
161d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x30.0xd = 0x161d,0x7
161e e402       |    |		Load	0x2,0x2								; Debug Table 0x30.0xe = 0x161e,0x8
161f 4801       |H   |		Short_Literal	0x1
1620 4800       |H   |		Short_Literal	0x0
1621 e004       |    |		Load	0x0,0x4
1622 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1623 c402       |    |		Store	0x2,0x2
1624 0092 250f  |  % |		Action	Push_String_Extended,0x250f					; "Creation of child unit failed - parent is frozen"
													; Debug Table 0x30.0xf = 0x1624,0x9
1626 e00a       |    |		Load	0x0,0xa
1627 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1628 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x30.0x10 = 0x1628,0xa
1629 e402       |    |		Load	0x2,0x2								; Debug Table 0x30.0x11 = 0x1629,0xb
162a 4801       |H   |		Short_Literal	0x1
162b 4800       |H   |		Short_Literal	0x0
162c e004       |    |		Load	0x0,0x4
162d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
162e c402       |    |		Store	0x2,0x2
162f 0092 2510  |  % |		Action	Push_String_Extended,0x2510					; "Creation of child unit failed - "
													; Debug Table 0x30.0x12 = 0x162f,0xc
1631 e403       |    |		Load	0x2,0x3
1632 e002       |    |		Load	0x0,0x2
1633 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1634 025e       | ^  |		Execute	Discrete,Convert
1635 1c01       |    |		Execute_Immediate	Run_Utility,0x1
1636 01cc       |    |		Execute	Vector,Catenate
1637 e00a       |    |		Load	0x0,0xa
1638 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1639 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x30.0x13 = 0x1639,0xd
163a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x30.0x14 = 0x163a,0xe
163b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
163c e404       |    |		Load	0x2,0x4
163d 8228       | (  |		Call	0x1,0x28
163e e5ff       |    |		Load	0x2,-0x1
163f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
1640 e002       |    |		Load	0x0,0x2								; Debug Table 0x30.0x15 = 0x1640,0xf
1641 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1642 e5ff       |    |		Load	0x2,-0x1
1643 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
1644 0120       |    |		Execute	Any,Is_Value
1645 6803       |h   |		Jump_Zero	0x1649
1646 e002       |    |		Load	0x0,0x2
1647 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1648 7802       |x   |		Jump	0x164b
1649 e5ff       |    |		Load	0x2,-0x1
164a 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
164b 6074       |`t  |		Indirect_Literal	Discrete,0x16c0,{0x00000000, 0x00004000}
164c e402       |    |		Load	0x2,0x2
164d 4800       |H   |		Short_Literal	0x0
164e e002       |    |		Load	0x0,0x2
164f 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
1650 e5ff       |    |		Load	0x2,-0x1
1651 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1652 e002       |    |		Load	0x0,0x2
1653 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
1654 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
1655 e5ff       |    |		Load	0x2,-0x1
1656 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
1657 c403       |    |		Store	0x2,0x3
1658 e403       |    |		Load	0x2,0x3								; Debug Table 0x30.0x16 = 0x1658,0x10
1659 0092 24ca  |  $ |		Action	Push_String_Extended,0x24ca					; "Traversal.Get_Object"
165b 820f       |    |		Call	0x1,0xf
165c e002       |    |		Load	0x0,0x2								; Debug Table 0x30.0x17 = 0x165c,0x11
165d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
165e 00f1       |    |		Load_Encached	Diana_Temp_Seq
165f e002       |    |		Load	0x0,0x2
1660 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1661 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
1662 e405       |    |		Load	0x2,0x5
1663 0120       |    |		Execute	Any,Is_Value
1664 6803       |h   |		Jump_Zero	0x1668
1665 e00e       |    |		Load	0x0,0xe
1666 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1667 7801       |x   |		Jump	0x1669
1668 e405       |    |		Load	0x2,0x5
1669 e409       |    |		Load	0x2,0x9
166a 6055       |`U  |		Indirect_Literal	Discrete,0x16c0,{0x00000000, 0x00004000}
166b e402       |    |		Load	0x2,0x2
166c 4800       |H   |		Short_Literal	0x0
166d e002       |    |		Load	0x0,0x2
166e 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
166f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1670 e002       |    |		Load	0x0,0x2
1671 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
1672 4ffc       |O   |		Short_Literal	-0x4
1673 4ffd       |O   |		Short_Literal	-0x3
1674 e5ff       |    |		Load	0x2,-0x1
1675 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
1676 e002       |    |		Load	0x0,0x2
1677 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
1678 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1679 00d1       |    |		Pop_Control	Pop_Count_1
167a c405       |    |		Store	0x2,0x5
167b c407       |    |		Store	0x2,0x7
167c 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
167d c403       |    |		Store	0x2,0x3
167e e403       |    |		Load	0x2,0x3								; Debug Table 0x30.0x18 = 0x167e,0x12
167f 0092 2511  |  % |		Action	Push_String_Extended,0x2511					; "Object_Ops.Create"
1681 820f       |    |		Call	0x1,0xf
1682 e402       |    |		Load	0x2,0x2								; Debug Table 0x30.0x19 = 0x1682,0x13
1683 4801       |H   |		Short_Literal	0x1
1684 4801       |H   |		Short_Literal	0x1
1685 e004       |    |		Load	0x0,0x4
1686 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1687 c402       |    |		Store	0x2,0x2
1688 4800       |H   |		Short_Literal	0x0							; Debug Table 0x30.0x1a = 0x1688,0x14
1689 e5ff       |    |		Load	0x2,-0x1
168a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
168b e001       |    |		Load	0x0,0x1
168c 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
168d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x30.0x1b = 0x168d,0x15
168e 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
168f 6814       |h   |		Jump_Zero	0x16a4
1690 e002       |    |		Load	0x0,0x2								; Debug Table 0x30.0x1c = 0x1690,0x16
1691 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1692 e002       |    |		Load	0x0,0x2
1693 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1694 602b       |`+  |		Indirect_Literal	Discrete,0x16c0,{0x00000000, 0x00004000}
1695 e004       |    |		Load	0x0,0x4
1696 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1697 4800       |H   |		Short_Literal	0x0
1698 e5ff       |    |		Load	0x2,-0x1
1699 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
169a e002       |    |		Load	0x0,0x2
169b 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
169c 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
169d c5fe       |    |		Store	0x2,-0x2
169e c403       |    |		Store	0x2,0x3
169f e403       |    |		Load	0x2,0x3								; Debug Table 0x30.0x1d = 0x169f,0x17
16a0 0092 24c0  |  $ |		Action	Push_String_Extended,0x24c0					; "Traversal.Get_Declaration"
16a2 820f       |    |		Call	0x1,0xf
16a3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
16a4 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x30.0x1e = 0x16a4,0x18
16a5 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
16a6 a5fe       |    |		Store_Unchecked	0x2,-0x2
16a7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
16a8			TRAP_15c0:
16a8 601b       |`   |		Indirect_Literal	Discrete,0x16c4,{0x00000000, 0x5a851501}
16a9 010f       |    |		Execute	Exception,Equal
16aa 6808       |h   |		Jump_Zero	0x16b3
16ab e402       |    |		Load	0x2,0x2								; Debug Table 0x30.0x1f = 0x16ab,0x19
16ac 4801       |H   |		Short_Literal	0x1
16ad 4800       |H   |		Short_Literal	0x0
16ae e004       |    |		Load	0x0,0x4
16af 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
16b0 c402       |    |		Store	0x2,0x2
16b1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x30.0x20 = 0x16b1,0x1a
16b2 0101       |    |		Execute	Exception,Reraise
16b3 e402       |    |		Load	0x2,0x2								; Debug Table 0x30.0x21 = 0x16b3,0x1b
16b4 4801       |H   |		Short_Literal	0x1
16b5 4800       |H   |		Short_Literal	0x0
16b6 e004       |    |		Load	0x0,0x4
16b7 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
16b8 c402       |    |		Store	0x2,0x2
16b9 4801       |H   |		Short_Literal	0x1							; Debug Table 0x30.0x22 = 0x16b9,0x1c
16ba e009       |    |		Load	0x0,0x9
16bb 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
16bc 0092 2512  |  % |		Action	Push_String_Extended,0x2512					; "Create_Unit"
16be 8222       | "  |		Call	0x1,0x22
16bf 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
16c0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
16c4 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a851501}
16c8 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a869501}
16cc 0000 0000  |    |		.BLANK	0000[0x4]
16d0 ; --------------------------------------------------------------------------------------
16d0 ; SUBPROGRAM
16d0 ; --------------------------------------------------------------------------------------
16d0 16d5       |    |		.CONST	0x16d5								; Address of begin
16d1 17d1       |    |		.CONST	0x17d1								; Address of exception handler
16d2 0003       |    |		.CONST	0x0003								; Number of locals
16d3			INIT_16d0:
16d3 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x31 = .DEBUG	0x16d3,0x363c,0x0001,0x0000,0x005a,0x8695,0x0000,0x1b51
													; Debug Table 0x31.0x0 = 0x16d3,0xffff
16d4 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x31.0x1 = 0x16d4,0xfffe
16d5			BODY_16d0:
16d5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x31.0x2 = 0x16d5,0x1
16d6 a5f8       |    |		Store_Unchecked	0x2,-0x8
16d7 0007       |    |		Action	Break_Optional							; Debug Table 0x31.0x3 = 0x16d7,0x2
16d8 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x31.0x4 = 0x16d8,0x401
16d9 a5fa       |    |		Store_Unchecked	0x2,-0x6						; Debug Table 0x31.0x5 = 0x16d9,0x2
16da 4802       |H   |		Short_Literal	0x2							; Debug Table 0x31.0x6 = 0x16da,0x3
16db a5f9       |    |		Store_Unchecked	0x2,-0x7
16dc e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x31.0x7 = 0x16dc,0x4
16dd 0f01       |    |		Execute_Immediate	Equal,0x1
16de 687d       |h}  |		Jump_Zero	0x175c
16df e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x8 = 0x16df,0x5
16e0 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
16e1 8223       | #  |		Call	0x1,0x23
16e2 6845       |hE  |		Jump_Zero	0x1728
16e3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x31.0x9 = 0x16e3,0x6
16e4 a5f9       |    |		Store_Unchecked	0x2,-0x7
16e5 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0xa = 0x16e5,0x7
16e6 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
16e7 e002       |    |		Load	0x0,0x2
16e8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
16e9 683a       |h:  |		Jump_Zero	0x1724
16ea e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x31.0xb = 0x16ea,0x8
16eb 6829       |h)  |		Jump_Zero	0x1715
16ec e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0xc = 0x16ec,0x9
16ed 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
16ee 0007       |    |		Action	Break_Optional
16ef e404       |    |		Load	0x2,0x4								; Debug Table 0x31.0xd = 0x16ef,0x801
16f0 0007       |    |		Action	Break_Optional
16f1 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x31.0xe = 0x16f1,0x802
16f2 0007       |    |		Action	Break_Optional							; Debug Table 0x31.0xf = 0x16f2,0x803
16f3 00d0       |    |		Action	Swap_Control							; Debug Table 0x31.0x10 = 0x16f3,0x804
16f4 00d1       |    |		Pop_Control	Pop_Count_1
16f5 0fab       |    |		Execute_Immediate	Equal,-0x55					; Debug Table 0x31.0x11 = 0x16f5,0x9
16f6 680b       |h   |		Jump_Zero	0x1702
16f7 e5fb       |    |		Load	0x2,-0x5
16f8 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
16f9 8226       | &  |		Call	0x1,0x26
16fa 6807       |h   |		Jump_Zero	0x1702
16fb 4800       |H   |		Short_Literal	0x0							; Debug Table 0x31.0x12 = 0x16fb,0xa
16fc a5f8       |    |		Store_Unchecked	0x2,-0x8
16fd 0092 2513  |  % |		Action	Push_String_Extended,0x2513					; "Edit failed - object is not checked out"
													; Debug Table 0x31.0x13 = 0x16fd,0xb
16ff e00a       |    |		Load	0x0,0xa
1700 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1701 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
1702 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x31.0x14 = 0x1702,0xc
1703 e5fb       |    |		Load	0x2,-0x5
1704 823d       | =  |		Call	0x1,0x3d
1705 00d1       |    |		Pop_Control	Pop_Count_1
1706 c5fa       |    |		Store	0x2,-0x6
1707 4801       |H   |		Short_Literal	0x1							; Debug Table 0x31.0x15 = 0x1707,0xd
1708 a5f8       |    |		Store_Unchecked	0x2,-0x8
1709 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x31.0x16 = 0x1709,0xe
170a 6809       |h   |		Jump_Zero	0x1714
170b e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x17 = 0x170b,0xf
170c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
170d e00c       |    |		Load	0x0,0xc
170e 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
170f 0092 2514  |  % |		Action	Push_String_Extended,0x2514					; " is created"
1711 01cc       |    |		Execute	Vector,Catenate
1712 e00a       |    |		Load	0x0,0xa
1713 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
1714 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
1715 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x31.0x18 = 0x1715,0x10
1716 680c       |h   |		Jump_Zero	0x1723
1717 0092 2515  |  % |		Action	Push_String_Extended,0x2515					; "Command failed - "
													; Debug Table 0x31.0x19 = 0x1717,0x11
1719 e5fb       |    |		Load	0x2,-0x5
171a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
171b e00c       |    |		Load	0x0,0xc
171c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
171d 01cc       |    |		Execute	Vector,Catenate
171e 0092 2516  |  % |		Action	Push_String_Extended,0x2516					; " does not exist"
1720 01cc       |    |		Execute	Vector,Catenate
1721 e00a       |    |		Load	0x0,0xa
1722 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1723 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0x31.0x1a = 0x1723,0x12
1724 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x1b = 0x1724,0x13
1725 823a       | :  |		Call	0x1,0x3a
1726 00d1       |    |		Pop_Control	Pop_Count_1
1727 7834       |x4  |		Jump	0x175c
1728 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x1c = 0x1728,0x14
1729 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
172a 0007       |    |		Action	Break_Optional
172b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x31.0x1d = 0x172b,0xc01
172c 0007       |    |		Action	Break_Optional
172d e405       |    |		Load	0x2,0x5								; Debug Table 0x31.0x1e = 0x172d,0x1001
172e 0007       |    |		Action	Break_Optional
172f 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x31.0x1f = 0x172f,0x1002
1730 0007       |    |		Action	Break_Optional							; Debug Table 0x31.0x20 = 0x1730,0x1003
1731 00d0       |    |		Action	Swap_Control							; Debug Table 0x31.0x21 = 0x1731,0x1004
1732 00d1       |    |		Pop_Control	Pop_Count_1
1733 49e1       |I   |		Short_Literal	0x1e1							; Debug Table 0x31.0x22 = 0x1733,0xc01
1734 00eb       |    |		Load_Encached	Diana_Cache
1735 0098       |    |		Execute	Package,Field_Read_Dynamic
1736 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1737 7800       |x   |		Jump	0x1738
1738 00d0       |    |		Action	Swap_Control
1739 00d1       |    |		Pop_Control	Pop_Count_1
173a 6821       |h!  |		Jump_Zero	0x175c							; Debug Table 0x31.0x23 = 0x173a,0x14
173b 0007       |    |		Action	Break_Optional							; Debug Table 0x31.0x24 = 0x173b,0x15
173c 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x31.0x25 = 0x173c,0xebff
173d 039d       |    |		Declare_Variable	Heap_Access,Duplicate
173e e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x26 = 0x173e,0x1401
173f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1740 4974       |It  |		Short_Literal	0x174
1741 00eb       |    |		Load_Encached	Diana_Cache
1742 0098       |    |		Execute	Package,Field_Read_Dynamic
1743 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
1744 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
1745 0007       |    |		Action	Break_Optional							; Debug Table 0x31.0x27 = 0x1745,0x1402
1746 e404       |    |		Load	0x2,0x4								; Debug Table 0x31.0x28 = 0x1746,0x1801
1747 0007       |    |		Action	Break_Optional
1748 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x31.0x29 = 0x1748,0x1802
1749 0007       |    |		Action	Break_Optional							; Debug Table 0x31.0x2a = 0x1749,0x1803
174a 0007       |    |		Action	Break_Optional							; Debug Table 0x31.0x2b = 0x174a,0x1804
174b 0fa8       |    |		Execute_Immediate	Equal,-0x58					; Debug Table 0x31.0x2c = 0x174b,0x1402
174c 680e       |h   |		Jump_Zero	0x175b
174d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x31.0x2d = 0x174d,0x1403
174e 4976       |Iv  |		Short_Literal	0x176
174f 00eb       |    |		Load_Encached	Diana_Cache
1750 0098       |    |		Execute	Package,Field_Read_Dynamic
1751 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1752 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
1753 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x31.0x2e = 0x1753,0x1404
1754 e5fb       |    |		Load	0x2,-0x5
1755 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1756 021f       |    |		Execute	Heap_Access,Equal
1757 6803       |h   |		Jump_Zero	0x175b
1758 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x31.0x2f = 0x1758,0x1405
1759 e5fb       |    |		Load	0x2,-0x5
175a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
175b 00d2       |    |		Pop_Control	Pop_Count_2
175c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x31.0x30 = 0x175c,0x16
175d 680b       |h   |		Jump_Zero	0x1769
175e e5fb       |    |		Load	0x2,-0x5
175f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1760 8226       | &  |		Call	0x1,0x26
1761 6807       |h   |		Jump_Zero	0x1769
1762 4800       |H   |		Short_Literal	0x0							; Debug Table 0x31.0x31 = 0x1762,0x17
1763 a5f8       |    |		Store_Unchecked	0x2,-0x8
1764 0092 2513  |  % |		Action	Push_String_Extended,0x2513					; "Edit failed - object is not checked out"
													; Debug Table 0x31.0x32 = 0x1764,0x18
1766 e00a       |    |		Load	0x0,0xa
1767 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1768 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0x31.0x33 = 0x1768,0x19
1769 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x34 = 0x1769,0x1a
176a 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
176b e5fd       |    |		Load	0x2,-0x3
176c 027d       | }  |		Execute	Discrete,Greater
176d 6817       |h   |		Jump_Zero	0x1785
176e e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x35 = 0x176e,0x1b
176f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1770 8235       | 5  |		Call	0x1,0x35
1771 e5fb       |    |		Load	0x2,-0x5
1772 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
1773 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x31.0x36 = 0x1773,0x1c
1774 00e1       |    |		Load_Encached	Boolean_Cache
1775 00ec       |    |		Load_Encached	Diana_Tree_Cache
1776 e5fb       |    |		Load	0x2,-0x5
1777 e5fc       |    |		Load	0x2,-0x4
1778 e5fd       |    |		Load	0x2,-0x3
1779 e5fe       |    |		Load	0x2,-0x2
177a e5ff       |    |		Load	0x2,-0x1
177b 8237       | 7  |		Call	0x1,0x37
177c 00d1       |    |		Pop_Control	Pop_Count_1
177d c5fa       |    |		Store	0x2,-0x6
177e 005a       | Z  |		Store_Top	Discrete,At_Offset_2
177f c5f8       |    |		Store	0x2,-0x8
1780 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x31.0x37 = 0x1780,0x1d
1781 6802       |h   |		Jump_Zero	0x1784
1782 4800       |H   |		Short_Literal	0x0							; Debug Table 0x31.0x38 = 0x1782,0x1e
1783 a5f9       |    |		Store_Unchecked	0x2,-0x7
1784 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
1785 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x39 = 0x1785,0x1f
1786 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
1787 e5fd       |    |		Load	0x2,-0x3
1788 027c       | |  |		Execute	Discrete,Less
1789 6819       |h   |		Jump_Zero	0x17a3
178a e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x3a = 0x178a,0x20
178b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
178c 4974       |It  |		Short_Literal	0x174
178d 00eb       |    |		Load_Encached	Diana_Cache
178e 0098       |    |		Execute	Package,Field_Read_Dynamic
178f 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
1790 e5fb       |    |		Load	0x2,-0x5
1791 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
1792 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x31.0x3b = 0x1792,0x21
1793 00e1       |    |		Load_Encached	Boolean_Cache
1794 00ec       |    |		Load_Encached	Diana_Tree_Cache
1795 e5fb       |    |		Load	0x2,-0x5
1796 e5fc       |    |		Load	0x2,-0x4
1797 e5fd       |    |		Load	0x2,-0x3
1798 e5fe       |    |		Load	0x2,-0x2
1799 8234       | 4  |		Call	0x1,0x34
179a 00d1       |    |		Pop_Control	Pop_Count_1
179b c5fa       |    |		Store	0x2,-0x6
179c 005a       | Z  |		Store_Top	Discrete,At_Offset_2
179d c5f8       |    |		Store	0x2,-0x8
179e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x31.0x3c = 0x179e,0x22
179f 6802       |h   |		Jump_Zero	0x17a2
17a0 4801       |H   |		Short_Literal	0x1							; Debug Table 0x31.0x3d = 0x17a0,0x23
17a1 a5f9       |    |		Store_Unchecked	0x2,-0x7
17a2 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
17a3 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x3e = 0x17a3,0x24
17a4 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
17a5 0f02       |    |		Execute_Immediate	Equal,0x2
17a6 6824       |h$  |		Jump_Zero	0x17cb
17a7 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x31.0x3f = 0x17a7,0x25
17a8 681c       |h   |		Jump_Zero	0x17c5
17a9 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x40 = 0x17a9,0x26
17aa 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
17ab 6803       |h   |		Jump_Zero	0x17af
17ac 4801       |H   |		Short_Literal	0x1							; Debug Table 0x31.0x41 = 0x17ac,0x27
17ad a5f8       |    |		Store_Unchecked	0x2,-0x8
17ae 7812       |x   |		Jump	0x17c1
17af e011       |    |		Load	0x0,0x11							; Debug Table 0x31.0x42 = 0x17af,0x28
17b0 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
17b1 e5fb       |    |		Load	0x2,-0x5
17b2 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
17b3 e017       |    |		Load	0x0,0x17
17b4 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
17b5 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x31.0x43 = 0x17b5,0x29
17b6 e5fb       |    |		Load	0x2,-0x5
17b7 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
17b8 8227       | '  |		Call	0x1,0x27
17b9 005a       | Z  |		Store_Top	Discrete,At_Offset_2
17ba 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x31.0x44 = 0x17ba,0x2a
17bb e5fb       |    |		Load	0x2,-0x5
17bc 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
17bd e001       |    |		Load	0x0,0x1
17be 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
17bf 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x31.0x45 = 0x17bf,0x2b
17c0 a5f8       |    |		Store_Unchecked	0x2,-0x8
17c1 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x46 = 0x17c1,0x2c
17c2 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
17c3 a5fa       |    |		Store_Unchecked	0x2,-0x6
17c4 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
17c5 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x47 = 0x17c5,0x2d
17c6 823c       | <  |		Call	0x1,0x3c
17c7 00d1       |    |		Pop_Control	Pop_Count_1
17c8 4801       |H   |		Short_Literal	0x1							; Debug Table 0x31.0x48 = 0x17c8,0x2e
17c9 a5f8       |    |		Store_Unchecked	0x2,-0x8
17ca 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
17cb 4801       |H   |		Short_Literal	0x1							; Debug Table 0x31.0x49 = 0x17cb,0x2f
17cc a5f8       |    |		Store_Unchecked	0x2,-0x8
17cd e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x31.0x4a = 0x17cd,0x30
17ce 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
17cf a5fa       |    |		Store_Unchecked	0x2,-0x6
17d0 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
17d1			TRAP_16d0:
17d1 66f2       |f   |		Indirect_Literal	Discrete,0x16c4,{0x00000000, 0x5a851501}
17d2 010f       |    |		Execute	Exception,Equal
17d3 6802       |h   |		Jump_Zero	0x17d6
17d4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x31.0x4b = 0x17d4,0x31
17d5 0101       |    |		Execute	Exception,Reraise
17d6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x31.0x4c = 0x17d6,0x32
17d7 e009       |    |		Load	0x0,0x9
17d8 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
17d9 0092 2517  |  % |		Action	Push_String_Extended,0x2517					; "Change_State"
17db 8222       | "  |		Call	0x1,0x22
17dc 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
17dd 0000 0000  |    |		.XXX[0x3]
17df 0000       |    |
17e0 ; --------------------------------------------------------------------------------------
17e0 ; SUBPROGRAM
17e0 ; --------------------------------------------------------------------------------------
17e0 17fa       |    |		.CONST	0x17fa								; Address of begin
17e1 187c       | |  |		.CONST	0x187c								; Address of exception handler
17e2 0009       |    |		.CONST	0x0009								; Number of locals
17e3			INIT_17e0:
17e3 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x32 = .DEBUG	0x17e3,0x36d8,0x0001,0x0000,0x005a,0x8695,0x0000,0x1d47
													; Debug Table 0x32.0x0 = 0x17e3,0xffff
17e4 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x32.0x1 = 0x17e4,0xfffe
17e5 e002       |    |		Load	0x0,0x2								; Debug Table 0x32.0x2 = 0x17e5,0xfffd
17e6 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
17e7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
17e8 02c7       |    |		Declare_Variable	Any
17e9 00d8       |    |		Load_Top	At_Offset_0
17ea 1c00       |    |		Execute_Immediate	Run_Utility,0x0
17eb e002       |    |		Load	0x0,0x2								; Debug Table 0x32.0x3 = 0x17eb,0xfffc
17ec 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
17ed 02c7       |    |		Declare_Variable	Any
17ee 00d8       |    |		Load_Top	At_Offset_0
17ef 1c00       |    |		Execute_Immediate	Run_Utility,0x0
17f0 e002       |    |		Load	0x0,0x2								; Debug Table 0x32.0x4 = 0x17f0,0xfffb
17f1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
17f2 e002       |    |		Load	0x0,0x2								; Debug Table 0x32.0x5 = 0x17f2,0xfffa
17f3 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
17f4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
17f5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x32.0x6 = 0x17f5,0xfff9
17f6 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
17f7 0007       |    |		Action	Break_Optional
17f8 029f 2473  |  $s|		Declare_Subprogram	INIT_2470,For_Call				; Debug Table 0x32.0x7 = 0x17f8,0xfff8
17fa			BODY_17e0:
17fa 4801       |H   |		Short_Literal	0x1							; Debug Table 0x32.0x8 = 0x17fa,0x1
17fb a5fd       |    |		Store_Unchecked	0x2,-0x3
17fc 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x32.0x9 = 0x17fc,0x2
17fd e00c       |    |		Load	0x0,0xc
17fe 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
17ff 6803       |h   |		Jump_Zero	0x1803
1800 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x32.0xa = 0x1800,0x3
1801 a403       |    |		Store_Unchecked	0x2,0x3
1802 7814       |x   |		Jump	0x1817
1803 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x32.0xb = 0x1803,0x4
1804 e00f       |    |		Load	0x0,0xf
1805 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1806 680f       |h   |		Jump_Zero	0x1816
1807 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x32.0xc = 0x1807,0x5
1808 4974       |It  |		Short_Literal	0x174
1809 00eb       |    |		Load_Encached	Diana_Cache
180a 0098       |    |		Execute	Package,Field_Read_Dynamic
180b 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
180c a403       |    |		Store_Unchecked	0x2,0x3
180d e403       |    |		Load	0x2,0x3								; Debug Table 0x32.0xd = 0x180d,0x6
180e 4976       |Iv  |		Short_Literal	0x176
180f 00eb       |    |		Load_Encached	Diana_Cache
1810 0098       |    |		Execute	Package,Field_Read_Dynamic
1811 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1812 00da       |    |		Load_Top	At_Offset_2
1813 021f       |    |		Execute	Heap_Access,Equal
1814 7002       |p   |		Jump_Nonzero	0x1817
1815 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x32.0xe = 0x1815,0x7
1816 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x32.0xf = 0x1816,0x8
1817 0007       |    |		Action	Break_Optional							; Debug Table 0x32.0x10 = 0x1817,0x9
1818 e403       |    |		Load	0x2,0x3								; Debug Table 0x32.0x11 = 0x1818,0x401
1819 0007       |    |		Action	Break_Optional
181a 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x32.0x12 = 0x181a,0x402
181b 0007       |    |		Action	Break_Optional							; Debug Table 0x32.0x13 = 0x181b,0x403
181c 0007       |    |		Action	Break_Optional							; Debug Table 0x32.0x14 = 0x181c,0x404
181d 0fab       |    |		Execute_Immediate	Equal,-0x55					; Debug Table 0x32.0x15 = 0x181d,0x9
181e 6816       |h   |		Jump_Zero	0x1835
181f e002       |    |		Load	0x0,0x2								; Debug Table 0x32.0x16 = 0x181f,0xa
1820 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1821 e002       |    |		Load	0x0,0x2
1822 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
1823 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1824 669b       |f   |		Indirect_Literal	Discrete,0x16c0,{0x00000000, 0x00004000}
1825 e004       |    |		Load	0x0,0x4
1826 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1827 e403       |    |		Load	0x2,0x3
1828 e002       |    |		Load	0x0,0x2
1829 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
182a 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
182b c407       |    |		Store	0x2,0x7
182c c406       |    |		Store	0x2,0x6
182d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x32.0x17 = 0x182d,0xb
182e 0092 24fb  |  $ |		Action	Push_String_Extended,0x24fb					; "Decl_Ops.Get_Unit_State (3)"
1830 820f       |    |		Call	0x1,0xf
1831 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x32.0x18 = 0x1831,0xc
1832 0f02       |    |		Execute_Immediate	Equal,0x2
1833 7007       |p   |		Jump_Nonzero	0x183b
1834 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x32.0x19 = 0x1834,0xd
1835 e403       |    |		Load	0x2,0x3								; Debug Table 0x32.0x1a = 0x1835,0xe
1836 e002       |    |		Load	0x0,0x2
1837 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
1838 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
1839 7001       |p   |		Jump_Nonzero	0x183b
183a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x32.0x1b = 0x183a,0xf
183b e002       |    |		Load	0x0,0x2								; Debug Table 0x32.0x1c = 0x183b,0x10
183c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
183d e404       |    |		Load	0x2,0x4
183e 0120       |    |		Execute	Any,Is_Value
183f 6804       |h   |		Jump_Zero	0x1844
1840 e002       |    |		Load	0x0,0x2
1841 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1842 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1843 7801       |x   |		Jump	0x1845
1844 e404       |    |		Load	0x2,0x4
1845 e403       |    |		Load	0x2,0x3
1846 e002       |    |		Load	0x0,0x2
1847 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1848 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
1849 c404       |    |		Store	0x2,0x4
184a c406       |    |		Store	0x2,0x6
184b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x32.0x1d = 0x184b,0x11
184c 0092 24bf  |  $ |		Action	Push_String_Extended,0x24bf					; "Ada.Get_Unit"
184e 820f       |    |		Call	0x1,0xf
184f e404       |    |		Load	0x2,0x4								; Debug Table 0x32.0x1e = 0x184f,0x12
1850 e002       |    |		Load	0x0,0x2
1851 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1852 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1853 c405       |    |		Store	0x2,0x5
1854 e405       |    |		Load	0x2,0x5								; Debug Table 0x32.0x1f = 0x1854,0x13
1855 e001       |    |		Load	0x0,0x1
1856 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
1857 6804       |h   |		Jump_Zero	0x185c
1858 8409       |    |		Call	0x2,0x9								; Debug Table 0x32.0x20 = 0x1858,0x14
1859 4800       |H   |		Short_Literal	0x0							; Debug Table 0x32.0x21 = 0x1859,0x15
185a a5fd       |    |		Store_Unchecked	0x2,-0x3
185b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x32.0x22 = 0x185b,0x16
185c e405       |    |		Load	0x2,0x5								; Debug Table 0x32.0x23 = 0x185c,0x17
185d 8226       | &  |		Call	0x1,0x26
185e 6807       |h   |		Jump_Zero	0x1866
185f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x32.0x24 = 0x185f,0x18
1860 a5fd       |    |		Store_Unchecked	0x2,-0x3
1861 0092 2513  |  % |		Action	Push_String_Extended,0x2513					; "Edit failed - object is not checked out"
													; Debug Table 0x32.0x25 = 0x1861,0x19
1863 e00a       |    |		Load	0x0,0xa
1864 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1865 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x32.0x26 = 0x1865,0x1a
1866 e011       |    |		Load	0x0,0x11							; Debug Table 0x32.0x27 = 0x1866,0x1b
1867 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
1868 e405       |    |		Load	0x2,0x5
1869 e017       |    |		Load	0x0,0x17
186a 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
186b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x32.0x28 = 0x186b,0x1c
186c e405       |    |		Load	0x2,0x5
186d 8227       | '  |		Call	0x1,0x27
186e c402       |    |		Store	0x2,0x2
186f e402       |    |		Load	0x2,0x2								; Debug Table 0x32.0x29 = 0x186f,0x1d
1870 e405       |    |		Load	0x2,0x5
1871 e001       |    |		Load	0x0,0x1
1872 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
1873 e402       |    |		Load	0x2,0x2								; Debug Table 0x32.0x2a = 0x1873,0x1e
1874 7003       |p   |		Jump_Nonzero	0x1878
1875 4800       |H   |		Short_Literal	0x0							; Debug Table 0x32.0x2b = 0x1875,0x1f
1876 a5fd       |    |		Store_Unchecked	0x2,-0x3
1877 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x32.0x2c = 0x1877,0x20
1878 8409       |    |		Call	0x2,0x9								; Debug Table 0x32.0x2d = 0x1878,0x21
1879 4800       |H   |		Short_Literal	0x0							; Debug Table 0x32.0x2e = 0x1879,0x22
187a a5fd       |    |		Store_Unchecked	0x2,-0x3
187b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
187c			TRAP_17e0:
187c 6647       |fG  |		Indirect_Literal	Discrete,0x16c4,{0x00000000, 0x5a851501}
187d 010f       |    |		Execute	Exception,Equal
187e 6802       |h   |		Jump_Zero	0x1881
187f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x32.0x2f = 0x187f,0x23
1880 0101       |    |		Execute	Exception,Reraise
1881 4801       |H   |		Short_Literal	0x1							; Debug Table 0x32.0x30 = 0x1881,0x24
1882 e009       |    |		Load	0x0,0x9
1883 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1884 0092 2518  |  % |		Action	Push_String_Extended,0x2518					; "Attempt_Fast_Edit"
1886 8222       | "  |		Call	0x1,0x22
1887 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
1888 ; --------------------------------------------------------------------------------------
1888 ; SUBPROGRAM
1888 ; --------------------------------------------------------------------------------------
1888 188b       |    |		.CONST	0x188b								; Address of begin
1889 0004       |    |		.CONST	0x0004								; Address of exception handler
188a 0001       |    |		.CONST	0x0001								; Number of locals
188b			BODY_1888:
188b			INIT_1888:
188b 4603       |F   |		Jump_Case	0x4							; Debug Table 0x33 = .DEBUG	0x188b,0x373c,0x0005,0x0000,0x005a,0x86a5,0x0000,0x001e
188c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
188d 7802       |x   |		Jump	0x1890								; case 0x1
188e 7805       |x   |		Jump	0x1894								; case 0x2
188f 7809       |x   |		Jump	0x1899								; case 0x3
1890 00da       |    |		Load_Top	At_Offset_2
1891 0091 24b6  |  $ |		Action	Push_String_Extended_Indexed,0x24b6				; "IN_SOURCE"
1893 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
1894 00db       |    |		Load_Top	At_Offset_3
1895 00db       |    |		Load_Top	At_Offset_3
1896 00e0       |    |		Load_Encached	Standard_Cache
1897 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
1898 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
1899 00da       |    |		Load_Top	At_Offset_2
189a 00e0       |    |		Load_Encached	Standard_Cache
189b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
189c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
189d 0000 0000  |    |		.XXX[0x3]
189f 0000       |    |
18a0 ; --------------------------------------------------------------------------------------
18a0 ; SUBPROGRAM
18a0 ; --------------------------------------------------------------------------------------
18a0 18a3       |    |		.CONST	0x18a3								; Address of begin
18a1 0004       |    |		.CONST	0x0004								; Address of exception handler
18a2 0001       |    |		.CONST	0x0001								; Number of locals
18a3			BODY_18a0:
18a3			INIT_18a0:
18a3 4608       |F   |		Jump_Case	0x9							; Debug Table 0x34 = .DEBUG	0x18a3,0x373e,0x0005,0x0000,0x005a,0x86a5,0x0000,0x0025
18a4 7808       |x   |		Jump	0x18ad								; case 0x0
18a5 7848       |xH  |		Jump	0x18ee								; case 0x1
18a6 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
18a7 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
18a8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
18a9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
18aa 784b       |xK  |		Jump	0x18f6								; case 0x6
18ab 7852       |xR  |		Jump	0x18fe								; case 0x7
18ac 786a       |xj  |		Jump	0x1917								; case 0x8
18ad 00da       |    |		Load_Top	At_Offset_2
18ae 016c       | l  |		Execute	Variant_Record,Is_Constrained
18af 700a       |p   |		Jump_Nonzero	0x18ba
18b0 00cf       |    |		Action	Mark_Auxiliary
18b1 4800       |H   |		Short_Literal	0x0
18b2 4800       |H   |		Short_Literal	0x0
18b3 e5ff       |    |		Load	0x2,-0x1
18b4 1c08       |    |		Execute_Immediate	Run_Utility,0x8
18b5 00d8       |    |		Load_Top	At_Offset_0
18b6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
18b7 c5ff       |    |		Store	0x2,-0x1
18b8 00ce       |    |		Action	Pop_Auxiliary
18b9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
18ba 00da       |    |		Load_Top	At_Offset_2
18bb 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
18bc 4601       |F   |		Jump_Case	0x2
18bd 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
18be 7800       |x   |		Jump	0x18bf								; case 0x1
18bf 00da       |    |		Load_Top	At_Offset_2
18c0 2203       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x3
18c1 00da       |    |		Load_Top	At_Offset_2
18c2 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
18c3 00d8       |    |		Load_Top	At_Offset_0
18c4 2202       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x2
18c5 00d8       |    |		Load_Top	At_Offset_0
18c6 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
18c7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
18c8 00db       |    |		Load_Top	At_Offset_3
18c9 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
18ca 4602       |F   |		Jump_Case	0x3
18cb 7802       |x   |		Jump	0x18ce								; case 0x0
18cc 780a       |x   |		Jump	0x18d7								; case 0x1
18cd 7809       |x   |		Jump	0x18d7								; case 0x2
18ce 00d8       |    |		Load_Top	At_Offset_0
18cf 2203       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x3
18d0 00d8       |    |		Load_Top	At_Offset_0
18d1 2603       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
18d2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
18d3 00d8       |    |		Load_Top	At_Offset_0
18d4 2604       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
18d5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
18d6 7814       |x   |		Jump	0x18eb
18d7 00d8       |    |		Load_Top	At_Offset_0
18d8 2207       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x7
18d9 00d8       |    |		Load_Top	At_Offset_0
18da 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
18db 1c00       |    |		Execute_Immediate	Run_Utility,0x0
18dc 00d8       |    |		Load_Top	At_Offset_0
18dd 2209       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x9
18de 00d8       |    |		Load_Top	At_Offset_0
18df 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
18e0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
18e1 00d8       |    |		Load_Top	At_Offset_0
18e2 220a       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xa
18e3 00d8       |    |		Load_Top	At_Offset_0
18e4 260a       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xa
18e5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
18e6 00d8       |    |		Load_Top	At_Offset_0
18e7 220b       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xb
18e8 00d8       |    |		Load_Top	At_Offset_0
18e9 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
18ea 1c00       |    |		Execute_Immediate	Run_Utility,0x0
18eb 00db       |    |		Load_Top	At_Offset_3
18ec 2b03       |+   |		Execute	Variant_Record,Field_Write,Variant,Indirect,Field_Number 0x3
18ed 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
18ee 00da       |    |		Load_Top	At_Offset_2
18ef 016b       | k  |		Execute	Variant_Record,Read_Variant
18f0 00d8       |    |		Load_Top	At_Offset_0
18f1 0f01       |    |		Execute_Immediate	Equal,0x1
18f2 6802       |h   |		Jump_Zero	0x18f5
18f3 00db       |    |		Load_Top	At_Offset_3
18f4 2203       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x3
18f5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
18f6 e5fd       |    |		Load	0x2,-0x3
18f7 4601       |F   |		Jump_Case	0x2
18f8 7803       |x   |		Jump	0x18fc								; case 0x0
18f9 7800       |x   |		Jump	0x18fa								; case 0x1
18fa 4801       |H   |		Short_Literal	0x1
18fb 4203       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x3
18fc 48ff       |H   |		Short_Literal	0xff
18fd 4203       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x3
18fe e5fd       |    |		Load	0x2,-0x3
18ff e5fe       |    |		Load	0x2,-0x2
1900 e5fd       |    |		Load	0x2,-0x3
1901 4601       |F   |		Jump_Case	0x2
1902 780f       |x   |		Jump	0x1912								; case 0x0
1903 7800       |x   |		Jump	0x1904								; case 0x1
1904 e5fe       |    |		Load	0x2,-0x2
1905 4602       |F   |		Jump_Case	0x3
1906 7802       |x   |		Jump	0x1909								; case 0x0
1907 7803       |x   |		Jump	0x190b								; case 0x1
1908 7802       |x   |		Jump	0x190b								; case 0x2
1909 4801       |H   |		Short_Literal	0x1
190a 7801       |x   |		Jump	0x190c
190b 4802       |H   |		Short_Literal	0x2
190c e241       | A  |		Load	0x1,0x41
190d 2303       |#   |		Execute	Variant_Record,Field_Type,Field_Number 0x3
190e 031b       |    |		Declare_Type	Variant_Record,Constrained
190f 4801       |H   |		Short_Literal	0x1
1910 4801       |H   |		Short_Literal	0x1
1911 7802       |x   |		Jump	0x1914
1912 4800       |H   |		Short_Literal	0x0
1913 48ff       |H   |		Short_Literal	0xff
1914 e5ff       |    |		Load	0x2,-0x1
1915 031b       |    |		Declare_Type	Variant_Record,Constrained
1916 4203       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x3
1917 e5fd       |    |		Load	0x2,-0x3
1918 e5fe       |    |		Load	0x2,-0x2
1919 e5fd       |    |		Load	0x2,-0x3
191a e5fe       |    |		Load	0x2,-0x2
191b e5ff       |    |		Load	0x2,-0x1
191c 1c06       |    |		Execute_Immediate	Run_Utility,0x6
191d e5ff       |    |		Load	0x2,-0x1
191e 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
191f e5fd       |    |		Load	0x2,-0x3
1920 4601       |F   |		Jump_Case	0x2
1921 7812       |x   |		Jump	0x1934								; case 0x0
1922 7800       |x   |		Jump	0x1923								; case 0x1
1923 e5fe       |    |		Load	0x2,-0x2
1924 4602       |F   |		Jump_Case	0x3
1925 7802       |x   |		Jump	0x1928								; case 0x0
1926 7803       |x   |		Jump	0x192a								; case 0x1
1927 7802       |x   |		Jump	0x192a								; case 0x2
1928 4801       |H   |		Short_Literal	0x1
1929 7801       |x   |		Jump	0x192b
192a 4802       |H   |		Short_Literal	0x2
192b e241       | A  |		Load	0x1,0x41
192c 2303       |#   |		Execute	Variant_Record,Field_Type,Field_Number 0x3
192d 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
192e e5fe       |    |		Load	0x2,-0x2
192f 4602       |F   |		Jump_Case	0x3
1930 7802       |x   |		Jump	0x1933								; case 0x0
1931 7801       |x   |		Jump	0x1933								; case 0x1
1932 7800       |x   |		Jump	0x1933								; case 0x2
1933 2f03       |/   |		Execute	Variant_Record,Field_Append,Variant,Indirect,Field_Number 0x3
1934 016a       | j  |		QQ_execute	Variant_Record,XXX
1935 4203       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x3
1936 0000 0000  |    |		.XXX[0x2]
1938 ; --------------------------------------------------------------------------------------
1938 ; SUBPROGRAM
1938 ; --------------------------------------------------------------------------------------
1938 193b       | ;  |		.CONST	0x193b								; Address of begin
1939 0004       |    |		.CONST	0x0004								; Address of exception handler
193a 0001       |    |		.CONST	0x0001								; Number of locals
193b			BODY_1938:
193b			INIT_1938:
193b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x35 = .DEBUG	0x193b,0x3740,0x0001,0x0000,0x005a,0x86a5,0x0000,0x00a7
													; Debug Table 0x35.0x0 = 0x193b,0x1
193c 6803       |h   |		Jump_Zero	0x1940
193d 00a2 1d3c  |   <|		Action	Push_Discrete_Extended						; Debug Table 0x35.0x1 = 0x193d,0x2
193f 0257       | W  |		Execute	Discrete,Raise
1940 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1941 0000 0000  |    |		.BLANK	0000[0x7]
1948 ; --------------------------------------------------------------------------------------
1948 ; SUBPROGRAM
1948 ; --------------------------------------------------------------------------------------
1948 194b       | K  |		.CONST	0x194b								; Address of begin
1949 0004       |    |		.CONST	0x0004								; Address of exception handler
194a 0001       |    |		.CONST	0x0001								; Number of locals
194b			BODY_1948:
194b			INIT_1948:
194b e002       |    |		Load	0x0,0x2								; Debug Table 0x36 = .DEBUG	0x194b,0x3746,0x0001,0x0000,0x005a,0x86a5,0x0000,0x00bd
													; Debug Table 0x36.0x0 = 0x194b,0x1
194c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
194d 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
194e c5fe       |    |		Store	0x2,-0x2
194f e013       |    |		Load	0x0,0x13							; Debug Table 0x36.0x1 = 0x194f,0x2
1950 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
1951 4800       |H   |		Short_Literal	0x0
1952 e5ff       |    |		Load	0x2,-0x1
1953 e014       |    |		Load	0x0,0x14
1954 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
1955 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1956 e014       |    |		Load	0x0,0x14
1957 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
1958 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
1959 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
195a 0000 0000  |    |		.BLANK	0000[0x6]
1960 ; --------------------------------------------------------------------------------------
1960 ; SUBPROGRAM
1960 ; --------------------------------------------------------------------------------------
1960 1970       | p  |		.CONST	0x1970								; Address of begin
1961 19f0       |    |		.CONST	0x19f0								; Address of exception handler
1962 0009       |    |		.CONST	0x0009								; Number of locals
1963			INIT_1960:
1963 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x37 = .DEBUG	0x1963,0x374c,0x0001,0x0000,0x005a,0x86a5,0x0000,0x00e9
													; Debug Table 0x37.0x0 = 0x1963,0xffff
1964 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x37.0x1 = 0x1964,0xfffe
1965 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x37.0x2 = 0x1965,0xfffd
1966 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x37.0x3 = 0x1966,0xfffc
1967 e00e       |    |		Load	0x0,0xe								; Debug Table 0x37.0x4 = 0x1967,0xfffb
1968 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1969 02c7       |    |		Declare_Variable	Any
196a 00d8       |    |		Load_Top	At_Offset_0
196b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
196c 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x37.0x5 = 0x196c,0xfffa
196d 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x37.0x6 = 0x196d,0xfff9
196e e002       |    |		Load	0x0,0x2								; Debug Table 0x37.0x7 = 0x196e,0xfff8
196f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1970			BODY_1960:
1970 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x37.0x8 = 0x1970,0x1
1971 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1972 4602       |F   |		Jump_Case	0x3
1973 7802       |x   |		Jump	0x1976								; case 0x0
1974 7806       |x   |		Jump	0x197b								; case 0x1
1975 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x2
1976 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x37.0x9 = 0x1976,0x2
1977 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1978 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
1979 a403       |    |		Store_Unchecked	0x2,0x3
197a 7807       |x   |		Jump	0x1982
197b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x37.0xa = 0x197b,0x3
197c 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
197d 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
197e 00eb       |    |		Load_Encached	Diana_Cache
197f 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
1980 a403       |    |		Store_Unchecked	0x2,0x3
1981 7800       |x   |		Jump	0x1982
1982 0007       |    |		Action	Break_Optional							; Debug Table 0x37.0xb = 0x1982,0x5
1983 e403       |    |		Load	0x2,0x3								; Debug Table 0x37.0xc = 0x1983,0x401
1984 0007       |    |		Action	Break_Optional
1985 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x37.0xd = 0x1985,0x402
1986 0007       |    |		Action	Break_Optional							; Debug Table 0x37.0xe = 0x1986,0x403
1987 0007       |    |		Action	Break_Optional							; Debug Table 0x37.0xf = 0x1987,0x404
1988 0b89       |    |		Execute_Immediate	Case_Compare,0x89				; Debug Table 0x37.0x10 = 0x1988,0x5
1989 7001       |p   |		Jump_Nonzero	0x198b
198a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x37.0x11 = 0x198a,0x7
198b 00d1       |    |		Pop_Control	Pop_Count_1
198c e403       |    |		Load	0x2,0x3								; Debug Table 0x37.0x12 = 0x198c,0x8
198d 00eb       |    |		Load_Encached	Diana_Cache
198e 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
198f a405       |    |		Store_Unchecked	0x2,0x5
1990 0007       |    |		Action	Break_Optional							; Debug Table 0x37.0x13 = 0x1990,0x9
1991 e405       |    |		Load	0x2,0x5								; Debug Table 0x37.0x14 = 0x1991,0x801
1992 0007       |    |		Action	Break_Optional
1993 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x37.0x15 = 0x1993,0x802
1994 0007       |    |		Action	Break_Optional							; Debug Table 0x37.0x16 = 0x1994,0x803
1995 0007       |    |		Action	Break_Optional							; Debug Table 0x37.0x17 = 0x1995,0x804
1996 0b4e       | N  |		Execute_Immediate	Case_Compare,0x4e				; Debug Table 0x37.0x18 = 0x1996,0x9
1997 7001       |p   |		Jump_Nonzero	0x1999
1998 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x37.0x19 = 0x1998,0xb
1999 00d1       |    |		Pop_Control	Pop_Count_1
199a e405       |    |		Load	0x2,0x5								; Debug Table 0x37.0x1a = 0x199a,0xc
199b 00eb       |    |		Load_Encached	Diana_Cache
199c 18e1       |    |		Execute	Package,Field_Execute,Field_Number 0xe1
199d a402       |    |		Store_Unchecked	0x2,0x2
199e e402       |    |		Load	0x2,0x2								; Debug Table 0x37.0x1b = 0x199e,0xd
199f 00eb       |    |		Load_Encached	Diana_Cache
19a0 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
19a1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x37.0x1c = 0x19a1,0xc01
19a2 021d       |    |		Execute	Heap_Access,Is_Null
19a3 00d0       |    |		Action	Swap_Control
19a4 00d1       |    |		Pop_Control	Pop_Count_1
19a5 7001       |p   |		Jump_Nonzero	0x19a7							; Debug Table 0x37.0x1d = 0x19a5,0xd
19a6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x37.0x1e = 0x19a6,0xe
19a7 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x37.0x1f = 0x19a7,0xf
19a8 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
19a9 4602       |F   |		Jump_Case	0x3
19aa 7802       |x   |		Jump	0x19ad								; case 0x0
19ab 780d       |x   |		Jump	0x19b9								; case 0x1
19ac 7841       |xA  |		Jump	0x19ee								; case 0x2
19ad 4800       |H   |		Short_Literal	0x0							; Debug Table 0x37.0x20 = 0x19ad,0x10
19ae 00ea       |    |		Load_Encached	Null_String_Cache
19af e019       |    |		Load	0x0,0x19
19b0 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
19b1 e402       |    |		Load	0x2,0x2
19b2 e5ff       |    |		Load	0x2,-0x1
19b3 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
19b4 2604       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
19b5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
19b6 e005       |    |		Load	0x0,0x5
19b7 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
19b8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
19b9 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x37.0x21 = 0x19b9,0x11
19ba e002       |    |		Load	0x0,0x2
19bb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
19bc 00f1       |    |		Load_Encached	Diana_Temp_Seq
19bd e002       |    |		Load	0x0,0x2
19be 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
19bf 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
19c0 e406       |    |		Load	0x2,0x6
19c1 0120       |    |		Execute	Any,Is_Value
19c2 6803       |h   |		Jump_Zero	0x19c6
19c3 e00e       |    |		Load	0x0,0xe
19c4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
19c5 7801       |x   |		Jump	0x19c7
19c6 e406       |    |		Load	0x2,0x6
19c7 6370       |cp  |		Indirect_Literal	Discrete,0x1d38,{0x00000000, 0x00004000}
19c8 e5ff       |    |		Load	0x2,-0x1
19c9 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
19ca 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
19cb 4800       |H   |		Short_Literal	0x0
19cc e002       |    |		Load	0x0,0x2
19cd 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
19ce 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
19cf e002       |    |		Load	0x0,0x2
19d0 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
19d1 4800       |H   |		Short_Literal	0x0
19d2 e402       |    |		Load	0x2,0x2
19d3 e002       |    |		Load	0x0,0x2
19d4 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
19d5 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
19d6 c406       |    |		Store	0x2,0x6
19d7 c407       |    |		Store	0x2,0x7
19d8 c408       |    |		Store	0x2,0x8
19d9 005a       | Z  |		Store_Top	Discrete,At_Offset_2
19da c404       |    |		Store	0x2,0x4
19db 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x37.0x22 = 0x19db,0x12
19dc 0b00       |    |		Execute_Immediate	Case_Compare,0x0
19dd 700e       |p   |		Jump_Nonzero	0x19ec
19de 0b04       |    |		Execute_Immediate	Case_Compare,0x4
19df 7005       |p   |		Jump_Nonzero	0x19e5
19e0 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x37.0x23 = 0x19e0,0x16
19e1 0092 2519  |  % |		Action	Push_String_Extended,0x2519					; "Decl_Ops.Open_Insertion_Point"
19e3 820f       |    |		Call	0x1,0xf
19e4 7807       |x   |		Jump	0x19ec
19e5 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x37.0x24 = 0x19e5,0x14
19e6 e407       |    |		Load	0x2,0x7
19e7 0092 251a  |  % |		Action	Push_String_Extended,0x251a					; "Units that are obsolesced by opening insertion point"
19e9 e015       |    |		Load	0x0,0x15
19ea 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
19eb 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x37.0x25 = 0x19eb,0x15
19ec 00d1       |    |		Pop_Control	Pop_Count_1
19ed 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
19ee 6345       |cE  |		Indirect_Literal	Discrete,0x1d34,{0x00000000, 0x5a851501}	; Debug Table 0x37.0x26 = 0x19ee,0x17
19ef 0257       | W  |		Execute	Discrete,Raise
19f0			TRAP_1960:
19f0 6343       |cC  |		Indirect_Literal	Discrete,0x1d34,{0x00000000, 0x5a851501}
19f1 010f       |    |		Execute	Exception,Equal
19f2 6802       |h   |		Jump_Zero	0x19f5
19f3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x37.0x27 = 0x19f3,0x18
19f4 0101       |    |		Execute	Exception,Reraise
19f5 4801       |H   |		Short_Literal	0x1							; Debug Table 0x37.0x28 = 0x19f5,0x19
19f6 e009       |    |		Load	0x0,0x9
19f7 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
19f8 0092 251b  |  % |		Action	Push_String_Extended,0x251b					; "Target.Insert_Needed_Stm_S"
19fa 8222       | "  |		Call	0x1,0x22
19fb 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
19fc 0000 0000  |    |		.BLANK	0000[0x4]
1a00 ; --------------------------------------------------------------------------------------
1a00 ; SUBPROGRAM
1a00 ; --------------------------------------------------------------------------------------
1a00 1a17       |    |		.CONST	0x1a17								; Address of begin
1a01 1a63       | c  |		.CONST	0x1a63								; Address of exception handler
1a02 0006       |    |		.CONST	0x0006								; Number of locals
1a03			INIT_1a00:
1a03 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x38 = .DEBUG	0x1a03,0x37a0,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0212
													; Debug Table 0x38.0x0 = 0x1a03,0xffff
1a04 e002       |    |		Load	0x0,0x2								; Debug Table 0x38.0x1 = 0x1a04,0xfffe
1a05 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1a06 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1a07 02c7       |    |		Declare_Variable	Any
1a08 00d8       |    |		Load_Top	At_Offset_0
1a09 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1a0a e002       |    |		Load	0x0,0x2								; Debug Table 0x38.0x2 = 0x1a0a,0xfffd
1a0b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1a0c 02c7       |    |		Declare_Variable	Any
1a0d 00d8       |    |		Load_Top	At_Offset_0
1a0e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1a0f e002       |    |		Load	0x0,0x2								; Debug Table 0x38.0x3 = 0x1a0f,0xfffc
1a10 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1a11 e002       |    |		Load	0x0,0x2								; Debug Table 0x38.0x4 = 0x1a11,0xfffb
1a12 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1a13 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
1a14 02c7       |    |		Declare_Variable	Any
1a15 00d8       |    |		Load_Top	At_Offset_0
1a16 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1a17			BODY_1a00:
1a17 e002       |    |		Load	0x0,0x2								; Debug Table 0x38.0x5 = 0x1a17,0x1
1a18 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1a19 e403       |    |		Load	0x2,0x3
1a1a 0120       |    |		Execute	Any,Is_Value
1a1b 6804       |h   |		Jump_Zero	0x1a20
1a1c e002       |    |		Load	0x0,0x2
1a1d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1a1e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1a1f 7801       |x   |		Jump	0x1a21
1a20 e403       |    |		Load	0x2,0x3
1a21 e5fe       |    |		Load	0x2,-0x2
1a22 e002       |    |		Load	0x0,0x2
1a23 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1a24 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
1a25 c403       |    |		Store	0x2,0x3
1a26 005a       | Z  |		Store_Top	Discrete,At_Offset_2
1a27 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x38.0x6 = 0x1a27,0x2
1a28 0092 24bf  |  $ |		Action	Push_String_Extended,0x24bf					; "Ada.Get_Unit"
1a2a 820f       |    |		Call	0x1,0xf
1a2b e002       |    |		Load	0x0,0x2								; Debug Table 0x38.0x7 = 0x1a2b,0x3
1a2c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1a2d 00d9       |    |		Load_Top	At_Offset_1
1a2e 0120       |    |		Execute	Any,Is_Value
1a2f 6804       |h   |		Jump_Zero	0x1a34
1a30 e002       |    |		Load	0x0,0x2
1a31 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1a32 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
1a33 7801       |x   |		Jump	0x1a35
1a34 00d9       |    |		Load_Top	At_Offset_1
1a35 e002       |    |		Load	0x0,0x2
1a36 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1a37 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
1a38 4800       |H   |		Short_Literal	0x0
1a39 4801       |H   |		Short_Literal	0x1
1a3a 4801       |H   |		Short_Literal	0x1
1a3b 4800       |H   |		Short_Literal	0x0
1a3c e5ff       |    |		Load	0x2,-0x1
1a3d 4801       |H   |		Short_Literal	0x1
1a3e e403       |    |		Load	0x2,0x3
1a3f e002       |    |		Load	0x0,0x2
1a40 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1a41 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
1a42 c402       |    |		Store	0x2,0x2
1a43 c406       |    |		Store	0x2,0x6
1a44 005a       | Z  |		Store_Top	Discrete,At_Offset_2
1a45 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x38.0x8 = 0x1a45,0x4
1a46 0092 24e4  |  $ |		Action	Push_String_Extended,0x24e4					; "Ada.Open"
1a48 820f       |    |		Call	0x1,0xf
1a49 e002       |    |		Load	0x0,0x2								; Debug Table 0x38.0x9 = 0x1a49,0x5
1a4a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1a4b e5fd       |    |		Load	0x2,-0x3
1a4c 0120       |    |		Execute	Any,Is_Value
1a4d 6803       |h   |		Jump_Zero	0x1a51
1a4e e006       |    |		Load	0x0,0x6
1a4f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1a50 7801       |x   |		Jump	0x1a52
1a51 e5fd       |    |		Load	0x2,-0x3
1a52 4800       |H   |		Short_Literal	0x0
1a53 e5ff       |    |		Load	0x2,-0x1
1a54 4801       |H   |		Short_Literal	0x1
1a55 e403       |    |		Load	0x2,0x3
1a56 e00c       |    |		Load	0x0,0xc
1a57 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1a58 c5fd       |    |		Store	0x2,-0x3
1a59 005a       | Z  |		Store_Top	Discrete,At_Offset_2
1a5a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x38.0xa = 0x1a5a,0x6
1a5b 0092 251c  |  % |		Action	Push_String_Extended,0x251c					; "Ada_Utilities.Open_Image"
1a5d 820f       |    |		Call	0x1,0xf
1a5e e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x38.0xb = 0x1a5e,0x7
1a5f e402       |    |		Load	0x2,0x2
1a60 8228       | (  |		Call	0x1,0x28
1a61 a5fe       |    |		Store_Unchecked	0x2,-0x2
1a62 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1a63			TRAP_1a00:
1a63 62d0       |b   |		Indirect_Literal	Discrete,0x1d34,{0x00000000, 0x5a851501}
1a64 010f       |    |		Execute	Exception,Equal
1a65 6802       |h   |		Jump_Zero	0x1a68
1a66 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x38.0xc = 0x1a66,0x8
1a67 0101       |    |		Execute	Exception,Reraise
1a68 4801       |H   |		Short_Literal	0x1							; Debug Table 0x38.0xd = 0x1a68,0x9
1a69 e009       |    |		Load	0x0,0x9
1a6a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1a6b 0092 251d  |  % |		Action	Push_String_Extended,0x251d					; "Target.Get_Tree_And_Image"
1a6d 8222       | "  |		Call	0x1,0x22
1a6e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1a6f 0000       |    |		.XXX[0x1]
1a70 ; --------------------------------------------------------------------------------------
1a70 ; SUBPROGRAM
1a70 ; --------------------------------------------------------------------------------------
1a70 1a81       |    |		.CONST	0x1a81								; Address of begin
1a71 0004       |    |		.CONST	0x0004								; Address of exception handler
1a72 0005       |    |		.CONST	0x0005								; Number of locals
1a73			INIT_1a70:
1a73 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x39 = .DEBUG	0x1a73,0x37be,0x0002,0x0000,0x005a,0x86a5,0x0000,0x02c1
													; Debug Table 0x39.0x0 = 0x1a73,0xffff
1a74 e002       |    |		Load	0x0,0x2								; Debug Table 0x39.0x1 = 0x1a74,0xfffe
1a75 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1a76 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1a77 02c7       |    |		Declare_Variable	Any
1a78 00d8       |    |		Load_Top	At_Offset_0
1a79 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1a7a e002       |    |		Load	0x0,0x2								; Debug Table 0x39.0x2 = 0x1a7a,0xfffd
1a7b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1a7c e006       |    |		Load	0x0,0x6								; Debug Table 0x39.0x3 = 0x1a7c,0xfffc
1a7d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1a7e 02c7       |    |		Declare_Variable	Any
1a7f 00d8       |    |		Load_Top	At_Offset_0
1a80 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1a81			BODY_1a70:
1a81 e002       |    |		Load	0x0,0x2								; Debug Table 0x39.0x4 = 0x1a81,0x1
1a82 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1a83 00db       |    |		Load_Top	At_Offset_3
1a84 0120       |    |		Execute	Any,Is_Value
1a85 6804       |h   |		Jump_Zero	0x1a8a
1a86 e002       |    |		Load	0x0,0x2
1a87 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1a88 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1a89 7801       |x   |		Jump	0x1a8b
1a8a 00db       |    |		Load_Top	At_Offset_3
1a8b e5ff       |    |		Load	0x2,-0x1
1a8c e002       |    |		Load	0x0,0x2
1a8d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1a8e 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
1a8f c403       |    |		Store	0x2,0x3
1a90 005a       | Z  |		Store_Top	Discrete,At_Offset_2
1a91 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x39.0x5 = 0x1a91,0x2
1a92 0092 24bf  |  $ |		Action	Push_String_Extended,0x24bf					; "Ada.Get_Unit"
1a94 820f       |    |		Call	0x1,0xf
1a95 e002       |    |		Load	0x0,0x2								; Debug Table 0x39.0x6 = 0x1a95,0x3
1a96 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1a97 00d9       |    |		Load_Top	At_Offset_1
1a98 0120       |    |		Execute	Any,Is_Value
1a99 6803       |h   |		Jump_Zero	0x1a9d
1a9a e006       |    |		Load	0x0,0x6
1a9b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1a9c 7801       |x   |		Jump	0x1a9e
1a9d 00d9       |    |		Load_Top	At_Offset_1
1a9e 4800       |H   |		Short_Literal	0x0
1a9f e5fe       |    |		Load	0x2,-0x2
1aa0 4801       |H   |		Short_Literal	0x1
1aa1 e403       |    |		Load	0x2,0x3
1aa2 e00c       |    |		Load	0x0,0xc
1aa3 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1aa4 c405       |    |		Store	0x2,0x5
1aa5 005a       | Z  |		Store_Top	Discrete,At_Offset_2
1aa6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x39.0x7 = 0x1aa6,0x4
1aa7 0092 251c  |  % |		Action	Push_String_Extended,0x251c					; "Ada_Utilities.Open_Image"
1aa9 820f       |    |		Call	0x1,0xf
1aaa 0007       |    |		Action	Break_Optional							; Debug Table 0x39.0x8 = 0x1aaa,0x5
1aab 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x39.0x9 = 0x1aab,0xfbff
1aac e5ff       |    |		Load	0x2,-0x1
1aad e01a       |    |		Load	0x0,0x1a
1aae 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
1aaf 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x39.0xa = 0x1aaf,0x401
1ab0 01dc       |    |		Execute	Vector,Last
1ab1 00d9       |    |		Load_Top	At_Offset_1
1ab2 01d7       |    |		Execute	Vector,Field_Read
1ab3 e01a       |    |		Load	0x0,0x1a
1ab4 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
1ab5 a402       |    |		Store_Unchecked	0x2,0x2
1ab6 00d1       |    |		Pop_Control	Pop_Count_1
1ab7 e002       |    |		Load	0x0,0x2								; Debug Table 0x39.0xb = 0x1ab7,0x6
1ab8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1ab9 00d9       |    |		Load_Top	At_Offset_1
1aba 4801       |H   |		Short_Literal	0x1
1abb e5fe       |    |		Load	0x2,-0x2
1abc e00c       |    |		Load	0x0,0xc
1abd 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
1abe c405       |    |		Store	0x2,0x5
1abf 005a       | Z  |		Store_Top	Discrete,At_Offset_2
1ac0 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x39.0xc = 0x1ac0,0x7
1ac1 0092 251e  |  % |		Action	Push_String_Extended,0x251e					; "Ada_Utilities.Close_Image"
1ac3 820f       |    |		Call	0x1,0xf
1ac4 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x39.0xd = 0x1ac4,0x8
1ac5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1ac6 0000 0000  |    |		.XXX[0x2]
1ac8 ; --------------------------------------------------------------------------------------
1ac8 ; SUBPROGRAM
1ac8 ; --------------------------------------------------------------------------------------
1ac8 1b20       |    |		.CONST	0x1b20								; Address of begin
1ac9 1d19       |    |		.CONST	0x1d19								; Address of exception handler
1aca 0017       |    |		.CONST	0x0017								; Number of locals
1acb			INIT_1ac8:
1acb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3a = .DEBUG	0x1acb,0x37dc,0x0001,0x0000,0x005a,0x86a5,0x0000,0x034c
													; Debug Table 0x3a.0x0 = 0x1acb,0xffff
1acc 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x3a.0x1 = 0x1acc,0xfffe
1acd e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0x2 = 0x1acd,0xfffd
1ace 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1acf 1b33       | 3  |		Execute	Package,Field_Read,Field_Number 0x33
1ad0 02c7       |    |		Declare_Variable	Any
1ad1 00d8       |    |		Load_Top	At_Offset_0
1ad2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1ad3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3a.0x3 = 0x1ad3,0xfffc
1ad4 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x3a.0x4 = 0x1ad4,0xfffb
1ad5 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x3a.0x5 = 0x1ad5,0xfffa
1ad6 e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0x6 = 0x1ad6,0xfff9
1ad7 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1ad8 02c7       |    |		Declare_Variable	Any
1ad9 00d8       |    |		Load_Top	At_Offset_0
1ada 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1adb e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0x7 = 0x1adb,0xfff8
1adc 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1add 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1ade 02c7       |    |		Declare_Variable	Any
1adf 00d8       |    |		Load_Top	At_Offset_0
1ae0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1ae1 e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0x8 = 0x1ae1,0xfff7
1ae2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1ae3 02c7       |    |		Declare_Variable	Any
1ae4 00d8       |    |		Load_Top	At_Offset_0
1ae5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1ae6 e00e       |    |		Load	0x0,0xe								; Debug Table 0x3a.0x9 = 0x1ae6,0xfff6
1ae7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1ae8 02c7       |    |		Declare_Variable	Any
1ae9 00d8       |    |		Load_Top	At_Offset_0
1aea 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1aeb e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0xa = 0x1aeb,0xfff5
1aec 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1aed 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
1aee 02ff       |    |		Declare_Variable	Variant_Record
1aef 00d8       |    |		Load_Top	At_Offset_0
1af0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1af1 e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0xb = 0x1af1,0xfff4
1af2 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1af3 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
1af4 02c7       |    |		Declare_Variable	Any
1af5 00d8       |    |		Load_Top	At_Offset_0
1af6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1af7 e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0xc = 0x1af7,0xfff3
1af8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1af9 e006       |    |		Load	0x0,0x6								; Debug Table 0x3a.0xd = 0x1af9,0xfff2
1afa 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1afb 02c7       |    |		Declare_Variable	Any
1afc 00d8       |    |		Load_Top	At_Offset_0
1afd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1afe 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3a.0xe = 0x1afe,0xfff1
1aff e004       |    |		Load	0x0,0x4								; Debug Table 0x3a.0xf = 0x1aff,0xfff0
1b00 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1b01 02c7       |    |		Declare_Variable	Any
1b02 e004       |    |		Load	0x0,0x4
1b03 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1b04 c411       |    |		Store	0x2,0x11
1b05 e006       |    |		Load	0x0,0x6								; Debug Table 0x3a.0x10 = 0x1b05,0xffef
1b06 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1b07 02c7       |    |		Declare_Variable	Any
1b08 00d8       |    |		Load_Top	At_Offset_0
1b09 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1b0a e005       |    |		Load	0x0,0x5								; Debug Table 0x3a.0x11 = 0x1b0a,0xffee
1b0b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1b0c 02c7       |    |		Declare_Variable	Any
1b0d 00d8       |    |		Load_Top	At_Offset_0
1b0e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1b0f e005       |    |		Load	0x0,0x5								; Debug Table 0x3a.0x12 = 0x1b0f,0xffed
1b10 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1b11 02c7       |    |		Declare_Variable	Any
1b12 00d8       |    |		Load_Top	At_Offset_0
1b13 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1b14 e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0x13 = 0x1b14,0xffec
1b15 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1b16 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1b17 02c7       |    |		Declare_Variable	Any
1b18 00d8       |    |		Load_Top	At_Offset_0
1b19 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1b1a e241       | A  |		Load	0x1,0x41							; Debug Table 0x3a.0x14 = 0x1b1a,0xffeb
1b1b 02ff       |    |		Declare_Variable	Variant_Record
1b1c 00d8       |    |		Load_Top	At_Offset_0
1b1d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1b1e e006       |    |		Load	0x0,0x6								; Debug Table 0x3a.0x15 = 0x1b1e,0xffea
1b1f 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
1b20			BODY_1ac8:
1b20 e242       | B  |		Load	0x1,0x42							; Debug Table 0x3a.0x16 = 0x1b20,0x1
1b21 e5fb       |    |		Load	0x2,-0x5
1b22 016d       | m  |		Execute	Variant_Record,Structure_Write
1b23 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3a.0x17 = 0x1b23,0x2
1b24 a5fa       |    |		Store_Unchecked	0x2,-0x6
1b25 e013       |    |		Load	0x0,0x13							; Debug Table 0x3a.0x18 = 0x1b25,0x3
1b26 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
1b27 e004       |    |		Load	0x0,0x4
1b28 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
1b29 c411       |    |		Store	0x2,0x11
1b2a e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x3a.0x19 = 0x1b2a,0x4
1b2b e00d       |    |		Load	0x0,0xd
1b2c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1b2d a403       |    |		Store_Unchecked	0x2,0x3
1b2e e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0x1a = 0x1b2e,0x5
1b2f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1b30 e409       |    |		Load	0x2,0x9
1b31 0120       |    |		Execute	Any,Is_Value
1b32 6804       |h   |		Jump_Zero	0x1b37
1b33 e002       |    |		Load	0x0,0x2
1b34 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1b35 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1b36 7801       |x   |		Jump	0x1b38
1b37 e409       |    |		Load	0x2,0x9
1b38 e5fc       |    |		Load	0x2,-0x4
1b39 e002       |    |		Load	0x0,0x2
1b3a 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1b3b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
1b3c c409       |    |		Store	0x2,0x9
1b3d c40e       |    |		Store	0x2,0xe
1b3e e40e       |    |		Load	0x2,0xe								; Debug Table 0x3a.0x1b = 0x1b3e,0x6
1b3f 0092 24bf  |  $ |		Action	Push_String_Extended,0x24bf					; "Ada.Get_Unit"
1b41 820f       |    |		Call	0x1,0xf
1b42 e409       |    |		Load	0x2,0x9								; Debug Table 0x3a.0x1c = 0x1b42,0x7
1b43 e002       |    |		Load	0x0,0x2
1b44 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1b45 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1b46 c40a       |    |		Store	0x2,0xa
1b47 e40a       |    |		Load	0x2,0xa								; Debug Table 0x3a.0x1d = 0x1b47,0x8
1b48 8226       | &  |		Call	0x1,0x26
1b49 6805       |h   |		Jump_Zero	0x1b4f
1b4a 0092 251f  |  % |		Action	Push_String_Extended,0x251f					; "Command failed - unit is not checked out"
													; Debug Table 0x3a.0x1e = 0x1b4a,0x9
1b4c e00a       |    |		Load	0x0,0xa
1b4d 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1b4e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x3a.0x1f = 0x1b4e,0xa
1b4f e011       |    |		Load	0x0,0x11							; Debug Table 0x3a.0x20 = 0x1b4f,0xb
1b50 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
1b51 e40a       |    |		Load	0x2,0xa
1b52 e017       |    |		Load	0x0,0x17
1b53 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
1b54 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3a.0x21 = 0x1b54,0xc
1b55 e002       |    |		Load	0x0,0x2
1b56 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1b57 00f1       |    |		Load_Encached	Diana_Temp_Seq
1b58 e002       |    |		Load	0x0,0x2
1b59 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1b5a 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
1b5b e40b       |    |		Load	0x2,0xb
1b5c 0120       |    |		Execute	Any,Is_Value
1b5d 6803       |h   |		Jump_Zero	0x1b61
1b5e e00e       |    |		Load	0x0,0xe
1b5f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1b60 7801       |x   |		Jump	0x1b62
1b61 e40b       |    |		Load	0x2,0xb
1b62 61d5       |a   |		Indirect_Literal	Discrete,0x1d38,{0x00000000, 0x00004000}
1b63 e411       |    |		Load	0x2,0x11
1b64 4800       |H   |		Short_Literal	0x0
1b65 e002       |    |		Load	0x0,0x2
1b66 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
1b67 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1b68 e002       |    |		Load	0x0,0x2
1b69 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
1b6a e5ff       |    |		Load	0x2,-0x1
1b6b e5fc       |    |		Load	0x2,-0x4
1b6c e002       |    |		Load	0x0,0x2
1b6d 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
1b6e 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
1b6f c40b       |    |		Store	0x2,0xb
1b70 c406       |    |		Store	0x2,0x6
1b71 c407       |    |		Store	0x2,0x7
1b72 c40e       |    |		Store	0x2,0xe
1b73 c405       |    |		Store	0x2,0x5
1b74 e40e       |    |		Load	0x2,0xe								; Debug Table 0x3a.0x22 = 0x1b74,0xd
1b75 0b00       |    |		Execute_Immediate	Case_Compare,0x0
1b76 700e       |p   |		Jump_Nonzero	0x1b85
1b77 0b04       |    |		Execute_Immediate	Case_Compare,0x4
1b78 7005       |p   |		Jump_Nonzero	0x1b7e
1b79 e40e       |    |		Load	0x2,0xe								; Debug Table 0x3a.0x23 = 0x1b79,0x11
1b7a 0092 2519  |  % |		Action	Push_String_Extended,0x2519					; "Decl_Ops.Open_Insertion_Point"
1b7c 820f       |    |		Call	0x1,0xf
1b7d 7807       |x   |		Jump	0x1b85
1b7e 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x3a.0x24 = 0x1b7e,0xf
1b7f e406       |    |		Load	0x2,0x6
1b80 0092 251a  |  % |		Action	Push_String_Extended,0x251a					; "Units that are obsolesced by opening insertion point"
1b82 e015       |    |		Load	0x0,0x15
1b83 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
1b84 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x3a.0x25 = 0x1b84,0x10
1b85 00d1       |    |		Pop_Control	Pop_Count_1
1b86 e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0x26 = 0x1b86,0x12
1b87 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1b88 e408       |    |		Load	0x2,0x8
1b89 0120       |    |		Execute	Any,Is_Value
1b8a 6803       |h   |		Jump_Zero	0x1b8e
1b8b e002       |    |		Load	0x0,0x2
1b8c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1b8d 7801       |x   |		Jump	0x1b8f
1b8e e408       |    |		Load	0x2,0x8
1b8f 61a8       |a   |		Indirect_Literal	Discrete,0x1d38,{0x00000000, 0x00004000}
1b90 e411       |    |		Load	0x2,0x11
1b91 4800       |H   |		Short_Literal	0x0
1b92 e002       |    |		Load	0x0,0x2
1b93 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
1b94 e405       |    |		Load	0x2,0x5
1b95 e002       |    |		Load	0x0,0x2
1b96 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
1b97 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
1b98 c408       |    |		Store	0x2,0x8
1b99 c40e       |    |		Store	0x2,0xe
1b9a e40e       |    |		Load	0x2,0xe								; Debug Table 0x3a.0x27 = 0x1b9a,0x13
1b9b 0092 24ca  |  $ |		Action	Push_String_Extended,0x24ca					; "Traversal.Get_Object"
1b9d 820f       |    |		Call	0x1,0xf
1b9e e403       |    |		Load	0x2,0x3								; Debug Table 0x3a.0x28 = 0x1b9e,0x14
1b9f 684d       |hM  |		Jump_Zero	0x1bed
1ba0 e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0x29 = 0x1ba0,0x15
1ba1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1ba2 00db       |    |		Load_Top	At_Offset_3
1ba3 0120       |    |		Execute	Any,Is_Value
1ba4 6804       |h   |		Jump_Zero	0x1ba9
1ba5 e002       |    |		Load	0x0,0x2
1ba6 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1ba7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1ba8 7801       |x   |		Jump	0x1baa
1ba9 00db       |    |		Load_Top	At_Offset_3
1baa e5fe       |    |		Load	0x2,-0x2
1bab e002       |    |		Load	0x0,0x2
1bac 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1bad 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
1bae c415       |    |		Store	0x2,0x15
1baf c40e       |    |		Store	0x2,0xe
1bb0 e40e       |    |		Load	0x2,0xe								; Debug Table 0x3a.0x2a = 0x1bb0,0x16
1bb1 0092 24d3  |  $ |		Action	Push_String_Extended,0x24d3					; "Ada.Get_Version"
1bb3 820f       |    |		Call	0x1,0xf
1bb4 e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0x2b = 0x1bb4,0x17
1bb5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1bb6 00f1       |    |		Load_Encached	Diana_Temp_Seq
1bb7 e002       |    |		Load	0x0,0x2
1bb8 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1bb9 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
1bba e40b       |    |		Load	0x2,0xb
1bbb 0120       |    |		Execute	Any,Is_Value
1bbc 6803       |h   |		Jump_Zero	0x1bc0
1bbd e00e       |    |		Load	0x0,0xe
1bbe 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1bbf 7801       |x   |		Jump	0x1bc1
1bc0 e40b       |    |		Load	0x2,0xb
1bc1 6176       |av  |		Indirect_Literal	Discrete,0x1d38,{0x00000000, 0x00004000}
1bc2 e411       |    |		Load	0x2,0x11
1bc3 4800       |H   |		Short_Literal	0x0
1bc4 e002       |    |		Load	0x0,0x2
1bc5 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
1bc6 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1bc7 e002       |    |		Load	0x0,0x2
1bc8 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
1bc9 4801       |H   |		Short_Literal	0x1
1bca 4ffc       |O   |		Short_Literal	-0x4
1bcb 4800       |H   |		Short_Literal	0x0
1bcc e408       |    |		Load	0x2,0x8
1bcd e415       |    |		Load	0x2,0x15
1bce e002       |    |		Load	0x0,0x2
1bcf 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1bd0 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1bd1 e002       |    |		Load	0x0,0x2
1bd2 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
1bd3 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1bd4 c40b       |    |		Store	0x2,0xb
1bd5 c406       |    |		Store	0x2,0x6
1bd6 c407       |    |		Store	0x2,0x7
1bd7 c40e       |    |		Store	0x2,0xe
1bd8 e40e       |    |		Load	0x2,0xe								; Debug Table 0x3a.0x2c = 0x1bd8,0x18
1bd9 0092 2520  |  % |		Action	Push_String_Extended,0x2520					; "Object_Ops.Copy"
1bdb 820f       |    |		Call	0x1,0xf
1bdc e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0x2d = 0x1bdc,0x19
1bdd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1bde e40c       |    |		Load	0x2,0xc
1bdf 6158       |aX  |		Indirect_Literal	Discrete,0x1d38,{0x00000000, 0x00004000}
1be0 e411       |    |		Load	0x2,0x11
1be1 4800       |H   |		Short_Literal	0x0
1be2 e408       |    |		Load	0x2,0x8
1be3 e002       |    |		Load	0x0,0x2
1be4 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
1be5 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
1be6 00d1       |    |		Pop_Control	Pop_Count_1
1be7 c40e       |    |		Store	0x2,0xe
1be8 e40e       |    |		Load	0x2,0xe								; Debug Table 0x3a.0x2e = 0x1be8,0x1a
1be9 0092 24c3  |  $ |		Action	Push_String_Extended,0x24c3					; "Traversal.Get_Version"
1beb 820f       |    |		Call	0x1,0xf
1bec 7825       |x%  |		Jump	0x1c12
1bed e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0x2f = 0x1bed,0x1b
1bee 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1bef 00f1       |    |		Load_Encached	Diana_Temp_Seq
1bf0 e002       |    |		Load	0x0,0x2
1bf1 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1bf2 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
1bf3 e40b       |    |		Load	0x2,0xb
1bf4 0120       |    |		Execute	Any,Is_Value
1bf5 6803       |h   |		Jump_Zero	0x1bf9
1bf6 e00e       |    |		Load	0x0,0xe
1bf7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1bf8 7801       |x   |		Jump	0x1bfa
1bf9 e40b       |    |		Load	0x2,0xb
1bfa e40c       |    |		Load	0x2,0xc
1bfb 613c       |a<  |		Indirect_Literal	Discrete,0x1d38,{0x00000000, 0x00004000}
1bfc e411       |    |		Load	0x2,0x11
1bfd 4800       |H   |		Short_Literal	0x0
1bfe e002       |    |		Load	0x0,0x2
1bff 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
1c00 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1c01 e002       |    |		Load	0x0,0x2
1c02 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
1c03 4ffc       |O   |		Short_Literal	-0x4
1c04 4ffd       |O   |		Short_Literal	-0x3
1c05 e408       |    |		Load	0x2,0x8
1c06 e002       |    |		Load	0x0,0x2
1c07 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
1c08 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1c09 00d1       |    |		Pop_Control	Pop_Count_1
1c0a c40b       |    |		Store	0x2,0xb
1c0b c406       |    |		Store	0x2,0x6
1c0c c407       |    |		Store	0x2,0x7
1c0d c40e       |    |		Store	0x2,0xe
1c0e e40e       |    |		Load	0x2,0xe								; Debug Table 0x3a.0x30 = 0x1c0e,0x1c
1c0f 0092 2511  |  % |		Action	Push_String_Extended,0x2511					; "Object_Ops.Create"
1c11 820f       |    |		Call	0x1,0xf
1c12 e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0x31 = 0x1c12,0x1d
1c13 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1c14 e40d       |    |		Load	0x2,0xd
1c15 0120       |    |		Execute	Any,Is_Value
1c16 6804       |h   |		Jump_Zero	0x1c1b
1c17 e002       |    |		Load	0x0,0x2
1c18 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1c19 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
1c1a 7801       |x   |		Jump	0x1c1c
1c1b e40d       |    |		Load	0x2,0xd
1c1c e002       |    |		Load	0x0,0x2
1c1d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1c1e 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
1c1f e40c       |    |		Load	0x2,0xc
1c20 4800       |H   |		Short_Literal	0x0
1c21 4800       |H   |		Short_Literal	0x0
1c22 4800       |H   |		Short_Literal	0x0
1c23 e411       |    |		Load	0x2,0x11
1c24 4802       |H   |		Short_Literal	0x2
1c25 e002       |    |		Load	0x0,0x2
1c26 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1c27 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
1c28 00d1       |    |		Pop_Control	Pop_Count_1
1c29 c402       |    |		Store	0x2,0x2
1c2a c40d       |    |		Store	0x2,0xd
1c2b c40e       |    |		Store	0x2,0xe
1c2c e40e       |    |		Load	0x2,0xe								; Debug Table 0x3a.0x32 = 0x1c2c,0x1e
1c2d 0092 24e4  |  $ |		Action	Push_String_Extended,0x24e4					; "Ada.Open"
1c2f 820f       |    |		Call	0x1,0xf
1c30 e002       |    |		Load	0x0,0x2								; Debug Table 0x3a.0x33 = 0x1c30,0x1f
1c31 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1c32 e40f       |    |		Load	0x2,0xf
1c33 0120       |    |		Execute	Any,Is_Value
1c34 6803       |h   |		Jump_Zero	0x1c38
1c35 e006       |    |		Load	0x0,0x6
1c36 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1c37 7801       |x   |		Jump	0x1c39
1c38 e40f       |    |		Load	0x2,0xf
1c39 4800       |H   |		Short_Literal	0x0
1c3a e411       |    |		Load	0x2,0x11
1c3b 4802       |H   |		Short_Literal	0x2
1c3c e408       |    |		Load	0x2,0x8
1c3d e002       |    |		Load	0x0,0x2
1c3e 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1c3f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1c40 e00c       |    |		Load	0x0,0xc
1c41 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1c42 c40f       |    |		Store	0x2,0xf
1c43 c40e       |    |		Store	0x2,0xe
1c44 e40e       |    |		Load	0x2,0xe								; Debug Table 0x3a.0x34 = 0x1c44,0x20
1c45 0092 251c  |  % |		Action	Push_String_Extended,0x251c					; "Ada_Utilities.Open_Image"
1c47 820f       |    |		Call	0x1,0xf
1c48 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3a.0x35 = 0x1c48,0x21
1c49 0120       |    |		Execute	Any,Is_Value
1c4a 6803       |h   |		Jump_Zero	0x1c4e
1c4b e005       |    |		Load	0x0,0x5
1c4c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1c4d 7801       |x   |		Jump	0x1c4f
1c4e 00db       |    |		Load_Top	At_Offset_3
1c4f e40f       |    |		Load	0x2,0xf
1c50 e011       |    |		Load	0x0,0x11
1c51 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1c52 e012       |    |		Load	0x0,0x12
1c53 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1c54 e01b       |    |		Load	0x0,0x1b
1c55 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
1c56 e005       |    |		Load	0x0,0x5
1c57 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
1c58 c414       |    |		Store	0x2,0x14
1c59 e404       |    |		Load	0x2,0x4								; Debug Table 0x3a.0x36 = 0x1c59,0x22
1c5a 0120       |    |		Execute	Any,Is_Value
1c5b 6804       |h   |		Jump_Zero	0x1c60
1c5c e002       |    |		Load	0x0,0x2
1c5d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1c5e 1b33       | 3  |		Execute	Package,Field_Read,Field_Number 0x33
1c5f 7801       |x   |		Jump	0x1c61
1c60 e404       |    |		Load	0x2,0x4
1c61 e402       |    |		Load	0x2,0x2
1c62 8244       | D  |		Call	0x1,0x44
1c63 c404       |    |		Store	0x2,0x4
1c64 0007       |    |		Action	Break_Optional							; Debug Table 0x3a.0x37 = 0x1c64,0x23
1c65 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3a.0x38 = 0x1c65,0x401
1c66 021d       |    |		Execute	Heap_Access,Is_Null
1c67 702c       |p,  |		Jump_Nonzero	0x1c94							; Debug Table 0x3a.0x39 = 0x1c67,0x23
1c68 e403       |    |		Load	0x2,0x3
1c69 702a       |p*  |		Jump_Nonzero	0x1c94
1c6a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3a.0x3a = 0x1c6a,0x24
1c6b a410       |    |		Store_Unchecked	0x2,0x10
1c6c e412       |    |		Load	0x2,0x12							; Debug Table 0x3a.0x3b = 0x1c6c,0x25
1c6d 0120       |    |		Execute	Any,Is_Value
1c6e 6803       |h   |		Jump_Zero	0x1c72
1c6f e006       |    |		Load	0x0,0x6
1c70 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1c71 7801       |x   |		Jump	0x1c73
1c72 e412       |    |		Load	0x2,0x12
1c73 e410       |    |		Load	0x2,0x10
1c74 e411       |    |		Load	0x2,0x11
1c75 8246       | F  |		Call	0x1,0x46
1c76 c410       |    |		Store	0x2,0x10
1c77 c412       |    |		Store	0x2,0x12
1c78 e413       |    |		Load	0x2,0x13							; Debug Table 0x3a.0x3c = 0x1c78,0x26
1c79 0120       |    |		Execute	Any,Is_Value
1c7a 6803       |h   |		Jump_Zero	0x1c7e
1c7b e005       |    |		Load	0x0,0x5
1c7c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1c7d 7801       |x   |		Jump	0x1c7f
1c7e e413       |    |		Load	0x2,0x13
1c7f e412       |    |		Load	0x2,0x12
1c80 e011       |    |		Load	0x0,0x11
1c81 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1c82 e012       |    |		Load	0x0,0x12
1c83 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1c84 e01b       |    |		Load	0x0,0x1b
1c85 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
1c86 e005       |    |		Load	0x0,0x5
1c87 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
1c88 c413       |    |		Store	0x2,0x13
1c89 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3a.0x3d = 0x1c89,0x27
1c8a e01c       |    |		Load	0x0,0x1c
1c8b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1c8c 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
1c8d e414       |    |		Load	0x2,0x14
1c8e e5fd       |    |		Load	0x2,-0x3
1c8f e410       |    |		Load	0x2,0x10
1c90 e413       |    |		Load	0x2,0x13
1c91 e005       |    |		Load	0x0,0x5
1c92 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
1c93 c402       |    |		Store	0x2,0x2
1c94 e402       |    |		Load	0x2,0x2								; Debug Table 0x3a.0x3e = 0x1c94,0x28
1c95 e414       |    |		Load	0x2,0x14
1c96 e005       |    |		Load	0x0,0x5
1c97 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1c98 e40f       |    |		Load	0x2,0xf								; Debug Table 0x3a.0x3f = 0x1c98,0x29
1c99 e006       |    |		Load	0x0,0x6
1c9a 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
1c9b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
1c9c e403       |    |		Load	0x2,0x3								; Debug Table 0x3a.0x40 = 0x1c9c,0x2a
1c9d 6839       |h9  |		Jump_Zero	0x1cd7
1c9e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3a.0x41 = 0x1c9e,0x2b
1c9f 00d9       |    |		Load_Top	At_Offset_1
1ca0 0217       |    |		Execute	Heap_Access,All_Reference
1ca1 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
1ca2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3a.0x42 = 0x1ca2,0x2c
1ca3 4802       |H   |		Short_Literal	0x2
1ca4 e241       | A  |		Load	0x1,0x41
1ca5 1c08       |    |		Execute_Immediate	Run_Utility,0x8
1ca6 00d8       |    |		Load_Top	At_Offset_0
1ca7 1c01       |    |		Execute_Immediate	Run_Utility,0x1
1ca8 e402       |    |		Load	0x2,0x2
1ca9 00d9       |    |		Load_Top	At_Offset_1
1caa 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1cab 2801       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1
1cac e404       |    |		Load	0x2,0x4
1cad e002       |    |		Load	0x0,0x2
1cae 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1caf 1b33       | 3  |		Execute	Package,Field_Read,Field_Number 0x33
1cb0 0119       |    |		Execute	Any,Check_In_Formal_Type
1cb1 00d9       |    |		Load_Top	At_Offset_1
1cb2 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1cb3 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
1cb4 e411       |    |		Load	0x2,0x11
1cb5 e01d       |    |		Load	0x0,0x1d
1cb6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1cb7 0119       |    |		Execute	Any,Check_In_Formal_Type
1cb8 00d9       |    |		Load_Top	At_Offset_1
1cb9 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1cba 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
1cbb e405       |    |		Load	0x2,0x5
1cbc 00d9       |    |		Load_Top	At_Offset_1
1cbd 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1cbe 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
1cbf e40a       |    |		Load	0x2,0xa
1cc0 e002       |    |		Load	0x0,0x2
1cc1 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1cc2 0119       |    |		Execute	Any,Check_In_Formal_Type
1cc3 00d9       |    |		Load_Top	At_Offset_1
1cc4 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1cc5 2a09       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9
1cc6 e40f       |    |		Load	0x2,0xf
1cc7 e006       |    |		Load	0x0,0x6
1cc8 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1cc9 0119       |    |		Execute	Any,Check_In_Formal_Type
1cca 00d9       |    |		Load_Top	At_Offset_1
1ccb 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1ccc 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
1ccd e414       |    |		Load	0x2,0x14
1cce e005       |    |		Load	0x0,0x5
1ccf 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1cd0 0119       |    |		Execute	Any,Check_In_Formal_Type
1cd1 00d9       |    |		Load_Top	At_Offset_1
1cd2 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1cd3 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
1cd4 e5fb       |    |		Load	0x2,-0x5
1cd5 016d       | m  |		Execute	Variant_Record,Structure_Write
1cd6 783f       |x?  |		Jump	0x1d16
1cd7 e411       |    |		Load	0x2,0x11							; Debug Table 0x3a.0x43 = 0x1cd7,0x2d
1cd8 e405       |    |		Load	0x2,0x5
1cd9 8247       | G  |		Call	0x1,0x47
1cda 00d9       |    |		Load_Top	At_Offset_1
1cdb 0217       |    |		Execute	Heap_Access,All_Reference
1cdc 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
1cdd 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3a.0x44 = 0x1cdd,0x2e
1cde 4801       |H   |		Short_Literal	0x1
1cdf e241       | A  |		Load	0x1,0x41
1ce0 1c08       |    |		Execute_Immediate	Run_Utility,0x8
1ce1 00d8       |    |		Load_Top	At_Offset_0
1ce2 1c01       |    |		Execute_Immediate	Run_Utility,0x1
1ce3 e402       |    |		Load	0x2,0x2
1ce4 00d9       |    |		Load_Top	At_Offset_1
1ce5 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1ce6 2801       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1
1ce7 e404       |    |		Load	0x2,0x4
1ce8 e002       |    |		Load	0x0,0x2
1ce9 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1cea 1b33       | 3  |		Execute	Package,Field_Read,Field_Number 0x33
1ceb 0119       |    |		Execute	Any,Check_In_Formal_Type
1cec 00d9       |    |		Load_Top	At_Offset_1
1ced 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1cee 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
1cef e411       |    |		Load	0x2,0x11
1cf0 e01d       |    |		Load	0x0,0x1d
1cf1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1cf2 0119       |    |		Execute	Any,Check_In_Formal_Type
1cf3 00d9       |    |		Load_Top	At_Offset_1
1cf4 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1cf5 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
1cf6 e405       |    |		Load	0x2,0x5
1cf7 00d9       |    |		Load_Top	At_Offset_1
1cf8 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1cf9 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
1cfa e40a       |    |		Load	0x2,0xa
1cfb e002       |    |		Load	0x0,0x2
1cfc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1cfd 0119       |    |		Execute	Any,Check_In_Formal_Type
1cfe 00d9       |    |		Load_Top	At_Offset_1
1cff 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1d00 2a09       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9
1d01 e40f       |    |		Load	0x2,0xf
1d02 e006       |    |		Load	0x0,0x6
1d03 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1d04 0119       |    |		Execute	Any,Check_In_Formal_Type
1d05 00d9       |    |		Load_Top	At_Offset_1
1d06 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1d07 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
1d08 e414       |    |		Load	0x2,0x14
1d09 e005       |    |		Load	0x0,0x5
1d0a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1d0b 0119       |    |		Execute	Any,Check_In_Formal_Type
1d0c 00d9       |    |		Load_Top	At_Offset_1
1d0d 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1d0e 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
1d0f 00da       |    |		Load_Top	At_Offset_2
1d10 016d       | m  |		Execute	Variant_Record,Structure_Write
1d11 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3a.0x45 = 0x1d11,0x2f
1d12 8245       | E  |		Call	0x1,0x45
1d13 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3a.0x46 = 0x1d13,0x30
1d14 e5fb       |    |		Load	0x2,-0x5
1d15 016d       | m  |		Execute	Variant_Record,Structure_Write
1d16 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3a.0x47 = 0x1d16,0x31
1d17 a5fa       |    |		Store_Unchecked	0x2,-0x6
1d18 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
1d19			TRAP_1ac8:
1d19 601a       |`   |		Indirect_Literal	Discrete,0x1d34,{0x00000000, 0x5a851501}
1d1a 010f       |    |		Execute	Exception,Equal
1d1b 6808       |h   |		Jump_Zero	0x1d24
1d1c e411       |    |		Load	0x2,0x11							; Debug Table 0x3a.0x48 = 0x1d1c,0x32
1d1d 4801       |H   |		Short_Literal	0x1
1d1e 4800       |H   |		Short_Literal	0x0
1d1f e004       |    |		Load	0x0,0x4
1d20 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1d21 c411       |    |		Store	0x2,0x11
1d22 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3a.0x49 = 0x1d22,0x33
1d23 0101       |    |		Execute	Exception,Reraise
1d24 e411       |    |		Load	0x2,0x11							; Debug Table 0x3a.0x4a = 0x1d24,0x34
1d25 4801       |H   |		Short_Literal	0x1
1d26 4800       |H   |		Short_Literal	0x0
1d27 e004       |    |		Load	0x0,0x4
1d28 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1d29 c411       |    |		Store	0x2,0x11
1d2a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3a.0x4b = 0x1d2a,0x35
1d2b e009       |    |		Load	0x0,0x9
1d2c 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1d2d 0092 2521  |  %!|		Action	Push_String_Extended,0x2521					; "Target.Get_nonsource_List_Point"
1d2f 8222       | "  |		Call	0x1,0x22
1d30 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
1d31 0000 0000  |    |		.XXX[0x3]
1d33 0000       |    |
1d34 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a851501}
1d38 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
1d3c 0000 0000  |    |		.XXX[0x4]
1d3e 5a86 a504  |Z   |
1d40 ; --------------------------------------------------------------------------------------
1d40 ; SUBPROGRAM
1d40 ; --------------------------------------------------------------------------------------
1d40 1d44       | D  |		.CONST	0x1d44								; Address of begin
1d41 0004       |    |		.CONST	0x0004								; Address of exception handler
1d42 0002       |    |		.CONST	0x0002								; Number of locals
1d43			INIT_1d40:
1d43 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3b = .DEBUG	0x1d43,0x3876,0x0002,0x0000,0x005a,0x86a5,0x0000,0x0669
													; Debug Table 0x3b.0x0 = 0x1d43,0xffff
1d44			BODY_1d40:
1d44 0007       |    |		Action	Break_Optional							; Debug Table 0x3b.0x1 = 0x1d44,0x1
1d45 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3b.0x2 = 0x1d45,0x401
1d46 0007       |    |		Action	Break_Optional
1d47 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3b.0x3 = 0x1d47,0x402
1d48 0007       |    |		Action	Break_Optional							; Debug Table 0x3b.0x4 = 0x1d48,0x403
1d49 0007       |    |		Action	Break_Optional							; Debug Table 0x3b.0x5 = 0x1d49,0x404
1d4a 0b97       |    |		Execute_Immediate	Case_Compare,0x97				; Debug Table 0x3b.0x6 = 0x1d4a,0x1
1d4b 700e       |p   |		Jump_Nonzero	0x1d5a
1d4c 0b8c       |    |		Execute_Immediate	Case_Compare,0x8c
1d4d 7011       |p   |		Jump_Nonzero	0x1d5f
1d4e 0b91       |    |		Execute_Immediate	Case_Compare,0x91
1d4f 700f       |p   |		Jump_Nonzero	0x1d5f
1d50 0b89       |    |		Execute_Immediate	Case_Compare,0x89
1d51 7012       |p   |		Jump_Nonzero	0x1d64
1d52 0b84       |    |		Execute_Immediate	Case_Compare,0x84
1d53 7015       |p   |		Jump_Nonzero	0x1d69
1d54 0b8f       |    |		Execute_Immediate	Case_Compare,0x8f
1d55 7018       |p   |		Jump_Nonzero	0x1d6e
1d56 0b95       |    |		Execute_Immediate	Case_Compare,0x95
1d57 701b       |p   |		Jump_Nonzero	0x1d73
1d58 67db       |g   |		Indirect_Literal	Discrete,0x1d34,{0x00000000, 0x5a851501}	; Debug Table 0x3b.0x7 = 0x1d58,0x8
1d59 0257       | W  |		Execute	Discrete,Raise
1d5a 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x3b.0x8 = 0x1d5a,0x2
1d5b e019       |    |		Load	0x0,0x19
1d5c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
1d5d 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
1d5e 7818       |x   |		Jump	0x1d77
1d5f 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x3b.0x9 = 0x1d5f,0x3
1d60 e019       |    |		Load	0x0,0x19
1d61 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
1d62 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
1d63 7813       |x   |		Jump	0x1d77
1d64 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x3b.0xa = 0x1d64,0x4
1d65 e019       |    |		Load	0x0,0x19
1d66 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1d67 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
1d68 780e       |x   |		Jump	0x1d77
1d69 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x3b.0xb = 0x1d69,0x5
1d6a e019       |    |		Load	0x0,0x19
1d6b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
1d6c 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
1d6d 7809       |x   |		Jump	0x1d77
1d6e 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x3b.0xc = 0x1d6e,0x6
1d6f e019       |    |		Load	0x0,0x19
1d70 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
1d71 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
1d72 7804       |x   |		Jump	0x1d77
1d73 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x3b.0xd = 0x1d73,0x7
1d74 e019       |    |		Load	0x0,0x19
1d75 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
1d76 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
1d77 00d1       |    |		Pop_Control	Pop_Count_1
1d78 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3b.0xe = 0x1d78,0x9
1d79 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1d7a 0000 0000  |    |		.BLANK	0000[0x6]
1d80 ; --------------------------------------------------------------------------------------
1d80 ; SUBPROGRAM
1d80 ; --------------------------------------------------------------------------------------
1d80 1d99       |    |		.CONST	0x1d99								; Address of begin
1d81 1e9d       |    |		.CONST	0x1e9d								; Address of exception handler
1d82 0008       |    |		.CONST	0x0008								; Number of locals
1d83			INIT_1d80:
1d83 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3c = .DEBUG	0x1d83,0x3896,0x0001,0x0000,0x005a,0x86a5,0x0000,0x06d6
													; Debug Table 0x3c.0x0 = 0x1d83,0xffff
1d84 e005       |    |		Load	0x0,0x5								; Debug Table 0x3c.0x1 = 0x1d84,0xfffe
1d85 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1d86 02c7       |    |		Declare_Variable	Any
1d87 00d8       |    |		Load_Top	At_Offset_0
1d88 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1d89 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3c.0x2 = 0x1d89,0xfffd
1d8a e003       |    |		Load	0x0,0x3								; Debug Table 0x3c.0x3 = 0x1d8a,0xfffc
1d8b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1d8c 0322       | "  |		Declare_Variable	Record
1d8d 00d8       |    |		Load_Top	At_Offset_0
1d8e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1d8f e241       | A  |		Load	0x1,0x41							; Debug Table 0x3c.0x4 = 0x1d8f,0xfffb
1d90 02ff       |    |		Declare_Variable	Variant_Record
1d91 00d8       |    |		Load_Top	At_Offset_0
1d92 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1d93 e006       |    |		Load	0x0,0x6								; Debug Table 0x3c.0x5 = 0x1d93,0xfffa
1d94 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1d95 02c7       |    |		Declare_Variable	Any
1d96 00d8       |    |		Load_Top	At_Offset_0
1d97 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1d98 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x3c.0x6 = 0x1d98,0xfff9
1d99			BODY_1d80:
1d99 0007       |    |		Action	Break_Optional							; Debug Table 0x3c.0x7 = 0x1d99,0x1
1d9a e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x3c.0x8 = 0x1d9a,0x401
1d9b 0007       |    |		Action	Break_Optional
1d9c 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x3c.0x9 = 0x1d9c,0x402
1d9d 0007       |    |		Action	Break_Optional							; Debug Table 0x3c.0xa = 0x1d9d,0x403
1d9e 0007       |    |		Action	Break_Optional							; Debug Table 0x3c.0xb = 0x1d9e,0x404
1d9f 0007       |    |		Action	Break_Optional							; Debug Table 0x3c.0xc = 0x1d9f,0x1
1da0 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3c.0xd = 0x1da0,0x801
1da1 0007       |    |		Action	Break_Optional
1da2 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x3c.0xe = 0x1da2,0x802
1da3 0007       |    |		Action	Break_Optional							; Debug Table 0x3c.0xf = 0x1da3,0x803
1da4 0007       |    |		Action	Break_Optional							; Debug Table 0x3c.0x10 = 0x1da4,0x804
1da5 021f       |    |		Execute	Heap_Access,Equal						; Debug Table 0x3c.0x11 = 0x1da5,0x404
1da6 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
1da7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3c.0x12 = 0x1da7,0x2
1da8 e5fc       |    |		Load	0x2,-0x4
1da9 e004       |    |		Load	0x0,0x4
1daa 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1dab e003       |    |		Load	0x0,0x3
1dac 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
1dad c5fc       |    |		Store	0x2,-0x4
1dae 00d1       |    |		Pop_Control	Pop_Count_1
1daf e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x3c.0x13 = 0x1daf,0x3
1db0 8249       | I  |		Call	0x1,0x49
1db1 a402       |    |		Store_Unchecked	0x2,0x2
1db2 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3c.0x14 = 0x1db2,0x4
1db3 e402       |    |		Load	0x2,0x2
1db4 e5fc       |    |		Load	0x2,-0x4
1db5 e405       |    |		Load	0x2,0x5
1db6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
1db7 e005       |    |		Load	0x0,0x5
1db8 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
1db9 0007       |    |		Action	Break_Optional							; Debug Table 0x3c.0x15 = 0x1db9,0x5
1dba e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3c.0x16 = 0x1dba,0xc01
1dbb 021d       |    |		Execute	Heap_Access,Is_Null
1dbc 70ac       |p   |		Jump_Nonzero	0x1e69							; Debug Table 0x3c.0x17 = 0x1dbc,0x5
1dbd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3c.0x18 = 0x1dbd,0x6
1dbe 680b       |h   |		Jump_Zero	0x1dca
1dbf e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3c.0x19 = 0x1dbf,0x7
1dc0 e5fc       |    |		Load	0x2,-0x4
1dc1 8228       | (  |		Call	0x1,0x28
1dc2 a404       |    |		Store_Unchecked	0x2,0x4
1dc3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3c.0x1a = 0x1dc3,0x8
1dc4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1dc5 c407       |    |		Store	0x2,0x7
1dc6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3c.0x1b = 0x1dc6,0x9
1dc7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
1dc8 c403       |    |		Store	0x2,0x3
1dc9 7820       |x   |		Jump	0x1dea
1dca e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3c.0x1c = 0x1dca,0xa
1dcb a404       |    |		Store_Unchecked	0x2,0x4
1dcc 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3c.0x1d = 0x1dcc,0xb
1dcd 0120       |    |		Execute	Any,Is_Value
1dce 6803       |h   |		Jump_Zero	0x1dd2
1dcf e006       |    |		Load	0x0,0x6
1dd0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1dd1 7801       |x   |		Jump	0x1dd3
1dd2 00d9       |    |		Load_Top	At_Offset_1
1dd3 e404       |    |		Load	0x2,0x4
1dd4 e405       |    |		Load	0x2,0x5
1dd5 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
1dd6 8246       | F  |		Call	0x1,0x46
1dd7 c404       |    |		Store	0x2,0x4
1dd8 c407       |    |		Store	0x2,0x7
1dd9 e403       |    |		Load	0x2,0x3								; Debug Table 0x3c.0x1e = 0x1dd9,0xc
1dda 0120       |    |		Execute	Any,Is_Value
1ddb 6803       |h   |		Jump_Zero	0x1ddf
1ddc e005       |    |		Load	0x0,0x5
1ddd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1dde 7801       |x   |		Jump	0x1de0
1ddf e403       |    |		Load	0x2,0x3
1de0 00da       |    |		Load_Top	At_Offset_2
1de1 e011       |    |		Load	0x0,0x11
1de2 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1de3 e012       |    |		Load	0x0,0x12
1de4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1de5 e01b       |    |		Load	0x0,0x1b
1de6 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
1de7 e005       |    |		Load	0x0,0x5
1de8 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
1de9 c403       |    |		Store	0x2,0x3
1dea 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3c.0x1f = 0x1dea,0xd
1deb e01c       |    |		Load	0x0,0x1c
1dec 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1ded 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
1dee e404       |    |		Load	0x2,0x4
1def e403       |    |		Load	0x2,0x3
1df0 e402       |    |		Load	0x2,0x2
1df1 e405       |    |		Load	0x2,0x5
1df2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
1df3 e005       |    |		Load	0x0,0x5
1df4 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
1df5 c402       |    |		Store	0x2,0x2
1df6 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3c.0x20 = 0x1df6,0xe
1df7 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
1df8 6870       |hp  |		Jump_Zero	0x1e69
1df9 0007       |    |		Action	Break_Optional							; Debug Table 0x3c.0x21 = 0x1df9,0xf
1dfa 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x3c.0x22 = 0x1dfa,0xefff
1dfb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3c.0x23 = 0x1dfb,0xeffe
1dfc e404       |    |		Load	0x2,0x4								; Debug Table 0x3c.0x24 = 0x1dfc,0x1001
1dfd 4975       |Iu  |		Short_Literal	0x175
1dfe 00eb       |    |		Load_Encached	Diana_Cache
1dff 0098       |    |		Execute	Package,Field_Read_Dynamic
1e00 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
1e01 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3c.0x25 = 0x1e01,0x1401
1e02 7002       |p   |		Jump_Nonzero	0x1e05
1e03 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x3c.0x26 = 0x1e03,0x1402
1e04 7803       |x   |		Jump	0x1e08
1e05 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3c.0x27 = 0x1e05,0x1403
1e06 0217       |    |		Execute	Heap_Access,All_Reference
1e07 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1e08 00d0       |    |		Action	Swap_Control
1e09 00d1       |    |		Pop_Control	Pop_Count_1
1e0a 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2					; Debug Table 0x3c.0x28 = 0x1e0a,0x1001
1e0b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3c.0x29 = 0x1e0b,0x1002
1e0c 4802       |H   |		Short_Literal	0x2
1e0d 0263       | c  |		Execute	Discrete,Above_Bound
1e0e 7059       |pY  |		Jump_Nonzero	0x1e68
1e0f e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x3c.0x2a = 0x1e0f,0x1003
1e10 8249       | I  |		Call	0x1,0x49
1e11 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
1e12 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3c.0x2b = 0x1e12,0x1004
1e13 e5fd       |    |		Load	0x2,-0x3
1e14 0273       | s  |		Execute	Discrete,Plus
1e15 0248       | H  |		Execute	Discrete,Check_In_Integer
1e16 0aff       |    |		Execute_Immediate	Plus,-0x1
1e17 00e3       |    |		Load_Encached	Natural_Cache
1e18 025b       | [  |		Execute	Discrete,Check_In_Type
1e19 00db       |    |		Load_Top	At_Offset_3
1e1a e5fc       |    |		Load	0x2,-0x4
1e1b e405       |    |		Load	0x2,0x5
1e1c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
1e1d e005       |    |		Load	0x0,0x5
1e1e 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
1e1f 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3c.0x2c = 0x1e1f,0x1005
1e20 e01c       |    |		Load	0x0,0x1c
1e21 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1e22 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
1e23 e409       |    |		Load	0x2,0x9
1e24 0007       |    |		Action	Break_Optional
1e25 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3c.0x2d = 0x1e25,0x1801
1e26 7002       |p   |		Jump_Nonzero	0x1e29
1e27 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3c.0x2e = 0x1e27,0x1802
1e28 782c       |x,  |		Jump	0x1e55
1e29 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3c.0x2f = 0x1e29,0x1803
1e2a 0217       |    |		Execute	Heap_Access,All_Reference
1e2b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
1e2c 6804       |h   |		Jump_Zero	0x1e31
1e2d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3c.0x30 = 0x1e2d,0x1804
1e2e 0217       |    |		Execute	Heap_Access,All_Reference
1e2f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1e30 7824       |x$  |		Jump	0x1e55
1e31 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3c.0x31 = 0x1e31,0x1805
1e32 0007       |    |		Action	Break_Optional
1e33 e410       |    |		Load	0x2,0x10							; Debug Table 0x3c.0x32 = 0x1e33,0x1c01
1e34 0007       |    |		Action	Break_Optional
1e35 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0x3c.0x33 = 0x1e35,0x1c02
1e36 0007       |    |		Action	Break_Optional							; Debug Table 0x3c.0x34 = 0x1e36,0x1c03
1e37 00d0       |    |		Action	Swap_Control							; Debug Table 0x3c.0x35 = 0x1e37,0x1c04
1e38 00d1       |    |		Pop_Control	Pop_Count_1
1e39 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0x3c.0x36 = 0x1e39,0x1805
1e3a 00eb       |    |		Load_Encached	Diana_Cache
1e3b 0098       |    |		Execute	Package,Field_Read_Dynamic
1e3c 012c       | ,  |		Execute	Any,Size
1e3d e01e       |    |		Load	0x0,0x1e
1e3e 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
1e3f 025b       | [  |		Execute	Discrete,Check_In_Type
1e40 0273       | s  |		Execute	Discrete,Plus
1e41 00d9       |    |		Load_Top	At_Offset_1
1e42 0007       |    |		Action	Break_Optional
1e43 e411       |    |		Load	0x2,0x11							; Debug Table 0x3c.0x37 = 0x1e43,0x2001
1e44 0007       |    |		Action	Break_Optional
1e45 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x3c.0x38 = 0x1e45,0x2002
1e46 0007       |    |		Action	Break_Optional							; Debug Table 0x3c.0x39 = 0x1e46,0x2003
1e47 00d0       |    |		Action	Swap_Control							; Debug Table 0x3c.0x3a = 0x1e47,0x2004
1e48 00d1       |    |		Pop_Control	Pop_Count_1
1e49 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0x3c.0x3b = 0x1e49,0x1c04
1e4a 00eb       |    |		Load_Encached	Diana_Cache
1e4b 0098       |    |		Execute	Package,Field_Read_Dynamic
1e4c 49c9       |I   |		Short_Literal	0x1c9
1e4d 00eb       |    |		Load_Encached	Diana_Cache
1e4e 0098       |    |		Execute	Package,Field_Read_Dynamic
1e4f 49ca       |I   |		Short_Literal	0x1ca
1e50 00eb       |    |		Load_Encached	Diana_Cache
1e51 0095       |    |		Execute	Package,Field_Reference_Dynamic
1e52 e010       |    |		Load	0x0,0x10
1e53 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
1e54 7800       |x   |		Jump	0x1e55
1e55 00d0       |    |		Action	Swap_Control
1e56 00d1       |    |		Pop_Control	Pop_Count_1
1e57 e403       |    |		Load	0x2,0x3								; Debug Table 0x3c.0x3c = 0x1e57,0x1005
1e58 e40a       |    |		Load	0x2,0xa
1e59 e405       |    |		Load	0x2,0x5
1e5a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
1e5b e005       |    |		Load	0x0,0x5
1e5c 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
1e5d 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
1e5e 0007       |    |		Action	Break_Optional							; Debug Table 0x3c.0x3d = 0x1e5e,0x1006
1e5f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3c.0x3e = 0x1e5f,0x2401
1e60 7002       |p   |		Jump_Nonzero	0x1e63
1e61 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x3c.0x3f = 0x1e61,0x2402
1e62 7803       |x   |		Jump	0x1e66
1e63 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3c.0x40 = 0x1e63,0x2403
1e64 0217       |    |		Execute	Heap_Access,All_Reference
1e65 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1e66 a409       |    |		Store_Unchecked	0x2,0x9							; Debug Table 0x3c.0x41 = 0x1e66,0x1006
1e67 3fa7       |?   |		Loop_Increasing	0x1e0f
1e68 00d2       |    |		Pop_Control	Pop_Count_2
1e69 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x3c.0x42 = 0x1e69,0x10
1e6a e405       |    |		Load	0x2,0x5
1e6b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
1e6c e005       |    |		Load	0x0,0x5
1e6d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1e6e 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3c.0x43 = 0x1e6e,0x11
1e6f 4800       |H   |		Short_Literal	0x0
1e70 e241       | A  |		Load	0x1,0x41
1e71 1c08       |    |		Execute_Immediate	Run_Utility,0x8
1e72 00d8       |    |		Load_Top	At_Offset_0
1e73 1c01       |    |		Execute_Immediate	Run_Utility,0x1
1e74 e402       |    |		Load	0x2,0x2
1e75 00d9       |    |		Load_Top	At_Offset_1
1e76 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1e77 2801       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1
1e78 e405       |    |		Load	0x2,0x5
1e79 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1e7a e002       |    |		Load	0x0,0x2
1e7b 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
1e7c 1b33       | 3  |		Execute	Package,Field_Read,Field_Number 0x33
1e7d 0119       |    |		Execute	Any,Check_In_Formal_Type
1e7e 00d9       |    |		Load_Top	At_Offset_1
1e7f 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1e80 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
1e81 e405       |    |		Load	0x2,0x5
1e82 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
1e83 e002       |    |		Load	0x0,0x2
1e84 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1e85 0119       |    |		Execute	Any,Check_In_Formal_Type
1e86 00d9       |    |		Load_Top	At_Offset_1
1e87 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1e88 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
1e89 e405       |    |		Load	0x2,0x5
1e8a 00d9       |    |		Load_Top	At_Offset_1
1e8b 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1e8c 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
1e8d e5fc       |    |		Load	0x2,-0x4
1e8e 00d9       |    |		Load_Top	At_Offset_1
1e8f 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1e90 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
1e91 e5ff       |    |		Load	0x2,-0x1
1e92 00d9       |    |		Load_Top	At_Offset_1
1e93 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1e94 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
1e95 00db       |    |		Load_Top	At_Offset_3
1e96 016d       | m  |		Execute	Variant_Record,Structure_Write
1e97 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3c.0x44 = 0x1e97,0x12
1e98 8245       | E  |		Call	0x1,0x45
1e99 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3c.0x45 = 0x1e99,0x13
1e9a e5fb       |    |		Load	0x2,-0x5
1e9b 016d       | m  |		Execute	Variant_Record,Structure_Write
1e9c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
1e9d			TRAP_1d80:
1e9d 6696       |f   |		Indirect_Literal	Discrete,0x1d34,{0x00000000, 0x5a851501}
1e9e 010f       |    |		Execute	Exception,Equal
1e9f 6802       |h   |		Jump_Zero	0x1ea2
1ea0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3c.0x46 = 0x1ea0,0x14
1ea1 0101       |    |		Execute	Exception,Reraise
1ea2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3c.0x47 = 0x1ea2,0x15
1ea3 e009       |    |		Load	0x0,0x9
1ea4 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1ea5 0092 2522  |  %"|		Action	Push_String_Extended,0x2522					; "Target.Get_Source_List_Point"
1ea7 8222       | "  |		Call	0x1,0x22
1ea8 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
1ea9 0000 0000  |    |		.BLANK	0000[0x7]
1eb0 ; --------------------------------------------------------------------------------------
1eb0 ; SUBPROGRAM
1eb0 ; --------------------------------------------------------------------------------------
1eb0 1eb4       |    |		.CONST	0x1eb4								; Address of begin
1eb1 1f59       | Y  |		.CONST	0x1f59								; Address of exception handler
1eb2 0002       |    |		.CONST	0x0002								; Number of locals
1eb3			INIT_1eb0:
1eb3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3d = .DEBUG	0x1eb3,0x3928,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0878
													; Debug Table 0x3d.0x0 = 0x1eb3,0xffff
1eb4			BODY_1eb0:
1eb4 4803       |H   |		Short_Literal	0x3							; Debug Table 0x3d.0x1 = 0x1eb4,0x1
1eb5 a5fd       |    |		Store_Unchecked	0x2,-0x3
1eb6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3d.0x2 = 0x1eb6,0x2
1eb7 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1eb8 4602       |F   |		Jump_Case	0x3
1eb9 783a       |x:  |		Jump	0x1ef4								; case 0x0
1eba 7810       |x   |		Jump	0x1ecb								; case 0x1
1ebb 7800       |x   |		Jump	0x1ebc								; case 0x2
1ebc 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0x3 = 0x1ebc,0x3
1ebd e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3d.0x4 = 0x1ebd,0x401
1ebe 0007       |    |		Action	Break_Optional
1ebf 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3d.0x5 = 0x1ebf,0x402
1ec0 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0x6 = 0x1ec0,0x403
1ec1 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0x7 = 0x1ec1,0x404
1ec2 0ba8       |    |		Execute_Immediate	Case_Compare,0xa8				; Debug Table 0x3d.0x8 = 0x1ec2,0x3
1ec3 7003       |p   |		Jump_Nonzero	0x1ec7
1ec4 0bab       |    |		Execute_Immediate	Case_Compare,0xab
1ec5 7001       |p   |		Jump_Nonzero	0x1ec7
1ec6 7802       |x   |		Jump	0x1ec9								; Debug Table 0x3d.0x9 = 0x1ec6,0x5
1ec7 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3d.0xa = 0x1ec7,0x4
1ec8 a5fd       |    |		Store_Unchecked	0x2,-0x3
1ec9 00d1       |    |		Pop_Control	Pop_Count_1
1eca 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1ecb 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0xb = 0x1ecb,0x6
1ecc e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3d.0xc = 0x1ecc,0x801
1ecd 0007       |    |		Action	Break_Optional
1ece 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3d.0xd = 0x1ece,0x802
1ecf 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0xe = 0x1ecf,0x803
1ed0 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0xf = 0x1ed0,0x804
1ed1 0ba8       |    |		Execute_Immediate	Case_Compare,0xa8				; Debug Table 0x3d.0x10 = 0x1ed1,0x6
1ed2 700e       |p   |		Jump_Nonzero	0x1ee1
1ed3 0b00       |    |		Execute_Immediate	Case_Compare,0x0
1ed4 701b       |p   |		Jump_Nonzero	0x1ef0
1ed5 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0x11 = 0x1ed5,0xc
1ed6 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3d.0x12 = 0x1ed6,0xc01
1ed7 0007       |    |		Action	Break_Optional
1ed8 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3d.0x13 = 0x1ed8,0xc02
1ed9 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0x14 = 0x1ed9,0xc03
1eda 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0x15 = 0x1eda,0xc04
1edb e00c       |    |		Load	0x0,0xc								; Debug Table 0x3d.0x16 = 0x1edb,0xc
1edc 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
1edd 6814       |h   |		Jump_Zero	0x1ef2
1ede 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3d.0x17 = 0x1ede,0xd
1edf a5fd       |    |		Store_Unchecked	0x2,-0x3
1ee0 7811       |x   |		Jump	0x1ef2
1ee1 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3d.0x18 = 0x1ee1,0x7
1ee2 00eb       |    |		Load_Encached	Diana_Cache
1ee3 18e9       |    |		Execute	Package,Field_Execute,Field_Number 0xe9
1ee4 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
1ee5 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3d.0x19 = 0x1ee5,0x8
1ee6 00da       |    |		Load_Top	At_Offset_2
1ee7 4974       |It  |		Short_Literal	0x174
1ee8 00eb       |    |		Load_Encached	Diana_Cache
1ee9 0098       |    |		Execute	Package,Field_Read_Dynamic
1eea 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
1eeb 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3d.0x1a = 0x1eeb,0x9
1eec a5fe       |    |		Store_Unchecked	0x2,-0x2
1eed 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3d.0x1b = 0x1eed,0xa
1eee a5fd       |    |		Store_Unchecked	0x2,-0x3
1eef 7802       |x   |		Jump	0x1ef2
1ef0 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3d.0x1c = 0x1ef0,0xb
1ef1 a5fd       |    |		Store_Unchecked	0x2,-0x3
1ef2 00d1       |    |		Pop_Control	Pop_Count_1
1ef3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1ef4 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0x1d = 0x1ef4,0xe
1ef5 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3d.0x1e = 0x1ef5,0x1001
1ef6 0007       |    |		Action	Break_Optional
1ef7 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3d.0x1f = 0x1ef7,0x1002
1ef8 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0x20 = 0x1ef8,0x1003
1ef9 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0x21 = 0x1ef9,0x1004
1efa 0bab       |    |		Execute_Immediate	Case_Compare,0xab				; Debug Table 0x3d.0x22 = 0x1efa,0xe
1efb 704a       |pJ  |		Jump_Nonzero	0x1f46
1efc 0ba8       |    |		Execute_Immediate	Case_Compare,0xa8
1efd 704b       |pK  |		Jump_Nonzero	0x1f49
1efe e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3d.0x23 = 0x1efe,0x14
1eff 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1f00 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
1f01 0007       |    |		Action	Break_Optional
1f02 e404       |    |		Load	0x2,0x4								; Debug Table 0x3d.0x24 = 0x1f02,0x1401
1f03 0007       |    |		Action	Break_Optional
1f04 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3d.0x25 = 0x1f04,0x1402
1f05 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0x26 = 0x1f05,0x1403
1f06 00d0       |    |		Action	Swap_Control							; Debug Table 0x3d.0x27 = 0x1f06,0x1404
1f07 00d1       |    |		Pop_Control	Pop_Count_1
1f08 0b97       |    |		Execute_Immediate	Case_Compare,0x97				; Debug Table 0x3d.0x28 = 0x1f08,0x14
1f09 700d       |p   |		Jump_Nonzero	0x1f17
1f0a 0b8c       |    |		Execute_Immediate	Case_Compare,0x8c
1f0b 7012       |p   |		Jump_Nonzero	0x1f1e
1f0c 0b91       |    |		Execute_Immediate	Case_Compare,0x91
1f0d 7010       |p   |		Jump_Nonzero	0x1f1e
1f0e 0b89       |    |		Execute_Immediate	Case_Compare,0x89
1f0f 7015       |p   |		Jump_Nonzero	0x1f25
1f10 0b84       |    |		Execute_Immediate	Case_Compare,0x84
1f11 701a       |p   |		Jump_Nonzero	0x1f2c
1f12 0b8f       |    |		Execute_Immediate	Case_Compare,0x8f
1f13 701f       |p   |		Jump_Nonzero	0x1f33
1f14 0b95       |    |		Execute_Immediate	Case_Compare,0x95
1f15 7024       |p$  |		Jump_Nonzero	0x1f3a
1f16 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x3d.0x29 = 0x1f16,0x21
1f17 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3d.0x2a = 0x1f17,0x15
1f18 e00f       |    |		Load	0x0,0xf
1f19 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
1f1a 6829       |h)  |		Jump_Zero	0x1f44
1f1b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3d.0x2b = 0x1f1b,0x16
1f1c a5fd       |    |		Store_Unchecked	0x2,-0x3
1f1d 7826       |x&  |		Jump	0x1f44
1f1e e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3d.0x2c = 0x1f1e,0x17
1f1f e00f       |    |		Load	0x0,0xf
1f20 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
1f21 6822       |h"  |		Jump_Zero	0x1f44
1f22 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3d.0x2d = 0x1f22,0x18
1f23 a5fd       |    |		Store_Unchecked	0x2,-0x3
1f24 781f       |x   |		Jump	0x1f44
1f25 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3d.0x2e = 0x1f25,0x19
1f26 e00f       |    |		Load	0x0,0xf
1f27 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1f28 681b       |h   |		Jump_Zero	0x1f44
1f29 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3d.0x2f = 0x1f29,0x1a
1f2a a5fd       |    |		Store_Unchecked	0x2,-0x3
1f2b 7818       |x   |		Jump	0x1f44
1f2c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3d.0x30 = 0x1f2c,0x1b
1f2d e00f       |    |		Load	0x0,0xf
1f2e 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
1f2f 6814       |h   |		Jump_Zero	0x1f44
1f30 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3d.0x31 = 0x1f30,0x1c
1f31 a5fd       |    |		Store_Unchecked	0x2,-0x3
1f32 7811       |x   |		Jump	0x1f44
1f33 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3d.0x32 = 0x1f33,0x1d
1f34 e00f       |    |		Load	0x0,0xf
1f35 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
1f36 680d       |h   |		Jump_Zero	0x1f44
1f37 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3d.0x33 = 0x1f37,0x1e
1f38 a5fd       |    |		Store_Unchecked	0x2,-0x3
1f39 780a       |x   |		Jump	0x1f44
1f3a 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0x34 = 0x1f3a,0x1f
1f3b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3d.0x35 = 0x1f3b,0x1801
1f3c 0007       |    |		Action	Break_Optional
1f3d 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3d.0x36 = 0x1f3d,0x1802
1f3e 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0x37 = 0x1f3e,0x1803
1f3f 0007       |    |		Action	Break_Optional							; Debug Table 0x3d.0x38 = 0x1f3f,0x1804
1f40 0f40       | @  |		Execute_Immediate	Equal,0x40					; Debug Table 0x3d.0x39 = 0x1f40,0x1f
1f41 6802       |h   |		Jump_Zero	0x1f44
1f42 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3d.0x3a = 0x1f42,0x20
1f43 a5fd       |    |		Store_Unchecked	0x2,-0x3
1f44 00d1       |    |		Pop_Control	Pop_Count_1
1f45 7811       |x   |		Jump	0x1f57
1f46 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3d.0x3b = 0x1f46,0xf
1f47 a5fd       |    |		Store_Unchecked	0x2,-0x3
1f48 780e       |x   |		Jump	0x1f57
1f49 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3d.0x3c = 0x1f49,0x10
1f4a 00eb       |    |		Load_Encached	Diana_Cache
1f4b 18e9       |    |		Execute	Package,Field_Execute,Field_Number 0xe9
1f4c 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
1f4d 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3d.0x3d = 0x1f4d,0x11
1f4e 00da       |    |		Load_Top	At_Offset_2
1f4f 4974       |It  |		Short_Literal	0x174
1f50 00eb       |    |		Load_Encached	Diana_Cache
1f51 0098       |    |		Execute	Package,Field_Read_Dynamic
1f52 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
1f53 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3d.0x3e = 0x1f53,0x12
1f54 a5fe       |    |		Store_Unchecked	0x2,-0x2
1f55 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3d.0x3f = 0x1f55,0x13
1f56 a5fd       |    |		Store_Unchecked	0x2,-0x3
1f57 00d1       |    |		Pop_Control	Pop_Count_1
1f58 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1f59			TRAP_1eb0:
1f59 65da       |e   |		Indirect_Literal	Discrete,0x1d34,{0x00000000, 0x5a851501}
1f5a 010f       |    |		Execute	Exception,Equal
1f5b 6802       |h   |		Jump_Zero	0x1f5e
1f5c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3d.0x40 = 0x1f5c,0x22
1f5d 0101       |    |		Execute	Exception,Reraise
1f5e 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3d.0x41 = 0x1f5e,0x23
1f5f e009       |    |		Load	0x0,0x9
1f60 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1f61 0092 2523  |  %#|		Action	Push_String_Extended,0x2523					; "Target.Modify_Tree"
1f63 8222       | "  |		Call	0x1,0x22
1f64 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1f65 0000 0000  |    |		.XXX[0x3]
1f67 0000       |    |
1f68 ; --------------------------------------------------------------------------------------
1f68 ; SUBPROGRAM
1f68 ; --------------------------------------------------------------------------------------
1f68 1f6d       | m  |		.CONST	0x1f6d								; Address of begin
1f69 1ffb       |    |		.CONST	0x1ffb								; Address of exception handler
1f6a 0002       |    |		.CONST	0x0002								; Number of locals
1f6b			INIT_1f68:
1f6b 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x3e = .DEBUG	0x1f6b,0x39ae,0x0002,0x0000,0x005a,0x86a5,0x0000,0x09c9
													; Debug Table 0x3e.0x0 = 0x1f6b,0xffff
1f6c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1f6d			BODY_1f68:
1f6d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3e.0x1 = 0x1f6d,0x1
1f6e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1f6f 4602       |F   |		Jump_Case	0x3
1f70 780a       |x   |		Jump	0x1f7b								; case 0x0
1f71 785b       |x[  |		Jump	0x1fcd								; case 0x1
1f72 7800       |x   |		Jump	0x1f73								; case 0x2
1f73 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x2 = 0x1f73,0x2
1f74 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x3 = 0x1f74,0x401
1f75 0007       |    |		Action	Break_Optional
1f76 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3e.0x4 = 0x1f76,0x402
1f77 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x5 = 0x1f77,0x403
1f78 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x6 = 0x1f78,0x404
1f79 0fa8       |    |		Execute_Immediate	Equal,-0x58					; Debug Table 0x3e.0x7 = 0x1f79,0x2
1f7a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1f7b 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x8 = 0x1f7b,0x3
1f7c e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x9 = 0x1f7c,0x801
1f7d 0007       |    |		Action	Break_Optional
1f7e 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3e.0xa = 0x1f7e,0x802
1f7f 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0xb = 0x1f7f,0x803
1f80 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0xc = 0x1f80,0x804
1f81 0fab       |    |		Execute_Immediate	Equal,-0x55					; Debug Table 0x3e.0xd = 0x1f81,0x3
1f82 6802       |h   |		Jump_Zero	0x1f85
1f83 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3e.0xe = 0x1f83,0x4
1f84 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1f85 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3e.0xf = 0x1f85,0x5
1f86 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1f87 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
1f88 0007       |    |		Action	Break_Optional
1f89 e403       |    |		Load	0x2,0x3								; Debug Table 0x3e.0x10 = 0x1f89,0xc01
1f8a 0007       |    |		Action	Break_Optional
1f8b 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3e.0x11 = 0x1f8b,0xc02
1f8c 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x12 = 0x1f8c,0xc03
1f8d 00d0       |    |		Action	Swap_Control							; Debug Table 0x3e.0x13 = 0x1f8d,0xc04
1f8e 00d1       |    |		Pop_Control	Pop_Count_1
1f8f 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1				; Debug Table 0x3e.0x14 = 0x1f8f,0x5
1f90 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3e.0x15 = 0x1f90,0x6
1f91 0b89       |    |		Execute_Immediate	Case_Compare,0x89
1f92 7012       |p   |		Jump_Nonzero	0x1fa5
1f93 0b84       |    |		Execute_Immediate	Case_Compare,0x84
1f94 7014       |p   |		Jump_Nonzero	0x1fa9
1f95 0b8c       |    |		Execute_Immediate	Case_Compare,0x8c
1f96 7016       |p   |		Jump_Nonzero	0x1fad
1f97 0b8f       |    |		Execute_Immediate	Case_Compare,0x8f
1f98 7018       |p   |		Jump_Nonzero	0x1fb1
1f99 0b91       |    |		Execute_Immediate	Case_Compare,0x91
1f9a 701a       |p   |		Jump_Nonzero	0x1fb5
1f9b 0b95       |    |		Execute_Immediate	Case_Compare,0x95
1f9c 701c       |p   |		Jump_Nonzero	0x1fb9
1f9d 0b97       |    |		Execute_Immediate	Case_Compare,0x97
1f9e 7022       |p"  |		Jump_Nonzero	0x1fc1
1f9f 0b72       | r  |		Execute_Immediate	Case_Compare,0x72
1fa0 7024       |p$  |		Jump_Nonzero	0x1fc5
1fa1 0ba2       |    |		Execute_Immediate	Case_Compare,0xa2
1fa2 7026       |p&  |		Jump_Nonzero	0x1fc9
1fa3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3e.0x16 = 0x1fa3,0x10
1fa4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1fa5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x17 = 0x1fa5,0x7
1fa6 e00f       |    |		Load	0x0,0xf
1fa7 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1fa8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1fa9 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x18 = 0x1fa9,0x8
1faa e00f       |    |		Load	0x0,0xf
1fab 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
1fac 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1fad e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x19 = 0x1fad,0x9
1fae e00f       |    |		Load	0x0,0xf
1faf 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
1fb0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1fb1 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x1a = 0x1fb1,0xa
1fb2 e00f       |    |		Load	0x0,0xf
1fb3 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
1fb4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1fb5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x1b = 0x1fb5,0xb
1fb6 e00f       |    |		Load	0x0,0xf
1fb7 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
1fb8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1fb9 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x1c = 0x1fb9,0xc
1fba e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x1d = 0x1fba,0x1001
1fbb 0007       |    |		Action	Break_Optional
1fbc 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3e.0x1e = 0x1fbc,0x1002
1fbd 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x1f = 0x1fbd,0x1003
1fbe 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x20 = 0x1fbe,0x1004
1fbf 0f40       | @  |		Execute_Immediate	Equal,0x40					; Debug Table 0x3e.0x21 = 0x1fbf,0xc
1fc0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1fc1 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x22 = 0x1fc1,0xd
1fc2 e00f       |    |		Load	0x0,0xf
1fc3 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
1fc4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1fc5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x23 = 0x1fc5,0xe
1fc6 e00f       |    |		Load	0x0,0xf
1fc7 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1fc8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1fc9 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x24 = 0x1fc9,0xf
1fca e00f       |    |		Load	0x0,0xf
1fcb 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
1fcc 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1fcd e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3e.0x25 = 0x1fcd,0x11
1fce 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
1fcf 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
1fd0 00eb       |    |		Load_Encached	Diana_Cache
1fd1 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
1fd2 e403       |    |		Load	0x2,0x3								; Debug Table 0x3e.0x26 = 0x1fd2,0x1401
1fd3 0007       |    |		Action	Break_Optional
1fd4 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3e.0x27 = 0x1fd4,0x1402
1fd5 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x28 = 0x1fd5,0x1403
1fd6 00d0       |    |		Action	Swap_Control							; Debug Table 0x3e.0x29 = 0x1fd6,0x1404
1fd7 00d1       |    |		Pop_Control	Pop_Count_1
1fd8 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1				; Debug Table 0x3e.0x2a = 0x1fd8,0x11
1fd9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3e.0x2b = 0x1fd9,0x12
1fda 0007       |    |		Action	Break_Optional
1fdb e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x2c = 0x1fdb,0x1801
1fdc 0007       |    |		Action	Break_Optional
1fdd 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3e.0x2d = 0x1fdd,0x1802
1fde 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x2e = 0x1fde,0x1803
1fdf 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x2f = 0x1fdf,0x1804
1fe0 027f       |    |		Execute	Discrete,Equal							; Debug Table 0x3e.0x30 = 0x1fe0,0x12
1fe1 6802       |h   |		Jump_Zero	0x1fe4
1fe2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3e.0x31 = 0x1fe2,0x13
1fe3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1fe4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3e.0x32 = 0x1fe4,0x14
1fe5 0b8c       |    |		Execute_Immediate	Case_Compare,0x8c
1fe6 7004       |p   |		Jump_Nonzero	0x1feb
1fe7 0b91       |    |		Execute_Immediate	Case_Compare,0x91
1fe8 700a       |p   |		Jump_Nonzero	0x1ff3
1fe9 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3e.0x33 = 0x1fe9,0x17
1fea 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1feb 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x34 = 0x1feb,0x15
1fec e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x35 = 0x1fec,0x1c01
1fed 0007       |    |		Action	Break_Optional
1fee 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3e.0x36 = 0x1fee,0x1c02
1fef 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x37 = 0x1fef,0x1c03
1ff0 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x38 = 0x1ff0,0x1c04
1ff1 0f91       |    |		Execute_Immediate	Equal,-0x6f					; Debug Table 0x3e.0x39 = 0x1ff1,0x15
1ff2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1ff3 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x3a = 0x1ff3,0x16
1ff4 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3e.0x3b = 0x1ff4,0x2001
1ff5 0007       |    |		Action	Break_Optional
1ff6 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3e.0x3c = 0x1ff6,0x2002
1ff7 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x3d = 0x1ff7,0x2003
1ff8 0007       |    |		Action	Break_Optional							; Debug Table 0x3e.0x3e = 0x1ff8,0x2004
1ff9 0f8c       |    |		Execute_Immediate	Equal,-0x74					; Debug Table 0x3e.0x3f = 0x1ff9,0x16
1ffa 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1ffb			TRAP_1f68:
1ffb 6538       |e8  |		Indirect_Literal	Discrete,0x1d34,{0x00000000, 0x5a851501}
1ffc 010f       |    |		Execute	Exception,Equal
1ffd 6802       |h   |		Jump_Zero	0x2000
1ffe 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3e.0x40 = 0x1ffe,0x18
1fff 0101       |    |		Execute	Exception,Reraise
2000 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3e.0x41 = 0x2000,0x19
2001 e009       |    |		Load	0x0,0x9
2002 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
2003 0092 2524  |  %$|		Action	Push_String_Extended,0x2524					; "Target.Placeable"
2005 8222       | "  |		Call	0x1,0x22
2006 4831       |H1  |		Short_Literal	0x31
2007 0257       | W  |		Execute	Discrete,Raise
2008 ; --------------------------------------------------------------------------------------
2008 ; SUBPROGRAM
2008 ; --------------------------------------------------------------------------------------
2008 2012       |    |		.CONST	0x2012								; Address of begin
2009 2080       |    |		.CONST	0x2080								; Address of exception handler
200a 0003       |    |		.CONST	0x0003								; Number of locals
200b			INIT_2008:
200b e002       |    |		Load	0x0,0x2								; Debug Table 0x3f = .DEBUG	0x200b,0x3a34,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0aff
													; Debug Table 0x3f.0x0 = 0x200b,0xffff
200c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
200d e005       |    |		Load	0x0,0x5								; Debug Table 0x3f.0x1 = 0x200d,0xfffe
200e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
200f 02c7       |    |		Declare_Variable	Any
2010 00d8       |    |		Load_Top	At_Offset_0
2011 1c00       |    |		Execute_Immediate	Run_Utility,0x0
2012			BODY_2008:
2012 4803       |H   |		Short_Literal	0x3							; Debug Table 0x3f.0x2 = 0x2012,0x1
2013 a5fd       |    |		Store_Unchecked	0x2,-0x3
2014 0007       |    |		Action	Break_Optional							; Debug Table 0x3f.0x3 = 0x2014,0x2
2015 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3f.0x4 = 0x2015,0x401
2016 021d       |    |		Execute	Heap_Access,Is_Null
2017 6803       |h   |		Jump_Zero	0x201b							; Debug Table 0x3f.0x5 = 0x2017,0x2
2018 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3f.0x6 = 0x2018,0x3
2019 a5fd       |    |		Store_Unchecked	0x2,-0x3
201a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
201b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3f.0x7 = 0x201b,0x4
201c e5ff       |    |		Load	0x2,-0x1
201d 824c       | L  |		Call	0x1,0x4c
201e 685e       |h^  |		Jump_Zero	0x207d
201f e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3f.0x8 = 0x201f,0x5
2020 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
2021 701d       |p   |		Jump_Nonzero	0x203f
2022 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3f.0x9 = 0x2022,0x6
2023 e5fe       |    |		Load	0x2,-0x2
2024 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2025 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
2026 4974       |It  |		Short_Literal	0x174
2027 00eb       |    |		Load_Encached	Diana_Cache
2028 0098       |    |		Execute	Package,Field_Read_Dynamic
2029 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
202a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3f.0xa = 0x202a,0x7
202b 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
202c 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
202d e5ff       |    |		Load	0x2,-0x1
202e e5fe       |    |		Load	0x2,-0x2
202f 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2030 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
2031 4975       |Iu  |		Short_Literal	0x175
2032 00eb       |    |		Load_Encached	Diana_Cache
2033 0098       |    |		Execute	Package,Field_Read_Dynamic
2034 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
2035 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3f.0xb = 0x2035,0x8
2036 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2037 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
2038 e5fe       |    |		Load	0x2,-0x2
2039 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
203a 2604       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
203b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
203c e005       |    |		Load	0x0,0x5
203d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
203e 7837       |x7  |		Jump	0x2076
203f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3f.0xc = 0x203f,0x9
2040 e5fe       |    |		Load	0x2,-0x2
2041 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2042 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
2043 e005       |    |		Load	0x0,0x5
2044 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
2045 e002       |    |		Load	0x0,0x2								; Debug Table 0x3f.0xd = 0x2045,0xa
2046 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
2047 e5fe       |    |		Load	0x2,-0x2
2048 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2049 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
204a e5ff       |    |		Load	0x2,-0x1
204b e002       |    |		Load	0x0,0x2
204c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
204d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
204e 005a       | Z  |		Store_Top	Discrete,At_Offset_2
204f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3f.0xe = 0x204f,0xb
2050 0092 2525  |  %%|		Action	Push_String_Extended,0x2525					; "Ada.Set_Root"
2052 820f       |    |		Call	0x1,0xf
2053 e002       |    |		Load	0x0,0x2								; Debug Table 0x3f.0xf = 0x2053,0xc
2054 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
2055 e5fe       |    |		Load	0x2,-0x2
2056 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2057 2e0b       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xb
2058 4801       |H   |		Short_Literal	0x1
2059 e5fe       |    |		Load	0x2,-0x2
205a 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
205b 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
205c e00c       |    |		Load	0x0,0xc
205d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
205e e5fe       |    |		Load	0x2,-0x2
205f 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2060 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
2061 005a       | Z  |		Store_Top	Discrete,At_Offset_2
2062 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3f.0x10 = 0x2062,0xd
2063 0092 251e  |  % |		Action	Push_String_Extended,0x251e					; "Ada_Utilities.Close_Image"
2065 820f       |    |		Call	0x1,0xf
2066 e002       |    |		Load	0x0,0x2								; Debug Table 0x3f.0x11 = 0x2066,0xe
2067 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
2068 4800       |H   |		Short_Literal	0x0
2069 4801       |H   |		Short_Literal	0x1
206a e5fe       |    |		Load	0x2,-0x2
206b 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
206c 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
206d e5ff       |    |		Load	0x2,-0x1
206e e002       |    |		Load	0x0,0x2
206f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
2070 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
2071 005a       | Z  |		Store_Top	Discrete,At_Offset_2
2072 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3f.0x12 = 0x2072,0xf
2073 0092 24e5  |  $ |		Action	Push_String_Extended,0x24e5					; "Ada.Close"
2075 820f       |    |		Call	0x1,0xf
2076 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3f.0x13 = 0x2076,0x10
2077 e5fe       |    |		Load	0x2,-0x2
2078 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2079 2801       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1
207a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3f.0x14 = 0x207a,0x11
207b a5fd       |    |		Store_Unchecked	0x2,-0x3
207c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
207d 4803       |H   |		Short_Literal	0x3							; Debug Table 0x3f.0x15 = 0x207d,0x12
207e a5fd       |    |		Store_Unchecked	0x2,-0x3
207f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
2080			TRAP_2008:
2080 6343       |cC  |		Indirect_Literal	Discrete,0x23c4,{0x00000000, 0x5a851501}
2081 010f       |    |		Execute	Exception,Equal
2082 6802       |h   |		Jump_Zero	0x2085
2083 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3f.0x16 = 0x2083,0x13
2084 0101       |    |		Execute	Exception,Reraise
2085 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3f.0x17 = 0x2085,0x14
2086 e009       |    |		Load	0x0,0x9
2087 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
2088 0092 2526  |  %&|		Action	Push_String_Extended,0x2526					; "Target.Place_Tree"
208a 8222       | "  |		Call	0x1,0x22
208b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
208c 0000 0000  |    |		.BLANK	0000[0x4]
2090 ; --------------------------------------------------------------------------------------
2090 ; SUBPROGRAM
2090 ; --------------------------------------------------------------------------------------
2090 20b4       |    |		.CONST	0x20b4								; Address of begin
2091 2123       |!#  |		.CONST	0x2123								; Address of exception handler
2092 000b       |    |		.CONST	0x000b								; Number of locals
2093			INIT_2090:
2093 e004       |    |		Load	0x0,0x4								; Debug Table 0x40 = .DEBUG	0x2093,0x3a66,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0bd5
													; Debug Table 0x40.0x0 = 0x2093,0xffff
2094 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
2095 02c7       |    |		Declare_Variable	Any
2096 00d8       |    |		Load_Top	At_Offset_0
2097 1c00       |    |		Execute_Immediate	Run_Utility,0x0
2098 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x40.0x1 = 0x2098,0xfffe
2099 e002       |    |		Load	0x0,0x2								; Debug Table 0x40.0x2 = 0x2099,0xfffd
209a 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
209b 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
209c e00e       |    |		Load	0x0,0xe								; Debug Table 0x40.0x3 = 0x209c,0xfffc
209d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
209e 02c7       |    |		Declare_Variable	Any
209f 00d8       |    |		Load_Top	At_Offset_0
20a0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
20a1 e002       |    |		Load	0x0,0x2								; Debug Table 0x40.0x4 = 0x20a1,0xfffb
20a2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
20a3 e002       |    |		Load	0x0,0x2								; Debug Table 0x40.0x5 = 0x20a3,0xfffa
20a4 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
20a5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
20a6 02c7       |    |		Declare_Variable	Any
20a7 00d8       |    |		Load_Top	At_Offset_0
20a8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
20a9 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x40.0x6 = 0x20a9,0xfff9
20aa 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x40.0x7 = 0x20aa,0xfff8
20ab e002       |    |		Load	0x0,0x2								; Debug Table 0x40.0x8 = 0x20ab,0xfff7
20ac 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
20ad 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
20ae e002       |    |		Load	0x0,0x2								; Debug Table 0x40.0x9 = 0x20ae,0xfff6
20af 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
20b0 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
20b1 02c7       |    |		Declare_Variable	Any
20b2 00d8       |    |		Load_Top	At_Offset_0
20b3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
20b4			BODY_2090:
20b4 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x40.0xa = 0x20b4,0x1
20b5 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
20b6 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
20b7 00eb       |    |		Load_Encached	Diana_Cache
20b8 18e9       |    |		Execute	Package,Field_Execute,Field_Number 0xe9
20b9 a408       |    |		Store_Unchecked	0x2,0x8
20ba 0007       |    |		Action	Break_Optional							; Debug Table 0x40.0xb = 0x20ba,0x2
20bb e408       |    |		Load	0x2,0x8								; Debug Table 0x40.0xc = 0x20bb,0x401
20bc 0007       |    |		Action	Break_Optional
20bd 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x40.0xd = 0x20bd,0x402
20be 0007       |    |		Action	Break_Optional							; Debug Table 0x40.0xe = 0x20be,0x403
20bf 0007       |    |		Action	Break_Optional							; Debug Table 0x40.0xf = 0x20bf,0x404
20c0 0b47       | G  |		Execute_Immediate	Case_Compare,0x47				; Debug Table 0x40.0x10 = 0x20c0,0x2
20c1 7003       |p   |		Jump_Nonzero	0x20c5
20c2 0b48       | H  |		Execute_Immediate	Case_Compare,0x48
20c3 7001       |p   |		Jump_Nonzero	0x20c5
20c4 782a       |x*  |		Jump	0x20ef								; Debug Table 0x40.0x11 = 0x20c4,0x7
20c5 e408       |    |		Load	0x2,0x8								; Debug Table 0x40.0x12 = 0x20c5,0x3
20c6 4976       |Iv  |		Short_Literal	0x176
20c7 00eb       |    |		Load_Encached	Diana_Cache
20c8 0098       |    |		Execute	Package,Field_Read_Dynamic
20c9 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
20ca a409       |    |		Store_Unchecked	0x2,0x9
20cb e002       |    |		Load	0x0,0x2								; Debug Table 0x40.0x13 = 0x20cb,0x4
20cc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
20cd 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
20ce 00da       |    |		Load_Top	At_Offset_2
20cf 62f0       |b   |		Indirect_Literal	Discrete,0x23c0,{0x00000000, 0x00004000}
20d0 e004       |    |		Load	0x0,0x4
20d1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
20d2 e011       |    |		Load	0x0,0x11
20d3 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
20d4 e012       |    |		Load	0x0,0x12
20d5 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
20d6 4801       |H   |		Short_Literal	0x1
20d7 4800       |H   |		Short_Literal	0x0
20d8 e5ff       |    |		Load	0x2,-0x1
20d9 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
20da 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
20db 4974       |It  |		Short_Literal	0x174
20dc 00eb       |    |		Load_Encached	Diana_Cache
20dd 0098       |    |		Execute	Package,Field_Read_Dynamic
20de 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
20df e409       |    |		Load	0x2,0x9
20e0 00eb       |    |		Load_Encached	Diana_Cache
20e1 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
20e2 00eb       |    |		Load_Encached	Diana_Cache
20e3 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
20e4 0092 2527  |  %'|		Action	Push_String_Extended,0x2527					; "'SPEC"
20e6 01cc       |    |		Execute	Vector,Catenate
20e7 e002       |    |		Load	0x0,0x2
20e8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
20e9 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
20ea c40b       |    |		Store	0x2,0xb
20eb 005b       | [  |		Store_Top	Discrete,At_Offset_3
20ec 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x40.0x14 = 0x20ec,0x5
20ed 6801       |h   |		Jump_Zero	0x20ef
20ee 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x40.0x15 = 0x20ee,0x6
20ef 00d1       |    |		Pop_Control	Pop_Count_1
20f0 e013       |    |		Load	0x0,0x13							; Debug Table 0x40.0x16 = 0x20f0,0x8
20f1 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
20f2 e004       |    |		Load	0x0,0x4
20f3 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
20f4 c402       |    |		Store	0x2,0x2
20f5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x40.0x17 = 0x20f5,0x9
20f6 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
20f7 2e09       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9
20f8 8231       | 1  |		Call	0x1,0x31
20f9 c407       |    |		Store	0x2,0x7
20fa e002       |    |		Load	0x0,0x2								; Debug Table 0x40.0x18 = 0x20fa,0xa
20fb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
20fc 00f1       |    |		Load_Encached	Diana_Temp_Seq
20fd e002       |    |		Load	0x0,0x2
20fe 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
20ff 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
2100 e405       |    |		Load	0x2,0x5
2101 0120       |    |		Execute	Any,Is_Value
2102 6803       |h   |		Jump_Zero	0x2106
2103 e00e       |    |		Load	0x0,0xe
2104 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
2105 7801       |x   |		Jump	0x2107
2106 e405       |    |		Load	0x2,0x5
2107 e5ff       |    |		Load	0x2,-0x1
2108 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2109 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
210a 62b5       |b   |		Indirect_Literal	Discrete,0x23c0,{0x00000000, 0x00004000}
210b e402       |    |		Load	0x2,0x2
210c 4803       |H   |		Short_Literal	0x3
210d e407       |    |		Load	0x2,0x7
210e e002       |    |		Load	0x0,0x2
210f 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
2110 4802       |H   |		Short_Literal	0x2
2111 e002       |    |		Load	0x0,0x2
2112 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
2113 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
2114 e5ff       |    |		Load	0x2,-0x1
2115 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2116 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
2117 c405       |    |		Store	0x2,0x5
2118 c404       |    |		Store	0x2,0x4
2119 c403       |    |		Store	0x2,0x3
211a c406       |    |		Store	0x2,0x6
211b e402       |    |		Load	0x2,0x2								; Debug Table 0x40.0x19 = 0x211b,0xb
211c 4801       |H   |		Short_Literal	0x1
211d e406       |    |		Load	0x2,0x6
211e 0f00       |    |		Execute_Immediate	Equal,0x0
211f e004       |    |		Load	0x0,0x4
2120 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
2121 c402       |    |		Store	0x2,0x2
2122 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
2123			TRAP_2090:
2123 62a0       |b   |		Indirect_Literal	Discrete,0x23c4,{0x00000000, 0x5a851501}
2124 010f       |    |		Execute	Exception,Equal
2125 6808       |h   |		Jump_Zero	0x212e
2126 e402       |    |		Load	0x2,0x2								; Debug Table 0x40.0x1a = 0x2126,0xc
2127 4801       |H   |		Short_Literal	0x1
2128 4800       |H   |		Short_Literal	0x0
2129 e004       |    |		Load	0x0,0x4
212a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
212b c402       |    |		Store	0x2,0x2
212c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x40.0x1b = 0x212c,0xd
212d 0101       |    |		Execute	Exception,Reraise
212e e402       |    |		Load	0x2,0x2								; Debug Table 0x40.0x1c = 0x212e,0xe
212f 4801       |H   |		Short_Literal	0x1
2130 4800       |H   |		Short_Literal	0x0
2131 e004       |    |		Load	0x0,0x4
2132 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
2133 c402       |    |		Store	0x2,0x2
2134 4801       |H   |		Short_Literal	0x1							; Debug Table 0x40.0x1d = 0x2134,0xf
2135 e009       |    |		Load	0x0,0x9
2136 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
2137 0092 2528  |  %(|		Action	Push_String_Extended,0x2528					; "Target.Make_Library_Stub"
2139 8222       | "  |		Call	0x1,0x22
213a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
213b 0000 0000  |    |		.BLANK	0000[0x5]
2140 ; --------------------------------------------------------------------------------------
2140 ; SUBPROGRAM
2140 ; --------------------------------------------------------------------------------------
2140 2143       |!C  |		.CONST	0x2143								; Address of begin
2141 2177       |!w  |		.CONST	0x2177								; Address of exception handler
2142 0001       |    |		.CONST	0x0001								; Number of locals
2143			BODY_2140:
2143			INIT_2140:
2143 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x41 = .DEBUG	0x2143,0x3aa4,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0cf0
													; Debug Table 0x41.0x0 = 0x2143,0x1
2144 680b       |h   |		Jump_Zero	0x2150
2145 e007       |    |		Load	0x0,0x7								; Debug Table 0x41.0x1 = 0x2145,0x2
2146 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
2147 0092 2529  |  %)|		Action	Push_String_Extended,0x2529					; "*** Bad status from Command_Utilities.Target.Insert_At_Cursor: "
													; Debug Table 0x41.0x2 = 0x2147,0x3
2149 00db       |    |		Load_Top	At_Offset_3
214a e219       |    |		Load	0x1,0x19
214b 025e       | ^  |		Execute	Discrete,Convert
214c 1c01       |    |		Execute_Immediate	Run_Utility,0x1
214d 01cc       |    |		Execute	Vector,Catenate
214e e007       |    |		Load	0x0,0x7
214f 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
2150 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x41.0x3 = 0x2150,0x4
2151 01db       |    |		Execute	Vector,Length
2152 6823       |h#  |		Jump_Zero	0x2176
2153 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x41.0x4 = 0x2153,0x5
2154 4605       |F   |		Jump_Case	0x6
2155 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; case 0x0
2156 7804       |x   |		Jump	0x215b								; case 0x1
2157 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; case 0x2
2158 7809       |x   |		Jump	0x2162								; case 0x3
2159 780f       |x   |		Jump	0x2169								; case 0x4
215a 7815       |x   |		Jump	0x2170								; case 0x5
215b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x41.0x5 = 0x215b,0x7
215c 0092 252a  |  %*|		Action	Push_String_Extended,0x252a					; " failed - insertion not allowed at destination"
215e 01cc       |    |		Execute	Vector,Catenate
215f e00a       |    |		Load	0x0,0xa
2160 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
2161 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
2162 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x41.0x6 = 0x2162,0x9
2163 0092 252a  |  %*|		Action	Push_String_Extended,0x252a					; " failed - insertion not allowed at destination"
2165 01cc       |    |		Execute	Vector,Catenate
2166 e00a       |    |		Load	0x0,0xa
2167 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
2168 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
2169 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x41.0x7 = 0x2169,0xa
216a 0092 252b  |  %+|		Action	Push_String_Extended,0x252b					; " failed - exception making unit"
216c 01cc       |    |		Execute	Vector,Catenate
216d e00a       |    |		Load	0x0,0xa
216e 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
216f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
2170 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x41.0x8 = 0x2170,0xb
2171 0092 252c  |  %,|		Action	Push_String_Extended,0x252c					; " failed - internal error"
2173 01cc       |    |		Execute	Vector,Catenate
2174 e00a       |    |		Load	0x0,0xa
2175 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
2176 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
2177			TRAP_2140:
2177 624c       |bL  |		Indirect_Literal	Discrete,0x23c4,{0x00000000, 0x5a851501}
2178 010f       |    |		Execute	Exception,Equal
2179 6802       |h   |		Jump_Zero	0x217c
217a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x41.0x9 = 0x217a,0xc
217b 0101       |    |		Execute	Exception,Reraise
217c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x41.0xa = 0x217c,0xd
217d e009       |    |		Load	0x0,0x9
217e 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
217f 0092 252d  |  %-|		Action	Push_String_Extended,0x252d					; "Target.Give_Messages"
2181 8222       | "  |		Call	0x1,0x22
2182 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
2183 0000 0000  |    |		.BLANK	0000[0x5]
2188 ; --------------------------------------------------------------------------------------
2188 ; SUBPROGRAM
2188 ; --------------------------------------------------------------------------------------
2188 218d       |!   |		.CONST	0x218d								; Address of begin
2189 21f3       |!   |		.CONST	0x21f3								; Address of exception handler
218a 0002       |    |		.CONST	0x0002								; Number of locals
218b			INIT_2188:
218b e002       |    |		Load	0x0,0x2								; Debug Table 0x42 = .DEBUG	0x218b,0x3abc,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0d88
													; Debug Table 0x42.0x0 = 0x218b,0xffff
218c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
218d			BODY_2188:
218d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x42.0x1 = 0x218d,0x1
218e 4605       |F   |		Jump_Case	0x6
218f 7805       |x   |		Jump	0x2195								; case 0x0
2190 7858       |xX  |		Jump	0x21e9								; case 0x1
2191 781b       |x   |		Jump	0x21ad								; case 0x2
2192 781a       |x   |		Jump	0x21ad								; case 0x3
2193 7819       |x   |		Jump	0x21ad								; case 0x4
2194 7818       |x   |		Jump	0x21ad								; case 0x5
2195 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x42.0x2 = 0x2195,0x3
2196 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
2197 700a       |p   |		Jump_Nonzero	0x21a2
2198 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x42.0x3 = 0x2198,0x4
2199 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
219a 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
219b 4800       |H   |		Short_Literal	0x0
219c e003       |    |		Load	0x0,0x3
219d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
219e e5fd       |    |		Load	0x2,-0x3
219f 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
21a0 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
21a1 7847       |xG  |		Jump	0x21e9
21a2 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x42.0x4 = 0x21a2,0x5
21a3 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
21a4 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
21a5 4801       |H   |		Short_Literal	0x1
21a6 4801       |H   |		Short_Literal	0x1
21a7 e004       |    |		Load	0x0,0x4
21a8 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
21a9 e5fd       |    |		Load	0x2,-0x3
21aa 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
21ab 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
21ac 783c       |x<  |		Jump	0x21e9
21ad e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x42.0x5 = 0x21ad,0x6
21ae 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
21af 700a       |p   |		Jump_Nonzero	0x21ba
21b0 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x42.0x6 = 0x21b0,0x7
21b1 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
21b2 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
21b3 4802       |H   |		Short_Literal	0x2
21b4 e003       |    |		Load	0x0,0x3
21b5 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
21b6 e5fd       |    |		Load	0x2,-0x3
21b7 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
21b8 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
21b9 782f       |x/  |		Jump	0x21e9
21ba e002       |    |		Load	0x0,0x2								; Debug Table 0x42.0x7 = 0x21ba,0x8
21bb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
21bc e5fd       |    |		Load	0x2,-0x3
21bd 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
21be 2e0b       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xb
21bf 4800       |H   |		Short_Literal	0x0
21c0 e5fd       |    |		Load	0x2,-0x3
21c1 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
21c2 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
21c3 e00c       |    |		Load	0x0,0xc
21c4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
21c5 e5fd       |    |		Load	0x2,-0x3
21c6 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
21c7 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
21c8 0059       | Y  |		Store_Top	Discrete,At_Offset_1
21c9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x42.0x8 = 0x21c9,0x9
21ca 0092 251e  |  % |		Action	Push_String_Extended,0x251e					; "Ada_Utilities.Close_Image"
21cc 820f       |    |		Call	0x1,0xf
21cd e002       |    |		Load	0x0,0x2								; Debug Table 0x42.0x9 = 0x21cd,0xa
21ce 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
21cf 4800       |H   |		Short_Literal	0x0
21d0 4800       |H   |		Short_Literal	0x0
21d1 e5fd       |    |		Load	0x2,-0x3
21d2 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
21d3 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
21d4 e5fd       |    |		Load	0x2,-0x3
21d5 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
21d6 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
21d7 e002       |    |		Load	0x0,0x2
21d8 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
21d9 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
21da 0059       | Y  |		Store_Top	Discrete,At_Offset_1
21db 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x42.0xa = 0x21db,0xb
21dc 0092 24e5  |  $ |		Action	Push_String_Extended,0x24e5					; "Ada.Close"
21de 820f       |    |		Call	0x1,0xf
21df e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x42.0xb = 0x21df,0xc
21e0 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
21e1 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
21e2 4801       |H   |		Short_Literal	0x1
21e3 4800       |H   |		Short_Literal	0x0
21e4 e004       |    |		Load	0x0,0x4
21e5 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
21e6 e5fd       |    |		Load	0x2,-0x3
21e7 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
21e8 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
21e9 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x42.0xc = 0x21e9,0xd
21ea e5ff       |    |		Load	0x2,-0x1
21eb 824f       | O  |		Call	0x1,0x4f
21ec e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x42.0xd = 0x21ec,0xe
21ed 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
21ee 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
21ef e002       |    |		Load	0x0,0x2
21f0 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
21f1 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
21f2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
21f3			TRAP_2188:
21f3 61d0       |a   |		Indirect_Literal	Discrete,0x23c4,{0x00000000, 0x5a851501}
21f4 010f       |    |		Execute	Exception,Equal
21f5 6802       |h   |		Jump_Zero	0x21f8
21f6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x42.0xe = 0x21f6,0xf
21f7 0101       |    |		Execute	Exception,Reraise
21f8 4801       |H   |		Short_Literal	0x1							; Debug Table 0x42.0xf = 0x21f8,0x10
21f9 e009       |    |		Load	0x0,0x9
21fa 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
21fb 0092 252e  |  %.|		Action	Push_String_Extended,0x252e					; "Target.Epilogue"
21fd 8222       | "  |		Call	0x1,0x22
21fe 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
21ff 0000       |    |		.XXX[0x1]
2200 ; --------------------------------------------------------------------------------------
2200 ; SUBPROGRAM
2200 ; --------------------------------------------------------------------------------------
2200 2210       |"   |		.CONST	0x2210								; Address of begin
2201 2234       |"4  |		.CONST	0x2234								; Address of exception handler
2202 0005       |    |		.CONST	0x0005								; Number of locals
2203			INIT_2200:
2203 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x43 = .DEBUG	0x2203,0x3ade,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0e47
													; Debug Table 0x43.0x0 = 0x2203,0xffff
2204 e002       |    |		Load	0x0,0x2								; Debug Table 0x43.0x1 = 0x2204,0xfffe
2205 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
2206 02c7       |    |		Declare_Variable	Any
2207 00d8       |    |		Load_Top	At_Offset_0
2208 1c00       |    |		Execute_Immediate	Run_Utility,0x0
2209 e002       |    |		Load	0x0,0x2								; Debug Table 0x43.0x2 = 0x2209,0xfffd
220a 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
220b 02ff       |    |		Declare_Variable	Variant_Record
220c 00d8       |    |		Load_Top	At_Offset_0
220d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
220e e002       |    |		Load	0x0,0x2								; Debug Table 0x43.0x3 = 0x220e,0xfffc
220f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
2210			BODY_2200:
2210 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x43.0x4 = 0x2210,0x1
2211 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2212 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
2213 8224       | $  |		Call	0x1,0x24
2214 c403       |    |		Store	0x2,0x3
2215 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x43.0x5 = 0x2215,0x2
2216 00db       |    |		Load_Top	At_Offset_3
2217 8227       | '  |		Call	0x1,0x27
2218 c402       |    |		Store	0x2,0x2
2219 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x43.0x6 = 0x2219,0x3
221a 7001       |p   |		Jump_Nonzero	0x221c
221b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x43.0x7 = 0x221b,0x4
221c e002       |    |		Load	0x0,0x2								; Debug Table 0x43.0x8 = 0x221c,0x5
221d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
221e 00da       |    |		Load_Top	At_Offset_2
221f 61a0       |a   |		Indirect_Literal	Discrete,0x23c0,{0x00000000, 0x00004000}
2220 e004       |    |		Load	0x0,0x4
2221 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
2222 4800       |H   |		Short_Literal	0x0
2223 e403       |    |		Load	0x2,0x3
2224 e002       |    |		Load	0x0,0x2
2225 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
2226 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
2227 00d1       |    |		Pop_Control	Pop_Count_1
2228 0059       | Y  |		Store_Top	Discrete,At_Offset_1
2229 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x43.0x9 = 0x2229,0x6
222a 0092 24c3  |  $ |		Action	Push_String_Extended,0x24c3					; "Traversal.Get_Version"
222c 820f       |    |		Call	0x1,0xf
222d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x43.0xa = 0x222d,0x7
222e 4800       |H   |		Short_Literal	0x0
222f e5fe       |    |		Load	0x2,-0x2
2230 4801       |H   |		Short_Literal	0x1
2231 e001       |    |		Load	0x0,0x1
2232 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
2233 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
2234			TRAP_2200:
2234 618f       |a   |		Indirect_Literal	Discrete,0x23c4,{0x00000000, 0x5a851501}
2235 010f       |    |		Execute	Exception,Equal
2236 6802       |h   |		Jump_Zero	0x2239
2237 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x43.0xb = 0x2237,0x8
2238 0101       |    |		Execute	Exception,Reraise
2239 4801       |H   |		Short_Literal	0x1							; Debug Table 0x43.0xc = 0x2239,0x9
223a e009       |    |		Load	0x0,0x9
223b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
223c 0092 252f  |  %/|		Action	Push_String_Extended,0x252f					; "Target.Edit_Image"
223e 8222       | "  |		Call	0x1,0x22
223f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
2240 ; --------------------------------------------------------------------------------------
2240 ; SUBPROGRAM
2240 ; --------------------------------------------------------------------------------------
2240 2256       |"V  |		.CONST	0x2256								; Address of begin
2241 22b6       |"   |		.CONST	0x22b6								; Address of exception handler
2242 0008       |    |		.CONST	0x0008								; Number of locals
2243			INIT_2240:
2243 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x44 = .DEBUG	0x2243,0x3afa,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0eb3
													; Debug Table 0x44.0x0 = 0x2243,0xffff
2244 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x44.0x1 = 0x2244,0xfffe
2245 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x44.0x2 = 0x2245,0xfffd
2246 e002       |    |		Load	0x0,0x2								; Debug Table 0x44.0x3 = 0x2246,0xfffc
2247 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
2248 02ff       |    |		Declare_Variable	Variant_Record
2249 00d8       |    |		Load_Top	At_Offset_0
224a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
224b e002       |    |		Load	0x0,0x2								; Debug Table 0x44.0x4 = 0x224b,0xfffb
224c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
224d 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
224e 02c7       |    |		Declare_Variable	Any
224f 00d8       |    |		Load_Top	At_Offset_0
2250 1c00       |    |		Execute_Immediate	Run_Utility,0x0
2251 e002       |    |		Load	0x0,0x2								; Debug Table 0x44.0x5 = 0x2251,0xfffa
2252 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
2253 e001       |    |		Load	0x0,0x1								; Debug Table 0x44.0x6 = 0x2253,0xfff9
2254 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
2255 0322       | "  |		Declare_Variable	Record
2256			BODY_2240:
2256 e002       |    |		Load	0x0,0x2								; Debug Table 0x44.0x7 = 0x2256,0x1
2257 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
2258 e405       |    |		Load	0x2,0x5
2259 6166       |af  |		Indirect_Literal	Discrete,0x23c0,{0x00000000, 0x00004000}
225a e004       |    |		Load	0x0,0x4
225b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
225c 4800       |H   |		Short_Literal	0x0
225d e5ff       |    |		Load	0x2,-0x1
225e 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
225f 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
2260 e002       |    |		Load	0x0,0x2
2261 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
2262 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
2263 00d1       |    |		Pop_Control	Pop_Count_1
2264 005a       | Z  |		Store_Top	Discrete,At_Offset_2
2265 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x44.0x8 = 0x2265,0x2
2266 0092 24c3  |  $ |		Action	Push_String_Extended,0x24c3					; "Traversal.Get_Version"
2268 820f       |    |		Call	0x1,0xf
2269 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x44.0x9 = 0x2269,0x3
226a 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
226b 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
226c e001       |    |		Load	0x0,0x1
226d 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
226e 700f       |p   |		Jump_Nonzero	0x227e
226f 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x44.0xa = 0x226f,0x4
2270 e5ff       |    |		Load	0x2,-0x1
2271 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2272 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
2273 8227       | '  |		Call	0x1,0x27
2274 c402       |    |		Store	0x2,0x2
2275 e402       |    |		Load	0x2,0x2								; Debug Table 0x44.0xb = 0x2275,0x5
2276 7001       |p   |		Jump_Nonzero	0x2278
2277 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x44.0xc = 0x2277,0x6
2278 4801       |H   |		Short_Literal	0x1							; Debug Table 0x44.0xd = 0x2278,0x7
2279 e5ff       |    |		Load	0x2,-0x1
227a 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
227b 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
227c e001       |    |		Load	0x0,0x1
227d 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
227e e002       |    |		Load	0x0,0x2								; Debug Table 0x44.0xe = 0x227e,0x8
227f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
2280 00db       |    |		Load_Top	At_Offset_3
2281 0120       |    |		Execute	Any,Is_Value
2282 6804       |h   |		Jump_Zero	0x2287
2283 e002       |    |		Load	0x0,0x2
2284 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
2285 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
2286 7801       |x   |		Jump	0x2288
2287 00db       |    |		Load_Top	At_Offset_3
2288 e002       |    |		Load	0x0,0x2
2289 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
228a 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
228b e405       |    |		Load	0x2,0x5
228c 4800       |H   |		Short_Literal	0x0
228d 4800       |H   |		Short_Literal	0x0
228e 4800       |H   |		Short_Literal	0x0
228f e004       |    |		Load	0x0,0x4
2290 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
2291 4800       |H   |		Short_Literal	0x0
2292 e002       |    |		Load	0x0,0x2
2293 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
2294 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
2295 00d1       |    |		Pop_Control	Pop_Count_1
2296 c403       |    |		Store	0x2,0x3
2297 c406       |    |		Store	0x2,0x6
2298 005a       | Z  |		Store_Top	Discrete,At_Offset_2
2299 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x44.0xf = 0x2299,0x9
229a 0092 24e4  |  $ |		Action	Push_String_Extended,0x24e4					; "Ada.Open"
229c 820f       |    |		Call	0x1,0xf
229d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x44.0x10 = 0x229d,0xa
229e 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
229f 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
22a0 e403       |    |		Load	0x2,0x3
22a1 8228       | (  |		Call	0x1,0x28
22a2 a404       |    |		Store_Unchecked	0x2,0x4
22a3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x44.0x11 = 0x22a3,0xb
22a4 4801       |H   |		Short_Literal	0x1
22a5 4800       |H   |		Short_Literal	0x0
22a6 4800       |H   |		Short_Literal	0x0
22a7 e001       |    |		Load	0x0,0x1
22a8 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
22a9 e404       |    |		Load	0x2,0x4
22aa e001       |    |		Load	0x0,0x1
22ab 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
22ac 00d1       |    |		Pop_Control	Pop_Count_1
22ad 4800       |H   |		Short_Literal	0x0							; Debug Table 0x44.0x12 = 0x22ad,0xc
22ae e404       |    |		Load	0x2,0x4
22af 00da       |    |		Load_Top	At_Offset_2
22b0 e001       |    |		Load	0x0,0x1
22b1 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
22b2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x44.0x13 = 0x22b2,0xd
22b3 e001       |    |		Load	0x0,0x1
22b4 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
22b5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
22b6			TRAP_2240:
22b6 610d       |a   |		Indirect_Literal	Discrete,0x23c4,{0x00000000, 0x5a851501}
22b7 010f       |    |		Execute	Exception,Equal
22b8 6802       |h   |		Jump_Zero	0x22bb
22b9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x44.0x14 = 0x22b9,0xe
22ba 0101       |    |		Execute	Exception,Reraise
22bb 4801       |H   |		Short_Literal	0x1							; Debug Table 0x44.0x15 = 0x22bb,0xf
22bc e009       |    |		Load	0x0,0x9
22bd 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
22be 0092 2530  |  %0|		Action	Push_String_Extended,0x2530					; "Target.Edit_Insertion"
22c0 8222       | "  |		Call	0x1,0x22
22c1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
22c2 0000 0000  |    |		.BLANK	0000[0x6]
22c8 ; --------------------------------------------------------------------------------------
22c8 ; SUBPROGRAM
22c8 ; --------------------------------------------------------------------------------------
22c8 22f0       |"   |		.CONST	0x22f0								; Address of begin
22c9 23a6       |#   |		.CONST	0x23a6								; Address of exception handler
22ca 000b       |    |		.CONST	0x000b								; Number of locals
22cb			INIT_22c8:
22cb e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x45 = .DEBUG	0x22cb,0x3b28,0x2801,0x0002,0x005a,0x86a5,0x0000,0x0f82
													; Debug Table 0x45.0x0 = 0x22cb,0xffff
22cc 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
22cd 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
22ce e00c       |    |		Load	0x0,0xc
22cf 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
22d0 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x45.0x1 = 0x22d0,0xfffe
22d1 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
22d2 2e09       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9
22d3 8231       | 1  |		Call	0x1,0x31
22d4 e002       |    |		Load	0x0,0x2
22d5 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
22d6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
22d7 011e       |    |		Execute	Any,Convert
22d8 e002       |    |		Load	0x0,0x2								; Debug Table 0x45.0x2 = 0x22d8,0xfffd
22d9 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
22da 02c7       |    |		Declare_Variable	Any
22db 00d8       |    |		Load_Top	At_Offset_0
22dc 1c00       |    |		Execute_Immediate	Run_Utility,0x0
22dd e002       |    |		Load	0x0,0x2								; Debug Table 0x45.0x3 = 0x22dd,0xfffc
22de 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
22df e00e       |    |		Load	0x0,0xe								; Debug Table 0x45.0x4 = 0x22df,0xfffb
22e0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
22e1 02c7       |    |		Declare_Variable	Any
22e2 00d8       |    |		Load_Top	At_Offset_0
22e3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
22e4 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x45.0x5 = 0x22e4,0xfffa
22e5 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x45.0x6 = 0x22e5,0xfff9
22e6 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x45.0x7 = 0x22e6,0xfff8
22e7 e002       |    |		Load	0x0,0x2								; Debug Table 0x45.0x8 = 0x22e7,0xfff7
22e8 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
22e9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
22ea e004       |    |		Load	0x0,0x4								; Debug Table 0x45.0x9 = 0x22ea,0xfff6
22eb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
22ec 02c7       |    |		Declare_Variable	Any
22ed e004       |    |		Load	0x0,0x4
22ee 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
22ef c40b       |    |		Store	0x2,0xb
22f0			BODY_22c8:
22f0 4800       |H   |		Short_Literal	0x0							; Debug Table 0x45.0xa = 0x22f0,0x1
22f1 a5fb       |    |		Store_Unchecked	0x2,-0x5
22f2 e002       |    |		Load	0x0,0x2								; Debug Table 0x45.0xb = 0x22f2,0x2
22f3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
22f4 e002       |    |		Load	0x0,0x2
22f5 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
22f6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
22f7 60c8       |`   |		Indirect_Literal	Discrete,0x23c0,{0x00000000, 0x00004000}
22f8 e004       |    |		Load	0x0,0x4
22f9 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
22fa e5fc       |    |		Load	0x2,-0x4
22fb 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
22fc 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
22fd e002       |    |		Load	0x0,0x2
22fe 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
22ff 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
2300 005b       | [  |		Store_Top	Discrete,At_Offset_3
2301 c405       |    |		Store	0x2,0x5
2302 e405       |    |		Load	0x2,0x5								; Debug Table 0x45.0xc = 0x2302,0x3
2303 0092 24d2  |  $ |		Action	Push_String_Extended,0x24d2					; "Decl_Ops.Get_Unit_State"
2305 820f       |    |		Call	0x1,0xf
2306 e013       |    |		Load	0x0,0x13							; Debug Table 0x45.0xd = 0x2306,0x4
2307 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
2308 e004       |    |		Load	0x0,0x4
2309 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
230a c40b       |    |		Store	0x2,0xb
230b e002       |    |		Load	0x0,0x2								; Debug Table 0x45.0xe = 0x230b,0x5
230c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
230d 00f1       |    |		Load_Encached	Diana_Temp_Seq
230e 00f1       |    |		Load_Encached	Diana_Temp_Seq
230f e406       |    |		Load	0x2,0x6
2310 0120       |    |		Execute	Any,Is_Value
2311 6803       |h   |		Jump_Zero	0x2315
2312 e00e       |    |		Load	0x0,0xe
2313 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
2314 7801       |x   |		Jump	0x2316
2315 e406       |    |		Load	0x2,0x6
2316 e40b       |    |		Load	0x2,0xb
2317 85fe       |    |		Call	0x2,-0x2
2318 c406       |    |		Store	0x2,0x6
2319 c407       |    |		Store	0x2,0x7
231a c408       |    |		Store	0x2,0x8
231b c405       |    |		Store	0x2,0x5
231c e405       |    |		Load	0x2,0x5								; Debug Table 0x45.0xf = 0x231c,0x6
231d 7023       |p#  |		Jump_Nonzero	0x2341
231e e002       |    |		Load	0x0,0x2								; Debug Table 0x45.0x10 = 0x231e,0x7
231f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
2320 00f1       |    |		Load_Encached	Diana_Temp_Seq
2321 e002       |    |		Load	0x0,0x2
2322 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
2323 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
2324 e406       |    |		Load	0x2,0x6
2325 0120       |    |		Execute	Any,Is_Value
2326 6803       |h   |		Jump_Zero	0x232a
2327 e00e       |    |		Load	0x0,0xe
2328 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
2329 7801       |x   |		Jump	0x232b
232a e406       |    |		Load	0x2,0x6
232b e409       |    |		Load	0x2,0x9
232c e5fc       |    |		Load	0x2,-0x4
232d 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
232e 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
232f 6090       |`   |		Indirect_Literal	Discrete,0x23c0,{0x00000000, 0x00004000}
2330 e40b       |    |		Load	0x2,0xb
2331 4803       |H   |		Short_Literal	0x3
2332 e403       |    |		Load	0x2,0x3
2333 e002       |    |		Load	0x0,0x2
2334 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
2335 e40a       |    |		Load	0x2,0xa
2336 e002       |    |		Load	0x0,0x2
2337 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
2338 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
2339 e5fc       |    |		Load	0x2,-0x4
233a 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
233b 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
233c c409       |    |		Store	0x2,0x9
233d c406       |    |		Store	0x2,0x6
233e c407       |    |		Store	0x2,0x7
233f c408       |    |		Store	0x2,0x8
2340 c405       |    |		Store	0x2,0x5
2341 e405       |    |		Load	0x2,0x5								; Debug Table 0x45.0x11 = 0x2341,0x8
2342 700a       |p   |		Jump_Nonzero	0x234d
2343 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x45.0x12 = 0x2343,0x9
2344 4801       |H   |		Short_Literal	0x1
2345 4801       |H   |		Short_Literal	0x1
2346 e004       |    |		Load	0x0,0x4
2347 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
2348 c40b       |    |		Store	0x2,0xb
2349 e004       |    |		Load	0x0,0x4								; Debug Table 0x45.0x13 = 0x2349,0xa
234a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
234b c40b       |    |		Store	0x2,0xb
234c 780f       |x   |		Jump	0x235c
234d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x45.0x14 = 0x234d,0xb
234e 6804       |h   |		Jump_Zero	0x2353
234f e405       |    |		Load	0x2,0x5
2350 0f02       |    |		Execute_Immediate	Equal,0x2
2351 6801       |h   |		Jump_Zero	0x2353
2352 7809       |x   |		Jump	0x235c								; Debug Table 0x45.0x15 = 0x2352,0xc
2353 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x45.0x16 = 0x2353,0xd
2354 4801       |H   |		Short_Literal	0x1
2355 4800       |H   |		Short_Literal	0x0
2356 e004       |    |		Load	0x0,0x4
2357 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
2358 c40b       |    |		Store	0x2,0xb
2359 e004       |    |		Load	0x0,0x4								; Debug Table 0x45.0x17 = 0x2359,0xe
235a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
235b c40b       |    |		Store	0x2,0xb
235c e405       |    |		Load	0x2,0x5								; Debug Table 0x45.0x18 = 0x235c,0xf
235d 460e       |F   |		Jump_Case	0xf
235e 780e       |x   |		Jump	0x236d								; case 0x0
235f 7841       |xA  |		Jump	0x23a1								; case 0x1
2360 7815       |x   |		Jump	0x2376								; case 0x2
2361 780e       |x   |		Jump	0x2370								; case 0x3
2362 7839       |x9  |		Jump	0x239c								; case 0x4
2363 783d       |x=  |		Jump	0x23a1								; case 0x5
2364 783c       |x<  |		Jump	0x23a1								; case 0x6
2365 783b       |x;  |		Jump	0x23a1								; case 0x7
2366 783a       |x:  |		Jump	0x23a1								; case 0x8
2367 7839       |x9  |		Jump	0x23a1								; case 0x9
2368 7838       |x8  |		Jump	0x23a1								; case 0xa
2369 7837       |x7  |		Jump	0x23a1								; case 0xb
236a 7836       |x6  |		Jump	0x23a1								; case 0xc
236b 7835       |x5  |		Jump	0x23a1								; case 0xd
236c 7834       |x4  |		Jump	0x23a1								; case 0xe
236d 4801       |H   |		Short_Literal	0x1							; Debug Table 0x45.0x19 = 0x236d,0x10
236e a5fb       |    |		Store_Unchecked	0x2,-0x5
236f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
2370 e406       |    |		Load	0x2,0x6								; Debug Table 0x45.0x1a = 0x2370,0x11
2371 e407       |    |		Load	0x2,0x7
2372 e5fd       |    |		Load	0x2,-0x3
2373 e402       |    |		Load	0x2,0x2
2374 822d       | -  |		Call	0x1,0x2d
2375 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
2376 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x45.0x1b = 0x2376,0x12
2377 0092 24e7  |  $ |		Action	Push_String_Extended,0x24e7					; " failed - Semantic errors found"
2379 01cc       |    |		Execute	Vector,Catenate
237a e00a       |    |		Load	0x0,0xa
237b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
237c e002       |    |		Load	0x0,0x2								; Debug Table 0x45.0x1c = 0x237c,0x13
237d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
237e e404       |    |		Load	0x2,0x4
237f 0120       |    |		Execute	Any,Is_Value
2380 6803       |h   |		Jump_Zero	0x2384
2381 e002       |    |		Load	0x0,0x2
2382 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
2383 7801       |x   |		Jump	0x2385
2384 e404       |    |		Load	0x2,0x4
2385 603a       |`:  |		Indirect_Literal	Discrete,0x23c0,{0x00000000, 0x00004000}
2386 e004       |    |		Load	0x0,0x4
2387 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
2388 4800       |H   |		Short_Literal	0x0
2389 e002       |    |		Load	0x0,0x2
238a 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
238b e5fc       |    |		Load	0x2,-0x4
238c 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
238d 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
238e e002       |    |		Load	0x0,0x2
238f 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
2390 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
2391 c404       |    |		Store	0x2,0x4
2392 c405       |    |		Store	0x2,0x5
2393 e405       |    |		Load	0x2,0x5								; Debug Table 0x45.0x1d = 0x2393,0x14
2394 0092 24ca  |  $ |		Action	Push_String_Extended,0x24ca					; "Traversal.Get_Object"
2396 820f       |    |		Call	0x1,0xf
2397 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x45.0x1e = 0x2397,0x15
2398 e406       |    |		Load	0x2,0x6
2399 e404       |    |		Load	0x2,0x4
239a 822a       | *  |		Call	0x1,0x2a
239b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
239c e407       |    |		Load	0x2,0x7								; Debug Table 0x45.0x1f = 0x239c,0x16
239d e5fd       |    |		Load	0x2,-0x3
239e e402       |    |		Load	0x2,0x2
239f 822e       | .  |		Call	0x1,0x2e
23a0 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
23a1 e405       |    |		Load	0x2,0x5								; Debug Table 0x45.0x20 = 0x23a1,0x17
23a2 e406       |    |		Load	0x2,0x6
23a3 e5fd       |    |		Load	0x2,-0x3
23a4 8230       | 0  |		Call	0x1,0x30
23a5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
23a6			TRAP_22c8:
23a6 601d       |`   |		Indirect_Literal	Discrete,0x23c4,{0x00000000, 0x5a851501}
23a7 010f       |    |		Execute	Exception,Equal
23a8 6808       |h   |		Jump_Zero	0x23b1
23a9 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x45.0x21 = 0x23a9,0x18
23aa 4801       |H   |		Short_Literal	0x1
23ab 4800       |H   |		Short_Literal	0x0
23ac e004       |    |		Load	0x0,0x4
23ad 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
23ae c40b       |    |		Store	0x2,0xb
23af 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x45.0x22 = 0x23af,0x19
23b0 0101       |    |		Execute	Exception,Reraise
23b1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x45.0x23 = 0x23b1,0x1a
23b2 4801       |H   |		Short_Literal	0x1
23b3 4800       |H   |		Short_Literal	0x0
23b4 e004       |    |		Load	0x0,0x4
23b5 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
23b6 c40b       |    |		Store	0x2,0xb
23b7 4801       |H   |		Short_Literal	0x1							; Debug Table 0x45.0x24 = 0x23b7,0x1b
23b8 e009       |    |		Load	0x0,0x9
23b9 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
23ba 0092 2531  |  %1|		Action	Push_String_Extended,0x2531					; "Target.Promote_Insertion"
23bc 8222       | "  |		Call	0x1,0x22
23bd 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
23be 0000 0000  |    |		.XXX[0x2]
23c0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
23c4 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a851501}
23c8 ; --------------------------------------------------------------------------------------
23c8 ; SUBPROGRAM
23c8 ; --------------------------------------------------------------------------------------
23c8 23cb       |#   |		.CONST	0x23cb								; Address of begin
23c9 23d3       |#   |		.CONST	0x23d3								; Address of exception handler
23ca 0001       |    |		.CONST	0x0001								; Number of locals
23cb			BODY_23c8:
23cb			INIT_23c8:
23cb e407       |    |		Load	0x2,0x7								; Debug Table 0x46 = .DEBUG	0x23cb,0x3b74,0x0004,0x0000,0x005a,0x8695,0x0000,0x22ce
													; Debug Table 0x46.0x0 = 0x23cb,0x1
23cc 00ec       |    |		Load_Encached	Diana_Tree_Cache
23cd 4801       |H   |		Short_Literal	0x1
23ce e405       |    |		Load	0x2,0x5
23cf e001       |    |		Load	0x0,0x1
23d0 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
23d1 c406       |    |		Store	0x2,0x6
23d2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
23d3			TRAP_23c8:
23d3 60d0       |`   |		Indirect_Literal	Discrete,0x24a4,{0x00000000, 0x5a846502}
23d4 010f       |    |		Execute	Exception,Equal
23d5 6827       |h'  |		Jump_Zero	0x23fd
23d6 e002       |    |		Load	0x0,0x2								; Debug Table 0x46.0x1 = 0x23d6,0x2
23d7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
23d8 e40a       |    |		Load	0x2,0xa
23d9 0120       |    |		Execute	Any,Is_Value
23da 6804       |h   |		Jump_Zero	0x23df
23db e002       |    |		Load	0x0,0x2
23dc 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
23dd 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
23de 7801       |x   |		Jump	0x23e0
23df e40a       |    |		Load	0x2,0xa
23e0 e002       |    |		Load	0x0,0x2
23e1 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
23e2 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
23e3 4800       |H   |		Short_Literal	0x0
23e4 4800       |H   |		Short_Literal	0x0
23e5 4800       |H   |		Short_Literal	0x0
23e6 4800       |H   |		Short_Literal	0x0
23e7 e004       |    |		Load	0x0,0x4
23e8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
23e9 4800       |H   |		Short_Literal	0x0
23ea e403       |    |		Load	0x2,0x3
23eb e002       |    |		Load	0x0,0x2
23ec 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
23ed 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
23ee e002       |    |		Load	0x0,0x2
23ef 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
23f0 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
23f1 c406       |    |		Store	0x2,0x6
23f2 c40a       |    |		Store	0x2,0xa
23f3 c409       |    |		Store	0x2,0x9
23f4 e409       |    |		Load	0x2,0x9								; Debug Table 0x46.0x2 = 0x23f4,0x3
23f5 0092 24e4  |  $ |		Action	Push_String_Extended,0x24e4					; "Ada.Open"
23f7 820f       |    |		Call	0x1,0xf
23f8 e001       |    |		Load	0x0,0x1								; Debug Table 0x46.0x3 = 0x23f8,0x4
23f9 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
23fa e407       |    |		Load	0x2,0x7
23fb 017d       | }  |		Execute	Record,Structure_Write
23fc 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
23fd 0100       |    |		Execute	Exception,Raise
23fe 0000 0000  |    |		.XXX[0x2]
2400 ; --------------------------------------------------------------------------------------
2400 ; SUBPROGRAM
2400 ; --------------------------------------------------------------------------------------
2400 2404       |$   |		.CONST	0x2404								; Address of begin
2401 242a       |$*  |		.CONST	0x242a								; Address of exception handler
2402 0002       |    |		.CONST	0x0002								; Number of locals
2403			INIT_2400:
2403 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x47 = .DEBUG	0x2403,0x3b7e,0x0801,0x0002,0x005a,0x86a5,0x0000,0x1243
													; Debug Table 0x47.0x0 = 0x2403,0xffff
2404			BODY_2400:
2404 e405       |    |		Load	0x2,0x5								; Debug Table 0x47.0x1 = 0x2404,0x1
2405 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
2406 4602       |F   |		Jump_Case	0x3
2407 7802       |x   |		Jump	0x240a								; case 0x0
2408 780b       |x   |		Jump	0x2414								; case 0x1
2409 780a       |x   |		Jump	0x2414								; case 0x2
240a e405       |    |		Load	0x2,0x5								; Debug Table 0x47.0x2 = 0x240a,0x2
240b 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
240c 2604       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
240d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
240e e405       |    |		Load	0x2,0x5
240f 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2410 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
2411 85fd       |    |		Call	0x2,-0x3
2412 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
2413 7808       |x   |		Jump	0x241c
2414 e405       |    |		Load	0x2,0x5								; Debug Table 0x47.0x3 = 0x2414,0x3
2415 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2416 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
2417 e405       |    |		Load	0x2,0x5
2418 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2419 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
241a 85fd       |    |		Call	0x2,-0x3
241b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
241c 0007       |    |		Action	Break_Optional							; Debug Table 0x47.0x4 = 0x241c,0x4
241d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x47.0x5 = 0x241d,0x401
241e 021d       |    |		Execute	Heap_Access,Is_Null
241f 6805       |h   |		Jump_Zero	0x2425							; Debug Table 0x47.0x6 = 0x241f,0x4
2420 e405       |    |		Load	0x2,0x5								; Debug Table 0x47.0x7 = 0x2420,0x5
2421 2703       |'   |		Execute	Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
2422 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
2423 a7ff       |    |		Store_Unchecked	0x3,-0x1
2424 7802       |x   |		Jump	0x2427
2425 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x47.0x8 = 0x2425,0x6
2426 a7ff       |    |		Store_Unchecked	0x3,-0x1
2427 4800       |H   |		Short_Literal	0x0							; Debug Table 0x47.0x9 = 0x2427,0x7
2428 a7fe       |    |		Store_Unchecked	0x3,-0x2
2429 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
242a			TRAP_2400:
242a 6075       |`u  |		Indirect_Literal	Discrete,0x24a0,{0x00000000, 0x5a851503}
242b 010f       |    |		Execute	Exception,Equal
242c 6803       |h   |		Jump_Zero	0x2430
242d 4802       |H   |		Short_Literal	0x2							; Debug Table 0x47.0xa = 0x242d,0x8
242e a7fe       |    |		Store_Unchecked	0x3,-0x2
242f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
2430 4800       |H   |		Short_Literal	0x0							; Debug Table 0x47.0xb = 0x2430,0x9
2431 e009       |    |		Load	0x0,0x9
2432 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
2433 0092 2532  |  %2|		Action	Push_String_Extended,0x2532					; "Target.Make (generic formal)"
2435 8222       | "  |		Call	0x1,0x22
2436 4804       |H   |		Short_Literal	0x4							; Debug Table 0x47.0xc = 0x2436,0xa
2437 a7fe       |    |		Store_Unchecked	0x3,-0x2
2438 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
2439 0000 0000  |    |		.BLANK	0000[0x7]
2440 ; --------------------------------------------------------------------------------------
2440 ; SUBPROGRAM
2440 ; --------------------------------------------------------------------------------------
2440 2443       |$C  |		.CONST	0x2443								; Address of begin
2441 244b       |$K  |		.CONST	0x244b								; Address of exception handler
2442 0001       |    |		.CONST	0x0001								; Number of locals
2443			BODY_2440:
2443			INIT_2440:
2443 e409       |    |		Load	0x2,0x9								; Debug Table 0x48 = .DEBUG	0x2443,0x3b9a,0x0004,0x0000,0x005a,0x8695,0x0000,0x08fe
													; Debug Table 0x48.0x0 = 0x2443,0x1
2444 00ec       |    |		Load_Encached	Diana_Tree_Cache
2445 4801       |H   |		Short_Literal	0x1
2446 e404       |    |		Load	0x2,0x4
2447 e001       |    |		Load	0x0,0x1
2448 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
2449 c406       |    |		Store	0x2,0x6
244a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
244b			TRAP_2440:
244b 6058       |`X  |		Indirect_Literal	Discrete,0x24a4,{0x00000000, 0x5a846502}
244c 010f       |    |		Execute	Exception,Equal
244d 6805       |h   |		Jump_Zero	0x2453
244e e001       |    |		Load	0x0,0x1								; Debug Table 0x48.0x1 = 0x244e,0x2
244f 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
2450 e409       |    |		Load	0x2,0x9
2451 017d       | }  |		Execute	Record,Structure_Write
2452 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
2453 0100       |    |		Execute	Exception,Raise
2454 0000 0000  |    |		.BLANK	0000[0x4]
2458 ; --------------------------------------------------------------------------------------
2458 ; SUBPROGRAM
2458 ; --------------------------------------------------------------------------------------
2458 245b       |$[  |		.CONST	0x245b								; Address of begin
2459 2463       |$c  |		.CONST	0x2463								; Address of exception handler
245a 0001       |    |		.CONST	0x0001								; Number of locals
245b			BODY_2458:
245b			INIT_2458:
245b e405       |    |		Load	0x2,0x5								; Debug Table 0x49 = .DEBUG	0x245b,0x3ba0,0x0004,0x0000,0x005a,0x8695,0x0000,0x19ab
													; Debug Table 0x49.0x0 = 0x245b,0x1
245c 00ec       |    |		Load_Encached	Diana_Tree_Cache
245d 4801       |H   |		Short_Literal	0x1
245e e402       |    |		Load	0x2,0x2
245f e001       |    |		Load	0x0,0x1
2460 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
2461 c403       |    |		Store	0x2,0x3
2462 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
2463			TRAP_2458:
2463 6040       |`@  |		Indirect_Literal	Discrete,0x24a4,{0x00000000, 0x5a846502}
2464 010f       |    |		Execute	Exception,Equal
2465 6805       |h   |		Jump_Zero	0x246b
2466 e001       |    |		Load	0x0,0x1								; Debug Table 0x49.0x1 = 0x2466,0x2
2467 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
2468 e405       |    |		Load	0x2,0x5
2469 017d       | }  |		Execute	Record,Structure_Write
246a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
246b 0100       |    |		Execute	Exception,Raise
246c 0000 0000  |    |		.BLANK	0000[0x4]
2470 ; --------------------------------------------------------------------------------------
2470 ; SUBPROGRAM
2470 ; --------------------------------------------------------------------------------------
2470 2478       |$x  |		.CONST	0x2478								; Address of begin
2471 0004       |    |		.CONST	0x0004								; Address of exception handler
2472 0002       |    |		.CONST	0x0002								; Number of locals
2473			INIT_2470:
2473 e002       |    |		Load	0x0,0x2								; Debug Table 0x4a = .DEBUG	0x2473,0x3ba6,0x0001,0x0000,0x005a,0x8695,0x0000,0x1d8b
													; Debug Table 0x4a.0x0 = 0x2473,0xffff
2474 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
2475 02ff       |    |		Declare_Variable	Variant_Record
2476 00d8       |    |		Load_Top	At_Offset_0
2477 1c00       |    |		Execute_Immediate	Run_Utility,0x0
2478			BODY_2470:
2478 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4a.0x1 = 0x2478,0x1
2479 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
247a e001       |    |		Load	0x0,0x1
247b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
247c 681a       |h   |		Jump_Zero	0x2497
247d e002       |    |		Load	0x0,0x2								; Debug Table 0x4a.0x2 = 0x247d,0x2
247e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
247f 00d9       |    |		Load_Top	At_Offset_1
2480 673f       |g?  |		Indirect_Literal	Discrete,0x23c0,{0x00000000, 0x00004000}
2481 e004       |    |		Load	0x0,0x4
2482 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
2483 4800       |H   |		Short_Literal	0x0
2484 e405       |    |		Load	0x2,0x5
2485 e002       |    |		Load	0x0,0x2
2486 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
2487 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
2488 00d1       |    |		Pop_Control	Pop_Count_1
2489 c406       |    |		Store	0x2,0x6
248a e406       |    |		Load	0x2,0x6								; Debug Table 0x4a.0x3 = 0x248a,0x3
248b 0092 24c3  |  $ |		Action	Push_String_Extended,0x24c3					; "Traversal.Get_Version"
248d 820f       |    |		Call	0x1,0xf
248e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4a.0x4 = 0x248e,0x4
248f e5fe       |    |		Load	0x2,-0x2
2490 e001       |    |		Load	0x0,0x1
2491 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
2492 4801       |H   |		Short_Literal	0x1
2493 e001       |    |		Load	0x0,0x1
2494 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
2495 00d1       |    |		Pop_Control	Pop_Count_1
2496 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
2497 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4a.0x5 = 0x2497,0x5
2498 0007       |    |		Action	Break_Optional
2499 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4a.0x6 = 0x2499,0x401
249a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4a.0x7 = 0x249a,0x5
249b 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
249c e001       |    |		Load	0x0,0x1
249d 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
249e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
249f 0000       |    |		.XXX[0x1]
24a0 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a851503}
24a4 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a846502}
24a8 ; --------------------------------------------------------------------------------------
24a8 ; STRING TABLE
24a8 ; --------------------------------------------------------------------------------------
24a8 0118       |    |		.STRTAB	0x0118->0x2534							; "OBJECT_SELECTION"
24a9 0126       | &  |		.STRTAB	0x0126->0x253c							; "TREE_SELECTION"
24aa 0132       | 2  |		.STRTAB	0x0132->0x2543							; "NO_SELECTION"
24ab 013c       | <  |		.STRTAB	0x013c->0x2549							; "SUCCESSFUL"
24ac 0144       | D  |		.STRTAB	0x0144->0x254e							; "NOT_OPENABLE"
24ad 014e       | N  |		.STRTAB	0x014e->0x2554							; "NOT_MAKEABLE"
24ae 0158       | X  |		.STRTAB	0x0158->0x255a							; "NOT_PLACEABLE"
24af 0163       | c  |		.STRTAB	0x0163->0x2560							; "MAKE_EXCEPTION"
24b0 016f       | o  |		.STRTAB	0x016f->0x2567							; "OTHER_ERROR"
24b1 0178       | x  |		.STRTAB	0x0178->0x256d							; "DEFAULT_MODE"
24b2 0182       |    |		.STRTAB	0x0182->0x2573							; "EDIT_MODE"
24b3 0189       |    |		.STRTAB	0x0189->0x2577							; "NONEXISTENT"
24b4 0192       |    |		.STRTAB	0x0192->0x257d							; "ABSORBED"
24b5 0198       |    |		.STRTAB	0x0198->0x2581							; "AS_IS"
24b6 019b       |    |		.STRTAB	0x019b->0x2583							; "IN_SOURCE"
24b7 01a2       |    |		.STRTAB	0x01a2->0x2588							; "IN_NONSOURCE"
24b8 01ac       |    |		.STRTAB	0x01ac->0x258e							; "IN_LIBRARY"
24b9 01b4       |    |		.STRTAB	0x01b4->0x2593							; "Bad status from Directory."
24ba 01cc       |    |		.STRTAB	0x01cc->0x25a0							; ": "
24bb 01cc       |    |		.STRTAB	0x01cc->0x25a1							; "Not_Possible"
24bc 01d6       |    |		.STRTAB	0x01d6->0x25a7							; "Check_Directory_Status"
24bd 01ea       |    |		.STRTAB	0x01ea->0x25b2							; "Make"
24be 01ec       |    |		.STRTAB	0x01ec->0x25b4							; "Get_Unit_State"
24bf 01f8       |    |		.STRTAB	0x01f8->0x25bb							; "Ada.Get_Unit"
24c0 0202       |    |		.STRTAB	0x0202->0x25c1							; "Traversal.Get_Declaration"
24c1 0219       |    |		.STRTAB	0x0219->0x25cd							; "Get_Parent_Stub"
24c2 0226       | &  |		.STRTAB	0x0226->0x25d5							; "Command failed - unit is not an Ada object"
24c3 024e       | N  |		.STRTAB	0x024e->0x25ea							; "Traversal.Get_Version"
24c4 0261       | a  |		.STRTAB	0x0261->0x25f4							; "Display"
24c5 0266       | f  |		.STRTAB	0x0266->0x25f8							; "Force_State"
24c6 026f       | o  |		.STRTAB	0x026f->0x25fd							; "Deletion failed - cannot delete many subunits at once"
24c7 02a2       |    |		.STRTAB	0x02a2->0x2618							; "Bad_Call"
24c8 02a8       |    |		.STRTAB	0x02a8->0x261c							; "Delete"
24c9 02ac       |    |		.STRTAB	0x02ac->0x261f							; "Withdraw failed - parent is source"
24ca 02cc       |    |		.STRTAB	0x02cc->0x2630							; "Traversal.Get_Object"
24cb 02de       |    |		.STRTAB	0x02de->0x263a							; "Edit"
24cc 02e0       |    |		.STRTAB	0x02e0->0x263c							; "Install_Stub"
24cd 02ea       |    |		.STRTAB	0x02ea->0x2642							; "Target.Insert_At_Cursor"
24ce 02ff       |    |		.STRTAB	0x02ff->0x264d							; "Target.Insert_In_List"
24cf 0312       |    |		.STRTAB	0x0312->0x2658							; "*** Exception in Command_Utilities."
24d0 0333       | 3  |		.STRTAB	0x0333->0x2669							; "Ada_Subobject_Possible"
24d1 0347       | G  |		.STRTAB	0x0347->0x2674							; "Get_Child_Object"
24d2 0355       | U  |		.STRTAB	0x0355->0x267c							; "Decl_Ops.Get_Unit_State"
24d3 036a       | j  |		.STRTAB	0x036a->0x2688							; "Ada.Get_Version"
24d4 0377       | w  |		.STRTAB	0x0377->0x268f							; "Command failed - unit is a deleted version"
24d5 039f       |    |		.STRTAB	0x039f->0x26a4							; "Get_Descriptor"
24d6 03ab       |    |		.STRTAB	0x03ab->0x26ab							; "Object_Ops.Is_Slushy"
24d7 03bd       |    |		.STRTAB	0x03bd->0x26b5							; "Is_Slushy"
24d8 03c4       |    |		.STRTAB	0x03c4->0x26ba							; "Operation"
24d9 03cb       |    |		.STRTAB	0x03cb->0x26be							; "Operation failed - could not backup "
24da 03ed       |    |		.STRTAB	0x03ed->0x26d0							; " due to access error"
24db 03ff       |    |		.STRTAB	0x03ff->0x26da							; "Operation failed - "
24dc 0410       |    |		.STRTAB	0x0410->0x26e4							; " is not checked out"
24dd 0421       | !  |		.STRTAB	0x0421->0x26ed							; " is frozen"
24de 0429       | )  |		.STRTAB	0x0429->0x26f2							; "Object_Ops.Create_Backup"
24df 043f       | ?  |		.STRTAB	0x043f->0x26fe							; "Create_Backup"
24e0 044a       | J  |		.STRTAB	0x044a->0x2705							; "Ada.Convert"
24e1 0453       | S  |		.STRTAB	0x0453->0x270a							; "Convert_Tree (1)"
24e2 0461       | a  |		.STRTAB	0x0461->0x2712							; "Convert_Tree (2)"
24e3 046f       | o  |		.STRTAB	0x046f->0x271a							; "Object_Ops.Set_Slushy"
24e4 0482       |    |		.STRTAB	0x0482->0x2725							; "Ada.Open"
24e5 0488       |    |		.STRTAB	0x0488->0x2729							; "Ada.Close"
24e6 048f       |    |		.STRTAB	0x048f->0x272d							; "Put_Error_Messages"
24e7 049f       |    |		.STRTAB	0x049f->0x2736							; " failed - Semantic errors found"
24e8 04bc       |    |		.STRTAB	0x04bc->0x2746							; "Process_Semantic_Error"
24e9 04d0       |    |		.STRTAB	0x04d0->0x2751							; " failed - Code generation errors found"
24ea 04f4       |    |		.STRTAB	0x04f4->0x2764							; "Process_Cg_Error"
24eb 0502       |    |		.STRTAB	0x0502->0x276c							; " failed - need to code other units"
24ec 0522       | "  |		.STRTAB	0x0522->0x277d							; "Units that should be coded to code "
24ed 0543       | C  |		.STRTAB	0x0543->0x278e							; "Process_Cg_Prerequisite_Error"
24ee 055e       | ^  |		.STRTAB	0x055e->0x279d							; " failed - would obsolesce other units"
24ef 0581       |    |		.STRTAB	0x0581->0x27af							; "Units that are obsolesced by "
24f0 059c       |    |		.STRTAB	0x059c->0x27be							; "Process_Obsolescence_Error"
24f1 05b4       |    |		.STRTAB	0x05b4->0x27cb							; "Process_Demote_Obsolescence_Error"
24f2 05d3       |    |		.STRTAB	0x05d3->0x27db							; " failed - object (or something it references) is in use"
24f3 0608       |    |		.STRTAB	0x0608->0x27f7							; "Process_Miscellaneous_Errors"
24f4 0622       | "  |		.STRTAB	0x0622->0x2805							; "Control_Point.Enclosing_World"
24f5 063d       | =  |		.STRTAB	0x063d->0x2813							; "Enclosing_World_Set"
24f6 064e       | N  |		.STRTAB	0x064e->0x281d							; "NOTIFY_WARNINGS"
24f7 065b       | [  |		.STRTAB	0x065b->0x2824							; "Promote"
24f8 0660       | `  |		.STRTAB	0x0660->0x2828							; "Promote failed - unit is frozen"
24f9 067d       | }  |		.STRTAB	0x067d->0x2837							; "Promote failed - "
24fa 068c       |    |		.STRTAB	0x068c->0x2840							; "Decl_Ops.Will_Be_A_Comp_Unit"
24fb 06a6       |    |		.STRTAB	0x06a6->0x284e							; "Decl_Ops.Get_Unit_State (3)"
24fc 06bf       |    |		.STRTAB	0x06bf->0x285b							; " changed to "
24fd 06c9       |    |		.STRTAB	0x06c9->0x2861							; "Enclosing_Demotable_Node"
24fe 06df       |    |		.STRTAB	0x06df->0x286d							; "Is_Writable"
24ff 06e8       |    |		.STRTAB	0x06e8->0x2873							; "Edit failed - unit is not accessible"
2500 070a       |    |		.STRTAB	0x070a->0x2885							; "Demote failed - unit is not accessible"
2501 072e       | .  |		.STRTAB	0x072e->0x2898							; "Demote"
2502 0732       | 2  |		.STRTAB	0x0732->0x289b							; "Demote failed - unit is frozen"
2503 074e       | N  |		.STRTAB	0x074e->0x28aa							; "Incrementally demoted "
2504 0762       | b  |		.STRTAB	0x0762->0x28b5							; "Withdrew "
2505 0769       | i  |		.STRTAB	0x0769->0x28b9							; "Delete failed - unit is not accessible"
2506 078d       |    |		.STRTAB	0x078d->0x28cc							; "Delete failed - unit is frozen"
2507 07a9       |    |		.STRTAB	0x07a9->0x28db							; "Ada.Get_Object"
2508 07b5       |    |		.STRTAB	0x07b5->0x28e2							; " is deleted"
2509 07be       |    |		.STRTAB	0x07be->0x28e8							; "Delete_By_Demotion"
250a 07ce       |    |		.STRTAB	0x07ce->0x28f1							; "Can_Be_Empty"
250b 07d8       |    |		.STRTAB	0x07d8->0x28f7							; "Convert_To_Child"
250c 07e6       |    |		.STRTAB	0x07e6->0x28ff							; "Install_Parent_Stub"
250d 07f7       |    |		.STRTAB	0x07f7->0x2908							; "Make_Read_Only"
250e 0803       |    |		.STRTAB	0x0803->0x290f							; "Creation of child unit"
250f 0817       |    |		.STRTAB	0x0817->0x291a							; "Creation of child unit failed - parent is frozen"
2510 0845       | E  |		.STRTAB	0x0845->0x2932							; "Creation of child unit failed - "
2511 0863       | c  |		.STRTAB	0x0863->0x2942							; "Object_Ops.Create"
2512 0872       | r  |		.STRTAB	0x0872->0x294b							; "Create_Unit"
2513 087b       | {  |		.STRTAB	0x087b->0x2950							; "Edit failed - object is not checked out"
2514 08a0       |    |		.STRTAB	0x08a0->0x2964							; " is created"
2515 08a9       |    |		.STRTAB	0x08a9->0x2969							; "Command failed - "
2516 08b8       |    |		.STRTAB	0x08b8->0x2972							; " does not exist"
2517 08c5       |    |		.STRTAB	0x08c5->0x2979							; "Change_State"
2518 08cf       |    |		.STRTAB	0x08cf->0x297f							; "Attempt_Fast_Edit"
2519 08de       |    |		.STRTAB	0x08de->0x2988							; "Decl_Ops.Open_Insertion_Point"
251a 08f9       |    |		.STRTAB	0x08f9->0x2996							; "Units that are obsolesced by opening insertion point"
251b 092b       | +  |		.STRTAB	0x092b->0x29b0							; "Target.Insert_Needed_Stm_S"
251c 0943       | C  |		.STRTAB	0x0943->0x29bd							; "Ada_Utilities.Open_Image"
251d 0959       | Y  |		.STRTAB	0x0959->0x29c9							; "Target.Get_Tree_And_Image"
251e 0970       | p  |		.STRTAB	0x0970->0x29d6							; "Ada_Utilities.Close_Image"
251f 0987       |    |		.STRTAB	0x0987->0x29e2							; "Command failed - unit is not checked out"
2520 09ad       |    |		.STRTAB	0x09ad->0x29f6							; "Object_Ops.Copy"
2521 09ba       |    |		.STRTAB	0x09ba->0x29fe							; "Target.Get_nonsource_List_Point"
2522 09d7       |    |		.STRTAB	0x09d7->0x2a0d							; "Target.Get_Source_List_Point"
2523 09f1       |    |		.STRTAB	0x09f1->0x2a1b							; "Target.Modify_Tree"
2524 0a01       |    |		.STRTAB	0x0a01->0x2a24							; "Target.Placeable"
2525 0a0f       |    |		.STRTAB	0x0a0f->0x2a2c							; "Ada.Set_Root"
2526 0a19       |    |		.STRTAB	0x0a19->0x2a32							; "Target.Place_Tree"
2527 0a28       | (  |		.STRTAB	0x0a28->0x2a3b							; "'SPEC"
2528 0a2b       | +  |		.STRTAB	0x0a2b->0x2a3d							; "Target.Make_Library_Stub"
2529 0a41       | A  |		.STRTAB	0x0a41->0x2a49							; "*** Bad status from Command_Utilities.Target.Insert_At_Cursor: "
252a 0a7e       | ~  |		.STRTAB	0x0a7e->0x2a69							; " failed - insertion not allowed at destination"
252b 0aaa       |    |		.STRTAB	0x0aaa->0x2a80							; " failed - exception making unit"
252c 0ac7       |    |		.STRTAB	0x0ac7->0x2a8f							; " failed - internal error"
252d 0add       |    |		.STRTAB	0x0add->0x2a9b							; "Target.Give_Messages"
252e 0aef       |    |		.STRTAB	0x0aef->0x2aa5							; "Target.Epilogue"
252f 0afc       |    |		.STRTAB	0x0afc->0x2aad							; "Target.Edit_Image"
2530 0b0b       |    |		.STRTAB	0x0b0b->0x2ab5							; "Target.Edit_Insertion"
2531 0b1e       |    |		.STRTAB	0x0b1e->0x2ac0							; "Target.Promote_Insertion"
2532 0b34       | 4  |		.STRTAB	0x0b34->0x2acc							; "Target.Make (generic formal)"
2533 0b4e       | N  |		.STREND 0x0b4e->0x2ada
2534 4f42 4a45  |OBJE|		.STRTAB_STRINGS
2ada 0000 0000  |    |		.BLANK	0000[0x6]
2ae0 ; --------------------------------------------------------------------------------------
2ae0 ; Debug Table
2ae0 ; --------------------------------------------------------------------------------------
2ae0 0003 004b  |   K|		.CONST	0x0003,0x004b
2ae2 000b 2d3a  |  -:|		.DEBUG	0x000b,0x2d3a,0x8000,0x0000,0x005a,0x8515,0x0000,0x0011
2aea 0047 2d6e  | G-n|		.DEBUG	0x0047,0x2d6e,0x8000,0x0000,0x005a,0x8695,0x0000,0x002b
2af2 014b 2e18  | K. |		.DEBUG	0x014b,0x2e18,0x0005,0x0000,0x005a,0x8515,0x0000,0x0020
2afa 0163 2e1a  | c. |		.DEBUG	0x0163,0x2e1a,0x0001,0x0000,0x005a,0x8515,0x0000,0x004f
2b02 019b 2e2e  |  ..|		.DEBUG	0x019b,0x2e2e,0x0002,0x0000,0x005a,0x8515,0x0000,0x005d
2b0a 01bb 2e36  |  .6|		.DEBUG	0x01bb,0x2e36,0x0002,0x0000,0x005a,0x8515,0x0000,0x0071
2b12 021b 2e4e  |  .N|		.DEBUG	0x021b,0x2e4e,0x0002,0x0000,0x005a,0x8515,0x0000,0x007e
2b1a 0273 2e70  | s.p|		.DEBUG	0x0273,0x2e70,0x0005,0x0000,0x005a,0x8515,0x0000,0x008b
2b22 028b 2e72  |  .r|		.DEBUG	0x028b,0x2e72,0x0001,0x0000,0x005a,0x8515,0x0000,0x0092
2b2a 0333 2eb2  | 3. |		.DEBUG	0x0333,0x2eb2,0x0001,0x0000,0x005a,0x8515,0x0000,0x00ab
2b32 038b 2ed0  |  . |		.DEBUG	0x038b,0x2ed0,0x0001,0x0000,0x005a,0x8515,0x0000,0x00c8
2b3a 043b 2f12  | ;/ |		.DEBUG	0x043b,0x2f12,0x0001,0x0000,0x005a,0x8515,0x0000,0x00d5
2b42 0533 2f76  | 3/v|		.DEBUG	0x0533,0x2f76,0x0001,0x0000,0x005a,0x8515,0x0000,0x00ec
2b4a 055b 2f82  | [/ |		.DEBUG	0x055b,0x2f82,0x0005,0x0000,0x005a,0x8515,0x0000,0x00fa
2b52 0573 2f84  | s/ |		.DEBUG	0x0573,0x2f84,0x0002,0x0000,0x005a,0x8515,0x0000,0x0104
2b5a 057b 2f8c  | {/ |		.DEBUG	0x057b,0x2f8c,0x0001,0x0000,0x005a,0x8515,0x0000,0x0117
2b62 058b 2f9e  |  / |		.DEBUG	0x058b,0x2f9e,0x2801,0x0002,0x005a,0x8515,0x0000,0x0139
2b6a 05db 2fba  |  / |		.DEBUG	0x05db,0x2fba,0x2801,0x0002,0x005a,0x8515,0x0000,0x0192
2b72 069b 3012  |  0 |		.DEBUG	0x069b,0x3012,0x0005,0x0000,0x005a,0x8695,0x0000,0x0088
2b7a 06cb 3014  |  0 |		.DEBUG	0x06cb,0x3014,0x0005,0x0000,0x005a,0x8695,0x0000,0x00f4
2b82 06e3 3016  |  0 |		.DEBUG	0x06e3,0x3016,0x0005,0x0000,0x005a,0x8695,0x0000,0x00fa
2b8a 06fb 3018  |  0 |		.DEBUG	0x06fb,0x3018,0x0001,0x0000,0x005a,0x8695,0x0000,0x0101
2b92 0713 3022  |  0"|		.DEBUG	0x0713,0x3022,0x0002,0x0000,0x005a,0x8695,0x0000,0x0133
2b9a 0783 3074  |  0t|		.DEBUG	0x0783,0x3074,0x0002,0x0000,0x005a,0x8695,0x0000,0x01fa
2ba2 07eb 3096  |  0 |		.DEBUG	0x07eb,0x3096,0x0002,0x0000,0x005a,0x8695,0x0000,0x0293
2baa 08b3 30de  |  0 |		.DEBUG	0x08b3,0x30de,0x0002,0x0000,0x005a,0x8695,0x0000,0x03a2
2bb2 08db 30ee  |  0 |		.DEBUG	0x08db,0x30ee,0x0001,0x0000,0x005a,0x8695,0x0000,0x03dc
2bba 0953 310a  | S1 |		.DEBUG	0x0953,0x310a,0x0002,0x0000,0x005a,0x8695,0x0000,0x0486
2bc2 09ab 3150  |  1P|		.DEBUG	0x09ab,0x3150,0x0002,0x0000,0x005a,0x8695,0x0000,0x051a
2bca 09e3 316e  |  1n|		.DEBUG	0x09e3,0x316e,0x0001,0x0000,0x005a,0x8695,0x0000,0x0590
2bd2 0b03 31e4  |  1 |		.DEBUG	0x0b03,0x31e4,0x0001,0x0000,0x005a,0x8695,0x0000,0x079a
2bda 0bf3 3244  |  2D|		.DEBUG	0x0bf3,0x3244,0x0001,0x0000,0x005a,0x8695,0x0000,0x0954
2be2 0c13 324e  |  2N|		.DEBUG	0x0c13,0x324e,0x0001,0x0000,0x005a,0x8695,0x0000,0x0989
2bea 0c43 3262  | C2b|		.DEBUG	0x0c43,0x3262,0x0001,0x0000,0x005a,0x8695,0x0000,0x09e8
2bf2 0c63 326c  | c2l|		.DEBUG	0x0c63,0x326c,0x0001,0x0000,0x005a,0x8695,0x0000,0x0a23
2bfa 0c83 3276  |  2v|		.DEBUG	0x0c83,0x3276,0x0001,0x0000,0x005a,0x8695,0x0000,0x0a62
2c02 0cab 3286  |  2 |		.DEBUG	0x0cab,0x3286,0x0002,0x0000,0x005a,0x8695,0x0000,0x0abd
2c0a 0d03 32a0  |  2 |		.DEBUG	0x0d03,0x32a0,0x0002,0x0000,0x005a,0x8695,0x0000,0x0b2c
2c12 0d2b 32ac  | +2 |		.DEBUG	0x0d2b,0x32ac,0x0002,0x0000,0x005a,0x8695,0x0000,0x0b59
2c1a 0d43 32b8  | C2 |		.DEBUG	0x0d43,0x32b8,0x0001,0x0000,0x005a,0x8695,0x0000,0x0b85
2c22 0fa3 339e  |  3 |		.DEBUG	0x0fa3,0x339e,0x0002,0x0000,0x005a,0x8695,0x0000,0x0f84
2c2a 0fc3 33b4  |  3 |		.DEBUG	0x0fc3,0x33b4,0x0002,0x0000,0x005a,0x8695,0x0000,0x0fc0
2c32 1013 33ce  |  3 |		.DEBUG	0x1013,0x33ce,0x0001,0x0000,0x005a,0x8695,0x0000,0x1037
2c3a 11ab 347a  |  4z|		.DEBUG	0x11ab,0x347a,0x0001,0x0000,0x005a,0x8695,0x0000,0x1318
2c42 1413 3548  |  5H|		.DEBUG	0x1413,0x3548,0x0002,0x0000,0x005a,0x8695,0x0000,0x170b
2c4a 144b 355a  | K5Z|		.DEBUG	0x144b,0x355a,0x0001,0x0000,0x005a,0x8695,0x0000,0x175e
2c52 1493 357a  |  5z|		.DEBUG	0x1493,0x357a,0x0001,0x0000,0x005a,0x8695,0x0000,0x17d8
2c5a 156b 35ce  | k5 |		.DEBUG	0x156b,0x35ce,0x0001,0x0000,0x005a,0x8695,0x0000,0x193b
2c62 15c3 35f4  |  5 |		.DEBUG	0x15c3,0x35f4,0x0001,0x0000,0x005a,0x8695,0x0000,0x19e5
2c6a 16d3 363c  |  6<|		.DEBUG	0x16d3,0x363c,0x0001,0x0000,0x005a,0x8695,0x0000,0x1b51
2c72 17e3 36d8  |  6 |		.DEBUG	0x17e3,0x36d8,0x0001,0x0000,0x005a,0x8695,0x0000,0x1d47
2c7a 188b 373c  |  7<|		.DEBUG	0x188b,0x373c,0x0005,0x0000,0x005a,0x86a5,0x0000,0x001e
2c82 18a3 373e  |  7>|		.DEBUG	0x18a3,0x373e,0x0005,0x0000,0x005a,0x86a5,0x0000,0x0025
2c8a 193b 3740  | ;7@|		.DEBUG	0x193b,0x3740,0x0001,0x0000,0x005a,0x86a5,0x0000,0x00a7
2c92 194b 3746  | K7F|		.DEBUG	0x194b,0x3746,0x0001,0x0000,0x005a,0x86a5,0x0000,0x00bd
2c9a 1963 374c  | c7L|		.DEBUG	0x1963,0x374c,0x0001,0x0000,0x005a,0x86a5,0x0000,0x00e9
2ca2 1a03 37a0  |  7 |		.DEBUG	0x1a03,0x37a0,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0212
2caa 1a73 37be  | s7 |		.DEBUG	0x1a73,0x37be,0x0002,0x0000,0x005a,0x86a5,0x0000,0x02c1
2cb2 1acb 37dc  |  7 |		.DEBUG	0x1acb,0x37dc,0x0001,0x0000,0x005a,0x86a5,0x0000,0x034c
2cba 1d43 3876  | C8v|		.DEBUG	0x1d43,0x3876,0x0002,0x0000,0x005a,0x86a5,0x0000,0x0669
2cc2 1d83 3896  |  8 |		.DEBUG	0x1d83,0x3896,0x0001,0x0000,0x005a,0x86a5,0x0000,0x06d6
2cca 1eb3 3928  |  9(|		.DEBUG	0x1eb3,0x3928,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0878
2cd2 1f6b 39ae  | k9 |		.DEBUG	0x1f6b,0x39ae,0x0002,0x0000,0x005a,0x86a5,0x0000,0x09c9
2cda 200b 3a34  |  :4|		.DEBUG	0x200b,0x3a34,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0aff
2ce2 2093 3a66  |  :f|		.DEBUG	0x2093,0x3a66,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0bd5
2cea 2143 3aa4  |!C: |		.DEBUG	0x2143,0x3aa4,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0cf0
2cf2 218b 3abc  |! : |		.DEBUG	0x218b,0x3abc,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0d88
2cfa 2203 3ade  |" : |		.DEBUG	0x2203,0x3ade,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0e47
2d02 2243 3afa  |"C: |		.DEBUG	0x2243,0x3afa,0x0001,0x0000,0x005a,0x86a5,0x0000,0x0eb3
2d0a 22cb 3b28  |" ;(|		.DEBUG	0x22cb,0x3b28,0x2801,0x0002,0x005a,0x86a5,0x0000,0x0f82
2d12 23cb 3b74  |# ;t|		.DEBUG	0x23cb,0x3b74,0x0004,0x0000,0x005a,0x8695,0x0000,0x22ce
2d1a 2403 3b7e  |$ ;~|		.DEBUG	0x2403,0x3b7e,0x0801,0x0002,0x005a,0x86a5,0x0000,0x1243
2d22 2443 3b9a  |$C; |		.DEBUG	0x2443,0x3b9a,0x0004,0x0000,0x005a,0x8695,0x0000,0x08fe
2d2a 245b 3ba0  |$[; |		.DEBUG	0x245b,0x3ba0,0x0004,0x0000,0x005a,0x8695,0x0000,0x19ab
2d32 2473 3ba6  |$s; |		.DEBUG	0x2473,0x3ba6,0x0001,0x0000,0x005a,0x8695,0x0000,0x1d8b
2d3a ; --------------------------------------------------------------------------------------
2d3a ; Debug3 Subtable 0x0
2d3a ; --------------------------------------------------------------------------------------
2d3a 0018 0001  |    |		.DBG3TAB	0x0018,0x0001
2d3c 000b ffff  |    |		.CONST	0x000b,0xffff
2d3e 000c fffe  |    |		.CONST	0x000c,0xfffe
2d40 000d fffd  |    |		.CONST	0x000d,0xfffd
2d42 000e fffc  |    |		.CONST	0x000e,0xfffc
2d44 0015 fffb  |    |		.CONST	0x0015,0xfffb
2d46 0017 0401  |    |		.CONST	0x0017,0x0401
2d48 0018 fffb  |    |		.CONST	0x0018,0xfffb
2d4a 001f fffa  |    |		.CONST	0x001f,0xfffa
2d4c 0020 fff9  |    |		.CONST	0x0020,0xfff9
2d4e 0021 fff8  | !  |		.CONST	0x0021,0xfff8
2d50 0023 fff7  | #  |		.CONST	0x0023,0xfff7
2d52 0025 fff6  | %  |		.CONST	0x0025,0xfff6
2d54 0027 fff5  | '  |		.CONST	0x0027,0xfff5
2d56 0029 fff4  | )  |		.CONST	0x0029,0xfff4
2d58 002e fff3  | .  |		.CONST	0x002e,0xfff3
2d5a 0030 fff2  | 0  |		.CONST	0x0030,0xfff2
2d5c 0032 fff1  | 2  |		.CONST	0x0032,0xfff1
2d5e 0034 fff0  | 4  |		.CONST	0x0034,0xfff0
2d60 0036 ffef  | 6  |		.CONST	0x0036,0xffef
2d62 0038 ffff  | 8  |		.CONST	0x0038,0xffff
2d64 0039 fffe  | 9  |		.CONST	0x0039,0xfffe
2d66 003e fffd  | >  |		.CONST	0x003e,0xfffd
2d68 0040 fffc  | @  |		.CONST	0x0040,0xfffc
2d6a 0042 fffb  | B  |		.CONST	0x0042,0xfffb
2d6c 0044 fffa  | D  |		.CONST	0x0044,0xfffa
2d6e ; --------------------------------------------------------------------------------------
2d6e ; Debug3 Subtable 0x1
2d6e ; --------------------------------------------------------------------------------------
2d6e 0051 0003  | Q  |		.DBG3TAB	0x0051,0x0003
2d70 0047 ffff  | G  |		.CONST	0x0047,0xffff
2d72 0048 fffe  | H  |		.CONST	0x0048,0xfffe
2d74 0049 fffd  | I  |		.CONST	0x0049,0xfffd
2d76 004a fffc  | J  |		.CONST	0x004a,0xfffc
2d78 004b fffb  | K  |		.CONST	0x004b,0xfffb
2d7a 004c fffa  | L  |		.CONST	0x004c,0xfffa
2d7c 004d fff9  | M  |		.CONST	0x004d,0xfff9
2d7e 004e fff8  | N  |		.CONST	0x004e,0xfff8
2d80 004f fff7  | O  |		.CONST	0x004f,0xfff7
2d82 0050 fff6  | P  |		.CONST	0x0050,0xfff6
2d84 0061 fff5  | a  |		.CONST	0x0061,0xfff5
2d86 0066 0801  | f  |		.CONST	0x0066,0x0801
2d88 0067 fff5  | g  |		.CONST	0x0067,0xfff5
2d8a 007d 0c01  | }  |		.CONST	0x007d,0x0c01
2d8c 007e 0801  | ~  |		.CONST	0x007e,0x0801
2d8e 0084 fff4  |    |		.CONST	0x0084,0xfff4
2d90 0089 fff3  |    |		.CONST	0x0089,0xfff3
2d92 008e fff2  |    |		.CONST	0x008e,0xfff2
2d94 0090 fff1  |    |		.CONST	0x0090,0xfff1
2d96 0092 fff0  |    |		.CONST	0x0092,0xfff0
2d98 0094 ffef  |    |		.CONST	0x0094,0xffef
2d9a 0096 ffee  |    |		.CONST	0x0096,0xffee
2d9c 0098 ffed  |    |		.CONST	0x0098,0xffed
2d9e 009a ffec  |    |		.CONST	0x009a,0xffec
2da0 009c ffeb  |    |		.CONST	0x009c,0xffeb
2da2 009e ffea  |    |		.CONST	0x009e,0xffea
2da4 00a0 ffe9  |    |		.CONST	0x00a0,0xffe9
2da6 00a2 ffe8  |    |		.CONST	0x00a2,0xffe8
2da8 00a4 ffe7  |    |		.CONST	0x00a4,0xffe7
2daa 00a6 ffe6  |    |		.CONST	0x00a6,0xffe6
2dac 00a8 ffe5  |    |		.CONST	0x00a8,0xffe5
2dae 00aa ffe4  |    |		.CONST	0x00aa,0xffe4
2db0 00ac ffe3  |    |		.CONST	0x00ac,0xffe3
2db2 00ae ffe2  |    |		.CONST	0x00ae,0xffe2
2db4 00b0 ffe1  |    |		.CONST	0x00b0,0xffe1
2db6 00b2 ffe0  |    |		.CONST	0x00b2,0xffe0
2db8 00b4 ffdf  |    |		.CONST	0x00b4,0xffdf
2dba 00b6 ffde  |    |		.CONST	0x00b6,0xffde
2dbc 00b8 ffdd  |    |		.CONST	0x00b8,0xffdd
2dbe 00ba ffdc  |    |		.CONST	0x00ba,0xffdc
2dc0 00bc ffdb  |    |		.CONST	0x00bc,0xffdb
2dc2 00be ffda  |    |		.CONST	0x00be,0xffda
2dc4 00c0 ffd9  |    |		.CONST	0x00c0,0xffd9
2dc6 00c2 ffd8  |    |		.CONST	0x00c2,0xffd8
2dc8 00c4 ffd7  |    |		.CONST	0x00c4,0xffd7
2dca 00c6 ffd6  |    |		.CONST	0x00c6,0xffd6
2dcc 00c8 ffd5  |    |		.CONST	0x00c8,0xffd5
2dce 00ca ffd4  |    |		.CONST	0x00ca,0xffd4
2dd0 00cc ffd3  |    |		.CONST	0x00cc,0xffd3
2dd2 00ce ffd2  |    |		.CONST	0x00ce,0xffd2
2dd4 00d0 ffd1  |    |		.CONST	0x00d0,0xffd1
2dd6 00d2 ffd0  |    |		.CONST	0x00d2,0xffd0
2dd8 00d4 ffcf  |    |		.CONST	0x00d4,0xffcf
2dda 00d6 ffce  |    |		.CONST	0x00d6,0xffce
2ddc 00d8 ffcd  |    |		.CONST	0x00d8,0xffcd
2dde 00da ffcc  |    |		.CONST	0x00da,0xffcc
2de0 00dc ffff  |    |		.CONST	0x00dc,0xffff
2de2 00dd fffe  |    |		.CONST	0x00dd,0xfffe
2de4 00de fffd  |    |		.CONST	0x00de,0xfffd
2de6 00df fffc  |    |		.CONST	0x00df,0xfffc
2de8 00e4 fffb  |    |		.CONST	0x00e4,0xfffb
2dea 010d fffa  |    |		.CONST	0x010d,0xfffa
2dec 0113 fff9  |    |		.CONST	0x0113,0xfff9
2dee 0115 fff8  |    |		.CONST	0x0115,0xfff8
2df0 0117 fff7  |    |		.CONST	0x0117,0xfff7
2df2 0119 fff6  |    |		.CONST	0x0119,0xfff6
2df4 011b fff5  |    |		.CONST	0x011b,0xfff5
2df6 011d fff4  |    |		.CONST	0x011d,0xfff4
2df8 011f fff3  |    |		.CONST	0x011f,0xfff3
2dfa 0121 fff2  | !  |		.CONST	0x0121,0xfff2
2dfc 0123 fff1  | #  |		.CONST	0x0123,0xfff1
2dfe 0125 fff0  | %  |		.CONST	0x0125,0xfff0
2e00 0127 ffef  | '  |		.CONST	0x0127,0xffef
2e02 0129 ffee  | )  |		.CONST	0x0129,0xffee
2e04 012b ffed  | +  |		.CONST	0x012b,0xffed
2e06 012d ffec  | -  |		.CONST	0x012d,0xffec
2e08 012f ffeb  | /  |		.CONST	0x012f,0xffeb
2e0a 0131 ffea  | 1  |		.CONST	0x0131,0xffea
2e0c 0133 ffe9  | 3  |		.CONST	0x0133,0xffe9
2e0e 0135 ffe8  | 5  |		.CONST	0x0135,0xffe8
2e10 0137 ffe7  | 7  |		.CONST	0x0137,0xffe7
2e12 0139 ffe6  | 9  |		.CONST	0x0139,0xffe6
2e14 013b ffe5  | ;  |		.CONST	0x013b,0xffe5
2e16 013d ffe4  | =  |		.CONST	0x013d,0xffe4
2e18 ; --------------------------------------------------------------------------------------
2e18 ; Debug3 Subtable 0x2
2e18 ; --------------------------------------------------------------------------------------
2e18 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
2e1a ; --------------------------------------------------------------------------------------
2e1a ; Debug3 Subtable 0x3
2e1a ; --------------------------------------------------------------------------------------
2e1a 0000 0009  |    |		.DBG3TAB	0x0000,0x0009
2e1c 0163 0001  | c  |		.CONST	0x0163,0x0001
2e1e 0166 0003  | f  |		.CONST	0x0166,0x0003
2e20 0168 0004  | h  |		.CONST	0x0168,0x0004
2e22 0177 0005  | w  |		.CONST	0x0177,0x0005
2e24 017c 0006  | |  |		.CONST	0x017c,0x0006
2e26 017e 0002  | ~  |		.CONST	0x017e,0x0002
2e28 0182 0007  |    |		.CONST	0x0182,0x0007
2e2a 0187 0008  |    |		.CONST	0x0187,0x0008
2e2c 018e 0009  |    |		.CONST	0x018e,0x0009
2e2e ; --------------------------------------------------------------------------------------
2e2e ; Debug3 Subtable 0x4
2e2e ; --------------------------------------------------------------------------------------
2e2e 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
2e30 019b 0001  |    |		.CONST	0x019b,0x0001
2e32 01a7 0002  |    |		.CONST	0x01a7,0x0002
2e34 01af 0003  |    |		.CONST	0x01af,0x0003
2e36 ; --------------------------------------------------------------------------------------
2e36 ; Debug3 Subtable 0x5
2e36 ; --------------------------------------------------------------------------------------
2e36 0003 0008  |    |		.DBG3TAB	0x0003,0x0008
2e38 01bb ffff  |    |		.CONST	0x01bb,0xffff
2e3a 01c0 fffe  |    |		.CONST	0x01c0,0xfffe
2e3c 01c3 fffd  |    |		.CONST	0x01c3,0xfffd
2e3e 01c5 0001  |    |		.CONST	0x01c5,0x0001
2e40 01c8 0002  |    |		.CONST	0x01c8,0x0002
2e42 01dd 0003  |    |		.CONST	0x01dd,0x0003
2e44 01df 0004  |    |		.CONST	0x01df,0x0004
2e46 01f2 0005  |    |		.CONST	0x01f2,0x0005
2e48 0200 0006  |    |		.CONST	0x0200,0x0006
2e4a 0205 0007  |    |		.CONST	0x0205,0x0007
2e4c 020d 0008  |    |		.CONST	0x020d,0x0008
2e4e ; --------------------------------------------------------------------------------------
2e4e ; Debug3 Subtable 0x6
2e4e ; --------------------------------------------------------------------------------------
2e4e 0004 000c  |    |		.DBG3TAB	0x0004,0x000c
2e50 021b ffff  |    |		.CONST	0x021b,0xffff
2e52 021c fffe  |    |		.CONST	0x021c,0xfffe
2e54 0222 fffd  | "  |		.CONST	0x0222,0xfffd
2e56 0227 fffc  | '  |		.CONST	0x0227,0xfffc
2e58 0229 0001  | )  |		.CONST	0x0229,0x0001
2e5a 0239 0002  | 9  |		.CONST	0x0239,0x0002
2e5c 023d 0003  | =  |		.CONST	0x023d,0x0003
2e5e 0242 0004  | B  |		.CONST	0x0242,0x0004
2e60 0246 0005  | F  |		.CONST	0x0246,0x0005
2e62 0247 0401  | G  |		.CONST	0x0247,0x0401
2e64 0248 0005  | H  |		.CONST	0x0248,0x0005
2e66 0249 0006  | I  |		.CONST	0x0249,0x0006
2e68 0257 0007  | W  |		.CONST	0x0257,0x0007
2e6a 025b 0008  | [  |		.CONST	0x025b,0x0008
2e6c 0260 0009  | `  |		.CONST	0x0260,0x0009
2e6e 0268 000a  | h  |		.CONST	0x0268,0x000a
2e70 ; --------------------------------------------------------------------------------------
2e70 ; Debug3 Subtable 0x7
2e70 ; --------------------------------------------------------------------------------------
2e70 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
2e72 ; --------------------------------------------------------------------------------------
2e72 ; Debug3 Subtable 0x8
2e72 ; --------------------------------------------------------------------------------------
2e72 0005 001a  |    |		.DBG3TAB	0x0005,0x001a
2e74 028b ffff  |    |		.CONST	0x028b,0xffff
2e76 0291 fffe  |    |		.CONST	0x0291,0xfffe
2e78 0292 fffd  |    |		.CONST	0x0292,0xfffd
2e7a 0297 fffc  |    |		.CONST	0x0297,0xfffc
2e7c 029c fffb  |    |		.CONST	0x029c,0xfffb
2e7e 029e 0001  |    |		.CONST	0x029e,0x0001
2e80 029f 0401  |    |		.CONST	0x029f,0x0401
2e82 02a1 0001  |    |		.CONST	0x02a1,0x0001
2e84 02a2 0002  |    |		.CONST	0x02a2,0x0002
2e86 02a4 0003  |    |		.CONST	0x02a4,0x0003
2e88 02a6 0004  |    |		.CONST	0x02a6,0x0004
2e8a 02a9 0005  |    |		.CONST	0x02a9,0x0005
2e8c 02ad 0006  |    |		.CONST	0x02ad,0x0006
2e8e 02b5 0007  |    |		.CONST	0x02b5,0x0007
2e90 02b9 0008  |    |		.CONST	0x02b9,0x0008
2e92 02ba 0009  |    |		.CONST	0x02ba,0x0009
2e94 02c7 000a  |    |		.CONST	0x02c7,0x000a
2e96 02cb 000b  |    |		.CONST	0x02cb,0x000b
2e98 02d3 000c  |    |		.CONST	0x02d3,0x000c
2e9a 02d4 000d  |    |		.CONST	0x02d4,0x000d
2e9c 02e4 000e  |    |		.CONST	0x02e4,0x000e
2e9e 02e8 000f  |    |		.CONST	0x02e8,0x000f
2ea0 02f3 0010  |    |		.CONST	0x02f3,0x0010
2ea2 02f7 0011  |    |		.CONST	0x02f7,0x0011
2ea4 02f8 0012  |    |		.CONST	0x02f8,0x0012
2ea6 02fa 0013  |    |		.CONST	0x02fa,0x0013
2ea8 02ff 0014  |    |		.CONST	0x02ff,0x0014
2eaa 0301 0015  |    |		.CONST	0x0301,0x0015
2eac 0315 0016  |    |		.CONST	0x0315,0x0016
2eae 0325 0017  | %  |		.CONST	0x0325,0x0017
2eb0 0326 0018  | &  |		.CONST	0x0326,0x0018
2eb2 ; --------------------------------------------------------------------------------------
2eb2 ; Debug3 Subtable 0x9
2eb2 ; --------------------------------------------------------------------------------------
2eb2 0004 000a  |    |		.DBG3TAB	0x0004,0x000a
2eb4 0333 ffff  | 3  |		.CONST	0x0333,0xffff
2eb6 0337 fffe  | 7  |		.CONST	0x0337,0xfffe
2eb8 0339 fffd  | 9  |		.CONST	0x0339,0xfffd
2eba 033a fffc  | :  |		.CONST	0x033a,0xfffc
2ebc 033d 0001  | =  |		.CONST	0x033d,0x0001
2ebe 0341 0002  | A  |		.CONST	0x0341,0x0002
2ec0 034e 0003  | N  |		.CONST	0x034e,0x0003
2ec2 0351 0004  | Q  |		.CONST	0x0351,0x0004
2ec4 035b 0005  | [  |		.CONST	0x035b,0x0005
2ec6 0360 0006  | `  |		.CONST	0x0360,0x0006
2ec8 0364 0007  | d  |		.CONST	0x0364,0x0007
2eca 036a 0008  | j  |		.CONST	0x036a,0x0008
2ecc 037a 0009  | z  |		.CONST	0x037a,0x0009
2ece 037b 000a  | {  |		.CONST	0x037b,0x000a
2ed0 ; --------------------------------------------------------------------------------------
2ed0 ; Debug3 Subtable 0xa
2ed0 ; --------------------------------------------------------------------------------------
2ed0 000a 0016  |    |		.DBG3TAB	0x000a,0x0016
2ed2 038b ffff  |    |		.CONST	0x038b,0xffff
2ed4 038f fffe  |    |		.CONST	0x038f,0xfffe
2ed6 0394 fffd  |    |		.CONST	0x0394,0xfffd
2ed8 0396 fffc  |    |		.CONST	0x0396,0xfffc
2eda 0397 0001  |    |		.CONST	0x0397,0x0001
2edc 039b 0002  |    |		.CONST	0x039b,0x0002
2ede 039f 0003  |    |		.CONST	0x039f,0x0003
2ee0 03a4 0004  |    |		.CONST	0x03a4,0x0004
2ee2 03a7 0005  |    |		.CONST	0x03a7,0x0005
2ee4 03ab 0006  |    |		.CONST	0x03ab,0x0006
2ee6 03ac 0007  |    |		.CONST	0x03ac,0x0007
2ee8 03ad fbff  |    |		.CONST	0x03ad,0xfbff
2eea 03b2 fbfe  |    |		.CONST	0x03b2,0xfbfe
2eec 03b3 fbfd  |    |		.CONST	0x03b3,0xfbfd
2eee 03b6 fbfc  |    |		.CONST	0x03b6,0xfbfc
2ef0 03bb fbfb  |    |		.CONST	0x03bb,0xfbfb
2ef2 03bd fbfa  |    |		.CONST	0x03bd,0xfbfa
2ef4 03c5 0401  |    |		.CONST	0x03c5,0x0401
2ef6 03d2 0402  |    |		.CONST	0x03d2,0x0402
2ef8 03d6 0403  |    |		.CONST	0x03d6,0x0403
2efa 03d9 0404  |    |		.CONST	0x03d9,0x0404
2efc 03de 0405  |    |		.CONST	0x03de,0x0405
2efe 03e3 0406  |    |		.CONST	0x03e3,0x0406
2f00 03e4 0407  |    |		.CONST	0x03e4,0x0407
2f02 03eb 0008  |    |		.CONST	0x03eb,0x0008
2f04 03f0 0009  |    |		.CONST	0x03f0,0x0009
2f06 03f5 000a  |    |		.CONST	0x03f5,0x000a
2f08 03f9 000b  |    |		.CONST	0x03f9,0x000b
2f0a 03fb 000c  |    |		.CONST	0x03fb,0x000c
2f0c 0403 000d  |    |		.CONST	0x0403,0x000d
2f0e 040d 000e  |    |		.CONST	0x040d,0x000e
2f10 0414 000f  |    |		.CONST	0x0414,0x000f
2f12 ; --------------------------------------------------------------------------------------
2f12 ; Debug3 Subtable 0xb
2f12 ; --------------------------------------------------------------------------------------
2f12 000a 0027  |   '|		.DBG3TAB	0x000a,0x0027
2f14 043b ffff  | ;  |		.CONST	0x043b,0xffff
2f16 043c fffe  | <  |		.CONST	0x043c,0xfffe
2f18 043d fffd  | =  |		.CONST	0x043d,0xfffd
2f1a 043e fffc  | >  |		.CONST	0x043e,0xfffc
2f1c 0442 fffb  | B  |		.CONST	0x0442,0xfffb
2f1e 0443 fffa  | C  |		.CONST	0x0443,0xfffa
2f20 0448 fff9  | H  |		.CONST	0x0448,0xfff9
2f22 044d fff8  | M  |		.CONST	0x044d,0xfff8
2f24 044f fff7  | O  |		.CONST	0x044f,0xfff7
2f26 0451 fff6  | Q  |		.CONST	0x0451,0xfff6
2f28 0452 0001  | R  |		.CONST	0x0452,0x0001
2f2a 0457 0002  | W  |		.CONST	0x0457,0x0002
2f2c 0459 0003  | Y  |		.CONST	0x0459,0x0003
2f2e 045e 0004  | ^  |		.CONST	0x045e,0x0004
2f30 0463 0005  | c  |		.CONST	0x0463,0x0005
2f32 0465 0006  | e  |		.CONST	0x0465,0x0006
2f34 0466 0007  | f  |		.CONST	0x0466,0x0007
2f36 046a 0008  | j  |		.CONST	0x046a,0x0008
2f38 0472 0009  | r  |		.CONST	0x0472,0x0009
2f3a 0476 000a  | v  |		.CONST	0x0476,0x000a
2f3c 0477 000b  | w  |		.CONST	0x0477,0x000b
2f3e 0485 000c  |    |		.CONST	0x0485,0x000c
2f40 0489 000d  |    |		.CONST	0x0489,0x000d
2f42 0490 000e  |    |		.CONST	0x0490,0x000e
2f44 0494 000f  |    |		.CONST	0x0494,0x000f
2f46 04a1 0010  |    |		.CONST	0x04a1,0x0010
2f48 04a3 0011  |    |		.CONST	0x04a3,0x0011
2f4a 04a4 0012  |    |		.CONST	0x04a4,0x0012
2f4c 04b9 0013  |    |		.CONST	0x04b9,0x0013
2f4e 04bd 0014  |    |		.CONST	0x04bd,0x0014
2f50 04ca 0015  |    |		.CONST	0x04ca,0x0015
2f52 04ce 0016  |    |		.CONST	0x04ce,0x0016
2f54 04d1 0017  |    |		.CONST	0x04d1,0x0017
2f56 04d6 0018  |    |		.CONST	0x04d6,0x0018
2f58 04df 0019  |    |		.CONST	0x04df,0x0019
2f5a 04e1 0401  |    |		.CONST	0x04e1,0x0401
2f5c 04e2 0019  |    |		.CONST	0x04e2,0x0019
2f5e 04e7 001a  |    |		.CONST	0x04e7,0x001a
2f60 04e8 0801  |    |		.CONST	0x04e8,0x0801
2f62 04ea 0802  |    |		.CONST	0x04ea,0x0802
2f64 04eb 0803  |    |		.CONST	0x04eb,0x0803
2f66 04ec 0804  |    |		.CONST	0x04ec,0x0804
2f68 04ed 001a  |    |		.CONST	0x04ed,0x001a
2f6a 04f3 001b  |    |		.CONST	0x04f3,0x001b
2f6c 04fc 001c  |    |		.CONST	0x04fc,0x001c
2f6e 0508 001d  |    |		.CONST	0x0508,0x001d
2f70 0512 001e  |    |		.CONST	0x0512,0x001e
2f72 0522 001f  | "  |		.CONST	0x0522,0x001f
2f74 0523 0020  | #  |		.CONST	0x0523,0x0020
2f76 ; --------------------------------------------------------------------------------------
2f76 ; Debug3 Subtable 0xc
2f76 ; --------------------------------------------------------------------------------------
2f76 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
2f78 0533 ffff  | 3  |		.CONST	0x0533,0xffff
2f7a 0537 0001  | 7  |		.CONST	0x0537,0x0001
2f7c 053e 0002  | >  |		.CONST	0x053e,0x0002
2f7e 0544 0003  | D  |		.CONST	0x0544,0x0003
2f80 054b 0004  | K  |		.CONST	0x054b,0x0004
2f82 ; --------------------------------------------------------------------------------------
2f82 ; Debug3 Subtable 0xd
2f82 ; --------------------------------------------------------------------------------------
2f82 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
2f84 ; --------------------------------------------------------------------------------------
2f84 ; Debug3 Subtable 0xe
2f84 ; --------------------------------------------------------------------------------------
2f84 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
2f86 0573 0001  | s  |		.CONST	0x0573,0x0001
2f88 0574 0401  | t  |		.CONST	0x0574,0x0401
2f8a 0575 0001  | u  |		.CONST	0x0575,0x0001
2f8c ; --------------------------------------------------------------------------------------
2f8c ; Debug3 Subtable 0xf
2f8c ; --------------------------------------------------------------------------------------
2f8c 0000 0008  |    |		.DBG3TAB	0x0000,0x0008
2f8e 057b 0001  | {  |		.CONST	0x057b,0x0001
2f90 057e 0002  | ~  |		.CONST	0x057e,0x0002
2f92 057f 0401  |    |		.CONST	0x057f,0x0401
2f94 0580 0002  |    |		.CONST	0x0580,0x0002
2f96 0581 0003  |    |		.CONST	0x0581,0x0003
2f98 0582 0801  |    |		.CONST	0x0582,0x0801
2f9a 0583 0003  |    |		.CONST	0x0583,0x0003
2f9c 0584 0004  |    |		.CONST	0x0584,0x0004
2f9e ; --------------------------------------------------------------------------------------
2f9e ; Debug3 Subtable 0x10
2f9e ; --------------------------------------------------------------------------------------
2f9e 0004 0009  |    |		.DBG3TAB	0x0004,0x0009
2fa0 058b ffff  |    |		.CONST	0x058b,0xffff
2fa2 058c fffe  |    |		.CONST	0x058c,0xfffe
2fa4 058d fffd  |    |		.CONST	0x058d,0xfffd
2fa6 058e fffc  |    |		.CONST	0x058e,0xfffc
2fa8 059e 0001  |    |		.CONST	0x059e,0x0001
2faa 05a7 0002  |    |		.CONST	0x05a7,0x0002
2fac 05a9 0003  |    |		.CONST	0x05a9,0x0003
2fae 05ab 0004  |    |		.CONST	0x05ab,0x0004
2fb0 05ac 0005  |    |		.CONST	0x05ac,0x0005
2fb2 05c3 0006  |    |		.CONST	0x05c3,0x0006
2fb4 05c9 0007  |    |		.CONST	0x05c9,0x0007
2fb6 05cc 0008  |    |		.CONST	0x05cc,0x0008
2fb8 05d2 0009  |    |		.CONST	0x05d2,0x0009
2fba ; --------------------------------------------------------------------------------------
2fba ; Debug3 Subtable 0x11
2fba ; --------------------------------------------------------------------------------------
2fba 0008 0023  |   #|		.DBG3TAB	0x0008,0x0023
2fbc 05db ffff  |    |		.CONST	0x05db,0xffff
2fbe 05dc fffe  |    |		.CONST	0x05dc,0xfffe
2fc0 05dd fffd  |    |		.CONST	0x05dd,0xfffd
2fc2 05df fffc  |    |		.CONST	0x05df,0xfffc
2fc4 05e3 fffb  |    |		.CONST	0x05e3,0xfffb
2fc6 05e4 fffa  |    |		.CONST	0x05e4,0xfffa
2fc8 05e7 fff9  |    |		.CONST	0x05e7,0xfff9
2fca 05e9 fff8  |    |		.CONST	0x05e9,0xfff8
2fcc 05f2 0001  |    |		.CONST	0x05f2,0x0001
2fce 05f4 0002  |    |		.CONST	0x05f4,0x0002
2fd0 05f9 0003  |    |		.CONST	0x05f9,0x0003
2fd2 0603 0004  |    |		.CONST	0x0603,0x0004
2fd4 0606 0005  |    |		.CONST	0x0606,0x0005
2fd6 060e 0006  |    |		.CONST	0x060e,0x0006
2fd8 0613 0007  |    |		.CONST	0x0613,0x0007
2fda 0615 0008  |    |		.CONST	0x0615,0x0008
2fdc 061b 0009  |    |		.CONST	0x061b,0x0009
2fde 061d 000a  |    |		.CONST	0x061d,0x000a
2fe0 0623 000b  | #  |		.CONST	0x0623,0x000b
2fe2 0625 000c  | %  |		.CONST	0x0625,0x000c
2fe4 062a 000d  | *  |		.CONST	0x062a,0x000d
2fe6 062c 000e  | ,  |		.CONST	0x062c,0x000e
2fe8 062e 000f  | .  |		.CONST	0x062e,0x000f
2fea 062f 0010  | /  |		.CONST	0x062f,0x0010
2fec 0635 0011  | 5  |		.CONST	0x0635,0x0011
2fee 0638 0012  | 8  |		.CONST	0x0638,0x0012
2ff0 063d 0013  | =  |		.CONST	0x063d,0x0013
2ff2 063f 0014  | ?  |		.CONST	0x063f,0x0014
2ff4 064b 0015  | K  |		.CONST	0x064b,0x0015
2ff6 064f 0016  | O  |		.CONST	0x064f,0x0016
2ff8 0651 0017  | Q  |		.CONST	0x0651,0x0017
2ffa 0653 0018  | S  |		.CONST	0x0653,0x0018
2ffc 0659 0019  | Y  |		.CONST	0x0659,0x0019
2ffe 0665 001a  | e  |		.CONST	0x0665,0x001a
3000 0668 001b  | h  |		.CONST	0x0668,0x001b
3002 066d 001c  | m  |		.CONST	0x066d,0x001c
3004 066f 001d  | o  |		.CONST	0x066f,0x001d
3006 0675 001e  | u  |		.CONST	0x0675,0x001e
3008 0677 001f  | w  |		.CONST	0x0677,0x001f
300a 067f 0020  |    |		.CONST	0x067f,0x0020
300c 0685 0021  |   !|		.CONST	0x0685,0x0021
300e 0688 0022  |   "|		.CONST	0x0688,0x0022
3010 068e 0023  |   #|		.CONST	0x068e,0x0023
3012 ; --------------------------------------------------------------------------------------
3012 ; Debug3 Subtable 0x12
3012 ; --------------------------------------------------------------------------------------
3012 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
3014 ; --------------------------------------------------------------------------------------
3014 ; Debug3 Subtable 0x13
3014 ; --------------------------------------------------------------------------------------
3014 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
3016 ; --------------------------------------------------------------------------------------
3016 ; Debug3 Subtable 0x14
3016 ; --------------------------------------------------------------------------------------
3016 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
3018 ; --------------------------------------------------------------------------------------
3018 ; Debug3 Subtable 0x15
3018 ; --------------------------------------------------------------------------------------
3018 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
301a 06fb 0001  |    |		.CONST	0x06fb,0x0001
301c 06fd 0002  |    |		.CONST	0x06fd,0x0002
301e 0708 0003  |    |		.CONST	0x0708,0x0003
3020 070a 0004  |    |		.CONST	0x070a,0x0004
3022 ; --------------------------------------------------------------------------------------
3022 ; Debug3 Subtable 0x16
3022 ; --------------------------------------------------------------------------------------
3022 0001 0027  |   '|		.DBG3TAB	0x0001,0x0027
3024 0713 ffff  |    |		.CONST	0x0713,0xffff
3026 0714 0001  |    |		.CONST	0x0714,0x0001
3028 0718 0002  |    |		.CONST	0x0718,0x0002
302a 071a 0003  |    |		.CONST	0x071a,0x0003
302c 071e 0004  |    |		.CONST	0x071e,0x0004
302e 0723 0005  | #  |		.CONST	0x0723,0x0005
3030 0725 0006  | %  |		.CONST	0x0725,0x0006
3032 0726 0401  | &  |		.CONST	0x0726,0x0401
3034 0728 0402  | (  |		.CONST	0x0728,0x0402
3036 0729 0403  | )  |		.CONST	0x0729,0x0403
3038 072a 0404  | *  |		.CONST	0x072a,0x0404
303a 072b 0006  | +  |		.CONST	0x072b,0x0006
303c 0739 000c  | 9  |		.CONST	0x0739,0x000c
303e 073b 0007  | ;  |		.CONST	0x073b,0x0007
3040 073d 0008  | =  |		.CONST	0x073d,0x0008
3042 0740 0801  | @  |		.CONST	0x0740,0x0801
3044 0742 0802  | B  |		.CONST	0x0742,0x0802
3046 0743 0803  | C  |		.CONST	0x0743,0x0803
3048 0744 0804  | D  |		.CONST	0x0744,0x0804
304a 0746 0008  | F  |		.CONST	0x0746,0x0008
304c 0748 0009  | H  |		.CONST	0x0748,0x0009
304e 074b 0c01  | K  |		.CONST	0x074b,0x0c01
3050 074d 0c02  | M  |		.CONST	0x074d,0x0c02
3052 074e 0c03  | N  |		.CONST	0x074e,0x0c03
3054 074f 0c04  | O  |		.CONST	0x074f,0x0c04
3056 0751 0009  | Q  |		.CONST	0x0751,0x0009
3058 0753 000a  | S  |		.CONST	0x0753,0x000a
305a 0756 1001  | V  |		.CONST	0x0756,0x1001
305c 0758 1002  | X  |		.CONST	0x0758,0x1002
305e 0759 1003  | Y  |		.CONST	0x0759,0x1003
3060 075a 1004  | Z  |		.CONST	0x075a,0x1004
3062 075c 000a  | \  |		.CONST	0x075c,0x000a
3064 075e 000b  | ^  |		.CONST	0x075e,0x000b
3066 0761 1401  | a  |		.CONST	0x0761,0x1401
3068 0763 1402  | c  |		.CONST	0x0763,0x1402
306a 0764 1403  | d  |		.CONST	0x0764,0x1403
306c 0765 1404  | e  |		.CONST	0x0765,0x1404
306e 0767 000b  | g  |		.CONST	0x0767,0x000b
3070 076c 000d  | l  |		.CONST	0x076c,0x000d
3072 0774 000e  | t  |		.CONST	0x0774,0x000e
3074 ; --------------------------------------------------------------------------------------
3074 ; Debug3 Subtable 0x17
3074 ; --------------------------------------------------------------------------------------
3074 0003 000d  |    |		.DBG3TAB	0x0003,0x000d
3076 0783 ffff  |    |		.CONST	0x0783,0xffff
3078 0785 fffe  |    |		.CONST	0x0785,0xfffe
307a 078a fffd  |    |		.CONST	0x078a,0xfffd
307c 078f 0001  |    |		.CONST	0x078f,0x0001
307e 0792 0002  |    |		.CONST	0x0792,0x0002
3080 0795 0003  |    |		.CONST	0x0795,0x0003
3082 07aa 0004  |    |		.CONST	0x07aa,0x0004
3084 07bb 0006  |    |		.CONST	0x07bb,0x0006
3086 07be 0007  |    |		.CONST	0x07be,0x0007
3088 07c1 0008  |    |		.CONST	0x07c1,0x0008
308a 07c5 0009  |    |		.CONST	0x07c5,0x0009
308c 07d2 000a  |    |		.CONST	0x07d2,0x000a
308e 07d4 000b  |    |		.CONST	0x07d4,0x000b
3090 07d6 000c  |    |		.CONST	0x07d6,0x000c
3092 07dc 000d  |    |		.CONST	0x07dc,0x000d
3094 07de 000e  |    |		.CONST	0x07de,0x000e
3096 ; --------------------------------------------------------------------------------------
3096 ; Debug3 Subtable 0x18
3096 ; --------------------------------------------------------------------------------------
3096 0006 001d  |    |		.DBG3TAB	0x0006,0x001d
3098 07eb ffff  |    |		.CONST	0x07eb,0xffff
309a 07ef fffe  |    |		.CONST	0x07ef,0xfffe
309c 07f5 fffd  |    |		.CONST	0x07f5,0xfffd
309e 07fa fffc  |    |		.CONST	0x07fa,0xfffc
30a0 07ff fffb  |    |		.CONST	0x07ff,0xfffb
30a2 0804 fffa  |    |		.CONST	0x0804,0xfffa
30a4 0806 0001  |    |		.CONST	0x0806,0x0001
30a6 0809 0401  |    |		.CONST	0x0809,0x0401
30a8 080d 0001  |    |		.CONST	0x080d,0x0001
30aa 080e 0002  |    |		.CONST	0x080e,0x0002
30ac 0810 0003  |    |		.CONST	0x0810,0x0003
30ae 0813 0004  |    |		.CONST	0x0813,0x0004
30b0 0817 0005  |    |		.CONST	0x0817,0x0005
30b2 081b 0006  |    |		.CONST	0x081b,0x0006
30b4 082c 0007  | ,  |		.CONST	0x082c,0x0007
30b6 0830 0008  | 0  |		.CONST	0x0830,0x0008
30b8 0836 0009  | 6  |		.CONST	0x0836,0x0009
30ba 083c 000a  | <  |		.CONST	0x083c,0x000a
30bc 084c 000b  | L  |		.CONST	0x084c,0x000b
30be 0850 000c  | P  |		.CONST	0x0850,0x000c
30c0 0854 000d  | T  |		.CONST	0x0854,0x000d
30c2 085e 000e  | ^  |		.CONST	0x085e,0x000e
30c4 0862 000f  | b  |		.CONST	0x0862,0x000f
30c6 0870 0010  | p  |		.CONST	0x0870,0x0010
30c8 0874 0011  | t  |		.CONST	0x0874,0x0011
30ca 0878 0012  | x  |		.CONST	0x0878,0x0012
30cc 087c 0013  | |  |		.CONST	0x087c,0x0013
30ce 087e 0014  | ~  |		.CONST	0x087e,0x0014
30d0 0883 0015  |    |		.CONST	0x0883,0x0015
30d2 0893 0016  |    |		.CONST	0x0893,0x0016
30d4 0897 0017  |    |		.CONST	0x0897,0x0017
30d6 089c 0018  |    |		.CONST	0x089c,0x0018
30d8 08a0 0019  |    |		.CONST	0x08a0,0x0019
30da 08a5 001a  |    |		.CONST	0x08a5,0x001a
30dc 08a7 001b  |    |		.CONST	0x08a7,0x001b
30de ; --------------------------------------------------------------------------------------
30de ; Debug3 Subtable 0x19
30de ; --------------------------------------------------------------------------------------
30de 0002 0005  |    |		.DBG3TAB	0x0002,0x0005
30e0 08b3 ffff  |    |		.CONST	0x08b3,0xffff
30e2 08b4 fffe  |    |		.CONST	0x08b4,0xfffe
30e4 08b6 0001  |    |		.CONST	0x08b6,0x0001
30e6 08c2 0002  |    |		.CONST	0x08c2,0x0002
30e8 08c6 0003  |    |		.CONST	0x08c6,0x0003
30ea 08cb 0004  |    |		.CONST	0x08cb,0x0004
30ec 08cd 0005  |    |		.CONST	0x08cd,0x0005
30ee ; --------------------------------------------------------------------------------------
30ee ; Debug3 Subtable 0x1a
30ee ; --------------------------------------------------------------------------------------
30ee 0001 000c  |    |		.DBG3TAB	0x0001,0x000c
30f0 08db ffff  |    |		.CONST	0x08db,0xffff
30f2 08dd 0001  |    |		.CONST	0x08dd,0x0001
30f4 08df 0002  |    |		.CONST	0x08df,0x0002
30f6 08ea 0003  |    |		.CONST	0x08ea,0x0003
30f8 08fb 0004  |    |		.CONST	0x08fb,0x0004
30fa 08fe 0005  |    |		.CONST	0x08fe,0x0005
30fc 0904 0006  |    |		.CONST	0x0904,0x0006
30fe 0911 0007  |    |		.CONST	0x0911,0x0007
3100 0914 0008  |    |		.CONST	0x0914,0x0008
3102 0921 0009  | !  |		.CONST	0x0921,0x0009
3104 092e 000a  | .  |		.CONST	0x092e,0x000a
3106 0936 000b  | 6  |		.CONST	0x0936,0x000b
3108 0938 000c  | 8  |		.CONST	0x0938,0x000c
310a ; --------------------------------------------------------------------------------------
310a ; Debug3 Subtable 0x1b
310a ; --------------------------------------------------------------------------------------
310a 0004 001e  |    |		.DBG3TAB	0x0004,0x001e
310c 0953 0001  | S  |		.CONST	0x0953,0x0001
310e 0954 0401  | T  |		.CONST	0x0954,0x0401
3110 0956 0402  | V  |		.CONST	0x0956,0x0402
3112 0957 0403  | W  |		.CONST	0x0957,0x0403
3114 0958 0404  | X  |		.CONST	0x0958,0x0404
3116 0959 0001  | Y  |		.CONST	0x0959,0x0001
3118 095a 0801  | Z  |		.CONST	0x095a,0x0801
311a 095c 0802  | \  |		.CONST	0x095c,0x0802
311c 095d 0803  | ]  |		.CONST	0x095d,0x0803
311e 095e 0804  | ^  |		.CONST	0x095e,0x0804
3120 095f 0404  | _  |		.CONST	0x095f,0x0404
3122 0961 0002  | a  |		.CONST	0x0961,0x0002
3124 0963 0003  | c  |		.CONST	0x0963,0x0003
3126 0964 f3ff  | d  |		.CONST	0x0964,0xf3ff
3128 0969 f3fe  | i  |		.CONST	0x0969,0xf3fe
312a 096b f3fd  | k  |		.CONST	0x096b,0xf3fd
312c 0971 f3fc  | q  |		.CONST	0x0971,0xf3fc
312e 0972 0c01  | r  |		.CONST	0x0972,0x0c01
3130 0973 1001  | s  |		.CONST	0x0973,0x1001
3132 0975 1002  | u  |		.CONST	0x0975,0x1002
3134 0976 1003  | v  |		.CONST	0x0976,0x1003
3136 0977 1004  | w  |		.CONST	0x0977,0x1004
3138 0978 0c01  | x  |		.CONST	0x0978,0x0c01
313a 0979 1401  | y  |		.CONST	0x0979,0x1401
313c 097b 1402  | {  |		.CONST	0x097b,0x1402
313e 097c 1403  | |  |		.CONST	0x097c,0x1403
3140 097d 1404  | }  |		.CONST	0x097d,0x1404
3142 097e 1004  | ~  |		.CONST	0x097e,0x1004
3144 0981 0c02  |    |		.CONST	0x0981,0x0c02
3146 0986 0c03  |    |		.CONST	0x0986,0x0c03
3148 0990 0c04  |    |		.CONST	0x0990,0x0c04
314a 0994 0c05  |    |		.CONST	0x0994,0x0c05
314c 0999 0004  |    |		.CONST	0x0999,0x0004
314e 099b 0005  |    |		.CONST	0x099b,0x0005
3150 ; --------------------------------------------------------------------------------------
3150 ; Debug3 Subtable 0x1c
3150 ; --------------------------------------------------------------------------------------
3150 0003 000b  |    |		.DBG3TAB	0x0003,0x000b
3152 09ab ffff  |    |		.CONST	0x09ab,0xffff
3154 09ad fffe  |    |		.CONST	0x09ad,0xfffe
3156 09b0 fffd  |    |		.CONST	0x09b0,0xfffd
3158 09b1 0001  |    |		.CONST	0x09b1,0x0001
315a 09b2 0401  |    |		.CONST	0x09b2,0x0401
315c 09b4 0402  |    |		.CONST	0x09b4,0x0402
315e 09b5 0403  |    |		.CONST	0x09b5,0x0403
3160 09b6 0404  |    |		.CONST	0x09b6,0x0404
3162 09b7 0001  |    |		.CONST	0x09b7,0x0001
3164 09bd 0002  |    |		.CONST	0x09bd,0x0002
3166 09c7 0003  |    |		.CONST	0x09c7,0x0003
3168 09cb 0004  |    |		.CONST	0x09cb,0x0004
316a 09d0 0005  |    |		.CONST	0x09d0,0x0005
316c 09d2 0006  |    |		.CONST	0x09d2,0x0006
316e ; --------------------------------------------------------------------------------------
316e ; Debug3 Subtable 0x1d
316e ; --------------------------------------------------------------------------------------
316e 000b 002f  |   /|		.DBG3TAB	0x000b,0x002f
3170 09e3 ffff  |    |		.CONST	0x09e3,0xffff
3172 09e8 fffe  |    |		.CONST	0x09e8,0xfffe
3174 09e9 fffd  |    |		.CONST	0x09e9,0xfffd
3176 09ea fffc  |    |		.CONST	0x09ea,0xfffc
3178 09eb fffb  |    |		.CONST	0x09eb,0xfffb
317a 09f0 fffa  |    |		.CONST	0x09f0,0xfffa
317c 09f2 fff9  |    |		.CONST	0x09f2,0xfff9
317e 09f8 fff8  |    |		.CONST	0x09f8,0xfff8
3180 09fe fff7  |    |		.CONST	0x09fe,0xfff7
3182 0a03 fff6  |    |		.CONST	0x0a03,0xfff6
3184 0a09 fff5  |    |		.CONST	0x0a09,0xfff5
3186 0a0f 0001  |    |		.CONST	0x0a0f,0x0001
3188 0a14 0002  |    |		.CONST	0x0a14,0x0002
318a 0a1a 0003  |    |		.CONST	0x0a1a,0x0003
318c 0a1c 0004  |    |		.CONST	0x0a1c,0x0004
318e 0a1f 0005  |    |		.CONST	0x0a1f,0x0005
3190 0a21 0006  | !  |		.CONST	0x0a21,0x0006
3192 0a2b 0007  | +  |		.CONST	0x0a2b,0x0007
3194 0a30 0008  | 0  |		.CONST	0x0a30,0x0008
3196 0a32 0009  | 2  |		.CONST	0x0a32,0x0009
3198 0a4f 000a  | O  |		.CONST	0x0a4f,0x000a
319a 0a54 000e  | T  |		.CONST	0x0a54,0x000e
319c 0a59 000c  | Y  |		.CONST	0x0a59,0x000c
319e 0a5e 000d  | ^  |		.CONST	0x0a5e,0x000d
31a0 0a61 000f  | a  |		.CONST	0x0a61,0x000f
31a2 0a65 0010  | e  |		.CONST	0x0a65,0x0010
31a4 0a66 0401  | f  |		.CONST	0x0a66,0x0401
31a6 0a68 0010  | h  |		.CONST	0x0a68,0x0010
31a8 0a69 0011  | i  |		.CONST	0x0a69,0x0011
31aa 0a6d 0012  | m  |		.CONST	0x0a6d,0x0012
31ac 0a6e 0801  | n  |		.CONST	0x0a6e,0x0801
31ae 0a70 0802  | p  |		.CONST	0x0a70,0x0802
31b0 0a71 0803  | q  |		.CONST	0x0a71,0x0803
31b2 0a72 0804  | r  |		.CONST	0x0a72,0x0804
31b4 0a73 0012  | s  |		.CONST	0x0a73,0x0012
31b6 0a74 0c01  | t  |		.CONST	0x0a74,0x0c01
31b8 0a76 0c02  | v  |		.CONST	0x0a76,0x0c02
31ba 0a77 0c03  | w  |		.CONST	0x0a77,0x0c03
31bc 0a78 0c04  | x  |		.CONST	0x0a78,0x0c04
31be 0a79 0804  | y  |		.CONST	0x0a79,0x0804
31c0 0a7c 0013  | |  |		.CONST	0x0a7c,0x0013
31c2 0a81 0014  |    |		.CONST	0x0a81,0x0014
31c4 0a85 0015  |    |		.CONST	0x0a85,0x0015
31c6 0a90 0017  |    |		.CONST	0x0a90,0x0017
31c8 0ab2 0018  |    |		.CONST	0x0ab2,0x0018
31ca 0ab6 0016  |    |		.CONST	0x0ab6,0x0016
31cc 0aba 0019  |    |		.CONST	0x0aba,0x0019
31ce 0abe 001a  |    |		.CONST	0x0abe,0x001a
31d0 0ac2 001b  |    |		.CONST	0x0ac2,0x001b
31d2 0acc 001c  |    |		.CONST	0x0acc,0x001c
31d4 0ad0 001d  |    |		.CONST	0x0ad0,0x001d
31d6 0ad2 001e  |    |		.CONST	0x0ad2,0x001e
31d8 0adc 001f  |    |		.CONST	0x0adc,0x001f
31da 0ae0 0020  |    |		.CONST	0x0ae0,0x0020
31dc 0aea 0021  |   !|		.CONST	0x0aea,0x0021
31de 0af0 0022  |   "|		.CONST	0x0af0,0x0022
31e0 0af2 0023  |   #|		.CONST	0x0af2,0x0023
31e2 0af8 0024  |   $|		.CONST	0x0af8,0x0024
31e4 ; --------------------------------------------------------------------------------------
31e4 ; Debug3 Subtable 0x1e
31e4 ; --------------------------------------------------------------------------------------
31e4 000b 0024  |   $|		.DBG3TAB	0x000b,0x0024
31e6 0b03 ffff  |    |		.CONST	0x0b03,0xffff
31e8 0b04 fffe  |    |		.CONST	0x0b04,0xfffe
31ea 0b09 fffd  |    |		.CONST	0x0b09,0xfffd
31ec 0b0e fffc  |    |		.CONST	0x0b0e,0xfffc
31ee 0b0f fffb  |    |		.CONST	0x0b0f,0xfffb
31f0 0b10 fffa  |    |		.CONST	0x0b10,0xfffa
31f2 0b11 fff9  |    |		.CONST	0x0b11,0xfff9
31f4 0b12 fff8  |    |		.CONST	0x0b12,0xfff8
31f6 0b15 fff7  |    |		.CONST	0x0b15,0xfff7
31f8 0b1a fff6  |    |		.CONST	0x0b1a,0xfff6
31fa 0b1c fff5  |    |		.CONST	0x0b1c,0xfff5
31fc 0b24 0001  | $  |		.CONST	0x0b24,0x0001
31fe 0b2a 0002  | *  |		.CONST	0x0b2a,0x0002
3200 0b2d 0003  | -  |		.CONST	0x0b2d,0x0003
3202 0b32 0004  | 2  |		.CONST	0x0b32,0x0004
3204 0b37 0005  | 7  |		.CONST	0x0b37,0x0005
3206 0b55 0006  | U  |		.CONST	0x0b55,0x0006
3208 0b5a 000b  | Z  |		.CONST	0x0b5a,0x000b
320a 0b5f 0008  | _  |		.CONST	0x0b5f,0x0008
320c 0b65 0009  | e  |		.CONST	0x0b65,0x0009
320e 0b6b 000a  | k  |		.CONST	0x0b6b,0x000a
3210 0b6d 000c  | m  |		.CONST	0x0b6d,0x000c
3212 0b71 000d  | q  |		.CONST	0x0b71,0x000d
3214 0b72 0401  | r  |		.CONST	0x0b72,0x0401
3216 0b74 000d  | t  |		.CONST	0x0b74,0x000d
3218 0b76 000e  | v  |		.CONST	0x0b76,0x000e
321a 0b80 000f  |    |		.CONST	0x0b80,0x000f
321c 0b84 0010  |    |		.CONST	0x0b84,0x0010
321e 0b8a 0011  |    |		.CONST	0x0b8a,0x0011
3220 0b8e 0012  |    |		.CONST	0x0b8e,0x0012
3222 0b94 0013  |    |		.CONST	0x0b94,0x0013
3224 0b96 0014  |    |		.CONST	0x0b96,0x0014
3226 0b9b 0015  |    |		.CONST	0x0b9b,0x0015
3228 0ba9 0016  |    |		.CONST	0x0ba9,0x0016
322a 0bad 0017  |    |		.CONST	0x0bad,0x0017
322c 0bb1 0018  |    |		.CONST	0x0bb1,0x0018
322e 0bb6 0019  |    |		.CONST	0x0bb6,0x0019
3230 0bba 001a  |    |		.CONST	0x0bba,0x001a
3232 0bbb 001b  |    |		.CONST	0x0bbb,0x001b
3234 0bbf 001c  |    |		.CONST	0x0bbf,0x001c
3236 0bc8 001d  |    |		.CONST	0x0bc8,0x001d
3238 0bcc 001e  |    |		.CONST	0x0bcc,0x001e
323a 0bd1 001f  |    |		.CONST	0x0bd1,0x001f
323c 0bda 0020  |    |		.CONST	0x0bda,0x0020
323e 0be0 0021  |   !|		.CONST	0x0be0,0x0021
3240 0be2 0022  |   "|		.CONST	0x0be2,0x0022
3242 0be8 0023  |   #|		.CONST	0x0be8,0x0023
3244 ; --------------------------------------------------------------------------------------
3244 ; Debug3 Subtable 0x1f
3244 ; --------------------------------------------------------------------------------------
3244 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
3246 0bf3 0001  |    |		.CONST	0x0bf3,0x0001
3248 0bf9 0002  |    |		.CONST	0x0bf9,0x0002
324a 0c02 0003  |    |		.CONST	0x0c02,0x0003
324c 0c04 0004  |    |		.CONST	0x0c04,0x0004
324e ; --------------------------------------------------------------------------------------
324e ; Debug3 Subtable 0x20
324e ; --------------------------------------------------------------------------------------
324e 0000 0009  |    |		.DBG3TAB	0x0000,0x0009
3250 0c13 0001  |    |		.CONST	0x0c13,0x0001
3252 0c14 0401  |    |		.CONST	0x0c14,0x0401
3254 0c16 0001  |    |		.CONST	0x0c16,0x0001
3256 0c17 0002  |    |		.CONST	0x0c17,0x0002
3258 0c1d 0003  |    |		.CONST	0x0c1d,0x0003
325a 0c22 0004  | "  |		.CONST	0x0c22,0x0004
325c 0c28 0005  | (  |		.CONST	0x0c28,0x0005
325e 0c35 0006  | 5  |		.CONST	0x0c35,0x0006
3260 0c37 0007  | 7  |		.CONST	0x0c37,0x0007
3262 ; --------------------------------------------------------------------------------------
3262 ; Debug3 Subtable 0x21
3262 ; --------------------------------------------------------------------------------------
3262 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
3264 0c43 0001  | C  |		.CONST	0x0c43,0x0001
3266 0c49 0002  | I  |		.CONST	0x0c49,0x0002
3268 0c56 0003  | V  |		.CONST	0x0c56,0x0003
326a 0c58 0004  | X  |		.CONST	0x0c58,0x0004
326c ; --------------------------------------------------------------------------------------
326c ; Debug3 Subtable 0x22
326c ; --------------------------------------------------------------------------------------
326c 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
326e 0c63 0001  | c  |		.CONST	0x0c63,0x0001
3270 0c69 0002  | i  |		.CONST	0x0c69,0x0002
3272 0c73 0003  | s  |		.CONST	0x0c73,0x0003
3274 0c75 0004  | u  |		.CONST	0x0c75,0x0004
3276 ; --------------------------------------------------------------------------------------
3276 ; Debug3 Subtable 0x23
3276 ; --------------------------------------------------------------------------------------
3276 0000 0007  |    |		.DBG3TAB	0x0000,0x0007
3278 0c83 0001  |    |		.CONST	0x0c83,0x0001
327a 0c86 0003  |    |		.CONST	0x0c86,0x0003
327c 0c8a 0004  |    |		.CONST	0x0c8a,0x0004
327e 0c90 0005  |    |		.CONST	0x0c90,0x0005
3280 0c95 0002  |    |		.CONST	0x0c95,0x0002
3282 0c9f 0006  |    |		.CONST	0x0c9f,0x0006
3284 0ca1 0007  |    |		.CONST	0x0ca1,0x0007
3286 ; --------------------------------------------------------------------------------------
3286 ; Debug3 Subtable 0x24
3286 ; --------------------------------------------------------------------------------------
3286 0004 0008  |    |		.DBG3TAB	0x0004,0x0008
3288 0cab ffff  |    |		.CONST	0x0cab,0xffff
328a 0cb0 fffe  |    |		.CONST	0x0cb0,0xfffe
328c 0cb2 fffd  |    |		.CONST	0x0cb2,0xfffd
328e 0cb8 fffc  |    |		.CONST	0x0cb8,0xfffc
3290 0cbe 0001  |    |		.CONST	0x0cbe,0x0001
3292 0cce 0002  |    |		.CONST	0x0cce,0x0002
3294 0cd2 0003  |    |		.CONST	0x0cd2,0x0003
3296 0cd7 0004  |    |		.CONST	0x0cd7,0x0004
3298 0ce7 0005  |    |		.CONST	0x0ce7,0x0005
329a 0cec 0006  |    |		.CONST	0x0cec,0x0006
329c 0cf1 0007  |    |		.CONST	0x0cf1,0x0007
329e 0cf3 0008  |    |		.CONST	0x0cf3,0x0008
32a0 ; --------------------------------------------------------------------------------------
32a0 ; Debug3 Subtable 0x25
32a0 ; --------------------------------------------------------------------------------------
32a0 0002 0003  |    |		.DBG3TAB	0x0002,0x0003
32a2 0d03 ffff  |    |		.CONST	0x0d03,0xffff
32a4 0d04 fffe  |    |		.CONST	0x0d04,0xfffe
32a6 0d09 0001  |    |		.CONST	0x0d09,0x0001
32a8 0d19 0002  |    |		.CONST	0x0d19,0x0002
32aa 0d22 0003  | "  |		.CONST	0x0d22,0x0003
32ac ; --------------------------------------------------------------------------------------
32ac ; Debug3 Subtable 0x26
32ac ; --------------------------------------------------------------------------------------
32ac 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
32ae 0d2b 0001  | +  |		.CONST	0x0d2b,0x0001
32b0 0d2e 0401  | .  |		.CONST	0x0d2e,0x0401
32b2 0d32 0001  | 2  |		.CONST	0x0d32,0x0001
32b4 0d33 0002  | 3  |		.CONST	0x0d33,0x0002
32b6 0d38 0003  | 8  |		.CONST	0x0d38,0x0003
32b8 ; --------------------------------------------------------------------------------------
32b8 ; Debug3 Subtable 0x27
32b8 ; --------------------------------------------------------------------------------------
32b8 0011 0061  |   a|		.DBG3TAB	0x0011,0x0061
32ba 0d43 ffff  | C  |		.CONST	0x0d43,0xffff
32bc 0d45 fffe  | E  |		.CONST	0x0d45,0xfffe
32be 0d4c fffd  | L  |		.CONST	0x0d4c,0xfffd
32c0 0d4d fffc  | M  |		.CONST	0x0d4d,0xfffc
32c2 0d4e fffb  | N  |		.CONST	0x0d4e,0xfffb
32c4 0d53 fffa  | S  |		.CONST	0x0d53,0xfffa
32c6 0d54 fff9  | T  |		.CONST	0x0d54,0xfff9
32c8 0d55 fff8  | U  |		.CONST	0x0d55,0xfff8
32ca 0d56 fff7  | V  |		.CONST	0x0d56,0xfff7
32cc 0d57 fff6  | W  |		.CONST	0x0d57,0xfff6
32ce 0d5c fff5  | \  |		.CONST	0x0d5c,0xfff5
32d0 0d62 fff4  | b  |		.CONST	0x0d62,0xfff4
32d2 0d67 fff3  | g  |		.CONST	0x0d67,0xfff3
32d4 0d68 fff2  | h  |		.CONST	0x0d68,0xfff2
32d6 0d69 fff1  | i  |		.CONST	0x0d69,0xfff1
32d8 0d6b fff0  | k  |		.CONST	0x0d6b,0xfff0
32da 0d6e ffef  | n  |		.CONST	0x0d6e,0xffef
32dc 0d74 0001  | t  |		.CONST	0x0d74,0x0001
32de 0d77 0002  | w  |		.CONST	0x0d77,0x0002
32e0 0d7a 0003  | z  |		.CONST	0x0d7a,0x0003
32e2 0d7c 0004  | |  |		.CONST	0x0d7c,0x0004
32e4 0d7e 0005  | ~  |		.CONST	0x0d7e,0x0005
32e6 0d80 0006  |    |		.CONST	0x0d80,0x0006
32e8 0d82 0007  |    |		.CONST	0x0d82,0x0007
32ea 0d84 0008  |    |		.CONST	0x0d84,0x0008
32ec 0d89 0009  |    |		.CONST	0x0d89,0x0009
32ee 0da8 000a  |    |		.CONST	0x0da8,0x000a
32f0 0db9 000c  |    |		.CONST	0x0db9,0x000c
32f2 0dbf 000d  |    |		.CONST	0x0dbf,0x000d
32f4 0dc5 000e  |    |		.CONST	0x0dc5,0x000e
32f6 0dc6 000f  |    |		.CONST	0x0dc6,0x000f
32f8 0dcc 0010  |    |		.CONST	0x0dcc,0x0010
32fa 0dd0 0011  |    |		.CONST	0x0dd0,0x0011
32fc 0dd1 0012  |    |		.CONST	0x0dd1,0x0012
32fe 0dd7 0013  |    |		.CONST	0x0dd7,0x0013
3300 0de1 0014  |    |		.CONST	0x0de1,0x0014
3302 0de2 0015  |    |		.CONST	0x0de2,0x0015
3304 0dec 0016  |    |		.CONST	0x0dec,0x0016
3306 0df0 0017  |    |		.CONST	0x0df0,0x0017
3308 0df3 0401  |    |		.CONST	0x0df3,0x0401
330a 0df5 0402  |    |		.CONST	0x0df5,0x0402
330c 0df6 0403  |    |		.CONST	0x0df6,0x0403
330e 0df7 0404  |    |		.CONST	0x0df7,0x0404
3310 0df9 0017  |    |		.CONST	0x0df9,0x0017
3312 0dfb 0018  |    |		.CONST	0x0dfb,0x0018
3314 0dfd 0019  |    |		.CONST	0x0dfd,0x0019
3316 0e00 001a  |    |		.CONST	0x0e00,0x001a
3318 0e21 001b  | !  |		.CONST	0x0e21,0x001b
331a 0e32 001d  | 2  |		.CONST	0x0e32,0x001d
331c 0e34 001e  | 4  |		.CONST	0x0e34,0x001e
331e 0e3a 001f  | :  |		.CONST	0x0e3a,0x001f
3320 0e3d 0020  | =  |		.CONST	0x0e3d,0x0020
3322 0e43 0021  | C !|		.CONST	0x0e43,0x0021
3324 0e44 0022  | D "|		.CONST	0x0e44,0x0022
3326 0e4a 0023  | J #|		.CONST	0x0e4a,0x0023
3328 0e50 0024  | P $|		.CONST	0x0e50,0x0024
332a 0e55 0025  | U %|		.CONST	0x0e55,0x0025
332c 0e56 0026  | V &|		.CONST	0x0e56,0x0026
332e 0e5c 0027  | \ '|		.CONST	0x0e5c,0x0027
3330 0e62 0028  | b (|		.CONST	0x0e62,0x0028
3332 0e67 0029  | g )|		.CONST	0x0e67,0x0029
3334 0e68 002a  | h *|		.CONST	0x0e68,0x002a
3336 0e6a 002b  | j +|		.CONST	0x0e6a,0x002b
3338 0e6c 002c  | l ,|		.CONST	0x0e6c,0x002c
333a 0e70 002d  | p -|		.CONST	0x0e70,0x002d
333c 0e72 002e  | r .|		.CONST	0x0e72,0x002e
333e 0e81 002f  |   /|		.CONST	0x0e81,0x002f
3340 0e85 0030  |   0|		.CONST	0x0e85,0x0030
3342 0e96 0031  |   1|		.CONST	0x0e96,0x0031
3344 0e9a 0032  |   2|		.CONST	0x0e9a,0x0032
3346 0e9f 0033  |   3|		.CONST	0x0e9f,0x0033
3348 0ea5 0034  |   4|		.CONST	0x0ea5,0x0034
334a 0ea7 0035  |   5|		.CONST	0x0ea7,0x0035
334c 0eac 0036  |   6|		.CONST	0x0eac,0x0036
334e 0eb2 0037  |   7|		.CONST	0x0eb2,0x0037
3350 0eb4 0038  |   8|		.CONST	0x0eb4,0x0038
3352 0ec1 0039  |   9|		.CONST	0x0ec1,0x0039
3354 0ec3 003a  |   :|		.CONST	0x0ec3,0x003a
3356 0ec8 003b  |   ;|		.CONST	0x0ec8,0x003b
3358 0ecd 003c  |   <|		.CONST	0x0ecd,0x003c
335a 0ece 003d  |   =|		.CONST	0x0ece,0x003d
335c 0eef 003e  |   >|		.CONST	0x0eef,0x003e
335e 0ef1 003f  |   ?|		.CONST	0x0ef1,0x003f
3360 0ef8 0040  |   @|		.CONST	0x0ef8,0x0040
3362 0efd 0041  |   A|		.CONST	0x0efd,0x0041
3364 0efe 0042  |   B|		.CONST	0x0efe,0x0042
3366 0f04 0043  |   C|		.CONST	0x0f04,0x0043
3368 0f07 0044  |   D|		.CONST	0x0f07,0x0044
336a 0f09 0045  |   E|		.CONST	0x0f09,0x0045
336c 0f0c 0046  |   F|		.CONST	0x0f0c,0x0046
336e 0f0e 0047  |   G|		.CONST	0x0f0e,0x0047
3370 0f12 0048  |   H|		.CONST	0x0f12,0x0048
3372 0f23 0049  | # I|		.CONST	0x0f23,0x0049
3374 0f28 004a  | ( J|		.CONST	0x0f28,0x004a
3376 0f29 004b  | ) K|		.CONST	0x0f29,0x004b
3378 0f2b 004c  | + L|		.CONST	0x0f2b,0x004c
337a 0f30 004d  | 0 M|		.CONST	0x0f30,0x004d
337c 0f33 004e  | 3 N|		.CONST	0x0f33,0x004e
337e 0f35 004f  | 5 O|		.CONST	0x0f35,0x004f
3380 0f37 0050  | 7 P|		.CONST	0x0f37,0x0050
3382 0f3d 0051  | = Q|		.CONST	0x0f3d,0x0051
3384 0f41 0052  | A R|		.CONST	0x0f41,0x0052
3386 0f4e 0053  | N S|		.CONST	0x0f4e,0x0053
3388 0f51 0054  | Q T|		.CONST	0x0f51,0x0054
338a 0f57 0055  | W U|		.CONST	0x0f57,0x0055
338c 0f5e 0056  | ^ V|		.CONST	0x0f5e,0x0056
338e 0f65 0057  | e W|		.CONST	0x0f65,0x0057
3390 0f6b 0058  | k X|		.CONST	0x0f6b,0x0058
3392 0f71 0059  | q Y|		.CONST	0x0f71,0x0059
3394 0f77 005a  | w Z|		.CONST	0x0f77,0x005a
3396 0f80 005b  |   [|		.CONST	0x0f80,0x005b
3398 0f86 005c  |   \|		.CONST	0x0f86,0x005c
339a 0f88 005d  |   ]|		.CONST	0x0f88,0x005d
339c 0f8e 005e  |   ^|		.CONST	0x0f8e,0x005e
339e ; --------------------------------------------------------------------------------------
339e ; Debug3 Subtable 0x28
339e ; --------------------------------------------------------------------------------------
339e 0000 000a  |    |		.DBG3TAB	0x0000,0x000a
33a0 0fa3 0001  |    |		.CONST	0x0fa3,0x0001
33a2 0fa4 0401  |    |		.CONST	0x0fa4,0x0401
33a4 0fa6 0402  |    |		.CONST	0x0fa6,0x0402
33a6 0fa7 0403  |    |		.CONST	0x0fa7,0x0403
33a8 0fa8 0404  |    |		.CONST	0x0fa8,0x0404
33aa 0fa9 0001  |    |		.CONST	0x0fa9,0x0001
33ac 0fab 0003  |    |		.CONST	0x0fab,0x0003
33ae 0fad 0002  |    |		.CONST	0x0fad,0x0002
33b0 0fb4 0004  |    |		.CONST	0x0fb4,0x0004
33b2 0fb6 0005  |    |		.CONST	0x0fb6,0x0005
33b4 ; --------------------------------------------------------------------------------------
33b4 ; Debug3 Subtable 0x29
33b4 ; --------------------------------------------------------------------------------------
33b4 0002 000a  |    |		.DBG3TAB	0x0002,0x000a
33b6 0fc3 ffff  |    |		.CONST	0x0fc3,0xffff
33b8 0fc8 fffe  |    |		.CONST	0x0fc8,0xfffe
33ba 0fca 0001  |    |		.CONST	0x0fca,0x0001
33bc 0fcd 0401  |    |		.CONST	0x0fcd,0x0401
33be 0fd1 0001  |    |		.CONST	0x0fd1,0x0001
33c0 0fd2 0002  |    |		.CONST	0x0fd2,0x0002
33c2 0fe0 0003  |    |		.CONST	0x0fe0,0x0003
33c4 0fe5 0004  |    |		.CONST	0x0fe5,0x0004
33c6 0fef 0005  |    |		.CONST	0x0fef,0x0005
33c8 0ff3 0006  |    |		.CONST	0x0ff3,0x0006
33ca 0fff 0007  |    |		.CONST	0x0fff,0x0007
33cc 1001 0008  |    |		.CONST	0x1001,0x0008
33ce ; --------------------------------------------------------------------------------------
33ce ; Debug3 Subtable 0x2a
33ce ; --------------------------------------------------------------------------------------
33ce 000f 0046  |   F|		.DBG3TAB	0x000f,0x0046
33d0 1013 ffff  |    |		.CONST	0x1013,0xffff
33d2 1015 fffe  |    |		.CONST	0x1015,0xfffe
33d4 101c fffd  |    |		.CONST	0x101c,0xfffd
33d6 101d fffc  |    |		.CONST	0x101d,0xfffc
33d8 101e fffb  |    |		.CONST	0x101e,0xfffb
33da 1024 fffa  | $  |		.CONST	0x1024,0xfffa
33dc 1029 fff9  | )  |		.CONST	0x1029,0xfff9
33de 102e fff8  | .  |		.CONST	0x102e,0xfff8
33e0 102f fff7  | /  |		.CONST	0x102f,0xfff7
33e2 1030 fff6  | 0  |		.CONST	0x1030,0xfff6
33e4 1031 fff5  | 1  |		.CONST	0x1031,0xfff5
33e6 1032 fff4  | 2  |		.CONST	0x1032,0xfff4
33e8 1037 fff3  | 7  |		.CONST	0x1037,0xfff3
33ea 1038 fff2  | 8  |		.CONST	0x1038,0xfff2
33ec 103a fff1  | :  |		.CONST	0x103a,0xfff1
33ee 103c 0001  | <  |		.CONST	0x103c,0x0001
33f0 103f 0002  | ?  |		.CONST	0x103f,0x0002
33f2 1042 0003  | B  |		.CONST	0x1042,0x0003
33f4 1044 0004  | D  |		.CONST	0x1044,0x0004
33f6 1046 0005  | F  |		.CONST	0x1046,0x0005
33f8 1049 0006  | I  |		.CONST	0x1049,0x0006
33fa 104b 0007  | K  |		.CONST	0x104b,0x0007
33fc 1050 0008  | P  |		.CONST	0x1050,0x0008
33fe 1054 0009  | T  |		.CONST	0x1054,0x0009
3400 1055 000a  | U  |		.CONST	0x1055,0x000a
3402 105c 0401  | \  |		.CONST	0x105c,0x0401
3404 1060 000a  | `  |		.CONST	0x1060,0x000a
3406 106a 000b  | j  |		.CONST	0x106a,0x000b
3408 106f 000c  | o  |		.CONST	0x106f,0x000c
340a 108d 000d  |    |		.CONST	0x108d,0x000d
340c 109e 000e  |    |		.CONST	0x109e,0x000e
340e 10a1 0801  |    |		.CONST	0x10a1,0x0801
3410 10a5 000e  |    |		.CONST	0x10a5,0x000e
3412 10a6 000f  |    |		.CONST	0x10a6,0x000f
3414 10aa 0010  |    |		.CONST	0x10aa,0x0010
3416 10b0 0011  |    |		.CONST	0x10b0,0x0011
3418 10b6 0012  |    |		.CONST	0x10b6,0x0012
341a 10b7 0013  |    |		.CONST	0x10b7,0x0013
341c 10bd 0014  |    |		.CONST	0x10bd,0x0014
341e 10c1 0015  |    |		.CONST	0x10c1,0x0015
3420 10c2 0016  |    |		.CONST	0x10c2,0x0016
3422 10c6 0017  |    |		.CONST	0x10c6,0x0017
3424 10e6 0018  |    |		.CONST	0x10e6,0x0018
3426 10ed 0019  |    |		.CONST	0x10ed,0x0019
3428 10fe 001a  |    |		.CONST	0x10fe,0x001a
342a 1100 001b  |    |		.CONST	0x1100,0x001b
342c 1102 001c  |    |		.CONST	0x1102,0x001c
342e 1108 001d  |    |		.CONST	0x1108,0x001d
3430 110a 001e  |    |		.CONST	0x110a,0x001e
3432 110c 001f  |    |		.CONST	0x110c,0x001f
3434 110e 0020  |    |		.CONST	0x110e,0x0020
3436 1111 0021  |   !|		.CONST	0x1111,0x0021
3438 1117 0022  |   "|		.CONST	0x1117,0x0022
343a 1118 0c01  |    |		.CONST	0x1118,0x0c01
343c 111a 0c02  |    |		.CONST	0x111a,0x0c02
343e 111b 0c03  |    |		.CONST	0x111b,0x0c03
3440 111c 0c04  |    |		.CONST	0x111c,0x0c04
3442 111d 0022  |   "|		.CONST	0x111d,0x0022
3444 111f 0023  |   #|		.CONST	0x111f,0x0023
3446 1121 0024  | ! $|		.CONST	0x1121,0x0024
3448 1127 0025  | ' %|		.CONST	0x1127,0x0025
344a 1129 0026  | ) &|		.CONST	0x1129,0x0026
344c 112b 0027  | + '|		.CONST	0x112b,0x0027
344e 112e 0028  | . (|		.CONST	0x112e,0x0028
3450 1130 0029  | 0 )|		.CONST	0x1130,0x0029
3452 1134 002a  | 4 *|		.CONST	0x1134,0x002a
3454 1138 002b  | 8 +|		.CONST	0x1138,0x002b
3456 113e 002c  | > ,|		.CONST	0x113e,0x002c
3458 1140 002d  | @ -|		.CONST	0x1140,0x002d
345a 114d 002e  | M .|		.CONST	0x114d,0x002e
345c 1150 002f  | P /|		.CONST	0x1150,0x002f
345e 1155 0030  | U 0|		.CONST	0x1155,0x0030
3460 115a 0031  | Z 1|		.CONST	0x115a,0x0031
3462 1160 0032  | ` 2|		.CONST	0x1160,0x0032
3464 1165 0033  | e 3|		.CONST	0x1165,0x0033
3466 1168 0034  | h 4|		.CONST	0x1168,0x0034
3468 116d 0035  | m 5|		.CONST	0x116d,0x0035
346a 1172 0036  | r 6|		.CONST	0x1172,0x0036
346c 1177 0037  | w 7|		.CONST	0x1177,0x0037
346e 117f 0038  |   8|		.CONST	0x117f,0x0038
3470 1184 0039  |   9|		.CONST	0x1184,0x0039
3472 118d 003a  |   :|		.CONST	0x118d,0x003a
3474 1193 003b  |   ;|		.CONST	0x1193,0x003b
3476 1195 003c  |   <|		.CONST	0x1195,0x003c
3478 119b 003d  |   =|		.CONST	0x119b,0x003d
347a ; --------------------------------------------------------------------------------------
347a ; Debug3 Subtable 0x2b
347a ; --------------------------------------------------------------------------------------
347a 0011 0055  |   U|		.DBG3TAB	0x0011,0x0055
347c 11ab ffff  |    |		.CONST	0x11ab,0xffff
347e 11af fffe  |    |		.CONST	0x11af,0xfffe
3480 11b6 fffd  |    |		.CONST	0x11b6,0xfffd
3482 11bc fffc  |    |		.CONST	0x11bc,0xfffc
3484 11c1 fffb  |    |		.CONST	0x11c1,0xfffb
3486 11c6 fffa  |    |		.CONST	0x11c6,0xfffa
3488 11c7 fff9  |    |		.CONST	0x11c7,0xfff9
348a 11c8 fff8  |    |		.CONST	0x11c8,0xfff8
348c 11c9 fff7  |    |		.CONST	0x11c9,0xfff7
348e 11ca fff6  |    |		.CONST	0x11ca,0xfff6
3490 11cb fff5  |    |		.CONST	0x11cb,0xfff5
3492 11cc fff4  |    |		.CONST	0x11cc,0xfff4
3494 11d1 fff3  |    |		.CONST	0x11d1,0xfff3
3496 11d7 fff2  |    |		.CONST	0x11d7,0xfff2
3498 11dc fff1  |    |		.CONST	0x11dc,0xfff1
349a 11de fff0  |    |		.CONST	0x11de,0xfff0
349c 11df ffef  |    |		.CONST	0x11df,0xffef
349e 11e0 0001  |    |		.CONST	0x11e0,0x0001
34a0 11e3 0002  |    |		.CONST	0x11e3,0x0002
34a2 11e8 0003  |    |		.CONST	0x11e8,0x0003
34a4 11f2 0004  |    |		.CONST	0x11f2,0x0004
34a6 11f6 0005  |    |		.CONST	0x11f6,0x0005
34a8 11f9 0006  |    |		.CONST	0x11f9,0x0006
34aa 11fd 0007  |    |		.CONST	0x11fd,0x0007
34ac 11fe 0008  |    |		.CONST	0x11fe,0x0008
34ae 1204 0009  |    |		.CONST	0x1204,0x0009
34b0 1209 000a  |    |		.CONST	0x1209,0x000a
34b2 1223 000b  | #  |		.CONST	0x1223,0x000b
34b4 1234 000d  | 4  |		.CONST	0x1234,0x000d
34b6 123a 000e  | :  |		.CONST	0x123a,0x000e
34b8 123f 000f  | ?  |		.CONST	0x123f,0x000f
34ba 1240 0010  | @  |		.CONST	0x1240,0x0010
34bc 1246 0011  | F  |		.CONST	0x1246,0x0011
34be 124a 0012  | J  |		.CONST	0x124a,0x0012
34c0 124b 0013  | K  |		.CONST	0x124b,0x0013
34c2 124f 0014  | O  |		.CONST	0x124f,0x0014
34c4 1251 0015  | Q  |		.CONST	0x1251,0x0015
34c6 1256 0016  | V  |		.CONST	0x1256,0x0016
34c8 1267 0017  | g  |		.CONST	0x1267,0x0017
34ca 126b 0018  | k  |		.CONST	0x126b,0x0018
34cc 1270 0019  | p  |		.CONST	0x1270,0x0019
34ce 128f 001a  |    |		.CONST	0x128f,0x001a
34d0 12a0 001b  |    |		.CONST	0x12a0,0x001b
34d2 12a2 001c  |    |		.CONST	0x12a2,0x001c
34d4 12a8 001d  |    |		.CONST	0x12a8,0x001d
34d6 12a9 001e  |    |		.CONST	0x12a9,0x001e
34d8 12af 001f  |    |		.CONST	0x12af,0x001f
34da 12b4 0020  |    |		.CONST	0x12b4,0x0020
34dc 12b8 0021  |   !|		.CONST	0x12b8,0x0021
34de 12b9 0022  |   "|		.CONST	0x12b9,0x0022
34e0 12bf 0023  |   #|		.CONST	0x12bf,0x0023
34e2 12c6 0024  |   $|		.CONST	0x12c6,0x0024
34e4 12c7 0025  |   %|		.CONST	0x12c7,0x0025
34e6 12cd 0026  |   &|		.CONST	0x12cd,0x0026
34e8 12d3 0027  |   '|		.CONST	0x12d3,0x0027
34ea 12d8 0028  |   (|		.CONST	0x12d8,0x0028
34ec 12d9 0029  |   )|		.CONST	0x12d9,0x0029
34ee 12df 002a  |   *|		.CONST	0x12df,0x002a
34f0 12e5 002b  |   +|		.CONST	0x12e5,0x002b
34f2 12ea 002c  |   ,|		.CONST	0x12ea,0x002c
34f4 12eb 002d  |   -|		.CONST	0x12eb,0x002d
34f6 12f0 002e  |   .|		.CONST	0x12f0,0x002e
34f8 130d 002f  |   /|		.CONST	0x130d,0x002f
34fa 1312 0034  |   4|		.CONST	0x1312,0x0034
34fc 1317 0030  |   0|		.CONST	0x1317,0x0030
34fe 131d 0031  |   1|		.CONST	0x131d,0x0031
3500 1323 0032  | # 2|		.CONST	0x1323,0x0032
3502 1328 0033  | ( 3|		.CONST	0x1328,0x0033
3504 132b 0035  | + 5|		.CONST	0x132b,0x0035
3506 132e 0036  | . 6|		.CONST	0x132e,0x0036
3508 134e 0037  | N 7|		.CONST	0x134e,0x0037
350a 135f 0038  | _ 8|		.CONST	0x135f,0x0038
350c 1365 0039  | e 9|		.CONST	0x1365,0x0039
350e 136b 003a  | k :|		.CONST	0x136b,0x003a
3510 136d 003b  | m ;|		.CONST	0x136d,0x003b
3512 1372 003c  | r <|		.CONST	0x1372,0x003c
3514 1379 003d  | y =|		.CONST	0x1379,0x003d
3516 137f 003e  |   >|		.CONST	0x137f,0x003e
3518 1385 003f  |   ?|		.CONST	0x1385,0x003f
351a 1387 0040  |   @|		.CONST	0x1387,0x0040
351c 138b 0041  |   A|		.CONST	0x138b,0x0041
351e 1390 0042  |   B|		.CONST	0x1390,0x0042
3520 1396 0043  |   C|		.CONST	0x1396,0x0043
3522 1398 0044  |   D|		.CONST	0x1398,0x0044
3524 139e 0045  |   E|		.CONST	0x139e,0x0045
3526 13ad 0046  |   F|		.CONST	0x13ad,0x0046
3528 13b1 0047  |   G|		.CONST	0x13b1,0x0047
352a 13bd 0048  |   H|		.CONST	0x13bd,0x0048
352c 13c5 0049  |   I|		.CONST	0x13c5,0x0049
352e 13cb 004a  |   J|		.CONST	0x13cb,0x004a
3530 13d1 004b  |   K|		.CONST	0x13d1,0x004b
3532 13d7 004c  |   L|		.CONST	0x13d7,0x004c
3534 13d9 004d  |   M|		.CONST	0x13d9,0x004d
3536 13df 004e  |   N|		.CONST	0x13df,0x004e
3538 13e5 004f  |   O|		.CONST	0x13e5,0x004f
353a 13eb 0050  |   P|		.CONST	0x13eb,0x0050
353c 13ed 0051  |   Q|		.CONST	0x13ed,0x0051
353e 13f1 0052  |   R|		.CONST	0x13f1,0x0052
3540 13fb 0053  |   S|		.CONST	0x13fb,0x0053
3542 1401 0054  |   T|		.CONST	0x1401,0x0054
3544 1403 0055  |   U|		.CONST	0x1403,0x0055
3546 1409 0056  |   V|		.CONST	0x1409,0x0056
3548 ; --------------------------------------------------------------------------------------
3548 ; Debug3 Subtable 0x2c
3548 ; --------------------------------------------------------------------------------------
3548 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
354a 1413 ffff  |    |		.CONST	0x1413,0xffff
354c 1414 0001  |    |		.CONST	0x1414,0x0001
354e 1423 0004  | #  |		.CONST	0x1423,0x0004
3550 1425 0002  | %  |		.CONST	0x1425,0x0002
3552 1427 0003  | '  |		.CONST	0x1427,0x0003
3554 142c 0005  | ,  |		.CONST	0x142c,0x0005
3556 1437 0006  | 7  |		.CONST	0x1437,0x0006
3558 1439 0007  | 9  |		.CONST	0x1439,0x0007
355a ; --------------------------------------------------------------------------------------
355a ; Debug3 Subtable 0x2d
355a ; --------------------------------------------------------------------------------------
355a 0002 000d  |    |		.DBG3TAB	0x0002,0x000d
355c 144b ffff  | K  |		.CONST	0x144b,0xffff
355e 144c fffe  | L  |		.CONST	0x144c,0xfffe
3560 144e 0001  | N  |		.CONST	0x144e,0x0001
3562 1451 0002  | Q  |		.CONST	0x1451,0x0002
3564 1452 0401  | R  |		.CONST	0x1452,0x0401
3566 1453 0002  | S  |		.CONST	0x1453,0x0002
3568 1455 0003  | U  |		.CONST	0x1455,0x0003
356a 1459 0004  | Y  |		.CONST	0x1459,0x0004
356c 145f 0005  | _  |		.CONST	0x145f,0x0005
356e 1463 0006  | c  |		.CONST	0x1463,0x0006
3570 1466 0007  | f  |		.CONST	0x1466,0x0007
3572 146a 0008  | j  |		.CONST	0x146a,0x0008
3574 147e 0009  | ~  |		.CONST	0x147e,0x0009
3576 1486 000a  |    |		.CONST	0x1486,0x000a
3578 1488 000b  |    |		.CONST	0x1488,0x000b
357a ; --------------------------------------------------------------------------------------
357a ; Debug3 Subtable 0x2e
357a ; --------------------------------------------------------------------------------------
357a 0009 0020  |    |		.DBG3TAB	0x0009,0x0020
357c 1493 ffff  |    |		.CONST	0x1493,0xffff
357e 1497 fffe  |    |		.CONST	0x1497,0xfffe
3580 1498 fffd  |    |		.CONST	0x1498,0xfffd
3582 149d fffc  |    |		.CONST	0x149d,0xfffc
3584 14a2 fffb  |    |		.CONST	0x14a2,0xfffb
3586 14a3 fffa  |    |		.CONST	0x14a3,0xfffa
3588 14a4 fff9  |    |		.CONST	0x14a4,0xfff9
358a 14a5 fff8  |    |		.CONST	0x14a5,0xfff8
358c 14a7 fff7  |    |		.CONST	0x14a7,0xfff7
358e 14ad 0001  |    |		.CONST	0x14ad,0x0001
3590 14b0 0002  |    |		.CONST	0x14b0,0x0002
3592 14b3 0401  |    |		.CONST	0x14b3,0x0401
3594 14b5 0402  |    |		.CONST	0x14b5,0x0402
3596 14b6 0403  |    |		.CONST	0x14b6,0x0403
3598 14b7 0404  |    |		.CONST	0x14b7,0x0404
359a 14b9 0002  |    |		.CONST	0x14b9,0x0002
359c 14bb 0003  |    |		.CONST	0x14bb,0x0003
359e 14c5 0004  |    |		.CONST	0x14c5,0x0004
35a0 14c9 0005  |    |		.CONST	0x14c9,0x0005
35a2 14cb 0006  |    |		.CONST	0x14cb,0x0006
35a4 14cd 0007  |    |		.CONST	0x14cd,0x0007
35a6 14d3 0008  |    |		.CONST	0x14d3,0x0008
35a8 14d8 0009  |    |		.CONST	0x14d8,0x0009
35aa 14dc 000a  |    |		.CONST	0x14dc,0x000a
35ac 14fd 000b  |    |		.CONST	0x14fd,0x000b
35ae 150e 000c  |    |		.CONST	0x150e,0x000c
35b0 1514 000d  |    |		.CONST	0x1514,0x000d
35b2 151a 000e  |    |		.CONST	0x151a,0x000e
35b4 151c 000f  |    |		.CONST	0x151c,0x000f
35b6 1522 0010  | "  |		.CONST	0x1522,0x0010
35b8 1525 0011  | %  |		.CONST	0x1525,0x0011
35ba 152c 0012  | ,  |		.CONST	0x152c,0x0012
35bc 1532 0013  | 2  |		.CONST	0x1532,0x0013
35be 1537 0014  | 7  |		.CONST	0x1537,0x0014
35c0 153d 0015  | =  |		.CONST	0x153d,0x0015
35c2 1543 0016  | C  |		.CONST	0x1543,0x0016
35c4 1548 0017  | H  |		.CONST	0x1548,0x0017
35c6 1551 0018  | Q  |		.CONST	0x1551,0x0018
35c8 1557 0019  | W  |		.CONST	0x1557,0x0019
35ca 1559 001a  | Y  |		.CONST	0x1559,0x001a
35cc 155f 001b  | _  |		.CONST	0x155f,0x001b
35ce ; --------------------------------------------------------------------------------------
35ce ; Debug3 Subtable 0x2f
35ce ; --------------------------------------------------------------------------------------
35ce 0005 000d  |    |		.DBG3TAB	0x0005,0x000d
35d0 156b ffff  | k  |		.CONST	0x156b,0xffff
35d2 1570 fffe  | p  |		.CONST	0x1570,0xfffe
35d4 1571 fffd  | q  |		.CONST	0x1571,0xfffd
35d6 1576 fffc  | v  |		.CONST	0x1576,0xfffc
35d8 1579 fffb  | y  |		.CONST	0x1579,0xfffb
35da 157d 0001  | }  |		.CONST	0x157d,0x0001
35dc 1582 0002  |    |		.CONST	0x1582,0x0002
35de 1590 0003  |    |		.CONST	0x1590,0x0003
35e0 1594 0004  |    |		.CONST	0x1594,0x0004
35e2 1598 0005  |    |		.CONST	0x1598,0x0005
35e4 159d 0006  |    |		.CONST	0x159d,0x0006
35e6 15a1 0007  |    |		.CONST	0x15a1,0x0007
35e8 15a2 0008  |    |		.CONST	0x15a2,0x0008
35ea 15a6 0009  |    |		.CONST	0x15a6,0x0009
35ec 15a9 000a  |    |		.CONST	0x15a9,0x000a
35ee 15ae 000b  |    |		.CONST	0x15ae,0x000b
35f0 15b6 000c  |    |		.CONST	0x15b6,0x000c
35f2 15b8 000d  |    |		.CONST	0x15b8,0x000d
35f4 ; --------------------------------------------------------------------------------------
35f4 ; Debug3 Subtable 0x30
35f4 ; --------------------------------------------------------------------------------------
35f4 0008 001b  |    |		.DBG3TAB	0x0008,0x001b
35f6 15c3 ffff  |    |		.CONST	0x15c3,0xffff
35f8 15c8 fffe  |    |		.CONST	0x15c8,0xfffe
35fa 15ca fffd  |    |		.CONST	0x15ca,0xfffd
35fc 15cb fffc  |    |		.CONST	0x15cb,0xfffc
35fe 15d0 fffb  |    |		.CONST	0x15d0,0xfffb
3600 15d6 fffa  |    |		.CONST	0x15d6,0xfffa
3602 15d7 fff9  |    |		.CONST	0x15d7,0xfff9
3604 15d8 fff8  |    |		.CONST	0x15d8,0xfff8
3606 15dd 0001  |    |		.CONST	0x15dd,0x0001
3608 15e2 0002  |    |		.CONST	0x15e2,0x0002
360a 1600 0003  |    |		.CONST	0x1600,0x0003
360c 1611 0005  |    |		.CONST	0x1611,0x0005
360e 1617 0006  |    |		.CONST	0x1617,0x0006
3610 161d 0007  |    |		.CONST	0x161d,0x0007
3612 161e 0008  |    |		.CONST	0x161e,0x0008
3614 1624 0009  | $  |		.CONST	0x1624,0x0009
3616 1628 000a  | (  |		.CONST	0x1628,0x000a
3618 1629 000b  | )  |		.CONST	0x1629,0x000b
361a 162f 000c  | /  |		.CONST	0x162f,0x000c
361c 1639 000d  | 9  |		.CONST	0x1639,0x000d
361e 163a 000e  | :  |		.CONST	0x163a,0x000e
3620 1640 000f  | @  |		.CONST	0x1640,0x000f
3622 1658 0010  | X  |		.CONST	0x1658,0x0010
3624 165c 0011  | \  |		.CONST	0x165c,0x0011
3626 167e 0012  | ~  |		.CONST	0x167e,0x0012
3628 1682 0013  |    |		.CONST	0x1682,0x0013
362a 1688 0014  |    |		.CONST	0x1688,0x0014
362c 168d 0015  |    |		.CONST	0x168d,0x0015
362e 1690 0016  |    |		.CONST	0x1690,0x0016
3630 169f 0017  |    |		.CONST	0x169f,0x0017
3632 16a4 0018  |    |		.CONST	0x16a4,0x0018
3634 16ab 0019  |    |		.CONST	0x16ab,0x0019
3636 16b1 001a  |    |		.CONST	0x16b1,0x001a
3638 16b3 001b  |    |		.CONST	0x16b3,0x001b
363a 16b9 001c  |    |		.CONST	0x16b9,0x001c
363c ; --------------------------------------------------------------------------------------
363c ; Debug3 Subtable 0x31
363c ; --------------------------------------------------------------------------------------
363c 0003 004a  |   J|		.DBG3TAB	0x0003,0x004a
363e 16d3 ffff  |    |		.CONST	0x16d3,0xffff
3640 16d4 fffe  |    |		.CONST	0x16d4,0xfffe
3642 16d5 0001  |    |		.CONST	0x16d5,0x0001
3644 16d7 0002  |    |		.CONST	0x16d7,0x0002
3646 16d8 0401  |    |		.CONST	0x16d8,0x0401
3648 16d9 0002  |    |		.CONST	0x16d9,0x0002
364a 16da 0003  |    |		.CONST	0x16da,0x0003
364c 16dc 0004  |    |		.CONST	0x16dc,0x0004
364e 16df 0005  |    |		.CONST	0x16df,0x0005
3650 16e3 0006  |    |		.CONST	0x16e3,0x0006
3652 16e5 0007  |    |		.CONST	0x16e5,0x0007
3654 16ea 0008  |    |		.CONST	0x16ea,0x0008
3656 16ec 0009  |    |		.CONST	0x16ec,0x0009
3658 16ef 0801  |    |		.CONST	0x16ef,0x0801
365a 16f1 0802  |    |		.CONST	0x16f1,0x0802
365c 16f2 0803  |    |		.CONST	0x16f2,0x0803
365e 16f3 0804  |    |		.CONST	0x16f3,0x0804
3660 16f5 0009  |    |		.CONST	0x16f5,0x0009
3662 16fb 000a  |    |		.CONST	0x16fb,0x000a
3664 16fd 000b  |    |		.CONST	0x16fd,0x000b
3666 1702 000c  |    |		.CONST	0x1702,0x000c
3668 1707 000d  |    |		.CONST	0x1707,0x000d
366a 1709 000e  |    |		.CONST	0x1709,0x000e
366c 170b 000f  |    |		.CONST	0x170b,0x000f
366e 1715 0010  |    |		.CONST	0x1715,0x0010
3670 1717 0011  |    |		.CONST	0x1717,0x0011
3672 1723 0012  | #  |		.CONST	0x1723,0x0012
3674 1724 0013  | $  |		.CONST	0x1724,0x0013
3676 1728 0014  | (  |		.CONST	0x1728,0x0014
3678 172b 0c01  | +  |		.CONST	0x172b,0x0c01
367a 172d 1001  | -  |		.CONST	0x172d,0x1001
367c 172f 1002  | /  |		.CONST	0x172f,0x1002
367e 1730 1003  | 0  |		.CONST	0x1730,0x1003
3680 1731 1004  | 1  |		.CONST	0x1731,0x1004
3682 1733 0c01  | 3  |		.CONST	0x1733,0x0c01
3684 173a 0014  | :  |		.CONST	0x173a,0x0014
3686 173b 0015  | ;  |		.CONST	0x173b,0x0015
3688 173c ebff  | <  |		.CONST	0x173c,0xebff
368a 173e 1401  | >  |		.CONST	0x173e,0x1401
368c 1745 1402  | E  |		.CONST	0x1745,0x1402
368e 1746 1801  | F  |		.CONST	0x1746,0x1801
3690 1748 1802  | H  |		.CONST	0x1748,0x1802
3692 1749 1803  | I  |		.CONST	0x1749,0x1803
3694 174a 1804  | J  |		.CONST	0x174a,0x1804
3696 174b 1402  | K  |		.CONST	0x174b,0x1402
3698 174d 1403  | M  |		.CONST	0x174d,0x1403
369a 1753 1404  | S  |		.CONST	0x1753,0x1404
369c 1758 1405  | X  |		.CONST	0x1758,0x1405
369e 175c 0016  | \  |		.CONST	0x175c,0x0016
36a0 1762 0017  | b  |		.CONST	0x1762,0x0017
36a2 1764 0018  | d  |		.CONST	0x1764,0x0018
36a4 1768 0019  | h  |		.CONST	0x1768,0x0019
36a6 1769 001a  | i  |		.CONST	0x1769,0x001a
36a8 176e 001b  | n  |		.CONST	0x176e,0x001b
36aa 1773 001c  | s  |		.CONST	0x1773,0x001c
36ac 1780 001d  |    |		.CONST	0x1780,0x001d
36ae 1782 001e  |    |		.CONST	0x1782,0x001e
36b0 1785 001f  |    |		.CONST	0x1785,0x001f
36b2 178a 0020  |    |		.CONST	0x178a,0x0020
36b4 1792 0021  |   !|		.CONST	0x1792,0x0021
36b6 179e 0022  |   "|		.CONST	0x179e,0x0022
36b8 17a0 0023  |   #|		.CONST	0x17a0,0x0023
36ba 17a3 0024  |   $|		.CONST	0x17a3,0x0024
36bc 17a7 0025  |   %|		.CONST	0x17a7,0x0025
36be 17a9 0026  |   &|		.CONST	0x17a9,0x0026
36c0 17ac 0027  |   '|		.CONST	0x17ac,0x0027
36c2 17af 0028  |   (|		.CONST	0x17af,0x0028
36c4 17b5 0029  |   )|		.CONST	0x17b5,0x0029
36c6 17ba 002a  |   *|		.CONST	0x17ba,0x002a
36c8 17bf 002b  |   +|		.CONST	0x17bf,0x002b
36ca 17c1 002c  |   ,|		.CONST	0x17c1,0x002c
36cc 17c5 002d  |   -|		.CONST	0x17c5,0x002d
36ce 17c8 002e  |   .|		.CONST	0x17c8,0x002e
36d0 17cb 002f  |   /|		.CONST	0x17cb,0x002f
36d2 17cd 0030  |   0|		.CONST	0x17cd,0x0030
36d4 17d4 0031  |   1|		.CONST	0x17d4,0x0031
36d6 17d6 0032  |   2|		.CONST	0x17d6,0x0032
36d8 ; --------------------------------------------------------------------------------------
36d8 ; Debug3 Subtable 0x32
36d8 ; --------------------------------------------------------------------------------------
36d8 0008 0029  |   )|		.DBG3TAB	0x0008,0x0029
36da 17e3 ffff  |    |		.CONST	0x17e3,0xffff
36dc 17e4 fffe  |    |		.CONST	0x17e4,0xfffe
36de 17e5 fffd  |    |		.CONST	0x17e5,0xfffd
36e0 17eb fffc  |    |		.CONST	0x17eb,0xfffc
36e2 17f0 fffb  |    |		.CONST	0x17f0,0xfffb
36e4 17f2 fffa  |    |		.CONST	0x17f2,0xfffa
36e6 17f5 fff9  |    |		.CONST	0x17f5,0xfff9
36e8 17f8 fff8  |    |		.CONST	0x17f8,0xfff8
36ea 17fa 0001  |    |		.CONST	0x17fa,0x0001
36ec 17fc 0002  |    |		.CONST	0x17fc,0x0002
36ee 1800 0003  |    |		.CONST	0x1800,0x0003
36f0 1803 0004  |    |		.CONST	0x1803,0x0004
36f2 1807 0005  |    |		.CONST	0x1807,0x0005
36f4 180d 0006  |    |		.CONST	0x180d,0x0006
36f6 1815 0007  |    |		.CONST	0x1815,0x0007
36f8 1816 0008  |    |		.CONST	0x1816,0x0008
36fa 1817 0009  |    |		.CONST	0x1817,0x0009
36fc 1818 0401  |    |		.CONST	0x1818,0x0401
36fe 181a 0402  |    |		.CONST	0x181a,0x0402
3700 181b 0403  |    |		.CONST	0x181b,0x0403
3702 181c 0404  |    |		.CONST	0x181c,0x0404
3704 181d 0009  |    |		.CONST	0x181d,0x0009
3706 181f 000a  |    |		.CONST	0x181f,0x000a
3708 182d 000b  | -  |		.CONST	0x182d,0x000b
370a 1831 000c  | 1  |		.CONST	0x1831,0x000c
370c 1834 000d  | 4  |		.CONST	0x1834,0x000d
370e 1835 000e  | 5  |		.CONST	0x1835,0x000e
3710 183a 000f  | :  |		.CONST	0x183a,0x000f
3712 183b 0010  | ;  |		.CONST	0x183b,0x0010
3714 184b 0011  | K  |		.CONST	0x184b,0x0011
3716 184f 0012  | O  |		.CONST	0x184f,0x0012
3718 1854 0013  | T  |		.CONST	0x1854,0x0013
371a 1858 0014  | X  |		.CONST	0x1858,0x0014
371c 1859 0015  | Y  |		.CONST	0x1859,0x0015
371e 185b 0016  | [  |		.CONST	0x185b,0x0016
3720 185c 0017  | \  |		.CONST	0x185c,0x0017
3722 185f 0018  | _  |		.CONST	0x185f,0x0018
3724 1861 0019  | a  |		.CONST	0x1861,0x0019
3726 1865 001a  | e  |		.CONST	0x1865,0x001a
3728 1866 001b  | f  |		.CONST	0x1866,0x001b
372a 186b 001c  | k  |		.CONST	0x186b,0x001c
372c 186f 001d  | o  |		.CONST	0x186f,0x001d
372e 1873 001e  | s  |		.CONST	0x1873,0x001e
3730 1875 001f  | u  |		.CONST	0x1875,0x001f
3732 1877 0020  | w  |		.CONST	0x1877,0x0020
3734 1878 0021  | x !|		.CONST	0x1878,0x0021
3736 1879 0022  | y "|		.CONST	0x1879,0x0022
3738 187f 0023  |   #|		.CONST	0x187f,0x0023
373a 1881 0024  |   $|		.CONST	0x1881,0x0024
373c ; --------------------------------------------------------------------------------------
373c ; Debug3 Subtable 0x33
373c ; --------------------------------------------------------------------------------------
373c 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
373e ; --------------------------------------------------------------------------------------
373e ; Debug3 Subtable 0x34
373e ; --------------------------------------------------------------------------------------
373e 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
3740 ; --------------------------------------------------------------------------------------
3740 ; Debug3 Subtable 0x35
3740 ; --------------------------------------------------------------------------------------
3740 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
3742 193b 0001  | ;  |		.CONST	0x193b,0x0001
3744 193d 0002  | =  |		.CONST	0x193d,0x0002
3746 ; --------------------------------------------------------------------------------------
3746 ; Debug3 Subtable 0x36
3746 ; --------------------------------------------------------------------------------------
3746 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
3748 194b 0001  | K  |		.CONST	0x194b,0x0001
374a 194f 0002  | O  |		.CONST	0x194f,0x0002
374c ; --------------------------------------------------------------------------------------
374c ; Debug3 Subtable 0x37
374c ; --------------------------------------------------------------------------------------
374c 0008 0021  |   !|		.DBG3TAB	0x0008,0x0021
374e 1963 ffff  | c  |		.CONST	0x1963,0xffff
3750 1964 fffe  | d  |		.CONST	0x1964,0xfffe
3752 1965 fffd  | e  |		.CONST	0x1965,0xfffd
3754 1966 fffc  | f  |		.CONST	0x1966,0xfffc
3756 1967 fffb  | g  |		.CONST	0x1967,0xfffb
3758 196c fffa  | l  |		.CONST	0x196c,0xfffa
375a 196d fff9  | m  |		.CONST	0x196d,0xfff9
375c 196e fff8  | n  |		.CONST	0x196e,0xfff8
375e 1970 0001  | p  |		.CONST	0x1970,0x0001
3760 1976 0002  | v  |		.CONST	0x1976,0x0002
3762 197b 0003  | {  |		.CONST	0x197b,0x0003
3764 1982 0005  |    |		.CONST	0x1982,0x0005
3766 1983 0401  |    |		.CONST	0x1983,0x0401
3768 1985 0402  |    |		.CONST	0x1985,0x0402
376a 1986 0403  |    |		.CONST	0x1986,0x0403
376c 1987 0404  |    |		.CONST	0x1987,0x0404
376e 1988 0005  |    |		.CONST	0x1988,0x0005
3770 198a 0007  |    |		.CONST	0x198a,0x0007
3772 198c 0008  |    |		.CONST	0x198c,0x0008
3774 1990 0009  |    |		.CONST	0x1990,0x0009
3776 1991 0801  |    |		.CONST	0x1991,0x0801
3778 1993 0802  |    |		.CONST	0x1993,0x0802
377a 1994 0803  |    |		.CONST	0x1994,0x0803
377c 1995 0804  |    |		.CONST	0x1995,0x0804
377e 1996 0009  |    |		.CONST	0x1996,0x0009
3780 1998 000b  |    |		.CONST	0x1998,0x000b
3782 199a 000c  |    |		.CONST	0x199a,0x000c
3784 199e 000d  |    |		.CONST	0x199e,0x000d
3786 19a1 0c01  |    |		.CONST	0x19a1,0x0c01
3788 19a5 000d  |    |		.CONST	0x19a5,0x000d
378a 19a6 000e  |    |		.CONST	0x19a6,0x000e
378c 19a7 000f  |    |		.CONST	0x19a7,0x000f
378e 19ad 0010  |    |		.CONST	0x19ad,0x0010
3790 19b9 0011  |    |		.CONST	0x19b9,0x0011
3792 19db 0012  |    |		.CONST	0x19db,0x0012
3794 19e0 0016  |    |		.CONST	0x19e0,0x0016
3796 19e5 0014  |    |		.CONST	0x19e5,0x0014
3798 19eb 0015  |    |		.CONST	0x19eb,0x0015
379a 19ee 0017  |    |		.CONST	0x19ee,0x0017
379c 19f3 0018  |    |		.CONST	0x19f3,0x0018
379e 19f5 0019  |    |		.CONST	0x19f5,0x0019
37a0 ; --------------------------------------------------------------------------------------
37a0 ; Debug3 Subtable 0x38
37a0 ; --------------------------------------------------------------------------------------
37a0 0005 0009  |    |		.DBG3TAB	0x0005,0x0009
37a2 1a03 ffff  |    |		.CONST	0x1a03,0xffff
37a4 1a04 fffe  |    |		.CONST	0x1a04,0xfffe
37a6 1a0a fffd  |    |		.CONST	0x1a0a,0xfffd
37a8 1a0f fffc  |    |		.CONST	0x1a0f,0xfffc
37aa 1a11 fffb  |    |		.CONST	0x1a11,0xfffb
37ac 1a17 0001  |    |		.CONST	0x1a17,0x0001
37ae 1a27 0002  | '  |		.CONST	0x1a27,0x0002
37b0 1a2b 0003  | +  |		.CONST	0x1a2b,0x0003
37b2 1a45 0004  | E  |		.CONST	0x1a45,0x0004
37b4 1a49 0005  | I  |		.CONST	0x1a49,0x0005
37b6 1a5a 0006  | Z  |		.CONST	0x1a5a,0x0006
37b8 1a5e 0007  | ^  |		.CONST	0x1a5e,0x0007
37ba 1a66 0008  | f  |		.CONST	0x1a66,0x0008
37bc 1a68 0009  | h  |		.CONST	0x1a68,0x0009
37be ; --------------------------------------------------------------------------------------
37be ; Debug3 Subtable 0x39
37be ; --------------------------------------------------------------------------------------
37be 0005 0009  |    |		.DBG3TAB	0x0005,0x0009
37c0 1a73 ffff  | s  |		.CONST	0x1a73,0xffff
37c2 1a74 fffe  | t  |		.CONST	0x1a74,0xfffe
37c4 1a7a fffd  | z  |		.CONST	0x1a7a,0xfffd
37c6 1a7c fffc  | |  |		.CONST	0x1a7c,0xfffc
37c8 1a81 0001  |    |		.CONST	0x1a81,0x0001
37ca 1a91 0002  |    |		.CONST	0x1a91,0x0002
37cc 1a95 0003  |    |		.CONST	0x1a95,0x0003
37ce 1aa6 0004  |    |		.CONST	0x1aa6,0x0004
37d0 1aaa 0005  |    |		.CONST	0x1aaa,0x0005
37d2 1aab fbff  |    |		.CONST	0x1aab,0xfbff
37d4 1aaf 0401  |    |		.CONST	0x1aaf,0x0401
37d6 1ab7 0006  |    |		.CONST	0x1ab7,0x0006
37d8 1ac0 0007  |    |		.CONST	0x1ac0,0x0007
37da 1ac4 0008  |    |		.CONST	0x1ac4,0x0008
37dc ; --------------------------------------------------------------------------------------
37dc ; Debug3 Subtable 0x3a
37dc ; --------------------------------------------------------------------------------------
37dc 0016 0036  |   6|		.DBG3TAB	0x0016,0x0036
37de 1acb ffff  |    |		.CONST	0x1acb,0xffff
37e0 1acc fffe  |    |		.CONST	0x1acc,0xfffe
37e2 1acd fffd  |    |		.CONST	0x1acd,0xfffd
37e4 1ad3 fffc  |    |		.CONST	0x1ad3,0xfffc
37e6 1ad4 fffb  |    |		.CONST	0x1ad4,0xfffb
37e8 1ad5 fffa  |    |		.CONST	0x1ad5,0xfffa
37ea 1ad6 fff9  |    |		.CONST	0x1ad6,0xfff9
37ec 1adb fff8  |    |		.CONST	0x1adb,0xfff8
37ee 1ae1 fff7  |    |		.CONST	0x1ae1,0xfff7
37f0 1ae6 fff6  |    |		.CONST	0x1ae6,0xfff6
37f2 1aeb fff5  |    |		.CONST	0x1aeb,0xfff5
37f4 1af1 fff4  |    |		.CONST	0x1af1,0xfff4
37f6 1af7 fff3  |    |		.CONST	0x1af7,0xfff3
37f8 1af9 fff2  |    |		.CONST	0x1af9,0xfff2
37fa 1afe fff1  |    |		.CONST	0x1afe,0xfff1
37fc 1aff fff0  |    |		.CONST	0x1aff,0xfff0
37fe 1b05 ffef  |    |		.CONST	0x1b05,0xffef
3800 1b0a ffee  |    |		.CONST	0x1b0a,0xffee
3802 1b0f ffed  |    |		.CONST	0x1b0f,0xffed
3804 1b14 ffec  |    |		.CONST	0x1b14,0xffec
3806 1b1a ffeb  |    |		.CONST	0x1b1a,0xffeb
3808 1b1e ffea  |    |		.CONST	0x1b1e,0xffea
380a 1b20 0001  |    |		.CONST	0x1b20,0x0001
380c 1b23 0002  | #  |		.CONST	0x1b23,0x0002
380e 1b25 0003  | %  |		.CONST	0x1b25,0x0003
3810 1b2a 0004  | *  |		.CONST	0x1b2a,0x0004
3812 1b2e 0005  | .  |		.CONST	0x1b2e,0x0005
3814 1b3e 0006  | >  |		.CONST	0x1b3e,0x0006
3816 1b42 0007  | B  |		.CONST	0x1b42,0x0007
3818 1b47 0008  | G  |		.CONST	0x1b47,0x0008
381a 1b4a 0009  | J  |		.CONST	0x1b4a,0x0009
381c 1b4e 000a  | N  |		.CONST	0x1b4e,0x000a
381e 1b4f 000b  | O  |		.CONST	0x1b4f,0x000b
3820 1b54 000c  | T  |		.CONST	0x1b54,0x000c
3822 1b74 000d  | t  |		.CONST	0x1b74,0x000d
3824 1b79 0011  | y  |		.CONST	0x1b79,0x0011
3826 1b7e 000f  | ~  |		.CONST	0x1b7e,0x000f
3828 1b84 0010  |    |		.CONST	0x1b84,0x0010
382a 1b86 0012  |    |		.CONST	0x1b86,0x0012
382c 1b9a 0013  |    |		.CONST	0x1b9a,0x0013
382e 1b9e 0014  |    |		.CONST	0x1b9e,0x0014
3830 1ba0 0015  |    |		.CONST	0x1ba0,0x0015
3832 1bb0 0016  |    |		.CONST	0x1bb0,0x0016
3834 1bb4 0017  |    |		.CONST	0x1bb4,0x0017
3836 1bd8 0018  |    |		.CONST	0x1bd8,0x0018
3838 1bdc 0019  |    |		.CONST	0x1bdc,0x0019
383a 1be8 001a  |    |		.CONST	0x1be8,0x001a
383c 1bed 001b  |    |		.CONST	0x1bed,0x001b
383e 1c0e 001c  |    |		.CONST	0x1c0e,0x001c
3840 1c12 001d  |    |		.CONST	0x1c12,0x001d
3842 1c2c 001e  | ,  |		.CONST	0x1c2c,0x001e
3844 1c30 001f  | 0  |		.CONST	0x1c30,0x001f
3846 1c44 0020  | D  |		.CONST	0x1c44,0x0020
3848 1c48 0021  | H !|		.CONST	0x1c48,0x0021
384a 1c59 0022  | Y "|		.CONST	0x1c59,0x0022
384c 1c64 0023  | d #|		.CONST	0x1c64,0x0023
384e 1c65 0401  | e  |		.CONST	0x1c65,0x0401
3850 1c67 0023  | g #|		.CONST	0x1c67,0x0023
3852 1c6a 0024  | j $|		.CONST	0x1c6a,0x0024
3854 1c6c 0025  | l %|		.CONST	0x1c6c,0x0025
3856 1c78 0026  | x &|		.CONST	0x1c78,0x0026
3858 1c89 0027  |   '|		.CONST	0x1c89,0x0027
385a 1c94 0028  |   (|		.CONST	0x1c94,0x0028
385c 1c98 0029  |   )|		.CONST	0x1c98,0x0029
385e 1c9c 002a  |   *|		.CONST	0x1c9c,0x002a
3860 1c9e 002b  |   +|		.CONST	0x1c9e,0x002b
3862 1ca2 002c  |   ,|		.CONST	0x1ca2,0x002c
3864 1cd7 002d  |   -|		.CONST	0x1cd7,0x002d
3866 1cdd 002e  |   .|		.CONST	0x1cdd,0x002e
3868 1d11 002f  |   /|		.CONST	0x1d11,0x002f
386a 1d13 0030  |   0|		.CONST	0x1d13,0x0030
386c 1d16 0031  |   1|		.CONST	0x1d16,0x0031
386e 1d1c 0032  |   2|		.CONST	0x1d1c,0x0032
3870 1d22 0033  | " 3|		.CONST	0x1d22,0x0033
3872 1d24 0034  | $ 4|		.CONST	0x1d24,0x0034
3874 1d2a 0035  | * 5|		.CONST	0x1d2a,0x0035
3876 ; --------------------------------------------------------------------------------------
3876 ; Debug3 Subtable 0x3b
3876 ; --------------------------------------------------------------------------------------
3876 0001 000e  |    |		.DBG3TAB	0x0001,0x000e
3878 1d43 ffff  | C  |		.CONST	0x1d43,0xffff
387a 1d44 0001  | D  |		.CONST	0x1d44,0x0001
387c 1d45 0401  | E  |		.CONST	0x1d45,0x0401
387e 1d47 0402  | G  |		.CONST	0x1d47,0x0402
3880 1d48 0403  | H  |		.CONST	0x1d48,0x0403
3882 1d49 0404  | I  |		.CONST	0x1d49,0x0404
3884 1d4a 0001  | J  |		.CONST	0x1d4a,0x0001
3886 1d58 0008  | X  |		.CONST	0x1d58,0x0008
3888 1d5a 0002  | Z  |		.CONST	0x1d5a,0x0002
388a 1d5f 0003  | _  |		.CONST	0x1d5f,0x0003
388c 1d64 0004  | d  |		.CONST	0x1d64,0x0004
388e 1d69 0005  | i  |		.CONST	0x1d69,0x0005
3890 1d6e 0006  | n  |		.CONST	0x1d6e,0x0006
3892 1d73 0007  | s  |		.CONST	0x1d73,0x0007
3894 1d78 0009  | x  |		.CONST	0x1d78,0x0009
3896 ; --------------------------------------------------------------------------------------
3896 ; Debug3 Subtable 0x3c
3896 ; --------------------------------------------------------------------------------------
3896 0009 003f  |   ?|		.DBG3TAB	0x0009,0x003f
3898 1d83 ffff  |    |		.CONST	0x1d83,0xffff
389a 1d84 fffe  |    |		.CONST	0x1d84,0xfffe
389c 1d89 fffd  |    |		.CONST	0x1d89,0xfffd
389e 1d8a fffc  |    |		.CONST	0x1d8a,0xfffc
38a0 1d8f fffb  |    |		.CONST	0x1d8f,0xfffb
38a2 1d93 fffa  |    |		.CONST	0x1d93,0xfffa
38a4 1d98 fff9  |    |		.CONST	0x1d98,0xfff9
38a6 1d99 0001  |    |		.CONST	0x1d99,0x0001
38a8 1d9a 0401  |    |		.CONST	0x1d9a,0x0401
38aa 1d9c 0402  |    |		.CONST	0x1d9c,0x0402
38ac 1d9d 0403  |    |		.CONST	0x1d9d,0x0403
38ae 1d9e 0404  |    |		.CONST	0x1d9e,0x0404
38b0 1d9f 0001  |    |		.CONST	0x1d9f,0x0001
38b2 1da0 0801  |    |		.CONST	0x1da0,0x0801
38b4 1da2 0802  |    |		.CONST	0x1da2,0x0802
38b6 1da3 0803  |    |		.CONST	0x1da3,0x0803
38b8 1da4 0804  |    |		.CONST	0x1da4,0x0804
38ba 1da5 0404  |    |		.CONST	0x1da5,0x0404
38bc 1da7 0002  |    |		.CONST	0x1da7,0x0002
38be 1daf 0003  |    |		.CONST	0x1daf,0x0003
38c0 1db2 0004  |    |		.CONST	0x1db2,0x0004
38c2 1db9 0005  |    |		.CONST	0x1db9,0x0005
38c4 1dba 0c01  |    |		.CONST	0x1dba,0x0c01
38c6 1dbc 0005  |    |		.CONST	0x1dbc,0x0005
38c8 1dbd 0006  |    |		.CONST	0x1dbd,0x0006
38ca 1dbf 0007  |    |		.CONST	0x1dbf,0x0007
38cc 1dc3 0008  |    |		.CONST	0x1dc3,0x0008
38ce 1dc6 0009  |    |		.CONST	0x1dc6,0x0009
38d0 1dca 000a  |    |		.CONST	0x1dca,0x000a
38d2 1dcc 000b  |    |		.CONST	0x1dcc,0x000b
38d4 1dd9 000c  |    |		.CONST	0x1dd9,0x000c
38d6 1dea 000d  |    |		.CONST	0x1dea,0x000d
38d8 1df6 000e  |    |		.CONST	0x1df6,0x000e
38da 1df9 000f  |    |		.CONST	0x1df9,0x000f
38dc 1dfa efff  |    |		.CONST	0x1dfa,0xefff
38de 1dfb effe  |    |		.CONST	0x1dfb,0xeffe
38e0 1dfc 1001  |    |		.CONST	0x1dfc,0x1001
38e2 1e01 1401  |    |		.CONST	0x1e01,0x1401
38e4 1e03 1402  |    |		.CONST	0x1e03,0x1402
38e6 1e05 1403  |    |		.CONST	0x1e05,0x1403
38e8 1e0a 1001  |    |		.CONST	0x1e0a,0x1001
38ea 1e0b 1002  |    |		.CONST	0x1e0b,0x1002
38ec 1e0f 1003  |    |		.CONST	0x1e0f,0x1003
38ee 1e12 1004  |    |		.CONST	0x1e12,0x1004
38f0 1e1f 1005  |    |		.CONST	0x1e1f,0x1005
38f2 1e25 1801  | %  |		.CONST	0x1e25,0x1801
38f4 1e27 1802  | '  |		.CONST	0x1e27,0x1802
38f6 1e29 1803  | )  |		.CONST	0x1e29,0x1803
38f8 1e2d 1804  | -  |		.CONST	0x1e2d,0x1804
38fa 1e31 1805  | 1  |		.CONST	0x1e31,0x1805
38fc 1e33 1c01  | 3  |		.CONST	0x1e33,0x1c01
38fe 1e35 1c02  | 5  |		.CONST	0x1e35,0x1c02
3900 1e36 1c03  | 6  |		.CONST	0x1e36,0x1c03
3902 1e37 1c04  | 7  |		.CONST	0x1e37,0x1c04
3904 1e39 1805  | 9  |		.CONST	0x1e39,0x1805
3906 1e43 2001  | C  |		.CONST	0x1e43,0x2001
3908 1e45 2002  | E  |		.CONST	0x1e45,0x2002
390a 1e46 2003  | F  |		.CONST	0x1e46,0x2003
390c 1e47 2004  | G  |		.CONST	0x1e47,0x2004
390e 1e49 1c04  | I  |		.CONST	0x1e49,0x1c04
3910 1e57 1005  | W  |		.CONST	0x1e57,0x1005
3912 1e5e 1006  | ^  |		.CONST	0x1e5e,0x1006
3914 1e5f 2401  | _$ |		.CONST	0x1e5f,0x2401
3916 1e61 2402  | a$ |		.CONST	0x1e61,0x2402
3918 1e63 2403  | c$ |		.CONST	0x1e63,0x2403
391a 1e66 1006  | f  |		.CONST	0x1e66,0x1006
391c 1e69 0010  | i  |		.CONST	0x1e69,0x0010
391e 1e6e 0011  | n  |		.CONST	0x1e6e,0x0011
3920 1e97 0012  |    |		.CONST	0x1e97,0x0012
3922 1e99 0013  |    |		.CONST	0x1e99,0x0013
3924 1ea0 0014  |    |		.CONST	0x1ea0,0x0014
3926 1ea2 0015  |    |		.CONST	0x1ea2,0x0015
3928 ; --------------------------------------------------------------------------------------
3928 ; Debug3 Subtable 0x3d
3928 ; --------------------------------------------------------------------------------------
3928 0001 0041  |   A|		.DBG3TAB	0x0001,0x0041
392a 1eb3 ffff  |    |		.CONST	0x1eb3,0xffff
392c 1eb4 0001  |    |		.CONST	0x1eb4,0x0001
392e 1eb6 0002  |    |		.CONST	0x1eb6,0x0002
3930 1ebc 0003  |    |		.CONST	0x1ebc,0x0003
3932 1ebd 0401  |    |		.CONST	0x1ebd,0x0401
3934 1ebf 0402  |    |		.CONST	0x1ebf,0x0402
3936 1ec0 0403  |    |		.CONST	0x1ec0,0x0403
3938 1ec1 0404  |    |		.CONST	0x1ec1,0x0404
393a 1ec2 0003  |    |		.CONST	0x1ec2,0x0003
393c 1ec6 0005  |    |		.CONST	0x1ec6,0x0005
393e 1ec7 0004  |    |		.CONST	0x1ec7,0x0004
3940 1ecb 0006  |    |		.CONST	0x1ecb,0x0006
3942 1ecc 0801  |    |		.CONST	0x1ecc,0x0801
3944 1ece 0802  |    |		.CONST	0x1ece,0x0802
3946 1ecf 0803  |    |		.CONST	0x1ecf,0x0803
3948 1ed0 0804  |    |		.CONST	0x1ed0,0x0804
394a 1ed1 0006  |    |		.CONST	0x1ed1,0x0006
394c 1ed5 000c  |    |		.CONST	0x1ed5,0x000c
394e 1ed6 0c01  |    |		.CONST	0x1ed6,0x0c01
3950 1ed8 0c02  |    |		.CONST	0x1ed8,0x0c02
3952 1ed9 0c03  |    |		.CONST	0x1ed9,0x0c03
3954 1eda 0c04  |    |		.CONST	0x1eda,0x0c04
3956 1edb 000c  |    |		.CONST	0x1edb,0x000c
3958 1ede 000d  |    |		.CONST	0x1ede,0x000d
395a 1ee1 0007  |    |		.CONST	0x1ee1,0x0007
395c 1ee5 0008  |    |		.CONST	0x1ee5,0x0008
395e 1eeb 0009  |    |		.CONST	0x1eeb,0x0009
3960 1eed 000a  |    |		.CONST	0x1eed,0x000a
3962 1ef0 000b  |    |		.CONST	0x1ef0,0x000b
3964 1ef4 000e  |    |		.CONST	0x1ef4,0x000e
3966 1ef5 1001  |    |		.CONST	0x1ef5,0x1001
3968 1ef7 1002  |    |		.CONST	0x1ef7,0x1002
396a 1ef8 1003  |    |		.CONST	0x1ef8,0x1003
396c 1ef9 1004  |    |		.CONST	0x1ef9,0x1004
396e 1efa 000e  |    |		.CONST	0x1efa,0x000e
3970 1efe 0014  |    |		.CONST	0x1efe,0x0014
3972 1f02 1401  |    |		.CONST	0x1f02,0x1401
3974 1f04 1402  |    |		.CONST	0x1f04,0x1402
3976 1f05 1403  |    |		.CONST	0x1f05,0x1403
3978 1f06 1404  |    |		.CONST	0x1f06,0x1404
397a 1f08 0014  |    |		.CONST	0x1f08,0x0014
397c 1f16 0021  |   !|		.CONST	0x1f16,0x0021
397e 1f17 0015  |    |		.CONST	0x1f17,0x0015
3980 1f1b 0016  |    |		.CONST	0x1f1b,0x0016
3982 1f1e 0017  |    |		.CONST	0x1f1e,0x0017
3984 1f22 0018  | "  |		.CONST	0x1f22,0x0018
3986 1f25 0019  | %  |		.CONST	0x1f25,0x0019
3988 1f29 001a  | )  |		.CONST	0x1f29,0x001a
398a 1f2c 001b  | ,  |		.CONST	0x1f2c,0x001b
398c 1f30 001c  | 0  |		.CONST	0x1f30,0x001c
398e 1f33 001d  | 3  |		.CONST	0x1f33,0x001d
3990 1f37 001e  | 7  |		.CONST	0x1f37,0x001e
3992 1f3a 001f  | :  |		.CONST	0x1f3a,0x001f
3994 1f3b 1801  | ;  |		.CONST	0x1f3b,0x1801
3996 1f3d 1802  | =  |		.CONST	0x1f3d,0x1802
3998 1f3e 1803  | >  |		.CONST	0x1f3e,0x1803
399a 1f3f 1804  | ?  |		.CONST	0x1f3f,0x1804
399c 1f40 001f  | @  |		.CONST	0x1f40,0x001f
399e 1f42 0020  | B  |		.CONST	0x1f42,0x0020
39a0 1f46 000f  | F  |		.CONST	0x1f46,0x000f
39a2 1f49 0010  | I  |		.CONST	0x1f49,0x0010
39a4 1f4d 0011  | M  |		.CONST	0x1f4d,0x0011
39a6 1f53 0012  | S  |		.CONST	0x1f53,0x0012
39a8 1f55 0013  | U  |		.CONST	0x1f55,0x0013
39aa 1f5c 0022  | \ "|		.CONST	0x1f5c,0x0022
39ac 1f5e 0023  | ^ #|		.CONST	0x1f5e,0x0023
39ae ; --------------------------------------------------------------------------------------
39ae ; Debug3 Subtable 0x3e
39ae ; --------------------------------------------------------------------------------------
39ae 0001 0041  |   A|		.DBG3TAB	0x0001,0x0041
39b0 1f6b ffff  | k  |		.CONST	0x1f6b,0xffff
39b2 1f6d 0001  | m  |		.CONST	0x1f6d,0x0001
39b4 1f73 0002  | s  |		.CONST	0x1f73,0x0002
39b6 1f74 0401  | t  |		.CONST	0x1f74,0x0401
39b8 1f76 0402  | v  |		.CONST	0x1f76,0x0402
39ba 1f77 0403  | w  |		.CONST	0x1f77,0x0403
39bc 1f78 0404  | x  |		.CONST	0x1f78,0x0404
39be 1f79 0002  | y  |		.CONST	0x1f79,0x0002
39c0 1f7b 0003  | {  |		.CONST	0x1f7b,0x0003
39c2 1f7c 0801  | |  |		.CONST	0x1f7c,0x0801
39c4 1f7e 0802  | ~  |		.CONST	0x1f7e,0x0802
39c6 1f7f 0803  |    |		.CONST	0x1f7f,0x0803
39c8 1f80 0804  |    |		.CONST	0x1f80,0x0804
39ca 1f81 0003  |    |		.CONST	0x1f81,0x0003
39cc 1f83 0004  |    |		.CONST	0x1f83,0x0004
39ce 1f85 0005  |    |		.CONST	0x1f85,0x0005
39d0 1f89 0c01  |    |		.CONST	0x1f89,0x0c01
39d2 1f8b 0c02  |    |		.CONST	0x1f8b,0x0c02
39d4 1f8c 0c03  |    |		.CONST	0x1f8c,0x0c03
39d6 1f8d 0c04  |    |		.CONST	0x1f8d,0x0c04
39d8 1f8f 0005  |    |		.CONST	0x1f8f,0x0005
39da 1f90 0006  |    |		.CONST	0x1f90,0x0006
39dc 1fa3 0010  |    |		.CONST	0x1fa3,0x0010
39de 1fa5 0007  |    |		.CONST	0x1fa5,0x0007
39e0 1fa9 0008  |    |		.CONST	0x1fa9,0x0008
39e2 1fad 0009  |    |		.CONST	0x1fad,0x0009
39e4 1fb1 000a  |    |		.CONST	0x1fb1,0x000a
39e6 1fb5 000b  |    |		.CONST	0x1fb5,0x000b
39e8 1fb9 000c  |    |		.CONST	0x1fb9,0x000c
39ea 1fba 1001  |    |		.CONST	0x1fba,0x1001
39ec 1fbc 1002  |    |		.CONST	0x1fbc,0x1002
39ee 1fbd 1003  |    |		.CONST	0x1fbd,0x1003
39f0 1fbe 1004  |    |		.CONST	0x1fbe,0x1004
39f2 1fbf 000c  |    |		.CONST	0x1fbf,0x000c
39f4 1fc1 000d  |    |		.CONST	0x1fc1,0x000d
39f6 1fc5 000e  |    |		.CONST	0x1fc5,0x000e
39f8 1fc9 000f  |    |		.CONST	0x1fc9,0x000f
39fa 1fcd 0011  |    |		.CONST	0x1fcd,0x0011
39fc 1fd2 1401  |    |		.CONST	0x1fd2,0x1401
39fe 1fd4 1402  |    |		.CONST	0x1fd4,0x1402
3a00 1fd5 1403  |    |		.CONST	0x1fd5,0x1403
3a02 1fd6 1404  |    |		.CONST	0x1fd6,0x1404
3a04 1fd8 0011  |    |		.CONST	0x1fd8,0x0011
3a06 1fd9 0012  |    |		.CONST	0x1fd9,0x0012
3a08 1fdb 1801  |    |		.CONST	0x1fdb,0x1801
3a0a 1fdd 1802  |    |		.CONST	0x1fdd,0x1802
3a0c 1fde 1803  |    |		.CONST	0x1fde,0x1803
3a0e 1fdf 1804  |    |		.CONST	0x1fdf,0x1804
3a10 1fe0 0012  |    |		.CONST	0x1fe0,0x0012
3a12 1fe2 0013  |    |		.CONST	0x1fe2,0x0013
3a14 1fe4 0014  |    |		.CONST	0x1fe4,0x0014
3a16 1fe9 0017  |    |		.CONST	0x1fe9,0x0017
3a18 1feb 0015  |    |		.CONST	0x1feb,0x0015
3a1a 1fec 1c01  |    |		.CONST	0x1fec,0x1c01
3a1c 1fee 1c02  |    |		.CONST	0x1fee,0x1c02
3a1e 1fef 1c03  |    |		.CONST	0x1fef,0x1c03
3a20 1ff0 1c04  |    |		.CONST	0x1ff0,0x1c04
3a22 1ff1 0015  |    |		.CONST	0x1ff1,0x0015
3a24 1ff3 0016  |    |		.CONST	0x1ff3,0x0016
3a26 1ff4 2001  |    |		.CONST	0x1ff4,0x2001
3a28 1ff6 2002  |    |		.CONST	0x1ff6,0x2002
3a2a 1ff7 2003  |    |		.CONST	0x1ff7,0x2003
3a2c 1ff8 2004  |    |		.CONST	0x1ff8,0x2004
3a2e 1ff9 0016  |    |		.CONST	0x1ff9,0x0016
3a30 1ffe 0018  |    |		.CONST	0x1ffe,0x0018
3a32 2000 0019  |    |		.CONST	0x2000,0x0019
3a34 ; --------------------------------------------------------------------------------------
3a34 ; Debug3 Subtable 0x3f
3a34 ; --------------------------------------------------------------------------------------
3a34 0002 0016  |    |		.DBG3TAB	0x0002,0x0016
3a36 200b ffff  |    |		.CONST	0x200b,0xffff
3a38 200d fffe  |    |		.CONST	0x200d,0xfffe
3a3a 2012 0001  |    |		.CONST	0x2012,0x0001
3a3c 2014 0002  |    |		.CONST	0x2014,0x0002
3a3e 2015 0401  |    |		.CONST	0x2015,0x0401
3a40 2017 0002  |    |		.CONST	0x2017,0x0002
3a42 2018 0003  |    |		.CONST	0x2018,0x0003
3a44 201b 0004  |    |		.CONST	0x201b,0x0004
3a46 201f 0005  |    |		.CONST	0x201f,0x0005
3a48 2022 0006  | "  |		.CONST	0x2022,0x0006
3a4a 202a 0007  | *  |		.CONST	0x202a,0x0007
3a4c 2035 0008  | 5  |		.CONST	0x2035,0x0008
3a4e 203f 0009  | ?  |		.CONST	0x203f,0x0009
3a50 2045 000a  | E  |		.CONST	0x2045,0x000a
3a52 204f 000b  | O  |		.CONST	0x204f,0x000b
3a54 2053 000c  | S  |		.CONST	0x2053,0x000c
3a56 2062 000d  | b  |		.CONST	0x2062,0x000d
3a58 2066 000e  | f  |		.CONST	0x2066,0x000e
3a5a 2072 000f  | r  |		.CONST	0x2072,0x000f
3a5c 2076 0010  | v  |		.CONST	0x2076,0x0010
3a5e 207a 0011  | z  |		.CONST	0x207a,0x0011
3a60 207d 0012  | }  |		.CONST	0x207d,0x0012
3a62 2083 0013  |    |		.CONST	0x2083,0x0013
3a64 2085 0014  |    |		.CONST	0x2085,0x0014
3a66 ; --------------------------------------------------------------------------------------
3a66 ; Debug3 Subtable 0x40
3a66 ; --------------------------------------------------------------------------------------
3a66 000a 0014  |    |		.DBG3TAB	0x000a,0x0014
3a68 2093 ffff  |    |		.CONST	0x2093,0xffff
3a6a 2098 fffe  |    |		.CONST	0x2098,0xfffe
3a6c 2099 fffd  |    |		.CONST	0x2099,0xfffd
3a6e 209c fffc  |    |		.CONST	0x209c,0xfffc
3a70 20a1 fffb  |    |		.CONST	0x20a1,0xfffb
3a72 20a3 fffa  |    |		.CONST	0x20a3,0xfffa
3a74 20a9 fff9  |    |		.CONST	0x20a9,0xfff9
3a76 20aa fff8  |    |		.CONST	0x20aa,0xfff8
3a78 20ab fff7  |    |		.CONST	0x20ab,0xfff7
3a7a 20ae fff6  |    |		.CONST	0x20ae,0xfff6
3a7c 20b4 0001  |    |		.CONST	0x20b4,0x0001
3a7e 20ba 0002  |    |		.CONST	0x20ba,0x0002
3a80 20bb 0401  |    |		.CONST	0x20bb,0x0401
3a82 20bd 0402  |    |		.CONST	0x20bd,0x0402
3a84 20be 0403  |    |		.CONST	0x20be,0x0403
3a86 20bf 0404  |    |		.CONST	0x20bf,0x0404
3a88 20c0 0002  |    |		.CONST	0x20c0,0x0002
3a8a 20c4 0007  |    |		.CONST	0x20c4,0x0007
3a8c 20c5 0003  |    |		.CONST	0x20c5,0x0003
3a8e 20cb 0004  |    |		.CONST	0x20cb,0x0004
3a90 20ec 0005  |    |		.CONST	0x20ec,0x0005
3a92 20ee 0006  |    |		.CONST	0x20ee,0x0006
3a94 20f0 0008  |    |		.CONST	0x20f0,0x0008
3a96 20f5 0009  |    |		.CONST	0x20f5,0x0009
3a98 20fa 000a  |    |		.CONST	0x20fa,0x000a
3a9a 211b 000b  |!   |		.CONST	0x211b,0x000b
3a9c 2126 000c  |!&  |		.CONST	0x2126,0x000c
3a9e 212c 000d  |!,  |		.CONST	0x212c,0x000d
3aa0 212e 000e  |!.  |		.CONST	0x212e,0x000e
3aa2 2134 000f  |!4  |		.CONST	0x2134,0x000f
3aa4 ; --------------------------------------------------------------------------------------
3aa4 ; Debug3 Subtable 0x41
3aa4 ; --------------------------------------------------------------------------------------
3aa4 0000 000b  |    |		.DBG3TAB	0x0000,0x000b
3aa6 2143 0001  |!C  |		.CONST	0x2143,0x0001
3aa8 2145 0002  |!E  |		.CONST	0x2145,0x0002
3aaa 2147 0003  |!G  |		.CONST	0x2147,0x0003
3aac 2150 0004  |!P  |		.CONST	0x2150,0x0004
3aae 2153 0005  |!S  |		.CONST	0x2153,0x0005
3ab0 215b 0007  |![  |		.CONST	0x215b,0x0007
3ab2 2162 0009  |!b  |		.CONST	0x2162,0x0009
3ab4 2169 000a  |!i  |		.CONST	0x2169,0x000a
3ab6 2170 000b  |!p  |		.CONST	0x2170,0x000b
3ab8 217a 000c  |!z  |		.CONST	0x217a,0x000c
3aba 217c 000d  |!|  |		.CONST	0x217c,0x000d
3abc ; --------------------------------------------------------------------------------------
3abc ; Debug3 Subtable 0x42
3abc ; --------------------------------------------------------------------------------------
3abc 0001 000f  |    |		.DBG3TAB	0x0001,0x000f
3abe 218b ffff  |!   |		.CONST	0x218b,0xffff
3ac0 218d 0001  |!   |		.CONST	0x218d,0x0001
3ac2 2195 0003  |!   |		.CONST	0x2195,0x0003
3ac4 2198 0004  |!   |		.CONST	0x2198,0x0004
3ac6 21a2 0005  |!   |		.CONST	0x21a2,0x0005
3ac8 21ad 0006  |!   |		.CONST	0x21ad,0x0006
3aca 21b0 0007  |!   |		.CONST	0x21b0,0x0007
3acc 21ba 0008  |!   |		.CONST	0x21ba,0x0008
3ace 21c9 0009  |!   |		.CONST	0x21c9,0x0009
3ad0 21cd 000a  |!   |		.CONST	0x21cd,0x000a
3ad2 21db 000b  |!   |		.CONST	0x21db,0x000b
3ad4 21df 000c  |!   |		.CONST	0x21df,0x000c
3ad6 21e9 000d  |!   |		.CONST	0x21e9,0x000d
3ad8 21ec 000e  |!   |		.CONST	0x21ec,0x000e
3ada 21f6 000f  |!   |		.CONST	0x21f6,0x000f
3adc 21f8 0010  |!   |		.CONST	0x21f8,0x0010
3ade ; --------------------------------------------------------------------------------------
3ade ; Debug3 Subtable 0x43
3ade ; --------------------------------------------------------------------------------------
3ade 0004 0009  |    |		.DBG3TAB	0x0004,0x0009
3ae0 2203 ffff  |"   |		.CONST	0x2203,0xffff
3ae2 2204 fffe  |"   |		.CONST	0x2204,0xfffe
3ae4 2209 fffd  |"   |		.CONST	0x2209,0xfffd
3ae6 220e fffc  |"   |		.CONST	0x220e,0xfffc
3ae8 2210 0001  |"   |		.CONST	0x2210,0x0001
3aea 2215 0002  |"   |		.CONST	0x2215,0x0002
3aec 2219 0003  |"   |		.CONST	0x2219,0x0003
3aee 221b 0004  |"   |		.CONST	0x221b,0x0004
3af0 221c 0005  |"   |		.CONST	0x221c,0x0005
3af2 2229 0006  |")  |		.CONST	0x2229,0x0006
3af4 222d 0007  |"-  |		.CONST	0x222d,0x0007
3af6 2237 0008  |"7  |		.CONST	0x2237,0x0008
3af8 2239 0009  |"9  |		.CONST	0x2239,0x0009
3afa ; --------------------------------------------------------------------------------------
3afa ; Debug3 Subtable 0x44
3afa ; --------------------------------------------------------------------------------------
3afa 0007 000f  |    |		.DBG3TAB	0x0007,0x000f
3afc 2243 ffff  |"C  |		.CONST	0x2243,0xffff
3afe 2244 fffe  |"D  |		.CONST	0x2244,0xfffe
3b00 2245 fffd  |"E  |		.CONST	0x2245,0xfffd
3b02 2246 fffc  |"F  |		.CONST	0x2246,0xfffc
3b04 224b fffb  |"K  |		.CONST	0x224b,0xfffb
3b06 2251 fffa  |"Q  |		.CONST	0x2251,0xfffa
3b08 2253 fff9  |"S  |		.CONST	0x2253,0xfff9
3b0a 2256 0001  |"V  |		.CONST	0x2256,0x0001
3b0c 2265 0002  |"e  |		.CONST	0x2265,0x0002
3b0e 2269 0003  |"i  |		.CONST	0x2269,0x0003
3b10 226f 0004  |"o  |		.CONST	0x226f,0x0004
3b12 2275 0005  |"u  |		.CONST	0x2275,0x0005
3b14 2277 0006  |"w  |		.CONST	0x2277,0x0006
3b16 2278 0007  |"x  |		.CONST	0x2278,0x0007
3b18 227e 0008  |"~  |		.CONST	0x227e,0x0008
3b1a 2299 0009  |"   |		.CONST	0x2299,0x0009
3b1c 229d 000a  |"   |		.CONST	0x229d,0x000a
3b1e 22a3 000b  |"   |		.CONST	0x22a3,0x000b
3b20 22ad 000c  |"   |		.CONST	0x22ad,0x000c
3b22 22b2 000d  |"   |		.CONST	0x22b2,0x000d
3b24 22b9 000e  |"   |		.CONST	0x22b9,0x000e
3b26 22bb 000f  |"   |		.CONST	0x22bb,0x000f
3b28 ; --------------------------------------------------------------------------------------
3b28 ; Debug3 Subtable 0x45
3b28 ; --------------------------------------------------------------------------------------
3b28 000a 001b  |    |		.DBG3TAB	0x000a,0x001b
3b2a 22cb ffff  |"   |		.CONST	0x22cb,0xffff
3b2c 22d0 fffe  |"   |		.CONST	0x22d0,0xfffe
3b2e 22d8 fffd  |"   |		.CONST	0x22d8,0xfffd
3b30 22dd fffc  |"   |		.CONST	0x22dd,0xfffc
3b32 22df fffb  |"   |		.CONST	0x22df,0xfffb
3b34 22e4 fffa  |"   |		.CONST	0x22e4,0xfffa
3b36 22e5 fff9  |"   |		.CONST	0x22e5,0xfff9
3b38 22e6 fff8  |"   |		.CONST	0x22e6,0xfff8
3b3a 22e7 fff7  |"   |		.CONST	0x22e7,0xfff7
3b3c 22ea fff6  |"   |		.CONST	0x22ea,0xfff6
3b3e 22f0 0001  |"   |		.CONST	0x22f0,0x0001
3b40 22f2 0002  |"   |		.CONST	0x22f2,0x0002
3b42 2302 0003  |#   |		.CONST	0x2302,0x0003
3b44 2306 0004  |#   |		.CONST	0x2306,0x0004
3b46 230b 0005  |#   |		.CONST	0x230b,0x0005
3b48 231c 0006  |#   |		.CONST	0x231c,0x0006
3b4a 231e 0007  |#   |		.CONST	0x231e,0x0007
3b4c 2341 0008  |#A  |		.CONST	0x2341,0x0008
3b4e 2343 0009  |#C  |		.CONST	0x2343,0x0009
3b50 2349 000a  |#I  |		.CONST	0x2349,0x000a
3b52 234d 000b  |#M  |		.CONST	0x234d,0x000b
3b54 2352 000c  |#R  |		.CONST	0x2352,0x000c
3b56 2353 000d  |#S  |		.CONST	0x2353,0x000d
3b58 2359 000e  |#Y  |		.CONST	0x2359,0x000e
3b5a 235c 000f  |#\  |		.CONST	0x235c,0x000f
3b5c 236d 0010  |#m  |		.CONST	0x236d,0x0010
3b5e 2370 0011  |#p  |		.CONST	0x2370,0x0011
3b60 2376 0012  |#v  |		.CONST	0x2376,0x0012
3b62 237c 0013  |#|  |		.CONST	0x237c,0x0013
3b64 2393 0014  |#   |		.CONST	0x2393,0x0014
3b66 2397 0015  |#   |		.CONST	0x2397,0x0015
3b68 239c 0016  |#   |		.CONST	0x239c,0x0016
3b6a 23a1 0017  |#   |		.CONST	0x23a1,0x0017
3b6c 23a9 0018  |#   |		.CONST	0x23a9,0x0018
3b6e 23af 0019  |#   |		.CONST	0x23af,0x0019
3b70 23b1 001a  |#   |		.CONST	0x23b1,0x001a
3b72 23b7 001b  |#   |		.CONST	0x23b7,0x001b
3b74 ; --------------------------------------------------------------------------------------
3b74 ; Debug3 Subtable 0x46
3b74 ; --------------------------------------------------------------------------------------
3b74 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
3b76 23cb 0001  |#   |		.CONST	0x23cb,0x0001
3b78 23d6 0002  |#   |		.CONST	0x23d6,0x0002
3b7a 23f4 0003  |#   |		.CONST	0x23f4,0x0003
3b7c 23f8 0004  |#   |		.CONST	0x23f8,0x0004
3b7e ; --------------------------------------------------------------------------------------
3b7e ; Debug3 Subtable 0x47
3b7e ; --------------------------------------------------------------------------------------
3b7e 0001 000c  |    |		.DBG3TAB	0x0001,0x000c
3b80 2403 ffff  |$   |		.CONST	0x2403,0xffff
3b82 2404 0001  |$   |		.CONST	0x2404,0x0001
3b84 240a 0002  |$   |		.CONST	0x240a,0x0002
3b86 2414 0003  |$   |		.CONST	0x2414,0x0003
3b88 241c 0004  |$   |		.CONST	0x241c,0x0004
3b8a 241d 0401  |$   |		.CONST	0x241d,0x0401
3b8c 241f 0004  |$   |		.CONST	0x241f,0x0004
3b8e 2420 0005  |$   |		.CONST	0x2420,0x0005
3b90 2425 0006  |$%  |		.CONST	0x2425,0x0006
3b92 2427 0007  |$'  |		.CONST	0x2427,0x0007
3b94 242d 0008  |$-  |		.CONST	0x242d,0x0008
3b96 2430 0009  |$0  |		.CONST	0x2430,0x0009
3b98 2436 000a  |$6  |		.CONST	0x2436,0x000a
3b9a ; --------------------------------------------------------------------------------------
3b9a ; Debug3 Subtable 0x48
3b9a ; --------------------------------------------------------------------------------------
3b9a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
3b9c 2443 0001  |$C  |		.CONST	0x2443,0x0001
3b9e 244e 0002  |$N  |		.CONST	0x244e,0x0002
3ba0 ; --------------------------------------------------------------------------------------
3ba0 ; Debug3 Subtable 0x49
3ba0 ; --------------------------------------------------------------------------------------
3ba0 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
3ba2 245b 0001  |$[  |		.CONST	0x245b,0x0001
3ba4 2466 0002  |$f  |		.CONST	0x2466,0x0002
3ba6 ; --------------------------------------------------------------------------------------
3ba6 ; Debug3 Subtable 0x4a
3ba6 ; --------------------------------------------------------------------------------------
3ba6 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
3ba8 2473 ffff  |$s  |		.CONST	0x2473,0xffff
3baa 2478 0001  |$x  |		.CONST	0x2478,0x0001
3bac 247d 0002  |$}  |		.CONST	0x247d,0x0002
3bae 248a 0003  |$   |		.CONST	0x248a,0x0003
3bb0 248e 0004  |$   |		.CONST	0x248e,0x0004
3bb2 2497 0005  |$   |		.CONST	0x2497,0x0005
3bb4 2499 0401  |$   |		.CONST	0x2499,0x0401
3bb6 249a 0005  |$   |		.CONST	0x249a,0x0005
3bb8 0000 0000  |    |		.BLANK	0000[0x48]