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

⟦fa644460f⟧

    Length: 5120 (0x1400)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0638       | 8  |		.CONST	0x0638								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0004       |    |		.CONST	0x0004								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0070       | p  |		.CONST	0x0070								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0027       | '  |		.CONST	0x0027								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x0712,0x8000,0x0000,0x0057,0x8ea5,0x0000,0x0005
													; 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 6311       |c   |		Indirect_Literal	Discrete,0x320,{0x00000000, 0x578ea501}		; Debug Table 0x0.0x3 = 0xe,0xfffc
000f 0129       | )  |		Execute	Any,Make_Visible
0010 630b       |c   |		Indirect_Literal	Discrete,0x31c,{0x00000000, 0x578ea502}
0011 0129       | )  |		Execute	Any,Make_Visible
0012 029a 007b  |   {|		Declare_Subprogram	INIT_0078,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x12,0xfffb
0014 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x14,0xfffa
0016 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x16,0xfff9
0018 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x7 = 0x18,0xfff8
0019 4802       |H   |		Short_Literal	0x2
001a 029f 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Call
001c 03fe       |    |		Declare_Type	Discrete,Defined,Visible
001d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x8 = 0x1d,0xfff7
001e 4802       |H   |		Short_Literal	0x2
001f 029f 00d3  |    |		Declare_Subprogram	INIT_00d0,For_Call
0021 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0022 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x9 = 0x22,0xfff6
0023 4805       |H   |		Short_Literal	0x5
0024 029f 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Call
0026 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0027 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x27,0xfff5
0029 029a 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x29,0xfff4
002b 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x2b,0xfff3
002d 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x2d,0xfff2
002f 029a 0153  |   S|		Declare_Subprogram	INIT_0150,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x2f,0xfff1
0031 029a 0183  |    |		Declare_Subprogram	INIT_0180,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x31,0xfff0
0033 029a 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x33,0xffef
0035 029a 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x35,0xffee
0037 029a 0203  |    |		Declare_Subprogram	INIT_0200,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x12 = 0x37,0xffed
0039 029a 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x13 = 0x39,0xffec
003b 029a 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x14 = 0x3b,0xffeb
003d 00bf       |    |		Action	Accept_Activation
003e 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x003e,0x073e,0x8000,0x0000,0x0057,0x8f75,0x0000,0x001d
													; Debug Table 0x1.0x0 = 0x3e,0xffff
003f 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x3f,0xfffe
0040 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x40,0xfffd
0041 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x41,0xfffc
0042 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x4 = 0x42,0xfffb
0043 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x5 = 0x43,0xfffa
0044 0092 0438  |   8|		Action	Push_String_Extended,0x438					; "###Unknown###"
													; Debug Table 0x1.0x6 = 0x44,0xfff9
0046 0092 0439  |   9|		Action	Push_String_Extended,0x439					; "###No_Selection###"
													; Debug Table 0x1.0x7 = 0x46,0xfff8
0048 029d 026b  |   k|		Declare_Subprogram	INIT_0268,For_Outer_Call			; Debug Table 0x1.0x8 = 0x48,0xfff7
004a 029d 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call			; Debug Table 0x1.0x9 = 0x4a,0xfff6
004c 029d 032b  |   +|		Declare_Subprogram	INIT_0328,For_Outer_Call			; Debug Table 0x1.0xa = 0x4c,0xfff5
004e 029d 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call			; Debug Table 0x1.0xb = 0x4e,0xfff4
0050 029d 035b  |   [|		Declare_Subprogram	INIT_0358,For_Outer_Call			; Debug Table 0x1.0xc = 0x50,0xfff3
0052 029d 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call			; Debug Table 0x1.0xd = 0x52,0xfff2
0054 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0xe = 0x54,0xfff1
0055 00c7       |    |		Action	Elaborate_Subprogram
0056 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0xf = 0x56,0xfff0
0057 00c7       |    |		Action	Elaborate_Subprogram
0058 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x10 = 0x58,0xffef
0059 00c7       |    |		Action	Elaborate_Subprogram
005a 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f				; Debug Table 0x1.0x11 = 0x5a,0xffee
005b 00c7       |    |		Action	Elaborate_Subprogram
005c 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x12 = 0x5c,0xffed
005d 00c7       |    |		Action	Elaborate_Subprogram
005e 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x13 = 0x5e,0xffec
005f 00c7       |    |		Action	Elaborate_Subprogram
0060 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x14 = 0x60,0xffeb
0061 00c7       |    |		Action	Elaborate_Subprogram
0062 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x15 = 0x62,0xffea
0063 00c7       |    |		Action	Elaborate_Subprogram
0064 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0x16 = 0x64,0xffe9
0065 00c7       |    |		Action	Elaborate_Subprogram
0066 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0x17 = 0x66,0xffe8
0067 00c7       |    |		Action	Elaborate_Subprogram
0068 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x18 = 0x68,0xffe7
0069 00c7       |    |		Action	Elaborate_Subprogram
006a 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x19 = 0x6a,0xffe6
006b 00c7       |    |		Action	Elaborate_Subprogram
006c 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0x1a = 0x6c,0xffe5
006d 00c7       |    |		Action	Elaborate_Subprogram
006e 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0x1b = 0x6e,0xffe4
006f 00c7       |    |		Action	Elaborate_Subprogram
0070			BODY_0008:
0070 00bc       |    |		Action	Signal_Activated
0071 00bb       |    |		Action	Signal_Completion
0072 0000 0000  |    |		.BLANK	0000[0x6]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007c       | |  |		.CONST	0x007c								; Address of begin
0079 008c       |    |		.CONST	0x008c								; Address of exception handler
007a 0002       |    |		.CONST	0x0002								; Number of locals
007b			INIT_0078:
007b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2 = .DEBUG	0x007b,0x0778,0x0002,0x0000,0x0057,0x8ea5,0x0000,0x0017
													; Debug Table 0x2.0x0 = 0x7b,0xffff
007c			BODY_0078:
007c e001       |    |		Load	0x0,0x1								; Debug Table 0x2.0x1 = 0x7c,0x1
007d 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
007e 4801       |H   |		Short_Literal	0x1
007f e002       |    |		Load	0x0,0x2
0080 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0081 e002       |    |		Load	0x0,0x2
0082 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
0083 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0084 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0x2 = 0x84,0x2
0085 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x3 = 0x85,0x401
0086 021d       |    |		Execute	Heap_Access,Is_Null
0087 6802       |h   |		Jump_Zero	0x8a							; Debug Table 0x2.0x4 = 0x87,0x2
0088 e20e       |    |		Load	0x1,0xe								; Debug Table 0x2.0x5 = 0x88,0x3
0089 0257       | W  |		Execute	Discrete,Raise
008a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x6 = 0x8a,0x4
008b 00ca       |    |		Action	Exit_Nullary_Function
008c			TRAP_0078:
008c 0007       |    |		Action	Break_Optional
008d e20e       |    |		Load	0x1,0xe								; Debug Table 0x2.0x7 = 0x8d,0x5
008e 0257       | W  |		Execute	Discrete,Raise
008f 0000       |    |		.XXX[0x1]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0094       |    |		.CONST	0x0094								; Address of begin
0091 00a4       |    |		.CONST	0x00a4								; Address of exception handler
0092 0002       |    |		.CONST	0x0002								; Number of locals
0093			INIT_0090:
0093 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3 = .DEBUG	0x0093,0x078a,0x0002,0x0000,0x0057,0x8ea5,0x0000,0x001e
													; Debug Table 0x3.0x0 = 0x93,0xffff
0094			BODY_0090:
0094 e001       |    |		Load	0x0,0x1								; Debug Table 0x3.0x1 = 0x94,0x1
0095 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0096 4801       |H   |		Short_Literal	0x1
0097 e002       |    |		Load	0x0,0x2
0098 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0099 e002       |    |		Load	0x0,0x2
009a 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
009b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
009c 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x2 = 0x9c,0x2
009d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x3 = 0x9d,0x401
009e 021d       |    |		Execute	Heap_Access,Is_Null
009f 6802       |h   |		Jump_Zero	0xa2							; Debug Table 0x3.0x4 = 0x9f,0x2
00a0 e20e       |    |		Load	0x1,0xe								; Debug Table 0x3.0x5 = 0xa0,0x3
00a1 0257       | W  |		Execute	Discrete,Raise
00a2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x6 = 0xa2,0x4
00a3 00ca       |    |		Action	Exit_Nullary_Function
00a4			TRAP_0090:
00a4 0007       |    |		Action	Break_Optional
00a5 e20e       |    |		Load	0x1,0xe								; Debug Table 0x3.0x7 = 0xa5,0x5
00a6 0257       | W  |		Execute	Discrete,Raise
00a7 0000       |    |		.XXX[0x1]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab       |    |		.CONST	0x00ab								; Address of begin
00a9 0004       |    |		.CONST	0x0004								; Address of exception handler
00aa 0001       |    |		.CONST	0x0001								; Number of locals
00ab			BODY_00a8:
00ab			INIT_00a8:
00ab 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4 = .DEBUG	0x00ab,0x079c,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x0025
													; Debug Table 0x4.0x0 = 0xab,0x1
00ac 4801       |H   |		Short_Literal	0x1
00ad 4800       |H   |		Short_Literal	0x0
00ae e5ff       |    |		Load	0x2,-0x1
00af 821f       |    |		Call	0x1,0x1f
00b0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00b1 0000 0000  |    |		.BLANK	0000[0x7]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb       |    |		.CONST	0x00bb								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 0001       |    |		.CONST	0x0001								; Number of locals
00bb			BODY_00b8:
00bb			INIT_00b8:
00bb 4603       |F   |		Jump_Case	0x4							; Debug Table 0x5 = .DEBUG	0x00bb,0x07a0,0x0005,0x0000,0x0057,0x8ea5,0x0000,0x002f
00bc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00bd 7802       |x   |		Jump	0xc0								; case 0x1
00be 7805       |x   |		Jump	0xc4								; case 0x2
00bf 7809       |x   |		Jump	0xc9								; case 0x3
00c0 00da       |    |		Load_Top	At_Offset_2
00c1 0091 042c  |   ,|		Action	Push_String_Extended_Indexed,0x42c				; "NORMAL"
00c3 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00c4 00db       |    |		Load_Top	At_Offset_3
00c5 00db       |    |		Load_Top	At_Offset_3
00c6 00e0       |    |		Load_Encached	Standard_Cache
00c7 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00c8 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00c9 00da       |    |		Load_Top	At_Offset_2
00ca 00e0       |    |		Load_Encached	Standard_Cache
00cb 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00cc 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00cd 0000 0000  |    |		.XXX[0x3]
00cf 0000       |    |
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3       |    |		.CONST	0x00d3								; Address of begin
00d1 0004       |    |		.CONST	0x0004								; Address of exception handler
00d2 0001       |    |		.CONST	0x0001								; Number of locals
00d3			BODY_00d0:
00d3			INIT_00d0:
00d3 4603       |F   |		Jump_Case	0x4							; Debug Table 0x6 = .DEBUG	0x00d3,0x07a2,0x0005,0x0000,0x0057,0x8ea5,0x0000,0x0036
00d4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00d5 7802       |x   |		Jump	0xd8								; case 0x1
00d6 7805       |x   |		Jump	0xdc								; case 0x2
00d7 7809       |x   |		Jump	0xe1								; case 0x3
00d8 00da       |    |		Load_Top	At_Offset_2
00d9 0091 042f  |   /|		Action	Push_String_Extended_Indexed,0x42f				; "MUST_SELECT"
00db 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00dc 00db       |    |		Load_Top	At_Offset_3
00dd 00db       |    |		Load_Top	At_Offset_3
00de 00e0       |    |		Load_Encached	Standard_Cache
00df 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00e0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00e1 00da       |    |		Load_Top	At_Offset_2
00e2 00e0       |    |		Load_Encached	Standard_Cache
00e3 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00e4 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00e5 0000 0000  |    |		.XXX[0x3]
00e7 0000       |    |
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb       |    |		.CONST	0x00eb								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0001       |    |		.CONST	0x0001								; Number of locals
00eb			BODY_00e8:
00eb			INIT_00e8:
00eb 4603       |F   |		Jump_Case	0x4							; Debug Table 0x7 = .DEBUG	0x00eb,0x07a4,0x0005,0x0000,0x0057,0x8ea5,0x0000,0x003d
00ec 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00ed 7802       |x   |		Jump	0xf0								; case 0x1
00ee 7805       |x   |		Jump	0xf4								; case 0x2
00ef 7809       |x   |		Jump	0xf9								; case 0x3
00f0 00da       |    |		Load_Top	At_Offset_2
00f1 0091 0432  |   2|		Action	Push_String_Extended_Indexed,0x432				; "SUCCESSFUL"
00f3 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00f4 00db       |    |		Load_Top	At_Offset_3
00f5 00db       |    |		Load_Top	At_Offset_3
00f6 00e0       |    |		Load_Encached	Standard_Cache
00f7 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00f8 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00f9 00da       |    |		Load_Top	At_Offset_2
00fa 00e0       |    |		Load_Encached	Standard_Cache
00fb 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00fc 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00fd 0000 0000  |    |		.XXX[0x3]
00ff 0000       |    |
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103       |    |		.CONST	0x0103								; Address of begin
0101 0004       |    |		.CONST	0x0004								; Address of exception handler
0102 0001       |    |		.CONST	0x0001								; Number of locals
0103			BODY_0100:
0103			INIT_0100:
0103 e214       |    |		Load	0x1,0x14							; Debug Table 0x8 = .DEBUG	0x0103,0x07a6,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x0047
													; Debug Table 0x8.0x0 = 0x103,0x1
0104 e5fd       |    |		Load	0x2,-0x3
0105 e5fe       |    |		Load	0x2,-0x2
0106 4800       |H   |		Short_Literal	0x0
0107 4801       |H   |		Short_Literal	0x1
0108 4800       |H   |		Short_Literal	0x0
0109 e5ff       |    |		Load	0x2,-0x1
010a 8227       | '  |		Call	0x1,0x27
010b c5fc       |    |		Store	0x2,-0x4
010c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
010d 0000 0000  |    |		.XXX[0x3]
010f 0000       |    |
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113       |    |		.CONST	0x0113								; Address of begin
0111 0118       |    |		.CONST	0x0118								; Address of exception handler
0112 0001       |    |		.CONST	0x0001								; Number of locals
0113			BODY_0110:
0113			INIT_0110:
0113 820f       |    |		Call	0x1,0xf								; Debug Table 0x9 = .DEBUG	0x0113,0x07aa,0x0002,0x0000,0x0057,0x8ea5,0x0000,0x005f
													; Debug Table 0x9.0x0 = 0x113,0x1
0114 e003       |    |		Load	0x0,0x3
0115 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0116 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
0117 00ca       |    |		Action	Exit_Nullary_Function
0118			TRAP_0110:
0118 0007       |    |		Action	Break_Optional
0119 e220       |    |		Load	0x1,0x20							; Debug Table 0x9.0x1 = 0x119,0x2
011a 00ca       |    |		Action	Exit_Nullary_Function
011b 0000 0000  |    |		.BLANK	0000[0x5]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0129       | )  |		.CONST	0x0129								; Address of begin
0121 0141       | A  |		.CONST	0x0141								; Address of exception handler
0122 0005       |    |		.CONST	0x0005								; Number of locals
0123			INIT_0120:
0123 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa = .DEBUG	0x0123,0x07b0,0x0002,0x0000,0x0057,0x8ea5,0x0000,0x0064
													; Debug Table 0xa.0x0 = 0x123,0xffff
0124 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa.0x1 = 0x124,0xfffe
0125 029f 040b  |    |		Declare_Subprogram	INIT_0408,For_Call
0127 029f 041b  |    |		Declare_Subprogram	INIT_0418,For_Call
0129			BODY_0120:
0129 8404       |    |		Call	0x2,0x4								; Debug Table 0xa.0x2 = 0x129,0x1
012a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0x3 = 0x12a,0x2
012b 6810       |h   |		Jump_Zero	0x13c
012c 8405       |    |		Call	0x2,0x5								; Debug Table 0xa.0x4 = 0x12c,0x3
012d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x5 = 0x12d,0x4
012e e402       |    |		Load	0x2,0x2
012f 4974       |It  |		Short_Literal	0x174
0130 00eb       |    |		Load_Encached	Diana_Cache
0131 0098       |    |		Execute	Package,Field_Read_Dynamic
0132 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0133 021f       |    |		Execute	Heap_Access,Equal
0134 6805       |h   |		Jump_Zero	0x13a
0135 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x6 = 0x135,0x5
0136 e003       |    |		Load	0x0,0x3
0137 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0138 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
0139 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
013a e221       | !  |		Load	0x1,0x21							; Debug Table 0xa.0x7 = 0x13a,0x6
013b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
013c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x8 = 0x13c,0x7
013d e003       |    |		Load	0x0,0x3
013e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
013f 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
0140 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0141			TRAP_0120:
0141 0007       |    |		Action	Break_Optional
0142 e220       |    |		Load	0x1,0x20							; Debug Table 0xa.0x9 = 0x142,0x8
0143 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0144 0000 0000  |    |		.BLANK	0000[0x4]
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 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb = .DEBUG	0x014b,0x07c6,0x0002,0x0000,0x0057,0x8ea5,0x0000,0x006e
													; Debug Table 0xb.0x0 = 0x14b,0x1
014c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
014d 0000 0000  |    |		.XXX[0x3]
014f 0000       |    |
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0156       | V  |		.CONST	0x0156								; Address of begin
0151 016d       | m  |		.CONST	0x016d								; Address of exception handler
0152 0002       |    |		.CONST	0x0002								; Number of locals
0153			INIT_0150:
0153 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xc = .DEBUG	0x0153,0x07ca,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x0079
													; Debug Table 0xc.0x0 = 0x153,0xffff
0154 00db       |    |		Load_Top	At_Offset_3
0155 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0156			BODY_0150:
0156 0092 043a  |   :|		Action	Push_String_Extended,0x43a					; "Ada.Edit"
													; Debug Table 0xc.0x1 = 0x156,0x1
0158 e004       |    |		Load	0x0,0x4
0159 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
015a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x2 = 0x15a,0x2
015b 8225       | %  |		Call	0x1,0x25
015c 680b       |h   |		Jump_Zero	0x168
015d 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x3 = 0x15d,0x3
015e 4800       |H   |		Short_Literal	0x0
015f 4801       |H   |		Short_Literal	0x1
0160 e002       |    |		Load	0x0,0x2
0161 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0162 e402       |    |		Load	0x2,0x2
0163 e005       |    |		Load	0x0,0x5
0164 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0165 e005       |    |		Load	0x0,0x5
0166 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0167 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0168 0092 043b  |   ;|		Action	Push_String_Extended,0x43b					; "Cannot edit unrooted tree"
													; Debug Table 0xc.0x4 = 0x168,0x4
016a e006       |    |		Load	0x0,0x6
016b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
016c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
016d			TRAP_0150:
016d 0007       |    |		Action	Break_Optional
016e e007       |    |		Load	0x0,0x7								; Debug Table 0xc.0x5 = 0x16e,0x5
016f 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0170 0092 043c  |   <|		Action	Push_String_Extended,0x43c					; "*** Exception in Ada_Object_Editor.Edit: "
													; Debug Table 0xc.0x6 = 0x170,0x6
0172 e008       |    |		Load	0x0,0x8
0173 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0174 01cc       |    |		Execute	Vector,Catenate
0175 e007       |    |		Load	0x0,0x7
0176 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0177 0092 043d  |   =|		Action	Push_String_Extended,0x43d					; "Edit failed - internal error"
													; Debug Table 0xc.0x7 = 0x177,0x7
0179 e006       |    |		Load	0x0,0x6
017a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
017b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
017c 0000 0000  |    |		.BLANK	0000[0x4]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0186       |    |		.CONST	0x0186								; Address of begin
0181 019d       |    |		.CONST	0x019d								; Address of exception handler
0182 0002       |    |		.CONST	0x0002								; Number of locals
0183			INIT_0180:
0183 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd = .DEBUG	0x0183,0x07dc,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x0083
													; Debug Table 0xd.0x0 = 0x183,0xffff
0184 00db       |    |		Load_Top	At_Offset_3
0185 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0186			BODY_0180:
0186 0092 043e  |   >|		Action	Push_String_Extended,0x43e					; "Ada.Withdraw"
													; Debug Table 0xd.0x1 = 0x186,0x1
0188 e004       |    |		Load	0x0,0x4
0189 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
018a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x2 = 0x18a,0x2
018b 8225       | %  |		Call	0x1,0x25
018c 680b       |h   |		Jump_Zero	0x198
018d 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x3 = 0x18d,0x3
018e 4801       |H   |		Short_Literal	0x1
018f 4801       |H   |		Short_Literal	0x1
0190 e002       |    |		Load	0x0,0x2
0191 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0192 e402       |    |		Load	0x2,0x2
0193 e005       |    |		Load	0x0,0x5
0194 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0195 e005       |    |		Load	0x0,0x5
0196 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0197 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0198 0092 043f  |   ?|		Action	Push_String_Extended,0x43f					; "Cannot withdraw unrooted tree"
													; Debug Table 0xd.0x4 = 0x198,0x4
019a e006       |    |		Load	0x0,0x6
019b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
019c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
019d			TRAP_0180:
019d 0007       |    |		Action	Break_Optional
019e e007       |    |		Load	0x0,0x7								; Debug Table 0xd.0x5 = 0x19e,0x5
019f 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01a0 0092 0440  |   @|		Action	Push_String_Extended,0x440					; "*** Exception in Ada_Object_Editor.Withdraw: "
													; Debug Table 0xd.0x6 = 0x1a0,0x6
01a2 e008       |    |		Load	0x0,0x8
01a3 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01a4 01cc       |    |		Execute	Vector,Catenate
01a5 e007       |    |		Load	0x0,0x7
01a6 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01a7 0092 0441  |   A|		Action	Push_String_Extended,0x441					; "Withdraw failed - internal error"
													; Debug Table 0xd.0x7 = 0x1a7,0x7
01a9 e006       |    |		Load	0x0,0x6
01aa 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01ab 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01ac 0000 0000  |    |		.BLANK	0000[0x4]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b6       |    |		.CONST	0x01b6								; Address of begin
01b1 01c7       |    |		.CONST	0x01c7								; Address of exception handler
01b2 0002       |    |		.CONST	0x0002								; Number of locals
01b3			INIT_01b0:
01b3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xe = .DEBUG	0x01b3,0x07ee,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x008d
													; Debug Table 0xe.0x0 = 0x1b3,0xffff
01b4 00db       |    |		Load_Top	At_Offset_3
01b5 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01b6			BODY_01b0:
01b6 0092 0442  |   B|		Action	Push_String_Extended,0x442					; "Ada.Promote"
													; Debug Table 0xe.0x1 = 0x1b6,0x1
01b8 e004       |    |		Load	0x0,0x4
01b9 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01ba 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x2 = 0x1ba,0x2
01bb 8225       | %  |		Call	0x1,0x25
01bc 6805       |h   |		Jump_Zero	0x1c2
01bd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x3 = 0x1bd,0x3
01be 4801       |H   |		Short_Literal	0x1
01bf 8223       | #  |		Call	0x1,0x23
01c0 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01c1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01c2 0092 0443  |   C|		Action	Push_String_Extended,0x443					; "Cannot promote unrooted tree"
													; Debug Table 0xe.0x4 = 0x1c2,0x4
01c4 e006       |    |		Load	0x0,0x6
01c5 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01c6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01c7			TRAP_01b0:
01c7 0007       |    |		Action	Break_Optional
01c8 e007       |    |		Load	0x0,0x7								; Debug Table 0xe.0x5 = 0x1c8,0x5
01c9 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01ca 0092 0444  |   D|		Action	Push_String_Extended,0x444					; "*** Exception in Ada_Object_Editor.Promote: "
													; Debug Table 0xe.0x6 = 0x1ca,0x6
01cc e008       |    |		Load	0x0,0x8
01cd 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01ce 01cc       |    |		Execute	Vector,Catenate
01cf e007       |    |		Load	0x0,0x7
01d0 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01d1 0092 0445  |   E|		Action	Push_String_Extended,0x445					; "Promote failed - internal error"
													; Debug Table 0xe.0x7 = 0x1d1,0x7
01d3 e006       |    |		Load	0x0,0x6
01d4 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01d5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01d6 0000 0000  |    |		.XXX[0x2]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01de       |    |		.CONST	0x01de								; Address of begin
01d9 01ef       |    |		.CONST	0x01ef								; Address of exception handler
01da 0002       |    |		.CONST	0x0002								; Number of locals
01db			INIT_01d8:
01db 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xf = .DEBUG	0x01db,0x0800,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x0097
													; Debug Table 0xf.0x0 = 0x1db,0xffff
01dc 00db       |    |		Load_Top	At_Offset_3
01dd 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01de			BODY_01d8:
01de 0092 0446  |   F|		Action	Push_String_Extended,0x446					; "Ada.Demote"
													; Debug Table 0xf.0x1 = 0x1de,0x1
01e0 e004       |    |		Load	0x0,0x4
01e1 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01e2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x2 = 0x1e2,0x2
01e3 8225       | %  |		Call	0x1,0x25
01e4 6805       |h   |		Jump_Zero	0x1ea
01e5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x3 = 0x1e5,0x3
01e6 4800       |H   |		Short_Literal	0x0
01e7 8223       | #  |		Call	0x1,0x23
01e8 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01e9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01ea 0092 0447  |   G|		Action	Push_String_Extended,0x447					; "Cannot demote unrooted tree"
													; Debug Table 0xf.0x4 = 0x1ea,0x4
01ec e006       |    |		Load	0x0,0x6
01ed 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01ee 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01ef			TRAP_01d8:
01ef 0007       |    |		Action	Break_Optional
01f0 e007       |    |		Load	0x0,0x7								; Debug Table 0xf.0x5 = 0x1f0,0x5
01f1 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01f2 0092 0448  |   H|		Action	Push_String_Extended,0x448					; "*** Exception in Ada_Object_Editor.Demote: "
													; Debug Table 0xf.0x6 = 0x1f2,0x6
01f4 e008       |    |		Load	0x0,0x8
01f5 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01f6 01cc       |    |		Execute	Vector,Catenate
01f7 e007       |    |		Load	0x0,0x7
01f8 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01f9 0092 0449  |   I|		Action	Push_String_Extended,0x449					; "Demote failed - internal error"
													; Debug Table 0xf.0x7 = 0x1f9,0x7
01fb e006       |    |		Load	0x0,0x6
01fc 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01fd 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01fe 0000 0000  |    |		.XXX[0x2]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203       |    |		.CONST	0x0203								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0001       |    |		.CONST	0x0001								; Number of locals
0203			BODY_0200:
0203			INIT_0200:
0203 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10 = .DEBUG	0x0203,0x0812,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x00a1
													; Debug Table 0x10.0x0 = 0x203,0x1
0204 00db       |    |		Load_Top	At_Offset_3
0205 821e       |    |		Call	0x1,0x1e
0206 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0207 0000       |    |		.XXX[0x1]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020f       |    |		.CONST	0x020f								; Address of begin
0209 022f       | /  |		.CONST	0x022f								; Address of exception handler
020a 0003       |    |		.CONST	0x0003								; Number of locals
020b			INIT_0208:
020b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x11 = .DEBUG	0x020b,0x0816,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x00ab
													; Debug Table 0x11.0x0 = 0x20b,0xffff
020c e002       |    |		Load	0x0,0x2								; Debug Table 0x11.0x1 = 0x20c,0xfffe
020d 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
020e 0322       | "  |		Declare_Variable	Record
020f			BODY_0208:
020f 0007       |    |		Action	Break_Optional							; Debug Table 0x11.0x2 = 0x20f,0x1
0210 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x3 = 0x210,0x401
0211 021d       |    |		Execute	Heap_Access,Is_Null
0212 701b       |p   |		Jump_Nonzero	0x22e							; Debug Table 0x11.0x4 = 0x212,0x1
0213 0007       |    |		Action	Break_Optional							; Debug Table 0x11.0x5 = 0x213,0x2
0214 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x6 = 0x214,0x801
0215 0217       |    |		Execute	Heap_Access,All_Reference
0216 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0217 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2					; Debug Table 0x11.0x7 = 0x217,0x2
0218 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x8 = 0x218,0x3
0219 8225       | %  |		Call	0x1,0x25
021a 6813       |h   |		Jump_Zero	0x22e
021b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x9 = 0x21b,0x4
021c 4801       |H   |		Short_Literal	0x1
021d 4800       |H   |		Short_Literal	0x0
021e e5fe       |    |		Load	0x2,-0x2
021f e002       |    |		Load	0x0,0x2
0220 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0221 e402       |    |		Load	0x2,0x2
0222 e002       |    |		Load	0x0,0x2
0223 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0224 00d1       |    |		Pop_Control	Pop_Count_1
0225 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0xa = 0x225,0x5
0226 e5ff       |    |		Load	0x2,-0x1
0227 00da       |    |		Load_Top	At_Offset_2
0228 e002       |    |		Load	0x0,0x2
0229 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
022a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0xb = 0x22a,0x6
022b e002       |    |		Load	0x0,0x2
022c 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
022d 00d1       |    |		Pop_Control	Pop_Count_1
022e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
022f			TRAP_0208:
022f 60e8       |`   |		Indirect_Literal	Discrete,0x318,{0x00000000, 0x56858501}
0230 010f       |    |		Execute	Exception,Equal
0231 7003       |p   |		Jump_Nonzero	0x235
0232 60e1       |`   |		Indirect_Literal	Discrete,0x314,{0x00000000, 0x56858503}
0233 010f       |    |		Execute	Exception,Equal
0234 6801       |h   |		Jump_Zero	0x236
0235 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x11.0xc = 0x235,0x7
0236 e007       |    |		Load	0x0,0x7								; Debug Table 0x11.0xd = 0x236,0x8
0237 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0238 0092 044a  |   J|		Action	Push_String_Extended,0x44a					; "*** Exception in Ada_Object_Editor.Mark_Nodes: "
													; Debug Table 0x11.0xe = 0x238,0x9
023a e008       |    |		Load	0x0,0x8
023b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
023c 01cc       |    |		Execute	Vector,Catenate
023d e007       |    |		Load	0x0,0x7
023e 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
023f 0092 044b  |   K|		Action	Push_String_Extended,0x44b					; "Operation failed - internal error"
													; Debug Table 0x11.0xf = 0x23f,0xa
0241 e006       |    |		Load	0x0,0x6
0242 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0243 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0244 0000 0000  |    |		.BLANK	0000[0x4]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024d       | M  |		.CONST	0x024d								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0002       |    |		.CONST	0x0002								; Number of locals
024b			INIT_0248:
024b e214       |    |		Load	0x1,0x14							; Debug Table 0x12 = .DEBUG	0x024b,0x0838,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x00b9
													; Debug Table 0x12.0x0 = 0x24b,0xffff
024c 0007       |    |		Action	Break_Optional
024d			BODY_0248:
024d e214       |    |		Load	0x1,0x14							; Debug Table 0x12.0x1 = 0x24d,0x1
024e 4800       |H   |		Short_Literal	0x0
024f 4802       |H   |		Short_Literal	0x2
0250 e5fc       |    |		Load	0x2,-0x4
0251 e5fd       |    |		Load	0x2,-0x3
0252 e5fe       |    |		Load	0x2,-0x2
0253 e5ff       |    |		Load	0x2,-0x1
0254 8227       | '  |		Call	0x1,0x27
0255 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0256 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x2 = 0x256,0x2
0257 6809       |h   |		Jump_Zero	0x261
0258 0092 044c  |   L|		Action	Push_String_Extended,0x44c					; "Ada_Object_Editor.Display failed - "
													; Debug Table 0x12.0x3 = 0x258,0x3
025a 00d9       |    |		Load_Top	At_Offset_1
025b e214       |    |		Load	0x1,0x14
025c 025e       | ^  |		Execute	Discrete,Convert
025d 1c01       |    |		Execute_Immediate	Run_Utility,0x1
025e 01cc       |    |		Execute	Vector,Catenate
025f e006       |    |		Load	0x0,0x6
0260 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0261 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0262 0000 0000  |    |		.BLANK	0000[0x6]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b       | k  |		.CONST	0x026b								; Address of begin
0269 0004       |    |		.CONST	0x0004								; Address of exception handler
026a 0001       |    |		.CONST	0x0001								; Number of locals
026b			BODY_0268:
026b			INIT_0268:
026b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x13 = .DEBUG	0x026b,0x0842,0x0002,0x0000,0x0057,0x8f75,0x0000,0x0044
													; Debug Table 0x13.0x0 = 0x26b,0x1
026c 0092 044d  |   M|		Action	Push_String_Extended,0x44d					; "LIBRARY"
026e e009       |    |		Load	0x0,0x9
026f 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0270 e00a       |    |		Load	0x0,0xa
0271 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0272 00ca       |    |		Action	Exit_Nullary_Function
0273 0000 0000  |    |		.BLANK	0000[0x5]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 028a       |    |		.CONST	0x028a								; Address of begin
0279 02f2       |    |		.CONST	0x02f2								; Address of exception handler
027a 0008       |    |		.CONST	0x0008								; Number of locals
027b			INIT_0278:
027b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x14 = .DEBUG	0x027b,0x0846,0x0001,0x0000,0x0057,0x8f75,0x0000,0x005e
													; Debug Table 0x14.0x0 = 0x27b,0xffff
027c 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x14.0x1 = 0x27c,0xfffe
027d 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x14.0x2 = 0x27d,0xfffd
027e 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x14.0x3 = 0x27e,0xfffc
027f e003       |    |		Load	0x0,0x3								; Debug Table 0x14.0x4 = 0x27f,0xfffb
0280 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0281 e005       |    |		Load	0x0,0x5								; Debug Table 0x14.0x5 = 0x281,0xfffa
0282 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0283 0322       | "  |		Declare_Variable	Record
0284 00d8       |    |		Load_Top	At_Offset_0
0285 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0286 e003       |    |		Load	0x0,0x3								; Debug Table 0x14.0x6 = 0x286,0xfff9
0287 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0288 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0289 0007       |    |		Action	Break_Optional							; Debug Table 0x14.0x7 = 0x289,0xfff8
028a			BODY_0278:
028a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x14.0x8 = 0x28a,0x1
028b 683c       |h<  |		Jump_Zero	0x2c8
028c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0x9 = 0x28c,0x2
028d e005       |    |		Load	0x0,0x5
028e 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
028f 4604       |F   |		Jump_Case	0x5
0290 7804       |x   |		Jump	0x295								; case 0x0
0291 780b       |x   |		Jump	0x29d								; case 0x1
0292 7804       |x   |		Jump	0x297								; case 0x2
0293 7806       |x   |		Jump	0x29a								; case 0x3
0294 7808       |x   |		Jump	0x29d								; case 0x4
0295 607a       |`z  |		Indirect_Literal	Discrete,0x310,{0x00000000, 0x578f7501}		; Debug Table 0x14.0xa = 0x295,0x3
0296 0257       | W  |		Execute	Discrete,Raise
0297 4803       |H   |		Short_Literal	0x3							; Debug Table 0x14.0xb = 0x297,0x4
0298 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0299 7847       |xG  |		Jump	0x2e1
029a 4804       |H   |		Short_Literal	0x4							; Debug Table 0x14.0xc = 0x29a,0x5
029b 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
029c 7844       |xD  |		Jump	0x2e1
029d 8222       | "  |		Call	0x1,0x22							; Debug Table 0x14.0xd = 0x29d,0x6
029e 6820       |h   |		Jump_Zero	0x2bf
029f e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0xe = 0x29f,0x7
02a0 e00b       |    |		Load	0x0,0xb
02a1 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02a2 6807       |h   |		Jump_Zero	0x2aa
02a3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0xf = 0x2a3,0x8
02a4 4974       |It  |		Short_Literal	0x174
02a5 00eb       |    |		Load_Encached	Diana_Cache
02a6 0098       |    |		Execute	Package,Field_Read_Dynamic
02a7 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
02a8 a405       |    |		Store_Unchecked	0x2,0x5
02a9 780a       |x   |		Jump	0x2b4
02aa e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0x10 = 0x2aa,0x9
02ab e005       |    |		Load	0x0,0x5
02ac 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02ad a403       |    |		Store_Unchecked	0x2,0x3
02ae e403       |    |		Load	0x2,0x3								; Debug Table 0x14.0x11 = 0x2ae,0xa
02af 4974       |It  |		Short_Literal	0x174
02b0 00eb       |    |		Load_Encached	Diana_Cache
02b1 0098       |    |		Execute	Package,Field_Read_Dynamic
02b2 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
02b3 a405       |    |		Store_Unchecked	0x2,0x5
02b4 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0x12 = 0x2b4,0xb
02b5 e001       |    |		Load	0x0,0x1
02b6 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
02b7 e405       |    |		Load	0x2,0x5
02b8 e5fe       |    |		Load	0x2,-0x2
02b9 4802       |H   |		Short_Literal	0x2
02ba 0092 044e  |   N|		Action	Push_String_Extended,0x44e					; "Editor, Library, Common"
02bc e00c       |    |		Load	0x0,0xc
02bd 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02be 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02bf e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0x13 = 0x2bf,0xc
02c0 e00d       |    |		Load	0x0,0xd
02c1 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02c2 0092 044f  |   O|		Action	Push_String_Extended,0x44f					; " is already coded"
02c4 01cc       |    |		Execute	Vector,Catenate
02c5 e006       |    |		Load	0x0,0x6
02c6 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
02c7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x14.0x14 = 0x2c7,0xd
02c8 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0x15 = 0x2c8,0xe
02c9 e005       |    |		Load	0x0,0x5
02ca 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02cb 4604       |F   |		Jump_Case	0x5
02cc 7804       |x   |		Jump	0x2d1								; case 0x0
02cd 7803       |x   |		Jump	0x2d1								; case 0x1
02ce 7804       |x   |		Jump	0x2d3								; case 0x2
02cf 780c       |x   |		Jump	0x2dc								; case 0x3
02d0 780e       |x   |		Jump	0x2df								; case 0x4
02d1 603e       |`>  |		Indirect_Literal	Discrete,0x310,{0x00000000, 0x578f7501}		; Debug Table 0x14.0x16 = 0x2d1,0xf
02d2 0257       | W  |		Execute	Discrete,Raise
02d3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0x17 = 0x2d3,0x10
02d4 e00d       |    |		Load	0x0,0xd
02d5 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02d6 0092 0450  |   P|		Action	Push_String_Extended,0x450					; " is already source"
02d8 01cc       |    |		Execute	Vector,Catenate
02d9 e006       |    |		Load	0x0,0x6
02da 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
02db 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x14.0x18 = 0x2db,0x11
02dc 4802       |H   |		Short_Literal	0x2							; Debug Table 0x14.0x19 = 0x2dc,0x12
02dd 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
02de 7802       |x   |		Jump	0x2e1
02df 4803       |H   |		Short_Literal	0x3							; Debug Table 0x14.0x1a = 0x2df,0x13
02e0 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
02e1 e002       |    |		Load	0x0,0x2								; Debug Table 0x14.0x1b = 0x2e1,0x14
02e2 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
02e3 e5fe       |    |		Load	0x2,-0x2
02e4 e005       |    |		Load	0x0,0x5
02e5 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
02e6 00da       |    |		Load_Top	At_Offset_2
02e7 017d       | }  |		Execute	Record,Structure_Write
02e8 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x14.0x1c = 0x2e8,0x15
02e9 00ec       |    |		Load_Encached	Diana_Tree_Cache
02ea 4801       |H   |		Short_Literal	0x1
02eb 00db       |    |		Load_Top	At_Offset_3
02ec e407       |    |		Load	0x2,0x7
02ed e005       |    |		Load	0x0,0x5
02ee 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
02ef c404       |    |		Store	0x2,0x4
02f0 c402       |    |		Store	0x2,0x2
02f1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02f2			TRAP_0278:
02f2 601d       |`   |		Indirect_Literal	Discrete,0x310,{0x00000000, 0x578f7501}
02f3 010f       |    |		Execute	Exception,Equal
02f4 680b       |h   |		Jump_Zero	0x300
02f5 e007       |    |		Load	0x0,0x7								; Debug Table 0x14.0x1d = 0x2f5,0x16
02f6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02f7 0092 0451  |   Q|		Action	Push_String_Extended,0x451					; "*** Exception in Ada_Object_Editor.Change_State: Nonexistent_Tree"
													; Debug Table 0x14.0x1e = 0x2f7,0x17
02f9 e007       |    |		Load	0x0,0x7
02fa 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02fb 0092 044b  |   K|		Action	Push_String_Extended,0x44b					; "Operation failed - internal error"
													; Debug Table 0x14.0x1f = 0x2fb,0x18
02fd e006       |    |		Load	0x0,0x6
02fe 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
02ff 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0300 e007       |    |		Load	0x0,0x7								; Debug Table 0x14.0x20 = 0x300,0x19
0301 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0302 0092 0452  |   R|		Action	Push_String_Extended,0x452					; "*** Exception in Ada_Object_Editor.Change_State: "
													; Debug Table 0x14.0x21 = 0x302,0x1a
0304 e008       |    |		Load	0x0,0x8
0305 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0306 01cc       |    |		Execute	Vector,Catenate
0307 e007       |    |		Load	0x0,0x7
0308 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0309 0092 044b  |   K|		Action	Push_String_Extended,0x44b					; "Operation failed - internal error"
													; Debug Table 0x14.0x22 = 0x309,0x1b
030b e006       |    |		Load	0x0,0x6
030c 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
030d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
030e 0000 0000  |    |		.XXX[0x2]
0310 0000 0000  |    |		.LITERAL	{0x00000000, 0x578f7501}
0314 0000 0000  |    |		.LITERAL	{0x00000000, 0x56858503}
0318 0000 0000  |    |		.LITERAL	{0x00000000, 0x56858501}
031c 0000 0000  |    |		.LITERAL	{0x00000000, 0x578ea502}
0320 0000 0000  |    |		.LITERAL	{0x00000000, 0x578ea501}
0324 0000 0000  |    |		.BLANK	0000[0x4]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b       | +  |		.CONST	0x032b								; Address of begin
0329 0004       |    |		.CONST	0x0004								; Address of exception handler
032a 0001       |    |		.CONST	0x0001								; Number of locals
032b			BODY_0328:
032b			INIT_0328:
032b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15 = .DEBUG	0x032b,0x088e,0x0002,0x0000,0x0057,0x8f75,0x0000,0x01a8
													; Debug Table 0x15.0x0 = 0x32b,0x1
032c 4974       |It  |		Short_Literal	0x174
032d 00eb       |    |		Load_Encached	Diana_Cache
032e 0098       |    |		Execute	Package,Field_Read_Dynamic
032f 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0330 e00d       |    |		Load	0x0,0xd
0331 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0332 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0333 0000 0000  |    |		.BLANK	0000[0x5]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 0343       | C  |		.CONST	0x0343								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 0003       |    |		.CONST	0x0003								; Number of locals
033b			INIT_0338:
033b e003       |    |		Load	0x0,0x3								; Debug Table 0x16 = .DEBUG	0x033b,0x0892,0x0002,0x0000,0x0057,0x8f75,0x0000,0x01c5
													; Debug Table 0x16.0x0 = 0x33b,0xffff
033c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
033d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
033e 02c7       |    |		Declare_Variable	Any
033f 00d8       |    |		Load_Top	At_Offset_0
0340 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0341 e003       |    |		Load	0x0,0x3								; Debug Table 0x16.0x1 = 0x341,0xfffe
0342 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0343			BODY_0338:
0343 e003       |    |		Load	0x0,0x3								; Debug Table 0x16.0x2 = 0x343,0x1
0344 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0345 00da       |    |		Load_Top	At_Offset_2
0346 0120       |    |		Execute	Any,Is_Value
0347 6804       |h   |		Jump_Zero	0x34c
0348 e003       |    |		Load	0x0,0x3
0349 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
034a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
034b 7801       |x   |		Jump	0x34d
034c 00da       |    |		Load_Top	At_Offset_2
034d e5ff       |    |		Load	0x2,-0x1
034e e003       |    |		Load	0x0,0x3
034f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0350 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0351 c402       |    |		Store	0x2,0x2
0352 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0353 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x3 = 0x353,0x2
0354 0f00       |    |		Execute_Immediate	Equal,0x0
0355 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0356 0000 0000  |    |		.XXX[0x2]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 035d       | ]  |		.CONST	0x035d								; Address of begin
0359 0366       | f  |		.CONST	0x0366								; Address of exception handler
035a 0002       |    |		.CONST	0x0002								; Number of locals
035b			INIT_0358:
035b 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x17 = .DEBUG	0x035b,0x089c,0x0002,0x0000,0x0057,0x8f75,0x0000,0x01f8
													; Debug Table 0x17.0x0 = 0x35b,0xffff
035c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
035d			BODY_0358:
035d 0007       |    |		Action	Break_Optional							; Debug Table 0x17.0x1 = 0x35d,0x1
035e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x17.0x2 = 0x35e,0x401
035f 0007       |    |		Action	Break_Optional
0360 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x17.0x3 = 0x360,0x402
0361 0007       |    |		Action	Break_Optional							; Debug Table 0x17.0x4 = 0x361,0x403
0362 0007       |    |		Action	Break_Optional							; Debug Table 0x17.0x5 = 0x362,0x404
0363 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1				; Debug Table 0x17.0x6 = 0x363,0x1
0364 4800       |H   |		Short_Literal	0x0							; Debug Table 0x17.0x7 = 0x364,0x2
0365 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0366			TRAP_0358:
0366 0007       |    |		Action	Break_Optional
0367 4801       |H   |		Short_Literal	0x1							; Debug Table 0x17.0x8 = 0x367,0x3
0368 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0369 0000 0000  |    |		.BLANK	0000[0x7]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0387       |    |		.CONST	0x0387								; Address of begin
0371 03e9       |    |		.CONST	0x03e9								; Address of exception handler
0372 0006       |    |		.CONST	0x0006								; Number of locals
0373			INIT_0370:
0373 e003       |    |		Load	0x0,0x3								; Debug Table 0x18 = .DEBUG	0x0373,0x08b0,0x0001,0x0000,0x0057,0x8f75,0x0000,0x021e
													; Debug Table 0x18.0x0 = 0x373,0xffff
0374 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0375 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0376 02c7       |    |		Declare_Variable	Any
0377 00d8       |    |		Load_Top	At_Offset_0
0378 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0379 e003       |    |		Load	0x0,0x3								; Debug Table 0x18.0x1 = 0x379,0xfffe
037a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
037b 02c7       |    |		Declare_Variable	Any
037c 00d8       |    |		Load_Top	At_Offset_0
037d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
037e e003       |    |		Load	0x0,0x3								; Debug Table 0x18.0x2 = 0x37e,0xfffd
037f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0380 02c7       |    |		Declare_Variable	Any
0381 00d8       |    |		Load_Top	At_Offset_0
0382 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0383 e003       |    |		Load	0x0,0x3								; Debug Table 0x18.0x3 = 0x383,0xfffc
0384 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0385 e005       |    |		Load	0x0,0x5								; Debug Table 0x18.0x4 = 0x385,0xfffb
0386 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0387			BODY_0370:
0387 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0x5 = 0x387,0x1
0388 8226       | &  |		Call	0x1,0x26
0389 7003       |p   |		Jump_Nonzero	0x38d
038a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0x6 = 0x38a,0x401
038b 021d       |    |		Execute	Heap_Access,Is_Null
038c 6803       |h   |		Jump_Zero	0x390							; Debug Table 0x18.0x7 = 0x38c,0x1
038d 4804       |H   |		Short_Literal	0x4							; Debug Table 0x18.0x8 = 0x38d,0x2
038e a5f9       |    |		Store_Unchecked	0x2,-0x7
038f 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7					; Debug Table 0x18.0x9 = 0x38f,0x3
0390 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0xa = 0x390,0x4
0391 e00b       |    |		Load	0x0,0xb
0392 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0393 683d       |h=  |		Jump_Zero	0x3d1
0394 e003       |    |		Load	0x0,0x3								; Debug Table 0x18.0xb = 0x394,0x5
0395 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0396 e402       |    |		Load	0x2,0x2
0397 0120       |    |		Execute	Any,Is_Value
0398 6804       |h   |		Jump_Zero	0x39d
0399 e003       |    |		Load	0x0,0x3
039a 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
039b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
039c 7801       |x   |		Jump	0x39e
039d e402       |    |		Load	0x2,0x2
039e e5ff       |    |		Load	0x2,-0x1
039f e003       |    |		Load	0x0,0x3
03a0 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
03a1 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
03a2 c402       |    |		Store	0x2,0x2
03a3 005a       | Z  |		Store_Top	Discrete,At_Offset_2
03a4 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x18.0xc = 0x3a4,0x6
03a5 0092 0453  |   S|		Action	Push_String_Extended,0x453					; "Ada.Get_Unit"
03a7 e005       |    |		Load	0x0,0x5
03a8 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
03a9 e402       |    |		Load	0x2,0x2								; Debug Table 0x18.0xd = 0x3a9,0x7
03aa e003       |    |		Load	0x0,0x3
03ab 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
03ac 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
03ad c403       |    |		Store	0x2,0x3
03ae e003       |    |		Load	0x0,0x3								; Debug Table 0x18.0xe = 0x3ae,0x8
03af 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03b0 00db       |    |		Load_Top	At_Offset_3
03b1 0120       |    |		Execute	Any,Is_Value
03b2 6803       |h   |		Jump_Zero	0x3b6
03b3 e003       |    |		Load	0x0,0x3
03b4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03b5 7801       |x   |		Jump	0x3b7
03b6 00db       |    |		Load_Top	At_Offset_3
03b7 6070       |`p  |		Indirect_Literal	Discrete,0x428,{0x00000000, 0x00004000}
03b8 e00e       |    |		Load	0x0,0xe
03b9 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
03ba 4800       |H   |		Short_Literal	0x0
03bb e003       |    |		Load	0x0,0x3
03bc 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
03bd e5ff       |    |		Load	0x2,-0x1
03be e003       |    |		Load	0x0,0x3
03bf 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
03c0 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03c1 c404       |    |		Store	0x2,0x4
03c2 005a       | Z  |		Store_Top	Discrete,At_Offset_2
03c3 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x18.0xf = 0x3c3,0x9
03c4 0b00       |    |		Execute_Immediate	Case_Compare,0x0
03c5 7003       |p   |		Jump_Nonzero	0x3c9
03c6 e003       |    |		Load	0x0,0x3								; Debug Table 0x18.0x10 = 0x3c6,0xb
03c7 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
03c8 c404       |    |		Store	0x2,0x4
03c9 00d1       |    |		Pop_Control	Pop_Count_1
03ca 4800       |H   |		Short_Literal	0x0							; Debug Table 0x18.0x11 = 0x3ca,0xc
03cb e5fe       |    |		Load	0x2,-0x2
03cc e404       |    |		Load	0x2,0x4
03cd e403       |    |		Load	0x2,0x3
03ce e00f       |    |		Load	0x0,0xf
03cf 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
03d0 7815       |x   |		Jump	0x3e6
03d1 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x18.0x12 = 0x3d1,0xd
03d2 4602       |F   |		Jump_Case	0x3
03d3 7802       |x   |		Jump	0x3d6								; case 0x0
03d4 7809       |x   |		Jump	0x3de								; case 0x1
03d5 7800       |x   |		Jump	0x3d6								; case 0x2
03d6 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x18.0x13 = 0x3d6,0xe
03d7 6803       |h   |		Jump_Zero	0x3db
03d8 4800       |H   |		Short_Literal	0x0							; Debug Table 0x18.0x14 = 0x3d8,0xf
03d9 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
03da 7805       |x   |		Jump	0x3e0
03db 4801       |H   |		Short_Literal	0x1							; Debug Table 0x18.0x15 = 0x3db,0x10
03dc 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
03dd 7802       |x   |		Jump	0x3e0
03de 4802       |H   |		Short_Literal	0x2							; Debug Table 0x18.0x16 = 0x3de,0x11
03df 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
03e0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x17 = 0x3e0,0x12
03e1 e5fd       |    |		Load	0x2,-0x3
03e2 e5fe       |    |		Load	0x2,-0x2
03e3 e5ff       |    |		Load	0x2,-0x1
03e4 e005       |    |		Load	0x0,0x5
03e5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03e6 4800       |H   |		Short_Literal	0x0							; Debug Table 0x18.0x18 = 0x3e6,0x13
03e7 a5f9       |    |		Store_Unchecked	0x2,-0x7
03e8 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
03e9			TRAP_0370:
03e9 672e       |g.  |		Indirect_Literal	Discrete,0x318,{0x00000000, 0x56858501}
03ea 010f       |    |		Execute	Exception,Equal
03eb 6803       |h   |		Jump_Zero	0x3ef
03ec 4801       |H   |		Short_Literal	0x1							; Debug Table 0x18.0x19 = 0x3ec,0x14
03ed a5f9       |    |		Store_Unchecked	0x2,-0x7
03ee 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
03ef 6724       |g$  |		Indirect_Literal	Discrete,0x314,{0x00000000, 0x56858503}
03f0 010f       |    |		Execute	Exception,Equal
03f1 6803       |h   |		Jump_Zero	0x3f5
03f2 4802       |H   |		Short_Literal	0x2							; Debug Table 0x18.0x1a = 0x3f2,0x15
03f3 a5f9       |    |		Store_Unchecked	0x2,-0x7
03f4 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
03f5 e007       |    |		Load	0x0,0x7								; Debug Table 0x18.0x1b = 0x3f5,0x16
03f6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
03f7 0092 0454  |   T|		Action	Push_String_Extended,0x454					; "*** Exception in Ada_Object_Editor.Actual_Display: "
													; Debug Table 0x18.0x1c = 0x3f7,0x17
