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

⟦aa788a411⟧

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

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 05c8       |    |		.CONST	0x05c8								; 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,0x06a2,0x8000,0x0000,0x005a,0x85a5,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 62f1       |b   |		Indirect_Literal	Discrete,0x300,{0x00000000, 0x5a85a501}		; Debug Table 0x0.0x3 = 0xe,0xfffc
000f 0129       | )  |		Execute	Any,Make_Visible
0010 62eb       |b   |		Indirect_Literal	Discrete,0x2fc,{0x00000000, 0x5a85a502}
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 017b  |   {|		Declare_Subprogram	INIT_0178,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x31,0xfff0
0033 029a 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x33,0xffef
0035 029a 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x35,0xffee
0037 029a 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x12 = 0x37,0xffed
0039 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x13 = 0x39,0xffec
003b 029a 0233  |   3|		Declare_Subprogram	INIT_0230,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,0x06ce,0x8000,0x0000,0x005a,0x8645,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 0418  |    |		Action	Push_String_Extended,0x418					; "###Unknown###"
													; Debug Table 0x1.0x6 = 0x44,0xfff9
0046 0092 0419  |    |		Action	Push_String_Extended,0x419					; "###No_Selection###"
													; Debug Table 0x1.0x7 = 0x46,0xfff8
0048 029d 0253  |   S|		Declare_Subprogram	INIT_0250,For_Outer_Call			; Debug Table 0x1.0x8 = 0x48,0xfff7
004a 029d 0263  |   c|		Declare_Subprogram	INIT_0260,For_Outer_Call			; Debug Table 0x1.0x9 = 0x4a,0xfff6
004c 029d 030b  |    |		Declare_Subprogram	INIT_0308,For_Outer_Call			; Debug Table 0x1.0xa = 0x4c,0xfff5
004e 029d 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call			; Debug Table 0x1.0xb = 0x4e,0xfff4
0050 029d 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call			; Debug Table 0x1.0xc = 0x50,0xfff3
0052 029d 0353  |   S|		Declare_Subprogram	INIT_0350,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,0x0708,0x0002,0x0000,0x005a,0x85a5,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,0x071a,0x0002,0x0000,0x005a,0x85a5,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,0x072c,0x0001,0x0000,0x005a,0x85a5,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,0x0730,0x0005,0x0000,0x005a,0x85a5,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 040c  |    |		Action	Push_String_Extended_Indexed,0x40c				; "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,0x0732,0x0005,0x0000,0x005a,0x85a5,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 040f  |    |		Action	Push_String_Extended_Indexed,0x40f				; "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,0x0734,0x0005,0x0000,0x005a,0x85a5,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 0412  |    |		Action	Push_String_Extended_Indexed,0x412				; "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,0x0736,0x0001,0x0000,0x005a,0x85a5,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,0x073a,0x0002,0x0000,0x005a,0x85a5,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,0x0740,0x0002,0x0000,0x005a,0x85a5,0x0000,0x0064
													; Debug Table 0xa.0x0 = 0x123,0xffff
0124 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa.0x1 = 0x124,0xfffe
0125 029f 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Call
0127 029f 03fb  |    |		Declare_Subprogram	INIT_03f8,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,0x0756,0x0002,0x0000,0x005a,0x85a5,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,0x075a,0x0001,0x0000,0x005a,0x85a5,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 041a  |    |		Action	Push_String_Extended,0x41a					; "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 041b  |    |		Action	Push_String_Extended,0x41b					; "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 041c  |    |		Action	Push_String_Extended,0x41c					; "*** 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 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017e       | ~  |		.CONST	0x017e								; Address of begin
0179 0195       |    |		.CONST	0x0195								; Address of exception handler
017a 0002       |    |		.CONST	0x0002								; Number of locals
017b			INIT_0178:
017b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd = .DEBUG	0x017b,0x076a,0x0001,0x0000,0x005a,0x85a5,0x0000,0x0083
													; Debug Table 0xd.0x0 = 0x17b,0xffff
017c 00db       |    |		Load_Top	At_Offset_3
017d 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
017e			BODY_0178:
017e 0092 041d  |    |		Action	Push_String_Extended,0x41d					; "Ada.Withdraw"
													; Debug Table 0xd.0x1 = 0x17e,0x1
0180 e004       |    |		Load	0x0,0x4
0181 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0182 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x2 = 0x182,0x2
0183 8225       | %  |		Call	0x1,0x25
0184 680b       |h   |		Jump_Zero	0x190
0185 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x3 = 0x185,0x3
0186 4801       |H   |		Short_Literal	0x1
0187 4801       |H   |		Short_Literal	0x1
0188 e002       |    |		Load	0x0,0x2
0189 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
018a e402       |    |		Load	0x2,0x2
018b e005       |    |		Load	0x0,0x5
018c 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
018d e005       |    |		Load	0x0,0x5
018e 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
018f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0190 0092 041e  |    |		Action	Push_String_Extended,0x41e					; "Cannot withdraw unrooted tree"
													; Debug Table 0xd.0x4 = 0x190,0x4
0192 e006       |    |		Load	0x0,0x6
0193 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0194 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0195			TRAP_0178:
0195 0007       |    |		Action	Break_Optional
0196 e007       |    |		Load	0x0,0x7								; Debug Table 0xd.0x5 = 0x196,0x5
0197 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0198 0092 041f  |    |		Action	Push_String_Extended,0x41f					; "*** Exception in Ada_Object_Editor.Withdraw: "
													; Debug Table 0xd.0x6 = 0x198,0x6
019a e008       |    |		Load	0x0,0x8
019b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
019c 01cc       |    |		Execute	Vector,Catenate
019d e007       |    |		Load	0x0,0x7
019e 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
019f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a6       |    |		.CONST	0x01a6								; Address of begin
01a1 01b7       |    |		.CONST	0x01b7								; Address of exception handler
01a2 0002       |    |		.CONST	0x0002								; Number of locals
01a3			INIT_01a0:
01a3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xe = .DEBUG	0x01a3,0x077a,0x0001,0x0000,0x005a,0x85a5,0x0000,0x008d
													; Debug Table 0xe.0x0 = 0x1a3,0xffff
01a4 00db       |    |		Load_Top	At_Offset_3
01a5 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01a6			BODY_01a0:
01a6 0092 0420  |    |		Action	Push_String_Extended,0x420					; "Ada.Promote"
													; Debug Table 0xe.0x1 = 0x1a6,0x1
01a8 e004       |    |		Load	0x0,0x4
01a9 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01aa 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x2 = 0x1aa,0x2
01ab 8225       | %  |		Call	0x1,0x25
01ac 6805       |h   |		Jump_Zero	0x1b2
01ad 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x3 = 0x1ad,0x3
01ae 4801       |H   |		Short_Literal	0x1
01af 8223       | #  |		Call	0x1,0x23
01b0 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01b1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01b2 0092 0421  |   !|		Action	Push_String_Extended,0x421					; "Cannot promote unrooted tree"
													; Debug Table 0xe.0x4 = 0x1b2,0x4
01b4 e006       |    |		Load	0x0,0x6
01b5 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01b6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01b7			TRAP_01a0:
01b7 0007       |    |		Action	Break_Optional
01b8 e007       |    |		Load	0x0,0x7								; Debug Table 0xe.0x5 = 0x1b8,0x5
01b9 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01ba 0092 0422  |   "|		Action	Push_String_Extended,0x422					; "*** Exception in Ada_Object_Editor.Promote: "
													; Debug Table 0xe.0x6 = 0x1ba,0x6
01bc e008       |    |		Load	0x0,0x8
01bd 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01be 01cc       |    |		Execute	Vector,Catenate
01bf e007       |    |		Load	0x0,0x7
01c0 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01c1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01c2 0000 0000  |    |		.BLANK	0000[0x6]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01ce       |    |		.CONST	0x01ce								; Address of begin
01c9 01df       |    |		.CONST	0x01df								; Address of exception handler
01ca 0002       |    |		.CONST	0x0002								; Number of locals
01cb			INIT_01c8:
01cb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xf = .DEBUG	0x01cb,0x078a,0x0001,0x0000,0x005a,0x85a5,0x0000,0x0097
													; Debug Table 0xf.0x0 = 0x1cb,0xffff
01cc 00db       |    |		Load_Top	At_Offset_3
01cd 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01ce			BODY_01c8:
01ce 0092 0423  |   #|		Action	Push_String_Extended,0x423					; "Ada.Demote"
													; Debug Table 0xf.0x1 = 0x1ce,0x1
01d0 e004       |    |		Load	0x0,0x4
01d1 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01d2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x2 = 0x1d2,0x2
01d3 8225       | %  |		Call	0x1,0x25
01d4 6805       |h   |		Jump_Zero	0x1da
01d5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x3 = 0x1d5,0x3
01d6 4800       |H   |		Short_Literal	0x0
01d7 8223       | #  |		Call	0x1,0x23
01d8 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01d9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01da 0092 0424  |   $|		Action	Push_String_Extended,0x424					; "Cannot demote unrooted tree"
													; Debug Table 0xf.0x4 = 0x1da,0x4
01dc e006       |    |		Load	0x0,0x6
01dd 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01de 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01df			TRAP_01c8:
01df 0007       |    |		Action	Break_Optional
01e0 e007       |    |		Load	0x0,0x7								; Debug Table 0xf.0x5 = 0x1e0,0x5
01e1 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01e2 0092 0425  |   %|		Action	Push_String_Extended,0x425					; "*** Exception in Ada_Object_Editor.Demote: "
													; Debug Table 0xf.0x6 = 0x1e2,0x6
01e4 e008       |    |		Load	0x0,0x8
01e5 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01e6 01cc       |    |		Execute	Vector,Catenate
01e7 e007       |    |		Load	0x0,0x7
01e8 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01e9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01ea 0000 0000  |    |		.BLANK	0000[0x6]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3       |    |		.CONST	0x01f3								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0001       |    |		.CONST	0x0001								; Number of locals
01f3			BODY_01f0:
01f3			INIT_01f0:
01f3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10 = .DEBUG	0x01f3,0x079a,0x0001,0x0000,0x005a,0x85a5,0x0000,0x00a1
													; Debug Table 0x10.0x0 = 0x1f3,0x1
01f4 00db       |    |		Load_Top	At_Offset_3
01f5 821e       |    |		Call	0x1,0x1e
01f6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01f7 0000       |    |		.XXX[0x1]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01ff       |    |		.CONST	0x01ff								; Address of begin
01f9 021f       |    |		.CONST	0x021f								; Address of exception handler
01fa 0003       |    |		.CONST	0x0003								; Number of locals
01fb			INIT_01f8:
01fb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x11 = .DEBUG	0x01fb,0x079e,0x0001,0x0000,0x005a,0x85a5,0x0000,0x00ab
													; Debug Table 0x11.0x0 = 0x1fb,0xffff
01fc e002       |    |		Load	0x0,0x2								; Debug Table 0x11.0x1 = 0x1fc,0xfffe
01fd 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
01fe 0322       | "  |		Declare_Variable	Record
01ff			BODY_01f8:
01ff 0007       |    |		Action	Break_Optional							; Debug Table 0x11.0x2 = 0x1ff,0x1
0200 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x3 = 0x200,0x401
0201 021d       |    |		Execute	Heap_Access,Is_Null
0202 701b       |p   |		Jump_Nonzero	0x21e							; Debug Table 0x11.0x4 = 0x202,0x1
0203 0007       |    |		Action	Break_Optional							; Debug Table 0x11.0x5 = 0x203,0x2
0204 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x6 = 0x204,0x801
0205 0217       |    |		Execute	Heap_Access,All_Reference
0206 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0207 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2					; Debug Table 0x11.0x7 = 0x207,0x2
0208 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x8 = 0x208,0x3
0209 8225       | %  |		Call	0x1,0x25
020a 6813       |h   |		Jump_Zero	0x21e
020b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x9 = 0x20b,0x4
020c 4801       |H   |		Short_Literal	0x1
020d 4800       |H   |		Short_Literal	0x0
020e e5fe       |    |		Load	0x2,-0x2
020f e002       |    |		Load	0x0,0x2
0210 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0211 e402       |    |		Load	0x2,0x2
0212 e002       |    |		Load	0x0,0x2
0213 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0214 00d1       |    |		Pop_Control	Pop_Count_1
0215 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0xa = 0x215,0x5
0216 e5ff       |    |		Load	0x2,-0x1
0217 00da       |    |		Load_Top	At_Offset_2
0218 e002       |    |		Load	0x0,0x2
0219 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
021a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0xb = 0x21a,0x6
021b e002       |    |		Load	0x0,0x2
021c 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
021d 00d1       |    |		Pop_Control	Pop_Count_1
021e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
021f			TRAP_01f8:
021f 60d8       |`   |		Indirect_Literal	Discrete,0x2f8,{0x00000000, 0x5a846501}
0220 010f       |    |		Execute	Exception,Equal
0221 7003       |p   |		Jump_Nonzero	0x225
0222 60d1       |`   |		Indirect_Literal	Discrete,0x2f4,{0x00000000, 0x5a846503}
0223 010f       |    |		Execute	Exception,Equal
0224 6801       |h   |		Jump_Zero	0x226
0225 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x11.0xc = 0x225,0x7
0226 e007       |    |		Load	0x0,0x7								; Debug Table 0x11.0xd = 0x226,0x8
0227 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0228 0092 0426  |   &|		Action	Push_String_Extended,0x426					; "*** Exception in Ada_Object_Editor.Mark_Nodes: "
													; Debug Table 0x11.0xe = 0x228,0x9
022a e008       |    |		Load	0x0,0x8
022b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
022c 01cc       |    |		Execute	Vector,Catenate
022d e007       |    |		Load	0x0,0x7
022e 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
022f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0235       | 5  |		.CONST	0x0235								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0002       |    |		.CONST	0x0002								; Number of locals
0233			INIT_0230:
0233 e214       |    |		Load	0x1,0x14							; Debug Table 0x12 = .DEBUG	0x0233,0x07be,0x0001,0x0000,0x005a,0x85a5,0x0000,0x00b9
													; Debug Table 0x12.0x0 = 0x233,0xffff
0234 0007       |    |		Action	Break_Optional
0235			BODY_0230:
0235 e214       |    |		Load	0x1,0x14							; Debug Table 0x12.0x1 = 0x235,0x1
0236 4800       |H   |		Short_Literal	0x0
0237 4802       |H   |		Short_Literal	0x2
0238 e5fc       |    |		Load	0x2,-0x4
0239 e5fd       |    |		Load	0x2,-0x3
023a e5fe       |    |		Load	0x2,-0x2
023b e5ff       |    |		Load	0x2,-0x1
023c 8227       | '  |		Call	0x1,0x27
023d 0059       | Y  |		Store_Top	Discrete,At_Offset_1
023e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x2 = 0x23e,0x2
023f 6809       |h   |		Jump_Zero	0x249
0240 0092 0427  |   '|		Action	Push_String_Extended,0x427					; "Ada_Object_Editor.Display failed - "
													; Debug Table 0x12.0x3 = 0x240,0x3
0242 00d9       |    |		Load_Top	At_Offset_1
0243 e214       |    |		Load	0x1,0x14
0244 025e       | ^  |		Execute	Discrete,Convert
0245 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0246 01cc       |    |		Execute	Vector,Catenate
0247 e006       |    |		Load	0x0,0x6
0248 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0249 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
024a 0000 0000  |    |		.BLANK	0000[0x6]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253       | S  |		.CONST	0x0253								; Address of begin
0251 0004       |    |		.CONST	0x0004								; Address of exception handler
0252 0001       |    |		.CONST	0x0001								; Number of locals
0253			BODY_0250:
0253			INIT_0250:
0253 4801       |H   |		Short_Literal	0x1							; Debug Table 0x13 = .DEBUG	0x0253,0x07c8,0x0002,0x0000,0x005a,0x8645,0x0000,0x0044
													; Debug Table 0x13.0x0 = 0x253,0x1
0254 0092 0428  |   (|		Action	Push_String_Extended,0x428					; "LIBRARY"
0256 e009       |    |		Load	0x0,0x9
0257 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0258 e00a       |    |		Load	0x0,0xa
0259 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
025a 00ca       |    |		Action	Exit_Nullary_Function
025b 0000 0000  |    |		.BLANK	0000[0x5]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0272       | r  |		.CONST	0x0272								; Address of begin
0261 02da       |    |		.CONST	0x02da								; Address of exception handler
0262 0008       |    |		.CONST	0x0008								; Number of locals
0263			INIT_0260:
0263 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x14 = .DEBUG	0x0263,0x07cc,0x0001,0x0000,0x005a,0x8645,0x0000,0x005e
													; Debug Table 0x14.0x0 = 0x263,0xffff
0264 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x14.0x1 = 0x264,0xfffe
0265 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x14.0x2 = 0x265,0xfffd
0266 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x14.0x3 = 0x266,0xfffc
0267 e003       |    |		Load	0x0,0x3								; Debug Table 0x14.0x4 = 0x267,0xfffb
0268 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0269 e005       |    |		Load	0x0,0x5								; Debug Table 0x14.0x5 = 0x269,0xfffa
026a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
026b 0322       | "  |		Declare_Variable	Record
026c 00d8       |    |		Load_Top	At_Offset_0
026d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
026e e003       |    |		Load	0x0,0x3								; Debug Table 0x14.0x6 = 0x26e,0xfff9
026f 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0270 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0271 0007       |    |		Action	Break_Optional							; Debug Table 0x14.0x7 = 0x271,0xfff8
0272			BODY_0260:
0272 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x14.0x8 = 0x272,0x1
0273 683c       |h<  |		Jump_Zero	0x2b0
0274 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0x9 = 0x274,0x2
0275 e005       |    |		Load	0x0,0x5
0276 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0277 4604       |F   |		Jump_Case	0x5
0278 7804       |x   |		Jump	0x27d								; case 0x0
0279 780b       |x   |		Jump	0x285								; case 0x1
027a 7804       |x   |		Jump	0x27f								; case 0x2
027b 7806       |x   |		Jump	0x282								; case 0x3
027c 7808       |x   |		Jump	0x285								; case 0x4
027d 6072       |`r  |		Indirect_Literal	Discrete,0x2f0,{0x00000000, 0x5a864501}		; Debug Table 0x14.0xa = 0x27d,0x3
027e 0257       | W  |		Execute	Discrete,Raise
027f 4803       |H   |		Short_Literal	0x3							; Debug Table 0x14.0xb = 0x27f,0x4
0280 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0281 7847       |xG  |		Jump	0x2c9
0282 4804       |H   |		Short_Literal	0x4							; Debug Table 0x14.0xc = 0x282,0x5
0283 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0284 7844       |xD  |		Jump	0x2c9
0285 8222       | "  |		Call	0x1,0x22							; Debug Table 0x14.0xd = 0x285,0x6
0286 6820       |h   |		Jump_Zero	0x2a7
0287 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0xe = 0x287,0x7
0288 e00b       |    |		Load	0x0,0xb
0289 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
028a 6807       |h   |		Jump_Zero	0x292
028b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0xf = 0x28b,0x8
028c 4974       |It  |		Short_Literal	0x174
028d 00eb       |    |		Load_Encached	Diana_Cache
028e 0098       |    |		Execute	Package,Field_Read_Dynamic
028f 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0290 a405       |    |		Store_Unchecked	0x2,0x5
0291 780a       |x   |		Jump	0x29c
0292 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0x10 = 0x292,0x9
0293 e005       |    |		Load	0x0,0x5
0294 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0295 a403       |    |		Store_Unchecked	0x2,0x3
0296 e403       |    |		Load	0x2,0x3								; Debug Table 0x14.0x11 = 0x296,0xa
0297 4974       |It  |		Short_Literal	0x174
0298 00eb       |    |		Load_Encached	Diana_Cache
0299 0098       |    |		Execute	Package,Field_Read_Dynamic
029a 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
029b a405       |    |		Store_Unchecked	0x2,0x5
029c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0x12 = 0x29c,0xb
029d e001       |    |		Load	0x0,0x1
029e 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
029f e405       |    |		Load	0x2,0x5
02a0 e5fe       |    |		Load	0x2,-0x2
02a1 4802       |H   |		Short_Literal	0x2
02a2 0092 0429  |   )|		Action	Push_String_Extended,0x429					; "Editor, Library, Common"
02a4 e00c       |    |		Load	0x0,0xc
02a5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02a6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02a7 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0x13 = 0x2a7,0xc
02a8 e00d       |    |		Load	0x0,0xd
02a9 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02aa 0092 042a  |   *|		Action	Push_String_Extended,0x42a					; " is already coded"
02ac 01cc       |    |		Execute	Vector,Catenate
02ad e006       |    |		Load	0x0,0x6
02ae 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
02af 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x14.0x14 = 0x2af,0xd
02b0 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0x15 = 0x2b0,0xe
02b1 e005       |    |		Load	0x0,0x5
02b2 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02b3 4604       |F   |		Jump_Case	0x5
02b4 7804       |x   |		Jump	0x2b9								; case 0x0
02b5 7803       |x   |		Jump	0x2b9								; case 0x1
02b6 7804       |x   |		Jump	0x2bb								; case 0x2
02b7 780c       |x   |		Jump	0x2c4								; case 0x3
02b8 780e       |x   |		Jump	0x2c7								; case 0x4
02b9 6036       |`6  |		Indirect_Literal	Discrete,0x2f0,{0x00000000, 0x5a864501}		; Debug Table 0x14.0x16 = 0x2b9,0xf
02ba 0257       | W  |		Execute	Discrete,Raise
02bb e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0x17 = 0x2bb,0x10
02bc e00d       |    |		Load	0x0,0xd
02bd 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02be 0092 042b  |   +|		Action	Push_String_Extended,0x42b					; " is already source"
02c0 01cc       |    |		Execute	Vector,Catenate
02c1 e006       |    |		Load	0x0,0x6
02c2 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
02c3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x14.0x18 = 0x2c3,0x11
02c4 4802       |H   |		Short_Literal	0x2							; Debug Table 0x14.0x19 = 0x2c4,0x12
02c5 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
02c6 7802       |x   |		Jump	0x2c9
02c7 4803       |H   |		Short_Literal	0x3							; Debug Table 0x14.0x1a = 0x2c7,0x13
02c8 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
02c9 e002       |    |		Load	0x0,0x2								; Debug Table 0x14.0x1b = 0x2c9,0x14
02ca 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
02cb e5fe       |    |		Load	0x2,-0x2
02cc e005       |    |		Load	0x0,0x5
02cd 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
02ce 00da       |    |		Load_Top	At_Offset_2
02cf 017d       | }  |		Execute	Record,Structure_Write
02d0 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x14.0x1c = 0x2d0,0x15
02d1 00ec       |    |		Load_Encached	Diana_Tree_Cache
02d2 4801       |H   |		Short_Literal	0x1
02d3 00db       |    |		Load_Top	At_Offset_3
02d4 e407       |    |		Load	0x2,0x7
02d5 e005       |    |		Load	0x0,0x5
02d6 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
02d7 c404       |    |		Store	0x2,0x4
02d8 c402       |    |		Store	0x2,0x2
02d9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02da			TRAP_0260:
02da 6015       |`   |		Indirect_Literal	Discrete,0x2f0,{0x00000000, 0x5a864501}
02db 010f       |    |		Execute	Exception,Equal
02dc 6807       |h   |		Jump_Zero	0x2e4
02dd e007       |    |		Load	0x0,0x7								; Debug Table 0x14.0x1d = 0x2dd,0x16
02de 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02df 0092 042c  |   ,|		Action	Push_String_Extended,0x42c					; "*** Exception in Ada_Object_Editor.Change_State: Nonexistent_Tree"
													; Debug Table 0x14.0x1e = 0x2df,0x17
02e1 e007       |    |		Load	0x0,0x7
02e2 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02e3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02e4 e007       |    |		Load	0x0,0x7								; Debug Table 0x14.0x1f = 0x2e4,0x18
02e5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02e6 0092 042d  |   -|		Action	Push_String_Extended,0x42d					; "*** Exception in Ada_Object_Editor.Change_State: "
													; Debug Table 0x14.0x20 = 0x2e6,0x19
02e8 e008       |    |		Load	0x0,0x8
02e9 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
02ea 01cc       |    |		Execute	Vector,Catenate
02eb e007       |    |		Load	0x0,0x7
02ec 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02ed 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02ee 0000 0000  |    |		.XXX[0x2]
02f0 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a864501}
02f4 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a846503}
02f8 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a846501}
02fc 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a85a502}
0300 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a85a501}
0304 0000 0000  |    |		.BLANK	0000[0x4]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b       |    |		.CONST	0x030b								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0001       |    |		.CONST	0x0001								; Number of locals
030b			BODY_0308:
030b			INIT_0308:
030b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15 = .DEBUG	0x030b,0x0810,0x0002,0x0000,0x005a,0x8645,0x0000,0x019c
													; Debug Table 0x15.0x0 = 0x30b,0x1
030c 4974       |It  |		Short_Literal	0x174
030d 00eb       |    |		Load_Encached	Diana_Cache
030e 0098       |    |		Execute	Package,Field_Read_Dynamic
030f 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0310 e00d       |    |		Load	0x0,0xd
0311 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0312 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0313 0000 0000  |    |		.BLANK	0000[0x5]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 0323       | #  |		.CONST	0x0323								; Address of begin
0319 0004       |    |		.CONST	0x0004								; Address of exception handler
031a 0003       |    |		.CONST	0x0003								; Number of locals
031b			INIT_0318:
031b e003       |    |		Load	0x0,0x3								; Debug Table 0x16 = .DEBUG	0x031b,0x0814,0x0002,0x0000,0x005a,0x8645,0x0000,0x01b9
													; Debug Table 0x16.0x0 = 0x31b,0xffff
031c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
031d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
031e 02c7       |    |		Declare_Variable	Any
031f 00d8       |    |		Load_Top	At_Offset_0
0320 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0321 e003       |    |		Load	0x0,0x3								; Debug Table 0x16.0x1 = 0x321,0xfffe
0322 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0323			BODY_0318:
0323 e003       |    |		Load	0x0,0x3								; Debug Table 0x16.0x2 = 0x323,0x1
0324 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0325 00da       |    |		Load_Top	At_Offset_2
0326 0120       |    |		Execute	Any,Is_Value
0327 6804       |h   |		Jump_Zero	0x32c
0328 e003       |    |		Load	0x0,0x3
0329 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
032a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
032b 7801       |x   |		Jump	0x32d
032c 00da       |    |		Load_Top	At_Offset_2
032d e5ff       |    |		Load	0x2,-0x1
032e e003       |    |		Load	0x0,0x3
032f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0330 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0331 c402       |    |		Store	0x2,0x2
0332 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0333 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x3 = 0x333,0x2
0334 0f00       |    |		Execute_Immediate	Equal,0x0
0335 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0336 0000 0000  |    |		.XXX[0x2]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033d       | =  |		.CONST	0x033d								; Address of begin
0339 0346       | F  |		.CONST	0x0346								; Address of exception handler
033a 0002       |    |		.CONST	0x0002								; Number of locals
033b			INIT_0338:
033b 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x17 = .DEBUG	0x033b,0x081e,0x0002,0x0000,0x005a,0x8645,0x0000,0x01ec
													; Debug Table 0x17.0x0 = 0x33b,0xffff
033c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
033d			BODY_0338:
033d 0007       |    |		Action	Break_Optional							; Debug Table 0x17.0x1 = 0x33d,0x1
033e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x17.0x2 = 0x33e,0x401
033f 0007       |    |		Action	Break_Optional
0340 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x17.0x3 = 0x340,0x402
0341 0007       |    |		Action	Break_Optional							; Debug Table 0x17.0x4 = 0x341,0x403
0342 0007       |    |		Action	Break_Optional							; Debug Table 0x17.0x5 = 0x342,0x404
0343 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1				; Debug Table 0x17.0x6 = 0x343,0x1
0344 4800       |H   |		Short_Literal	0x0							; Debug Table 0x17.0x7 = 0x344,0x2
0345 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0346			TRAP_0338:
0346 0007       |    |		Action	Break_Optional
0347 4801       |H   |		Short_Literal	0x1							; Debug Table 0x17.0x8 = 0x347,0x3
0348 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0349 0000 0000  |    |		.BLANK	0000[0x7]
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0367       | g  |		.CONST	0x0367								; Address of begin
0351 03c9       |    |		.CONST	0x03c9								; Address of exception handler
0352 0006       |    |		.CONST	0x0006								; Number of locals
0353			INIT_0350:
0353 e003       |    |		Load	0x0,0x3								; Debug Table 0x18 = .DEBUG	0x0353,0x0832,0x0001,0x0000,0x005a,0x8645,0x0000,0x0212
													; Debug Table 0x18.0x0 = 0x353,0xffff
0354 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0355 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0356 02c7       |    |		Declare_Variable	Any
0357 00d8       |    |		Load_Top	At_Offset_0
0358 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0359 e003       |    |		Load	0x0,0x3								; Debug Table 0x18.0x1 = 0x359,0xfffe
035a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
035b 02c7       |    |		Declare_Variable	Any
035c 00d8       |    |		Load_Top	At_Offset_0
035d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
035e e003       |    |		Load	0x0,0x3								; Debug Table 0x18.0x2 = 0x35e,0xfffd
035f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0360 02c7       |    |		Declare_Variable	Any
0361 00d8       |    |		Load_Top	At_Offset_0
0362 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0363 e003       |    |		Load	0x0,0x3								; Debug Table 0x18.0x3 = 0x363,0xfffc
0364 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0365 e005       |    |		Load	0x0,0x5								; Debug Table 0x18.0x4 = 0x365,0xfffb
0366 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0367			BODY_0350:
0367 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0x5 = 0x367,0x1
0368 8226       | &  |		Call	0x1,0x26
0369 7003       |p   |		Jump_Nonzero	0x36d
036a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0x6 = 0x36a,0x401
036b 021d       |    |		Execute	Heap_Access,Is_Null
036c 6803       |h   |		Jump_Zero	0x370							; Debug Table 0x18.0x7 = 0x36c,0x1
036d 4804       |H   |		Short_Literal	0x4							; Debug Table 0x18.0x8 = 0x36d,0x2
036e a5f9       |    |		Store_Unchecked	0x2,-0x7
036f 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7					; Debug Table 0x18.0x9 = 0x36f,0x3
0370 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0xa = 0x370,0x4
0371 e00b       |    |		Load	0x0,0xb
0372 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0373 683d       |h=  |		Jump_Zero	0x3b1
0374 e003       |    |		Load	0x0,0x3								; Debug Table 0x18.0xb = 0x374,0x5
0375 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0376 e402       |    |		Load	0x2,0x2
0377 0120       |    |		Execute	Any,Is_Value
0378 6804       |h   |		Jump_Zero	0x37d
0379 e003       |    |		Load	0x0,0x3
037a 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
037b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
037c 7801       |x   |		Jump	0x37e
037d e402       |    |		Load	0x2,0x2
037e e5ff       |    |		Load	0x2,-0x1
037f e003       |    |		Load	0x0,0x3
0380 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0381 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0382 c402       |    |		Store	0x2,0x2
0383 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0384 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x18.0xc = 0x384,0x6
0385 0092 042e  |   .|		Action	Push_String_Extended,0x42e					; "Ada.Get_Unit"
0387 e005       |    |		Load	0x0,0x5
0388 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0389 e402       |    |		Load	0x2,0x2								; Debug Table 0x18.0xd = 0x389,0x7
038a e003       |    |		Load	0x0,0x3
038b 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
038c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
038d c403       |    |		Store	0x2,0x3
038e e003       |    |		Load	0x0,0x3								; Debug Table 0x18.0xe = 0x38e,0x8
038f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0390 00db       |    |		Load_Top	At_Offset_3
0391 0120       |    |		Execute	Any,Is_Value
0392 6803       |h   |		Jump_Zero	0x396
0393 e003       |    |		Load	0x0,0x3
0394 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0395 7801       |x   |		Jump	0x397
0396 00db       |    |		Load_Top	At_Offset_3
0397 6070       |`p  |		Indirect_Literal	Discrete,0x408,{0x00000000, 0x00004000}
0398 e00e       |    |		Load	0x0,0xe
0399 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
039a 4800       |H   |		Short_Literal	0x0
039b e003       |    |		Load	0x0,0x3
039c 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
039d e5ff       |    |		Load	0x2,-0x1
039e e003       |    |		Load	0x0,0x3
039f 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
03a0 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03a1 c404       |    |		Store	0x2,0x4
03a2 005a       | Z  |		Store_Top	Discrete,At_Offset_2
03a3 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x18.0xf = 0x3a3,0x9
03a4 0b00       |    |		Execute_Immediate	Case_Compare,0x0
03a5 7003       |p   |		Jump_Nonzero	0x3a9
03a6 e003       |    |		Load	0x0,0x3								; Debug Table 0x18.0x10 = 0x3a6,0xb
03a7 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
03a8 c404       |    |		Store	0x2,0x4
03a9 00d1       |    |		Pop_Control	Pop_Count_1
03aa 4800       |H   |		Short_Literal	0x0							; Debug Table 0x18.0x11 = 0x3aa,0xc
03ab e5fe       |    |		Load	0x2,-0x2
03ac e404       |    |		Load	0x2,0x4
03ad e403       |    |		Load	0x2,0x3
03ae e00f       |    |		Load	0x0,0xf
03af 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
03b0 7815       |x   |		Jump	0x3c6
03b1 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x18.0x12 = 0x3b1,0xd
03b2 4602       |F   |		Jump_Case	0x3
03b3 7802       |x   |		Jump	0x3b6								; case 0x0
03b4 7809       |x   |		Jump	0x3be								; case 0x1
03b5 7800       |x   |		Jump	0x3b6								; case 0x2
03b6 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x18.0x13 = 0x3b6,0xe
03b7 6803       |h   |		Jump_Zero	0x3bb
03b8 4800       |H   |		Short_Literal	0x0							; Debug Table 0x18.0x14 = 0x3b8,0xf
03b9 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
03ba 7805       |x   |		Jump	0x3c0
03bb 4801       |H   |		Short_Literal	0x1							; Debug Table 0x18.0x15 = 0x3bb,0x10
03bc 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
03bd 7802       |x   |		Jump	0x3c0
03be 4802       |H   |		Short_Literal	0x2							; Debug Table 0x18.0x16 = 0x3be,0x11
03bf 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
03c0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x17 = 0x3c0,0x12
03c1 e5fd       |    |		Load	0x2,-0x3
03c2 e5fe       |    |		Load	0x2,-0x2
03c3 e5ff       |    |		Load	0x2,-0x1
03c4 e005       |    |		Load	0x0,0x5
03c5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03c6 4800       |H   |		Short_Literal	0x0							; Debug Table 0x18.0x18 = 0x3c6,0x13
03c7 a5f9       |    |		Store_Unchecked	0x2,-0x7
03c8 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
03c9			TRAP_0350:
03c9 672e       |g.  |		Indirect_Literal	Discrete,0x2f8,{0x00000000, 0x5a846501}
03ca 010f       |    |		Execute	Exception,Equal
03cb 6803       |h   |		Jump_Zero	0x3cf
03cc 4801       |H   |		Short_Literal	0x1							; Debug Table 0x18.0x19 = 0x3cc,0x14
03cd a5f9       |    |		Store_Unchecked	0x2,-0x7
03ce 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
03cf 6724       |g$  |		Indirect_Literal	Discrete,0x2f4,{0x00000000, 0x5a846503}
03d0 010f       |    |		Execute	Exception,Equal
03d1 6803       |h   |		Jump_Zero	0x3d5
03d2 4802       |H   |		Short_Literal	0x2							; Debug Table 0x18.0x1a = 0x3d2,0x15
03d3 a5f9       |    |		Store_Unchecked	0x2,-0x7
03d4 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
03d5 e007       |    |		Load	0x0,0x7								; Debug Table 0x18.0x1b = 0x3d5,0x16
03d6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
03d7 0092 042f  |   /|		Action	Push_String_Extended,0x42f					; "*** Exception in Ada_Object_Editor.Actual_Display: "
													; Debug Table 0x18.0x1c = 0x3d7,0x17
03d9 e008       |    |		Load	0x0,0x8
03da 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
03db 01cc       |    |		Execute	Vector,Catenate
03dc e007       |    |		Load	0x0,0x7
03dd 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
03de 4805       |H   |		Short_Literal	0x5							; Debug Table 0x18.0x1d = 0x3de,0x18
03df a5f9       |    |		Store_Unchecked	0x2,-0x7
03e0 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
03e1 0000 0000  |    |		.BLANK	0000[0x7]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb       |    |		.CONST	0x03eb								; Address of begin
03e9 03ee       |    |		.CONST	0x03ee								; Address of exception handler
03ea 0001       |    |		.CONST	0x0001								; Number of locals
03eb			BODY_03e8:
03eb			INIT_03e8:
03eb 8210       |    |		Call	0x1,0x10							; Debug Table 0x19 = .DEBUG	0x03eb,0x0870,0x0004,0x0000,0x005a,0x8645,0x0000,0x0458
													; Debug Table 0x19.0x0 = 0x3eb,0x1
03ec a402       |    |		Store_Unchecked	0x2,0x2
03ed 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03ee			TRAP_03e8:
03ee e20e       |    |		Load	0x1,0xe
03ef 010f       |    |		Execute	Exception,Equal
03f0 6803       |h   |		Jump_Zero	0x3f4
03f1 e221       | !  |		Load	0x1,0x21							; Debug Table 0x19.0x1 = 0x3f1,0x2
03f2 00cb       |    |		Action	Pop_Block_With_Result
03f3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03f4 0100       |    |		Execute	Exception,Raise
03f5 0000 0000  |    |		.XXX[0x3]
03f7 0000       |    |
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03fb       |    |		.CONST	0x03fb								; Address of begin
03f9 03fe       |    |		.CONST	0x03fe								; Address of exception handler
03fa 0001       |    |		.CONST	0x0001								; Number of locals
03fb			BODY_03f8:
03fb			INIT_03f8:
03fb 820f       |    |		Call	0x1,0xf								; Debug Table 0x1a = .DEBUG	0x03fb,0x0876,0x0004,0x0000,0x005a,0x8645,0x0000,0x0466
													; Debug Table 0x1a.0x0 = 0x3fb,0x1
03fc a403       |    |		Store_Unchecked	0x2,0x3
03fd 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03fe			TRAP_03f8:
03fe e20e       |    |		Load	0x1,0xe
03ff 010f       |    |		Execute	Exception,Equal
0400 6803       |h   |		Jump_Zero	0x404
0401 e220       |    |		Load	0x1,0x20							; Debug Table 0x1a.0x1 = 0x401,0x2
0402 00cb       |    |		Action	Pop_Block_With_Result
0403 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0404 0100       |    |		Execute	Exception,Raise
0405 0000 0000  |    |		.XXX[0x3]
0407 0000       |    |
0408 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
040c ; --------------------------------------------------------------------------------------
040c ; STRING TABLE
040c ; --------------------------------------------------------------------------------------
040c 004a       | J  |		.STRTAB	0x004a->0x0431							; "NORMAL"
040d 004e       | N  |		.STRTAB	0x004e->0x0434							; "PROMOTED"
040e 0054       | T  |		.STRTAB	0x0054->0x0438							; "DEMOTED"
040f 0059       | Y  |		.STRTAB	0x0059->0x043b							; "MUST_SELECT"
0410 0062       | b  |		.STRTAB	0x0062->0x0441							; "DONT_SELECT"
0411 006b       | k  |		.STRTAB	0x006b->0x0446							; "TRY_SELECT"
0412 0073       | s  |		.STRTAB	0x0073->0x044b							; "SUCCESSFUL"
0413 007b       | {  |		.STRTAB	0x007b->0x0450							; "LOCKED_OUT"
0414 0083       |    |		.STRTAB	0x0083->0x0455							; "ILLEGAL_ACCESS"
0415 008f       |    |		.STRTAB	0x008f->0x045c							; "CANNOT_SELECT"
0416 009a       |    |		.STRTAB	0x009a->0x0463							; "NONEXISTENT_TREE"
0417 00a8       |    |		.STRTAB	0x00a8->0x046b							; "UNKNOWN_ERROR"
0418 00b3       |    |		.STRTAB	0x00b3->0x0471							; "###Unknown###"
0419 00be       |    |		.STRTAB	0x00be->0x0478							; "###No_Selection###"
041a 00ce       |    |		.STRTAB	0x00ce->0x0481							; "Ada.Edit"
041b 00d4       |    |		.STRTAB	0x00d4->0x0485							; "Cannot edit unrooted tree"
041c 00eb       |    |		.STRTAB	0x00eb->0x0491							; "*** Exception in Ada_Object_Editor.Edit: "
041d 0112       |    |		.STRTAB	0x0112->0x04a6							; "Ada.Withdraw"
041e 011c       |    |		.STRTAB	0x011c->0x04ac							; "Cannot withdraw unrooted tree"
041f 0137       | 7  |		.STRTAB	0x0137->0x04ba							; "*** Exception in Ada_Object_Editor.Withdraw: "
0420 0162       | b  |		.STRTAB	0x0162->0x04d1							; "Ada.Promote"
0421 016b       | k  |		.STRTAB	0x016b->0x04d6							; "Cannot promote unrooted tree"
0422 0185       |    |		.STRTAB	0x0185->0x04e4							; "*** Exception in Ada_Object_Editor.Promote: "
0423 01af       |    |		.STRTAB	0x01af->0x04fa							; "Ada.Demote"
0424 01b7       |    |		.STRTAB	0x01b7->0x04ff							; "Cannot demote unrooted tree"
0425 01d0       |    |		.STRTAB	0x01d0->0x050d							; "*** Exception in Ada_Object_Editor.Demote: "
0426 01f9       |    |		.STRTAB	0x01f9->0x0522							; "*** Exception in Ada_Object_Editor.Mark_Nodes: "
0427 0226       | &  |		.STRTAB	0x0226->0x053a							; "Ada_Object_Editor.Display failed - "
0428 0247       | G  |		.STRTAB	0x0247->0x054b							; "LIBRARY"
0429 024c       | L  |		.STRTAB	0x024c->0x054f							; "Editor, Library, Common"
042a 0261       | a  |		.STRTAB	0x0261->0x055a							; " is already coded"
042b 0270       | p  |		.STRTAB	0x0270->0x0563							; " is already source"
042c 0280       |    |		.STRTAB	0x0280->0x056c							; "*** Exception in Ada_Object_Editor.Change_State: Nonexistent_Tree"
042d 02bf       |    |		.STRTAB	0x02bf->0x058c							; "*** Exception in Ada_Object_Editor.Change_State: "
042e 02ee       |    |		.STRTAB	0x02ee->0x05a5							; "Ada.Get_Unit"
042f 02f8       |    |		.STRTAB	0x02f8->0x05ab							; "*** Exception in Ada_Object_Editor.Actual_Display: "
0430 0329       | )  |		.STREND 0x0329->0x05c4
0431 4e4f 524d  |NORM|		.STRTAB_STRINGS
05c5 0000 0000  |    |		.XXX[0x3]
05c7 0000       |    |
05c8 ; --------------------------------------------------------------------------------------
05c8 ; Debug Table
05c8 ; --------------------------------------------------------------------------------------
05c8 0003 001b  |    |		.CONST	0x0003,0x001b
05ca 000b 06a2  |    |		.DEBUG	0x000b,0x06a2,0x8000,0x0000,0x005a,0x85a5,0x0000,0x0005
05d2 003e 06ce  | >  |		.DEBUG	0x003e,0x06ce,0x8000,0x0000,0x005a,0x8645,0x0000,0x001d
05da 007b 0708  | {  |		.DEBUG	0x007b,0x0708,0x0002,0x0000,0x005a,0x85a5,0x0000,0x0017
05e2 0093 071a  |    |		.DEBUG	0x0093,0x071a,0x0002,0x0000,0x005a,0x85a5,0x0000,0x001e
05ea 00ab 072c  |   ,|		.DEBUG	0x00ab,0x072c,0x0001,0x0000,0x005a,0x85a5,0x0000,0x0025
05f2 00bb 0730  |   0|		.DEBUG	0x00bb,0x0730,0x0005,0x0000,0x005a,0x85a5,0x0000,0x002f
05fa 00d3 0732  |   2|		.DEBUG	0x00d3,0x0732,0x0005,0x0000,0x005a,0x85a5,0x0000,0x0036
0602 00eb 0734  |   4|		.DEBUG	0x00eb,0x0734,0x0005,0x0000,0x005a,0x85a5,0x0000,0x003d
060a 0103 0736  |   6|		.DEBUG	0x0103,0x0736,0x0001,0x0000,0x005a,0x85a5,0x0000,0x0047
0612 0113 073a  |   :|		.DEBUG	0x0113,0x073a,0x0002,0x0000,0x005a,0x85a5,0x0000,0x005f
061a 0123 0740  | # @|		.DEBUG	0x0123,0x0740,0x0002,0x0000,0x005a,0x85a5,0x0000,0x0064
0622 014b 0756  | K V|		.DEBUG	0x014b,0x0756,0x0002,0x0000,0x005a,0x85a5,0x0000,0x006e
062a 0153 075a  | S Z|		.DEBUG	0x0153,0x075a,0x0001,0x0000,0x005a,0x85a5,0x0000,0x0079
0632 017b 076a  | { j|		.DEBUG	0x017b,0x076a,0x0001,0x0000,0x005a,0x85a5,0x0000,0x0083
063a 01a3 077a  |   z|		.DEBUG	0x01a3,0x077a,0x0001,0x0000,0x005a,0x85a5,0x0000,0x008d
0642 01cb 078a  |    |		.DEBUG	0x01cb,0x078a,0x0001,0x0000,0x005a,0x85a5,0x0000,0x0097
064a 01f3 079a  |    |		.DEBUG	0x01f3,0x079a,0x0001,0x0000,0x005a,0x85a5,0x0000,0x00a1
0652 01fb 079e  |    |		.DEBUG	0x01fb,0x079e,0x0001,0x0000,0x005a,0x85a5,0x0000,0x00ab
065a 0233 07be  | 3  |		.DEBUG	0x0233,0x07be,0x0001,0x0000,0x005a,0x85a5,0x0000,0x00b9
0662 0253 07c8  | S  |		.DEBUG	0x0253,0x07c8,0x0002,0x0000,0x005a,0x8645,0x0000,0x0044
066a 0263 07cc  | c  |		.DEBUG	0x0263,0x07cc,0x0001,0x0000,0x005a,0x8645,0x0000,0x005e
0672 030b 0810  |    |		.DEBUG	0x030b,0x0810,0x0002,0x0000,0x005a,0x8645,0x0000,0x019c
067a 031b 0814  |    |		.DEBUG	0x031b,0x0814,0x0002,0x0000,0x005a,0x8645,0x0000,0x01b9
0682 033b 081e  | ;  |		.DEBUG	0x033b,0x081e,0x0002,0x0000,0x005a,0x8645,0x0000,0x01ec
068a 0353 0832  | S 2|		.DEBUG	0x0353,0x0832,0x0001,0x0000,0x005a,0x8645,0x0000,0x0212
0692 03eb 0870  |   p|		.DEBUG	0x03eb,0x0870,0x0004,0x0000,0x005a,0x8645,0x0000,0x0458
069a 03fb 0876  |   v|		.DEBUG	0x03fb,0x0876,0x0004,0x0000,0x005a,0x8645,0x0000,0x0466
06a2 ; --------------------------------------------------------------------------------------
06a2 ; Debug3 Subtable 0x0
06a2 ; --------------------------------------------------------------------------------------
06a2 0015 0000  |    |		.DBG3TAB	0x0015,0x0000
06a4 000b ffff  |    |		.CONST	0x000b,0xffff
06a6 000c fffe  |    |		.CONST	0x000c,0xfffe
06a8 000d fffd  |    |		.CONST	0x000d,0xfffd
06aa 000e fffc  |    |		.CONST	0x000e,0xfffc
06ac 0012 fffb  |    |		.CONST	0x0012,0xfffb
06ae 0014 fffa  |    |		.CONST	0x0014,0xfffa
06b0 0016 fff9  |    |		.CONST	0x0016,0xfff9
06b2 0018 fff8  |    |		.CONST	0x0018,0xfff8
06b4 001d fff7  |    |		.CONST	0x001d,0xfff7
06b6 0022 fff6  | "  |		.CONST	0x0022,0xfff6
06b8 0027 fff5  | '  |		.CONST	0x0027,0xfff5
06ba 0029 fff4  | )  |		.CONST	0x0029,0xfff4
06bc 002b fff3  | +  |		.CONST	0x002b,0xfff3
06be 002d fff2  | -  |		.CONST	0x002d,0xfff2
06c0 002f fff1  | /  |		.CONST	0x002f,0xfff1
06c2 0031 fff0  | 1  |		.CONST	0x0031,0xfff0
06c4 0033 ffef  | 3  |		.CONST	0x0033,0xffef
06c6 0035 ffee  | 5  |		.CONST	0x0035,0xffee
06c8 0037 ffed  | 7  |		.CONST	0x0037,0xffed
06ca 0039 ffec  | 9  |		.CONST	0x0039,0xffec
06cc 003b ffeb  | ;  |		.CONST	0x003b,0xffeb
06ce ; --------------------------------------------------------------------------------------
06ce ; Debug3 Subtable 0x1
06ce ; --------------------------------------------------------------------------------------
06ce 001c 0000  |    |		.DBG3TAB	0x001c,0x0000
06d0 003e ffff  | >  |		.CONST	0x003e,0xffff
06d2 003f fffe  | ?  |		.CONST	0x003f,0xfffe
06d4 0040 fffd  | @  |		.CONST	0x0040,0xfffd
06d6 0041 fffc  | A  |		.CONST	0x0041,0xfffc
06d8 0042 fffb  | B  |		.CONST	0x0042,0xfffb
06da 0043 fffa  | C  |		.CONST	0x0043,0xfffa
06dc 0044 fff9  | D  |		.CONST	0x0044,0xfff9
06de 0046 fff8  | F  |		.CONST	0x0046,0xfff8
06e0 0048 fff7  | H  |		.CONST	0x0048,0xfff7
06e2 004a fff6  | J  |		.CONST	0x004a,0xfff6
06e4 004c fff5  | L  |		.CONST	0x004c,0xfff5
06e6 004e fff4  | N  |		.CONST	0x004e,0xfff4
06e8 0050 fff3  | P  |		.CONST	0x0050,0xfff3
06ea 0052 fff2  | R  |		.CONST	0x0052,0xfff2
06ec 0054 fff1  | T  |		.CONST	0x0054,0xfff1
06ee 0056 fff0  | V  |		.CONST	0x0056,0xfff0
06f0 0058 ffef  | X  |		.CONST	0x0058,0xffef
06f2 005a ffee  | Z  |		.CONST	0x005a,0xffee
06f4 005c ffed  | \  |		.CONST	0x005c,0xffed
06f6 005e ffec  | ^  |		.CONST	0x005e,0xffec
06f8 0060 ffeb  | `  |		.CONST	0x0060,0xffeb
06fa 0062 ffea  | b  |		.CONST	0x0062,0xffea
06fc 0064 ffe9  | d  |		.CONST	0x0064,0xffe9
06fe 0066 ffe8  | f  |		.CONST	0x0066,0xffe8
0700 0068 ffe7  | h  |		.CONST	0x0068,0xffe7
0702 006a ffe6  | j  |		.CONST	0x006a,0xffe6
0704 006c ffe5  | l  |		.CONST	0x006c,0xffe5
0706 006e ffe4  | n  |		.CONST	0x006e,0xffe4
0708 ; --------------------------------------------------------------------------------------
0708 ; Debug3 Subtable 0x2
0708 ; --------------------------------------------------------------------------------------
0708 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
070a 007b ffff  | {  |		.CONST	0x007b,0xffff
070c 007c 0001  | |  |		.CONST	0x007c,0x0001
070e 0084 0002  |    |		.CONST	0x0084,0x0002
0710 0085 0401  |    |		.CONST	0x0085,0x0401
0712 0087 0002  |    |		.CONST	0x0087,0x0002
0714 0088 0003  |    |		.CONST	0x0088,0x0003
0716 008a 0004  |    |		.CONST	0x008a,0x0004
0718 008d 0005  |    |		.CONST	0x008d,0x0005
071a ; --------------------------------------------------------------------------------------
071a ; Debug3 Subtable 0x3
071a ; --------------------------------------------------------------------------------------
071a 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
071c 0093 ffff  |    |		.CONST	0x0093,0xffff
071e 0094 0001  |    |		.CONST	0x0094,0x0001
0720 009c 0002  |    |		.CONST	0x009c,0x0002
0722 009d 0401  |    |		.CONST	0x009d,0x0401
0724 009f 0002  |    |		.CONST	0x009f,0x0002
0726 00a0 0003  |    |		.CONST	0x00a0,0x0003
0728 00a2 0004  |    |		.CONST	0x00a2,0x0004
072a 00a5 0005  |    |		.CONST	0x00a5,0x0005
072c ; --------------------------------------------------------------------------------------
072c ; Debug3 Subtable 0x4
072c ; --------------------------------------------------------------------------------------
072c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
072e 00ab 0001  |    |		.CONST	0x00ab,0x0001
0730 ; --------------------------------------------------------------------------------------
0730 ; Debug3 Subtable 0x5
0730 ; --------------------------------------------------------------------------------------
0730 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0732 ; --------------------------------------------------------------------------------------
0732 ; Debug3 Subtable 0x6
0732 ; --------------------------------------------------------------------------------------
0732 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0734 ; --------------------------------------------------------------------------------------
0734 ; Debug3 Subtable 0x7
0734 ; --------------------------------------------------------------------------------------
0734 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0736 ; --------------------------------------------------------------------------------------
0736 ; Debug3 Subtable 0x8
0736 ; --------------------------------------------------------------------------------------
0736 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0738 0103 0001  |    |		.CONST	0x0103,0x0001
073a ; --------------------------------------------------------------------------------------
073a ; Debug3 Subtable 0x9
073a ; --------------------------------------------------------------------------------------
073a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
073c 0113 0001  |    |		.CONST	0x0113,0x0001
073e 0119 0002  |    |		.CONST	0x0119,0x0002
0740 ; --------------------------------------------------------------------------------------
0740 ; Debug3 Subtable 0xa
0740 ; --------------------------------------------------------------------------------------
0740 0002 0008  |    |		.DBG3TAB	0x0002,0x0008
0742 0123 ffff  | #  |		.CONST	0x0123,0xffff
0744 0124 fffe  | $  |		.CONST	0x0124,0xfffe
0746 0129 0001  | )  |		.CONST	0x0129,0x0001
0748 012a 0002  | *  |		.CONST	0x012a,0x0002
074a 012c 0003  | ,  |		.CONST	0x012c,0x0003
074c 012d 0004  | -  |		.CONST	0x012d,0x0004
074e 0135 0005  | 5  |		.CONST	0x0135,0x0005
0750 013a 0006  | :  |		.CONST	0x013a,0x0006
0752 013c 0007  | <  |		.CONST	0x013c,0x0007
0754 0142 0008  | B  |		.CONST	0x0142,0x0008
0756 ; --------------------------------------------------------------------------------------
0756 ; Debug3 Subtable 0xb
0756 ; --------------------------------------------------------------------------------------
0756 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0758 014b 0001  | K  |		.CONST	0x014b,0x0001
075a ; --------------------------------------------------------------------------------------
075a ; Debug3 Subtable 0xc
075a ; --------------------------------------------------------------------------------------
075a 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
075c 0153 ffff  | S  |		.CONST	0x0153,0xffff
075e 0156 0001  | V  |		.CONST	0x0156,0x0001
0760 015a 0002  | Z  |		.CONST	0x015a,0x0002
0762 015d 0003  | ]  |		.CONST	0x015d,0x0003
0764 0168 0004  | h  |		.CONST	0x0168,0x0004
0766 016e 0005  | n  |		.CONST	0x016e,0x0005
0768 0170 0006  | p  |		.CONST	0x0170,0x0006
076a ; --------------------------------------------------------------------------------------
076a ; Debug3 Subtable 0xd
076a ; --------------------------------------------------------------------------------------
076a 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
076c 017b ffff  | {  |		.CONST	0x017b,0xffff
076e 017e 0001  | ~  |		.CONST	0x017e,0x0001
0770 0182 0002  |    |		.CONST	0x0182,0x0002
0772 0185 0003  |    |		.CONST	0x0185,0x0003
0774 0190 0004  |    |		.CONST	0x0190,0x0004
0776 0196 0005  |    |		.CONST	0x0196,0x0005
0778 0198 0006  |    |		.CONST	0x0198,0x0006
077a ; --------------------------------------------------------------------------------------
077a ; Debug3 Subtable 0xe
077a ; --------------------------------------------------------------------------------------
077a 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
077c 01a3 ffff  |    |		.CONST	0x01a3,0xffff
077e 01a6 0001  |    |		.CONST	0x01a6,0x0001
0780 01aa 0002  |    |		.CONST	0x01aa,0x0002
0782 01ad 0003  |    |		.CONST	0x01ad,0x0003
0784 01b2 0004  |    |		.CONST	0x01b2,0x0004
0786 01b8 0005  |    |		.CONST	0x01b8,0x0005
0788 01ba 0006  |    |		.CONST	0x01ba,0x0006
078a ; --------------------------------------------------------------------------------------
078a ; Debug3 Subtable 0xf
078a ; --------------------------------------------------------------------------------------
078a 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
078c 01cb ffff  |    |		.CONST	0x01cb,0xffff
078e 01ce 0001  |    |		.CONST	0x01ce,0x0001
0790 01d2 0002  |    |		.CONST	0x01d2,0x0002
0792 01d5 0003  |    |		.CONST	0x01d5,0x0003
0794 01da 0004  |    |		.CONST	0x01da,0x0004
0796 01e0 0005  |    |		.CONST	0x01e0,0x0005
0798 01e2 0006  |    |		.CONST	0x01e2,0x0006
079a ; --------------------------------------------------------------------------------------
079a ; Debug3 Subtable 0x10
079a ; --------------------------------------------------------------------------------------
079a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
079c 01f3 0001  |    |		.CONST	0x01f3,0x0001
079e ; --------------------------------------------------------------------------------------
079e ; Debug3 Subtable 0x11
079e ; --------------------------------------------------------------------------------------
079e 0002 000d  |    |		.DBG3TAB	0x0002,0x000d
07a0 01fb ffff  |    |		.CONST	0x01fb,0xffff
07a2 01fc fffe  |    |		.CONST	0x01fc,0xfffe
07a4 01ff 0001  |    |		.CONST	0x01ff,0x0001
07a6 0200 0401  |    |		.CONST	0x0200,0x0401
07a8 0202 0001  |    |		.CONST	0x0202,0x0001
07aa 0203 0002  |    |		.CONST	0x0203,0x0002
07ac 0204 0801  |    |		.CONST	0x0204,0x0801
07ae 0207 0002  |    |		.CONST	0x0207,0x0002
07b0 0208 0003  |    |		.CONST	0x0208,0x0003
07b2 020b 0004  |    |		.CONST	0x020b,0x0004
07b4 0215 0005  |    |		.CONST	0x0215,0x0005
07b6 021a 0006  |    |		.CONST	0x021a,0x0006
07b8 0225 0007  | %  |		.CONST	0x0225,0x0007
07ba 0226 0008  | &  |		.CONST	0x0226,0x0008
07bc 0228 0009  | (  |		.CONST	0x0228,0x0009
07be ; --------------------------------------------------------------------------------------
07be ; Debug3 Subtable 0x12
07be ; --------------------------------------------------------------------------------------
07be 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
07c0 0233 ffff  | 3  |		.CONST	0x0233,0xffff
07c2 0235 0001  | 5  |		.CONST	0x0235,0x0001
07c4 023e 0002  | >  |		.CONST	0x023e,0x0002
07c6 0240 0003  | @  |		.CONST	0x0240,0x0003
07c8 ; --------------------------------------------------------------------------------------
07c8 ; Debug3 Subtable 0x13
07c8 ; --------------------------------------------------------------------------------------
07c8 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
07ca 0253 0001  | S  |		.CONST	0x0253,0x0001
07cc ; --------------------------------------------------------------------------------------
07cc ; Debug3 Subtable 0x14
07cc ; --------------------------------------------------------------------------------------
07cc 0008 0019  |    |		.DBG3TAB	0x0008,0x0019
07ce 0263 ffff  | c  |		.CONST	0x0263,0xffff
07d0 0264 fffe  | d  |		.CONST	0x0264,0xfffe
07d2 0265 fffd  | e  |		.CONST	0x0265,0xfffd
07d4 0266 fffc  | f  |		.CONST	0x0266,0xfffc
07d6 0267 fffb  | g  |		.CONST	0x0267,0xfffb
07d8 0269 fffa  | i  |		.CONST	0x0269,0xfffa
07da 026e fff9  | n  |		.CONST	0x026e,0xfff9
07dc 0271 fff8  | q  |		.CONST	0x0271,0xfff8
07de 0272 0001  | r  |		.CONST	0x0272,0x0001
07e0 0274 0002  | t  |		.CONST	0x0274,0x0002
07e2 027d 0003  | }  |		.CONST	0x027d,0x0003
07e4 027f 0004  |    |		.CONST	0x027f,0x0004
07e6 0282 0005  |    |		.CONST	0x0282,0x0005
07e8 0285 0006  |    |		.CONST	0x0285,0x0006
07ea 0287 0007  |    |		.CONST	0x0287,0x0007
07ec 028b 0008  |    |		.CONST	0x028b,0x0008
07ee 0292 0009  |    |		.CONST	0x0292,0x0009
07f0 0296 000a  |    |		.CONST	0x0296,0x000a
07f2 029c 000b  |    |		.CONST	0x029c,0x000b
07f4 02a7 000c  |    |		.CONST	0x02a7,0x000c
07f6 02af 000d  |    |		.CONST	0x02af,0x000d
07f8 02b0 000e  |    |		.CONST	0x02b0,0x000e
07fa 02b9 000f  |    |		.CONST	0x02b9,0x000f
07fc 02bb 0010  |    |		.CONST	0x02bb,0x0010
07fe 02c3 0011  |    |		.CONST	0x02c3,0x0011
0800 02c4 0012  |    |		.CONST	0x02c4,0x0012
0802 02c7 0013  |    |		.CONST	0x02c7,0x0013
0804 02c9 0014  |    |		.CONST	0x02c9,0x0014
0806 02d0 0015  |    |		.CONST	0x02d0,0x0015
0808 02dd 0016  |    |		.CONST	0x02dd,0x0016
080a 02df 0017  |    |		.CONST	0x02df,0x0017
080c 02e4 0018  |    |		.CONST	0x02e4,0x0018
080e 02e6 0019  |    |		.CONST	0x02e6,0x0019
0810 ; --------------------------------------------------------------------------------------
0810 ; Debug3 Subtable 0x15
0810 ; --------------------------------------------------------------------------------------
0810 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0812 030b 0001  |    |		.CONST	0x030b,0x0001
0814 ; --------------------------------------------------------------------------------------
0814 ; Debug3 Subtable 0x16
0814 ; --------------------------------------------------------------------------------------
0814 0002 0002  |    |		.DBG3TAB	0x0002,0x0002
0816 031b ffff  |    |		.CONST	0x031b,0xffff
0818 0321 fffe  | !  |		.CONST	0x0321,0xfffe
081a 0323 0001  | #  |		.CONST	0x0323,0x0001
081c 0333 0002  | 3  |		.CONST	0x0333,0x0002
081e ; --------------------------------------------------------------------------------------
081e ; Debug3 Subtable 0x17
081e ; --------------------------------------------------------------------------------------
081e 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
0820 033b ffff  | ;  |		.CONST	0x033b,0xffff
0822 033d 0001  | =  |		.CONST	0x033d,0x0001
0824 033e 0401  | >  |		.CONST	0x033e,0x0401
0826 0340 0402  | @  |		.CONST	0x0340,0x0402
0828 0341 0403  | A  |		.CONST	0x0341,0x0403
082a 0342 0404  | B  |		.CONST	0x0342,0x0404
082c 0343 0001  | C  |		.CONST	0x0343,0x0001
082e 0344 0002  | D  |		.CONST	0x0344,0x0002
0830 0347 0003  | G  |		.CONST	0x0347,0x0003
0832 ; --------------------------------------------------------------------------------------
0832 ; Debug3 Subtable 0x18
0832 ; --------------------------------------------------------------------------------------
0832 0005 0019  |    |		.DBG3TAB	0x0005,0x0019
0834 0353 ffff  | S  |		.CONST	0x0353,0xffff
0836 0359 fffe  | Y  |		.CONST	0x0359,0xfffe
0838 035e fffd  | ^  |		.CONST	0x035e,0xfffd
083a 0363 fffc  | c  |		.CONST	0x0363,0xfffc
083c 0365 fffb  | e  |		.CONST	0x0365,0xfffb
083e 0367 0001  | g  |		.CONST	0x0367,0x0001
0840 036a 0401  | j  |		.CONST	0x036a,0x0401
0842 036c 0001  | l  |		.CONST	0x036c,0x0001
0844 036d 0002  | m  |		.CONST	0x036d,0x0002
0846 036f 0003  | o  |		.CONST	0x036f,0x0003
0848 0370 0004  | p  |		.CONST	0x0370,0x0004
084a 0374 0005  | t  |		.CONST	0x0374,0x0005
084c 0384 0006  |    |		.CONST	0x0384,0x0006
084e 0389 0007  |    |		.CONST	0x0389,0x0007
0850 038e 0008  |    |		.CONST	0x038e,0x0008
0852 03a3 0009  |    |		.CONST	0x03a3,0x0009
0854 03a6 000b  |    |		.CONST	0x03a6,0x000b
0856 03aa 000c  |    |		.CONST	0x03aa,0x000c
0858 03b1 000d  |    |		.CONST	0x03b1,0x000d
085a 03b6 000e  |    |		.CONST	0x03b6,0x000e
085c 03b8 000f  |    |		.CONST	0x03b8,0x000f
085e 03bb 0010  |    |		.CONST	0x03bb,0x0010
0860 03be 0011  |    |		.CONST	0x03be,0x0011
0862 03c0 0012  |    |		.CONST	0x03c0,0x0012
0864 03c6 0013  |    |		.CONST	0x03c6,0x0013
0866 03cc 0014  |    |		.CONST	0x03cc,0x0014
0868 03d2 0015  |    |		.CONST	0x03d2,0x0015
086a 03d5 0016  |    |		.CONST	0x03d5,0x0016
086c 03d7 0017  |    |		.CONST	0x03d7,0x0017
086e 03de 0018  |    |		.CONST	0x03de,0x0018
0870 ; --------------------------------------------------------------------------------------
0870 ; Debug3 Subtable 0x19
0870 ; --------------------------------------------------------------------------------------
0870 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0872 03eb 0001  |    |		.CONST	0x03eb,0x0001
0874 03f1 0002  |    |		.CONST	0x03f1,0x0002
0876 ; --------------------------------------------------------------------------------------
0876 ; Debug3 Subtable 0x1a
0876 ; --------------------------------------------------------------------------------------
0876 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0878 03fb 0001  |    |		.CONST	0x03fb,0x0001
087a 0401 0002  |    |		.CONST	0x0401,0x0002
087c 0000 0000  |    |		.BLANK	0000[0x184]