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

⟦ec50df345⟧

    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 0698       |    |		.CONST	0x0698								; 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 0045       | E  |		.CONST	0x0045								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0021       | !  |		.CONST	0x0021								; Number of locals
000b			INIT_0008:
000b 029a 004b  |   K|		Declare_Subprogram	INIT_0048,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x0752,0x8000,0x0000,0x0057,0x3595,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 00bf       |    |		Action	Accept_Activation
0012 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0012,0x075a,0x8000,0x0000,0x0058,0xc1a5,0x0000,0x001b
													; Debug Table 0x1.0x0 = 0x12,0xffff
0013 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x13,0xfffe
0014 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x14,0xfffd
0015 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x15,0xfffc
0016 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x4 = 0x16,0xfffb
0017 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x5 = 0x17,0xfffa
0018 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x6 = 0x18,0xfff9
0019 4802       |H   |		Short_Literal	0x2
001a 029f 00fb  |    |		Declare_Subprogram	INIT_00f8,For_Call
001c 03fd       |    |		Declare_Type	Discrete,Defined
001d 029d 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call			; Debug Table 0x1.0x7 = 0x1d,0xfff8
001f 029d 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call			; Debug Table 0x1.0x8 = 0x1f,0xfff7
0021 029d 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call			; Debug Table 0x1.0x9 = 0x21,0xfff6
0023 029d 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call			; Debug Table 0x1.0xa = 0x23,0xfff5
0025 029d 0193  |    |		Declare_Subprogram	INIT_0190,For_Outer_Call			; Debug Table 0x1.0xb = 0x25,0xfff4
0027 029d 0283  |    |		Declare_Subprogram	INIT_0280,For_Outer_Call			; Debug Table 0x1.0xc = 0x27,0xfff3
0029 029d 0383  |    |		Declare_Subprogram	INIT_0380,For_Outer_Call			; Debug Table 0x1.0xd = 0x29,0xfff2
002b 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0xe = 0x2b,0xfff1
002c 00c7       |    |		Action	Elaborate_Subprogram
002d 029d 0443  |   C|		Declare_Subprogram	INIT_0440,For_Outer_Call			; Debug Table 0x1.0xf = 0x2d,0xfff0
002f 029d 046b  |   k|		Declare_Subprogram	INIT_0468,For_Outer_Call			; Debug Table 0x1.0x10 = 0x2f,0xffef
0031 029d 04d3  |    |		Declare_Subprogram	INIT_04d0,For_Outer_Call			; Debug Table 0x1.0x11 = 0x31,0xffee
0033 029d 04f3  |    |		Declare_Subprogram	INIT_04f0,For_Outer_Call			; Debug Table 0x1.0x12 = 0x33,0xffed
0035 029d 0513  |    |		Declare_Subprogram	INIT_0510,For_Outer_Call			; Debug Table 0x1.0x13 = 0x35,0xffec
0037 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x14 = 0x37,0xffeb
0038 00c7       |    |		Action	Elaborate_Subprogram
0039 029d 0533  |   3|		Declare_Subprogram	INIT_0530,For_Outer_Call			; Debug Table 0x1.0x15 = 0x39,0xffea
003b 029d 0553  |   S|		Declare_Subprogram	INIT_0550,For_Outer_Call			; Debug Table 0x1.0x16 = 0x3b,0xffe9
003d 029d 0563  |   c|		Declare_Subprogram	INIT_0560,For_Outer_Call			; Debug Table 0x1.0x17 = 0x3d,0xffe8
003f 029d 0573  |   s|		Declare_Subprogram	INIT_0570,For_Outer_Call			; Debug Table 0x1.0x18 = 0x3f,0xffe7
0041 029d 05a3  |    |		Declare_Subprogram	INIT_05a0,For_Outer_Call			; Debug Table 0x1.0x19 = 0x41,0xffe6
0043 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x1a = 0x43,0xffe5
0044 00c7       |    |		Action	Elaborate_Subprogram
0045			BODY_0008:
0045 00bc       |    |		Action	Signal_Activated
0046 00bb       |    |		Action	Signal_Completion
0047 0000       |    |		.XXX[0x1]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b       | K  |		.CONST	0x004b								; Address of begin
0049 0004       |    |		.CONST	0x0004								; Address of exception handler
004a 0001       |    |		.CONST	0x0001								; Number of locals
004b			BODY_0048:
004b			INIT_0048:
004b 481c       |H   |		Short_Literal	0x1c							; Debug Table 0x2 = .DEBUG	0x004b,0x0792,0x0002,0x0000,0x0057,0x3595,0x0000,0x0006
													; Debug Table 0x2.0x0 = 0x4b,0x1
004c e001       |    |		Load	0x0,0x1
004d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
004e 6806       |h   |		Jump_Zero	0x55
004f 4802       |H   |		Short_Literal	0x2
0050 00db       |    |		Load_Top	At_Offset_3
0051 0007       |    |		Action	Break_Optional
0052 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2.0x1 = 0x52,0x401
0053 8217       |    |		Call	0x1,0x17							; Debug Table 0x2.0x2 = 0x53,0x1
0054 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0055 4800       |H   |		Short_Literal	0x0
0056 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0057 0000       |    |		.XXX[0x1]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005e       | ^  |		.CONST	0x005e								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0004       |    |		.CONST	0x0004								; Number of locals
005b			INIT_0058:
005b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3 = .DEBUG	0x005b,0x079a,0x0002,0x0000,0x0057,0x3595,0x0000,0x0011
													; Debug Table 0x3.0x0 = 0x5b,0xffff
005c 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3.0x1 = 0x5c,0xfffe
005d 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3.0x2 = 0x5d,0xfffd
005e			BODY_0058:
005e 481b       |H   |		Short_Literal	0x1b							; Debug Table 0x3.0x3 = 0x5e,0x1
005f e001       |    |		Load	0x0,0x1
0060 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0061 7003       |p   |		Jump_Nonzero	0x65
0062 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0x4 = 0x62,0x2
0063 821b       |    |		Call	0x1,0x1b
0064 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0065 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0x5 = 0x65,0x3
0066 4976       |Iv  |		Short_Literal	0x176
0067 00eb       |    |		Load_Encached	Diana_Cache
0068 0098       |    |		Execute	Package,Field_Read_Dynamic
0069 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
006a 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
006b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x6 = 0x6b,0x4
006c 8218       |    |		Call	0x1,0x18
006d 6841       |hA  |		Jump_Zero	0xaf
006e 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x7 = 0x6e,0x5
006f e403       |    |		Load	0x2,0x3								; Debug Table 0x3.0x8 = 0x6f,0x401
0070 0007       |    |		Action	Break_Optional
0071 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3.0x9 = 0x71,0x402
0072 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0xa = 0x72,0x403
0073 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0xb = 0x73,0x404
0074 0f22       | "  |		Execute_Immediate	Equal,0x22					; Debug Table 0x3.0xc = 0x74,0x5
0075 6805       |h   |		Jump_Zero	0x7b
0076 0092 05c3  |    |		Action	Push_String_Extended,0x5c3					; "it is generic"
													; Debug Table 0x3.0xd = 0x76,0x6
0078 00da       |    |		Load_Top	At_Offset_2
0079 8212       |    |		Call	0x1,0x12
007a 7834       |x4  |		Jump	0xaf
007b 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0xe = 0x7b,0x7
007c e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0xf = 0x7c,0x801
007d 0007       |    |		Action	Break_Optional
007e 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3.0x10 = 0x7e,0x802
007f 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x11 = 0x7f,0x803
0080 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x12 = 0x80,0x804
0081 0f3d       | =  |		Execute_Immediate	Equal,0x3d					; Debug Table 0x3.0x13 = 0x81,0x7
0082 681a       |h   |		Jump_Zero	0x9d
0083 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0x14 = 0x83,0x8
0084 00eb       |    |		Load_Encached	Diana_Cache
0085 18e4       |    |		Execute	Package,Field_Execute,Field_Number 0xe4
0086 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0087 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x15 = 0x87,0x9
0088 e404       |    |		Load	0x2,0x4								; Debug Table 0x3.0x16 = 0x88,0xc01
0089 0007       |    |		Action	Break_Optional
008a 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x3.0x17 = 0x8a,0xc02
008b 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x18 = 0x8b,0xc03
008c 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x19 = 0x8c,0xc04
008d 0b36       | 6  |		Execute_Immediate	Case_Compare,0x36				; Debug Table 0x3.0x1a = 0x8d,0x9
008e 7003       |p   |		Jump_Nonzero	0x92
008f 0b80       |    |		Execute_Immediate	Case_Compare,0x80
0090 7007       |p   |		Jump_Nonzero	0x98
0091 780a       |x   |		Jump	0x9c								; Debug Table 0x3.0x1b = 0x91,0xd
0092 0092 05c4  |    |		Action	Push_String_Extended,0x5c4					; "it is an instantiation"
													; Debug Table 0x3.0x1c = 0x92,0xa
0094 00db       |    |		Load_Top	At_Offset_3
0095 8212       |    |		Call	0x1,0x12
0096 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x1d = 0x96,0xb
0097 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0098 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x1e = 0x98,0xc
0099 00db       |    |		Load_Top	At_Offset_3
009a 821c       |    |		Call	0x1,0x1c
009b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
009c 00d1       |    |		Pop_Control	Pop_Count_1
009d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x1f = 0x9d,0xe
009e e002       |    |		Load	0x0,0x2
009f 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00a0 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
00a1 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x20 = 0xa1,0xf
00a2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x21 = 0xa2,0x1001
00a3 021d       |    |		Execute	Heap_Access,Is_Null
00a4 6805       |h   |		Jump_Zero	0xaa							; Debug Table 0x3.0x22 = 0xa4,0xf
00a5 0092 05c5  |    |		Action	Push_String_Extended,0x5c5					; "its body is not available"
													; Debug Table 0x3.0x23 = 0xa5,0x10
00a7 00da       |    |		Load_Top	At_Offset_2
00a8 8212       |    |		Call	0x1,0x12
00a9 7805       |x   |		Jump	0xaf
00aa 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x24 = 0xaa,0x11
00ab 00db       |    |		Load_Top	At_Offset_3
00ac 00db       |    |		Load_Top	At_Offset_3
00ad 8217       |    |		Call	0x1,0x17
00ae 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00af 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x25 = 0xaf,0x12
00b0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00b1 0000 0000  |    |		.BLANK	0000[0x7]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00c5       |    |		.CONST	0x00c5								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 0003       |    |		.CONST	0x0003								; Number of locals
00bb			INIT_00b8:
00bb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4 = .DEBUG	0x00bb,0x07e8,0x0002,0x0000,0x0057,0x3595,0x0000,0x001c
													; Debug Table 0x4.0x0 = 0xbb,0xffff
00bc 00db       |    |		Load_Top	At_Offset_3
00bd 00eb       |    |		Load_Encached	Diana_Cache
00be 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
00bf 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00c0 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4.0x1 = 0xc0,0xfffe
00c1 e5ff       |    |		Load	0x2,-0x1
00c2 00eb       |    |		Load_Encached	Diana_Cache
00c3 18d8       |    |		Execute	Package,Field_Execute,Field_Number 0xd8
00c4 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00c5			BODY_00b8:
00c5 0007       |    |		Action	Break_Optional							; Debug Table 0x4.0x2 = 0xc5,0x1
00c6 e403       |    |		Load	0x2,0x3								; Debug Table 0x4.0x3 = 0xc6,0x401
00c7 0007       |    |		Action	Break_Optional
00c8 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x4.0x4 = 0xc8,0x402
00c9 0007       |    |		Action	Break_Optional							; Debug Table 0x4.0x5 = 0xc9,0x403
00ca 0007       |    |		Action	Break_Optional							; Debug Table 0x4.0x6 = 0xca,0x404
00cb 0b80       |    |		Execute_Immediate	Case_Compare,0x80				; Debug Table 0x4.0x7 = 0xcb,0x1
00cc 7005       |p   |		Jump_Nonzero	0xd2
00cd 0b36       | 6  |		Execute_Immediate	Case_Compare,0x36
00ce 7003       |p   |		Jump_Nonzero	0xd2
00cf 0b7c       | |  |		Execute_Immediate	Case_Compare,0x7c
00d0 7003       |p   |		Jump_Nonzero	0xd4
00d1 781c       |x   |		Jump	0xee								; Debug Table 0x4.0x8 = 0xd1,0x5
00d2 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x9 = 0xd2,0x2
00d3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d4 481a       |H   |		Short_Literal	0x1a							; Debug Table 0x4.0xa = 0xd4,0x3
00d5 e001       |    |		Load	0x0,0x1
00d6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00d7 6816       |h   |		Jump_Zero	0xee
00d8 e5ff       |    |		Load	0x2,-0x1
00d9 e003       |    |		Load	0x0,0x3
00da 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
00db 6812       |h   |		Jump_Zero	0xee
00dc e5ff       |    |		Load	0x2,-0x1
00dd 8211       |    |		Call	0x1,0x11
00de 700f       |p   |		Jump_Nonzero	0xee
00df 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0xb = 0xdf,0x4
00e0 821f       |    |		Call	0x1,0x1f
00e1 700a       |p   |		Jump_Nonzero	0xec
00e2 00d9       |    |		Load_Top	At_Offset_1
00e3 821d       |    |		Call	0x1,0x1d
00e4 6807       |h   |		Jump_Zero	0xec
00e5 e5ff       |    |		Load	0x2,-0x1
00e6 8220       |    |		Call	0x1,0x20
00e7 6804       |h   |		Jump_Zero	0xec
00e8 e5ff       |    |		Load	0x2,-0x1
00e9 8221       | !  |		Call	0x1,0x21
00ea 0f00       |    |		Execute_Immediate	Equal,0x0
00eb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ec 4800       |H   |		Short_Literal	0x0
00ed 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ee 00d1       |    |		Pop_Control	Pop_Count_1
00ef 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0xc = 0xef,0x6
00f0 821e       |    |		Call	0x1,0x1e
00f1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00f2 0000 0000  |    |		.BLANK	0000[0x6]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb       |    |		.CONST	0x00fb								; Address of begin
00f9 0004       |    |		.CONST	0x0004								; Address of exception handler
00fa 0001       |    |		.CONST	0x0001								; Number of locals
00fb			BODY_00f8:
00fb			INIT_00f8:
00fb 4603       |F   |		Jump_Case	0x4							; Debug Table 0x5 = .DEBUG	0x00fb,0x0804,0x0005,0x0000,0x0058,0xc1a5,0x0000,0x0036
00fc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00fd 7802       |x   |		Jump	0x100								; case 0x1
00fe 7805       |x   |		Jump	0x104								; case 0x2
00ff 7809       |x   |		Jump	0x109								; case 0x3
0100 00da       |    |		Load_Top	At_Offset_2
0101 0091 05c0  |    |		Action	Push_String_Extended_Indexed,0x5c0				; "PACKAGE_INTEGRATION"
0103 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0104 00db       |    |		Load_Top	At_Offset_3
0105 00db       |    |		Load_Top	At_Offset_3
0106 00e0       |    |		Load_Encached	Standard_Cache
0107 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0108 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0109 00da       |    |		Load_Top	At_Offset_2
010a 00e0       |    |		Load_Encached	Standard_Cache
010b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
010c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
010d 0000 0000  |    |		.XXX[0x3]
010f 0000       |    |
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 011f       |    |		.CONST	0x011f								; Address of begin
0111 0004       |    |		.CONST	0x0004								; Address of exception handler
0112 0003       |    |		.CONST	0x0003								; Number of locals
0113			INIT_0110:
0113 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6 = .DEBUG	0x0113,0x0806,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x003d
													; Debug Table 0x6.0x0 = 0x113,0xffff
