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

⟦e8446fa51⟧

    Length: 6144 (0x1800)
    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 06f0       |    |		.CONST	0x06f0								; 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 0005       |    |		.CONST	0x0005								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0094       |    |		.CONST	0x0094								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0025       | %  |		.CONST	0x0025								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x07da,0x8000,0x0000,0x0057,0x4575,0x0000,0x000f
													; 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 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x3 = 0xe,0xfffc
000f 4803       |H   |		Short_Literal	0x3
0010 029f 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Call
0012 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0013 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x4 = 0x13,0xfffb
0014 4801       |H   |		Short_Literal	0x1
0015 e001       |    |		Load	0x0,0x1
0016 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0017 4801       |H   |		Short_Literal	0x1
0018 00e5       |    |		Load_Encached	Long_Integer_Cache
0019 029f 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Call
001b 4802       |H   |		Short_Literal	0x2
001c 4800       |H   |		Short_Literal	0x0
001d 4802       |H   |		Short_Literal	0x2
001e 4800       |H   |		Short_Literal	0x0
001f 4801       |H   |		Short_Literal	0x1
0020 031e       |    |		Declare_Type	Variant_Record,Defined,Visible
0021 029a 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x21,0xfffa
0023 4804       |H   |		Short_Literal	0x4							; Debug Table 0x0.0x6 = 0x23,0xfff9
0024 032b       | +  |		Declare_Type	Record,Incomplete,Visible
0025 00c4       |    |		Action	Make_Default							; Debug Table 0x0.0x7 = 0x25,0xfff8
0026 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x26,0xfff7
0028 029a 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x28,0xfff6
002a e002       |    |		Load	0x0,0x2								; Debug Table 0x0.0xa = 0x2a,0xfff5
002b 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
002c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
002d e002       |    |		Load	0x0,0x2
002e 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
002f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0030 e003       |    |		Load	0x0,0x3
0031 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0032 e004       |    |		Load	0x0,0x4
0033 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0034 029f 020b  |    |		Declare_Subprogram	INIT_0208,For_Call
0036 e210       |    |		Load	0x1,0x10
0037 0326       | &  |		Complete_Type	Record,By_Defining
0038 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x0.0xb = 0x38,0xfff4
0039 0322       | "  |		Declare_Variable	Record
003a e002       |    |		Load	0x0,0x2
003b 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
003c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
003d 00d9       |    |		Load_Top	At_Offset_1
003e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
003f e002       |    |		Load	0x0,0x2
0040 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0041 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0042 00d9       |    |		Load_Top	At_Offset_1
0043 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0044 e003       |    |		Load	0x0,0x3
0045 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0046 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0047 e003       |    |		Load	0x0,0x3
0048 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0049 0119       |    |		Execute	Any,Check_In_Formal_Type
004a 00d9       |    |		Load_Top	At_Offset_1
004b 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
004c e004       |    |		Load	0x0,0x4
004d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
004e e005       |    |		Load	0x0,0x5
004f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0050 0119       |    |		Execute	Any,Check_In_Formal_Type
0051 00d9       |    |		Load_Top	At_Offset_1
0052 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0053 0129       | )  |		Execute	Any,Make_Visible
0054 c211       |    |		Store	0x1,0x11
0055 00bf       |    |		Action	Accept_Activation
0056 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0056,0x07f4,0x8000,0x0000,0x0057,0x45e5,0x0000,0x001d
													; Debug Table 0x1.0x0 = 0x56,0xffff
0057 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x57,0xfffe
0058 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x58,0xfffd
0059 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x59,0xfffc
005a 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x4 = 0x5a,0xfffb
005b e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x5 = 0x5b,0xfffa
005c 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
005d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
005e e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x6 = 0x5e,0xfff9
005f 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0060 e004       |    |		Load	0x0,0x4								; Debug Table 0x1.0x7 = 0x60,0xfff8
0061 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0062 e004       |    |		Load	0x0,0x4
0063 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0064 011e       |    |		Execute	Any,Convert
0065 e006       |    |		Load	0x0,0x6								; Debug Table 0x1.0x8 = 0x65,0xfff7
0066 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0067 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x1.0x9 = 0x67,0xfff6
0068 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0xa = 0x68,0xfff5
0069 6262       |bb  |		Indirect_Literal	Discrete,0x2cc,{0x004d040e, 0x000053b0}
006a 02a0       |    |		Declare_Subprogram	Null_Subprogram
006b 037d       | }  |		Declare_Type	Task,Defined
006c 036f       | o  |		Declare_Variable	Task
006d 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0xb = 0x6d,0xfff4
006e 00c7       |    |		Action	Elaborate_Subprogram
006f 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0xc = 0x6f,0xfff3
0070 00c7       |    |		Action	Elaborate_Subprogram
0071 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0xd = 0x71,0xfff2
0072 00c7       |    |		Action	Elaborate_Subprogram
0073 029d 022b  |   +|		Declare_Subprogram	INIT_0228,For_Outer_Call			; Debug Table 0x1.0xe = 0x73,0xfff1
0075 029d 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call			; Debug Table 0x1.0xf = 0x75,0xfff0
0077 029d 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call			; Debug Table 0x1.0x10 = 0x77,0xffef
0079 029d 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call			; Debug Table 0x1.0x11 = 0x79,0xffee
007b 029d 0303  |    |		Declare_Subprogram	INIT_0300,For_Outer_Call			; Debug Table 0x1.0x12 = 0x7b,0xffed
007d 029d 0333  |   3|		Declare_Subprogram	INIT_0330,For_Outer_Call			; Debug Table 0x1.0x13 = 0x7d,0xffec
007f 029d 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call			; Debug Table 0x1.0x14 = 0x7f,0xffeb
0081 029d 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Outer_Call			; Debug Table 0x1.0x15 = 0x81,0xffea
0083 029d 03e3  |    |		Declare_Subprogram	INIT_03e0,For_Outer_Call			; Debug Table 0x1.0x16 = 0x83,0xffe9
0085 029d 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Outer_Call			; Debug Table 0x1.0x17 = 0x85,0xffe8
0087 029d 0433  |   3|		Declare_Subprogram	INIT_0430,For_Outer_Call			; Debug Table 0x1.0x18 = 0x87,0xffe7
0089 029d 046b  |   k|		Declare_Subprogram	INIT_0468,For_Outer_Call			; Debug Table 0x1.0x19 = 0x89,0xffe6
008b 00b6       |    |		Action	Make_Scope							; Debug Table 0x1.0x1a = 0x8b,0xffe5
008c e001       |    |		Load	0x0,0x1
008d e004       |    |		Load	0x0,0x4
008e 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
008f 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0090 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
0091 4806       |H   |		Short_Literal	0x6
0092 e219       |    |		Load	0x1,0x19
0093 020e       |    |		Execute	Module,Augment_Imports
0094			BODY_0008:
0094 00be       |    |		Action	Activate_Tasks
0095 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x1.0x1b = 0x95,0x1
0096 48e2       |H   |		Short_Literal	0xe2
0097 e007       |    |		Load	0x0,0x7
0098 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0099 c218       |    |		Store	0x1,0x18
009a 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x1.0x1c = 0x9a,0x2
009b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x1d = 0x9b,0xfbff
009c 4800       |H   |		Short_Literal	0x0
009d e008       |    |		Load	0x0,0x8
009e 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
009f 03f8       |    |		Declare_Type	Discrete,Constrained
00a0 e008       |    |		Load	0x0,0x8								; Debug Table 0x1.0x1e = 0xa0,0x401
00a1 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
00a2 e008       |    |		Load	0x0,0x8
00a3 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
00a4 4800       |H   |		Short_Literal	0x0
00a5 e008       |    |		Load	0x0,0x8
00a6 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
00a7 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00a8 c217       |    |		Store	0x1,0x17
00a9 0059       | Y  |		Store_Top	Discrete,At_Offset_1
00aa 00d1       |    |		Pop_Control	Pop_Count_1
00ab 00ce       |    |		Action	Pop_Auxiliary
00ac 00bc       |    |		Action	Signal_Activated
00ad 00bb       |    |		Action	Signal_Completion
00ae 0000 0000  |    |		.XXX[0x2]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3       |    |		.CONST	0x00b3								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0001       |    |		.CONST	0x0001								; Number of locals
00b3			BODY_00b0:
00b3			INIT_00b0:
00b3 4603       |F   |		Jump_Case	0x4							; Debug Table 0x2 = .DEBUG	0x00b3,0x0834,0x0005,0x0000,0x0057,0x4575,0x0000,0x0023
00b4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00b5 7802       |x   |		Jump	0xb8								; case 0x1
00b6 7805       |x   |		Jump	0xbc								; case 0x2
00b7 7809       |x   |		Jump	0xc1								; case 0x3
00b8 00da       |    |		Load_Top	At_Offset_2
00b9 0091 0625  |   %|		Action	Push_String_Extended_Indexed,0x625				; "SUCCESS"
00bb 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00bc 00db       |    |		Load_Top	At_Offset_3
00bd 00db       |    |		Load_Top	At_Offset_3
00be 00e0       |    |		Load_Encached	Standard_Cache
00bf 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00c0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00c1 00da       |    |		Load_Top	At_Offset_2
00c2 00e0       |    |		Load_Encached	Standard_Cache
00c3 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00c4 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00c5 0000 0000  |    |		.XXX[0x3]
00c7 0000       |    |
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb       |    |		.CONST	0x00cb								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0001       |    |		.CONST	0x0001								; Number of locals
00cb			BODY_00c8:
00cb			INIT_00c8:
00cb 4608       |F   |		Jump_Case	0x9							; Debug Table 0x3 = .DEBUG	0x00cb,0x0836,0x0005,0x0000,0x0057,0x4575,0x0000,0x002b
00cc 7808       |x   |		Jump	0xd5								; case 0x0
00cd 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
00ce 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
00cf 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
00d0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
00d1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
00d2 781b       |x   |		Jump	0xee								; case 0x6
00d3 7826       |x&  |		Jump	0xfa								; case 0x7
00d4 7834       |x4  |		Jump	0x109								; case 0x8
00d5 00da       |    |		Load_Top	At_Offset_2
00d6 016c       | l  |		Execute	Variant_Record,Is_Constrained
00d7 7009       |p   |		Jump_Nonzero	0xe1
00d8 00cf       |    |		Action	Mark_Auxiliary
00d9 4803       |H   |		Short_Literal	0x3
00da e5ff       |    |		Load	0x2,-0x1
00db 1c08       |    |		Execute_Immediate	Run_Utility,0x8
00dc 00d8       |    |		Load_Top	At_Offset_0
00dd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00de c5ff       |    |		Store	0x2,-0x1
00df 00ce       |    |		Action	Pop_Auxiliary
00e0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
00e1 00da       |    |		Load_Top	At_Offset_2
00e2 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00e3 4603       |F   |		Jump_Case	0x4
00e4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00e5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
00e6 7801       |x   |		Jump	0xe8								; case 0x2
00e7 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
00e8 00da       |    |		Load_Top	At_Offset_2
00e9 2202       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x2
00ea 00da       |    |		Load_Top	At_Offset_2
00eb 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
00ec 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00ed 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
00ee 00db       |    |		Load_Top	At_Offset_3
00ef 4603       |F   |		Jump_Case	0x4
00f0 7807       |x   |		Jump	0xf8								; case 0x0
00f1 7804       |x   |		Jump	0xf6								; case 0x1
00f2 7801       |x   |		Jump	0xf4								; case 0x2
00f3 7804       |x   |		Jump	0xf8								; case 0x3
00f4 4801       |H   |		Short_Literal	0x1
00f5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00f6 4802       |H   |		Short_Literal	0x2
00f7 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00f8 48ff       |H   |		Short_Literal	0xff
00f9 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00fa 00db       |    |		Load_Top	At_Offset_3
00fb e5fe       |    |		Load	0x2,-0x2
00fc 4603       |F   |		Jump_Case	0x4
00fd 7807       |x   |		Jump	0x105								; case 0x0
00fe 7804       |x   |		Jump	0x103								; case 0x1
00ff 7801       |x   |		Jump	0x101								; case 0x2
0100 7804       |x   |		Jump	0x105								; case 0x3
0101 4801       |H   |		Short_Literal	0x1
0102 7803       |x   |		Jump	0x106
0103 4802       |H   |		Short_Literal	0x2
0104 7801       |x   |		Jump	0x106
0105 48ff       |H   |		Short_Literal	0xff
0106 e5ff       |    |		Load	0x2,-0x1
0107 031b       |    |		Declare_Type	Variant_Record,Constrained
0108 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0109 00db       |    |		Load_Top	At_Offset_3
010a e5fe       |    |		Load	0x2,-0x2
010b e5ff       |    |		Load	0x2,-0x1
010c 1c06       |    |		Execute_Immediate	Run_Utility,0x6
010d e5ff       |    |		Load	0x2,-0x1
010e 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
010f 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 011b       |    |		.CONST	0x011b								; Address of begin
0111 0004       |    |		.CONST	0x0004								; Address of exception handler
0112 0003       |    |		.CONST	0x0003								; Number of locals
0113			INIT_0110:
0113 e210       |    |		Load	0x1,0x10							; Debug Table 0x4 = .DEBUG	0x0113,0x0838,0x0001,0x0000,0x0057,0x4575,0x0000,0x0051
													; Debug Table 0x4.0x0 = 0x113,0xffff
0114 0322       | "  |		Declare_Variable	Record
0115 00d8       |    |		Load_Top	At_Offset_0
0116 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0117 e20e       |    |		Load	0x1,0xe								; Debug Table 0x4.0x1 = 0x117,0xfffe
0118 02ff       |    |		Declare_Variable	Variant_Record
0119 00d8       |    |		Load_Top	At_Offset_0
011a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
011b			BODY_0110:
011b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x2 = 0x11b,0x1
011c 00da       |    |		Load_Top	At_Offset_2
011d e5fe       |    |		Load	0x2,-0x2
011e e5ff       |    |		Load	0x2,-0x1
011f 8212       |    |		Call	0x1,0x12
0120 00d2       |    |		Pop_Control	Pop_Count_2
0121 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x3 = 0x121,0x2
0122 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0123 6804       |h   |		Jump_Zero	0x128
0124 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x4 = 0x124,0x3
0125 e5fd       |    |		Load	0x2,-0x3
0126 016d       | m  |		Execute	Variant_Record,Structure_Write
0127 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0128 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x4.0x5 = 0x128,0x4
0129 00da       |    |		Load_Top	At_Offset_2
012a 8213       |    |		Call	0x1,0x13
012b 00d2       |    |		Pop_Control	Pop_Count_2
012c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
012d 0000 0000  |    |		.XXX[0x3]
012f 0000       |    |
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 013e       | >  |		.CONST	0x013e								; Address of begin
0131 01b9       |    |		.CONST	0x01b9								; Address of exception handler
0132 0005       |    |		.CONST	0x0005								; Number of locals
0133			INIT_0130:
0133 e001       |    |		Load	0x0,0x1								; Debug Table 0x5 = .DEBUG	0x0133,0x0846,0x0001,0x0000,0x0057,0x4575,0x0000,0x006c
													; Debug Table 0x5.0x0 = 0x133,0xffff