03f9 e008       |    |		Load	0x0,0x8
03fa 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
03fb 01cc       |    |		Execute	Vector,Catenate
03fc e007       |    |		Load	0x0,0x7
03fd 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
03fe 4805       |H   |		Short_Literal	0x5							; Debug Table 0x18.0x1d = 0x3fe,0x18
03ff a5f9       |    |		Store_Unchecked	0x2,-0x7
0400 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0401 0000 0000  |    |		.BLANK	0000[0x7]
0408 ; --------------------------------------------------------------------------------------
0408 ; SUBPROGRAM
0408 ; --------------------------------------------------------------------------------------
0408 040b       |    |		.CONST	0x040b								; Address of begin
0409 040e       |    |		.CONST	0x040e								; Address of exception handler
040a 0001       |    |		.CONST	0x0001								; Number of locals
040b			BODY_0408:
040b			INIT_0408:
040b 8210       |    |		Call	0x1,0x10							; Debug Table 0x19 = .DEBUG	0x040b,0x08ee,0x0004,0x0000,0x0057,0x8f75,0x0000,0x0464
													; Debug Table 0x19.0x0 = 0x40b,0x1
040c a402       |    |		Store_Unchecked	0x2,0x2
040d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
040e			TRAP_0408:
040e e20e       |    |		Load	0x1,0xe
040f 010f       |    |		Execute	Exception,Equal
0410 6803       |h   |		Jump_Zero	0x414
0411 e221       | !  |		Load	0x1,0x21							; Debug Table 0x19.0x1 = 0x411,0x2
0412 00cb       |    |		Action	Pop_Block_With_Result
0413 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0414 0100       |    |		Execute	Exception,Raise
0415 0000 0000  |    |		.XXX[0x3]
0417 0000       |    |
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 041b       |    |		.CONST	0x041b								; Address of begin
0419 041e       |    |		.CONST	0x041e								; Address of exception handler
041a 0001       |    |		.CONST	0x0001								; Number of locals
041b			BODY_0418:
041b			INIT_0418:
041b 820f       |    |		Call	0x1,0xf								; Debug Table 0x1a = .DEBUG	0x041b,0x08f4,0x0004,0x0000,0x0057,0x8f75,0x0000,0x0472
													; Debug Table 0x1a.0x0 = 0x41b,0x1