0114 00db       |    |		Load_Top	At_Offset_3
0115 e004       |    |		Load	0x0,0x4
0116 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0117 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0118 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6.0x1 = 0x118,0xfffe
0119 00d9       |    |		Load_Top	At_Offset_1
011a 4976       |Iv  |		Short_Literal	0x176
011b 00eb       |    |		Load_Encached	Diana_Cache
011c 0098       |    |		Execute	Package,Field_Read_Dynamic
011d 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
011e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
011f			BODY_0110:
011f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x2 = 0x11f,0x1
0120 e005       |    |		Load	0x0,0x5
0121 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0122 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0123 0000 0000  |    |		.BLANK	0000[0x5]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b       | +  |		.CONST	0x012b								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0001       |    |		.CONST	0x0001								; Number of locals
012b			BODY_0128:
012b			INIT_0128:
012b 0007       |    |		Action	Break_Optional							; Debug Table 0x7 = .DEBUG	0x012b,0x080e,0x0001,0x0000,0x0058,0xc1a5,0x0000,0x006d
													; Debug Table 0x7.0x0 = 0x12b,0x1
012c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x1 = 0x12c,0x401
012d 021d       |    |		Execute	Heap_Access,Is_Null
012e 700f       |p   |		Jump_Nonzero	0x13e							; Debug Table 0x7.0x2 = 0x12e,0x1
012f 0092 05c6  |    |		Action	Push_String_Extended,0x5c6					; "Cannot inline "
													; Debug Table 0x7.0x3 = 0x12f,0x2
0131 00db       |    |		Load_Top	At_Offset_3
0132 00eb       |    |		Load_Encached	Diana_Cache
0133 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0134 00eb       |    |		Load_Encached	Diana_Cache
0135 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0136 01cc       |    |		Execute	Vector,Catenate
0137 0092 05c7  |    |		Action	Push_String_Extended,0x5c7					; " because "
0139 01cc       |    |		Execute	Vector,Catenate
013a e5fe       |    |		Load	0x2,-0x2
013b 01cc       |    |		Execute	Vector,Catenate
013c e006       |    |		Load	0x0,0x6
013d 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
013e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
013f 0000       |    |		.XXX[0x1]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 014d       | M  |		.CONST	0x014d								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0004       |    |		.CONST	0x0004								; Number of locals
0143			INIT_0140:
0143 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x8 = .DEBUG	0x0143,0x0818,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x00a7
													; Debug Table 0x8.0x0 = 0x143,0xffff