0134 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0135 02c7       |    |		Declare_Variable	Any
0136 00d8       |    |		Load_Top	At_Offset_0
0137 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0138 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x5.0x1 = 0x138,0xfffe
0139 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x5.0x2 = 0x139,0xfffd
013a e210       |    |		Load	0x1,0x10							; Debug Table 0x5.0x3 = 0x13a,0xfffc
013b 0322       | "  |		Declare_Variable	Record
013c 00d8       |    |		Load_Top	At_Offset_0
013d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
013e			BODY_0130:
013e e009       |    |		Load	0x0,0x9								; Debug Table 0x5.0x4 = 0x13e,0x1
013f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0140 e00a       |    |		Load	0x0,0xa
0141 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0142 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0143 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x5.0x5 = 0x143,0x2
0144 e402       |    |		Load	0x2,0x2
0145 0120       |    |		Execute	Any,Is_Value
0146 6803       |h   |		Jump_Zero	0x14a
0147 e001       |    |		Load	0x0,0x1
0148 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0149 7801       |x   |		Jump	0x14b
014a e402       |    |		Load	0x2,0x2
014b 00da       |    |		Load_Top	At_Offset_2
014c e00b       |    |		Load	0x0,0xb
014d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
014e e004       |    |		Load	0x0,0x4
014f 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0150 e404       |    |		Load	0x2,0x4
0151 e5ff       |    |		Load	0x2,-0x1
0152 4806       |H   |		Short_Literal	0x6
0153 e219       |    |		Load	0x1,0x19
0154 170d       |    |		Execute	Task,Entry_Call,Field_Number 0xd
0155 00d1       |    |		Pop_Control	Pop_Count_1
0156 c402       |    |		Store	0x2,0x2
0157 005b       | [  |		Store_Top	Discrete,At_Offset_3
0158 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x6 = 0x158,0x3
0159 7011       |p   |		Jump_Nonzero	0x16b
015a 4802       |H   |		Short_Literal	0x2							; Debug Table 0x5.0x7 = 0x15a,0x4
015b e20e       |    |		Load	0x1,0xe
015c 1c08       |    |		Execute_Immediate	Run_Utility,0x8
015d e402       |    |		Load	0x2,0x2
015e e001       |    |		Load	0x0,0x1
015f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0160 0119       |    |		Execute	Any,Check_In_Formal_Type
0161 00d9       |    |		Load_Top	At_Offset_1
0162 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0163 e5fc       |    |		Load	0x2,-0x4
0164 016d       | m  |		Execute	Variant_Record,Structure_Write
0165 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x8 = 0x165,0x5
0166 4801       |H   |		Short_Literal	0x1
0167 e219       |    |		Load	0x1,0x19
0168 170e       |    |		Execute	Task,Entry_Call,Field_Number 0xe
0169 00d1       |    |		Pop_Control	Pop_Count_1
016a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
016b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x5.0x9 = 0x16b,0x6
016c e402       |    |		Load	0x2,0x2
016d 0120       |    |		Execute	Any,Is_Value
016e 6804       |h   |		Jump_Zero	0x173
016f e002       |    |		Load	0x0,0x2
0170 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0171 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0172 7804       |x   |		Jump	0x177
0173 e402       |    |		Load	0x2,0x2
0174 e001       |    |		Load	0x0,0x1
0175 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0176 011e       |    |		Execute	Any,Convert
0177 e5fe       |    |		Load	0x2,-0x2
0178 e404       |    |		Load	0x2,0x4
0179 e405       |    |		Load	0x2,0x5
017a 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
017b e405       |    |		Load	0x2,0x5
017c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
017d e405       |    |		Load	0x2,0x5
017e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
017f e405       |    |		Load	0x2,0x5
0180 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0181 e003       |    |		Load	0x0,0x3
0182 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0183 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0184 00eb       |    |		Load_Encached	Diana_Cache
0185 18e9       |    |		Execute	Package,Field_Execute,Field_Number 0xe9
0186 e00c       |    |		Load	0x0,0xc
0187 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0188 e002       |    |		Load	0x0,0x2
0189 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
018a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
018b e001       |    |		Load	0x0,0x1
018c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
018d 011e       |    |		Execute	Any,Convert
018e c402       |    |		Store	0x2,0x2
018f 005b       | [  |		Store_Top	Discrete,At_Offset_3
0190 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0xa = 0x190,0x7
0191 7008       |p   |		Jump_Nonzero	0x19a
0192 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0xb = 0x192,0x8
0193 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0194 4801       |H   |		Short_Literal	0x1
0195 4800       |H   |		Short_Literal	0x0
0196 e004       |    |		Load	0x0,0x4
0197 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0198 00d9       |    |		Load_Top	At_Offset_1
0199 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
019a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0xc = 0x19a,0x9
019b 7014       |p   |		Jump_Nonzero	0x1b0
019c 4802       |H   |		Short_Literal	0x2							; Debug Table 0x5.0xd = 0x19c,0xa
019d e20e       |    |		Load	0x1,0xe
019e 1c08       |    |		Execute_Immediate	Run_Utility,0x8
019f e402       |    |		Load	0x2,0x2
01a0 e001       |    |		Load	0x0,0x1
01a1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01a2 0119       |    |		Execute	Any,Check_In_Formal_Type
01a3 00d9       |    |		Load_Top	At_Offset_1
01a4 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
01a5 e5fc       |    |		Load	0x2,-0x4
01a6 016d       | m  |		Execute	Variant_Record,Structure_Write
01a7 e211       |    |		Load	0x1,0x11							; Debug Table 0x5.0xe = 0x1a7,0xb
01a8 e5fd       |    |		Load	0x2,-0x3
01a9 017d       | }  |		Execute	Record,Structure_Write
01aa 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0xf = 0x1aa,0xc
01ab 4801       |H   |		Short_Literal	0x1
01ac e219       |    |		Load	0x1,0x19
01ad 170e       |    |		Execute	Task,Entry_Call,Field_Number 0xe
01ae 00d1       |    |		Pop_Control	Pop_Count_1
01af 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01b0 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x10 = 0x1b0,0xd
01b1 e20e       |    |		Load	0x1,0xe
01b2 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01b3 e5fc       |    |		Load	0x2,-0x4
01b4 016d       | m  |		Execute	Variant_Record,Structure_Write
01b5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x11 = 0x1b5,0xe
01b6 e5fd       |    |		Load	0x2,-0x3
01b7 017d       | }  |		Execute	Record,Structure_Write
01b8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01b9			TRAP_0130:
01b9 0007       |    |		Action	Break_Optional
01ba 4803       |H   |		Short_Literal	0x3							; Debug Table 0x5.0x12 = 0x1ba,0xf
01bb e20e       |    |		Load	0x1,0xe
01bc 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01bd e5fc       |    |		Load	0x2,-0x4
01be 016d       | m  |		Execute	Variant_Record,Structure_Write
01bf e211       |    |		Load	0x1,0x11							; Debug Table 0x5.0x13 = 0x1bf,0x10
01c0 e5fd       |    |		Load	0x2,-0x3
01c1 017d       | }  |		Execute	Record,Structure_Write
01c2 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x14 = 0x1c2,0x11
01c3 4801       |H   |		Short_Literal	0x1
01c4 e219       |    |		Load	0x1,0x19
01c5 170e       |    |		Execute	Task,Entry_Call,Field_Number 0xe
01c6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01c7 0000       |    |		.XXX[0x1]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d1       |    |		.CONST	0x01d1								; Address of begin
01c9 01fd       |    |		.CONST	0x01fd								; Address of exception handler
01ca 0002       |    |		.CONST	0x0002								; Number of locals
01cb			INIT_01c8:
01cb e00d       |    |		Load	0x0,0xd								; Debug Table 0x6 = .DEBUG	0x01cb,0x0872,0x0001,0x0000,0x0057,0x4575,0x0000,0x0083
													; Debug Table 0x6.0x0 = 0x1cb,0xffff
01cc 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
01cd 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
01ce 02ff       |    |		Declare_Variable	Variant_Record
01cf 00d8       |    |		Load_Top	At_Offset_0
01d0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d1			BODY_01c8:
01d1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x1 = 0x1d1,0x1
01d2 e5ff       |    |		Load	0x2,-0x1
01d3 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01d4 0219       |    |		Execute	Heap_Access,All_Read
01d5 e006       |    |		Load	0x0,0x6
01d6 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
01d7 e006       |    |		Load	0x0,0x6
01d8 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
01d9 e00d       |    |		Load	0x0,0xd
01da 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
01db 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
01dc 00d1       |    |		Pop_Control	Pop_Count_1
01dd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x2 = 0x1dd,0x2
01de 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01df 4602       |F   |		Jump_Case	0x3
01e0 7802       |x   |		Jump	0x1e3								; case 0x0
01e1 7807       |x   |		Jump	0x1e9								; case 0x1
01e2 7810       |x   |		Jump	0x1f3								; case 0x2
01e3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x3 = 0x1e3,0x3
01e4 e20e       |    |		Load	0x1,0xe
01e5 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01e6 e5fe       |    |		Load	0x2,-0x2
01e7 016d       | m  |		Execute	Variant_Record,Structure_Write
01e8 780f       |x   |		Jump	0x1f8
01e9 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x4 = 0x1e9,0x4
01ea e20e       |    |		Load	0x1,0xe
01eb 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01ec 00d9       |    |		Load_Top	At_Offset_1
01ed 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
01ee 00d9       |    |		Load_Top	At_Offset_1
01ef 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
01f0 e5fe       |    |		Load	0x2,-0x2
01f1 016d       | m  |		Execute	Variant_Record,Structure_Write
01f2 7805       |x   |		Jump	0x1f8
01f3 4803       |H   |		Short_Literal	0x3							; Debug Table 0x6.0x5 = 0x1f3,0x5
01f4 e20e       |    |		Load	0x1,0xe
01f5 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01f6 e5fe       |    |		Load	0x2,-0x2
01f7 016d       | m  |		Execute	Variant_Record,Structure_Write
01f8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x6 = 0x1f8,0x6
01f9 4801       |H   |		Short_Literal	0x1
01fa e219       |    |		Load	0x1,0x19
01fb 170e       |    |		Execute	Task,Entry_Call,Field_Number 0xe
01fc 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01fd			TRAP_01c8:
01fd 0007       |    |		Action	Break_Optional
01fe 4803       |H   |		Short_Literal	0x3							; Debug Table 0x6.0x7 = 0x1fe,0x7
01ff e20e       |    |		Load	0x1,0xe
0200 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0201 e5fe       |    |		Load	0x2,-0x2
0202 016d       | m  |		Execute	Variant_Record,Structure_Write
0203 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6.0x8 = 0x203,0x8
0204 4801       |H   |		Short_Literal	0x1
0205 e219       |    |		Load	0x1,0x19
0206 170e       |    |		Execute	Task,Entry_Call,Field_Number 0xe
0207 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b       |    |		.CONST	0x020b								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0001       |    |		.CONST	0x0001								; Number of locals
020b			BODY_0208:
020b			INIT_0208:
020b 4608       |F   |		Jump_Case	0x9							; Debug Table 0x7 = .DEBUG	0x020b,0x0886,0x0005,0x0000,0x0057,0x4575,0x0000,0x0090
020c 7808       |x   |		Jump	0x215								; case 0x0
020d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
020e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
020f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0210 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0211 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
0212 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
0213 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
0214 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
0215 00da       |    |		Load_Top	At_Offset_2
0216 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0217 0125       | %  |		Execute	Any,Set_Constraint
0218 00da       |    |		Load_Top	At_Offset_2
0219 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
021a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
021b 00da       |    |		Load_Top	At_Offset_2
021c 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
021d 0125       | %  |		Execute	Any,Set_Constraint
021e 00da       |    |		Load_Top	At_Offset_2
021f 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0220 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0221 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0222 0000 0000  |    |		.BLANK	0000[0x6]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b       | +  |		.CONST	0x022b								; Address of begin
0229 0004       |    |		.CONST	0x0004								; Address of exception handler
022a 0001       |    |		.CONST	0x0001								; Number of locals
022b			BODY_0228:
022b			INIT_0228:
022b 0007       |    |		Action	Break_Optional							; Debug Table 0x8 = .DEBUG	0x022b,0x0888,0x0001,0x0000,0x0057,0x45e5,0x0000,0x021f
													; Debug Table 0x8.0x0 = 0x22b,0x1
022c 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x8.0x1 = 0x22c,0x401
022d 0007       |    |		Action	Break_Optional							; Debug Table 0x8.0x2 = 0x22d,0x1
022e 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x8.0x3 = 0x22e,0x801
022f e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0x4 = 0x22f,0x401
0230 0007       |    |		Action	Break_Optional
0231 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x8.0x5 = 0x231,0xc01
0232 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x8.0x6 = 0x232,0x801
0233 e5ff       |    |		Load	0x2,-0x1
0234 4802       |H   |		Short_Literal	0x2
0235 e5fc       |    |		Load	0x2,-0x4
0236 e001       |    |		Load	0x0,0x1
0237 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0238 c5fc       |    |		Store	0x2,-0x4
0239 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
023a 0000 0000  |    |		.BLANK	0000[0x6]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0250       | P  |		.CONST	0x0250								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0006       |    |		.CONST	0x0006								; Number of locals
0243			INIT_0240:
0243 e00e       |    |		Load	0x0,0xe								; Debug Table 0x9 = .DEBUG	0x0243,0x0898,0x0001,0x0000,0x0057,0x45e5,0x0000,0x025a
													; Debug Table 0x9.0x0 = 0x243,0xffff