041c a403       |    |		Store_Unchecked	0x2,0x3
041d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
041e			TRAP_0418:
041e e20e       |    |		Load	0x1,0xe
041f 010f       |    |		Execute	Exception,Equal
0420 6803       |h   |		Jump_Zero	0x424
0421 e220       |    |		Load	0x1,0x20							; Debug Table 0x1a.0x1 = 0x421,0x2
0422 00cb       |    |		Action	Pop_Block_With_Result
0423 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0424 0100       |    |		Execute	Exception,Raise
0425 0000 0000  |    |		.XXX[0x3]
0427 0000       |    |
0428 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
042c ; --------------------------------------------------------------------------------------
042c ; STRING TABLE
042c ; --------------------------------------------------------------------------------------
042c 0054       | T  |		.STRTAB	0x0054->0x0456							; "NORMAL"
042d 0058       | X  |		.STRTAB	0x0058->0x0459							; "PROMOTED"
042e 005e       | ^  |		.STRTAB	0x005e->0x045d							; "DEMOTED"
042f 0063       | c  |		.STRTAB	0x0063->0x0460							; "MUST_SELECT"
0430 006c       | l  |		.STRTAB	0x006c->0x0466							; "DONT_SELECT"
0431 0075       | u  |		.STRTAB	0x0075->0x046b							; "TRY_SELECT"
0432 007d       | }  |		.STRTAB	0x007d->0x0470							; "SUCCESSFUL"
0433 0085       |    |		.STRTAB	0x0085->0x0475							; "LOCKED_OUT"
0434 008d       |    |		.STRTAB	0x008d->0x047a							; "ILLEGAL_ACCESS"
0435 0099       |    |		.STRTAB	0x0099->0x0481							; "CANNOT_SELECT"
0436 00a4       |    |		.STRTAB	0x00a4->0x0488							; "NONEXISTENT_TREE"
0437 00b2       |    |		.STRTAB	0x00b2->0x0490							; "UNKNOWN_ERROR"
0438 00bd       |    |		.STRTAB	0x00bd->0x0496							; "###Unknown###"
0439 00c8       |    |		.STRTAB	0x00c8->0x049d							; "###No_Selection###"
043a 00d8       |    |		.STRTAB	0x00d8->0x04a6							; "Ada.Edit"
043b 00de       |    |		.STRTAB	0x00de->0x04aa							; "Cannot edit unrooted tree"
043c 00f5       |    |		.STRTAB	0x00f5->0x04b6							; "*** Exception in Ada_Object_Editor.Edit: "
043d 011c       |    |		.STRTAB	0x011c->0x04cb							; "Edit failed - internal error"
043e 0136       | 6  |		.STRTAB	0x0136->0x04d9							; "Ada.Withdraw"
043f 0140       | @  |		.STRTAB	0x0140->0x04df							; "Cannot withdraw unrooted tree"
0440 015b       | [  |		.STRTAB	0x015b->0x04ed							; "*** Exception in Ada_Object_Editor.Withdraw: "
0441 0186       |    |		.STRTAB	0x0186->0x0504							; "Withdraw failed - internal error"
0442 01a4       |    |		.STRTAB	0x01a4->0x0514							; "Ada.Promote"
0443 01ad       |    |		.STRTAB	0x01ad->0x0519							; "Cannot promote unrooted tree"
0444 01c7       |    |		.STRTAB	0x01c7->0x0527							; "*** Exception in Ada_Object_Editor.Promote: "
0445 01f1       |    |		.STRTAB	0x01f1->0x053d							; "Promote failed - internal error"
0446 020e       |    |		.STRTAB	0x020e->0x054d							; "Ada.Demote"
0447 0216       |    |		.STRTAB	0x0216->0x0552							; "Cannot demote unrooted tree"
0448 022f       | /  |		.STRTAB	0x022f->0x055f							; "*** Exception in Ada_Object_Editor.Demote: "
0449 0258       | X  |		.STRTAB	0x0258->0x0575							; "Demote failed - internal error"
044a 0274       | t  |		.STRTAB	0x0274->0x0584							; "*** Exception in Ada_Object_Editor.Mark_Nodes: "
044b 02a1       |    |		.STRTAB	0x02a1->0x059b							; "Operation failed - internal error"
044c 02c0       |    |		.STRTAB	0x02c0->0x05ac							; "Ada_Object_Editor.Display failed - "
044d 02e1       |    |		.STRTAB	0x02e1->0x05bd							; "LIBRARY"
044e 02e6       |    |		.STRTAB	0x02e6->0x05c1							; "Editor, Library, Common"
044f 02fb       |    |		.STRTAB	0x02fb->0x05cc							; " is already coded"
0450 030a       |    |		.STRTAB	0x030a->0x05d5							; " is already source"
0451 031a       |    |		.STRTAB	0x031a->0x05de							; "*** Exception in Ada_Object_Editor.Change_State: Nonexistent_Tree"
0452 0359       | Y  |		.STRTAB	0x0359->0x05fe							; "*** Exception in Ada_Object_Editor.Change_State: "
0453 0388       |    |		.STRTAB	0x0388->0x0617							; "Ada.Get_Unit"
0454 0392       |    |		.STRTAB	0x0392->0x061d							; "*** Exception in Ada_Object_Editor.Actual_Display: "
0455 03c3       |    |		.STREND 0x03c3->0x0636
0456 4e4f 524d  |NORM|		.STRTAB_STRINGS
0637 0000       |    |		.XXX[0x1]
0638 ; --------------------------------------------------------------------------------------
0638 ; Debug Table
0638 ; --------------------------------------------------------------------------------------
0638 0003 001b  |    |		.CONST	0x0003,0x001b
063a 000b 0712  |    |		.DEBUG	0x000b,0x0712,0x8000,0x0000,0x0057,0x8ea5,0x0000,0x0005
0642 003e 073e  | > >|		.DEBUG	0x003e,0x073e,0x8000,0x0000,0x0057,0x8f75,0x0000,0x001d
064a 007b 0778  | { x|		.DEBUG	0x007b,0x0778,0x0002,0x0000,0x0057,0x8ea5,0x0000,0x0017
0652 0093 078a  |    |		.DEBUG	0x0093,0x078a,0x0002,0x0000,0x0057,0x8ea5,0x0000,0x001e
065a 00ab 079c  |    |		.DEBUG	0x00ab,0x079c,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x0025
0662 00bb 07a0  |    |		.DEBUG	0x00bb,0x07a0,0x0005,0x0000,0x0057,0x8ea5,0x0000,0x002f
066a 00d3 07a2  |    |		.DEBUG	0x00d3,0x07a2,0x0005,0x0000,0x0057,0x8ea5,0x0000,0x0036
0672 00eb 07a4  |    |		.DEBUG	0x00eb,0x07a4,0x0005,0x0000,0x0057,0x8ea5,0x0000,0x003d
067a 0103 07a6  |    |		.DEBUG	0x0103,0x07a6,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x0047
0682 0113 07aa  |    |		.DEBUG	0x0113,0x07aa,0x0002,0x0000,0x0057,0x8ea5,0x0000,0x005f
068a 0123 07b0  | #  |		.DEBUG	0x0123,0x07b0,0x0002,0x0000,0x0057,0x8ea5,0x0000,0x0064
0692 014b 07c6  | K  |		.DEBUG	0x014b,0x07c6,0x0002,0x0000,0x0057,0x8ea5,0x0000,0x006e
069a 0153 07ca  | S  |		.DEBUG	0x0153,0x07ca,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x0079
06a2 0183 07dc  |    |		.DEBUG	0x0183,0x07dc,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x0083
06aa 01b3 07ee  |    |		.DEBUG	0x01b3,0x07ee,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x008d
06b2 01db 0800  |    |		.DEBUG	0x01db,0x0800,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x0097
06ba 0203 0812  |    |		.DEBUG	0x0203,0x0812,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x00a1
06c2 020b 0816  |    |		.DEBUG	0x020b,0x0816,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x00ab
06ca 024b 0838  | K 8|		.DEBUG	0x024b,0x0838,0x0001,0x0000,0x0057,0x8ea5,0x0000,0x00b9
06d2 026b 0842  | k B|		.DEBUG	0x026b,0x0842,0x0002,0x0000,0x0057,0x8f75,0x0000,0x0044
06da 027b 0846  | { F|		.DEBUG	0x027b,0x0846,0x0001,0x0000,0x0057,0x8f75,0x0000,0x005e
06e2 032b 088e  | +  |		.DEBUG	0x032b,0x088e,0x0002,0x0000,0x0057,0x8f75,0x0000,0x01a8
06ea 033b 0892  | ;  |		.DEBUG	0x033b,0x0892,0x0002,0x0000,0x0057,0x8f75,0x0000,0x01c5
06f2 035b 089c  | [  |		.DEBUG	0x035b,0x089c,0x0002,0x0000,0x0057,0x8f75,0x0000,0x01f8
06fa 0373 08b0  | s  |		.DEBUG	0x0373,0x08b0,0x0001,0x0000,0x0057,0x8f75,0x0000,0x021e
0702 040b 08ee  |    |		.DEBUG	0x040b,0x08ee,0x0004,0x0000,0x0057,0x8f75,0x0000,0x0464
070a 041b 08f4  |    |		.DEBUG	0x041b,0x08f4,0x0004,0x0000,0x0057,0x8f75,0x0000,0x0472
0712 ; --------------------------------------------------------------------------------------
0712 ; Debug3 Subtable 0x0
0712 ; --------------------------------------------------------------------------------------
0712 0015 0000  |    |		.DBG3TAB	0x0015,0x0000
0714 000b ffff  |    |		.CONST	0x000b,0xffff
0716 000c fffe  |    |		.CONST	0x000c,0xfffe
0718 000d fffd  |    |		.CONST	0x000d,0xfffd
071a 000e fffc  |    |		.CONST	0x000e,0xfffc
071c 0012 fffb  |    |		.CONST	0x0012,0xfffb
071e 0014 fffa  |    |		.CONST	0x0014,0xfffa
0720 0016 fff9  |    |		.CONST	0x0016,0xfff9
0722 0018 fff8  |    |		.CONST	0x0018,0xfff8
0724 001d fff7  |    |		.CONST	0x001d,0xfff7
0726 0022 fff6  | "  |		.CONST	0x0022,0xfff6
0728 0027 fff5  | '  |		.CONST	0x0027,0xfff5
072a 0029 fff4  | )  |		.CONST	0x0029,0xfff4
072c 002b fff3  | +  |		.CONST	0x002b,0xfff3
072e 002d fff2  | -  |		.CONST	0x002d,0xfff2
0730 002f fff1  | /  |		.CONST	0x002f,0xfff1
0732 0031 fff0  | 1  |		.CONST	0x0031,0xfff0
0734 0033 ffef  | 3  |		.CONST	0x0033,0xffef
0736 0035 ffee  | 5  |		.CONST	0x0035,0xffee
0738 0037 ffed  | 7  |		.CONST	0x0037,0xffed
073a 0039 ffec  | 9  |		.CONST	0x0039,0xffec
073c 003b ffeb  | ;  |		.CONST	0x003b,0xffeb
073e ; --------------------------------------------------------------------------------------
073e ; Debug3 Subtable 0x1
073e ; --------------------------------------------------------------------------------------
073e 001c 0000  |    |		.DBG3TAB	0x001c,0x0000
0740 003e ffff  | >  |		.CONST	0x003e,0xffff
0742 003f fffe  | ?  |		.CONST	0x003f,0xfffe
0744 0040 fffd  | @  |		.CONST	0x0040,0xfffd
0746 0041 fffc  | A  |		.CONST	0x0041,0xfffc
0748 0042 fffb  | B  |		.CONST	0x0042,0xfffb
074a 0043 fffa  | C  |		.CONST	0x0043,0xfffa
074c 0044 fff9  | D  |		.CONST	0x0044,0xfff9
074e 0046 fff8  | F  |		.CONST	0x0046,0xfff8
0750 0048 fff7  | H  |		.CONST	0x0048,0xfff7
0752 004a fff6  | J  |		.CONST	0x004a,0xfff6
0754 004c fff5  | L  |		.CONST	0x004c,0xfff5
0756 004e fff4  | N  |		.CONST	0x004e,0xfff4
0758 0050 fff3  | P  |		.CONST	0x0050,0xfff3
075a 0052 fff2  | R  |		.CONST	0x0052,0xfff2
075c 0054 fff1  | T  |		.CONST	0x0054,0xfff1
075e 0056 fff0  | V  |		.CONST	0x0056,0xfff0
0760 0058 ffef  | X  |		.CONST	0x0058,0xffef
0762 005a ffee  | Z  |		.CONST	0x005a,0xffee
0764 005c ffed  | \  |		.CONST	0x005c,0xffed
0766 005e ffec  | ^  |		.CONST	0x005e,0xffec
0768 0060 ffeb  | `  |		.CONST	0x0060,0xffeb
076a 0062 ffea  | b  |		.CONST	0x0062,0xffea
076c 0064 ffe9  | d  |		.CONST	0x0064,0xffe9
076e 0066 ffe8  | f  |		.CONST	0x0066,0xffe8
0770 0068 ffe7  | h  |		.CONST	0x0068,0xffe7
0772 006a ffe6  | j  |		.CONST	0x006a,0xffe6
0774 006c ffe5  | l  |		.CONST	0x006c,0xffe5
0776 006e ffe4  | n  |		.CONST	0x006e,0xffe4
0778 ; --------------------------------------------------------------------------------------
0778 ; Debug3 Subtable 0x2
0778 ; --------------------------------------------------------------------------------------
0778 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
077a 007b ffff  | {  |		.CONST	0x007b,0xffff
077c 007c 0001  | |  |		.CONST	0x007c,0x0001
077e 0084 0002  |    |		.CONST	0x0084,0x0002
0780 0085 0401  |    |		.CONST	0x0085,0x0401
0782 0087 0002  |    |		.CONST	0x0087,0x0002
0784 0088 0003  |    |		.CONST	0x0088,0x0003
0786 008a 0004  |    |		.CONST	0x008a,0x0004
0788 008d 0005  |    |		.CONST	0x008d,0x0005
078a ; --------------------------------------------------------------------------------------
078a ; Debug3 Subtable 0x3
078a ; --------------------------------------------------------------------------------------
078a 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
078c 0093 ffff  |    |		.CONST	0x0093,0xffff
078e 0094 0001  |    |		.CONST	0x0094,0x0001
0790 009c 0002  |    |		.CONST	0x009c,0x0002
0792 009d 0401  |    |		.CONST	0x009d,0x0401
0794 009f 0002  |    |		.CONST	0x009f,0x0002
0796 00a0 0003  |    |		.CONST	0x00a0,0x0003
0798 00a2 0004  |    |		.CONST	0x00a2,0x0004
079a 00a5 0005  |    |		.CONST	0x00a5,0x0005
079c ; --------------------------------------------------------------------------------------
079c ; Debug3 Subtable 0x4
079c ; --------------------------------------------------------------------------------------
079c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
079e 00ab 0001  |    |		.CONST	0x00ab,0x0001
07a0 ; --------------------------------------------------------------------------------------
07a0 ; Debug3 Subtable 0x5
07a0 ; --------------------------------------------------------------------------------------
07a0 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
07a2 ; --------------------------------------------------------------------------------------
07a2 ; Debug3 Subtable 0x6
07a2 ; --------------------------------------------------------------------------------------
07a2 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
07a4 ; --------------------------------------------------------------------------------------
07a4 ; Debug3 Subtable 0x7
07a4 ; --------------------------------------------------------------------------------------
07a4 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
07a6 ; --------------------------------------------------------------------------------------
07a6 ; Debug3 Subtable 0x8
07a6 ; --------------------------------------------------------------------------------------
07a6 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
07a8 0103 0001  |    |		.CONST	0x0103,0x0001
07aa ; --------------------------------------------------------------------------------------
07aa ; Debug3 Subtable 0x9
07aa ; --------------------------------------------------------------------------------------
07aa 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
07ac 0113 0001  |    |		.CONST	0x0113,0x0001
07ae 0119 0002  |    |		.CONST	0x0119,0x0002
07b0 ; --------------------------------------------------------------------------------------
07b0 ; Debug3 Subtable 0xa
07b0 ; --------------------------------------------------------------------------------------
07b0 0002 0008  |    |		.DBG3TAB	0x0002,0x0008
07b2 0123 ffff  | #  |		.CONST	0x0123,0xffff
07b4 0124 fffe  | $  |		.CONST	0x0124,0xfffe
07b6 0129 0001  | )  |		.CONST	0x0129,0x0001
07b8 012a 0002  | *  |		.CONST	0x012a,0x0002
07ba 012c 0003  | ,  |		.CONST	0x012c,0x0003
07bc 012d 0004  | -  |		.CONST	0x012d,0x0004
07be 0135 0005  | 5  |		.CONST	0x0135,0x0005
07c0 013a 0006  | :  |		.CONST	0x013a,0x0006
07c2 013c 0007  | <  |		.CONST	0x013c,0x0007
07c4 0142 0008  | B  |		.CONST	0x0142,0x0008
07c6 ; --------------------------------------------------------------------------------------
07c6 ; Debug3 Subtable 0xb
07c6 ; --------------------------------------------------------------------------------------
07c6 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
07c8 014b 0001  | K  |		.CONST	0x014b,0x0001
07ca ; --------------------------------------------------------------------------------------
07ca ; Debug3 Subtable 0xc
07ca ; --------------------------------------------------------------------------------------
07ca 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
07cc 0153 ffff  | S  |		.CONST	0x0153,0xffff
07ce 0156 0001  | V  |		.CONST	0x0156,0x0001
07d0 015a 0002  | Z  |		.CONST	0x015a,0x0002
07d2 015d 0003  | ]  |		.CONST	0x015d,0x0003
07d4 0168 0004  | h  |		.CONST	0x0168,0x0004
07d6 016e 0005  | n  |		.CONST	0x016e,0x0005
07d8 0170 0006  | p  |		.CONST	0x0170,0x0006
07da 0177 0007  | w  |		.CONST	0x0177,0x0007
07dc ; --------------------------------------------------------------------------------------
07dc ; Debug3 Subtable 0xd
07dc ; --------------------------------------------------------------------------------------
07dc 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
07de 0183 ffff  |    |		.CONST	0x0183,0xffff
07e0 0186 0001  |    |		.CONST	0x0186,0x0001
07e2 018a 0002  |    |		.CONST	0x018a,0x0002
07e4 018d 0003  |    |		.CONST	0x018d,0x0003
07e6 0198 0004  |    |		.CONST	0x0198,0x0004
07e8 019e 0005  |    |		.CONST	0x019e,0x0005
07ea 01a0 0006  |    |		.CONST	0x01a0,0x0006
07ec 01a7 0007  |    |		.CONST	0x01a7,0x0007
07ee ; --------------------------------------------------------------------------------------
07ee ; Debug3 Subtable 0xe
07ee ; --------------------------------------------------------------------------------------
07ee 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
07f0 01b3 ffff  |    |		.CONST	0x01b3,0xffff
07f2 01b6 0001  |    |		.CONST	0x01b6,0x0001
07f4 01ba 0002  |    |		.CONST	0x01ba,0x0002
07f6 01bd 0003  |    |		.CONST	0x01bd,0x0003
07f8 01c2 0004  |    |		.CONST	0x01c2,0x0004
07fa 01c8 0005  |    |		.CONST	0x01c8,0x0005
07fc 01ca 0006  |    |		.CONST	0x01ca,0x0006
07fe 01d1 0007  |    |		.CONST	0x01d1,0x0007
0800 ; --------------------------------------------------------------------------------------
0800 ; Debug3 Subtable 0xf
0800 ; --------------------------------------------------------------------------------------
0800 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
0802 01db ffff  |    |		.CONST	0x01db,0xffff
0804 01de 0001  |    |		.CONST	0x01de,0x0001
0806 01e2 0002  |    |		.CONST	0x01e2,0x0002
0808 01e5 0003  |    |		.CONST	0x01e5,0x0003
080a 01ea 0004  |    |		.CONST	0x01ea,0x0004
080c 01f0 0005  |    |		.CONST	0x01f0,0x0005
080e 01f2 0006  |    |		.CONST	0x01f2,0x0006
0810 01f9 0007  |    |		.CONST	0x01f9,0x0007
0812 ; --------------------------------------------------------------------------------------
0812 ; Debug3 Subtable 0x10
0812 ; --------------------------------------------------------------------------------------
0812 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0814 0203 0001  |    |		.CONST	0x0203,0x0001
0816 ; --------------------------------------------------------------------------------------
0816 ; Debug3 Subtable 0x11
0816 ; --------------------------------------------------------------------------------------
0816 0002 000e  |    |		.DBG3TAB	0x0002,0x000e
0818 020b ffff  |    |		.CONST	0x020b,0xffff
081a 020c fffe  |    |		.CONST	0x020c,0xfffe
081c 020f 0001  |    |		.CONST	0x020f,0x0001
081e 0210 0401  |    |		.CONST	0x0210,0x0401
0820 0212 0001  |    |		.CONST	0x0212,0x0001
0822 0213 0002  |    |		.CONST	0x0213,0x0002
0824 0214 0801  |    |		.CONST	0x0214,0x0801
0826 0217 0002  |    |		.CONST	0x0217,0x0002
0828 0218 0003  |    |		.CONST	0x0218,0x0003
082a 021b 0004  |    |		.CONST	0x021b,0x0004
082c 0225 0005  | %  |		.CONST	0x0225,0x0005
082e 022a 0006  | *  |		.CONST	0x022a,0x0006
0830 0235 0007  | 5  |		.CONST	0x0235,0x0007
0832 0236 0008  | 6  |		.CONST	0x0236,0x0008
0834 0238 0009  | 8  |		.CONST	0x0238,0x0009
0836 023f 000a  | ?  |		.CONST	0x023f,0x000a
0838 ; --------------------------------------------------------------------------------------
0838 ; Debug3 Subtable 0x12
0838 ; --------------------------------------------------------------------------------------
0838 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
083a 024b ffff  | K  |		.CONST	0x024b,0xffff
083c 024d 0001  | M  |		.CONST	0x024d,0x0001
083e 0256 0002  | V  |		.CONST	0x0256,0x0002
0840 0258 0003  | X  |		.CONST	0x0258,0x0003
0842 ; --------------------------------------------------------------------------------------
0842 ; Debug3 Subtable 0x13
0842 ; --------------------------------------------------------------------------------------
0842 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0844 026b 0001  | k  |		.CONST	0x026b,0x0001
0846 ; --------------------------------------------------------------------------------------
0846 ; Debug3 Subtable 0x14
0846 ; --------------------------------------------------------------------------------------
0846 0008 001b  |    |		.DBG3TAB	0x0008,0x001b
0848 027b ffff  | {  |		.CONST	0x027b,0xffff
084a 027c fffe  | |  |		.CONST	0x027c,0xfffe
084c 027d fffd  | }  |		.CONST	0x027d,0xfffd
084e 027e fffc  | ~  |		.CONST	0x027e,0xfffc
0850 027f fffb  |    |		.CONST	0x027f,0xfffb
0852 0281 fffa  |    |		.CONST	0x0281,0xfffa
0854 0286 fff9  |    |		.CONST	0x0286,0xfff9
0856 0289 fff8  |    |		.CONST	0x0289,0xfff8
0858 028a 0001  |    |		.CONST	0x028a,0x0001
085a 028c 0002  |    |		.CONST	0x028c,0x0002
085c 0295 0003  |    |		.CONST	0x0295,0x0003
085e 0297 0004  |    |		.CONST	0x0297,0x0004
0860 029a 0005  |    |		.CONST	0x029a,0x0005
0862 029d 0006  |    |		.CONST	0x029d,0x0006
0864 029f 0007  |    |		.CONST	0x029f,0x0007
0866 02a3 0008  |    |		.CONST	0x02a3,0x0008
0868 02aa 0009  |    |		.CONST	0x02aa,0x0009
086a 02ae 000a  |    |		.CONST	0x02ae,0x000a
086c 02b4 000b  |    |		.CONST	0x02b4,0x000b
086e 02bf 000c  |    |		.CONST	0x02bf,0x000c
0870 02c7 000d  |    |		.CONST	0x02c7,0x000d
0872 02c8 000e  |    |		.CONST	0x02c8,0x000e
0874 02d1 000f  |    |		.CONST	0x02d1,0x000f
0876 02d3 0010  |    |		.CONST	0x02d3,0x0010
0878 02db 0011  |    |		.CONST	0x02db,0x0011
087a 02dc 0012  |    |		.CONST	0x02dc,0x0012
087c 02df 0013  |    |		.CONST	0x02df,0x0013
087e 02e1 0014  |    |		.CONST	0x02e1,0x0014
0880 02e8 0015  |    |		.CONST	0x02e8,0x0015
0882 02f5 0016  |    |		.CONST	0x02f5,0x0016
0884 02f7 0017  |    |		.CONST	0x02f7,0x0017
0886 02fb 0018  |    |		.CONST	0x02fb,0x0018
0888 0300 0019  |    |		.CONST	0x0300,0x0019
088a 0302 001a  |    |		.CONST	0x0302,0x001a
088c 0309 001b  |    |		.CONST	0x0309,0x001b
088e ; --------------------------------------------------------------------------------------
088e ; Debug3 Subtable 0x15
088e ; --------------------------------------------------------------------------------------
088e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0890 032b 0001  | +  |		.CONST	0x032b,0x0001
0892 ; --------------------------------------------------------------------------------------
0892 ; Debug3 Subtable 0x16
0892 ; --------------------------------------------------------------------------------------
0892 0002 0002  |    |		.DBG3TAB	0x0002,0x0002
0894 033b ffff  | ;  |		.CONST	0x033b,0xffff
0896 0341 fffe  | A  |		.CONST	0x0341,0xfffe
0898 0343 0001  | C  |		.CONST	0x0343,0x0001
089a 0353 0002  | S  |		.CONST	0x0353,0x0002
089c ; --------------------------------------------------------------------------------------
089c ; Debug3 Subtable 0x17
089c ; --------------------------------------------------------------------------------------
089c 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
089e 035b ffff  | [  |		.CONST	0x035b,0xffff
08a0 035d 0001  | ]  |		.CONST	0x035d,0x0001
08a2 035e 0401  | ^  |		.CONST	0x035e,0x0401
08a4 0360 0402  | `  |		.CONST	0x0360,0x0402
08a6 0361 0403  | a  |		.CONST	0x0361,0x0403
08a8 0362 0404  | b  |		.CONST	0x0362,0x0404
08aa 0363 0001  | c  |		.CONST	0x0363,0x0001
08ac 0364 0002  | d  |		.CONST	0x0364,0x0002
08ae 0367 0003  | g  |		.CONST	0x0367,0x0003
08b0 ; --------------------------------------------------------------------------------------
08b0 ; Debug3 Subtable 0x18
08b0 ; --------------------------------------------------------------------------------------
08b0 0005 0019  |    |		.DBG3TAB	0x0005,0x0019
08b2 0373 ffff  | s  |		.CONST	0x0373,0xffff
08b4 0379 fffe  | y  |		.CONST	0x0379,0xfffe
08b6 037e fffd  | ~  |		.CONST	0x037e,0xfffd
08b8 0383 fffc  |    |		.CONST	0x0383,0xfffc
08ba 0385 fffb  |    |		.CONST	0x0385,0xfffb
08bc 0387 0001  |    |		.CONST	0x0387,0x0001
08be 038a 0401  |    |		.CONST	0x038a,0x0401
08c0 038c 0001  |    |		.CONST	0x038c,0x0001
08c2 038d 0002  |    |		.CONST	0x038d,0x0002
08c4 038f 0003  |    |		.CONST	0x038f,0x0003
08c6 0390 0004  |    |		.CONST	0x0390,0x0004
08c8 0394 0005  |    |		.CONST	0x0394,0x0005
08ca 03a4 0006  |    |		.CONST	0x03a4,0x0006
08cc 03a9 0007  |    |		.CONST	0x03a9,0x0007
08ce 03ae 0008  |    |		.CONST	0x03ae,0x0008
08d0 03c3 0009  |    |		.CONST	0x03c3,0x0009
08d2 03c6 000b  |    |		.CONST	0x03c6,0x000b
08d4 03ca 000c  |    |		.CONST	0x03ca,0x000c
08d6 03d1 000d  |    |		.CONST	0x03d1,0x000d
08d8 03d6 000e  |    |		.CONST	0x03d6,0x000e
08da 03d8 000f  |    |		.CONST	0x03d8,0x000f
08dc 03db 0010  |    |		.CONST	0x03db,0x0010
08de 03de 0011  |    |		.CONST	0x03de,0x0011
08e0 03e0 0012  |    |		.CONST	0x03e0,0x0012
08e2 03e6 0013  |    |		.CONST	0x03e6,0x0013
08e4 03ec 0014  |    |		.CONST	0x03ec,0x0014
08e6 03f2 0015  |    |		.CONST	0x03f2,0x0015
08e8 03f5 0016  |    |		.CONST	0x03f5,0x0016
08ea 03f7 0017  |    |		.CONST	0x03f7,0x0017
08ec 03fe 0018  |    |		.CONST	0x03fe,0x0018
08ee ; --------------------------------------------------------------------------------------
08ee ; Debug3 Subtable 0x19
08ee ; --------------------------------------------------------------------------------------
08ee 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
08f0 040b 0001  |    |		.CONST	0x040b,0x0001
08f2 0411 0002  |    |		.CONST	0x0411,0x0002
08f4 ; --------------------------------------------------------------------------------------
08f4 ; Debug3 Subtable 0x1a
08f4 ; --------------------------------------------------------------------------------------
08f4 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
08f6 041b 0001  |    |		.CONST	0x041b,0x0001
08f8 0421 0002  | !  |		.CONST	0x0421,0x0002
08fa 0000 0000  |    |		.BLANK	0000[0x106]