0144 00db       |    |		Load_Top	At_Offset_3
0145 e004       |    |		Load	0x0,0x4
0146 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0147 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0148 e007       |    |		Load	0x0,0x7								; Debug Table 0x8.0x1 = 0x148,0xfffe
0149 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
014a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
014b e007       |    |		Load	0x0,0x7								; Debug Table 0x8.0x2 = 0x14b,0xfffd
014c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
014d			BODY_0140:
014d e007       |    |		Load	0x0,0x7								; Debug Table 0x8.0x3 = 0x14d,0x1
014e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
014f e007       |    |		Load	0x0,0x7
0150 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0151 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0152 62e5       |b   |		Indirect_Literal	Discrete,0x438,{0x00000000, 0x00004000}
0153 e008       |    |		Load	0x0,0x8
0154 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0155 e402       |    |		Load	0x2,0x2
0156 e007       |    |		Load	0x0,0x7
0157 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0158 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0159 005b       | [  |		Store_Top	Discrete,At_Offset_3
015a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
015b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x4 = 0x15b,0x2
015c 7003       |p   |		Jump_Nonzero	0x160
015d 00d9       |    |		Load_Top	At_Offset_1
015e 0c03       |    |		Execute_Immediate	Greater_Equal,0x3
015f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0160 4800       |H   |		Short_Literal	0x0
0161 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0162 0000 0000  |    |		.BLANK	0000[0x6]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 0174       | t  |		.CONST	0x0174								; Address of begin
0169 0004       |    |		.CONST	0x0004								; Address of exception handler
016a 0002       |    |		.CONST	0x0002								; Number of locals
016b			INIT_0168:
016b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9 = .DEBUG	0x016b,0x0824,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x00fc
													; Debug Table 0x9.0x0 = 0x16b,0xffff
016c e5fe       |    |		Load	0x2,-0x2
016d 00eb       |    |		Load_Encached	Diana_Cache
016e 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
016f e002       |    |		Load	0x0,0x2
0170 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0171 e009       |    |		Load	0x0,0x9
0172 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0173 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0174			BODY_0168:
0174 0007       |    |		Action	Break_Optional							; Debug Table 0x9.0x1 = 0x174,0x1
0175 e402       |    |		Load	0x2,0x2								; Debug Table 0x9.0x2 = 0x175,0x401
0176 0007       |    |		Action	Break_Optional
0177 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x9.0x3 = 0x177,0x402
0178 0007       |    |		Action	Break_Optional							; Debug Table 0x9.0x4 = 0x178,0x403
0179 0007       |    |		Action	Break_Optional							; Debug Table 0x9.0x5 = 0x179,0x404
017a 0f6b       | k  |		Execute_Immediate	Equal,0x6b					; Debug Table 0x9.0x6 = 0x17a,0x1
017b 7002       |p   |		Jump_Nonzero	0x17e
017c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0x7 = 0x17c,0x2
017d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
017e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x8 = 0x17e,0x3
017f 00eb       |    |		Load_Encached	Diana_Cache
0180 18b9       |    |		Execute	Package,Field_Execute,Field_Number 0xb9
0181 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0182 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x9 = 0x182,0x4
0183 e009       |    |		Load	0x0,0x9
0184 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0185 6806       |h   |		Jump_Zero	0x18c
0186 0092 05c8  |    |		Action	Push_String_Extended,0x5c8					; "of possibility of local tasks"
													; Debug Table 0x9.0xa = 0x186,0x5
0188 e5ff       |    |		Load	0x2,-0x1
0189 8212       |    |		Call	0x1,0x12
018a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0xb = 0x18a,0x6
018b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
018c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0xc = 0x18c,0x7
018d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
018e 0000 0000  |    |		.XXX[0x2]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0197       |    |		.CONST	0x0197								; Address of begin
0191 0004       |    |		.CONST	0x0004								; Address of exception handler
0192 0003       |    |		.CONST	0x0003								; Number of locals
0193			INIT_0190:
0193 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xa = .DEBUG	0x0193,0x0840,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0152
													; Debug Table 0xa.0x0 = 0x193,0xffff
0194 e5fe       |    |		Load	0x2,-0x2
0195 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0196 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa.0x1 = 0x196,0xfffe
0197			BODY_0190:
0197 00cf       |    |		Action	Mark_Auxiliary
0198 78db       |x   |		Jump	0x274
0199 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x2 = 0x199,0x2
019a 0007       |    |		Action	Break_Optional
019b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x3 = 0x19b,0x401
019c 7002       |p   |		Jump_Nonzero	0x19f
019d 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa.0x4 = 0x19d,0x402
019e 782c       |x,  |		Jump	0x1cb
019f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x5 = 0x19f,0x403
01a0 0217       |    |		Execute	Heap_Access,All_Reference
01a1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01a2 6804       |h   |		Jump_Zero	0x1a7
01a3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x6 = 0x1a3,0x404
01a4 0217       |    |		Execute	Heap_Access,All_Reference
01a5 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
01a6 7824       |x$  |		Jump	0x1cb
01a7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x7 = 0x1a7,0x405
01a8 0007       |    |		Action	Break_Optional
01a9 e406       |    |		Load	0x2,0x6								; Debug Table 0xa.0x8 = 0x1a9,0x801
01aa 0007       |    |		Action	Break_Optional
01ab 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0xa.0x9 = 0x1ab,0x802
01ac 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0xa = 0x1ac,0x803
01ad 00d0       |    |		Action	Swap_Control							; Debug Table 0xa.0xb = 0x1ad,0x804
01ae 00d1       |    |		Pop_Control	Pop_Count_1
01af 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0xa.0xc = 0x1af,0x405
01b0 00eb       |    |		Load_Encached	Diana_Cache
01b1 0098       |    |		Execute	Package,Field_Read_Dynamic
01b2 012c       | ,  |		Execute	Any,Size
01b3 e00a       |    |		Load	0x0,0xa
01b4 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
01b5 025b       | [  |		Execute	Discrete,Check_In_Type
01b6 0273       | s  |		Execute	Discrete,Plus
01b7 00d9       |    |		Load_Top	At_Offset_1
01b8 0007       |    |		Action	Break_Optional
01b9 e407       |    |		Load	0x2,0x7								; Debug Table 0xa.0xd = 0x1b9,0xc01
01ba 0007       |    |		Action	Break_Optional
01bb 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0xa.0xe = 0x1bb,0xc02
01bc 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0xf = 0x1bc,0xc03
01bd 00d0       |    |		Action	Swap_Control							; Debug Table 0xa.0x10 = 0x1bd,0xc04
01be 00d1       |    |		Pop_Control	Pop_Count_1
01bf 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0xa.0x11 = 0x1bf,0x804
01c0 00eb       |    |		Load_Encached	Diana_Cache
01c1 0098       |    |		Execute	Package,Field_Read_Dynamic
01c2 49c9       |I   |		Short_Literal	0x1c9
01c3 00eb       |    |		Load_Encached	Diana_Cache
01c4 0098       |    |		Execute	Package,Field_Read_Dynamic
01c5 49ca       |I   |		Short_Literal	0x1ca
01c6 00eb       |    |		Load_Encached	Diana_Cache
01c7 0095       |    |		Execute	Package,Field_Reference_Dynamic
01c8 e00b       |    |		Load	0x0,0xb
01c9 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
01ca 7800       |x   |		Jump	0x1cb
01cb 00d0       |    |		Action	Swap_Control
01cc 00d1       |    |		Pop_Control	Pop_Count_1
01cd 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2					; Debug Table 0xa.0x12 = 0x1cd,0x2
01ce 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x13 = 0x1ce,0x3
01cf e403       |    |		Load	0x2,0x3								; Debug Table 0xa.0x14 = 0x1cf,0x1001
01d0 0007       |    |		Action	Break_Optional
01d1 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xa.0x15 = 0x1d1,0x1002
01d2 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x16 = 0x1d2,0x1003
01d3 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x17 = 0x1d3,0x1004
01d4 0b38       | 8  |		Execute_Immediate	Case_Compare,0x38				; Debug Table 0xa.0x18 = 0x1d4,0x3
01d5 7093       |p   |		Jump_Nonzero	0x269
01d6 0b3a       | :  |		Execute_Immediate	Case_Compare,0x3a
01d7 7091       |p   |		Jump_Nonzero	0x269
01d8 0b3c       | <  |		Execute_Immediate	Case_Compare,0x3c
01d9 708f       |p   |		Jump_Nonzero	0x269
01da 0b40       | @  |		Execute_Immediate	Case_Compare,0x40
01db 708d       |p   |		Jump_Nonzero	0x269
01dc 0b45       | E  |		Execute_Immediate	Case_Compare,0x45
01dd 708b       |p   |		Jump_Nonzero	0x269
01de 0b41       | A  |		Execute_Immediate	Case_Compare,0x41
01df 7089       |p   |		Jump_Nonzero	0x269
01e0 0b02       |    |		Execute_Immediate	Case_Compare,0x2
01e1 7087       |p   |		Jump_Nonzero	0x269
01e2 0b44       | D  |		Execute_Immediate	Case_Compare,0x44
01e3 7085       |p   |		Jump_Nonzero	0x269
01e4 0b42       | B  |		Execute_Immediate	Case_Compare,0x42
01e5 7083       |p   |		Jump_Nonzero	0x269
01e6 0b43       | C  |		Execute_Immediate	Case_Compare,0x43
01e7 7081       |p   |		Jump_Nonzero	0x269
01e8 0b48       | H  |		Execute_Immediate	Case_Compare,0x48
01e9 701e       |p   |		Jump_Nonzero	0x208
01ea 0b47       | G  |		Execute_Immediate	Case_Compare,0x47
01eb 701c       |p   |		Jump_Nonzero	0x208
01ec 0b46       | F  |		Execute_Immediate	Case_Compare,0x46
01ed 701a       |p   |		Jump_Nonzero	0x208
01ee 0b3e       | >  |		Execute_Immediate	Case_Compare,0x3e
01ef 702c       |p,  |		Jump_Nonzero	0x21c
01f0 0b3d       | =  |		Execute_Immediate	Case_Compare,0x3d
01f1 703d       |p=  |		Jump_Nonzero	0x22f
01f2 0b37       | 7  |		Execute_Immediate	Case_Compare,0x37
01f3 704f       |pO  |		Jump_Nonzero	0x243
01f4 0b39       | 9  |		Execute_Immediate	Case_Compare,0x39
01f5 7056       |pV  |		Jump_Nonzero	0x24c
01f6 0b3b       | ;  |		Execute_Immediate	Case_Compare,0x3b
01f7 706b       |pk  |		Jump_Nonzero	0x263
01f8 0092 05c9  |    |		Action	Push_String_Extended,0x5c9					; "of unsupported declarative item: "
													; Debug Table 0xa.0x19 = 0x1f8,0x16
01fa e403       |    |		Load	0x2,0x3								; Debug Table 0xa.0x1a = 0x1fa,0x1401
01fb 0007       |    |		Action	Break_Optional
01fc 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xa.0x1b = 0x1fc,0x1402
01fd 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x1c = 0x1fd,0x1403
01fe 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x1d = 0x1fe,0x1404
01ff 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0xa.0x1e = 0x1ff,0x16
0200 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0201 025e       | ^  |		Execute	Discrete,Convert
0202 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0203 01cc       |    |		Execute	Vector,Catenate
0204 e5ff       |    |		Load	0x2,-0x1
0205 8212       |    |		Call	0x1,0x12
0206 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x1f = 0x206,0x17
0207 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0208 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xa.0x20 = 0x208,0x5
0209 0f01       |    |		Execute_Immediate	Equal,0x1
020a 685e       |h^  |		Jump_Zero	0x269
020b 00da       |    |		Load_Top	At_Offset_2
020c 00eb       |    |		Load_Encached	Diana_Cache
020d 18b6       |    |		Execute	Package,Field_Execute,Field_Number 0xb6
020e e406       |    |		Load	0x2,0x6								; Debug Table 0xa.0x21 = 0x20e,0x1801
020f 0007       |    |		Action	Break_Optional
0210 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xa.0x22 = 0x210,0x1802
0211 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x23 = 0x211,0x1803
0212 00d0       |    |		Action	Swap_Control							; Debug Table 0xa.0x24 = 0x212,0x1804
0213 00d1       |    |		Pop_Control	Pop_Count_1
0214 0f77       | w  |		Execute_Immediate	Equal,0x77					; Debug Table 0xa.0x25 = 0x214,0x5
0215 6853       |hS  |		Jump_Zero	0x269
0216 0092 05ca  |    |		Action	Push_String_Extended,0x5ca					; "of local subunit"
													; Debug Table 0xa.0x26 = 0x216,0x6
0218 e5ff       |    |		Load	0x2,-0x1
0219 8212       |    |		Call	0x1,0x12
021a 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x27 = 0x21a,0x7
021b 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
021c e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xa.0x28 = 0x21c,0x8
021d 684b       |hK  |		Jump_Zero	0x269
021e 00da       |    |		Load_Top	At_Offset_2
021f 00eb       |    |		Load_Encached	Diana_Cache
0220 18d8       |    |		Execute	Package,Field_Execute,Field_Number 0xd8
0221 e406       |    |		Load	0x2,0x6								; Debug Table 0xa.0x29 = 0x221,0x1c01
0222 0007       |    |		Action	Break_Optional
0223 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xa.0x2a = 0x223,0x1c02
0224 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x2b = 0x224,0x1c03
0225 00d0       |    |		Action	Swap_Control							; Debug Table 0xa.0x2c = 0x225,0x1c04
0226 00d1       |    |		Pop_Control	Pop_Count_1
0227 0f36       | 6  |		Execute_Immediate	Equal,0x36					; Debug Table 0xa.0x2d = 0x227,0x8
0228 6840       |h@  |		Jump_Zero	0x269
0229 0092 05cb  |    |		Action	Push_String_Extended,0x5cb					; "of local package instantiation"
													; Debug Table 0xa.0x2e = 0x229,0x9
022b e5ff       |    |		Load	0x2,-0x1
022c 8212       |    |		Call	0x1,0x12
022d 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x2f = 0x22d,0xa
022e 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
022f e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xa.0x30 = 0x22f,0xb
0230 0f01       |    |		Execute_Immediate	Equal,0x1
0231 6837       |h7  |		Jump_Zero	0x269
0232 00da       |    |		Load_Top	At_Offset_2
0233 00eb       |    |		Load_Encached	Diana_Cache
0234 18e4       |    |		Execute	Package,Field_Execute,Field_Number 0xe4
0235 e406       |    |		Load	0x2,0x6								; Debug Table 0xa.0x31 = 0x235,0x2001
0236 0007       |    |		Action	Break_Optional
0237 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xa.0x32 = 0x237,0x2002
0238 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x33 = 0x238,0x2003
0239 00d0       |    |		Action	Swap_Control							; Debug Table 0xa.0x34 = 0x239,0x2004
023a 00d1       |    |		Pop_Control	Pop_Count_1
023b 0f36       | 6  |		Execute_Immediate	Equal,0x36					; Debug Table 0xa.0x35 = 0x23b,0xb
023c 682c       |h,  |		Jump_Zero	0x269
023d 0092 05cc  |    |		Action	Push_String_Extended,0x5cc					; "of local subprogram instantiation"
													; Debug Table 0xa.0x36 = 0x23d,0xc
023f e5ff       |    |		Load	0x2,-0x1
0240 8212       |    |		Call	0x1,0x12
0241 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x37 = 0x241,0xd
0242 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0243 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xa.0x38 = 0x243,0xe
0244 0f01       |    |		Execute_Immediate	Equal,0x1
0245 6823       |h#  |		Jump_Zero	0x269
0246 0092 05cd  |    |		Action	Push_String_Extended,0x5cd					; "of locally declared exception"
													; Debug Table 0xa.0x39 = 0x246,0xf
0248 e5ff       |    |		Load	0x2,-0x1
0249 8212       |    |		Call	0x1,0x12
024a 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x3a = 0x24a,0x10
024b 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
024c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x3b = 0x24c,0x11
024d 00eb       |    |		Load_Encached	Diana_Cache
024e 18e8       |    |		Execute	Package,Field_Execute,Field_Number 0xe8
024f e009       |    |		Load	0x0,0x9
0250 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0251 6817       |h   |		Jump_Zero	0x269
0252 00da       |    |		Load_Top	At_Offset_2
0253 00eb       |    |		Load_Encached	Diana_Cache
0254 18d7       |    |		Execute	Package,Field_Execute,Field_Number 0xd7
0255 e406       |    |		Load	0x2,0x6								; Debug Table 0xa.0x3c = 0x255,0x2401
0256 0007       |    |		Action	Break_Optional
0257 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xa.0x3d = 0x257,0x2402
0258 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x3e = 0x258,0x2403
0259 00d0       |    |		Action	Swap_Control							; Debug Table 0xa.0x3f = 0x259,0x2404
025a 00d1       |    |		Pop_Control	Pop_Count_1
025b 0f80       |    |		Execute_Immediate	Equal,-0x80					; Debug Table 0xa.0x40 = 0x25b,0x11
025c 700c       |p   |		Jump_Nonzero	0x269
025d 0092 05c8  |    |		Action	Push_String_Extended,0x5c8					; "of possibility of local tasks"
													; Debug Table 0xa.0x41 = 0x25d,0x12
025f e5ff       |    |		Load	0x2,-0x1
0260 8212       |    |		Call	0x1,0x12
0261 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x42 = 0x261,0x13
0262 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0263 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x43 = 0x263,0x14
0264 e5ff       |    |		Load	0x2,-0x1
0265 8214       |    |		Call	0x1,0x14
0266 7002       |p   |		Jump_Nonzero	0x269
0267 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x44 = 0x267,0x15
0268 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0269 00d1       |    |		Pop_Control	Pop_Count_1
026a 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x45 = 0x26a,0x18
026b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x46 = 0x26b,0x2801
026c 7002       |p   |		Jump_Nonzero	0x26f
026d 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xa.0x47 = 0x26d,0x2802
026e 7803       |x   |		Jump	0x272
026f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x48 = 0x26f,0x2803
0270 0217       |    |		Execute	Heap_Access,All_Reference
0271 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0272 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3					; Debug Table 0xa.0x49 = 0x272,0x18
0273 00c9       |    |		Action	Pop_Auxiliary_Loop
0274 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x4a = 0x274,0x1
0275 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x4b = 0x275,0x2c01
0276 021d       |    |		Execute	Heap_Access,Is_Null
0277 6f21       |o!  |		Jump_Zero	0x199							; Debug Table 0xa.0x4c = 0x277,0x1
0278 00ce       |    |		Action	Pop_Auxiliary
0279 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x4d = 0x279,0x19
027a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
027b 0000 0000  |    |		.BLANK	0000[0x5]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 028c       |    |		.CONST	0x028c								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0006       |    |		.CONST	0x0006								; Number of locals
0283			INIT_0280:
0283 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xb = .DEBUG	0x0283,0x08de,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x02b6
													; Debug Table 0xb.0x0 = 0x283,0xffff
0284 e5fe       |    |		Load	0x2,-0x2
0285 e004       |    |		Load	0x0,0x4
0286 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0287 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0288 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xb.0x1 = 0x288,0xfffe
0289 039d       |    |		Declare_Variable	Heap_Access,Duplicate
028a 039d       |    |		Declare_Variable	Heap_Access,Duplicate
028b 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xb.0x2 = 0x28b,0xfffd
028c			BODY_0280:
028c 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x3 = 0x28c,0x1
028d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x4 = 0x28d,0x401
028e 021d       |    |		Execute	Heap_Access,Is_Null
028f 6802       |h   |		Jump_Zero	0x292							; Debug Table 0xb.0x5 = 0x28f,0x1
0290 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x6 = 0x290,0x2
0291 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0292 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x7 = 0x292,0x3
0293 e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0x8 = 0x293,0x801
0294 7002       |p   |		Jump_Nonzero	0x297
0295 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xb.0x9 = 0x295,0x802
0296 7803       |x   |		Jump	0x29a
0297 e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0xa = 0x297,0x803
0298 0217       |    |		Execute	Heap_Access,All_Reference
0299 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
029a e004       |    |		Load	0x0,0x4								; Debug Table 0xb.0xb = 0x29a,0x3
029b 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
029c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0xc = 0x29c,0xc01
029d 021d       |    |		Execute	Heap_Access,Is_Null
029e 00d0       |    |		Action	Swap_Control
029f 00d1       |    |		Pop_Control	Pop_Count_1
02a0 68d3       |h   |		Jump_Zero	0x374							; Debug Table 0xb.0xd = 0x2a0,0x3
02a1 e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0xe = 0x2a1,0x4
02a2 0007       |    |		Action	Break_Optional
02a3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0xf = 0x2a3,0x1001
02a4 7002       |p   |		Jump_Nonzero	0x2a7
02a5 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xb.0x10 = 0x2a5,0x1002
02a6 782c       |x,  |		Jump	0x2d3
02a7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x11 = 0x2a7,0x1003
02a8 0217       |    |		Execute	Heap_Access,All_Reference
02a9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02aa 6804       |h   |		Jump_Zero	0x2af
02ab 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x12 = 0x2ab,0x1004
02ac 0217       |    |		Execute	Heap_Access,All_Reference
02ad 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
02ae 7824       |x$  |		Jump	0x2d3
02af 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x13 = 0x2af,0x1005
02b0 0007       |    |		Action	Break_Optional
02b1 e408       |    |		Load	0x2,0x8								; Debug Table 0xb.0x14 = 0x2b1,0x1401
02b2 0007       |    |		Action	Break_Optional
02b3 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0xb.0x15 = 0x2b3,0x1402
02b4 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x16 = 0x2b4,0x1403
02b5 00d0       |    |		Action	Swap_Control							; Debug Table 0xb.0x17 = 0x2b5,0x1404
02b6 00d1       |    |		Pop_Control	Pop_Count_1
02b7 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0xb.0x18 = 0x2b7,0x1005
02b8 00eb       |    |		Load_Encached	Diana_Cache
02b9 0098       |    |		Execute	Package,Field_Read_Dynamic
02ba 012c       | ,  |		Execute	Any,Size
02bb e00a       |    |		Load	0x0,0xa
02bc 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
02bd 025b       | [  |		Execute	Discrete,Check_In_Type
02be 0273       | s  |		Execute	Discrete,Plus
02bf 00d9       |    |		Load_Top	At_Offset_1
02c0 0007       |    |		Action	Break_Optional
02c1 e409       |    |		Load	0x2,0x9								; Debug Table 0xb.0x19 = 0x2c1,0x1801
02c2 0007       |    |		Action	Break_Optional
02c3 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0xb.0x1a = 0x2c3,0x1802
02c4 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x1b = 0x2c4,0x1803
02c5 00d0       |    |		Action	Swap_Control							; Debug Table 0xb.0x1c = 0x2c5,0x1804
02c6 00d1       |    |		Pop_Control	Pop_Count_1
02c7 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0xb.0x1d = 0x2c7,0x1404
02c8 00eb       |    |		Load_Encached	Diana_Cache
02c9 0098       |    |		Execute	Package,Field_Read_Dynamic
02ca 49c9       |I   |		Short_Literal	0x1c9
02cb 00eb       |    |		Load_Encached	Diana_Cache
02cc 0098       |    |		Execute	Package,Field_Read_Dynamic
02cd 49ca       |I   |		Short_Literal	0x1ca
02ce 00eb       |    |		Load_Encached	Diana_Cache
02cf 0095       |    |		Execute	Package,Field_Reference_Dynamic
02d0 e00b       |    |		Load	0x0,0xb
02d1 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02d2 7800       |x   |		Jump	0x2d3
02d3 00d0       |    |		Action	Swap_Control
02d4 00d1       |    |		Pop_Control	Pop_Count_1
02d5 a403       |    |		Store_Unchecked	0x2,0x3							; Debug Table 0xb.0x1e = 0x2d5,0x4
02d6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x1f = 0x2d6,0x5
02d7 00eb       |    |		Load_Encached	Diana_Cache
02d8 18b7       |    |		Execute	Package,Field_Execute,Field_Number 0xb7
02d9 00eb       |    |		Load_Encached	Diana_Cache
02da 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
02db 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x20 = 0x2db,0x1c01
02dc 7002       |p   |		Jump_Nonzero	0x2df
02dd 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xb.0x21 = 0x2dd,0x1c02
02de 782c       |x,  |		Jump	0x30b
02df 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x22 = 0x2df,0x1c03
02e0 0217       |    |		Execute	Heap_Access,All_Reference
02e1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02e2 6804       |h   |		Jump_Zero	0x2e7
02e3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x23 = 0x2e3,0x1c04
02e4 0217       |    |		Execute	Heap_Access,All_Reference
02e5 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
02e6 7824       |x$  |		Jump	0x30b
02e7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x24 = 0x2e7,0x1c05
02e8 0007       |    |		Action	Break_Optional
02e9 e408       |    |		Load	0x2,0x8								; Debug Table 0xb.0x25 = 0x2e9,0x2001
02ea 0007       |    |		Action	Break_Optional
02eb 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0xb.0x26 = 0x2eb,0x2002
02ec 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x27 = 0x2ec,0x2003
02ed 00d0       |    |		Action	Swap_Control							; Debug Table 0xb.0x28 = 0x2ed,0x2004
02ee 00d1       |    |		Pop_Control	Pop_Count_1
02ef 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0xb.0x29 = 0x2ef,0x1c05
02f0 00eb       |    |		Load_Encached	Diana_Cache
02f1 0098       |    |		Execute	Package,Field_Read_Dynamic
02f2 012c       | ,  |		Execute	Any,Size
02f3 e00a       |    |		Load	0x0,0xa
02f4 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
02f5 025b       | [  |		Execute	Discrete,Check_In_Type
02f6 0273       | s  |		Execute	Discrete,Plus
02f7 00d9       |    |		Load_Top	At_Offset_1
02f8 0007       |    |		Action	Break_Optional
02f9 e409       |    |		Load	0x2,0x9								; Debug Table 0xb.0x2a = 0x2f9,0x2401
02fa 0007       |    |		Action	Break_Optional
02fb 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0xb.0x2b = 0x2fb,0x2402
02fc 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x2c = 0x2fc,0x2403
02fd 00d0       |    |		Action	Swap_Control							; Debug Table 0xb.0x2d = 0x2fd,0x2404
02fe 00d1       |    |		Pop_Control	Pop_Count_1
02ff 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0xb.0x2e = 0x2ff,0x2004
0300 00eb       |    |		Load_Encached	Diana_Cache
0301 0098       |    |		Execute	Package,Field_Read_Dynamic
0302 49c9       |I   |		Short_Literal	0x1c9
0303 00eb       |    |		Load_Encached	Diana_Cache
0304 0098       |    |		Execute	Package,Field_Read_Dynamic
0305 49ca       |I   |		Short_Literal	0x1ca
0306 00eb       |    |		Load_Encached	Diana_Cache
0307 0095       |    |		Execute	Package,Field_Reference_Dynamic
0308 e00b       |    |		Load	0x0,0xb
0309 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
030a 7800       |x   |		Jump	0x30b
030b 00d0       |    |		Action	Swap_Control
030c 00d1       |    |		Pop_Control	Pop_Count_1
030d 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3					; Debug Table 0xb.0x2f = 0x30d,0x5
030e 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x30 = 0x30e,0x6
030f e404       |    |		Load	0x2,0x4								; Debug Table 0xb.0x31 = 0x30f,0x2801
0310 0007       |    |		Action	Break_Optional
0311 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xb.0x32 = 0x311,0x2802
0312 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x33 = 0x312,0x2803
0313 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x34 = 0x313,0x2804
0314 0fa4       |    |		Execute_Immediate	Equal,-0x5c					; Debug Table 0xb.0x35 = 0x314,0x6
0315 685e       |h^  |		Jump_Zero	0x374
0316 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x36 = 0x316,0x7
0317 00eb       |    |		Load_Encached	Diana_Cache
0318 18e1       |    |		Execute	Package,Field_Execute,Field_Number 0xe1
0319 00eb       |    |		Load_Encached	Diana_Cache
031a 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
031b e004       |    |		Load	0x0,0x4
031c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
031d 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
031e 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x37 = 0x31e,0x8
031f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x38 = 0x31f,0x2c01
0320 7002       |p   |		Jump_Nonzero	0x323
0321 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xb.0x39 = 0x321,0x2c02
0322 7803       |x   |		Jump	0x326
0323 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x3a = 0x323,0x2c03
0324 0217       |    |		Execute	Heap_Access,All_Reference
0325 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0326 e004       |    |		Load	0x0,0x4								; Debug Table 0xb.0x3b = 0x326,0x8
0327 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0328 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x3c = 0x328,0x3001
0329 021d       |    |		Execute	Heap_Access,Is_Null
032a 00d0       |    |		Action	Swap_Control
032b 00d1       |    |		Pop_Control	Pop_Count_1
032c 6847       |hG  |		Jump_Zero	0x374							; Debug Table 0xb.0x3d = 0x32c,0x8
032d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x3e = 0x32d,0x9
032e 0007       |    |		Action	Break_Optional
032f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x3f = 0x32f,0x3401
0330 7002       |p   |		Jump_Nonzero	0x333
0331 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xb.0x40 = 0x331,0x3402
0332 782c       |x,  |		Jump	0x35f
0333 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x41 = 0x333,0x3403
0334 0217       |    |		Execute	Heap_Access,All_Reference
0335 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0336 6804       |h   |		Jump_Zero	0x33b
0337 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x42 = 0x337,0x3404
0338 0217       |    |		Execute	Heap_Access,All_Reference
0339 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
033a 7824       |x$  |		Jump	0x35f
033b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x43 = 0x33b,0x3405
033c 0007       |    |		Action	Break_Optional
033d e408       |    |		Load	0x2,0x8								; Debug Table 0xb.0x44 = 0x33d,0x3801
033e 0007       |    |		Action	Break_Optional
033f 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0xb.0x45 = 0x33f,0x3802
0340 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x46 = 0x340,0x3803
0341 00d0       |    |		Action	Swap_Control							; Debug Table 0xb.0x47 = 0x341,0x3804
0342 00d1       |    |		Pop_Control	Pop_Count_1
0343 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0xb.0x48 = 0x343,0x3405
0344 00eb       |    |		Load_Encached	Diana_Cache
0345 0098       |    |		Execute	Package,Field_Read_Dynamic
0346 012c       | ,  |		Execute	Any,Size
0347 e00a       |    |		Load	0x0,0xa
0348 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0349 025b       | [  |		Execute	Discrete,Check_In_Type
034a 0273       | s  |		Execute	Discrete,Plus
034b 00d9       |    |		Load_Top	At_Offset_1
034c 0007       |    |		Action	Break_Optional
034d e409       |    |		Load	0x2,0x9								; Debug Table 0xb.0x49 = 0x34d,0x3c01
034e 0007       |    |		Action	Break_Optional
034f 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0xb.0x4a = 0x34f,0x3c02
0350 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x4b = 0x350,0x3c03
0351 00d0       |    |		Action	Swap_Control							; Debug Table 0xb.0x4c = 0x351,0x3c04
0352 00d1       |    |		Pop_Control	Pop_Count_1
0353 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0xb.0x4d = 0x353,0x3804
0354 00eb       |    |		Load_Encached	Diana_Cache
0355 0098       |    |		Execute	Package,Field_Read_Dynamic
0356 49c9       |I   |		Short_Literal	0x1c9
0357 00eb       |    |		Load_Encached	Diana_Cache
0358 0098       |    |		Execute	Package,Field_Read_Dynamic
0359 49ca       |I   |		Short_Literal	0x1ca
035a 00eb       |    |		Load_Encached	Diana_Cache
035b 0095       |    |		Execute	Package,Field_Reference_Dynamic
035c e00b       |    |		Load	0x0,0xb
035d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
035e 7800       |x   |		Jump	0x35f
035f 00d0       |    |		Action	Swap_Control
0360 00d1       |    |		Pop_Control	Pop_Count_1
0361 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2					; Debug Table 0xb.0x4e = 0x361,0x9
0362 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x4f = 0x362,0xa
0363 e405       |    |		Load	0x2,0x5								; Debug Table 0xb.0x50 = 0x363,0x4001
0364 0007       |    |		Action	Break_Optional
0365 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xb.0x51 = 0x365,0x4002
0366 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x52 = 0x366,0x4003
0367 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x53 = 0x367,0x4004
0368 0f5c       | \  |		Execute_Immediate	Equal,0x5c					; Debug Table 0xb.0x54 = 0x368,0xa
0369 680a       |h   |		Jump_Zero	0x374
036a 00d9       |    |		Load_Top	At_Offset_1
036b 00eb       |    |		Load_Encached	Diana_Cache
036c 18d6       |    |		Execute	Package,Field_Execute,Field_Number 0xd6
036d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x55 = 0x36d,0x4401
036e 021d       |    |		Execute	Heap_Access,Is_Null
036f 00d0       |    |		Action	Swap_Control
0370 00d1       |    |		Pop_Control	Pop_Count_1
0371 6802       |h   |		Jump_Zero	0x374							; Debug Table 0xb.0x56 = 0x371,0x4004
0372 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x57 = 0x372,0xb
0373 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0374 0092 05ce  |    |		Action	Push_String_Extended,0x5ce					; "it has a nontrivial exception handler"
													; Debug Table 0xb.0x58 = 0x374,0xc
0376 e5ff       |    |		Load	0x2,-0x1
0377 8212       |    |		Call	0x1,0x12
0378 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x59 = 0x378,0xd
0379 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
037a 0000 0000  |    |		.BLANK	0000[0x6]
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0398       |    |		.CONST	0x0398								; Address of begin
0381 0004       |    |		.CONST	0x0004								; Address of exception handler
0382 0004       |    |		.CONST	0x0004								; Number of locals
0383			INIT_0380:
0383 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xc = .DEBUG	0x0383,0x0994,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0380
													; Debug Table 0xc.0x0 = 0x383,0xffff
0384 e5fe       |    |		Load	0x2,-0x2
0385 00eb       |    |		Load_Encached	Diana_Cache
0386 18d1       |    |		Execute	Package,Field_Execute,Field_Number 0xd1
0387 00eb       |    |		Load_Encached	Diana_Cache
0388 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
0389 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
038a 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xc.0x1 = 0x38a,0xfffe
038b e5fe       |    |		Load	0x2,-0x2
038c 00eb       |    |		Load_Encached	Diana_Cache
038d 18b4       |    |		Execute	Package,Field_Execute,Field_Number 0xb4
038e 00eb       |    |		Load_Encached	Diana_Cache
038f 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
0390 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0391 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xc.0x2 = 0x391,0xfffd
0392 e5fe       |    |		Load	0x2,-0x2
0393 00eb       |    |		Load_Encached	Diana_Cache
0394 18e1       |    |		Execute	Package,Field_Execute,Field_Number 0xe1
0395 00eb       |    |		Load_Encached	Diana_Cache
0396 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
0397 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0398			BODY_0380:
0398 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xc.0x3 = 0x398,0x1
0399 7003       |p   |		Jump_Nonzero	0x39d
039a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x4 = 0x39a,0x401
039b 021d       |    |		Execute	Heap_Access,Is_Null
039c 6896       |h   |		Jump_Zero	0x433							; Debug Table 0xc.0x5 = 0x39c,0x1
039d e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xc.0x6 = 0x39d,0x2
039e 00db       |    |		Load_Top	At_Offset_3
039f e5ff       |    |		Load	0x2,-0x1
03a0 8215       |    |		Call	0x1,0x15
03a1 6891       |h   |		Jump_Zero	0x433
03a2 00d9       |    |		Load_Top	At_Offset_1
03a3 e5ff       |    |		Load	0x2,-0x1
03a4 8216       |    |		Call	0x1,0x16
03a5 688d       |h   |		Jump_Zero	0x433
03a6 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xc.0x7 = 0x3a6,0x3
03a7 0f01       |    |		Execute_Immediate	Equal,0x1
03a8 6888       |h   |		Jump_Zero	0x431
03a9 00cf       |    |		Action	Mark_Auxiliary
03aa 7881       |x   |		Jump	0x42c
03ab 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x8 = 0x3ab,0x5
03ac 0007       |    |		Action	Break_Optional
03ad 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x9 = 0x3ad,0x801
03ae 7002       |p   |		Jump_Nonzero	0x3b1
03af 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xc.0xa = 0x3af,0x802
03b0 782c       |x,  |		Jump	0x3dd
03b1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xb = 0x3b1,0x803
03b2 0217       |    |		Execute	Heap_Access,All_Reference
03b3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03b4 6804       |h   |		Jump_Zero	0x3b9
03b5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xc = 0x3b5,0x804
03b6 0217       |    |		Execute	Heap_Access,All_Reference
03b7 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03b8 7824       |x$  |		Jump	0x3dd
03b9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xd = 0x3b9,0x805
03ba 0007       |    |		Action	Break_Optional
03bb e407       |    |		Load	0x2,0x7								; Debug Table 0xc.0xe = 0x3bb,0xc01
03bc 0007       |    |		Action	Break_Optional
03bd 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0xc.0xf = 0x3bd,0xc02
03be 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x10 = 0x3be,0xc03
03bf 00d0       |    |		Action	Swap_Control							; Debug Table 0xc.0x11 = 0x3bf,0xc04
03c0 00d1       |    |		Pop_Control	Pop_Count_1
03c1 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0xc.0x12 = 0x3c1,0x805
03c2 00eb       |    |		Load_Encached	Diana_Cache
03c3 0098       |    |		Execute	Package,Field_Read_Dynamic
03c4 012c       | ,  |		Execute	Any,Size
03c5 e00a       |    |		Load	0x0,0xa
03c6 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
03c7 025b       | [  |		Execute	Discrete,Check_In_Type
03c8 0273       | s  |		Execute	Discrete,Plus
03c9 00d9       |    |		Load_Top	At_Offset_1
03ca 0007       |    |		Action	Break_Optional
03cb e408       |    |		Load	0x2,0x8								; Debug Table 0xc.0x13 = 0x3cb,0x1001
03cc 0007       |    |		Action	Break_Optional
03cd 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0xc.0x14 = 0x3cd,0x1002
03ce 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x15 = 0x3ce,0x1003
03cf 00d0       |    |		Action	Swap_Control							; Debug Table 0xc.0x16 = 0x3cf,0x1004
03d0 00d1       |    |		Pop_Control	Pop_Count_1
03d1 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0xc.0x17 = 0x3d1,0xc04
03d2 00eb       |    |		Load_Encached	Diana_Cache
03d3 0098       |    |		Execute	Package,Field_Read_Dynamic
03d4 49c9       |I   |		Short_Literal	0x1c9
03d5 00eb       |    |		Load_Encached	Diana_Cache
03d6 0098       |    |		Execute	Package,Field_Read_Dynamic
03d7 49ca       |I   |		Short_Literal	0x1ca
03d8 00eb       |    |		Load_Encached	Diana_Cache
03d9 0095       |    |		Execute	Package,Field_Reference_Dynamic
03da e00b       |    |		Load	0x0,0xb
03db 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
03dc 7800       |x   |		Jump	0x3dd
03dd 00d0       |    |		Action	Swap_Control
03de 00d1       |    |		Pop_Control	Pop_Count_1
03df 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x18 = 0x3df,0x5
03e0 e406       |    |		Load	0x2,0x6								; Debug Table 0xc.0x19 = 0x3e0,0x1401
03e1 0007       |    |		Action	Break_Optional
03e2 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xc.0x1a = 0x3e2,0x1402
03e3 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x1b = 0x3e3,0x1403
03e4 00d0       |    |		Action	Swap_Control							; Debug Table 0xc.0x1c = 0x3e4,0x1404
03e5 00d1       |    |		Pop_Control	Pop_Count_1
03e6 0f4e       | N  |		Execute_Immediate	Equal,0x4e					; Debug Table 0xc.0x1d = 0x3e6,0x5
03e7 683a       |h:  |		Jump_Zero	0x422
03e8 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xc.0x1e = 0x3e8,0x6
03e9 00da       |    |		Load_Top	At_Offset_2
03ea 0007       |    |		Action	Break_Optional
03eb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x1f = 0x3eb,0x1801
03ec 7002       |p   |		Jump_Nonzero	0x3ef
03ed 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xc.0x20 = 0x3ed,0x1802
03ee 782c       |x,  |		Jump	0x41b
03ef 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x21 = 0x3ef,0x1803
03f0 0217       |    |		Execute	Heap_Access,All_Reference
03f1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03f2 6804       |h   |		Jump_Zero	0x3f7
03f3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x22 = 0x3f3,0x1804
03f4 0217       |    |		Execute	Heap_Access,All_Reference
03f5 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03f6 7824       |x$  |		Jump	0x41b
03f7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x23 = 0x3f7,0x1805
03f8 0007       |    |		Action	Break_Optional
03f9 e408       |    |		Load	0x2,0x8								; Debug Table 0xc.0x24 = 0x3f9,0x1c01
03fa 0007       |    |		Action	Break_Optional
03fb 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0xc.0x25 = 0x3fb,0x1c02
03fc 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x26 = 0x3fc,0x1c03
03fd 00d0       |    |		Action	Swap_Control							; Debug Table 0xc.0x27 = 0x3fd,0x1c04
03fe 00d1       |    |		Pop_Control	Pop_Count_1
03ff 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0xc.0x28 = 0x3ff,0x1805
0400 00eb       |    |		Load_Encached	Diana_Cache
0401 0098       |    |		Execute	Package,Field_Read_Dynamic
0402 012c       | ,  |		Execute	Any,Size
0403 e00a       |    |		Load	0x0,0xa
0404 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0405 025b       | [  |		Execute	Discrete,Check_In_Type
0406 0273       | s  |		Execute	Discrete,Plus
0407 00d9       |    |		Load_Top	At_Offset_1
0408 0007       |    |		Action	Break_Optional
0409 e409       |    |		Load	0x2,0x9								; Debug Table 0xc.0x29 = 0x409,0x2001
040a 0007       |    |		Action	Break_Optional
040b 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0xc.0x2a = 0x40b,0x2002
040c 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x2b = 0x40c,0x2003
040d 00d0       |    |		Action	Swap_Control							; Debug Table 0xc.0x2c = 0x40d,0x2004
040e 00d1       |    |		Pop_Control	Pop_Count_1
040f 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0xc.0x2d = 0x40f,0x1c04
0410 00eb       |    |		Load_Encached	Diana_Cache
0411 0098       |    |		Execute	Package,Field_Read_Dynamic
0412 49c9       |I   |		Short_Literal	0x1c9
0413 00eb       |    |		Load_Encached	Diana_Cache
0414 0098       |    |		Execute	Package,Field_Read_Dynamic
0415 49ca       |I   |		Short_Literal	0x1ca
0416 00eb       |    |		Load_Encached	Diana_Cache
0417 0095       |    |		Execute	Package,Field_Reference_Dynamic
0418 e00b       |    |		Load	0x0,0xb
0419 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
041a 7800       |x   |		Jump	0x41b
041b 00d0       |    |		Action	Swap_Control
041c 00d1       |    |		Pop_Control	Pop_Count_1
041d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x2e = 0x41d,0x6
041e 8217       |    |		Call	0x1,0x17
041f 7002       |p   |		Jump_Nonzero	0x422
0420 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x2f = 0x420,0x7
0421 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0422 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x30 = 0x422,0x8
0423 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x31 = 0x423,0x2401
0424 7002       |p   |		Jump_Nonzero	0x427
0425 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xc.0x32 = 0x425,0x2402
0426 7803       |x   |		Jump	0x42a
0427 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x33 = 0x427,0x2403
0428 0217       |    |		Execute	Heap_Access,All_Reference
0429 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
042a 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2					; Debug Table 0xc.0x34 = 0x42a,0x8
042b 00c9       |    |		Action	Pop_Auxiliary_Loop
042c 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x35 = 0x42c,0x4
042d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x36 = 0x42d,0x2801
042e 021d       |    |		Execute	Heap_Access,Is_Null
042f 6f7b       |o{  |		Jump_Zero	0x3ab							; Debug Table 0xc.0x37 = 0x42f,0x4
0430 00ce       |    |		Action	Pop_Auxiliary
0431 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x38 = 0x431,0x9
0432 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0433 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x39 = 0x433,0xa
0434 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0435 0000 0000  |    |		.XXX[0x3]
0437 0000       |    |
0438 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
043c 0000 0000  |    |		.BLANK	0000[0x4]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0449       | I  |		.CONST	0x0449								; Address of begin
0441 0004       |    |		.CONST	0x0004								; Address of exception handler
0442 0002       |    |		.CONST	0x0002								; Number of locals
0443			INIT_0440:
0443 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd = .DEBUG	0x0443,0x0a0a,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0456
													; Debug Table 0xd.0x0 = 0x443,0xffff
0444 00db       |    |		Load_Top	At_Offset_3
0445 4900       |I   |		Short_Literal	0x100
0446 00eb       |    |		Load_Encached	Diana_Cache
0447 0096       |    |		Execute	Package,Entry
0448 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0449			BODY_0440:
0449 0007       |    |		Action	Break_Optional							; Debug Table 0xd.0x1 = 0x449,0x1
044a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x2 = 0x44a,0x401
044b 021d       |    |		Execute	Heap_Access,Is_Null
044c 7018       |p   |		Jump_Nonzero	0x465							; Debug Table 0xd.0x3 = 0x44c,0x1
044d e402       |    |		Load	0x2,0x2								; Debug Table 0xd.0x4 = 0x44d,0x801
044e 0007       |    |		Action	Break_Optional
044f 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xd.0x5 = 0x44f,0x802
0450 0007       |    |		Action	Break_Optional							; Debug Table 0xd.0x6 = 0x450,0x803
0451 0007       |    |		Action	Break_Optional							; Debug Table 0xd.0x7 = 0x451,0x804
0452 0007       |    |		Action	Break_Optional							; Debug Table 0xd.0x8 = 0x452,0x401
0453 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x9 = 0x453,0xc01
0454 49e1       |I   |		Short_Literal	0x1e1
0455 00eb       |    |		Load_Encached	Diana_Cache
0456 0098       |    |		Execute	Package,Field_Read_Dynamic
0457 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0458 7800       |x   |		Jump	0x459
0459 00d0       |    |		Action	Swap_Control
045a 00d1       |    |		Pop_Control	Pop_Count_1
045b 6809       |h   |		Jump_Zero	0x465							; Debug Table 0xd.0xa = 0x45b,0x401
045c 00d8       |    |		Load_Top	At_Offset_0
045d 00eb       |    |		Load_Encached	Diana_Cache
045e 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
045f 00eb       |    |		Load_Encached	Diana_Cache
0460 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0461 0092 05cf  |    |		Action	Push_String_Extended,0x5cf					; "INLINE"
0463 01df       |    |		Execute	Vector,Equal
0464 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0465 4800       |H   |		Short_Literal	0x0
0466 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0467 0000       |    |		.XXX[0x1]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 046f       | o  |		.CONST	0x046f								; Address of begin
0469 0004       |    |		.CONST	0x0004								; Address of exception handler
046a 0003       |    |		.CONST	0x0003								; Number of locals
046b			INIT_0468:
046b 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xe = .DEBUG	0x046b,0x0a22,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x049a
													; Debug Table 0xe.0x0 = 0x46b,0xffff
046c 00db       |    |		Load_Top	At_Offset_3
046d 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
046e 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xe.0x1 = 0x46e,0xfffe
046f			BODY_0468:
046f 00cf       |    |		Action	Mark_Auxiliary
0470 7853       |xS  |		Jump	0x4c4
0471 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe.0x2 = 0x471,0x2
0472 0007       |    |		Action	Break_Optional
0473 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x3 = 0x473,0x401
0474 7002       |p   |		Jump_Nonzero	0x477
0475 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xe.0x4 = 0x475,0x402
0476 782c       |x,  |		Jump	0x4a3
0477 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x5 = 0x477,0x403
0478 0217       |    |		Execute	Heap_Access,All_Reference
0479 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
047a 6804       |h   |		Jump_Zero	0x47f
047b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x6 = 0x47b,0x404
047c 0217       |    |		Execute	Heap_Access,All_Reference
047d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
047e 7824       |x$  |		Jump	0x4a3
047f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x7 = 0x47f,0x405
0480 0007       |    |		Action	Break_Optional
0481 e406       |    |		Load	0x2,0x6								; Debug Table 0xe.0x8 = 0x481,0x801
0482 0007       |    |		Action	Break_Optional
0483 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0xe.0x9 = 0x483,0x802
0484 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0xa = 0x484,0x803
0485 00d0       |    |		Action	Swap_Control							; Debug Table 0xe.0xb = 0x485,0x804
0486 00d1       |    |		Pop_Control	Pop_Count_1
0487 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0xe.0xc = 0x487,0x405
0488 00eb       |    |		Load_Encached	Diana_Cache
0489 0098       |    |		Execute	Package,Field_Read_Dynamic
048a 012c       | ,  |		Execute	Any,Size
048b e00a       |    |		Load	0x0,0xa
048c 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
048d 025b       | [  |		Execute	Discrete,Check_In_Type
048e 0273       | s  |		Execute	Discrete,Plus
048f 00d9       |    |		Load_Top	At_Offset_1
0490 0007       |    |		Action	Break_Optional
0491 e407       |    |		Load	0x2,0x7								; Debug Table 0xe.0xd = 0x491,0xc01
0492 0007       |    |		Action	Break_Optional
0493 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0xe.0xe = 0x493,0xc02
0494 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0xf = 0x494,0xc03
0495 00d0       |    |		Action	Swap_Control							; Debug Table 0xe.0x10 = 0x495,0xc04
0496 00d1       |    |		Pop_Control	Pop_Count_1
0497 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0xe.0x11 = 0x497,0x804
0498 00eb       |    |		Load_Encached	Diana_Cache
0499 0098       |    |		Execute	Package,Field_Read_Dynamic
049a 49c9       |I   |		Short_Literal	0x1c9
049b 00eb       |    |		Load_Encached	Diana_Cache
049c 0098       |    |		Execute	Package,Field_Read_Dynamic
049d 49ca       |I   |		Short_Literal	0x1ca
049e 00eb       |    |		Load_Encached	Diana_Cache
049f 0095       |    |		Execute	Package,Field_Reference_Dynamic
04a0 e00b       |    |		Load	0x0,0xb
04a1 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
04a2 7800       |x   |		Jump	0x4a3
04a3 00d0       |    |		Action	Swap_Control
04a4 00d1       |    |		Pop_Control	Pop_Count_1
04a5 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2					; Debug Table 0xe.0x12 = 0x4a5,0x2
04a6 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0x13 = 0x4a6,0x3
04a7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe.0x14 = 0x4a7,0x1001
04a8 7002       |p   |		Jump_Nonzero	0x4ab
04a9 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xe.0x15 = 0x4a9,0x1002
04aa 7803       |x   |		Jump	0x4ae
04ab 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe.0x16 = 0x4ab,0x1003
04ac 0217       |    |		Execute	Heap_Access,All_Reference
04ad 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
04ae 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3					; Debug Table 0xe.0x17 = 0x4ae,0x3
04af 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0x18 = 0x4af,0x4
04b0 e403       |    |		Load	0x2,0x3								; Debug Table 0xe.0x19 = 0x4b0,0x1401
04b1 0007       |    |		Action	Break_Optional
04b2 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xe.0x1a = 0x4b2,0x1402
04b3 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0x1b = 0x4b3,0x1403
04b4 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0x1c = 0x4b4,0x1404
04b5 0f50       | P  |		Execute_Immediate	Equal,0x50					; Debug Table 0xe.0x1d = 0x4b5,0x4
04b6 6802       |h   |		Jump_Zero	0x4b9
04b7 4801       |H   |		Short_Literal	0x1							; Debug Table 0xe.0x1e = 0x4b7,0x5
04b8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04b9 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0x1f = 0x4b9,0x6
04ba e403       |    |		Load	0x2,0x3								; Debug Table 0xe.0x20 = 0x4ba,0x1801
04bb 0007       |    |		Action	Break_Optional
04bc 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xe.0x21 = 0x4bc,0x1802
04bd 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0x22 = 0x4bd,0x1803
04be 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0x23 = 0x4be,0x1804
04bf 0f40       | @  |		Execute_Immediate	Equal,0x40					; Debug Table 0xe.0x24 = 0x4bf,0x6
04c0 7002       |p   |		Jump_Nonzero	0x4c3
04c1 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x25 = 0x4c1,0x7
04c2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04c3 00c9       |    |		Action	Pop_Auxiliary_Loop
04c4 0007       |    |		Action	Break_Optional							; Debug Table 0xe.0x26 = 0x4c4,0x1
04c5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe.0x27 = 0x4c5,0x1c01
04c6 021d       |    |		Execute	Heap_Access,Is_Null
04c7 6fa9       |o   |		Jump_Zero	0x471							; Debug Table 0xe.0x28 = 0x4c7,0x1
04c8 00ce       |    |		Action	Pop_Auxiliary
04c9 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x29 = 0x4c9,0x8
04ca 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04cb 0000 0000  |    |		.BLANK	0000[0x5]
04d0 ; --------------------------------------------------------------------------------------
04d0 ; SUBPROGRAM
04d0 ; --------------------------------------------------------------------------------------
04d0 04d8       |    |		.CONST	0x04d8								; Address of begin
04d1 0004       |    |		.CONST	0x0004								; Address of exception handler
04d2 0002       |    |		.CONST	0x0002								; Number of locals
04d3			INIT_04d0:
04d3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xf = .DEBUG	0x04d3,0x0a78,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x04f7
													; Debug Table 0xf.0x0 = 0x4d3,0xffff
04d4 00db       |    |		Load_Top	At_Offset_3
04d5 e002       |    |		Load	0x0,0x2
04d6 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04d7 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
04d8			BODY_04d0:
04d8 0007       |    |		Action	Break_Optional							; Debug Table 0xf.0x1 = 0x4d8,0x1
04d9 e402       |    |		Load	0x2,0x2								; Debug Table 0xf.0x2 = 0x4d9,0x401
04da 0007       |    |		Action	Break_Optional
04db 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xf.0x3 = 0x4db,0x402
04dc 0007       |    |		Action	Break_Optional							; Debug Table 0xf.0x4 = 0x4dc,0x403
04dd 0007       |    |		Action	Break_Optional							; Debug Table 0xf.0x5 = 0x4dd,0x404
04de 0f4e       | N  |		Execute_Immediate	Equal,0x4e					; Debug Table 0xf.0x6 = 0x4de,0x1
04df 6807       |h   |		Jump_Zero	0x4e7
04e0 00d8       |    |		Load_Top	At_Offset_0
04e1 00eb       |    |		Load_Encached	Diana_Cache
04e2 18e1       |    |		Execute	Package,Field_Execute,Field_Number 0xe1
04e3 00eb       |    |		Load_Encached	Diana_Cache
04e4 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
04e5 8219       |    |		Call	0x1,0x19
04e6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04e7 4800       |H   |		Short_Literal	0x0
04e8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04e9 0000 0000  |    |		.BLANK	0000[0x7]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04fa       |    |		.CONST	0x04fa								; Address of begin
04f1 0004       |    |		.CONST	0x0004								; Address of exception handler
04f2 0002       |    |		.CONST	0x0002								; Number of locals
04f3			INIT_04f0:
04f3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x10 = .DEBUG	0x04f3,0x0a88,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0530
													; Debug Table 0x10.0x0 = 0x4f3,0xffff
04f4 00db       |    |		Load_Top	At_Offset_3
04f5 4976       |Iv  |		Short_Literal	0x176
04f6 00eb       |    |		Load_Encached	Diana_Cache
04f7 0098       |    |		Execute	Package,Field_Read_Dynamic
04f8 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
04f9 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
04fa			BODY_04f0:
04fa 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x1 = 0x4fa,0x1
04fb 8218       |    |		Call	0x1,0x18
04fc 680d       |h   |		Jump_Zero	0x50a
04fd 0007       |    |		Action	Break_Optional							; Debug Table 0x10.0x2 = 0x4fd,0x2
04fe e402       |    |		Load	0x2,0x2								; Debug Table 0x10.0x3 = 0x4fe,0x401
04ff 0007       |    |		Action	Break_Optional
0500 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x10.0x4 = 0x500,0x402
0501 0007       |    |		Action	Break_Optional							; Debug Table 0x10.0x5 = 0x501,0x403
0502 0007       |    |		Action	Break_Optional							; Debug Table 0x10.0x6 = 0x502,0x404
0503 0f2c       | ,  |		Execute_Immediate	Equal,0x2c					; Debug Table 0x10.0x7 = 0x503,0x2
0504 6803       |h   |		Jump_Zero	0x508
0505 00d8       |    |		Load_Top	At_Offset_0
0506 821a       |    |		Call	0x1,0x1a
0507 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0508 4800       |H   |		Short_Literal	0x0
0509 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
050a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0x8 = 0x50a,0x3
050b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
050c 0000 0000  |    |		.BLANK	0000[0x4]
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 051c       |    |		.CONST	0x051c								; Address of begin
0511 0004       |    |		.CONST	0x0004								; Address of exception handler
0512 0002       |    |		.CONST	0x0002								; Number of locals
0513			INIT_0510:
0513 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x11 = .DEBUG	0x0513,0x0a9c,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0568
													; Debug Table 0x11.0x0 = 0x513,0xffff
0514 e5fe       |    |		Load	0x2,-0x2
0515 00eb       |    |		Load_Encached	Diana_Cache
0516 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
0517 4976       |Iv  |		Short_Literal	0x176
0518 00eb       |    |		Load_Encached	Diana_Cache
0519 0098       |    |		Execute	Package,Field_Read_Dynamic
051a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
051b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
051c			BODY_0510:
051c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x1 = 0x51c,0x1
051d e00c       |    |		Load	0x0,0xc
051e 1854       | T  |		Execute	Package,Field_Execute,Field_Number 0x54
051f 7005       |p   |		Jump_Nonzero	0x525
0520 00d8       |    |		Load_Top	At_Offset_0
0521 00eb       |    |		Load_Encached	Diana_Cache
0522 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0523 820e       |    |		Call	0x1,0xe
0524 6802       |h   |		Jump_Zero	0x527
0525 4801       |H   |		Short_Literal	0x1							; Debug Table 0x11.0x2 = 0x525,0x2
0526 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0527 0092 05d0  |    |		Action	Push_String_Extended,0x5d0					; "it renames a non-inlined subprogram"
													; Debug Table 0x11.0x3 = 0x527,0x3
0529 e5ff       |    |		Load	0x2,-0x1
052a 8212       |    |		Call	0x1,0x12
052b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x4 = 0x52b,0x4
052c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
052d 0000 0000  |    |		.XXX[0x3]
052f 0000       |    |
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0541       | A  |		.CONST	0x0541								; Address of begin
0531 0004       |    |		.CONST	0x0004								; Address of exception handler
0532 0003       |    |		.CONST	0x0003								; Number of locals
0533			INIT_0530:
0533 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x12 = .DEBUG	0x0533,0x0aa8,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0667
													; Debug Table 0x12.0x0 = 0x533,0xffff
0534 00db       |    |		Load_Top	At_Offset_3
0535 00eb       |    |		Load_Encached	Diana_Cache
0536 18bd       |    |		Execute	Package,Field_Execute,Field_Number 0xbd
0537 00eb       |    |		Load_Encached	Diana_Cache
0538 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
0539 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
053a 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x12.0x1 = 0x53a,0xfffe
053b e5ff       |    |		Load	0x2,-0x1
053c 00eb       |    |		Load_Encached	Diana_Cache
053d 18be       |    |		Execute	Package,Field_Execute,Field_Number 0xbe
053e 00eb       |    |		Load_Encached	Diana_Cache
053f 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
0540 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0541			BODY_0530:
0541 4800       |H   |		Short_Literal	0x0							; Debug Table 0x12.0x2 = 0x541,0x1
0542 00da       |    |		Load_Top	At_Offset_2
0543 0007       |    |		Action	Break_Optional
0544 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x12.0x3 = 0x544,0x401
0545 8215       |    |		Call	0x1,0x15							; Debug Table 0x12.0x4 = 0x545,0x1
0546 6806       |h   |		Jump_Zero	0x54d
0547 4800       |H   |		Short_Literal	0x0
0548 00d9       |    |		Load_Top	At_Offset_1
0549 0007       |    |		Action	Break_Optional
054a 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x12.0x5 = 0x54a,0x801
054b 8215       |    |		Call	0x1,0x15							; Debug Table 0x12.0x6 = 0x54b,0x401
054c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
054d 4800       |H   |		Short_Literal	0x0
054e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
054f 0000       |    |		.XXX[0x1]
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0553       | S  |		.CONST	0x0553								; Address of begin
0551 0004       |    |		.CONST	0x0004								; Address of exception handler
0552 0001       |    |		.CONST	0x0001								; Number of locals
0553			BODY_0550:
0553			INIT_0550:
0553 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13 = .DEBUG	0x0553,0x0ab8,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x06b1
													; Debug Table 0x13.0x0 = 0x553,0x1
0554 e005       |    |		Load	0x0,0x5
0555 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0556 6804       |h   |		Jump_Zero	0x55b
0557 00da       |    |		Load_Top	At_Offset_2
0558 e005       |    |		Load	0x0,0x5
0559 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
055a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
055b 4800       |H   |		Short_Literal	0x0
055c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
055d 0000 0000  |    |		.XXX[0x3]
055f 0000       |    |
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0563       | c  |		.CONST	0x0563								; Address of begin
0561 0004       |    |		.CONST	0x0004								; Address of exception handler
0562 0001       |    |		.CONST	0x0001								; Number of locals
0563			BODY_0560:
0563			INIT_0560:
0563 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14 = .DEBUG	0x0563,0x0abc,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x06cf
													; Debug Table 0x14.0x0 = 0x563,0x1
0564 e005       |    |		Load	0x0,0x5
0565 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0566 6805       |h   |		Jump_Zero	0x56c
0567 00da       |    |		Load_Top	At_Offset_2
0568 e005       |    |		Load	0x0,0x5
0569 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
056a 0f00       |    |		Execute_Immediate	Equal,0x0
056b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
056c 4800       |H   |		Short_Literal	0x0
056d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
056e 0000 0000  |    |		.XXX[0x2]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 057d       | }  |		.CONST	0x057d								; Address of begin
0571 0004       |    |		.CONST	0x0004								; Address of exception handler
0572 0003       |    |		.CONST	0x0003								; Number of locals
0573			INIT_0570:
0573 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x15 = .DEBUG	0x0573,0x0ac0,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x06f0
													; Debug Table 0x15.0x0 = 0x573,0xffff
0574 00db       |    |		Load_Top	At_Offset_3
0575 00eb       |    |		Load_Encached	Diana_Cache
0576 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
0577 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0578 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x15.0x1 = 0x578,0xfffe
0579 00d9       |    |		Load_Top	At_Offset_1
057a e002       |    |		Load	0x0,0x2
057b 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
057c 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
057d			BODY_0570:
057d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x15.0x2 = 0x57d,0x1
057e e002       |    |		Load	0x0,0x2
057f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0580 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x3 = 0x580,0x401
0581 021d       |    |		Execute	Heap_Access,Is_Null
0582 00d0       |    |		Action	Swap_Control
0583 00d1       |    |		Pop_Control	Pop_Count_1
0584 7002       |p   |		Jump_Nonzero	0x587							; Debug Table 0x15.0x4 = 0x584,0x1
0585 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0x5 = 0x585,0x2
0586 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0587 0007       |    |		Action	Break_Optional							; Debug Table 0x15.0x6 = 0x587,0x3
0588 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x7 = 0x588,0x801
0589 021d       |    |		Execute	Heap_Access,Is_Null
058a 6805       |h   |		Jump_Zero	0x590							; Debug Table 0x15.0x8 = 0x58a,0x3
058b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x15.0x9 = 0x58b,0x4
058c e003       |    |		Load	0x0,0x3
058d 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
058e 0f00       |    |		Execute_Immediate	Equal,0x0
058f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0590 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0xa = 0x590,0x5
0591 8213       |    |		Call	0x1,0x13
0592 6806       |h   |		Jump_Zero	0x599
0593 4800       |H   |		Short_Literal	0x0
0594 00d9       |    |		Load_Top	At_Offset_1
0595 0007       |    |		Action	Break_Optional
0596 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x15.0xb = 0x596,0xc01
0597 8217       |    |		Call	0x1,0x17							; Debug Table 0x15.0xc = 0x597,0x5
0598 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0599 4800       |H   |		Short_Literal	0x0
059a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
059b 0000 0000  |    |		.BLANK	0000[0x5]
05a0 ; --------------------------------------------------------------------------------------
05a0 ; SUBPROGRAM
05a0 ; --------------------------------------------------------------------------------------
05a0 05a8       |    |		.CONST	0x05a8								; Address of begin
05a1 0004       |    |		.CONST	0x0004								; Address of exception handler
05a2 0002       |    |		.CONST	0x0002								; Number of locals
05a3			INIT_05a0:
05a3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x16 = .DEBUG	0x05a3,0x0adc,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0751
													; Debug Table 0x16.0x0 = 0x5a3,0xffff
05a4 00db       |    |		Load_Top	At_Offset_3
05a5 00eb       |    |		Load_Encached	Diana_Cache
05a6 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
05a7 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
05a8			BODY_05a0:
05a8 00cf       |    |		Action	Mark_Auxiliary
05a9 780f       |x   |		Jump	0x5b9
05aa 0007       |    |		Action	Break_Optional							; Debug Table 0x16.0x1 = 0x5aa,0x2
05ab e402       |    |		Load	0x2,0x2								; Debug Table 0x16.0x2 = 0x5ab,0x401
05ac 0007       |    |		Action	Break_Optional
05ad 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x16.0x3 = 0x5ad,0x402
05ae 0007       |    |		Action	Break_Optional							; Debug Table 0x16.0x4 = 0x5ae,0x403
05af 0007       |    |		Action	Break_Optional							; Debug Table 0x16.0x5 = 0x5af,0x404
05b0 0f41       | A  |		Execute_Immediate	Equal,0x41					; Debug Table 0x16.0x6 = 0x5b0,0x2
05b1 6802       |h   |		Jump_Zero	0x5b4
05b2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x16.0x7 = 0x5b2,0x3
05b3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05b4 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0x8 = 0x5b4,0x4
05b5 00eb       |    |		Load_Encached	Diana_Cache
05b6 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
05b7 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
05b8 00c9       |    |		Action	Pop_Auxiliary_Loop
05b9 0007       |    |		Action	Break_Optional							; Debug Table 0x16.0x9 = 0x5b9,0x1
05ba 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0xa = 0x5ba,0x801
05bb 021d       |    |		Execute	Heap_Access,Is_Null
05bc 6fed       |o   |		Jump_Zero	0x5aa							; Debug Table 0x16.0xb = 0x5bc,0x1
05bd 00ce       |    |		Action	Pop_Auxiliary
05be 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0xc = 0x5be,0x5
05bf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05c0 ; --------------------------------------------------------------------------------------
05c0 ; STRING TABLE
05c0 ; --------------------------------------------------------------------------------------
05c0 0024       | $  |		.STRTAB	0x0024->0x05d2							; "PACKAGE_INTEGRATION"
05c1 0035       | 5  |		.STRTAB	0x0035->0x05db							; "SUBPROGRAM_INLINING"
05c2 0046       | F  |		.STRTAB	0x0046->0x05e5							; "BLOCK_STMT_INLINING"
05c3 0057       | W  |		.STRTAB	0x0057->0x05ee							; "it is generic"
05c4 0062       | b  |		.STRTAB	0x0062->0x05f5							; "it is an instantiation"
05c5 0076       | v  |		.STRTAB	0x0076->0x0600							; "its body is not available"
05c6 008d       |    |		.STRTAB	0x008d->0x060c							; "Cannot inline "
05c7 0099       |    |		.STRTAB	0x0099->0x0613							; " because "
05c8 00a0       |    |		.STRTAB	0x00a0->0x0618							; "of possibility of local tasks"
05c9 00bb       |    |		.STRTAB	0x00bb->0x0626							; "of unsupported declarative item: "
05ca 00da       |    |		.STRTAB	0x00da->0x0637							; "of local subunit"
05cb 00e8       |    |		.STRTAB	0x00e8->0x063f							; "of local package instantiation"
05cc 0104       |    |		.STRTAB	0x0104->0x064e							; "of local subprogram instantiation"
05cd 0123       | #  |		.STRTAB	0x0123->0x065e							; "of locally declared exception"
05ce 013e       | >  |		.STRTAB	0x013e->0x066d							; "it has a nontrivial exception handler"
05cf 0161       | a  |		.STRTAB	0x0161->0x067f							; "INLINE"
05d0 0165       | e  |		.STRTAB	0x0165->0x0682							; "it renames a non-inlined subprogram"
05d1 0186       |    |		.STREND 0x0186->0x0694
05d2 5041 434b  |PACK|		.STRTAB_STRINGS
0694 0000 0000  |    |		.BLANK	0000[0x4]
0698 ; --------------------------------------------------------------------------------------
0698 ; Debug Table
0698 ; --------------------------------------------------------------------------------------
0698 0003 0017  |    |		.CONST	0x0003,0x0017
069a 000b 0752  |   R|		.DEBUG	0x000b,0x0752,0x8000,0x0000,0x0057,0x3595,0x0000,0x0005
06a2 0012 075a  |   Z|		.DEBUG	0x0012,0x075a,0x8000,0x0000,0x0058,0xc1a5,0x0000,0x001b
06aa 004b 0792  | K  |		.DEBUG	0x004b,0x0792,0x0002,0x0000,0x0057,0x3595,0x0000,0x0006
06b2 005b 079a  | [  |		.DEBUG	0x005b,0x079a,0x0002,0x0000,0x0057,0x3595,0x0000,0x0011
06ba 00bb 07e8  |    |		.DEBUG	0x00bb,0x07e8,0x0002,0x0000,0x0057,0x3595,0x0000,0x001c
06c2 00fb 0804  |    |		.DEBUG	0x00fb,0x0804,0x0005,0x0000,0x0058,0xc1a5,0x0000,0x0036
06ca 0113 0806  |    |		.DEBUG	0x0113,0x0806,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x003d
06d2 012b 080e  | +  |		.DEBUG	0x012b,0x080e,0x0001,0x0000,0x0058,0xc1a5,0x0000,0x006d
06da 0143 0818  | C  |		.DEBUG	0x0143,0x0818,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x00a7
06e2 016b 0824  | k $|		.DEBUG	0x016b,0x0824,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x00fc
06ea 0193 0840  |   @|		.DEBUG	0x0193,0x0840,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0152
06f2 0283 08de  |    |		.DEBUG	0x0283,0x08de,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x02b6
06fa 0383 0994  |    |		.DEBUG	0x0383,0x0994,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0380
0702 0443 0a0a  | C  |		.DEBUG	0x0443,0x0a0a,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0456
070a 046b 0a22  | k "|		.DEBUG	0x046b,0x0a22,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x049a
0712 04d3 0a78  |   x|		.DEBUG	0x04d3,0x0a78,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x04f7
071a 04f3 0a88  |    |		.DEBUG	0x04f3,0x0a88,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0530
0722 0513 0a9c  |    |		.DEBUG	0x0513,0x0a9c,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0568
072a 0533 0aa8  | 3  |		.DEBUG	0x0533,0x0aa8,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0667
0732 0553 0ab8  | S  |		.DEBUG	0x0553,0x0ab8,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x06b1
073a 0563 0abc  | c  |		.DEBUG	0x0563,0x0abc,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x06cf
0742 0573 0ac0  | s  |		.DEBUG	0x0573,0x0ac0,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x06f0
074a 05a3 0adc  |    |		.DEBUG	0x05a3,0x0adc,0x0002,0x0000,0x0058,0xc1a5,0x0000,0x0751
0752 ; --------------------------------------------------------------------------------------
0752 ; Debug3 Subtable 0x0
0752 ; --------------------------------------------------------------------------------------
0752 0003 0000  |    |		.DBG3TAB	0x0003,0x0000
0754 000b ffff  |    |		.CONST	0x000b,0xffff
0756 000d fffe  |    |		.CONST	0x000d,0xfffe
0758 000f fffd  |    |		.CONST	0x000f,0xfffd
075a ; --------------------------------------------------------------------------------------
075a ; Debug3 Subtable 0x1
075a ; --------------------------------------------------------------------------------------
075a 001b 0000  |    |		.DBG3TAB	0x001b,0x0000
075c 0012 ffff  |    |		.CONST	0x0012,0xffff
075e 0013 fffe  |    |		.CONST	0x0013,0xfffe
0760 0014 fffd  |    |		.CONST	0x0014,0xfffd
0762 0015 fffc  |    |		.CONST	0x0015,0xfffc
0764 0016 fffb  |    |		.CONST	0x0016,0xfffb
0766 0017 fffa  |    |		.CONST	0x0017,0xfffa
0768 0018 fff9  |    |		.CONST	0x0018,0xfff9
076a 001d fff8  |    |		.CONST	0x001d,0xfff8
076c 001f fff7  |    |		.CONST	0x001f,0xfff7
076e 0021 fff6  | !  |		.CONST	0x0021,0xfff6
0770 0023 fff5  | #  |		.CONST	0x0023,0xfff5
0772 0025 fff4  | %  |		.CONST	0x0025,0xfff4
0774 0027 fff3  | '  |		.CONST	0x0027,0xfff3
0776 0029 fff2  | )  |		.CONST	0x0029,0xfff2
0778 002b fff1  | +  |		.CONST	0x002b,0xfff1
077a 002d fff0  | -  |		.CONST	0x002d,0xfff0
077c 002f ffef  | /  |		.CONST	0x002f,0xffef
077e 0031 ffee  | 1  |		.CONST	0x0031,0xffee
0780 0033 ffed  | 3  |		.CONST	0x0033,0xffed
0782 0035 ffec  | 5  |		.CONST	0x0035,0xffec
0784 0037 ffeb  | 7  |		.CONST	0x0037,0xffeb
0786 0039 ffea  | 9  |		.CONST	0x0039,0xffea
0788 003b ffe9  | ;  |		.CONST	0x003b,0xffe9
078a 003d ffe8  | =  |		.CONST	0x003d,0xffe8
078c 003f ffe7  | ?  |		.CONST	0x003f,0xffe7
078e 0041 ffe6  | A  |		.CONST	0x0041,0xffe6
0790 0043 ffe5  | C  |		.CONST	0x0043,0xffe5
0792 ; --------------------------------------------------------------------------------------
0792 ; Debug3 Subtable 0x2
0792 ; --------------------------------------------------------------------------------------
0792 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0794 004b 0001  | K  |		.CONST	0x004b,0x0001
0796 0052 0401  | R  |		.CONST	0x0052,0x0401
0798 0053 0001  | S  |		.CONST	0x0053,0x0001
079a ; --------------------------------------------------------------------------------------
079a ; Debug3 Subtable 0x3
079a ; --------------------------------------------------------------------------------------
079a 0003 0023  |   #|		.DBG3TAB	0x0003,0x0023
079c 005b ffff  | [  |		.CONST	0x005b,0xffff
079e 005c fffe  | \  |		.CONST	0x005c,0xfffe
07a0 005d fffd  | ]  |		.CONST	0x005d,0xfffd
07a2 005e 0001  | ^  |		.CONST	0x005e,0x0001
07a4 0062 0002  | b  |		.CONST	0x0062,0x0002
07a6 0065 0003  | e  |		.CONST	0x0065,0x0003
07a8 006b 0004  | k  |		.CONST	0x006b,0x0004
07aa 006e 0005  | n  |		.CONST	0x006e,0x0005
07ac 006f 0401  | o  |		.CONST	0x006f,0x0401
07ae 0071 0402  | q  |		.CONST	0x0071,0x0402
07b0 0072 0403  | r  |		.CONST	0x0072,0x0403
07b2 0073 0404  | s  |		.CONST	0x0073,0x0404
07b4 0074 0005  | t  |		.CONST	0x0074,0x0005
07b6 0076 0006  | v  |		.CONST	0x0076,0x0006
07b8 007b 0007  | {  |		.CONST	0x007b,0x0007
07ba 007c 0801  | |  |		.CONST	0x007c,0x0801
07bc 007e 0802  | ~  |		.CONST	0x007e,0x0802
07be 007f 0803  |    |		.CONST	0x007f,0x0803
07c0 0080 0804  |    |		.CONST	0x0080,0x0804
07c2 0081 0007  |    |		.CONST	0x0081,0x0007
07c4 0083 0008  |    |		.CONST	0x0083,0x0008
07c6 0087 0009  |    |		.CONST	0x0087,0x0009
07c8 0088 0c01  |    |		.CONST	0x0088,0x0c01
07ca 008a 0c02  |    |		.CONST	0x008a,0x0c02
07cc 008b 0c03  |    |		.CONST	0x008b,0x0c03
07ce 008c 0c04  |    |		.CONST	0x008c,0x0c04
07d0 008d 0009  |    |		.CONST	0x008d,0x0009
07d2 0091 000d  |    |		.CONST	0x0091,0x000d
07d4 0092 000a  |    |		.CONST	0x0092,0x000a
07d6 0096 000b  |    |		.CONST	0x0096,0x000b
07d8 0098 000c  |    |		.CONST	0x0098,0x000c
07da 009d 000e  |    |		.CONST	0x009d,0x000e
07dc 00a1 000f  |    |		.CONST	0x00a1,0x000f
07de 00a2 1001  |    |		.CONST	0x00a2,0x1001
07e0 00a4 000f  |    |		.CONST	0x00a4,0x000f
07e2 00a5 0010  |    |		.CONST	0x00a5,0x0010
07e4 00aa 0011  |    |		.CONST	0x00aa,0x0011
07e6 00af 0012  |    |		.CONST	0x00af,0x0012
07e8 ; --------------------------------------------------------------------------------------
07e8 ; Debug3 Subtable 0x4
07e8 ; --------------------------------------------------------------------------------------
07e8 0002 000b  |    |		.DBG3TAB	0x0002,0x000b
07ea 00bb ffff  |    |		.CONST	0x00bb,0xffff
07ec 00c0 fffe  |    |		.CONST	0x00c0,0xfffe
07ee 00c5 0001  |    |		.CONST	0x00c5,0x0001
07f0 00c6 0401  |    |		.CONST	0x00c6,0x0401
07f2 00c8 0402  |    |		.CONST	0x00c8,0x0402
07f4 00c9 0403  |    |		.CONST	0x00c9,0x0403
07f6 00ca 0404  |    |		.CONST	0x00ca,0x0404
07f8 00cb 0001  |    |		.CONST	0x00cb,0x0001
07fa 00d1 0005  |    |		.CONST	0x00d1,0x0005
07fc 00d2 0002  |    |		.CONST	0x00d2,0x0002
07fe 00d4 0003  |    |		.CONST	0x00d4,0x0003
0800 00df 0004  |    |		.CONST	0x00df,0x0004
0802 00ef 0006  |    |		.CONST	0x00ef,0x0006
0804 ; --------------------------------------------------------------------------------------
0804 ; Debug3 Subtable 0x5
0804 ; --------------------------------------------------------------------------------------
0804 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0806 ; --------------------------------------------------------------------------------------
0806 ; Debug3 Subtable 0x6
0806 ; --------------------------------------------------------------------------------------
0806 0002 0001  |    |		.DBG3TAB	0x0002,0x0001
0808 0113 ffff  |    |		.CONST	0x0113,0xffff
080a 0118 fffe  |    |		.CONST	0x0118,0xfffe
080c 011f 0001  |    |		.CONST	0x011f,0x0001
080e ; --------------------------------------------------------------------------------------
080e ; Debug3 Subtable 0x7
080e ; --------------------------------------------------------------------------------------
080e 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0810 012b 0001  | +  |		.CONST	0x012b,0x0001
0812 012c 0401  | ,  |		.CONST	0x012c,0x0401
0814 012e 0001  | .  |		.CONST	0x012e,0x0001
0816 012f 0002  | /  |		.CONST	0x012f,0x0002
0818 ; --------------------------------------------------------------------------------------
0818 ; Debug3 Subtable 0x8
0818 ; --------------------------------------------------------------------------------------
0818 0003 0002  |    |		.DBG3TAB	0x0003,0x0002
081a 0143 ffff  | C  |		.CONST	0x0143,0xffff
081c 0148 fffe  | H  |		.CONST	0x0148,0xfffe
081e 014b fffd  | K  |		.CONST	0x014b,0xfffd
0820 014d 0001  | M  |		.CONST	0x014d,0x0001
0822 015b 0002  | [  |		.CONST	0x015b,0x0002
0824 ; --------------------------------------------------------------------------------------
0824 ; Debug3 Subtable 0x9
0824 ; --------------------------------------------------------------------------------------
0824 0001 000c  |    |		.DBG3TAB	0x0001,0x000c
0826 016b ffff  | k  |		.CONST	0x016b,0xffff
0828 0174 0001  | t  |		.CONST	0x0174,0x0001
082a 0175 0401  | u  |		.CONST	0x0175,0x0401
082c 0177 0402  | w  |		.CONST	0x0177,0x0402
082e 0178 0403  | x  |		.CONST	0x0178,0x0403
0830 0179 0404  | y  |		.CONST	0x0179,0x0404
0832 017a 0001  | z  |		.CONST	0x017a,0x0001
0834 017c 0002  | |  |		.CONST	0x017c,0x0002
0836 017e 0003  | ~  |		.CONST	0x017e,0x0003
0838 0182 0004  |    |		.CONST	0x0182,0x0004
083a 0186 0005  |    |		.CONST	0x0186,0x0005
083c 018a 0006  |    |		.CONST	0x018a,0x0006
083e 018c 0007  |    |		.CONST	0x018c,0x0007
0840 ; --------------------------------------------------------------------------------------
0840 ; Debug3 Subtable 0xa
0840 ; --------------------------------------------------------------------------------------
0840 0002 004c  |   L|		.DBG3TAB	0x0002,0x004c
0842 0193 ffff  |    |		.CONST	0x0193,0xffff
0844 0196 fffe  |    |		.CONST	0x0196,0xfffe
0846 0199 0002  |    |		.CONST	0x0199,0x0002
0848 019b 0401  |    |		.CONST	0x019b,0x0401
084a 019d 0402  |    |		.CONST	0x019d,0x0402
084c 019f 0403  |    |		.CONST	0x019f,0x0403
084e 01a3 0404  |    |		.CONST	0x01a3,0x0404
0850 01a7 0405  |    |		.CONST	0x01a7,0x0405
0852 01a9 0801  |    |		.CONST	0x01a9,0x0801
0854 01ab 0802  |    |		.CONST	0x01ab,0x0802
0856 01ac 0803  |    |		.CONST	0x01ac,0x0803
0858 01ad 0804  |    |		.CONST	0x01ad,0x0804
085a 01af 0405  |    |		.CONST	0x01af,0x0405
085c 01b9 0c01  |    |		.CONST	0x01b9,0x0c01
085e 01bb 0c02  |    |		.CONST	0x01bb,0x0c02
0860 01bc 0c03  |    |		.CONST	0x01bc,0x0c03
0862 01bd 0c04  |    |		.CONST	0x01bd,0x0c04
0864 01bf 0804  |    |		.CONST	0x01bf,0x0804
0866 01cd 0002  |    |		.CONST	0x01cd,0x0002
0868 01ce 0003  |    |		.CONST	0x01ce,0x0003
086a 01cf 1001  |    |		.CONST	0x01cf,0x1001
086c 01d1 1002  |    |		.CONST	0x01d1,0x1002
086e 01d2 1003  |    |		.CONST	0x01d2,0x1003
0870 01d3 1004  |    |		.CONST	0x01d3,0x1004
0872 01d4 0003  |    |		.CONST	0x01d4,0x0003
0874 01f8 0016  |    |		.CONST	0x01f8,0x0016
0876 01fa 1401  |    |		.CONST	0x01fa,0x1401
0878 01fc 1402  |    |		.CONST	0x01fc,0x1402
087a 01fd 1403  |    |		.CONST	0x01fd,0x1403
087c 01fe 1404  |    |		.CONST	0x01fe,0x1404
087e 01ff 0016  |    |		.CONST	0x01ff,0x0016
0880 0206 0017  |    |		.CONST	0x0206,0x0017
0882 0208 0005  |    |		.CONST	0x0208,0x0005
0884 020e 1801  |    |		.CONST	0x020e,0x1801
0886 0210 1802  |    |		.CONST	0x0210,0x1802
0888 0211 1803  |    |		.CONST	0x0211,0x1803
088a 0212 1804  |    |		.CONST	0x0212,0x1804
088c 0214 0005  |    |		.CONST	0x0214,0x0005
088e 0216 0006  |    |		.CONST	0x0216,0x0006
0890 021a 0007  |    |		.CONST	0x021a,0x0007
0892 021c 0008  |    |		.CONST	0x021c,0x0008
0894 0221 1c01  | !  |		.CONST	0x0221,0x1c01
0896 0223 1c02  | #  |		.CONST	0x0223,0x1c02
0898 0224 1c03  | $  |		.CONST	0x0224,0x1c03
089a 0225 1c04  | %  |		.CONST	0x0225,0x1c04
089c 0227 0008  | '  |		.CONST	0x0227,0x0008
089e 0229 0009  | )  |		.CONST	0x0229,0x0009
08a0 022d 000a  | -  |		.CONST	0x022d,0x000a
08a2 022f 000b  | /  |		.CONST	0x022f,0x000b
08a4 0235 2001  | 5  |		.CONST	0x0235,0x2001
08a6 0237 2002  | 7  |		.CONST	0x0237,0x2002
08a8 0238 2003  | 8  |		.CONST	0x0238,0x2003
08aa 0239 2004  | 9  |		.CONST	0x0239,0x2004
08ac 023b 000b  | ;  |		.CONST	0x023b,0x000b
08ae 023d 000c  | =  |		.CONST	0x023d,0x000c
08b0 0241 000d  | A  |		.CONST	0x0241,0x000d
08b2 0243 000e  | C  |		.CONST	0x0243,0x000e
08b4 0246 000f  | F  |		.CONST	0x0246,0x000f
08b6 024a 0010  | J  |		.CONST	0x024a,0x0010
08b8 024c 0011  | L  |		.CONST	0x024c,0x0011
08ba 0255 2401  | U$ |		.CONST	0x0255,0x2401
08bc 0257 2402  | W$ |		.CONST	0x0257,0x2402
08be 0258 2403  | X$ |		.CONST	0x0258,0x2403
08c0 0259 2404  | Y$ |		.CONST	0x0259,0x2404
08c2 025b 0011  | [  |		.CONST	0x025b,0x0011
08c4 025d 0012  | ]  |		.CONST	0x025d,0x0012
08c6 0261 0013  | a  |		.CONST	0x0261,0x0013
08c8 0263 0014  | c  |		.CONST	0x0263,0x0014
08ca 0267 0015  | g  |		.CONST	0x0267,0x0015
08cc 026a 0018  | j  |		.CONST	0x026a,0x0018
08ce 026b 2801  | k( |		.CONST	0x026b,0x2801
08d0 026d 2802  | m( |		.CONST	0x026d,0x2802
08d2 026f 2803  | o( |		.CONST	0x026f,0x2803
08d4 0272 0018  | r  |		.CONST	0x0272,0x0018
08d6 0274 0001  | t  |		.CONST	0x0274,0x0001
08d8 0275 2c01  | u, |		.CONST	0x0275,0x2c01
08da 0277 0001  | w  |		.CONST	0x0277,0x0001
08dc 0279 0019  | y  |		.CONST	0x0279,0x0019
08de ; --------------------------------------------------------------------------------------
08de ; Debug3 Subtable 0xb
08de ; --------------------------------------------------------------------------------------
08de 0003 0057  |   W|		.DBG3TAB	0x0003,0x0057
08e0 0283 ffff  |    |		.CONST	0x0283,0xffff
08e2 0288 fffe  |    |		.CONST	0x0288,0xfffe
08e4 028b fffd  |    |		.CONST	0x028b,0xfffd
08e6 028c 0001  |    |		.CONST	0x028c,0x0001
08e8 028d 0401  |    |		.CONST	0x028d,0x0401
08ea 028f 0001  |    |		.CONST	0x028f,0x0001
08ec 0290 0002  |    |		.CONST	0x0290,0x0002
08ee 0292 0003  |    |		.CONST	0x0292,0x0003
08f0 0293 0801  |    |		.CONST	0x0293,0x0801
08f2 0295 0802  |    |		.CONST	0x0295,0x0802
08f4 0297 0803  |    |		.CONST	0x0297,0x0803
08f6 029a 0003  |    |		.CONST	0x029a,0x0003
08f8 029c 0c01  |    |		.CONST	0x029c,0x0c01
08fa 02a0 0003  |    |		.CONST	0x02a0,0x0003
08fc 02a1 0004  |    |		.CONST	0x02a1,0x0004
08fe 02a3 1001  |    |		.CONST	0x02a3,0x1001
0900 02a5 1002  |    |		.CONST	0x02a5,0x1002
0902 02a7 1003  |    |		.CONST	0x02a7,0x1003
0904 02ab 1004  |    |		.CONST	0x02ab,0x1004
0906 02af 1005  |    |		.CONST	0x02af,0x1005
0908 02b1 1401  |    |		.CONST	0x02b1,0x1401
090a 02b3 1402  |    |		.CONST	0x02b3,0x1402
090c 02b4 1403  |    |		.CONST	0x02b4,0x1403
090e 02b5 1404  |    |		.CONST	0x02b5,0x1404
0910 02b7 1005  |    |		.CONST	0x02b7,0x1005
0912 02c1 1801  |    |		.CONST	0x02c1,0x1801
0914 02c3 1802  |    |		.CONST	0x02c3,0x1802
0916 02c4 1803  |    |		.CONST	0x02c4,0x1803
0918 02c5 1804  |    |		.CONST	0x02c5,0x1804
091a 02c7 1404  |    |		.CONST	0x02c7,0x1404
091c 02d5 0004  |    |		.CONST	0x02d5,0x0004
091e 02d6 0005  |    |		.CONST	0x02d6,0x0005
0920 02db 1c01  |    |		.CONST	0x02db,0x1c01
0922 02dd 1c02  |    |		.CONST	0x02dd,0x1c02
0924 02df 1c03  |    |		.CONST	0x02df,0x1c03
0926 02e3 1c04  |    |		.CONST	0x02e3,0x1c04
0928 02e7 1c05  |    |		.CONST	0x02e7,0x1c05
092a 02e9 2001  |    |		.CONST	0x02e9,0x2001
092c 02eb 2002  |    |		.CONST	0x02eb,0x2002
092e 02ec 2003  |    |		.CONST	0x02ec,0x2003
0930 02ed 2004  |    |		.CONST	0x02ed,0x2004
0932 02ef 1c05  |    |		.CONST	0x02ef,0x1c05
0934 02f9 2401  |  $ |		.CONST	0x02f9,0x2401
0936 02fb 2402  |  $ |		.CONST	0x02fb,0x2402
0938 02fc 2403  |  $ |		.CONST	0x02fc,0x2403
093a 02fd 2404  |  $ |		.CONST	0x02fd,0x2404
093c 02ff 2004  |    |		.CONST	0x02ff,0x2004
093e 030d 0005  |    |		.CONST	0x030d,0x0005
0940 030e 0006  |    |		.CONST	0x030e,0x0006
0942 030f 2801  |  ( |		.CONST	0x030f,0x2801
0944 0311 2802  |  ( |		.CONST	0x0311,0x2802
0946 0312 2803  |  ( |		.CONST	0x0312,0x2803
0948 0313 2804  |  ( |		.CONST	0x0313,0x2804
094a 0314 0006  |    |		.CONST	0x0314,0x0006
094c 0316 0007  |    |		.CONST	0x0316,0x0007
094e 031e 0008  |    |		.CONST	0x031e,0x0008
0950 031f 2c01  |  , |		.CONST	0x031f,0x2c01
0952 0321 2c02  | !, |		.CONST	0x0321,0x2c02
0954 0323 2c03  | #, |		.CONST	0x0323,0x2c03
0956 0326 0008  | &  |		.CONST	0x0326,0x0008
0958 0328 3001  | (0 |		.CONST	0x0328,0x3001
095a 032c 0008  | ,  |		.CONST	0x032c,0x0008
095c 032d 0009  | -  |		.CONST	0x032d,0x0009
095e 032f 3401  | /4 |		.CONST	0x032f,0x3401
0960 0331 3402  | 14 |		.CONST	0x0331,0x3402
0962 0333 3403  | 34 |		.CONST	0x0333,0x3403
0964 0337 3404  | 74 |		.CONST	0x0337,0x3404
0966 033b 3405  | ;4 |		.CONST	0x033b,0x3405
0968 033d 3801  | =8 |		.CONST	0x033d,0x3801
096a 033f 3802  | ?8 |		.CONST	0x033f,0x3802
096c 0340 3803  | @8 |		.CONST	0x0340,0x3803
096e 0341 3804  | A8 |		.CONST	0x0341,0x3804
0970 0343 3405  | C4 |		.CONST	0x0343,0x3405
0972 034d 3c01  | M< |		.CONST	0x034d,0x3c01
0974 034f 3c02  | O< |		.CONST	0x034f,0x3c02
0976 0350 3c03  | P< |		.CONST	0x0350,0x3c03
0978 0351 3c04  | Q< |		.CONST	0x0351,0x3c04
097a 0353 3804  | S8 |		.CONST	0x0353,0x3804
097c 0361 0009  | a  |		.CONST	0x0361,0x0009
097e 0362 000a  | b  |		.CONST	0x0362,0x000a
0980 0363 4001  | c@ |		.CONST	0x0363,0x4001
0982 0365 4002  | e@ |		.CONST	0x0365,0x4002
0984 0366 4003  | f@ |		.CONST	0x0366,0x4003
0986 0367 4004  | g@ |		.CONST	0x0367,0x4004
0988 0368 000a  | h  |		.CONST	0x0368,0x000a
098a 036d 4401  | mD |		.CONST	0x036d,0x4401
098c 0371 4004  | q@ |		.CONST	0x0371,0x4004
098e 0372 000b  | r  |		.CONST	0x0372,0x000b
0990 0374 000c  | t  |		.CONST	0x0374,0x000c
0992 0378 000d  | x  |		.CONST	0x0378,0x000d
0994 ; --------------------------------------------------------------------------------------
0994 ; Debug3 Subtable 0xc
0994 ; --------------------------------------------------------------------------------------
0994 0003 0037  |   7|		.DBG3TAB	0x0003,0x0037
0996 0383 ffff  |    |		.CONST	0x0383,0xffff
0998 038a fffe  |    |		.CONST	0x038a,0xfffe
099a 0391 fffd  |    |		.CONST	0x0391,0xfffd
099c 0398 0001  |    |		.CONST	0x0398,0x0001
099e 039a 0401  |    |		.CONST	0x039a,0x0401
09a0 039c 0001  |    |		.CONST	0x039c,0x0001
09a2 039d 0002  |    |		.CONST	0x039d,0x0002
09a4 03a6 0003  |    |		.CONST	0x03a6,0x0003
09a6 03ab 0005  |    |		.CONST	0x03ab,0x0005
09a8 03ad 0801  |    |		.CONST	0x03ad,0x0801
09aa 03af 0802  |    |		.CONST	0x03af,0x0802
09ac 03b1 0803  |    |		.CONST	0x03b1,0x0803
09ae 03b5 0804  |    |		.CONST	0x03b5,0x0804
09b0 03b9 0805  |    |		.CONST	0x03b9,0x0805
09b2 03bb 0c01  |    |		.CONST	0x03bb,0x0c01
09b4 03bd 0c02  |    |		.CONST	0x03bd,0x0c02
09b6 03be 0c03  |    |		.CONST	0x03be,0x0c03
09b8 03bf 0c04  |    |		.CONST	0x03bf,0x0c04
09ba 03c1 0805  |    |		.CONST	0x03c1,0x0805
09bc 03cb 1001  |    |		.CONST	0x03cb,0x1001
09be 03cd 1002  |    |		.CONST	0x03cd,0x1002
09c0 03ce 1003  |    |		.CONST	0x03ce,0x1003
09c2 03cf 1004  |    |		.CONST	0x03cf,0x1004
09c4 03d1 0c04  |    |		.CONST	0x03d1,0x0c04
09c6 03df 0005  |    |		.CONST	0x03df,0x0005
09c8 03e0 1401  |    |		.CONST	0x03e0,0x1401
09ca 03e2 1402  |    |		.CONST	0x03e2,0x1402
09cc 03e3 1403  |    |		.CONST	0x03e3,0x1403
09ce 03e4 1404  |    |		.CONST	0x03e4,0x1404
09d0 03e6 0005  |    |		.CONST	0x03e6,0x0005
09d2 03e8 0006  |    |		.CONST	0x03e8,0x0006
09d4 03eb 1801  |    |		.CONST	0x03eb,0x1801
09d6 03ed 1802  |    |		.CONST	0x03ed,0x1802
09d8 03ef 1803  |    |		.CONST	0x03ef,0x1803
09da 03f3 1804  |    |		.CONST	0x03f3,0x1804
09dc 03f7 1805  |    |		.CONST	0x03f7,0x1805
09de 03f9 1c01  |    |		.CONST	0x03f9,0x1c01
09e0 03fb 1c02  |    |		.CONST	0x03fb,0x1c02
09e2 03fc 1c03  |    |		.CONST	0x03fc,0x1c03
09e4 03fd 1c04  |    |		.CONST	0x03fd,0x1c04
09e6 03ff 1805  |    |		.CONST	0x03ff,0x1805
09e8 0409 2001  |    |		.CONST	0x0409,0x2001
09ea 040b 2002  |    |		.CONST	0x040b,0x2002
09ec 040c 2003  |    |		.CONST	0x040c,0x2003
09ee 040d 2004  |    |		.CONST	0x040d,0x2004
09f0 040f 1c04  |    |		.CONST	0x040f,0x1c04
09f2 041d 0006  |    |		.CONST	0x041d,0x0006
09f4 0420 0007  |    |		.CONST	0x0420,0x0007
09f6 0422 0008  | "  |		.CONST	0x0422,0x0008
09f8 0423 2401  | #$ |		.CONST	0x0423,0x2401
09fa 0425 2402  | %$ |		.CONST	0x0425,0x2402
09fc 0427 2403  | '$ |		.CONST	0x0427,0x2403
09fe 042a 0008  | *  |		.CONST	0x042a,0x0008
0a00 042c 0004  | ,  |		.CONST	0x042c,0x0004
0a02 042d 2801  | -( |		.CONST	0x042d,0x2801
0a04 042f 0004  | /  |		.CONST	0x042f,0x0004
0a06 0431 0009  | 1  |		.CONST	0x0431,0x0009
0a08 0433 000a  | 3  |		.CONST	0x0433,0x000a
0a0a ; --------------------------------------------------------------------------------------
0a0a ; Debug3 Subtable 0xd
0a0a ; --------------------------------------------------------------------------------------
0a0a 0001 000a  |    |		.DBG3TAB	0x0001,0x000a
0a0c 0443 ffff  | C  |		.CONST	0x0443,0xffff
0a0e 0449 0001  | I  |		.CONST	0x0449,0x0001
0a10 044a 0401  | J  |		.CONST	0x044a,0x0401
0a12 044c 0001  | L  |		.CONST	0x044c,0x0001
0a14 044d 0801  | M  |		.CONST	0x044d,0x0801
0a16 044f 0802  | O  |		.CONST	0x044f,0x0802
0a18 0450 0803  | P  |		.CONST	0x0450,0x0803
0a1a 0451 0804  | Q  |		.CONST	0x0451,0x0804
0a1c 0452 0401  | R  |		.CONST	0x0452,0x0401
0a1e 0453 0c01  | S  |		.CONST	0x0453,0x0c01
0a20 045b 0401  | [  |		.CONST	0x045b,0x0401
0a22 ; --------------------------------------------------------------------------------------
0a22 ; Debug3 Subtable 0xe
0a22 ; --------------------------------------------------------------------------------------
0a22 0002 0028  |   (|		.DBG3TAB	0x0002,0x0028
0a24 046b ffff  | k  |		.CONST	0x046b,0xffff
0a26 046e fffe  | n  |		.CONST	0x046e,0xfffe
0a28 0471 0002  | q  |		.CONST	0x0471,0x0002
0a2a 0473 0401  | s  |		.CONST	0x0473,0x0401
0a2c 0475 0402  | u  |		.CONST	0x0475,0x0402
0a2e 0477 0403  | w  |		.CONST	0x0477,0x0403
0a30 047b 0404  | {  |		.CONST	0x047b,0x0404
0a32 047f 0405  |    |		.CONST	0x047f,0x0405
0a34 0481 0801  |    |		.CONST	0x0481,0x0801
0a36 0483 0802  |    |		.CONST	0x0483,0x0802
0a38 0484 0803  |    |		.CONST	0x0484,0x0803
0a3a 0485 0804  |    |		.CONST	0x0485,0x0804
0a3c 0487 0405  |    |		.CONST	0x0487,0x0405
0a3e 0491 0c01  |    |		.CONST	0x0491,0x0c01
0a40 0493 0c02  |    |		.CONST	0x0493,0x0c02
0a42 0494 0c03  |    |		.CONST	0x0494,0x0c03
0a44 0495 0c04  |    |		.CONST	0x0495,0x0c04
0a46 0497 0804  |    |		.CONST	0x0497,0x0804
0a48 04a5 0002  |    |		.CONST	0x04a5,0x0002
0a4a 04a6 0003  |    |		.CONST	0x04a6,0x0003
0a4c 04a7 1001  |    |		.CONST	0x04a7,0x1001
0a4e 04a9 1002  |    |		.CONST	0x04a9,0x1002
0a50 04ab 1003  |    |		.CONST	0x04ab,0x1003
0a52 04ae 0003  |    |		.CONST	0x04ae,0x0003
0a54 04af 0004  |    |		.CONST	0x04af,0x0004
0a56 04b0 1401  |    |		.CONST	0x04b0,0x1401
0a58 04b2 1402  |    |		.CONST	0x04b2,0x1402
0a5a 04b3 1403  |    |		.CONST	0x04b3,0x1403
0a5c 04b4 1404  |    |		.CONST	0x04b4,0x1404
0a5e 04b5 0004  |    |		.CONST	0x04b5,0x0004
0a60 04b7 0005  |    |		.CONST	0x04b7,0x0005
0a62 04b9 0006  |    |		.CONST	0x04b9,0x0006
0a64 04ba 1801  |    |		.CONST	0x04ba,0x1801
0a66 04bc 1802  |    |		.CONST	0x04bc,0x1802
0a68 04bd 1803  |    |		.CONST	0x04bd,0x1803
0a6a 04be 1804  |    |		.CONST	0x04be,0x1804
0a6c 04bf 0006  |    |		.CONST	0x04bf,0x0006
0a6e 04c1 0007  |    |		.CONST	0x04c1,0x0007
0a70 04c4 0001  |    |		.CONST	0x04c4,0x0001
0a72 04c5 1c01  |    |		.CONST	0x04c5,0x1c01
0a74 04c7 0001  |    |		.CONST	0x04c7,0x0001
0a76 04c9 0008  |    |		.CONST	0x04c9,0x0008
0a78 ; --------------------------------------------------------------------------------------
0a78 ; Debug3 Subtable 0xf
0a78 ; --------------------------------------------------------------------------------------
0a78 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
0a7a 04d3 ffff  |    |		.CONST	0x04d3,0xffff
0a7c 04d8 0001  |    |		.CONST	0x04d8,0x0001
0a7e 04d9 0401  |    |		.CONST	0x04d9,0x0401
0a80 04db 0402  |    |		.CONST	0x04db,0x0402
0a82 04dc 0403  |    |		.CONST	0x04dc,0x0403
0a84 04dd 0404  |    |		.CONST	0x04dd,0x0404
0a86 04de 0001  |    |		.CONST	0x04de,0x0001
0a88 ; --------------------------------------------------------------------------------------
0a88 ; Debug3 Subtable 0x10
0a88 ; --------------------------------------------------------------------------------------
0a88 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
0a8a 04f3 ffff  |    |		.CONST	0x04f3,0xffff
0a8c 04fa 0001  |    |		.CONST	0x04fa,0x0001
0a8e 04fd 0002  |    |		.CONST	0x04fd,0x0002
0a90 04fe 0401  |    |		.CONST	0x04fe,0x0401
0a92 0500 0402  |    |		.CONST	0x0500,0x0402
0a94 0501 0403  |    |		.CONST	0x0501,0x0403
0a96 0502 0404  |    |		.CONST	0x0502,0x0404
0a98 0503 0002  |    |		.CONST	0x0503,0x0002
0a9a 050a 0003  |    |		.CONST	0x050a,0x0003
0a9c ; --------------------------------------------------------------------------------------
0a9c ; Debug3 Subtable 0x11
0a9c ; --------------------------------------------------------------------------------------
0a9c 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0a9e 0513 ffff  |    |		.CONST	0x0513,0xffff
0aa0 051c 0001  |    |		.CONST	0x051c,0x0001
0aa2 0525 0002  | %  |		.CONST	0x0525,0x0002
0aa4 0527 0003  | '  |		.CONST	0x0527,0x0003
0aa6 052b 0004  | +  |		.CONST	0x052b,0x0004
0aa8 ; --------------------------------------------------------------------------------------
0aa8 ; Debug3 Subtable 0x12
0aa8 ; --------------------------------------------------------------------------------------
0aa8 0002 0005  |    |		.DBG3TAB	0x0002,0x0005
0aaa 0533 ffff  | 3  |		.CONST	0x0533,0xffff
0aac 053a fffe  | :  |		.CONST	0x053a,0xfffe
0aae 0541 0001  | A  |		.CONST	0x0541,0x0001
0ab0 0544 0401  | D  |		.CONST	0x0544,0x0401
0ab2 0545 0001  | E  |		.CONST	0x0545,0x0001
0ab4 054a 0801  | J  |		.CONST	0x054a,0x0801
0ab6 054b 0401  | K  |		.CONST	0x054b,0x0401
0ab8 ; --------------------------------------------------------------------------------------
0ab8 ; Debug3 Subtable 0x13
0ab8 ; --------------------------------------------------------------------------------------
0ab8 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0aba 0553 0001  | S  |		.CONST	0x0553,0x0001
0abc ; --------------------------------------------------------------------------------------
0abc ; Debug3 Subtable 0x14
0abc ; --------------------------------------------------------------------------------------
0abc 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0abe 0563 0001  | c  |		.CONST	0x0563,0x0001
0ac0 ; --------------------------------------------------------------------------------------
0ac0 ; Debug3 Subtable 0x15
0ac0 ; --------------------------------------------------------------------------------------
0ac0 0002 000b  |    |		.DBG3TAB	0x0002,0x000b
0ac2 0573 ffff  | s  |		.CONST	0x0573,0xffff
0ac4 0578 fffe  | x  |		.CONST	0x0578,0xfffe
0ac6 057d 0001  | }  |		.CONST	0x057d,0x0001
0ac8 0580 0401  |    |		.CONST	0x0580,0x0401
0aca 0584 0001  |    |		.CONST	0x0584,0x0001
0acc 0585 0002  |    |		.CONST	0x0585,0x0002
0ace 0587 0003  |    |		.CONST	0x0587,0x0003
0ad0 0588 0801  |    |		.CONST	0x0588,0x0801
0ad2 058a 0003  |    |		.CONST	0x058a,0x0003
0ad4 058b 0004  |    |		.CONST	0x058b,0x0004
0ad6 0590 0005  |    |		.CONST	0x0590,0x0005
0ad8 0596 0c01  |    |		.CONST	0x0596,0x0c01
0ada 0597 0005  |    |		.CONST	0x0597,0x0005
0adc ; --------------------------------------------------------------------------------------
0adc ; Debug3 Subtable 0x16
0adc ; --------------------------------------------------------------------------------------
0adc 0001 000c  |    |		.DBG3TAB	0x0001,0x000c
0ade 05a3 ffff  |    |		.CONST	0x05a3,0xffff
0ae0 05aa 0002  |    |		.CONST	0x05aa,0x0002
0ae2 05ab 0401  |    |		.CONST	0x05ab,0x0401
0ae4 05ad 0402  |    |		.CONST	0x05ad,0x0402
0ae6 05ae 0403  |    |		.CONST	0x05ae,0x0403
0ae8 05af 0404  |    |		.CONST	0x05af,0x0404
0aea 05b0 0002  |    |		.CONST	0x05b0,0x0002
0aec 05b2 0003  |    |		.CONST	0x05b2,0x0003
0aee 05b4 0004  |    |		.CONST	0x05b4,0x0004
0af0 05b9 0001  |    |		.CONST	0x05b9,0x0001
0af2 05ba 0801  |    |		.CONST	0x05ba,0x0801
0af4 05bc 0001  |    |		.CONST	0x05bc,0x0001
0af6 05be 0005  |    |		.CONST	0x05be,0x0005
0af8 0000 0000  |    |		.BLANK	0000[0x108]