0244 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0245 e00e       |    |		Load	0x0,0xe								; Debug Table 0x9.0x1 = 0x245,0xfffe
0246 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0247 e006       |    |		Load	0x0,0x6								; Debug Table 0x9.0x2 = 0x247,0xfffd
0248 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0249 02ff       |    |		Declare_Variable	Variant_Record
024a 00d8       |    |		Load_Top	At_Offset_0
024b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
024c e214       |    |		Load	0x1,0x14							; Debug Table 0x9.0x3 = 0x24c,0xfffc
024d 0007       |    |		Action	Break_Optional
024e 029f 04eb  |    |		Declare_Subprogram	INIT_04e8,For_Call				; Debug Table 0x9.0x4 = 0x24e,0xfffb
0250			BODY_0240:
0250 e00e       |    |		Load	0x0,0xe								; Debug Table 0x9.0x5 = 0x250,0x1
0251 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0252 00db       |    |		Load_Top	At_Offset_3
0253 e216       |    |		Load	0x1,0x16
0254 4800       |H   |		Short_Literal	0x0
0255 4800       |H   |		Short_Literal	0x0
0256 4800       |H   |		Short_Literal	0x0
0257 e00f       |    |		Load	0x0,0xf
0258 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0259 4801       |H   |		Short_Literal	0x1
025a e217       |    |		Load	0x1,0x17
025b e006       |    |		Load	0x0,0x6
025c 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
025d 00d1       |    |		Pop_Control	Pop_Count_1
025e c402       |    |		Store	0x2,0x2
025f e402       |    |		Load	0x2,0x2								; Debug Table 0x9.0x6 = 0x25f,0x2
0260 680b       |h   |		Jump_Zero	0x26c
0261 0092 0629  |   )|		Action	Push_String_Extended,0x629					; "Create: "
													; Debug Table 0x9.0x7 = 0x261,0x3
0263 e402       |    |		Load	0x2,0x2
0264 e00e       |    |		Load	0x0,0xe
0265 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0266 0122       | "  |		Execute	Any,Make_Root_Type
0267 025e       | ^  |		Execute	Discrete,Convert
0268 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0269 01cc       |    |		Execute	Vector,Catenate
026a 8406       |    |		Call	0x2,0x6
026b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x9.0x8 = 0x26b,0x4
026c e002       |    |		Load	0x0,0x2								; Debug Table 0x9.0x9 = 0x26c,0x5
026d 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
026e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
026f e218       |    |		Load	0x1,0x18
0270 039c       |    |		Declare_Variable	Heap_Access,By_Allocation
0271 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0272 0007       |    |		Action	Break_Optional							; Debug Table 0x9.0xa = 0x272,0x6
0273 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0xb = 0x273,0x7
0274 e00e       |    |		Load	0x0,0xe
0275 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0276 00d9       |    |		Load_Top	At_Offset_1
0277 0219       |    |		Execute	Heap_Access,All_Read
0278 0120       |    |		Execute	Any,Is_Value
0279 6806       |h   |		Jump_Zero	0x280
027a e006       |    |		Load	0x0,0x6
027b 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
027c 00da       |    |		Load_Top	At_Offset_2
027d 0219       |    |		Execute	Heap_Access,All_Read
027e 00d1       |    |		Pop_Control	Pop_Count_1
027f 7802       |x   |		Jump	0x282
0280 00d9       |    |		Load_Top	At_Offset_1
0281 0219       |    |		Execute	Heap_Access,All_Read
0282 e216       |    |		Load	0x1,0x16
0283 4800       |H   |		Short_Literal	0x0
0284 e006       |    |		Load	0x0,0x6
0285 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0286 e00f       |    |		Load	0x0,0xf
0287 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0288 4802       |H   |		Short_Literal	0x2
0289 e404       |    |		Load	0x2,0x4
028a e006       |    |		Load	0x0,0x6
028b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
028c 00da       |    |		Load_Top	At_Offset_2
028d 0218       |    |		Execute	Heap_Access,All_Write
028e c403       |    |		Store	0x2,0x3
028f 00d1       |    |		Pop_Control	Pop_Count_1
0290 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9.0xc = 0x290,0x8
0291 680a       |h   |		Jump_Zero	0x29c
0292 0092 062a  |   *|		Action	Push_String_Extended,0x62a					; "Open: "
													; Debug Table 0x9.0xd = 0x292,0x9
0294 e403       |    |		Load	0x2,0x3
0295 e00e       |    |		Load	0x0,0xe
0296 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0297 025e       | ^  |		Execute	Discrete,Convert
0298 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0299 01cc       |    |		Execute	Vector,Catenate
029a 8406       |    |		Call	0x2,0x6
029b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x9.0xe = 0x29b,0xa
029c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0xf = 0x29c,0xb
029d a5fb       |    |		Store_Unchecked	0x2,-0x5
029e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x10 = 0x29e,0xc
029f a5fd       |    |		Store_Unchecked	0x2,-0x3
02a0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02a1 0000 0000  |    |		.BLANK	0000[0x7]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ac       |    |		.CONST	0x02ac								; Address of begin
02a9 02ba       |    |		.CONST	0x02ba								; Address of exception handler
02aa 0002       |    |		.CONST	0x0002								; Number of locals
02ab			INIT_02a8:
02ab 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa = .DEBUG	0x02ab,0x08bc,0x0001,0x0000,0x0057,0x45e5,0x0000,0x0325
													; Debug Table 0xa.0x0 = 0x2ab,0xffff
02ac			BODY_02a8:
02ac 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa.0x1 = 0x2ac,0x1
02ad e216       |    |		Load	0x1,0x16
02ae 48ea       |H   |		Short_Literal	0xea
02af e010       |    |		Load	0x0,0x10
02b0 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
02b1 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02b2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x2 = 0x2b2,0x2
02b3 e003       |    |		Load	0x0,0x3
02b4 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
02b5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02b6 c5fd       |    |		Store	0x2,-0x3
02b7 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x3 = 0x2b7,0x3
02b8 a5fb       |    |		Store_Unchecked	0x2,-0x5
02b9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02ba			TRAP_02a8:
02ba 4887       |H   |		Short_Literal	0x87
02bb 010f       |    |		Execute	Exception,Equal
02bc 680e       |h   |		Jump_Zero	0x2cb
02bd e003       |    |		Load	0x0,0x3								; Debug Table 0xa.0x4 = 0x2bd,0x4
02be 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
02bf 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
02c0 c5fd       |    |		Store	0x2,-0x3
02c1 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x5 = 0x2c1,0x5
02c2 a5fb       |    |		Store_Unchecked	0x2,-0x5
02c3 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xa.0x6 = 0x2c3,0x6
02c4 0092 062b  |   +|		Action	Push_String_Extended,0x62b					; "'s Ada Unit failed on Temp_Ada_Heap.Create"
02c6 e5fe       |    |		Load	0x2,-0x2
02c7 e5ff       |    |		Load	0x2,-0x1
02c8 821a       |    |		Call	0x1,0x1a
02c9 c5fc       |    |		Store	0x2,-0x4
02ca 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02cb 0100       |    |		Execute	Exception,Raise
02cc 004d 040e  | M  |		.LITERAL	{0x004d040e, 0x000053b0}
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d5       |    |		.CONST	0x02d5								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 0002       |    |		.CONST	0x0002								; Number of locals
02d3			INIT_02d0:
02d3 e00e       |    |		Load	0x0,0xe								; Debug Table 0xb = .DEBUG	0x02d3,0x08cc,0x0001,0x0000,0x0057,0x45e5,0x0000,0x037c
													; Debug Table 0xb.0x0 = 0x2d3,0xffff
02d4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02d5			BODY_02d0:
02d5 e00e       |    |		Load	0x0,0xe								; Debug Table 0xb.0x1 = 0x2d5,0x1
02d6 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02d7 e004       |    |		Load	0x0,0x4
02d8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02d9 4800       |H   |		Short_Literal	0x0
02da e5fd       |    |		Load	0x2,-0x3
02db 0219       |    |		Execute	Heap_Access,All_Read
02dc e006       |    |		Load	0x0,0x6
02dd 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
02de e006       |    |		Load	0x0,0x6
02df 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02e0 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02e1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x2 = 0x2e1,0x2
02e2 6811       |h   |		Jump_Zero	0x2f4
02e3 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xb.0x3 = 0x2e3,0x3
02e4 0092 062c  |   ,|		Action	Push_String_Extended,0x62c					; "'s Code Segment failed on Destroy: "
02e6 00da       |    |		Load_Top	At_Offset_2
02e7 e00e       |    |		Load	0x0,0xe
02e8 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02e9 0122       | "  |		Execute	Any,Make_Root_Type
02ea 025e       | ^  |		Execute	Discrete,Convert
02eb 1c01       |    |		Execute_Immediate	Run_Utility,0x1
02ec 01cc       |    |		Execute	Vector,Catenate
02ed e5fe       |    |		Load	0x2,-0x2
02ee e5ff       |    |		Load	0x2,-0x1
02ef 821a       |    |		Call	0x1,0x1a
02f0 c5fc       |    |		Store	0x2,-0x4
02f1 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x4 = 0x2f1,0x4
02f2 a5fb       |    |		Store_Unchecked	0x2,-0x5
02f3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xb.0x5 = 0x2f3,0x5
02f4 e002       |    |		Load	0x0,0x2								; Debug Table 0xb.0x6 = 0x2f4,0x6
02f5 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
02f6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02f7 a5fd       |    |		Store_Unchecked	0x2,-0x3
02f8 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x7 = 0x2f8,0x7
02f9 a5fb       |    |		Store_Unchecked	0x2,-0x5
02fa 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02fb 0000 0000  |    |		.BLANK	0000[0x5]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0305       |    |		.CONST	0x0305								; Address of begin
0301 0004       |    |		.CONST	0x0004								; Address of exception handler
0302 0002       |    |		.CONST	0x0002								; Number of locals
0303			INIT_0300:
0303 e00e       |    |		Load	0x0,0xe								; Debug Table 0xc = .DEBUG	0x0303,0x08de,0x0001,0x0000,0x0057,0x45e5,0x0000,0x03dd
													; Debug Table 0xc.0x0 = 0x303,0xffff
0304 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0305			BODY_0300:
0305 e00e       |    |		Load	0x0,0xe								; Debug Table 0xc.0x1 = 0x305,0x1
0306 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0307 e216       |    |		Load	0x1,0x16
0308 4800       |H   |		Short_Literal	0x0
0309 e5fd       |    |		Load	0x2,-0x3
030a e003       |    |		Load	0x0,0x3
030b 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
030c 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
030d e003       |    |		Load	0x0,0x3
030e 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
030f 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0310 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x2 = 0x310,0x2
0311 6811       |h   |		Jump_Zero	0x323
0312 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xc.0x3 = 0x312,0x3
0313 0092 062d  |   -|		Action	Push_String_Extended,0x62d					; "'s Unit failed on Destroy: "
0315 00da       |    |		Load_Top	At_Offset_2
0316 e00e       |    |		Load	0x0,0xe
0317 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0318 0122       | "  |		Execute	Any,Make_Root_Type
0319 025e       | ^  |		Execute	Discrete,Convert
031a 1c01       |    |		Execute_Immediate	Run_Utility,0x1
031b 01cc       |    |		Execute	Vector,Catenate
031c e5fe       |    |		Load	0x2,-0x2
031d e5ff       |    |		Load	0x2,-0x1
031e 821a       |    |		Call	0x1,0x1a
031f c5fc       |    |		Store	0x2,-0x4
0320 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x4 = 0x320,0x4
0321 a5fb       |    |		Store_Unchecked	0x2,-0x5
0322 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xc.0x5 = 0x322,0x5
0323 e003       |    |		Load	0x0,0x3								; Debug Table 0xc.0x6 = 0x323,0x6
0324 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0325 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0326 c5fd       |    |		Store	0x2,-0x3
0327 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x7 = 0x327,0x7
0328 a5fb       |    |		Store_Unchecked	0x2,-0x5
0329 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
032a 0000 0000  |    |		.BLANK	0000[0x6]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0334       | 4  |		.CONST	0x0334								; Address of begin
0331 0004       |    |		.CONST	0x0004								; Address of exception handler
0332 0002       |    |		.CONST	0x0002								; Number of locals
0333			INIT_0330:
0333 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xd = .DEBUG	0x0333,0x08f0,0x0001,0x0000,0x0057,0x45e5,0x0000,0x0442
													; Debug Table 0xd.0x0 = 0x333,0xffff
0334			BODY_0330:
0334 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0x1 = 0x334,0x1
0335 a5fb       |    |		Store_Unchecked	0x2,-0x5
0336 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xd.0x2 = 0x336,0x2
0337 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0338 680f       |h   |		Jump_Zero	0x348
0339 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xd.0x3 = 0x339,0x3
033a e5fc       |    |		Load	0x2,-0x4
033b e5fd       |    |		Load	0x2,-0x3
033c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
033d e5fe       |    |		Load	0x2,-0x2
033e e5ff       |    |		Load	0x2,-0x1
033f 821d       |    |		Call	0x1,0x1d
0340 e5fd       |    |		Load	0x2,-0x3
0341 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0342 c5fc       |    |		Store	0x2,-0x4
0343 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0344 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x4 = 0x344,0x4
0345 7002       |p   |		Jump_Nonzero	0x348
0346 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x5 = 0x346,0x5
0347 a5fb       |    |		Store_Unchecked	0x2,-0x5
0348 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xd.0x6 = 0x348,0x6
0349 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
034a 680f       |h   |		Jump_Zero	0x35a
034b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xd.0x7 = 0x34b,0x7
034c e5fc       |    |		Load	0x2,-0x4
034d e5fd       |    |		Load	0x2,-0x3
034e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
034f e5fe       |    |		Load	0x2,-0x2
0350 e5ff       |    |		Load	0x2,-0x1
0351 821d       |    |		Call	0x1,0x1d
0352 e5fd       |    |		Load	0x2,-0x3
0353 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0354 c5fc       |    |		Store	0x2,-0x4
0355 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0356 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x8 = 0x356,0x8
0357 7002       |p   |		Jump_Nonzero	0x35a
0358 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x9 = 0x358,0x9
0359 a5fb       |    |		Store_Unchecked	0x2,-0x5
035a e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xd.0xa = 0x35a,0xa
035b 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
035c e003       |    |		Load	0x0,0x3
035d 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
035e 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
035f 700f       |p   |		Jump_Nonzero	0x36f
0360 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xd.0xb = 0x360,0xb
0361 e5fc       |    |		Load	0x2,-0x4
0362 e5fd       |    |		Load	0x2,-0x3
0363 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0364 e5fe       |    |		Load	0x2,-0x2
0365 e5ff       |    |		Load	0x2,-0x1
0366 821e       |    |		Call	0x1,0x1e
0367 e5fd       |    |		Load	0x2,-0x3
0368 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0369 c5fc       |    |		Store	0x2,-0x4
036a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
036b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0xc = 0x36b,0xc
036c 7002       |p   |		Jump_Nonzero	0x36f
036d 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0xd = 0x36d,0xd
036e a5fb       |    |		Store_Unchecked	0x2,-0x5
036f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 037b       | {  |		.CONST	0x037b								; Address of begin
0371 0004       |    |		.CONST	0x0004								; Address of exception handler
0372 0004       |    |		.CONST	0x0004								; Number of locals
0373			INIT_0370:
0373 e210       |    |		Load	0x1,0x10							; Debug Table 0xe = .DEBUG	0x0373,0x090e,0x0001,0x0000,0x0057,0x45e5,0x0000,0x04ce
													; Debug Table 0xe.0x0 = 0x373,0xffff
0374 0322       | "  |		Declare_Variable	Record
0375 e211       |    |		Load	0x1,0x11
0376 00d9       |    |		Load_Top	At_Offset_1
0377 017d       | }  |		Execute	Record,Structure_Write
0378 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xe.0x1 = 0x378,0xfffe
0379 029f 0503  |    |		Declare_Subprogram	INIT_0500,For_Call				; Debug Table 0xe.0x2 = 0x379,0xfffd
037b			BODY_0370:
037b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xe.0x3 = 0x37b,0x1
037c e5fc       |    |		Load	0x2,-0x4
037d e214       |    |		Load	0x1,0x14
037e e5fe       |    |		Load	0x2,-0x2
037f e5ff       |    |		Load	0x2,-0x1
0380 821b       |    |		Call	0x1,0x1b
0381 e402       |    |		Load	0x2,0x2
0382 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0383 c5fc       |    |		Store	0x2,-0x4
0384 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0385 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x4 = 0x385,0x2
0386 7002       |p   |		Jump_Nonzero	0x389
0387 8404       |    |		Call	0x2,0x4								; Debug Table 0xe.0x5 = 0x387,0x3
0388 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xe.0x6 = 0x388,0x4
0389 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xe.0x7 = 0x389,0x5
038a e5fc       |    |		Load	0x2,-0x4
038b e214       |    |		Load	0x1,0x14
038c e5fe       |    |		Load	0x2,-0x2
038d e5ff       |    |		Load	0x2,-0x1
038e 821b       |    |		Call	0x1,0x1b
038f e402       |    |		Load	0x2,0x2
0390 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0391 c5fc       |    |		Store	0x2,-0x4
0392 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0393 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x8 = 0x393,0x6
0394 7002       |p   |		Jump_Nonzero	0x397
0395 8404       |    |		Call	0x2,0x4								; Debug Table 0xe.0x9 = 0x395,0x7
0396 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xe.0xa = 0x396,0x8
0397 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xe.0xb = 0x397,0x9
0398 e5fc       |    |		Load	0x2,-0x4
0399 e402       |    |		Load	0x2,0x2
039a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
039b 0120       |    |		Execute	Any,Is_Value
039c 6802       |h   |		Jump_Zero	0x39f
039d e215       |    |		Load	0x1,0x15
039e 7802       |x   |		Jump	0x3a1
039f e402       |    |		Load	0x2,0x2
03a0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03a1 e5fe       |    |		Load	0x2,-0x2
03a2 e5ff       |    |		Load	0x2,-0x1
03a3 821c       |    |		Call	0x1,0x1c
03a4 e402       |    |		Load	0x2,0x2
03a5 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03a6 c5fc       |    |		Store	0x2,-0x4
03a7 005a       | Z  |		Store_Top	Discrete,At_Offset_2
03a8 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0xc = 0x3a8,0xa
03a9 7002       |p   |		Jump_Nonzero	0x3ac
03aa 8404       |    |		Call	0x2,0x4								; Debug Table 0xe.0xd = 0x3aa,0xb
03ab 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xe.0xe = 0x3ab,0xc
03ac 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe.0xf = 0x3ac,0xd
03ad e5fd       |    |		Load	0x2,-0x3
03ae 017d       | }  |		Execute	Record,Structure_Write
03af 4801       |H   |		Short_Literal	0x1							; Debug Table 0xe.0x10 = 0x3af,0xe
03b0 a5fb       |    |		Store_Unchecked	0x2,-0x5
03b1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03b2 0000 0000  |    |		.BLANK	0000[0x6]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bd       |    |		.CONST	0x03bd								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0002       |    |		.CONST	0x0002								; Number of locals
03bb			INIT_03b8:
03bb e00e       |    |		Load	0x0,0xe								; Debug Table 0xf = .DEBUG	0x03bb,0x0932,0x0001,0x0000,0x0057,0x45e5,0x0000,0x0556
													; Debug Table 0xf.0x0 = 0x3bb,0xffff
03bc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03bd			BODY_03b8:
03bd e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xf.0x1 = 0x3bd,0x1
03be e00e       |    |		Load	0x0,0xe
03bf 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03c0 00d9       |    |		Load_Top	At_Offset_1
03c1 0219       |    |		Execute	Heap_Access,All_Read
03c2 e006       |    |		Load	0x0,0x6
03c3 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
03c4 00da       |    |		Load_Top	At_Offset_2
03c5 0218       |    |		Execute	Heap_Access,All_Write
03c6 005a       | Z  |		Store_Top	Discrete,At_Offset_2
03c7 00d1       |    |		Pop_Control	Pop_Count_1
03c8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x2 = 0x3c8,0x2
03c9 7003       |p   |		Jump_Nonzero	0x3cd
03ca 4801       |H   |		Short_Literal	0x1							; Debug Table 0xf.0x3 = 0x3ca,0x3
03cb a5fb       |    |		Store_Unchecked	0x2,-0x5
03cc 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03cd 4800       |H   |		Short_Literal	0x0							; Debug Table 0xf.0x4 = 0x3cd,0x4
03ce a5fb       |    |		Store_Unchecked	0x2,-0x5
03cf e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xf.0x5 = 0x3cf,0x5
03d0 0092 062e  |   .|		Action	Push_String_Extended,0x62e					; "'s code segment failed reset_for_modification: "
03d2 00da       |    |		Load_Top	At_Offset_2
03d3 e00e       |    |		Load	0x0,0xe
03d4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03d5 025e       | ^  |		Execute	Discrete,Convert
03d6 1c01       |    |		Execute_Immediate	Run_Utility,0x1
03d7 01cc       |    |		Execute	Vector,Catenate
03d8 e5fe       |    |		Load	0x2,-0x2
03d9 e5ff       |    |		Load	0x2,-0x1
03da 821a       |    |		Call	0x1,0x1a
03db c5fc       |    |		Store	0x2,-0x4
03dc 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03dd 0000 0000  |    |		.XXX[0x3]
03df 0000       |    |
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03eb       |    |		.CONST	0x03eb								; Address of begin
03e1 03f1       |    |		.CONST	0x03f1								; Address of exception handler
03e2 0002       |    |		.CONST	0x0002								; Number of locals
03e3			INIT_03e0:
03e3 0007       |    |		Action	Break_Optional							; Debug Table 0x10 = .DEBUG	0x03e3,0x0940,0x0002,0x0000,0x0057,0x45e5,0x0000,0x05ac
													; Debug Table 0x10.0x0 = 0x3e3,0xffff
03e4 0007       |    |		Action	Break_Optional							; Debug Table 0x10.0x1 = 0x3e4,0xfffe
03e5 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x10.0x2 = 0x3e5,0xfffd
03e6 00db       |    |		Load_Top	At_Offset_3
03e7 e003       |    |		Load	0x0,0x3
03e8 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
03e9 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03ea 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
03eb			BODY_03e0:
03eb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x3 = 0x3eb,0x1
03ec e011       |    |		Load	0x0,0x11
03ed 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03ee 6145       |aE  |		Indirect_Literal	Discrete,0x534,{0x00000000, 0x000a0000}
03ef 027d       | }  |		Execute	Discrete,Greater
03f0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03f1			TRAP_03e0:
03f1 0007       |    |		Action	Break_Optional
03f2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x4 = 0x3f2,0x2
03f3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03f4 0000 0000  |    |		.BLANK	0000[0x4]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03fc       |    |		.CONST	0x03fc								; Address of begin
03f9 0004       |    |		.CONST	0x0004								; Address of exception handler
03fa 0002       |    |		.CONST	0x0002								; Number of locals
03fb			INIT_03f8:
03fb 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x11 = .DEBUG	0x03fb,0x094c,0x0001,0x0000,0x0057,0x45e5,0x0000,0x05e7
													; Debug Table 0x11.0x0 = 0x3fb,0xffff
03fc			BODY_03f8:
03fc e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x11.0x1 = 0x3fc,0x1
03fd 8222       | "  |		Call	0x1,0x22
03fe 6821       |h!  |		Jump_Zero	0x420
03ff 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x11.0x2 = 0x3ff,0x2
0400 e5fc       |    |		Load	0x2,-0x4
0401 e5fd       |    |		Load	0x2,-0x3
0402 e5fe       |    |		Load	0x2,-0x2
0403 e5ff       |    |		Load	0x2,-0x1
0404 821e       |    |		Call	0x1,0x1e
0405 c5fd       |    |		Store	0x2,-0x3
0406 c5fc       |    |		Store	0x2,-0x4
0407 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0408 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x3 = 0x408,0x3
0409 7003       |p   |		Jump_Nonzero	0x40d
040a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x4 = 0x40a,0x4
040b a5fb       |    |		Store_Unchecked	0x2,-0x5
040c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x11.0x5 = 0x40c,0x5
040d 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x11.0x6 = 0x40d,0x6
040e e5fc       |    |		Load	0x2,-0x4
040f e5fd       |    |		Load	0x2,-0x3
0410 0120       |    |		Execute	Any,Is_Value
0411 6802       |h   |		Jump_Zero	0x414
0412 e215       |    |		Load	0x1,0x15
0413 7801       |x   |		Jump	0x415
0414 e5fd       |    |		Load	0x2,-0x3
0415 e5fe       |    |		Load	0x2,-0x2
0416 e5ff       |    |		Load	0x2,-0x1
0417 821c       |    |		Call	0x1,0x1c
0418 c5fd       |    |		Store	0x2,-0x3
0419 c5fc       |    |		Store	0x2,-0x4
041a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
041b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x7 = 0x41b,0x7
041c 7009       |p   |		Jump_Nonzero	0x426
041d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x8 = 0x41d,0x8
041e a5fb       |    |		Store_Unchecked	0x2,-0x5
041f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x11.0x9 = 0x41f,0x9
0420 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x11.0xa = 0x420,0xa
0421 e003       |    |		Load	0x0,0x3
0422 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0423 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0424 e003       |    |		Load	0x0,0x3
0425 1846       | F  |		Execute	Package,Field_Execute,Field_Number 0x46
0426 4801       |H   |		Short_Literal	0x1							; Debug Table 0x11.0xb = 0x426,0xb
0427 a5fb       |    |		Store_Unchecked	0x2,-0x5
0428 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0429 0000 0000  |    |		.BLANK	0000[0x7]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0434       | 4  |		.CONST	0x0434								; Address of begin
0431 0004       |    |		.CONST	0x0004								; Address of exception handler
0432 0002       |    |		.CONST	0x0002								; Number of locals
0433			INIT_0430:
0433 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x12 = .DEBUG	0x0433,0x0966,0x0001,0x0000,0x0057,0x45e5,0x0000,0x064b
													; Debug Table 0x12.0x0 = 0x433,0xffff
0434			BODY_0430:
0434 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12.0x1 = 0x434,0x1
0435 a5fb       |    |		Store_Unchecked	0x2,-0x5
0436 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x12.0x2 = 0x436,0x2
0437 e5fc       |    |		Load	0x2,-0x4
0438 e5fd       |    |		Load	0x2,-0x3
0439 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
043a e5fe       |    |		Load	0x2,-0x2
043b e5ff       |    |		Load	0x2,-0x1
043c 8221       | !  |		Call	0x1,0x21
043d e5fd       |    |		Load	0x2,-0x3
043e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
043f c5fc       |    |		Store	0x2,-0x4
0440 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0441 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x3 = 0x441,0x3
0442 7003       |p   |		Jump_Nonzero	0x446
0443 4800       |H   |		Short_Literal	0x0							; Debug Table 0x12.0x4 = 0x443,0x4
0444 a5fb       |    |		Store_Unchecked	0x2,-0x5
0445 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x12.0x5 = 0x445,0x5
0446 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x12.0x6 = 0x446,0x6
0447 e5fc       |    |		Load	0x2,-0x4
0448 e5fd       |    |		Load	0x2,-0x3
0449 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
044a e5fe       |    |		Load	0x2,-0x2
044b e5ff       |    |		Load	0x2,-0x1
044c 8221       | !  |		Call	0x1,0x21
044d e5fd       |    |		Load	0x2,-0x3
044e 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
044f c5fc       |    |		Store	0x2,-0x4
0450 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0451 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x7 = 0x451,0x7
0452 7003       |p   |		Jump_Nonzero	0x456
0453 4800       |H   |		Short_Literal	0x0							; Debug Table 0x12.0x8 = 0x453,0x8
0454 a5fb       |    |		Store_Unchecked	0x2,-0x5
0455 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x12.0x9 = 0x455,0x9
0456 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x12.0xa = 0x456,0xa
0457 e5fc       |    |		Load	0x2,-0x4
0458 e5fd       |    |		Load	0x2,-0x3
0459 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
045a e5fe       |    |		Load	0x2,-0x2
045b e5ff       |    |		Load	0x2,-0x1
045c 8223       | #  |		Call	0x1,0x23
045d e5fd       |    |		Load	0x2,-0x3
045e 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
045f c5fc       |    |		Store	0x2,-0x4
0460 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0461 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0xb = 0x461,0xb
0462 7003       |p   |		Jump_Nonzero	0x466
0463 4800       |H   |		Short_Literal	0x0							; Debug Table 0x12.0xc = 0x463,0xc
0464 a5fb       |    |		Store_Unchecked	0x2,-0x5
0465 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x12.0xd = 0x465,0xd
0466 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0467 0000       |    |		.XXX[0x1]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 047c       | |  |		.CONST	0x047c								; Address of begin
0469 0004       |    |		.CONST	0x0004								; Address of exception handler
046a 0007       |    |		.CONST	0x0007								; Number of locals
046b			INIT_0468:
046b e012       |    |		Load	0x0,0x12							; Debug Table 0x13 = .DEBUG	0x046b,0x0984,0x0001,0x0000,0x0057,0x45e5,0x0000,0x06b4
													; Debug Table 0x13.0x0 = 0x46b,0xffff
046c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
046d 1b33       | 3  |		Execute	Package,Field_Read,Field_Number 0x33
046e 02c7       |    |		Declare_Variable	Any
046f e012       |    |		Load	0x0,0x12
0470 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0471 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
0472 c402       |    |		Store	0x2,0x2
0473 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x13.0x1 = 0x473,0xfffe
0474 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x13.0x2 = 0x474,0xfffd
0475 e012       |    |		Load	0x0,0x12							; Debug Table 0x13.0x3 = 0x475,0xfffc
0476 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0477 4fff       |O   |		Short_Literal	-0x1							; Debug Table 0x13.0x4 = 0x477,0xfffb
0478 4802       |H   |		Short_Literal	0x2
0479 0099       |    |		Action	Reference_Dynamic
047a 029f 051b  |    |		Declare_Subprogram	INIT_0518,For_Call				; Debug Table 0x13.0x5 = 0x47a,0xfffa
047c			BODY_0468:
047c e00b       |    |		Load	0x0,0xb								; Debug Table 0x13.0x6 = 0x47c,0x1
047d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
047e 4800       |H   |		Short_Literal	0x0
047f e5fe       |    |		Load	0x2,-0x2
0480 e003       |    |		Load	0x0,0x3
0481 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0482 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0483 8407       |    |		Call	0x2,0x7								; Debug Table 0x13.0x7 = 0x483,0x2
0484 0007       |    |		Action	Break_Optional							; Debug Table 0x13.0x8 = 0x484,0x3
0485 e403       |    |		Load	0x2,0x3								; Debug Table 0x13.0x9 = 0x485,0x401
0486 0007       |    |		Action	Break_Optional
0487 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x13.0xa = 0x487,0x402
0488 0007       |    |		Action	Break_Optional							; Debug Table 0x13.0xb = 0x488,0x403
0489 0007       |    |		Action	Break_Optional							; Debug Table 0x13.0xc = 0x489,0x404
048a 0b4e       | N  |		Execute_Immediate	Case_Compare,0x4e				; Debug Table 0x13.0xd = 0x48a,0x3
048b 7001       |p   |		Jump_Nonzero	0x48d
048c 7837       |x7  |		Jump	0x4c4								; Debug Table 0x13.0xe = 0x48c,0x9
048d 0092 062f  |   /|		Action	Push_String_Extended,0x62f					; "command_procedure"
													; Debug Table 0x13.0xf = 0x48d,0x4
048f 482c       |H,  |		Short_Literal	0x2c
0490 00eb       |    |		Load_Encached	Diana_Cache
0491 187a       | z  |		Execute	Package,Field_Execute,Field_Number 0x7a
0492 a404       |    |		Store_Unchecked	0x2,0x4
0493 0007       |    |		Action	Break_Optional							; Debug Table 0x13.0x10 = 0x493,0x5
0494 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x13.0x11 = 0x494,0x801
0495 4895       |H   |		Short_Literal	0x95							; Debug Table 0x13.0x12 = 0x495,0x5
0496 00eb       |    |		Load_Encached	Diana_Cache
0497 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
0498 e403       |    |		Load	0x2,0x3
0499 0007       |    |		Action	Break_Optional
049a 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x13.0x13 = 0x49a,0xc01
049b 4894       |H   |		Short_Literal	0x94							; Debug Table 0x13.0x14 = 0x49b,0x801
049c 00eb       |    |		Load_Encached	Diana_Cache
049d 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
049e 487b       |H{  |		Short_Literal	0x7b
049f 00eb       |    |		Load_Encached	Diana_Cache
04a0 187c       | |  |		Execute	Package,Field_Execute,Field_Number 0x7c
04a1 e404       |    |		Load	0x2,0x4
04a2 4848       |HH  |		Short_Literal	0x48
04a3 00eb       |    |		Load_Encached	Diana_Cache
04a4 187e       | ~  |		Execute	Package,Field_Execute,Field_Number 0x7e
04a5 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x13.0x15 = 0x4a5,0x1001
04a6 4884       |H   |		Short_Literal	0x84							; Debug Table 0x13.0x16 = 0x4a6,0xc01
04a7 00eb       |    |		Load_Encached	Diana_Cache
04a8 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
04a9 48a8       |H   |		Short_Literal	0xa8
04aa 00eb       |    |		Load_Encached	Diana_Cache
04ab 187e       | ~  |		Execute	Package,Field_Execute,Field_Number 0x7e
04ac a403       |    |		Store_Unchecked	0x2,0x3
04ad e404       |    |		Load	0x2,0x4								; Debug Table 0x13.0x17 = 0x4ad,0x6
04ae 00eb       |    |		Load_Encached	Diana_Cache
04af 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
04b0 00eb       |    |		Load_Encached	Diana_Cache
04b1 18ce       |    |		Execute	Package,Field_Execute,Field_Number 0xce
04b2 e404       |    |		Load	0x2,0x4
04b3 4963       |Ic  |		Short_Literal	0x163
04b4 00eb       |    |		Load_Encached	Diana_Cache
04b5 0096       |    |		Execute	Package,Entry
04b6 e404       |    |		Load	0x2,0x4								; Debug Table 0x13.0x18 = 0x4b6,0x7
04b7 00eb       |    |		Load_Encached	Diana_Cache
04b8 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
04b9 00eb       |    |		Load_Encached	Diana_Cache
04ba 18b6       |    |		Execute	Package,Field_Execute,Field_Number 0xb6
04bb e404       |    |		Load	0x2,0x4
04bc 4957       |IW  |		Short_Literal	0x157
04bd 00eb       |    |		Load_Encached	Diana_Cache
04be 0096       |    |		Execute	Package,Entry
04bf e404       |    |		Load	0x2,0x4								; Debug Table 0x13.0x19 = 0x4bf,0x8
04c0 e404       |    |		Load	0x2,0x4
04c1 496a       |Ij  |		Short_Literal	0x16a
04c2 00eb       |    |		Load_Encached	Diana_Cache
04c3 0096       |    |		Execute	Package,Entry
04c4 00d1       |    |		Pop_Control	Pop_Count_1
04c5 e402       |    |		Load	0x2,0x2								; Debug Table 0x13.0x1a = 0x4c5,0xa
04c6 e012       |    |		Load	0x0,0x12
04c7 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
04c8 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
04c9 e012       |    |		Load	0x0,0x12							; Debug Table 0x13.0x1b = 0x4c9,0xb
04ca 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04cb e004       |    |		Load	0x0,0x4
04cc 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
04cd e403       |    |		Load	0x2,0x3
04ce e012       |    |		Load	0x0,0x12
04cf 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
04d0 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
04d1 005b       | [  |		Store_Top	Discrete,At_Offset_3
04d2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13.0x1c = 0x4d2,0xc
04d3 6810       |h   |		Jump_Zero	0x4e4
04d4 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x13.0x1d = 0x4d4,0xd
04d5 0092 0630  |   0|		Action	Push_String_Extended,0x630					; "'s copy's Unit failed Set_Root: "
04d7 e405       |    |		Load	0x2,0x5
04d8 e012       |    |		Load	0x0,0x12
04d9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04da 025e       | ^  |		Execute	Discrete,Convert
04db 1c01       |    |		Execute_Immediate	Run_Utility,0x1
04dc 01cc       |    |		Execute	Vector,Catenate
04dd e5fd       |    |		Load	0x2,-0x3
04de e406       |    |		Load	0x2,0x6
04df 821a       |    |		Call	0x1,0x1a
04e0 c5fc       |    |		Store	0x2,-0x4
04e1 4800       |H   |		Short_Literal	0x0							; Debug Table 0x13.0x1e = 0x4e1,0xe
04e2 a5fb       |    |		Store_Unchecked	0x2,-0x5
04e3 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x13.0x1f = 0x4e3,0xf
04e4 4801       |H   |		Short_Literal	0x1							; Debug Table 0x13.0x20 = 0x4e4,0x10
04e5 a5fb       |    |		Store_Unchecked	0x2,-0x5
04e6 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04e7 0000       |    |		.XXX[0x1]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04eb       |    |		.CONST	0x04eb								; Address of begin
04e9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ea 0001       |    |		.CONST	0x0001								; Number of locals
04eb			BODY_04e8:
04eb			INIT_04e8:
04eb e002       |    |		Load	0x0,0x2								; Debug Table 0x14 = .DEBUG	0x04eb,0x09c8,0x0001,0x0000,0x0057,0x45e5,0x0000,0x0291
													; Debug Table 0x14.0x0 = 0x4eb,0x1
04ec 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
04ed 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04ee a5fd       |    |		Store_Unchecked	0x2,-0x3
04ef 4800       |H   |		Short_Literal	0x0							; Debug Table 0x14.0x1 = 0x4ef,0x2
04f0 a5fb       |    |		Store_Unchecked	0x2,-0x5
04f1 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x14.0x2 = 0x4f1,0x3
04f2 0092 0631  |   1|		Action	Push_String_Extended,0x631					; "'s code segment failed on "
04f4 e7ff       |    |		Load	0x3,-0x1
04f5 01cc       |    |		Execute	Vector,Catenate
04f6 e5fe       |    |		Load	0x2,-0x2
04f7 e5ff       |    |		Load	0x2,-0x1
04f8 821a       |    |		Call	0x1,0x1a
04f9 c5fc       |    |		Store	0x2,-0x4
04fa 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04fb 0000 0000  |    |		.BLANK	0000[0x5]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0503       |    |		.CONST	0x0503								; Address of begin
0501 0004       |    |		.CONST	0x0004								; Address of exception handler
0502 0001       |    |		.CONST	0x0001								; Number of locals
0503			BODY_0500:
0503			INIT_0500:
0503 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x15 = .DEBUG	0x0503,0x09d0,0x0001,0x0000,0x0057,0x45e5,0x0000,0x04f6
													; Debug Table 0x15.0x0 = 0x503,0x1
0504 e5fc       |    |		Load	0x2,-0x4
0505 e402       |    |		Load	0x2,0x2
0506 e5fe       |    |		Load	0x2,-0x2
0507 e5ff       |    |		Load	0x2,-0x1
0508 821f       |    |		Call	0x1,0x1f
0509 00d1       |    |		Pop_Control	Pop_Count_1
050a c5fc       |    |		Store	0x2,-0x4
050b c5fb       |    |		Store	0x2,-0x5
050c e211       |    |		Load	0x1,0x11							; Debug Table 0x15.0x1 = 0x50c,0x2
050d e5fd       |    |		Load	0x2,-0x3
050e 017d       | }  |		Execute	Record,Structure_Write
050f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0x2 = 0x50f,0x3
0510 a5fb       |    |		Store_Unchecked	0x2,-0x5
0511 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0512 0000 0000  |    |		.BLANK	0000[0x6]
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 051b       |    |		.CONST	0x051b								; Address of begin
0519 0521       | !  |		.CONST	0x0521								; Address of exception handler
051a 0001       |    |		.CONST	0x0001								; Number of locals
051b			BODY_0518:
051b			INIT_0518:
051b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x16 = .DEBUG	0x051b,0x09d8,0x0004,0x0000,0x0057,0x45e5,0x0000,0x072d
													; Debug Table 0x16.0x0 = 0x51b,0x1
051c e5ff       |    |		Load	0x2,-0x1
051d e013       |    |		Load	0x0,0x13
051e 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
051f c403       |    |		Store	0x2,0x3
0520 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0521			TRAP_0518:
0521 0007       |    |		Action	Break_Optional
0522 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x16.0x1 = 0x522,0x2
0523 0092 0632  |   2|		Action	Push_String_Extended,0x632					; " failed Tree_Compaction.Compact: unhandled exception"
0525 e5fd       |    |		Load	0x2,-0x3
0526 e406       |    |		Load	0x2,0x6
0527 821a       |    |		Call	0x1,0x1a
0528 c5fc       |    |		Store	0x2,-0x4
0529 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0x2 = 0x529,0x3
052a a5fb       |    |		Store_Unchecked	0x2,-0x5
052b e402       |    |		Load	0x2,0x2								; Debug Table 0x16.0x3 = 0x52b,0x4
052c e012       |    |		Load	0x0,0x12
052d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
052e 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
052f 00cc       |    |		Action	Pop_Block							; Debug Table 0x16.0x4 = 0x52f,0x5
0530 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0531 0000 0000  |    |		.XXX[0x3]
0533 0000       |    |
0534 0000 0000  |    |		.LITERAL	{0x00000000, 0x000a0000}
0538 0560 0004  | `  |		.XXX[0x3]
053a 0017       |    |
053b 4806       |H   |		Short_Literal	0x6							; Debug Table 0x17 = .DEBUG	0x053b,0x09e4,0x0000,0x0000,0x0057,0x45e5,0x0000,0x005a
053c 02cb       |    |		Declare_Variable	Entry
053d 4801       |H   |		Short_Literal	0x1
053e 02cb       |    |		Declare_Variable	Entry
053f 00bf       |    |		Action	Accept_Activation
0540 4802       |H   |		Short_Literal	0x2							; Debug Table 0x18 = .DEBUG	0x0540,0x09e6,0x0000,0x0000,0x0057,0x45e5,0x0000,0x07ee
													; Debug Table 0x18.0x0 = 0x540,0xffff
0541 032a       | *  |		Declare_Type	Record,Incomplete
0542 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x1 = 0x542,0xfffe
0543 02a0       |    |		Declare_Subprogram	Null_Subprogram
0544 4818       |H   |		Short_Literal	0x18
0545 03d3       |    |		Declare_Type	Access,Defined,Accesses_Protected
0546 e001       |    |		Load	0x0,0x1								; Debug Table 0x18.0x2 = 0x546,0xfffd
0547 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0548 00d9       |    |		Load_Top	At_Offset_1
0549 029f 056b  |   k|		Declare_Subprogram	INIT_0568,For_Call
054b e20f       |    |		Load	0x1,0xf
054c 0326       | &  |		Complete_Type	Record,By_Defining
054d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x3 = 0x54d,0xfffc
054e 0007       |    |		Action	Break_Optional
054f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x18.0x4 = 0x54f,0xfffb
0550 0007       |    |		Action	Break_Optional
0551 e001       |    |		Load	0x0,0x1								; Debug Table 0x18.0x5 = 0x551,0xfffa
0552 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0553 0322       | "  |		Declare_Variable	Record
0554 00d8       |    |		Load_Top	At_Offset_0
0555 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0556 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x18.0x6 = 0x556,0xfff9
0557 e002       |    |		Load	0x0,0x2								; Debug Table 0x18.0x7 = 0x557,0xfff8
0558 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0559 02c7       |    |		Declare_Variable	Any
055a 00d8       |    |		Load_Top	At_Offset_0
055b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
055c e210       |    |		Load	0x1,0x10							; Debug Table 0x18.0x8 = 0x55c,0xfff7
055d 029f 0583  |    |		Declare_Subprogram	INIT_0580,For_Call
055f 00bc       |    |		Action	Signal_Activated
0560 00cf       |    |		Action	Mark_Auxiliary
0561 0007       |    |		Action	Break_Optional							; Debug Table 0x18.0x9 = 0x561,0x1
0562 8217       |    |		Call	0x1,0x17							; Debug Table 0x18.0xa = 0x562,0x2
0563 00c9       |    |		Action	Pop_Auxiliary_Loop
0564 7ffd       |    |		Jump	0x562
0565 0000 0000  |    |		.XXX[0x3]
0567 0000       |    |
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 056b       | k  |		.CONST	0x056b								; Address of begin
0569 0004       |    |		.CONST	0x0004								; Address of exception handler
056a 0001       |    |		.CONST	0x0001								; Number of locals
056b			BODY_0568:
056b			INIT_0568:
056b 4608       |F   |		Jump_Case	0x9							; Debug Table 0x19 = .DEBUG	0x056b,0x09fe,0x0005,0x0000,0x0057,0x45e5,0x0000,0x07f8
056c 7808       |x   |		Jump	0x575								; case 0x0
056d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
056e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
056f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0570 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0571 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
0572 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
0573 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
0574 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
0575 e001       |    |		Load	0x0,0x1
0576 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0577 00db       |    |		Load_Top	At_Offset_3
0578 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0579 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
057a 0000 0000  |    |		.BLANK	0000[0x6]
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 058c       |    |		.CONST	0x058c								; Address of begin
0581 0593       |    |		.CONST	0x0593								; Address of exception handler
0582 0002       |    |		.CONST	0x0002								; Number of locals
0583			INIT_0580:
0583 480e 48b3  |H H |		Declare_Variable	Select	0x000, 0x002,				; Debug Table 0x1a = .DEBUG	0x0583,0x0a00,0x0004,0x0000,0x0057,0x45e5,0x0000,0x091c
0585 480d 48ba  |H H |				[0x000]: 0x000 = 0x0000,
0587 4800 4800  |H H |				[0x00d]: 0x0ba = 0x05d0,
0589 4800 4802  |H H |				[0x00e]: 0x0b3 = 0x0598
058b 02cf       |    |
058c			BODY_0580:
058c 00cf       |    |		Action	Mark_Auxiliary
058d 0007       |    |		Action	Break_Optional							; Debug Table 0x1a.0x0 = 0x58d,0x1
058e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1a.0x1 = 0x58e,0x2
058f 013f       | ?  |		Execute	Select,Rendezvous
0590 00d1       |    |		Pop_Control	Pop_Count_1
0591 00c9       |    |		Action	Pop_Auxiliary_Loop
0592 7ffb       |    |		Jump	0x58e
0593			TRAP_0580:
0593 0007       |    |		Action	Break_Optional
0594 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x1a.0x2 = 0x594,0x5
0595 0000 0000  |    |		.XXX[0x3]
0597 0000       |    |
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; See instruction 0x02cf at 0x583, index=0xe
0598 ; --------------------------------------------------------------------------------------
0598 059b       |    |		.CONST	0x059b								; Address of begin
0599 0004       |    |		.CONST	0x0004								; Address of exception handler
059a 0001       |    |		.CONST	0x0001								; Number of locals
059b			BODY_0598:
059b			INIT_0598:
059b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b = .DEBUG	0x059b,0x0a08,0x0003,0x0000,0x0057,0x45e5,0x0000,0x090d
													; Debug Table 0x1b.0x0 = 0x59b,0x1
059c e001       |    |		Load	0x0,0x1
059d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
059e 017e       | ~  |		Execute	Record,Not_Equal
059f 682f       |h/  |		Jump_Zero	0x5cf
05a0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x1 = 0x5a0,0x2
05a1 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
05a2 e003       |    |		Load	0x0,0x3
05a3 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
05a4 6808       |h   |		Jump_Zero	0x5ad
05a5 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x2 = 0x5a5,0x3
05a6 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
05a7 4801       |H   |		Short_Literal	0x1
05a8 4800       |H   |		Short_Literal	0x0
05a9 e003       |    |		Load	0x0,0x3
05aa 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
05ab e7fe       |    |		Load	0x3,-0x2
05ac 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
05ad e212       |    |		Load	0x1,0x12							; Debug Table 0x1b.0x3 = 0x5ad,0x4
05ae 700c       |p   |		Jump_Nonzero	0x5bb
05af e20f       |    |		Load	0x1,0xf								; Debug Table 0x1b.0x4 = 0x5af,0x5
05b0 0322       | "  |		Declare_Variable	Record
05b1 e7fe       |    |		Load	0x3,-0x2
05b2 00d9       |    |		Load_Top	At_Offset_1
05b3 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05b4 e211       |    |		Load	0x1,0x11
05b5 00d9       |    |		Load_Top	At_Offset_1
05b6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05b7 e210       |    |		Load	0x1,0x10
05b8 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
05b9 a216       |    |		Store_Unchecked	0x1,0x16
05ba 780e       |x   |		Jump	0x5c9
05bb e212       |    |		Load	0x1,0x12							; Debug Table 0x1b.0x5 = 0x5bb,0x6
05bc a216       |    |		Store_Unchecked	0x1,0x16
05bd e212       |    |		Load	0x1,0x12							; Debug Table 0x1b.0x6 = 0x5bd,0x7
05be 0227       | '  |		Execute	Access,All_Reference
05bf 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05c0 a212       |    |		Store_Unchecked	0x1,0x12
05c1 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x7 = 0x5c1,0x8
05c2 e216       |    |		Load	0x1,0x16
05c3 0227       | '  |		Execute	Access,All_Reference
05c4 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05c5 e211       |    |		Load	0x1,0x11							; Debug Table 0x1b.0x8 = 0x5c5,0x9
05c6 e216       |    |		Load	0x1,0x16
05c7 0227       | '  |		Execute	Access,All_Reference
05c8 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05c9 e216       |    |		Load	0x1,0x16							; Debug Table 0x1b.0x9 = 0x5c9,0xa
05ca a211       |    |		Store_Unchecked	0x1,0x11
05cb e001       |    |		Load	0x0,0x1								; Debug Table 0x1b.0xa = 0x5cb,0xb
05cc 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
05cd e7fe       |    |		Load	0x3,-0x2
05ce 017d       | }  |		Execute	Record,Structure_Write
05cf 4101       |A   |		End_Rendezvous	0x1
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; See instruction 0x02cf at 0x583, index=0xd
05d0 ; --------------------------------------------------------------------------------------
05d0 05d3       |    |		.CONST	0x05d3								; Address of begin
05d1 0004       |    |		.CONST	0x0004								; Address of exception handler
05d2 0001       |    |		.CONST	0x0001								; Number of locals
05d3			BODY_05d0:
05d3			INIT_05d0:
05d3 e002       |    |		Load	0x0,0x2								; Debug Table 0x1c = .DEBUG	0x05d3,0x0a20,0x0003,0x0000,0x0057,0x45e5,0x0000,0x08bb
													; Debug Table 0x1c.0x0 = 0x5d3,0x1
05d4 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
05d5 c215       |    |		Store	0x1,0x15
05d6 e211       |    |		Load	0x1,0x11							; Debug Table 0x1c.0x1 = 0x5d6,0x2
05d7 700a       |p   |		Jump_Nonzero	0x5e2
05d8 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1c.0x2 = 0x5d8,0x3
05d9 e215       |    |		Load	0x1,0x15
05da e213       |    |		Load	0x1,0x13
05db e7fd       |    |		Load	0x3,-0x3
05dc e7fe       |    |		Load	0x3,-0x2
05dd 8004       |    |		Call	0x0,0x4
05de 00d1       |    |		Pop_Control	Pop_Count_1
05df c215       |    |		Store	0x1,0x15
05e0 c214       |    |		Store	0x1,0x14
05e1 781f       |x   |		Jump	0x601
05e2 e211       |    |		Load	0x1,0x11							; Debug Table 0x1c.0x3 = 0x5e2,0x4
05e3 0227       | '  |		Execute	Access,All_Reference
05e4 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
05e5 e213       |    |		Load	0x1,0x13
05e6 017d       | }  |		Execute	Record,Structure_Write
05e7 e211       |    |		Load	0x1,0x11							; Debug Table 0x1c.0x4 = 0x5e7,0x5
05e8 a216       |    |		Store_Unchecked	0x1,0x16
05e9 e211       |    |		Load	0x1,0x11							; Debug Table 0x1c.0x5 = 0x5e9,0x6
05ea 0227       | '  |		Execute	Access,All_Reference
05eb 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05ec a211       |    |		Store_Unchecked	0x1,0x11
05ed e001       |    |		Load	0x0,0x1								; Debug Table 0x1c.0x6 = 0x5ed,0x7
05ee 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
05ef e216       |    |		Load	0x1,0x16
05f0 0227       | '  |		Execute	Access,All_Reference
05f1 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05f2 e212       |    |		Load	0x1,0x12							; Debug Table 0x1c.0x7 = 0x5f2,0x8
05f3 e216       |    |		Load	0x1,0x16
05f4 0227       | '  |		Execute	Access,All_Reference
05f5 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05f6 e216       |    |		Load	0x1,0x16							; Debug Table 0x1c.0x8 = 0x5f6,0x9
05f7 a212       |    |		Store_Unchecked	0x1,0x12
05f8 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1c.0x9 = 0x5f8,0xa
05f9 e215       |    |		Load	0x1,0x15
05fa e213       |    |		Load	0x1,0x13
05fb e7fd       |    |		Load	0x3,-0x3
05fc e7fe       |    |		Load	0x3,-0x2
05fd 8005       |    |		Call	0x0,0x5
05fe 00d1       |    |		Pop_Control	Pop_Count_1
05ff c215       |    |		Store	0x1,0x15
0600 c214       |    |		Store	0x1,0x14
0601 e214       |    |		Load	0x1,0x14							; Debug Table 0x1c.0xa = 0x601,0xb
0602 6809       |h   |		Jump_Zero	0x60c
0603 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1c.0xb = 0x603,0xc
0604 e215       |    |		Load	0x1,0x15
0605 e7fd       |    |		Load	0x3,-0x3
0606 e213       |    |		Load	0x1,0x13
0607 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0608 e7fe       |    |		Load	0x3,-0x2
0609 8006       |    |		Call	0x0,0x6
060a c215       |    |		Store	0x1,0x15
060b c214       |    |		Store	0x1,0x14
060c e7fc       |    |		Load	0x3,-0x4							; Debug Table 0x1c.0xc = 0x60c,0xd
060d e213       |    |		Load	0x1,0x13
060e 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
060f e214       |    |		Load	0x1,0x14							; Debug Table 0x1c.0xd = 0x60f,0xe
0610 6804       |h   |		Jump_Zero	0x615
0611 e7fc       |    |		Load	0x3,-0x4							; Debug Table 0x1c.0xe = 0x611,0xf
0612 e003       |    |		Load	0x0,0x3
0613 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0614 7808       |x   |		Jump	0x61d
0615 e213       |    |		Load	0x1,0x13							; Debug Table 0x1c.0xf = 0x615,0x10
0616 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0617 4801       |H   |		Short_Literal	0x1
0618 4800       |H   |		Short_Literal	0x0
0619 e003       |    |		Load	0x0,0x3
061a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
061b e213       |    |		Load	0x1,0x13
061c 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
061d e213       |    |		Load	0x1,0x13							; Debug Table 0x1c.0x10 = 0x61d,0x11
061e e7fb       |    |		Load	0x3,-0x5
061f 017d       | }  |		Execute	Record,Structure_Write
0620 e215       |    |		Load	0x1,0x15							; Debug Table 0x1c.0x11 = 0x620,0x12
0621 c7fa       |    |		Store	0x3,-0x6
0622 e214       |    |		Load	0x1,0x14							; Debug Table 0x1c.0x12 = 0x622,0x13
0623 a7f9       |    |		Store_Unchecked	0x3,-0x7
0624 4103       |A   |		End_Rendezvous	0x3
0625 ; --------------------------------------------------------------------------------------
0625 ; STRING TABLE
0625 ; --------------------------------------------------------------------------------------
0625 001e       |    |		.STRTAB	0x001e->0x0634							; "SUCCESS"
0626 0023       | #  |		.STRTAB	0x0023->0x0637							; "UNHANDLED_EXCEPTION_FAILURE"
0627 003c       | <  |		.STRTAB	0x003c->0x0645							; "CODE_GENERATION_FAILURE"
0628 0051       | Q  |		.STRTAB	0x0051->0x0650							; "OTHER_FAILURE"
0629 005c       | \  |		.STRTAB	0x005c->0x0657							; "Create: "
062a 0062       | b  |		.STRTAB	0x0062->0x065b							; "Open: "
062b 0066       | f  |		.STRTAB	0x0066->0x065e							; "'s Ada Unit failed on Temp_Ada_Heap.Create"
062c 008e       |    |		.STRTAB	0x008e->0x0673							; "'s Code Segment failed on Destroy: "
062d 00af       |    |		.STRTAB	0x00af->0x0684							; "'s Unit failed on Destroy: "
062e 00c8       |    |		.STRTAB	0x00c8->0x0692							; "'s code segment failed reset_for_modification: "
062f 00f5       |    |		.STRTAB	0x00f5->0x06a9							; "command_procedure"
0630 0104       |    |		.STRTAB	0x0104->0x06b2							; "'s copy's Unit failed Set_Root: "
0631 0122       | "  |		.STRTAB	0x0122->0x06c2							; "'s code segment failed on "
0632 013a       | :  |		.STRTAB	0x013a->0x06cf							; " failed Tree_Compaction.Compact: unhandled exception"
0633 016c       | l  |		.STREND 0x016c->0x06e9
0634 5355 4343  |SUCC|		.STRTAB_STRINGS
06e9 0000 0000  |    |		.BLANK	0000[0x7]
06f0 ; --------------------------------------------------------------------------------------
06f0 ; Debug Table
06f0 ; --------------------------------------------------------------------------------------
06f0 0003 001d  |    |		.CONST	0x0003,0x001d
06f2 000b 07da  |    |		.DEBUG	0x000b,0x07da,0x8000,0x0000,0x0057,0x4575,0x0000,0x000f
06fa 0056 07f4  | V  |		.DEBUG	0x0056,0x07f4,0x8000,0x0000,0x0057,0x45e5,0x0000,0x001d
0702 00b3 0834  |   4|		.DEBUG	0x00b3,0x0834,0x0005,0x0000,0x0057,0x4575,0x0000,0x0023
070a 00cb 0836  |   6|		.DEBUG	0x00cb,0x0836,0x0005,0x0000,0x0057,0x4575,0x0000,0x002b
0712 0113 0838  |   8|		.DEBUG	0x0113,0x0838,0x0001,0x0000,0x0057,0x4575,0x0000,0x0051
071a 0133 0846  | 3 F|		.DEBUG	0x0133,0x0846,0x0001,0x0000,0x0057,0x4575,0x0000,0x006c
0722 01cb 0872  |   r|		.DEBUG	0x01cb,0x0872,0x0001,0x0000,0x0057,0x4575,0x0000,0x0083
072a 020b 0886  |    |		.DEBUG	0x020b,0x0886,0x0005,0x0000,0x0057,0x4575,0x0000,0x0090
0732 022b 0888  | +  |		.DEBUG	0x022b,0x0888,0x0001,0x0000,0x0057,0x45e5,0x0000,0x021f
073a 0243 0898  | C  |		.DEBUG	0x0243,0x0898,0x0001,0x0000,0x0057,0x45e5,0x0000,0x025a
0742 02ab 08bc  |    |		.DEBUG	0x02ab,0x08bc,0x0001,0x0000,0x0057,0x45e5,0x0000,0x0325
074a 02d3 08cc  |    |		.DEBUG	0x02d3,0x08cc,0x0001,0x0000,0x0057,0x45e5,0x0000,0x037c
0752 0303 08de  |    |		.DEBUG	0x0303,0x08de,0x0001,0x0000,0x0057,0x45e5,0x0000,0x03dd
075a 0333 08f0  | 3  |		.DEBUG	0x0333,0x08f0,0x0001,0x0000,0x0057,0x45e5,0x0000,0x0442
0762 0373 090e  | s  |		.DEBUG	0x0373,0x090e,0x0001,0x0000,0x0057,0x45e5,0x0000,0x04ce
076a 03bb 0932  |   2|		.DEBUG	0x03bb,0x0932,0x0001,0x0000,0x0057,0x45e5,0x0000,0x0556
0772 03e3 0940  |   @|		.DEBUG	0x03e3,0x0940,0x0002,0x0000,0x0057,0x45e5,0x0000,0x05ac
077a 03fb 094c  |   L|		.DEBUG	0x03fb,0x094c,0x0001,0x0000,0x0057,0x45e5,0x0000,0x05e7
0782 0433 0966  | 3 f|		.DEBUG	0x0433,0x0966,0x0001,0x0000,0x0057,0x45e5,0x0000,0x064b
078a 046b 0984  | k  |		.DEBUG	0x046b,0x0984,0x0001,0x0000,0x0057,0x45e5,0x0000,0x06b4
0792 04eb 09c8  |    |		.DEBUG	0x04eb,0x09c8,0x0001,0x0000,0x0057,0x45e5,0x0000,0x0291
079a 0503 09d0  |    |		.DEBUG	0x0503,0x09d0,0x0001,0x0000,0x0057,0x45e5,0x0000,0x04f6
07a2 051b 09d8  |    |		.DEBUG	0x051b,0x09d8,0x0004,0x0000,0x0057,0x45e5,0x0000,0x072d
07aa 053b 09e4  | ;  |		.DEBUG	0x053b,0x09e4,0x0000,0x0000,0x0057,0x45e5,0x0000,0x005a
07b2 0540 09e6  | @  |		.DEBUG	0x0540,0x09e6,0x0000,0x0000,0x0057,0x45e5,0x0000,0x07ee
07ba 056b 09fe  | k  |		.DEBUG	0x056b,0x09fe,0x0005,0x0000,0x0057,0x45e5,0x0000,0x07f8
07c2 0583 0a00  |    |		.DEBUG	0x0583,0x0a00,0x0004,0x0000,0x0057,0x45e5,0x0000,0x091c
07ca 059b 0a08  |    |		.DEBUG	0x059b,0x0a08,0x0003,0x0000,0x0057,0x45e5,0x0000,0x090d
07d2 05d3 0a20  |    |		.DEBUG	0x05d3,0x0a20,0x0003,0x0000,0x0057,0x45e5,0x0000,0x08bb
07da ; --------------------------------------------------------------------------------------
07da ; Debug3 Subtable 0x0
07da ; --------------------------------------------------------------------------------------
07da 000c 0000  |    |		.DBG3TAB	0x000c,0x0000
07dc 000b ffff  |    |		.CONST	0x000b,0xffff
07de 000c fffe  |    |		.CONST	0x000c,0xfffe
07e0 000d fffd  |    |		.CONST	0x000d,0xfffd
07e2 000e fffc  |    |		.CONST	0x000e,0xfffc
07e4 0013 fffb  |    |		.CONST	0x0013,0xfffb
07e6 0021 fffa  | !  |		.CONST	0x0021,0xfffa
07e8 0023 fff9  | #  |		.CONST	0x0023,0xfff9
07ea 0025 fff8  | %  |		.CONST	0x0025,0xfff8
07ec 0026 fff7  | &  |		.CONST	0x0026,0xfff7
07ee 0028 fff6  | (  |		.CONST	0x0028,0xfff6
07f0 002a fff5  | *  |		.CONST	0x002a,0xfff5
07f2 0038 fff4  | 8  |		.CONST	0x0038,0xfff4
07f4 ; --------------------------------------------------------------------------------------
07f4 ; Debug3 Subtable 0x1
07f4 ; --------------------------------------------------------------------------------------
07f4 001c 0003  |    |		.DBG3TAB	0x001c,0x0003
07f6 0056 ffff  | V  |		.CONST	0x0056,0xffff
07f8 0057 fffe  | W  |		.CONST	0x0057,0xfffe
07fa 0058 fffd  | X  |		.CONST	0x0058,0xfffd
07fc 0059 fffc  | Y  |		.CONST	0x0059,0xfffc
07fe 005a fffb  | Z  |		.CONST	0x005a,0xfffb
0800 005b fffa  | [  |		.CONST	0x005b,0xfffa
0802 005e fff9  | ^  |		.CONST	0x005e,0xfff9
0804 0060 fff8  | `  |		.CONST	0x0060,0xfff8
0806 0065 fff7  | e  |		.CONST	0x0065,0xfff7
0808 0067 fff6  | g  |		.CONST	0x0067,0xfff6
080a 0068 fff5  | h  |		.CONST	0x0068,0xfff5
080c 006d fff4  | m  |		.CONST	0x006d,0xfff4
080e 006f fff3  | o  |		.CONST	0x006f,0xfff3
0810 0071 fff2  | q  |		.CONST	0x0071,0xfff2
0812 0073 fff1  | s  |		.CONST	0x0073,0xfff1
0814 0075 fff0  | u  |		.CONST	0x0075,0xfff0
0816 0077 ffef  | w  |		.CONST	0x0077,0xffef
0818 0079 ffee  | y  |		.CONST	0x0079,0xffee
081a 007b ffed  | {  |		.CONST	0x007b,0xffed
081c 007d ffec  | }  |		.CONST	0x007d,0xffec
081e 007f ffeb  |    |		.CONST	0x007f,0xffeb
0820 0081 ffea  |    |		.CONST	0x0081,0xffea
0822 0083 ffe9  |    |		.CONST	0x0083,0xffe9
0824 0085 ffe8  |    |		.CONST	0x0085,0xffe8
0826 0087 ffe7  |    |		.CONST	0x0087,0xffe7
0828 0089 ffe6  |    |		.CONST	0x0089,0xffe6
082a 008b ffe5  |    |		.CONST	0x008b,0xffe5
082c 0095 0001  |    |		.CONST	0x0095,0x0001
082e 009a 0002  |    |		.CONST	0x009a,0x0002
0830 009b fbff  |    |		.CONST	0x009b,0xfbff
0832 00a0 0401  |    |		.CONST	0x00a0,0x0401
0834 ; --------------------------------------------------------------------------------------
0834 ; Debug3 Subtable 0x2
0834 ; --------------------------------------------------------------------------------------
0834 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0836 ; --------------------------------------------------------------------------------------
0836 ; Debug3 Subtable 0x3
0836 ; --------------------------------------------------------------------------------------
0836 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0838 ; --------------------------------------------------------------------------------------
0838 ; Debug3 Subtable 0x4
0838 ; --------------------------------------------------------------------------------------
0838 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
083a 0113 ffff  |    |		.CONST	0x0113,0xffff
083c 0117 fffe  |    |		.CONST	0x0117,0xfffe
083e 011b 0001  |    |		.CONST	0x011b,0x0001
0840 0121 0002  | !  |		.CONST	0x0121,0x0002
0842 0124 0003  | $  |		.CONST	0x0124,0x0003
0844 0128 0004  | (  |		.CONST	0x0128,0x0004
0846 ; --------------------------------------------------------------------------------------
0846 ; Debug3 Subtable 0x5
0846 ; --------------------------------------------------------------------------------------
0846 0004 0011  |    |		.DBG3TAB	0x0004,0x0011
0848 0133 ffff  | 3  |		.CONST	0x0133,0xffff
084a 0138 fffe  | 8  |		.CONST	0x0138,0xfffe
084c 0139 fffd  | 9  |		.CONST	0x0139,0xfffd
084e 013a fffc  | :  |		.CONST	0x013a,0xfffc
0850 013e 0001  | >  |		.CONST	0x013e,0x0001
0852 0143 0002  | C  |		.CONST	0x0143,0x0002
0854 0158 0003  | X  |		.CONST	0x0158,0x0003
0856 015a 0004  | Z  |		.CONST	0x015a,0x0004
0858 0165 0005  | e  |		.CONST	0x0165,0x0005
085a 016b 0006  | k  |		.CONST	0x016b,0x0006
085c 0190 0007  |    |		.CONST	0x0190,0x0007
085e 0192 0008  |    |		.CONST	0x0192,0x0008
0860 019a 0009  |    |		.CONST	0x019a,0x0009
0862 019c 000a  |    |		.CONST	0x019c,0x000a
0864 01a7 000b  |    |		.CONST	0x01a7,0x000b
0866 01aa 000c  |    |		.CONST	0x01aa,0x000c
0868 01b0 000d  |    |		.CONST	0x01b0,0x000d
086a 01b5 000e  |    |		.CONST	0x01b5,0x000e
086c 01ba 000f  |    |		.CONST	0x01ba,0x000f
086e 01bf 0010  |    |		.CONST	0x01bf,0x0010
0870 01c2 0011  |    |		.CONST	0x01c2,0x0011
0872 ; --------------------------------------------------------------------------------------
0872 ; Debug3 Subtable 0x6
0872 ; --------------------------------------------------------------------------------------
0872 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
0874 01cb ffff  |    |		.CONST	0x01cb,0xffff
0876 01d1 0001  |    |		.CONST	0x01d1,0x0001
0878 01dd 0002  |    |		.CONST	0x01dd,0x0002
087a 01e3 0003  |    |		.CONST	0x01e3,0x0003
087c 01e9 0004  |    |		.CONST	0x01e9,0x0004
087e 01f3 0005  |    |		.CONST	0x01f3,0x0005
0880 01f8 0006  |    |		.CONST	0x01f8,0x0006
0882 01fe 0007  |    |		.CONST	0x01fe,0x0007
0884 0203 0008  |    |		.CONST	0x0203,0x0008
0886 ; --------------------------------------------------------------------------------------
0886 ; Debug3 Subtable 0x7
0886 ; --------------------------------------------------------------------------------------
0886 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0888 ; --------------------------------------------------------------------------------------
0888 ; Debug3 Subtable 0x8
0888 ; --------------------------------------------------------------------------------------
0888 0000 0007  |    |		.DBG3TAB	0x0000,0x0007
088a 022b 0001  | +  |		.CONST	0x022b,0x0001
088c 022c 0401  | ,  |		.CONST	0x022c,0x0401
088e 022d 0001  | -  |		.CONST	0x022d,0x0001
0890 022e 0801  | .  |		.CONST	0x022e,0x0801
0892 022f 0401  | /  |		.CONST	0x022f,0x0401
0894 0231 0c01  | 1  |		.CONST	0x0231,0x0c01
0896 0232 0801  | 2  |		.CONST	0x0232,0x0801
0898 ; --------------------------------------------------------------------------------------
0898 ; Debug3 Subtable 0x9
0898 ; --------------------------------------------------------------------------------------
0898 0005 000c  |    |		.DBG3TAB	0x0005,0x000c
089a 0243 ffff  | C  |		.CONST	0x0243,0xffff
089c 0245 fffe  | E  |		.CONST	0x0245,0xfffe
089e 0247 fffd  | G  |		.CONST	0x0247,0xfffd
08a0 024c fffc  | L  |		.CONST	0x024c,0xfffc
08a2 024e fffb  | N  |		.CONST	0x024e,0xfffb
08a4 0250 0001  | P  |		.CONST	0x0250,0x0001
08a6 025f 0002  | _  |		.CONST	0x025f,0x0002
08a8 0261 0003  | a  |		.CONST	0x0261,0x0003
08aa 026b 0004  | k  |		.CONST	0x026b,0x0004
08ac 026c 0005  | l  |		.CONST	0x026c,0x0005
08ae 0272 0006  | r  |		.CONST	0x0272,0x0006
08b0 0273 0007  | s  |		.CONST	0x0273,0x0007
08b2 0290 0008  |    |		.CONST	0x0290,0x0008
08b4 0292 0009  |    |		.CONST	0x0292,0x0009
08b6 029b 000a  |    |		.CONST	0x029b,0x000a
08b8 029c 000b  |    |		.CONST	0x029c,0x000b
08ba 029e 000c  |    |		.CONST	0x029e,0x000c
08bc ; --------------------------------------------------------------------------------------
08bc ; Debug3 Subtable 0xa
08bc ; --------------------------------------------------------------------------------------
08bc 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
08be 02ab ffff  |    |		.CONST	0x02ab,0xffff
08c0 02ac 0001  |    |		.CONST	0x02ac,0x0001
08c2 02b2 0002  |    |		.CONST	0x02b2,0x0002
08c4 02b7 0003  |    |		.CONST	0x02b7,0x0003
08c6 02bd 0004  |    |		.CONST	0x02bd,0x0004
08c8 02c1 0005  |    |		.CONST	0x02c1,0x0005
08ca 02c3 0006  |    |		.CONST	0x02c3,0x0006
08cc ; --------------------------------------------------------------------------------------
08cc ; Debug3 Subtable 0xb
08cc ; --------------------------------------------------------------------------------------
08cc 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
08ce 02d3 ffff  |    |		.CONST	0x02d3,0xffff
08d0 02d5 0001  |    |		.CONST	0x02d5,0x0001
08d2 02e1 0002  |    |		.CONST	0x02e1,0x0002
08d4 02e3 0003  |    |		.CONST	0x02e3,0x0003
08d6 02f1 0004  |    |		.CONST	0x02f1,0x0004
08d8 02f3 0005  |    |		.CONST	0x02f3,0x0005
08da 02f4 0006  |    |		.CONST	0x02f4,0x0006
08dc 02f8 0007  |    |		.CONST	0x02f8,0x0007
08de ; --------------------------------------------------------------------------------------
08de ; Debug3 Subtable 0xc
08de ; --------------------------------------------------------------------------------------
08de 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
08e0 0303 ffff  |    |		.CONST	0x0303,0xffff
08e2 0305 0001  |    |		.CONST	0x0305,0x0001
08e4 0310 0002  |    |		.CONST	0x0310,0x0002
08e6 0312 0003  |    |		.CONST	0x0312,0x0003
08e8 0320 0004  |    |		.CONST	0x0320,0x0004
08ea 0322 0005  | "  |		.CONST	0x0322,0x0005
08ec 0323 0006  | #  |		.CONST	0x0323,0x0006
08ee 0327 0007  | '  |		.CONST	0x0327,0x0007
08f0 ; --------------------------------------------------------------------------------------
08f0 ; Debug3 Subtable 0xd
08f0 ; --------------------------------------------------------------------------------------
08f0 0001 000d  |    |		.DBG3TAB	0x0001,0x000d
08f2 0333 ffff  | 3  |		.CONST	0x0333,0xffff
08f4 0334 0001  | 4  |		.CONST	0x0334,0x0001
08f6 0336 0002  | 6  |		.CONST	0x0336,0x0002
08f8 0339 0003  | 9  |		.CONST	0x0339,0x0003
08fa 0344 0004  | D  |		.CONST	0x0344,0x0004
08fc 0346 0005  | F  |		.CONST	0x0346,0x0005
08fe 0348 0006  | H  |		.CONST	0x0348,0x0006
0900 034b 0007  | K  |		.CONST	0x034b,0x0007
0902 0356 0008  | V  |		.CONST	0x0356,0x0008
0904 0358 0009  | X  |		.CONST	0x0358,0x0009
0906 035a 000a  | Z  |		.CONST	0x035a,0x000a
0908 0360 000b  | `  |		.CONST	0x0360,0x000b
090a 036b 000c  | k  |		.CONST	0x036b,0x000c
090c 036d 000d  | m  |		.CONST	0x036d,0x000d
090e ; --------------------------------------------------------------------------------------
090e ; Debug3 Subtable 0xe
090e ; --------------------------------------------------------------------------------------
090e 0003 000e  |    |		.DBG3TAB	0x0003,0x000e
0910 0373 ffff  | s  |		.CONST	0x0373,0xffff
0912 0378 fffe  | x  |		.CONST	0x0378,0xfffe
0914 0379 fffd  | y  |		.CONST	0x0379,0xfffd
0916 037b 0001  | {  |		.CONST	0x037b,0x0001
0918 0385 0002  |    |		.CONST	0x0385,0x0002
091a 0387 0003  |    |		.CONST	0x0387,0x0003
091c 0388 0004  |    |		.CONST	0x0388,0x0004
091e 0389 0005  |    |		.CONST	0x0389,0x0005
0920 0393 0006  |    |		.CONST	0x0393,0x0006
0922 0395 0007  |    |		.CONST	0x0395,0x0007
0924 0396 0008  |    |		.CONST	0x0396,0x0008
0926 0397 0009  |    |		.CONST	0x0397,0x0009
0928 03a8 000a  |    |		.CONST	0x03a8,0x000a
092a 03aa 000b  |    |		.CONST	0x03aa,0x000b
092c 03ab 000c  |    |		.CONST	0x03ab,0x000c
092e 03ac 000d  |    |		.CONST	0x03ac,0x000d
0930 03af 000e  |    |		.CONST	0x03af,0x000e
0932 ; --------------------------------------------------------------------------------------
0932 ; Debug3 Subtable 0xf
0932 ; --------------------------------------------------------------------------------------
0932 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
0934 03bb ffff  |    |		.CONST	0x03bb,0xffff
0936 03bd 0001  |    |		.CONST	0x03bd,0x0001
0938 03c8 0002  |    |		.CONST	0x03c8,0x0002
093a 03ca 0003  |    |		.CONST	0x03ca,0x0003
093c 03cd 0004  |    |		.CONST	0x03cd,0x0004
093e 03cf 0005  |    |		.CONST	0x03cf,0x0005
0940 ; --------------------------------------------------------------------------------------
0940 ; Debug3 Subtable 0x10
0940 ; --------------------------------------------------------------------------------------
0940 0003 0002  |    |		.DBG3TAB	0x0003,0x0002
0942 03e3 ffff  |    |		.CONST	0x03e3,0xffff
0944 03e4 fffe  |    |		.CONST	0x03e4,0xfffe
0946 03e5 fffd  |    |		.CONST	0x03e5,0xfffd
0948 03eb 0001  |    |		.CONST	0x03eb,0x0001
094a 03f2 0002  |    |		.CONST	0x03f2,0x0002
094c ; --------------------------------------------------------------------------------------
094c ; Debug3 Subtable 0x11
094c ; --------------------------------------------------------------------------------------
094c 0001 000b  |    |		.DBG3TAB	0x0001,0x000b
094e 03fb ffff  |    |		.CONST	0x03fb,0xffff
0950 03fc 0001  |    |		.CONST	0x03fc,0x0001
0952 03ff 0002  |    |		.CONST	0x03ff,0x0002
0954 0408 0003  |    |		.CONST	0x0408,0x0003
0956 040a 0004  |    |		.CONST	0x040a,0x0004
0958 040c 0005  |    |		.CONST	0x040c,0x0005
095a 040d 0006  |    |		.CONST	0x040d,0x0006
095c 041b 0007  |    |		.CONST	0x041b,0x0007
095e 041d 0008  |    |		.CONST	0x041d,0x0008
0960 041f 0009  |    |		.CONST	0x041f,0x0009
0962 0420 000a  |    |		.CONST	0x0420,0x000a
0964 0426 000b  | &  |		.CONST	0x0426,0x000b
0966 ; --------------------------------------------------------------------------------------
0966 ; Debug3 Subtable 0x12
0966 ; --------------------------------------------------------------------------------------
0966 0001 000d  |    |		.DBG3TAB	0x0001,0x000d
0968 0433 ffff  | 3  |		.CONST	0x0433,0xffff
096a 0434 0001  | 4  |		.CONST	0x0434,0x0001
096c 0436 0002  | 6  |		.CONST	0x0436,0x0002
096e 0441 0003  | A  |		.CONST	0x0441,0x0003
0970 0443 0004  | C  |		.CONST	0x0443,0x0004
0972 0445 0005  | E  |		.CONST	0x0445,0x0005
0974 0446 0006  | F  |		.CONST	0x0446,0x0006
0976 0451 0007  | Q  |		.CONST	0x0451,0x0007
0978 0453 0008  | S  |		.CONST	0x0453,0x0008
097a 0455 0009  | U  |		.CONST	0x0455,0x0009
097c 0456 000a  | V  |		.CONST	0x0456,0x000a
097e 0461 000b  | a  |		.CONST	0x0461,0x000b
0980 0463 000c  | c  |		.CONST	0x0463,0x000c
0982 0465 000d  | e  |		.CONST	0x0465,0x000d
0984 ; --------------------------------------------------------------------------------------
0984 ; Debug3 Subtable 0x13
0984 ; --------------------------------------------------------------------------------------
0984 0006 001b  |    |		.DBG3TAB	0x0006,0x001b
0986 046b ffff  | k  |		.CONST	0x046b,0xffff
0988 0473 fffe  | s  |		.CONST	0x0473,0xfffe
098a 0474 fffd  | t  |		.CONST	0x0474,0xfffd
098c 0475 fffc  | u  |		.CONST	0x0475,0xfffc
098e 0477 fffb  | w  |		.CONST	0x0477,0xfffb
0990 047a fffa  | z  |		.CONST	0x047a,0xfffa
0992 047c 0001  | |  |		.CONST	0x047c,0x0001
0994 0483 0002  |    |		.CONST	0x0483,0x0002
0996 0484 0003  |    |		.CONST	0x0484,0x0003
0998 0485 0401  |    |		.CONST	0x0485,0x0401
099a 0487 0402  |    |		.CONST	0x0487,0x0402
099c 0488 0403  |    |		.CONST	0x0488,0x0403
099e 0489 0404  |    |		.CONST	0x0489,0x0404
09a0 048a 0003  |    |		.CONST	0x048a,0x0003
09a2 048c 0009  |    |		.CONST	0x048c,0x0009
09a4 048d 0004  |    |		.CONST	0x048d,0x0004
09a6 0493 0005  |    |		.CONST	0x0493,0x0005
09a8 0494 0801  |    |		.CONST	0x0494,0x0801
09aa 0495 0005  |    |		.CONST	0x0495,0x0005
09ac 049a 0c01  |    |		.CONST	0x049a,0x0c01
09ae 049b 0801  |    |		.CONST	0x049b,0x0801
09b0 04a5 1001  |    |		.CONST	0x04a5,0x1001
09b2 04a6 0c01  |    |		.CONST	0x04a6,0x0c01
09b4 04ad 0006  |    |		.CONST	0x04ad,0x0006
09b6 04b6 0007  |    |		.CONST	0x04b6,0x0007
09b8 04bf 0008  |    |		.CONST	0x04bf,0x0008
09ba 04c5 000a  |    |		.CONST	0x04c5,0x000a
09bc 04c9 000b  |    |		.CONST	0x04c9,0x000b
09be 04d2 000c  |    |		.CONST	0x04d2,0x000c
09c0 04d4 000d  |    |		.CONST	0x04d4,0x000d
09c2 04e1 000e  |    |		.CONST	0x04e1,0x000e
09c4 04e3 000f  |    |		.CONST	0x04e3,0x000f
09c6 04e4 0010  |    |		.CONST	0x04e4,0x0010
09c8 ; --------------------------------------------------------------------------------------
09c8 ; Debug3 Subtable 0x14
09c8 ; --------------------------------------------------------------------------------------
09c8 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
09ca 04eb 0001  |    |		.CONST	0x04eb,0x0001
09cc 04ef 0002  |    |		.CONST	0x04ef,0x0002
09ce 04f1 0003  |    |		.CONST	0x04f1,0x0003
09d0 ; --------------------------------------------------------------------------------------
09d0 ; Debug3 Subtable 0x15
09d0 ; --------------------------------------------------------------------------------------
09d0 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
09d2 0503 0001  |    |		.CONST	0x0503,0x0001
09d4 050c 0002  |    |		.CONST	0x050c,0x0002
09d6 050f 0003  |    |		.CONST	0x050f,0x0003
09d8 ; --------------------------------------------------------------------------------------
09d8 ; Debug3 Subtable 0x16
09d8 ; --------------------------------------------------------------------------------------
09d8 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
09da 051b 0001  |    |		.CONST	0x051b,0x0001
09dc 0522 0002  | "  |		.CONST	0x0522,0x0002
09de 0529 0003  | )  |		.CONST	0x0529,0x0003
09e0 052b 0004  | +  |		.CONST	0x052b,0x0004
09e2 052f 0005  | /  |		.CONST	0x052f,0x0005
09e4 ; --------------------------------------------------------------------------------------
09e4 ; Debug3 Subtable 0x17
09e4 ; --------------------------------------------------------------------------------------
09e4 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
09e6 ; --------------------------------------------------------------------------------------
09e6 ; Debug3 Subtable 0x18
09e6 ; --------------------------------------------------------------------------------------
09e6 0009 0002  |    |		.DBG3TAB	0x0009,0x0002
09e8 0540 ffff  | @  |		.CONST	0x0540,0xffff
09ea 0542 fffe  | B  |		.CONST	0x0542,0xfffe
09ec 0546 fffd  | F  |		.CONST	0x0546,0xfffd
09ee 054d fffc  | M  |		.CONST	0x054d,0xfffc
09f0 054f fffb  | O  |		.CONST	0x054f,0xfffb
09f2 0551 fffa  | Q  |		.CONST	0x0551,0xfffa
09f4 0556 fff9  | V  |		.CONST	0x0556,0xfff9
09f6 0557 fff8  | W  |		.CONST	0x0557,0xfff8
09f8 055c fff7  | \  |		.CONST	0x055c,0xfff7
09fa 0561 0001  | a  |		.CONST	0x0561,0x0001
09fc 0562 0002  | b  |		.CONST	0x0562,0x0002
09fe ; --------------------------------------------------------------------------------------
09fe ; Debug3 Subtable 0x19
09fe ; --------------------------------------------------------------------------------------
09fe 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0a00 ; --------------------------------------------------------------------------------------
0a00 ; Debug3 Subtable 0x1a
0a00 ; --------------------------------------------------------------------------------------
0a00 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0a02 058d 0001  |    |		.CONST	0x058d,0x0001
0a04 058e 0002  |    |		.CONST	0x058e,0x0002
0a06 0594 0005  |    |		.CONST	0x0594,0x0005
0a08 ; --------------------------------------------------------------------------------------
0a08 ; Debug3 Subtable 0x1b
0a08 ; --------------------------------------------------------------------------------------
0a08 0000 000b  |    |		.DBG3TAB	0x0000,0x000b
0a0a 059b 0001  |    |		.CONST	0x059b,0x0001
0a0c 05a0 0002  |    |		.CONST	0x05a0,0x0002
0a0e 05a5 0003  |    |		.CONST	0x05a5,0x0003
0a10 05ad 0004  |    |		.CONST	0x05ad,0x0004
0a12 05af 0005  |    |		.CONST	0x05af,0x0005
0a14 05bb 0006  |    |		.CONST	0x05bb,0x0006
0a16 05bd 0007  |    |		.CONST	0x05bd,0x0007
0a18 05c1 0008  |    |		.CONST	0x05c1,0x0008
0a1a 05c5 0009  |    |		.CONST	0x05c5,0x0009
0a1c 05c9 000a  |    |		.CONST	0x05c9,0x000a
0a1e 05cb 000b  |    |		.CONST	0x05cb,0x000b
0a20 ; --------------------------------------------------------------------------------------
0a20 ; Debug3 Subtable 0x1c
0a20 ; --------------------------------------------------------------------------------------
0a20 0000 0013  |    |		.DBG3TAB	0x0000,0x0013
0a22 05d3 0001  |    |		.CONST	0x05d3,0x0001
0a24 05d6 0002  |    |		.CONST	0x05d6,0x0002
0a26 05d8 0003  |    |		.CONST	0x05d8,0x0003
0a28 05e2 0004  |    |		.CONST	0x05e2,0x0004
0a2a 05e7 0005  |    |		.CONST	0x05e7,0x0005
0a2c 05e9 0006  |    |		.CONST	0x05e9,0x0006
0a2e 05ed 0007  |    |		.CONST	0x05ed,0x0007
0a30 05f2 0008  |    |		.CONST	0x05f2,0x0008
0a32 05f6 0009  |    |		.CONST	0x05f6,0x0009
0a34 05f8 000a  |    |		.CONST	0x05f8,0x000a
0a36 0601 000b  |    |		.CONST	0x0601,0x000b
0a38 0603 000c  |    |		.CONST	0x0603,0x000c
0a3a 060c 000d  |    |		.CONST	0x060c,0x000d
0a3c 060f 000e  |    |		.CONST	0x060f,0x000e
0a3e 0611 000f  |    |		.CONST	0x0611,0x000f
0a40 0615 0010  |    |		.CONST	0x0615,0x0010
0a42 061d 0011  |    |		.CONST	0x061d,0x0011
0a44 0620 0012  |    |		.CONST	0x0620,0x0012
0a46 0622 0013  | "  |		.CONST	0x0622,0x0013
0a48 0000 0000  |    |		.BLANK	0000[0x1b8]